@p}?Kp!6X'D:\6=12345@W P P P 88 MNMZ Z 8 !}v>>BB<DHpHDB@~BfZBBBBbRJFB8 DxDD x|D8DDxDD"xTx>?30 ?0 ? ?30 3 0 aDD @D@@Bx@@@@D@BD DD(DDB D@"@D T D@DD @@DDD@D D"@T@ 0 0 30 3 ?30 3 0 axx8$TUERME VON HANOI# # <@2}LM8op\\\b\ppbeqppp\iuX![!PP!!98} K SR PDIE TUERME VON HANOI  1983 by OMEGA-SOFT 236099\,502 $a$(10 ,10 ):i(10 ) 7:7:0 .a$(1)=" ":i(1)=1 .a$(2)=" ":i(2)=2 .a$(3)=" ":i(3)=3 (.a$(4)=" ":i(4)=4 2.a$(5)=" ":i(5)=5 <.a$(6)="  ":i(6)=6 F.a$(7)="  ":i(7)=1 P.a$(8)="  ":i(8)=2 Z.a$(9 )="":i(9 )=3 d1a$(10 )=" ":i(10 )=7 n 300, ..1}L,1:j=9 1-1 4e=h$(1,j)-480:e=-16e=10 4d=h$(2,j)-480:d=-16d=10 4g=h$(3,j)-480:g=-16g=10 y=14-j Hy,0;i(e);a$(e);y,11 ;i(d);a$(d);y,22;i(g);a$(g) j 0  6 :_xs=2:ys=3:r=0:t=0:cs=6.6S333:d$="TUERME VON HANOI":9996 ' @1:5,0;"Das Ziel dieses Spieles ist es, eine Anzahl von Scheiben zwi- schen drei Positionen zu bewe- gen, nach folgenden Regeln:" J>'''"1. Du kannst immer nur eine Scheibe bewegen." Kh''"2. Eine Scheibe kann nur auf eine groessere Scheibe gesetzt werden." Li=1100d:i M<21,0;" Druecke eine Taste.":5000 N:9996 ' P82:5,0;"Wieviele Scheiben ? (1-9)?" Q<p$:p$1p$(1)<"1"p$(1)>"9"337Q RJn=p$-480:1;11 ;1;n;" Scheibe"+("n"n>1) SE'"Wo soll der Turm beginnen,"'"(Position 1, 2 oder 3)?" T0p$:p$(1)<"1"p$(1)>"3"340T U;s=p$-480:1;11 ;1;"Position ";s VJ'"Wo soll der Turm aufhoeren, (Position 1, 2 oder 3)?" W0p$:p$(1)<"1"p$(1)>"3"343W X f=p$-480:f=s343W Y+1;11 ;1;"Position ";f [''"Druecke ~C~ wenn der Computer"'"anfangen soll. Wenn Du selbst beginnen willst, druecke ir- gendeine andere Taste." ^0p$:p$(1)="c"p$(1)="C"400 c 5000 Nb(3):z$(10 ):k(3):h$(3,9 ):k(s)=n:x=1  c=1n h$(s,c)=(n+1-c) c :r=0:9996 '  150  1000  150 T17,5;1;"Fertig in ";2^n-1;" Zuegen"+(""n>1) _20,5;"Druecke N fuer nochmal oder":" S fuer STOP" ="n"Ŧ="N"300, "S"Ʀ"s"470 1:r=70F:d$="AUF WIEDERSEHEN!":9996 '   n<1 Gz$(x)=(3*s-3+f):f=6-s-f:x=x+1:n=n-1  1000  x=x-1 s=((z$(x)+2)/3) $/f=z$(x)-3*s+3:k(f)=k(f)+1 . 150 8:h$(f,k(f))=h$(s,k(s)):h$(s,k(s))=" ":k(s)=k(s)-1 Bs=6-s-f L 1000 V n=n+1 ` @b(3):k(3):h$(3,9 ):k(s)=n:m=0 (c=1n:h$(s,c)=(n+1-c):c :9996 ':150 E15,5;"1";15,16;"2";15,27;"3" [19,0;"Von welchem Turm soll die "'"Scheibe genommen werden? " 1p$:p$(1)<"1"p$(1)>"3"5020 a=p$-480 k(a)=019,0;" Keine Scheibe moeglich$ ":200:5010 [19,0;"... und wohin? "'" " 1p$:p$(1)<"1"p$(1)>"3"5050 b=p$-480 k(b)=05090 hh$(a,k(a))>h$(b,k(b))19,0;" Falscher Zug ":200:5010 =k(b)=k(b)+1:h$(b,k(b))=h$(a,k(a)):k(a)=k(a)-1 h$(a,k(a)+1)=" "  m=m+1  150  k(f)n5010 B15,0;30;" ":19,0;30;" " #w=110 :.1}L,w:w ,o=10 1-1:.1}L,o:o 915,0;"Geschafft mit ";m;" Zuegen. " ]16,0;"Das Optimum fuer einen Turm dieser Groesse ist ";2^n-1 ( 460 ' d=(256-xs*cs*d$)/2+t:a=23306 [:a,d:a+1,r:a+2,xs:a+3,ys:a+4,cs:a=a+4:i=1̱d$:a+i,d$(i):i:a+i,255:32256~: '7"Tuerme"9999':"Tuerme"32256~,512: 'l32255}:23676|\,127:"Loading: DIE TUERME VON HANOI  1983 by OMEGA-SOFT":"": i         5 rtS333DTUERME VON HANOId3338a[edL"" } Tuerme ' 3M- }]- s*}(y(?DX'6!:\Mpp@>v>![~#"[o<&)))K6\ >2[: [2 [: [2[> 2[~#"[2[:[= 2:[= :[G: [O: [ 2 [*[~2[: [G: [2 [*[ ~2[: [G: [2[: [Oͤ~:[<2[ :[<2[ :[0~@ :\G:\G:[o:[g>Xg:\w:[G@gxgxo:[Go!~xO F![F(// P,BB<DHpHDB@~BfZBBBBbRJFB