home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_progs / prog_oth / monopoly.lzh / monopoly_source.LZH / f3.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-01-06  |  48.2 KB  |  1,882 lines
  1. /* f3.c contains these functions for monopoly:
  2.      showrr(),  showutil(),  showprop(), show2(),  show3()   */
  3.  
  4. #include "mono:defines"
  5. #include "mono:xvariables"
  6.  
  7. VOID show3(sname1, sname2, sname3, prop)
  8. char *sname1, *sname2, *sname3;
  9. USHORT prop;
  10. {
  11. USHORT propb, propc;
  12. UBYTE *rentstr, *coststr;
  13.  
  14. mesg1.IText=sname1;
  15. PrintIText(rportpropinfo, &mesg0, 0, 0);              
  16. PrintIText(rportpropinfo, &mesg1, 0, 0);
  17. if (ismorg[prop])
  18.    {
  19.    mesg7.FrontPen=green;
  20.    mesg7.IText=(UBYTE *)"Property is MORTGAGED!";
  21.    mesg8.FrontPen=green;
  22.    mesg8.IText=(UBYTE *)"Pay NO rent!";
  23.    if (owner[prop] == nowrolling)
  24.       {
  25.       mesg7.FrontPen=red;
  26.       mesg8.FrontPen=red;
  27.       mesg8.IText=(UBYTE *)"Collect NO rent!";
  28.       }
  29.    PrintIText(rportpropinfo, &mesg7, 0, 0);
  30.    PrintIText(rportpropinfo, &mesg8, 0, 0);
  31.    goto bypassrent3;
  32.    }
  33. if (prop == 6)
  34.    {
  35.    coststr="It will cost $100.";
  36.    if (numhouses[prop] == 0)
  37.       {
  38.       rentstr="The rent is $6";
  39.       if (ismono[prop]) rentstr="The rent is $12.";
  40.       }
  41.    if (numhouses[prop] == 1)  rentstr="The rent is $30.";
  42.    if (numhouses[prop] == 2)  rentstr="The rent is $90.";
  43.    if (numhouses[prop] == 3)  rentstr="The rent is $270.";
  44.    if (numhouses[prop] == 4)  rentstr="The rent is $400.";
  45.    if (numhouses[prop] == 5)  rentstr="The rent is $550.";
  46.    propb=8;
  47.    propc=9;
  48.    }
  49. if (prop == 8)
  50.    {
  51.    coststr="It will cost $100.";
  52.    if (numhouses[prop] == 0)
  53.       {
  54.       rentstr="The rent is $6.";
  55.       if (ismono[prop]) rentstr="The rent is $12.";
  56.       }
  57.    if (numhouses[prop] == 1)  rentstr="The rent is $30.";
  58.    if (numhouses[prop] == 2)  rentstr="The rent is $90.";
  59.    if (numhouses[prop] == 3)  rentstr="The rent is $270.";
  60.    if (numhouses[prop] == 4)  rentstr="The rent is $400.";
  61.    if (numhouses[prop] == 5)  rentstr="The rent is $550.";
  62.    propb=6;
  63.    propc=9;
  64.    }
  65. if (prop == 9)
  66.    {
  67.    coststr="It will cost $120.";
  68.    if (numhouses[prop] == 0)
  69.       {
  70.       rentstr="The rent is $8.";
  71.       if (ismono[prop]) rentstr="The rent is $16.";
  72.       }
  73.    if (numhouses[prop] == 1)  rentstr="The rent is $40.";
  74.    if (numhouses[prop] == 2)  rentstr="The rent is $100.";
  75.    if (numhouses[prop] == 3)  rentstr="The rent is $300.";
  76.    if (numhouses[prop] == 4)  rentstr="The rent is $450.";
  77.    if (numhouses[prop] == 5)  rentstr="The rent is $600.";
  78.    propb=6;
  79.    propc=8;
  80.    }
  81. if (prop == 11)
  82.    {
  83.    coststr="It will cost $140.";
  84.    if (numhouses[prop] == 0)
  85.       {
  86.       rentstr="The rent is $10.";
  87.       if (ismono[prop]) rentstr="The rent is $20.";
  88.       }
  89.    if (numhouses[prop] == 1)  rentstr="The rent is $50.";
  90.    if (numhouses[prop] == 2)  rentstr="The rent is $150.";
  91.    if (numhouses[prop] == 3)  rentstr="The rent is $450.";
  92.    if (numhouses[prop] == 4)  rentstr="The rent is $625.";
  93.    if (numhouses[prop] == 5)  rentstr="The rent is $750.";
  94.    propb=13;
  95.    propc=14;
  96.    }
  97. if (prop == 13)
  98.    {
  99.    coststr="It will cost $140.";
  100.    if (numhouses[prop] == 0)
  101.       {
  102.       rentstr="The rent is $10.";
  103.       if (ismono[prop]) rentstr="The rent is $20.";
  104.       }
  105.    if (numhouses[prop] == 1)  rentstr="The rent is $50.";
  106.    if (numhouses[prop] == 2)  rentstr="The rent is $150.";
  107.    if (numhouses[prop] == 3)  rentstr="The rent is $450.";
  108.    if (numhouses[prop] == 4)  rentstr="The rent is $625.";
  109.    if (numhouses[prop] == 5)  rentstr="The rent is $750.";
  110.    propb=11;
  111.    propc=14;
  112.    }
  113. if (prop == 14)
  114.    {
  115.    coststr="It will cost $160.";
  116.    if (numhouses[prop] == 0)
  117.       {
  118.       rentstr="The rent is $12.";
  119.       if (ismono[prop]) rentstr="The rent is $24.";
  120.       }
  121.    if (numhouses[prop] == 1)  rentstr="The rent is $60.";
  122.    if (numhouses[prop] == 2)  rentstr="The rent is $180.";
  123.    if (numhouses[prop] == 3)  rentstr="The rent is $500.";
  124.    if (numhouses[prop] == 4)  rentstr="The rent is $700.";
  125.    if (numhouses[prop] == 5)  rentstr="The rent is $900.";
  126.    propb=11;
  127.    propc=13;
  128.    }
  129. if (prop == 16)
  130.    {
  131.    coststr="It will cost $180.";
  132.    if (numhouses[prop] == 0)
  133.       {
  134.       rentstr="The rent is $14.";
  135.       if (ismono[prop]) rentstr="The rent is $28.";
  136.       }
  137.    if (numhouses[prop] == 1)  rentstr="The rent is $70.";
  138.    if (numhouses[prop] == 2)  rentstr="The rent is $200.";
  139.    if (numhouses[prop] == 3)  rentstr="The rent is $550.";
  140.    if (numhouses[prop] == 4)  rentstr="The rent is $750.";
  141.    if (numhouses[prop] == 5)  rentstr="The rent is $950.";
  142.    propb=18;
  143.    propc=19;
  144.    }
  145. if (prop == 18)
  146.    {
  147.    coststr="It will cost $180.";
  148.    if (numhouses[prop] == 0)
  149.       {
  150.       rentstr="The rent is $14.";
  151.       if (ismono[prop]) rentstr="The rent is $28.";
  152.       }
  153.    if (numhouses[prop] == 1)  rentstr="The rent is $70.";
  154.    if (numhouses[prop] == 2)  rentstr="The rent is $200.";
  155.    if (numhouses[prop] == 3)  rentstr="The rent is $550.";
  156.    if (numhouses[prop] == 4)  rentstr="The rent is $750.";
  157.    if (numhouses[prop] == 5)  rentstr="The rent is $950.";
  158.    propb=16;
  159.    propc=19;
  160.    }
  161. if (prop == 19)
  162.    {
  163.    coststr="It will cost $200.";
  164.    if (numhouses[prop] == 0)
  165.       {
  166.       rentstr="The rent is $16.";
  167.       if (ismono[prop]) rentstr="The rent is $32.";
  168.       }
  169.    if (numhouses[prop] == 1)  rentstr="The rent is $80.";
  170.    if (numhouses[prop] == 2)  rentstr="The rent is $220.";
  171.    if (numhouses[prop] == 3)  rentstr="The rent is $600.";
  172.    if (numhouses[prop] == 4)  rentstr="The rent is $800.";
  173.    if (numhouses[prop] == 5)  rentstr="The rent is $1000.";
  174.    propb=16;
  175.    propc=18;
  176.    }
  177. if (prop == 21)
  178.    {
  179.    coststr="It will cost $220.";
  180.    if (numhouses[prop] == 0)
  181.       {
  182.       rentstr="The rent is $18.";
  183.       if (ismono[prop]) rentstr="The rent is $36.";
  184.       }
  185.    if (numhouses[prop] == 1)  rentstr="The rent is $90.";
  186.    if (numhouses[prop] == 2)  rentstr="The rent is $250.";
  187.    if (numhouses[prop] == 3)  rentstr="The rent is $700.";
  188.    if (numhouses[prop] == 4)  rentstr="The rent is $875.";
  189.    if (numhouses[prop] == 5)  rentstr="The rent is $1050.";
  190.    propb=23;
  191.    propc=24;
  192.    }
  193. if (prop == 23)
  194.    {
  195.    coststr="It will cost $220.";
  196.    if (numhouses[prop] == 0)
  197.       {
  198.       rentstr="The rent is $18.";
  199.       if (ismono[prop]) rentstr="The rent is $36.";
  200.       }
  201.    if (numhouses[prop] == 1)  rentstr="The rent is $90.";
  202.    if (numhouses[prop] == 2)  rentstr="The rent is $250.";
  203.    if (numhouses[prop] == 3)  rentstr="The rent is $700.";
  204.    if (numhouses[prop] == 4)  rentstr="The rent is $875.";
  205.    if (numhouses[prop] == 5)  rentstr="The rent is $1050.";
  206.    propb=21;
  207.    propc=24;
  208.    }
  209. if (prop == 24)
  210.    {
  211.    coststr="It will cost $240.";
  212.    if (numhouses[prop] == 0)
  213.       {
  214.       rentstr="The rent is $20.";
  215.       if (ismono[prop]) rentstr="The rent is $40.";
  216.       }
  217.    if (numhouses[prop] == 1)  rentstr="The rent is $100.";
  218.    if (numhouses[prop] == 2)  rentstr="The rent is $300.";
  219.    if (numhouses[prop] == 3)  rentstr="The rent is $750.";
  220.    if (numhouses[prop] == 4)  rentstr="The rent is $925.";
  221.    if (numhouses[prop] == 5)  rentstr="The rent is $1100.";
  222.    propb=21;
  223.    propc=23;
  224.    }
  225. if (prop == 26)
  226.    {
  227.    coststr="It will cost $260.";
  228.    if (numhouses[prop] == 0)
  229.       {
  230.       rentstr="The rent is $22.";
  231.       if (ismono[prop]) rentstr="The rent is $44.";
  232.       }
  233.    if (numhouses[prop] == 1)  rentstr="The rent is $110.";
  234.    if (numhouses[prop] == 2)  rentstr="The rent is $330.";
  235.    if (numhouses[prop] == 3)  rentstr="The rent is $800.";
  236.    if (numhouses[prop] == 4)  rentstr="The rent is $975.";
  237.    if (numhouses[prop] == 5)  rentstr="The rent is $1150.";
  238.    propb=27;
  239.    propc=29;
  240.    }
  241. if (prop == 27)
  242.    {
  243.    coststr="It will cost $260.";
  244.    if (numhouses[prop] == 0)
  245.       {
  246.       rentstr="The rent is $22.";
  247.       if (ismono[prop]) rentstr="The rent is $44.";
  248.       }
  249.    if (numhouses[prop] == 1)  rentstr="The rent is $110.";
  250.    if (numhouses[prop] == 2)  rentstr="The rent is $330.";
  251.    if (numhouses[prop] == 3)  rentstr="The rent is $800.";
  252.    if (numhouses[prop] == 4)  rentstr="The rent is $975.";
  253.    if (numhouses[prop] == 5)  rentstr="The rent is $1150.";
  254.    propb=26;
  255.    propc=29;
  256.    }
  257. if (prop == 29)
  258.    {
  259.    coststr="It will cost $280.";
  260.    if (numhouses[prop] == 0)
  261.       {
  262.       rentstr="The rent is $24.";
  263.       if (ismono[prop]) rentstr="The rent is $48.";
  264.       }
  265.    if (numhouses[prop] == 1)  rentstr="The rent is $120.";
  266.    if (numhouses[prop] == 2)  rentstr="The rent is $360.";
  267.    if (numhouses[prop] == 3)  rentstr="The rent is $850.";
  268.    if (numhouses[prop] == 4)  rentstr="The rent is $1025.";
  269.    if (numhouses[prop] == 5)  rentstr="The rent is $1200.";
  270.    propb=26;
  271.    propc=27;
  272.    }
  273. if (prop == 31)
  274.    {
  275.    coststr="It will cost $300.";
  276.    if (numhouses[prop] == 0)
  277.       {
  278.       rentstr="The rent is $26.";
  279.       if (ismono[prop]) rentstr="The rent is $52.";
  280.       }
  281.    if (numhouses[prop] == 1)  rentstr="The rent is $130.";
  282.    if (numhouses[prop] == 2)  rentstr="The rent is $390.";
  283.    if (numhouses[prop] == 3)  rentstr="The rent is $900.";
  284.    if (numhouses[prop] == 4)  rentstr="The rent is $1100.";
  285.    if (numhouses[prop] == 5)  rentstr="The rent is $1275.";
  286.    propb=32;
  287.    propc=34;
  288.    }
  289. if (prop == 32)
  290.    {
  291.    coststr="It will cost $300.";
  292.    if (numhouses[prop] == 0)
  293.       {
  294.       rentstr="The rent is $26.";
  295.       if (ismono[prop]) rentstr="The rent is $52.";
  296.       }
  297.    if (numhouses[prop] == 1)  rentstr="The rent is $130.";
  298.    if (numhouses[prop] == 2)  rentstr="The rent is $390.";
  299.    if (numhouses[prop] == 3)  rentstr="The rent is $900.";
  300.    if (numhouses[prop] == 4)  rentstr="The rent is $1100.";
  301.    if (numhouses[prop] == 5)  rentstr="The rent is $1275.";
  302.    propb=31;
  303.    propc=34;
  304.    }
  305. if (prop == 34)
  306.    {
  307.    coststr="It will cost $320.";
  308.    if (numhouses[prop] == 0)
  309.       {
  310.       rentstr="The rent is $28.";
  311.       if (ismono[prop]) rentstr="The rent is $56.";
  312.       }
  313.    if (numhouses[prop] == 1)  rentstr="The rent is $150.";
  314.    if (numhouses[prop] == 2)  rentstr="The rent is $450.";
  315.    if (numhouses[prop] == 3)  rentstr="The rent is $1000.";
  316.    if (numhouses[prop] == 4)  rentstr="The rent is $1200.";
  317.    if (numhouses[prop] == 5)  rentstr="The rent is $1400.";
  318.    propb=31;
  319.    propc=32;
  320.    }
  321.  
  322. if ( (owner[prop] != nowrolling) && (owner[prop] != 9) )
  323.    {
  324.    mesg6.FrontPen=red;
  325.    mesg9.FrontPen=red;   
  326.    if (numhouses[prop] == 0)
  327.       {
  328.       if (!ismono[prop])
  329.          {
  330.          mesg6.IText=rentstr;
  331.      mesg4.IText=&houses0[0];
  332.          eft(nowrolling, owner[prop], rentnone[prop]);
  333.          }
  334.       if ( (ismono[prop]) && (numhouses[prop] == 0) )
  335.          {
  336.          mesg9.IText=rentstr;
  337.      mesg4.IText=&houses0[0];
  338.          mesg7.IText=(UBYTE *)"Part of a MONOPOLY,";
  339.      mesg8.IText=(UBYTE *)"pay DOUBLE rent!";
  340.      PrintIText(rportpropinfo, &mesg7, 0, 0);
  341.      PrintIText(rportpropinfo, &mesg8, 0, 0);
  342.      PrintIText(rportpropinfo, &mesg9, 0, 5);
  343.          eft(nowrolling, owner[prop], 2*rentnone[prop]);
  344.          }
  345.       } 
  346.    if (numhouses[prop] == 1)
  347.       {
  348.       mesg6.IText=rentstr;
  349.       mesg4.IText=&houses1[0];
  350.       eft(nowrolling, owner[prop], rentone[prop]);
  351.       }
  352.    if (numhouses[prop] == 2)
  353.       {
  354.       mesg6.IText=rentstr;
  355.       mesg4.IText=&houses2[0];
  356.       eft(nowrolling, owner[prop], renttwo[prop]);
  357.       }
  358.    if (numhouses[prop] == 3)
  359.       {
  360.       mesg6.IText=rentstr;
  361.       mesg4.IText=&houses3[0];
  362.       eft(nowrolling, owner[prop], rentthree[prop]);
  363.       }
  364.    if (numhouses[prop] == 4)
  365.       {
  366.       mesg6.IText=rentstr;
  367.       mesg4.IText=&houses4[0];
  368.       eft(nowrolling, owner[prop], rentfour[prop]);
  369.       }
  370.    if (numhouses[prop] == 5)
  371.       {
  372.       mesg6.IText=rentstr;
  373.       mesg4.IText=&houses5[0];
  374.       eft(nowrolling, owner[prop], renthotel[prop]);
  375.       }
  376.    PrintIText(rportpropinfo, &mesg2, 0, 10);
  377.    PrintIText(rportpropinfo, &mesg3, 0, 10);
  378.    PrintIText(rportpropinfo, &mesg4, 0, 10);
  379.    if (!ismono[prop])  PrintIText(rportpropinfo, &mesg6, 0, 10);
  380.    if ( (ismono[prop]) && (numhouses[prop] > 0) ) 
  381.       PrintIText(rportpropinfo, &mesg6, 0, 10);
  382.    }
  383.  
  384. if (owner[prop] == 9)
  385.    {
  386.    mesg2.IText=coststr;
  387.    mesg2.FrontPen=red;
  388.    mesg3.IText=sname2;
  389.    mesg4.IText=(UBYTE *)"is owned by";
  390.    if (owner[propb] == 9)
  391.       {  
  392.       mesg5.FrontPen=white;
  393.       mesg5.IText=(UBYTE *)"the bank.";
  394.       }
  395.    if (owner[propb] == 0)
  396.       {
  397.       mesg5.FrontPen=25;  
  398.       mesg5.IText=&name0[0];
  399.       }
  400.    if (owner[propb] == 1) 
  401.       {
  402.       mesg5.FrontPen=26;   
  403.       mesg5.IText=&name1[0];
  404.       }
  405.    if (owner[propb] == 2) 
  406.       {
  407.       mesg5.FrontPen=27;   
  408.       mesg5.IText=&name2[0];
  409.       }
  410.    if (owner[propb] == 3) 
  411.       {
  412.       mesg5.FrontPen=28;   
  413.       mesg5.IText=&name3[0];
  414.       }
  415.    mesg6.IText=sname3;
  416.    mesg7.IText=(UBYTE *)"is owned by";
  417.    if (owner[propc] == 9) 
  418.       {
  419.       mesg8.FrontPen=white; 
  420.       mesg8.IText=(UBYTE *)"the bank.";
  421.       }   
  422.    if (owner[propc] == 0)
  423.       {
  424.       mesg8.FrontPen=25;  
  425.       mesg8.IText=&name0[0];
  426.       }
  427.    if (owner[propc] == 1) 
  428.       {
  429.       mesg8.FrontPen=26;   
  430.       mesg8.IText=&name1[0];
  431.       }
  432.    if (owner[propc] == 2) 
  433.       {
  434.       mesg8.FrontPen=27;   
  435.       mesg8.IText=&name2[0];
  436.       }
  437.    if (owner[propc] == 3) 
  438.       {
  439.       mesg8.FrontPen=28;   
  440.       mesg8.IText=&name3[0];
  441.       }           
  442.    PrintIText(rportpropinfo, &mesg2, 0, 0);
  443.    PrintIText(rportpropinfo, &mesg3, 0, 5);
  444.    PrintIText(rportpropinfo, &mesg4, 0, 5);
  445.    PrintIText(rportpropinfo, &mesg5, 0, 5);
  446.    PrintIText(rportpropinfo, &mesg6, 0, 8);
  447.    PrintIText(rportpropinfo, &mesg7, 0, 8);
  448.    PrintIText(rportpropinfo, &mesg8, 0, 8);
  449.    PrintIText(rportpropinfo, &mesg10, 0, 0);
  450.    }
  451. bypassrent3:
  452. if (owner[prop] == nowrolling)
  453.    {
  454.    mesg3.IText=(UBYTE *)"You own this property.";
  455.    PrintIText(rportpropinfo, &mesg3, 0, 0);
  456.    }
  457. }
  458.  
  459. VOID show2(sname1, sname2, prop)
  460. char *sname1, *sname2;
  461. USHORT prop;
  462. {
  463. USHORT prop1;
  464. UBYTE *rentstr, *coststr;
  465.  
  466. mesg1.IText=sname1;
  467. PrintIText(rportpropinfo, &mesg0, 0, 0);              
  468. PrintIText(rportpropinfo, &mesg1, 0, 0);
  469. if (ismorg[prop])
  470.    {
  471.    mesg7.FrontPen=green;
  472.    mesg7.IText=(UBYTE *)"Property is MORTGAGED!";
  473.    mesg8.FrontPen=green;
  474.    mesg8.IText=(UBYTE *)"Pay NO rent!";
  475.    if (owner[prop] == nowrolling)
  476.       {
  477.       mesg7.FrontPen=red;
  478.       mesg8.FrontPen=red;
  479.       mesg8.IText=(UBYTE *)"Collect NO rent!";
  480.       }
  481.    PrintIText(rportpropinfo, &mesg7, 0, 0);
  482.    PrintIText(rportpropinfo, &mesg8, 0, 0);
  483.    goto bypassrent2;
  484.    }
  485. if (prop == 1)
  486.    {
  487.    prop1=3;
  488.    coststr="It will cost $60.";
  489.    if (numhouses[prop] == 0)
  490.       {
  491.       rentstr="The rent is $2.";
  492.       if (ismono[prop]) rentstr="The rent is $4.";
  493.       }
  494.    if (numhouses[prop] == 1)  rentstr="The rent is $10.";
  495.    if (numhouses[prop] == 2)  rentstr="The rent is $30.";
  496.    if (numhouses[prop] == 3)  rentstr="The rent is $90.";
  497.    if (numhouses[prop] == 4)  rentstr="The rent is $160.";
  498.    if (numhouses[prop] == 5)  rentstr="The rent is $250.";
  499.    }
  500. if (prop == 3)
  501.    {
  502.    prop1=1;
  503.    coststr="It will cost $60.";
  504.    if (numhouses[prop] == 0)
  505.       {
  506.       rentstr="The rent is $4.";
  507.       if (ismono[prop]) rentstr="The rent is $8.";
  508.       }
  509.    if (numhouses[prop] == 1)  rentstr="The rent is $20.";
  510.    if (numhouses[prop] == 2)  rentstr="The rent is $60.";
  511.    if (numhouses[prop] == 3)  rentstr="The rent is $180.";
  512.    if (numhouses[prop] == 4)  rentstr="The rent is $320.";
  513.    if (numhouses[prop] == 5)  rentstr="The rent is $450.";
  514.    }
  515. if (prop == 37)
  516.    {
  517.    prop1=39;
  518.    coststr="It will cost $350.";
  519.    if (numhouses[prop] == 0)
  520.       {
  521.       rentstr="The rent is $35.";
  522.       if (ismono[prop]) rentstr="The rent is $70.";
  523.       }
  524.    if (numhouses[prop] == 1)  rentstr="The rent is $175.";
  525.    if (numhouses[prop] == 2)  rentstr="The rent is $500.";
  526.    if (numhouses[prop] == 3)  rentstr="The rent is $1100.";
  527.    if (numhouses[prop] == 4)  rentstr="The rent is $1300.";
  528.    if (numhouses[prop] == 5)  rentstr="The rent is $1500.";
  529.    }
  530. if (prop == 39)
  531.    {
  532.    prop1=37;
  533.    coststr="It will cost $400.";
  534.    if (numhouses[prop] == 0)
  535.       {
  536.       rentstr="The rent is $50.";
  537.       if (ismono[prop]) rentstr="The rent is $100.";
  538.       }
  539.    if (numhouses[prop] == 1)  rentstr="The rent is $200.";
  540.    if (numhouses[prop] == 2)  rentstr="The rent is $600.";
  541.    if (numhouses[prop] == 3)  rentstr="The rent is $1400.";
  542.    if (numhouses[prop] == 4)  rentstr="The rent is $1700.";
  543.    if (numhouses[prop] == 5)  rentstr="The rent is $2000.";
  544.    }
  545.  
  546. if ( (owner[prop] != nowrolling) && (owner[prop] != 9) )
  547.    {
  548.    mesg6.FrontPen=red;
  549.    mesg9.FrontPen=red;
  550.    if (numhouses[prop] == 0)
  551.       {
  552.       if (!ismono[prop])
  553.          {      
  554.          mesg6.IText=rentstr;
  555.      mesg4.IText=&houses0[0];
  556.          eft(nowrolling, owner[prop], rentnone[prop]);
  557.          }
  558.       if ( (ismono[prop])  && (numhouses[prop] == 0) )
  559.          {
  560.      mesg4.IText=&houses0[0];
  561.          mesg7.IText=(UBYTE *)"Part of a MONOPOLY,";
  562.      mesg8.IText=(UBYTE *)"pay DOUBLE rent!";
  563.          mesg9.IText=rentstr;
  564.      PrintIText(rportpropinfo, &mesg7, 0, 0);
  565.      PrintIText(rportpropinfo, &mesg8, 0, 0);
  566.      PrintIText(rportpropinfo, &mesg9, 0, 5);
  567.          eft(nowrolling, owner[prop], 2*rentnone[prop]);
  568.          }
  569.       } 
  570.    if (numhouses[prop] == 1)
  571.       {
  572.       mesg6.IText=rentstr;
  573.       mesg4.IText=&houses1[0];
  574.       eft(nowrolling, owner[prop], rentone[prop]);
  575.       }
  576.    if (numhouses[prop] == 2)
  577.       {
  578.       mesg6.IText=rentstr;
  579.       mesg4.IText=&houses2[0];
  580.       eft(nowrolling, owner[prop], renttwo[prop]);
  581.       }
  582.    if (numhouses[prop] == 3)
  583.       {
  584.       mesg6.IText=rentstr;
  585.       mesg4.IText=&houses3[0];
  586.       eft(nowrolling, owner[prop], rentthree[prop]);
  587.       }
  588.    if (numhouses[prop] == 4)
  589.       {
  590.       mesg6.IText=rentstr;
  591.       mesg4.IText=&houses4[0];
  592.       eft(nowrolling, owner[prop], rentfour[prop]);
  593.       }
  594.    if (numhouses[prop] == 5)
  595.       {
  596.       mesg6.IText=rentstr;
  597.       mesg4.IText=&houses5[0];
  598.       eft(nowrolling, owner[prop], renthotel[prop]);
  599.       }
  600.    PrintIText(rportpropinfo, &mesg2, 0, 10);
  601.    PrintIText(rportpropinfo, &mesg3, 0, 10);
  602.    PrintIText(rportpropinfo, &mesg4, 0, 10);
  603.    if (!ismono[prop])  PrintIText(rportpropinfo, &mesg6, 0, 10);
  604.    if ( (ismono[prop]) && (numhouses[prop] > 0) ) 
  605.       PrintIText(rportpropinfo, &mesg6, 0, 10);
  606.    }
  607.  
  608. if (owner[prop] == 9)
  609.    {
  610.    mesg2.IText=coststr;
  611.    mesg2.FrontPen=red;
  612.    mesg4.IText=sname2;
  613.    mesg5.IText=(UBYTE *)"is owned by";
  614.    if (owner[prop1] == 9)
  615.       {  
  616.       mesg6.FrontPen=white;
  617.       mesg6.IText=(UBYTE *)"the bank.";
  618.       }
  619.    if (owner[prop1] == 0)
  620.       {
  621.       mesg6.FrontPen=25;  
  622.       mesg6.IText=&name0[0];
  623.       }
  624.    if (owner[prop1] == 1) 
  625.       {
  626.       mesg6.FrontPen=26;   
  627.       mesg6.IText=&name1[0];
  628.       }
  629.    if (owner[prop1] == 2) 
  630.       {
  631.       mesg6.FrontPen=27;   
  632.       mesg6.IText=&name2[0];
  633.       }
  634.    if (owner[prop1] == 3) 
  635.       {
  636.       mesg6.FrontPen=28;   
  637.       mesg6.IText=&name3[0];
  638.       }
  639.         
  640.    PrintIText(rportpropinfo, &mesg2, 0, 10);
  641.    PrintIText(rportpropinfo, &mesg4, 0, 10);
  642.    PrintIText(rportpropinfo, &mesg5, 0, 10);
  643.    PrintIText(rportpropinfo, &mesg6, 0, 10);
  644.    PrintIText(rportpropinfo, &mesg10, 0, 0);
  645.    }
  646.  
  647. bypassrent2:
  648. if (owner[prop] == nowrolling)
  649.    {
  650.    mesg3.IText=(UBYTE *)"You own this property.";
  651.    PrintIText(rportpropinfo, &mesg3, 0, 0);
  652.    }
  653. }
  654.  
  655. VOID showrr(prop)
  656. USHORT prop;
  657. {
  658. mesg0.IText=(UBYTE *)"You have landed on the";
  659. PrintIText(rportpropinfo, &mesg0, 0, 0);
  660. PrintIText(rportpropinfo, &mesg1, 0, 0);
  661. if (ismorg[prop])
  662.    {
  663.    mesg7.FrontPen=green;
  664.    mesg7.IText=(UBYTE *)"Property is MORTGAGED!";
  665.    mesg8.FrontPen=green;
  666.    mesg8.IText=(UBYTE *)"Pay NO rent!";
  667.    if (owner[prop] == nowrolling)
  668.       {
  669.       mesg7.FrontPen=red;
  670.       mesg8.FrontPen=red;
  671.       mesg8.IText=(UBYTE *)"Collect NO rent!";
  672.       }
  673.    PrintIText(rportpropinfo, &mesg7, 0, 0);
  674.    PrintIText(rportpropinfo, &mesg8, 0, 0);
  675.    goto bypassrentrr;
  676.    }
  677.  
  678. if ( (owner[prop] != nowrolling)  && (owner[prop] != 9) )
  679.    {
  680.    mesg4.IText=(UBYTE *)"owns this railroad";
  681.    if ( (owner[prop] != nowrolling)  && (owner[prop] == 0) )
  682.       {
  683.       mesg3.FrontPen=25;
  684.       mesg3.IText=&name0[0];
  685.       }
  686.    if ( (owner[prop] != nowrolling)  && (owner[prop] == 1) )
  687.       {
  688.       mesg3.FrontPen=26;
  689.       mesg3.IText=&name1[0];
  690.       }
  691.    if ( (owner[prop] != nowrolling)  && (owner[prop] == 2) )
  692.       {
  693.       mesg3.FrontPen=27;
  694.       mesg3.IText=&name2[0];
  695.       }
  696.    if ( (owner[prop] != nowrolling)  && (owner[prop] == 3) )
  697.       {
  698.       mesg3.FrontPen=28;
  699.       mesg3.IText=&name3[0];
  700.       }
  701.    PrintIText(rportpropinfo, &mesg3, 0, 0);
  702.    PrintIText(rportpropinfo, &mesg4, 0, 0);
  703.    if (numrr[owner[prop]] == 1)
  704.       {
  705.       mesg5.IText=(UBYTE *)"only.";
  706.       PrintIText(rportpropinfo, &mesg5, 0, 0);
  707.       mesg7.IText=(UBYTE *)"Pay $25 rent.";
  708.       mesg7.FrontPen=red;
  709.       if (doublerr)
  710.          {
  711.      mesg7.IText=(UBYTE *)"Pay $50 rent.";
  712.      eft(nowrolling, owner[prop], 25);
  713.      }
  714.       eft(nowrolling, owner[prop], 25);
  715.       PrintIText(rportpropinfo, &mesg7, 0, 0);
  716.       }
  717.    if (numrr[owner[prop]] == 2)
  718.        {
  719.        mesg5.IText=(UBYTE *)"as well as one";
  720.        PrintIText(rportpropinfo, &mesg5, 0, 0);
  721.        mesg6.IText=(UBYTE *)"other.";
  722.        PrintIText(rportpropinfo, &mesg6, 0, 0);
  723.        mesg8.IText=(UBYTE *)"Pay $50 rent.";
  724.        mesg8.FrontPen=red;
  725.        if (doublerr)
  726.           {
  727.       mesg8.IText=(UBYTE *)"Pay $100 rent.";
  728.       eft(nowrolling, owner[prop], 50);
  729.       }
  730.        PrintIText(rportpropinfo, &mesg8, 0, 0);
  731.        eft(nowrolling, owner[prop], 50);
  732.        }
  733.    if (numrr[owner[prop]] == 3)
  734.        {
  735.        mesg5.IText=(UBYTE *)"as well as two";
  736.        PrintIText(rportpropinfo, &mesg5, 0, 0);
  737.        mesg6.IText=(UBYTE *)"others.";
  738.        PrintIText(rportpropinfo, &mesg6, 0, 0);
  739.        mesg8.IText=(UBYTE *)"Pay $100 rent.";
  740.        mesg8.FrontPen=red;
  741.        if (doublerr)
  742.           {
  743.       mesg8.IText=(UBYTE *)"Pay $200 rent.";
  744.       eft(nowrolling, owner[prop], 100);
  745.       }
  746.        PrintIText(rportpropinfo, &mesg8, 0, 0);
  747.        eft(nowrolling, owner[prop], 100);
  748.        }
  749.    if (numrr[owner[prop]] == 4)
  750.        {
  751.        mesg5.IText=(UBYTE *)"as well as three";
  752.        PrintIText(rportpropinfo, &mesg5, 0, 0);
  753.        mesg6.IText=(UBYTE *)"others.";
  754.        PrintIText(rportpropinfo, &mesg6, 0, 0);
  755.        mesg8.IText=(UBYTE *)"Pay $200 rent.";
  756.        mesg8.FrontPen=red;   
  757.        if (doublerr)
  758.           {
  759.       mesg8.IText=(UBYTE *)"Pay $400 rent.";
  760.       eft(nowrolling, owner[prop], 200);
  761.       }
  762.        eft(nowrolling, owner[prop], 200);
  763.        PrintIText(rportpropinfo, &mesg8, 0, 0);   
  764.        } 
  765.    }
  766.  
  767. if (owner[prop] == 9)
  768.    {
  769.    mesg2.FrontPen=red;
  770.    mesg2.IText=(UBYTE *)"The cost is $200.";
  771.    mesg3.FrontPen=royal_blue;
  772.    mesg3.IText=(UBYTE *)"Other Railroad owners:";
  773.    mesg4.FrontPen=lt_blue;                 
  774.    mesg6.FrontPen=lt_blue;                 
  775.    mesg8.FrontPen=lt_blue;                 
  776.    if (prop == 5)
  777.       {
  778.       mesg4.IText=(UBYTE *)"PENNSYLVANIA RR by";
  779.       mesg6.IText=(UBYTE *)"B. & O. RR by";
  780.       mesg8.IText=(UBYTE *)"SHORT LINE by";
  781.       switch  (owner[15])
  782.          {
  783.      case 9:
  784.         mesg5.IText=(UBYTE *)"the bank.";
  785.         mesg5.FrontPen=white;
  786.         break;
  787.          case 0:
  788.         mesg5.IText=&name0[0];
  789.         mesg5.FrontPen=25;
  790.         break; 
  791.          case 1:
  792.         mesg5.IText=&name1[0];
  793.         mesg5.FrontPen=26;
  794.         break;
  795.          case 2:
  796.         mesg5.IText=&name2[0];
  797.         mesg5.FrontPen=27;
  798.         break;
  799.          case 3:
  800.         mesg5.IText=&name3[0];
  801.         mesg5.FrontPen=28;
  802.         break;
  803.          }
  804.       switch  (owner[25])
  805.          {
  806.      case 9:
  807.         mesg7.IText=(UBYTE *)"the bank.";
  808.         mesg7.FrontPen=white;
  809.         break;
  810.          case 0:
  811.         mesg7.IText=&name0[0];
  812.         mesg7.FrontPen=25;
  813.         break; 
  814.          case 1:
  815.         mesg7.IText=&name1[0];
  816.         mesg7.FrontPen=26;
  817.         break;
  818.          case 2:
  819.         mesg7.IText=&name2[0];
  820.         mesg7.FrontPen=27;
  821.         break;
  822.          case 3:
  823.         mesg7.IText=&name3[0];
  824.         mesg7.FrontPen=28;
  825.         break;
  826.          }
  827.       switch  (owner[35])
  828.          {
  829.      case 9:
  830.         mesg9.IText=(UBYTE *)"the bank.";
  831.         mesg9.FrontPen=white;
  832.         break;
  833.          case 0:
  834.         mesg9.IText=&name0[0];
  835.         mesg9.FrontPen=25;
  836.         break; 
  837.          case 1:
  838.         mesg9.IText=&name1[0];
  839.         mesg9.FrontPen=26;
  840.         break;
  841.          case 2:
  842.         mesg9.IText=&name2[0];
  843.         mesg9.FrontPen=27;
  844.         break;
  845.          case 3:
  846.         mesg9.IText=&name3[0];
  847.         mesg9.FrontPen=28;
  848.         break;
  849.          }
  850.       }
  851.    if (prop == 15)
  852.       {
  853.       mesg4.IText=(UBYTE *)"READING RR by";
  854.       mesg6.IText=(UBYTE *)"B. & O. RR by";
  855.       mesg8.IText=(UBYTE *)"SHORT LINE by";
  856.       switch  (owner[5])
  857.          {
  858.      case 9:
  859.         mesg5.IText=(UBYTE *)"the bank.";
  860.         mesg5.FrontPen=white;
  861.         break;
  862.          case 0:
  863.         mesg5.IText=&name0[0];
  864.         mesg5.FrontPen=25;
  865.         break; 
  866.          case 1:
  867.         mesg5.IText=&name1[0];
  868.         mesg5.FrontPen=26;
  869.         break;
  870.          case 2:
  871.         mesg5.IText=&name2[0];
  872.         mesg5.FrontPen=27;
  873.         break;
  874.          case 3:
  875.         mesg5.IText=&name3[0];
  876.         mesg5.FrontPen=28;
  877.         break;
  878.          }
  879.       switch  (owner[25])
  880.          {
  881.      case 9:
  882.         mesg7.IText=(UBYTE *)"the bank.";
  883.         mesg7.FrontPen=white;
  884.         break;
  885.          case 0:
  886.         mesg7.IText=&name0[0];
  887.         mesg7.FrontPen=25;
  888.         break; 
  889.          case 1:
  890.         mesg7.IText=&name1[0];
  891.         mesg7.FrontPen=26;
  892.         break;
  893.          case 2:
  894.         mesg7.IText=&name2[0];
  895.         mesg7.FrontPen=27;
  896.         break;
  897.          case 3:
  898.         mesg7.IText=&name3[0];
  899.         mesg7.FrontPen=28;
  900.         break;
  901.          }
  902.       switch  (owner[35])
  903.          {
  904.      case 9:
  905.         mesg9.IText=(UBYTE *)"the bank.";
  906.         mesg9.FrontPen=white;
  907.         break;
  908.          case 0:
  909.         mesg9.IText=&name0[0];
  910.         mesg9.FrontPen=25;
  911.         break; 
  912.          case 1:
  913.         mesg9.IText=&name1[0];
  914.         mesg9.FrontPen=26;
  915.         break;
  916.          case 2:
  917.         mesg9.IText=&name2[0];
  918.         mesg9.FrontPen=27;
  919.         break;
  920.          case 3:
  921.         mesg9.IText=&name3[0];
  922.         mesg9.FrontPen=28;
  923.         break;
  924.          }
  925.       }
  926.    if (prop == 25)
  927.       {
  928.       mesg4.IText=(UBYTE *)"READING RR by";
  929.       mesg6.IText=(UBYTE *)"PENNSYLVANIA RR by";
  930.       mesg8.IText=(UBYTE *)"SHORT LINE by";
  931.       switch  (owner[5])
  932.          {
  933.      case 9:
  934.         mesg5.IText=(UBYTE *)"the bank.";
  935.             mesg5.FrontPen=white;
  936.         break;
  937.          case 0:
  938.         mesg5.IText=&name0[0];
  939.         mesg5.FrontPen=25;
  940.         break; 
  941.          case 1:
  942.         mesg5.IText=&name1[0];
  943.         mesg5.FrontPen=26;
  944.         break;
  945.          case 2:
  946.         mesg5.IText=&name2[0];
  947.         mesg5.FrontPen=27;
  948.         break;
  949.          case 3:
  950.         mesg5.IText=&name3[0];
  951.         mesg5.FrontPen=28;
  952.         break;
  953.          }
  954.       switch  (owner[15])
  955.          {
  956.      case 9:
  957.         mesg7.IText=(UBYTE *)"the bank.";
  958.         mesg7.FrontPen=white;
  959.         break;
  960.          case 0:
  961.         mesg7.IText=&name0[0];
  962.         mesg7.FrontPen=25;
  963.         break; 
  964.          case 1:
  965.         mesg7.IText=&name1[0];
  966.         mesg7.FrontPen=26;
  967.         break;
  968.          case 2:
  969.         mesg7.IText=&name2[0];
  970.         mesg7.FrontPen=27;
  971.         break;
  972.          case 3:
  973.         mesg7.IText=&name3[0];
  974.         mesg7.FrontPen=28;
  975.         break;
  976.          }
  977.       switch  (owner[35])
  978.          {
  979.      case 9:
  980.         mesg9.IText=(UBYTE *)"the bank.";
  981.         mesg9.FrontPen=white;
  982.         break;
  983.          case 0:
  984.         mesg9.IText=&name0[0];
  985.         mesg9.FrontPen=25;
  986.         break; 
  987.          case 1:
  988.         mesg9.IText=&name1[0];
  989.         mesg9.FrontPen=26;
  990.         break;
  991.          case 2:
  992.         mesg9.IText=&name2[0];
  993.         mesg9.FrontPen=27;
  994.         break;
  995.          case 3:
  996.         mesg9.IText=&name3[0];
  997.         mesg9.FrontPen=28;
  998.         break;
  999.          }
  1000.       }
  1001.    if (prop == 35)
  1002.       {
  1003.       mesg4.IText=(UBYTE *)"READING RR by";
  1004.       mesg6.IText=(UBYTE *)"PENNSYLVANIA RR by";
  1005.       mesg8.IText=(UBYTE *)"B. & O. RR by";
  1006.       switch  (owner[5])
  1007.          {
  1008.      case 9:
  1009.         mesg5.IText=(UBYTE *)"the bank.";
  1010.         mesg5.FrontPen=white;
  1011.         break;
  1012.          case 0:
  1013.         mesg5.IText=&name0[0];
  1014.         mesg5.FrontPen=25;
  1015.         break; 
  1016.          case 1:
  1017.         mesg5.IText=&name1[0];
  1018.         mesg5.FrontPen=26;
  1019.         break;
  1020.          case 2:
  1021.         mesg5.IText=&name2[0];
  1022.         mesg5.FrontPen=27;
  1023.         break;
  1024.          case 3:
  1025.         mesg5.IText=&name3[0];
  1026.         mesg5.FrontPen=28;
  1027.         break;
  1028.          }
  1029.       switch  (owner[15])
  1030.          {
  1031.      case 9:
  1032.         mesg7.IText=(UBYTE *)"the bank.";
  1033.         mesg7.FrontPen=white;
  1034.         break;
  1035.          case 0:
  1036.         mesg7.IText=&name0[0];
  1037.         mesg7.FrontPen=25;
  1038.         break; 
  1039.          case 1:
  1040.         mesg7.IText=&name1[0];
  1041.         mesg7.FrontPen=26;
  1042.         break;
  1043.          case 2:
  1044.         mesg7.IText=&name2[0];
  1045.         mesg7.FrontPen=27;
  1046.         break;
  1047.          case 3:
  1048.         mesg7.IText=&name3[0];
  1049.         mesg7.FrontPen=28;
  1050.         break;
  1051.          }
  1052.       switch  (owner[25])
  1053.          {
  1054.      case 9:
  1055.         mesg9.IText=(UBYTE *)"the bank.";
  1056.         mesg9.FrontPen=white;
  1057.         break;
  1058.          case 0:
  1059.         mesg9.IText=&name0[0];
  1060.         mesg9.FrontPen=25;
  1061.         break; 
  1062.          case 1:
  1063.         mesg9.IText=&name1[0];
  1064.         mesg9.FrontPen=26;
  1065.         break;
  1066.          case 2:
  1067.         mesg9.IText=&name2[0];
  1068.         mesg9.FrontPen=27;
  1069.         break;
  1070.          case 3:
  1071.         mesg9.IText=&name3[0];
  1072.         mesg9.FrontPen=28;
  1073.         break;
  1074.          }
  1075.       } 
  1076.    SetAPen(rportpropinfo, 0);
  1077.    RectFill(rportpropinfo, 0, 0, 180, 40); 
  1078.    mesg0.IText=(UBYTE *)"You have landed on the";
  1079.    PrintIText(rportpropinfo, &cname, 0, -8);
  1080.    PrintIText(rportpropinfo, &mesg0, 0, -8);              
  1081.    PrintIText(rportpropinfo, &mesg1, 0, -8);              
  1082.    PrintIText(rportpropinfo, &mesg2, 0, -7);              
  1083.    PrintIText(rportpropinfo, &mesg3, 0, -2);
  1084.    PrintIText(rportpropinfo, &mesg4, 0, 0);
  1085.    PrintIText(rportpropinfo, &mesg5, 0, 0);
  1086.    PrintIText(rportpropinfo, &mesg6, 0, 0);
  1087.    PrintIText(rportpropinfo, &mesg7, 0, 0);
  1088.    PrintIText(rportpropinfo, &mesg8, 0, 0);
  1089.    PrintIText(rportpropinfo, &mesg9, 0, 0);
  1090.    PrintIText(rportpropinfo, &mesg10, 0, 0);  
  1091.    }
  1092. bypassrentrr:
  1093. if (owner[prop] == nowrolling)
  1094.    {
  1095.    mesg3.IText=(UBYTE *)"You own it.";      
  1096.    PrintIText(rportpropinfo, &mesg3, 0, 0);
  1097.    }
  1098. doublerr=FALSE;
  1099. }
  1100.  
  1101. VOID showutil(prop)
  1102. USHORT prop;
  1103. {
  1104. USHORT money;
  1105. mesg0.IText=(UBYTE *)"You have landed on the";
  1106. if (prop == 12)
  1107.    {
  1108.    mesg1.IText=(UBYTE *)"ELECTRIC COMPANY.";
  1109.    mesg0.FrontPen=yellow;
  1110.    mesg1.FrontPen=yellow;
  1111.    mesg3.FrontPen=yellow;
  1112.    mesg4.FrontPen=yellow;
  1113.    mesg6.FrontPen=yellow;
  1114.    mesg7.FrontPen=yellow;
  1115.    mesg8.FrontPen=yellow;
  1116.    mesg9.FrontPen=yellow;
  1117.    }
  1118. if (prop == 28)
  1119.    {
  1120.    mesg1.IText=(UBYTE *)"WATER WORKS.";
  1121.    mesg0.FrontPen=royal_blue;
  1122.    mesg1.FrontPen=royal_blue;
  1123.    mesg1.FrontPen=royal_blue;
  1124.    mesg3.FrontPen=royal_blue;
  1125.    mesg4.FrontPen=royal_blue;
  1126.    mesg6.FrontPen=royal_blue;
  1127.    mesg7.FrontPen=royal_blue;
  1128.    mesg8.FrontPen=royal_blue;
  1129.    mesg9.FrontPen=royal_blue;
  1130.    }
  1131. PrintIText(rportpropinfo, &mesg0, 0, 0);
  1132. PrintIText(rportpropinfo, &mesg1, 0, 0);
  1133. if (ismorg[prop])
  1134.    {
  1135.    mesg7.FrontPen=green;
  1136.    mesg7.IText=(UBYTE *)"Property is MORTGAGED!";
  1137.    mesg8.FrontPen=green;
  1138.    mesg8.IText=(UBYTE *)"Pay NO rent!";
  1139.    if (owner[prop] == nowrolling)
  1140.       {
  1141.       mesg7.FrontPen=red;
  1142.       mesg8.FrontPen=red;
  1143.       mesg8.IText=(UBYTE *)"Collect NO rent!";
  1144.       }
  1145.    PrintIText(rportpropinfo, &mesg7, 0, 0);
  1146.    PrintIText(rportpropinfo, &mesg8, 0, 0);
  1147.    goto bypassrentutil;
  1148.    }
  1149. if (owner[prop] == 9)
  1150.    {
  1151.    mesg3.IText=(UBYTE *)"It will cost $150.";
  1152.    mesg3.FrontPen=red;
  1153.    if (prop == 12)
  1154.       {
  1155.       mesg5.IText=(UBYTE *)"WATER WORKS";
  1156.       mesg5.FrontPen=royal_blue;
  1157.       mesg6.FrontPen=royal_blue;
  1158.       }
  1159.    if (prop == 28)
  1160.       {
  1161.       mesg5.IText=(UBYTE *)"ELECTRIC COMPANY";
  1162.       mesg5.FrontPen=yellow;
  1163.       mesg6.FrontPen=yellow;
  1164.       }
  1165.    mesg6.IText=(UBYTE *)"is owned by";
  1166.    if (prop == 12)
  1167.       {
  1168.       if (owner[28] == 9)
  1169.          {  
  1170.          mesg7.IText=(UBYTE *)"the bank.";
  1171.          mesg7.FrontPen=white;
  1172.          }
  1173.       if (owner[28] == 0)
  1174.          {
  1175.          mesg7.FrontPen=25;  
  1176.          mesg7.IText=&name0[0];
  1177.          }
  1178.       if (owner[28] == 1)
  1179.          {
  1180.          mesg7.FrontPen=26;   
  1181.          mesg7.IText=&name1[0];
  1182.          }
  1183.       if (owner[28] == 2)
  1184.          {
  1185.          mesg7.FrontPen=27;   
  1186.          mesg7.IText=&name2[0];
  1187.          }
  1188.       if (owner[28] == 3)
  1189.          {
  1190.          mesg7.FrontPen=28;   
  1191.          mesg7.IText=&name3[0];
  1192.          }
  1193.       }
  1194.    if (prop == 28) 
  1195.       {  
  1196.       if (owner[12] == 9)
  1197.          {  
  1198.          mesg7.IText=(UBYTE *)"the bank.";
  1199.          mesg7.FrontPen=white;
  1200.          }
  1201.       if (owner[12] == 0)
  1202.          {
  1203.          mesg7.FrontPen=25;  
  1204.          mesg7.IText=&name0[0];
  1205.          }
  1206.       if (owner[12] == 1)
  1207.          {
  1208.          mesg7.FrontPen=26;   
  1209.          mesg7.IText=&name1[0];
  1210.          }
  1211.       if (owner[12] == 2)
  1212.          {
  1213.          mesg7.FrontPen=27;   
  1214.          mesg7.IText=&name2[0];
  1215.          }
  1216.       if (owner[12] == 3)
  1217.          {
  1218.          mesg7.FrontPen=28;   
  1219.          mesg7.IText=&name3[0];
  1220.          }
  1221.       }
  1222.    PrintIText(rportpropinfo, &mesg3, 0, 0);
  1223.    PrintIText(rportpropinfo, &mesg5, 0, 0);
  1224.    PrintIText(rportpropinfo, &mesg6, 0, 0);
  1225.    PrintIText(rportpropinfo, &mesg7, 0, 0);
  1226.    PrintIText(rportpropinfo, &mesg10, 0, 0);
  1227.    } 
  1228.  
  1229. if ( (owner[prop] != nowrolling) && (owner[prop] == 0) )
  1230.    {
  1231.    mesg3.FrontPen=25;
  1232.    mesg3.IText=&name0[0];     
  1233.    }
  1234. if ( (owner[prop] != nowrolling)  && (owner[prop] == 1) )
  1235.    {
  1236.    mesg3.FrontPen=26;
  1237.    mesg3.IText=&name1[0];     
  1238.    }
  1239. if ( (owner[prop] != nowrolling)  && (owner[prop] == 2) )
  1240.    {
  1241.    mesg3.FrontPen=27;
  1242.    mesg3.IText=&name2[0];     
  1243.    }
  1244. if ( (owner[prop] != nowrolling)  && (owner[prop] == 3) )
  1245.    {
  1246.    mesg3.FrontPen=28;
  1247.    mesg3.IText=&name3[0];     
  1248.    }
  1249. if ( (owner[prop] != nowrolling) && (owner[prop] != 9) )
  1250.    {
  1251.    mesg6.IText=(UBYTE *)"The rent is";
  1252.    mesg8.IText=(UBYTE *)"amount shown on the";
  1253.    mesg9.IText=(UBYTE *)"face of the dice.";
  1254.    if (numutil[owner[prop]] == 1)
  1255.       {
  1256.       mesg7.IText=(UBYTE *)"four times the";
  1257.       mesg4.IText=(UBYTE *)"owns this utility.";
  1258.       money=4*(dice0+dice1);
  1259.       if (doubleutil)
  1260.          {
  1261.          mesg7.IText=(UBYTE *)"ten times the";
  1262.          rolldice();
  1263.          money=10*(dice0+dice1);
  1264.          }
  1265.       eft(nowrolling, owner[prop], money);
  1266.       }
  1267.    if (numutil[owner[prop]] == 2)
  1268.       {
  1269.       mesg4.IText=(UBYTE *)"owns both utilities.";      
  1270.       mesg7.IText=(UBYTE *)"ten times the";
  1271.       money=10*(dice0+dice1);
  1272.       if (doubleutil)
  1273.          {
  1274.          rolldice();
  1275.          money=10*(dice0+dice1);
  1276.          }
  1277.       eft(nowrolling, owner[prop], money);
  1278.  
  1279.       }
  1280.    switch (money)
  1281.       {
  1282.       case 8:
  1283.          mesg10.IText=(UBYTE *)"Pay $8.";
  1284.      break;
  1285.       case 12:
  1286.          mesg10.IText=(UBYTE *)"Pay $12.";
  1287.      break;
  1288.       case 16:
  1289.          mesg10.IText=(UBYTE *)"Pay $16.";
  1290.      break;
  1291.       case 20:
  1292.          mesg10.IText=(UBYTE *)"Pay $20.";
  1293.      break;
  1294.       case 24:
  1295.          mesg10.IText=(UBYTE *)"Pay $24.";
  1296.      break;
  1297.       case 28:
  1298.          mesg10.IText=(UBYTE *)"Pay $28.";
  1299.      break;
  1300.       case 30:
  1301.          mesg10.IText=(UBYTE *)"Pay $30.";
  1302.      break;
  1303.       case 32:
  1304.          mesg10.IText=(UBYTE *)"Pay $32.";
  1305.      break;
  1306.       case 36:
  1307.          mesg10.IText=(UBYTE *)"Pay $36.";
  1308.      break;
  1309.       case 40:
  1310.          mesg10.IText=(UBYTE *)"Pay $40.";
  1311.      break;
  1312.       case 44:
  1313.          mesg10.IText=(UBYTE *)"Pay $44.";
  1314.      break;
  1315.       case 48:
  1316.          mesg10.IText=(UBYTE *)"Pay $48.";
  1317.      break;
  1318.       case 50:
  1319.          mesg10.IText=(UBYTE *)"Pay $50.";
  1320.      break;
  1321.       case 60:
  1322.          mesg10.IText=(UBYTE *)"Pay $60.";
  1323.      break;
  1324.       case 70:
  1325.          mesg10.IText=(UBYTE *)"Pay $70.";
  1326.      break;
  1327.       case 80:
  1328.          mesg10.IText=(UBYTE *)"Pay $80.";
  1329.      break;
  1330.       case 90:
  1331.          mesg10.IText=(UBYTE *)"Pay $90.";
  1332.      break;
  1333.       case 100:
  1334.          mesg10.IText=(UBYTE *)"Pay $100.";
  1335.      break;
  1336.       case 110:
  1337.          mesg10.IText=(UBYTE *)"Pay $110.";
  1338.      break;
  1339.       case 120:
  1340.          mesg10.IText=(UBYTE *)"Pay $120.";
  1341.      break;
  1342.       }
  1343.    PrintIText(rportpropinfo, &mesg3, 0, 0);
  1344.    PrintIText(rportpropinfo, &mesg4, 0, 0);
  1345.    PrintIText(rportpropinfo, &mesg6, 0, -5);
  1346.    PrintIText(rportpropinfo, &mesg7, 0, -5);
  1347.    PrintIText(rportpropinfo, &mesg8, 0, -5);
  1348.    PrintIText(rportpropinfo, &mesg9, 0, -5);
  1349.    mesg10.FrontPen=red;
  1350.    mesg10.LeftEdge=0;   
  1351.    PrintIText(rportpropinfo, &mesg10, 0, 0);
  1352.    mesg10.LeftEdge=30;
  1353.    }
  1354. bypassrentutil:
  1355. if (owner[prop] == nowrolling)
  1356.    {
  1357.    mesg3.IText=(UBYTE *)"You own it!";
  1358.    PrintIText(rportpropinfo, &mesg3, 0, 0);
  1359.    }
  1360. doubleutil=FALSE;
  1361. }
  1362.  
  1363. VOID showpropinfo(prop)
  1364. USHORT prop;
  1365. {
  1366. BOOL bypass=FALSE;
  1367. USHORT hold_line;
  1368.  
  1369. if (prop == 0)
  1370.    {
  1371.    mesg0.FrontPen=14;
  1372.    mesg1.FrontPen=14;
  1373.    mesg2.FrontPen=14;
  1374.    }
  1375. if ( (prop == 1) || (prop == 3) )
  1376.    {
  1377.    mesg0.FrontPen=purple;
  1378.    mesg1.FrontPen=purple;
  1379.    mesg2.FrontPen=purple;
  1380.    mesg3.FrontPen=purple;
  1381.    mesg4.FrontPen=purple;
  1382.    mesg5.FrontPen=purple;
  1383.    mesg6.FrontPen=purple;
  1384.    mesg7.FrontPen=purple;
  1385.    mesg8.FrontPen=purple;
  1386.    mesg9.FrontPen=purple;
  1387.    }
  1388. if ( (prop == 2) || (prop == 4) || (prop == 5) || (prop == 7) || (prop == 10)
  1389.     || (prop == 12) || (prop == 15) || (prop == 17) || (prop == 20) ||
  1390.     (prop == 22) || (prop == 25) || (prop == 28) || (prop == 30) || 
  1391.     (prop == 33) || (prop == 35) || (prop == 36) || (prop == 38) )
  1392.    {
  1393.    mesg0.FrontPen=white;
  1394.    mesg1.FrontPen=white;
  1395.    mesg2.FrontPen=white;
  1396.    mesg3.FrontPen=white;
  1397.    mesg4.FrontPen=white;
  1398.    mesg5.FrontPen=white;
  1399.    mesg6.FrontPen=white;
  1400.    mesg7.FrontPen=white;
  1401.    mesg8.FrontPen=white;
  1402.    mesg9.FrontPen=white;
  1403.    }
  1404.    
  1405. if ( (prop == 6) || (prop == 8) || (prop == 9) )
  1406.   {
  1407.    mesg0.FrontPen=lt_blue;
  1408.    mesg1.FrontPen=lt_blue;
  1409.    mesg2.FrontPen=lt_blue;
  1410.    mesg3.FrontPen=lt_blue;
  1411.    mesg4.FrontPen=lt_blue;
  1412.    mesg5.FrontPen=lt_blue;
  1413.    mesg6.FrontPen=lt_blue;
  1414.    mesg7.FrontPen=lt_blue;
  1415.    mesg8.FrontPen=lt_blue;
  1416.    mesg9.FrontPen=lt_blue;
  1417.    }
  1418.  
  1419.  
  1420. if ( (prop == 11) || (prop == 13) || (prop == 14) )
  1421.   {
  1422.    mesg0.FrontPen=maroon;
  1423.    mesg1.FrontPen=maroon;
  1424.    mesg2.FrontPen=maroon;
  1425.    mesg3.FrontPen=maroon;
  1426.    mesg4.FrontPen=maroon;
  1427.    mesg5.FrontPen=maroon;
  1428.    mesg6.FrontPen=maroon;
  1429.    mesg7.FrontPen=maroon;
  1430.    mesg8.FrontPen=maroon;
  1431.    mesg9.FrontPen=maroon;
  1432.    }
  1433.  
  1434. if   ( (prop == 16) || (prop == 18) || (prop == 19) )
  1435.   {
  1436.    mesg0.FrontPen=orange;
  1437.    mesg1.FrontPen=orange;
  1438.    mesg2.FrontPen=orange;
  1439.    mesg3.FrontPen=orange;
  1440.    mesg4.FrontPen=orange;
  1441.    mesg5.FrontPen=orange;
  1442.    mesg6.FrontPen=orange;
  1443.    mesg7.FrontPen=orange;
  1444.    mesg8.FrontPen=orange;
  1445.    mesg9.FrontPen=orange;
  1446.    }
  1447.  
  1448. if ( (prop == 21) || (prop == 23) || (prop == 24) )
  1449.   {
  1450.    mesg0.FrontPen=red;
  1451.    mesg1.FrontPen=red;
  1452.    mesg2.FrontPen=red;
  1453.    mesg3.FrontPen=red;
  1454.    mesg4.FrontPen=red;
  1455.    mesg5.FrontPen=red;
  1456.    mesg6.FrontPen=red;
  1457.    mesg7.FrontPen=red;
  1458.    mesg8.FrontPen=red;
  1459.    mesg9.FrontPen=red;
  1460.    }
  1461.  
  1462. if ( (prop == 26) || (prop == 27) || (prop == 29) )
  1463.   {
  1464.    mesg0.FrontPen=yellow;
  1465.    mesg1.FrontPen=yellow;
  1466.    mesg2.FrontPen=yellow;
  1467.    mesg3.FrontPen=yellow;
  1468.    mesg4.FrontPen=yellow;
  1469.    mesg5.FrontPen=yellow;
  1470.    mesg6.FrontPen=yellow;
  1471.    mesg7.FrontPen=yellow;
  1472.    mesg8.FrontPen=yellow;
  1473.    mesg9.FrontPen=yellow;
  1474.    }
  1475.  
  1476. if ( (prop == 31) || (prop == 32) || (prop == 34) )
  1477.   {
  1478.    mesg0.FrontPen=green;
  1479.    mesg1.FrontPen=green;
  1480.    mesg2.FrontPen=green;
  1481.    mesg3.FrontPen=green;
  1482.    mesg4.FrontPen=green;
  1483.    mesg5.FrontPen=green;
  1484.    mesg6.FrontPen=green;
  1485.    mesg7.FrontPen=green;
  1486.    mesg8.FrontPen=green;
  1487.    mesg9.FrontPen=green;
  1488.    }
  1489.  
  1490. if ( (prop == 37) || (prop == 39) )
  1491.   {
  1492.    mesg0.FrontPen=dk_blue;
  1493.    mesg1.FrontPen=dk_blue;
  1494.    mesg2.FrontPen=dk_blue;
  1495.    mesg3.FrontPen=dk_blue;
  1496.    mesg4.FrontPen=dk_blue;
  1497.    mesg5.FrontPen=dk_blue;
  1498.    mesg6.FrontPen=dk_blue;
  1499.    mesg7.FrontPen=dk_blue;
  1500.    mesg8.FrontPen=dk_blue;
  1501.    mesg9.FrontPen=dk_blue;
  1502.    }
  1503.  
  1504. mesg0.BackPen=0;
  1505. mesg0.DrawMode=JAM1;
  1506. mesg0.LeftEdge=5;
  1507. mesg0.TopEdge=19;
  1508. mesg0.ITextFont=NULL;
  1509. mesg0.NextText=NULL;
  1510. mesg0.IText=(UBYTE *)"You have landed on";
  1511.  
  1512. mesg1.BackPen=0;
  1513. mesg1.DrawMode=JAM1;
  1514. mesg1.LeftEdge=5;
  1515. mesg1.TopEdge=29;
  1516. mesg1.ITextFont=NULL;
  1517. mesg1.NextText=NULL;
  1518.  
  1519. mesg2.BackPen=0;
  1520. mesg2.DrawMode=JAM1;
  1521. mesg2.LeftEdge=5;
  1522. mesg2.TopEdge=39;
  1523. mesg2.ITextFont=NULL;
  1524. mesg2.NextText=NULL;
  1525.  
  1526.       if ( (owner[prop] != nowrolling) && 
  1527.            (owner[prop] == 0) )
  1528.          {
  1529.          mesg2.FrontPen=25;
  1530.      mesg2.IText=&name0[0];
  1531.      }
  1532.       if ( (owner[prop] != nowrolling) 
  1533.            && (owner[prop] == 1) )
  1534.          {
  1535.      mesg2.FrontPen=26;
  1536.      mesg2.IText=&name1[0];
  1537.      }
  1538.       
  1539.       if ( (owner[prop] != nowrolling) 
  1540.            && (owner[prop] == 2) )
  1541.          {
  1542.      mesg2.FrontPen=27;
  1543.      mesg2.IText=&name2[0];
  1544.      }
  1545.       if ( (owner[prop] != nowrolling) 
  1546.             && (owner[prop] == 3) )
  1547.          {
  1548.      mesg2.FrontPen=28;
  1549.      mesg2.IText=&name3[0];
  1550.      }
  1551.  
  1552.  
  1553. mesg3.BackPen=0;
  1554. mesg3.DrawMode=JAM1;
  1555. mesg3.LeftEdge=5;
  1556. mesg3.TopEdge=49;
  1557. mesg3.ITextFont=NULL;
  1558. mesg3.NextText=NULL;
  1559.  
  1560. mesg4.BackPen=0;
  1561. mesg4.DrawMode=JAM1;
  1562. mesg4.LeftEdge=5;
  1563. mesg4.TopEdge=59;
  1564. mesg4.ITextFont=NULL;
  1565. mesg4.NextText=NULL;
  1566.  
  1567. mesg5.BackPen=0;
  1568. mesg5.DrawMode=JAM1;
  1569. mesg5.LeftEdge=5;
  1570. mesg5.TopEdge=69;
  1571. mesg5.ITextFont=NULL;
  1572. mesg5.NextText=NULL;
  1573.  
  1574. mesg6.BackPen=0;
  1575. mesg6.DrawMode=JAM1;
  1576. mesg6.LeftEdge=5;
  1577. mesg6.TopEdge=79;
  1578. mesg6.ITextFont=NULL;
  1579. mesg6.NextText=NULL;
  1580.  
  1581. mesg7.BackPen=0;
  1582. mesg7.DrawMode=JAM1;
  1583. mesg7.LeftEdge=5;
  1584. mesg7.TopEdge=89;
  1585. mesg7.ITextFont=NULL;
  1586. mesg7.NextText=NULL;
  1587.  
  1588. mesg8.BackPen=0;
  1589. mesg8.DrawMode=JAM1;
  1590. mesg8.LeftEdge=5;
  1591. mesg8.TopEdge=99;
  1592. mesg8.ITextFont=NULL;
  1593. mesg8.NextText=NULL;
  1594.  
  1595. mesg9.BackPen=0;
  1596. mesg9.DrawMode=JAM1;
  1597. mesg9.LeftEdge=5;
  1598. mesg9.TopEdge=109;
  1599. mesg9.ITextFont=NULL;
  1600. mesg9.NextText=NULL;
  1601.  
  1602. mesg10.FrontPen=white;
  1603. mesg10.BackPen=0;
  1604. mesg10.DrawMode=JAM1;
  1605. mesg10.LeftEdge=30;
  1606. mesg10.TopEdge=119;
  1607. mesg10.ITextFont=NULL;
  1608. mesg10.NextText=NULL;
  1609. mesg10.IText=(UBYTE *)"Will you buy it?";
  1610.  
  1611. npropinfow.FirstGadget=&continuegag;
  1612. if (prop == 4)  npropinfow.FirstGadget=&percentgag;
  1613. if (owner[prop] == 9)  npropinfow.FirstGadget=&yesgag;
  1614. npropinfow.Screen=screen1;
  1615.  
  1616. yesgag.LeftEdge=110;
  1617. yesgag.TopEdge=130;
  1618. nogag.LeftEdge=53;
  1619. nogag.TopEdge=130;
  1620.  
  1621. percentgag.LeftEdge=115;
  1622. percentgag.TopEdge=130;
  1623. taxgag.LeftEdge=38;
  1624. taxgag.TopEdge=130;
  1625.  
  1626. if ( (owner[prop] != nowrolling) && (owner[prop] != 9) )
  1627.          mesg3.IText=(UBYTE *)"owns this property";
  1628.  
  1629. if ( (prop != 2) && (prop != 7) && (prop != 17) && (prop != 22) &&
  1630.      (prop != 33) && (prop != 36) )
  1631.    {
  1632.    if ((propinfowindow=(struct Window *)OpenWindow(&npropinfow))==NULL)
  1633.       cleanup();
  1634.    rportpropinfo=propinfowindow->RPort;
  1635.    SetMenuStrip(propinfowindow, &Menu6);
  1636.    if (prop == 4)
  1637.       {   
  1638.       OffMenu(propinfowindow, 128);
  1639.       OffMenu(propinfowindow, 160);
  1640.       if (nowrolling == 0)  OffMenu(propinfowindow, 97);
  1641.       if (nowrolling == 1)  OffMenu(propinfowindow, 2145);
  1642.       if (nowrolling == 2)  OffMenu(propinfowindow, 4193);
  1643.       if (nowrolling == 3)  OffMenu(propinfowindow, 6241);
  1644.       }
  1645.    else
  1646.       {
  1647.       OnMenu(propinfowindow, 128); 
  1648.       OnMenu(propinfowindow, 160);
  1649.       OnMenu(propinfowindow, 97);
  1650.       OnMenu(propinfowindow, 2145);
  1651.       if (nsp == 3)  OnMenu(propinfowindow, 4193);
  1652.       if (nsp == 4)  OnMenu(propinfowindow, 6241);     
  1653.       }
  1654.    fixpropmenu(nowrolling);
  1655.    PrintIText(rportpropinfo, &cname, 0, 0); 
  1656.    }
  1657. donepropinfo=FALSE; 
  1658. switch  (prop)
  1659.    {
  1660.    case 0:
  1661.       mesg3.IText=(UBYTE *)"CONGRATULATIONS!!!";
  1662.       mesg5.IText=(UBYTE *)"YOU LANDED ON GO!!";
  1663.       mesg7.IText=(UBYTE *)"COLLECT $200!";
  1664.       mesg3.FrontPen=dk_blue;
  1665.       mesg5.FrontPen=maroon;
  1666.       mesg7.FrontPen=green;
  1667.       PrintIText(rportpropinfo, &mesg3, 20, 0);
  1668.       PrintIText(rportpropinfo, &mesg5, 20, 0);
  1669.       PrintIText(rportpropinfo, &mesg7, 40, 0);
  1670.       eft(5, nowrolling, 200);
  1671.       break;
  1672.    case 1: 
  1673.       show2("MEDITERRANEAN AVE.", "BALTIC AVE.", prop);
  1674.       break;
  1675.    case 2:
  1676.       bypass=TRUE;
  1677.       (VOID) chest();
  1678.       break;
  1679.    case 3:
  1680.       show2("BALTIC AVE.", "MEDITERRANEAN AVE.", prop);
  1681.       break;
  1682.    case 4:
  1683.       mesg1.IText=(UBYTE *)"INCOME TAX.";
  1684.       mesg3.IText=(UBYTE *)"You may choose to pay";
  1685.       mesg4.IText=(UBYTE *)"either $200 OR 10% of";
  1686.       mesg5.IText=(UBYTE *)"your TOTAL ASSETS."; 
  1687.       mesg6.IText=(UBYTE *)"You MAY NOT count";
  1688.       mesg7.IText=(UBYTE *)"your assets!";
  1689.       mesg9.IText=(UBYTE *)"      CHOOSE:";
  1690.       mesg3.FrontPen=red;
  1691.       mesg4.FrontPen=red;
  1692.       mesg5.FrontPen=red;
  1693.       mesg6.FrontPen=yellow;
  1694.       mesg7.FrontPen=yellow;
  1695.       mesg9.FrontPen=green;
  1696.       PrintIText(rportpropinfo, &mesg0, 0, 0);
  1697.       PrintIText(rportpropinfo, &mesg1, 0, 0);
  1698.       PrintIText(rportpropinfo, &mesg3, 0, 0);
  1699.       PrintIText(rportpropinfo, &mesg4, 0, 0);
  1700.       PrintIText(rportpropinfo, &mesg5, 0, 0);
  1701.       PrintIText(rportpropinfo, &mesg6, 0, 0);
  1702.       PrintIText(rportpropinfo, &mesg7, 0, 0);
  1703.       PrintIText(rportpropinfo, &mesg9, 0, 0);
  1704.       break;
  1705.    case 5:
  1706.       mesg1.IText=(UBYTE *)"READING RAILROAD.";
  1707.       showrr(prop);
  1708.       break;
  1709.    case 6:
  1710.       show3("ORIENTAL AVE.", "VERMONT AVE.", "CONNECTICUT AVE.", prop);
  1711.       break;
  1712.    case 7:
  1713.       bypass=TRUE;
  1714.       (VOID) chance();
  1715.       break;      
  1716.    case 8:
  1717.       show3("VERMONT AVE.", "ORIENTAL AVE.", "CONNECTICUT AVE.", prop);
  1718.       break;
  1719.    case 9:
  1720.       show3("CONNECTICUT AVE.", "ORIENTAL AVE.", "VERMONT AVE.", prop);
  1721.       break;
  1722.    case 10:
  1723.       mesg1.IText=(UBYTE *)"You are";
  1724.       mesg2.IText=(UBYTE *)"just visiting jail.";
  1725.       mesg1.FrontPen=lt_gray;
  1726.       mesg2.FrontPen=lt_gray;
  1727.       PrintIText(rportpropinfo, &mesg1, 0, 0);
  1728.       PrintIText(rportpropinfo, &mesg2, 0, 0);
  1729.       break;
  1730.    case 11:
  1731.       show3("ST. CHARLES PLACE.", "STATES AVE.", "VIRGINIA AVE.", prop);
  1732.       break;
  1733.    case 12:
  1734.       showutil(prop);            
  1735.       break;
  1736.    case 13:
  1737.       show3("STATES AVE.", "ST. CHARLES PLACE.", "VIRGINIA AVE.", prop);
  1738.       break;
  1739.    case 14:
  1740.       show3("VIRGINIA AVE.", "ST. CHARLES PLACE.", "STATES AVE.", prop);
  1741.       break;
  1742.    case 15:
  1743.       mesg1.IText=(UBYTE *)"PENNSYLVANIA RAILROAD.";
  1744.       showrr(prop);    
  1745.       break;
  1746.    case 16:
  1747.       show3("ST. JAMES PLACE.", "TENNESSEE AVE.", "NEW YORK AVE.", prop);
  1748.       break;
  1749.    case 17:
  1750.       bypass=TRUE;
  1751.       (VOID) chest();
  1752.       break;
  1753.    case 18:
  1754.       show3("TENNESSEE AVE.", "ST. JAMES PLACE.", "NEW YORK AVE.", prop);
  1755.       break;
  1756.    case 19:
  1757.       show3("NEW YORK AVE.", "ST. JAMES PLACE.", "TENNESSEE AVE.", prop);
  1758.       break;
  1759.    case 20:
  1760. /*  set up free-parking slush-fund  */
  1761.       if (free_parking)
  1762.          {
  1763.          bankroll[nowrolling]=bankroll[nowrolling]+bankroll[SLUSH];
  1764.      /*  set up a notice   */
  1765.      }
  1766.       mesg2.IText=(UBYTE *)"RELAX!!";
  1767.       mesg4.IText=(UBYTE *)"YOU LANDED ON";
  1768.       mesg6.IText=(UBYTE *)"FREE PARKING";
  1769.       mesg2.FrontPen=purple;
  1770.       mesg4.FrontPen=dk_blue;
  1771.       mesg6.FrontPen=dk_maroon;
  1772.       PrintIText(rportpropinfo, &mesg2, 66, 0);
  1773.       PrintIText(rportpropinfo, &mesg4, 40, 0);
  1774.       PrintIText(rportpropinfo, &mesg6, 44, 0);
  1775.       break;
  1776.    case 21:
  1777.       show3("KENTUCKY AVE.", "INDIANA AVE.", "ILLINOIS AVE.", prop);
  1778.       break;
  1779.    case 22:
  1780.       bypass=TRUE;
  1781.       (VOID) chance();
  1782.       break;
  1783.    case 23:
  1784.       show3("INDIANA AVE.", "KENTUCKY AVE.", "ILLINOIS AVE.", prop);
  1785.       break;
  1786.    case 24:
  1787.       show3("ILLINOIS AVE.", "KENTUCKY AVE.", "INDIANA AVE.", prop);
  1788.       break;
  1789.    case 25:
  1790.       mesg1.IText=(UBYTE *)"B. & O. RAILROAD.";
  1791.       showrr(prop);   
  1792.       break;
  1793.    case 26:
  1794.       show3("ATLANTIC AVE.", "VENTNOR AVE.", "MARVIN GARDENS.", prop);
  1795.       break;
  1796.    case 27:
  1797.       show3("VENTNOR AVE.", "ATLANTIC AVE.", "MARVIN GARDENS.", prop);
  1798.       break;
  1799.    case 28:
  1800.       showutil(prop);  
  1801.       break;
  1802.    case 29:
  1803.       show3("MARVIN GARDENS.", "ATLANTIC AVE.", "VENTNOR AVE.", prop);
  1804.       break;
  1805.    case 30:
  1806.       mesg1.IText=(UBYTE *)"UP AGAINST THE WALL!!";
  1807.       mesg3.IText=(UBYTE *)"TOUGH LUCK!";
  1808.       mesg5.IText=(UBYTE *)"GO DIRECTLY TO JAIL!";
  1809.       mesg7.IText=(UBYTE *)"DO NOT PASS GO!";
  1810.       mesg9.IText=(UBYTE *)"DO NOT COLLECT $200!";
  1811.       mesg1.FrontPen=yellow;
  1812.       mesg3.FrontPen=dk_gray;
  1813.       mesg5.FrontPen=lt_gray;
  1814.       mesg7.FrontPen=dk_gray;
  1815.       mesg9.FrontPen=red;
  1816.       PrintIText(rportpropinfo, &mesg1, 0, 0);
  1817.       PrintIText(rportpropinfo, &mesg3, 0, 0);
  1818.       PrintIText(rportpropinfo, &mesg5, 0, 0);
  1819.       PrintIText(rportpropinfo, &mesg7, 0, 0);
  1820.       PrintIText(rportpropinfo, &mesg9, 0, 0);
  1821.       break;
  1822.    case 31:
  1823.       show3("PACIFIC AVE.", "NORTH CAROLINA AVE.", "PENNSYLVANIA AVE.", prop);
  1824.       break;
  1825.    case 32:
  1826.       show3("NORTH CAROLINA AVE.", "PACIFIC AVE.", "PENNSYLVANIA AVE.", prop);
  1827.       break;
  1828.    case 33:
  1829.       bypass=TRUE;
  1830.       (VOID) chest();
  1831.       break;
  1832.    case 34:
  1833.       show3("PENNSYLVANIA AVE.", "PACIFIC AVE.", "NORTH CAROLINA AVE.", prop);
  1834.       break;
  1835.    case 35:
  1836.       mesg1.IText=(UBYTE *)"SHORT LINE RAILROAD.";
  1837.       showrr(prop);    
  1838.       break;
  1839.    case 36:
  1840.       bypass=TRUE;
  1841.       (VOID) chance();
  1842.       break;
  1843.    case 37:
  1844.       show2("PARK PLACE.", "BOARD WALK.", prop);
  1845.       break;
  1846.    case 38:
  1847.       mesg1.IText=(UBYTE *)"LUXURY TAX.";
  1848.       mesg3.IText=(UBYTE *)"You owe $75.";
  1849.       mesg3.FrontPen=red;
  1850.       PrintIText(rportpropinfo, &mesg0, 0, 0);
  1851.       PrintIText(rportpropinfo, &mesg1, 0, 0);
  1852.       PrintIText(rportpropinfo, &mesg3, 0, 0);
  1853.       eft(nowrolling, 4, 75);
  1854.       break;
  1855.    case 39:
  1856.       show2("BOARD WALK.", "PARK PLACE.", prop);
  1857.       break;
  1858.    } /*  end of switch  */
  1859.  
  1860. if (!bypass)
  1861.    {
  1862.    line0_text=148;
  1863.    for (j=0, hold_line=line0_text; j<SHOW_LINES; j++)
  1864.       instructIT[j].IText=instructline[hold_line++];
  1865.  
  1866.    while (!donepropinfo)
  1867.       {
  1868.       if (1<<propinfowindow->UserPort->mp_SigBit)  ckpropinfomsg();
  1869.       }
  1870.    ClearMenuStrip(propinfowindow);   
  1871.    CloseWindow(propinfowindow);
  1872.    if (buyfrombank == TRUE)  
  1873.       transfertitle (nowrolling, 5, prop, propcost[prop]);
  1874.    if (didntbuyfrombank)
  1875.       {
  1876.       auctionprop(prop);
  1877.       didntbuyfrombank=FALSE;
  1878.       }   
  1879.    }
  1880. } 
  1881.  
  1882.