square  0:0:0: Pf=10 12 :5;f,0;" ":f  "":"" MANDRA H ?>???>???>>>????>>?>???????>??=4SQUARE ~[Z[0:0:7: !23658j\,9 :9000(# 9200# >PUNT=0:REC=1000:O$="O":P$="P":Q$="Q":A$="A" TOP=10 :MAX=20:AMA=0:TOTAL=10 :FASE=4000:CONT=600X:SC=4:J$="":X=18:Y=2 6:7;1;1,9 ;"MANIAC SQUARE" >#1;7;1;" (C) MADRAGORA SOFTWARE 1987 " 23;10 ,10 ;O$;7;" IZQUIERDA";3;12 ,10 ;P$;7;" DERECHA";3;14,10 ;Q$;7;" ARRIBA";3;16,10 ;A$;7;" ABAJO" 76;4,7;"RECORD....0000000";4,24-(REC);6;REC;6,7;"LAST......0000000";6,24-(PUNT);6;PUNT 524120x LEV= 3;7,18; .001wn,40( Y=1502:Y ':PUNT=0:X=19:Y=2 <1;10 ,3;"BIENBENIDO AL MUNDO DE SQUARE" JF=12:221:A=115:AS:.09}8Q,AS:A:F ݈12 ,16,12 ,16,14,17,14,17,16,19,16,19,17,14,17 6e4` FASE X=19:Y=2 87;0;1;X,Y;"";X-1,Y;"" ?23672x\,0:23673y\,0:23674z\,0 ,jA=(65536*23674z\+254*23673y\+23672x\)/502:0,30-((A));A -=P$1100L 1=O$1200 6=Q$1300 @=A$1400x BAMAX1800 !AMA=TOP8000@:4000  300, L(X,Y+2)=1 Q$(X,Y+2)=22000 V$(X,Y+2)=63000 ^Y>27 `t4;0;X,Y;"";X-1,Y;"":Y=Y+2:7;0;1;X,Y;"";X-1,Y;"" .01z# =,20: (X,Y-1)=1 $(X,Y-1)=22000 $(X,Y-1)=63000  Y<4 t4;0;X,Y;"";X-1,Y;"":Y=Y-2:7;0;1;X,Y;"";X-1,Y;""  .01z# =,20: (X-2,Y)=1 $(X-2,Y)=22000 $(X-2,Y)=63000 & X<4 (t4;0;X,Y;"";X-1,Y;"":X=X-2:7;0;1;X,Y;"";X-1,Y;"" n.01z# =,20: x(X+2,Y)=1 }$(X+2,Y)=22000 $(X+2,Y)=63000 X>18 t4;0;X,Y;"";X-1,Y;"":X=X+2:7;0;1;X,Y;"";X-1,Y;"" .01z# =,20: SC=SC-1:0;0,14;" ":F=1SC:7;1;0,13 +F;J$:F::0,30-((A));2;A =.1}L,0:.1}L,-10 :F=1502:F 97;0,27;"OUT":F=1502:F &UF=70-1:F;0,23;"TIMEOUT":.01z# =,30-F:F 0SC=021004 :IFASE=FASE-100d:X,Y;"";X-1,Y;"":4000:240 TF=3031.2~L:.0007v74m,F:.006yD,10 :F:SC=SC-1 L0,14;" ":F=1SC:7;0,13 +F;J$:F SC=02500  300, ģF=1100d:0;7;1;8,10 ;" ";9 ,10 ;1;" GAME OVER ";10 ,10 ;" ":F: (PUNT>REC9800H&:F=17:A=17:A;10 ,7;" NUEVO RECORD";12 ,13 ;PUNT:.009ztj,20+F:.0007v74m,40(:A:F:REC=PUNT Z6E4`:18 qAMA=AMA+1:PUNT=PUNT+100d:21,15-PUNT;PUNT:.005y# =,35#:.05|L,40(: %CONT=0:2000:300, 2F=1SC:7;0,13 +F;J$:F F=2182:4;0;F,2;"";F+1,2;"":F 4;0;2,30;"":F=319:4;0;F,30;"":F:4;0;20,2;"" (FASE=FASE+100d:FASE:AMA=0 .FASE>6100FASE=4000:4000 0,2;"MAX ";MAX:21,2;"PUNTOS ";21,15-PUNT;PUNT;21,17;"RECORD ";21,30-REC;REC;0,23;"TIME 00" OX=19:Y=2:7;0;1;X,Y;"";X-1,Y;"" IF=12:4022:A=112 :D:.09}8Q,D:A:F m12 ,16,19,12 ,16,19,14,17,21,14,17,21 ?23672x\,0:23673y\,0:23674z\,0  GMAX=20+LEV:TOP=10 :TIN=6:RTE=1:ROT=2 W4130":F=110 :A,B:TIN;0;A,B;"";A+1,B;"":F "2,2,8,2,18,6,2,14,6,12 ,10 ,12 ,18,14,2,28,8,28,18,24 ,W41451:F=110 :A,B:RTE;0;A,B;"";A+1,B;"":F 14,4,12 ,6,10 ,10 ,16,14,8,14,10 ,18,6,18,16,28,4,22,2,26 6S4155;:F=119:A,B:ROT;0;A,B;"";A+1,B;"":F ;M6,2,10 ,2,16,6,18,4,6,8,2,10 ,4,14,16,12 ,16,16,18,22,16,20,16,22,16,24,14,22,10 ,24,10 ,26,10 ,28,12 ,26,8,26 T j,MAX=16+LEV:TIN=6:RTE=1 |S4230:F=110 :A,B:TIN;0;A,B;"";A+1,B;"":F 4,4,10 ,2,18,10 ,10 ,12 ,4,14,16,20,2,20,8,24,2,28,16,28 S4250:F=123:A,B:RTE;0;A,B;"";A+1,B;"":F 12 ,2,18,4,16,4,12 ,6,6,6,6,4,4,10 ,16,8,12 ,12 ,8,14,4,16,6,16,8,16,16,18,12 ,20,4,20,2,22,8,22,10 ,24,8,26,16,26,12 ,28,4,28  9MAX=12 +LEV:TIN=6:RTE=2:ROT=1 S4330:F=110 :A,B:TIN;0;A,B;"";A+1,B;"":F 2,8,2,22,8,14,8,16,10 ,10 ,10 ,20,12 ,12 ,12 ,18,18,14,18,16 S4350:F=110 :A,B:RTE;0;A,B;"";A+1,B;"":F 14,6,14,24,8,10 ,8,12 ,8,18,8,20,10 ,12 ,10 ,18,12 ,14,12 ,16 S4370:F=110 :A,B:ROT;0;A,B;"";A+1,B;"":F 4,8,4,22,6,8,6,10 ,6,20,6,22,10 ,14,10 ,16,16,14,16,16 & 2,MAX=12 +LEV:TIN=6:ROT=2 :S4420D:F=110 :A,B:ROT;0;A,B;"";A+1,B;"":F D8,8,8,12 ,8,16,8,20,8,24,12 ,6,12 ,10 ,12 ,14,12 ,18,12 ,22 NS4440X:F=110 :A,B:TIN;0;A,B;"";A+1,B;"":F X8,6,8,10 ,8,14,8,18,8,22,12 ,8,12 ,12 ,12 ,16,12 ,20,12 ,24  MAX=10 +LEV W4520:F=114:A,B:2;0;A,B;"";A+1,B;"":F 6,6,8,8,10 ,10 ,12 ,12 ,14,14,16,16,18,18,2,10 ,4,12 ,6,14,8,16,10 ,18,12 ,20,14,22 W4540:F=110 :A,B:6;0;A,B;"";A+1,B;"":F 2,6,4,8,6,10 ,8,12 ,10 ,14,12 ,16,14,18,16,20,18,22,2,28  ,MAX=20+LEV:TIN=6:RTE=2 S4230:F=110 :A,B:TIN;0;A,B;"";A+1,B;"":F S4250:F=123:A,B:RTE;0;A,B;"";A+1,B;"":F R ^9MAX=10 +LEV:TIN=1:RTE=6:ROT=2 p 4310  ,MAX=12 +LEV:TIN=6:ROT=1  4410: s1;0;10 ,10 ;"";11 ,10 ;"";10 ,20;"";11 ,20;""  $EMAX=12 +LEV:TIN=1:RTE=6:ROT=2:4110 V 8MAX=16+LEV:TIN=6:RTE=2:4210r V5020:F=19 :A,B:2;0;A,B;"";A+1,B;"":F 2,16,18,12 ,14,14,14,6,14,10 ,14,22,14,26,18,18,4,6  -ROT=1:MAX=25+LEV:TOP=69E mA=2282:F=2182:6;0;F,A;"";F+1,A;"":F:A iF=4284:J=2182:ROT;0;J,F;"";J+1,F;"":J:F  TF=8248:6;0;18,F;"";19,F;"":F RF=4288:6;0;2,F;"";3,F;"":F F P:MAX=20+LEV:TOP=10 :ROT=6:RTE=1 ZS5220d:F=110 :A,B:ROT;0;A,B;"";A+1,B;"":F d2,2,12 ,2,4,14,4,16,2,28,10 ,8,10 ,22,14,12 ,14,18,12 ,28 nS5240x:F=110 :A,B:RTE;0;A,B;"";A+1,B;"":F x2,6,2,24,10 ,4,10 ,10 ,10 ,20,10 ,26,12 ,8,12 ,22,14,10 ,14,20 W5260:F=120:A,B:2;0;A,B;"";A+1,B;"":F Z4,2,4,12 ,4,18,4,28,6,8,6,14,6,16,6,22,8,6,8,24,12 ,10 ,12 ,14,12 ,16,12 ,20,14,2,14,28,16,12 ,16,18,18,4,18,26  MAX=16+LEV W5320:F=110 :A,B:6;0;A,B;"";A+1,B;"":F ȯ6,6,6,14,6,22,10 ,6,10 ,14,10 ,22,14,6,14,14,14,22,10 ,28 W5340:F=110 :A,B:1;0;A,B;"";A+1,B;"":F ܱ10 ,2,6,10 ,10 ,10 ,14,10 ,6,18,10 ,18,14,18,6,26,10 ,26,14,26 W5360:F=112 :A,B:2;0;A,B;"";A+1,B;"":F 4,6,8,6,12 ,6,16,6,4,14,8,14,12 ,14,16,14,16,22,12 ,22,8,22,4,22  MAX=22+LEV "W5420,:F=110 :A,B:6;0;A,B;"";A+1,B;"":F ,2,2,14,2,2,12 ,2,20,2,28,18,8,10 ,28,14,24,14,28,16,16 6W5440@:F=117:A,B:2;0;A,B;"";A+1,B;"":F @*2,10 ,2,14,6,24,10 ,2,12 ,6,14,4,14,10 ,14,22,14,26,16,2,16,8,16,14,16,18,16,26,18,6,18,16,18,22 JW5460T:F=120:A,B:1;0;A,B;"";A+1,B;"":F TX8,12 ,2,18,2,24,4,18,4,6,6,6,6,8,6,10 ,6,12 ,6,18,8,22,8,24,8,26,8,28,10 ,12 ,12 ,12 ,12 ,22,12 ,24,12 ,26,12 ,28 ^ |MAX=18+LEV W5520:F=110 :A,B:6;0;A,B;"";A+1,B;"":F 2,16,2,24,2,28,8,10 ,8,18,8,24,14,6,14,12 ,14,18,18,28 W5540:F=130:A,B:2;0;A,B;"";A+1,B;"":F  2,14,2,26,4,12 ,4,18,4,24,6,10 ,6,16,6,22,8,8,8,14,8,20,8,26,10 ,6,10 ,12 ,10 ,18,10 ,24,12 ,4,12 ,10 ,12 ,16,12 ,22,14,2,14,8,14,14,14,20,16,6,16,12 ,16,18,16,28,18,4,18,16  8MAX=16+LEV:ROT=1:RTE=6:5210Z  DMAX=20+LEV NW5720X:F=110 :A,B:6;0;A,B;"";A+1,B;"":F X2,2,2,28,4,8,6,2,14,28,16,24,16,26,18,6,18,16,4,16 bV5740l:F=19 :A,B:1;0;A,B;"";A+1,B;"":F l2,14,4,2,4,14,4,26,4,28,6,14,8,2,16,14,18,14 vW5760:F=118:A,B:2;0;A,B;"";A+1,B;"":F =6,16,8,14,10 ,12 ,10 ,18,12 ,2,12 ,4,12 ,6,12 ,16,12 ,24,14,14,14,26,16,4,16,6,16,22,16,28,18,4,18,24,18,26  MAX=16+LEV W5820:F=110 :A,B:6;0;A,B;"";A+1,B;"":F 10 ,20,6,6,6,14,6,24,10 ,10 ,10 ,24,14,6,14,14,14,20,16,24 W5840:F=115:A,B:2;0;A,B;"";A+1,B;"":F 16,26,6,4,6,26,8,4,8,26,10 ,4,10 ,8,10 ,22,10 ,26,12 ,4,12 ,22,12 ,26,14,4,14,22,14,26 ڳ2;0;4,4;"";5,4;"";8,8;"";9 ,8;"" 2;0;12 ,8;"";13 ,8;"";16,4;"";17,4;""   MAX=20+LEV W5920 :F=110 :A,B:6;0;A,B;"";A+1,B;"":F  2,2,6,2,6,24,8,26,10 ,18,10 ,24,10 ,28,12 ,26,14,2,14,24 *W59404:F=117:A,B:2;0;A,B;"";A+1,B;"":F 4%2,6,2,18,4,2,4,22,6,4,6,18,8,14,10 ,12 ,10 ,16,12 ,14,14,18,16,2,16,4,16,8,16,22,18,8,18,18 >V5960H:F=19 :A,B:1;0;A,B;"";A+1,B;"":F H4,14,6,26,8,22,10 ,6,10 ,8,10 ,26,12 ,22,14,26,16,14 f p MAX=25+LEV:TOP=15 zW6020:F=115:A,B:6;0;A,B;"";A+1,B;"":F 2,2,2,28,4,8,4,16,4,24,8,8,8,16,8,24,12 ,8,12 ,16,12 ,24,16,8,16,16,16,24,18,28 W6040:F=125:A,B:2;0;A,B;"";A+1,B;"":F 4,4,4,12 ,4,20,4,28,6,8,6,16,6,24,8,4,8,12 ,8,20,8,28,10 ,8,10 ,16,10 ,24,12 ,4,12 ,12 ,12 ,20,12 ,28,14,8,14,16,14,24,16,4,16,12 ,16,20,16,28  ;ROT=2:MAX=25+LEV:TOP=69E:5110: 8 9800H& BBONUS=50000P L5;7,8;" BONUS ";2;BONUS;" ";6,8;" ";5;8,8;" POINTS ";2;PUNT;" ";9 ,8;" " Q 100d VsF=1502:BONUS=BONUS-1000:7,17;" ";7,22-(BONUS);2;BONUS `o.0004uQX,43+:PUNT=PUNT+1000:8,22-(PUNT);2;PUNT:.0004uQX,40(:F jSC=SC+1 =6;18,1;"PULSA UNA TECLA PARA CONTINUAR" iF=110 :6410 :Q=114:A:G=12:.08}# =,A:""6430  G:Q:F  12 ,16,19,23,24,21,17,14,17,21,24,23,19,16 6E4`: X @/6E4`:PUNT=PUNT+100d*(100d-A) ^ V:.1}L,18:9800H&:7;1;2,10 ;"MANIAC SQUARE" bT$="IZQUIERDA:":POS=6:8200 :0:O$=:.01z# =,20:6,19; `T$="DERECHA:":POS=8:8200 :0:P$=:.01z# =,20:8,19; aT$="ARRIBA:":POS=10 :8200 :0:Q$=:.01z# =,20:10 ,19; `T$="ABAJO:":POS=12 :8200 :0:A$=:.01z# =,20:12 ,19; 616,12 ;5;1;"OK ?":0 ="N"8100 6E4`:18 F=07 7F;POS,8;T$:.003xD,40(+F:5:F  #(.90102#:F="A""P"+7:A:F,A:F: #2Q254,254,254,254,254,254,254,254 #