MV - CPCEMU Disk-File Disk-Info (Track-Info  N Track-Info  N SOURCE BASr012DISK  PANCH_CHBINX!"#%KLMNOPQDISK BAK DISK BAKCDEPANCHO BINhISTUVWXYZ[\]^MARIO BAKh<=>?@ABFGH_`aHIBASIC $HIBASIC BINn&'()*+,-./89:JPANCHO SCR7 MARIO_19BAKrfghpqrstuvwxyz{LOADER BAKWXYLOADER no|PANCHO FNTRMARIO_19BAKy{|}~XMASTER 5MARIO_19BAKMARIO_17BAKLOADER BAKMARIO_11BAKNMARIO_09BAKLFMASTER5BAS/XMASTER0BAS/XMASTER2BAS1XMASTER3BAS4XMASTER4BAS4XMASTER5BAS4PLUS3DOS8d8d82####################### <353331S:7:1:0:0: F"mario.scr" P"mario1.fnt"53332T Z"ch_mario.bin" d-236066\,84T:236077\,207 x####################### : LEN a$425,b$425,c$14,d$2,e$2,f$2,g$5,h$5,i$5,j$2,k$2,l$2,m$2,n$2,o$2,p$2,q$13,r$2,s$2,t$2,u$2,y$425,z$425 A: INT+ x,y,sal,nu,fr,fr1,cont,cont2,cont3,m1,m2,m3,m4,m5,t,co,C : OPEN # pk=54100T `0;0;0;20,4;" ";21,4;" " "'#1)" 5;1;3,7;"MINI PANCHO BROS.";4,7;"=================";9 ,6;"O -LEFT P -RIGHT";10 ,6;"SPACE -JUMP";15,8;"PRESS 1 TO INFO";16,8;"PRESS 0 TO START" d$=:d$=""200 d$="1"240 d$="0"290" PLUS3DOS@@W@~~@\:ZZ?@@@@@@`_3]???????????????@?@? 0?p}?_kW@??+@?/`X`U ?P?WW_`T~~U* U@?????????????????<}@?<`@Track-Info  N ?pTWU*?ீT*?^z? <__~3of@ |_(>h,{< `ڶ[<L @P2bx?@`5of@@ @q?? ?l7[[6?<6[z@?l X@^o3gl@@@Vj??Me[<!pC<>x?cR@p?n式[Jo5[c `?[???+LD[?< C<?~p@C?Dnuΰ\ @@?o[h@`?@z^x?-( FV[<, [4|< !< B~@W<O a5gff@@@`@  O6ٙ`3@AWa`y_:Dk\9*1?`??_l9@?}_?:$Wmk\?ֵo?M@u{WVϻ???????????????c`Wnٛ/_*<Tlk<׵745-ū(y,14)>45-)((y,13 )=7ū(y,14)=7)sal=1:nu=0 b&g$=(i$sal=1)+(g$sal=0) lt=0870f v=y>19(x=137x=205x=381})940 y>19910 P20,4;"TIME:";t;(" "t<100d);21,4;"GOLD:";co;" " cont<11 m1=0c$=("$8............"cont=0)+(".$9..........."cont=1)+("..$8.........."cont=2)+("...$9........."cont=3)+("....$8........"cont=4)+(".....$9......."cont=5)+("......$8......"cont=6)+(".......$9....."cont=7)+("........$8...."cont=8)+(".........$9..."cont=9 )+("..........$8.."cont=10 ) cont>10 m1=0c$=("..........$0.."cont=11 )+(".........$A..."cont=12 )+("........$0...."cont=13 )+(".......$A....."cont=14)+("......$0......"cont=15)+(".....$A......."cont=16)+("....$0........"cont=17)+("...$A........."cont=18)+("..$0.........."cont=19)+(".$A..........."cont=20)+("$0............"cont=21) ycont2=cont2+1:m2=0j$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm3=0k$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm4=0l$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm5=0r$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) cont2=4cont2=0 8d$="$H":e$="$H":m$="$S":q$="$P...........":t$="$b" cont3<9 t$=("$c"(cont3=0cont3=1cont3=2cont3=3cont3=4cont3=5cont3=6cont3=7cont3=8)) =cont3<16d$=("$H"(cont3=0cont3=1cont3=2cont3=3cont3=4))+("$C"cont3=5)+("$D"cont3=6)+("$E"cont3=7)+("$F"cont3=8)+("$E"cont3=9 )+("$D"cont3=10 )+("$C"cont3=11 )+("$H"(cont3=12 cont3=13 cont3=14cont3=15)) Pcont3<16e$=("$H"cont3=0)+("$C"cont3=1)+("$D"cont3=2)+("$E"Track-Info  N cont3=3)+("$F"cont3=4)+("$G"cont3=5)+("$H"(cont3=6cont3=7cont3=8cont3=9 cont3=10 ))+("$G"cont3=11 )+("$F"cont3=12 )+("$E"cont3=13 )+("$D"cont3=14)+("$C"cont3=15) ;cont3<17q$=(".$P.........."cont3=0)+("..$P........."cont3=1)+("...$P........"cont3=2)+("....$P......."cont3=3)+(".....$P......"cont3=4)+("......$P....."cont3=5)+(".......$P...."cont3=6)+("........$P..."cont3=7)+(".........$P.."cont3=8)+("........$P..."cont3=9 )+(".......$P...."cont3=10 )+("......$P....."cont3=11 )+(".....$P......"cont3=12 )+("....$P......."cont3=13 )+("...$P........"cont3=14)+("..$P........."cont3=15)+(".$P.........."cont3=16)  m$=d$:o$=d$ Ncont=cont+fr1:cont3=cont3+1:t=t-1:cont=22cont=0  cont3=22cont3=0 *sal=0300, 4L(y-3,13 )=45-ƫ(y-3,14)=45-y=y-1 >L(y-3,13 )>45-ū(y-3,14)>45-sal=0 H(nu=1+nu:nu=6sal=0 R 300, \####################### fF"')":10 ,5;"TIME OUT":C=05000:C:0 p 0 z3Estos bucles for/next ea cambio de Pause, ajustar ----------------------- N5;0;y-3,13 ;"$%";2;y-2,13 ;"&'" M10 ,10 ;"GAME OVER":C=05000:C:0:160 ----------------------- 2,4;1;5;"##";0;" ";1;"####################";3,4;"##";0;" ";1;"####################" C=417:0;1;5;C,4;"##";0;7;" ";1;5;"##":C m18,4;1;5;"########################";19,4;"########################" |4;0;16,25;" ";15,25;"";1;17,25;" ";18,25;"" x=205995 x=381}998 Ͼ18,4;1;5;1;16,16;"##";17,16;"##";16,12 ;"##";17,12 ;"##";14,14;"##";15,14;"##" i(20,14)=01;0;7;9 ,14;"mn";10 ,14;"op"  1110V 18,4;1;5;1;12 ,16;"##";13 ,16;"##";16,12 ;"##";17,12 ;"##";17,14;"##";18,14;"##" i(20,12 )=01;0;6;9 ,14;"qr";10 ,14;"st"  1110V (20,14)=0ū(20,12 )=19 ,5;"WRONG!!";11 ,5;"YOU MUST TAKE THE";12 ,5;"AND THE RING!!":C=05000:C:0:160 0;6;9 ,10 :-----------------------Los OR de los attr en las dos lineas siguientes se pueden revisar a posteriori, solo es importante en el y-2, en los otros podria funcionar <46 --------------------------- D57342=253ſ57342=189h$="78,90":i$="78,AB":g$=(h$fr=0)+(i$fr=1):((y-1,12 )=44,ū(y-1,12 )=45-)((y-2,12 )=44,ū(y-2,12 )=45-)x=x-1:fr=1-fr N57342=254ſ57342=190h$="12,34":i$="12,56":g$=(h$fr=0)+(i$fr=1):((y-2,15)=44,ū(y-2,15)=45-)((y-1,15)=44,ū(y-1,15)=45-)x=1+x:fr=1-fr X32766=254ſ32766=190sal=0((y,13 )>45-ū(y,14)>45-)((y,13 )=7ū(y,14)=7)sal=1:nu=0 b&g$=(i$sal=1)+(g$sal=0) lt=0870f v=y>19(x=137x=205x=381})940 y>19910 P20,4;"TIME:";t;(" "t<100d);21,4;"GOLD:";co;" " cont<11 m1=0c$=("$8............"cont=0)+(".$9..........."cont=1)+("..$8.........."cont=2)+("...$9........."cont=3)+("....$8........"cont=4)+(".....$9......."cont=5)+("......$8......"cont=6)+(".......$9....."cont=7)+("........$8...."cont=8)+(".........$9..."cont=9 Track-Info  N )+("..........$8.."cont=10 ) cont>10 m1=0c$=("..........$0.."cont=11 )+(".........$A..."cont=12 )+("........$0...."cont=13 )+(".......$A....."cont=14)+("......$0......"cont=15)+(".....$A......."cont=16)+("....$0........"cont=17)+("...$A........."cont=18)+("..$0.........."cont=19)+(".$A..........."cont=20)+("$0............"cont=21) ycont2=cont2+1:m2=0j$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm3=0k$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm4=0l$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm5=0r$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) cont2=4cont2=0 8d$="$H":e$="$H":m$="$S":q$="$P...........":t$="$b" cont3<9 t$=("$c"(cont3=0cont3=1cont3=2cont3=3cont3=4cont3=5cont3=6cont3=7cont3=8)) =cont3<16d$=("$H"(cont3=0cont3=1cont3=2cont3=3cont3=4))+("$C"cont3=5)+("$D"cont3=6)+("$E"cont3=7)+("$F"cont3=8)+("$E"cont3=9 )+("$D"cont3=10 )+("$C"cont3=11 )+("$H"(cont3=12 cont3=13 cont3=14cont3=15)) Pcont3<16e$=("$H"cont3=0)+("$C"cont3=1)+("$D"cont3=2)+("$E"cPLUS3DOS+)+T W!, o>2C{>2C*O\ q#p#s#r!6!"!"!" jjA:Z0\:ӧʓʞ:jW:::>XW:ӳ_:OO!} !!! :W_:ӳ_z@W~#~#~#~#~#~#~#~#~vͫ:FvÖͫwvwv*ӯ<<<o>g*ӯ<<<o>g0 0:A [a{>?<60> ɯ E0D0A:>ADW;aDw8>V60> ɯ TW>> O!!~ ^#V!"ɯ:<2͉ͫv:ӧʢʖ:FK:Ӏg:Ӂo<<<o>g~!".????gK~#~#~#~#x<GC~#~#~#~#x<GC~#~#~#~#x<GC~#~#~#~y<<OCks1@{s1 ØK> _!6#6#6#6 > > 888O!  =  =6#6#6#6>2!g"2!t" 2!" 22kկ2á>2á>2!" 2!" 22k!" 2!" 2k!" 2!" 2:<W:>b<<<o>g~W_zW`<<<o>g>kw,sw,{w,ʃw, =e{?=!,"2!9" 2!F"F2!S"2:ӧ:ӧ???W:=O:ӱO!} !!! :G:ӸڣG>@G:Ӹگx=¯kvs1;>GOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGOGO!7!p9={ɯ2x/2x/2x/22x/ aܯ22>2:22ɯ2@2ӯ2ӯ2ӯ2ӯ2ӧ®2:22rՋ֜[הװڀٽ6v%%v؍,>-6$6 $6$6/$62$6$68$6 `,>(6$60$6$60$6H$6$$6x$6`,>(6 $6$6$6$6$6$6$6`,>)6$6$6$6p$6$6$6$6 `,>*6w$6$6$6$6$6?$6^$6D`,>)6$6b$6L$6$6$6$68$6`,>*6$6 $6$6 $6$6$$6$6`,>(6$60$6$6$6L$6$6$60`,>(6$6$6 $6$6$6$6$6`,>*6$6$6$6$68$6$6$6 `,>)67$6F$62$6-$6/$6/$6$6`,>*6$6A$6Q$6$6$6$6z$6"`,>)6$6$6$6$6$6$6<$6B`,>W6$6$6$6$6$6$6Track-Info  N         PLUS3DOS!  <#"HiSoft BASIC Plus 3 version 1.2" F$"Copyright  1986,7 Cameron Hayne" P'"Now loading..." Z"hibasic.bin" da=32768+32770 W+m_{[*+z+{"!9nO}(u(E(U(8Gy8xHB128C n&'()*+,-./89:JAA CHAR_HS2 CHARADE7BAS 9:$6`,>V6$6$6_$6x$6s$6s$6s$6`,>N6$6$6$6>$6$6$6$6`,>N6~$6~$6$6~$6~$6_$6$6`,>N6~$6~$6$6~$6~$6$6$6`,>N6$6~$6$6~$6$6~$6$6`,>B6$6$6 $6$6/$6$6$6`,>,6$6$6$6$6$63$6U$6I`,>(6$6,$6F$6$6$6$6$6`,>(6$6$6$6$6$6$6O$6x`,>(6$6I$6$6*$6$6H$6$6|`,>(6$6$6$6$6$6$6$6`,>(6$6I$6$6*$6$6L$6$6>`,>(6$64$6b$6A$6Q$6$6$6`,>(6$6$6$6$6x$6$6$6`,>(6$6$6$6T$6%$6$6!$6>`,>(6 $6#$6U$6$6U$6#$6$6`,>(6$6$6$6T$6%$62$6C$6|`,>(6 $6#$6U$6$6U$6#$6$6`,>(6$6$6$6$6$6$6$6`,> 6$6$6$6$6$6$6$6`,>`6$6$6$6$6$6$6$6`,>`6$6$6$6$6$6$6$6`,> 6$6$6$6$6$6$6$6`,>`6$6$6*$6=$6"$6+$6>$65`,>)6$6$6$6<$6D$6T$6<$6`,>)6$6j$6$6j$6j$6$6j$6`,>a6$6$6$6$6$6$6$6`,>i6$6$6$6$6$6$6$6`,>W6$6$6'$6_$6_$6$6$6`,>*6$6$6$6$6$6$6$6`,>*6$6$6$6X$6_$6'$6$6`,>*6$6$6$6$6$6$6PLUS3DOS66o V*O\\B(>!1~(#/*O\+Ud Unrecognised hardware device or channel left opens1[:\[˧2\[yX!X?1BB!\/*l["_*j[" _>y!M1>y2\[>2[!]"[24[!^"5[*S\[O\RR '<*S\++U*O\ >46#6\#6#6\#w<#1[:\[y2\[]\t]\\]ss[1[:\[y2\[\:\[2\[y{s[!>]*=\^#V!R ${=\S=\,8( (ͅ,د*Q\####~0G!Ͷ\0y>O*Q\####~0G!Ͷ\!^["0%w+[: E !9~8 #~ #~ #~[ #~H #~ #:g[y>y y:g[y!9!^~ ~( 6 ~u(w 6:^ *Z["+^!BB} | :n y(( (( :\[2|^>y2\[:g[y2g[>B2\[y:g[y2g[*Z[| *}V %:^(x >y:\[y*Z[[{\;y:[s=\BBSl[BBSj[,{\32\[y:g[y2g[{*K\6#"Y\ð͕_ ͕_*^͸~(3o  w # ~(y02^"^^7͕_<_>>y2\[͕_͕_͕_q͕_͕_s#r͕_q#p͕_V#^#N#F#͕_V+^Ͳü^]s1!:\:A\2!x k#8x8a>8 LO>O>0y# N#y0!w!6(,2\ !~(5(!6I 6Ͳ:2A\{:\[]n !Ϳ*x\#"x\| 4@n(>!# :\ ( w!6:2\womkOnusWv >6g_~}{!X~`# x á!^~6˜1[!_>2͂¯ 66Ϳ:\ {W p :(͂>2c !>2>2^!:g[2g[:\[2\[d >e >x !W"\!"t (:^2^( {>_͋_l!g["e\!Ur€:n M*|(F͂6:g[2g[y>2\[*^!]͂¯ *S\"K\>_͋_61n 7_61>͗"6S8k :COMPILER COMMANDS C compile D compile only DATA E compile except DATA X same as CLEAR 65367 R run compiled code T type of variables sym.shift A delete BASIC P output to printer JUST PRESS ENTER TO RETURN!31#6͂!^#V#z(>{>$> > ~(ͮ> ͽ> >REAINTEPOSINPOSINTEST That's all there i~#~ #^#V!y RO*j[sj[~(*K\J_O_8 *j[sj[w^!^~o  #N#F' ƧB0p+q}̯!:^G^~`N # ~~#(N #`w# 6#6|+w#[E}|O[D) *Ͳ_SD>>>#N#*D "D*)EEä_:E:Track-Info  N         :E:*D#~" #~" "]\[)_#~" #~" 4~ ͸_"]\4#~#}+&o-!@6nf͠>͠>͠>͠>͠>>*![!S>">>!>)^#V)q#p'T] a&o!A!?B!B!GD~2;Enf>,>Z*]\*D"D"]\"D:*E>2+E2,E!>2*E,>2*ET]))*e\B"e\ä_!5>rͼSe\:;E>ü'$!wC !Cnf~)(8M"D*D >lͼ*D###*D##, >~2;E" (&h>ͼ>2;E!$8!!7!!6!!J8!!7!!7!!7!!38!!C8!!6>2$E>2;E84 >]üog>2;E >_>k >jü >^>i:;E >>|>?&n&&DMh&&>}!5:CE >2%E"”M>2%E>mͼ>2;E>,ͼ+`i>E͹>ü͹!8%͹># !8>ͼ(m/:;Em͚:,E(T̓2;E:,E  ,k>>`Z <N l&@>>a/:+E x!g(# >b >d 2;E>f >cͼ) x!62;E>W:;EgȺz2;E >= |>o >püM:M>.-G1638' >2%Eg"”>2%E8+ - ͊c͊8:2E2;E+>eږ:%E #~ #ʹ3"]\Û,>2,E!+Ew188+|,} >2,E02+E(x2,E >nͼ88:*E> >!:Eݶ~ݶ:?Ewnf~ݶ (>F¼>Gͼê+82m͊)(, nf8+##x8>Dͼ,((!3>Cͼ( )  ) !*>>#,!) >!,() >" >>$ü5^V+8Tm͊) >21E8~2;Eʅ+), "8+^V~()ͫx8:*E 6, !+nf>hͼ!Z>)”~2;E>21E͈͗,8=M͛(>>S]\~2;E:@EOx&0h) oͫ:@Eo&)[*D~>(+[]\N ( ͈,0 #~#(>iʖ~(>2'E[]\ ( ͈,0 w#!@E !AE4w#6OR !3:*E>2,E(>2+E( #~ (8"]\߿8վ#>2;E+ - '+8*]\͊^(c"]\8͋+8 ͊}͍ͫ,0U͗$ (͋=nf͛(͙/'@( :1Ef͋>A(>@üͳ͎v͋( M(!+ͪ>2;E" >0ͼ?ڔҔG&hg ȔetȩȪDzǺDžǑǚɢ "KW5f^͋m!͝:+E ̓2;E 18T]>h ̓2;E>X(>gͼx!!Q8/ !͋m͚:,ED %x>Vͼ*͋ 2m͚:,E(̓>>>Wͼ>2;Ex>Uͼm͚:,E(̓G e.@>)7:+E ̓T])" xm!Z(>hͼV2;EVx ͋>[ >\ͼ>2;ES:;E ͋+S!5>2$E+(-͋+ S>Z >Yͼm!S͝!+E~(̓G2;E>#(>2;E>+~ xm!SZ>2+E(+ 2;E >:+ER>2;Eix~)2;E )>O!'~?>Hm!)͝:+E xm!)g(":;E ! !! !x<>= ><=><= >< = ><=͋:;E >P >Qͼ>2;E >S >Rͼ>> >Tͼ |(͋ >M >Nͼ>2;E> >Oͼ z(!: 8͞OPEN >2#E2-E[>|ͼů_͞CLOSE :#E>2#EË:E(:-EJ͞LEN *͍,0*4ut, .4|J}2?E͞USR <"E>2E͞INT '>22E+ ͞FN>͞FN>2;EOÌ͞FN (J͞INTJ+> >2;Eë͞LINE <"EË͞LIST >2"EË͞GOTO( ͞GOSUB >24E: >25EF< >͞RESTORE >23E: >26E< ͞BREAK >27EË͞VAL '>2CE/$ ͞<= >2%E5>2%E>dÖ͍,0͗$(((:'E :;E>S]\5) ,‹͍,0͗$(((,‹͍,0=)ʋ,J~J:;EwDM:(E *E#"E,>20E2/E2.E::E >}ͼ>20E(,:.E& ̵:0E>|¼:/E!M >2.E͒8v# ":DE= =2DE>-ͼ}>20E !Z>z >{ü, &' & ͵; >2.E" -m( `.>>>/ͼ? xM!- >> (>üE ;,': #~"G#~" #~(""]\ɯ$ />w͊> > 5͊֯~2;Enfl+>>>~ü:;Enf>!##5,( ͳ! 5ͳ)”NFx2&E(BÔutNF:&E(BÔut^Vnf| #:;Eʫ)>4ͼ>8ͼ>2DE >6ͼ>2$E2DE(͍,8Track-Info  N         ( )(,,YY,͗$ʴ(ͳ:;E2lü::E M:3(>2 ::(>9ü/((~( '++>2$Enf>Eͼ::E M>1(>;ü:1Ei:;E2Bͼ>̈́>>lü+)̈́s#rE~”6ͳ:;Ew2nf 6##|J>Iͼ nf>Iͼ   !>oͼ>Jͼ*DutEͳ(qnf~(##z>#*D"D~ R~ >*D|%>nf>Kͼ>*D##"Dnf)*_͛*DKE _!|:$E( !į2$Em( >>͌8 L x:8E<28E KD D&o-::E>(>͌DM*D*D(͌8DM"l\!*Dÿ+8m͊ m+8͛,8 x::E:3E(:4Eʔ7:E(:(E+q#p#6#6##R>jÖ^#V͛>h(!^#Vz #B>(##>2(EK:6E([Ds#r> >2)E*:([D[D" n -G:)E 4̱###>fʖ4 8_##"D, M”*D*Dut29E)(X=!9E4*D$ ut> ut~*D( #####"D!"]\~, n~2) *D[E* #_!B#6# :9EЇG>G& >(ü>>7ü}͗">im!͝:+E( x5>6} x!g>s>'ü!VDMR!X'!k >|ü͙͹:/E!"(!"͙ ,(:/E!$(!w$ !#͙ !-#eͼ>2/E::Ev!?>2/E͒v M”>*ü ”>+üM, >x>&ü:7E>)ļ:$E( !>2$E2:E: ʋڔ&o ۔ݾݔb݆݆݆݆݆݆ݧԔO'\ڔܔ!֙Q>>הYג ټ&ݔ;ݔ)(*[D*DR8->2!E&:8E( G*D[ED&h- [_*[E-:#EK:5E([Ds#r*EB[*[DR͗">2#E2%E2$E2*E!"D"D*D28E"_SCE!B!E"]\ͤ_7:E͖>* >:> *D:E(>+ :(v(> 50:#E( ͙͋:#E!@!~|,>0*3E|*D"D!DM+&^#Vz #B(##^#Vp "l\CE\!KE^#V#z 3x r:6E :5E ##t^#V#*D(![Dsr- IQU]ax %3=BLQ\gLF ,Sm:Kbp)Rq-;AGMZgu1AS`u,9Gl>g21[!_s=\!g["e\͂:k0*>*"I\*]\ER*"_\U͋_:n&n d w¯ > * > * > * >\ : > > > * >,* > > * HISOFT BASIC 1.2 Plus 3 Version 1986,7 Cameron Hayne M/C: BYTES + BYTES FOR M/C VARIABLES (BASIC WAS BYTES) SAVE "m/c"CODELOAD "m/c"CODE OKAY TO DELETE BASIC? (Y/NDEInvalid compiler directivE;"LEVEL END";10 ,10 ;"GOOD!";12 ,10 ;"MINI PANCHO BROS.":C=05000:C:0:160 (fr=1-fr:sal=11040  ajustar jx=23y=16(16,16)=77Mcont3=10 :y=14:X=137:300, hx=23y=16(16,16)=7cont3=10 :y=7:X=205:300, y<20(y+2,x)=7ƫ(y+2,x+1)=77;y,x;" ";y+1,x;d$;y+2,x;e$;1;3;y+2,x;" ";5;" ":y=y+1 57342=253ſ57342=189x>0(y,x-1)=7ƫ(y+1,x-1)=7d$="gh":e$="ij":f$="kl":x=x-1:7;y,x;d$;" ";y+1,x;(e$fr=0);(f$fr=1);" ";y+1,x;1;5;" ";3;" " 57342=254ſ57342=190x<30(y,x+1)=7ƫ(y+1,x+2)=7d$="ab":e$="cd":f$="ef":7;y,x;" ";d$;y+1,x;" ";(e$fr=0);(f$fr=1);y+1,x+1;1;3;" ";5;" ":x=x+1 $32766=254ſ32766=190sal=0(y+2,x)7ū(y+2,x+1)7sal=1:nu=0 )C=05000:C .sal=0 8(y-1,x)=7ƫ(y-1,x+1)=7y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" " =%(y-1,x)=71GTrack-Info  N         ū(y-1,x+1)=71G9 ,14;" ";10 ,14;" ":y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" ";0;1;7;20,14;"mn";21,14;"op" ?%(y-1,x)=70Fū(y-1,x+1)=70F9 ,14;" ";10 ,14;" ":y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" ";0;1;6;20,12 ;"qr";21,12 ;"st" B(nu=nu+1:nu=5sal=0 L VVx=6:y=6:d$="gh":e$="ij":f$="kl":sal=0:nu=0:fr=0 ` 1000 j 1120` cont3=14)+("..$P........."cont3=15)+(".$P.........."cont3=16)  m$=d$:o$=d$ Ncont=cont+fr1:cont3=cont3+1:t=t-1:cont=22cont=0  cont3=22cont3=0 *sal=0300, 4L(y-3,13 )=45-ƫ(y;"________":1,11 +ui;"":3,11 +up;"":ua+8,(zb*64@)+(zp*8)+zi:r$:s$(uw):470 $UDG Edit Other click controls .ca=1ca=2cb=20cb=21ub=1-ub:53602b:2,21;""(ub+1):ua+8,(uf*128)+(ub*64@)+(up*8)+ui:r$:s$(uw):470 8ca>0ca<7cb>24cb<3153602b:s$(uw,9 *(ca-1)+cb-21)=c$((uc*(cm=2))+1):s$(uw):cm=0ont3=3)+("$F"cont3=4)+("$G"cont3=5)+("$H"(cont3=6cont3=7cont3=8cont3=9 cont3=10 ))+("$G"cont3=11 )+("$F"cont3=12 )+("$E"cont3=13 )+("$D"cont3=14)+("$C"cont3=15) ;cont3<17q$=(".$P.........."cont3=0)+("..$P........."cont3=1)+("...$P........"cont3=2)+("....$P......."cont3=3)+(".....$P......"cont3=4)+("......$P....."cont3=5)+(".......$P...."cont3=6)+("........$P..."cont3=7)+(".........$P.."cont3=8)+("........$P..."cont3=9 )+(".......$P...."cont3=10 )+("......$P....."cont3=11 )+(".....$P......"cont3=12 )+("....$P......."cont3=13 )+("...$P........"cont3=14)+("..$P........."cont3=15)+(".$P.........."cont3=16)  m$=d$:o$=d$ Ncont=cont+fr1:cont3=cont3+1:t=t-1:cont=22cont=0  cont3=22cont3=0 *sal=0300, 4L(y-3,13 )=45-ƫ(y-3,14)=45-y=y-1 >L(y-3,13 )>45-ū(y-3,14)>45-sal=0 H(nu=1+nu:nu=6sal=0 R 300, \####################### fF"')":10 ,5;"TIME OUT":C=05000:C:0 p 0 z3Estos bucles for/next ea cambio de Pause, ajustar ----------------------- N5;0;y-3,13 ;"$%";2;y-2,13 ;"&'" M10 ,10 ;"GAME OVER":C=05000:C:0:160 ----------------------- 2,4;1;5;"##";0;" ";1;"####################";3,4;"##";0;" ";1;"####################" C=417:0;1;5;C,4;"##";0;7;" ";1;5;"##":C m18,4;1;5;"########################";19,4;"########################" |4;0;16,25;" ";15,25;"";1;17,25;" ";18,25;"" x=205995 x=381}998 Ͼ18,4;1;5;1;16,16;"##";17,16;"##";16,12 ;"##";17,12 ;"##";14,14;"##";15,14;"##" i(20,14)=01;0;7;9 ,14;"mn";10 ,14;"op"  1110V 18,4;1;5;1;12 ,16;"##";13 ,16;"##";16,12 ;"##";17,12 ;"##";17,14;"##";18,14;"##" i(20,12 )=01;0;6;9 ,14;"qr";10 ,14;"st"  1110V (20,14)=0ū(20,12 )=19 ,5;"WRONG!!";11 ,5;"YOU MUST TAKE THE";12 ,5;"AND THE RING!!":C=05000:C:0:160 0;6;9 ,10 Track-Info  N         ;"LEVEL END";10 ,10 ;"GOOD!";12 ,10 ;"MINI PANCHO BROS.":C=05000:C:0:160 (fr=1-fr:sal=11040  ajustar jx=23y=16(16,16)=77Mcont3=10 :y=14:X=137:300, hx=23y=16(16,16)=7cont3=10 :y=7:X=205:300, y<20(y+2,x)=7ƫ(y+2,x+1)=77;y,x;" ";y+1,x;d$;y+2,x;e$;1;3;y+2,x;" ";5;" ":y=y+1 57342=253ſ57342=189x>0(y,x-1)=7ƫ(y+1,x-1)=7d$="gh":e$="ij":f$="kl":x=x-1:7;y,x;d$;" ";y+1,x;(e$fr=0);(f$fr=1);" ";y+1,x;1;5;" ";3;" " 57342=254ſ57342=190x<30(y,x+1)=7ƫ(y+1,x+2)=7d$="ab":e$="cd":f$="ef":7;y,x;" ";d$;y+1,x;" ";(e$fr=0);(f$fr=1);y+1,x+1;1;3;" ";5;" ":x=x+1 $32766=254ſ32766=190sal=0(y+2,x)7ū(y+2,x+1)7sal=1:nu=0 )C=05000:C .sal=0 8(y-1,x)=7ƫ(y-1,x+1)=7y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" " =%(y-1,x)=71Gū(y-1,x+1)=71G9 ,14;" ";10 ,14;" ":y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" ";0;1;7;20,14;"mn";21,14;"op" ?%(y-1,x)=70Fū(y-1,x+1)=70F9 ,14;" ";10 ,14;" ":y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" ";0;1;6xpecting a numbeExpecting an integeNot supporteNon-existent linToo many variableNo more spacUse *D,*Not enough room for m/Exec address too higDO NOT TES͂>2E>2?E!"E!C6!GD6]!E"D6!6!""*S\"D*K\"DR"*\#"D[DR,R"Eڳ[DR"D!X"c\"e\1Z>2E2E>ͦ!@1>2E>ͦ*D"D[D"D"*DѧR": *"͒*D[ER"[D:E(R"E*E>mږ: [D"*E[ER0>2 Ey]SD*S\"K\"*D"D>2E>ͦ:"EĖ: E(gS>_͋_*+"\#[ER>n(>oÖ*D+K *+KE [\ͫ_5> >g>_ !*D`8*E[[DR8:!E(>lÖ:*D|*E[R>k8*DR: *E[DR0*"E*D(*D[D:@E&o):AE&oͫ"DB!?B~2;Eo>2;E!Ao!GD~*D(ut "D*Dut:;E |(##"D!@!~,>0*D"D2BE>a2=E2>E8v͖>R>T  ͖nf͌:͖*D~(ͮͽ"D:BEG<2BE7:=E{0(5G<2=E~ݶ(x~nf7:>E{/G<2>E~ݶ(x>$~>nf7:( xAO>yx> ~(>.+#~#( ͖ > ͖[E > >#|}Gx 80͐->(nf͐nf|( >,->)>>2k\GD! >à> >à>>!|!>à>> à>>!|!> à> R|!,>à>!,>àRgo,>àRgo,Rgo,Rgo,>qͼ>à!>>qͼ>à!>!>>!>>à!Y5/ !0,}o+< >o>pͼ!- +ö*DM>%>%33>%à +B#0goDMö*Rf(I*Z[:p8 %:g[y2g[r:g[y2g[[:hS(ͤ ͅ ["Z[ÿCfʬ*Z[:p8 #:g[y2g[ :g[y2g[ [*["Z[T!82h[x(*O\ ###~K( S(P%+x(-( +( !Ygx  (y8e!|[>+(!|[:h[%G!Ͷ\ҹ\:h[G5͠s=\>5͠ 6Ϳ*n\͠ ͿS=\S]\>| DM=!  >>:ͼ>=>;ͼ>m><ͼ*a\T]~ ʶ*#!q\˾Ϳ6 "[\!^!Ϳ5~(>nͼ #~>]>Yͼ2~5"e\#Track-Info  N #^#V ͼ4"e\-DM,!:\>+)^#V +DM)) ô3+DM))  #^#V#N#F N#F#`i>hͼ+q#py#N#F#ö*N#F# 8"e\##n& *e\B>>lͼ>qͼ>>Lʹ3ʹ3ʹ3>Yͼ #~>q>Zͼ"e\#~ |Ϳ57 5!5>sͼ }*e\+w+w!-5!$5 |Ϳ5 5>sͼ!0!1Ϳ5͗2~Ȁw(x ?xʭ1 5118!0!0}!,>sͼ;20,12 ;"qr";21,12 ;"st" B(nu=nu+1:nu=5sal=0 L VVx=6:y=6:d$="gh":e$="ij":f$="kl":sal=0:nu=0:fr=0 ` 1000 j 1120` cont3=14)+("..$P........."cont3=15)+(".$P.........."cont3=16)  m$=d$:o$=d$ Ncont=cont+fr1:cont3=cont3+1:t=t-1:cont=22cont=0  cont3=22cont3=0 *sal=0300, 4L(y-3,13 )=45-ƫ(y-*++! E-z(!|(|ʸ* +" ![ɧR"!DMh&!DMh&z(!|ʻF12,34!lF12,56!l!|*͊!|*͊͜5!lͿ*++!E,*++!E-z(!*+!E,*+!E-z(!|(|ʻ![ " ![ɧR"!DMh&!DMh&z(!|m*|m*! E-͹*!E-͹z(!*! E*!Ez(!z(!|m!"!"!|*PLUS3DOS33Cǀ! "l\!Tͩ/͕!ͽ!ͷ!ͱ!!K !!K > M K'#1)> !ͷ!ͱ!!KMINI PANCHO BROS.!!K=================! !KO -LEFT P -RIGHT! !K SPACE -JUMP!!KPRESS 1 TO INFO!!KPRESS 0 TO START> M !lͿ!|W|C!|W1|!|W0|•C>)> !ͷ!ͱ!!KMINI PANCHO BROS.!!K=================!!K-CHARADE!!KBY JASON J. RAILTON!!K-MOTOR DE PLATAFORMAS! !K BY NA_TH_AN! !KPROGRAMMED BY:! !K+3CODE!!KCOMPILED WITH HISOFT!!KBASIC. DEVELOPED WITH!!KFUSE (WIN), BASIN(WIN)!!KZX-PAINTBRUSH (WIN)!!KFONT-MASTER(ZX) AND!!KMID2ASM.> M !" !"8Á* #" [8Rz!cc!" !"!"!"!"!"!"!"!"!")!"!"!!"#!"%!"'W..............!l!"+W$C!lW$C!lW$4!lW12,34!l!|!lW12,56!lW$M!lW$M!lW$M!lW$C!lW$4!lW$C!lW$4!lW $P...........!lW$M!lW$4!lW$b!lW$4!l![ɧR"Wv....$J..$J........................................................................................................$T..!|͜5W[...........................................................................................͜5!|͜5W..$I.......$T..͜5!|͜5W(........................................͜5!|͜5W..............................͜5!|͜5W..$I.............͜5!|͜5W#...................................͜5!|͜5W4...................................$J..$J..$J..$H...͜5!lͿW ....$J..$J..!|͜5W8...............................$2.......................͜5!|͜5WC..............$K...............................................$T..͜5!|͜5W..$T..$T..................͜5!|͜5WE.....................................................................͜5!|͜5W~..............$S......$W..$V..$X..$W..$S..$V.....................................$2..$2..$2.............................$K..$a͜5!|͜5W-$I..........................$J..$J..$J..$H...͜5! K@01!<̈́* * -!> K@D1!̈́* * -!> K@H1!̈́* * -!> >@*}5!>C!|!K)'> Ϳ!|!l*+++! EN*+++!EN|(* |(|iW$5!lͤz# =!ͩC*R! !ͷ!ͱKTIME UP!> M *)d")*+++! EN*+++!EN|(* |(|W$5!lͤz# =!ͩC*R! !ͷ!ͱKTIME UP!> M *)d")*+++! EN*+++!EN|(* %|(|ʥW$5!lͤz# =!ͩC*R! !ͷ!ͱKTIME UP!> M *)d")*+++! EN*+++!EN|(* |(|CW$5!lͤz# =!ͩC*R! !ͷ!ͱKTIME UP!> M *)d")*+++! EN*+++!EN|(* i|(|W$5!lͤz# =!ͩC*R! !ͷ!ͱKTIME UP!> M *)d")**+++! E**+++!E*z(!|(|c* |cW$T!l!"!*+#"+ͤz# =!ͩC**+++! E**+++!E*z(!|(|* |W$T!l!"#*+#"+ͤz# =!ͩC**+++! E**+++!E*z(!|(|g* k|gW$T!l!"%*+#"+ͤz# =!ͩC**+++! E**+++!E*z(!|(|* |W$T!l!"'*+#"+ͤz# =!ͩC*|!|!lʪ*+! E(*++! E(|(*+!E(*++!E(|(z(!|ʔ!ͷ*++! K > M Ժ*! E(*! E(z(!|!ͷ*+! K > M Ժ*! E`*! E z(!*!E`*!E z(!z(!|[*+"*! E-*! E,z(!*!E-*!E,z(!|(|ʪ*#"!DMh&!DMh&z(!|ɫW78,90!lW78,AB!l!|*͊!|*͊͜5!lͿ*+! E,*+! E-z(!*++! E,*++! E-z(!|(|ɫ* +" ![ɧR"!DMh&!DMh&z(!|̬W12,34!lW12,56!l!|*͊!|*͊͜5!lͿ*++!E,*++!E-z(!*+!E,*+!E-z(!|(|̬![ " ![ɧR"!DMh&!DMh&z(!|~*|~*! E-*!E-z(!*! E*!Ez(!z(!|~!"!"!|*͊!|*͊͜5!lͿ*)|z** * z(!* }z(!|(|]*|Ժ!!KTIME:*)'W *)d͊!!!KGOLD:*+'> > * *|(|W$8............*͊W.$9...........*͊͜5W..$8..........*͊͜5W...$9.........*͊͜5W....$8........*͊͜5W.....$9.......*͊͜5W......$8......*͊͜5W.......$9.....*͊͜5W........$8....*͊͜5W.........$9...* ͊͜5W..........$8..* ͊͜5!lͿ* *|(|ʓW..........$0..* ͊W.........$A...* ͊͜5W........$0....* ͊͜5W.......$A.....*͊͜5W......$0......*͊͜5W.....$A.......*͊͜5W....$0........*͊͜5W...$A.........*͊͜5W..$0..........*͊͜5W.$A...........*͊͜5W$0............*PLUS3DOS j  338395:7:1:0:0: "mario.scr" "mario.bin"38396 ("mario1.fnt"53332T 2"ch_mario.bin" ! !KTIME OUT> !"-!"4ý*-#"-[4RҶ!c!c!ͷ!ͱ*+++! K$%!ͱ*++! K&'> M ! ! K GAME OVER> !"-!"4I*-#"-[4RB!c!!!ͷ!ͱK##!ͷK !ͷK####################!!K##!ͷK !ͷK####################> M !"-!"4e!ͽ!ͷ!ͱ*-!K##!ͷ!ͱK !ͷ!ͱK##> M *-#"-[4R!!!ͷ!ͱK########################!!K########################> M !ͷ!ͱ!!K !!>!ͽ!!K !!>> M * |-* }|!!!ͷ!ͱ!ͽ!!K##!!PLUS3DOS3%3/! "l\!T[ͩ/͕!ͽ!ͷ!ͱ!!: !!: > M :'#1)> !ͷ!ͱ!!:MINI PANCHO BROS.!!:=================! !:O -LEFT P -RIGHT! !: SPACE -JUMP!!:PRESS 1 TO INFO!!:PRESS 0 TO START> M !lͿ!|F|2!|F1||!|F0|„2>)> !ͷ!ͱ!!:MINI PANCHO BROS.!!:=================!!:-CHARADE!!:BY JASON J. RAILTON!!:-MOTOR DE PLATAFORMAS! !: BY NA_TH_AN! !:PROGRAMMED BY:! !:+3CODE!!:COMPILED WITH HISOFT!!:BASIC. DEVELOPED WITH!!:FUSE (WIN), BASIN(WIN)!!:ZX-PAINTBRUSH (WIN)!!:FONT-MASTER(ZX) AND!!:MID2ASM.> M !" !"8p,!n4!j4!4,<z2g\>e z(|!+>dà|2g\>iͼ>eà>iͼ>fͼ:g\{(#og%{ʭ1M|!R?833igT]>hͼ>(> 8 z ClMD!>#0 )=  |ȯog !z#,|!*e\B"e\5ʹ3_ULGö* _|(ULGö*>rͼ!<4 *e\ T]  Ϳ54"e\!&&& &&&.>U">{}>}&&.>!T]w!%(>͎ 0_3ö*!" &o!%n& +x(o& ͙͋:#E!@!~|,>0*3E|*D"D!DM+&^#Vz #B(##^#Vp "l\CE\!KE^#V#z 3x r:6E :5E ##t^#V#*D(![Dsr- IQU]ax %3=BLQ\gLF ,Sm:Kbp)Rq$6`,>*6$6$6 $6 $6$6$6$6`,>*6$6 $6$6$6$6x$6$6`,>*6$6$6$6$6 $6 $6$6`,>*6$6x$6$6$6$6$6 $6`,>*6$6$6$6$6$6$6$6`,>*6$6~$6f$6Z$6Z$6f$6~$6`,>6$6$6$6$6$6$6$6`,> 6$6$6$6$6$6$6$6`,>`6$6$68$6@$68$6$6x$6`,>96$6$68$6$6$6$6 $6`,>96$6$6D$6D$6D$6D$68$6`,>96$6$6D$6D$6($6($6$6`,>96$6$6D$6T$6T$6T$6($6`,>96$6$6D$6($6$6($6D$6`,>96$6$6D$6D$6D$6<$6$68`,>96$6$6|$6$6$6 $6|$6`,>96$6$6|$6T$6$6$6|$6l`,>F   ********   ********       !##"$%$% $%&'&'()&'()&'()()****!##"$%   ****+,**-.******/0**12******3**3**4444$%$%   $%$%$% $%!##"************************!##"$%!##"$%$%!##"$%$%$%$%$%$%$%!##"!%$"!%$"!%$"56565656(((())))****++++,,,,----....////0000111122223333444455556666777788889999::::;;;;<<<<==Track-Info  N ==>>>>????!D@DDX1 @!d@DdX1M݀!@DX1!@DX1!@DX1 @!@DX1M݀!HDY1!$HD$Y1!DHDDY1 @!dHDdY1M݀!HDY1!HDY1!HDY1 @!HDY1M݀!PDZ1!$PD$Z1!DPDDZ1 @!dPDdZ1M- /28 (00H$x( )p *w?^D)bL8*  $(0L0( *8 )7F2-//*AQz")N~~~~_N~~~~N~~~B /,3UI(,F(ĪOx(I*H|(Ĩğ(I*L>(4bAQр(x̪(T%!>( #UU#(T%2C|( #UU#(РРР ``РРР `*="+>5)A<>qBB<qDHpHDBq@@@@@~qBfZBBBqBbRJFBqE(>A<>qBB<qDHpHDBq@@@@@~qBfZBBBTrack-Info  N qBbRJFBqA<>qBB<qDHpHDBq@@@@@~qBfZBBBqBbRJFBq?OF$#|b$   00 >>0> 0 >cgksc>8<>c8`>cc>6f~`~c>>`~ccc>8p>cc>cc>>cc?<0 0 >>  >c c```c>|fcccf|``~````~```>c``gc>cccccc~~cc>cflx|ng``````~cwkcccs{ogc>ccccc>~ccc~``>ccccg?~ccg|ngc>~cccccc>ccccc6cckwccw>>wcff<8p`0 pp<~6x ~#-, ̰؄  xw?^DbL88@3 !Ĵ4  8 7F2-//AQz"@  @$+HPP`PH((PPH,#((H`cccc>cc6lc66cccc?> ?0p p8 :@01!<̈́* * > :@D1!̈́* * > :@H1!̈́Track-Info  N * * > >@*}5>C!|:)'> Ϳ!|!l*+++! EN*+++!EN|(* |(|XF$5!lͤz# =!ͩ2*R! !ͷ!ͱ:TIME UP!> M *)d")*+++! EN*+++!EN|(* |(|F$5!lͤz# =!ͩ2*R! !ͷ!ͱ:TIME UP!> M *)d")*+++! EN*+++!EN|(* %|(|ʔF$5!lͤz# =!ͩ2*R! !ͷ!ͱ:TIME UP!> M *)d")*+++! EN*+++!EN|(* |(|2F$5!lͤz# =!ͩ2*R! !ͷ!ͱ:TIME UP!> M *)d")*+++! EN*+++!EN|(* i|(|ЦF$5!lͤz# =!ͩ2*R! !ͷ!ͱ:TIME UP!> M *)d")**+++! E**+++!E*z(!|(|R* |RF$T!l!"!*+#"+ͤz# =!ͩ2**+++! E**+++!E*z(!|(|ԧ* |ԧF$T!l!"#*+#"+ͤz# =!ͩ2**+++! E**+++!E*z(!|(|V* k|VF$T!l!"%*+#"+ͤz# =!ͩ2**+++! E**+++!E*z(!|(|ب* |بF$T!l!"'*+#"+ͤz# =!ͩ2*|!|!lù*+! E(*++! E(|(*+!E(*++!E(|(z(!|ʃ!ͷ*++! : > M ú*! E(*! E(z(!|ة!ͷ*+! : > M ú*! E`*! E z(!*!E`*!E z(!z(!|J*+"*! E-*! E,z(!*!E-*!E,z(!|(|ʹ*#"!DMh&!DMh&z(!|ʸF78,90!lF78,AB!l!|*͊!|*͊͜5!lͿ*+! E,*+! E-z(!*++! E,*++! E-z(!|(|ʸ* +" ![ɧR"!DMh&!DMh&z(!|ʻF12,34!lF12,56!l!|*͊!|*͊͜5!lͿ*++!E,*++!E-z(!*+!E,*+!E-z(!|(|ʻ![ " ![ɧR"!DMh&!DMh&z(!|m*|m*! E-͹*!E-͹z(!*! E*!Ez(!z(!|m!"!"!|*͊!|*͊͜5!lͿ*)|i*͹* * z(!* }z(!|(|L*͹|ú!!:TIME:*)F *)dͺ͊!!:GOLD:*+> > * ͺ*|(|F$8............*͊F.$9...........*͊͜5F..$8..........*͊͜5F...$9.........*͊͜5F....$8........*͊͜5F.....$9.......*͊͜5F......$8......*͊͜5F.......$9.....*͊͜5F........$8....*͊͜5F.........$9...* ͊͜5F..........$8..* ͊͜5!lͿ* ͹*|(|ʂF..........$0..* ͊F.........$A...* ͊͜5F........$0....* ͊͜5F.......$A.....*͊͜5F......$0......*͊͜5F.....$A.......*͊͜5F....$0........*͊͜5F...$A.........*͊͜5F..$0..........*͊͜5F.$A...........*͊͜5F$0............*͊͜5!lͿ*#"*!|F$M*͊F$N*͊͜5F$O*͊͜5F$N*͊͜5!lͿ*#|aF$M*͊F$N*͊͜5F$O*͊͜5F$N*͊͜5!lͿ*%|ͲF$M*͊F$N*͊͜5F$O*͊͜5F$N*͊͜5!lͿ*'|9F$M*͊F$N*͊͜5F$O*͊͜5F$N*͊͜5!lͿ*|M!"F$H!lF$H!lF$S!lF $P...........!lF$b!l* ͺ|XF$c**z(!*z(!*z(!*z(!*z(!*z(!*z(!*z(!͊!l*ͺ|ʷF$H**z(!*z(!*z(!*z(!͊F$C*͊͜5F$D*͊͜5F$E*͊͜5F$F*͊͜5F$E* ͊͜5F$D* ͊͜5F$C* ͊͜5F$H*Track-Info  N  * z(!*z(!*z(!͊͜5!lͿ*ͺ|F$H*͊F$C*͊͜5F$D*͊͜5F$E*͊͜5F$F*͊͜5F$G*͊͜5F$H**z(!*z(!* z(!* z(!͊͜5F$G* ͊͜5F$F* ͊͜5F$E* ͊͜5F$D*͊͜5F$C*͊͜5!lͿ*ͺ|dF .$P..........*͊F ..$P.........*͊͜5F ...$P........*͊͜5F ....$P.......*͊͜5F .....$P......*͊͜5F ......$P.....*͊͜5F .......$P....*͊͜5F ........$P...*͊͜5F .........$P..*͊͜5F ........$P...* ͊͜5F .......$P....* ͊͜5F ......$P.....* ͊͜5F .....$P......* ͊͜5F ....$P.......* ͊͜5F ...$P........*͊͜5F ..$P.........*͊͜5F .$P..........*͊͜5!lͿ!|!l!|!l*["*#"*)+")*|ʩ!"*|ʽ!"*|*+++! E-*+++!E-|(|*+"*+++! E-͹*+++!E-͹z(!|G!"!["*|f!":')> ! !:TIME OUT> !"-!"4ì*-#"-[4Rҥ!R!R!ͷ!ͱ*+++! :$%!ͱ*++! :&'> M ! ! : GAME OVER> !"-!"48*-#"-[4R1!R!!!ͷ!ͱ:##!ͷ: !ͷ:####################!!:##!ͷ: !ͷ:####################> M !"-!"4T!ͽ!ͷ!ͱ*-!:##!ͷ!ͱ: !ͷ!ͱ:##> M *-#"-[4R!!!ͷ!ͱ:########################!!:########################> M !ͷ!ͱ!!: !!>!ͽ!!: !!>> M * |* }|!!!ͷ!ͱ!ͽ!!:##!!:##!! :##!! :##!!:##!!:##> M !!E|!ͽ!ͷ!ͱ! !:mn! !:op> M i!!!ͷ!ͱ!ͽ! !:##! !:##!! :##!! :##!!:##!!:##> M !! E|!ͽ!ͷ!ͱ! !:qr! !:st> M i!!E!! Ez(!|ʹ! !:WRONG!!! !:YOU MUST TAKE THE! !:AND THE RING!!> !"-!"4å*-#"-[4RҞ!R!ͷ!ͱ! ! : LEVEL END! ! :GOOD!! ! :MINI PANCHO BROS.> M !"-!"42*-#"-[4R+!R![ɧR"*|­* *|(|ʫ!!EM|ʫ! "!"!" * *|(|!!E|! "!"!" *ͺ|ʭ*##* E*##* #E|(|ʭ!ͱ** : *#* !|*##* !|!!ͱ*##* > !ͱ> > M *#"!DMh&!DMh&z(!|* ͹|** +E*#* +E|(|Fgh!lFij!lFkl!l* +" !ͱ** !|> *#* !|*͊!|*͊> *#* !!ͱ> !ͱ> > M !DMh&!DMh&z(!|* ͺ|** #E*#* ##E|(|Fab!lFcd!lFef!l!ͱ** > !|*#* > !|*͊!|*͊*#* #!!ͱ> !ͱ> > M * #" !DMh&!DMh&z(!|f*|f*##* E*##* #Ez(!|f!"!"!"-!"4~*-#"-[4Rw*|ʘ*+* E*+* #E|(|?*+"!ͱ** !|*#* !|*##* : !*#* !ͱ> !ͱ> > M *+* EG*+* #EGz(!|F! !: ! !: > *+"!ͱ** !|*#* !|*##* : !*#* !ͱ> !ͱ> !!ͽ!ͱ!!:mn!!:op> M *+* EF*+* #EFz(!|M! !: ! !: > *+"!ͱ** !|*#* !|*##* : !*#* !ͱ> !ͱ> !!ͽ!ͱ!! :qr!! :st> M *#"*|h!"Track-Info  N !" !"Fgh!lFij!lFkl!l!"!"!"Fî!X'Rgo,ɯRgo,ɯRgo,>++|x (?( 8 #+!0,}o+< ͩ-33 +B#0goDMö*N#F#T] < N#F#T] ö*DM=DM,!:\>+q#py#N#F#ö*N#F#}*e\+w+w*e\B"e\ʹ3_ULGö*>U">U">U">U">{}>>͎ 0_3ö*yOoyXgn&͊͜5!lͿ*ͺ|dF .$P..........*͊F ..$P.........*͊K##!! K##!! K##!!K##!!K##> M !!E|*!ͽ!ͷ!ͱ! !Kmn! !Kop> M z!!!ͷ!ͱ!ͽ! !K##! !K##!! K##!! K##!!K##!!K##> M !! E|!ͽ!ͷ!ͱ! !Kqr! !Kst> M z!!E!! Ez(!|ʿ! !KWRONG!!! !KYOU MUST TAKE THE! !KAND THE RING!!> !"-!"4ö*-#"-[4Rү!c!ͷ!ͱ! ! K LEVEL END! ! KGOOD!! ! KMINI PANCHO BROS.> M !"-!"4C*-#"-[4R !ͱ> > M *#"!DMh&!DMh&z(!|* |** +E*#* +E|(|Wgh!lWij!lWkl!l* +" !ͱ** !|!> *#* !|*͊!!|*͊!> *#* !!ͱ> !ͱ> > M !DMh&!DMh&z(!|* |** #E*#* ##E|(|Wab!lWcd!lWef!l!ͱ** > !|!*#* > !|*͊!!|*͊!*#* #!!ͱ> !ͱ> > M * #" !DMh&!DMh&z(!|w*|w*##* E*##* #Ez(!|w!"!"!"-!"4Ï*-#"-[4R҈*|ʩ*+* E*+* #E|(|P*+"!ͱ** !|!*#* !|!*##* K !*#* !ͱ> !ͱ> > M *+* EG*+* #EGz(!|W! !K ! !K > *+"!ͱ** !|!*#* !|!*##* K !*#* !ͱ> !ͱ> !!ͽ!ͱ!!Kmn!!Kop> M *+* EF*+* #EFz(!|^! !K ! !K > *+"!ͱ** !|!*#* !|!*##* K !*#* !ͱ> !ͱ> !!ͽ!ͱ!! Kqr!! Kst> M *#"*|y!"!" !"Wgh!lWij!lWkl!l!"!"!"Wÿ!X'Rgo,ɯRgo,ɯRgo,>++|x (?( 8 #+!0,}o+< ͩ-33 +B#0goDMö*N#F#T] < N#F#T] ö*DM=+q#py#N#F#ö*N#F#}*e\+w+w*e\B"e\ʹ3_ULGö*>U">U">U">U">{}>>͎ 0_3ö*yOoyXgn&͜5W$C*͊͜5!lͿ*|uW .$P..........*͊W ..$P.........*͊͜1 %A1,1,0,0,0,0,0,0 %C0,255,0,0,0,0,0,0 %C1,255,0,0,0,0,0,0 %I255,255,255,255,0,1,1,0 %I0,1,1,0,255,255,255,255 %Q240,240,240,240,240,240,240,246 %J15,15,15,15,15,15,15,111o %O0,192,240,156,231,252,240,192 & &]"CharEdit"9990':"CharCurs"53600`,398:"CharRend"54100T,11049)+ & '953599_:"CHARCURS.BIN":"CHARREND.BIN":10 #<#vkk+@ ETrack-Info  N  +0 C@ 1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz_D?^-+=.,;"<>/`:E!@#$6"1O1 "2O "3O "4O "5O "6O "1O2 "2O "3O "4O "5O "6O "1O3 "2O "3O "4O "5O "6O "1O4 "2O "3O "4O "5O "6O Ѝ""B1 .1.2.3.4.5.6.7.8.9.0.A.B.C.D.E"D1F.G.H.I.J.K.L.M.N.O.P.Q.R.S.T.U"F1V.W.X.Y.Z.a.b.c.d.e.f.g.h.i.j.k"H1l.m.n.o.p.q.r.s.t.u.v.w.x.y.z._K " <-[1]" |=9 ,4;" Kempston Mouse";:ct=2" <-[1]" =12 ,5;"Light background";:bg=1" <-[2]" =13 ,5;" Dark background";:bg=0" <-[2]" "16,17;"LOAD <-[L]"; -17,1;5;"[54100,11049]"; "17,17;"SAVE <-[S]"; #20,16;"Begin <-[0]"; k$=|*͊͜5!lͿ*)|_*͹* * z(!* }z(!|(|B*͹|¹!!:TIME:*)F *)dͺ͊!!:GOLD:*+> > * ͺ*|(|ޯF$8............*͊F.$9...........*͊͜5F..$8..........*͊͜5F...$9.........*͊͜5F....$8........*͊͜5F.....$9.......*͊͜5F......$8......*͊͜5F.......$9.....*͊͜5F........$8....*͊͜5F.........$9...* ͊͜5F..........$8..* ͊͜5!lͿ* ͹*|(|xF..........$0..* ͊F.........$A...* ͊͜5F........$0....* ͊͜5F.......$A.....*͊͜5F......$0......*͊͜5F.....$A.......*͊͜5F....$0........*͊͜5F...$A.........*͊͜5F..$0..........*͊͜5F.$A...........*͊͜5F$0............*͊͜5!lͿ*#"*!|F$M*͊F$N*͊͜5F$O*͊͜5F$N*͊͜5!lͿ*#|WF$M*͊F$N*͊͜5F$O*͊͜5F$N*͊͜5!lͿ*%|òF$M*͊F$N*͊͜5F$O*͊͜5F$N*͊͜5!lͿ*'|/F$M*͊F$N*͊͜5F$O*͊͜5F$N*͊͜5!lͿ*|C!"F$H!lF$H!lF$S!lF $P...........!lF$b!l* ͺ|NF$c**z(!*z(!*z(!*z(!*z(!*z(!*z(!*z(!͊!l*ͺ|ʭF$H**z(!*z(!*z(!*z(!͊F$C*͊͜5F$D*͊͜5F$E*͊͜5F$F*͊͜5F$E* ͊͜5F$D* ͊͜5F$C* ͊͜5F$H* * z(!PLUS3DOS8 8= 82####################### <353331S:7:1:0:0: F"mario.scr" P"mario1.fnt"53332T Z"ch_mario.bin" d-236066\,84T:236077\,207 x####################### : LEN a$425,b$425,c$14,d$2,e$2,f$2,g$5,h$5,i$5,j$2,k$2,l$2,m$2,n$2,o$2,p$2,q$13,r$2,s$2,t$2,u$2,y$425,z$425 A: INT+ x,y,sal,nu,fr,fr1,cont,cont2,cont3,m1,m2,m3,m4,m5,t,co,C : OPEN # ?20,4;" ";21,4;" " pk=54100T "'#1)" 5;1;3,7;"MINI PANCHO BROS.";4,7;"=================";9 ,6;"O -LEFT P -RIGHT";10 ,6;"SPACE -JUMP";15,8;"PRESS 1 TO INFO";16,8;"PRESS 0 TO START" d$=:d$=""200 d$="1"240 d$="0"290" 200 ")" 35;1;3,7;"MINI PANCHO BROS.";4,7;"=================";6,4;"-CHARADE";7,5;"BY JASON J. RAILTON";8,4;"-MOTOR DE PLATAFORMAS";9 ,5;"BY NA_TH_AN";11 ,5;"PROGRAMMED BY:";12 ,5;"+3CODE";14,5;"COMPILED WITH HISOFT";15,5;"BASIC. DEVELOPED WITH";16,5;"FUSE (WIN), BASIN(WIN)";17,5;"ZX-PAINTBRUSH (WIN)";18,5;"FONT-MASTER(ZX) AND";19,5;Track-Info  N "MID2ASM.":X=05000:X:0  180 *x=6,20,65,90,120,160,210,232,310,350,394 ----------------------- "x=2:y=16:sal=0:nu=0:fr=1:fr1=1:cont=0:cont2=0:cont3=0:t=500:m1=0:m2=0:m3=0:m4=0:m5=0:c$="..............":co=0:d$="$C":e$="$C":f$="$4":g$="12,34":h$=g$:i$="12,56":j$="$M":k$="$M":l$="$M":m$="$C":n$="$4":o$="$C":p$="$4":q$="$P...........":r$="$M":s$="$4":t$="$b":u$="$4" ,fr1=1-fr1 6y$="....$J..$J........................................................................................................$T.."+l$+"..........................................................................................."+n$+"..$I.......$T.."+r$+"........................................"+o$+".............................."+p$+"..$I............."+c$+"..................................."+u$+"...................................$J..$J..$J..$H..." @a$="....$J..$J.."+j$+"...............................$2......................."+d$+"..............$K...............................................$T.."+k$+"..$T..$T.................."+s$+"....................................................................."+m$+"..............$S......$W..$V..$X..$W..$S..$V.....................................$2..$2..$2.............................$K..$a"+q$+"$I..........................$J..$J..$J..$H..." Jb$="....$J..$J......................."+f$+"..$I....."+c$+"$S.........."+*z(!*z(!͊͜5!lͿ*ͺ|F$H*͊F$C*͊͜5F$D*͊͜5F$E*͊͜5F$F*͊͜5F$G*͊͜5F$H**z(!*z(!* z(!* z(!͊͜5F$G* ͊͜5F$F* ͊͜5F$E* ͊͜5F$D*͊͜5F$C*͊͜5!lͿ*ͺ|ZF .$P..........*͊F ..$P.........*͊͜5F ...$P........*͊͜5F ....$P.......*͊͜5F .....$P......*͊͜5F ......$P.....*͊͜5F .......$P....*͊͜5F ........$P...*͊͜5F .........$P..*͊͜5F ........$P...* ͊͜5F .......$P....* ͊͜5F ......$P.....* ͊͜5F .....$P......* ͊͜5F ....$P.......* ͊͜5F ...$P........*͊͜5F ..$P.........*͊͜5F .$P..........*͊͜5!lͿ!|!l!|!l*["*#"*)+")*|ʟ!"*|ʳ!"*|*+++! E-*+++!E-|(|*+"*+++! E-͹*+++!E-͹z(!|=!"!["*|\!":')> ! !:TIME OUT> !"-!"4â*-#"-[4Rқ!R!R!ͷ!ͱ*+++! :$%!ͱ*++! :&'> M ! ! : GAME OVER> !"-!"4.*-#"-[4R'!RH!6\6T!7\6!!!ͷ!ͱ:##!ͷ: !ͷ:####################!!:##!ͷ: !ͷ:####################> M !"-!"4T!ͽ!ͷ!ͱ*-!:##!ͷ!ͱ: !ͷ!ͱ:##> M *-#"-[4R!!!ͷ!ͱ:########################!!:########################> M !ͷ!ͱ!!: !!>!ͽ!!: !!>> M * |* }|!!!ͷ!ͱ!ͽ!!:##!!:##!! :##!! :##!!:##!!:##> M !!E|!ͽ!ͷ!ͱ! !:mn! !:op> M i!!!ͷ!ͱ!ͽ! !:##! !:##!! :##!! :##!!:##!!:##> M !! E|!ͽ!ͷ!ͱ! !:qr! !:st> M i!!E!! Ez(!|ʹ! !:WRONG!!! !:YOU MUST TAKE THE! !:AND THE RING!!> !"-!"4å*-#"-[4RҞ!RH!ͷ!ͱ! ! : LEVEL END! ! :GOOD!! ! :MINI PANCHO BROS.> M !"-!"42*-#"-[4R+!RH![ɧR"*|­* *|(|ʫ!!EM|ʫ! "!"!" * *|(|!!E|! "!"!" *ͺ|ʭ*##* E*##* #E|(|ʭ!ͱ** : *#* !|*##* !|Track-Info  N !!ͱ*##* > !ͱ> > M *#"!DMh&!DMh&z(!|* ͹|** +E*#* +E|(|Fgh!lFij!lFkl!l* +" !ͱ** !|> *#* !|*͊!|*͊> *#* !!ͱ> !ͱ> > M !DMh&!DMh&z(!|* ͺ|** #E*#* ##E|(|Fab!lFcd!lFef!l!ͱ** > !|*#* > !|*͊!|*͊*#* #!!ͱ> !ͱ> > M * #" !DMh&!DMh&z(!|f*|f*##* E*##* #Ez(!|f!"!"!"-!"4~*-#"-[4Rw*|ʘ*+* E*+* #E|(|?*+"!ͱ** !|*#* !|*##* : !*#* !ͱ> !ͱ> > M *+* EG*+* #EGz(!|F! !: ! !: > *+"!ͱ** !|*#* !|*##* : !*#* !ͱ> !ͱ> !!ͽ!ͱ!!:mn!!:op> M *+* EF*+* #EFz(!|M! !: ! !: > *+"!ͱ** !|*#* !|*##* : !*#* !ͱ> !ͱ> !!ͽ!ͱ!! :qr!! :st> M *#"*|h!"!" !"Fgh!lFij!lFkl!l!"!"!"Fî!X'Rgo,ɯRgo,ɯRgo,>++|x (?( 8 #+!0,}o+< ͩ-33 +B#0goDMö*N#F#T] < N#F#T] ö*DM=DM,!:\>+q#py#N#F#ö*N#F#}*e\+w+w*e\B"e\ʹ3_ULGö*>U">U">U">U">{}>>͎ 0_3ö*yOoyXgn&ɦlͿ*ͺ|ZF .$P..........*͊F ..$P.........*͊͜5F ...$P........*PLUS3DOS j  338392:7:1:0:0: "mario.scr" "mario.bin"38393 ("mario1.fnt"53332T 2"ch_mario.bin" 45-ū(y,14)>45-)((y,13 )=7ū(y,14)=7)sal=1:nu=0 b&g$=(i$sal=1)+(g$sal=0) lt=0870f v=y>19(x=137x=205x=381})940 y>19910 P20,4;"TIME:";t;(" "t<100d);21,4;"GOLD:";co;" " cont<11 m1=0c$=("$8............"cont=0)+(".$9..........."cont=1)+("..$8.........."cont=2)+("...$9........."cont=3)+("....$8........"cont=4)+(".....$9......."cont=5)+("......$8......"cont=6)+(".......$9....."cont=7)+("........$8...."cont=8)+(".........$9..."cont=9 )+("..........$8.."cont=10 ) cont>10 m1=0c$=("..........$0.."cont=11 )+(".........$A..."cont=12 )+("........$0...."cont=13 )+(".......$A....."cont=14)+("......$0......"cont=15)+(".....$A......."cont=16)+("....$0........"cont=17)+("...$A........."cont=18)+("..$0.........."cont=19)+(".$A..........."cont=20)+("$0............"cont=21) ycont2=cont2+1:m2=0j$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm3=0k$=("$M"cont2=1)+("$N"cont2=2)+("$O"conTrack-Info  N t2=3)+("$N"cont2=4) dm4=0l$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm5=0r$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) cont2=4cont2=0 8d$="$H":e$="$H":m$="$S":q$="$P...........":t$="$b" cont3<9 t$=("$c"(cont3=0cont3=1cont3=2cont3=3cont3=4cont3=5cont3=6cont3=7cont3=8)) =cont3<16d$=("$H"(cont3=0cont3=1cont3=2cont3=3cont3=4))+("$C"cont3=5)+("$D"cont3=6)+("$E"cont3=7)+("$F"cont3=8)+("$E"cont3=9 )+("$D"cont3=10 )+("$C"cont3=11 )+("$H"(cont3=12 cont3=13 cont3=14cont3=15)) Pcont3<16e$=("$H"cont3=0)+("$C"cont3=1)+("$D"cont3=2)+("$E"cont3=3)+("$F"cont3=4)+("$G"cont3=5)+("$H"(cont3=6cont3=7cont3=8cont3=9 cont3=10 ))+("$G"cont3=11 )+("$F"cont3=12 )+("$E"cont3=13 )+("$D"cont3=14)+("$C"cont3=15) ;cont3<17q$=(".$P.........."cont3=0)+("..$P........."cont3=1)+("...$P........"cont3=2)+("....$P......."cont3=3)+(".....$P......"cont3=4)+("......$P....."cont3=5)+(".......$P...."cont3=6)+("........$P..."cont3=7)+(".........$P.."cont3=8)+("........$P..."cont3=9 )+(".......$P...."cont3=10 )+("......$P....."cont3=11 )+(".....$P......"cont3=12 )+("....$P......."cont3=13 )+("...$P........"cont3=14)+("..$P........."cont3=15)+(".$P.........."cont3=16)  m$=d$:o$=d$ Ncont=cont+fr1:cont3=cont3+1:t=t-1:cont=22cont=0  cont3=22cont3=0 *sal=0300, 4L(y-3,13 )=45-ƫ(y-3,14)=45-y=y-1 >L(y-3,13 )>45-ū(y-3,14)>45-sal=0 H(nu=1+nu:nu=6sal=0 R 300, \####################### fF"')":10 ,5;"TIME OUT":C=05000:C:0 p 0 z3Estos bucles for/next ea cambio de Pause, ajustar ----------------------- N5;0;y-3,13 ;"$%";2;y-2,13 ;"&'" M10 ,10 ;"GAME OVER":C=05000:C:0:180 ----------------------- -236066\,84T:236077\,207 2,4;1;5;"##";0;" ";1;"####################";3,4;"##";0;" ";1;"####################" C=417:0;1;5;C,4;"##";0;7;" ";1;5;"##":C m18,4;1;5;"########################";19,4;"########################" |4;0;16,25;" ";15,25;"";1;17,25;" ";18,25;"" x=205995 x=381}998 Ͼ18,4;1;5;1;16,16;"##";17,16;"##";16,12 ;"##";17,12 ;"##";14,14;"##";15,14;"##" i(20,14)=01;0;7;9 ,14;"mn";10 ,14;"op"  1110V 18,4;1;5;1;12 ,16;"##";13 ,16;"##";16,12 ;"##";17,12 ;"##";17,14;"##";18,14;"##" i(20,12 )=11;0;6;9 ,14;"qr";10 ,14;"st"  1110V (20,14)=0ū(20,12 )=19 ,5;"WRONG!!";11 ,5;"YOU MUST TAKE THE";12 ,5;"AND THE RING!!":C=05000:C:0:180 0;6;9 ,10 ;"LEVEL END";10 ,10 ;"GOOD!";12 ,10 ;"MINI PANCHO BROS.":C=05000:C:0:180 (fr=1-fr:sal=11040  ajustar jx=23y=16(16,16)=77Mcont3=10 :y=14:X=137:300, hx=23y=16(16,16)=7cont3=10 :y=7:X=205:300, y<20(y+2,x)=7ƫ(y+2,x+1)=77;y,x;" ";y+1,x;d$;y+2,x;e$;1;3;y+2,x;" ";5;" ":y=y+1Track-Info  N  57342=253ſ57342=189x>0(y,x-1)=7ƫ(y+1,x-1)=7d$="gh":e$="ij":f$="kl":x=x-1:7;y,x;d$;" ";y+1,x;(e$fr=0);(f$fr=1);" ";y+1,x;1;5;" ";3;" " 57342=254ſ57342=190x<30(y,x+1)=7ƫ(y+1,x+2)=7d$="ab":e$="cd":f$="ef":7;y,x;" ";d$;y+1,x;" ";(e$fr=0);(f$fr=1);y+1,x+1;1;3;" ";5;" ":x=x+1 $32766=254ſ32766=190sal=0(y+2,x)7ū(y+2,x+1)7sal=1:nu=0 )C=05000:C .sal=0 8(y-1,x)=7ƫ(y-1,x+1)=7y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" " =%(y-1,x)=71Gū(y-1,x+1)=71G9 ,14;" ";10 ,14;" ":y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" ";0;1;7;20,14;"mn";21,14;"op" ?%(y-1,x)=70Fū(y-1,x+1)=70F9 ,14;" ";10 ,14;" ":y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" ";0;1;6;20,12 ;"qr";21,12 ;"st" B(nu=nu+1:nu=5sal=0 L VVx=6:y=6:d$="gh":e$="ij":f$="kl":sal=0:nu=0:fr=0 ` 1000 j 1120` (".$P.........."cont3=16)  m$=d$:o$=d$ Ncont=cont+fr1:cont3=cont3+1:t=t-1:cont=22cont=0  cont3=22cont3=0 *sal=0300, 4L(y-3,13 )=45-ƫ(y-3,14)=45-y=y-1 >L(y-3,13 )>45-ū(y-3,14)>45-sal=0"MID2ASM.":X=05000:X:0  180 *x=6,20,65,90,120,160,210,232,310,350,394 ----------------------- "x=137:y=16:sal=0:nu=0:fr=1:fr1=1:cont=0:cont2=0:cont3=0:t=500:m1=0:m2=0:m3=0:m4=0:m5=0:c$="..............":co=0:d$="$C":e$="$C":f$="$4":g$="12,34":h$=g$:i$="12,56":j$="$M":k$="$M":l$="$M":m$="$C":n$="$4":o$="$C":p$="$4":q$="$P...........":r$="$M...$K..$K$K...........................................................$S..............$K..$J......$J.........$K..$K..$K..$K..$X..$V..$W..$X..$Y......$Y..$Y..$Y..$Y..$Y..$Y......$2..$I......$2..$I...........................$K.................$K...................................................$J..$J..$J..$H...Z$1..$3..$3..$1......$1..$6..$1..$7..$6..$1..$3..$3..$3..$3$Q......$1..$B..$7..$1..$3..$3......$1..$6..$1...........................$1..$L..$7..$1..$b..$1......$3..$1..$3..$1..$3..$1..$R......$1..$6..$3..$3......$3..$b..$3..$3..$3..$3..$3..$3..$3..$3.$Q..$Q......$Y..$Y..$Y..$Y..$Y..$Y...............................$1..$6..$1..$7..$1..$3.....$P............$3..$1.........$a..........$1..$1..$b..$1..$6..$1..$3..$3..$3..$1...G12,34AS1XMASTER3BAS4XMASTER4BAS4XMASTER5BAS4"+e$+"..........$K..$J...................$K..$K...$K..$K$K...........................................................$S..............$K..$J......$J.........$K..$K..$K..$K..$X..$V..$W..$X..$Y......$Y..$Y..$Y..$Y..$Y..$Y......$2..$I......$2..$I...........................$K.................$K...................................................$J..$J..$J..$H..." Tz$="$1..$3..$3..$1......$1..$6..$1..$7..$6..$1..$3..$3..$3..$3$Q......$1..$B..$7..$1..$3..$3......$1..$6..$1...........................$1..$L..$7..$1.."+t$+"..$1......$3..$1..$3..$1..$3..$1..$R......$1..$6..$3..$3......$3.."+t$+"..$3..$3..$3..$3..$3..$3..$3..$3.$Q..$Q......$Y..$Y..$Y..$Y..$Y..$Y...............................$1..$6..$1..$7..$1..$3...."+q$+"..$3..$1.........$a..........$1..$1.."+t$+"..$1..$6..$1..$3..$3..$3..$1..." ^####################### h"@61";y$(xx+27) r"@01";a$(xx+27) |"@D1";b$(xx+27) "@H1";z$(xx+27) ####################### "@";(y);"C";g$;")'":g$=h$ ################Track-Info  N ####### (y-3,13 )=78Nƫ(y-3,14)=78Nx=24f$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d (y-3,13 )=78Nƫ(y-3,14)=78Nx=202n$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d ª(y-3,13 )=78Nƫ(y-3,14)=78Nx=293%p$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d ̪(y-3,13 )=78Nƫ(y-3,14)=78Nx=158s$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d ֪(y-3,13 )=78Nƫ(y-3,14)=78Nx=361iu$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d |sal=1((y-3,13 )=42*ū(y-3,14)=42*)x=1j$="$T":m2=1:co=co+1 ~sal=1((y-3,13 )=42*ū(y-3,14)=42*)x=128k$="$T":m3=1:co=co+1 ~sal=1((y-3,13 )=42*ū(y-3,14)=42*)x=107kl$="$T":m4=1:co=co+1 ~sal=1((y-3,13 )=42*ū(y-3,14)=42*)x=217r$="$T":m5=1:co=co+1 sal=1g$=i$:580D ((y-1,12 )=40(ƫ(y-2,12 )=40()((y-1,15)=40(ƫ(y-2,15)=40()5;y-2,13 ;" ":910 _((y,12 )=40(ū(y,13 )=40()5;y-1,13 ;" ":910 &n((y,13 )=96`ū(y,13 )=32 )((y,14)=96`ū(y,14)=32 )y=y-1 0n((y,13 )=45-ū(y,13 )=44,)((y,14)=45-ū(y,14)=44,)y=y+1 :-----------------------Los OR de los attr en las dos lineas siguientes se pueden revisar a posteriori, solo es importante en el y-2, en los otros podria funcionar <46 --------------------------- D57342=253ſ57342=189h$="78,90":i$="78,AB":g$=(h$fr=0)+(i$fr=1):((y-1,12 )=44,ū(y-1,12 )=45-)((y-2,12 )=44,ū(y-2,12 )=45-)x=x-1:fr=1-fr N57342=254ſ57342=190h$="12,34":i$="12,56":g$=(h$fr=0)+(i$fr=1):((y-2,15)=44,ū(y-2,15)=45-)((y-1,15)=44,ū(y-1,15)=45-)x=1+x:fr=1-fr X32766=254ſ32766=190sal=0((y,13 )>45-ū(y,14)>45-)((y,13 )=7ū(y,14)=7)sal=1:nu=0 b&g$=(i$sal=1)+(g$sal=0) lt=0870f v=y>19(x=137x=205x=381})940 y>19910 P20,4;"TIME:";t;(" "t<100d);21,4;"GOLD:";co;" " cont<11 m1=0c$=("$8............"cont=0)+(".$9..........."cont=1)+("..$8.........."cont=2)+("...$9........."cont=3)+("....$8........"cont=4)+(".....$9......."cont=5)+("......$8......"cont=6)+(".......$9....."cont=7)+("........$8...."cont=8)+(".........$9..."cont=9 )+("..........$8.."cont=10 ) cont>10 m1=0c$=("..........$0.."cont=11 )+(".........$A..."cont=12 )+("........$0...."cont=13 )+(".......$A....."cont=14)+("......$0......"cont=15)+(".....$A......."cont=16)+("....$0........"cont=17)+("...$A........."cont=18)+("..$0.........."cont=19)+(".$A..........."cont=20)+("$0............"cont=21) ycont2=cont2+1:m2=0j$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm3=0k$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm4=0l$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm5=0r$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) cont2=4cont2=0 8d$="$H":e$="$H":m$="$S":q$="$P...........":t$="$b" cont3<9 t$=("$c"(cont3=0cont3=1cont3=2cont3=3cont3=4cont3=5cont3=6cont3=7cont3=8)) =cont3<16Track-Info  N d$=("$H"(cont3=0cont3=1cont3=2cont3=3cont3=4))+("$C"cont3=5)+("$D"cont3=6)+("$E"cont3=7)+("$F"cont3=8)+("$E"cont3=9 )+("$D"cont3=10 )+("$C"cont3=11 )+("$H"(cont3=12 cont3=13 cont3=14cont3=15)) Pcont3<16e$=("$H"cont3=0)+("$C"cont3=1)+("$D"cont3=2)+("$E"cont3=3)+("$F"cont3=4)+("$G"cont3=5)+("$H"(cont3=6cont3=7cont3=8cont3=9 cont3=10 ))+("$G"cont3=11 )+("$F"cont3=12 )+("$E"cont3=13 )+("$D"cont3=14)+("$C"cont3=15) ;cont3<17q$=(".$P.........."cont3=0)+("..$P........."cont3=1)+("...$P........"cont3=2)+("....$P......."cont3=3)+(".....$P......"cont3=4)+("......$P....."cont3=5)+(".......$P...."cont3=6)+("........$P..."cont3=7)+(".........$P.."cont3=8)+("........$P..."cont3=9 )+(".......$P...."cont3=10 )+("......$P....."cont3=11 )+(".....$P......"cont3=12 )+("....$P......."cont3=13 )+("...$P........"cont3=14)+("..$P........."cont3=15)+(".$P.........."cont3=16)  m$=d$:o$=d$ Ncont=cont+fr1:cont3=cont3+1:t=t-1:cont=22cont=0  cont3=22cont3=0 *sal=0300, 4L(y-3,13 )=45-ƫ(y-3,14)=45-y=y-1 >L(y-3,13 )>45-ū(y-3,14)>45-sal=0 H(nu=1+nu:nu=6sal=0 R 300, \####################### f-"')":10 ,5;"TIME OUT":0 p 0 z3Este bucle for/next es a cambio de Pause, ajustar ----------------------- N5;0;y-3,13 ;"$%";2;y-2,13 ;"&'" M10 ,10 ;"GAME OVER":x=01000:x:0:180 ----------------------- -236066\,84T:236077\,207 2,4;1;5;"##";0;" ";1;"####################";3,4;"##";0;" ";1;"####################" C=417:0;1;5;C,4;"##";0;7;" ";1;5;"##":C m18,4;1;5;"########################";19,4;"########################" |4;0;16,25;" ";15,25;"";1;17,25;" ";18,25;"" x=205995 x=381}998 Ͼ18,4;1;5;1;16,16;"##";17,16;"##";16,12 ;"##";17,12 ;"##";14,14;"##";15,14;"##" i(20,14)=01;0;7;9 ,14;"mn";10 ,14;"op"  1110V 18,4;1;5;1;12 ,16;"##";13 ,16;"##";16,12 ;"##";17,12 ;"##";17,14;"##";18,14;"##" i(20,12 )=11;0;6;9 ,14;"qr";10 ,14;"st"  1110V (20,14)=0ū(20,12 )=19 ,14;"WRONG!!";11 ,14;"YOU MUST TAKE THE";12 ,14;"AND THE RING!!":X=05000:X:0:180 0;6;9 ,14;"LEVEL END";10 ,14;"Good!";12 ,14;"MINI PANCHO BROS.":X=05000:X:0:180 (fr=1-fr:sal=11040  ajustar jx=23y=16(16,16)=77Mcont3=10 :y=14:X=137:300, hx=23y=16(20,14)=0cont3=10 :y=7:X=205:300, y<20(y+2,x)=7ƫ(y+2,x+1)=77;y,x;" ";y+1,x;d$;y+2,x;e$;1;3;y+2,x;" ";5;" ":y=y+1 57342=253ſ57342=189x>0(y,x-1)=7ƫ(y+1,x-1)=7d$="gh":e$="ij":f$="kl":x=x-1:7;y,x;d$;" ";y+1,x;(e$fr=0);(f$fr=1);" ";y+1,x;1;5;" ";3;" " 57342=254ſ57342=190x<30(y,x+1)=7ƫ(y+1,x+2)=7d$="ab":e$="cd":f$="ef":7;y,x;" ";d$;y+1,x;" ";(e$fr=0);(f$fr=1);y+1,x+1;1;3Track-Info  N ;" ";5;" ":x=x+1 $32766=254ſ32766=190sal=0(y+2,x)7ū(y+2,x+1)7sal=1:nu=0 )C=05000:C .sal=0 8(y-1,x)=7ƫ(y-1,x+1)=7y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" " =%(y-1,x)=71Gū(y-1,x+1)=71G9 ,14;" ";10 ,14;" ":y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" ";0;1;7;20,14;"mn";21,14;"op" ?%(y-1,x)=70Fū(y-1,x+1)=70F9 ,14;" ";10 ,14;" ":y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" ";0;1;6;20,12 ;"qr";21,12 ;"st" B(nu=nu+1:nu=5sal=0 L VVx=6:y=6:d$="gh":e$="ij":f$="kl":sal=0:nu=0:fr=0 ` 1000 j 1120` t+236066\,0:236077\,60< ~ '+236066\,0:236077\,60< xaron ontont tN$4P$4S$4U$4H78,90I78,ABFefR$OT$bD$DE$HQ .......$P....M$DO$DY....$J..$J........................................................................................................$T..$O...........................................................................................$4..$I.......$T..$O........................................$D..............................$4..$I.......................$8.....................................$4...................................$J..$J..$J..$H...A....$J..$J..$O...............................$2.......................$D..............$K...............................................$T..$O..$T..$T..................$4.....................................................................$D..............$S......$W..$V..$X..$W..$S..$V.....................................$2..$2..$2.............................$K..$a.......$P....$I..........................$J..$J..$J..$H...B....$J..$J.......................ef..$I...............$8..$S..........$H..........$K..$J...................$K..$K...$K..$K$K...........................................................$S..............$K..$J......$J.........$K..$K..$K..$K..$X..$V..$W..$X..$Y......$Y..$Y..$Y..$Y..$Y..$Y......$2..$I......$2..$I...........................$K.................$K...................................................$J..$J..$J..$H...Z$1..$3..$3..$1......$1..$6..$1..$7..$6..$1..$3..$3..$3..$3$Q......$1..$B..$7..$1..$3..$3......$1..$6..$1...........................$1..$L..$7..$1..$b..$1......$3..$1..$3..$1..$3..$1..$R......$1..$6..$3..$3......$3..$b..$3..$3..$3..$3..$3..$3..$3..$3.$Q..$Q......$Y..$Y..$Y..$Y..$Y..$Y...............................$1..$6..$1..$7..$1..$3...........$P......$3..$1.........$a..........$1..$1..$b..$1..$6..$1..$3..$3..$3..$1...G78,90C..........$8..J$NK$NL$N:y=14:X=137:300, hx=23y=16(20,14)=0cont3=10 :y=7:X=205:300, y<20(y+2,x)=7ƫ(y+2,x+1)=77;y,x;" ";y+1,x;d$;y+2,x;e$;1;3;y+2,x;" ";5;" ":y=y+1 57342$J..$J.."+j$+"...............................$2......................."+d$+"..............$K...............................................$T.."+k$+"..$T..$T.................."+s$+"....................................................................."+m$+"..............$S......$W..$V..$X..$W..$S..$V.....................................$2..$2..$2.............................$K..$a"+q$+"$I..........................$J..$J..$J..$H..." Jb$="....$J..$J......................."+f$+"..$I....."+c$+"$S.........."+e$+"..........$K..$J...................$K..$K...$K..$K$K...........................................................$S..............$K..$J......$J.........$K..$K..$K..$K..$X..$V..$W..$X..$Y......$Y..$Y..$Y..$Y..$Y..$Y......$2..$I......$2..$I...........................$K.................$K...................................................$J..$J..$J..$H..." Tz$="$1..$3..$3..$1......$1..$6..$1..$7..$6..$1..$3..$3..$3..$3$Q......$1..$B..$7..$1..$3..$3......$1..$6..$1...........................$1..$L..$7..$1Track-Info  N         .."+t$+"..$1......$3..$1..$3..$1..$3..$1..$R......$1..$6..$3..$3......$3.."+t$+"..$3..$3..$3..$3..$3..$3..$3..$3.$Q..$Q......$Y..$Y..$Y..$Y..$Y..$Y...............................$1..$6..$1..$7..$1..$3...."+q$+"..$3..$1.........$a..........$1..$1.."+t$+"..$1..$6..$1..$3..$3..$3..$1..." ^####################### h"@61";y$(xx+27) r"@01";a$(xx+27) |"@D1";b$(xx+27) "@H1";z$(xx+27) ####################### "@";(y);"C";g$;")'":g$=h$ ####################### (y-3,13 )=78Nƫ(y-3,14)=78Nx=24f$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d (y-3,13 )=78Nƫ(y-3,14)=78Nx=202n$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d ª(y-3,13 )=78Nƫ(y-3,14)=78Nx=293%p$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d ̪(y-3,13 )=78Nƫ(y-3,14)=78Nx=158s$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d ֪(y-3,13 )=78Nƫ(y-3,14)=78Nx=361iu$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d |sal=1((y-3,13 )=42*ū(y-3,14)=42*)x=1j$="$T":m2=1:co=co+1 ~sal=1((y-3,13 )=42*ū(y-3,14)=42*)x=128k$="$T":m3=1:co=co+1 ~sal=1((y-3,13 )=42*ū(y-3,14)=42*)x=107kl$="$T":m4=1:co=co+1 ~sal=1((y-3,13 )=42*ū(y-3,14)=42*)x=217r$="$T":m5=1:co=co+1 sal=1g$=i$:580D ((y-1,12 )=40(ƫ(y-2,12 )=40()((y-1,15)=40(ƫ(y-2,15)=40()5;y-2,13 ;" ":910 _((y,12 )=40(ū(y,13 )=40()5;y-1,13 ;" ":910 &n((y,13 )=96`ū(y,13 )=32 )((y,14)=96`ū(y,14)=32 )y=y-1 0n((y,13 )=45-ū(y,13 )=44,)((y,14)=45-ū(y,14)=44,)y=y+1 :-----------------------Los OR de los attr en las dos lineas siguientes se pueden revisar a posteriori, solo es importante en el y-2, en los otros podria funcionar <46 --------------------------- D57342=253ſ57342=189h$="78,90":i$="78,AB":g$=(h$fr=0)+(i$fr=1):((y-1,12 )=44,ū(y-1,12 )=45-)((y-2,12 )=44,ū(y-2,12 )=45-)x=x-1:fr=1-fr N57342=254ſ57342=190h$="12,34":i$="12,56":g$=(h$fr=0)+(i$fr=1):((y-2,15)=44,ū(y-2,15)=45-)((y-1,15)=44,ū(y-1,15)=45-)x=1+x:fr=1-fr X32766=254ſ32766=190sal=0((y,13 )>45-ū(y,14)>45-)((y,13 )=7ū(y,14)=7)sal=1:nu=0 b&g$=(i$sal=1)+(g$sal=0) lt=0870f v=y>19(x=137x=205x=381})940 y>19910 P20,4;"TIME:";t;(" "t<100d);21,4;"GOLD:";co;" " cont<11 m1=0c$=("$8............"cont=0)+(".$9..........."cont=1)+("..$8.........."cont=2)+("...$9........."cont=3)+("....$8........"cont=4)+(".....$9......."cont=5)+("......$8......"cont=6)+(".......$9....."cont=7)+("........$8...."cont=8)+(".........$9..."cont=9 )+("..........$8.."cont=10 ) cont>10 m1=0c$=("..........$0.."cont=11 )+(".........$A..."cont=12 )+("........$0...."cont=13 )+(".......$A....."cont=14)+("......$0......"cont=15)+(".....$A......."cont=16)+("....$0........"cont=17)+("...$A........."cont=18)+("..$0.........."cont=19)+(".$A..........."cont=20)+("$0............"cont=21) ycont2=cont2+1:m2=0j$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm3=0k$=("$M"cont2=1)+("$N"cont2=2)+("$O"conTrack-Info ! N!!!!!!!!! t2=3)+("$N"cont2=4) dm4=0l$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm5=0r$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) cont2=4cont2=0 8d$="$H":e$="$H":m$="$S":q$="$P...........":t$="$b" cont3<9 t$=("$c"(cont3=0cont3=1cont3=2cont3=3cont3=4cont3=5cont3=6cont3=7cont3=8)) =cont3<16d$=("$H"(cont3=0cont3=1cont3=2cont3=3cont3=4))+("$C"cont3=5)+("$D"cont3=6)+("$E"cont3=7)+("$F"cont3=8)+("$E"cont3=9 )+("$D"cont3=10 )+("$C"cont3=11 )+("$H"(cont3=12 cont3=13 cont3=14cont3=15)) Pcont3<16e$=("$H"cont3=0)+("$C"cont3=1)+("$D"cont3=2)+("$E"cont3=3)+("$F"cont3=4)+("$G"cont3=5)+("$H"(cont3=6cont3=7cont3=8cont3=9 cont3=10 ))+("$G"cont3=11 )+("$F"cont3=12 )+("$E"cont3=13 )+("$D"cont3=14)+("$C"cont3=15) ;cont3<17q$=(".$P.........."cont3=0)+("..$P........."cont3=1)+("...$P........"cont3=2)+("....$P......."cont3=3)+(".....$P......"cont3=4)+("......$P....."cont3=5)+(".......$P...."cont3=6)+("........$P..."cont3=7)+(".........$P.."cont3=8)+("........$P..."cont3=9 )+(".......$P...."cont3=10 )+("......$P....."cont3=11 )+(".....$P......"cont3=12 )+("....$P......."cont3=13 )+("...$P........"cont3=14)+("..$P........."cont3=15)+(".$P.........."cont3=16)  m$=d$:o$=d$ Ncont=cont+fr1:cont3=cont3+1:t=t-1:cont=22cont=0  cont3=22cont3=0 *sal=0300, 4L(y-3,13 )=45-ƫ(y-3,14)=45-y=y-1 >L(y-3,13 )>45-ū(y-3,14)>45-sal=0!"!"!"!"!!"#!"/!"%!"'!")!"+!"-L..............!r!"1L$C!rL$C!rL$4!rL12,34!r!͂!rL12,56!rL$M!rL$M!rL$M!rL$C!rL$4!rL$C!rL$4!rL $P...........!rL$M!rL$4!rL$b!rL$4!r![ɧR"Lv....$J..$J........................................................................................................$T..!͂͜5L[...........................................................................................͜5!͂͜5L..$I.......$T..͜5!͂͜5L(........................................͜5!͂͜5L..............................͜5!͂͜5L..$I.............͜5!͂͜5L#...................................͜5!͂͜5L4...................................$J..$J..$J..$H...͜5!rͿL ....$J..$J..!͂͜5L8...............................$2.......................͜5!͂͜5LC..............$K...............................................$T..͜5!͂͜5L..$T..$T..................͜5!͂͜5LE.....................................................................͜5!͂͜5L~..............$S......$W..$V..$X..$W..$S..$V.....................................$2..$2..$2.............................$K..$a͜5!͂͜5L-$I..........................$J..$J..$J..$H...͜5!@rͿL!....$J..$J.......................!͂͜5L ..$I.....͜5!͂͜5L $S..........͜5!͂͜5L`..........$K..$J...................$K..$K...$K..$K$K...........................................................$S..............$K..$J......$J.........$K..$K..$K..$K..$X..$V..$W..$X..$Y......$Y..$Y..$Y..$Y..$Y..$Y......$2..$I......$2..$I...........................$K.................$K...................................................$J..$J..$J..$H...͜5!rͿLȓ$1..$3..$3..$1......$1..$6..$1..$7..$6..$1..$3..$3..$3..$3$Q......$1..$B..$7..$1..$3..$3......$1..$6..$1...........................$1..$L..$7..$1..!͂͜5LB..$1......$3..$1..$3..$1..$3..$1..$R......$1..$6..$3..$3......$3..͜5!͂͜5L|..$3..$3..$3..$3..$3..$3..$3..$3.$Q..$Q......$Y..$Y..$Y..$Y..$Y..$Y...............................$1..$6..$1..$7..$1..$3....͜5!͂͜5L%..$3..$1.........$a..........$1..$1..͜5!͂͜5L..$1..$6..$1..$3..$3..$3..$1...͜5!rͿ@@61!͊**"> @@01!@͊**"> @@D1!͊**"> @@H1!͊**"> >@*}5>C!͂Track-Info " N""""""""" @)'> Ϳ!͂!r*+++! EN*+++!EN|(*|(|ܨL$5!rͪz# =!ͯ8*R! !ͽ!ͷ@TIME UP!> M */d"/*+++! EN*+++!EN|(*|(|zL$5!rͪz# =!ͯ8*R! !ͽ!ͷ@TIME UP!> M */d"/*+++! EN*+++!EN|(*%|(|L$5!rͪz# =!ͯ8*R! !ͽ!ͷ@TIME UP!> M */d"/*+++! EN*+++!EN|(*|(|ʶL$5!rͪz# =!ͯ8*R! !ͽ!ͷ@TIME UP!> M */d"/*+++! EN*+++!EN|(*i|(|TL$5!rͪz# =!ͯ8*R! !ͽ!ͷ@TIME UP!> M */d"/**+++! E**+++!E*z(!|(|ū*|ūL$T!r!"'*1#"1**+++! E**+++!E*z(!|(|6*|6L$T!r!")*1#"1**+++! E**+++!E*z(!|(|ʧ*k|ʧL$T!r!"+*1#"1**+++! E**+++!E*z(!|(|*|L$T!r!"-*1#"1*|5!͂!r*+! E(*++! E(|(*+!E(*++!E(|(z(!|í!ͽ*++! @ > M ξ*! E(*! E(z(!|!ͽ*+! @ > M ξ*! E`*! E z(!*!E`*!E z(!z(!|ʊ*+"*! E-*! E,z(!*!E-*!E,z(!|(|*#"!DMh&!DMh&z(!|L78,90!rL78,AB!r!͂*͐!͂*͐͜5!rͿ*+! E,*+! E-z(!*++! E,*++! E-z(!|(|*+"![ɧR"!DMh&!DMh&z(!|L12,34!rL12,56!r!͂*͐!͂*͐͜5!rͿ*++!E,*++!E-z(!*+!E,*+!E-z(!|(|!["![ɧR"!DMh&!DMh&z(!|ʭ*|ʭ*! E-Ϳ*!E-Ϳz(!*! E*!Ez(!z(!|ʭ!"!"!͂*͐!͂*͐͜5!rͿ*/|—*Ϳ**z(!*}z(!|(|Q*Ϳ|ξ!!@TIME:*/> !!@GOLD:*1> > * *%|(|L$8............*͐L.$9...........*͐͜5L..$8..........*͐͜5L...$9.........*͐͜5L....$8........*͐͜5L.....$9.......*͐͜5L......$8......*͐͜5L.......$9.....*͐͜5L........$8....*͐͜5L.........$9...* ͐͜5L..........$8..* ͐͜5!rͿ* Ϳ*%|(|ʰL..........$0..* ͐L.........$A...* ͐͜5L........$0....* ͐͜5L.......$A.....*͐͜5L......$0......*͐͜5L.....$A.......*͐͜5L....$0........*͐͜5L...$A.........*͐͜5L..$0..........*͐͜5L.$A...........*͐͜5L$0............*͐͜5!rͿ*!#"!*'|#L$M*!͐L$N*!͐͜5L$O*!͐͜5L$N*!͐͜5!rͿ*)|ʏL$M*!͐L$N*!͐͜5L$O*!͐͜5L$N*!͐͜5!rͿ*+|L$M*!͐L$N*!͐͜5L$O*!͐͜5L$N*!͐͜5!rͿ*-|gL$M*!͐L$N*!͐͜5L$O*!͐͜5L$N*!͐͜5!rͿ*!|{!"!L$H!rL$H!rL$S!rL $P...........!rL$b!r*# |ʆL$c*#*#z(!*#z(!*#z(!*#z(!*#z(!*#z(!*#z(!*#z(!͐!r*#|L$H*#*#z(!*#z(!*#z(!*#z(!͐L$C*#͐͜5L$D*#͐͜5L$E*#͐͜5L$F*#͐͜5L$E*# ͐͜5L$D*# ͐͜5L$C*# ͐͜5L$H*# *# z(!*#z(!*#z(!͐͜5!rͿ*#|ML$H*#͐L$C*#͐͜5LTrack-Info # N######### $D*#͐͜5L$E*#͐͜5L$F*#͐͜5L$G*#͐͜5L$H*#*#z(!*#z(!*# z(!*# z(!͐͜5L$G*# ͐͜5L$F*# ͐͜5L$E*# ͐͜5L$D*#͐͜5L$C*#͐͜5!rͿ*#|ʒL .$P..........*#͐L ..$P.........*#͐͜5L ...$P........*#͐͜5L ....$P.......*#͐͜5L .....$P......*#͐͜5L ......$P.....*#͐͜5L .......$P....*#͐͜5L ........$P...*#͐͜5L .........$P..*#͐͜5L ........$P...*# ͐͜5L .......$P....*# ͐͜5L ......$P.....*# ͐͜5L .....$P......*# ͐͜5L ....$P.......*# ͐͜5L ...$P........*#͐͜5L ..$P.........*#͐͜5L .$P..........*#͐͜5!rͿ!͂!r!͂!r*["*##"#*/+"/*|׽!"*#|!"#*|{*+++! E-*+++!E-|(|6*+"*+++! E-Ϳ*+++!E-Ϳz(!|u!"!["*|ʔ!"{@')> ! !@TIME OUT> !X!X!ͽ!ͷ*+++! @$%!ͷ*++! @&'> M ! ! @ GAME OVER> !"!"8C*#"[8R M !"!" M *#"[ M !ͽ!ͷ!!@ !!>!!!@ !!>> M *|*}|!!!ͽ!ͷ!!!@##!!@##!! @##!! @##!!@##!!@##> M !ͽ!ͷ! !@mn! !@op> M [!!!ͽ!ͷ!! !@##! !@##!! @##!! @##!!@##!!@##> M !ͽ!ͷ! !@qr! !@st> M [![ɧR"*|**|(|!"{*|*##*E*##*#E|(|!ͷ**@ *#*!@͂*##*!͂!!ͷ*##*> !ͷ> > M *#"!DMh&!DMh&z(!|*Ϳ|**+E*#*+E|(|Lgh!@rLij!rLkl!r*+"!ͷ**!@͂> *#*!͂*͐!͂*͐> *#*!!ͷ> !ͷ> > M !DMh&!DMh&z(!| *| **#E*#*##E|(| Lab!@rLcd!rLef!r!ͷ**> !@͂*#*> !͂*͐!͂*͐*#*#!!ͷ> !ͷ> > M *#"!DMh&!DMh&z(!|ʉ*|ʉ*##*E*##*#Ez(!|ʉ!"!"*|ʘ*+*E*+*#E|(|?*+"!ͷ**!@͂*#*!͂*##*@ !*#*!ͷ> !ͷ> > M *#"*|Z!"!"!"Lgh!@rLij!rLkl!r!"!"!"à!6\6!7\6++|x (?( 8 #+!0,}o+< ͯ-33 +B#0goDMö*N#F#T] < N#F#T] ö*DM=DM,!:\>+q#py#N#F#ö*N#F#}*e\+w+w*e\B"e\ʹ3_ULGö*>U">U">U">U">{}>>͎ 0_3ö*yOoyXgn&͐L$N*!͐͜5L$O*!͐͜5L$N*!͐͜5!rͿ*!|{!"!L$H!rL$H!rL$S!rL $P...........!rL$b!r*# |ʆL$c*#*#z(!*#z(!*#z(!PLUS3DOS \ < 4 Hisoft BASIC + CharAde########################### 4 mario.bin org 39583, 10328 bytes 4 mario1.fnt org 53332, 768 bytes (4 charade engine org 54100, 11040 bytes 2####################### <339582:7:1:0:0: F"mario.scr" P"mario1.fnt"53332T U"mario.bin" Z"ch_mTrack-Info $ N$$$$$$$$$ ario.bin" dt236066\,84T:236077\,207:1;7;2,4;"HELLO, YOU ARE PANCHO, ";3,4;"THE LITTLE BROTHER OF MA";4,4;"RIO~S AUNT-IN-LAW UNCLE.";5,4;"TO HELP MARIO, YOU MUST ";6,4;"TAKE 10 COINS AND THE ";7,4;"GOLD KEY TO PLAY THE ";8,4;"NEXT LEVEL... " nx=9 19:x,4;" ";x,25;" ":x:x=1719:x,13 ;1;0;4;" ":x:0 s39583 ytaronontontb@F$4N$4P$4S$4U$4H12,34I12,56C..$0..........J$OK$OL$OR$OD$HE$HT$bQ .$P..........M$HO$HY....$J..$J........................................................................................................$T..$O...........................................................................................$4..$I.......$T..$O........................................$H..............................$4..$I...............$0.............................................$4...................................$J..$J..$J..$H...A....$J..$J..$O...............................$2.......................$H..............$K...............................................$T..$O..$T..$T..................$4.....................................................................$H..............$S......$W..$V..$X..$W..$S..$V.....................................$2..$2..$2.............................$K..$a.$P..........$I..........................$J..$J..$J..$H...B....$J..$J.......................$4..$I.......$0..........$S..........$H..........$K..$J...................$K..$K...$K..$K$K...........................................................$S..............$K..$J......$J.........$K..$K..$K..$K..$X..$V..$W..$X..$Y......$Y..$Y..$Y..$Y..$Y..$Y......$2..$I......$2..$I...........................$K.................$K...................................................$J..$J..$J..$H...Z$1..$3..$3..$1......$1..$6..$1..$7..$6..$1..$3..$3..$3..$3$Q......$1..$B..$7..$1..$3..$3......$1..$6..$1...........................$1..$L..$7..$1..$b..$1......$3..$1..$3..$1..$3..$1..$R......$1..$6..$3..$3......$3..$b..$3..$3..$3..$3..$3..$3..$3..$3.$Q..$Q......$Y..$Y..$Y..$Y..$Y..$Y...............................$1..$6..$1..$7..$1..$3.....$P............$3..$1.........$a..........$1..$1..$b..$1..$6..$1..$3..$3..$3..$1...G12,34 H(nu=1+nu:nu=6sal=0 R 300, \####################### f-"')":10 ,5;"TIME OUT":0 p 0 z3Este bucle for/next es a cambio de Pause, ajustar ----------------------- N5;0;y-3,13 ;"$%";2;y-2,13 ;"&'" D10 ,10 ;"GAME OVER":x=01000:x:180 ----------------------- -236066\,84T:236077\,207 2,4;1;5;"##";0;" ";1;"####################";3,4;"##";0;" ";1;"####################" y=417:0;1;5;y,4;"##";0;7;" ";1;5;"##":y m18,4;1;5;"########################";19,4;"########################" |4;0;16,25;" ";15,25;"";1;17,25;" ";18,25;"" x=205995 x=381}998 Ͼ18,4;1;5;1;16,16;"##";17,16;"##";16,12 ;"##";17,12 ;"##";14,14;"##";15,14;"##" i(20,14)=71;0;7;9 ,14;"mn";10 ,14;"op" '0,0;(20,12 )  1110V 18,4;1;5;1;12 ,16;"##";13 ,16;"##";16,12 ;"##";17,12 ;"##";17,14;"##";18,14;"##" i(20,12 )=11;0;6;9 ,14;"qr";10 ,14;"st"  1110V U0;6;9 ,14;"Exit";10 ,14;"Good!"::1110V (fr=1-fr:sal=11040  ajustar ix=23y=16(16,16)=77Mcont3=6:y=14:X=137:300, gx=23y=16(20,14)=0Track-Info % N%%%%%%%%% cont3=6:y=7:X=205:300, y<20(y+2,x)=7ƫ(y+2,x+1)=77;y,x;" ";y+1,x;d$;y+2,x;e$;1;3;y+2,x;" ";5;" ":y=y+1 57342=253ſ57342=189x>0(y,x-1)=7ƫ(y+1,x-1)=7d$="gh":e$="ij":f$="kl":x=x-1:7;y,x;d$;" ";y+1,x;(e$fr=0);(f$fr=1);" ";y+1,x;1;5;" ";3;" " 57342=254ſ57342=190x<30(y,x+1)=7ƫ(y+1,x+2)=7d$="ab":e$="cd":f$="ef":7;y,x;" ";d$;y+1,x;" ";(e$fr=0);(f$fr=1);y+1,x+1;1;3;" ";5;" ":x=x+1 $32766=254ſ32766=190sal=0(y+2,x)7ū(y+2,x+1)7sal=1:nu=0 .sal=0 8(y-1,x)=7ƫ(y-1,x+1)=7y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" " =%(y-1,x)=71Gū(y-1,x+1)=71G9 ,14;" ";10 ,14;" ":y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" ";0;1;7;20,14;"mn";21,14;"op" ?%(y-1,x)=70Fū(y-1,x+1)=70F9 ,14;" ";10 ,14;" ":y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" ";0;1;6;20,12 ;"qr";21,12 ;"st" B(nu=nu+1:nu=5sal=0 L VVx=6:y=6:d$="gh":e$="ij":f$="kl":sal=0:nu=0:fr=0 ` 1000 j 1120` t+236066\,0:236077\,60< ~ '+236066\,0:236077\,60< x aronontonttF$4H12,34I12,56N$4P$4S$4U$4J$MK$ML$MR$MT$cD$HE$FQ .....$P......M$HO$HY....$J..$J........................................................................................................$T..$M...........................................................................................$4..$I.......$T..$M........................................$H..............................$4..$I...............$8.............................................$4...................................$J..$J..$J..$H...Z$1..$3..$3..$1......$1..$6..$1..$7..$6..$1..$3..$3..$3..$3$Q......$1..$B..$7..$1..$3..$3......$1..$6..$1...........................$1..$L..$7..$1..$c..$1......$3..$1..$3..$1..$3..$1..$R......$1..$6..$3..$3......$3..$c..$3..$3..$3..$3..$3..$3..$3..$3.$Q..$Q......$Y..$Y..$Y..$Y..$Y..$Y...............................$1..$6..$1..$7..$1..$3.........$P........$3..$1.........$a..........$1..$1..$c..$1..$6..$1..$3..$3..$3..$1...G12,34AabBcdCef;3,4;"##";0;" ";1;"####################" y=417:0;1;5;y,4;"##";0;7;" ";1;5;"##":y m18,4;1;5;"########################";19,4;"########################" |4;0;16,25;" ";15,25;"";1;17,25;" ";18,25;"" x=20597\,60< ~ '+236066\,0:236077\,60< naron ontont tF$4N$4P$4S$4U$4H12,34I12,56Y....$J..$J........................................................................................................$T..$M...........................................................................................$4..$I.......$T..$M.................y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" " =%(y-1,x)=71Gū(y-1,x+1)=71G9 ,14;" ";10 ,14;" ":y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" ";0;1;7;20,14;"mn";21,14;"op" ?%(y-1,x)=70Fū(y-1,x+1)=70F9 ,14;" ";10 ,14Track-Info & N&&&&&&&&& ;" ":y=y-1:7;y,x;d$;y+1,x;f$;y+2,x;" ";1;y+1,x;3;" ";5;" ";0;1;6;20,12 ;"qr";21,12 ;"st" B(nu=nu+1:nu=5sal=0 L VVx=6:y=6:d$="gh":e$="ij":f$="kl":sal=0:nu=0:fr=0 ` 1000 j 1120` t+236066\,0:236077\,60< ~ '+236066\,0:236077\,60< xaron ontont tN$4P$4S$4U$4H78,90I78,ABFefR$OT$bD$DE$HQ .......$P....M$DO$DY....$J..$J........................................................................................................$T..$O...........................................................................................$4..$I.......$T..$O........................................$D..............................$4..$I.......................$8.....................................$4...................................$J..$J..$J..$H...A....$J..$J..$O...............................$2.......................$D..............$K...............................................$T..$O..$T..$T..................$4.....................................................................$D..............$S......$W..$V..$X..$W..$S..$V.....................................$2..$2..$2.............................$K..$a.......$P....$I..........................$J..$J..$J..$H...B....$J..$J.......................ef..$I...............$8..$S..........$H..........$K..$J...................$K..$K...$K..$K$K...........................................................$S..............$K..$J......$J.........$K..$K..$K..$K..$X..$V..$W..$X..$Y......$Y..$Y..$Y..$Y..$Y..$Y......$2..$I......$2..$I...........................$K.................$K...................................................$J..$J..$J..$H...Z$1..$3..$3..$1......$1..$6..$1..$7..$6..$1..$3..$3..$3..$3$Q......$1..$B..$7..$1..$3..$3......$1..$6..$1...........................$1..$L..$7..$1..$b..$1......$3..$1..$3..$1..$3..$1..$R......$1..$6..$3..$3......$3..$b..$3..$3..$3..$3..$3..$3..$3..$3.$Q..$Q......$Y..$Y..$Y..$Y..$Y..$Y...............................$1..$6..$1..$7..$1..$3...........$P......$3..$1.........$a..........$1..$1..$b..$1..$6..$1..$3..$3..$3..$1...G78,90C..........$8..J$NK$NL$NV 18,4;1;5;1;12 ,16;"##";13 ,16;"##";16,12e$+"..........$K..$J...................$K..$K...$K..$K$K...........................................................$S..............$K..$J......$J.........$K..$K..$K..$K..$X..$V..$W..$X..$Y......$Y..$Y..$Y..$Y..$Y..$Y......$2..$I......$2..$I...........................$K.................$K...................................................$J..$J..$J..$H..." Tz$="$1..$3..$3..$1......$1..$6..$1..$7..$6..$1..$3..$3..$3..$3$Q......$1..$B..$7..$1..$3..$3......$1..$6..$1...........................$1..$L..$7..$1.."+t$+"..$1......$3..$1..$3..$1..$3..$1..$R......$1..$6..$3..$3......$3.."+t$+"..$3..$3..$3..$3..$3..$3..$3..$3.$Q..$Q......$Y..$Y..$Y..$Y..$Y..$Y...............................$1..$6..$1..$7..$1..$3...."+q$+"..$3..$1.........$a..........$1..$1.."+t$+"..$1..$6..$1..$3..$3..$3..$1..." ^####################### h"@61";y$(xx+27) r"@01";a$(xx+27) |"@D1";b$(xx+27) "@H1";z$(xx+27) ####################### "@";(y);"C";g$;")'":g$=h$ ####################### (y-3,13 )=78Nƫ(y-3,14)=78Nx=24f$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d (y-3,13 )=78Nƫ(y-3,14)=78Nx=202n$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d ª(y-3,13 )=78Nƫ(y-3,14)=78Nx=293%p$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d ̪(y-3,13 )=78Nƫ(y-3,14)=78Nx=158s$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d ֪(y-3,13 )=78Nƫ(y-3,14)=78Nx=361iu$="$5":0.01z# =,25:y-6,13 ;5;6;"TIME UP!":t=t+100d |sal=1((y-3,13 )=42*ū(y-3,14)=42*)x=1j$="$T":m2=1:co=co+1 ~sal=1((yTrack-Info ' N''''''''' -3,13 )=42*ū(y-3,14)=42*)x=128k$="$T":m3=1:co=co+1 ~sal=1((y-3,13 )=42*ū(y-3,14)=42*)x=107kl$="$T":m4=1:co=co+1 ~sal=1((y-3,13 )=42*ū(y-3,14)=42*)x=217r$="$T":m5=1:co=co+1 sal=1g$=i$:580D ((y-1,12 )=40(ƫ(y-2,12 )=40()((y-1,15)=40(ƫ(y-2,15)=40()5;y-2,13 ;" ":910 _((y,12 )=40(ū(y,13 )=40()5;y-1,13 ;" ":910 &n((y,13 )=96`ū(y,13 )=32 )((y,14)=96`ū(y,14)=32 )y=y-1 0n((y,13 )=45-ū(y,13 )=44,)((y,14)=45-ū(y,14)=44,)y=y+1 :-----------------------Los OR de los attr en las dos lineas siguientes se pueden revisar a posteriori, solo es importante en el y-2, en los otros podria funcionar <46 --------------------------- D57342=253ſ57342=189h$="78,90":i$="78,AB":g$=(h$fr=0)+(i$fr=1):((y-1,12 )=44,ū(y-1,12 )=45-)((y-2,12 )=44,ū(y-2,12 )=45-)x=x-1:fr=1-fr N57342=254ſ57342=190h$="12,34":i$="12,56":g$=(h$fr=0)+(i$fr=1):((y-2,15)=44,ū(y-2,15)=45-)((y-1,15)=44,ū(y-1,15)=45-)x=1+x:fr=1-fr X32766=254ſ32766=190sal=0((y,13 )>45-ū(y,14)>45-)((y,13 )=7ū(y,14)=7)sal=1:nu=0 b&g$=(i$sal=1)+(g$sal=0) lt=0870f v=y>19(x=137x=205x=381})940 y>19910 P20,4;"TIME:";t;(" "t<100d);21,4;"GOLD:";co;" " cont<11 m1=0c$=("$8............"cont=0)+(".$9..........."cont=1)+("..$8.........."cont=2)+("...$9........."cont=3)+("....$8........"cont=4)+(".....$9......."cont=5)+("......$8......"cont=6)+(".......$9....."cont=7)+("........$8...."cont=8)+(".........$9..."cont=9 )+("..........$8.."cont=10 ) cont>10 m1=0c$=("..........$0.."cont=11 )+(".........$A..."cont=12 )+("........$0...."cont=13 )+(".......$A....."cont=14)+("......$0......"cont=15)+(".....$A......."cont=16)+("....$0........"cont=17)+("...$A........."cont=18)+("..$0.........."cont=19)+(".$A..........."cont=20)+("$0............"cont=21) ycont2=cont2+1:m2=0j$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm3=0k$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm4=0l$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) dm5=0r$=("$M"cont2=1)+("$N"cont2=2)+("$O"cont2=3)+("$N"cont2=4) cont2=4cont2=0 8d$="$H":e$="$H":m$="$S":q$="$P...........":t$="$b" cont3<9 t$=("$c"(cont3=0cont3=1cont3=2cont3=3cont3=4cont3=5cont3=6cont3=7cont3=8)) =cont3<16d$=("$H"(cont3=0cont3=1cont3=2cont3=3cont3=4))+("$C"cont3=5)+("$D"cont3=6)+("$E"cont3=7)+("$F"cont3=8)+("$E"cont3=9 )+("$D"cont3=10 )+("$C"cont3=11 )+("$H"(cont3=12 cont3=13 cont3=14cont3=15)) Pcont3<16e$=("$H"cont3=0)+("$C"cont3=1)+("$D"cont3=2)+("$E"cont3=3)+("$F"cont3=4)+("$G"cont3=5)+("$H"(cont3=6cont3=7cont3=8cont3=9