?@ΐ‘ ΄ COUNΤPOLE¨COUNT¨SOURCE¨DEST¨SPARE¨SOURCΕDESΤSPARΕΑΒΓLEVEΜΔΕLOOΠ@A AκAA&AD@@ @ @ @ @@@&&***** THE TOWERS OF HANOI *****›&&******* by GREGG HESLING *******›q +A1A @C@‚O(COUNT S€q€ @)€!@@ KKRAM is not a problem in this program, so we indiscriminantly waste it› D,9@<@,‚9€,ƒ9€,„9€,…9€,>AR@D(}PPAssign the poles temporary labels and tell how many discs are on each pole›f6†-6‡-@'6ˆ-@868†<,-€O68‡<,-f68ˆ<,-11Make the poles and put the discs on pole #1›m‰-@@!#-@‰=(™ ™ ™A ‰m('                                       |‰-@€&68†<‰,-€&‰%@96Š-‰&P:‰'@,V6‹-+‰'@"P:‰'@,,n-@&Š‰&€%@!x @€| ‰[ @€"@# @P- @@[Move the top disc and don't save the labels›!D-@  (SAVING)6‚8Œ,-€26ƒ8Œ,-†;6„8Œ,-‡D6…8Œ,-ˆ#CCSave the current labels, then switch the DEST and SPARE poles›%; 6‰-‡6‡-ˆ6ˆ-‰#6€-€&@16Œ-Œ%@; @0(?6Œ-Œ&@Œ /-@ <(COMPLETE?+Q-@ #( RESTORING,6€-‚8Œ,56†-ƒ8Œ,>6‡-„8Œ,G6ˆ-…8Œ,Q @-aaRestore the previous labels, move the top disc to the DEST pole, and swap SOURCE with SPARE›/W @P-@ -( SWITCHING;6€-€&@A6‰-†G6†-ˆM6ˆ-‰W @01 Move disc to top of screen›2h6‰-8†<,-68†<,-‰&@86Š-8†<‰,U6‹-+Š'@"P:Š'@,,h6Š-Š&P:Š'@,7g-‰@ 1-†$@%@&Š@!&; @€Y-†$@%@@"&c @…g ;##Move disc from SOURCE to DEST›<R-@0‰-@O:‡&†,$@N(>:AT%++‡&†,!,,R ‰F“6‰-8‡<,%@-68‡<,-‰J68‡<‰,-Š$@%‹&@i-@!‰%@6@‰-‡$@%@&Š@#&“ @€JLower disc down to DEST›K2!-‡$@%@@"&+ @…/ 2$OPrint disc›PW(>:@2%A!$‹,1Ž-@Š$@8( < ŽT(>:@2&@$‹,W$TErase disc›UVS( >:@2%A!$+ @,,>:@2&@$+ @,, V$Zm-&(COUNT=€ 8-@C(LEVEL=GŒ[-@$%Œm(Œ&@ ]|-@$†%@@#+(SOURCEG-@$‡%@@#T( DEST p-@$ˆ%@@#|(SPARE ad-@A --@ ;( >$dTo speed things up, change 100 to 1›€ D:HANOI.BAS