ZXTape! 0Created with Ramsoft MakeTZXhousenka !k!,b$="5":u$="8":v$="6":r$="7":3000 =g2=1:o=1:ko=1:zi=3:l=9100# g1=0:z3=102f:g=1:a=15:b=17:x1=0:y1=-1:n=1:t$="5":y$="55":x=15:y=15: ,1:7::0:8999'#:l  8000@ x,y;" " 1=b$x1=0:y1=-1:t$="5":502 0=u$x1=0:y1=1:t$="8":502 0=v$x1=1:y1=0:t$="6":502 1=r$x1=-1:y1=0:t$="7":502 2?c=10:c:x=x+x1:y=y+y1:200:x,y;" " 3 y$=y$+t$ 4x=04000 5z3=9999'6000p 6z3 7 10 fp=11 g a,b;" " hAy$(nn+1-1)="5"a1=0:b1=-1:120x j@y$(nn+1-1)="8"a1=0:b1=1:120x l@y$(nn+1-1)="6"a1=1:b1=0:120x nAy$(nn+1-1)="7"a1=-1:b1=0:120x xa=a+a1:b=b+b1:n=n+1 zp { P(x,y)=0.6,-10 :.3,-30:zi=zi-1:4 Q(x,y)=16.6,-10 :.3,-30:zi=zi-1:4 M(x,y)=579z3=9999':.02{# =,4:g=g+1:8000@:  r7:7:0::2500 :p=07:p,0;" ":p Mp=16:p,1;" ":p _p=60<71G:.02{# =,3:23681\,p:;" S T U P E N V I T E Z U ":p ?7,1;"" C0,1;"" ?p=1519:p,7;" ":p ,15,7;"   " ,16,7;"   " q1=10 :q2=8 p=13 q1+0,q2;" " q1+1,q2;" " q1+2,q2;" " q1+3,q2;"" q1+4,q2;"" q1+5,q2;" " q1+6,q2;"" q1=10 :q2=q2+6 p=1q1=8 p q1=75K:q2=92\ ip=13:1:q1,q2:2,0:0,-2:-2,0:0,1 ^1:q1+8,q2:2,0:0,-2:-2,0:0,1 21:q1+5,q2-2:0,-3 11:q1+2,q2-8:6,0 q2=92\:q1=q1+480 p=1q2=108l  p:0 ,18,7;"2.JACK 3.JOHN" )17,13 ;"1.";1;m$ 621,0;"GRATULUJI! SPLNIL JSI SVUJ UKOL."  5002 "vloz svoje jmeno (max 4) ";m$ %m$0űm$>42500  :0:7:7::8;"****************" 8;"* 1.START HRY *" 8;"* 2.INSTRUKCE *" 8;"* 3.DEFINOVANI *" 8;"****************" ="1"3 ="2"3500 ="3"3100 3005 "pohyb nahoru ";r$ "pohyb dolu ";v$ "pohyb vlevo ";b$ ""pohyb vpravo ";u$ # 3000 P:p=021:p,0;" ":p W5:p=715:p,0;" ":p Wp=72H79O:23681\,p:.02{# =,5:;" I N S T R U K C E":p 92,0;" " 94,0;" " :18,0;" " :20,0;" " 93,0;"NAPROGRAMOVAL PAVEL PLIVA 1.7.93" :19,0;" " Qp=5352-1:.01z# =,p:p:p=2535:.02{# =,p:p |z$=" TVYM UKOLEM JE PROVEST HOUSENKU DESETI OBRAZOVKAMI.ABY SE TI TO VUBEC POVEDLO MUSIS SEBRAT DEVET CISEL Z KAZDE OBRAZOVKY,PODLE KRERYCH SE HOUSENKA NATAHUJE.KDYZ JE SEBERES OTEVRE SE TI OTVOR VE ZDI A TIMTO OTVOREM SE DOSTANES DAL.HRA MA TRI UROVNE,V KAZDE UROVNI JE HOUSENKA JINAK DLOUHA. PREJI MNOHO STESTI. " w=1̱z$-29 7.06|u\,5:19,1;z$(ww+29) w "znovu a/n";o$ o$="a"3500 3000  >a=012 2:.1}L,0:.05|L,a:a @a=12 0-2:.05|L,a:.05|L,0:a ko=2g2=0.5 ko=3g2=0.25~ Co=10 l=9080x#:ko=ko+1:zi=zi+1:o=0 ko=2g2=0.5 ko=3g2=0.25~ ko=42000 $o=o+1:l=l+20:4 7::" DOSTAL JSES DO ";o;" OBRAZOVKY a do ";ko;" kola, co znamena,ze jsi splnil ";(100d*o/30);"% hry." "hrat znovu a/n ";a$ a$="a"3  3000 p"g1gz3=102f:g1=0: r g1=g1+g2: @/g>9 x,y;" ":0,16;" ": Bz1=(*20+1) Cz2=(*30+1) D((z1,z2)=568z1,z2;1;g: E 8000@ #'zi=05000 #(90,0;" " #):21,0;" " #*Ac=120:c,0;" ":c,31;" ":c: #+G#0,1,0;"OBRAZOVKA:";o;" KOLO:";ko;" ZIVOTY:";zi #, # #011 ,6;" ": #@p=18:p,10 ;" ":p,21;" ":p #Bp=12 20:p,10 ;" ":p,21;" ":p # #@p=18:p,10 ;" ":p,21;" ":p #Bp=12 20:p,10 ;" ":p,21;" ":p #!8,3;" ": #"8,22;" ": ##12 ,22;" ": #"12 ,3;" ": # #@p=18:p,10 ;" ":p,21;" ":p #Bp=12 20:p,10 ;" ":p,21;" ":p #!8,3;" ": #"8,22;" ": ##12 ,22;" ": #"12 ,3;" ": #010 ,6;" ": #@p=18:p,10 ;" ":p,21;" ":p #Bp=12 20:p,10 ;" ":p,21;" ":p #!8,3;" ": #"8,22;" ": ##12 ,22;" ": #"12 ,3;" ": #.10 ,6;" " #Cp=514:p,14;" ":p,17;" ":p: $@p=18:p,10 ;" ":p,21;" ":p $Bp=12 20:p,10 ;" ":p,21;" ":p $!8,3;" ": $"8,22;" ": $ #12 ,22;" ": $ "12 ,3;" ": $ .10 ,6;" " $Ap=514:p,14;" ":p,17;" ":p $?p=37:p,3;" ":p,28;" ":p $Ap=12 18:p,3;" ":p,28;" ":p $ $Np=2192:p,2;" ":p $ $,Np=2193:p,2;" ":p $.-p=317:p,18;" ":p $0 $@Ap=120:p,10 ;" ":p,21;" ":p $A39 ,3;" " $B411 ,3;" " $C10 ,10 ;" " $D10 ,21;" " $E.9 ,11 ;" ":9 ,20;" " $F211 ,11 ;" ":11 ,20;" ": ' B5U8V6R7ol#fg b nx y 2fAnZu TVYM UKOLEM JE PROVEST HOUSENKU DESETI OBRAZOVKAMI.ABY SE TI TO VUBEC POVEDLO MUSIS SEBRAT DEVET CISEL Z KAZDE OBRAZOVKY,PODLE KRERYCH SE HOUSENKA NATAHUJE.KDYZ JE SEBERES OTEVRE SE TI OTVOR VE ZDI A TIMTO OTVOREM SE DOSTANES DAL.HRA MA TRI UROVNE,V KAZDE UROVNI JE HOUSENKA JINAK DLOUHA. PREJI MNOHO STESTI. YX OnT7Y5555555777888666555577777K