diff --git a/prg.txt b/prg.txt index 40287fa..7c42270 100755 --- a/prg.txt +++ b/prg.txt @@ -1,12 +1,12 @@ 0 rem !to "build/cookie.prg" -10 dimna$(17):dimia(17):dimbd$(17):dimbg(17):dimpr(17):dimcg(17) +10 mi=17:dimna$(mi):dimia(mi):dimbd$(mi):dimbg(mi):dimpr(mi):dimcg(mi) 20 open 8,8,8,"storedat,s,r" -30 forx=0to17 +30 forx=0tomi 40 input#8,na$(x) 50 input#8,bd$(x) 55 input#8,bg(x) 60 input#8,pr(x) -65 ?x+1"/18" +65 ?x+1"/"mi+1 70 next 80 close 8 90 ms=1:bn$="someone's":r1$="{right}{right}{right}{right}{right}{right}{right}{right}{right}{right}{right}{right}{right}{right}{right}{right}{right}" @@ -115,6 +115,6 @@ 51020 ?r1$"{right} ";:next 51040 return -60000 fora=0to17:b=b+cg(x):next:rem adding subroutine +60000 fora=0tomi:b=b+cg(x):next:rem adding subroutine 60030 cc=cc+b:?"{home}{down}{right}"int(cc):return