ZXTape!x1chuntey Y Len's Chuntey Challenge   :: ( : 2 <"challenge" F"" P Z dBy, er... Alan Maxwell challenge @|x||??||>|}P>??|||}>>||||>>||||>?> |||~ |||~||x@??ρ>||~|>|}|x?Ơ?>?|x|||~|>|}??>?>??  cs8cp|p ?caÀ<?@|p8@>??@@'|83pp `À< ??>?|? 38pwq ?`pp2>8 c8 0p =8x8syypp3<À?8 0p 08s?app9?@?y8 0p 00>8sa pp8 B>`8pp  00a8x8x9s8 0 ms`8Cp|p  ?a8??s8y 8{w$(n)=d$(n,z̯d$(n)):r(x,y)=(*x)+y:228 ja(n)=c$(n):e(n)=c$(n,z):i(n)=c$(n,k3):o(n)=c$(n,k4):c(n=c$n)=c$(n,k7) ^l(n)=c$(n,k6):s(n)=n+"23":s$(n)=w$(n)+"'s ship":d(n)=c$(n,l0) *w(n)=c$(n,l1):x()=p$(r(p$,l)) ,p(n)=c$(n,l2):h(n )=c$(n,l4) Hz(x)=(n(x)*(r("40","30")/"100"*(nɰ"12")+".1"*(n="12"))) dm$(x)=p$(x*100d,"case")+" of Natof":f(n)="e(n)+(p(n)/7)+10+(t/20)+r(2,0)" ٕp$(n,x$)"s )=(nn)+("no"n)+" "+x$+("s"nl):l$(n)=w$(((n-1)/24)+40()+" "+(n-((n-1)/24)*24) Eg(n)=n=k4n=k7n=k9:h$(n)=("his"èg(n))+("her"ƨg(n)) 't()="65536*23674+256*23673+23672" 'n(n)="c$(n,15)+256*c$(n,16)" &o$(x)=(" OFF"x=o)+(" ON"x=l) +b(n)="128-c$(n,9)/2+c$(n,10)/2" "23675","126":"23676","230"::l:k7:o::z,l1;"WELCOME TO";k3,k6;"THE GREAT SPACE RACE":fd="43008":fd,o:x=l0:rs:x$=o+o:nn=o:bn=o:ph=o:p$="":n$(l)="":n$(z)="" e=l̰"97":m$(e,k3)=o:e a(l)=o:a(z)="1400":a(k3)="1500":mm="500":i=ll3:c$(i,k9)=°"128"+""+°"128"+c$(i,l2l3)+o+o+o:i:m$("a",k3)=l5 {#l;l;k7;o,o;n$(l);:cl:i=ok7:a=i+l:fp:a=r(k5,k5):fa:sf/l0,i/z:#l;k7;l;l,o;" ";o;l,l6-d$(i+l)/z;w$(i+l) a=r(k3,l8):ey:>l/k3sm :j=ll2:x=i*k8+j:m$(x,k3)=x$:m$(x,k5)>wwm$(x,k5)=x$ ,j:i:#l;k7;o;l,o;" ";o;:cl:a=k5:fa w$(k8)="WEAPONS FOR SALE":w$("(")="1 laser 400":w$("H")="2 missile 800":w$("h")="3 bomb 1300":w$("")="4 shield 1000":w$("")="0 hire racer" #ro="r(32767,1)":del="150":rt L t"1900" T!n=r(k8,l):h(n)n=on"1108" V%cl:on=n:of=f(n):p$=k4"1200" Zya=s(n):x$="FIJMNQRU":rfp:a=n:fp:a=r(k5,k5):fa:x$=w$(n)+" offers you "+h$(n)+" services for "+m$(of)+".":pr `7x$="HIRE "+w$(n):yn:xfr:a=k3:ey:p$"1206" h x"1100" jm=-of:mo:pb:pb nhc$(n,l4)=l:c$(n,k9l1)=o+""+o:p$=p$+n:a=r(k3,l8):ey:sm:x$=w$(n)+" hired for "+m$(of):np  t"1900" :w=o:>l/k4cl:j=lk4:a=j+l5:b=j:fp:j:co:"1216" d=r(k6,l)*k5:w=r(k4,l6):m="(p(w-l5)*(100-d))/100":x$="SPECIAL OFFER: "+w$(w)+" - only "+m$(m):np:cl:a=w:b=o:fp:co ti:t"1900" 7n$(z)=w$:dw:r=k8:d=r:key:xƱp$k4"1100"  x"1216" "m=-m:wx+l5w=x+l5:m=-p(w-l5) !f=o:n=p$(p$):mm<-m"1450" Ewe:ex$=s$(n)+" cannot carry more "+w$(w)+"s.":bp:pr:"1216" 4mo:x$=w$(w)+" installed on "+s$(n):np:"1216" zdelŰ">.05"ñp$ ~n=x():c$(n,l3).05"ñp$ #n=p$(r(p$,l)):cl:x=r(l4,k7) y=d(n)-x:y>-lc$(n,l0)=y Am=(x+r(z,z))/z:x$="BCDE":a=s(n):rfp:a="Y":rfp:rfp:rfp ha=r(k5,k5):fa:x$=s$(n)+" needs repair. Cost: "+m$(m)+".":mm+n(n)r"2100" 8 x"2200" :x>p$"2100" ;n=p$(x):p1np1=n:nl+l >p1=n:rep:"2100" w$(ww+l0ww*z)="1 print"+o$(pf):w$(ww*z+l0ww*k3)="2 sound"+o$(sf):w$(ww*k3+l0ww*k4)="3 copy screen":w$(ww*k4+l0ww*k5)="4 new game" 0n$(z)=w$:o,o;w$:d=k8:r=k4:rr=o:key:rr=l  x=lpf=pf x=zsf=sf:s0,sf x=k3 x=k4"8000"  "2100" ñp$ n=x():"r(4,1)*100+3000" Rz$="":h=l(n):"h=1h=24h=25h=48h=49h=72h=73h>95Ũo(n)l/z):ap+l *go:enn=nn+l +tpn:y$=x$:x$=w$(n)+" arrives "+z$+"at "+x$+((" and delivers Natof. "+p$(nn,"consignment")+" now delivered")e) ,Le=k3h<"a"x$=x$+". "+w$(m$(h,k3))+" has already delivered Natof here" -Ye=zx$=x$+". The space station at "+y$+" is malfunctioning: no Natof can be delivered" 0np:n=p1h=l(n):nl 2 g=x():tm=l:l/k3"3207" q=r(l1,l):h(q)"3205" c$(q,k6)=c$(g,k6) ph>z/phc$(l2,k6)=c$(g,k6) ;x$="":y$=c$(g,k6):q=ll3:èh(q)c$(q,k6)=y$x$=x$+q q:ñx$ n=x$(r(x$,l)):"4500" "4700":e"4800"  J;x$="":y$=c$(n,k6):q=ll2:èh(q)c$(q,k6)=y$x$=x$+q L q:ñx$ N!tm=o:g=x$(r(x$,l)):m=n(g) RRx$=s$(g)+" sighted. Shall I attack?":vp:x$=w$(n)+" attack "+w$(g):yn:x Tp1=n U2x=(a(n)+w(n)+d(n))*:y=(a(g)+w(g)-d(g))* Vwi=g:lo=n:xywi=n:lo=g \asdfg=l:"4537"  >l/z  asdfg=o x=c$(n,k8):x=g g=n dx=(a(n)*10 +z(n)+w(n)+d(n))-(n*5):y=(a(g)*10 +z(g)+w(g)+d(g))-(g*5) m=z(g):m x>ywi=n:lo=g:"4516"  wi=g:lo=n xy"4526"  wi=n:lo=g asdfg=l4537 g=c$(n,k7)fd,l $n="12"rsm=".1"*n(g):"4530"  rsm=z(g) len=r(30,10 ):x$=w$(g)+" in attack range. Pay me "+(m*100d)+" cases" +" of Natof or I attack":vp:x$="Pay "+("tax"n=l2)+("ransom"nl2)+" to "+w$(n):yn:xph=ph+l:fr:"4537" &n(g)n=k9n=l0ƥ<.15~"4534" 3x$="thanks!":say:sm:n=wi:na:m=-m:n=lo:na: >x$=w$(n)+" takes the Natof but attacks "+w$(g)+" anyway!": x$=s$(n)+" attacks "+s$(g):np:a="s":so:so:"43003",(*k7)+k3:"43004",(*30)+40(:"43005",(*30)+10 :"43006",g:"43007",n:e="43000" Ix$=w$(wi)+(" defeats "+w$(lo)ƾfd=o)+(" destroys "+s$(lo)ƾfd=l):np n=wi:na:n=lo:m=-m:na fd=ln=lo:"4907" nl+l e=o:x=l(n):xe=l: ,oh=x:h=c$(n,k5):hc$(n,k5)=o:"4624" $x="a"x$=l+°"25"+"1I":"4620" /"x=1x=25x=49x=73"x$=(x+l)+"a":"4620" *x$=(x-l):"x/24ɺ(x/24)"x$=(x+l)+x$  m$(x,k4)x$=x$+m$(x,k4)  *y=x$:q=l̨r(y,o):x$=x$(y)+x$(y-l):q 0k=ḻx$:e=o:x=m$(x$(k),k3):xe=l:k:k=l  h=x$(k) x=m$(h,k3):xe=k4-(ek8nl/k3): dHx$=p:>l/zƨi(n)100"e=l: qpa:m=r(l0,o):h=l(n):pn:x$="Booby-trapped alien wreck located at "+x$+". Shall I search it for Natof?":vp 5x$="EXPLORE WRECK":yn:xh=l(n):z$="":"3114" Icl:a="$"+""*(>l/z):b="23":fp:a=s(n):x$="FIRU":rfp:a=k5:fa Ԋx=p:y=r(k8,o):o$=" BOMB PASS NUMBER":q=ok7:pa+l0:o$(ww+l6*q+k4ww+l6*q+l6)=(q+l)+" "+p:q:o$(ww+l6*y+k7ww+l6*y+l6)=x @p=y+l:"5900":r=k8:d=r:o,o;o$:key:"5950":x=p"4850" \"61852":m$(h,k5)=o:x$="The wreck explodes!":pr:cl:a=k6:b="23":c=l1:ca:"4900" Km$(h,k5)=l1:x$=w$(n)+" has defused the bomb and found "+m$(m):np:na & e=l:ñp$ *x$=s$(n)+" destroyed.":pr +Cq=ḻp$:p$(q)nq:x$=w$(n)+" is looking for a new ship.":pr .;c$(n,k6)=o:p$=p$(q-l)+p$(q+l):e=o:p1=nƱp$p1=x() 8 "6300" x$=w$(n)+" says: "+x$ +x$>""x$(x$)"?"x$(x$)"!"x$=x$+"." )x$(l)"a"x$(l)"z"x$(l)=(x$(l)-ww)  rprp=l: 3x$>""ti:x$="T"+("-"del)+("+"del)+t+": "+x$ ,x="":x$o):i=dl-l:rrװ".001*sf",ww:l,ww-z;°"152-i" p/j=oz:x=r(k3,l):rrt>(z0/"2")a(x)a(x) q ="z" r\x$=:(r(x$="y"x$="Y"x$="n"x$="N"x$="1"x$="0"))(x$>"/"x$r)a="I":so:"5250" sx$>""a=ww+l:so tj:i:x=o:"5260" rx=x$-"48":"5260"  x=l:x$="0"x$="n"x$="N"x=o !il,"30";" ":װ".002*sf",ww   a="Q":so e=o:mm+m""e=l: c$(n,y)=(c$(n,y)+x): t=t():u=t():tl/z):b="23*(>.1)":fp h=l(p1):pn:x$="VIEW: "+w$(p1)+" at "+x$:t$(ww-l)="":t$(l7-x$/zww-l)=x$:x$=("F"aɯ"`")+"IRU"+("MQ"a="b"):a="a"x$="GHI" ,q=ll3:l(q)=ha=s(q)+ww*(>l/z):rfp+l q:o,o;t$:co a=a+"128*(>.5)" ;x$x=r(x$,l):b=x$(x)-"A":x$=x$(x-l)+x$(x+l):fp a>""a=a-""  'e=o:y=n(n)+m:y"65535"e=l: ?c$(n,l6)=º(y/256):c$(n,l5)=(y-c$(n,l6)*256): Fy=m$(h):yx$=w$(y): H x$=l$(h):  ro+x*ww p="r(9e5,1e5)": Je=o:k=ll0:x="r(96,l)":y="r(96,l)":m$(x,k5)ům$(y,k5)k:e=l: 2bn=bn+l:m$(x,k5)=(bn+ww):m$(y,k5)=°"x+100":  s$=r+d+i+j:rr=o: >2r=s$(l):d=s$(z):i=s$(k3):j=s$(k4):rr=l: r!q=lx:a=r(l6,o)*k8+l:so:q:  Dcl:a=n:fp:a="c":so:k5:so:a=r(k5,k5):fa:e="42500":say +x=z:"6400":x=a:q="21"̰"24":"6104" %x=l:"6400":x=a:q="24"̰"21"-l 4cl:b=q*(q<"24"):fp:co:a=x:q:bcl:a=k5:fa  :dx$=w$(n)+" has delivered "+p$(p(n),"consignment")+" of natof, and has "+m$(n(n))+" left.":pr ct$="":t$(ww*k5+k8)="0 system commands":q=ḻp$:t$(ww*q+l1ww*(q+l))=q+" "+w$(p$(q)):q:   ac=o:ca   c=l:ca *c=k7:a=o:ca \ c=k3:ca  c=k4:ca  c=k5:ca  c=k6:ca V c=k7:ca  c=k9:ca !a0,a:b0,b:c0,c:e="42480": @_d=pf:pf=l:ti:z$="":nnz$=", averaging "+p$("((t/nn*100))/100","second")+" a delivery" Jx$="GAME OVER. You have "+p$(p$,"ship")+" left.":pr:x$="Your team has delivered natof to "+p$(nn,"location")+" in "+t+" seconds"+z$:np:pf=d:ww*ww:"1000" ΅ olz abct  r  erda RLePJ|fDVPU=WXYxpe8 + Dos Gurm Haberdaber Meena Noxin Uno Valcon Vindaloo Krone Zanik Genghis the PKB Urg   laser missile bomb shield Arak Frizzante Quinta CephalloniaZebib Oidium Izarra Slovenia Eiswein Zwicker Arsac Edelfaule Sloe Phylloxera Fiasco Copita Safrap Mezcal Tahbilk NATOF Alpha Beta Gamma Delta  Z1 - @ ZS$ a^b^b__`^ab_K`b^_a`<b`^a_ `b_`b*^_`bab^N`_b<a``^b_a^`_#`b^<`_`b"a^ _Z`bb!a!^`__b"`4`^a,_8'`$`(_Z"`ba+#`4^_`,$a *b`^{%bM&_`"a*`&^ba$_aQ`'^< SET COURSE 1 inward 2 outward 3 teleport  VIEW: Haberdaber at Beta 7 1 Haberdaber 0 system commands  SYSTEM COMMANDS 0 select view  MALFUNCTION HOPELESS DISASTROUS ABOMINABLE TERMINAL FAILING FAST DON'T WAIT UPSTART PRAYINGDON'T ASK YOU'RE JOKINGLAUGHABLE WIPED OUT WRECKED RUINATION CONFUSED CATASTROPHIC DESPERATE FORGET IT g'A FORGET IT"  uNayh riennemses*pSuwsdfYZSXP.