ZXTape! >ARDENNES …ią7,12 ;"ARDENNES":9 ,6;"Battle of the Bulge":13 ,4;"1984 by Mark L Stueber":1:19,7;"LEAVE TAPE RUNNING":0 ?"" 65368X,168:7:y=10 :x=1::  130 t=118  kk=0 2 200 d0::1 e-3,5;"TO SCROLL UP PUSH u" f-5,5;"TO SCROLL DOWN PUSH d" h-7,5;"TO SCROLL LEFT PUSH l" j-9 ,5;"TO SCROLL RIGHT PUSH r" nG="u" :3,5;"HOW FAR UP: ENTER #":a:x=x-a:130 sH="d":3,5;"HOW FAR DOWN: ENTER #":a:x=x+a:130 uI="r":3,5;"HOW FAR RIGHT: ENTER #":a:y=y+a:130 wH="l":3,5;"HOW FAR LEFT: ENTER #":a:y=y-a:130 x 110n *0:1::x<1x=1 x>10 x=10 y<1y=1 y>10 y=10 1 a=xx+21 a$(a,yy+31) a 3:a=123 b:c 1bxbx+21cycy+31b-x,c-y;"" a 3,4,2,34",3,26,4,33!,7,26,8,27,11 ,26,12 ,31,12 ,6,13 ,8,13 ,14,15,4,15,11 ,14,25,20,15,20,22,20,29,22,27,24,32 ,25,32 ,28,38&,27,16,30,6  &0:1:z=1502 g(z)=0z:168 g(z)=2q$="2" g(z)=3q$="3" g(z)=4q$="4" g(z)=6q$="6" ec(z)xc(z)x+21d(z)yd(z)y+31c(z)-x,d(z)-y;q$:b$(c(z)+1,d(z)+1)="2" z &1:2:z=1502 k(z)=0z: k(z)=2w$="2" k(z)=3w$="3" k(z)=4w$="4" k(z)=5w$="5" ee(z)xe(z)x+21f(z)yf(z)y+31e(z)-x,f(z)-y;w$:b$(e(z)+1,f(z)+1)="1" z  0:1:0 ixc(p)x+2010 y>10 249 2x>9 c(p)>10 yd(p) 1x=1c(p)=1yd(p) 2y=1xc(p) 2y>9 x10 x+20>c(p) 3x>9 y>9 c(p)>10 d(p)>10 3x=1y=1c(p)<21d(p)<31 -x=c(p)-10 :y=d(p)-10 :130 "x>10 y>10 259 2x>9 e(r)>10 yf(r) @y=1x+20>e(r)f(r)=1(xe(r)f(r)>11 3x=1y=1e(r)<21f(r)<31 1x=1e(r)=1yf(r) 3x>9 y>9 e(r)>10 f(r)>10 -x=e(r)-10 :y=f(r)-10 :130 ,4d(p)1b$(c(p)+1,d(p))"0"9900& .V((m=4n>3)(m=10 n>9 ))c$(c(p),d(p)-1)"0"9900& 0@700:1:0:b$(c(p)+1,d(p)+1)="0" 2(c$(c(p),d(p)-1)"0"n=n+1 4d(p)=d(p)-1 6 610b =c(p)31b$(c(p)+2,d(p)+1)"0"9900& V((m=4n>3)(m=10 n>9 ))c$(c(p)+1,d(p))"0"9900& @700:1:0:b$(c(p)+1,d(p)+1)="0" (c$(c(p)+1,d(p))"0"n=n+1 c(p)=c(p)+1  610b 4c(p)1b$(c(p),d(p)+1)"0"9900& V((m=4n>3)(m=10 n>9 ))c$(c(p)-1,d(p))"0"9900& @700:1:0:b$(c(p)+1,d(p)+1)="0" (c$(c(p)-1,d(p))"0"n=n+1 c(p)=c(p)-1  610b X<d(p)1b$(c(p)+1,d(p)+2)"0"9900& ZV((m=4n>3)(m=10 n>9 ))c$(c(p),d(p)+1)"0"9900& \@700:1:0:b$(c(p)+1,d(p)+1)="0" ^(c$(c(p),d(p)+1)"0"n=n+1 `d(p)=d(p)+1 b&c(p)-x,d(p)-y;q$:.2~L,-7 d2b$(c(p)+1,d(p)+1)="2":n:3000 0:1 a$(c(p),d(p))=""3 c(p)-x,d(p)-y;a$(c(p),d(p)) 0:0  0:1 a$(e(z),f(z))=""3 e(z)-x,f(z)-y;a$(e(z),f(z)) 1:0: 1:0 b$(c(p)+1,d(p)+2)="1"b$(c(p)+2,d(p)+1)="1"b$(c(p),d(p)+1)="1"b$(c(p)+2,d(p))="1"b$(c(p),d(p))="1"b$(c(p)+2,d(p)+2)="1"b$(c(p),d(p)+2)="1"b$(c(p)+1,d(p))="1"3010 p:7000X &1:c(p)-x,d(p)-y;"A":0 ;="n"1:0:c(p)-x,d(p)-y;q$:p:7000X ="y"3014 3011 82:1:c(p)-x,d(p)-y;"A":0:0 u <u=1b$(c(p),d(p))="1"d$(c(p),d(p))="1":3050 Du=2b$(c(p),d(p)+1)="1"d$(c(p),d(p))="2":3050 Du=3b$(c(p),d(p)+2)="1"d$(c(p),d(p))="3":3050 Du=4b$(c(p)+1,d(p))="1"d$(c(p),d(p))="4":3050 Lu=5b$(c(p)+1,d(p)+2)="1"d$(c(p),d(p))="5":3050 Du=6b$(c(p)+2,d(p))="1"d$(c(p),d(p))="6":3050 Lu=7b$(c(p)+2,d(p)+1)="1"d$(c(p),d(p))="7":3050 Lu=8b$(c(p)+2,d(p)+2)="1"d$(c(p),d(p))="8":3050 h=14 F0:7:c(p)-x,d(p)-y;"X":7:c(p)-x,d(p)-y;" ":h 3010 %1:0:c(p)-x,d(p)-y;q$ kk=1:p:7000X  2 r=1502 k(r)=0r:8000@ m=4:n=0 'k(r)=5k(r)=6m=12 b$(e(r),f(r))="2"b$(e(r),f(r)+1)="2"b$(e(r),f(r)+2)="2"b$(e(r)+1,f(r))="2"b$(e(r)+1,f(r)+2)="2"b$(e(r)+2,f(r))="2"b$(e(r)+2,f(r)+1)="2"b$(e(r)+2,f(r)+2)="2"r:8000@ /a$(e(r),f(r))=""f(r)<7r:8000@ :xe(r)x+20mr:8000@ c(r)>e(r)+34100 c(r)f(r)+34120 d(r)e(r)4100 c(r)f(r)4120 d(r)f(r)z1=0:4200h #d(r)e(r)z1=1:4500 #c(r)e(r)z1=0:4500 z5=54010  4010 "z1=1:4200h #z5=54010 $ 4121 h n=n+1 in>mz5=5: l@z1=0gh=1:c$(e(r),f(r)+1)"0"n=n+1 mAz1=1gh=1:b$(e(r)+1,f(r))="3"z5=5: n<z1=0b$(e(r)+1,f(r)+2)="3"z5=5: qz=r rz1=0gh=1:b$(e(r)+1,f(r)+2)="0"b$(e(r)+1,f(r)+1)="0":.1}L,-3:900:f(r)=f(r)+1:b$(e(r)+1,f(r)+1)="1":1:2:e(r)-x,f(r)-y;w$:z5=5: sz1=1gh=1:b$(e(r)+1,f(r))="0"b$(e(r)+1,f(r)+1)="0":.1}L,-3:900:f(r)=f(r)-1:b$(e(r)+1,f(r)+1)="1":1:2:e(r)-x,f(r)-y;w$:z5=5:   n=n+1 n>mz5=5: @z1=0gh=1:c$(e(r)-1,f(r))"0"n=n+1 Nz1=1e(r)<31gh=1:c$(e(r)+1,f(r))"0"n=n+1 Az1=0e(r)>1b$(e(r),f(r)+1)="3"z5=5: <z1=1b$(e(r)+2,f(r)+1)="3"z5=5: z=r z1=0gh=1:b$(e(r),f(r)+1)="0".1}L,-3:b$(e(r)+1,f(r)+1)="0":900:e(r)=e(r)-1:b$(e(r)+1,f(r)+1)="1":1:2:e(r)-x,f(r)-y;w$:z5=5: z1=1gh=1:b$(e(r)+2,f(r)+1)="0".1}L,-3:b$(e(r)+1,f(r)+1)="0":900:e(r)=e(r)+1:b$(e(r)+1,f(r)+1)="1":1:2:e(r)-x,f(r)-y;w$:z5=5:  p d$(31,41)):5 qXa=0:b=0:c=0:d=0:e=0:f=0:g=0:h=0 s"t=1c=1:6100 tCt=2c=1:g=6:e=1:f=3:6100 u-t=3f=5:e=6:6100 v8t=4d=9 :c=1:f=2:6100 wCt=5c=1:h=5:g=4:f=9 :6100 x-t=6f=9 :g=4:6100 yCt=7c=1:h=3:g=1:e=2:6100 zYt=8d=5:c=2:b=1:f=3:e=1:g=1:6100 {#t=10 b=1:6100 |9t=11 f=4:e=3:g=4:6100 }.t=12 b=1:g=2:6100 ~#t=14g=1:6100 #t=16f=1:6100 .t=17f=4:e=1:6100  6600 5a>0b>0c>0d>062008 5e>0f>0g>0h>06300  6600 8 u=10 :z=1502 :g(z)=06210B =z: Bw=41):1:0 Dd>0g(z)=6:c(z)=u:d(z)=w:u=u+1:d=d-1:b$(c(z)+1,d(z)+1)="2":x<10 x+21>uy>9 c(z)-x,d(z)-y;g(z) Gg(z)>0z: Hc>0g(z)=3:c(z)=u:d(z)=w:u=u+1:c=c-1:b$(c(z)+1,d(z)+1)="2":x<10 x+21>uy>9 c(z)-x,d(z)-y;g(z) Ig(z)>0z: Jb>0g(z)=4:c(z)=u:d(z)=w:u=u+1:b=b-1:b$(c(z)+1,d(z)+1)="2":x<10 x+21>uy>9 c(z)-x,d(z)-y;g(z) Kg(z)>0z: La>0g(z)=2:c(z)=u:d(z)=w:u=u+1:a=a-1:b$(c(z)+1,d(z)+1)="2":x<10 x+21>uy>9 c(z)-x,d(z)-y;g(z) Mz: N z=1502 k(z)=06310 z: w=1:2:1 Fc(z)=0d(z)=0c(z)=(*28)+2:d(z)=34" h>0k(z)=6:e(z)=c(z):f(z)=w:h=h-1:b$(e(z)+1,f(z)+1)="1":xe(z)y=1e(z)-x,f(z)-y;k(z) k(z)>0z: g>0k(z)=5:e(z)=c(z):f(z)=w:g=g-1:b$(e(z)+1,f(z)+1)="1":xe(z)y=1e(z)-x,f(z)-y;k(z) k(z)>0z: f>0k(z)=4:e(z)=c(z):f(z)=w:f=f-1:b$(e(z)+1,f(z)+1)="1":xe(z)y=1e(z)-x,f(z)-y;k(z) k(z)>0z: e>0k(z)=3:e(z)=c(z):f(z)=w:e=e-1:b$(e(z)+1,f(z)+1)="1":xe(z)y=1e(z)-x,f(z)-y;k(z) z:  :0:0:zz=0 0,13 ;"TURN #";t 23,5;"ALLIED UNITS KILLED = ";;;;;ak 25,5;"GERMAN UNITS KILLED = ";;;;;gk z =123 a:b ,b$(a+1,b+1)="2"zz=zz+1 z  27,1;"TOWNS IN GERMAN CONTROL = ";zz Cak>0gk>010 ,10 ;"RATIO = ";((ak+zz)/gk) t=186800 )21,0;"PRESS c TO CONTINUE"  ="c"t  x=64@  6621  gv=ak+zz av=gk total=gv/av:1 7total1.6L11 ,5;"GERMAN VICTORY": .total1.3&ffg11 ,12 ;"DRAW": &11 ,5;"ALLIED VICTORY": Xkk=04000 Y.3:kk=0:g2=0:gs2=0 ]p=1502 ^ g2=0 _g(p)=0p:4000 fd$(c(p),d(p))"0"7020l gp:4000 j 4000 lRd$(c(p),d(p))="1"j=c(p)-1:k=d(p)-1:d$(c(p),d(p))="0":7050 mJd$(c(p),d(p))="2"j=c(p)-1:k=d(p):d$(c(p),d(p))="0":7050 nRd$(c(p),d(p))="3"j=c(p)-1:k=d(p)+1:d$(c(p),d(p))="0":7050 oJd$(c(p),d(p))="4"j=c(p):k=d(p)-1:d$(c(p),d(p))="0":7050 pJd$(c(p),d(p))="5"j=c(p):k=d(p)+1:d$(c(p),d(p))="0":7050 qRd$(c(p),d(p))="6"j=c(p)+1:k=d(p)-1:d$(c(p),d(p))="0":7050 rJd$(c(p),d(p))="7"j=c(p)+1:k=d(p):d$(c(p),d(p))="0":7050 sRd$(c(p),d(p))="8"j=c(p)+1:k=d(p)+1:d$(c(p),d(p))="0":7050 u"d$(c(p),d(p))="0":p:4000 _k>1gh=1:d$(j,k-1)="5"w=j:u=k-1:d$(j,k-1)="0":7080 `k<41)gh=1:d$(j,k+1)="4"w=j:u=k+1:d$(j,k+1)="0":7080 sj<31k<41)gh=1:d$(j+1,k+1)="1"w=j+1:u=k+1:d$(w,u)="0":7080 Xj<31gh=1:d$(j+1,k)="2"w=j+1:u=k:d$(w,u)="0":7080 rj<31k>1gh=1:d$(j+1,k-1)="3"w=j+1:u=k-1:d$(w,u)="0":7080 rj>1k<41)gh=1:d$(j-1,k+1)="6"w=j-1:u=k+1:d$(w,u)="0":7080 Wj>1gh=1:d$(j-1,k)="7"w=j-1:u=k:d$(w,u)="0":7080 qj>1k>1gh=1:d$(j-1,k-1)="8"w=j-1:u=k-1:d$(w,u)="0":7080  7090  g2=1:m=1502 (c(m)=wd(m)=ug(m)>07090 m:g2=0 z=1502 (e(z)=jf(z)=kk(z)>07100 z:p:4000 g2=1tgs=g(p)+g(m) g2=0tgs=g(p) Gi=z:x+1c(p)x+1910 7150 roll>77200  roll>57300 roll>37300 roll>17401 roll<1.1 7500L k(z)=0:700 #b$(c(p)+1,d(p)+1)="0" c(p)=e(z):d(p)=f(z) #b$(c(p)+1,d(p)+1)="2" %1:0:c(p)-x,d(p)-y;q$ ak=ak+1 P:4000  @b$(e(z)+1,f(z)+1)="0":k(z)=0:ak=ak+1 !i=z:900:z=i #Kb$(c(p)+1,d(p)+1)="0":gk=gk+1:700:g(p)=0 %g2=0p:4000 * i=p:p=m -Db$(c(p)+1,d(p)+1)="0":700:c(p)=e(z):d(p)=f(z) /Jb$(c(p)+1,d(p)+1)="2":1:0:c(p)-x,d(p)-y;g(p) 4p=i:p:4000 "a$(e(z),f(z))=""p:4000 #b$(e(z)+1,f(z)+1)="0" b$(e(z),f(z)+1)="2"b$(e(z)+2,f(z)+1)="2"k(z)=0:ak=ak+1:700:b$(c(p)+1,d(p)+1)="0":d(p)=f(z):c(p)=e(z):1:0:c(p)-x,d(p)-y;q$:p:4000 b$(e(z)+1,f(z)+2)="2"b$(e(z)+1,f(z))="2"k(z)=0:ak=ak+1:700:b$(c(p)+1,d(p)+1)="0":c(p)=e(z):d(p)=f(z):1:0:c(p)-x,d(p)-y;q$:p:4000 i=z:900:z=i .700:b$(c(p)+1,d(p)+1)="0" b$(e(z)+1,f(z))="0"d(p)=f(z):c(p)=e(z):f(z)=f(z)-1::1:2:e(z)-x,f(z)-y;w$:0:c(p)-x,d(p)-y;q$:b$(c(p)+1,d(p)+1)="2":b$(e(z)+1,f(z)+1)="1":p:4000 b$(e(z),f(z))="0"d(p)=f(z):c(p)=e(z):e(z)=e(z)-1:f(z)=f(z)-1::1:2:e(z)-x,f(z)-y;w$:0:c(p)-x,d(p)-y;q$:b$(c(p)+1,d(p)+1)="2":b$(e(z)+1,f(z)+1)="1":p:4000 b$(e(z)+2,f(z))="0"d(p)=f(z):c(p)=e(z):e(z)=e(z)+1:f(z)=f(z)-1::1:2:e(z)-x,f(z)-y;w$:0:c(p)-x,d(p)-y;q$:b$(c(p)+1,d(p)+1)="2":b$(e(z)+1,f(z)+1)="1":p:4000 b$(e(z)+2,f(z)+1)="0"d(p)=f(z):c(p)=e(z):e(z)=e(z)+1:f(z)=f(z)-1::1:2:e(z)-x,f(z)-y;w$:0:c(p)-x,d(p)-y;q$:b$(c(p)+1,d(p)+1)="2":b$(e(z)+1,f(z)+1)="1":p:4000 b$(e(z),f(z)+1)="0"c(p)=e(z):d(p)=f(z):f(z)=f(z)-1::1:2:e(z)-x,f(z)-y;w$:0:c(p)-x,d(p)-y;q$:b$(c(p)+1,d(p)+1)="2":b$(e(z)+1,f(z)+1)="1":p:4000 ak=ak+1:k(z)=0 roll>5p:4000 #b$(c(p)+1,d(p)+1)="0" lb$(c(p),d(p)+1)="1"b$(c(p)+2,d(p))="1"g(p)=0:gk=gk+1:700:p:4000 tb$(c(p)+1,d(p)+2)="1"b$(c(p)+1,d(p))="1"g(p)=0:gk=gk+1:700:p:4000 b$(c(p)+1,d(p)+2)="0"700:d(p)=d(p)+1:b$(c(p)+1,d(p)+1)="2":1:0:c(p)-x,d(p)-y;q$:p:4000 b$(c(p),d(p)+2)="0"700:d(p)=d(p)+1:c(p)=c(p)-1:b$(c(p)+1,d(p)+1)="2":1:0:c(p)-x,d(p)-y;q$:p:4000 b$(c(p)+2,d(p)+2)="0"700:d(p)=d(p)+1:c(p)=c(p)+1:b$(c(p)+1,d(p)+1)="2":1:0:c(p)-x,d(p)-y;q$:p:4000 b$(c(p)+2,d(p)+1)="0"700:c(p)=c(p)+1:b$(c(p)+1,d(p)+1)="2":1:0:c(p)-x,d(p)-y;q$:p:4000 b$(c(p),d(p)+1)="0"700:c(p)=c(p)-1:b$(c(p)+1,d(p)+1)="2":1:0:c(p)-x,d(p)-y;q$:p:4000 7g(p)=0:gk=gk+1:700:p:4000 LK700:gk=gk+1:g(p)=0:b$(c(p)+1,d(p)+1)="0" Mg2=0p:4000 Qii=p:p=m:700:gk=gk+1:g(p)=0:b$(c(p)+1,d(p)+1)="0":p=i:p:4000 @ 3 Ar=1502 B a2=0 Ck(r)=0r:6000p Jb$(e(r),f(r))="2"b$(e(r),f(r)+1)="2"b$(e(r),f(r)+2)="2"b$(e(r)+1,f(r))="2"b$(e(r)+1,f(r)+2)="2"b$(e(r)+2,f(r))="2"b$(e(r)+2,f(r)+1)="2"b$(e(r)+2,f(r)+2)="2"8020T Or:6000p TRb$(e(r),f(r))="2"j=e(r)-1:k=f(r)-1:d$(e(r),f(r))="1":8040h URb$(e(r),f(r)+1)="2"j=e(r)-1:k=f(r):d$(e(r),f(r))="1":8040h VZb$(e(r),f(r)+2)="2"j=e(r)-1:k=f(r)+1:d$(e(r),f(r))="1":8040h WZb$(e(r)+1,f(r)+2)="2"j=e(r):k=f(r)+1:d$(e(r),f(r))="1":8040h XRb$(e(r)+1,f(r))="2"j=e(r):k=f(r)-1:d$(e(r),f(r))="1":8040h YZb$(e(r)+2,f(r))="2"j=e(r)+1:k=f(r)-1:d$(e(r),f(r))="1":8040h ZZb$(e(r)+2,f(r)+1)="2"j=e(r)+1:k=f(r):d$(e(r),f(r))="1":8040h [r:8000@ hpb$(j,k)="1"j>1k>1gh=1:d$(j-1,k-1)"1"w=j-1:u=k-1:8080 i^b$(j,k+1)="1"j>1gh=1:d$(j-1,k)"1"w=j-1:u=k:8080 jyb$(j,k+2)="1"k<41)j>1gh=1:d$(j-1,k+1)"1"w=j-1:u=k+1:8080 kgb$(j+1,k+2)="1"k<41)gh=1:d$(j,k+1)"1"w=j:u=k+1:8080 l^b$(j+1,k)="1"k>1gh=1:d$(j,k-1)"1"w=j:u=k-1:8080 myb$(j+2,k)="1"j<31k>1gh=1:d$(j+1,k-1)"1"w=j+1:u=k-1:8080 ngb$(j+2,k+1)="1"j<31gh=1:d$(j+1,k)"1"w=j+1:u=k:8080 ob$(j+2,k+2)="1"j<31k<41)gh=1:d$(j+1,k+1)"1"w=j+1:u=k+1:8080 r 8090  a2=1:m=1502 (e(m)=wf(m)=uk(m)>08090 m:a2=0 n=1502 (c(n)=jd(n)=kg(n)>08100 n:r:6000p  tas=k(r) a2=1tas=k(r)+k(m) 2A2=1GH=1:K(M)=0A2=0 :xe(r)x+1910 8150 roll>78200 roll>58300l roll>38300l roll>18320 roll<1.1 85004! g(n)=0:gk=gk+1:900:b$(e(r)+1,f(r)+1)="0":e(r)=c(n):f(r)=d(n):b$(e(r)+1,f(r)+1)="1":d$(e(r),f(r))="1":1:2:e(r)-x,f(r)-y;w$:r:6000p b$(e(r)+1,f(r)+1)="0":900:ak=ak+1:k(r)=0:b$(c(n)+1,d(n)+1)="0":g(n)=0:p=n:700:gk=gk+1 a2=0r:6000p i=r:r=m:z=r gb$(e(r)+1,f(r)+1)="0":900:e(r)=c(n):f(r)=d(n):b$(e(r)+1,f(r)+1)="1" Nd$(e(r),f(r))="1":1:2:e(r)-x,f(r)-y;k(r):r=i:r:6000p l"a$(c(n),d(n))=""r:6000p m#b$(c(n)+1,d(n)+1)="0" oc(n)>1b$(c(n),d(n)+1)="1"b$(c(n)+2,d(n)+1)="1"g(n)=0:gk=gk+1:900:b$(e(r)+1,f(r)+1)="0":f(r)=d(n):e(r)=c(n):b$(e(r)+1,f(r)+1)="1":d$(e(r),f(r))="1":1:2:e(r)-x,f(r)-y;w$:r:6000p pb$(c(n)+1,d(n)+2)="1"b$(c(n)+1,d(n))="1"g(n)=0:gk=gk+1:900:b$(e(r)+1,f(r)+1)="0":e(r)=c(n):f(r)=d(n):b$(e(r)+1,f(r)+1)="1":d$(e(r),f(r))="1":1:2:e(r)-x,f(r)-y;w$:r:6000p v.b$(c(n)+1,d(n)+2)="0"700:900:b$(e(r)+1,f(r)+1)="0":e(r)=c(n):f(r)=d(n):d(n)=d(n)+1:b$(c(n)+1,d(n)+1)="2":b$(e(r)+1,f(r)+1)="1":1:0:c(n)-x,d(n)-y;q$:2:e(r)-x,f(r)-y;w$:d$(e(r),f(r))="1":r:6000p wAb$(c(n)+2,d(n)+2)="0"700:900:b$(e(r)+1,f(r)+1)="0":e(r)=c(n):f(r)=d(n):c(n)=c(n)+1:d(n)=d(n)+1:b$(c(n)+1,d(n)+1)="2":b$(e(r)+1,f(r)+1)="1":1:0:c(n)-x,d(n)-y;q$:2:e(r)-x,f(r)-y;w$:d$(e(r),f(r))="1":r:6000p x9b$(c(n),d(n)+2)="0"700:900:b$(e(r)+1,f(r)+1)="0":e(r)=c(n):f(r)=d(n):c(n)=c(n)-1:d(n)=d(n)+1:b$(c(n)+1,d(n)+1)="2":b$(e(r)+1,f(r)+1)="1":1:0:c(n)-x,d(n)-y;q$:2:e(r)-x,f(r)-y;w$:d$(e(r),f(r))="1":r:6000p y1b$(c(n),d(n)+1)="0"700:900:b$(e(r)+1,f(r)+1)="0":e(r)=c(n):f(r)=d(n):c(n)=c(n)-1:d(n)=d(n):b$(c(n)+1,d(n)+1)="2":b$(e(r)+1,f(r)+1)="1":1:0:c(n)-x,d(n)-y;q$:2:e(r)-x,f(r)-y;w$:d$(e(r),f(r))="1":r:6000p z9b$(c(n)+2,d(n)+1)="0"700:900:b$(e(r)+1,f(r)+1)="0":e(r)=c(n):f(r)=d(n):c(n)=c(n)+1:d(n)=d(n):b$(c(n)+1,d(n)+1)="2":b$(e(r)+1,f(r)+1)="1":1:0:c(n)-x,d(n)-y;q$:2:e(r)-x,f(r)-y;w$:d$(e(r),f(r))="1":r:6000p {g(n)=0:700:gk=gk+1:b$(e(r)+1,f(r)+1)="0":900:e(r)=c(n):f(r)=d(n):b$(e(r)+1,f(r)+1)="1":d$(e(r),f(r))="1":1:2:e(r)-x,f(r)-y;w$ ~roll>5r:6000p "c$(e(r),f(r))=""r:6000p #b$(e(r)+1,f(r)+1)="0" b$(e(r)+1,f(r))="0"900:f(r)=f(r)-1:b$(e(r)+1,f(r)+1)="1":d$(e(r),f(r))="1":1:2:e(r)-x,f(r)-y;w$:r:6000p b$(e(r),f(r))="0"900:e(r)=e(r)-1:f(r)=f(r)-1:b$(e(r)+1,f(r)+1)="1":d$(e(r),f(r))="1":1:2:e(r)-x,f(r)-y;w$:r:6000p b$(e(r)+2,f(r))="0"900:e(r)=e(r)+1:f(r)=f(r)-1:b$(e(r)+1,f(r)+1)="1":d$(e(r),f(r))="1":1:2:e(r)-x,f(r)-y;w$:r:6000p b$(e(r)+2,f(r)+1)="0"900:e(r)=e(r)+1:f(r)=f(r):b$(e(r)+1,f(r)+1)="1":d$(e(r),f(r))="1":1:2:e(r)-x,f(r)-y;w$:r:6000p b$(e(r),f(r)+1)="0"900:e(r)=e(r)-1:f(r)=f(r):b$(e(r)+1,f(r)+1)="1":d$(e(r),f(r))="1":1:2:e(r)-x,f(r)-y;w$:r:6000p 7k(r)=0:ak=ak+1:900:r:6000p !4Kk(r)=0:ak=ak+1:900:b$(e(r)+1,f(r)+1)="0" !5a2=0r:6000p !6Qz=m:900:ak=ak+1:b$(e(m)+1,f(m)+1)="0":r:6000p &h=14 &Q0:7:c(p)-x,d(p)-y;"X":7:c(p)-x,d(p)-y;" ":h:207  o) y xbc222 2"#!"#"### !#&' "!2 )000000000000020111021111001111110011112000000000100022101110210010010100102111112000020222222010001102001012001101001122221222220000000000011220101010011112012220100102001000000000020222201011022200111111000021001001100000200012100112002201111010001201100001100002000122222200010001001000012010000000000020011100221001011110110001120010000010222000111000100100000011000001020000000102000110011001100010000010000000201000010022211110000211000100211000001022200001000012011100000110022220100000102022220110020122001100101111020110001100120002111100000002010112000011200022000000221022222110010002211022201112001200100002000011022201111002222110100021102010112200100100002111110020001100000211021000011111011011121111102000010000002000020000111011101100201110210001000201200000211101111011010002021102112100102202111002210011111101000122110020100111121122111112000111111100001021100200011102201021110020001100011100100000011000110112010201102001021110111001010000100101102222012210020000222222111111110111001100201102222011220001111120010011000000112220101000222221200011110021111010021111001000100001100022210000001022010101001001010110010010000022001101111122111100111100010001010011011002111110210122222001111001000000010011010220111000000110002000001001000000101000002002 2%&'(&'$%'$%$$$"!#& ! ! ! !!" " !"#!"$'((2m &*)"!',+'+*'+'k() *)!+333333333333333333333333333333333333333333330000000000000000000000000000000000000000033000000000000000000000000000000000100000003300000000000000000000000000000000001000000330000000000000000000000000000000011102200033000000000000000000000000000000000000002203300000000000000000000000000000000010002200330000000000000000000000000000000000122020033000000000000000000000000000000000002200003300000000000000000000000000000000000200000330000000000000000000000000000000000120000033000000000000000000000000000000000012000003300000000000000000000000000000010020000000330000000000000000000000000000000120200200033000000000000000000000000000000022000000003300000000000000000000000000000002200000000330000000000000000000000000000001200000000033000000000000000000000000000000000000000003300000000000000000000000000000000200000000330000000000000000000000000010000220000000033000000000000000000000000000001202200000003300000000000000000000000000000022020000000330000000000000000000000000100000200000000033000000000000000000000000000000002220000003300000000000000000000000000000000200000000330000000000000000000000000000000012000000033000000000000000000000000000000000002000003300000000000000000000000000000000001000200330000000000000000000000000000000000000102033000000000000000000000000000000000000000003300000000000000000000000000000000000000120330000000000000000000000000000000000000000033333333333333333333333333333333333333333333 W4Q2R3code XR r `@@@  @ @@ 0 A@0 &@@ @ @ p @ 0 )Y)0x~`