ZXTape! a10   R! .a10 Castle Spellerous  Eve Gorton  64255 2:2:7: En=214:0;7;n,8;" ":n (Ln=1518:4;n,10 ;".";n,18;".":n -Bn=1920:4;n,10 ;"";n,18;"":n 2+4;17,11 ;"" <0;7;4,8;" BLACKBOARD";5,8;" SOFTWARE ";7,8;" CASTLE";8,8;" SPELLEROUS";10 ,8;" A GAME";11 ,8;" FOR THE";12 ,8;" 48K SPECTRUM" d,1;21,0;"STILL LOADING" i0,0; n"b"64256,1281 d1:1:7::0;7;0,0;" CASTLE SPELLEROUS - VOCABULARY " ͍0;4;2,0;"1";7;" Words which have ea as a ";3,0;" short ""e"" sound. " Ҏ0;4;4,0;"2";7;" Words which have ea as a ";5,0;" long ""e"" sound. " X0;4;6,0;"3";7;" Words which have ing endings. " X0;4;7,0;"4";7;" Words which end with l. " Z0;4;8,0;"5";7;" Words which contain qu. " 0;4;9 ,0;"6";7;" Different ways of spelling ";10 ,0;" the sound or. " ]0;4;11 ,0;"7";7;" Words containing ei or ie. " 0;4;12 ,0;"8";7;" Words with a silent first ";13 ,0;" letter. " 0;4;14,0;"9";7;" Words containing double ";15,0;" letters. " T0;4;16,0;"10";7;"Very hard words indeed! " 0;6;18,0;" You must rescue the princess from the magician's castle. Spell your way to safety! " 6#1;1;0,7;" STILL LOADING "  20,0; "c" 2:"a10"1:"b"64256,1281:"a10":"b"64256,1281 -b : @ <|w?U$<<Z<<~``<<<<?wcAxƂ?U P P P P P P P  MGG\GWq !v>![~#"[o<&)))K6\ >2[: [2 [: [2[> 2[~#"[2[:[= 2:[= :[G: [O: [ 2 [*[2[: [G: [2 [*[ 2[: [G: [2[: [Oͤ:[<2[ :[<2[ :[0@ :\G:\G:[o:[g>Xg:\w:[G@gxgxo:[Go!xO F![F(// P3pMN=MK( !v>??b7;2;19,1;" ";0;"Press the number and ENTER";2;" " @G7;2;20,1;"" Al$ BRl$"1"l$"2"l$"3"l$"4"l$"5"l$"6"l$"7"l$"8"l$"9"l$"10"65A Fl=l$ Gr1,10 :1;3;17,0;" ";7;"";1;" " HF7;3;19,1;" " Id7;3;18,1;"";0;"Press G to go on to the game";3;"" Jd7;3;20,1;" ";0;"Press V to see vocabulary ";3;"" KG7;3;21,1;"" P#"g"Ʀ"G"Ʀ"v"Ʀ"V"80P U="G"Ŧ="g"1000 Zh8000@+l:1:1:7::7;0;0,0;"Vocabulary at Level ";l _mm=140(:w$:w$,:m:7;0;21,0;"Press: A to alter, G to go on" `#"g"Ʀ"G"Ʀ"a"Ʀ"A"96` a="g"Ŧ="G"1000 dalter vocabulary nZ1:1:7::1;0,0;"READ ALL NOTES BEFORE YOU START" x:0;2,0;"1.List by pressing 0 then N." 24,0;"2.Press CAPS SHIFT with EDIT." 6,0;"3.You can now alter the line or type a new line with the same line number. Limit your line to 40 words." [7;11 ,0;"4.When you are finished, press ENTER and RUN the program." l14,0;"5.To SAVE the new program, see the program notes or type GOTO 9000 and ENTER." 518,1;" Press M to return to menu " "M"Ʀ"m"Ʀ"0"155 ="m"Ŧ="M"190 6:8000@+l  502 ȫi=23306 [:i,lp:i+1,cp:i+2,hl:i+3,wl:i+4,8:i=i+4:w=w$:n=1w:i+n,w$(n):n:i+w+1,255:w=65024: 1:7:1:: }1:10 ,5;"Do you want to see";11 ,5;"the instructions?";13 ,5;" Press Y or N " $"Y"Ʀ"y"Ʀ"N"Ʀ"n"715 ="y"Ŧ="Y"900 ڎ:10 ,5;" Please type your name ";11 ,5;" and press ENTER ";13 ,5;" ":n$ n$=""730 "n$(1)97a800  'n$11 n$=n$(110 ) j0:0:7::lp=20:cp=1:hl=1:wl=2:w$="Hello, "+n$:200 ]lp=20:cp=30:hl=1:wl=2:w$="Press any letter to go to":200 S2:lp=80P:cp=60<:hl=2:wl=4:w$="CASTLE":200 X2:lp=502:cp=105i:hl=2:wl=4:w$="SPELLEROUS":200  0::  -gosub to make sure name begins with capital *&n$(1)=(n$(1)-32 ) 4 0:0:7: 23676|\,251:3,0;"The princess  has been capturedby a wicked wizard and carried off to CASTLE SPELLEROUS." 6502:9 ,0;"The king has sent 10 of his best";10 ,0;"men  to the rescue. ":502:13 ,0;"You can help them to rescue her by giving correct answers.":502:16,0;"Wrong answers will give the wizard a chance to attack." 921,0;" Press G to go on " "g"Ʀ"G"930 : 0,0;"The wizard can turn your men into:-":20:3,0;"frogs ":.5,-30:.5,-35#: 20:3,8;"butterflies ":.025{L,10 :.025{L,15:.025{L,20:.025{L,15:20:3,22;"or bats " I.05|L,35#:.05|L,32 :502:6,0;"or he can carry them off to the castle.":502:9 ,0;"He appears as a vampire bat:":.5,-20:.5,-12 :.5,-20:7;0;11 ,12 ;" ";12 ,12 ;" ";13 ,12 ;" " .125},10 :.125},10 :6;0;16,0;" WATCH OUT FOR SURPRISE ATTACKS!":10 :21,0;" Press G to go on " "g"Ʀ"G"955  start of exercises .700:23676|\,255:8900" "wiz=wiz+((*3)+1) s=10 62008 "d$=""e+end10 5700D end+e10 5700D wiz10 5400 6;0;18,0;" REMEMBER ";19,0;" THE WORD ":.125},20:4;0;20,0;" Word no.";t+1;" "  1100L Q7:0:lp=135:cp=140:hl=1:wl=2:200 Tj=0q:j:j=1720:0;j,13 ;" ":j .125},10 :3;7;18,0;" TYPE THE ";19,0;"WORD & ENTER";4;0;20,0;" Word no.";t;" ";21,0;" Score:";s;" ";7;0;21,24;"Level:";l 23658j\,0:a$ $'a$16a$=a$(115) )a$=w$3000 .a$w$4000 L.gosub to fetch randomW$ and do large letter Vrandom=(*40()+1 `z(random)=11110V jz(random)=1 o t=t+1 t&8000@+l:m=140(:m$ ym=random1160 ~ m:w$=m$:  w$=m$: right sc=0:wiz=wiz+1 j1;7;18,0;" CORRECT ";19,0;" ":.125},20 3s=s+1:21,0;" Score:";s;" " s=10 6100 7000X+(s*10 ) 1010  wiz=wiz+2:sc=sc+1 sc=14100 j=05:2;7;18,0;" No, the right ";19,0;" answer was: ":.15~,-20:j Q7:0:lp=120x:cp=145:hl=1:wl=2:200 [150:j=1821:0;j,0;" ":j #e=e+1:sc=0:e$(e)=w$  5000  1010 second chance subroutine  0;19,0;" ":j=05:0;7;1;18,0;" TRY AGAIN ":.15~,j:j ?lp=135:cp=140:hl=1:wl=2:200 ,j=035#:j:.5,-10 : Cj=1720:0;j,13 ;" ":j U18,0;"TYPE THE WORD";19,0;"and ENTER ":.15~,j:j a$ "P0;18,0;" ";19,0;" " 'a$w$4000 ,a$=w$3000 wizard )zap=(*3)+1:bt=bt+1 %3:5000+(100d*zap) d$=""5700D end+e10 5700D 23676|\,255:a=110 :0;3;16,0;d$:3:0;7;16,0;d$:3:a d$=d$(2) ,0;6;16,0;d$;" " 4;0;15,0;"":.5,12 :j=09 :4;0;15,j;" ":.005y# =,10 :4;0;15,j;" ":.005y# =,12 :j j=1514-1:4;0;j,10 ;"":.02{# =,10 :4;0;j,10 ;"":.02{# =,12 :4;j,10 ;" ":j:5;0;13 ,10 ;""  0: bat bat=(*2) bat=05150 T23676|\,251:0;8;1,29;"":1,25 z=299 -1:5;0;1,z;" ":.005y# =,35#:5;0;1,z;" ":.005y# =,35#:z 23676|\,251:z=112 :5;0;z,9 ;"":.002xn,12 -z:5;0;z,9 ;"":.002xn,12 -z:5;z,9 ;" ":z Q5;12 ,9 ;"":1,25:z=11 0-1 5:5;13 ,10 ;" ";z,9 ;"";z+1,9 ;" ":.03{u\,12 -z:3:z,9 ;"";z+1,9 ;" ":.03{u\,12 -z:z+1,10 ;" ":z  z=9 28:1:5;0;0,z;" ";5;1,z+1;" ":.005y# =,35#:5;0;0,z;" ";1,z+1;" ":.005y# =,35#:z 5;0;0,29;"";1,29;" ":.005y# =,35#:5;0;0,29;"";1,29;" ";2,29;" ":.005y# =,35#:2,29;" " r5;0,29;"":a=110 :.005y# =,35#:a:5;0,29;" ":  4th zap #P5:.5,-1:200,150:1;-115s,-85U $%J=015:.005y# =,J:J (P5:.5,-1:200,150:1;-115s,-85U -23676|\,251:z=13 0-1:z,9 ;"":.03{u\,17-z:z,9 ;" ":.03{u\,17-z:z:23676|\,255 2 F Pfrog Z<180,105i:1;0;-95_,-33! [j=110 :.025{L,-26:.025{L,-25:j:180,105i:1;0;-95_,-33! d23676|\,251:j=020:.025{L,-30:5;4;13 ,10 ;"":.025{L,-30:5;0;13 ,10 ;"":J i5;13 ,10 ;" ":j=10 16:4;0;14,j;" ":.5,-25:j:4;5;14,16;" ";5;0;"":.5,-25:5;14,19;" ": nra=2530:5;1;13 ,18;"";1;14,19;".":.05|L,a:a s]5;0;13 ,18;" ";0;14,19;" ":.05|L,a:a   butterfly =250,140:1;0;-165,-68D ~j=110 :.025{L,26:.025{L,25:j:250,140:1;0;-165,-68D 23676|\,251:j=010 :.025{L,30:5;1;13 ,10 ;"":.02{# =,-30:5;3;13 ,10 ;"":.02{# =,4::J 8;13 ,10 ;" ":j=13 0-1:8;1;j,10 ;"":.02{# =,25:8;3;j,10 ;"":.03{u\,26:5;j,10 ;" ":j  surprise attack e+end=10 5700D "wiz=0:save=(*26)+97a:0,0;"SURPRISE ATTACK! PRESS ";save;" TO STOP":23658j\,0:1:20: 'B=0(((*5)+1)*5):.002xn,30:3:.002xn,30:5:.002xn,30:7:.002xn,30:0 ,=save5460T 1B 6end=end+1:0:7;0;0,0;" TOO LATE! Prepare to be zapped!":1,20:0:20:5;0,0;" " ;0:0:5000 J T6;0;0;0,0;" ATTACK PREVENTED! Well done! ":j=04:.125},1:.125},3:.125},8:j YI0:5;0,0;" ": |bat return to tower z=9 28 s5;0;1,z;" ":.05|L,26:5;0;1,z;" ":.05|L,26: z:1,29;" "  wizard wins - end routine 6:6:0::lp=20:cp=502:hl=1:wl=2:0:w$=" All your men are lost!":200 Icp=90Z:lp=10 :w$="The wizard is coming for you!":200 N1,-10 :1,-10 :.05|L,-10 :1,-10 423676|\,255:1:1:0: 0,10 ;"";0,21;"";1,0;"";1,10 ;"";1,20;"";1,31;"" ^2,0;"";2,10 ;"";2,19;"";2,30;"" b3,0;"";3,10 ;"";3,18;"";3,29;"" f4,0;"";4,10 ;"";4,17;"";4,28;"" U5,0;"";5,10 ;"";5,27;"" i6,0;"";7;6,10 ;"";1;6,26;"" k7,0;"";7;7,10 ;" ";1;7,25;""  m8,0;"";7;8,10 ;" ";1;8,24;"" ]9 ,0;"";9 ,10 ;"";9 ,23;"" b10 ,0;"";10 ,10 ;"";10 ,22;"" 611 ,0;"" !Pa=12 21:0;a,0;" ":a &S0;6;13 ,13 ;"";0;6;13 ,18;"" *7a=12:b=17:b:.03{u\,b: +w7;8,12 ;" ";0;2;""; 7;0;8,17;" ";2;7;"" ,b -$b=17:b:.03{u\,b: 07;2;8,12 ;" ";7;0;"";0;2;8,17;"";0;7;"" 1b 2a 50;2;7,13 ;"";7;8,12 ;" ";0;7;"";7;0;8,17;"";2;"";2;0;7,18;"" ::2,25:100d:7:0:7: D wizard wins N 5600 X 85004!  end routine w5:0:a=9 11 :13 ,a;" ":.005y# =,10 :13 ,a;" ":.005y# =,10 :a j=15:5;0;13 ,12 ;" ":.002xn,20:13 ,13 ;" ":.002xn,20:13 ,13 ;" ":.002xn,20:13 ,13 ;" ":.002xn,20:j a=12 14:8,12 ;" ";9 ,a;" ";10 ,a;" ";11 ,a;" ";12 ,a;" _";13 ,a-2;" " I.05|L,-5:13 ,a-2;" ":.05|L,-5:a m=17:j=14:5;0;13 ,15;" ":.002xn,20:13 ,15;" ":.002xn,20:13 ,15;" ":.002xn,20:13 ,15;" ":.002xn,20 9 ,m+j;"":j  13 ,14;" ";12 ,15;"":5:12 ,15;"";11 ,16;"":5:11 ,16;"";10 ,17;"":5:10 ,17;"";9 ,17;"":5:9 ,17;"";8,17;"" da=1720:8,a;" ":4:8,a;" ":4:a:8,20;" " ?0:5,23;"":10 :j=24:5;0;5,23;"":.001wn,20:5,23;"":.001wn,20:5,23;"":.001wn,20:5,23;"":.001wn,20:j,24;" ";6;2;j+1,24;"":j 6;2;5,24;"";5;" ":.05|L,6:0;5,23;" ":23676|\,251:1;5,23;"":10 :5,22;" ":23676|\,255 >23676|\,251:q$=" " a=310-1:1,a;" ":0,0;;q$;1,0;q$(5):.0005vn,35#:q$=q$(2):1,a;" ":a v1,35#:10 ,160:1;110n,-90Z:10 ,160:1;230,-30  pa=15:.005y# =,10 :2:.005y# =,-2:7:.005y# =,10 :1:a $v1,35#:10 ,160:1;110n,-90Z:10 ,160:1;230,-30 )40,0;" ";1,0;" " BUpaper=6:23676|\,255:8950":5:a=18:ink=a Ga=5ink=2 La=8ink=5 Q.005y# =,a+25:ink:9 ,17;"";10 ,17;"";11 ,16;"";12 ,15;"_";13 ,15;" ":a:9 ,20;" " Vg23676|\,251:0:180,70F:1;-20,30:.5,-10 [23676|\,255:paper=3:8950":5:23676|\,251:0:180,70F:1;-20,30:11 ,19;"";12 ,20;"";13 ,21;"":.5,-12 : `paper=2:23676|\,255:8950":5:0:11 ,19;" ";12 ,20;" ";13 ,21;" ";14,18;"" e@.5,-14:23676|\,251:q$=" ":r$=" ": j23676|\,255:1,-14:a=1911 -1:13 ,a;" ":.05|L,10 :13 ,a;" ":.05|L,10 :a:13 ,14;" " opaper=0:8950": t5:a=214:a,18;" ":a:5;4;14,18;"";1;14,22;" " ~1,20:1,20:a=2619-1:23676|\,255:3;14,a;" ":23676|\,251:13 ,a;"  ";12 ,a;"  ";7;11 ,a;" "  10 :a t23676|\,255:a=9 18:13 ,a;" ":.05|L,10 :13 ,a;" ":a a=1926:23676|\,255:3;14,a;" ":23676|\,251:7;11 ,a;" ";12 ,a;" ";13 ,a;" ":10 :a 10 :23676|\,255:3;14,27;" ":23676|\,251:7;11 ,27;" ";12 ,27;" ";13 ,27;" " 10 :23676|\,255:3;14,28;" ":23676|\,251:7;11 ,28;" ";12 ,28;" ";13 ,28;" " 10 :23676|\,255:3;14,29;" ":23676|\,251:7;11 ,29;" ";12 ,29;" ";13 ,29;" " 10 :23676|\,255:3;14,30;" ":23676|\,251:7;11 ,30;" ";12 ,30;" ";13 ,30;" " 10 :23676|\,255:3;14,31;" ":23676|\,251:7;13 ,31;" " 100d:85004! Xmaking tower b<col=0:t$="":p$(s)="___":tre=9 :7100: l.t$=" ":p$(s)="":tre=8:7100: v/t$=" ":p$(s)="":tre=7:7100: 0t$=" ":p$(s)="":tre=6:7100: 1t$=" ":p$(s)="":tre=5:7100: Qcol=0:8:0:t$=" ":p$(s)="":tre=4:7100: Acol=-2:t$=" ":p$(s)="":tre=3:7100: Bcol=0:t$=" ":p$(s)="__":tre=2:7100: Rt$=" ":line=12 :col=-2:p$(s)="":tre=1:7100:  turning trees into tower parts څj=10 tre-1:8:0:13 ,j;" ":.03{u\,-15:8;13 ,j;" ":.03{u\,-15:j 24;5;13 ,tre-1;t$;"" 8:0:j=tre-18:8;0;13 ,j;" ":.03{u\,-20:8;0;13 ,j;" ":.03{u\,-20:j 24;5;13 ,tre-1;t$;"" 13 ,9 ;" ":j=110 :5;0;13 ,9 ;"":.001wn,20:13 ,9 ;"":.001wn,20:13 ,9 ;"":.001wn,20:13 ,9 ;"":.001wn,20:j !s=8s=9 7400 %p$(s)="__ "p$(s)="___"7300 j=9 13 +col:13 ,j;" ";p$(s)(1):.03{u\,-15:13 ,j;" ";p$(s)(1):.03{u\,-15:j spin=15 .s=7s=9 s=8spin=13 13 ,13 ;" "  #s=713 ,15;""  $s=113 ,15;" "  +s=1s=8s=9 7185  j=110 :5;0;13 ,spin-1;" ":.001wn,20:13 ,spin;"":.001wn,20:13 ,spin;"":.001wn,20:13 ,spin;"":.001wn,20:j:13 ,spin;" " 7200 +(s*10 ) !s=8s=9 7450 }j=13 +col10 -1:13 ,j;" ":.02{# =,-15:8;13 ,j;" ":.02{# =,-15 #s=813 ,13 ;"" j   gosub for building up tower *13 ,12 ;" ___": 9512 ,15;"___";13 ,15;" ": >N11 ,15;"___":k=23:10 +k,15;" ":k: HM10 ,15;"___":k=24:9 +k,15;" ":k: RL9 ,15;"___":k=25:8+k,15;" ":k: \f8,15;"___":k=25:7+k,15;" ":k:13 ,13 ;" ": ff8,15;"___":k=25:7+k,15;" ":k:13 ,13 ;" ": p|8,16;"__":k=25:7+k,15;"":k:12 ,13 ;"__";13 ,13 ;" ": z8,16;"__":k=25:7+k,15;"":k:11 ,14;"";12 ,13 ;"_";13 ,13 ;" ": }23676|\,251:j=9 11 :13 ,j;" ":.05|L,-15:13 ,j;" ":.05|L,-15 j:13 ,11 ;" " 23676|\,255 !s=8s=9 7400  7173 !routine 8th&9th correct answers 323676|\,251:13 ,9 ;" ": #23676|\,255:7185 13 ,9 ;"";t$ 13 ,9 ;" ":j=110 :5;0;13 ,13 ;"":.001wn,20:13 ,13 ;"":.001wn,20:13 ,13 ;"":.002xn,20:13 ,13 ;" ":.001wn,20:j:13 ,9 ;" " >s=812 ,13 ;"__";13 ,13 ;" " $Us=9 12 ,13 ;"_";13 ,14;"";13 ,13 ;" " B 7195 @6If you are editing, press RUN and ENTER go on A"blacklead","bread","breadknife","breakfast","breast","breath","breathless","cleanliness","dead","deadline","deaf","dread","dreadful","feather","forehead","head","headline","health","heather","heavy","leant","leather","instead","meadow","meant","overhead","steady","stealth","sweat","sweater","tread","treadmill","treasure","thread","threading","unsteady","wealth","wealthy","weapons","weather":press RUN and ENTER to go on Bc"beam","clean","cleaning","cream","deal","dealer","dream","ear","earring","easy","easily","fear","flea","gleam","heal","healing","heat","heave","knead","leader","lean","leave","leaving","mean","peal","plead","please","read","real","really","repeal","reveal","seam","spear","squeal","steal","stream","tea","team","tease":press RUN and ENTER to go on C"being","bringing","crying","dancing","digging","dreaming","driving","fighting","floating","forgetting","grieving","hating","having","leaving","living","looking","loving","lying","meaning","meeting","nothing","planning","playing","resting","riding","rising","running","searching","seeing","seeking","singing","sitting","sleeping","spelling","swimming","taking","tearing","waiting","walking","winning":press RUN and ENTER to go on D"actual","animal","beautiful","carnival","detail","enamel","equal","formal","fossil","gospel","growl","hotel","hovel","hospital","kernel","lintel","mineral","national","natural","normal","offal","parallel","powerful","painful","quill","rural","real","royal","scroll","successful","tasteful","tendril","utensil","useful","usual","unusual","vertical","visual","whirlpool","wilful":press RUN and ENTER to go on E"acquaintance","acquire","acquit","aquarium","bequest","enquire","equal","equality","equally","equator","equipment","equivalent","liquid","liquor","liquorice","opaque","plaque","quarter","quaver","queen","quench","question","queue","quick","quickly","quiet","quit","quite","quiver","request","require","squabble","square","squash","squeak","squeeze","squib","squint","squire","squirrel":press RUN and ENTER to go on Ft"author","caught","cause","caution","court","crawl","draw","drawn","dwarf","fall","fawn","fork","fortune","gaunt","gauntlet","hall","laundry","lawn","maul","morning","poor","port","porthole","shawl","short","small","sought","sport","stall","stork","straw","strawberry","swarm","tall","taught","trawl","wall","wallpaper","war","wardrobe":press RUN and ENTER to go on G"believe","ceiling","chief","counterfeit","diesel","diet","eight","eighty","feign","feint","foreign","freight","grief","heifer","height","heinous","heir","leisure","neigh","neighbour","perceive","pie","receipt","receive","receiving","reign","rein","seize","sheik","siege","sieve","skein","sovereign","their","thief","veil","vein","weight","weir","weird":press RUN and ENTER to go on H"gnarled","gnash","gnat","gnaw","gnome","gnu","knave","knead","knee","kneel","knell","knife","knight","knit","knob","knock","knot","know","knowing","knowledge","knuckle","psalm","psalter","pseudonym","psychiatrist","psychic","psychology","ptarmigan","pterodactyl","wrapping","wren","wrench","wretched","wring","wrinkle","wrist","write","writing","wrong","wrote":press RUN and ENTER to go on I"accept","accommodate","blessing","borrow","cannot","coffee","comma","copper","cotton","ferret","giggle","haggle","hammer","happen","happy","illegal","kettle","manner","marriage","message","mutter","paddle","passage","passenger","patter","pellet","pepper","planner","pretty","rabbit","riddle","rubbish","simmer","sinner","skittles","toffee","tomorrow","valley","wallet","zipper":press RUN and ENTER to go on J"accommodate","awkward","adviser","acquiesce","distraught","elliptical","eclectic","facetious","fluorescent","fortuitous","geriatric","heighten","haughty","irradiate","iridescent","judicial","judicious","mischievous","nuisance","neutral","overrun","obsolete","physique","physic","psychosis","queue","quiescent","rhythm","straighten","superfluous","spacious","tenacious","seize","siege","thoroughly","taciturn","usurp","visitor","vicissitude","weightless" !4 end routine !9e=08540\! !>V:1,2;"Words to remember at Level ";l;:"Words to remember at Level ";l !H1j=1e:4+j,2;e$(j):e$(j):j !RS#1;0,0;"Press any letter for certificate":0:8550f! !\:16,2;"No mistakes at Level ";l:"No mistakes at level ";l:#1;1;0,0;"Press any letter for certificate" !a 0 !f46:6:0::o=0:8800`" !ks9 o=1 !plost=end+e:lp=15:cp=10 :hl=1:wl=2:w$=n$:200:0;7;6,2;" Right answers:";s;9 ,2;" Wrong answers:";e;0;7;12 ,2;" Soldiers lost:";lost !us>lost8600! !vs=lost8600! !zXlp=20:cp=130:hl=1:wl=2:w$="The wizard has won!":200 !: 8785Q" !hlp=20:cp=130:hl=1:wl=2:w$="The princess is safe!"::200:8785Q" "Q:: "Rend+e>s5605 "V4#1;0,0;"Press 1 to start again" "["1"8795[" "_ "`$gosub for tree border (final page) "e23676|\,255 "t9n=031:7;0;0,n;"":n "y:n=021:7;0;n,31;"":n "~Cn=310-1:7;0;21,n;"":n "Bn=211-1:7;0;n,0;"":n " "Ĩpaper=7:23676|\,255:0:5:0::j1=14:j2=16:j3=4:j=j1j2:j3;j,0;" ":j "ej1=16:j2=21:j3=0:j=j1j2:j3;j,0;" ":j "Γ7;0;21,24;"Level:";l:5;4;14,18;" ";4;1;15,19;"" " 8950" "ݰ23676|\,251:5;5,23;"";5;4,23;"";3,23;"";2,23;"";6;2;"":23676|\,255 "Rk$="":j$="":j=513 :0;4;j,0;k$:k$=k$+j$:j "h23676|\,255:0;6;16,0;d$;0;5;13 ,10 ;"" "5:j=05:5;1;5,22;"";3,18;"Help!":.125},30:1;5,22;"";3,18;" ":.125},30:j " ":for drawing castle "hpaper:j=482:j,30;"";j+1,30;"":j:3,30;"" #F6,22;"";7,22;"";8,22;"" #:0:j=9 13 :j,22;"":j # 823676|\,255:10 ,22;"" # #2\:lp=20:cp=1:hl=1:wl=2:w$="SAVING YOUR NEW PROGRAM":200 #7G10 ,0;" Type the new program's name and press ENTER." #<l$ #Al$=""l$=" "l$="c7" #B'l$11 l$=l$(110 ) #FR:4,0;"1. Rewind a new tape, then wind forward past the leader." #K57,0;"2. Press RECORD on the recorder." #Px9 ,0;"3. Press 1 to SAVE the program and the bytes. " #ZF12 ,0;"4. WATCH THE SCREEN AND FOLLOW INSTRUCTIONS." #dT15,0;"5. The new program is loaded as";16,3;"""";l$;"""" #x"1"9080x# #21,1;"SAVING PROGRAM":l$9900&:21,1;"SAVING BYTES ":"b" 64256,1281:1,10 :20,1;"REWIND TAPE AND PRESS PLAY TO VERIFY PROGRAM AND BYTES." #!l$:"b" 64256,1281 #a:10 ,1;"Your program is now saved.";12 ,1;"Press 9 to return to menu." #"9"9130# # &64255:"" & 'R"b"64256,1281:1,10 :"c"1:1,10 :"c" qdin<2i[w WA Spelling Game   : Ū  (D BfxytseL1l