ZX82101 ak(x)="01234567890000000:;<=>?00000000000000000000000000:;<=>?"(a$(x)-47/)-480 a$="" x ( a$=""a$ 2$x,16*k(1)+k(2) 7a$(2);" "; <a$=a$(3) F x=x+1 P 40( aHEXLD3  " LIST ";  8000@ 65055 ( d "WRITE "; n 8000@ xa$:; 65152 a$ 120x "INSERT "; 8000@ a$:; 65109U a$ 220 , 320@ 6 @ " DELETE "; J 8000@ T " TO "; ^ 9000(# h65235 r "HEXLD3"460 #"HEXLD3 MC"65016,353a =" "p(65016),p(65024)-p(65016)+1 "" "" "": -0:7:0:0:0  65015  "":"":  "BEGIN ";  8000@ 65264  X "REPLACE "; b 330J l 220  " RUN ";  8000@ p(65018)   " COPY ";:8000@ *" ";:9000(# 4 " TO "; >"ADDRESS ";a$ H"ADDRESS ";a$ R465022,16*k(a$,3)+k(a$,4) \465023,16*k(a$,1)+k(a$,2) f65275 @"ADDRESS ";a$ J"ADDRESS ";a$ T465018,16*k(a$,3)+k(a$,4) ^465019,16*k(a$,1)+k(a$,2) h #("ADDRESS ";a$ #2"ADDRESS ";a$ #<465020,16*k(a$,3)+k(a$,4) #F465021,16*k(a$,1)+k(a$,2) #P #Zjk(x$c,y)="01234567890000000:;<=>?00000000000000000000000000:;<=>?"(x$(y)-47/)-480 #dgh(x$)=4096*k(x$,1)+256*k(x$,2)+16*k(x$,3)+k(x$,4) #ndk$(x,y)="0123456789ABCDEF"((x/16^y)-16*(x/16^(y+1))+1) #xIh$(x)=k$(x,3)+k$(x,2)+k$(x,1)+k$(x,0) #&p(x)=x+256*(x+1) HEXLD3 MC a>cPWWPW0:80:8*"T]*R|}> ~> ~ 80> #"*K\#N#F( *[R#DM["*K\#N#F(([z{> #~@8W#~@80S*R0S x *[էRDM#[S*"+"[*RDM*R8 + +> x> Gyxzx{x|x}> |} Pø 6ZX82103 V2X0:80:8*"T]*R|}> ~> ~ 80> #"*K\#N#F( *[R#DM["*K\#N#F(([z{> #~@8W#~@80S*R0S x *[էRDM#[S*"+"[*RDM*R8 + +> x> Gyxzx{x|x}> |}%ZX8302A &O(v>!>!:>yx8y+| ZX8302B (B*xvx!XXw* \NFZX8302A 3-32767:"ZX8302A"32768,38&  1: )i=16:2,0:i *i=112 :7,0:i )i=14:1,0:i 32768  IZX83044 f`vhFKP=B\Vx59ibp2p:H\O͎! 'R({<(W!`F(y͈͈ZX83061  " "NUMBER OF LINES";n x(n+1):y(n+1) "";x$ ("";y$ 2"STARS?";a$:s=a$="N"a$="n" < :p=1 F:p1=p+1:p1>n+1p1=1 PAp2=p1+1:p2>n+1p2=1 Zx(p1),y(p1) _1x(p2)-x(p1),y(p2)-y(p1) ds;x(p1),y(p1) i:1;x(p2)-x(p1),y(p2)-y(p1) nx(p1)=(256*) xy(p1)=(176*) x(p),y(p) #x(p1)-x(p),y(p1)-y(p) x=x$:y=y$ 732769,x:32770,y:p=p1+32768 70F "INITIAL";x "INITIAL";y 10 "PATTERNS"430 !"PATTERNS"32768,34"  "":"": 32767:"": :ZX83062 xvx!\w!XXw ZX83065 ccue "NUMBER OF LINES";n 28936q,n:n=28792xp "";x$ ("";y$ 2("STARS?";a$:28939 q,a$="N"a$="n" <"28937 q,x$:28938 q,y$ Fn=28824p P 60< "INITIAL";x "INITIAL";y 10 "P2"450 "P2"28672p,263 "" ""  28672p-1:"" OZX83064+6 p >K[v\!pOB8+"v\T]!p!)0 qo&)z0pN#F:q2\"{0p~#0DO~0DG:q2\ͺ$!@@6Kq! qw#w#2qKq:qQ0Z0!"q;p: q2q>2q;pz0p>pw#>pwZQ!"q;p{2qv: q* q2\!XXw!X'ZX8312b B\Runner for RACETRACK from "Mastering Machine Code" - part 7 (ZX Computing Dec'83/Jan'84) <32767:"ZX8312"32768,1011:33661} ZX8312 tcRA000000ARcctɸƵq``````abcdeffffvvɸtcRARctcRAAAPPPPPPPPP````pppŴ˼ɸòĴTime Distance Distance to go (C) to go (H) ================================ C H0070 17871858===_́0 >>> z>z{7͵>>>q >>< ~0 69+5>0+ !@~w#|X   < &~G~O0|ȹ}| 8ɿ*\[\C!X#|[ >>>> >0r:\ͮx5ur:\ͯx4u0x?"\}W\*\[\{<8ͳͳz88$$%Cͼ8 ́x́x^uͺ4tZ!:\o0x==܁y<<܁*\,[\Cͼͺ!FȂr0  x Â!00""""!20""!"\& "\2<\f< f< n< bwbhbwh!~9 60+4 < LZX8402b DYRunner for WORDSHEEP from "Mastering Machine Code" - part 8 (ZX Computing Feb/Mar'84) X59391:"ZX8402"59392,1565:"ZX8402_A""A",8:bc=60790v ^ZX8402 _#The quick brown fox jumps overone two three the green lazybrown dog's very fat & wet,black foot brown dog's very bigblack foot !> _+ .  T]#H+#n.BT]+RDMA6 +#~0w`!> }= 6.~G#~( O=y(6.>N#0 0W ( C.0#*v\T])))))"v\|0o&0!P"\!!"\6!@~#:\ o&Z~?w!@"\!!"\6!~# *\|֐g:\?T]w!"\>2\> 9 :\5w:\4w*\R *\`R *\"\ *\sw y?:j\2j\ï*\> 6 Yo&_T/O> :\!6+w0nwwc(: h![\ |@> 6!@+ +#}2\!> +(}Ͷ*\6!6#uw|@Yc|m.!P"\!!"\616>@n(:\(6 > > 0Vo&^#V,8 !jE}%o~ (*\ !> +(}(*\~( `R(.ÔZX8402_A X>