ZXTape! 0Created with Ramsoft MakeTZXScrambler2@:+ Scrambler Mk2  MENTOR SOFTWARE MAY 1983 @:''" STOP THE TAPE AND PRESS A KEY.":30:=""2  I=0:Z$="":th=13 :Q$=Z$:M$=Z$:IF=I:bp=I:R=I:o=1:z=I:tn=10 :m=32 :e=8:WL=I:LS=I:INST=I:YY=I::160 Q$=M$:R$="":I=oWL ""20 =""30 #2()=thM$=Q$:IF=o:bp,36$:bp,480: (QZ$=:R=oLS:Z$=M$(RR)e,R+7;" ":M$(RR)=O:bp,36$+I:60< 2'R:bp,502:bp,40(:20 24N$=N$(24) 0;2;" Hello, ";6;N$;7;8;"Welcome to ";:100d:3;1;"Scrambler.";0;0;'';8;"Words will appear with";8;"their letters mixed up.";8;1;"You type in the letters";8;"in the RIGHT order.";2;''"EXAMPLE"' mWL=N$:LS=WL:K=13:400:M$="":I=1WL:WW=W$(II):M$=M$+N$(WWWW):I:M$=N$K &Z8,8;6;M$;10 ,8;:I=1WL:1;2;"-";:I :''" I expect you can get this one!":2;'" Type in what you think it is.";1;''" CAPITALS must be typed as such.":100d D3INST=8:IF=0:10 :IF550& 0R$N$:"Wrong!?!?? re-do please.":520 3:2;5;" O.K. Now for the EXERCISE " ƛWL=NO:LS=WL:400:T$=W$:T=1NO:WDNO=(T$(TT)):WDNO2=2*WDNO-1:SWD=V(C$):EWD=W(C$):X$=A$(SWDEWD):SWD=V(D$):EWD=W(D$) 1,9 ;0;7;" Question ";T;" ":INST=E$(WDNO2WDNO2):LS=X$:WL=E$(WDNO2+1WDNO2+1):K$=X$(WL):400  cK=13:400:M$="":I=1LS:WW=W$(II):M$=M$+X$(WWWW):I:M$(WL)=K$K *P$=B$(SWDSWD+INST-1) 4I=1WL:P$=P$+"-":I >P$=P$+B$(SWD+INSTEWD) \`8,8;6;M$;7;'';P$:WLLS16,8;6;"Extra letters" a>100d:V$=M$:R$="":IF=0:10 :IF860\ zR$=K$16,8;1;2;" that's right "'';0;30;'';30;" ":J=1100d:6:3:J:J=14:bp,40(:bp,36$:bp,30:J:S=S+1:920 Q120x:1:16,2;5;"Sorry!";7;" I'm afraid that you";9 ;"have got it WRONG.";30;'" The right answer is:-"; 30;'';14-(K$)/2;7;2;" ";K$;" ";7;30;" ":J=120:bp/2,24:bp/2,38&:bp/2,16:J L16,2;6;" Press any key to continue. ":=""915 PC=(100d*S/T+0.5) :3,2;S;3,4;" correct - ";NO-T-1;" more left."'';2;5;"percentage score ";PC;" %":T :1;';14-(N$)/2;5;" ";N$;" ";7;'';11 ;1;"Your Score was ";PC;" %"'';2;11 ;S;" out of ";NO;" correct."'';6;" Exercise ";f$:PC=0:S=0 ''" Are you:- a) letting someone";14;"else have a go."'';11 ;"b) having another go";14;"yourself."'';11 ;"c) doing another";14;"exercise."'';2;11 ;"Type a,b or c." ""953 =""956 y$=:y$="a"500 %y$="b":" Please wait":710 y$"c":950  5 "For 16K Spectrums the creation program is separate. Please position tape before start of proram CREATE or at start of tape and start the tape.":"CREATE" "",10 ::sound off "",0::sound on @f((23732\))+256*(23733\)>40000@"Please wait for 2nd part to LOAD":"CREATE" J JCREATE N P, Scrambler Mk2  MENTOR SOFTWARE JUNE 1983 ?:''"STOP THE TAPE AND PRESS A KEY.":30:=""2  I=0:Z$="":th=13 :Q$=Z$:M$=Z$:IF=I:bp=I:R=I:o=1:z=I:tn=10 :m=32 :e=8:WL=I:LS=I:INST=I:YY=I::160 x9J=SWD+INST-1SWD-1:B$(JJ)=" "140 K$=B$(JJ)+K$:J J=SWD+INSTEWD:B$(JJ)=" " K$=K$+B$(JJ):J: TNO=0:A$="":B$="":C$=1+0:D$=C$:C=1:D=1:E$="" :2;'" Please enter sentence with word or part of word to be shuffled in CAPITALS";0;" (minimum 3 letters, word will be converted to lower case except letters preceded by *, single capitals are ignored)"'' "--------------------------------"'';10 ;1;" Type ""1"" to finish";0;'';1;"ENTER SENTENCE";0;" QUESTION ";NO+1:Y$:'Y$:I=0:LS=Y$:X$="":Y$="1"300, rI=I+1:LS=0((I=LS)(X$<3));2;6;''"No Capitals ? Please repeat."'':220 I=LS+1270 0X$=3SW=I-3:E$=E$+(SW-1) KP$=Y$(II):(P$>64@ƯP$<91[)ůP$=42*X$=X$+P$:230 X$=1X$="":230  X$=""230 [P$="":LD=X$:I=1LD:J=X$(II):J=42*I=I+(ILD):P$=P$+X$(II):274 P$=P$+(J+32 ) I EX$<32;''" At least three letters please":220 X$=P$:LW=X$:E$=E$+LW:1;''"Letters needed to make word."'';3;NO+1;5;X$;1;''"Extra letters may now be added."'' NO=NO+1:P$:X$=X$+P$:1;"Letter selection:-"'';3;NO;5;X$:A$=A$+X$:C=X$+C:CC=(C/256):C$=C$+(C-256*CC)+(CC):'';NO;" ";X$;'';Y$ "I=SWLS-LD:Y$(II)=Y$(I+LDI+LD):I:Y$=Y$(LS-LD):D=Y$+D:DD=(D/256):D$=D$+(D-256*DD)+(DD):B$=B$+Y$:220 ,"Please type in a password that you can use in place of the pupil's name to gain access to the word/phrase list":G$:G$>24G$=G$(24) 6''" Password:-"'';5;6;G$;7;''" Type a file-name ";2;"(maximum 10 letters)";0;" to store the program and your word/phrase combinations OR type 1 if you do not want to save them yet.":f$:f$="1"500 @ f$>10 f$=f$(10 ) J0"File:- ";6;f$:f$495:495 IV(V$q )=V$(WDNO2WDNO2)+256*V$(WDNO2+1WDNO2+1) aW(V$%x)=V$(WDNO2+2WDNO2+2)+256*V$(WDNO2+3WDNO2+3)-1 B:''" STOP THE TAPE AND TOUCH A KEY.":10 :=""495 :'" Hello teacher there are ";NO;''" word/phrase pairs in the"''" computer.";3;" Do you want a"''" printout. Answer y/n":y$:y$="y"y$="Y"7000X:1020 y$"n"y$"N"1000 '" From which word pair do you"''" wish to start adding new ones?";3;''" ENTER a number no greater than"'';" ";NO+1;" please." _o$="":y$:I=1̱y$:ch=y$(II):o$=o$+y$(II):ch<480ch>5791020 I .ch=o$:ch>NO+1ch<11020 cNO=ch:';14;2;NO;'':WDNO2=2*NO-1:STA=V(C$):STB=V(D$):C=STA:D=STB $A$=A$(STA-1):B$=B$(STB-1):C$=C$(WDNO2+1):D$=D$(WDNO2+1):E$=E$(WDNO2-1):NO=NO-1:210 X6''"EXERCISE ";f$;';NO;" Combinations":I=1NO ]J=131:"-";:J bWDNO2=2*I-1:STA=V(C$):STB=V(D$):INST=E$(WDNO2):WL=E$(WDNO2+1):WDNO2=WDNO2+2:C=V(C$):LS=C-STA:D=V(D$) gESWD=STB:EWD=D-1:x$=a$(STASTA+WL-1):k$=x$:120x lKy$=b$(STBSTB+INST-1)+a$(STASTA+WL-1)+b$(STB+INSTD-1) q)'"WORD ";I;" ";k$:k$x$'"TO DO ";x$ vx$=a$(STA+WLSTA+LS-1) x$""'"EXTRAS ";x$ '"SENTENCE/PHRASE"';y$ I: #(I=(23635S\)+256*23636T\:J=((I+2))+256*(I+3):I=I+J+4:J=(23627K\)+256*23628L\:K=J-I-4:J=(K/256):K=K-256*J:I+2,K:I+3,J::TO SAVE DATA ONLY GOTO 9000 THEN 5"ENTER" dnoO1Z QMroz m ensABCDcdEYlKEX0a _/ a+ Scrambler Mk2  MENTOR SOFTWARE MAY 1983 \" dno }Lroz m enscIdaZQMesNtt/tkgwKweKwearO9E    PheAHwitchhwhichtthereitheirequitequietstareistairewriteghrightwewhereawearheC #)/6=CID'Ag.FaB`The flew on her broomstick.Do you know one is yours?Here is the house and is the garden.The children put on hats and coats.Mary Mary contrary.Be as as a mouse.It is rude to at other people.We go up the s to bed.John uses a big pencil to his name.She held the pen in her hand.I wonder I put my book.Susan likes to pink jeans.Y1XGteacherFEX0aEX0b m/d o+ Scrambler Mk2  MENTOR SOFTWARE MAY 1983 \"Z QM}Lroz m ens cAdjsdnottNteacherO1E!   7PaA@blewubluewDearedeerahorseuhouserOnewwonetoewtoweweatherhwhetheraC !%)-19AD#EmOyBHe bubbles using soapy water.My football shirt is and white.She began the letter, " Tom,".The grew new antlers.My hobby is riding.Come to our to play.We counted the candles. , two, three.The fastest runner the race.Peter got a blister on his big .Our car broke down and the garage owner gave us a home.The keeps changing from sunshine to rain.Let us decide to go or not.Y1XGteacherFEX0bkEX0c /7 + Scrambler Mk2  MENTOR SOFTWARE MAY 1983 \&" }Lroz m ensZQM c;d !jsNt O10dnot.tE+8  ! PA:meetameatestyleistileysonusunoseemaseamereadereedabearbareC $).37;D-Q|?i B Sally said that she would me at the shops.Mum bought some at the butcher.I like new clothes and dress in the latest In a story that I know the pig would not jump over the .My father is grandad's oldest .In the summer we hope the will shine every day.I to be getting all the answers right. That's good.Paul was careful to sew the straight.I often a book before goingto sleep.The ducks swam among the s at the edge of the pond.The little boy cuddled his teddy .I paddled in the stream with feet.Y1XGteacherFEX0ck4EX1a t/ v+ Scrambler Mk2  MENTOR SOFTWARE MAY 1983 \'" roz m ensZQM cEd jE !*6%! PADadgeemberedavementwordhetheraenchlampraneiriverunteroandfatherimselfC "&+06?ED4eGxBScouts wear bs to show whichtests they have passed.He rem 21 of the 30 things that he had seen.Cars are not allowed on the p.The knight killed the dragon with his s.I do not know w I can come.People in France speak Fr.The man used a to see in the dark.You can move things around a building site with a c.When we crashed my father was the d of the car.The deer was stalked by a hMy dad's dad is my gr.He picked h up after falling down.Y1XGteacherFEX1ak;EX1b /+ Scrambler Mk2  MENTOR SOFTWARE MAY 1983 \" roz m ensZQM c:d  jE   PA9odyopedchasechildrenindowardenpadeiuncheateReadyrighteethC $(,16:DEPas BI wash my b with soap.I h for a new bike but I gota scooter instead.Dogs cats!All like sweets!Look out of the w.I have flowers in my g.A bucket and s.Here is a b of flowers.The butcher sells m. steady go!The moon is shining b as day.Brush your t and go to bed.Y1XGteacherFEX1bkEX2a -//+ Scrambler Mk2  MENTOR SOFTWARE MAY 1983 \  }L(oz m ens' cHdZ3 O12dnotBt&E8'8!   2AGddressardeneroassengerrawerapterlownonfessnklesidercvictedkteepleastimeC!%+/5<BHD:[Q&ZBYThe postman should deliver letters to the correct a.A good g is always weeding.The driver stopped the bus to let a p get off.I keep my underwear in a d.It was time to stop reading but mum let me finish the ch.A c made me laugh when I went to the circus.The person responsible must c or we will all be punished.He twisted his a so badly that he could not stand up.I do not con it good manners to eat on a bus.He was con and sent to prison.The church s was very high. People could see it from miles away.Hobbies pass the time and are sometimes called ps.GteacherFEX2asNChris uaT     dnw[wXassengerWMP8The driver stopped the bus to let a p-------- get off.VaesrnegsQaesrnegsZsRasenergsK passengerYkEX2b /+ Scrambler Mk2  MENTOR SOFTWARE MAY 1983 \ }L(oz m ens c=dqp dnot=tqdsN uaT    dnwXwpWMP@After his wife's death he would d----- all his time to the kids.VeovteQeovteZeRevoteKocean.O12A<evoteumbleyeroWednesdayencilearkleerveproachisgusteoggyeceanBpAfter his wife's death he would d all his time to the kids.Jesus liked h people. He said "Blessed are the meek".A law man is called a law.After Tuesday comes .Use a p and a rubber.Fireworks sp in the dark.You have got a n! Be off with you.Do not ap a crossroad at speed.You d me! I loathe you.When it is f you can't see even in daytime.My Bonny lies over the o.C #'-49=D<s,XqE!     Y1XGteacherFEX2bEX3 /+ Scrambler Mk2  MENTOR SOFTWARE MAY 1983 \$"Z QM}Lroz m ensckdjsNteacher O13dnotOtE 64$+ )'6"PeAjstasygerateonflammaundicoratoryoeuvreiaturecasionallyffinecretaryquirrelrategytheatreuncheonaccinateaieldeC"  &,6;BIOV]fkD"8}M1vTBWhen you go to heaven your heartwill be filled with ec.Cartoon artists exag people's features so that they look funny.Petrol is highly iable, a distant spark could catch it on fire.His face was jed, it had gone yellow and he looked as though he had not long to live.Experiments are normally conducted in the lab.The three point turn is a tricky man which you have to learn in order to pass your driving test.The Japanese grow min trees. I have one on my coffee table.The men worked all day long stopping oc to have a drink.I bought some para which fuelled the small heater in my workshop.The letters were sent out by theschool se.A s is a charming rodent with a bushy tail. It lives in trees.To win at chess you must have a good st.Instead of going to the cinema why not go out to the and see live acting.The policeman got out his tr and hit the man over the head.The doctor decided to v all the children against whooping cough.You come onto the stage wing an axe.Y1XGteacherFEX3kw+EX4 0 `, Scrambler Mk2  MENTOR SOFTWARE JUNE 1983 \ roz m ens/csdV"ZQM dnotpt\kwwVK insatiable.E/+ F Q@K"B& H!PArsatiablecyrintheillimetreirringeuysteriousgligenteoccurreauallelepriestynonymoueumbrellauyachtpallinguwappointseirC  "+3<BHQZ_hpsD Wod+w \BHis desire to play space invaders was in. He could go on playing for hours.A lab is a sort of maze.The diameter of a pin head is about one m.Add the flour st the mixture all the time."How very odd", said the man, "That island has always been very m".Leaving the secret documents in the cafe whilst he went to the gents was very ne.It has already happened three times. This is the fourth nce. It must stop!The road ran in the same direction as the railway and wasexactly par to it.A Roman Catholic vicar is calleda .A word which has a vey similar meaning to another is said to be ss with it.When it rains people put up their s.Big sailing boats are called s."I am horrified", said the teacher "That haircut is really quite ap!""You dis me", his mother said,"I thought that you were going to be a good boy!"He was way out man. I mean wd man!XGteacherFEX4OY 12132EX5 0X, Scrambler Mk2  MENTOR SOFTWARE JUNE 1983 \L"Z QMroz m enscd)j O10dnotMtE A!"@*3  cB (PkAanaceararalysiseaivilegeaodergeantasymmetryciortuousaffickingeachertolunteerZoologyautumncommitteecreetlbarrassmentscinoygienickC"$.5>EMTZcityD"C K7[FBA medicine that is supposed to cure everything is called a p.The old man suffered from p and could not move hislegs."It is an honour and a pr to serve you, sire" said the knight.The s was answerable to the officer for the conduct of his men.Something which is the same on both sides is said to have .Driving the car round hairpin bends is t. You are 'on edge' all the time.They were sent to prison for twenty years for tr in drugs.Traitors are trous.Charities rely on vs, who give their time freely. is the study of animals.In the leaves fall off the trees.We must have a meetingto discuss what the club should do about it.He didn't tell anyone about the conversation that he had over- heard but behaved very disy.When her dress split she ran outof the room to hide her em.The fish would faate him forhours. He loved watching them.Picking up sweets from the road is not h. You can catch all sorts of germs.Y1XGteacherFEX5kJEX6 A0C, Scrambler Mk2  MENTOR SOFTWARE JUNE 1983 \9"Z QMroz m enscd(jO3dnottE*2 '#$%$ #& PrArychnineterraneanoourveillaeaerialcasualtyecomprehensibledissolveenemiesorfeitandkerchiefcvmmovableniirrigateercenarymonasteryauseousrC  #,:BIO\fnvD 78yE_(B'She poisoned her husband by putting st in his tea.In the event of war parliament will move to a sub headquarters half a mile below ground.The police had had the house under snce for some timeand knew who had entered or left.A television won't work without an . This sometimes goes on the roof.When I broke my leg I went to the department of the hospital.It is in. I can't understand it at all.If you put sugar in water it will ."All those not on our side are our " said William, turning to the gang.If you don't turn up you f your place in the team.Use a h to blow your nose.The donkey was i. He would not move an inch.To make water run over fields isto them.A soldier who fights for money is a m.Monks live in a .The gas was n, which means that it made me feel sick.XGteacherFEX6Y lkEX7 %0%', Scrambler Mk2  MENTOR SOFTWARE JUNE 1983 \ XZ QMroz m ens* c d=$ < dnottPkO14AxcerniblecyclopaediaeignyievanceehiccupimminentencoherencengeniouseongevityMediterraneaneiscellaneousomiscuousqrehensibleBThe white lines on the road werebarely dis through the fog.The man was like a walking en, you just had to name a subject and he could tellyou all about it.To get into the prison hospital the man would f a bad back. After deceiving the doctors he would make his escape.The men had a legitimate gr. They were being expected to work twice as hard for the same pay.If you have got the s you can try to stop it by holding your breath or drinking some water.The bomb would go off soon. Theywere in danger.He was all mixed up. There was total in in what he said.The machine was quite i. It was very cleverly made. The people of the island enjoyed l. Some had even lived to 110.Italy enjoys a mild climate. The sea surrounds it.Any items for which there is no heading are filed under the m category.She was a very pr lady and had many different lovers.His behaviour really was rep, nothing could excuse it.C !'1:CKYeoyD=K<qE*" /"(( "! A  # Gteacherww<FEX7XcernibleK discernibleYDThe white lines on the road werebarely discernible through the fog.EX8 07, Scrambler Mk2  MENTOR SOFTWARE JUNE 1983 \Z QMroz m e ns, cqd- dnotqtwwE@ " 1 % @ )'*#,PecApkaleidoLieutenantmarriageaiteorologynaissanceosimultaneousisticianeocessibiacquiescekoefficieacurrenceurriculuecC%/;EMV_gqDcPM VBIf you hold a scope up tothe light and rotate the end bityou will see pretty symmetrical patterns.There is a good book you must read. It is called the French 's woman. It is about an army officer.As soon as his daughters reacheda ble age he started looking for husbands for them.The science of weather forecasting is me.Winning a war depends on good recon. This involves sending soldiers out in front to check on enemy positions.Two equations with two unknowns are called .The analysis of a census is doneby a stat who is a sort of mathematician.People use banks because of the easy aclity of their money. They can always get at it.Some children take up smoking with the ance of their parents. I do not know why they agree to it.The cnt of a term in an equation is the number by which it is multiplied.The chairman hoped for con between all the parties involved. Disagreement would mean a long meeting.John liked all the subjects on the school cm.GteacherFEX8K curriculum.XecY13O13kGEX9 n0Cp, Scrambler Mk2  MENTOR SOFTWARE JUNE 1983 \J"Z QMroz m ens cudJ j E!  ) !- B - I PiiAtcceptabilityccommoanihilatecompetitiveorroborateaecadenceeccentricquanimityeightayerbaceousyiosyncrasyhmpenetrableiiC '2;CLS]huD[(} bTBThe thing that determines the a of a present is whether or not it is sincerely given."Hello! Can you adate my wife and me for the night or areall the rooms taken?"The bomb will an the island. Afterwards there will only be sea!Sport needs a spiritbut you must be a good loser as well.The detective wanted to know if I could c the story that the suspect had given him.Rome fell because of the d of its people!The old man was very e, sometimes he would go out wearing a string vest instead ofa shirt.How can you regard today's morals with e? Aren't you worried about them at all?The railways carry passengers. They also carry goods or fr.The garden had h borders as well as a herb garden.The man sometimes behaved ratheroddly. One id that he had was to cycle to work on a three wheeled bike singing!The army could not get into the castle because the walls were totally i.XGteacherFEX9YnkScrambler2@:+ Scrambler Mk2  MENTOR SOFTWARE MAY 1983 @:''" STOP THE TAPE AND PRESS A KEY.":30:=""2  I=0:Z$="":th=13 :Q$=Z$:M$=Z$:IF=I:bp=I:R=I:o=1:z=I:tn=10 :m=32 :e=8:WL=I:LS=I:INST=I:YY=I::160 Q$=M$:R$="":I=oWL ""20 =""30 #2()=thM$=Q$:IF=o:bp,36$:bp,480: (QZ$=:R=oLS:Z$=M$(RR)e,R+7;" ":M$(RR)=O:bp,36$+I:60< 2'R:bp,502:bp,40(:20 24N$=N$(24) 0;2;" Hello, ";6;N$;7;8;"Welcome to ";:100d:3;1;"Scrambler.";0;0;'';8;"Words will appear with";8;"their letters mixed up.";8;1;"You type in the letters";8;"in the RIGHT order.";2;''"EXAMPLE"' mWL=N$:LS=WL:K=13:400:M$="":I=1WL:WW=W$(II):M$=M$+N$(WWWW):I:M$=N$K &Z8,8;6;M$;10 ,8;:I=1WL:1;2;"-";:I :''" I expect you can get this one!":2;'" Type in what you think it is.";1;''" CAPITALS must be typed as such.":100d D3INST=8:IF=0:10 :IF550& 0R$N$:"Wrong!?!?? re-do please.":520 3:2;5;" O.K. Now for the EXERCISE " ƛWL=NO:LS=WL:400:T$=W$:T=1NO:WDNO=(T$(TT)):WDNO2=2*WDNO-1:SWD=V(C$):EWD=W(C$):X$=A$(SWDEWD):SWD=V(D$):EWD=W(D$) 1,9 ;0;7;" Question ";T;" ":INST=E$(WDNO2WDNO2):LS=X$:WL=E$(WDNO2+1WDNO2+1):K$=X$(WL):400  cK=13:400:M$="":I=1LS:WW=W$(II):M$=M$+X$(WWWW):I:M$(WL)=K$K *P$=B$(SWDSWD+INST-1) 4I=1WL:P$=P$+"-":I >P$=P$+B$(SWD+INSTEWD) \`8,8;6;M$;7;'';P$:WLLS16,8;6;"Extra letters" a>100d:V$=M$:R$="":IF=0:10 :IF860\ zR$=K$16,8;1;2;" that's right "'';0;30;'';30;" ":J=1100d:6:3:J:J=14:bp,40(:bp,36$:bp,30:J:S=S+1:920 Q120x:1:16,2;5;"Sorry!";7;" I'm afraid that you";9 ;"have got it WRONG.";30;'" The right answer is:-"; 30;'';14-(K$)/2;7;2;" ";K$;" ";7;30;" ":J=120:bp/2,24:bp/2,38&:bp/2,16:J L16,2;6;" Press any key to continue. ":=""915 PC=(100d*S/T+0.5) :3,2;S;3,4;" correct - ";NO-T-1;" more left."'';2;5;"percentage score ";PC;" %":T :1;';14-(N$)/2;5;" ";N$;" ";7;'';11 ;1;"Your Score was ";PC;" %"'';2;11 ;S;" out of ";NO;" correct."'';6;" Exercise ";f$:PC=0:S=0 ''" Are you:- a) letting someone";14;"else have a go."'';11 ;"b) having another go";14;"yourself."'';11 ;"c) doing another";14;"exercise."'';2;11 ;"Type a,b or c." ""953 =""956 y$=:y$="a"500 %y$="b":" Please wait":710 y$"c":950  5 "For 16K Spectrums the creation program is separate. Please position tape before start of proram CREATE or at start of tape and start the tape.":"CREATE" "",10 ::sound off "",0::sound on @f((23732\))+256*(23733\)>40000@"Please wait for 2nd part to LOAD":"CREATE" J JCREATE NP, Scrambler Mk2  MENTOR SOFTWARE JUNE 1983 ?:''"STOP THE TAPE AND PRESS A KEY.":30:=""2  I=0:Z$="":th=13 :Q$=Z$:M$=Z$:IF=I:bp=I:R=I:o=1:z=I:tn=10 :m=32 :e=8:WL=I:LS=I:INST=I:YY=I::160 x9J=SWD+INST-1SWD-1:B$(JJ)=" "140 K$=B$(JJ)+K$:J J=SWD+INSTEWD:B$(JJ)=" " K$=K$+B$(JJ):J: TNO=0:A$="":B$="":C$=1+0:D$=C$:C=1:D=1:E$="" :2;'" Please enter sentence with word or part of word to be shuffled in CAPITALS";0;" (minimum 3 letters, word will be converted to lower case except letters preceded by *, single capitals are ignored)"'' "--------------------------------"'';10 ;1;" Type ""1"" to finish";0;'';1;"ENTER SENTENCE";0;" QUESTION ";NO+1:Y$:'Y$:I=0:LS=Y$:X$="":Y$="1"300, rI=I+1:LS=0((I=LS)(X$<3));2;6;''"No Capitals ? Please repeat."'':220 I=LS+1270 0X$=3SW=I-3:E$=E$+(SW-1) KP$=Y$(II):(P$>64@ƯP$<91[)ůP$=42*X$=X$+P$:230 X$=1X$="":230  X$=""230 [P$="":LD=X$:I=1LD:J=X$(II):J=42*I=I+(ILD):P$=P$+X$(II):274 P$=P$+(J+32 ) I EX$<32;''" At least three letters please":220 X$=P$:LW=X$:E$=E$+LW:1;''"Letters needed to make word."'';3;NO+1;5;X$;1;''"Extra letters may now be added."'' NO=NO+1:P$:X$=X$+P$:1;"Letter selection:-"'';3;NO;5;X$:A$=A$+X$:C=X$+C:CC=(C/256):C$=C$+(C-256*CC)+(CC):'';NO;" ";X$;'';Y$ "I=SWLS-LD:Y$(II)=Y$(I+LDI+LD):I:Y$=Y$(LS-LD):D=Y$+D:DD=(D/256):D$=D$+(D-256*DD)+(DD):B$=B$+Y$:220 ,"Please type in a password that you can use in place of the pupil's name to gain access to the word/phrase list":G$:G$>24G$=G$(24) 6''" Password:-"'';5;6;G$;7;''" Type a file-name ";2;"(maximum 10 letters)";0;" to store the program and your word/phrase combinations OR type 1 if you do not want to save them yet.":f$:f$="1"500 @ f$>10 f$=f$(10 ) J0"File:- ";6;f$:f$495:495 IV(V$q )=V$(WDNO2WDNO2)+256*V$(WDNO2+1WDNO2+1) aW(V$%x)=V$(WDNO2+2WDNO2+2)+256*V$(WDNO2+3WDNO2+3)-1 B:''" STOP THE TAPE AND TOUCH A KEY.":10 :=""495 :'" Hello teacher there are ";NO;''" word/phrase pairs in the"''" computer.";3;" Do you want a"''" printout. Answer y/n":y$:y$="y"y$="Y"7000X:1020 y$"n"y$"N"1000 '" From which word pair do you"''" wish to start adding new ones?";3;''" ENTER a number no greater than"'';" ";NO+1;" please." _o$="":y$:I=1̱y$:ch=y$(II):o$=o$+y$(II):ch<480ch>5791020 I .ch=o$:ch>NO+1ch<11020 cNO=ch:';14;2;NO;'':WDNO2=2*NO-1:STA=V(C$):STB=V(D$):C=STA:D=STB $A$=A$(STA-1):B$=B$(STB-1):C$=C$(WDNO2+1):D$=D$(WDNO2+1):E$=E$(WDNO2-1):NO=NO-1:210 X6''"EXERCISE ";f$;';NO;" Combinations":I=1NO ]J=131:"-";:J bWDNO2=2*I-1:STA=V(C$):STB=V(D$):INST=E$(WDNO2):WL=E$(WDNO2+1):WDNO2=WDNO2+2:C=V(C$):LS=C-STA:D=V(D$) gESWD=STB:EWD=D-1:x$=a$(STASTA+WL-1):k$=x$:120x lKy$=b$(STBSTB+INST-1)+a$(STASTA+WL-1)+b$(STB+INSTD-1) q)'"WORD ";I;" ";k$:k$x$'"TO DO ";x$ vx$=a$(STA+WLSTA+LS-1) x$""'"EXTRAS ";x$ '"SENTENCE/PHRASE"';y$ I: #(I=(23635S\)+256*23636T\:J=((I+2))+256*(I+3):I=I+J+4:J=(23627K\)+256*23628L\:K=J-I-4:J=(K/256):K=K-256*J:I+2,K:I+3,J::TO SAVE DATA ONLY GOTO 9000 THEN 5"ENTER" dnoO1Z QMroz m ensABCDcdEYlK