ZXTape! 0Created with Ramsoft MakeTZXdemo  65217 demo :7:7 L0,8;"SULIS SOFTWARE ";1,6;"DEMONSTRATION TAPE" (q4,1;"This tape demonstrates some of the learning programs produced by Sulis Software." 2I20,2;"Simply wait for each program to load." <)8,4;"The tape contains:" H/10 ,4;"WORDSPLITS & TENSE FRENCH" J$11 ,4;"TIME TRAVELLER" K12 ,4;"WORDPOWER" L13 ,4;"BESIEGED" P 14,4;"FOL-DE-ROL" d&15,4;"THE GRAMMAR TREE" 21,0; "" Zws tf demo}Xh}?*{\ 6#<*}8֐o))):0K0000##0000## +#!X'>11 X:1:9 ,11 ;"STOP TAPE":0:200:n=1150:65217+n,(23759\+n):n:1030 ~65220,0:n=1̱c$:65218,c$(n):k=65221:l,n*2+c;"";l+1,n*2+c;"":n  |65220,1:n=1̱c$:65218,c$(n):k=65221:l,n+c-1;"";l+1,n+c-1;"":n  R0,175:255,0:0,-175:-255,0: s255,126~,60<,24,24,60<,126~,255,0,60<,36$,36$,231,66B,36$,24,16,480,95_,129,129,95_,480,16,24,36$,66B,231,36$,36$,60<,0,8,12 ,250,129,129,250,12 ,8 41025:n=65400x65439:u:n,u:n  5000 ko=0  1420 1560:l=8:c=2:c$="":1000:n=1500:n:1615O:1560:c=2:l=12 :c$="":1000:n=1500:n 1375_ A23672x\,0:23673y\,0:23674z\,0 1695 $5FL=0:set1=0:set=0:co=0 ),c(6):n=16:c(n)=n:n 3f7:7::1285:n=16:n*3+1,2;a$(c(n),6):n 8u$="123456":o$="123456" =q=16 B&r=7-q:u$(r)="0"1090B Gy=11 :ny=11 L%11 ,20;a$(r,7) Qn=1200:n V9x:x$=x:ny=y+(x$="6"y<20)-(x$="7"y>3) [x$="5"1135o `x$=""1110V eK.01z# =,30-ny:y,20;" ";ny,20;a$(r,7) jy=ny:1110V o<(ny-1)/3ɺ((ny-1)/3)1130j t/o$(c((ny-1)/3))="0"1130j y1160 ~)c((ny-1)/3)=r1200 Ca$(r,7)=a$(c((ny-1)/3),7)1200 *set1=1:1200:set1=0 An=110 :.1}L,-11 :.1}L,-10 :n "ny,8;"";a$(r,7) 8n=110 :.1}L,20:.1}L,n:n Zn=824:ny,n;" ";ny,n+1;a$(r,7):.01z# =,30:n ny,25;" " 1090B en=209 -1:.005y# =,n:ny,n;" ";ny,n-1;a$(r,7):n  set1 rfl=1:set=1:co=r:1285:ny-1,0;:1305:co;ny,14;"":1350F ifl=0:ny-1,0;:1305:co;ny,14;"":co=0:0:set=0 $u$(r)="0":o$(c(ny/3))="0" q n=1300,:n rtime=23672x\+256*23673y\:time=(time/502):min=(time/60<):sec=time-(min*60<) W1:7:1:4:c$="WELL":l=6:c=18+ko:1000 4c$="DONE":l=10 :c=18+ko:1000 0:2:7 5c$="Time:":l=14:c=22+ko:1010 min=01270 sc$=(" "min<10 )+min+" minute"+("s"min>1)+(" "min=1):l=17:c=19+ko:1010 c$=(" "sec<10 )+sec+" second"+("s"(sec>1sec=0))+(" "sec=1):l=19-2*(min=0):c=19+ko:1010 Pi=0:0:0:d=.16~# =:1545 :n=1400:n ko 4025 Z0,0;1;" ";t$(ws);" ":co;" "  set *co;"" n=16 1*(fl=1):co 0"":"":"" # set (n -&"" 2*n=220:n,31;"":n 7 FIN=16:m=48:.01z# =,m*n:.01z# =,m/n:m Kn P-n=112 :.08}# =,28:n Un Z _4:6: d7c$=" Which set? ":l=1:c=2:1000 i 0 n>7;3,1;" " sUn=114:7;n+3,1;" ";(96`+n);") ";t$(n):n x<c$="Choose a set and":l=18:c=7:1010 };c$="type its letter":L=20:C=7:1010 1020 n=1200:n:4,3;1;4;7;" a) ";t$(1,10 ):n=1300,:n:ws=1: (1:0:2:7: ]0:6:l=0:c=0:c$="**":1010 `l=2182:c=0:c$="":1010:c=31:c$="":1010:l ^0:6:l=20:c=0:c$="**":1010 V1:1020:7:1:l=4:c=1:c$=" Sta":1000 90:l=4:c=10 :c$=" ":1000 91:l=4:c=19:c$="rter":1000 61:l=7:c=5:c$="Wo":1000 90:l=7:c=10 :c$=" ":1000 71:l=7:c=19:c$="rd":1000 81:l=10 :c=3:c$="Spl":1000 :0:l=10 :c=10 :c$=" ":1000 91:l=10 :c=19:c$="its":1000 c0:6:0:c$="  R.V. & G.M.Beaumont 1983 ":l=16:c=2:1010 *n=1200:="!"8000@ n ׁ0:4:1:l=4:c=14:c$=" Sta":1000:.005y# =,c*4:.01z# =,c*5:c ܇l=4:c=1714-1:c$="rter ":1000:.005y# =,(c-13 )*4:.01z# =,(c-13 )*5:c xl=7:c=58:c$=" Wo":1000:.025{L,(c-4)*3:.05|L,(c-4)*4:c l=7:c=1714-1:c$="rd ":1000:.025{L,(c-13 )*3:.05|L,(c-13 )*4:c zl=10 :c=36:c$=" Spl":1000:.015zu\,(c-2)*2:.03{u\,(c-2)*3:c l=10 :c=1714-1:c$="its ":1000:.015zu\,(c-13 )*2:.03{u\,(c-13 )*3:c >d=.15~:i=-7:n=120:n:1545  n=1300,:n &0:0:0:7   3*d/4,i+2,d,i+7,d,i+9 ,d,i+11 ,d,i+7,d*2.4,i+16,d*2.4,i+14,d*2.4,i+11 ,d*2.4,i+7,d,i+4,d*8,i+2 31545 :n=111 :du,pi:du,pi:n  5:7:0: 1020 "1c$="Press:":l=4:c=2:1010 '5l=8:c=8:1:c$="i":1010 ,E0:c$="for instructions":l=8:c=10 :1010 16l=12 :c=8:1:c$="p":1010 6I0:c$="to play Word Splits":l=12 :c=10 :1010 ;6l=16:c=8:1:c$="l":1010 @J0:c$="to leave the program":l=16:c=10 :1010 E1020 J O1:1:7: TJ7:1:c$="Instructions:":l=0:c=3:1010 YR7:1:l=3:c=3:c$="Move the word ending.":1010 ^1l=5:c=3:c$="Press:":1010 c,l=6:c=9 :c$="":1000 h6l=6:c=15:c$="(key 7) UP":1010 m,l=9 :c=9 :c$="":1000 r8l=9 :c=15:c$="(key 6) DOWN":1010 wCl=12 :c=3:c$="When it is opposite its":1010 |Dl=14:c=3:c$="beginning, shoot it into":1010 El=16:c=3:c$="the box to make the word.":1010 2l=18:c=3:c$="Press:":1010 -l=19:c=9 :c$="":1000 :l=19:c=15:c$="(key 5) SHOOT":1010 n=11000:n  6,6,6,6,6,6,6,6,5,7,7,7,7,5,6,6,6,6,6,5 6,6,5,7,5,7,7,7,7,5,7,7,7,7,7,7,7,5 9(23613+256*23614),183:(23613+256*23614)+1,27:600 ~65220,0:n=1̱c$:65218,c$(n):k=65221:l,n*2+c;"";l+1,n*2+c;"":n  |65220,1:n=1̱c$:65218,c$(n):k=65221:l,n+c-1;"";l+1,n+c-1;"":n  R0,175:255,0:0,-175:-255,0: 'k=65221:23658j\,0 44055 1560:l=8:c=2:c$="":1000:n=1500:n:1615O:1560:c=2:l=12 :c$="":1000:n=1500:n:4545:4325 A23672x\,0:23673y\,0:23674z\,0 5FL=0:set1=0:set=0:co=0 ,c(6):n=16:c(n)=n:n 1695 f7:7::4235:n=16:n*3+1,1;b$(c(n),9 ):n u$="123456":o$="123456" q=16 &r=7-q:u$(r)="0"4090 y=11 :ny=11 &11 ,21;b$(r,10 ) n=1200:n  9x:x$=x:ny=y+(x$="6"y<20)-(x$="7"y>3) x$="5"4130" x$=""4105  O.01z# =,30-ny:y,21;" ";ny,21;b$(r,10 ) y=ny:4105  "<(ny-1)/3ɺ((ny-1)/3)4125 '/o$(c((ny-1)/3))="0"4125 ,4155; 1)c((ny-1)/3)=r4195c ;Eb$(r,10 )=b$(c((ny-1)/3),10 )4195c @*set1=1:4195c:set1=0 EAn=110 :.1}L,-11 :.1}L,-10 :n J$ny,10 ;"";b$(r,10 ) O8n=110 :.1}L,20:.1}L,n:n TWn=10 21:ny,n;" ";ny,n+1;b$(r,10 ):.01z# =,30:n Yny,21;" " ^4090 cjn=2111 -1:.005y# =,n:ny,n;" ";ny,n-1;b$(r,10 ):n h set1 mqfl=1:set=1:co=r:4235:ny-1,0;:4255:co;ny,19;"":4300 rhfl=0:ny-1,0;:4255:co;ny,19;"":co=0:0:set=0 w$u$(r)="0":o$(c(ny/3))="0" n=1300,:n ko=1:1235 7000X \0,0;1;" ";y$(ws);" ":co;" "  set *co;"" n=16 1*(fl=1):co 7"":"":""  set n &"" *n=220:n,31;"":n  IN=16:m=48:.01z# =,m*n:.01z# =,m/n:m n -n=112 :.08}# =,28:n n  0:4:6: Kc$="Which set?":l=0+2*(se=0):c=10 :4010  0 I7;5,2;(" "se=0) n=1+11 *se11 +17*se:7;n+1-11 *se+4*(se=0),2;" ";(" "n<10 );n;") ";y$(n);" ":n J7;17,2;(" "se=0) 4020 S19,5;"Type the set number";20,5;"then press ENTER."  n=1300,:n D13 ,3;1;4;7;"23) ";y$(23) n=1300,:n +ws=23: 0 50:1:7: :T5:l=0:c=0:c$="**":4010 ?`l=2182:c=0:c$="":4010:c=31:c$="":4010:l DLl=20:c=0:c$="**":4010 IV1:4020:5:1:l=4:c=1:c$=" Jun":4000 N90:l=4:c=10 :c$=" ":4000 S91:l=4:c=19:c$="ior ":4000 X61:l=7:c=5:c$="Wo":4000 ]70:l=7:c=10 :c$=" ":4000 b71:l=7:c=19:c$="rd":4000 g81:l=10 :c=3:c$="Spl":4000 l:0:l=10 :c=10 :c$=" ":4000 q91:l=10 :c=19:c$="its":4000 vc0:5:0:c$="  R.V. & G.M.Beaumont 1983 ":l=16:c=2:4010 {n=1200:n 0:7:1:l=4:c=14:c$=" Jun":4000:.005y# =,c*4:.01z# =,c*5:c l=4:c=1714-1:c$="ior ":4000:.005y# =,(c-13 )*4:.01z# =,(c-13 )*5:c vl=7:c=58:c$=" Wo":4000:.025{L,(c-4)*3:.05|L,(c-4)*4:c l=7:c=1714-1:c$="rd ":4000:.025{L,(c-13 )*3:.05|L,(c-13 )*4:c zl=10 :c=36:c$=" Spl":4000:.015zu\,(c-2)*2:.03{u\,(c-2)*3:c l=10 :c=1714-1:c$="its ":4000:.015zu\,(c-13 )*2:.03{u\,(c-13 )*3:c >d=.15~:i=-7:n=120:n:4530 n=1300,:n &0:0:0:7  3*d/4,i+2,d,i+7,d,i+9 ,d,i+11 ,d,i+7,d*2.4,i+16,d*2.4,i+14,d*2.4,i+11 ,d*2.4,i+7,d,i+4,d*8,i+2 34530:n=111 :du,pi:du,pi:n  +6:0:4::4020 @l=3:c=5:c$="Beginnings or endings":4010 b31,159:184,0:0,-32 :-184,0:0,32 1l=8:c=4:c$="Press:":4010 7l=12 :c=10 :c$="b":1:4010 8c=12 :c$="for beginnings":0:4010 7l=16:c=10 :c$="e":1:4010 50:c=12 :c$="for endings":4010 &n=1100d:n:se=1 7l=16:c=10 :c$="e":1:4010 .n=1200:n:0:0: ln=128:n;". ";t$(n)::m=118:s$(n,m,9 );"-";s$(n,m,10 ):m:::n +l,c+len;" ":g=0:c$="LG":h$="" Zl,c;h$;1;c$(g+1);0;" ":.02{# =,40(:n=110 :n i$=:i$=""4615  co=i$:co=13 co=12 4655/ gco=57946659 co=1546659  ,co<32 (co>117ug)4610 %h$=len4610 *&h$=h$+(co+47/*g):4610 /h$=""4610 4#h$=h$(̱h$-1):4610 9g=g:4610 _:7:7:1,2;"STARTER & JUNIOR WORDSPLITS DEMONSTRATION" t5,1;"WORDSPLITS helps children with their spelling and vocabulary in a lively and original way." d12 ,2;"The aim is to join together correctly the two parts of the split words." G18,1;"These programs are very easy to use." -21,5;"Age guide: 4+ and 8+"; 1000: pE:7:7:1,2;"TENSE FRENCH DEMONSTRATION" zA3,1;"Content:"'" 20 regular and irregular verbs" '5,1;"in eight tenses-" *7,6;"* present";8,6;"* perfect";9 ,6;"* imperfect";10 ,6;"* future";11 ,6;"* past perfect";12 ,6;"* past historic";13 ,6;"* conditional";14,6;"* present subjunctive" b16,1;"This program shows all these tenses, and practises meanings and forms." O20,1;"It also tells you which answers you got right or wrong." /21,4;"Age guide: 11 to adult"; 1000: X<6000p:q$(20,21):23658j\,0 ]27600:d=.1}L:7495G:7675 b-"A",16,40(,0,568,4,60<,68D,60<,"S",16,8,0,28,2,30,34",30,"D",0,28,32 ,32 ,32 ,28,8,24,"F",4,8,28,34",60<,32 ,30,0 g"G",8,20,28,34",60<,32 ,30,0,"H",16,8,28,34",60<,32 ,30,0,"J",16,40(,0,480,16,16,16,568 l"K",8,20,0,28,34",34",34",28,"L",8,20,0,34",34",34",34",28,"T",0,0,1,2,68D,40(,16,0 qO7010b:X=110 :C$:Y=07:B:C$+Y,B:Y:x vte=1:7095 {0:5::7495G:1,2;" TENSE FRENCH ";1;3,2;"Tense:";2;r$(te) fx=14:1;x,25;1;" ";7;" ";2;" ":x ^200,168:47/,0:200,136:47/,0 ]set2=0:x$="26317548":o$=" ":set3=0:set=0 /6,2;"Press:" @10 ,2;"1. for Change of tense" >12 ,2;"2. for List of verbs" A14,2;"3. for Test on meanings" A16,2;"4. for Test on one verb" G18,2;"5. for Test on all/some verbs" B20,2;"6. to Leave the program"  7035{:7145 J1;2;7;10 ,5;"for Change of tense" 27150:7470.:7145:7035{ T7150:12 ,5;1;2;7;"for List of verbs" &7255W:7150:7175 7035{:7150 O7;2;1;16,5;"for Test on one verb" 7260\ 7150:7160 l:7:7:9 ,5;"Do you wish to repeat";10 ,9 ;"program? Y or N" i=11000 #s$=:s$="y"s$="n"i=5000 i s$"n"600X >:1:9 ,10 ;"START TAPE":0:"" n=1200:n n=1200:n n=1200:n: Svn=20:set=1:q=8:7175:ve=v:7155::7265a hx=310 :x+5,6;p$(x-2);" ";g$(te+v-4,x-2):x 7245M set2=0  /6::x=120 f6;(32 x<10 );x;" ";7;v$(te,x,1);" ";v$(te,x,2) x &6;o$+o$+o$+o$  set2set72204 %set3 *O21,0;1;" Do you wish to view a verb ? " /7145 4b21,0;0;"Type no. then press ENTER: ":7570:set 9!7150:7: >J7495G:7450:6,3;5;" Tense:";r$(te) CK4,6;v$(te,v,1);5,6;v$(te,v,2) HXx=310 :x+5,6;p$(x-2);" ";v$(te,v,x):x M[17,3;1;">";0;5;" Another verb ? " R7145: W"1" \D"5","fait","faites","fait","fais","font","faisons","fais","font" a(ve=1:q=20 fp5::7495G:5;2,3;" -- TEST -- ";21,24;"SCORE" ka4,3;"Tense:";2;5,3;r$(te):a(20,2) p\19,3;"Type your answer";20,3;"then press ENTER." uLsc=0:v1=v:23672x\,0:23673y\,0 zx=18 v=5:p=x$(x) p=17450 /q$(x,2)=p$(p)+" "+v$(te,v,p+2) /12 ,3;o$+" " r8,3;v$(te,v,2);10 ,3;v$(te,v,1);12 ,3;p$(p);" " -14,4;" " 3l=12 :c=9 :len=14:7500L %12 ,10 ; 0f$=h$+o$(114-h$) 3f$=v$(te,5,p+2)7360 n=18:.1}L,-20:.1}L,-18:n:8;6;q$(x,8):2,10 q$(x,1)="1" ,21-x,26;"x":7380 Ssc=sc+1:12 ,9 ;h$;" ";4;0;"" q$(x,1)="0" En=112 :.05|L,sc:.05|L,n+sc:n Z21-x,25-1*(sc>9 );sc;4;0;"" x Et=((23672x\+256*23673y\)/502) 1m=(t/60<):s=t-m*60< Uq=20n=811 :n,1;" ":n 12 ,3;" ";4;11 ,3;" You scored:";sc;" ";12 ,3;" out of:";8;" ";14,4;" Time=";(" "m<10 );m;" min ";15,4;" ";(" "s<10 );s;" sec " Gsc<10 4;7;11 ,17;" " qsc7420 %d=.05|L:7675 5;17,2;">";" Press: ";18,2;" ";19,2;" A for Analysis ";20,2;" M for Menu ";7;" " J7150:19,2;1;" A for Analysis ":7150 x=18:7-1*((q$(x,1)));21-x,2;q$(x,2);(" "ưq$(x,1)):x  _21-x,1;1;">";0;5;" PRESS ANY KEY FOR MENU " (20-x,2;o$ 7145: /p$(1)="je":u$="aeiou" Ut=15:v$(te,v,3,1)=u$(t)p$(1)="j'" $t ) .1:1:7::7;1;0,7;" Change of Tense ";1,7;" " 3Yx=18:x*2+1,5;1;x;0;". ";r$(x):x 87;1;19,7;" ";20,7;" Type number of ";21,7;" Tense required " ="7:0 B G`255,0:0,175:-255,0:0,-175: L/l,c+len;" ":g=0:c$="LG":h$="" Q&w$:w$=w$+13 :w=1̱w$ V^l,c;h$;1;c$(g+1);0;" ":.02{# =,40(:n=110 :n [#i$=w$(w):i$=""7515[ `'co=i$:co=13  eco=12 7555 jgco=5797565 oco=157565 t#co<32 (co>117ug)w yh$=lenw ~'h$=h$+(co+47/*g):w h$=""w $h$=h$(̱h$-1):w g=g:w 5len=2:l=21:c=28 >7500L:n=1̱h$:h$(n)<"0"h$(n)>"9"7575 n h$=""7575 +v=h$:v>20v<17575  -0:7:5: u1:x=021:1;" ";7;" ";2;" ":x 1 74,7;" " 75,7;" " 76,7;" " 77,7;" " 78,7;" " ;11 ,5;" " =12 ,5;" " =13 ,5;" " ;14,5;" " ;15,5;" " ;18,5;"  R.V.Beaumont 1983 " $0:0: 3d,5,d*3,5,d,5,4*d,10 ,4*d,10 ,4*d,12 ,4*d,12 ,7*d,17,d,14,3*d,10 ,d,10 ,3*d,14,d,10 ,4*d,7,8*d,15,3*d,12 ,d,9 ,12 *d,10 ?7675:x=118:du,p:du,p:x  M train bus coach plane boat ship q usually really royally truly possibly quietly mfor- fore- four- gn- n- kn- n- f- ph- r- wr- ga- go- gu- w- wh- des- dis- g- j- rh- r- en- in- -ary -ery -ory -or -our -able -eable -ible -eous -ious -ous -ey -y -ed -t -sion -tion -ar -er -or -er -re -ure -ance -ence -ense -ant -ent -ly -lly -ely -ily -el -le -al -il -sm -sam -som -some-et -it -ot -mb- -mn -om UMovement Sounds What is it like? (1) What is it like? (2) Animals People Time (1) Time (2) Water Nature Food Body Kitchen Place  tre to be suis es est est sommes tes sont sont avoir to have ai as a a avons avez ont ont aller to go vais vas va va allons allez vont vont venir to come viens viens vient vient venons venez viennent viennent faire to make/do fais fais fait fait faisons faites font font parler to speak parle parles parle parle parlons parlez parlent parlent finir to finish finis finis finit finit finissons finissez finissent finissent vendre to sell vends vends vend vend vendons vendez vendent vendent voir to see vois vois voit voit voyons voyez voient voient vouloir to want veux veux veut veut voulons voulez veulent veulent savoir to know:facts sais sais sait sait savons savez savent savent connatre to know:peopleconnais connais connat connat connaissons connaissez connaissent connaissent manger to eat mange manges mange mange mangeons mangez mangent mangent ouvrir to open ouvre ouvres ouvre ouvre ouvrons ouvrez ouvrent ouvrent dire to say/tell dis dis dit dit disons dites disent disent boire to drink bois bois boit boit buvons buvez boivent boivent croire to believe crois crois croit croit croyons croyez croient croient suivre to follow suis suis suit suit suivons suivez suivent suivent devoir to owe/have todois dois doit doit devons devez doivent doivent dormir to sleep dors dors dort dort dormons dormez dorment dorment -je tu il elle nous vous ils elles҅Present Perfect Imperfect Past Perfect Past Historic Future Conditional Pres.Subjunctive,,u  kd~ete rq imiepbetetegQv!s!!ѩ1tu fais 0vous faites 0il fait 0je fais 0ils font 0nous faisons 1elle fait 0elles font X26317548O UaeiouWfont HfontI Ffont SnCits timed p(#.op ß`a _._e8{e:{e:se9se9 se9 e\\/]\K4]Q^^]R]|]!\{+#s]zy]{###g]>]                    K\C4]*]~(O#F#~#"]C4]2]>G͛ T]zPWQ^x^:\^~^Kv\+-474A28͢-Cv\y˿^e^^^_]```[e^^^_g`j` e8{e: ese9se9 se9 ~:\G:\2H\D>y>?Ͷ_!XW_!G_!O_!O_!O_!7`$!_V#^#z???yV#^#zͶ_{͘_ʗ_N#v Ž_o_ ! Y w# ¦_£_!XXwy2_:_r+=_% __  ?:?:  ?:?:  ?:?:  ?:?:-/-?/;?;  ?:?:<' a#>ʋa4+6+V+^#4Ëa55!Ka:^=''O ʫaG¦a<2^^^^^^!a^#V##N( yaKa!aF##~+č^ aNGC4]^#V~ybG#N#a{/].bA]b bS}b ^#V#~2b"b*}b}pbN#F#s#r#:bw#i^Rb[bb ]_9ژbN#F+bi^K4]q#p#^#V#b~Kb!!! i^bQ^>w\(^:]2bA] cccccg`*\"4]̓b"c>̓b"c>̓b2_>2b!\!]\yhc>>hclc̓b^c  5c>7̓b2_cA]cc҈cj`6d##nf}c!d?d++A]c!d6d?dA]c6dc666d!\66jddHG#66jddHG|dqpdd~Dw~Dw?d>͍^w>͍^wN#F+C4][4]~\dWd>2b\d>2b_~WS4]~zd zd7ɧPYxdDGydDOYPʱdd?dñd:dzdxDG{dyDO!d>͍^'''_88||<|x>~8| >< di^eÙ00x0((00x(F@ (  b8|(( 8|((Byf>8Ͷ_:>R***H<<(((8T|8T|<0000<mmmm >?fK^ !!*e ^#V#N#F ^##^#V~#i^ =.fyfxf ]@<|<>UB<$$dascFFFNgp`a3NB@@@@@@@@@@@@@@@@@@@@                                       fjjj j(j??               flllllllllllm mmm$m,m4mpFpNpVp^pfpnpvp~ppppppppppppp@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@      ! "   #     & #       $%$%$$       *'!()"      - ,  .1 . +  /  0 ,   $$$%$%$Ð ^:m(5):a$(5,12 ):c(3):s(5):h(5):h$(5,10 ) :7:7:0,2;"TIME TRAVELLER DEMONSTRATION";2,2;"This is a romp through five major periods of English history." 7,2;"It questions you on each age then lets you loose to be chased through the ages from the Bronze Age to the 19th century." o16,2;"Time Traveller is fun, and you'll end up knowing a lot more facts and dates!" 721,4;"Age guide: 7 to adult":1000 67:7:0:0:0:0  7000X  1200 age=665A # 8105 ( 5000 - 3500 2 1700 7 1500 80:7:7::8,8;"Do you wish to";9 ,8;"repeat program?";10 ,10 ;" Y or N" :-s$=:s$"y"s$"Y"s$"n"s$"N"58: <s$="y"s$="Y"15 = 9800H& Ah::"This software is copyright andmust not be copied or reproducedin any form or by any means" F"whether by individuals, groupsor institutions includingeducational institutions withoutthe prior permission of the" K P"without the publishers' priorconsent and without a similarcondition including thiscondition being imposed on thesubsequent purchaser." UZ:;2;" TIME TRAVELLER DEMONSTRATION":;2;" IS NOW LOADING, PLEASE WAIT." Z 7:1,0;"P"; _ 1   TEXT OUTPUTTING  ROUTINE  text 4,0;"";  j=0 y$:j=j+1  "y$="$end"y$="$page"1045  y$="$nowait" y$:j<161030 I21,0;"Press any key to continue.";:1000:4700\  y$="$end" #nooflines,18:x=clearlines $ 1025 L$"You are travelling in a time" NG"machine, trying to get back to","the twentieth century. To do" P7"this, you have to travel through","five periods:","" Rs"The Bronze Age","Roman Britain","The eleventh century","The sixteenth century","The nineteenth century.","$page" TG"In order to enter an age, you","must answer a 'gateway' question" VG"about that age. Once you have","done that, you have to escape" XG"pursuit, and make your way","through the Time Gate. Then you" ZG"have to answer specific","questions about that age before" \3"you can move forward to the next","age.","$page" ^G"As you continue on your journey,","you score points. You need" `G"90,000 points to get back to the","twentieth century, so if you" bG"don't reach this score on the","first journey, you must go back" dE"into the age or ages of your","choice and improve your score." f"","Bon voyage!","$end"   SET THE STAGE  &7:7:1:0: N1,9 ;2;"TIME TRAVELLER";2,9 ;"______________" text=1100L:1000     TUNNEL CALLING  ROUTINE  /1:1:7:0:0: P9 ,1;"You will now be transported through the time tunnel and" x$=" into the next age." ?single=1age=5x$=" into the twentieth century." x$ '1600@:quiet01540 i=143+ p:.02{# =,p:i =:" Press any key when you feel able to make the trip."  4700\  :x=tunnel  @BEFORE TUNNEL TUNE EJ-12 ,-10 ,-8,-7,-5,-3,-1,0 J8-1,-3,-5,-7,-8,-10 OJ-12 ,-10 ,-8,-7,-5,-3,-1,0 T8-1,-3,-5,-7,-8,-10 YJ-12 ,-10 ,-8,-7,-5,-3,-1,0 ^B-1,-3,-5,-7,-8,-10 ,-12   END OF AGE ROUTINE  $7:7:1:0 #nooflines,24:x=clearlines x$=a$(age):5300 0,0;7;1;" ";" ";" " (1,10 ;3;1;x$ ;5,1;"You are about to leave the":" ";x$;"." C::" Your score for this age is"::" ";2;s(age) score=0:j=age "i=1j:score=score+s(i):i 0::" Your total score is ";2;score;"." H21,0;4;1;" PRESS ANY KEY TO CONTINUE " 1000:4700\    MAZE SCENARIO  ROUTINE %7:7:0:1: #nooflines,21:x=clearlines text=2250+502*age  1000 (tune=6300+10 *(age-1) quiet=12245 %6000p:age22245 ,20:6000p:20:6000p H21,0;4;1;" PRESS ANY KEY TO CONTINUE " 1000:4700\  G"It is 1529 BC. You are lost in a","thick forest and as night falls" 3"you can hear wolves in the","distance.","" G"They are chasing you through the","forest, and you have to run" L"through the trees to find the","clearing and the Time Gate.","$nowait" .G"You have landed in a Roman fort","in the North of England in" 3G"AD 162. Sentries guard the gates","while legionaries pursue you." 8G"You have to make your way","through the different buildings" =G"within the fort to reach the","south gate, which is also the" BA"Time Gate, and your way through","to the next age.","$nowait" `G"The year is 1163. You have","landed in a city, and hidden" eG"behind the altar in the","cathedral. Now the priests are" jG"after you, and you have to reach","the west door where the Time" oG"Gate is, and make your escape","before they catch you.","$nowait" G"The year is 1559. You are","trapped on the ground floor of a" G"duke's palace. Some courtiers","are after you, with slim daggers" G"and phials of poison. Can you","find your way through the doors" G"and staircases to reach the","great staircase and go through" "the Time Gate?","$nowait" G"Lost in a sewer in 1870, you are","fleeing from rats, giant spiders" G"and germs to make your way to","the main drain and the Time" G"Gate. Spiders' webs and piles of","rubble block your way, and those" G"creatures have sharp eyes and","can see better in the dark than" "you can!","$nowait"  !ROMAN AGE QUESTIONS & 0."The Romans first landed in Britain in" 2"10 ,"55 BC","55 AD","43 BC" 4 "The first Romans were led by" 6/8,"Julius Caesar","Caligula","Claudius" 8."The Romans withdrew from Britain in" :$10 ,"406 AD","43 AD","453 AD" <="The inhabitants of Britain when the Romans came were" >(9 ,"Celts","Gauls","Anglo-Saxons" @:"Boudicca, also known as Boadicea, was Queen of" B57,"the Iceni","the Brigantes","the Ordovices" D"Caractacus was" F$10 ,"British","Roman","Saxon" H?"The Brigantes, Ordovices, Catuvellauni and Iceni were" J.6,"tribes","places","types of soldier" L"Hadrian's Wall ran from" NV2,"the Tyne to the Solway","the Thames to the Severn","the Clyde to the Forth" P"The Roman name for York was" R/8,"Eboracum","Verulamium","Aquae Sulis" T""Roman roads are famous because" VQ2,"they are straight","they are found everywhere","they all go to London" MULTIPLE CHOICE QUESTION ROUTINE  &7:7:0:1: #0,9 ;3;a$(age) 7:" Before you can leave the":x$=a$(age):5300 0" ";x$;" you must answer":" three questions." $j=13:c(j)=0:j %q=13:bonus=3000  i=15:m(i)=i:i  i=15 0x=(3*)+1:y=(3*)+1 z=m(x):m(x)=m(y):m(y)=z:i enooflines,18:x=clearlines:6,1;5;"QUESTION ";q;" FOR ";bonus;" POINTS." Ix=((10 *))*4+3020 +100d*(age-1):z=0 i=1q:c(i)=xz=1 i z=13575  0c(q)=x:x:x$:8,1;1;x$:z Ni=13:x$:10 +2*m(i),z;1;m(i);". ";x$;".":i ]19,9 ;" ":21,2;"Enter your answer (1 to 3).":502 x=(*3+1) /(10 +2*x,z)121y3605 $K.05|L,40(:10 +2*x,z;1;6;1;" " )tune=6160:6000p .10 +2*x,z;1;2*(x=m(1))+4*(xm(1));0;" " 1m(1)x36408 3U19,9 ;2;1;"RIGHT ANSWER":quiet=01,24 6502:3645= 8M19,9 ;4;"WRONG ANSWER":quiet=01,-24 ;P502:bonus=bonus-1000:6,16;5;bonus:3605 =score=score+bonus:q Bs(age)=score:  JUST BEFORE THE 20th  CENTURY ROUTINE  (7:7:1:0: score=0 (i=15:score=score+s(i):i score<90000/4300 nooflines,24: 0i=17:i:x=clearlines:i-1 Qquiet=0(i+8)/480,12 +i:(i+8)/480,24+i i  7 >1,0;2;"WELCOME TO THE TWENTIETH CENTURY" $"________________________________" O:"You have reached the end of yourjourney with a score of ";2;score !tune=6350:6000p:: Jscoreh(5)"Unfortunately this breaks norecords.":4105  *"Well done, this is a new highscore." ::"Please enter your name (up toten characters).":x$ ,x=x$:x>10 x$=x$(110 )  4500  T21,0;4;1;" PRESS ANY KEY TO CONTINUE ":4700\ #nooflines,21:x=clearlines 64,4;4;"HIGH SCORE HALL OF FAME" : Ei=15:" ";h$(i);" ";:h(i)<100000CP" "; 2;h(i) "i 'T21,0;4;1;" PRESS ANY KEY TO CONTINUE ":4700\ ,#nooflines,21:x=clearlines 1L4,0;"Would you like to start anotherjourney ( yes or no ) ?" 6x$ ;,x$="no"x$="NO"score=1:4170J @Mx$="yes"x$="YES"score=0:single=0:age=1:4170J EZ21,0;2;"Please answer yes or no.":quiet=01,-1 G@21,0;" ":41506 J  GO BACK TO A PREVIOUS  AGE ROUTINE  0:0: tune=6120:6000p \7:7::1,0;"You have scored ";2;score;1;" points." :"Unfortunately people in the 20thcentury are very fussy; theyrefuse to let you in unless youscore at least 90000 points." ::"You must go back in time toincrease your score." :"Choose an age (1 to 5) :" 0:;4;" AGE YOUR SCORE" :"1. the Bronze Age":"2. Roman Britain":"3. the eleventh century":"4. the sixteenth century":"5. the nineteenth century."  :i=15:14+i,27;2;s(i):i -4700\:x<1x>54370 &age=x:score=0:single=1 1:1: ! x=tunnel &   ENTER HIGH SCORE  ROUTINE   i=5 i=04540 h(i)score4540 i=i-1:4525 i=i+1:j=5 j=i4555 Aj=j-1:h(j+1)=h(j):h$(j+1)=h$(j):4545 h(i)=score:h$(i)=x$  \ aGET A CHARACTER FROM f THE KEYBOARD k z 1000 ~.05|L,40(   MAZE CALLING ROUTINE  $7:7:1:0 #nooflines,21:x=clearlines I4,0;" You are about to enter the":x$=a$(age):5300: " ";x$;" maze. Use the":" following keys to move your":" man and evade your pursuers.":" You must reach the TIME GATE":" to escape." 42:11 ,11 ;"UP TIME GATE" `12 ,10 ;7;0;" Y  ";1;1;1;"" .13 ,8;0;"   " T14,3;"LEFT ";0;"G H ";2;"RIGHT" J15,8;0;"   ";2;" YOUR MAN" 816,10 ;7;0;" B " 417,10 ;"DOWN";0;" " &:" PRESS 2 KEYS TO MOVE DIAGONALLY" H21,0;1;4;" PRESS ANY KEY TO CONTINUE " 1000:4700\  2200 &7:7:4:0: x=jpmainstart ?k=killed:time=(killed+1)+256*(killed+2) -tune=6100:k=0tune=6180$  6000p  5500|    STRING LABEL CHOPPING  ROUTINE  x=x$ $x$(x)=" "x=x-1:5325 x$=x$(1x)  | CALCULATE SCORE FOR  THE MAZE  7:7:1 t;1;" ";" ";" " #nooflines,21:x=clearlines @x$=a$(age):5300:1,10 ;3;1;x$ htime=time/502:t$=" "+(time/60<)+" minutes "+(time-60<*(time/60<))+" seconds." @(time/60<)=1t$=t$(19 )+t$(11 ) *k=0x$="You finished the maze in" "k0x$="You survived for" ,4,1;:k0"HARD LUCK!" k=0"WELL DONE!" 6,1;x$:t$ "time>62.5ztime=62.5z 9k=0bonus=5000+5000-80P*(time) #k0bonus=80P*(time) ::" You have scored ";2;bonus;1;" points." score=score+bonus H21,0;1;4;" PRESS ANY KEY TO CONTINUE " 502:4700\  p u PLAYS TUNES z |quiet=1 tune length i=1length d:p d,p i  FAILURE TUNE y6,.4L,-5,.6,-5,.2~L,-12 ,.4L,-10 ,.4L,-12 ,.6,-12 OH DEAR! WHAT CAN THE *16,.4L,-3,.4L,-3,.1}L,-3,.1}L,-6,.1}L,2,.1}L,-3,.1}L,-6,.1}L,-10 ,.4L,-5,.4L,-5,.1}L,-5,.1}L,-8,.1}L,-6,.1}L,-5,.1}L,-6,.1}L,-8 Colonel Bogey 8,.25~,7,.5,4,.25~,4,.25~,5,.25~,7,.5,16,.5,16,.5,12 high/low high/low <16,.3,12 ,.3,-12 ,.2~L,14,.2~L,-13 ,.15~,16,.15~,-15,.1}L,17,.1}L,-17,.05|L,19,.05|L,-19,.04|# =,21,.04|# =,-20,.03{u\,23,.03{u\,-22,.02{# =,24,.02{# =,-24 $NEWSREEL BIT )9 ,.3,-5,.1}L,-5,.5,0,.2~L,2,.025{L,0,.025{L,2,.3,4,.025{L,7,.6,7 BRONZE AGE TUNE 7,.02{# =,18,.018{tj,17,.016{n,16,.014ze`A,15,.012zD,14,.008zn,13 ,.005y# =,12 ROMAN AGE TUNE v6,.3,14,.1}L,14,.6,19,.4L,14,.1}L,19,1.2,23 11th CENTURY TUNE 16,.3,7,.3,5,.3,8,.3,7,.3,5,.3,3,.3,5,.3,7,.3,3,.3,0,.3,3,.3,5,.3,2,.3,0,.3,-2,.6,0 16th CENTURY TUNE R19,.2~L,2,.4L,5,.2~L,7,.4L,9 ,.05|L,11 ,.2~L,9 ,.4L,7,.2~L,4,.4L,0,.05|L,2,.2~L,4,.4L,5,.2~L,2,.4L,2,.05|L,0,.2~L,2,.4L,4,.2~L,0,.6,-3 19th CENTURY 14,.3,7,.3,4,.3,9 ,.3,7,.3,12 ,.3,12 ,.3,11 ,.3,12 ,.3,7,.3,12 ,.3,7,.3,9 ,.3,6,.6,7 20th CENTURY Б22,.2~L,0,.05|L,0,.3,0,.6,0,.2~L,7,.05|L,4,.3,7,.6,4,.05|L,2,.05|L,3,.05|L,4,.05|L,5,.05|L,6,.05|L,7,.3,8,.05|L,6,.05|L,7,.05|L,8,.05|L,9 ,.05|L,10 ,.05|L,11 ,.3,12 X ]INITIALISATION ROUTINE b gRi=15:m(i)=i:s(i)=0:h(i)=90000/:h$(i)=" ":i l7:7:0: qage=2:7205% vi=15:a$(i):i {jpmainstart=23762\ jpreset=23765\ killed=24349_ tunnel=23771\ /nooflines=23774\:clearlines=23768\ score=0:bonus=0  x=jpreset single=0:quiet=0  %G"BRONZE AGE","ROMAN AGE","11th CENTURY","16th CENTURY","19th CENTURY" @-"Barrow","Fort","Castle","Palace","Factory" E*"Fur","Toga","Habit","Hose","Frock coat" J8"Barter","Denarius","Silver penny","Shilling","Florin" O4"Plough","Roads","Philosophy","Voyages","Railways" TD"Beaker people","Legionaries","Monks","Courtiers","Industrialists" YA"Huts","Villas","Timber houses","Brick houses","Terrace houses"   GATEWAY QUESTION  ROUTINE  i=19 0x=(*5)+1:y=(*5)+1 z=m(x):m(x)=m(y):m(y)=z:i 97:7:0:1::points=5000 Z1,9 ;3;a$(age)::" Welcome to the ";:x$=a$(age):5300:x$;"." 4:;5;" GATEWAY QUESTION ";points;" POINTS." A:" Which of the following do you associate with this time ?" (x=((6*))*5+8000@:x Li=15:x$:10 +m(i),7;1;m(i);". ";x$;".":i ]17,9 ;" ":20,2;"Enter your answer (1 to 5).":502 x=(*5+1) -(10 +x,7)121y8165 I.05|L,40(:10 +x,7;1;6;1;" " tune=6160:6000p b10 +x,7;1;2*(x=m(age))+4*(xm(age));0;" " m(age)x8200 U17,9 ;2;1;"RIGHT ANSWER":quiet=01,24 502:8205 M17,9 ;4;"WRONG ANSWER":quiet=01,-24 S502:points=points-1000:5,18;5;points:8165 score=points: #( #- START UP ROUTINE #2-65364T,183:65365U,27 #710:0:0:0:0: #<"" #Al1:7:7:6,11 ;"STOP TAPE":0:7:7:quiet=0 #F 9500% #KA="A""G"+7 #PX:A,X #UA #Cnewl=7:newc=0:newm=3:x$="":9600% #!oldl=newl:oldc=newc:oldm=newm #newl,newc,newm # 9200# #1.05|L,0:2:.05|L,-40( #newl-19105# #tune=6180$:6000p # # # MOVE MAN ROUTINE # $newl=-19245$ $ y$=x$(newm) $oldl,oldc;" " $newl,newc;0;y$ $ 9290J$ $oldl,oldc;" " $"<21,14;1;0;1;1;" " $J %J480,480,16,120x,16,40(,70F,64@ %!K480,480,144,120x,20,480,40(,40( %&H12 ,12 ,9 ,30,40(,12 ,20,20 %+F12 ,12 ,8,30,8,20,98b,2 %0K16,568,18,124|,144,40(,40(,32 %5J16,568,144,124|,18,40(,40(,8 %:Q255,195,153,165,165,153,195,255 %7,1,4,7,2,3,7,3,4,7,4,3,7,5,4,7,6,3,7,7,4,7,8,3,7,9 ,4,8,10 ,3 %9 ,11 ,4,10 ,11 ,5,11 ,11 ,6,11 ,11 ,5,11 ,11 ,6,11 ,11 ,2,11 ,11 ,3,11 ,12 ,4,11 ,13 ,3,11 ,14,4 %11 ,15,3,11 ,16,4,11 ,17,3,11 ,17,4,11 ,17,3,11 ,17,5,11 ,17,2,12 ,16,1,13 ,16,6,14,16,5 %R15,16,6,16,16,5,16,16,2,16,16,3,16,16,5,17,16,6,18,15,2,19,14,1,20,14,5,20,14,2,20,14,3,20,14,5,-1,0,0 &H:7:7:3,3;"Thank you for looking at Time Traveller.":1:9 ,10 ;"START TAPE":0 &"" A BRONZE AGE ROMAN AGE 11th CENTURY16th CENTURY19th CENTURY/////7 vgpmainstar\prese\ille_unne\oofline\learline\coronuxingluieexLj Y$pagesTTPAGE @A?????<<?<<????<<?<<?? ?????<<?<<????<<?<<?? |???<??<<?<<????<<<<<<? B??<?<<<<?<<?<<=?>|<<<<=|<?<>|<<<<<<<<<<????<(B<?<<<<<<<<<<<|<<????<| B??<<<<<<?<<?<<<<<<????<<|???<<<<?<<??<<<????<||<<B~@~B~BB<~BB|<~B>B~~~BB<~BB||<|<BBBBf@@@B@bBB@bBBDBbb@@@bBB@bBBDBBBBBBBBZ|@|B|R~@|RBB(BRR|||R~@|RBB(|BB@||BBB@@@B@JB@@JB|~JJ@@@JB@@JB|B~|NDDBBB@@@$@FBB@FBDB FF@@@FBB@FBDBBDBBB<<B~~~~BB<~BB~~~BB<~BB~~BB<~BB|<>B~B>~B<~BB|@$@@bBB@bBBDBB@b@BB@bBBD<||R~@|RBB(BB|R|~@|RBB(@@JB@@JB|~B@J@B@@JB|B$@@FBB@FBDBZ@F@BB@FBD<>B~~BB<~B$~B>~B<~Bz=47/:w=103g:x=41):y=161:9000(# 2Kn=48:n,6;1;1;" ":n Z!N$=" " d.120x:n=07:r:"A"+n,r:n f.122z:n=07:r:"B"+n,r:n h.124|:n=07:r:"C"+n,r:n j.126~:n=07:r:"D"+n,r:n xC0,255,0,0,0,0,0,0 zC1,1,1,1,1,97a,97a,1 |L24,24,24,24,60<,126~,102f,102f ~L102f,102f,126~,60<,24,24,24,24 hC$(1)="know more words":C$(3)="use words accurately":C$(5)="spell words correctly" yz=0:w=0:y=255:x=90Z:9000(#:100d:12 ,1;"This program will help you to" 502:n=14182:4:1:n,4;">":7:0:n,6;C$(n-13 ):9020<#:n 200:n=12 18:n,1;" ":n:502:13 ,1;"Which do you want?" :C$(1)="the menu":C$(3)="a random exercise?" 9998':15,3;4;1;"M";15,5;7;0;C$(1):9998':17,3;4;1;"R";17,5;7;0;C$(3) 71:19,7;"PRESS M or R":9998' A#0;"DEMO: WE WILL CHOOSE ";1;"M" 9996 ' A$="M" q0::502:z=546:y=146:x=120x:9000(#:502:8,14;"MENU" 9 ,14;"" C$(1)="Opposites":C$(2)="Similes":C$(3)="Collectives":C$(4)="Synonyms":C$(5)="Adjective-Noun" n=15:4:20:1:(2*n)+8,8;n:7:0:(2*n)+8,10 ;C$(n,114):n:1:20,7;"PRESS 1,2,3,4 or 5"  90102# ecc=19997 ':#0;"DEMO: WE WILL CHOOSE ";1;"1":9996 ' ecc=29997 ':#0;"DEMO: WE WILL CHOOSE ";1;"2":9996 ' ecc=39997 ':#0;"DEMO: WE WILL CHOOSE ";1;"3":9996 ' A$=cc -X$=" ":B$=C$(A$,114):cv=A$ F0::502:z=0:y=255:x=175:9000(# B502:1,1;"Title: ";B$:502:3,1;"Which option do you want?":20:4:1:5,5;"G":0:7:5,7;"Game":30:5,13 ;"or":30:4:1:5,17;"W":0:7:5,19;"Writing" 9998':7,1;"The writing option is more";8,1;"difficult than the games. You";9 ,1;"can try a game version first," c10 ,1;"and then check your words and";11 ,1;"spelling with the writing" 12 ,1;"option.";14,1;"Alternatively, you can test";15,1;"your knowledge with the";16,1;"writing option, and if you";17,1;"make mistakes, work to improve" l18,1;"your vocabulary with the games":9998':1:20,9 ;"PRESS G or W" mcc=1A$="W":9997 ':#0;"DEMO: WE WILL CHOOSE ";1;"W":9995 '  xcc=2cc=3A$="G":9997 ':#0;"DEMO: WE WILL CHOOSE ";1;"G":9995 ' $A$="G"2000 . A$="W"9600%:4000 Ў0::30:z=22:y=210:x=72H:w=0:9000(#:30:14,4;"Which game do you want?" Y30:C$(1)="S":C$(2)="L":C$(3)="Shooting":C$(4)="Lines"  n=16182:4:1:n,8;C$(n/2-7,1):7:0:n,10 ;C$(n/2-5,19 ):502:n ,1:20,8;"PRESS S or L" }cc=29997 ':#0;"DEMO: WE WILL CHOOSE ";1;"S":9996 ':9600%:3000 }cc=39997 ':#0;"DEMO: WE WILL CHOOSE ";1;"L":9996 ':9600%:3500 sw=999 8100 totpos=0:0::0:7:1:f=1921:f,0;" ":f:0:1:1,24:253,0:z=0:y=255:x=175:w=0:9000(#:0:9997 ' 3tot=0:s=0:7:0:0  1,1;"In this game you have to match";3,1;"up two words. One of the words";5,1;"will be displayed at the foot";7,1;"of the screen. The other word";9 ,1;"will descend from the top of";11 ,1;"the screen. Using the F key";13 ,1;"you have to fire missiles to";15,1;"stop the incorrect word from";16,10 ;"";17,1;"reaching the bottom word." 9995 ' sw=0:n=117:n,1;" ":n:200,175:0,-36$:546,0:1,26;1;"SCORE" ?s=0:sw=sw+1::sw=3sw=0:4060 q0:n=517:n,1;" ":n:q=5:totpos=totpos+q+4 C3,26;0;7;" ":3,27;tot 9060d#:9030F# xxx=sub $m$=r$(1v):u$=s$(1e)  n=1 N ln=16 $0:0:0:7 817,i;2;7;u$:y=i:z=a:9997 ' 9060d#:9030F# cxc=(*12 )+2 p=1:3240 p=p+1 -p=17n=qtot=tot+5:3375/ p=17nq33771 )p-1,6;" " n=qp,z;m$:3242 p,a;1;r$(1v) 0.01z# =,502+p*-4 1(cxc=p)(p<16)(ccc12 )3310 3236 ln+1,16;" " ln,16;"" ln-1=p3350 ln=ln-1 .0.01z# =,502-(ln*2):3300 4ln,16;" ":n=qtot=tot-5:3365% stot=tot+1:s=s+1:3,26;0;7;" ":3,27;0;7;tot Gp,6;" ":ln=16:n=n+1:3215 =ln,16;"":0.01z# =,502-(ln*2):3 %@ln=ln+1:ln>1616,16;" ":3372, *&ln-1,16;" ":3360 , -x=10 :20,14;1;7;1;"WRONG":n=110 :17,y;4;1;u$:0.1}L,-30:17,y;4;0;u$:0.1}L,-10 :n:p,6;" ":20,1;1;"You hit the correct word-OOPS!":9997 ':20,1;1;"This is the complete answer...":9997 ':w=z:g$=m$:33804 :33826 :9997 ':3450z :3050 /_x=0:w=z:G$=m$:33804 :33815 :33826 :9997 ':3450z :3050 416,3;n$:15,w;g$:5:15,3;n$:14,w;g$:5:14,3;n$:13 ,3;n$:13 ,w;2;g$: 5^:3,27;0;7;"8":20,12 ;1;1;"EXCELLENT": 6%9997 ':33826 +(cv*4) :@11 ,9 ;"The opposite of":15,15;"is": >`11 ,15;"As":xxx=35#xxx=557xxx=56815,13 ;"as the": ?+xxx<36$15,14;"as a": @9xxx=535xxx=54615,14;"as an": A15,15;"as": B311 ,15;"A":15,15;"of": F J z?20,1;1;" ": )sw=2:0:0:7: I10 ,5;"ONE MOMENT PLEASE...":s=1:n=130 Rx=(*10 )+1:y=(*10 )+1:w=z(x):z=z(y):z(x)=z:z(y)=w n aw=10 :3580 :n=110 :p=x(n):c$(n)=w$(1,p):k$(n)=w$(2,p):n eln=0:xxx=0:n=110 :v=13 :r$=c$(n):s$=k$(n):9030F#:v>lnln=v e>xxxxxx=e n:3596  i=110 y=(*w)+1  p=1 x(p)=y3585 p=ix(i)=y:i:  p=p+1:3590  :8100 :0,1;"In this game you have to match":2,1;"words from two lists. This is":4,1;"achieved by drawing lines":6,1;"between the matched words.":8,1;"Press keys 6 and 7 to move the":10 ,1;"joining line. Press 6 to move":12 ,1;"the line down and 7 to move":14,1;"it up. When you think you have":16,1;"the line in position, Press":18,1;"ENTER to see if you are right!":3600  9995 ' Rtot=0::n=110 :(z(n)*2)-2,32 -xxx;k$(n):n Dn=110 :(n*2)-2,0;1;c$(n):n ;n=0182:n,ln+1;4;"":n =n=0182:n,30-xxx;4;"":n cc=0:x=0:19,0;0;1;"":20,0;0;1;"":21,0;0;1;""  0 tk=(8*ln)+16:tt=((22-x)*8)-4:n=x:n,ln+1;1;7;4;"":k,tt:7;8*(28-ln-xxx)-4,0 ~kcc=(*8)+1:cc=8x,ln+1;2;"":n,30-xxx;2;"":3800 cc<3n>00.01z# =,n+30:n,30-xxx;0;4;0;"":k,tt:1;8*(28-ln-xxx)-4,8*(x-n):n=n-2:k,tt:7;8*(28-ln-xxx)-4,8*(x-n):n,30-xxx;7;1;"":3710~ cc<6n<180.01z# =,n+30:n,30-xxx;4;0;"":k,tt:1;8*(28-ln-xxx)-4,8*(x-n):n=n+2:k,tt:7;8*(28-ln-xxx)-4,8*(x-n):n,30-xxx;7;1;"":3710~  3710~ w=z((x/2)+1): z((x/2)+1)=(n/2)+1tot=tot+1:9960&+(*4):D$:20,(16-(D$/2));1;1;7;D$:9997 ':3850  9970&+(*4):D$:20,(16-(D$/2));1;1;7;D$:9997 ':20,3;0;1;7;"This is the correct answer":9997 ' ^k,tt:1;8*(28-ln-xxx)-4,8*(x-n):n,30-xxx;4;"" yk,tt:8*(28-ln-xxx)-4,8*(x-(w*2)+2):(w*2)-2,30-xxx;2;""  9997 ':v=13 :sub=x(s):r$=c$(s):s$=k$(s):9030F#:g$=" ":20,0;1;7;0;g$  3870  3900< g$(12)="a ":g$(3v+2)=c$(s):g$(v+3v+6)=" of ":g$(v+7v+7+e)=s$(1e):38957 7r20,(16-(g$(1v+11 +e)/2));1;7;g$(1v+13 +e):9996 ' <3450z :1;k,tt:1;8*(28-ln-xxx)-4,8*(x-(w*2)+2):(w*2)-2,30-xxx;4;"":s=s+1:x=x+2:s=11 4060 F 3615 %cv=4cv=58000@  8100 0::0:7:0:1:f=1921:f,0;1;" ":f:0:1:1,24:253,0:z=0:y=255:x=175:w=0:9000(#:0:9997 ' 1,1;"In the writing option you":3,1;"have to complete a simple":5,1;"sentence. Once you have typed":7,1;"your answer, press ENTER and":9 ,1;"you will see if you are right!":11 ,1;"You can only have three":13 ,1;"attempts. Press 0 to erase a":15,1;"typing error or press 1 if you":17,1;"are really stuck! GOOD LUCK!":4008 9997 ':9995 ' Df=117:f,1;" ":f h7:0:0:1,1;"Title:":1,8;B$:1,23;"Score:0" ,3,1;"Complete the sentence: " ,9998':tot=0:m=11 A0:0:7:e=416:e,2;N$:e $9060d#:9030F#:9380$ j$=r$:ln=6:n=v:p=a ^0:4:z=a*7:w=111o:x=24:y=24+(8*v):9000(# ^0:4:z=a*7:w=111o:x=24:y=24+(8*v):9000(# %7:9404$:12 ,i;s$ F4:z=i*7:w=63?:y=24+(8*e):9000(# 9s=3:9200#:tot=tot+s:1,29;tot m:sw=1 ܰ502:20,2;0;1;7;" E N D O F R O U N D ":9997 ':0:7:0::z=0:w=0:y=255  X=132  9000(#: %0,94^:255,0 S6,1;"Your score for that round was:":8,10 ;1;tot 8sw=18,13 ;"out of 30.":4099 7sw=28,13 ;"out of 10":4097 &8,14;"out of ";(totpos) {9998':12 ,1;"DEMO: Normally there would be";14,1;"10 words per round.":4100 9998':12 ,1;"DEMO: That concludes our";14,1;"demonstration of WORDPOWER.";16,1;"Do you wish to play again?";18,1;"Y or N":7000X 9998':12 ,1;"DEMO: Normally there would be";14,1;"10 words per round, with a";16,1;" maximum of 3 points per word." 9995 ':12 ,1;" ";14,1;" ";16,1;" "  "12 ,1;"Do you want:" 2C$(1)="more words":C$(3)="the menu" 9998':14,3;4;1;"W";14,5;7;0;C$(1):9998':16,3;4;1;"M";16,5;7;0;C$(3) 79998':1:19,7;"PRESS W or M" Z:9997 ':#0;"DEMO: WE WILL CHOOSE ";1;"M":9996 '  500 X!s$=:s$"y"s$"n"7000X ]s$="y"29 bU:9 ,1;"Please rewind tape to beginning of side 2 and press play.":"" @K0::z=16:w=0:y=222:x=72H:9000(# JD14,3;7;"Level of difficulty?":9998':16,3;4;1;"D";16,5;7;0;"Difficult":9998':18,3;4;1;"E";18,5;7;0;"Easier":9998':20,10 ;7;0;1;"PRESS D or E" O 90102# TA$="E"A$="e"X$="E": ^A$="D"A$="d"X$="D": h 8015O z0::3,5;0;7;0;0;"TITLE: ";B$;6,2;"Would you like instructions?";8,10 ;"Press Y or N":8110:3,1;0;7;" ":6,1;0;7;" ":8,1;0;7;" ": g9997 ':#0;"DEMO: WE WILL CHOOSE ";1;"Y":9997 ':9997 ': #( #*5z,w:y,0:0,x:-y,0:0,-x: #- #2ccc=0:cc=cc+1 #< 0.5,24:502: #=$A$=j$((k-p)+1):9998': #A #F #Ge=v #H&r$(v)=" "v=v-1:9032H# #Ia=(16-(v/2)) #L$s$(e)=" "e=e-1:9036L# #Mi=(16-(e/2)): #P #dX$="D"k=1:9064h# #eX$="E"k=2:9064h# #g k=1 #h!9064h#+(3*cv)-2 #iGccc=ccc+1:r$=z$(1,ccc):s$=z$(2,ccc):v=13 : #lPccc=ccc+1:r$=l$(1,ccc):s$=l$(2,ccc):sub=ccc:v=10 : # # G$=N$:k=p #Wcv=4ln,k;7;0;j$(1):G$(1)=j$(1):k=k+1 #*0:4:1:ln,k;" " # 9021=# #1(A$>96`ƯA$<123{)A$=" "9260,$ $ 9A$=13 0:7:ln,k;" ":9290J$ $,10:7:ln,k;A$:0.02{# =,30 $66G$((k-p)+1)=A$:k=k+1:k=p+n9320h$ $@ 9209# $JhG$(1n)=j$(1n)20,12 ;0;1;7;"VERY GOOD":9998': $RT0:20,3;N$:0:7:ln,p;N$(1n):9200# $S $T{0:7:0:1:ln,p;j$(1n):9997 ':0:1:20,3;N$:3450z : $h $r 9290J$ $|3A$="0"0:20,2;N$:9225 $ $ 9330r$ $ $ $9380$+cv $ $6,a-4;"as": $6,a-4;"A": $ $ $ $9400$+(cv*4) $(9 ,9 ;"is opposite to...": $Hsub=35#sub=568sub=55712 ,i-8;"as the": $,sub<36$12 ,i-6;"as a": $:sub=535sub=54612 ,i-7;"as an": $12 ,i-4;"as": $12 ,i-5;"of": $ $ %R0::30:z=16:y=222:x=72H:9000(#:30 %14,3;"How do you want to work?":502:4:1:16,5;"U":7:0:16,7;"Unscored":502:4:1:18,5;"S":7:0:18,7;"Scored" %6502:1:20,10 ;"PRESS U or S" %Y9997 ':#0;"DEMO: WE WILL CHOOSE ";1;"S":9996 ' % F$="T": % & "VERY GOOD" & "CORRECT" & "EXCELLENT" & "RIGHT" &"THAT'S NOT RIGHT!" &"NOT CORRECT" & "WRONG" & "INCORRECT" ' e=0600X:e: ' e=0200:e: ' e=0100d:e: 'e=0502:e: 'M"m";1;"WP-DEMO":*"M";1;"WP-DEMO":*"M";1;"WP-DEMO":"OK" 4122223334445666778899::;<<=<<;::988766544321100////0011233445667889::;<=<;::988766544321100////0011233455677899:;;<=<;;;;<<===========<<;;:98876654321100/////000122344566789:;<<<;;;;<<<<===<;;;;<<<;;;;<<<<===<;:988766544322100/001223445667889:;<<;;;;<<<<<<======<<;;;;;<<======<<;::98876654321100/////001123445667889::;<<=>>?@@ABBCDDEFEDDCBBA@@?>>=<<;::988766544321100///0011223445667889::;<<=<<;::98876654432110/..-,,+**)(('&'(()**+,,-../01123445667889::;<<======<<;:9876654432211000////00100////000112222334455667889:;;<<===========<<;;:98876654321100/////000122344566789:;;<<<;;;;;<<<<<=<;;:998766544321100////0011233445667889::;<=<;::988766544321100////0011233455677899:;;<=<;;:9988877777888999::;<<======<<;;::9887655433211000/////0001122334455677899:;;;<<===<;:988766544322100/001223445667889:;<<;;;;:::::;;;;<<<41345667889:::;<<==>>??@@@AAA@@@???>>>===<<<<==>>?@AABBCCCDDEEEFFFGGGHHHHHHHGGGFFFEEEDDDDEEFFGHIIJJKKKLLLMMMNNNOOOPPPPPQRSSTTUVWXYXWVUTTSSRRRRQQQPPPPPPQQRRSTUVVWXXXYYYZZZ[[[[[ZZYZZ[\]]^_``ab]]\[ZZYZZ[\]]^_``abbbbbbaaa```___^^^]]]^^^___```aaabbbbbccdeffghijkklmnoppqqrsrqqpponmlkkjjjiiihhhgggggghhiijklmmnnoooopppqqqrrrssstttuuuvvvwwwxxxxxwwwvvvuuutttsssrrrqqqpppooooppqqrssttuuvvvwwwxxxyyyzzz{{{zzzyyyxxxwwwvvvvuuuutttsssrrrqqqqqrrrssstttuuuuvvvvwwwxxxyyyzzz{{|}~~~}}|{{zyxxwwwxxyz{{|}}~~g8 blind brave busy cunning slow pale happy steady timid bright strong pretty bat lion bee fox snail ghost lark rock fawn button ox picture ׯ' bench board brood company crew flock herd host bale batch magistrates directors chickens actors sailors sheep cattle angels cotton bread 1  y( w?d 'rqva  posu xm'otpondsoڣ  a few absent accept adult advanced alive ancestor ancient answer arrive a lot present refuse child backward dead descendant modern question leave c x D NOT CORRECT  J a few X BSimiles AGFTMhappyUlarkR pretty S picture Ghappyi ˯    5  5 NPRESENTS