ZXTape! 0Created with Ramsoft MakeTZX/SKLADACKA ..<.i Naprogramoval  Paul Pliva  23.12.92 ********************************  >23570\,6:236099\,0:7::0 6:20:29: 0,11 ;"SKLADACKA" c=5 153 b=10 213 c,b;"" c+1,b;" " c+2,b;"" b c: c=6153 b=11 203  a$:c,b;a$ b !c "%3,8;"****************" #&18,8;"****************" $a=417 %a,8;"*" &a,23;"*" 'a ("A","B","C","D","E","F","G","H","I","J","K","L","M","N","O"," " )14,19;" " *(14+1,19;" " +&14+2,19;" " -'4,9 ;" " .(17,9 ;" " /a=516 0a,9 ;" " 1a,22;" " 2a 3%79O,39':97a,0 4&176,40(:0,96` 5(176,136:-97a,0 60,-97a 7a72H,32 :111o,0:0,111o:-111o,0:0,-111o 802,2;"Toto je zakladni postaveni " 9419,1;"Zmacknes tu klavesu,ktera je " :520,0;"na karticce s kteru chces hybat" ;)21,6;"ZMACKNI KLAVESU 's'" <="s"70F = 60< F 20 G 9000(# Sx=(*10 +11 ) Ty=(*10 +6) U7x=11 x=14x=17x=2087W V 83S W5y=6y=9 y=12 y=1589Y X 84T Y(y,x)" "83S dy,x;"A" fx1=(*10 +11 ) gy1=(*10 +6) h<x1=11 x1=14x1=17x1=20106j i 102f j:y1=6y1=9 y1=12 y1=15108l k 103g l(y1,x1)" "102f ny1,x1;"B" px2=(*10 +11 ) qy2=(*10 +6) r<x2=11 x2=14x2=17x2=20116t s 112p t:y2=6y2=9 y2=12 y2=15118v u 113q v(y2,x2)" "112p xy2,x2;"C" zx3=(*10 +11 ) {y3=(*10 +6) |>x3=11 x3=14x3=17x3=20126~ } 122z ~:y3=6y3=9 y3=12 y3=15128  123{ (y3,x3)" "122z y3,x3;"D" x4=(*10 +11 ) y4=(*10 +6) >x4=11 x4=14x4=17x4=20136 132 :y4=6y4=9 y4=12 y4=15138 133 (y4,x4)" "132 y4,x4;"E" x5=(*10 +11 ) y5=(*10 +6) >x5=11 x5=14x5=17x5=20146 142 :y5=6y5=9 y5=12 y5=15148 143 (y5,x5)" "142 y5,x5;"F" x6=(*10 +11 ) y6=(*10 +6) >x6=11 x6=14x6=17x6=20156 152 :y6=6y6=9 y6=12 y6=15158 153 (y6,x6)" "152 y6,x6;"G" x7=(*10 +11 ) y7=(*10 +6) <x7=11 x7=14x7=17x7=20166 162 :y7=6y7=9 y7=12 y7=15168 163 (y7,x7)" "162 y7,x7;"H" x8=(*10 +11 ) y8=(*10 +6) <x8=11 x8=14x8=17x8=20176 172 :y8=6y8=9 y8=12 y8=15178 173 (y8,x8)" "172 y8,x8;"I" x9=(*10 +11 ) y9=(*10 +6) <x9=11 x9=14x9=17x9=20186 182 :y9=6y9=9 y9=12 y9=15188 183 (y9,x9)" "182 y9,x9;"J" x10=(*10 +11 ) y10=(*10 +6) @x10=11 x10=14x10=17x10=20196 192 >y10=6y10=9 y10=12 y10=15198 193 (y10,x10)" "192 y10,x10;"K" x11=(*10 +11 ) y11=(*10 +6) @x11=11 x11=14x11=17x11=20206 202 >y11=6y11=9 y11=12 y11=15208 203 (y11,x11)" "202 y11,x11;"L" x12=(*10 +11 ) y12=(*10 +6) @x12=11 x12=14x12=17x12=20216 212 >y12=6y12=9 y12=12 y12=15218 213 (y12,x12)" "212 y12,x12;"M" x13=(*10 +11 ) y13=(*10 +6) @x13=11 x13=14x13=17x13=20226 222 >y13=6y13=9 y13=12 y13=15228 223 (y13,x13)" "222 y13,x13;"N" x14=(*10 +11 ) y14=(*10 +6) @x14=11 x14=14x14=17x14=20236 232 >y14=6y14=9 y14=12 y14=15238 233 (y14,x14)" "232 y14,x14;"O" $(6,11 )" "281 "f=5:e=10 :320@ $(9 ,11 )" "283 "f=8:e=10 :320@ %(12 ,11 )" "285 #f=11 :e=10 :320@ %(15,11 )" "287 #f=14:e=10 :320@ $(6,14)" "289!  "f=5:e=13 :320@ !$(9 ,14)" "291# ""f=8:e=13 :320@ #%(12 ,14)" "293% $#f=11 :e=13 :320@ %%(15,14)" "295' &#f=14:e=13 :320@ '$(6,17)" "297) ("f=5:e=16:320@ )$(9 ,17)" "299+ *"f=8:e=16:320@ +%(12 ,17)" "301- ,#f=11 :e=16:320@ -%(15,17)" "303/ .#f=14:e=16:320@ /$(6,20)" "3051 0"f=5:e=19:320@ 1$(9 ,20)" "3073 2"f=8:e=19:320@ 3%(12 ,20)" "3095 4#f=11 :e=19:320@ 5(15,20)" " 6#f=14:e=19:320@ @f,e;" " Af+1,e;" " Bf+2,e;" " J621,0;" Jestli jsi hotov,zmackni 'Q' " ^&="a"g1=y:g2=x:a$="A":380| _(="b"g1=y1:g2=x1:a$="B":380| `(="c"g1=y2:g2=x2:a$="C":380| a(="d"g1=y3:g2=x3:a$="D":380| b(="e"g1=y4:g2=x4:a$="E":380| c(="f"g1=y5:g2=x5:a$="F":380| d(="g"g1=y6:g2=x6:a$="G":380| e(="h"g1=y7:g2=x7:a$="H":380| f(="i"g1=y8:g2=x8:a$="I":380| g(="j"g1=y9:g2=x9:a$="J":380| h*="k"g1=y10:g2=x10:a$="K":380| i*="l"g1=y11:g2=x11:a$="L":380| j*="m"g1=y12:g2=x12:a$="M":380| k*="n"g1=y13:g2=x13:a$="N":380| l*="o"g1=y14:g2=x14:a$="O":380| m="q"600X n 350^ |!(g1+3,g2)" "382~ } 389 ~!(g1-3,g2)" "384  420 !(g1,g2+3)" "386  450 (g1,g2-3)" "  480  f=13 # g1-1,g2-1;" " g1,g2-1;"" &g1+1,g2-1;" " &g1+2,g2-1;"" g1=g1+1  g1,g2;a$ f a$="A"y=y+3: a$="B"y1=y1+3: a$="C"y2=y2+3: a$="D"y3=y3+3: a$="E"y4=y4+3: a$="F"y5=y5+3: a$="G"y6=y6+3: a$="H"y7=y7+3: a$="I"y8=y8+3: a$="J"y9=y9+3: a$="K"y10=y10+3: a$="L"y11=y11+3: a$="M"y12=y12+3: a$="N"y13=y13+3: a$="O"y14=y14+3:  f=13 &g1-2,g2-1;"" &g1-1,g2-1;" " g1,g2-1;"" "g1+1,g2-1;" " g1=g1-1  g1,g2;a$ f a$="A"y=y-3: a$="B"y1=y1-3: a$="C"y2=y2-3: a$="D"y3=y3-3: a$="E"y4=y4-3: a$="F"y5=y5-3: a$="G"y6=y6-3: a$="H"y7=y7-3: a$="I"y8=y8-3: a$="J"y9=y9-3: a$="K"y10=y10-3: a$="L"y11=y11-3: a$="M"y12=y12-3: a$="N"y13=y13-3: a$="O"y14=y14-3:  f=13 Xg1-1,g2-1;" ":g1,g2-1;" ":g1+1,g2-1;" " g1-1,g2;"" g1,g2;" "  g1+1,g2;"" g2=g2+1  g1,g2;a$ f a$="A"x=x+3: a$="B"x1=x1+3: a$="C"x2=x2+3: a$="D"x3=x3+3: a$="E"x4=x4+3: a$="F"x5=x5+3: a$="G"x6=x6+3: a$="H"x7=x7+3: a$="I"x8=x8+3: a$="J"x9=x9+3: a$="K"x10=x10+3: a$="L"x11=x11+3: a$="M"x12=x12+3: a$="N"x13=x13+3: a$="O"x14=x14+3:  f=13 Xg1-1,g2+1;" ":g1,g2+1;" ":g1+1,g2+1;" " *g1-1,g2-2;"" &g1,g2-2;" " 2g1+1,g2-2;"" g2=g2-1  g1,g2;a$ f a$="A"x=x-3: a$="B"x1=x1-3: a$="C"x2=x2-3: a$="D"x3=x3-3: a$="E"x4=x4-3: a$="F"x5=x5-3: a$="G"x6=x6-3: a$="H"x7=x7-3: a$="I"x8=x8-3: a$="J"x9=x9-3: a$="K"x10=x10-3: a$="L"x11=x11-3: a$="M"x12=x12-3: a$="N"x13=x13-3: a$="O"x14=x14-3:  h$(6,11 )="A"618j i j$(6,14)="B"620l k l$(6,17)="C"622n m n$(6,20)="D"624p o p$(9 ,11 )="E"626r q r$(9 ,14)="F"628t s t$(9 ,17)="G"630v u v$(9 ,20)="H"632x w x%(12 ,11 )="I"634z y z%(12 ,14)="J"636| { |%(12 ,17)="K"638~ } ~%(12 ,20)="L"640  %(15,11 )="M"642  %(15,14)="N"644  %(15,17)="O"646  %(15,20)=" "648  521,0;" Udelal jsi to,si borec. "  ="s"  649 #(Ea=22:a,0;" ":a #)Ga=1921:a,0;" ":a #*621,0;"Pockej chvili,pocitac premysli !" #+ A  /