4.5,19,65.5,18.55,65,18.5,66,99,99B╕Ж 15.55,62,15.65,64,15.5,66,15.9,66,14.9,74,14.1,74,14,73,14.55,71,14.97,71.5,15.05,70,15,65,14.8,65,14.8,64.5,15.1,64.5,15.55,62,99,99,15.2,84,13.75,82,13.85,79,14.25,79,13.9,77,13.6,77.3,13.9,76.5,13.9,75,14.6,75,14.65,75.7,14,76,14.65,76.5C┬Ж 15,79,15.9,83.5,15.2,84,99,99,13.25,71,12,74.5,11.7,74.5,11.75,73,12,73.5,12.4,70,13.25,71,99,99,5.5,45,5.7,43.5,5.6,42,5.45,42.5,5.5,45,99,99,5.4,41,5.5,40,5.4,36,4.7,32,4.6,33,5.3,37,5.4,41,99,99,5.55,54,5.6,49,5.55,49,5.5,46,5.5,52.5,5.55,54D
╠Ж 99,99,2.4,81,2.1,80.5,2.7,78.5,2.65,78,3,78.5,3,79,2.9,79.5,2.85,79,2.85,80,2.4,81,99,99,1.4,10.5,1.4,7.5,1.5,7,1.5,9.5,1.4,10.5,99,99,9.7,19,9.65,19,9.65,20,9.7,19,99,99,20.75,79,20.9,78,21.2,78,20.9,77.5,21.15,77,21.3,78,21.4,78,21.4,77.5E
╓Ж 21.55,77.5,21.1,79,21.75,79,21.85,80,21.2,80,20.75,79,99,99,24,74.5,23.75,73,23.75,72,23.8,71,23.5,71.5,23.75,75,24,76,99,99,0,76,.7,77,.7,76.5,0,75,99,99,22,47,21.8,42,21.9,41,22.45,42,22.55,41,22.8,41.5,22.8,42.5,22.55,45,22.65,47,22.3,46E√рЖ 22.5,45,22.25,45,22.1,46.5,22,47,99,99,14.4,22.5,14.55,22.5,15.05,20,14.8,19.5,14.55,22,14.4,22,99,99,15.1,18,15.4,18.5,15.1,20,15.1,18,99,99,16.25,50,16.05,47.5,16.5,47,16.22,49,16.25,50,99,99,15.2,-52,15.4,-53.5,15.6,-54,15.5,-53,15.45,-51.5F
"╖├(0,0),0,0F'Ж-1,-1F 'Бе999922,47,99,99,14.4,22.5,14.55,22.5,15.05,20,14.8,19.5,14.55,22,14.4,22,99,99,15.1,18,15.4,18.5,15.1,20,15.1,18,99,99,16.25,50,16.05,47.5,16.5,47,16.22,49,16.25,50,99,99,15.2,-52,15.4,-53.5,15.6,-54,15.5,-53,15.45,-51.5F
"                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                5,8.9,62,9,60.5,9.2,60,9.25,60,9.3,60.5/№ЦЖ 9.3,58.5,9.4,59,9.55,58.5,9.5,57,9.2,55,9,54,9.48,56,9.75,59,9.75,60,9.95,61.5,9.8,60.5,9.8,59.3,10.2,61,10.35,61,10.4,60,10.65,59.5,10.9,58.5,11,59,11.1,59,11.45,51.5,11.8,50.5,11.85,49.5,11.7,49.5,11.75,470▌аЖ 11.7,42.5,11.77,38.5,11.85,37.5,12,35,12.2,34,12.35,29,12.4,28.5,12.45,27,12.42,27,12.42,27.5,12.5,25,12.55,24,12.6,22.5,12.67,23,12.55,25.5,12.4,30,12.38,32,12.48,32,12.51,30,12.75,26,12.75,25,12.92,22,13,19,13.3,16.51╤кЖ 13.6,16,13.7,16.5,13.97,14,14,14,14.15,13,14.25,11,14.25,10.5,14.47,9,14.65,8.5,14.77,9,14.77,8,14.8,7.5,14.82,5,14.8,4,14.7,1,14.6,-1.5,14.7,-2,14.6,-4,14.65,-5,14.7,-7,14.75,-9.5,14.87,-14,15.37,-17,15.3,-25,15.25,-30,15.2,-33,15.2,-372═┤Ж 15.1,-38,15.05,-40.5,15.2,-40,15.1,-46,15,-46.6,15.1,-47,15.02,-48,15.06,-51.5,15.1,-51,15.15,-51.8,15.15,-52,15.4,-51,15.35,-50.5,15.55,-48,15.6,-47.3,15.5,-46,15.5,-45.4,15.53,-45,15.6,-45,15.65,-42.5,15.7,-42.5,15.65,-43,15.62,-41.5,15.75,-423Ф╛Ж 15.8,-40.5,16.1,-39.5,16.2,-37,16.1,-36,16.05,-35,16.45,-35.5,16.55,-33,16.65,-30.5,16.75,-28,16.77,-24.5,17.1,-23,17.25,-22.5,17.4,-19,17.45,-16,17.46,-13,17.65,-7,17.6,-5.5,17.5,-3,17.1,-2.54q╚Ж 16.7,0,16.6,0,16.66,1.5,16.62,1.5,16.6,5,16.55,5.5,16.2,6,15.8,11,15.5,10.5,15.45,11.5,15.3,11.5,15.3,12.5,14.95,11.5,14.8,9,14.77,10,14.5,10,14.45,11,14.47,15,14.45,16,14.1,16,14.2,17,14.25,21.5,14,21.5,13.95,19.55╥Ж 13.7,19,13.6,20,13.5,23,13.55,28,13.6,30,13.9,30,14,29,14.1,29,14,31,14.35,31,14.4,30,14.45,30,14.47,27,14.55,25,14.6,25,14.6,27.5,14.55,31,14.9,37.5,14.9,38.56
▄Ж 15.1,40,15.4,41,15.37,41,15.34,42,15.5,44.5,15.6,46,15.53,44.5,15.45,44,15.8,46,15.65,46,15.6,49,15.5,48.5,15.55,49,16,49,16.1,50,16.3,50.3,16.3,52,16.2,52,16.2,53,16,53,15.7,60,15.6,59.7,15.6,59,15.45,59,15.45,61,15.3,61.5,14.8,62,14.8,607	цЖ 14.75,59,14.8,58,14.85,56.5,14.75,55,14.8,51.5,14.7,51.5,14.65,52.5,14.65,55,14.3,56,13.95,57,13.85,57,13.85,59,13.75,59,13.77,62,14,64.5,14.2,65.5,14.55,66,14.5,68.5,14.35,69,14.25,67,14.2,68.5,14,67.5,13.8,71,13.6,70,13.8,68,12.9,68.5,12.35,688ЁЖ 12.4,69,11.5,70.5,11,69,99,99,0,-68,.7,-68,.7,-69,1,-69.5,1.8,-67,3,-67,3.45,-66,4.1,-67.5,5,-67,5.8,-67.5,5.8,-68,7.45,-70.5,6.9,-75,6.85,-77,7,-78,6.7,-78,6.7,-82,10,-86,10,-85,9.7,-84.5,9.7,-81,10.35,-80.5,9.5,-77,10.25,-78,10.25,-79,11.2,-758я·Ж 99,99,3.6,-21,3.6,-24,3.75,-32.5,3.7,-34,3.8,-34.3,4.35,-33.5,4.8,-31.5,4.97,-33,5.1,-34,5.25,-33,5.45,-38.5,6,-37.5,6.25,-29,6.3,-28,5.8,-19,5.55,-12,5.5,-16.5,5.1,-14.5,5.2,-13,4.8,-12,4.6,-15,4.45,-14.5,4.1,-19,3.6,-21,99,999щЖ 2.45,5,3,-6,3.1,-3,2.6,5,2.45,5,99,99,3.35,1,3.4,-2,3.8,-2.5,3.95,.5,3.95,5.5,3.85,6,3.35,1,99,99,3.1,-6.5,3.65,-7,3.65,-6.5,3.1,-6,3.1,-6.5,99,99,4,0,4.3,.1,4,-5,4,0,99,99,4.8,-.5,4.85,-3,5.2,-3.5,5.25,-7.5,5.55,-8,5.8,-7.5,5.9,-9.5,6.05,-9.5:╚Ж 5.7,-3,5.2,-1.5,5.05,-2.5,5,0,4.8,-.5,99,99,7.55,-34,7.65,-36,7.6,-38,7.75,-39,7.9,-36.5,7.8,-36,7.55,-34,99,99,7.55,-39,7.2,-45.5,7.35,-46,7.65,-40,7.55,-39,99,99,5.7,-41,5.8,-43.5,5.95,-43,5.9,-41.5,5.7,-41.5,99,99;NЖ 17.6,84,15.5,81,15.6,80,15.1,79.5,15.5,76.5,16,77,16.55,63,16.75,61,17.1,60.5,17.3,64.5,18.3,68.5,18.7,80,19.2,81,17.6,84,99,99<G|Ж 24,69,23.6,68.5,23.65,69,23.25,68,23.25,67.5,23,68,23.1,68.5,22.9,68.75,22.95,67,22.7,66.5,22.75,65.5,22.5,66,22.55,65,22.15,67,22.6,66.5,22.7,67,21.9,71,21,69,20.75,64.5,20.4,63,20.4,58,20.7,59,20.9,56,21.1,56.5,21.15,59,21.25,59.5,21.2,60.5==ЖЖ 21.2,62.5,21.47,65,21.7,65,21.72,64.5,21.45,63,21.55,60,22,60,21.6,59,21.65,57.5,21.5,58,21.4,55.5,20.7,55.5,20.75,57,20.6,56.5,20.7,55,20.4,54,19.75,49.5,19.9,46,19.87,43.5,19.4,44,19.45,42.5,19.45,38,19.55,38.5,19.6,37,19.85,37.5,20.2,42>3РЖ 20.2,44,20.7,45,20.73,43,21.1,40.5,21.03,39,21.15,40,21.15,41,21.25,40.5,20.8,45,21,45,21.35,42,21.45,36,21.6,36.5,21.55,39,21.8,40,21.85,36,22.45,36,22.3,31,21.8,31,21.4,32.5,21.4,30,20.8,32.5,20.75,36,19.85,35,19.6,35.5,19.45,33,19.35,29?&ЪЖ 19.15,28,18.8,21,18.9,21,18.9,16,18.8,16,19,12,19.5,5,20.25,6.5,20.4,5,20.6,5,20.65,4,20.6,-1,20.75,-5.5,20.9,-11,20.8,-12,20.75,-17.5,20.85,-18.5,21,-26,21.25,-32.5,21.2,-33,21.35,-34,21.75,-33,22.25,-29,22.25,-20.5,22.4,-19.5,22.3,-19?6ЯЖ 22.75,-16@0дЖ 22.75,-11.5,22.7,-5,23.2,4,23.4,12,23,11,22.7,15,22.2,30,22.25,28.5,22.35,29,22.8,17,22.9,13,23.7,17.5,24,23,23.7,25,23.6,24,23.25,30,23.4,30,23.7,26.5,23.8,27,23.82,26,24,26,99,99,23.3,-12,22.9,-16,22.85,-22.5,23,-21,23.2,-20.5,23.3,-12,99,99A!оЖ 19.7,58,19.6,57,19.7,54,19.77,54,19.6,51,20.05,52,20.1,53,19.8,55,19.9,57,19.75,57,19.8,58,19.7,58,99,99,19.5,54.5,19.4,54.5,19.4,51.5,19.55,52,19.6,54,19.5,54.5,99,99,18.5,66,18.4,65.5,18.7,63,19.1,6 з 20508gЮ:З"THE OBJECT OF THE GAME - -- --- IS TO MANEUVER THE BUREAUCRATS --- -- - INTO THE ISSUES.8ЪЗ:З"BUREAUCRATS LOOK LIKE THIS:  "; Л(239);"."8╪ З"THEY MOVE VERY SLOW - - (- ONE - STEP - AT - A - TIME).9q*З"THEY WILL FOLLOW YOU ANY PLACE":З"THEY ARE SURROUNDED IN RED TAPE LIKE THIS  "; б(3,191); б(29,32); Л(191); Л(239); Л(191); б(29,32); б(3,191);"."9в4З:З"THE ISSUES LOOK LIKE THIS  "; Л(159);"."9╚>З:З"  press any key to continue";9сHX$│ Т:Е X$│"" з 2120:eRЮ:З"IF YOU CAN WIPE OUT THE RED TAPE - -- - AND MAKE THE BUREAUCRATS FACE ISSUES - -- --- ---- --- -- - YOU GAIN 'power points':н\З:З"FOR EACH POWER POINT YOU GET ONE MOVE -- - -- - !!!!!MAYBE!!!!!;fЗ"JUST BEFORE YOU CAN MOVE YOU    WILL HEAR SOME LOW BEEPS THAT   LET YOU KNOW YOUR ACTUAL NUMBER OF MOVES.;БpЗ:З"PLEASE DON'T RUN INTO ANYTHING ---- -- -IF YOU CONFRONT AN ISSUE YOU LOSE HALF YOUR POINTS.;гzЗ"   press a key when ready";;╝ДX$│ Т:Е X$│"" з 2180;ЎОЮ:З"CONFUSING??? - WELL SO ARE MOST  POLITICAL GAMES.<9ШЗ:З"WIPE OUT THREE BUREAUCRATS  AND GET A NEW ADMINISTRATION."<вЗ:З"GET TEN POWER POINTS <AND> A NEW ADMINISTRATION THEN YOU WIN.=@мЗ:З"<<<warning>>> THIS GAME IS TOO  SLOW WHEN IT IS SLOW AND TOO    FAST WHEN IT IS FAST AND IT     TAKES A FRUSTRATINGLY LONG TIME TO WIN OR LOSE ----------------------JUST LIKE POLITICS.=a╩З"  press any key to begin";=z╘X$│ Т:Е X$│"" з 2260=А▐РмЗ:З"<<<warning>>> THIS GAME IS TOO  SLOW WHEN IT IS SLOW AND TOO    FAST WHEN IT IS FAST AND IT     TAKES A FRUSTRATINGLY L                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  !&
└4:Х10::Г(C) CLOAD 1981&╝Ю:PI│3.1415927:D1│90:Й "LONGITUDE,LATITUDE,AZIMUTH      ";RY,RX,RZ:RX│RXнPIо180:RY│м(RYнPIо180):RZ│RZнPIо180:Й"GRID(Y OR N)";Q$:╚4,1:╝:┐1,1:┬(127,95),D1л2&Ї
НXA,YA:ЕXA│м1░YA│м1з30:ДЕXA│99░YA│99зX1│0:Y1│0:Бе10'Бж40:Бе10'ЕQ$│"Y"з200:ДБе9999'А(XA│(XAн15л60)нPIо180л.0001:YA│YAнPIо180л.0001:X│ Х(YA)н( Е(XA)нD1):Y│ Е(YA)нD1:Z│ Х(XA)н Х(YA)нD1'єZN1│X:N2│Y:R│RZ:Бж1000:X│N1:Y│N2:N1│X:N2│Z:R│RY:Бж1000:X│N1:Z│N2:N1│Z:N2│Y:R│RX:Бж1000:Z│N1:Y│N2:X│Xл127:Y│Yл96(dЕZ┤0зX1│0:Y1│0:Р(-iЕX┤0▒Y┤0▒X▓255▒Y▓191зX1│0:Y1│0:Р(9kY│191мY(LnЕX1│0░Y1│0з130(ax╗(X1,Y1)м(X,Y),╜(oВX1│X:Y1│Y(uМР(╕╚X1│0:Y1│0:АI1│0е22й2:ЕI1о6│ Б(I1о6)зАI2│м90е90й4:ДАI2│м60е60й4(с═XA│I1л2:YA│I2:Бж40:ЛI2:X1│0:Y1│0:ЛI1)+╥АI2│м60е60й30:АI1│0е24.4й.2:XA│I1:YA│I2:Бж40:ЛI1:X1│0:Y1│0:ЛI2:Бе9999)?шD│ Ы(N1п2лN2п2))YЄA│ Ф(N1о(N2л.000001)))j№ЕN2┤0зA│AлPI)t
A│AлR)ГN1│Dн Е(A))ТN2│Dн Х(A))ШР*PVЖ 11.2,-75,11.5,-76,11.8,-73.5,13,-74,13.5,-72,13.6,-72.5,15.55,-72.5,15.45,-68.5,15.6,-66,16.2,-63,15.6,-67,16,-73,16,-77,17.5,-78,18.8,-73,20,-70,21.9,-70,23.75,-66,24,-68,99,99*иFЖ 0,25,.5,25,.75,21,.83,22,1.15,8,1.4,10,1.4,15.5,1.9,22,2,22,2.1,23,2.16,20,2.3,19*¤PЖ 2.3,15.2,2.5,15.8,2.6,11,2.56,8.5,2.65,8.7,2.74,3,2.95,1.5,2.9,6,2.7,7,2.65,11+ЙZЖ 2.7,14,2.74,13,2.83,12.5,2.83,11,3,10.5,3,8,3.3,11.5,3.32,14,3.15,18,3.1,20.5,3.23,22,3.38,22,3.56,23,3.65,23.5,4,25.5,4,26.5,4.13,29,dЖ 4.11,31.5,3.95,36,4.2,37.5,4.05,38,3.9,37.2,3.77,40,3.87,40,4.1,41,4.1,39.5,4.35,40,4.35,38,4.5,38,4.44,35,4.6,36,4.6,37.5,4.54,38.5,єnЖ 4.8,43,4.95,42.8,5.4,49,5.47,52,5.47,53,5.4,54,5.15,53.5,5.57,59.7,5.95,59.5,5.97,60,6.15,59,6.32,59.7,6.3,60,6.5,62,6.75,62.3,6.75,60.5,6.9,62,6.9,61,6.45,56,6.5,51,6.6,52,6.67,53,6.8,53,6.8,58,6.9,60,7.45,60,8,62.5-жxЖ 7.72,65,7.9,64.6,8.05,65.5,8.25,65.8,8.5,64.8,8.5,65.3,8.65,65.3,8.5,66.7,8.4,66.6,8.38,67.2,8.13,68,7.4,70,7.5,68.5,7.35,68,7.28,69.5,6.7,69.5,6.7,71,6.2,71,6,71.5,5.35,72.PВЖ 5.37,70,4.9,70,4.85,69,4.6,71.5,3.5,73.5,3,72,3.5,75,3.48,76.5,3.15,76.5,3,77.5,2.73,77,2.75,76.5,2,75.5,1.7,74.5,1.7,74,1.47,74,1.47,73,.6,73.3,.5,71.5,.5,69,0,70/&МЖ 99,99,11,69,10.45,70,9.55,71,9.15,70,9.1,69,8.95,69,8.9,68.5,9.1,67.5,9.2,67.5,9.2,66.5,9.07,66.5,9.05,67,8.85,66.3,8.8,66.2,8.9,65.5,9.2,65.7,9.3,66,9.35,64.5,9.27,64. Б&$
Ю:З"DO YOU WANT INSTRUCTIONS?"&:X$│ Т:Е X$│"" з 2&QЕ X$│"Y" з Бж 2000&o:ГCOPYRIGHT(C) CLOAD 1982&К:Г BY:  CHARLES SANTEE&и:Г      7516 COUNTRY LANE&─:Г      DARIEN,IL 60559&╓
╚ 3,1:╝:┐ 1,0',╞"C3BM28,4M+60,+32M-8,+24M+8,+12M+12,+8D36M-8,-4L12M-12,-8M-24,-32M-4,-12U36M28,4'=├(60,40),3,3'Х(╞"C3BM224,4M-60,+32M+8,+24M-8,+12M-12,+8D36M+8,-4R12M+12,-8M+24,-32M+4,-12U36M224,4'з2├(200,40),3,3(-<╞"BM100,72C4ND28R52D56G4M-16,+4M-6,+4M-6,-4M-16,-4H4U32R4ND36R4ND38R4ND38R4ND40R4ND40R4ND42R4ND42R4ND40R4ND38R4ND38R4ND38R4ND36R4(BFА X│102 е150 й 8(SP├(X,104),4,4(dUЕ X▓147 з 90(wV├(Xл4,104),2,4(ZЛ X)d╞"BM108,72C3NR36M+6,-8M+2,+4E4F4E4F4M+2,-7F4M+2,-6NM+4,+12M-4,-12M-4,-8M-8,-4L8M-8,+4D8M+6,+8D8BM108,40C2ND8M-8,+4G4R12F4M-8,-4BM+6,-6C3R4F4E4NL8R4)аn╞"BM106,76C4D4ND4R4U4NL4BR4D8R4U8NL4BR4D8E4F4U8BR4NR4D4NR4D4R4BU8BR4ND4R4D4L4NF4D4BL34BD2D4ND4R4U4NL4BR4D8R4BR4U4NR4E4F4D4BR8U4NH4E4)▓x├(136,70),3,3*4В╞"BM152,120C3D8G4E4U8M+20,+28G4NM-24,-20":├(156,132),3,3:╞"C2NE4F8R6U2L2U2R6D2R2U4L8G2H8BM100,120C3D8F4H4U8M-20,+28F4M+24,-20*FМ├(96,132),3,3*oЦ╞"BM80,148C2G8H2L8D4R2U2R6D2L2D2R8E8*╢а╞"BM112,134C3M+14,+6M+14,-6M+12,+28G4L8M-8,+4L12M-8,-4L8H4M112,134*╔к├(126,156),3,3+&╛╞"BM76,180C4U12H8U16C3U2E6R2D2G6L2C4H8C3L2G6D2R2E6U2C4U4C3U2E6R2D2G6L4H6U2R2F6E2U6H2G2D6+Ь╚╞"BM184,132C2NF4NG4C3D48C4F2D6L4U6E2BL8L2M-4,+6F4M+4,-6C3M+16,-50C2NM+2,+4M-4,+2BM168,172C4L2G6F4E6U2C3E40C2NL4D4+╤
,М N(50),O(50),W(12,12),A(10):А M│1 е 8:Н M$(M):Л+▌
6Z│0:S│2+¤
J╔"L4CL8DEL4FL8EDCDCO2AGL4F",

OЮ1:┐ 0,1,"
TА A│0 е 63:B│3:C│31,<
^Ь(A,B,8):Ь(A,C,8):Л A,T
hА B│3 е 31:A│0:C│63,n
rЬ(A,B,8):Ь(C,B,8):Л B,~
|А A │ 1 е 3,│
ЖL(A)│ Д(54)л4:Е L(A)о2┤▓ Б(L(A)о2) з L(A)│L(A)л1,ш
РM(A)│ Д(20)л6:Е M(A)о2┤▓ Б(M(A)о2) з M(A)│M(A)л1-
ЪЕ  С(L(A),M(A))│7 з 390-
дА X│м2 е 2 й 2-*
оА Y│м2 е 2 й 2-A
╕Ь(L(A)лX,M(A)лY,4)-K
┬Л Y,X-^
╠Ь(L(A),M(A),7)-f
╓Л A-v
рF│ Д(30)л20-Ж
ъА A │ 1 е F-╗
ЇN(A)│ Д(58)л2:Е N(A)о2┤▓ Б(N(A)о2) з N(A)│N(A)л1-Ё
■O(A)│ Д(24)л4:Е O(A)о2┤▓ Б(O(A)о2) з O(A)│O(A)л1.Е  С(N(A),O(A))│4  з Бе 500 .0Е  С(N(A),O(A))│7 з Бе 500.CЬ(N(A),O(A),2).K&Л A.q0P│ Д(58)л2:Е Pо2┤▓ Б(Pо2) з P│Pл1.Ч:Q│ Д(24)л4:Е Qо2┤▓ Б(Qо2) з Q│Qл1.░DЕ  С(P,Q)│4 з Бе 560.╞NЕ  С(P,Q)│7 з 560.█XЕ  С(P,Q)│2з 560.шbЬ(P,Q,3). lА A │ 1 е 3:U(A)│0/vА Z │ 1 е 12/АW(A,Z) │ 0/)КЛ Z,A/1ФZ│0/QЮЗ@0,"PUSH ANY KEY TO START"/\иA$│" "/t▓A$│ Т:Е A$┤▓""з 710/╝Бе 690/Ъ╞З @ 0,S;"POWER POINTS"/и╨G │  Д(S)/╕┌А A │ 1 е G/╚ф╔ "L16EP16"/╨юЛ A/р°А A │ 1 е G/эЬ(P,Q,1)0P│Pл( Б( Н(0)о22)м1)н20#Q│Qл( Б( Н(1)о22)м1)н20: Е  С(P,Q)│8 з 11100Q*Е  С(P,Q)│2 з 11700^4Ь(P,Q,3)0k>╔ "L16C"0sHЛ A0ЦRА A │ 1 е 3:Е U(A)│1 з Бе 10900░\J│L(A)л( А(PмL(A)))н20╩fK│M(A)л( А(QмM(A)))н20фpЕ  С(J,K)│2 з Бе 12400■zЕ  С(J,K)│3 з Бе 13901ДА X │ м2 е 2 й 21(ОА Y │ м2 е 2 й 21FШZ│Zл1:LA│L(A)лX:MA│M(A)лY1eвЕ W(A,Z)│1▒ С(LA,MA)│8з9501tмЬ(LA,MA,1)1~╢Л Y,X1Ж└Z│01Я╩L(A)│L(A)л А(PмL(A))1╕╘M(A)│M(A)л А(QмM(A))1╦▐А X│м2 е 2 й 21▐шА Y│м2 е 2 й 21№ЄZ│Zл1:LA│L(A)лX:MA│M(A)лY2№Е W(A,Z)│1▒ С(LA,MA)│8з10602KЕ С(LA,MA)│2 з W(A,Z)│1:Ь(LA,MA,1):а 250,52aЕ С(LA,MA)│3з13902pЬ(LA,MA,4)2z$Л Y,X2В.Z│02Х8Ь(L(A),M(A),7)2ЭBЛ A2иLБе 7202═VЗ @ 0,"THEY RAN YOU UP THE WALL"2┘`а 10,202ыjS │ Sм Б(Sо2)2■tЕ S ┤ 1 з 14603~З @ 0,S;"POWER POINTS"3$ИБе 5603JТЗ @ 0,"YOU HAD TO FACE THE ISSUE"3WЬа 250,203iжS │ Sм Б(Sо2)3|░Е S ┤ 1 з 14603Ч║З @ 0,S;"POWER POINTS"3д─Ь(P,Q,1)3п╬Бе 5603═╪U(A)│1:V│Vл1:Е V▓2 з 13003этЗ @ 0,"ONE LESS BUREAUCRAT"3∙ь╔ "ABCD4ЎS│Sл14З @ 0,"SCORE =";S4%
Бе 109049А G │ 1 е 4:Ю G4ZЗ @ 100,"NEW ADMINISTRATION"4k(а 10нG,5:Л G4Е2S│Sл2:Е S▓│ 10 з 14904а<З @ 0,S;"POWER POINTS"4иFV│04░PЮ 14╜ZЬ(P,Q,1)4╚dБе 3404ыnЗ @0,"THE BUREAUCRATS GOT YOU"4Ўxа 1,155ВS │ Sм15МЕ S ┤ 1 з 146051ЦЗ @ 0, S;"POWER POINTS"5>аЬ(P,Q,1)5IкБе 3405^┤З @ 0,"YOU LOSE"5А╛╔"03L4CL8CCL4CL8EDDCCO1BO2L2C5М╚Бе 15105а╥А G │ 1 е 8:Ю 85м▄Бж 15705╚цЗ @ 100,"NEW GAME (Y/N)5╙ЁA$│" "5э·A$│ Т: Е A$│"Y" з 3106Е A$│"N" Бе 15606Бе 15306К6$"Ю:А Q│1 е 867,Зд10)"YOU WON"6C6╔ M$(Q)6I@Л6OJР6uTЖ L4O3E,L8D,D,C,O2B,O3C,L4D,O2L4A6╨╨Ю:З"      WELCOME TO POWER PLAY":З:З"THIS IS A GAME OF HURRY UP --------- AND WAIT..."7┌З:З"YOU ARE A ''true blue'' AMERICAN - - - - LOBBYIST."7\фЗ:З"IN THIS GAME -- -- -- -- -- -- -- --YOU LOOK LIKE THIS:   "; Л(175);"."7╟юЗ:З"YOU CAN MAKE IMPORTANT MOVES --- --- BY MOVING THE JOYSTICK --- IN THE DIRECTION YOU WANT TO GO.";7э°З:З"  to see more press any key";8X$│ Т:Е X$│"" a&
:ГBY REGENA&B:Г120 S 350 E. NORTH  SAT LAKE    UTAH 84054&a:ГCOPYRIGHT (C) CLOAD 1982&mВ TYPE1&║
Ж 15,FAD,A,AS,DAD,AD,SAD,LAD,FALL,ALFALFA,SASS,LASS,DADS,LADS,FALLS,FADS'Ж 16,HAD,HAS,GAS,SAG,HALL,HALLS,LADS,SAGS,HAG,LAG,LAGS,SLAG,SHALL,SASH,DASH,FLASH'qЖ 17,DEAF,DEED,SEED,FEED,HEED,LIKE,KILL,FILL,FEEL,FEES,LIED,DIAL,SLIDE,FLIES,SLID,LIKE,GLIDE'─(Ж 17,TAG,HAT,TALL,THY,DAY,HAY,JAY,GAY,LAY,TAR,RAT,STAR,STAFF,FAST,TRY,SAY,YARD(-2Ж 20,WISH,EXAM,EXACT,TEXT,TWO,WON,SOW,WASH,WORSE,OWE,WORD,LOOK,LOSE,SOD,WOW,TOW,TEXAS,OXEN,MIX,WORLD(С<Ж 16,QUAKE,QUIZ,QUIP,ZAP,QUIT,PIQUE,PLAQUE,PUZZLE,PLAZA,SAP,ZIPPER,PRIZE,QUICK,SQUEEZE,SEAL,ZIP(∙FЖ 18,CALM,CAN,MEN,NIMBLE,EXACT,EXAM,MIX,NIX,BUZZ,ZOOM,NAVY,CAB,BACK,BOMB,ZOMBIE,CAVE,VACATE,VARMINT)ZБж 3000)dМ A$(7,20))╛П)(╚А I│1 е 7)0╥Н N)>▄А J│1 е N)LцН A$(I,J))TЁЛ J)\·Л I)h
Бж 1000)t
Бж 2000)|
,S│0)Е
1T2│0)О
4L2│0)Э
6А K│1 е 10)й
@J│ Д(N))└
JЕ A$(I,J)│"" з 320)╧
hM│465м32нK)█
rа 159,3)э
|З @ M,A$(I,J))Ў
Ж Я│0) 
РЙ B$*	
ЪNT│ Я* 
ЇЕ B$│A$(I,J) з 530*+
■а 5,20*6Бе 550*L╔ "L16;C;D;E;F;G"*VS│Sл1*c&T2│T2лNT*t0L2│L2л З(B$)*Г:A$(I,J)│""*Ъ?З @ M,"          "*вDЛ K*│NА X│1 е 1000*╗SЛ X*┴XЮ*▌bЗ @ 131,"YOUR SCORE IS"+
lЗ @ 196,10нS;"PERCENT ACCURACY"+vWORDS│L2о5л2+/КWPM│ Б(WORDSн3600оT2л.5)+RФЗ @ 228,WPM;"WORDS PER MINUTE"+tЮЗ @ 419,"PRESS C TO CONTINUE"+|иC│2+И▓Бж 4000+ТD$│ Т+жЕ D$┤▓"C" з 780+▒ Бе 190+╖шЮ+╧ЄЗ @ 67,"CHOOSE ONE"+щ№З @ 131,"1 HOME KEYS",З @ 163,"2 HOME ROW",(З @ 195,"3 TOP ROW, THIRD FINGER",PЗ @ 227,"4 TOP ROW, POINTER FINGER",l$З @ 259,"5 RING FINGER",К.З @ 291,"6 LITTLE FINGER",е8З @ 323,"7 BOTTOM ROW",┴BЗ @ 355,"8 END PROGRAM",╔LC│3,╒VБж 4000,▀░C$│ Т,Є║Е C$│"" з 1200-	─Е  К(C$)▓56 з 1200- ╬Е  К(C$)┤49 з 1200-6╪Е  Й(C$)│8 з 5000-CтI│ Й(C$)-IьР-O╨Ю-Y╙┐ 0,0-З╒З @ 256,"TYPE & ENTER THE WORDS YOU SEE."-Ш╓А X│1 е 1000-а╫Л X-ж╪Ю-о┌C│4-╖фZ│17-╟юА X│34 е 41-╓°А Y│Z е 31-фЬ (X,Y,C)-ьЛ Y-ЎZ│Zм1-■ Л X.*Z│12.4А X│42 е 47.&>А Y│Z е 31.4HЬ (X,Y,C).<RЛ Y.F\Z│Zл1.NfЛ X.^pА Y│26 е 28.mzЬ (33,Y,C).|ДЬ (48,Y,C).НОЬ (32,Yл1,C).ЮШЬ (49,Yл1,C).пвЬ (31,Yл2,C).└мЬ (50,Yл2,C).╚╢Л Y.▄└А Y│10 е 0 й м2.ы╩Ь (41,Y,2).·╠Ь (40,Y,2)/╘Л Y/▐З @ 18,"100%"/$шА X│1 е 600/,ЄЛ X/2№Р/8╕Ю/B┬┐ 0,1/\╠З @ 139,"T Y P I N G"/n╓З @ 207,"FOR"/ЕрЗ @ 268,"ACCURACY"/ЮъЗ @ 363,"QWERTYUIOP"/╖ЇЗ @ 395,"ASDFGHJKL;"/╧■З @ 428,"ZXCVBNM,."/▀А X│16 е 46/юЬ (X,20,3)/¤Ь (X,29,3)0&Л X00А Y│21 е 280$:Ь (16,Y,3)03DЬ (46,Y,3)0;NЛ Y0CXC│40ObБж 40000Бl╔ "L8;CCE;01;EGG;L4;E;L8;F;03;FDD;01;BB;L4;G"0╣v╔ "L8;C;02;CEEGG;L4;E;L8;C;03;C;F#;02;F#;L4;G;L2;G"0├А┐ 0,00╔КР0╪аА X│0 е 630цкЬ (X,0,C)0ї┤Ь (X,31,C)0¤╛Л X1╚А Y│1 е 301╥Ь (1,Y,C)1(▄Ь (0,Y,C)17цЬ (63,Y,C)1FЁЬ (62,Y,C)1N·Л Y1TР1ZИЮ1`ТКG;L4;E;L8;F;03;FDD;01;BB;L4;G"0╣v╔ "L8;C;02;CEEGG;L4;E;L8;C;03;C;F#;02;F#;L4;G;L2;G"0├А┐ 0,00╔КР0╪аА X│0 е 630цкЬ (X,0,C)0ї┤Ь (X,31,C)0¤╛Л X1                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 
Е&:
:ГMARK GRANGER 8854 ROBIN HOOD    LA JOLLA, CA 92037&^:ГMODIFIED BY CHROMASETTE STAFF&║:Г ALL COVERS MUST HAVE THE    LOGO AT THE TOP OF THE SCREEN   DURING GRAPHICS DISPLAY.':ГDECLARE ALL VARS USED BEFORE USING VARPTR ON A STRING OR THE STRING ADDRESS MOVES.'}:ГLINES 50-95 PUT THE LOGO ON  SCREEN. THEN LOGO'S LEFT ALONE. DON'T EDIT LINES 50-65. IT WON'T WORK.'╧:ГDISCLAIMER (LINES 1000-1160) MUST ALWAYS BE INCLUDED IN ANY  COVER PROGRAM.'р
└4:╚4,1:┴1,4(	М LO$(7),N1(75),N2(75),N3(75),N4(75)(Q│0((╝:┐ 1,1(ы2LO$(0)│"кккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккккеjккккккккккккккккккккккккккккккХZккккккккккккккккккккккккккккккUVккккккккккккккккккеeЦкккккккккUVккккккккккккккккккйжжкккк")╣4LO$(1)│"ккккйVХккккккккккккккккккйжfккккккккйZеккккккккккккккккккйжfккккккккеjеекккккккккккккккккйжfккккккккеjееккккккккккккккккккккккккккккХкееккккккккккккккккккккккккккккХкХекккккккккккккккккккккккк"*З6LO$(2)│"ккккХкUеккккккккккккккккккккккккккйUUUVеккккккккккккккккккккккккккйUUUVеккккккккккккккккккккккккккйUUUZеккккккккккккккккккккккккккйUUUкХкккккккккккккккккккккккккккйVккЦкккккккккккккккккккккккк"+U8LO$(3)│"кккйZккЦккккккккккккккккZЦкккккккккйZккЦкЦккккккккккккккZЦкккккккккеZккЦкЦккккккккккZкккZЦкккккккккеZккЦZХккккккккккZкккZЦкккккккккеjккХVХUiZйeiZкVZZкккZЦкккккккккеjккХVХUeVйeYZйUZZкVкZЦкVкккк",#:LO$(4)│"кккеjккUЦХUeVйUUVеUYZйUеUUiUкккккккеjккVЦЦХЦейUUVеiYVйUеUUiUкккккккеjккVЦVЦЦейZVЦХйYVеeeUUeejккккккеjккZЦZVЦейjZЦЦйYVейijZейjккккккеjккZЦZZVеeiZVЦйiUХйijZейjккккккеjккZЦYZZйeйjZVйeeЦйijZЦйjккк",ё<LO$(5)│"кккеjккZЦYjZйeйjZZйeеЦйijZЦйjккккккеjккZVYjZйeйjZZйeеХUijZХUjккккккеZкйZZYjZйeйjZZйeеХUйjZХUкккккккеZкйjZYjZйeйjZZеeйUVеiZХVкккккккйVкйjYYjЦеХеiZZекйVкейjЦккккккккйVкйjYijЦеЦейjZекеVкейjЦккккк"-┐>LO$(6)│"кккйUкйjYijЦеЦейjZекеVкейjЦкккккккккUUUjYiZЦеЦейjЦХкХХкейjХкккккккккUUUjUjUUUЦейUUUUUеUUYUeUjкккккккХUUjUjUUVЦейUUUUVеUUYUiUjкккккккеUUjХjХUZЦекUеYUjкUUYUjUjккккккккккккккккккккккккккккккккккк".ALO$(7)│"╜│э
О Ж 4жа4 4Ж4╞жДзд
Г р
Г рZ&ыГ Є
5J&█5жА5 5J&╞9"./FVP│0:AD│0:VP│ Э(LO$(0)).LKAD│ Ж(VPл2)н256л Ж(VPл3).^PVP│ Э(LO$(7)).АUQ│ Ж(VPл2)н256л Ж(VPл3):╣ Г│Q.УXТQл7, Ж(25)м25.┴Z╞"S4A0C3BM0,191R255U149L255D148R255BM0,0".╬_Q│ Г(AD).ыdВ USER ROUTINE (100-999).№ВN1│ Д(252)л1/
МN3│ Д(252)л1/ЦN2│ Д(146)л43/1аN4│ Д(146)л43/=кC│ Д(5)/M┤D1│ Д(11)м5/]╛D2│ Д(11)м5/m╚D3│ Д(11)м5/}╥D4│ Д(11)м5/Х▄А X│1 е  Д(300)л200/вцM1│N1лD1/╛ЁЕ M1▓1 з Е M1┤254 з 260/╧·D1│мD1:M1│N1/┘
N1│M1/ц
M2│N2лD20
Е M2▓43 з Е M2┤190 з 3000
"D2│мD2:M2│N20
,N2│M20+
6M3│N3лD30G
@Е M3▓1 з Е M3┤254 з 3400X
JD3│мD3:M3│N30b
TN3│M30o
^M4│N4лD40М
hЕ M4▓43 з Е M4┤190 з 3800Э
rD4│мD4:M4│N40з
|N4│M40┐
Ж╗ (N1,N2)м(N3,N4),╜0╓
РN│Nл1:Е N▓75 з N│10ъ
ЪЕ N1(N)│0 з 4301
д╗ (N1(N),N2(N))м(N3(N),N4(N)),╛16
оN1(N)│N1:N2(N)│N2:N3(N)│N3:N4(N)│N41>
╕Л X1U╢АJ│1е1000:Л:Бж10001p▐Бе40:В START A NEW ONE1ашВ OUR DISCLAIMER - HAS TO BE IN ALL COVERS.1жЄЮ1╞№З@38,"CHROMASETTE MAGAZINE"1юЗ"ISSUE #7           JANUARY 1982";2З"          HAPPY NEW YEAR"26З:З" ALL PROGRAMS CONTAINED HEREIN"2WЗ"      COPYRIGHT (C) CLOAD"2z$З"    MAGAZINE  P.O. BOX 1448"2Ю.З"    SANTA BARBARA, CA 93102."2┬8З"   REPRODUCTION BY ANY MEANS"2чBЗ"   PROHIBITED. CLOAD MAGAZINE"3
LЗ" ASSUMES NO RESPONSIBILITY FOR"33VЗ"  ERRORS, OMISSIONS OR DAMAGES"3X`З"   CAUSED BY THE USE OF THESE"3mjЗд11)"PROGRAMS."3~~АI│1е5000:ЛI3ДИРNTA BARBARA, CA 93102."2┬8З"   REPRODUCTION BY ANY MEANS"2чBЗ"   PROHIBITED. CLOAD MAGAZINE"3
LЗ" ASSUMES NO RESPO                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                      ╞ ╞├!┼#┬%&'╟                            LINESCOVBAS ИBLOCK   BAS",TYPING  BASdMANSION BAS$оPOWER   BASДWORLD3D BAS$                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 
)&%
:Г     ***** BLOCK BUSTER *****&9:ГC. J. ROSLUND&h:Г150 HOCHBERG RD.  PITTSBURGH    PA 15235&З:ГCOPYRIGHT (C) CLOAD 1981&УБе10000&░Х200:М N$(5),SC(5),DI(5)&║#Бж500&у(EOB│ Ж(27)н256л Ж(28):╣ Г0│EOBм&H2B0&¤2Ю:Зд10)"BLOCK BUSTER"'<З б(32,&H83):З'.FЙ"YOUR NAME PLEASE";NA$:З'PPЙ"LEVEL (1=EASY  15=HARD)";D$'aZD│ Б( Й(D$))'wdЕ D┤1 ▒ D▓15 з 80'ВiD│15мD'Уn┐1,0:╝3:┴1,3'нxA$│"C4R255D2C2L255D2"'▌В╞"BM0,32XA$;XA$;C3D12XA$;XA$;C3D12XA$;C3D2"'ёМS│ Г0(D):S│10нS'№СD│15мD(ЦАI│1е5("аЕ S▓SC(I) з 170 :Д Л I(2кЕ I│6 з 210(E┤А J│5е Iл1 йм1(s╛N$(J)│N$(Jм1):SC(J)│SC(Jм1):DI(J)│DI(Jм1)(Ф╚ЛJ:N$(I)│NA$:SC(I)│S:DI(I)│D(┐╥Ю:З"NAME          SCORE       LEVEL":З(╩▄АI│1е5)цЗN$(I);д15);:З═"####";SC(I);:Зд28);:З═"##";DI(I):Л I)ыЗ:Зд7)"YOUR SCORE:";S)BЁЗ:З"SAME GAME AND PLAYER (Y/N)?")b·З"   C - CLEARS SCOREBOARD")Г
C$│ Т:Е C$│"Y"з D│15мD:Бе110)Ф
Е C$│"N"з 50)ж
Е C$│"C"з 300)░
"Бе260)╗
,АI│1е5)▄
6N$(I)│"":SC(I)│0:DI(I)│0:Л I)ц
@Бе210*
ЇЮ:Зд10)"BLOCK BUSTER"*)
■З:З"DO YOU NEED INSTRUCTIONS (Y/N)?"*>C$│ Т:ЕC$│"N"з Р*OЕC$┤▓"Y"з520*UЮ*y&З"THIS GAME IS PLAYED WITH THE"*а0З"RIGHT JOYSTICK AND PUSH BUTTON."*╟:З"THE JOYSTICK CONTROLS THE LEFT/"*ьDЗ"RIGHT POSITION OF A PADDLE ON"+NЗ"THE SCREEN. THE OBJECT OF THE"+5XЗ"GAME IS TO BOUNCE A BALL OFF"+\bЗ"YOUR PADDLE AND DESTROY AS MUCH"+БlЗ"OF THE BLOCKADE AT THE TOP OF"+дvЗ"THE SCREEN AS POSSIBLE. THE"+╩АЗ"BALL REBOUNDS OFF THE BLOCKADE"+ъКЗ"AFTER DESTROYING 1 BLOCK.,ФЗ"YOUR SCORE IS BASED ON THE",/ЮЗ"NUMBER OF BLOCKS DESTROYED.",TиЗ:Й"     <ENTER> TO CONTINUE";C$,Z▓Ю,╝З"THE BUTTON IS USED TO SERVE A",д╞З"BALL. YOU ARE ALLOWED 5 BALLS",╦╨З"PER GAME. YOU MAY APPLY ENGLISH",Є┌З"TO A BALL BY MOVING YOUR PADDLE"-фЗ"WHEN THE BALL STRIKES IT."-+юЗ:Зд11)"GOOD LUCK!"-Q°З:Й"    <ENTER> TO START GAME";C$-WР-h'╚1,1:└2:Бе30EOН) NА%
*ВкккВки*а
а
и* [ o [ккнЯа
жМш'jМуЖ
бМ▐&1╢
ZбМ╫')- жМ╤&жМ┌Б'lМ╙ cМ└ жМ╔'jМ─ жМ▒'ё ▐╠ккОАэБМ└-∙╢
ZDБ-ЖЙОА:ЖОпИ пБJ&Ў9жН ~'
╠ уН zэН v ╠ руН mэН iжН j'jН d 6жН _зН ZжН I'жН J'╠
уН BэН > жН 7&╠  уН /эН +cН &жН '
оН ьИ`эН  оЭ пН ОккоН■¤ЖпД0И J&ў_жН■є'╞0Н■╥ЖоН■хюЕ0яд1и J&ЇоН■╒пН■╩9ьН■┼─&Ж зН■║жН■├бН■└&
┴&oН■ежН■обН■л&ў9ьН■ФГ@,	Ж зН■Ку9ьН■ЙБU'Б '
┴U'┴ ' оН■n0
пН■hcН■b╗9ьН■aБ'┴'
9ЖзН■FcН■G╢
ZзН■<Щ9оН■6М@,
9jН■/&
9ОккоН■!ЖпД0И J&ўОтцН■:пН■
пН■
ЖзН■
oН■oН¤ўoН¤Ў¤ ╢ Д
&Ў9╜│эчН¤эЖзН¤▀O_эН¤┌Н╛жН¤╙&ьН¤╬~┤ЇжН¤╬'╞ Z&¤J&°¤─■3■ч  & K j ╬╢ 
Дў╖ 
╢ Дў╖ ╢ #К╖ #Ж№НА&·НЛ&·9╖  ╞Z&¤9■hcН■b╗9ьН■aБ'┴'
9ЖзН■FcН■G╢
ZзН■<Щ9оН■6М@,
9jН■/&
9ОккоН■!ЖпД0И J&ўОтцН■:пН■
пН■
ЖзН■
oН■oН¤ўoН¤Ў¤ ╢ Д
&Ў9╜│эчН¤эЖзН¤▀O_эН¤┌Н╛жН¤╙&ьН¤╬~┤ЇжН¤╬'╞ Z&¤J&°¤─■3■ч  & K j ╬╢ 
Дў╖ 
╢ Дў╖                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  !л&
Бе5000&+:ГCOPYRIGHT (C) CLOAD 1982&=2:Г JOHN OLSON&U<:Г HOXIE, KS  67740&gF:Г FALL, 1981&АP:Г MANSION ADVENTURE&Зd:Г&▒xХ250:МL$(25),A(4,25),M$(3,36),B(3,36)&╔ВЮ:Бж1770:Бж1130:B│1'-МЮ:B(1,5)│1л Д(23):B(1,6)│2л Д(22):B(1,7)│2л Д(22):З"LOCATION: ";L$(B):C│0:З"YOU SEE: ";:АA│1е36'[ЦЕ B(1,A)│B ░ B(3,A)┤▓0 з Зд10)M$(2,A):C│1'БаЛA:Е C│0 з З"NOTHING OF INTEREST"'╡кC│0:З"DIRECTIONS: ";:Е A(1,B)┤▓0 з З"NOR ";:C│1'╘┤Е A(2,B)┤▓0 з З"SOU ";:C│1'є╛Е A(3,B)┤▓0 з З"EAS ";:C│1(╚Е A(4,B)┤▓0 з З"WES";:C│1('╥Е C│0 з З"? ? ?";(9▄З:З б(30,"-")(VцЙ"WHAT NOW . .";M$:З" ";(ЛЁЕ M$│"N" з M$│"GO NOR" :Д Е M$│"S" з M$│"GO SOU"(└·Е M$│"E" з M$│"GO EAS" :Д Е M$│"W" з M$│"GO WES"(с
Е M$│"LOO" ▒ M$│"LOOK" з 140)
Е  З(M$)┤3 з З"?? WHAT ??":Бе230)L
N$│ О(M$,3):А A │ ( З(M$)м2)е 1 й м1:Е  Р(M$,A,1)│" " з 290 :Д ЛA)З
"O$│ Р(M$,Aл1,3): Е N$│"INV" з 370 :Д Е N$│"SCO" з 1090)╗
,Е N$│"HEL" з 410 :Д Е N$│"GO " ▒ N$│"WAL" з 470)·
6Е N$│"LOO" ▒ N$│"EXA" з 530 :Д Е N$│"GET" ▒ N$│"TAK" з 590*9
@Е N$│"DRO" ▒ N$│"LEA" ▒ N$│"PUT" з 740 :Д Е N$│"PRY" з 800*b
JЕ N$│"INS" з 780 :Д Е N$│"KIC" з 820*м
TЕ N$│"PUS" ▒ N$│"PUL" ▒ N$│"MOV" з 850 :Д Е N$│"OPE" ▒ N$│"UNL" з 940*ь
^Е N$│"KIL" з 1050 :Д Е N$│"BRE" з 1060 :Д Е N$│"REA" з 1080+
hЗ"I DON'T UNDERSTAND THE VERB !":Бе230+*
rC│0:А A│1 е 36+L
|Е B(1,A)│25 з Зд2)M$(2,A):C│1+q
ЖЛA:Е C│0 з З"YOU HAVE NOTHING !"+|
РБе 230+╚
ЪЕ B│1 з З"INVENTORY AT START / SCORE AT":З" THE END OF THE GAME":Бе 230,
дЕ B│7 ▒ B│13 ▒ B│18 ▒ B│23 ▒ B│24 з З"EXAMINE THINGS . .":Бе230,?
оЕ B│4 з З"YOU DESERVE A 'BREAK' TODAY !":Бе230,i
╕Е B│2 ▒ B│11 з З"MOVE THINGS !":Бе230,Й
┬Е B│5 з З"?? EKAT ??":Бе230,п
╠З"I'M AS CONFUSED AS YOU !":Бе230,█
╓Е O$│"DOO" ░ B│1 ░ B(1,2)│1 з B│3:Бе140-
рЕ O$│"NOR" ░ A(1,B)┤▓0 з B│A(1,B):Бе140-3
ъЕ O$│"SOU" ░ A(2,B)┤▓0 з B│A(2,B):Бе140-_
ЇЕ O$│"EAS" ░ A(3,B)┤▓0 з B│A(3,B):Бе140-Л
■Е O$│"WES" ░ A(4,B)┤▓0 з B│A(4,B):Бе140-пЗ"YOU'RE UNABLE TO . . .":Бе230-╙А A│1е36:ЕO$│M$(1,A)з 550 :Д ЛA-■З"I DON'T UNDERSTAND THE NOUN !":Бе230.:&Е B(1,A)┤▓B ░ B(1,A)┤▓25 з З"IT ISN'T AROUND . .":Бе230.g0Е B(3,A)│0 з З"YOU CAN'T . . YET!":Бе230.б:Е M$(3,A)│"Z" з З"YOU SEE NOTHING OF INTEREST!":Бе230.┤DЗM$(3,A):Бе230.┌NА A│1е36:Е O$│M$(1,A) з 610 :Д ЛA.фXБе540/bЕ B(1,A)│25 з З"YOU ALREADY HAVE IT !":Бе230/IlЕ B(1,A)┤▓B з З"THAT ITEM ISN'T AROUND !":Бе230/zvЕ B(2,A)│0 з З"YOU'RE UNABLE TO . . .":Бе230/ЯАC│0:А D│1е36:Е B(1,D)│25 з C│Cл1/╥КЛD:Е C▓4 з З"YOU CAN'T CARRY ANY MORE !":Бе230/ьФЕ A│21 з M$(3,31)│"Z"0ЮЕ A│25 з M$(3,24)│"Z"0 иЕ A│23 з M$(3,22)│"Z"0H▓Е A│15 з M$(2,35)│"**THE DIAMOND**"0─╝Е A│35 ░  О(M$(2,35),2)│"**" з Ю:З"A TRAP DOOR OPENS . . .":З"YOU FIND YOURSELF FALLING . . .":З"FALLING . . .":Бе 10100°╞З"O.K.  . . YOU'VE GOT IT !":B(1,A)│25:B(3,A)│11<╨Е A│16 ░ B(3,17)│0 з B(3,17)│1:З"A TOKEN WAS UNDER THE RUG . ."1G┌Бе 2301mфА A│1е36:Е O$│M$(1,A) з 760 :Д ЛA1xюБе 5401п°Е B(1,A)┤▓25 з З"YOU DON'T HAVE THAT ITEM !":Бе2301фЗ"O.K.  . .  YOU'VE DROPPED IT !":B(1,A)│B:Бе2302=Е B│24 ░ O$│"KEY" ░ B(1,15)│25 з З"O.K.":B(1,15)│24:M$(2,35)│">>THE DIAMOND<<":Бе2302gЗ"SORRY, THAT'S NOT POSSIBLE !":Бе2302╟ Е O$│"DOO" ░ B│1 ░ B(1,1)│1 з B(1,1)│0:M$(1,1)│"!":B(1,2)│1:З"THE DOOR POPS OPEN . .":Бе2302є*З"THAT'S NOT POSSIBLE . . SORRY!":Бе2303)4ЕB┤▓12 ▒ O$┤▓"DES" з З"NOTHING HAPPENS . .":Бе2303Й>З"  ALL OF A SUDDEN . .":З"  YOU FIND YOURSELF FALLING . .":З"  THRU A SECRET ENTRANCE . ."3жHА A│1е1500:ЛA:B│14:Бе1404RЕ B┤▓11 з 870 :Д Е O$│"FOU" ░ B(1,31)│0 з З"A SMALL COMPARTMENT OPENS ! !":B(1,31)│11:B(1,21)│11:Бе23040\З"NOTHING HAPPENS !":Бе2304wfЕ B│2 ░ O$│"CAB" ░ B(1,12)│0 з З"YOU SEE A SAFE !":B(1,12)│2:Бе2304╖pЕ B│18 ░ O$│"LEV" з Ю:З"THERE IS AN EXPLOSION . . .":Бе10104√zЕ B│23 ░ O$│"BUT" з Ю:З"THE PASSAGE BEGINS TO FLOOD . .":Бе10105"ДА A│1е36:Е O$│M$(1,A) з 920 :Д Л A5-ОБе 5405lШЕ B(1,A)┤▓B ░ B(1,A)┤▓25 з З"THAT ITEM ISN'T AROUND":Бе2305ХвЗ"O.K. . . NOTHING HAPPENS !":Бе 2305└мЕ B┤▓2 ▒ O$┤▓"SAF" ▒ B(1,12)┤▓2 з 10406	╢З" TO  OPEN  THE SAFE  YOU  MUST":З" USE AND ENTER A  THREE  NUMBER"6S└З" COMBINATION.   ENTER  IT  WITH":З" SLASHES BETWEEN THE  THREE #'S"6Э╩З" YOU WISH TO USE.  FOR EXAMPLE:":З" 27/14/82  . . . . IF YOU THINK"6─╘З" THE COMBINATION IS 27, 14, 82."6°▐Й" YOUR ATTEMPT . .";M$: Е M$│"13/82/30" з 10207@шЮ:З"THERE IS AN EXPLOSION . .":З:З"THAT WAS THE WRONG COMBINATION!"7ВЄЗ:З"Y O U   A R E   D E A D !":З:Й"HIT ENTER TO RESTART";M$:О7┼№З" THE SAFE POPS OPEN . . .":З" TWO ITEMS FALL TO THE FLOOR !"8B(1,12)│0:B(1,13)│2:B(1,14)│2:B(1,15)│2:M$(1,12)│"q":Бе2308/З"SORRY, THAT'S NOT POSSIBLE !":Бе 2308OЗ"THOU SHALT NOT . .":Бе2308╥$Е (B(1,30)│25 ▒ B(1,30)│B) ░ O$│"STA" з З"IT BREAKS INTO 5,378 PIECES -":З" REVEALING A MEDALLION !":B(1,30)│0:B(1,10)│B:Бе2308№.З"SORRY, THAT'S NOT POSSIBLE !":Бе2309=8З"TELL ME TO 'LOOK' OBJECT . .":З"THEN YOU READ . . .":Бе2309aBЕ B(1,35)│25 ▒ B(1,35)│1 з 11109НLЗ"AT THE MOMENT: SCORE OF ZERO !":Бе2309┬VЕ B┤▓1 з З"YOU MUST BE OUTSIDE TO SCORE !":Бе230:`Ю:З" C O N G R A T U L A T I O N S !":З:З" YOU HAVE WON !":З:К:7jАA│1е25:НL$(A),A(1,A),A(2,A),A(3,A),A(4,A):ЛA:ZtЖ"OUTSIDE THE MANSION",0,0,0,0:s~Ж"A LIBRARY",0,0,3,0:УИЖ"AN ENTRANCE HALL",6,1,4,2:▒ТЖ"A SITTING ROOM",7,0,0,3:╨ЬЖ"A SMALL BEDROOM",0,0,6,0:ъжЖ"A CORRIDOR",9,3,0,5;░Ж"A DINING ROOM",10,4,0,0;(║Ж"A LARGE BEDROOM",11,0,9,0;D─Ж"A CORRIDOR",12,6,10,8;^╬Ж"A KITCHEN",13,7,0,9;v╪Ж"A CLOSET",0,8,0,0;ЛтЖ"A DEN",0,9,0,0;дьЖ"A PANTRY",0,10,0,0;╞ЎЖ"A SECRET PASSAGE",15,12,0,0;тЖ"A PASSAGE",0,14,20,16<
Ж"IN A PASSAGE",17,0,15,0<Ж"A PASSAGE",18,16,19,0<9Ж"A SMALL ROOM",0,17,0,0<Z(Ж"A PASSAGE TURN",0,20,21,17<2Ж"A MAZE-LIKE PASSAGE",19,0,0,15<ж<Ж"A TURN IN THE PASSAGE",0,22,0,19<╩FЖ"LOST IN A PASSAGE",21,23,0,20<яPЖ"A CONFUSING PASSAGE",22,24,0,0=ZЖ"A TREASURE ROOM",23,0,0,0="dЖ"YOU",0,0,0,0=_nАA│1е36:НM$(1,A),M$(2,A),M$(3,A),B(1,A),B(2,A),B(3,A):ЛA=ФxЖ"DOO","A LOCKED DOOR","IT APPEARS SOLID!",1,0,1=╕ВЖ"DOO","AN OPEN DOOR","Z",0,0,1=юМЖ"BAR","A METAL BAR","WRITING: 4.U.2. PRY",25,1,1>4ЦЖ"PAP","A SHEET OF PAPER","WRITING: SAFE COMBO/ATOMIC #'S",25,1,1>fаЖ"MOU","A MOUSE","IT IS WATCHING YOU !",3,0,1>бкЖ"SPI","A LARGE SPIDER","IT APPEARS DANGEROUS!",10,0,1>╞┤Ж"COB","COBWEBS . . .","Z",7,0,1?╛Ж"TRE","A COAT TREE","WRITING: I WAS ONCE AN OAK!",3,1,1?(╚Ж"SOF","A SHABBY SOFA","Z",4,0,1?c╥Ж"MED","A LEAD MEDALLION","WRITING:  LEAD A# 82",0,1,1?Ъ▄Ж"CAB","A DINGY CABINET","IT IS EMPTY . . .",2,0,1?╒цЖ"SAF","A LOCKED SAFE","WRITING: VERYSTRONG CO.",0,0,1?∙ЁЖ"SAF","AN OPEN SAFE","Z",0,0,1@-·Ж"NOT","A NOTEBOOK","WRITING:  KSED KCIK",0,1,1@^Ж"KEY","A SMALL KEY","WRITING: INSERT",0,1,1@ДЖ"RUG","A TATTERED RUG","Z",5,1,1@╗Ж"TOK","A ZINC TOKEN","WRITING:  ZINC A# 30",5,1,0@ї"Ж"TAB","AN OLD TABLE","CARVED ON IT: OTKK ENTQ",7,0,1A-,Ж"DRE","A RUN-DOWN DRESSER","IT IS EMPTY . .",8,0,1AY6Ж"HOO","WALL HOOKS (1 TO 4)","Z",11,0,1AЧ@Ж"COI","AN ALUMINUM COIN","WRITING: ALUMINUM A# 13",0,1,0A╧JЖ"COU","A COUNTER","YOU SEE A KNIFE ON IT !",10,0,1BTЖ"KNI","A KNIFE","WRITING: TV WONDERBLADE",10,1,0BC^Ж"SHE","A SET OF SHELVES","YOU SEE A FLASHLIGHT !",13,0,1BhЖ"FLA","A FLASHLIGHT","IMPRINTED: NEVEREADY CO.",13,1,0B─rЖ"BUC","AN EMPTY BUCKET","WRITING: EL-CHEAPO PLASTIC CO.",13,1,1B¤|Ж"WAT","A WATCH","WRITING: TIME FOR COFFEE !",15,1,1C!ЖЖ"FIL","A NAIL FILE","Z",20,1,1CXРЖ"DES","A DESK","IT IS IN POOR CONDITION !",12,0,1CХЪЖ"STA","A CHEAP STATUE","IMPRINTED: MADE IN JAPAN",4,1,1C╪дЖ"COM","A SMALL COMPARTMENT","YOU SEE: AN ALUMINUM COIN",0,0,1DоЖ"LEV","A BLACK LEVER","WRITING: EP OPU QVMM",18,0,1DE╕Ж"BUT","A RED BUTTON","WRITING: EFBUI !",23,0,1DЕ┬Ж"SLO","A KEY SIZE SLOT","WRITING: HMRDQS JDX EHQRS",24,0,1D├╠Ж"DIA","**A DIAMOND**","IT IS FLAWLESS . . HUGE !",24,1,1Dў╓Ж"SIG","A SIGN","ADVENTURES ARE FUN ! ?",14,0,1E!рЙ" HIT ENTER TO START . . READY";M$:РE<ъЗ@40,"M A N S I O N":ЗEЖЇЗ" SOME SAY  IT'S HAUNTED . . . .":З" OTHERS SAY IT'S CURSED . . . ."E╨■З" WHATEVER THE TRUTH . . . . . .":З" NO ONE  HAS EVER RECOVERED THE"EїЗ" FABLED MANSION DIAMOND ! !":ЗFXЗ" YOUR TASK IS TO ENTER THE MAN-":З" SION,  FIND THE  DIAMOND,  AND":З" THEN GET OUT SAFELY."FБЗ:Й" HIT ENTER . . . TO CONTINUE";O$F╠&Ю:З:З" MAKE YOUR QUEST  USING  ONE OR":З" TWO WORD COMMANDS, SUCH AS:"G0З:З" LOOK,  GO NORTH,  TAKE STATUE,":З" BREAK STATUE, HELP, INVENTORY,"G5:З" LOOK CABINET, ETC.":ЗGtDЗ" IF ONE COMMAND  DOESN'T  WORK,":З" THEN TRY ANOTHER.":ЗGЪNЗ"     G O O D   L U C K ! !":З:РGкИ╚0:└1:Бе100З" TWO WORD COMMANDS, SUCH AS:"G0З:З" LOOK,  GO NORTH,  TAKE STATUE,":З" BREAK