hanoi '( towers of hanoi  23658j\,8 comment=5000:check=21004:invalid=9300T$:yesno=9200#:enter=9100#:title=9000(#:intro=7000X:getnoofdiscs=6000p:setup=8000@:setscreen=8100:yourmove=2000:computermove=3000 :domove=4000 Z= main program  dtitle nsetup intro getnoofdiscs setscreen move=0 computergocomputermove computergoyourmove giveindomove finishedgivein240 , comment 66:0:6::0,8;:z$="Towers of Hanoi":v=32000}:5,0;"Would you like to play"'"Towers of Hanoi again ?"'"(Press Y or N)" @yesno:i$="Y" J''"O.k. then"''"Byee...": = now the gosubs  your move 917,0;"Type in your move:-G to give up" R20,0;" ";20,0;"From tower "; ""2020 *i$=:(i$<"A"i$>"C")i$"G"2030 i$="G"givein=1: )"":from=i$-64@:i$;" to tower "; ""2050  7i$=:(i$<"A"i$>"C")i$12 i$"G"2060  i$="G"givein=1: Si$=12 20,11 ;" ";20,11 ;:2020  6to=i$-64@:i$:check:okinvalid:2000 * 3check its valid 4#ok=1:from=took=0: >@n=81-1:c(from,n)=8n:ok=0: Hfsize=c(from,n):fpos=n RXn=81-1:c(to,n)8tsize=c(to,n):tpos=n+1:2150f \ n:tsize=0:tpos=1 f)tsize"7"6050 .1}L,18:noofdiscs=i$:16,5;noofdiscs;" Discs":computergochange12=0:change23=0:noofdiscs/2=(noofdiscs/2)change23=1  enter: X[:5,0;"Do you want instructions ?"'"(Press Y or N)":yesno:i$="N" bT5:0:5::0,9 ;:z$="Instructions":v=32000}: l5,0;"In this ancient Chinese puzzle you start with a given number ofdiscs (between 2 and 7) on the left of three towers."''"The object of the game is to move all of the discs onto the right hand tower with the"'"largest at the bottom and the smallest at the top." v@enter::0,9 ;:z$="Instructions":v=32000}: 5,0;"You are not allowed to move a"'"larger disc on top of a smaller one and the computer will not"'"let you do this." 10 ,0;"The towers are labelled tower A tower B and tower C."'"To make a move just type in"'"which tower you want to move a disc from and which tower you"'"want to move it to."  enter: > ? set up @ec$(8,9 ):c(3,8):n=18:m=13:c(m,n)=8:m:n Jc$(1)=" " Tc$(2)=" " ^c$(3)=" " hc$(4)="" rc$(5)="" |c$(6)="" c$(7)="" c$(8)=" " >finished=0:givein=0:.1}L,32 :enter: set screen 7:1:7::z$="Towers of Hanoi":0,8;:v=32000}:14,1;"";15,6;"A";16;"B";26;"C" zn=18:m=13:14-n,10 *m-4;"":m:n:5,6;" " \n=1noofdiscs:13 -n,2;2;c$(8-n):c(1,n)=8-n:n  &n=18:m=13:c(m,n);" ";:m::n #' #(|2:7:2::5,8;:Z$="Towers of Hanoi":v=32000}:16,9 ;" Scisoft 1983": #;#1;1,4;"Press ENTER to continue";: #""9110# #13 9120# #.1}L,12 :"": # yesno #""9200# #!i$=:i$"Y"i$"N"9210# $ $S invalid $Tf#1;0,0;" INVALID MOVE PLEASE TRY AGAIN " $^.5,0:5: '31999|:7:1:0:0:0:0:7::5,5;1;"STILL LOADING";7,5;"LEAVE TAPE RUNNING":"":"": 'R"hanoi"9998':"hanoi"32000},200:"hanoi""a",22*8 ommenhec4nvaliT$esn#nte#itl(#ntrXetnoofdiscpetu@etscreeourmovomputermov omovZTowers of HanoivM } @@inisheiveihanoi }Ԁ3*K\~Z`  #~( #^#V#}P:\G>!2}:\G>2}#N#F#x~f}# x o&)))<:}O:}G y >2}xg'''''o@w$<By P.W.Cookehanoi XԀ??UUUUUUUժժUUUBfZBBBBbRJFB