ZXTape! 0Created with Ramsoft MakeTZXdeduce L!{ NROSE SOFTWARE 1983 23613=\+256*23614>\,0:23613=\+1+256*23614>\,0:"9","10";"Please wait":"gr""a":"sc":"9003"  h$="0":t$="0":u$="0":v$="0" ,n$=" ":o$=n$+" ":m$=o$+n$+" " )m(x,y)=(x+y+(x-y))/2 Pu()=((65536*23674z\+256*23673y\+23672x\)/502) t()=m(u(),u()) "710" !W"6","12";" Deduce ":ڰ"p":"12","8";" ROSE SOFTWARE":r="17":q="6":"9000" $"710":"4","13";" Menu ":p:"7","6";"1. Using + only";"9","6";"2. Using + and -";"11","6";"3. Using +,- and X";"13","6";"4. Using +,-,X and ";ڰ"7";"18","7";" Press key 1 to 4 " '"l$=:l$=""l$<"1"l$>"4""39" -f"710":"9","6";" Shall I do the ";"10","6";" first one for you? ";"15","12";" y or n " 0w$=:w$"y"w$"n""48" dSq="0":d$(4,2):k$="Now ":d=(*(9 -4*(l$="1")))+1 g>l$="4"d=((*6))*2-2:d=-2d="9" 6"700":i="0"̰"21":ڰ"1";i,"20";" ";ڰ"4";o$:i ni="0"̰"6":ڰ"7";i,"0";n$;"0","0";"clock":i:ذ"24","144","18":"0","119":"48","0":"0","56" ="740":"2","7";"I am thinking";"3","8";"of a number" *k="8":l="1"2-(l$="1")+(l$="4") +c=(*l$)+1:l="1"l$="4"c="4" 8c$=("+"c="1")+("-"c="2")+("*"c="3")+("/"c="4") 'i="1"̰"4":c$=d$(i,1)"182" i +e=(*(9 -4*(l$="1")))+1 $"860":c$="-"z-e<0"182" c$="/"d/eɺ(d/e)"185" ;740+10 *c:k=k+3-(l$="4"):k$="Then ":l ˓"860":k,"0";"I end up with ";z:k=k+3-(l$="4"):w$"y"k,"0";"What was my number?";ڰ"7";"21","0";" Need help? Press h ":"2000" _w$="y"k,"0";"I'll work out";k+1,"0";"my number for you":r="21":"9000":"233" +q$=:q$="""1000":a>2*"800" q$="""206" q$="h"h$="1""215" q$="h"h$="1":"233" q$<"0"q$>"9""206" "i="0"̰"6":ڰ"7";i,"0";n$:i ڐp;"21","0";m$:ڰ"7":"21","21";" ";q$;" ";"20","21";"your answer":i="6"̰"19":ڰ"4";i,"21";o$:i:h$="0":q$=d"250" v$=((v$)+1):ڰ"7";"21","27";"X";"2","1";"Wrong";"4","0";"answer";"5","3";"X":t$=((t$)-1):װ".5","-10":װ"1.5","-20":r="20":"21","0";" and I'll help you ":"9000" `p;"20","0";m$;"21","0";m$:e=z:k=k-6+2*(l$="4"):j=l$-(l$>"2")̰"1"Ͱ"-1" Aٰ"9":ڰ"2";k,"23";" ";e;:i="4"̰"1"Ͱ"-1":d$(i)=" "i: "720" Be=(e+d$(i)):"850":ڰ"2";d$(i);"=";e;" ":h$="0"d$(i)=" " r="21":j=l$-(l$>"2")ڰ"7";"4","21";o$;"0","21";" Start with";"1","21";" ";z;" ";"2","21";" and work ";"3","21";" backwards " gh$="1"k=k+6-2*(l$="4"):p;"21","0";m$;k,"0";"What was my number?":"720":"206" *"9000":"740":k=k-3+(l$="4"):j i"870":ڰ"7";"2","0";"Answer";"4","1";"is ";d:"20":i="5"̰"19":ڰ"4";i,"21";o$:i:"299" Jڰ"7";"2","0";"Answer";"4","0";" is ";d;" ";"5","3";" ":"299" "740":u$=((u$)+1):t$=((t$)+1):i="0"̰"6":i,"0";n$:i:ڰ"7";"21","27";"";۰"1";"2","1";"Well";"4","1";"done" k=k-6+2*(l$="4"):ڰ"7":k+3,"26";"=";z:i="4"̰"1"Ͱ"-1":d$(i)" ""850":k,"26";d$(i):k=k-3+(l$="4")  i  <װ".2","2":װ".2","2":װ".2","4":װ".2","4":װ".5","9" +?"2","26";۰"1";d:r="21":"9000":w$="y"w$="n":"100" , "3000" ""1":p=(*2)+"5":p:: Ɓ"700":ڰ"7":i="0"̰"21":i,"0";"";i,"30";"":i:i="2"̰"29":"1",i;"";"0",i;"";"20",i;"";"21",i;"":i: Сd$(i,1)=("+"d$(i,1)="-")+("-"d$(i,1)="+")+("*"d$(i,1)="/")+("*"d$(i,1)="")+("/"d$(i,1)="*")+("/"d$(i,1)="X"): i="0"̰"5":ڰ"4";i,"21";o$:i:i="1"̰"3":ڰ"7";i,"25";" ":i:"198","169":"28","0":"0","-28":"-28","0":"0","28":ڰ"1";ٰ"9";"2","26";"?": 6k,"0";k$;"I add ";e;(" to it"k$="Now "):"790": &k,"0";k$;"I subtract ";e:"790": <e2k,"0";k$;"I times ";("it "k$="Now ");"by ";e Ee="2"k,"0";k$;"I double ";("it"k$="Now ");("that"k$="Then ")  "790":  :eɰ"2"k,"0";k$;"I divide ";("it "k$="Now ");"by ";e De="2"k,"0";k$;"I halve ";("it"k$="Now ");("that"k$="Then ")  "790": (i="1"̰"4":d$(i)=" "d$(i)=c$+e: i:  ,"740":i="6"̰"21":ڰ"4";i,"21";o$:i !ei="0"̰"6":ڰ"7";i,"0";n$:i:ڰ"7";۰"1";"2","1";"Out ";"3","1";"of ";"4","1";"time" #"r="21":"9000":"870":"248" R&d$(i,1)="*"d$(i,1)="X" U&d$(i,1)="/"d$(i,1)="" X \9e$=d:i="1"̰"4":d$(i)" "e$=e$+d$(i):e$=e$:i _ z=e$: f$i="0"̰"6":ڰ"7";i,"0";n$:i: t=t():tt1 8a=t1/15*:"24","144":14*a,14*a t1=t: Ia="0":23674z\,"0":23673y\,"0":23672x\,"0":t1=t(): h$="0":t$<"0"t$="0" m=(*5)+2:m=m+(m>0):ڰ"1":m::ٰ"9";"1","5";"Get four answers right":m:f="0"̰"21":f,"0";" ";f,"31";" ":f /"17","0";:g$="":h="1"̰"5":"3100":h !"17","1";ٰ"0";ڰ"1";"" .ڰ"1";ٰ"7";"9","27";"";"10","27";"" ѥٰ"7":"246","93":"-12","0":"0","1":"12","0":"0","1":"-13","0":"0","-25":"-1","0":"0","60":"0","-31":"-8","0":"0","-1":"8","0" ֳڰ"1":"17","2";ٰ"0";"";"16","2";ٰ"6";"";"15","2";"";"14","2";((*"2"))*"5";"";((*"2")*"2")+"2";"13","2";"";"12","2";"";"11","2";ٰ"6";"" -ٰ"6";"12","3";"";ٰ"7";"11","3";"" m="10":n="5":"3110":"11","3";ٰ"6";"";"12","3";"";"10","4";ٰ"7";"":"3110":ٰ"7";"10","4";" ";ٰ"6";"11","3";" ";"12","3";"":"3110":t$="0""3080" Sٰ"7":g="1"̰"3":m,n;" ";m-"1",n+"1";"":m=m-1:n=n+"1":"3110":g \g="1"̰"15":m,n;" ";m,n+"1";"":n=n+"1":"3110":n=((t$-"1")*"5")+"9""3080" g um,n;" ";m+"1",n+"1";"":m=m+"1":n=n+"1":"3110":g="1"̰"2":m,n;" ";m,n+"1";"":n=n+"1":"3110":g m,n;" ":ް"1":"9","27";"":"3110":"3110":ް"0":"9","27";"";"11","27";"":"3110":g="12"̰"16":g-"1","27";" ";g,"27";"":"3110":g Bt$="0":"4000":i="0"̰"29":q$:k$:װq$/"11",k$:i:"3120" Pٰ"7":g="1"̰"4":m,n;" ";m+"1",n+"1";"":m=m+"1":n=n+"1":"3110":g =m,n;" ";m+"1",n;"":m=m+"1":"3110":m<"16""3085" f="1"̰"50":f  "3120" Nm;" ";:f="0"̰"5":f+(f>0):g="1"̰"5":ڰ"1";g$;:g:f:m;" ";: &f="1"("2"-t$):f: 0 ڰ"7":ٰ"9" "2","12","2","9","4","12","2","12","2","9","4","12","2","14","2","12","2","10","2","9","2","7","2","9","4","10","2","12","2","5","1","5","1","5","2","5","1","5","1","7","1","9","1","10","4","12","2","12","2","7","2","7","2","10","2","9","2","7","4","5" l:"710":"5","7";"Total correct : ";u$;"7","7";"Total incorrect: ";v$;"14","9";" More? y or n " $q$=:q$=""q$"y"q$"n""5003" q$="y""100" "4" #(2ڰ"7";r,q;" Press any key ":"""9000" #+="""9003" #. prqd kceza;etm&   nL4Wn 9+3-2 C-E2GK5QnH0T0U0V0N O M gr X $߿߿߿߿>?~~~~>>>><~~~<6>>:<> A   AAA    A@@A@@A@@A@@@@@@ c cAAAA    B@@B@@B@@B@@@@@@ ] ]AAII    B@@B@@B@@B@@@@@@ĀĀĀĀ A AAAII    B@@B@@B@@B@@@@@@ A AAAII    A@@A@@A@@A@@@ @ @ @  A AAAII    A@@A@@A@@A@@@ @ @ @  A AAAII    A@@A@@A@@A@@@ @ @ @ @ @ @ @ @|@~?@~?@|" @@"         @ B! B! @" @@" ``| D @D @D @D @"  "" " B8888xD(8D| | | | "0 0 0"0" " B D@@DD0DD        "@@"" " | x88\,0:23613=\+1+256*23614>\,0:"10","10";"Please wait":"gr"("a"-32 ) /t="0":o$=" " A"700":i="0"̰"31":ٺ(*2);"5",i;"";"15",i;"":i !9i="6"̰"14":ٺ(*2);i,"0";"";i,"31";"":i $J"2","8";" ROSE SOFTWARE";"10","10";" Capacity ":n="19":"9000" <"750" E"3","9";" Instructions ";"8","3";"In this program,you have to";"10","6";"guess how many small";"12","4";"containers can be filled";"14","4";"from the big container." Hڰ"7":"9000":"750" K"3","12";" Menu ";"8","6";"1. Easy shape";"10","6";"2. Harder shape";"12","6";"3. Hardest shape";"14","6";"4. Random selection";ڰ"7";"17","9";" Press 1 to 4 " Nl$=:l$<"1"l$>"4""78" d[s="2000"*(l$="1")+"1000"*(l$="2")+"4000"*(l$="3")+((*4)+"1")*"1000"*(l$="4") js ks=(*"2"):s=s-(s=0) lIi=(v2/v1):j=i+s*(10 +i/4+*7):j<1107k m^s=(*2):s=s+(s=0):k=i+s*(21+i/4+*7):j<1109m n6s="1"̺(1+*7):te=i:i=j:j=k:k=te:s qHٰ"9";b+"7"-"3"*(b="2");"19","7";"Is it ";i;", ";j;" or ";k;"?" s+q$:q$<"49"ůq$>"57"űq$>"5""115" t)i="1"̱q$:q$(i)<"0"q$(i)>"9""115" vi:ٰ"9":b+"7"-"3"*(b="2");"19","0";o$;"18","3";"Your";"19","2";"answer";"20","1";o$(̰"8");"20","4"-q$/2;q$ ypi="16"̰"21":b;i,"10";o$(̰"9"):i:b+"7"-"3"*(b="2"):"19","20";o$(̰"10");"20","20";o$(̰"11") q$=((v2/v1))"172" z"17","21";"Hard luck.";"18","22";"Correct";"19","20";"answer is ";(v2/v1):װ".5","-10":װ"1.5","-20":"178" Z۰"1";"19","21";"Well done":t=t+"1":װ".2","2":װ".2","2":װ".2","4":װ".5","9" 2ڰ"7";"21","19";"Press any key":"0":"300" %ڰ"7";"21","18";" More? y or n " q$=:q$"y"q$"n""187" "4"+"96"*(q$="y") /z$=t 5%:i="0"̰"21":ڰ"5":i>"14"ڰ"4" ;+o$:i:"1","5";" Get 4 answers right " GTz="0"̰"2":reed=(*"20"):"21","10"+reed*.3;"":"20","5"+reed;"" J"21",reed+"5";"":z MJ"250","60":"-70","70",".3":"0","-80":ٰ"2":"3","-4",-:ٰ"4" Pz="0"̰"28" Qz=18z$="4"339S R 342V S"18","18";" ";"16","19";" ":۰"1":"1","5";"YOU HAVE CAUGHT A FISH":۰"0":"50":ް"1":"250","60":"-70","70",".3":"0","-80":"3","-4",-:ް"0":"16","19";" " TS"250","60":"-37","90",".6":"0","-80":ٰ"2":ڰ"5":"23675","56":t="0" U350^:i=123:q$:r$:"12","26";"";"13","26";"";14,26;"":װq$/10 ,r$:14,26;"":i:"23675","88":ް"0": Vz="12"ް"1":ٰ"7":y="36"̰"6"*t+"30"+"6"*(t="0")-"6"*(t="4")Ͱ"6":ذ"120",y,"1":ذ"120",y,"1":"4":y:ް"0":ٰ"2" YEٰ"2";"18",z;" ":("1"+"5"*(*"2")):z:"18","29";" " \۰"0":ٰ"0":ڰ"7": ^"2","2","3","7","1","7","2","7","2","7","2","11","2","7","3","9","1","9","2","9","2","9","2","12","2","9","2","11","3","12","1","14" a="2","14","2","12","2","11","2","11","3","9","1","9","4","9" 7ڰ"6":"2":ٰ"9"::i="5"̰"15":ڰ"7";i,"0";o$:i &ڰ"2";"4","0";o$;"16","0";o$: 2ڰ"6"::i="1"̰"5":ڰ"7";i,"1";o$(̰"30"):i 6i="0"̰"31":ٺ(*"6");"0",i;"";"21",i;"":i 8i="1"̰"20":ٺ(*"6");i,"0";"";i,"31";"":i: <b="1":ڰ"6":b:ٰ"9"::i="5"̰"15":ڰ"1";i,"0";o$:i C"1","6";"How many mugs can I";"2","6";"fill from the jug ?" h2=(*"3")+"6":ڰ"1":ٰ"7":"14"-h2,"20";" ";"13","20";" ":i="15"-h2̰"12":ڰ"7";i,"20";" ":i  N"160","97"+"8"*(h2-"5"):"-5","0":"5","-2":ٰ"9":"40","0",/"2"  8ٰ"7":"8","0":"0","-24","-2"*/"3":"-8","-8" $!"4050":v2=*"6.25"*(h2-"2") 'Dٰ"7":"88","70"+"8"*h1:"3","2":"0","-6"*h1:"-3","-2": h2=(*"3")+"8" <b="0":ڰ"7":b:ٰ"6"::i="5"̰"15":ڰ"0";i,"0";o$:i Qٰ"0";"1","4";"How many small cans can";"2","4";"I fill from the tank ?" ԧڰ"0":h2-"2","18";" ";h2-"1","18";" ":i=h2̰"12":i,"18";" ":i:"14","19";" ";"13","18";" " dް"1":"160","56":"0","8"*("15"-h2):ް"0":"-15","15":ް"1":"15","-15":"56","0":ް"0" 8ٰ"9";ڰ"6";"2"+h2,"22";"Oil";"3"+h2,"22";"tank" v2="9"*"2"*("15"-h2) `ذ"143","55","2":ް"1":"150","64":"-8","0":"0","-4":"3","0":"0","1":"8","0" %"147","62":"0","4":"-2","0" h1=(*"3")+"10" Rh1,"6";" ":i=h1+"1"̰"13":i,"6";" ":i:"14","6";" " `ް"1":"64","56":"0","8"*("14"-h1):ް"0":"7","7":ް"1":"-7","-7":"-16","0":ް"0" v1="3"*"1"*("14"-h1) u"52","51"+"8"*("15"-h1):"0","16":"16","0":"0","-1":"-16","0":"0","-1":"16","0":"0","-12": <b="0":ڰ"7":b:ٰ"9"::i="5"̰"15":ڰ"0";i,"0";o$:i L"1","4";"How many vases can I fill";"2","5";"from the watering can?" +h2=(*"3")+"6":v2=*"6.25"*(h2-"2") oڰ"0":ٰ"4":"14"-h2,"20";" ";"13","20";" ":i="15"-h2̰"12":ڰ"4";i,"20";" ":i ʎ"160","72":"-24","35":"0","1":"24","-35":"0","1":"-24","35":"0","1":"24","-35":"0","1":"-24","34":"24","-33" M"200","103":"4","4":"8","0":"-4","-27","-2"*/"3":"-8","-8" M"200","101":"4","4":"8","0":"-4","-27","-2"*/"3":"-8","-8" <"160","95"+"8"*(h2-"5"):ٰ"9":"39","0","5"*/"12" ٰ"6":"4050": b="2":"700":ڰ"7" ]ڰ"6";"1","2";"How many small Xmas puddings";"2","1";"can I make from the large one?" )h2=((*"3")+"5")*"4":v2=h2^3 &ٰ"4";"14"-"2"*h2/"8","19";"" /ٰ"2";"15"-"2"*h2/"8","19";"";ٰ"4";"" ٰ"8":ذ"160","55"+h2,h2 ."161"-h2,"55"+h2:h2*".5",-h2*".2",".8" H"161"-h2*115s,"55"+h2+h2*115s:h2*".3",-".15"*h2,".6" )h1=((*"3")+"2")*"4":v1=h1^3 %ٰ"4";"14"-"2"*h1/"8","9";"" .ٰ"2";"15"-"2"*h1/"8","9";"";ٰ"4";"" ٰ"8":ذ"80","55"+h1,h1: h1=(*"3")+"1" M"13","9";"":i="1"h1:"13"-i,"9";" ":i:"12"-h1,"9";"" 4ް"1":"72","72"+"8"*h1:"15","0","1.9":ް"0"  v1=*h1: #(n,"9";"Press any key" #+q$=:q$="""9003" #1: tO !nQgr 8 6???? 6t ????~~|~?>~xof 08?0@'?