ZXTape! 0Created with Ramsoft MakeTZXa8 | 7a8 SPEECH MARKS 1983  Eve and Paul Gorton  64255 2:2:7: Fn=214:0;7;n,7;" ":n (Jn=1517:4;n,10 ;".";n,17;".":n -Jn=1820:4;n,10 ;"";n,17;"":n 2*4;17,11 ;"" <0;7;3,8;" BLACKBOARD ";4,8;" SOFTWARE ";7,7;" PUNCTUATION";8,7;" PROGRAM 4";10 ,7;" SPEECH MARKS";13 ,8;"SPECTRUM 48K" A$21,0;" STILL LOADING" P"b"64256,1281 U0:0:7::line=5:column=60<:height=2:width=1:6:0:w$="SPEECH MARKS":9999' Z#0;7;4,0;"THERE ARE 3 LEVELS:";6,0;"1 direct speech with only one ";7,0;" set of speech marks.";9 ,0;"2 direct speech with one or two sets of speech marks. ";12 ,0;"3 direct and/or reported speech." _7;0;14,0;" You must complete 5 sentences correctly at every level before going on to the final game. " c6;0;1;17,8;" STILL LOADING ";0;0;7;18,6;"loading time:3.5 mins." d"0:19,0;:"c" $"a8"1:"b"64256,1281:"a8":"" 'x=23306 [:x,column:x+1,line:x+2,width:x+3,height:x+4,8:x=x+4:w=w$:n=1w:x+n,w$(n):n:x+w+1,255:w=65024: ' inolum<eighidtx[wW SPEECH MARKSb |Bu >#   }=<~ۙۀ??~ >? p|0008888|8 8|8888x9}}88MMgYyMP<W P P P 3NMN`NM[!Z !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(// P P P M>MM X XL8Wq !v>6|x5~1KG?>((P>x<@~$祥Bf~Z~B$BQ$B P  c MQ<PUNCTUATION 4 SPEECH MARKS  Eve and Paul Gorton 1983 64255 U236099\,60<:23658j\,0:23561 \,0:23562 \,0  100d 2large letters 7xx=23306 [:xx,column:xx+1,line:xx+2,width:xx+3,height:xx+4,8:xx=xx+4:l=w$:v=1l:xx+v,w$(v):v:xx+l+1,255:l=65024: dP0:t=0:s(3):w(3):total=0:x$="":y$="":z$="" paper=0:paper:paper:9 ::height=2:width=2:line=15:column=15:w$=" SPEECH MARKS ":502 700:6,4;"THERE ARE THREE LEVELS";9 ,4;"1 direct speech using ";10 ,6;"one set of speech marks";12 ,4;"2 direct speech using";13 ,6;"one or two sets of marks";15,4;"3 direct and reported speech" ?#1;0,2;" Press G to go on to Level 1 " "G"Ʀ"g"170 level=1 1000 individual level menus paper=level+3 level=1paper=1 paper:paper:9 ::height=2:width=1:line=1:column=30:w$="SPEECH MARKS - LEVEL "+level:502 9 ,4;" PRESS ";11 ,4;"1 to see the examples";13 ,4;"2 to do the exercises";15,4;"3 to see the sentences";16,5;" or to alter them";18,4;"4 to return to the beginning" $"4"Ʀ"1"Ʀ"2"Ʀ"3"515 ="4"100d  #(level*1000)+(*100d) name routine 7;0;10 ,3;" Please type your name ";11 ,3;" and then press ENTER. ";15,2;" Your name must not have ";16,2;" more than 10 letters. " n$ 'n$>10 n$=n$(110 ) =n$(1)97an$(1)=(n$(1)-32 ) Gj=10 16:j,0;" ":j Yheight=2:width=1:line=80P:column=0:w$="Hello, "+n$:502 iheight=2:width=1:line=110n:column=0:w$="Press any letter to go on":502 O0:j=621:j,0;" ":j    level 1 pr=4:500 Legs Q23676|\,251:4:4:0::7;0,5;" SPEECH MARKS LEVEL 1";3,0;"When you write the actual words spoken by someone, you must put them in a pair of SPEECH MARKS. ":.5,2:150 Vj=2816-1:0;4;13 ,j;" ":.05|L,j:j:4;0;13 ,16;"" [710 :.125},35#:10 :.125},35#:10 :4;7;8,10 ;"";9 ,9 ;"";10 ,9 ;"";11 ,9 ;"";12 ,15;"";0;7;9 ,10 ;" Hello,";10 ,10 ;"I'm Max." `f$="""Hello,I'm Max,"" said the mouse.":e$=f$:20:7;17,0;"To put this picture into words, press 1." e"1"1125e jPj=1718:4;j,0;" ":j oj=1̱e$ te$(j)=""""e$(j)=" " y56;17,j-1;e$(j):.005y# =,j:j ~h#1;7;0,0; " Press 2 to put the actual words spoken into speech marks. " "2"1155 #1;0;7;0,0; " Here are the spoken words ":.005y# =,20:.005y# =,20 p20:j=0502:6;1;17,1;e$(215):.005y# =,10 :j (0;6;17,0;e$ #1;7;0,0; " Here are the speech marks ":.005y# =,20:.005y# =,20 o20:j=0502:.005y# =,10 :1;17,0;"""";17,15;"""":j (0;6;17,0;f$ 100d:#1;7;0;0,0;" Note the position of the comma Press 3 to go on ":502:1;17,14;",": "3"1195  1000   exercises screen=4:z(10 ):5700D:0:0:7::j=515:screen;j,0;" ":j  4500  5000  edit routine  4000  1000 xend routine for level 1  ^height=2:width=1:line=15:column=10 :w$="WELL DONE, "+n$:502 Yheight=2:width=1:line=40(:w$="You have completed Level 1":502 D10 ,1;"Score: Right=";s(1);" Wrong=";w(1)  iheight=2:width=1:line=115s:column=10 :w$="Press G to go to Level 2":502 "g"Ʀ"G"1440 6w(1)0w(2)=w(2)+w(1) (s(1)=5s(2)=5 level=2:2000 l%b$="""I'll miss you,""she said.":: v?b$="""I can't believe it! I'm first!""shouted the winner.":: 7b$="A B.B.C. newsreader said,""Here is the news.""": 0b$="""Thank you very much indeed,""he said.": %b$="""Can you help me?""I asked.": 7 When you have finished,type GOTO 4299 and ENTER  )b$="Douglas said to his dog,""Sit!""": 0b$="""It is going to snow today,""Jim said.": 0b$="Ann said,""I must be home before six.""": 7 When you have finished,type GOTO 4299 and ENTER  5b$="The captain shouted,""Help! Man overboard!""": :b$="""I don't think green suits me,""said Mary sadly.": 7 When you have finished,type GOTO 4299 and ENTER  +level 2 Direct speech - complex sentences (s(1)=5s(2)=5 pr=3:500 4 examples 623676|\,251:4:4:0::7;0,4;" SPEECH MARKS - LEVEL 2 ":.5,-3:7;2,0;"The actual words spoken are called DIRECT SPEECH. ":.5,8 97;5,0;"Sometimes direct speech is splitup so that more than one set of speech marks must be used. ":.5,2:150 >j=08:0;4;16,j;" ":.05|L,j:j:23676|\,255:502:4;0;16,9 ;" ";15,10 ;"" C023676|\,251:10 :.125},35#:10 :.125},35#:10 :4;7;9 ,5;"";10 ,4;"";11 ,4;"";12 ,4;"";13 ,4;"";14,10 ;"" D7;0;10 ,5;"This is my";11 ,4;"friend,Bobby.";12 ,7;"He's a";13 ,6;"blackbird." F100d:.125},35#:10 :.125},35#:10 :23676|\,255:j=415:j,32 -j;" ";j+1,32 -j;"":.05|L,j:j,32 -j;" ":j:16,17;"";15,17;"" G~7;5,0;"Sometimes direct speech is splitup so that more than one set of speech marks must be used. " Hf$="""This is my friend, Bobby,""":g$="said Max,""He's a blackbird.""":e$=f$:h$=g$:20:7;18,0;"To put this picture into words, press 1." M"1"2125M RPj=1819:4;j,0;" ":j Wj=1̱e$ \e$(j)=""""e$(j)=" " a56;18,j-1;e$(j):.005y# =,j:j bj=1̱h$ ch$(j)=""""h$(j)=" " d56;19,j-1;h$(j):.005y# =,j:j fh#1;7;0,0; " Press 2 to put the actual words spoken into speech marks. " k"2"2155k p#1;0;7;0,0; " Here are the spoken words ":.005y# =,20:.005y# =,20 u20:j=0502:6;1;18,1;e$(125);19,10 ;h$(11 ̱h$):.005y# =,10 :j z=0;6;18,0;e$;19,0;h$ #1;7;0,0; " Here are the speech marks ":.005y# =,20:.005y# =,20 20:j=0502:.005y# =,10 :1;18,0;"""";18,26;"""";19,9 ;"""";19,27;"""":j =0;6;18,0;f$;19,0;g$ 100d:#1;7;0;0,0;" Note the position of the commas Press 3 to go on ":502:1;18,25;",";19,8;"," "3"1195  1000 print exercise sentence screen=3:z(10 ):5700D:0:0:0::j=515:screen;j,0;" ":j  4500  5000  edit routine 4000:2000 `end routine for level 2 t`:height=2:width=1:line=15:column=10 :w$="WELL DONE, "+n$:502 yYheight=2:width=1:line=40(:w$="You have completed Level 2":502 ~D10 ,1;"Score: Right=";s(2);" Wrong=";w(2)  iheight=2:width=1:line=115s:column=10 :w$="Press G to go to Level 3":502 "g"Ʀ"G"2440 6w(2)0w(3)=w(2)+w(3) *s(2)=10 s(3)=10 level=3:3000 T=b$="""Where are you, Dad?""Ann called,""I've lost you!""": ^@b$="""What is happening?""asked Mrs. Smith,who was worried.": c7 When you have finished,type GOTO 4299 and ENTER  hAb$="""What a mess!""cried Mrs.Tanner, peeping into the room.": rAb$="""This lion,""said the keeper,""is as quiet as a lamb.""": |Bb$="""It's a lovely day,""said Janet,""Let's go for a walk.""": 7 When you have finished,type GOTO 4299 and ENTER  :b$="""Happy birthday,dear Suzy,""sang all the guests.": Gb$="""Now, Mr. Harrison,""Dr. Cameron asked,""where is the pain?""": 7b$="David said quietly,""This letter is for you.""": 7 When you have finished,type GOTO 4299 and ENTER  Jb$="""I want to travel to Leicester,""said the man in the brown suit.": 1b$="""What was that noise?""whispered David.": 7 When you have finished,type GOTO 4299 and ENTER  $level 3 Direct and Reported speech pr=2:500 egs !23676|\,251:4:4:7::7;0;0,5;" SPEECH MARKS LEVEL 3";2,0;" Spoken words can be written as INDIRECT or REPORTED SPEECH. ":.5,2:150 ":0:20:d=14:.05|L,15:.05|L,17:.05|L,19:.05|L,20:d:23676|\,255:j=410 :j,32 -j;" ";j+1,32 -j;"":.05|L,32 -j:j,32 -j;" ":j:12 ,21;" ";11 ,21;" " &10 :23676|\,251:j=010 :0;4;12 ,j;" ":.05|L,35#:j:23676|\,255:4;0;11 ,13 ;"";12 ,11 ;" " +"23676|\,251:10 :.125},35#:10 :.125},35#:10 :4;7;5,5;"";6,4;"";7,4;"";8,4;"";9 ,4;"";10 ,10 ;"" -6.125},35#:5:.125},30:5:.125},28:5:.125},30:5:.125},27:5:.5,27:5:.125},35#:5:7;0;6,6;"Is the";7,6;"cat in";8,4;"the garden?" .u7;7,19;"";8,19;"";9 ,19;"";10 ,22;"" />d=12:.05|L,29:.03{u\,28:d 0?d=12:.125},27:.03{u\,26:d 1>d=12:.03{u\,22:.03{u\,23:d 2I7;0;8,19;"No,she";9 ,19;"isn't." 3f$="Max asked Bobby if the cat was":g$="in the garden and Bobby said":h$="that she wasn't. ":20:7;0;13 ,0;"To put this into words, press 1." 5"1"31255 :7;0;13 ,0;" REPORTED SPEECH ";6;0;14,0;" ";f$;" ";15,0;" ";g$;" ";16,0;" ";h$;" " D.5,10 :.5,6:.5,2:0;7;18,0; " To write it as DIRECT SPEECH press 2. " I"2"3145I l.5,10 :.5,6:.5,2:7;0;18,0; "If we write it as DIRECT SPEECH:" q6;0;19,0;"""Is the cat in the garden?""asked Max the Mouse. ";21,0;"""No, she isn't."" replied Bobby. " vv.5,25:.5,25:#1;0;7;0,0;" Press 3 to go on " {"3"3195{ | 1000 exercises screen=2:z(10 ):5700D:0:0:7::j=515:screen;j,0;" ":j 4500 5000  edit 4000:2000 Hend routine for level 1 \x:height=2:width=1:line=1:w$="WELL DONE, "+n$:column=(256-(w$*8))/2:502 fswidth=1:line=30:w$="You have completed Level 3":column=(256-(w$*8))/2:502 k$score=s(3):wrong=w(3) uC10 ,5;"Score: Right=";s(3);" Wrong=";w(3) z "g$="Max meets the Blue Persians" iheight=2:width=1:line=105i:column=40(:w$="Press G to go on to play":502 2line=135:column=30:w$=g$:502 "g"Ʀ"G"3480 6000p <5b$="""Is tea ready?""John asked,""I'm hungry.""":: F1b$="""Let's go for a swim now,""said Mother.": K7 When you have finished,type GOTO 4299 and ENTER  P8b$="The traffic warden ordered,""No parking here.""": Z8b$="The driver says the bus will go at ten o'clock.": d3b$="""Are you still awake?""whispered the boy.": i7 When you have finished,type GOTO 4299 and ENTER  n<b$="My uncle promised to take me to the match tomorrow.": xFb$="""The bridge,""warned the guide,""may not be strong enough.""": :b$="The stranger asked,""Is this the way to London?""": 7 When you have finished,type GOTO 4299 and ENTER  9b$="""Stop!""called David, as he ran along the road.": 1b$="""That,""said Wendy,""is all there is.""": 7 When you have finished,type GOTO 4299 and ENTER  print sentences 1:1:7::n=09 :j=810 :j,0;" ":j:(level*1000)+900+(n*10 ):4;0;6,0;" Sentence no.";n+1;" " b$32 4015 '7;0;8,0;b$  4025 \7;0;8,0;b$(131);10 ,0;b$(32 ̱b$)  4025  4100 j n  4300 %choice of editing routine or return  ="2"4105  1;7;1;1,0;"EXERCISE SENTENCES AT LEVEL ";level;12 ,0;"PRESS:-";0;14,3;"1 to alter this sentence";16,3;"2 to see the next sentence";18,3;"3 to return to beginning" "1"Ʀ"2"Ʀ"3"4120 "="1"4200h ,="2"4180T 6="3"(level*1000) T0clear sentence and return to see next sentence Y[j=810 :1;j,0;" ":j:4040 hediting routine r:7;0;0,8;" EDITING ROUTINE ";1;7;2,0;"1. Press K to list the line";4,0;"2. Press N to remove ""scroll""" |1;7;6,0;"3. The line number is: ";(level*1000)+900+(n*10 );8,0;"4. You can now either EDIT the line (see Ch.2 of Spectrum manual) or type a new line with the same number" E13 ,0;"5. To return to editing routine press 0. " t6;0;16,0;" WHEN YOU HAVE ENTERED YOUR NEW LINE, TYPE GOTO 4299  & ENTER " "0"Ʀ"K"Ʀ"k"4255 ="0"4299 =7:0:(level*1000)+900+(n*10 ) 1::4035 saving routine ֡:7;0;0,8;" SAVING ROUTINE ";2,0;" Press S to save the new program";4,0;" Press M to return to the menu " %"s"Ʀ"S"Ʀ"m"Ʀ"M"4320 !="M"Ŧ="m"(level*1000) :7:0:height=2:width=1:line=1:column=1:w$="Routine to save your program:-":502 a5,0;"  Put a new tape in the recorder and prepare for recording. " 8,0;"  Press PLAY and RECORD. ";10 ,0;"  Press R to record the program.";6;0;17,8;" WATCH THE SCREEN ";19,5;" FOR MORE INSTRUCTIONS ": "R"Ʀ"r"4350 W:17,8;" WATCH THE SCREEN ";19,5;" FOR MORE INSTRUCTIONS ":  9900&  500 (select and print sentence for exercise rand=(*10 )+1 z(rand)=14505 z(rand)=1 t=t+1:23676|\,251:6;0;0,0;"SPEECH MARKS";0,24;"Level: ";level:(level*1000)+900+((rand-1)*10 ):a$=b$ Y6;0;2,0;"Sentence No.";t;2,24;"Score:";s(level) %0:7:18,0;"Controls: ";19,0;"To move: 5 6 7 8 ";20,0;"Put in speech marks: press 1 ";21,0;"When all speech marks are in: 0 " (ct=1:t$="":x$="":y$="":z$="" 1start=1:len=b$:len=04600 2len234800:4850:4600 0b$(start)=" "start=start+1:4540 f=22+start 0b$(f)" "f=f-(1f>1):4550 0b$(f)=" "f=f-(1f>1):4555 t$=b$(startf):4850 b$=b$((f+1))  4530  q$=x$+y$+z$ o$(3,28)  0o$(1)=x$:o$(2)=y$:o$(3)=z$ 4!t$=x$:u$="":4900$:x$=u$ >!t$=y$:u$="":4900$:y$=u$ H!t$=z$:u$="":4900$:z$=u$ R :b$(start)=" "start3i$="0"5300 Fy=y+((-1y>1)i$="5")+((1y<(h$-1))i$="8") h0;7;x,2;h$(1y);2;7;"""";7;0;h$((y+1)) .04|# =,-30:2:  5020 ;h$=" "+(x$x=7)+(y$x=10 )+(z$x=13 )+" " 7;7,2;" ";10 ,2;" ";13 ,2;" " Q7;0;7,3;x$;10 ,3;y$;13 ,3;z$  PBxx=10 y$=h$(2y)+""""+h$((y+1)(h$-1)) ZAxx=7x$=h$(2y)+""""+h$((y+1)(h$-1)) dBxx=13 z$=h$(2y)+""""+h$((y+1)(h$-1)) n 5100 xcount=count+1 .2~L,15 8"".1}L,40(:.1}L,20:5260  %q$=x$+y$+z$5105:5500|  5600 |right answer 23676|\,251:n=010 :.05|L,-25:.05|L,-20:4,2;"Your answer was right":.05|L,-25 H.05|L,-20:4,2;"_";4,26;"_":n s(level)=s(level)+1 >level=1s(level)5(level*1000)+400 ?level=2s(level)10 (level*1000)+400 ?level=3s(level)15(level*1000)+400 Y6;0;2,0;"Sentence No.";t;2,24;"Score:";s(level) \0;4,0;" ":(level*1000)+220 wrong answer ,z(rand)=0:w(level)=w(level)+1 23676|\,255:n=010 :.05|L,-30:.05|L,-35#:7;2;4,9 ;" WRONG! ";5,10 ;"";5,21;"" `.05|L,-30:.05|L,-35#:7;2;4,9 ;" WRONG! ": n ^4,6;"The right answer was:";screen;5,10 ;" ";5,21;" " .5,4:.5,4:.5,4:1,0:0;7;7,2;o$(1);10 ,2;o$(2);13 ,2;o$(3) Y6;0;2,0;"Sentence No.";t;2,24;"Score:";s(level) F#1;1;1,5;" Press G to go on ":0 "g"Ʀ"G"5655 !+0;4,0;" ";screen;7,0;" ";10 ,0;" ";13 ,0;" ":0:#1;1,0;" " :(level*1000)+220 DINSTRUCTIONS I0:0:7::10 ,5;"Do you want to see ";11 ,5;"the instructions?";13 ,5;"Press Y or N" J%"Y"Ʀ"y"Ʀ"N"Ʀ"n"5706J N="N"Ŧ="n" SQ7:7:0::0,0;" INSTRUCTIONS FOR THE EXERCISES" X)2,3;" AT ALL 3 LEVELS" ]|100d:4,0;"Read the sentence on the screen and decide whether it needs to have speech marks and where." b150:8,0;"If you decide that it does not need to have speech marks, then press 0 to check your answer andto go on to the next sentence." g150:13 ,0;"If speech marks are needed, use keys 5,6,7,8 to move the redmarker"" around until it is wherethe speech marks should go." l150:18,0;"To put in the speech marks,presskey 1. When you are sure that the sentence is complete, press key 0 to check the answer." q]502:1,7:#1;0,0;" P to start printer:G to move on" v%"g"Ʀ"G"Ʀ"p"Ʀ"P"5750v {="g"Ŧ="G"5765  -:0,0;"INSTRUCTIONS: Screen 2" 502:3,0;"Five sentences must be completedcorrectly at each level before you can move on to the next.";8,0;"When you have completed level 3,you can play:-";11 ,0;" Max meets the Blue Persians. " o150:14,0;"The game is divided into three levels and you can choose which level to play." :20,0;" P to start printer:G to move on" %"g"Ʀ"G"Ʀ"p"Ʀ"P"5785 ="g"Ŧ="G"5795  : pgame,instructions? u#s(3)147900 v23676|\,251:23561 \,35#:23562 \,5:7:0:7:0::1;7;9 ,6;" Do you want to see";10 ,6;" the instructions? ";12 ,9 ;" Press Y/N " z%"y"Ʀ"Y"Ʀ"n"Ʀ"N"6010z ="N"Ŧ="n"6080 _1:7:1::7;0;0,2;"MAX MEETS THE BLUE PERSIANS" j3,0;"Max is stealing a quiet snack inthe supermarket one night when the alarm bell rings!" r7,0;"As soon as Max starts to run,theBlue Persian Security Squad goesinto action to block his way." V11 ,0;"Can you get Max back to his homebefore his Cheesepower runs out?" 414,0;"Control Keys: 5= 6= 7= 8= " 321,0;"Press P to print : G to go on" %"g"Ʀ"G"Ʀ"p"Ʀ"P"6030 ="G"Ŧ="g"6035  1,10 :6;0;20,0;" Press P to practice moving Max";7;21,0;" Press G to go on " '"g"Ʀ"G"Ʀ"p"Ʀ"P"6036 ="G"Ŧ="g"6080 7:0:n=1520:m$="":7;n,0;" ":n:x=15:y=10 : 01;0;x,y;m$:.02{# =,-30 =""6050 01;7;x,y;m$:.02{# =,-30 ="5"y=y-1:m$="" ="8"y=y+1:m$="" ="6"x=x+1:m$="" ="7"x=x-1:m$="" x15x=15 x20x=20 y30y=30 y0y=0 ="g"Ŧ="G"6080  6050 c:height=2:width=1:line=10 :column=20:w$="CHOOSE YOUR LEVEL":502 @line=45-:column=20:w$="Press 1, 2 or 3":502 ¸10 ,3;"As the level number goes";11 ,3;"higher, the maze gets more";12 ,3;"difficult and the amount";13 ,3;"of Cheesepower is less." "1"Ʀ"2"Ʀ"3"6085 l$=:ink=3:lvl=l$ lvl=1cp=175 lvl=2cp=150 lvl=3cp=100d organise screen v0:1:7:0::n=1721:0;n,0;" ":n 0:0;7;ink;0,0;"":n=016:7;ink;n,0;"";n,31;"":n:ink;16,0;"" z0:7:18,0;"CHEESEPOWER=";t;20,0;"CONTROLS: 5 6 7 8" .7:0:8000@+(lvl*100d) .:m$="":x=1:y=3:7;1;x,y;" " 8 main loop =.23676|\,251:t=cp1-1 >,0:7:18,12 ;t;" " Bcat=(*4) Gcat=36700, L(x,y)=121y6600 Q-1;1;7;0;x,y;m$ `..03{u\,-30:i$=:i$=""6240` e-1;1;7;0;x,y;m$ o5i$="5"ƫ(x,y-1)59;y=y-1:m$="" t5i$="8"ƫ(x,y+1)59;y=y+1:m$="" y4="6"ƫ(x+1,y)59;x=x+1:m$="" ~4="7"ƫ(x-1,y)59;x=x-1:m$="" x=holey=316300 t >7;0;0,10 ;"TIME'S UP!":6600  Max in hole #23676|\,251:6900 X7;0;5,12 ;" Max is safe! ";7,12 ;"Well done,";n$ Fcr=.5:dcr=.75@:qu=.25~:min=1:dmi=1.5@ cr,7:dcr,11 :qu,12 :dcr,12 :qu,14:min,14:cr,11 :cr,14:dcr,12 :qu,11 :cr,12 :cr,9 :dcr,7 N7;0;21,0;" Press S to stop:R to run again " %"s"Ʀ"S"Ʀ"r"Ʀ"R"6335 ="S"Ŧ="s"6380   max hits cat L3::7;0;10 ,4;" MAX HAS RUN INTO A CAT ": P1,-10 :1,-10 :.125},-10 :1,-10 :  6800 ,placing cats ;O1:7:1:xx=(*15)+1:yy=(*29)+1 @D(xx,yy)+(xx-1,yy)=240xx-1,yy;"";xx,yy;"" EV(xx,yy)+(xx,yy+1)+(xx,yy+2)+(xx,yy+3)=480xx,yy;"" J CATS GET MAX 1:3:1::n=318:7;n,3;" ":n:7;0;1,4;" THE CATS HAVE GOT MAX " `7;1;4,13 ;" ";5,13 ;" ";6,12 ;" " D7;1;7,6;"";7,19;"" D7;1;9 ,6;"";9 ,19;"" F7;1;11 ,6;"";11 ,19;"" c7;1;13 ,13 ;" ";14,13 ;" ";15,12 ;" " n1;7;8,15;"";0;9 ,13 ;"";1;"";10 ,15;"" >#1;0,0;"Press S to stop:R to start again" %"s"Ʀ"S"Ʀ"r"Ʀ"R"6845 ="r"Ŧ="R"   draw hole dink=3:0:3::7;ink;0,0;" " Tn=110 :7;ink;n,0;" ":n Ln=11 14:7;n,3;" ":n Ln=1521:ink;n,0;"":n  ,0;7;14,16;""  X&6:6:0:0: b01;1,6;"TEST ROUTINE ONLY!" l14,0;"Type in the sentence to test forlayout. Do not forget to insert TWO quotation marks together forevery ONE needed (see p47 in theSpectrum manual)." vJ:"PRESS ENTER TO SEE THE SENTENCE THEN 1 TO BEGIN AGAIN 0 TO STOP " b$  4525 v0;7;1;4,2;o$(1);7,2;;o$(2);10 ,2;o$(3); ="1"7000X X="0"7;0;1;16,0;" Press RUN and ENTER to start.":  7070 Lnaughty naughty Q0:0:7::7;0;1,12 ;"NAUGHTY!";8,4;" You must do the exercises ";9 ,4;" before you play the game. ";11 ,4;" Unless, of course, you can ";12 ,4; " find the variable which ";13 ,4;" controls this routine. ";0;7;16,1;"Signed,your friendly programmer" V100d:.5,-20:.5,-32 :.5,-44,:23676|\,255:n=026:.125},-30:4,n;" ";5,n;" ":.125},-30:4,n;" ";5,n;" ":n `23676|\,255:n=264-1:.125},-30:4,n;" ";5,n;" ":.125},-30:4,n;" ";5,n;" ":n   9997 ' ? @ three mazes maze 1 n=214:0:7;3;n,2;"";n,4;"";n,6;"";n,8;"";n,10 ;"";n,21;"";n,23;"";n,25;"";n,27;"";n,29;"":n I0:n=2152:3;n,12 ;"":n ̅hole=(*12 )+2:0:3:1,2;"";1,8;"";1,21;"";1,27;"" n0:3:15,4;"";15,10 ;"";15,23;"";15,29;"" `1:4,2;" ";4,21;" ";4,27;" ";6,8;" " 1:8,6;" ";8,25;" ";12 ,4;" ";12 ,10 ;" ";12 ,23;" ";12 ,29;" " [n=120:1:7;(*12 )+2,(*7)+12 ;" ":n w3;0;hole-1,31;"";7;hole,31;" ";3;0;hole+1,31;""  maze 2 hole=(*12 )+2 n=115:0:7;3;n,2;"";n,4;"";n,6;"";n,8;"";n,10 ;"";n,21;"";n,23;"";n,25;"";n,27;"";n,29;"":n n=2142 n=88222 *0;3;n,12 ;"" n !un=79 :0;3;n,12 ;"";n,19;"":n:0;3;8,14;"" &[n=170F:1;7;(*12 )+1,(*28)+1;" ":n +o=12 ,"o=1a=2:b=12 -#o=2a=21:b=29 0 n=ab2:sp=(*2) 5sp=0li=1 6sp=1li=15 :1;7;li,n;" " ?n @o X/1;7;0;hole,31;" " b lmaze3 qhole=(*12 )+2 vmaze w0;3;1,10 ;"";1,12 ;"";1,14;"";1,17;"";1,19;"";1,21;"";1,24;"" x0;3;2,2;"";2,10 ;"";2,12 ;"";2,14;"";2,17;"";2,19;"";2,22;"";2,24;"";2,26;"" y0;3;3,2;"";3,10 ;"";3,12 ;"";3,14;"";3,17;"";3,21;"";3,24;"";3,29;"" z0;3;4,2;"";4,4;"";4,10 ;"";4,14;"";4,17;"";4,24;"";4,29;"" {0;3;5,2;"";5,4;"";5,10 ;"";5,12 ;5,14;"";5,17;"";5,19;"";5,21;"";5,29;"" |0;3;6,2;"";6,10 ;"";6,12 ;"";6,19;"";6,21;"";6,24;"" }0;3;7,2;"";7,4;"";7,12 ;"";7,15;"";7,19;"";7,29;"" ~0;3;8,2;"";8,12 ;"";8,15;"";8,19;"";8,21;"";8,29;"" 0;3;9 ,4;"";9 ,9 ;"";9 ,12 ;"";9 ,19;"";9 ,21;"";9 ,29;"" 0;3;10 ,2;"";10 ,9 ;"";10 ,12 ;"";10 ,14;"";10 ,17;"";10 ,19;"";10 ,21;"";10 ,23;"";10 ,29;"" 0;3;11 ,2;"";11 ,4;"";11 ,14;"";11 ,17;"";11 ,21;"";11 ,23;"";11 ,29;"" 0;3;12 ,2;"";12 ,7;"";12 ,9 ;"";12 ,12 ;"";12 ,14;"";12 ,17;"";12 ,19;"";12 ,29;"" 0;3;13 ,2;"";13 ,7;"";13 ,10 ;"";13 ,12 ;"";13 ,14;"";13 ,17;"";13 ,19;"";13 ,21;"";13 ,23;"" 0;3;14,7;"";14,9 ;"";14,12 ;"";14,17;"";14,17;"";14,19;"";14,21;"" n0;3;15,7;"";15,12 ;"";15,17;"";15,21;"" [n=020:0;3;(*12 )+2,(*28)+1;"":n [n=020:1;7;(*12 )+2,(*28)+1;" ":n &1;7;hole,31;" "  #&xx=23306:xx,column:xx+1,line:xx+2,width:xx+3,height:xx+4,8:xx=xx+4:l=w$:v=1l:xx+v,w$(v):v:xx+l+1,255:l=65024: #' #(364255:"a8"64256,1281:1 &1,0;"Saving main program":"a8"9000(#:2,0;"Main Program saved":1,10 :3,0;"Saving bytes":"a8"64256,1281:4,0;"Bytes saved":5,0;"Rewind tape and press PLAY";6,0;"Verifying main program":"a8":7,0;"Verifying bytes":"a8"64256,1281::10 ,0;" SWITCH OFF TAPE ":1,10 :1,6:1,2:: ' 7500L 'r:"b"64256,1281:.125},10 :"c"1:1,4:"verifying main program":"c": totaXYZapeeighidtin-olum[l7 NEveWPress 1, 2 or 3