abacus - / "11","10";"Please wait":23613=\+256*23614>\,0:23613=\+1+256*23614>\,0:"gr""a": ROSE SOFTWARE 1983 623730\+256*23731\=65367W"p" Qu="0":wr="0":o$=" ":w$="_______________________________" "4":ڰ"6":ٰ"2"::"5","1";" ";"6","1";" ":"16","134":"0","35",.2~L:40(,134:-24,35#,.3 "700":"5","26";" ";"6","26";" ":216,134:24,35#,-.3:240,134:0,35#,-.2~L "700":ٰ"9":96`,160:557,0:96`,135:557,0:1;2,12 ;" ";3,12 ;" Hello ";4,12 ;" " "700":"10","0";:i="0"̰"95":" ";:i:n=8:400:9 :1;11 ,6;" What is your name? ":700:b$="" !c$=:c$=13 "60" $c$=12 "50" % b$=b$+c$ 'D"16","15"-(b$/2);b$:b$>"10"b$=b$(10 ):"60" (c$="""33" 0 װ".05","4":װ".1","6":"33" 2b$="""33" 5/b$=b$(̱b$-1):װ".1","20":װ".1","40" 8("16","10";" ":"39" <n$=b$:b$="""33" ?L"16","10";" ":"800":i="1"̰"99":i:ڰ"7":"7":: Pj=02828:i=1204:4:i+1,1+j;"";i+2,1+j;"":16+j*8,167-i*8:0:-1,4,.1}L:i:j S7,8;" ";8,8;" Adding up to: ";9 ,8;" ":64@,120x:119w,0:64@,95_:119w,0 V"1","8";" ";"2","8";" Please choose ";"3","8";" ":64@,168:119w,0:64@,143:119w,0 Yڰ"6":i="1"̰"2":"14",13 *i-8;" ";17,13 *i-8;" ";15,13 *i-8;" ";i;". ";("less "i=1);("more "i=2);16,13 *i-8;" than 10 ":i \i="1"̰"2":8*(13 *i-8),64@:71G,0:8*(13 *i-8),31:71G,0:i _J"72","64":"54","30":"54","-30":"20","8";" Press 1 or 2 " bl$=:l$="""98" dl$"1"l$"2""98" ji=021:4;i,5;o$;i,8;o$:i:7;8,7;" Shall I do the ";9 ,7;" first one for you ";12 ,15-n$/2;n$;"?";14,12 ;" y or n " k9"40","175":"0","-175":"217","175":"0","-175" m q$=:"109"+(q$="y")+(q$="n") ptch=1+2*(q$="n") ]"7":ڰ"7"::a=(*9 )+1:b=(*9 )+1:l$="1"a+b>9 130 'l$="1"a>5b>5130 l$="2"a+b<10 130 $ٰ"5":"4","0";w$;"10","0";w$ j=12*a2:٥*6:i=28j-1:4,i;"";:5;"_";:5,i;" ":5-a/2:i:.04|# =,6:.02{# =,10 :.04|# =,20:j 950:j=12*b2:٥*6:i=28j-1:10 ,i;"";:5;"_";:11 ,i;" ":5-b/2:i:.06|u\,20:.04|# =,40(:j l="1"̰"1"+(a+b>9 ) z"740":"17","5"-2*(l=2a+b>9 );"How many";(" tens"(l=1a+b>9 ));(" ones"l=2);"?" tchɰ"1"wr<"2""300" "7","0";o$;"8","0";o$;ٰ"9";۰"1";"0","0";" I will do this one for you ";1,15-n$/2;" ";n$;" ":200 i=12*a2:6,i-2;" ";7,i-2;" ";6,i;"^";7;1;7,i;(i+1)/2:.05|L,i:.05|L,i+10 :100d:i:6,i-2;" ";7,i-2;" " i=12*b2:12 ,i-2;" ";13 ,i-2;" ";12 ,i;"^";7;1;13 ,i;a+(i+1)/2:.05|L,i:.05|L,i-10 :100d:i ("950":"0","0";o$;o$;"1","9";o$ "720":a+b<"10""206" t$="1":"730":"9000" 9t$=(a+b-(10 a+b>9 )):750:9000(# tch="1"tch="3":"130" "333" 2t$=:t$=""3062 5&t$<480ůt$>5793062 6%tch=3tch=0:720 8#a+b<10 l=2360h ;730:t$="1"330J D760:157 J.770:l::u=u+(wr=0):1000 M3::tch=3:wr=0:i=01818:n=ii+22:400:n:i:9 ;10 ,8;" More?  y or n " NU0:64@,96`:120x,0:64@,87W:120x,0 Pq$=:q$=""336P Sq$"y"q$"n"336P Vq$="y"130 \348\:"2","3","2","3","2","10","2","10","1","12","1","14","1","15","1","12","4","10","2","8","2","8","2","7","2","7","2","5","2","5","4","3" _9i=116:e$:f$:װe$/6,f$:i:6 h8750:t$=(a+b-(10 a+b>9 ))330J k 324D Yj=0302:1+*2:n,j;"":4:n+1,j;"":j: Nk=13:.1}L,3:.1}L,4:.2~L,6:k: Њi=020:6;i,20;" ":i:249,175:0,-168:-88X,0:0,168 Zi=020:6;3;i,23;(""a+b>9 );i,28;"":i: s740:17,2+(t$="1");"There ";("are "t$>"1");("is "t$="1");t$;" ten";("s"t$>"1");("?"t$"1") ^1;7;0,21;"Tens";0,26;"Ones":n=22:780 : i=1520:i,1;" ":i:0:8,568:144,0:0,-480:-144,0:0,480: 740:17,2+2*(a+b<10 );"There ";("are "t$"1");("is "t$="1");t$;(" one"a+b>9 );("s"a+b>9 t$"1");("?"t$((a+b-(10 a+b>9 )))) 7n=27:780 :t$="0"i=1200:i <1;7;0,26;("Ones"a+b>9 ): wr=wr+1:740:15,9 ;"X";16,7;"wrong";1;19,9 -n$/2;n$;17,5;("Try again"wr<2) =.5,-10 :1.5@,-20:75K:75K i=1-(a+b<9 )20:2;6;i,21+5*(a+b<10 l=2);" ":i:a+b<9 6;0,28;" "  j740:15,9 ;"";1;16,5;"well done";18,9 -n$/2;n$ a.2~L,2:.2~L,2:.2~L,4:.5,9 :9000(#:740:  j=1820-2*t$-2:٥*4:i=2j:6;i-1,n;2;" ":6;i,n;"";i+1,n;"":7:i:l$="1"1;7;i,n+3;10 -j/2 R.02{# =,6:.02{# =,0:.02{# =,6:.04|# =,30:j:  <l1=17:i=1̱b$:p1=i:a$=b$(i):900:i: Uadd=8*a$+236066\+256*236077\:n=07:ad=(n+add) =m=07:ad>127918:ad=ad-128 ad=ad+ad:m:n: 24*(5-.5*b$)+p1*24+m*3-20,(21-l1)*8-n*3:-2,0:0,2:2,0:0,-2: 1:32 ,119w:0,-15:33!,119w:0,-15:24,112p:16,0:24,111o:16,0:  #(M9 :1;21,17;" Press any key ":9000(#+("") #+21,13 ;o$: `_M d?cabuE4F3NmnbvcxzAzL2T3QO W_______________________________CBgr X 9??4k>?$?ՕՕ"  @@>A5u<0u=0 Hy=0u:1100L+100d*y:y:9000(#:7:3: L7:4: R:5:0,0;:i=1320@:" ";:i UA9 ;6;1;1,8;" Build a picture " XGi=9 15:i,9 ;2;6;"":i [i=68:i,11 ;0;"":i:0;6,10 ;"";6,22;"";7,9 ;"";7,22;"";8,8;"";8,22;"" ^"0;5,19;"": 66;3,3;"";4,3;"" Z6:i=02*ͧ/8:32 ,144:20*i,20*i:i: 4,26;4;"";5,26;"";6,26;"";7,26;"";8,26;"" :i=9 13 :2;6;i,28;"":i  Q7:20,0;:i=164@:" ";:i:n=20:400 #qi=352:4;ٺ(*3)+1;13 ,i;"";٥*2+5;14,i;"":i &qi=264:4;ٺ(*3)+1;14,i;"";٥*2+5;15,i;"":i )a4;ٺ(*3)+1;15,4;"";٥*2+5;16,4;"": xw7:0:12 ,14;" ";13 ,14;" ";14,14;" ";15,14;" " {8i=1619:i,29-i;"":i ~Bi=2021:i,28-i;"  ":i: v0:7;9 ,19;"";10 ,19;"";12 ,19;"";13 ,19;"" k7;9 ,11 ;"";10 ,11 ;"";12 ,11 ;"";13 ,11 ;"": @K1600@:"2","12","1","12","1","12","2","9","2","9","2","7","1","7","1","5","2","4","1","4","1","5","2","7","2","0","2","2","2","5","0","0","1","4","1","2","4","0","2","12","1","12","1","12","2","9","2","9","2","7","1","7","1","5","1","4","1","2","1","4","1","5","2","7","2","0","2","2","2","5","0","0","1","4","1","2","4","0" Ci=139':e$:f$:5:4,23;"";3,25;"":װe$/7,f$:4,23;"";3,25;"":i:4,23;"";3,25;"": Wtime N P ROSE SOFTWARE b23613=\+256*23614>\,0:23613=\+1+256*23614>\,0 <ް"0":n$=" ":o$=" " 4wr="0":"5000":u="0":v="0":ind="0":i$="l" z"750":"760":ڰ"7";"6","12";" ROSE";"7","11";"SOFTWARE";۰"1";"14","8";"Telling the time":n="11":"9000" l"750":i="4"̰"16":i,"1";o$:i:"8","144":"239","0":"8","39":"239","0":"5","13";"Menu" "8","5";"1. On the hour only";"9","5";"2. Plus half hours";10 ,5;"3. Plus quarter hours";11 ,5;"4. Any time";14,9 ;1;"Press 1 to 4" %q$=:q$=""q$>"4"q$<"1"21 Nl$=q$:"750":"760":"6","9";"Instructions?";"14","9";"Press y or n" 'q$=:q$=""(q$"y"q$"n")27 q$="n""100" $Lr="0":d=0+6*(l$="2")+3*(l$="3"):1000:700 '!r="0":c="2":l$"4""1100" *&n="0":ڰ"7":590N+10 *l$ d1i$="l":d="0":c="0":r="0":"1000":"700" gDc=(*11 )+1:d=0+((*2)*6l$="2") j l$="3"d=(*4)*3 m!l$="4"d=(*11 )+1 p"130":"166" d="3"d="9"154 d="6""148" d="0""163" &d<"6""8","4";d*5:"160" /d>"6""8","4";60<-d*5:"160" "8","3";"half":"160" "8","2";"quarter" 4"10","3";("past "d<7);(" to "d>6) 12 ,4-4*(d=0)-(d=0c<10 );c+(d>6);(" o'clock"d=0);15,0;"(or ";c;".";("0"d<2);5*d;")"  5r="1":d1=d:c1=c:d="0":c="0":d1="0"i$="s" (q=(*3)+4:p=q168 0,32 :80P,0:q-(i$="s");18,0;" To move: ";19,0;" Press:- ";20,0;(" l=long "i$="l");20,0;(" s=short "i$="s");21,0;" ENTER=end" q-(i$="s");0,0;n$;1,0;" Move the ";2,0;n$;3,0;(" long"i$="l");("short"i$="s");" hand";4,0;n$;5,0;" now ";6,0;n$:0,120x:80P,0 +q$=:q$=""q$i$Ưq$13 172 װ".1","6":q$="13""230" &i$="l"d=d+1:d="12"d="0" i$="l""1021":"172" &i$="s"c=c+1:c="12"c="0" i$="s""1100":"172" i$="s""260" i$="s":""233 d="0"r="0" *d2=d:ind=1-(d=0):169 i="0"̰"6":q;i,0;n$;i+15,0;n$:i:0,119w:80P,0:0,568:80P,0 c=c1d=d1300, 8"0","175":"80","-56":"80","175":"-80","-56"  :dd1q;15,1;"Long":n=15:550&  ;cc1q;18,0;"Short":n=18:550& qn=0:v=v+1:.5,-10 :1.5@,-20:9000(#:d=d1:c=c1:d=1ind=1 ^wr=1:r=0:1000:r=0:ind=0:1100L:700:wr=0 H3,1;"This is";17,4;"":130:350^ ,q;3,4;"";17,0;1;"Well done":u=u+1:.2~L,2:.2~L,2:.2~L,4:.2~L,4:.5,9 ^n=0:9000(#:750:760:6,6;" Correct: ";u;7,6;"X Incorrect: ";v;14,9 ;"More? y or n" d&q$=:q$=""q$"y"q$"n"356d fq$="y"100d n366n:"1","6","1","7","1","9","1","9","1","11","1","13","5","14","1","6","2","6","1","9","1","9","1","11","1","13","5","14" q9i=114:q$:r$:װq$/5,r$:i:6 &6q;n,6;"hand";n+1,0;"is wrong": X690:1,5;"long";7,1;"straight";9 ,1;"up";13 ,1;"So it is";15,1;"something";17,1;"o'clock":9000(# [700:690:1,5;"short";7,1;"to the ";c;13 ,1;"So it is";15,1;c;" o'clock";17,1;"or ";c;".00":9000(#: b690:1,5;"long";7,1;"to the 6";12 ,1;"So it is";14,1;"half past";16,1;"something":9000(# e700:690:1,5;"short";7,1;"just past";9 ,1;"the ";c;12 ,1;"So it is";14,1;"half";16,1;"past ";c;18,1;"or ";c;".30":9000(#: l680:670 rQr=0:d=9 :1000:r=0:1100L:680:670: v1,1;"The long";3,1;"hand";5,1;"takes";7,1;"5 minutes";9 ,1;"to move";11 ,1;"from the";13 ,1;"12 to";15,1;"the 1":i=1400:i:r=1:d=1:1021:9000(# |"c=12 :661:c=2 0r=0:d=11 :1000:660: r=0:1100L 700:690:1,5;"long";7,1;"to the ";d;12 ,1;"So it is";14,1;5*dd<6;:d>614,1;60<-5*d; }(" past "d<6);(" to "d>6);c+(d>6);16,1;"or ";c;".";("0"d=1);d*5:9000(#: d700:690:1,5;"short";7,1;"just";9 ,1;("past"d=3);("before"d=9 );11 ,1;"the ";c+(d=9 );13 ,1;"So it is";15,1;"quarter";17,1;("past "d=3);("to "d=9 );c+(d=9 );19,1;"or ";c;".";(d/2);"5":9000(#: 700:690:1,5;"long";7,1;"to the ";d;11 ,1;"So it is";13 ,1;"quarter";15,1;("to"d=9 );("past"d=3);17,1;"something":9000(#: Q1,1;"The";3,1;"hand is";5,1;"pointing": h7:i=021:i,0;n$:i:0:80P,0:0,175:9 : o9 :ں(*4)+3:(*3)::7:i=021:i,0;"*";i,31;"*":i 9i=130:0,i;"*";21,i;"*":i: qi=58:i,1;o$:i:8,136:239,0:8,103g:239,0 si=13 15:i,1;o$:i:8,72H:239,0:8,47/:239,0: (*3):p=(*3)+4:p::168,88X,83S:168,88X,84T:168,88X,2:168,88X,3 7:1,20;"12";2,25;"1";6,29;"2";11 ,30;"3";15,29;"4";19,25;"5";20,21;"6" t19,16;"7";15,12 ;"8";11 ,11 ;"9";6,12 ;"10";3,15;"11" i=(3-d)*/6 Gi*64@+168,i*64@+88X:-60<*i,-60<*i  sj=i+/6:r=11:j*64@+168,j*64@+88X:-60<*j,-60<*j:0 >d=1wr=0168,132:0,-40(  r=1: Li=(3-c)*/6 O(i-d*/72H)*44,+168,(i-d*/72H)*44,+88X:-40(*(i-d*/72H),-40(*(i-d*/72H) P`ind=1ind=0:1:168,132:0,-40(:0:1109U Q/(d=0c=1)wr=1:1109U Rj=i+/6:r=11:(j-d*/72H)*44,+168,(j-d*/72H)*44,+88X:-40(*(j-d*/72H),-40(*(j-d*/72H):0 U r=1: #"1","2","2","4","36","24","8","0" 45000:i=07:q$:"a"+i,q$:i: o #(<0;20,n;" Press ";21,n;" any key " #+9003+#+("") #. uvnn N O Q0IlHshopping **,S"31871":"9","9";" Please wait ":"gr""31872":"8000":ROSE SOFTWARE 1983 *b$("6","2"):i="1"̰"6":b$(i)="0":i lm$=" ":n$=" ":o$=" ":u="0":v="0" 5"yacht","guitar","ball","flower","aeroplane","kite" n="16":ڰ"7":"1"::"700" $"6","12";"Shopping";"12","8";" ROSE SOFTWARE":"88","136":"80","0":"0","-24":"-80","0":"0","24":۰"1":"9000":۰"0" ':"700":ڰ"6";"4","13";" Menu ";ڰ"7";"8","3";"1. Paying the exact amount";"11","3";"2. Working out change":ڰ"6":"750":ڰ"7":l$=q$ dJq("8"):"1000":ڰ"6";"0","0";o$;o$;o$;o$:"0","144":"255","0" gMp=(*"110")+"10":h=(*"8"):l$="2"(p="100"p="50"p="20")"103" jl$="2""450" mKڰ"6";"1","4";"Choose the least number";"2","7";"of coins to buy:-" v)s=(*"6")+"1":"7":i="1"s:a$:i y2ڰ"7":"5","2";a$:"2010"+"10"*s:ٰ"9":ڰ"7" O"8000":p>"99""6","2";"`1.";("0"p-"100"<"10");p-"100";(""h="0") )p<"100""6","4";p;(""h="0");"p" n="4":"660" f"5","22";"Press key";"7","23";"1 to 8";"10","22";"r=rub out";"13","22";"ENTER=end":ڰ"7" l="1"̰"8" q$=:q$="""152" װ".1","6":q$="13""350" q$="r""300" q$<"1"q$>"8""152" wq(l)="100"*(q$="1")+"50"*(q$="2")+"20"*(q$="3")+"10"*(q$="4")+"5"*(q$="5")+"2"*(q$="6")+(q$="7")+".5"*(q$="8") l+"5","15"-"3"*(q$="1")+(q$="8")+(q$>"4");("`1.00"q$="1");("50"q$="2");("20"q$="3");("10"q$="4");("5"q$="5");("2"q$="6");("1"q$="7");(""q$="8");(" "q$"1"q$"8");("p"q$>"1") """178" l:"350" ,l=l-"1":l<"1"l="1" /$q(l)="0":l+"5","12";" " 2"""306" 5"152" ^!c=l:l$="1"p=p+".5"*(h="0") al$="2"p=m-p-".5"*(h="0") d;n="5":"660":ڰ"7":p1="0":i="1"̰"8":p1=p1+q(i):i g"670" td="0":"600":p=p3 wp=p1c=ll+"5","19";"";۰"1";"8","24";" Well ";"10","24";" done ":װ".2","2":װ".2","2":װ".2","4":װ".2","4":װ".5","9":b$(s)=(b$(s)+"1"):u=u+"1":"403" zvc+"5","19";"X":װ".5","-10":װ"1.5","-20":v=v+"1":ڰ"5":"4","21";" Should be:":"168","144":"0","-8" }d="1":"600" p="0":p1=p3:"670":" " <i="16"̰"21":ڰ"6";i,"0";o$:i:n="18":ڰ"7":"9000" h:"700":i="7"̰"15":ڰ"5";i,"2";m$:i:"3","9";" Correct: ";u;"5","9";"X Incorrect: ";v 5"16","120":"223","0":"16","48":"223","0" u>"0"ڰ"5":"8","4";"So far you have bought:-":j="3":n="11":"7":i="1"̰"6":a$:b$(i)"0 "n,j;a$;":";n,j+"10";b$(i):n=n+"1" n="14"j="17":n="11" 'i:"17","9";ڰ"7";" More? y or n " #q$=:q$=""q$"y"q$"n""418" q$="y""100" "424":"14","3","14","1","11","3","14","1","13","3","16","1","9","4","14","3","14","1","11","3","14","1","13","4","9","4","7","3","6","1","7","3","9","1","11","3","13","1","14","4","11","4","4","3","7","1","6","4","2","4" .i="1"̰"25":q$:r$:װr$/"13",q$:i:"4" ji=(*"4"):m="20"*(i="0")+"50"*(i="1")+"100"*(i="2")+"200"*(i="3"):m"50"" `";("2"m="200");("1"m="100");".00 "; m<"100"" ";m;"p "; ڰ"6";" is:-":"118" Xp3=p:l="1"̰"8" [9pȰ"100"p=p-"100":l+"5","22";("`1.00"d="1"):l ^6pȰ"50"p=p-"50":l+"5","25";("50 p"d="1"):l a6pȰ"20"p=p-"20":l+"5","25";("20 p"d="1"):l d6pȰ"10"p=p-"10":l+"5","25";("10 p"d="1"):l g3pȰ"5"p=p-"5":l+"5","26";("5 p"d="1"):l j3pȰ"2"p=p-"2":l+"5","26";("2 p"d="1"):l m3pȰ"1"p=p-"1":l+"5","26";("1 p"d="1"):l p9p>".4"p<".6"l+"5","27";("p"d="1"):p="0":l s ?i="4"̰"14":n:i,"21";n$:i:"168","144":"0","-88": "96"+"24"*(p1<"100")+"4"*(p1<"10")+"80"*(p="0"),("17"-l)*"8":"56"-"24"*(p1<"100")-"16"*(p1-p1="0"),"0":p1<"100""685" 7p2=(p1)/"100":l+"5","12"+"10"*(p="0");"`";p2; %p2*"100"-p1="0"".00";:"688" )(((p1)/"10"))*"10"-p1="0""0"; "688" 6l+"5","15"+(p1<"10")+"10"*(p="0");(p1+".1"); M(""(p1-(p1+".1")ɰ"0"));l+"5","18"+"10"*(p="0");("p"p1<"100");: Oi="0"̰"31":ٺ(*"6");"0",i;"";"1",i;"";"21",i;"";"20",i;"":i :i="2"̰"19":ٺ(*"6");i,"0";"";i,"30";"":i: ""17","7";" Press key 1 to 2 " #q$=:q$=""q$<"1"q$>"2""756"  P(*"4"):ڰ"7"::ڰ"6":i="15"̰"21":i,"0";o$:i:"0","55":"255","0" %ذ"16","32","12":"17","1";"`1" 1"51","48":n="1":"1090":"17","5";"50p" C"88","44":n=".8":"1090":"17","10";"20";"18","11";"p" *ذ"123","32","15":"17","14";"10p" 'ذ"158","32","13":"17","19";"5p" )ذ"188","32","13.9":"17","23";"2p" )ذ"216","32","11.5":"17","26";"1p" 9ذ"243","32","10":"17","30";"";"18","30";"p" "21","1";"1";"21","6";"2";"21","10";"3";"21","15";"4";"21","19";"5";"21","23";"6";"21","27";"7";"21","30";"8": Bzn*"13","-8"*n:n*"3","-12"*n:"-9"*n,"-12"*n:"-14"*n,"0":"-9"*n,"12"*n:"3"*n,"12"*n:"13"*n,"8"*n:  "23675","0":"23676","127":ٰ"1":"12","1";"";"13","2";"":0;"8","5";"";"9","5";"";"10","5";"";"11","5";"";"12","5";"":ٺ(*"3")+"1";"8","4";"";"9","3";"";"10","3";"";"11","2";"";"12","2";"" h(*"4")+"1";"8","6";"";"9","6";"";"10","6";"";"11","6";"";"12","6";"": "23675","136":"23676","126":i=(*"4")+2:i;"9","2";"";"10","1";"";"11","2";"";i;ٰ"0";"10","2";"";ڰ"7";"": "23675","32":"23676","125":i=(*"2")+1:i;"8","3";"";"9","3";"";"10","3";"";"11","3";"";"12","3";"";"13","3";"":i:ٺ(*"2")+"5":"8","5";"";"9","4";"";"10","4";"";"11","4";"";"12","4";"";"13","5";"" i=(*"2")+"3":i;"8","6";"";"9","7";"";"10","7";"";"11","7";"";"12","7";"";"13","6";"";i;7;"";"12","8";"";"11","8";"";"10","8";"";"9","8";"";"8","7";"": "23675","144":"23676","127":ٰ"4";"10","5";"";"11","4";"";"12","5";"";ٰ"5";"9","6";"";ٺ(*"3")+1;"8","6";"";"9","5";"";"9","7";"";"10","6";"";0;"13","5";"":  "23675","224":"23676","125":(*"2")+"2";"8","1";" ";"9","1";"";"10","1";" ";:ٺ(*"2"):"";"11","5";"";:"23675","192":"";"12","4";"": "23675","152":"23676","124":i=(*"3")+"3":j=(*"2")+"1":j;"8","4";"";"9","3";"";"10","5";"";"11","5";"";"12","5";"";i;"8","5";"";"9","5";"";"10","3";"";"11","3";"";"12","4";"" j;"11","8";"";"10","7";"";"12","7";"";ٺ(*"3")+"1";"";ٺ(*"3")+"1";"12","6";"";ٺ(*"3")+"1";"11","7";"";ٺ(*"3")+"1";"10","8";"": @023675{\,128:23676|\,124|: #(n,"8";" Press any key " #+"9003"+("") #.װ".1","8": gr | ɂG $?????!b0 !b.t2(h.,H`????????~????~???!!w"D?0p???????<<~~~~<<~~~~<xx @<~~~~<<@ h<.,~~~snakes /123613=\+256*23614>\,0:23613=\+1+256*23614>\,0:ٰ"6":ڰ"6"::16,10 ;0;"PLEASE WAIT":"sc" o$=" ":1680  1800 0:0:3,6;7;" SNAKES AND LADDERS ":47/,143:161,0:45-,141:165,0:17,8;5;" PRESS ANY KEY ":25+("")  6::8:1800 (6:0:3,6;7;" SNAKES AND LADDERS ":47/,143:161,0:45-,141:165,0:18,8;5;" PRESS ANY KEY " 25,9 ;7;" INSTRUCTIONS ";6;9 ,3;"I'll throw the die and you";10 ,3;"have to add that number to";11 ,3;"your number on the snakes";12 ,3;"and ladders board.";14,3;"GOOD LUCK!" <60<+(="") =61=+("") 5wd=0:rd=0:1:7:0: 8:8 1f=020:f,20;1;" ":f 821,0;1;1;o$+o$+" " b$="0001020304141312111020212223243433323130404142434454535251506061626364":a$="3029201910 9 03128211811 8 13227221712 7 23326231613 6 33425241514 5 4" l=5:f=04:g=06:l=9 -l:g*3,f*4;l;" ";1+g*3,f*4;" ";a$((f*7+g)*2+1(f*7+g)*2+2);" ";2+g*3,f*4;" ":g:f $px=0:py=0:pn=0 ](6-px)*3+1,py*4+1;1;" ":pn=34"1695 1600@:1625Y d=ians=ans:14,21;("***********"d=1);(" The answer"d=0);15,21;("*WELL DONE*"d=1);(" should be"d=0);16,21;("***********"d=1);16,25;((ans)d=0) &wd=wd+(d=0):rd=rd+(d=1)  /pnt=pn:f=pnians-(ians-pn)ͼ(ians-pn)+((ians-pn)=0):pnt=pnt+(ians-pn):pxt=b$(pnt*2+1):pyt=b$(pnt*2+2):(6-pxt)*3+1,pyt*4+1;1;" ";:.07}\(,pnt:.15~,pnt*1.43333:13 :8;8;1;" ":f  d=01:pyt*32 ,pxt*24+8:32 ,23:pyt*32 ,(pxt+1)*24+7:32 ,-23:0  u(6-b$(ans*2+1))*3+1,b$(ans*2+2)*4+1;1;1;" " ~19,21;7;1;" Press ";18,21;o$;20,21;" any key ":1550+(="") 1551+("") v19,21;0;7;o$(11 );20,21;o$(11 );18,21;o$(11 ) .14~\(,15:7;9 ,21;o$;11 ,24;" ";14,21;o$;15,21;o$;16,21;o$ n(6-px)*3+1,py*4+1;1;" ":pn=pn+((pnt-pn)*d):px=b$(pn*2+1):py=b$(pn*2+2):1670+(d*5)+((px-1+d+d=7)*15):px=px-1+d+d:px=px+(px=-1)-(px=7):pn=a$(((6-px)+py*7)*2+1((6-px)+py*7)*2+2) u(6-b$(ans*2+1))*3+1,b$(ans*2+2)*4+1;0;1;" "  1535 @00,23;"THE DIE":x=18 A=k=(*6)+1:x=8k+pn>34"1601A E+.08}# =,f+15:.1}L,k+10 J?f=17:1;5;f,23;" ":f O2,24;("*"k>2);2,28;("*"k>3);4,24;("*"(k=6k=2));4,26;("*"k2*(k/2));4,28;("*"(k=6k=2));6,24;("*"k>3);6,28;("*"k>2) T#x:0,23;" ": YA9 ,22;0;6;pn;" + ";k;" = ?":ans=pn+k ^21:5:11 ,25;" ":d$="" c!f=11+(ans>9 ) h!c$=:c$>"9"c$<"0"1640h m^.15~,30:10 :11 ,25;(11 ,26):11 ,26;c$ r d$=d$+c$:f w7:0:8:8:13 ,24;"O.K.?":0:1655w+(="n")*5+6*(="y")+6*(=13 ) |913 ,21;o$:0.15~,-15:1630^ ~13 ,21;o$:.02{# =,30:.04|# =,32 :ians=d$:ians>34"+((ans>34")*6).2~L,-10 :1630^  6(6-px)*3+2,py*4+1;"";(6-px)*3+3,py*4+1;"":f=250-.5:.08}# =,f:f:.2~L,-2:1:pyt*32 ,pxt*24+8:32 ,23:pyt*32 ,(pxt+1)*24+7:32 ,-23:0 n(6-px)*3+2,py*4+1;" ";(6-px)*3+3,py*4+1;" ": py*32 +12 ,px*24+24:0,14:py*32 +20,px*24+24:0,14:py*32 +13 ,px*24+28:6,0:py*32 +13 ,px*24+36$:6,0:f=1530:.12}u[,f:f 1:py*32 +12 ,px*24+24:0,14:py*32 +20,px*24+24:0,14:py*32 +13 ,px*24+28:6,0:py*32 +13 ,px*24+36$:6,0:0: 1680:62>,111o,127,60<,0,0,0,3,0,252,254,6,2,28,224,0,4,4,8,8,4,2,1,1:f="a""a"+23:z:f,z:f:  !6::8: 1800 0:7:4,9 ;"**************";5,9 ;"* *";6,9 ;"* WELL DONE *";7,9 ;"* *";8,9 ;"**************" 12 ,2;" You've made it to the top. ":mark=(100d*rd/(rd+wd)):15,7;" Your mark : ";(" "mark<100d);(" "mark<10 );mark;"%"  1721 819,8;" PRESS ANY KEY ":1710+(="") 1715+("")  :30 1725:2,7,1,7,2,7,1,7,2,12 ,1,12 ,2,12 ,1,12 ,2,14,1,14,2,14,1,14,3,16,3,12 ,2,7,1,7,2,7,1,7,2,9 ,1,9 ,2,9 ,1,9 ,2,7,1,5,2,4,1,2,3,0,3,0:f=128:rr,ss rr/7,ss:f: .4:0:f=2182:f,0;"";f,30;"";f+1,0;" ";f+1,30;" ":f:0,0;" ";20,0;" "   zl" @kn"an"dn"xyarKO C4D34BF0001020304141312111020212223243433323130404142434454535251506061626364AF3029201910 9 03128211811 8 13227221712 7 23326231613 6 33425241514 5 4sc @p'_T+`e|cH,Tx8;nCwY@J` -#Zw*O5L`1Vs0P6 3H GO(`btMyff/$  (|d)$cz|_JeR'RURҵiKUUUTJS3s%IRL33O$#04 GO(*IA_*UR)JUeU.USRIHЅQT 3yNH6Ķ0PRg_|dURR|%*U*U>>U*UE$?yUg15F0ZOT풕5JT*V5JT*VT좕w*-!bZ` U$6yQU*ʦU>>URҪUJRt%JUR7}_$si@MyqC;oEIЅIReUnUSRURIRU*H`_*Tx8L ,aIRgse)RUUU)JVTeR7'S)$1>cJS`j|#OTpJR *RR$,ߊt  |@~<<~B<>B@@B@@BBB@|B<|BB|@@~@B~@@@BB@ZB@~~B<~$B>222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222666666666666222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222222000000000000000000000000000000008888888888888888888888888888888888888888888888888888888888888888@