Home » Archimedes archive » Acorn Computing » 1995 01 subscription disc.adf » 9501s » MusicBox/!MusicBoxD/Main22
MusicBox/!MusicBoxD/Main22
This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.
Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.
Tape/disk: | Home » Archimedes archive » Acorn Computing » 1995 01 subscription disc.adf » 9501s |
Filename: | MusicBox/!MusicBoxD/Main22 |
Read OK: | ✔ |
File size: | E744 bytes |
Load address: | 0000 |
Exec address: | 0000 |
File contents
18505DEFPROCNa(RETURNb$):LOCALI%:SYS&27,b$,a,256:b$="":I%=0:WHILEa?I%>31:b$+=CHR$(a?I%):I%+=1:ENDWHILE:ENDPROC 18577DEFPROCra(m,E$,h):PROCOa("Music Box has suffered an internal error and must quit. "+E$+" ("+STR$(h)+")"):END 18604DEFPROCOa(w$):ONERRORPROCPa(w$) 18631!a=ERR:$(a+4)=w$+CHR$0:SYS&400DF,a,1,U$:PROCQa 18685DEFPROCPa(w$):ONERROROFF 18694IFMODE<>bTHENMODEb 18703VDU4 18712PRINTw$:PROCQa 18748DEFPROCRa(i):IFj>iTHENPROCQa 18757ENDPROC 18766DEFPROCQa:ONERRORPROCSa 18793ONERROROFF 18802IFfTHENSYS&42589:f=FALSE 18811PROCSa 18838DEFPROCSa:ONERROROFF 18847IFMODE<>bTHEN 18856MODEb:SYS&400E3,b 18883ENDIF 18883SYS&400DD:END 18910DEFPROCia(N$,O$,P$,k):DIMa 256:PROCNa(O$):PROCNa(P$):Z$=O$:_$=P$:f=FALSE:j=-1:b=MODE:U$=N$:IFkTHENSYS&400C0,200,&4B534154,N$ 19018ENDPROC 19027DEFPROCTa(d%,X%,Y%):CASEd%OF 19063WHENgg%:PROCR(o%,d%,X%,Y%) 19081WHENng%:IFNOTAb%THEN 19090SYS&44AE3,6,_%,o%:SYS&44AE5,0,o%,X%,Y%,,vg%TO,,d%:SYS&44AE3,7,_%,o%:IFd%>=Qf%ANDd%<=Rf%THEN 19126PROCj:PROCS(d%-Qf%+1):PROCk(b%(1,d%-Qf%),d%-Qf%+1) 19162ENDIF 19162ENDIF 19171ENDCASE 19180ENDPROC 19189DEFPROCUa(p%,d%,X%,Y%):LOCALA%,C%,D%:IF(p%AND(4<<4))THEN 19225CASEd%OF 19234WHENgg%,`f%:PROCG(o%,d%,X%,Y%) 19261ENDCASE 19261ENDIF 19270IF(p%AND4)THEN 19288CASEd%OF 19297WHENdg%:PROCVa(1) 19324WHENbg%:PROCVa(-1) 19342WHENeg%:PROCj 19360WHENcg%:SYS&44ADD,3,o%,d%,1:zb%=TRUE:PROCVa(1) 19396WHENlg%,kg%,fg%,hg%,ig%,jg%,_f%:PROCe(o%,d%) 19414WHENpg%:IFNOTPa%THENPROCe(o%,d%) 19423SYS&44AD4,1,o%,gg%TOc%:c%-=1:IFc%<0THENc%=0 19450SYS&44AD4,2,o%,gg%,c%TOc%:PROCd((c%+40)) 19477WHENqg%:IFNOTPa%THENPROCe(o%,d%) 19486SYS&44AD4,1,o%,gg%TOc%:c%+=1:IFc%>255THENc%=255 19513SYS&44AD4,2,o%,gg%,c%TOc%:PROCd((c%+40)) 19540WHENmg%:SYS&44AD6,ld%,X%,Y% 19549WHENgg%:SYS&44AD4,0,o%,d%,X%,Y%TOc%:PROCd((c%+40)) 19576WHEN`f%:SYS&44AD4,0,o%,d%,X%,Y%TOc%:PROCq(c%) 19603WHENng%:IFNOTAb%THEN 19612SYS&44AE3,6,_%,o%:SYS&44AE5,0,o%,X%,Y%,,vg%TO,,d%:SYS&44AE3,7,_%,o%:IFd%>=Qf%ANDd%<=Rf%THEN 19648IFNOTyb%THEN 19657PROCH(d%-Qf%+1,-1,o%,-1) 19675ENDIF 19675PROCk(b%(1,d%-Qf%),d%-Qf%+1) 19693ELSE:CASEd%OF 19702WHEN0:PROCl(1):C%=X%:D%=Y%:A%=USR(ei%):IF(A%AND&FF000000)=&FF000000THEN 19738PROCc("You are not allowed that many instruments in one column.") 19756ELSE:A%=(A%<<8)>>8:IFyb%THEN 19774fk%=USR(ai%):gk%=fk%:hk%=(((gk%)DIVik%)+1)*ik%-1:!qj%=fk% 19828ELSE:IF(!ni%<8)THEN 19837PROCH(!ni%,10-(A%AND&FF),o%,-1) 19855ELSE:IF!ni%=8+7THEN 19864IF(!di%)>0THENPROCH(!di%,10-(A%AND&FF),o%,-1) 19873ENDIF 19882ENDIF 19891ENDIF 19900CASE!ni%OF 19909WHEN6+8:IF(A%>>20)>0THEN!di%=A%>>20:PROCWa("st7_copy1"):PROCk(-1,6) 19918WHEN7+8:PROCk(-1,5) 19936ENDCASE 19936ENDIF 19945WHENSf%,Sf%+1,Sf%+2,Tf%,Uf%:IFFNp(d%)THENPROCk(-1,d%-Sf%+1)ELSEPROCXa 19963ENDCASE 19972ENDIF 19981ENDIF 19990WHENZf%:IFNOTAb%THEN 20008SYS&44AE5,0,o%,X%,Y%,,vg%TO,,d%:CASEd%OF 20026WHENWf%:PROCYa(1) 20044WHENVf%:PROCYa(-1) 20053WHENXf%,Yf%:PROCe(o%,-d%) 20062ENDCASE 20062ENDIF 20071ENDCASE 20080ENDIF 20089ENDPROC 20098DEFPROCk(x%,q%):LOCALA%,B%:IFx%>=0THEN 20134d$="s"+a$(x%) 20152ELSE:IFq%>=5THENq%+=1 20161d$="st"+STR$(q%):q%+=8 20188ENDIF 20188PROCZa(d$):!ni%=q%:Bb%=q%:ENDPROC 20224DEFPROCXa:IFBb%>7THEN 20251IFBb%>12THEN 20260PROCk(-1,Bb%-9):SYS&44ADD,7+512,o%,Qf%+Bb%-3,,,vg% 20287ELSE:PROCk(-1,Bb%-8):SYS&44ADD,7+512,o%,Qf%+Bb%-2,,,vg% 20314ENDIF 20314ELSE:SYS&44ADD,7+512,o%,Qf%+Bb%-1,,,vg%:PROCk(b%(1,Bb%-1),Bb%) 20350ENDIF 20350ENDPROC 20359DEFPROCZa(d$):LOCALA%,B%:CASEd$OF 20395WHEN"st2":A%=4:B%=0 20413WHEN"st6":A%=4:B%=44 20422WHEN"st7":A%=4:B%=44 20431OTHERWISE:A%=0:B%=0 20440ENDCASE 20440SYS&44AE3,1+2^11,U%,d$,wb%+A%,wb%+B%,_%TO,,_%:ENDPROC 20458DEFPROC_a:LOCALc%:PROCh(Bf%):PROCT(o%):PROCU(1):PROCy(2^Db%,gb%):PROCV(o%,`f%):SYS&44AD4,1,o%,gg%TOc%:PROCs(fg%,o%,0):PROCd(c%+40):PROCXa:PROCz:PROCC(0):ENDPROC 20620DEFPROC`a(H%,J%,s%):LOCALe%:FORe%=0TOYf%:SYS&44AE0,,vg%+4+32*e%,s%:NEXT:PROCW(H%,J%):!Li%=H%:!Mi%=J%:CALLDi%:PROCX(H%,J%):ENDPROC 20728DEFPROCab:CALLUi%:ENDPROC 20764DEFFNH:jk%=MODE:=FNI 20818DEFFNI:LOCALkk%,lk%,mk%,e%,A%,P%:!ii%=K%/nk%:!ji%=4/nk%:SYS&64AE2,259,nc%,"composegrid",2^4,(W%+1)*K%+4,K%*11+4,jk%TOA%;P%:SYS&64AE2,264,nc%,2,0:IF(P%AND1)=1THEN 20872SYS&44AE2,259,nc%,"composegrid",2^4,8,8,jk%:PROCh(o%):PROCY:PROCc("Not enough memory to use Tune Box. Try reducing the size of 'paper' in the configuration window. See manual for more hints."):=FALSE 20926ENDIF 20926SYS&64AE2,60,nc%,"composegrid",0TO,kk%,lk%,mk%:SYS&400E6,0:RECTANGLEFILL0,0,(W%+1)*K%+4,K%*11+4:SYS&400E6,Cb%:FORe%=1TO11STEP2:RECTANGLEFILL0,K%*e%+2,(W%+1)*K%+4,K%:NEXT:SYS&400E6,7:FORe%=0TO11:RECTANGLEFILL0,K%*e%,(W%+1)*K%+4,3:NEXT:FORe%=0TOW%+1 21034RECTANGLEFILLK%*e%,0,3,11*K%+4:NEXT:SYS&2E,60+256,kk%,lk%,mk%:=TRUE 21088DEFPROCYa(ok%):LOCALX%,Y%,B%,pk%,A%,T%,d%:A%=ok%*2:pk%=0:REPEAT:CALLxi%:PROCbb:MOUSEX%,Y%,B%:CASEpk%OF 21160WHEN0:A%=ok%*4:T%=TIME:REPEAT:MOUSEX%,Y%,B%:PROCbb:UNTILTIME>T%+50ORB%=0 21232WHEN10 21250ENDCASE 21250pk%+=1:UNTILB%=0OR!Ai%<=0OR!Ai%>=W%-24:IFA%<0THENd%=Vf%ELSEd%=Wf% 21277SYS&44ADD,3+512,o%,d%,0,,vg%:ENDPROC 21295DEFPROCVa(ok%):LOCALe%:PROCcb(NOTzb%):fk%=USR(ai%):gk%=fk%:hk%=(((gk%)DIVik%)+1)*ik%-1:!qj%=fk%:qk%=hk%:rk%=qk%:sk%=qk%:tk%=rk%:IFok%=1THEN 21412SYS&44ADD,7,o%,dg%,1:!Hi%=0:!kj%=jc%:!pj%=0 21457ELSE:!Hi%=hk%:!kj%=jc%+fk%*12:!pj%=hk%:SYS&44ADD,7,o%,bg%,1 21502ENDIF 21502uk%=-99999:vk%=0:yb%=TRUE:wk%=ok%:PROCg:!tj%=Yb%:!lj%=0:lj%!4=0:nj%!0=0:nj%!4=0:nj%!8=0:oj%!0=-1:oj%!4=-1:SYS&401C0:PROCm:xk%=lb%:A%=1:CALLwi%:IFwk%=1THEN 21682FORe%=0TOmb%:A%=e%*Q%:IF!pj%>hk%ANDzb%THEN 21709!pj%=0:!kj%=jc% 21736ENDIF 21736CALLrj%:NEXT 21763ELSE:FORe%=0TOmb%:A%=e%*Q%:IF!pj%<0ANDzb%THEN 21790!pj%=hk%:!kj%=jc%+hk%*12 21817ENDIF 21817CALLvj%:NEXT 21844ENDIF 21844PROCt:IFzb%THENSYS&44ADD,7,o%,cg%,1 21862ENDPROC 21871DEFPROCj:PROCm:!Hi%=-1:A%=1:CALLwi%:yb%=FALSE:PROCg:SYS&44ADD,7,o%,eg%,1:zb%=FALSE:SYS&44ADD,3,o%,cg%,0:CALLBi%:PROCcb(FALSE):ENDPROC 21997DEFPROCdb:LOCALZ%,A%,yk%,zk%:Z%=BEAT:IFwk%=1THEN 22042IFZ%<xk%THEN 22051vk%+=mb%:FORe%=1TOmb%:A%=lb%+e%*Q%:IF!pj%>hk%ANDzb%THEN 22087!pj%=0:!kj%=jc% 22114ENDIF 22114CALLrj%:NEXT:rk%=qk%:qk%=sk%:sk%=hk% 22168ENDIF 22168xk%=Z%:Ak%=(Z%DIVQ%)+vk%-mb%:IFAk%<>uk%THEN 22195uk%=Ak%:IFAk%>rk%THEN 22213IFzb%THEN 22222Ak%-=rk%+1:vk%-=rk%+1 22249ELSE:PROCj:Ak%=-100:ENDPROC 22258ENDIF 22267ENDIF 22276A%=1:IF(NOTzb%)THEN 22294yk%=Ak%:IFyk%>fk%-11THENyk%=fk%-11 22312IFyk%<12THENyk%=12 22321!zi%=(yk%-12)*K%:!Ai%=(yk%-12):A%=0 22357ENDIF 22357!Hi%=Ak%:CALLwi% 22384ENDIF 22384ELSE:IFZ%<xk%THEN 22411vk%+=mb%:FORe%=1TOmb%:A%=lb%+e%*Q%:IF!pj%<0ANDzb%THEN 22447!pj%=hk%:!kj%=jc%+fk%*12 22474ENDIF 22474CALLvj%:NEXT:rk%=qk%:qk%=sk%:sk%=hk% 22528ENDIF 22528xk%=Z%:Ak%=tk%-(Z%DIVQ%)-vk%+mb%:IFAk%<>uk%THEN 22555uk%=Ak%:IFAk%<0THEN 22573IFzb%THEN 22582Ak%+=tk%+1:uk%=Ak%:vk%-=tk%+1:tk%=rk% 22627ELSE:PROCj:Ak%=-100:ENDPROC 22636ENDIF 22645ENDIF 22654A%=1:IF(NOTzb%)THEN 22672yk%=Ak%:IFyk%>fk%-11THENyk%=fk%-11 22690IFyk%<12THENyk%=12 22699!zi%=(yk%-12)*K%:!Ai%=(yk%-12):A%=0 22735ENDIF 22735!Hi%=Ak%:CALLwi% 22762ENDIF 22762ENDIF 22771ENDPROC 22780DEFPROCz:IFFNHTHEN 22807PROCZa(d$):SYS&44AE2,262+2^11,U%,"s?",,,,si%,ti%:SYS&44AE2,262+2^11,U%,"tie01",,,,ui%,vi%:CALLci%:CALLBi% 22861ENDIF 22861ENDPROC 22870DEFPROCY:n=FALSE:PROCg:PROCj:PROCr:PROCA:ENDPROC 22942DEFPROCeb:LOCALv%,b%,a%:g$="<MusicBoxD$Dir>.1":v%=USR(ai%):a%=FNJ(g$):IFa%=0THENENDPROC 23005b%=FNf("MBTune ",a%):IFb%=0THENb%=FNb(1,a%) 23023IFb%=0THENb%=FNf("Tune",a%) 23032IFb%=0THENb%=FNb(12*v%+12+8,a%) 23041IFb%=0THENb%=FNu(jc%,12*v%+12,a%) 23050IFb%=0THENb%=FNK(1,a%) 23059IFb%=0THENb%=FNL(1,a%) 23068IFb%=0THENb%=FNM(1,a%) 23077IFb%=0THENb%=FNN(a%) 23086IFb%=0THENb%=FNO(a%) 23095IFb%=0THENb%=FNP(a%) 23104IFb%=0THENb%=FNQ(a%) 23113IFb%=0THENb%=FNf("EndX",a%) 23122IFb%=0THENb%=FNb(-1,a%) 23131IFb%=0THENb%=FNi(a%) 23140IFb%=0THENb%=FNR(g$) 23149IFb%<>0THENPROCb(FNc(b%+4),FALSE):b%=FNi(a%)ELSEPROCr:PROCc("I have succesfully saved your work.") 23167ENDPROC 23176DEFPROCfb(g$):PROCi:PROCj:IFINSTR(g$,".")=0THENg$="<MBTuneFiles$Dir>."+g$ 23221a%=FNl(g$):IFa%=0THENENDPROC 23239b%=FNh(b$,8,a%):IFb%<>0THENPROCb(FNc(b%+4),FALSE):ENDPROC 23257IFb$<>"MBCompos"ANDb$<>"MBTune "THENPROCb("File format not understood.",FALSE):ENDPROC 23266b%=FNa(c%,a%):IFb%<>0THENPROCb(FNc(b%+4),FALSE):ENDPROC 23284IFc%>1THENPROCb("This file was made by a newer version of MusicBox. You will need an upgrade to load it.",FALSE) 23293b%=FNh(b$,4,a%):WHILEb%=0ANDb$<>"EndX":CASEb$OF 23329WHEN"Tune":b%=FNS(a%) 23347WHEN"Inst":b%=FNv(1,a%) 23356WHEN"Temp":b%=FNw(1,a%) 23365WHEN"Volu":b%=FNx(1,a%) 23374WHEN"Octa":b%=FNy(a%) 23383WHEN"Key ":b%=FNz(a%) 23392WHEN"Pent":b%=FNB(a%) 23401WHEN"Colu":b%=FNT(a%) 23410OTHERWISE:b%=FNj(a%) 23419ENDCASE 23419IFb%=0THENb%=FNh(b$,4,a%) 23428ENDWHILE:IFb%<>0THENPROCb(FNc(b%+4),FALSE) 23455b%=FNi(a%):PROCp:PROCr:IFw%=1THEN 23491PROCz:PROCC(0):SYS&44AEB,3,o% 23527ENDIF 23527ENDPROC 23536DEFFNS(a%):LOCALb%,v%:SYS&44ADA,jc%,vb%*12:b%=FNa(v%,a%):IFb%=0THENb%=FNk(jc%,v%-8,a%) 23590v%=(((v%-8)DIV12)DIV24)+1:IFv%>W%/24THEN 23608IFNOTBk%THEN 23617W%=v%*24:!Zh%=W%:!_h%=W%*12:!mi%=W%*12 23662ENDIF 23662SYS&44ADA,jc%+W%*12,vb%*12+12-W%*12 23680ENDIF 23680=b% 23707DEFPROCgb(d%):CASEd%OF 23716WHENfg%:PROCs(d%,o%,1) 23734WHENlg%:PROCv(o%,1) 23743WHENkg%:PROCv(o%,0) 23752WHENjg%:IFFNp(d%)THENPROChb 23752WHENig%:IFFNp(d%)THENPROCn(0,1) 23761WHEN-Xf%:PROCC(0) 23779WHEN-Yf%:PROCC(-1) 23788WHEN_f%:IFFNp(d%)THENPROCn(1,1) 23788WHENhg%:PROCh(o%):PROCY 23824WHEN-1:PROCib 23833ENDCASE 23833ENDPROC 23842DEFPROChb:LOCALA%:Ck%=(USR(ai%)+1):IFCk%<1ORCk%>W%/2THENPROCc("The paper is not long enough to copy your present tune."):ENDPROC 23887Dk%=(W%/Ck%)-1:SYS&44ACB,Dd%,zd%,1:PROCn(Dd%,1):ENDPROC 23923DEFPROCcb(A%):Ab%=A%:IFA%THEN 23959!Zj%=2 23977ELSE:!Zj%=1 23995ENDIF 23995ENDPROC 24004DEFPROCC(A%):IFA%=-1THENA%=USR(ai%)-23+12 24031IFA%<0THENA%=0 24040IFA%>W%-24THENA%=W%-24 24049!zi%=A%*K%:!Ai%=A%:A%=0:CALLwi%:CALLBi%:SYS&44ADD,3+512,o%,Yf%,0,,vg%:SYS&44ADD,3+512,o%,Xf%,0,,vg%:ENDPROC 24121DEFPROCjb(n%,Ek%):IFEk%THEN 24148CASEn%OF 24157WHEN0:SYS&44ADA,jc%,W%*12:PROCz:PROCC(0):PROCj:PROCl(1) 24220WHENDd%:SYS&44ACC,Dd%,zd%TO,,Ek%:FORe%=1TOEk%:SYS&44AC7,Ck%*12,jc%,jc%+Ck%*e%*12:NEXT:PROCz:PROCj:A%=0:CALLwi%:PROCl(1) 24310WHEN1:PROCkb(1) 24319ENDCASE 24319ENDIF 24328ENDPROC 24337DEFFNN(a%):LOCALe%,c%,b%:b%=FNf("Colu",a%):IFb%=0THENb%=FNb(12,a%) 24382IFb%=0THENb%=FNb(Db%,a%) 24391=b% 24418DEFFNT(a%):LOCALe%,c%,b%:IFNOTFk%THEN=FNj(a%) 24436b%=FNa(c%,a%):IFb%=0THENb%=FNa(c%,a%) 24454Db%=c%:IFw%=1THENPROCy(2^Db%,gb%) 24472=b% 24499DEFFNp(d%):LOCALy%:CASEd%OF 24517WHENSf%:y%=Gk% 24535WHENSf%+1:y%=Hk% 24544WHENSf%+2:y%=Ik% 24553WHENTf%:y%=Jk% 24562WHENUf%:y%=Kk% 24571WHENjg%:y%=Lk% 24580WHENig%:y%=Mk% 24589WHEN_f%:y%=Nk% 24598ENDCASE 24598IFNOTy%THENPROCI 24607=y% 24652DEFPROClb(d%,X%,Y%):IFUa%<>0THENENDPROC 24661CASEd%OF 24670WHENuh%:PROCR(l%,d%,X%,Y%) 24688WHENoh%:SYS&44AE3,6,_%,l%:SYS&44AE5,1,l%,X%,Y%,,Hh%TO,,d%:SYS&44AE3,7,_%,l%:CASETRUEOF 24724WHEN(d%>=ih%ANDd%<=jh%):SYS&44ADD,7+512,l%,d%,1,,Hh%:PROCS(d%-ih%+1):PROCmb(b%(2,d%-ih%),d%-ih%+1) 24769ENDCASE 24769ENDCASE 24778ENDPROC 24787DEFPROCnb(p%,d%,X%,Y%):LOCALA%,C%,D%,B%,A$:IF(p%AND(4<<4))THEN 24832CASEd%OF 24841WHENuh%,yh%:PROCG(l%,d%,X%,Y%) 24868ENDCASE 24868ENDIF 24877IF(p%AND4)=4THEN 24886CASEd%OF 24895WHENrh%:SYS&44ADD,7,l%,d%:PROCD(l%,sh%,wh%,1,TRUE) 24931WHENqh%:SYS&44ADD,7,l%,d%:SYS&44ADD,7,l%,rh%:Ok%=TRUE:PROCD(l%,sh%,wh%,1,TRUE) 24976WHENph%:SYS&44ADD,7,l%,d%:PROCD(l%,sh%,wh%,1,FALSE) 25003WHENsh%:PROCo(l%,d%,wh%) 25021WHENth%:PROCl(2):SYS&44ADD,7,l%,d%:PROCob(l%,sh%,wh%,1) 25057WHENwh%,xh%,Bh%,Ch%,Dh%:PROCe(l%,d%) 25075WHENuh%:SYS&44AD4,0,l%,d%,X%,Y%TOc%:PROCd((c%+40)) 25102WHENyh%:SYS&44AD4,0,l%,d%,X%,Y%TOc%:PROCq(c%) 25129WHENEh%:IFNOTPa%THENPROCe(l%,d%) 25138SYS&44AD4,1,l%,uh%TOc%:c%-=1:IFc%<0THENc%=0 25165SYS&44AD4,2,l%,uh%,c%TOc%:PROCd((c%+40)) 25192WHENFh%:IFNOTPa%THENPROCe(l%,d%) 25201SYS&44AD4,1,l%,uh%TOc%:c%+=1:IFc%>255THENc%=255 25228SYS&44AD4,2,l%,uh%,c%TOc%:PROCd((c%+40)) 25255WHENAh%:SYS&44AD6,ld%,X%,Y% 25264WHENoh%:IFUa%=0THEN 25273SYS&44AE3,6,_%,l%:SYS&44AE5,0,l%,X%,Y%,,Hh%TO,,d%:SYS&44AE3,7,_%,l%:CASETRUEOF 25309WHEN(d%>=ih%ANDd%<=jh%):PROCH(d%-ih%+1,-1,l%,-d%+ih%-1):PROCmb(b%(2,d%-ih%),d%-ih%+1) 25345WHEN(d%>=lh%ANDd%<=lh%+kh%-1):h%(d%-lh%,0)=dc%:A$=a$(b%(2,dc%-1)):SYS&44ADD,1+512,l%,d%,"s"+A$+",p"+A$,,Hh%:PROCZ(d%-lh%):PROCe(l%,-10-(d%-lh%)):PROCl(2) 25408ENDCASE 25408ENDIF 25417OTHERWISE:CASETRUEOF 25435WHEN(d%>=mh%ANDd%<mh%+kh%):IFUa%=0THENPROCpb(d%-mh%,X%,Y%):PROCl(2) 25453WHEN(d%>=nh%ANDd%<nh%+kh%):PROCZ(d%-nh%) 25480ENDCASE 25480ENDCASE 25489ENDIF 25498ENDPROC 25507DEFPROCmb(x%,q%):IFx%>=0THEN 25534d$="s"+a$(x%) 25552ELSE:ERROR1,"This should not happen!" 25570ENDIF 25570SYS&44AE3,1+2^11,U%,d$,wb%,wb%,_%TO,,_%:dc%=q%:ENDPROC 25597DEFPROCqb:LOCALc%:PROCh(Bf%):PROCT(l%):Ok%=FALSE:PROCy(1,gb%):PROCrb:PROCU(2):PROCV(l%,yh%):SYS&44AD4,1,l%,uh%TOc%:PROCd(c%+40):SYS&44ADD,7+512,l%,ih%+dc%-1,,,Hh%:Qa%=TRUE:PROCg:PROCs(wh%,l%,0):PROCt:PROCmb(b%(2,dc%-1),dc%):ENDPROC 25768DEFPROCsb(H%,J%,s%):LOCALe%:FORe%=0TOGh%-1:SYS&44AE0,,Hh%+4+32*e%,s%:NEXT:PROCW(H%,J%):!Li%=H%:!Mi%=J%:CALLEi%:PROCX(H%,J%):ENDPROC 25876DEFPROCtb:LOCALd%,Pk%:CALLTi%:IFUa%<>2THEN 25921SYS&400CF,,h%:d%=h%!16:Pk%=ec%:CASETRUEOF 25957WHEN(h%!8AND4)=4AND(d%>=mh%ANDd%<=mh%+kh%-1):IFPk%<>d%-mh%THENPk%=-1 25975WHENPa% 25993WHEN(h%!8AND4)=4AND(d%>=nh%ANDd%<=nh%+kh%-1):Pk%=d%-nh% 26011OTHERWISEPk%=-1 26020ENDCASE 26020IFec%<>Pk%THEN 26029IFPk%=-1THENPROCubELSEPROCZ(Pk%) 26038ENDIF 26047ENDIF 26056ENDPROC 26065DEFPROCrb:SYS&44AE3,1+2^11,U%,d$,wb%,wb%,_%TO,,_%:SYS&44AE2,262+2^11,U%,"Circle",,,,Pi%,Qi%:ENDPROC 26110DEFPROCvb:Qa%=FALSE:PROCo(l%,d%,wh%):PROCm:PROCg:PROCA:PROCr:ENDPROC 26191DEFPROCwb(d%):CASEd%OF 26218WHENwh%:PROCs(d%,l%,1) 26236WHENxh%:PROCh(l%):PROCvb 26245WHENCh%:PROCv(l%,5) 26254WHENBh%:PROCv(l%,4) 26263WHENDh%:IFNk%THENPROCn(1,2)ELSEPROCI 26263OTHERWISE:IFd%<0ANDd%>-8THENPROCib 26281IFd%<-9ANDd%>-10-kh%THEN 26290SYS&44AE3,6,_%,l%:SYS&44ADD,3+512,l%,-10-d%+lh%,0,,Hh%:SYS&44AE3,7,_%,l%:PROCub 26335ENDIF 26335ENDCASE 26344ENDPROC 26353DEFPROCpb(Qk%,X%,Y%):LOCALf%:SYS&44AE6,3,l%,X%,Y%TO,,X%,Y%:f%=Ih%+Qk%*32:X%=X%-!f%:Y%=Y%-f%!4-2:IFX%<K%+2THENY%+=K%/2 26434S%=Y%DIVK%:IFS%<0THENS%=0 26452IFS%>10THENS%=10 26461IFX%<K%+2THEN 26470IFS%=0ORS%=2ORS%=6ORS%=9THENENDPROC 26479S%+=10 26497ENDIF 26497?(Jh%+Qk%*24+S%)=?(Jh%+Qk%*24+S%)EOR1:IFX%<K%+2THEN 26515SYS&400D1,l%,!f%+4,4+f%!4+(S%-10)*K%-K%/2,!f%+K%,f%!4+(S%-10+1)*K%-K%/2 26533ELSE:SYS&400D1,l%,!f%+4+K%,4+f%!4+S%*K%,!f%+K%*2,f%!4+(S%+1)*K% 26551ENDIF 26551PROCZ(Qk%):ENDPROC 26569DEFPROCZ(Rk%):LOCALe%,Sk%:PROCub:PROC_(4,nh%+Rk%):ENDPROC 26623DEFPROCub:IFec%>-1THEN 26650PROC_(5,nh%+ec%) 26668ENDIF 26668ENDPROC 26677DEFPROCxb(n%,Ek%):IFEk%ANDn%=1THENPROCkb(2) 26704ENDPROC 26713DEFPROCyb(p%,d%):LOCALTk%,X%,Y%,B%,T%:IFp%>7THENENDPROC 26749Tk%=-1:IFd%>=If%ANDd%<=Lf%THEN 26767Tk%=(d%-If%)DIV2:SYS&44ADD,3,Mf%,Tk%*2+If%,1:SYS&44ADD,6,Mf%,Tk%*2+Jf%,&7E200000,&FF200000:IFUk%<>Tk%THEN 26803SYS&44ADD,3,Mf%,Uk%*2+If%,0:SYS&44ADD,6,Mf%,Uk%*2+Jf%,&17000000,&FF200000 26830ENDIF 26830Vk%=Uk%:Uk%=Tk%:PROCzb(Tk%,Wk%,TRUE) 26866ELSE:IFd%=Ff%ORd%=Gf%THENPROCe(Mf%,d%) 26875ENDIF 26884ENDPROC 26893DEFPROCzb(x%,q%,Xk%):LOCALWc%,i$,X%,Y%,B%,h$,P%,T%:h$=b$(x%):IF(c%(x%)AND2^26)=0AND(c%(x%)AND&80000000)=0THEN 26938PROCi:REPEAT:SYS&20008,17,n$+"."+h$TON%:IFN%<>1THEN 26974i$="Can't use that voice. ("+n$+"."+h$+" not found.)" 26992ELSE:IFNOTFNqTHENIFNOTFNrTHENi$="Can't use that voice. (No voice slots left)" 27001IFFNqTHEN 27010SYS&2001E,0,n$+"."+h$TOWc%;P%:IF(P%AND1)<>0THEN 27028IFNOTFNrTHENi$="Can't use that voice. ("+FNc(Wc%+4)+")" 27037ELSE:SYS&60185,q%,0TO,ja%:SYS&6018A,q%,h$TO;P%:SYS&60185,q%,ja%:IF(P%AND1)=1THEN 27082i$="Voice module '"+h$+"' does not contain a voice called '"+h$+"'. Shall use an alternative." 27100ELSE:c%(x%)=(c%(x%)OR2^26) 27118ENDIF 27118ENDIF 27127ELSE:P%=1 27154ENDIF 27154ENDIF 27163UNTILi$<>""OR(P%AND1)=0:PROCp 27190ENDIF 27190IFi$=""THEN 27199PROCJ(w%,q%,x%) 27217ELSE:PROCb(i$,FALSE):SYS&44ADD,3,Mf%,Vk%*2+If%,1:SYS&44ADD,6,Mf%,Vk%*2+Jf%,&7E200000,&FF200000:IFUk%<>Tk%Yk%THEN 27253SYS&44ADD,3,Mf%,Uk%*2+If%,0:SYS&44ADD,6,Mf%,Uk%*2+Jf%,&17000000,&FF200000 27280ENDIF 27280Uk%=Vk% 27298ENDIF 27298IFXk%THEN 27307SYS&40189,q%,Yb%,a%(4)-&1000,100:T%=TIME:REPEAT:MOUSEX%,Y%,B%:UNTILB%=0ANDTIME>T%+5:SYS&40189,q%,Yb%OR2^7,a%(4)-&1000,1 27370ENDIF 27370ENDPROC 27379DEFPROCS(q%):LOCALe%,f%:IFNOTYa%THENENDPROC 27415Wk%=q%:FORe%=0TOGc%-1:IFb%(w%,q%-1)=e%THEN 27442SYS&44ADD,3,Mf%,e%*2+If%,1:SYS&44ADD,6,Mf%,e%*2+Jf%,&7E200000,&FF200000:Uk%=e% 27478ELSE:SYS&44ADD,3,Mf%,e%*2+If%,0:SYS&44ADD,6,Mf%,e%*2+Jf%,&17000000,&FF200000 27505ENDIF 27505NEXT:Zk%=b%(w%,q%-1):SYS&44AD6,Mf%,-1:SYS&44AD9,Mf%,-1:_k%=qa%:IFqa%THENPROCm 27559ENDPROC 27568DEFPROCAb:PROCzb(Zk%,Wk%,FALSE):PROCBb:ENDPROC 27613DEFPROCBb:LOCALe%,A$,A%:CASEw%OF 27649WHEN0:SYS&44ADD,6,t%,kf%,0,0 27667WHEN1:PROCi:SYS&44ADD,6,o%,Pf%,0,0:A%=Wk%:CALLbi%:PROCk(b%(1,Wk%-1),Wk%):PROCp 27730WHEN2:SYS&44ADD,6,l%,hh%,0,0:PROCk(b%(2,Wk%-1),Wk%):A$=a$(b%(2,Wk%-1)):FORe%=0TOkh%-1:IFh%(e%,0)=Wk%THEN 27775SYS&44ADD,1+512,l%,lh%+e%,"s"+A$+",p"+A$,,Hh% 27793ENDIF 27793NEXT 27811WHEN3:PROCi:SYS&44ADD,6,k%,yg%,0,0:SYS&44AEB,3,dh%:PROCu(b%(3,Wk%-1),Wk%):PROCp 27865ENDCASE 27865PROCh(Mf%):SYS&44AD9,,-2:IF_k%THENPROCt 27892ENDPROC 27901DEFPROCCb(d%):CASEd%OF 27928WHENFf%:PROCBb 27955WHENGf%:PROCAb 27973ENDCASE 27973ENDPROC 27982DEFFNq:LOCALe%,y%,A%:y%=FALSE:FORe%=32TO1STEP-1:SYS&60183,0,e%TOA%:IFA%=0THENy%=TRUE:e%=-1 28045NEXT:=y% 28090DEFPROCDb(p%,d%):IFp%>7THENENDPROC 28099PROCi:CASEd%OF 28117WHENxf%:PROCEb 28135WHENyf%:PROC_a 28144WHENzf%:PROCqb 28153WHENAf%:PROCFb 28162ENDCASE 28162PROCp:ENDPROC 28180DEFPROCA:!g%=1:SYS&7,14,g%:IF(?g%<>&95ORg%?1>4)THENva%=TRUE:END 28225SYS&44AD6,Bf%,-1:SYS&44ADD,3,-1,zc%,0:Aa%=TRUE:w%=-1:ENDPROC 28279DEFPROCGb:SYS&44ADD,3,-1,zc%,1:Aa%=FALSE:ENDPROC 28324DEFPROCR(n%,d%,X%,Y%):IFNOTZa%THENENDPROC 28360`k%=n%:al%=d%:PROC`(Yh%,X%,Y%):ENDPROC 28396DEFPROCHb(A%):A%=EVAL(MID$("040060060065070080090100115130145160175190210",A%*3+1,3)):SYS&44AD4,2,`k%,al%,A%-40:PROCd(A%):ENDPROC 28450DEFPROCW(H%,J%):LOCALX%,Y%:IFw%<0THENENDPROC 28486Y%=i%(w%):X%=Y%!4:Y%=Y%!8-eb%:SYS&2E,(52+256),U%,"Metronome",H%+X%,J%+Y%,0,hc%,ic%:SYS&44AE2,34,oc%,"PlotMe",H%+X%,J%+Y%+eb%,8:ENDPROC 28540DEFPROCt:qa%=TRUE:bl%=lb%:IFtb%=1THEN 28585FORe%=1TOob%:SOUND8,&100+pb%,80,2,e%*nb%:NEXT 28621ENDIF 28621PROCd(qb%):BEATSlb%:PROCE(BEAT,cl%):PROCg:ENDPROC 28666DEFPROCm:qa%=FALSE:PROCE(kb%/4,TRUE):SYS&401C0:PROCg:ENDPROC 28729DEFPROCs(d%,n%,dl%):LOCALA%,e%:SYS&44ADE,1,n%,d%,h%+100,100:CASEFNc(h%+100)OF 28774WHEN"soff,poff":tb%=0 28792WHEN"son,pon":tb%=1 28801ENDCASE 28801tb%=(tb%EORdl%):IFdl%=1THEN 28819IFtb%=1THEN 28828SYS&44ADD,1,n%,d%,"son,pon" 28846ELSE:SYS&44ADD,1,n%,d%,"soff,poff" 28864ENDIF 28864ENDIF 28873IFqa%THEN 28909A%=1:WHILEA%*nb%<BEAT:A%+=1:ENDWHILE:FORe%=A%TOob%*2:SOUND8,(&100+pb%)*tb%,80,2,e%*nb%:NEXT 28981ENDIF 28981ENDPROC 28999DEFPROCd(A%):LOCALg:qb%=A%:TEMPOib%*A%*Q%*&1000/12000:!jj%=((130-(A%-20)/2.3)/rb%)*2^10:IFqa%=0OR(NOTcl%)THENPROCE(sb%,TRUE) 29062g=((12000)/(qb%*5*ib%))*2^8:!sj%=g:CASEw%OF 29098WHEN0:SYS&44ADD,2,t%,tf%,STR$(qb%) 29116WHEN1:SYS&44ADD,2,o%,og%,STR$(qb%) 29125WHEN2:SYS&44ADD,2,l%,vh%,STR$(qb%) 29134WHEN3:SYS&44ADD,2,k%,Yg%,STR$(qb%) 29143ENDCASE 29143ENDPROC 29152DEFPROCy(A%,B%):LOCALe%,Ac%,A,Bc%:Ac%=30:Q%=B%:ib%=2*A%:kb%=Q%*ib%:lb%=kb%*jb%:mb%=ib%*jb%:nb%=Q%*ib%/2:ob%=2*mb%/ib%:FORBc%=0TOjb%:FORe%=0TOkb%*8STEP8:A=90+e%*360/(kb%*8):A=RAD(SIN(RAD(A))*Ac%+90) 29287!(Cc%+e%+kb%*8*Bc%)=(COS(A)*rb%)*2^10:!(Cc%+e%+kb%*8*Bc%+4)=(SIN(A)*rb%)*2^10:NEXT:NEXT:PROCd(qb%):PROCE(kb%/4,TRUE):ENDPROC 29350DEFPROCE(Z%,el%):LOCALX%,Y%,A%,H%,J%:IFtb%=1ANDqa%THEN 29395IFZ%<bl%THEN 29404FORe%=1TOob%:SOUND8,&100+pb%,80,2,lb%+e%*nb%:NEXT 29440ENDIF 29440bl%=Z% 29458ENDIF 29458IFel%THEN 29467A%=Z%:CALLej%:IFw%<0THENENDPROC 29494fl%=i%(w%):A%=Z%:SYS&44AC7,20,fl%,h%:X%=h%!4:Y%=h%!8:SYS&400C9,,h%TOA%:H%=h%!4-h%!20:J%=h%!16-h%!24:WHILEA%<>0:SYS&44AE2,34,oc%,"PlotMe",H%+X%,J%+Y%,8:SYS&400CA,,h%TOA%:ENDWHILE:sb%=Z% 29620ENDIF 29620ENDPROC 29629DEFPROCIb:LOCALkk%,lk%,mk%,e%,A%:gl%=MODE:SYS&400ED,&100,U%,"metronome",,,,hc%,ic%:SYS&44AE2,259,oc%,"Met",2^4,cb%,db%,gl%:SYS&44AE2,259,oc%,"PlotMe",2^4,cb%,db%,gl%:SYS&44AE2,264,oc%,2,0:SYS&44AE2,60,oc%,"Met",0TO,kk%,lk%,mk% 29710SYS&44AE2,52+2^11,U%,"Metronome",0,-eb%,8,hc%,ic%:SYS&2E,60,kk%,lk%,mk%:SYS&44AE2,24,oc%,"met"TO,,A%:!gj%=A%:SYS&44AE2,24,oc%,"PlotMe"TO,,A%:!hj%=A%:A%=0:CALLej%:ENDPROC 29791DEFFNL(j%,a%):LOCALe%,c%,b%:b%=FNf("Temp",a%):IFb%=0THENb%=FNb(12,a%) 29836CASEj%OF 29845WHEN0:SYS&44AD4,1,t%,of%TOc% 29863WHEN1:SYS&44AD4,1,o%,gg%TOc% 29872WHEN2:SYS&44AD4,1,l%,uh%TOc% 29881WHEN3:SYS&44AD4,1,k%,Qg%TOc% 29890ENDCASE 29890IFb%=0THENb%=FNb(c%+40,a%) 29899=b% 29926DEFFNw(j%,a%):LOCALe%,c%,b%:IFhl%THEN 29944b%=FNa(c%,a%):IFb%=0THENb%=FNa(c%,a%) 29962IFb%=0THEN 29971CASEj%OF 29980WHEN0:SYS&44AD4,2,t%,of%,c%-40:SYS&44ACB,t%,tf%,c% 30016WHEN1:SYS&44AD4,2,o%,gg%,c%-40:SYS&44ACB,o%,og%,c% 30043WHEN2:SYS&44AD4,2,l%,uh%,c%-40:SYS&44ACB,l%,vh%,c% 30070WHEN3:SYS&44AD4,2,k%,Qg%,c%-40:SYS&44ACB,k%,Yg%,c% 30097ENDCASE 30097IFw%=j%THENPROCd(c%) 30106ENDIF 30115ELSE:b%=FNj(a%) 30142ENDIF 30142=b% 30187DEFPROCJb(p%,X%,Y%):IFJb%THENENDPROC 30196IF(p%AND4)THEN 30205PROCl(3):CASEIb%OF 30223WHEN1,2,3,4,5,6,7:IFil%THENPROCK(Ib%,!Qj%+!Pj%*M%,FALSE) 30232WHEN11:PROCKb(!Qj%,!Pj%) 30250WHEN10:PROCLb(!Qj%,!Pj%) 30259WHEN9:PROCMb(!Qj%,!Pj%) 30268WHEN13:PROCNb(!Qj%,!Pj%) 30277WHEN14,15:PROCOb(!Qj%,!Pj%,Ib%) 30286ENDCASE 30286ELSE:IF(p%AND1)THEN 30304A%=!Qj%+!Pj%*M%:IFA%>u%THENENDPROC 30322PROCNb(!Qj%,!Pj%):za%=TRUE:Ca%=TRUE:PROCw 30367ENDIF 30367ENDIF 30376ENDPROC 30385DEFPROCPb(d%,X%,Y%):CASEd%OF 30412WHENQg%:PROCR(k%,d%,X%,Y%) 30430WHENIg%:IFNOTJb%THEN 30439SYS&44AE3,6,_%,k%:SYS&44AE3,6,Hc%,dh%:SYS&44AE5,0,k%,X%,Y%,,eh%TO,,d%:SYS&44AE3,7,_%,k%:SYS&44AE3,7,Hc%,dh%:IFd%>=zg%ANDd%<=Ag%THEN 30493PROCx:PROCS(d%-zg%+1):PROCu(b%(3,d%-zg%),d%-zg%+1) 30529ENDIF 30529ENDIF 30538ENDCASE 30547ENDPROC 30556DEFPROCQb(p%,d%,X%,Y%):LOCALA%,C%,D%:IF(p%AND(4<<4))THEN 30601CASEd%OF 30610WHENQg%,Og%:PROCG(k%,d%,X%,Y%) 30637ENDCASE 30637ENDIF 30646IF(p%AND4)THEN 30664CASEd%OF 30673WHENLg%:PROCL(1) 30700WHENJg%:PROCL(-1) 30718WHENMg%:PROCx 30736WHENKg%:SYS&44ADD,3,k%,d%,1:Ub%=TRUE:PROCL(1) 30772WHENUg%,Tg%,Pg%,Vg%,Rg%,Sg%,Wg%:PROCe(k%,d%) 30790WHENQg%:SYS&44AD4,0,k%,d%,X%,Y%TOc%:PROCd((c%+40)) 30817WHENOg%:SYS&44AD4,0,k%,d%,X%,Y%TOc%:PROCq(c%) 30844WHENXg%:SYS&44AD6,ld%,X%,Y% 30853WHENZg%:IFNOTPa%THENPROCe(k%,d%) 30862SYS&44AD4,1,k%,Qg%TOc%:c%-=1:IFc%<0THENc%=0 30889SYS&44AD4,2,k%,Qg%,c%TOc%:PROCd((c%+40)) 30916WHEN_g%:IFNOTPa%THENPROCe(k%,d%) 30925SYS&44AD4,1,k%,Qg%TOc%:c%+=1:IFc%>255THENc%=255 30952SYS&44AD4,2,k%,Qg%,c%TOc%:PROCd((c%+40)) 30979WHENIg%:IFNOTJb%THEN 30988SYS&44AE3,6,_%,k%:SYS&44AE3,6,Hc%,dh%:SYS&44AE5,0,k%,X%,Y%,,eh%TO,,d%:SYS&44AE3,7,_%,k%:SYS&44AE3,7,Hc%,dh%:IFd%>=zg%ANDd%<=Ag%THEN 31042IFNOTKb%THEN 31051PROCH(d%-zg%+1,-1,k%,-1) 31069ENDIF 31069PROCu(b%(3,d%-zg%),d%-zg%+1) 31087ELSE:CASEd%OF 31096WHENBg%,Bg%+1,Bg%+2,Cg%,Dg%:IFFNs(d%)THENPROCu(-1,d%-Bg%+1)ELSEPROCRb 31114ENDCASE 31123ENDIF 31132ENDIF 31141WHENHg%:SYS&44AE5,0,k%,X%,Y%,,eh%TO,,d%:CASEd%OF 31168WHENEg%:IFNOTab%THENPROCSb(-1):PROCTb 31186SYS&44ADD,3+2^9,k%,d%,0,,eh% 31204WHENFg%:IFNOTbb%THENPROCSb(1):PROCTb 31213SYS&44ADD,3+2^9,k%,d%,0,,eh% 31231WHENGg%:PROCUb 31240ENDCASE 31240ENDCASE 31249ENDIF 31258ENDPROC 31267DEFPROCFb:LOCALc%:PROCh(Bf%):PROCT(k%):PROCU(3):PROCVb(Hb%,O%,jl%,TRUE):PROCV(k%,Og%):SYS&44AD4,1,k%,Qg%TOc%:PROCs(Pg%,k%,0):PROCd(c%+40):PROCRb:PROCWb:ENDPROC 31402DEFPROCWb:PROCXb:!g%=dh%:SYS&400CB,,g%:PROCYb(g%):ENDPROC 31465DEFPROCZb:PROCx:PROCA:PROCr:ENDPROC 31519DEFPROCu(x%,q%):IFx%>=0THEN 31546d$="s"+a$(x%) 31564ELSE:IFq%>3THENq%+=1 31573d$="st"+STR$(q%):q%+=8 31600ENDIF 31600PROC_b(d$):!Nj%=q%:Ib%=q%:ENDPROC 31645DEFPROCRb:IFIb%>7THEN 31672IFIb%>12THEN 31681PROCu(-1,Ib%-9):SYS&44ADD,7+512,k%,zg%+Ib%-3,,,eh% 31708ELSE:PROCu(-1,Ib%-8):SYS&44ADD,7+512,k%,zg%+Ib%-2,,,eh% 31735ENDIF 31735ELSE:SYS&44ADD,7+512,k%,zg%+Ib%-1,,,eh%:PROCu(b%(3,Ib%-1),Ib%) 31771ENDIF 31771ENDPROC 31780DEFPROC`b(H%,J%,s%):!Li%=H%:!Mi%=J%:CALLBj%:ENDPROC 31852DEFPROCac(H%,J%,s%):LOCALe%:FORe%=0TOGg%:SYS&44AE0,,eh%+4+32*e%,s%:NEXT:PROCW(H%,J%):PROCX(H%,J%):SYS&400E6,7:RECTANGLEH%+`g%,J%+ch%,bh%-`g%,ah%-ch%:ENDPROC 31951DEFPROCx:PROCm:Kb%=FALSE:PROCg:SYS&44ADD,7,k%,Mg%,1:SYS&44ADD,3,k%,Kg%,0:A%=-1:B%=-1:CALLFj%:Ub%=FALSE:PROCbc:PROCcc(FALSE):ENDPROC 32068DEFPROCL(ok%):LOCALe%:IFUb%THEN 32104SYS&44ADD,7,k%,Kg%,1:!Tj%=0 32131ELSE:!Tj%=1 32149ENDIF 32149PROCcc(NOTUb%):kl%=-1:IFok%=1THEN 32176SYS&44ADD,7,k%,Lg%,1:A%=0:B%=0:CALLFj%:!Rj%=-1:!Sj%=u% 32221ELSE:SYS&44ADD,7,k%,Jg%,1:A%=(u%-1)DIVM%:B%=(u%-1)MODM%:CALLFj%:!Rj%=u%:!Sj%=u% 32284ENDIF 32284Kb%=TRUE:ll%=ok%:PROCg:!tj%=Yb%:SYS&401C0:PROCm:ml%=lb%:nl%=-mb%:FORe%=0TOmb%:A%=e%*Q%:IFll%=1THENCALLUj%ELSECALLVj% 32392NEXT:PROCdc:PROCt:ol%=-100:ENDPROC 32437DEFPROCSb(A%):!g%=dh%:SYS&400CB,,g%:g%!24+=A%*(Ob%+Rb%)*-1:PROCYb(g%):SYS&400C5,,g%:ENDPROC 32509DEFPROCec(d%):CASEd%OF 32536WHENPg%:PROCs(d%,k%,1) 32554WHENUg%:PROCv(k%,3) 32563WHENTg%:PROCv(k%,2) 32572WHENSg%:IFFNs(d%)THENPROCfc 32572WHENRg%:IFFNs(d%)THENPROCn(0,3) 32581WHENWg%:IFFNs(d%)THENPROCn(1,3) 32590WHENVg%:PROCh(k%):PROCZb 32626WHEN-1:PROCib 32635WHEN-2:SYS&44ADD,3+2^9,k%,Gg%,0,,eh% 32644ENDCASE 32644ENDPROC 32653DEFPROCgc:CALL_i%:ENDPROC 32689DEFPROCXb:PROC_b(d$):SYS&44AE2,262+2^11,U%,"s?",,,,si%,ti%:SYS&44AE2,262+2^11,U%,"Pointer1",,,,Gj%,Hj%:ENDPROC 32752DEFFNm:LOCALZ%,A%:Z%=BEAT:IFll%=1THEN 32815IFZ%<ml%THEN 32824FORe%=1TOmb%:A%=lb%+e%*Q%:CALLUj%:NEXT:nl%+=mb% 32878ENDIF 32878A%=(Z%DIVQ%)+nl%:IFA%>=u%THEN 32896IFUb%THENnl%-=u% 32905ENDIF 32914ELSE:IFZ%<ml%THEN 32932FORe%=1TOmb%:A%=lb%+e%*Q%:CALLVj%:NEXT:nl%+=mb% 32986ENDIF 32986A%=(Z%DIVQ%)+nl%:IFA%<0THEN 33004IFUb%THENnl%+=u% 33013ENDIF 33022ENDIF 33031ml%=Z%:=Z% 33067DEFPROChc:LOCALZ%,A%,yk%,zk%:Z%=FNm:IFll%=1THEN 33094A%=(Z%DIVQ%)+nl%:IFA%<>kl%THEN 33112kl%=A%:IFA%>=u%THEN 33130IFUb%THEN 33139A%-=u%:nl%-=u% 33166ELSE:PROCx:A%=-100 33184ENDIF 33184ENDIF 33193B%=A%MODM%:A%=A%DIVM%:CALLFj%:IFA%<>ol%ANDNOTUb%THENPROCic(A%):ol%=A% 33229ENDIF 33238ELSE:A%=u%-(Z%DIVQ%)-nl%-1:IFA%<>kl%THEN 33274kl%=A%:IFA%<0THEN 33292IFUb%THEN 33301A%+=u%:nl%-=u% 33328ELSE:PROCx:A%=-100 33346ENDIF 33346ENDIF 33355B%=A%MODM%:A%=A%DIVM%:CALLFj%:IFA%<>ol%ANDNOTUb%THENPROCic(A%):ol%=A% 33391ENDIF 33400ENDIF 33409ENDPROC 33418DEFPROCdc:IFKb%THEN 33445SYS&400D3,,g%:Fb%=TRUE:IFg%!0<>k%THEN 33472pl%=g%!0:ql%=g%!4:rl%=g%!8:sl%=g%!12:tl%=g%!16:ul%=g%!20 33535ENDIF 33535SYS&400D2,k%,-1,-200,200,0,0 33553ENDIF 33553ENDPROC 33562DEFPROCjc:Fb%=FALSE:ENDPROC 33598DEFPROCbc:IFFb%AND(NOTKb%)THEN 33625Fb%=FALSE:SYS&400D2,pl%,ql%,rl%,sl%,tl%,ul% 33652ENDIF 33652ENDPROC 33661DEFPROCkc(d%,vl%):A%=INSTR("1234567 ",CHR$(vl%)):IFA%=0ORNOTKb%ORIb%>7OR(NOTwl%)THEN 33697SYS&400DC,s%!24 33715ELSE:IFA%=8THENA%=Ib% 33724C%=FNm:IFll%=1THEN 33751PROCK(A%,(C%DIVQ%)+nl%,TRUE) 33769ELSE:PROCK(A%,u%-(C%DIVQ%)-nl%-1,TRUE) 33787ENDIF 33787ENDIF 33796ENDPROC 33805DEFPROCK(A%,B%,xl%):IFNOTYc%THENPROCl(3) 33832IFB%>=u%THEN 33841IFUb%THEN 33850B%-=u% 33868ELSE:ENDPROC 33877ENDIF 33886ENDIF 33895IFUSR(Jj%)=0THEN 33904PROCb("Not allowed that many instruments at once.",FALSE) 33922ELSE:PROClc(B%,A%,TRUE,xl%) 33940ENDIF 33940ENDPROC 33949DEFPROClc(B%,A%,yl%,xl%):LOCALC%,D%,E%:IFyl%THENE%=Yb%ELSEE%=0 33985IFKb%THEN 33994IFll%=1THEN 34003C%=FNmDIVQ%:D%=B%:IFD%<nl%+C%AND(NOTxl%)THEND%+=u% 34030WHILE(nl%+C%<=D%ANDD%<=nl%+mb%*2)ORxl%:SYS&401C1,(D%-nl%)*Q%,0,(E%<<16ORA%),(!Xj%OR!Wj%<<16):D%+=u%:xl%=FALSE:ENDWHILE 34084ELSE:C%=FNmDIVQ%:D%=u%-B%-1:IFD%<nl%+C%AND(NOTxl%)THEND%+=u% 34111WHILE(nl%+C%<=D%ANDD%<=nl%+mb%*2)ORxl%:SYS&401C1,(D%-nl%)*Q%,0,(E%<<16ORA%),(!Xj%OR!Wj%<<16):D%+=u%:xl%=FALSE:ENDWHILE 34165ENDIF 34165ELSE:SYS&40186,(E%<<16ORA%),(!Xj%OR!Wj%<<16) 34192ENDIF 34192IFxl%THENSYS&40186,(E%<<16ORA%),(!Xj%OR!Wj%<<16) 34201ENDPROC 34210DEFPROCmc(n%,Ek%):LOCALA%,B%:IFEk%THEN 34246CASEn%OF 34255WHEN0:SYS&44ADA,V%,Sb%*M%*8:B%=O%*Hb%:A%=O%:CALLxj%:SYS&44AEB,3,dh%:PROCic(0):PROCx:PROCl(3) 34354WHENDd%:SYS&44ACC,Dd%,zd%TO,,Ek%:FORe%=1TOEk%:SYS&44AC7,Ck%*8,V%,V%+Ck%*e%*8:NEXT:PROCVb(Hb%*(Ek%+1),O%,jl%,FALSE):SYS&44AEB,3,dh%:PROCl(3) 34426WHEN1:PROCkb(3) 34435ENDCASE 34435ENDIF 34444ENDPROC 34453DEFPROCic(A%):!g%=dh%:SYS&400CB,,g%:IFA%=0THEN 34498g%!24=Qb% 34516ELSE:IFg%!24<(A%)*(Ob%+Rb%)*-1THENg%!24=(A%)*(Ob%+Rb%)*-1 34525IFg%!24-(g%!16-g%!8)>(A%+1)*(Ob%+Rb%)*-1THENg%!24=(A%+1)*(Ob%+Rb%)*-1+(g%!16-g%!8) 34534ENDIF 34543PROCYb(g%):SYS&400C5,,g%:ENDPROC 34570DEFPROCYb(s%):IFg%!24>=Qb%THEN 34597IFNOTab%THENSYS&44ADD,4+2^9,k%,Eg%,TRUE,,eh%:ab%=TRUE 34606ELSE:IFab%THENSYS&44ADD,4+2^9,k%,Eg%,FALSE,,eh%:ab%=FALSE 34624ENDIF 34633IFg%!24<=g%!16-g%!8+(jl%)*(Ob%+Rb%)*-1THEN 34642IFNOTbb%THENSYS&44ADD,4+2^9,k%,Fg%,TRUE,,eh%:bb%=TRUE 34651ELSE:IFbb%THENSYS&44ADD,4+2^9,k%,Fg%,FALSE,,eh%:bb%=FALSE 34669ENDIF 34678ENDPROC 34687DEFPROC_b(d$):z$=d$:CASEd$OF 34723WHEN"st2":A%=4:B%=0:C%=(O%-1)*20+2:D%=0:z$="st2"+STR$(O%) 34741WHEN"st5":A%=0:B%=8:C%=0:D%=8 34750WHEN"st6":A%=4:B%=0:C%=4:D%=0 34759WHEN"st7":A%=4:B%=44:C%=4:D%=44 34768OTHERWISE:A%=0:B%=0:C%=0:D%=0 34777ENDCASE 34777SYS&44AE3,1+2^11,U%,d$,wb%+A%,wb%+B%,_%TO,,_%:SYS&44AE3,1+2^11,U%,z$,wb%+C%,wb%+D%,Hc%TO,,Hc%:ENDPROC 34804DEFPROCKb(zl%,Al%):LOCALA%,B%,C%,D%,Bl%,Cl%:A%=zl%+Al%*M%:B%=?(A%*8+V%):Bl%=(B%AND&F):IFBl%=0THENENDPROC 34867?(A%*8+V%)=B%-1:Cl%=?(A%*8+V%+Bl%):?(A%*8+V%+Bl%)=0:C%=Al%:D%=zl%:CALLYj%:za%=TRUE:PROCw:PROClc(A%,Cl%,FALSE,FALSE):ENDPROC 34957DEFPROCNb(zl%,Al%):LOCALA%,B%,C%,D%,Bl%:A%=zl%+Al%*M%:B%=?(A%*8+V%):Bl%=(B%AND&F):IFBl%<2THENENDPROC 35020B%=?(A%*8+V%+Bl%):D%=1:WHILED%<=Bl%:C%=?(A%*8+V%+D%):?(A%*8+V%+D%)=B%:B%=C%:D%+=1:ENDWHILE:C%=Al%:D%=zl%:CALLYj%:ENDPROC 35128DEFPROCLb(zl%,Al%):LOCALA%,B%,C%,D%,Bl%:IFu%<=O%THENPROCb("Sorry, you can't do that you must leave at least one beat on the screen.",FALSE):ENDPROC 35164A%=zl%+Al%*M%:SYS&44AC7,u%*8-A%*8-8*O%,A%*8+V%+8*O%,A%*8+V%:SYS&44ADA,u%*8+V%-O%*8,8*O%:PROCnc(Hb%-1):za%=TRUE:Ca%=TRUE:PROCw:IFKb%THENPROCL(ll%) 35236ENDPROC 35245DEFPROCMb(zl%,Al%):LOCALA%,B%,C%,D%,Bl%,v%:A%=zl%+Al%*M%:IFA%>u%THEN 35290v%=(A%-u%)DIVO% 35308ELSE:v%=1 35326ENDIF 35326IF(Hb%+v%)*O%/M%>jl%THENPROCb("No room to add any beats, ask your teacher for more.",FALSE):ENDPROC 35335IFA%<=u%THEN 35344SYS&44AC7,u%*8-A%*8,A%*8+V%,A%*8+V%+8*O%:SYS&44ADA,A%*8+V%,8*O% 35371ENDIF 35371PROCnc(Hb%+v%):za%=TRUE:Ca%=TRUE:PROCw:IFKb%THENPROCL(ll%) 35425ENDPROC 35434DEFPROCoc(g$):PROCi:PROCx:IFINSTR(g$,".")=0THENg$="<MBBeatFiles$Dir>."+g$ 35479a%=FNl(g$):IFa%=0THENENDPROC 35497b%=FNh(b$,8,a%):IFb%<>0THENPROCb(FNc(b%+4),FALSE):ENDPROC 35515IFb$<>"MBRhythm"ANDb$<>"MBBeat "THENPROCb("File format not understood.",FALSE):ENDPROC 35524b%=FNa(c%,a%):IFb%<>0THENPROCb(FNc(b%+4),FALSE):ENDPROC 35542IFc%>1THENPROCb("This file was made by a newer version of MusicBox. You will need an upgrade to load it.",FALSE) 35551b%=FNh(b$,4,a%):WHILEb%=0ANDb$<>"EndX":CASEb$OF 35578WHEN"Rthm":b%=FNU(a%) 35596WHEN"Inst":b%=FNv(3,a%) 35605WHEN"Temp":b%=FNw(3,a%) 35614WHEN"Volu":b%=FNx(3,a%) 35623WHEN"Octa":b%=FNy(a%) 35632WHEN"Key ":b%=FNz(a%) 35641WHEN"Pent":b%=FNB(a%) 35650OTHERWISE:b%=FNj(a%) 35659ENDCASE 35659IFb%=0THENb%=FNh(b$,4,a%) 35668ENDWHILE:IFb%<>0THENPROCb(FNc(b%+4),FALSE) 35695b%=FNi(a%):PROCp:PROCr:SYS&44AEB,3,k%:ENDPROC 35740DEFFNU(a%):LOCALb%,v%,A%,B%:b%=FNa(v%,a%):IFb%=0THENb%=FNa(A%,a%) 35785IFb%=0THENb%=FNa(B%,a%) 35794IFb%<>0THEN=b% 35803SYS&44ADA,V%,Sb%*M%*8:b%=FNk(V%,v%-16,a%):IFNOTDl%THEN 35839El%=A%*B%-1:A%=O%:B%=(El%DIVA%)+1 35875ENDIF 35875IFA%*B%>jl%*M%THEN 35884IFNOTBk%THENjl%=((A%*B%-1)DIVM%)+1 35893ENDIF 35902PROCVb(B%,A%,jl%,FALSE):SYS&44AEB,3,dh%:PROCic(0):=b% 35956DEFPROCVb(Fl%,Gl%,Hl%,Il%):LOCALc%,Jl%,A%,B%:Jl%=O%:IFHl%>Sb%THENHl%=Sb%:PROCb("Number of rows reduced to the maximum setting of "+STR$(Sb%)+".") 35983c%=TRUE:IFHl%<((Gl%*Fl%-1)/M%)ANDIl%THEN 36010!g%=4:$(g%+4)="Reducing the maximum number of rows for the Beat Box will truncate the present tune. Shall I continue and reduce it?"+CHR$0:SYS&400DF,g%,%11011,o$TO,c%:c%=(c%=1):IFc%THENFl%=M%*Hl%/Gl% 36055ENDIF 36064IFc%THEN 36073!Aj%=Hl%:jl%=Hl% 36100ENDIF 36100O%=Gl%:Hb%=Fl%:u%=Gl%*Fl%:!Mj%=Gl%:!Lj%=(u%-1)MODM%+1:!Kj%=(u%-1)DIVM%:SYS&44ADA,V%+u%*8,Sb%*M%*8-u%*8:B%=Gl%*Fl%:A%=Gl%:CALLxj%:SYS&44AEB,3,dh%:IF!Nj%=10ANDw%=3THENPROC_b(d$) 36235IFw%=3AND((Jl%<>O%)ORIl%)THEN 36244IFGl%>4THEN 36253PROCy(O%,hb%) 36271ELSE:PROCy(O%,gb%) 36289ENDIF 36289ENDIF 36298PROCWb:ENDPROC 36316DEFPROCpc(S%,Kl%):LOCALe%,e,c,d:Ll%=Kl%:!Ij%=Kl%:!yj%=S%:Ob%=S%:FORe%=1TO8:d=Mb%:c=d*e%-Mb%:IFc>S%-Mb%THEN 36415c=S%-Mb%:d=c/(e%-1) 36442ENDIF 36442FORe=0TO7:!(Cj%+e%*32-32+e*4)=c-d*(e):NEXT:NEXT:SYS&44AEB,3,dh%:ENDPROC 36496DEFPROCnc(Fl%):LOCALA%,B%:Hb%=Fl%:u%=O%*Hb%:!Lj%=(u%-1)MODM%+1:!Kj%=(u%-1)DIVM%:B%=u%:A%=O%:CALLxj%:SYS&44AEB,3,dh%:IF!Nj%=10ANDw%=3THENPROC_b(d$) 36622ENDPROC 36631DEFPROCOb(zl%,Al%,Ml%):LOCALA%,B%,C%,D%,Bl%,Cl%:A%=zl%+Al%*M%:IFMl%=14THEN 36676B%=?(A%*8+V%):Bl%=(B%AND&F):IFBl%=0THENENDPROC 36703?(A%*8+V%)=B%-1:Cl%=?(A%*8+V%+Bl%):?(A%*8+V%+Bl%)=0:C%=Al%:D%=zl%:CALLYj%:PROClc(A%,Cl%,FALSE,FALSE):!di%=Cl%:PROCWa("st7_copy2"):PROCw:PROCu(-1,6):za%=TRUE:PROCw 36829ELSE:B%=A%:A%=!di%:IFB%>=u%THEN 36856IFUb%THEN 36865B%-=u% 36883ELSE:ENDPROC 36892ENDIF 36901ENDIF 36910IFUSR(Jj%)=0THEN 36919PROCb("Not allowed that many instruments at once.",FALSE) 36937ELSE:PROClc(B%,A%,TRUE,FALSE):PROCw:PROCu(-1,5):za%=TRUE:PROCw 36991ENDIF 36991ENDIF 37000ENDPROC 37009DEFPROCUb:LOCALA%,B%,C%,D%:IFNOTKb%ORIb%>7THENENDPROC 37045A%=Ib%:C%=FNm:IFll%=1THEN 37072PROCK(A%,(C%DIVQ%)+nl%,TRUE) 37090ELSE:PROCK(A%,u%-(C%DIVQ%)-nl%-1,TRUE) 37108ENDIF 37108SYS&44ADD,3+2^9,k%,Gg%,1,,eh%:PROCe(k%,-2):ENDPROC 37135DEFPROCw:SYS&44AE3,6,Hc%,dh%:SYS&44AE3,6,_%,k%:ENDPROC 37180DEFFNs(d%):LOCALy%:CASEd%OF 37216WHENBg%:y%=Gk% 37234WHENBg%+1:y%=Hk% 37243WHENBg%+2:y%=Ik% 37252WHENCg%:y%=TRUE 37261WHENDg%:y%=Kk% 37270WHENSg%:y%=Lk% 37279WHENRg%:y%=Mk% 37288WHENWg%:y%=Nk% 37297ENDCASE 37297IFNOTy%THENPROCI 37306=y% 37333DEFPROCfc:LOCALA%:Ck%=u%:IFCk%<1ORCk%>jl%*M%/2THENPROCc("No room to copy the present rhythm."):ENDPROC 37360Dk%=(jl%*M%/Ck%)-1:SYS&44ACB,Dd%,zd%,1:PROCn(Dd%,3):ENDPROC 37396DEFPROCTb:LOCALA%,B%,C%:REPEAT:MOUSEA%,B%,C%:UNTILC%=0:ENDPROC 37459DEFPROCcc(A%):Jb%=A%:IFA%THEN 37495!dk%=2 37513ELSE:!dk%=1 37531ENDIF 37531ENDPROC 37540DEFPROCqa:LOCALNl%:DIMb%(3,8):SYS&40140,0,208,48:SYS&40140,8:FORNl%=0TO7:FOROl%=0TO3:PROCJ(Ol%,Nl%+1,Nl%):NEXT:NEXT:FOROl%=0TO3:PROCJ(Ol%,8,4):NEXT:SYS&6018A,8,"StringLib-Hard":ENDPROC 37684DEFPROCJ(j%,q%,x%):LOCALCl%,e%:Cl%=b%(j%,q%-1):b%(j%,q%-1)=x%:FORe%=0TO7:IFb%(j%,e%)=Cl%THENCl%=-1 37756NEXT:IFCl%<>-1THENc%(Cl%)=((c%(Cl%)OR2^(j%+27))EOR2^(j%+27)) 37774c%(x%)=c%(x%)OR2^(j%+27):IFw%=j%THENPROCqc(q%,j%) 37792ENDPROC 37801DEFPROCU(j%):LOCALe%:w%=j%:FORe%=0TO7:PROCqc(e%+1,j%):NEXT:ENDPROC 37873DEFPROCqc(q%,j%):LOCALA%,x%:IFq%=8THENENDPROC 37909x%=b%(j%,q%-1):IFb$(x%)="Rest"THEN 37927SYS&40185,q%,0 37945ELSE:SYS&6018A,q%,b$(x%)TO;P%:IF(P%AND1)=1THEN 37963PROCrc(x%,q%,j%) 37981ENDIF 37981ENDIF 37990SYS&40185,q%,0TO,A%:SYS&40185,q%,A%:?(mj%+q%)=A%:IFq%<8THEN 38026$(kc%+26*(q%-1))="S"+a$(x%)+",P"+a$(x%):$(qi%+(q%-1)*16)="S"+a$(x%)+CHR$0 38053ENDIF 38053ENDPROC 38062DEFFNK(j%,a%):LOCALe%,b$,b%:b%=FNf("Inst",a%):IFb%=0THENb%=FNb(20*8+8,a%) 38107FORe%=0TO7:IFb%=0THENb%=FNf(LEFT$(b$(b%(j%,e%))+STRING$(20," "),20),a%) 38125NEXT:=b% 38161DEFFNv(j%,a%):LOCALe%,x%,b$,b%,v%,x$,N%:IFNOTPl%THEN=FNj(a%) 38179x$="":b%=FNa(v%,a%):FORe%=0TO7:IFb%=0THENb%=FNk(g%,20,a%) 38215IFb%=0THEN 38224g%?20=0:b$=FNc(g%):b$=LEFT$(b$,INSTR(b$," ")-1):N%=-1:FORx%=0TOea%-1:IFb$(x%)=b$THENN%=x% 38278NEXT:IFN%=-1THENx$=b$:N%=0 38296b%(j%,e%)=N%:IFw%=j%THENPROCqc(e%+1,j%) 38314ENDIF 38323NEXT:IFx$<>""ANDpc%=FALSETHENpc%=TRUE:PROCb("Some instruments were not found including '"+x$+"'. They have been replaced with '"+b$(0)+"'.",FALSE) 38341=b% 38368DEFPROCrc(x%,q%,j%):LOCALWc%,i$,X%,Y%,B%,h$,P%,T%:h$=b$(x%):IF(c%(x%)AND2^26)=0AND(c%(x%)AND&80000000)=0THEN 38395PROCi:REPEAT:SYS&20008,17,n$+"."+h$TON%:IFN%<>1THEN 38431i$="Can't use voice '"+h$+"'. Shall use an alternative. ("+n$+"."+h$+" not found.)" 38449ELSE:IFNOTFNqTHENIFNOTFNrTHENi$="Can't use that voice. (No voice slots left)" 38458IFFNqTHEN 38467SYS&2001E,0,n$+"."+h$TOWc%;P%:IF(P%AND1)<>0THEN 38485IFNOTFNrTHENi$="Can't use voice '"+h$+"'. Shall use an alternative.("+FNc(Wc%+4)+")" 38494ELSE:SYS&60185,q%,0TO,ja%:SYS&6018A,q%,h$TO;P%:SYS&60185,q%,ja%:IF(P%AND1)=1THEN 38539i$="Voice module '"+h$+"' does not contain a voice called '"+h$+"'. Shall use an alternative." 38557ELSE:c%(x%)=(c%(x%)OR2^26) 38575ENDIF 38575ENDIF 38584ELSE:P%=1 38611ENDIF 38611ENDIF 38620UNTILi$<>""OR(P%AND1)=0:PROCp 38647ENDIF 38647IFi$=""THEN 38656PROCJ(j%,q%,x%) 38674ELSE:PROCb(i$,FALSE):PROCJ(j%,q%,0) 38701ENDIF 38701ENDPROC 38710DEFFNr:LOCALe%,Ql%:Ql%=-1:e%=0:WHILEe%<Gc%ANDQl%=-1:IF(c%(e%)AND&F8000000)=0AND(c%(e%)AND2^26)=2^26THENQl%=e% 38773e%+=1:ENDWHILE:IFQl%=-1THEN 38800e%=0:WHILEe%<Gc%ANDQl%=-1:IF(c%(e%)AND2^(w%+27))=0AND(c%(e%)AND&84000000)=&04000000THENQl%=e% 38827e%+=1:ENDWHILE 38854ENDIF 38854IFQl%=-1THEN=FALSE 38863SYS&2001E,4,b$(Ql%):c%(Ql%)=(c%(Ql%)OR2^26)EOR2^26:=TRUE 38908DEFPROCH(q%,Sk%,n%,d%):SYS&40185,q%,?(mj%+q%):IFSk%<0THEN 38935Sk%=4:Rl%=a%(Sk%)-&1000 38953ELSE:Rl%=a%(Sk%) 38971ENDIF 38971SYS&40189,q%,Yb%,Rl%,Xb%:PROCe(n%,d%):Sl%=d%:Tl%=q%:ENDPROC 39016DEFPROCib:SYS&40189,Tl%,Yb%+2^7,Rl%,Wb%:ENDPROC 39052DEFPROCsc:LOCALe%:FORe%=1TO8:SOUNDe%,0,0,1:NEXT:SYS&401C0:ENDPROC 39124DEFPROCtc(c%):LOCALe%:Ul%=c%:FORe%=0TOZb%-1:a%(e%)=EVAL(MID$("&1955&16AA&1555&12AA&1000&0EAA&0C00&0955&06AA&0555&02AA",e%*5+1,5))+Vl%*&1000:NEXT:IFNOTXa%THEN 39196IFc%>7THEN 39205c%-=7:FORe%=1TOc%:a%(EVAL(MID$("5263041",e%,1)))=EVAL(MID$("&0D55&1400&0AAA&1155&1800&0EAA&1555",e%*5-4,5))+Vl%*&1000:NEXT 39250ELSE:IFc%>0THEN 39259FORe%=1TOc%:a%(EVAL(MID$("1403625",e%,1)))=EVAL(MID$("&1800&1155&1AAA&1400&0D55&16AA&1000",e%*5-4,5))+Vl%*&1000:NEXT 39295ENDIF 39295ENDIF 39304ENDIF 39313FORe%=10TO7STEP-1:a%(e%)=a%(e%-7)-&1000:NEXT:IFXa%THEN 39349a%(2)=a%(1):a%(1)=a%(0):a%(0)=a%(6)+&1000:a%(5)=a%(6):a%(6)=a%(7):a%(7)=a%(8):a%(8)=a%(10):a%(9)=a%(5)-&1000:a%(10)=a%(6)-&1000 39439ENDIF 39439FORe%=0TO10:!(e%*4+uj%)=a%(10-e%):NEXT:!Xj%=a%(4)-&1000:FORe%=0TO20:k%(e%)=EVAL(MID$("&02AA&0555&06AA&0955&0C00&0EAA&1000&12AA&1555&16AA&1955&0400&7FFF&0800&0AAA&0D55&7FFF&1155&1400&7FFF&1800",e%*5+1,5))+Vl%*&1000:NEXT:ENDPROC 39520DEFFNO(a%):LOCALe%,c%,b%:b%=FNf("Octa",a%):IFb%=0THENb%=FNb(12,a%) 39565IFb%=0THENb%=FNb(Vl%,a%) 39574=b% 39601DEFFNy(a%):LOCALe%,c%,b%:IFWl%THEN 39619b%=FNa(c%,a%):IFb%=0THENb%=FNa(c%,a%) 39637Vl%=c%:PROCtc(Ul%) 39664ELSE:b%=FNj(a%) 39682ENDIF 39682=b% 39709DEFFNP(a%):LOCALe%,c%,b%:b%=FNf("Key ",a%):IFb%=0THENb%=FNb(12,a%) 39736IFb%=0THENb%=FNb(Ul%,a%) 39745=b% 39772DEFFNQ(a%):LOCALe%,c%,b%:b%=FNf("Pent",a%):IFb%=0THENb%=FNb(12,a%) 39799IFb%=0THENb%=FNb(Xa%,a%) 39808=b% 39835DEFFNz(a%):LOCALe%,c%,b%:IFXl%THEN 39853b%=FNa(c%,a%):IFb%=0THENb%=FNa(c%,a%) 39871Ul%=c%:PROCtc(Ul%) 39898ELSE:b%=FNj(a%) 39916ENDIF 39916=b% 39943DEFFNB(a%):LOCALe%,c%,b%:IFXl%THEN 39961b%=FNa(c%,a%):IFb%=0THENb%=FNa(c%,a%) 39979Xa%=c%:IFc%THENc%=0ELSEc%=2 39997!Fi%=c%:Cb%=c%:PROCtc(Ul%) 40033ELSE:b%=FNj(a%) 40051ENDIF 40051=b% 40087DEFPROCuc(d%):IFd%=of%THENPROCR(t%,d%,X%,Y%) 40105IFd%>=lf%ANDd%<=mf%THEN 40114IFUa%<>2THENPROCS(((d%-lf%)MOD_b%)+1) 40123ENDIF 40132ENDPROC 40141DEFPROCvc(p%,d%,X%,Y%):LOCALc%:IF(p%AND(5<<4))THEN 40177CASEd%OF 40186WHENof%,qf%:PROCG(t%,d%,X%,Y%) 40213ENDCASE 40213ENDIF 40222IF(p%AND4)THEN 40231CASEd%OF 40240WHENdf%,ef%,sf%,rf%:IFp%<7THENPROCe(t%,d%) 40258WHENjf%:PROCl(0):SYS&44ADD,7,t%,d%:PROCob(t%,if%,df%,0) 40303WHENhf%:SYS&44ADD,7,t%,d%:PROCD(t%,if%,df%,0,TRUE) 40330WHENgf%:SYS&44ADD,7,t%,d%:SYS&44ADD,7,t%,hf%:Ok%=TRUE:PROCD(t%,if%,df%,0,TRUE) 40375WHENff%:SYS&44ADD,7,t%,d%:PROCD(t%,if%,df%,0,FALSE) 40402WHENif%:PROCo(t%,d%,df%) 40420WHENof%:SYS&44AD4,0,t%,d%,X%,Y%TOc%:PROCd((c%+40)) 40447WHENqf%:SYS&44AD4,0,t%,d%,X%,Y%TOc%:PROCq(c%) 40474WHENuf%:IFNOTPa%THENPROCe(t%,d%) 40483SYS&44AD4,1,t%,of%TOc%:c%-=1:IFc%<0THENc%=0 40510SYS&44AD4,2,t%,of%,c%TOc%:PROCd((c%+40)) 40537WHENwf%:SYS&44AD6,ld%,X%,Y% 40546WHENvf%:IFNOTPa%THENPROCe(t%,d%) 40555SYS&44AD4,1,t%,of%TOc%:c%+=1:IFc%>255THENc%=255 40582SYS&44AD4,2,t%,of%,c%TOc%:PROCd((c%+40)) 40618ENDCASE 40618ENDIF 40627ENDPROC 40636DEFPROCEb:PROCh(Bf%):PROCT(t%):PROCy(1,gb%):Ok%=FALSE:PROCU(0):PROCV(t%,qf%):SYS&44AD4,1,t%,of%TOc%:PROCd(c%+40):PROCt:PROCs(df%,t%,0):ENDPROC 40753DEFPROCwc:LOCALd%:IFUa%<>2THEN 40789SYS&400CF,,h%:d%=h%!16:IFd%>=lf%ANDd%-lf%<=_b%*Zb%AND(h%!8AND4)=4THEN 40816PROCxc(d%) 40834ELSE:PROCyc 40852ENDIF 40852ENDIF 40861ENDPROC 40870DEFPROCxc(d%):IFd%<>cc%THEN 40897PROCyc:PROC_(2,d%) 40924ENDIF 40924ENDPROC 40933DEFPROCyc:IFcc%>-1THEN 40960PROC_(3,cc%) 40978ENDIF 40978ENDPROC 40987DEFPROCzc(H%,J%):PROCW(H%,J%):PROCX(H%,J%):ENDPROC 41032DEFPROCAc:PROCo(t%,if%,df%):PROCm:PROCA:PROCr:ENDPROC 41095DEFPROCBc(d%):CASEd%OF 41122WHENdf%:PROCs(d%,t%,1) 41140WHENef%:PROCh(t%):PROCAc 41149WHENsf%:PROCv(o%,7) 41158WHENrf%:PROCv(o%,6) 41167ENDCASE 41167ENDPROC 41176DEFPROCea:LOCALYl%:REPEAT:SYS&400C7,Ma%,mc%TOYl%:CASEYl%OF 41248WHEN1:PROCCc(mc%) 41266WHEN2:PROCDc(mc%) 41275WHEN3:PROCEc(!mc%) 41284WHEN4:PROCFc(mc%) 41293WHEN5:PROCGc(mc%) 41302WHEN6:PROCHc(mc%) 41311WHEN7:PROCIc 41320WHEN8:PROCJc(mc%) 41329WHEN9:PROCKc(mc%) 41338WHEN11:PROCjc 41347WHEN17,18:PROCLc(mc%) 41356ENDCASE 41356IFYl%<>17ANDYl%<>18THENPROCbb 41365UNTILva%:ENDPROC 41383DEFPROCGc(s%):CASE!s%OF 41410WHENo%:Ka%=TRUE 41428WHENl%:Qa%=TRUE 41437WHENt%:La%=TRUE 41446WHENk%,dh%:Ta%=TRUE:PROCdc 41455WHENm%:vc%=TRUE 41464ENDCASE 41464PROCg:ENDPROC 41482DEFPROCFc(s%):LOCALA%,Zl%:Zl%=FALSE:A%=!s%:IFA%=ld%THENSYS&400C6,,s%:ENDPROC 41536CASETRUEOF 41545WHENKa%:PROCab:Ka%=FALSE:Zl%=TRUE 41590WHENTa%:SYS&400CF,,g%:IF(g%!12<>dh%ANDg%!12<>k%)OR(g%!12=A%ANDA%=k%)THENPROCgc:Ta%=FALSE:Zl%=TRUE 41608WHENQa%:PROCtb:Qa%=FALSE:Zl%=TRUE 41653WHENLa%:La%=FALSE:Zl%=TRUE 41680WHENvc%:vc%=FALSE:PROCMc 41707ENDCASE 41707PROCg:IFZl%=TRUETHEN 41725A%=0:CALLbj% 41752ENDIF 41752ENDPROC 41761DEFPROCEc(A%):PROCh(A%):CASEA%OF 41797WHENBf%:PROCGb 41815WHENt%:PROCAc 41824WHENo%:PROCY 41833WHENvd%:PROCr 41842WHENl%:PROCvb 41851WHENk%:PROCZb 41860ENDCASE 41860ENDPROC 41869DEFPROCLc(s%):CASEs%!16OF 41896WHEN0:va%=TRUE 41914WHEN8:IFZc%OR_c%ORYc%ORXc%THEN 41923PROCn(2,-1):s%!12=s%!8:SYS&400E7,19,s% 41959ENDIF 41959WHEN3:PROCb("Loading via dragging not implemented yet. Try double clicking.",FALSE) 41977WHEN5:PROCNc(s%) 41986WHEN&400C1:PROCca 41995ENDCASE 41995ENDPROC 42004DEFPROCHc(s%):LOCALp%,n%,d%,X%,Y%:X%=s%!0:Y%=s%!4:p%=s%!8:n%=s%!12:d%=s%!16:IFn%<>Mf%THENSYS&44ACE,,s% 42076IF(p%AND2)THEN 42085CASEn%OF 42094WHEN-2:PROC`(Wh%,X%-50,96+44*3) 42112WHENt%:PROCuc(d%) 42121WHENo%:PROCTa(d%,X%,Y%) 42130WHENl%:PROClb(d%,X%,Y%) 42139WHENk%:PROCPb(d%,X%,Y%) 42148WHENm%:PROCOc(d%,X%,Y%) 42157WHENld%:PROCh(ld%) 42166ENDCASE 42166ELSE:CASEn%OF 42184WHEN-2:IFNOTAa%THENPROCA 42193WHENt%:PROCvc(p%,d%,X%,Y%) 42211WHENk%:PROCQb(p%,d%,X%,Y%) 42220WHENMf%:PROCyb(p%,d%) 42229WHENBf%:PROCDb(p%,d%) 42238WHENo%:PROCUa(p%,d%,X%,Y%) 42247WHENl%:PROCnb(p%,d%,X%,Y%) 42256WHENvd%:PROCPc(p%,d%) 42265WHENMe%:PROCQc(p%,d%,X%,Y%) 42274WHEN`%:PROCRc(p%,d%,X%,Y%) 42283WHENOd%:PROCSc(p%,d%,X%,Y%) 42292WHENm%:PROCTc(p%,d%,X%,Y%) 42301WHENWe%:PROCUc(p%,d%,X%,Y%) 42310WHENdh%:PROCJb(p%,X%,Y%) 42319WHEN_a%:PROCVc(p%,d%) 42328WHENjd%:PROCWc(p%,X%,Y%) 42337WHENld%:PROCh(ld%) 42346ENDCASE 42346ENDIF 42355IFn%<>Mf%THENSYS&44ACF,5 42364ENDPROC 42373DEFPROCIc:LOCALA%:CASETRUEOF 42409WHEN(Ja%<>0):PROCXc 42427WHENIa%:PROCYc:Ia%=FALSE 42454WHENSa%:A%=EVAL(V$):Sa%=FALSE 42481ENDCASE 42481PROCg:ENDPROC 42499DEFPROCZc(W$):Sa%=TRUE:V$=W$:MOUSEX%,Y%,B%:h%!4=7:h%!8=X%:h%!12=Y%:h%!16=X%:h%!20=Y%:h%!24=0:h%!28=0:h%!32=wc%:h%!36=xc%:SYS&400D0,,h%:ENDPROC 42643DEFPROCe(n%,d%):LOCALX%,Y%,B%:IFd%<0THEN 42679MOUSEX%,Y%,B%:SYS&44AD9,X%,Y%,X%,Y% 42706ELSE:SYS&44ADD,3,n%,d%,1 42724ENDIF 42724Pa%=TRUE:_l%=n%:`l%=d%:PROCg:ENDPROC 42769DEFPROC_c:SYS&400CF,,h%:IF`l%<0THEN 42805IFh%!12<>_l%OR(h%!8AND7)=0THEN 42814PROC`c:SYS&44AD9,,-2 42841ENDIF 42841ELSE:IFh%!12<>_l%ORh%!16<>`l%OR(h%!8AND7)=0THEN 42859PROC`c:SYS&44ADD,3,_l%,`l%,0 42886ENDIF 42886ENDIF 42895ENDPROC 42904DEFPROC`c:CASE_l%OF 42931WHENo%:PROCgb(`l%) 42949WHENk%:PROCec(`l%) 42958WHENMf%:PROCCb(`l%) 42967WHENt%:PROCBc(`l%) 42976WHENl%:PROCwb(`l%) 42985WHENm%:PROCad(`l%) 42994WHENvd%:PROCbd(`l%) 43003WHEN_a%:PROCcd(`l%) 43012ENDCASE 43012Pa%=FALSE:PROCg:ENDPROC 43039DEFPROCbb:LOCALA%:IFza%THEN 43075za%=FALSE 43093ELSE:IFUa%<>0THENPROCdd 43102IFPa%THENPROC_c 43111IFLa%THENPROCwc 43120IFqa%THENPROCE(BEAT,(cl%ANDqa%)) 43129IFIa%THENPROCYc 43138IFKa%THENPROCab 43147IFTa%THENPROCgc 43156IFQa%THENPROCtb 43165IFyb%THENPROCdb 43174IFKb%THENPROChc 43183IFRa%THENPROCed 43192IFvc%THENPROCMc 43201ENDIF 43210A%=&20+&20+&2:SYSA%TOA%:IFub%=-1THENub%=A%+89975 43237IFA%>ub%THENPROCb(CHR$(117),TRUE):va%=TRUE 43246ENDPROC 43255DEFPROCYc:LOCALX%,Y%,B%,c%:MOUSEX%,Y%,B%:SYS&44AD4,0,qc%,rc%,X%,Y%TOc%:CASEqc%OF 43336WHENm%:CASErc%OF 43354WHENhe%:SYS&44ACB,m%,ge%,(c%-128)*4096/128:SYS&40187,(c%-128)*4096/128+ya%:sc%=-1:PROCMc 43408WHENie%:PROCfd(c%) 43426ENDCASE 43426WHENt%:CASErc%OF 43444WHENof%:PROCd((c%+40)) 43462WHENqf%:PROCq(c%) 43471ENDCASE 43471WHENo%:CASErc%OF 43489WHENgg%:PROCd((c%+40)) 43507WHEN`f%:PROCq(c%) 43516ENDCASE 43516WHENl%:CASErc%OF 43534WHENuh%:PROCd((c%+40)) 43552WHENyh%:PROCq(c%) 43561ENDCASE 43561WHENk%:CASErc%OF 43579WHENQg%:PROCd((c%+40)) 43597WHENOg%:PROCq(c%) 43606ENDCASE 43606ENDCASE 43615ENDPROC 43624DEFPROCgd(A%):!h%=A%:SYS&400CB,,h%:h%!28=-1:SYS&400C5,,h%:ENDPROC 43687DEFPROCDc(s%):SYS&44AE7,0,s%,Nh%:ENDPROC 43723DEFPROCKc(s%):LOCALam%:SYS&400CF,,g%:IF(g%!8AND1)THENam%=1ELSEam%=2 43768IFs%!4=-1THEN 43777CASEbm%OF 43786WHENWh%:CASE!s%OF 43804WHEN0:SYS&400D4,,kd%,g%!0-50,g%!4+50:am%=3 43822WHEN1:PROChd 43831WHEN2:PROCid 43840ENDCASE 43840WHENXh%:PROCjd(!s%) 43858WHENYh%:PROCHb(!s%) 43867ENDCASE 43867ENDIF 43876CASEam%OF 43885WHEN1:SYS&400D4,,bm% 43903WHEN2:SYS&400D4,,-1 43912ENDCASE 43912ENDPROC 43921DEFPROC`(A%,X%,Y%):SYS&400D4,,A%,X%,Y%:bm%=A%:ENDPROC 43966DEFPROCh(A%):g%!0=A%:SYS&44AE7,1,g%,Nh%:ENDPROC 44011DEFPROCJc(s%):CASE!s%OF 44038WHENvd%:PROCkd(s%!4,s%!24) 44056WHENk%:PROCkc(s%!4,s%!24) 44065OTHERWISE:SYS&400DC,s%!24 44074ENDCASE 44074ENDPROC 44083DEFPROCg:IFLa%OR(Ua%<>0)ORQa%ORPa%ORyb%ORKb%ORqa%ORIa%ORKa%ORRa%ORTa%ORvc%THENMa%=Na%ELSEMa%=Oa% 44110ENDPROC 44119DEFPROCG(n%,d%,X%,Y%):SYS&44AD4,3,n%,d%,X%,Y%:rc%=d%:qc%=n%:Ia%=TRUE:PROCg:ENDPROC 44191DEFPROCca:LOCALcm%:SYS&35,-1,4TO,,nk%:SYS&35,-1,5TO,,dm%:SYS&35,-1,9TO,,cm%:SYS&35,-1,11TO,,em%:SYS&35,-1,12TO,,fm%:nk%=2^nk%:dm%=2^dm%:em%=(em%+1)*nk%:fm%=(fm%+1)*dm%:IFfm%<>xc%ORem%<>wc%THENRa%=TRUE:PROCg 44317xc%=fm%:wc%=em%:IFNOT((nk%<>!Ni%)OR(dm%<>!Oi%)OR(cm%<>yc%))THENENDPROC 44335yc%=cm%:!Ni%=nk%:!Oi%=dm%:IFw%=1THENPROCz 44380PROCIb:IFw%=2THENPROCrb 44398IFw%=3THENPROCXb 44407ENDPROC 44416DEFPROCCc(s%):LOCALX%,Y%,A%,H%,J%:!g%=!s%:CASE!g%OF 44461WHENjd%:PROCld 44479OTHERWISE:SYS&400C8,0,g%TOA%:H%=g%!4-g%!20:J%=g%!16-g%!24:WHILEA%<>0:SYS&44ACD,,g%:CASE!g%OF 44533WHENt%:PROCzc(H%,J%) 44551WHENo%:PROC`a(H%,J%,g%) 44560WHENk%:PROCac(H%,J%,g%) 44569WHENl%:PROCsb(H%,J%,g%) 44578WHENdh%:PROC`b(H%,J%,g%) 44587ENDCASE 44587SYS&400CA,,g%TOA%:ENDWHILE 44614ENDCASE 44614IF!g%=dh%ANDCa%THENSYS&44AE3,7,Hc%,dh%:Ca%=FALSE 44623SYS&40+2TOB%:IFEb%<0THENEb%=B%+89980 44641IFB%>=Eb%THEN 44650A$=MID$(3,1,"You"):PROCb(A$,TRUE):va%=TRUE 44686ENDIF 44686ENDPROC 44695DEFPROCed:LOCALe%:Ra%=FALSE:FORe%=0TOgd%:h%!0=f%(e%,0):SYS&600CB,,h%:IF(h%!32AND2^16)=2^16THENPROCmd(e%) 44767NEXT:PROCg:ENDPROC 44794DEFPROCT(n%):LOCALe%:FORe%=0TOgd%:IFf%(e%,0)=n%THENPROCmd(e%) 44839NEXT:ENDPROC 44857DEFPROCmd(gm%):LOCALhm%,X%,Y%,n%,af%,S%,im%,jm%:n%=f%(gm%,0):af%=f%(gm%,1):S%=f%(gm%,2):im%=f%(gm%,3):jm%=f%(gm%,4):A%=TRUE:!h%=n%:IFBa%THEN 44956X%=wc%:Y%=xc% 44974ELSE:X%=-1:Y%=-1:SYS&400CB,,h%:IF(h%!32AND2^16)<>0THENA%=FALSE 45001ENDIF 45010IFX%<af%THENX%=af% 45019IFY%<S%THENY%=S% 45028IFA%THEN 45037h%!4=wc%/2-X%/2:h%!8=xc%/2-Y%/2:h%!12=wc%/2+X%/2:h%!16=xc%/2+Y%/2:h%!20=im%-X%/2+af%/2:h%!24=jm%+Y%/2-S%/2:h%!28=-1:SYS&44AE7,0,h%,Nh% 45118ENDIF 45118IFNOTBa%THEN 45127SYS&400CB,,h%:h%!100=n%:SYS&400E0,,h%+100:IFh%!104<0THENh%!12-=h%!4:h%!4=0 45163IFh%!108<0THENh%!16-=h%!8:h%!8=0 45172IFh%!112>wc%THEN 45181h%!4-=(h%!112-wc%):h%!12-=(h%!112-wc%) 45208ENDIF 45208IFh%!116>xc%THEN 45217h%!8-=(h%!116-xc%):h%!16-=(h%!116-xc%) 45244ENDIF 45244SYS&400C6,,h%:SYS&44AE7,0,h%,Nh% 45271ENDIF 45271ENDPROC 45280DEFPROCoa(j%):LOCALq$,n%:CASEj%OF 45316WHEN0:q$="Sound Box - "+C$:n%=t% 45334WHEN1:q$="Tune Box - "+v$:n%=o% 45343WHEN2:q$="Chord Box - "+D$:n%=l% 45352WHEN3:q$="Beat Box - "+B$:n%=k% 45361ENDCASE 45361q$+=FNE(j%):SYS&44AEB,1,n%,q$:ENDPROC 45388DEFFNE(j%):LOCALy%:CASEj%OF 45424WHEN0:y%=Zc% 45442WHEN1:y%=Xc% 45451WHEN2:y%=_c% 45460WHEN3:y%=Yc% 45469ENDCASE 45469IFy%THEN=" *"ELSE="" 45478DEFPROCl(j%):IFFNE(j%)=" *"THENENDPROC 45505CASEj%OF 45514WHEN0:Zc%=TRUE 45532WHEN1:Xc%=TRUE 45541WHEN2:_c%=TRUE 45550WHEN3:Yc%=TRUE 45559ENDCASE 45559PROCoa(j%):ENDPROC 45577DEFPROCid:IFZc%OR_c%ORYc%ORXc%THENPROCn(2,-1)ELSEva%=TRUE 45604ENDPROC 45613DEFPROCPc(p%,d%):LOCALTk%,X%,Y%,B%,T%:IFp%=4*16ANDd%=nd%THEN 45658ENDPROC 45676ENDIF 45685IFp%>7THENENDPROC 45694CASEd%OF 45712WHENpd%:PROCe(vd%,d%) 45730WHENqd%:PROCe(vd%,d%) 45739WHEN7:SYS&44ADD,2,vd%,od%,"Competition":SYS&400D2,vd%,od%,0,0,-1,11 45766ENDCASE 45766ENDPROC 45775DEFPROCv(n%,km%):LOCALy%:CASEkm%OF 45811WHEN1:y%=Xc% 45829WHEN3:y%=Yc% 45838WHEN5:y%=_c% 45847WHEN7:y%=Zc% 45856OTHERWISE:y%=FALSE 45865ENDCASE 45865IFy%THEN 45874lm%=n%:mm%=km%:PROCn(3,-2) 45910ELSE:PROCnd(n%,km%) 45928ENDIF 45928ENDPROC 45937DEFPROCnd(n%,km%):LOCALc$,t$,a$:IF(km%AND1)=1THEN 45973c$="Load":IFNOTnm%THENPROCI:ENDPROC 45991ELSE:c$="Save":IFNOTom%THENPROCI:ENDPROC 46018ENDIF 46027CASEkm%OF 46036WHEN0,1:t$="Tune":a$=v$ 46054WHEN2,3:t$="Beat":a$=B$ 46063WHEN4,5:t$="Chord":a$=D$ 46072WHEN6,7:t$="Sound":a$=C$ 46081ENDCASE 46081IFc$="Load"THENa$="" 46090SYS&44ADD,2,vd%,od%,a$:IFFNW(t$)THEN 46108lm%=n%:pm%=km%:SYS&44AEB,1,vd%,c$+" File":SYS&44AE7,2,vd%,Nh%,-1,0:SYS&400D2,vd%,od%,0,0,-1,0 46162ENDIF 46162ENDPROC 46171DEFPROCr:PROCh(vd%):PROCod:ENDPROC 46216DEFFNW(c$):LOCALN%,u$,a$,A%,B%:PROCod:SYS&20023,"MB"+c$+"Files$Dir",h%,-1,0,0TO,,A%:IFA%>=0THENOSCLI("*SET MB"+c$+"Files$Dir "+k$+"."+c$) 46270u$="<MB"+c$+"Files$Dir>":SYS&8,17,u$TON%:IFN%=0THENSYS&20008,8,u$,,,0 46297SYS&8,17,u$TON%:IFN%<>2THENPROCb("Load / Save window can not be opened because no '!MBFiles' directory can be found.",FALSE):=FALSE 46315!g%=1:g%!4=Da%:SYS&64AEA,0,u$,g%,"*",pa%TOA%,Vb%;P%:IF(P%AND1)=1THENPROCb(FNc(A%+4),FALSE):=FALSE 46351IFA%=-1THENPROCc("Due to lack of memory, the list of files has been truncated.") 46360!Sh%=!(!Vb%):Qh%!8=Vb%:SYS&44AE8,0,Th%,Qh%:jd%=!Qh%:!Ph%=!Qh%:=TRUE 46441DEFPROCld:!g%=jd%:g%!76=-2:SYS&44AE8,3,g%,Qh%TOA%:WHILEA%<>0:SYS&44AE8,3,g%,Qh%TOA%:ENDWHILE:ENDPROC 46504DEFPROCod:IFjd%<>0THEN 46531!g%=jd%:SYS&400C3,,g%:jd%=0 46567ENDIF 46567IFVb%<>0THEN 46576SYS&44AC3,,Vb%:Vb%=0 46603ENDIF 46603ENDPROC 46612DEFPROCbd(d%):CASEd%OF 46639WHENpd%:PROCpd 46657WHENqd%:PROCr 46666ENDCASE 46666ENDPROC 46675DEFPROCWc(p%,X%,Y%):SYS&44AE8,2,,Qh%,X%,Y%TO,,,X%,Y%:IFX%=0ANDY%>0THEN 46711SYS&44ADD,2,vd%,od%,(!Vb%+4+16*Y%-16):SYS&400D2,vd%,od%,0,0,-1,LEN(FNc(!Vb%+4+16*Y%-16)):IF(p%AND5)<>0THEN 46738PROCpd 46756ELSE:?(!Vb%+4+16*Y%-4)=1:PROCqd(X%,Y%):PROCZc("FNA("+STR$(X%)+","+STR$(Y%)+")") 46792ENDIF 46792ENDIF 46801ENDPROC 46810DEFFNA(X%,Y%):?(!Vb%+4+16*Y%-4)=0:PROCqd(X%,Y%):=0 46882DEFPROCqd(X%,Y%):SYS&44AE8,4,g%,Qh%,X%,Y%TOA%:WHILEA%<>0:SYS&44AE8,3,g%,Qh%TOA%:ENDWHILE:ENDPROC 46927DEFPROCpd:LOCALa$:SYS&44ADE,2,vd%,od%,h%,256:a$=FNc(h%):IFa$=""THENPROCc("Please type a name in the white box."):ENDPROC 46981IFa$="Competition"ANDpm%=0THEN 46990A%=FNX(a$):CASEA%OF 47008WHEN1:PROCn(4,-4) 47026WHEN2:PROCrd(a$) 47035ENDCASE 47035ELSE:PROCrd(a$) 47062ENDIF 47062ENDPROC 47071DEFPROCsd:LOCALa$,l$:SYS&44ADE,2,vd%,od%,h%,256:a$=FNc(h%):l$=FNC(a$):SYS&20008,6,l$TOA%;P%:IF(P%AND1)<>0THENPROCb("Sorry I can't overwrite the file. ("+FNc(A%+4)+")",FALSE):ENDPROC 47143PROCrd(a$):ENDPROC 47161DEFPROCrd(a$):LOCALj%,A%:IF(pm%AND1)=1THEN 47197SYS&8,17,FNC(a$)TOA%:IFA%<>1THENPROCc("File '"+a$+"' does not exist. Please try a different file."):j%=-2:ENDPROC 47215ENDIF 47224CASEpm%OF 47233WHEN0:IFa$="Competition"THEN 47251PROCeb:v$=a$:Xc%=FALSE:j%=1 47269ELSE:PROCc("Click on the competition icon and OK to save from this demo."):j%=-2 47287ENDIF 47287WHEN1:IFa$="Competition"THENa$="<MusicBoxD$Dir>.1" 47305v$=a$:Xc%=FALSE:j%=1:PROCfb(a$) 47332WHEN2:PROCc("You can not save beat box files from this demo."):j%=-4 47341WHEN3:IFa$="Competition"THEN 47350PROCc("The competition file only works in Tune Box."):j%=-4 47368ELSE:PROCoc(a$):B$=a$:Yc%=FALSE:j%=3 47386ENDIF 47386WHEN4:PROCc("You can not save chord box files from this demo."):j%=-3 47404WHEN5:IFa$="Competition"THEN 47413PROCc("The competition file only works in Tune Box."):j%=-4 47431ELSE:PROCF(a$,2):D$=a$:_c%=FALSE:j%=2 47449ENDIF 47449WHEN6:PROCc("You can not save sound box files from this demo."):j%=-1 47467WHEN7:IFa$="Competition"THEN 47476PROCc("The competition file only works in Tune Box."):j%=-4 47494ELSE:PROCF(a$,0):C$=a$:Zc%=FALSE:j%=0 47512ENDIF 47512ENDCASE 47521IFj%>0THENPROCoa(j%) 47530ENDPROC 47539DEFPROCkd(d%,vl%):IFvl%=13THEN 47566PROCpd 47584ELSE:SYS&400DC,s%!24 47602ENDIF 47602ENDPROC 47611DEFPROCNc(s%):IFs%!40<>Da%THENENDPROC 47638s%!12=s%!8:s%!16=4:SYS&400E7,17,s%,s%!4:PROCtd(FNc(s%+44)):ENDPROC 47683DEFPROCtd(e$):LOCALA%,Vh%,xa%:SYS&8,17,e$TOA%,,,,xa%:IFA%=1ANDxa%>4THEN 47728Vh%=OPENIN(e$):A$="":FORA%=1TO8:A$+=CHR$(BGET#Vh%):NEXT:CLOSE#Vh%:CASEA$OF 47791WHEN"MBCompos","MBTune ":PROCfb(e$) 47809WHEN"MBRhythm","MBBeat ":PROCoc(e$) 47818WHEN"MBSound ":PROCF(e$,0) 47827WHEN"MBChord ":PROCF(e$,2) 47836OTHERWISE:A%=0 47845ENDCASE 47845ELSE:A%=0 47872ENDIF 47872IFA%=0THENPROCb("Music file not understood.",FALSE):ENDPROC 47881ENDPROC 47890DEFFNJ(a$):=FND(a$,TRUE) 47935DEFFND(a$,qm%):LOCALN%,A%:SYS&20008,17,a$TON%:IFN%<>0THEN 47962IFN%<>1THEN 47971PROCb("File already exists as a directory. Please choose a different name.",FALSE):=0 47989ELSE:A%=1:IFqm%THEN 48007$(g%+4)="File already exists. Do you want to overwrite it?"+CHR$0:SYS&400DF,g%,%011011,o$TO,A% 48034ENDIF 48034IFA%<>1THEN=0 48043SYS&20008,6,a$TOA%;P%:IF(P%AND1)=1THENPROCb(FNc(A%+4),FALSE):=0 48061ENDIF 48070ENDIF 48079SYS&2000D,&83,a$TOA%;P%:IF(P%AND1)=1THENPROCb(FNc(A%+4),FALSE):=0 48097=A% 48196DEFFNf(b$,a%):$g%=b$:=FNu(g%,LEN(b$),a%) 48232DEFFNb(l,a%):!g%=l:=FNu(g%,4,a%) 48268DEFFNu(wa%,xa%,a%):LOCALP%,A%,B%:SYS&2000C,2,a%,wa%,xa%TOB%,,,A%;P%:IF(P%AND1)=1THEN=B% 48295IFA%<>0THEN!g%=4:$(g%+4)="No space on disc."+CHR$0:=g% 48304=0 48385DEFFNR(a$):LOCALP%,A%:IFFNY(a$,"Defaults",8)THEN=0 48403SYS&20008,18,a$,Da%TOA%;P%:IF(P%AND1)=1THEN=A% 48421=0 48448DEFFNh(RETURNb$,xa%,a%):LOCALA%:A%=FNk(g%,xa%,a%):IFA%<>0THEN=A% 48475b$="":FORA%=0TOxa%-1:b$=b$+CHR$(?(g%+A%)):NEXT:=0 48673DEFFNj(a%):LOCALb%,c%:b%=FNa(c%,a%):SYS&20009,0,a%TOA%,,B%;P%:IF(P%AND1)=1THEN=A% 48709SYS&20009,1,a%,B%+c%-8TOA%;P%:IF(P%AND1)=1THEN=A% 48727=b% 48754DEFFNY(Q$,R$,xa%):LOCALrm%,I%:rm%=TRUE:sm%=LEN(Q$):tm%=LEN(R$):FORI%=0TOxa%-1:IF(ASC(MID$(Q$,sm%-I%,1))OR32)<>(ASC(MID$(R$,tm%-I%,1))OR32)THENrm%=FALSE 48808NEXT:=rm% 48844DEFFNX(a$):LOCALc$,N%:a$=FNC(a$):SYS&20008,17,a$TON%:IF(pm%AND1)=1THEN 48880IFN%<>0THEN 48889IFN%<>1THEN 48898PROCc("Sorry, I can't use that name because it is a directory. Please choose a different name."):=0 48916ELSE:=2 48934ENDIF 48934ENDIF 48943PROCc("That file does not exist. Please choose a different name."):=0 48961ELSE:IFN%<>0THEN 48970IFN%<>1THEN 48979PROCc("Sorry, I can't use that name because it already exists as a directory. Please choose a different name."):=0 48997ELSE:=1 49015ENDIF 49015ENDIF 49024ENDIF 49033=2 49060DEFFNC(a$):CASEpm%OF 49069WHEN0,1:c$="Tune" 49087WHEN2,3:c$="Beat" 49096WHEN4,5:c$="Chord" 49105WHEN6,7:c$="Sound" 49114ENDCASE 49114IFa$="Competition"THENa$="<MusicBoxD$Dir>.1" 49123IFINSTR(a$,".")=0THENa$="<MB"+c$+"Files$Dir>."+a$ 49132=a$ 49168DEFPROCOc(d%,X%,Y%):CASEd%OF 49177WHENZd%:PROC`(Xh%,X%,Y%) 49195WHEN_d%:PROCe(m%,_d%) 49204ENDCASE 49204ENDPROC 49213DEFPROCjd(c%):IFc%>=0ANDc%<=14THENPROCM(c%) 49240ENDPROC 49249DEFFNn(p%,d%,X%,Y%):X%=TRUE:CASEd%OF 49285WHENEe%:SYS&40187,um%:IF(p%AND4)=4THENPROCudELSEPROCvd 49312WHENDe%:IF(p%AND4)=4THENPROCud 49330PROCwd:PROCxd 49357WHENFe%:IF(p%AND4)=4THENPROCud 49366PROCwd 49384WHENxe%:PROCN(`%) 49393WHENye%:PROCN(m%) 49402WHENze%:PROCN(Od%) 49411WHENAe%:PROCN(Me%) 49420WHENBe%:PROCN(We%) 49429WHENCe%:PROCyd:IF(p%AND4)=4THENPROCudELSEPROCvd 49447OTHERWISEX%=FALSE 49465ENDCASE 49465=X% 49492DEFPROCSc(p%,d%,X%,Y%):LOCALc%,A%,A$:IFp%AND5THEN 49510IFNOTFNn(p%,d%,X%,Y%)THEN 49519CASEd%OF 49528WHENLd%-1,Ld%+1,Ld%:IFd%=Ld%THENd%-=1 49546vm%+=Ld%-d%:IFvm%>2THENvm%=0 49564IFvm%<0THENvm%=2 49573SYS&44ADD,1,Od%,Ld%,FNF(vm%) 49591WHENId%-1,Id%+1:SYS&44ACA,Od%,Id%,Id%-d%,16,1 49609WHENJd%-1,Jd%+1:SYS&44ACA,Od%,Jd%,Jd%-d%,7,1 49627WHENKd%-1,Kd%+1:SYS&44ACA,Od%,Kd%,Kd%-d%,vb%/24,1 49645ENDCASE 49645ENDIF 49654ENDIF 49663ENDPROC 49672DEFPROCQc(p%,d%,X%,Y%):LOCALc%,A%,A$:IFp%AND5THEN 49708IFNOTFNn(p%,d%,X%,Y%)THEN 49717CASEd%OF 49726WHENGe%-1,Ge%+1:SYS&44ACC,Me%,Ge%TO,,c%:CASEc%OF 49753WHEN6:c%=5 49771WHEN8:c%=6 49780WHEN12:c%=7 49789ENDCASE 49789c%+=Ge%-d%:IFc%<1THENc%=7 49807IFc%>7THENc%=1 49816CASEc%OF 49825WHEN5:c%=6 49843WHEN6:c%=8 49852WHEN7:c%=12 49861ENDCASE 49861SYS&44ACB,Me%,Ge%,c% 49879WHENHe%-1,He%+1:SYS&44ACA,Me%,He%,He%-d%,7,1 49897WHENIe%-1,Ie%+1:SYS&44ACA,Me%,Ie%,Ie%-d%,Sb%,1 49915WHENJe%-1,Je%+1:SYS&44ADE,2,Me%,Je%,g%,16:c%=EVAL(FNc(g%))*2:c%+=(Je%-d%):IFc%<2THENc%=14 49951IFc%>14THENc%=2 49960SYS&44ADD,2,Me%,Je%," "+STR$(c%/2) 49978ENDCASE 49978ENDIF 49987ENDIF 49996ENDPROC 50005DEFPROCRc(p%,d%,X%,Y%):LOCALc%,A%,A$:IFp%AND5THEN 50041IFNOTFNn(p%,d%,X%,Y%)THEN 50050CASEd%OF 50059WHENPd%:SYS&44ADE,3,`%,d%TO,,,c%:PROCzd(c%) 50095WHENQd%,Rd%,Sd%,Td%:SYS&44ADD,7,`%,d%:SYS&44ADD,4,`%,Ud%,d%<>Td% 50122WHENVd%,Wd%,Xd%:SYS&44ADD,7,`%,d% 50140ENDCASE 50140ENDIF 50149ENDIF 50158ENDPROC 50167DEFPROCUc(p%,d%,X%,Y%):LOCALc%,A%,A$:IFp%AND5THEN 50203IFNOTFNn(p%,d%,X%,Y%)THEN 50212CASEd%OF 50221WHENUe%,Ve%:SYS&44ADD,7,We%,d% 50248ENDCASE 50248ENDIF 50257ENDIF 50266ENDPROC 50275DEFPROCTc(p%,d%,X%,Y%):LOCALc%,A%,A$:IF(p%AND(5<<4))THEN 50311CASEd%OF 50320WHENie%:PROCG(m%,d%,X%,Y%) 50347WHENhe%:PROCc("Tuning has been disabled for this demo.") 50365ENDCASE 50365ELSE:IFp%AND5THEN 50383IFNOTFNn(p%,d%,X%,Y%)THEN 50392CASEd%OF 50401WHEN`d%,ae%:SYS&44ADD,7,m%,d%:SYS&44ACC,m%,be%TO,,c%:SYS&44ADE,3,m%,ae%TO,,,A%:IFA%ANDc%>0THENc%+=7 50446PROCM(c%) 50464WHENbe%-1,be%+1:SYS&44ACC,m%,be%TO,,c%:c%+=be%-d%:SYS&44ADE,3,m%,ae%TO,,,A%:IFc%<0THENc%=7:SYS&44ADD,3,m%,ae%,NOTA%:SYS&44ADD,3,m%,`d%,A%:A%=NOTA% 50500IFc%>7THENc%=0:SYS&44ADD,3,m%,ae%,NOTA%:SYS&44ADD,3,m%,`d%,A%:A%=NOTA% 50509IFA%ANDc%>0THENc%+=7 50518PROCM(c%) 50536WHEN_d%:PROCe(m%,_d%) 50554WHENie%:SYS&44AD4,0,m%,d%,X%,Y%TOc%:PROCfd(c%) 50581WHENhe%,ge%-1,ge%+1,fe%-1,fe%+1,ee%-1,ee%+1:PROCc("Tuning has been disabled for this demo.") 50599WHENce%:PROCM(0) 50617ENDCASE 50617ENDIF 50626ENDIF 50635ENDIF 50644ENDPROC 50653DEFPROCad(d%):LOCALX%,Y%,B%:MOUSEX%,Y%,B%:IFd%=_d%THENPROC`(Xh%,X%,Y%) 50698ENDPROC 50707DEFPROChd:CASEw%OF 50734WHEN0:PROCo(t%,if%,df%) 50752WHEN1:PROCj 50761WHEN2:PROCo(l%,sh%,wh%) 50770WHEN3:PROCx 50779ENDCASE 50779wm%=qa%:PROCm:xm%=0:PROCvd:SYS&44AD6,m%,-1:ym%=m%:ENDPROC 50842DEFPROCN(n%):IFn%=ym%THENENDPROC 50869!g%=ym%:SYS&400CB,,g%:SYS&400C6,,g%:!g%=n%:SYS&400C5,,g%:ym%=n%:ENDPROC 50932DEFPROCvd:LOCALc%:SYS&44ADD,3,m%,ce%,Xa%:PROCM(Ul%):zm%=Vl%:SYS&44ACB,m%,fe%,zm%-2:SYS&40187,0TOum%:SYS&44ACB,m%,ge%,um%-ya%:SYS&44AD4,2,m%,he%,((um%-ya%)*128/4096)+128:SYS&44AD4,2,m%,ie%,pb%*2:Am%=pb%:SYS&44ADD,3,m%,ke%,Ba% 51049SYS&44ADD,3,m%,je%,Ya%:SYS&44ADD,3,m%,le%,Za%:SYS&44ADD,3,m%,me%,cl%:SYS&44ADD,3,m%,ne%,Jk%:SYS&44ADD,3,m%,oe%,Ik%:SYS&44ADD,3,m%,pe%,Hk%:SYS&44ADD,3,m%,qe%,Gk%:SYS&44ADD,3,m%,re%,Kk%:SYS&44ADD,3,m%,se%,Lk% 51130SYS&44ADD,3,m%,te%,Mk%:SYS&44ADD,3,m%,ue%,nm%:SYS&44ADD,3,m%,ve%,om%:SYS&44ADD,3,m%,we%,Nk%:SYS&44ADD,3,Od%,Md%,Bm%:SYS&44ADD,3,Od%,Nd%,Cm%:SYS&44ACB,Od%,Id%,ik%DIV(2^Db%):SYS&44ACB,Od%,Jd%,Dm%:SYS&44ACB,Od%,Kd%,W%/24:vm%=Db% 51238SYS&44ADD,1,Od%,Ld%,FNF(vm%):SYS&44ACB,Me%,Ge%,O%:SYS&44ACB,Me%,He%,Ll%:SYS&44ACB,Me%,Ie%,jl%:c%=2*Ob%/K%:SYS&44ADD,2,Me%,Je%," "+STR$(c%/2):SYS&44ADD,3,Me%,Ke%,wl%:SYS&44ADD,3,Me%,Le%,il%:FORc%=0TO3 51328SYS&44ADD,3,`%,Qd%+c%,(ga%AND&F)=c%:NEXT:IF(ga%AND3)=3ANDga%>=0THENSYS&44ACB,`%,Ud%,ga%>>4 51355SYS&44ADD,4,`%,Ud%,(ga%AND3)<>3ORga%<0:SYS&44ADD,7,`%,Vd%+ha%:SYS&44ADD,3,`%,Yd%,ia%:PROCzd(ga%>=0):SYS&44ADD,3,We%,Ne%,Pl%:SYS&44ADD,3,We%,Oe%,Em%:SYS&44ADD,3,We%,Pe%,Xl%:SYS&44ADD,3,We%,Qe%,Wl%:SYS&44ADD,3,We%,Re%,hl% 51445SYS&44ADD,3,We%,Se%,Fk%:SYS&44ADD,3,We%,Te%,Dl%:SYS&44ADD,3,We%,Ue%,Bk%:SYS&44ADD,3,We%,Ve%,NOTBk%:ENDPROC 51490DEFFNF(A%):CASEA%OF 51517WHEN0:="snl1" 51535WHEN1:="snl2" 51544WHEN2:="snl3" 51553ENDCASE 51553="" 51580DEFPROCM(c%):LOCALA$:A$=MID$(" C G D A E BF#C# FBbEbAbDbGbCb",c%*2+1,2)+" Major":IFMID$(A$,1,1)=" "THENA$=MID$(A$,2) 51607SYS&44ADD,2,m%,Zd%,A$:IFc%>7THENFm%=TRUE:c%-=7ELSEFm%=FALSE 51625IFc%>0THEN 51634IFFm%THEN 51643SYS&44ADD,7,m%,ae% 51661ELSE:SYS&44ADD,7,m%,`d% 51679ENDIF 51679ENDIF 51688SYS&44ACB,m%,be%,c%:SYS&44ADE,3,m%,ce%TO,,,A%:IFA%THENA%=-1ELSEA%=0 51715SYS&44ADD,4,m%,Zd%,A%:SYS&44ADD,4,m%,ae%,A%:SYS&44ADD,4,m%,`d%,A%:SYS&44ADD,4,m%,be%-1,A%:SYS&44ADD,4,m%,be%,A%:SYS&44ADD,4,m%,be%+1,A%:SYS&44ADD,4,m%,_d%,A%:ENDPROC 51787DEFPROCwd:LOCALA%,c%:PROCi:SYS&44ACC,m%,be%TO,,c%:SYS&44ADE,3,m%,ae%TO,,,A%:IFA%ANDc%>0THENc%+=7 51850SYS&44ADE,3,m%,ce%TO,,,A%:IFXa%<>A%THEN 51877Xa%=A%:IFA%THENA%=0ELSEA%=2 51895!Fi%=A%:Cb%=A%:IFw%=1THEN 51922PROCz:A%=0:CALLwi% 51958ENDIF 51958ENDIF 51967SYS&44ACC,m%,fe%TO,,A%:Vl%=A%+2:PROCtc(c%):SYS&44AD4,1,m%,ie%TOpb%:pb%=pb%/2:IFDb%<>vm%THEN 52039IFw%=1THENPROCj:PROCy(2^vm%,gb%) 52048Db%=vm% 52066ENDIF 52066SYS&44ADE,3,m%,ke%TO,,,A%:IFA%<>Ba%THEN 52093Ba%=A%:CASEw%OF 52111WHEN0:PROCAc:PROCEb 52129WHEN1:PROCY:PROC_a 52138WHEN2:PROCvb:PROCqb 52147WHEN3:PROCZb:PROCFb 52156ENDCASE 52156ENDIF 52165SYS&44ADE,3,m%,je%TO,,,Ya%:SYS&44ADE,3,m%,le%TO,,,Za%:SYS&44ADE,3,m%,me%TO,,,cl%:IF((NOTcl%)AND(w%>=0))THENPROCE(0,TRUE) 52210SYS&44ADE,3,Od%,Md%TO,,,Bm%:SYS&44ADE,3,Od%,Nd%TO,,,Cm%:SYS&44ACC,Od%,Id%TO,,ik%:ik%=ik%*(2^Db%):SYS&44ACC,Od%,Jd%TO,,Dm%:!ck%=Dm%:SYS&44ACC,Od%,Kd%TO,,A%:A%=A%*24:IFA%<>W%THEN 52300c%=TRUE:IFA%<USR(ai%)THEN 52318!g%=4:$(g%+4)="Reducing the paper length for the tune box will truncate the present tune. Shall I continue and reduce it?"+CHR$0:SYS&400DF,g%,%11011,o$TO,c%:c%=(c%=1) 52363ENDIF 52363IFc%THEN 52372W%=A%:!Zh%=A%:!_h%=A%*12:!mi%=A%*12:SYS&44ADA,jc%+A%*12,vb%*12+12-A%*12:IFw%=1THENPROCz:PROCC(0) 52426ENDIF 52435ENDIF 52444SYS&44ACC,Me%,Ge%TO,,B%:SYS&44ACC,Me%,Ie%TO,,A%:C%=O%:IFC%<1THENC%=6 52489C%=((Hb%*C%-1)DIVB%)+1:IFjl%<>A%ORO%<>B%THENPROCVb(C%,B%,A%,TRUE) 52507SYS&44ACC,Me%,He%TO,,B%:SYS&44ADE,2,Me%,Je%,g%,16:A%=EVAL(FNc(g%))*2:A%=A%*K%/2:IFA%<>Ob%ORB%<>Ll%THENPROCpc(A%,B%) 52561SYS&44ADE,3,m%,ne%TO,,,Jk%:SYS&44ADE,3,m%,oe%TO,,,Ik%:SYS&44ADE,3,m%,pe%TO,,,Hk%:SYS&44ADE,3,m%,qe%TO,,,Gk%:SYS&44ADE,3,m%,re%TO,,,Kk%:SYS&44ADE,3,m%,se%TO,,,Lk%:SYS&44ADE,3,m%,te%TO,,,Mk%:SYS&44ADE,3,m%,ue%TO,,,nm% 52642SYS&44ADE,3,m%,ve%TO,,,om%:SYS&44ADE,3,m%,we%TO,,,Nk%:SYS&44ADE,3,Me%,Ke%TO,,,wl%:SYS&44ADE,3,Me%,Le%TO,,,il%:SYS&44ACC,m%,ge%TO,,c%:Gm%=c%:SYS&44ADE,3,`%,Yd%TO,,,ia%:SYS&44ADE,3,`%,Pd%TO,,,c%:IFNOTc%THEN 52750c%=-1 52768ELSE:c%=0:FORe%=0TO3:SYS&44ADE,3,`%,Qd%+e%TO,,,A%:IFA%THENc%=e% 52804NEXT:IFc%=3THENSYS&44ACC,`%,Ud%TO,,c%:c%=(c%<<4OR3) 52822ENDIF 52831ga%=c%:c%=0:FORe%=0TO2:SYS&44ADE,3,`%,Vd%+e%TO,,,A%:IFA%THENc%=e% 52876NEXT:ha%=c%:PROCAd:PROCBd:PROCp:ENDPROC 52930DEFPROCAd:SYS&44ADE,3,We%,Ne%TO,,,Pl%:SYS&44ADE,3,We%,Oe%TO,,,Em%:SYS&44ADE,3,We%,Pe%TO,,,Xl%:SYS&44ADE,3,We%,Qe%TO,,,Wl%:SYS&44ADE,3,We%,Re%TO,,,hl%:SYS&44ADE,3,We%,Se%TO,,,Fk%:SYS&44ADE,3,We%,Te%TO,,,Dl% 53020SYS&44ADE,3,We%,Ue%TO,,,Bk%:ENDPROC 53038DEFPROCyd:ia%=TRUE:Bm%=TRUE:Cm%=FALSE:Ul%=2:Xa%=0:Vl%=4:Gm%=0:pb%=90:Ba%=FALSE:Ya%=TRUE:Za%=TRUE:cl%=TRUE:Jk%=TRUE:Ik%=TRUE:Hk%=TRUE:Gk%=TRUE:Kk%=TRUE:Lk%=TRUE:Mk%=TRUE:nm%=TRUE:om%=TRUE:Nk%=TRUE:ik%=4*2:Dm%=4:W%=100:Db%=1:O%=6:Ll%=4:jl%=100:Ob%=2*K%:wl%=TRUE:il%=TRUE:ga%=-1:ha%=0:Pl%=TRUE 53389Em%=FALSE:Xl%=FALSE:Wl%=FALSE:hl%=FALSE:Fk%=FALSE:Dl%=FALSE:Bk%=FALSE:SYS&40187,ya%+Gm%:ENDPROC 53470DEFPROCMc:LOCALA%,Sk%:SYS&44ADE,2,m%,ee%,g%,8:c%=(INSTR("A A#B C C#D D#E F F#G G#",FNc(g%))-1)/2:Sk%=EVAL(MID$("&0C00&0D55&0EAA&1000&1155&12AA&1400&1555&16AA&1800&1955&1AAA",c%*5+1,5))+&1000*zm%:SYS&400CF,,g% 53533A%=((rc%=he%)AND(m%=qc%)ANDIa%):IFg%!12=m%THEN 53551CASEg%!16OF 53560WHEN13,67,20,21,22,31,32,33,34,35,36,37,38,39,40:A%=TRUE 53578ENDCASE 53578ENDIF 53587IFA%THEN 53596IFtc%THEN 53605IFsc%<>Sk%THENSOUND8,&1FF,Sk%,255 53614ELSE:SOUND8,&17F,Sk%,255:tc%=TRUE 53650ENDIF 53650ELSE:IFtc%THENSOUND8,0,Sk%,1 53668tc%=FALSE 53686ENDIF 53686sc%=Sk%:ENDPROC 53704DEFPROCfd(c%):LOCALA%:Am%=c%/2:SYS&42TOA%:IFA%>xm%THEN 53758xm%=A%+30:SOUND8,&100+Am%,80,2 53785ENDIF 53785ENDPROC 53794DEFPROCud:PROCh(ym%):IFwm%THENPROCt 53830ENDPROC 53839DEFPROCzd(c%):LOCALA%,Hm%:c%=NOTc%:SYS&44ADD,3,`%,Pd%,NOTc%:SYS&44ADD,4,`%,Qd%,c%:SYS&44ADD,4,`%,Rd%,c%:SYS&44ADD,4,`%,Sd%,c%:SYS&44ADD,4,`%,Td%,c%:Hm%=-1:FORe%=0TO3:SYS&44ADE,3,`%,Qd%+e%TO,,,A%:IFA%THENHm%=e% 53956NEXT:IFHm%=-1THENHm%=0:SYS&44ADD,3,`%,Qd%,TRUE 53974SYS&44ADD,4,`%,Ud%,(c%ORHm%<>3):ENDPROC 53992DEFPROCxd:LOCALv%,b%,a%,e$:e$="<MBConfigFiles$Dir>.Defaults":a%=FND(e$,FALSE):IFa%=0THENENDPROC 54046b%=FNf("MBConfig",a%):IFb%=0THENb%=FNb(1,a%) 54064IFb%=0THENb%=FNf("Conf",a%) 54073IFb%=0THENb%=FNb(41*4+8,a%) 54082IFb%=0THENb%=FNb(Ul%,a%) 54091IFb%=0THENb%=FNb(Xa%,a%) 54100IFb%=0THENb%=FNb(Vl%,a%) 54109IFb%=0THENb%=FNb(Gm%,a%) 54118IFb%=0THENb%=FNb(pb%,a%) 54127IFb%=0THENb%=FNb(Ba%,a%) 54136IFb%=0THENb%=FNb(Ya%,a%) 54145IFb%=0THENb%=FNb(Za%,a%) 54154IFb%=0THENb%=FNb(cl%,a%) 54163IFb%=0THENb%=FNb(Jk%,a%) 54172IFb%=0THENb%=FNb(Ik%,a%) 54181IFb%=0THENb%=FNb(Hk%,a%) 54190IFb%=0THENb%=FNb(Gk%,a%) 54199IFb%=0THENb%=FNb(Kk%,a%) 54208IFb%=0THENb%=FNb(Lk%,a%) 54217IFb%=0THENb%=FNb(Mk%,a%) 54226IFb%=0THENb%=FNb(nm%,a%) 54235IFb%=0THENb%=FNb(om%,a%) 54244IFb%=0THENb%=FNb(Nk%,a%) 54253IFb%=0THENb%=FNb(ik%,a%) 54262IFb%=0THENb%=FNb(Dm%,a%) 54271IFb%=0THENb%=FNb(W%,a%) 54280IFb%=0THENb%=FNb(Db%,a%) 54289IFb%=0THENb%=FNb(O%,a%) 54298IFb%=0THENb%=FNb(Ll%,a%) 54307IFb%=0THENb%=FNb(jl%,a%) 54316IFb%=0THENb%=FNb(Ob%,a%) 54325IFb%=0THENb%=FNb(wl%,a%) 54334IFb%=0THENb%=FNb(il%,a%) 54343IFb%=0THENb%=FNb(ga%,a%) 54352IFb%=0THENb%=FNb(ha%,a%) 54361IFb%=0THENb%=FNb(Pl%,a%) 54370IFb%=0THENb%=FNb(Em%,a%) 54379IFb%=0THENb%=FNb(Xl%,a%) 54388IFb%=0THENb%=FNb(Wl%,a%) 54397IFb%=0THENb%=FNb(hl%,a%) 54406IFb%=0THENb%=FNb(Fk%,a%) 54415IFb%=0THENb%=FNb(Dl%,a%) 54424IFb%=0THENb%=FNb(Bk%,a%) 54433IFb%=0THENb%=FNb(Bm%,a%) 54442IFb%=0THENb%=FNb(Cm%,a%) 54451IFb%=0THENb%=FNb(ia%,a%) 54460IFb%=0THENb%=FNf("EndX",a%) 54469IFb%=0THENb%=FNb(-1,a%) 54478IFb%=0THENb%=FNi(a%) 54487IFb%<>0THENPROCb(FNc(b%+4),FALSE):b%=FNi(a%) 54496e$="<MBConfigFiles$Dir>.StartUpCon":a%=FND(e$,FALSE):IFa%=0THENENDPROC 54532IFb%=0THENb%=FNb(ga%,a%) 54541IFb%=0THENb%=FNb(ha%,a%) 54550IFb%=0THENb%=FNb(ia%,a%) 54559IFb%=0THENb%=FNi(a%) 54568IFb%<>0THENPROCb(FNc(b%+4)+"/2",FALSE):b%=FNi(a%) 54577ENDPROC 54586DEFPROCda:LOCALv%,b%,a%,e$,A%,c%:PROCi:c%=0:e$="<MBConfigFiles$Dir>.Defaults":b%=0:IFNOTFNg(e$)THENb%=2 54658IFb%=0THENa%=FNl(e$) 54667IFa%=0THENb%=2 54676IFb%=0THENb%=FNh(b$,8,a%) 54685IFb$<>"MBConfig"ANDb%=0THENPROCb("File format not understood.",FALSE):b%=1 54694IFb%=0THENb%=FNa(c%,a%) 54703IFc%>1ANDb%=0THENPROCb("This file was made by a newer version of MusicBox. You will need an upgrade to load it.",FALSE):b%=1 54712IFb%=0THENb%=FNh(b$,4,a%) 54721WHILEb%=0ANDb$<>"EndX":CASEb$OF 54739WHEN"Conf":b%=FNZ(a%) 54757OTHERWISE:b%=FNj(a%) 54766ENDCASE 54766IFb%=0THENb%=FNh(b$,4,a%) 54775ENDWHILE:IFb%<>0ANDb%<>1ANDb%<>2THENPROCb(FNc(b%+4),FALSE) 54802IFb%<>2THENA%=FNi(a%) 54811PROCp:IFb%<>0THENPROCyd 54829PROCvd:Xa%=2:Db%=-1:W%=-1:O%=-1:jl%=-1:Ob%=-1:PROCwd:Pl%=TRUE:Em%=TRUE:Xl%=FALSE:Wl%=FALSE:hl%=TRUE:Fk%=FALSE:Dl%=FALSE:Bk%=TRUE:IFFNg("<MBTuneFiles$Dir>.Defaults")THENPROCfb("Defaults") 54982IFFNg("<MBBeatFiles$Dir>.Defaults")THENPROCoc("Defaults") 54991IFFNg("<MBSoundFiles$Dir>.Defaults")THENPROCF("Defaults",0) 55000IFFNg("<MBChordFiles$Dir>.Defaults")THENPROCF("Defaults",2) 55009PROCAd:ENDPROC 55027DEFFNZ(a%):LOCALb%,v%:b%=FNa(v%,a%):IFb%=0THENb%=FNa(Ul%,a%) 55072IFb%=0THENb%=FNa(Xa%,a%) 55081IFb%=0THENb%=FNa(Vl%,a%) 55090IFb%=0THENb%=FNa(Gm%,a%) 55099IFb%=0THENb%=FNa(pb%,a%) 55108IFb%=0THENb%=FNa(Ba%,a%) 55117IFb%=0THENb%=FNa(Ya%,a%) 55126IFb%=0THENb%=FNa(Za%,a%) 55135IFb%=0THENb%=FNa(cl%,a%) 55144IFb%=0THENb%=FNa(Jk%,a%) 55153IFb%=0THENb%=FNa(Ik%,a%) 55162IFb%=0THENb%=FNa(Hk%,a%) 55171IFb%=0THENb%=FNa(Gk%,a%) 55180IFb%=0THENb%=FNa(Kk%,a%) 55189IFb%=0THENb%=FNa(Lk%,a%) 55198IFb%=0THENb%=FNa(Mk%,a%) 55207IFb%=0THENb%=FNa(nm%,a%) 55216IFb%=0THENb%=FNa(om%,a%) 55225IFb%=0THENb%=FNa(Nk%,a%) 55234IFb%=0THENb%=FNa(ik%,a%) 55243IFb%=0THENb%=FNa(Dm%,a%) 55252IFb%=0THENb%=FNa(W%,a%) 55261IFb%=0THENb%=FNa(Db%,a%) 55270IFb%=0THENb%=FNa(O%,a%) 55279IFb%=0THENb%=FNa(Ll%,a%) 55288IFb%=0THENb%=FNa(jl%,a%) 55297IFb%=0THENb%=FNa(Ob%,a%) 55306IFb%=0THENb%=FNa(wl%,a%) 55315IFb%=0THENb%=FNa(il%,a%) 55324IFb%=0THENb%=FNa(ga%,a%) 55333IFb%=0THENb%=FNa(ha%,a%) 55342IFb%=0THENb%=FNa(Pl%,a%) 55351IFb%=0THENb%=FNa(Em%,a%) 55360IFb%=0THENb%=FNa(Xl%,a%) 55369IFb%=0THENb%=FNa(Wl%,a%) 55378IFb%=0THENb%=FNa(hl%,a%) 55387IFb%=0THENb%=FNa(Fk%,a%) 55396IFb%=0THENb%=FNa(Dl%,a%) 55405IFb%=0THENb%=FNa(Bk%,a%) 55414IFb%=0THENb%=FNa(Bm%,a%) 55423IFb%=0THENb%=FNa(Cm%,a%) 55432IFb%=0THENb%=FNa(ia%,a%) 55441IFb%=0THENSYS&40187,ya%+Gm% 55450=b% 55486DEFPROCBd:SYS&44ADD,1,t%,rf%,FNd("Save",om%):SYS&44ADD,1,t%,sf%,FNd("Load",nm%):SYS&44ADD,1,l%,Bh%,FNd("Save",om%):SYS&44ADD,1,l%,Ch%,FNd("Load",nm%):SYS&44ADD,1,l%,Dh%,FNd("Print",Nk%):SYS&44ADD,1,o%,kg%,FNd("Save",om%) 55558SYS&44ADD,1,o%,lg%,FNd("Load",nm%):SYS&44ADD,1,o%,_f%,FNd("Print",Nk%):SYS&44ADD,1,o%,jg%,FNd("Copy",Lk%):SYS&44ADD,1,o%,ig%,FNd("Clear",Mk%):SYS&44ADD,1+2^9,o%,Sf%,FNd("t1",Gk%),,vg% 55603SYS&44ADD,1+2^9,o%,Sf%+1,FNd("t2",Hk%),,vg%:SYS&44ADD,1+2^9,o%,Sf%+2,FNd("t3",Ik%),,vg%:SYS&44ADD,1+2^9,o%,Tf%,FNd("t4",Jk%),,vg%:SYS&44ADD,1+2^9,o%,Uf%,FNd("t6",Kk%),,vg%:SYS&44ADD,1,k%,Tg%,FNd("Save",om%) 55657SYS&44ADD,1,k%,Ug%,FNd("Load",nm%):SYS&44ADD,1,k%,Wg%,FNd("Print",Nk%):SYS&44ADD,1,k%,Sg%,FNd("Copy",Lk%):SYS&44ADD,1,k%,Rg%,FNd("Clear",Mk%):SYS&44ADD,1+2^9,k%,Bg%,FNd("t1",Gk%),,eh% 55702SYS&44ADD,1+2^9,k%,Bg%+1,FNd("t2",Hk%),,eh%:SYS&44ADD,1+2^9,k%,Bg%+2,FNd("t3",Ik%),,eh%:SYS&44ADD,1+2^9,k%,Dg%,FNd("t6",Kk%),,eh%:ENDPROC 55756DEFFNd(a$,Yl%):IFNOTYl%THEN="sz,pz" 55783="S"+a$+",p"+a$ 55810DEFPROCI:PROCb("You can not use that button. Ask your teacher if you want to use it.",FALSE):ENDPROC 55828DEFPROC_(Im%,d%):LOCALA%:A%=EVAL("FN"+STR$~(Im%)+"("+STR$(d%)+")"):IFUa%=1THEN 55882IFJm%=0THENKm%=0 55891A%=FNt:j%(Lm%)=A%:g%(Lm%)=Jm%:e%(0,Jm%,Lm%)=Im%:e%(1,Jm%,Lm%)=d%:e%(2,Jm%,Lm%)=A%:Jm%+=1:IFJm%>=Va%THENPROCo(Mm%,Nm%,Om%) 55963ENDIF 55972ENDPROC 55981DEFPROCdd:LOCALA%:A%=FNt:IFUa%=2THENPROCCd 56026ENDPROC 56035DEFFNt:LOCALA%:A%=BEAT:IFA%<Pm%THEN 56080IFQm%THEN 56089IFRm%THENJm%=0ELSEJm%=g%(Lm%) 56098Sm%=j%(Lm%):Km%=0:Qm%=FALSE 56134ELSE:Km%+=lb% 56152ENDIF 56152ENDIF 56161Pm%=A%:=A%+Km% 56197DEFPROCo(n%,d%,Tm%):SYS&44ADD,7,n%,d%,1:Ua%=0:Ok%=FALSE:CASEn%OF 56233WHENt%:SYS&44ADD,3,n%,gf%,0 56251WHENl%:SYS&44ADD,3,n%,qh%,0 56260ENDCASE 56260PROCm:PROCsc:PROCs(Tm%,n%,0):PROCt:ENDPROC 56305DEFPROCob(n%,d%,Tm%,j%):Ok%=FALSE:CASEn%OF 56341WHENt%:SYS&44ADD,3,n%,gf%,0 56359WHENl%:SYS&44ADD,3,n%,qh%,0 56368ENDCASE 56368Qm%=FALSE:Nm%=d%:Om%=Tm%:Mm%=n%:Lm%=j%:Ua%=1:Jm%=0:g%(Lm%)=-1:j%(Lm%)=0:Pm%=0:Km%=0:PROCm:PROCt:ENDPROC 56494DEFPROCD(n%,d%,Tm%,j%,Um%):Qm%=FALSE:Rm%=Um%:Nm%=d%:Om%=Tm%:Mm%=n%:Lm%=j%:Ua%=2:IFUm%THENJm%=0ELSEJm%=g%(j%) 56584Sm%=j%(j%):Pm%=0:Km%=0:PROCm:PROCt:ENDPROC 56638DEFPROCCd:LOCALA%:IFRm%THEN 56674REPEAT:A%=TRUE:IFJm%<=g%(Lm%)THEN 56701IFFNt>=e%(2,Jm%,Lm%)THEN 56710A%=EVAL("FN"+STR$~(e%(0,Jm%,Lm%))+"("+STR$(e%(1,Jm%,Lm%))+")"):Jm%+=1:A%=FALSE 56746ENDIF 56746ENDIF 56755UNTILA%:IFJm%>g%(Lm%)THEN 56773IFOk%THEN 56782Qm%=TRUE 56800ELSE:PROCo(Mm%,Nm%,Om%) 56818ENDIF 56818ENDIF 56827ELSE:REPEAT:A%=TRUE:IFJm%>=0THEN 56863IFFNt>=Sm%-e%(2,Jm%,Lm%)THEN 56872A%=EVAL("FN"+STR$~(e%(0,Jm%,Lm%)EOR1)+"("+STR$(e%(1,Jm%,Lm%))+")"):Jm%-=1:A%=FALSE 56908ENDIF 56908ENDIF 56917UNTILA%:IFJm%<0THEN 56935IFOk%THEN 56944Qm%=TRUE 56962ELSE:PROCo(Mm%,Nm%,Om%) 56980ENDIF 56980ENDIF 56989ENDIF 56998ENDPROC 57007DEFFN2(d%):SYS&44ADD,3,t%,d%,1:cc%=d%:Vm%=(d%-lf%)MOD_b%+1:Wm%=(d%-lf%)DIV_b%:SYS&40189,Vm%,Yb%,a%(Wm%),Xb%:=0 57106DEFFN3(d%):SYS&44ADD,3,t%,d%,0:SYS&40189,Vm%,Yb%+2^7,a%(Wm%),Wb%:cc%=-1:=0 57160DEFFN4(d%):LOCALRk%,e%,q%:SYS&44ADD,3,l%,d%,1:Rk%=d%-nh%:ec%=Rk%:FORe%=1TO7:SYS&40185,e%,?(mj%+h%(Rk%,0)):NEXT:q%=1:FORe%=0TO20:IF?(Jh%+Rk%*24+e%)THEN 57250SYS&40189,q%,Yb%,k%(e%),Xb%:q%+=1:IFq%>=8THENe%=100 57277ENDIF 57286NEXT:=0 57322DEFFN5(d%):LOCALRk%,e%:SYS&44ADD,3,l%,d%,0:Rk%=d%-nh%:q%=1:FORe%=0TO20:IF?(Jh%+Rk%*24+e%)THEN 57376SYS&40189,q%,Yb%+2^7,k%(e%),Wb%:q%+=1:IFq%>=8THENe%=100 57403ENDIF 57412NEXT:ec%=-1:=0 57457DEFPROCF(g$,j%):LOCALv%,b%,a%,c$,Xm%,Ym%,e%,Bc%,A$,Zm%:Ym%=FALSE:PROCi:PROCj:CASEj%OF 57502WHEN0:c$="Sound":Xm%=lf%:SYS&44AEB,3,t%:PROCo(t%,if%,df%):Zm%=0 57538WHEN2:c$="Chord":Xm%=nh%:SYS&44AEB,3,l%:PROCo(l%,sh%,wh%):Zm%=1 57565OTHERWISE:ERROR0,"This procedure does not support that box type." 57574ENDCASE 57574IFINSTR(g$,".")=0THENg$="<MB"+c$+"Files$Dir>."+g$ 57583a%=FNl(g$):IFa%=0THENENDPROC 57601b%=FNh(b$,8,a%):IFb%<>0THENPROCb(FNc(b%+4),FALSE):ENDPROC 57619IFb$<>"MB"+c$+" "THENPROCb("File format not understood.",FALSE):b%=FNG(a%):ENDPROC 57628b%=FNa(c%,a%):IFb%<>0THENPROCb(FNc(b%+4),FALSE):b%=FNG(a%):ENDPROC 57646IFc%>1THENb%=FNG(a%):PROCb("This file was made by a newer version of MusicBox. You will need an upgrade to load it.",FALSE) 57655b%=FNh(b$,4,a%):WHILEb%=0ANDb$<>"EndX":CASEb$OF 57682WHEN"Tape":b%=FN_(Zm%,a%,Xm%) 57700WHEN"Inst":b%=FNv(j%,a%):Ym%=TRUE 57709WHEN"Temp":b%=FNw(j%,a%) 57718WHEN"Volu":b%=FNx(j%,a%) 57727WHEN"Octa":b%=FNy(a%) 57736WHEN"Key ":b%=FNz(a%) 57745WHEN"Chor":b%=FN`(a%) 57754WHEN"Pent":IFj%=0THENb%=FNB(a%) 57754OTHERWISE:b%=FNj(a%) 57772ENDCASE 57772IFb%=0THENb%=FNh(b$,4,a%) 57781ENDWHILE:IFb%<>0THENPROCb(FNc(b%+4),FALSE) 57799b%=FNi(a%):PROCp:PROCr:IFj%=2ANDYm%THEN 57835IFw%=2THENPROCk(b%(2,dc%-1),dc%) 57844FORBc%=0TO6:A$=a$(b%(2,Bc%)):FORe%=0TOkh%-1:IFh%(e%,0)=Bc%+1THEN 57880SYS&44ADD,1+512,l%,lh%+e%,"s"+A$+",p"+A$,,Hh% 57898ENDIF 57898NEXT:NEXT 57925ENDIF 57925ENDPROC 57934DEFFN_(j%,a%,Xm%):LOCALv%,b%:IFb%=0THENb%=FNa(v%,a%) 57979IFb%=0THENb%=FNa(v%,a%) 57988g%(j%)=v%:IFb%=0THENb%=FNa(j%(j%),a%) 58006FORe%=0TOv%:IFb%=0THENb%=FNa(e%(0,e%,j%),a%) 58024IFb%=0THENb%=FNa(e%(1,e%,j%),a%) 58033IFb%=0THENe%(1,e%,j%)+=Xm% 58042IFb%=0THENb%=FNa(e%(2,e%,j%),a%) 58051NEXT:=b% 58087DEFFN`(a%):LOCALv%,b%:IFb%=0THENb%=FNa(v%,a%) 58105FORe%=0TOkh%-1:IFb%=0THENb%=FNa(h%(e%,0),a%) 58123NEXT:IFb%=0THENb%=FNk(Jh%,kh%*24,a%) 58141=b% 58177DEFPROCX(H%,J%):IFw%<0THENENDPROC 58186SYS&400E6,5:MOVEH%+d%(w%,0),J%+d%(w%,1):MOVEH%+d%(w%,2),J%+d%(w%,3):PLOT85,H%+d%(w%,2),J%+d%(w%,1):ENDPROC 58231DEFPROCq(_m%):_m%=_m%/2:IF_m%<0THEN_m%=0 58267IF_m%>127THEN_m%=127 58276SYS&40180,_m%:ENDPROC 58294DEFPROCV(n%,d%):SYS&44AD4,1,n%,d%TOc%:PROCq(c%):ENDPROC 58339DEFFNM(j%,a%):LOCALe%,c%,b%:b%=FNf("Volu",a%):IFb%=0THENb%=FNb(12,a%) 58384CASEj%OF 58393WHEN0:SYS&44AD4,1,t%,qf%TOc% 58411WHEN1:SYS&44AD4,1,o%,`f%TOc% 58420WHEN2:SYS&44AD4,1,l%,yh%TOc% 58429WHEN3:SYS&44AD4,1,k%,Og%TOc% 58438ENDCASE 58438IFb%=0THENb%=FNb(c%,a%) 58447=b% 58474DEFFNx(j%,a%):LOCALe%,c%,b%:IFEm%THEN 58492b%=FNa(c%,a%):IFb%=0THENb%=FNa(c%,a%) 58510IFb%=0THEN 58519CASEj%OF 58528WHEN0:SYS&44AD4,2,t%,qf%,c% 58555WHEN1:SYS&44AD4,2,o%,`f%,c% 58573WHEN2:SYS&44AD4,2,l%,yh%,c% 58591WHEN3:SYS&44AD4,2,k%,Og%,c% 58609ENDCASE 58609IFw%=j%THENPROCq(c%) 58618ENDIF 58627ELSE:b%=FNj(a%) 58654ENDIF 58654=b% 58690DEFPROCn(n%,j%):`m%=n%:CASEn%OF 58708WHENDd% 58726WHEN0:SYS&44ADD,2,Hd%,Gd%,"Are you sure you want to start again?":n%=Hd% 58735WHEN1:SYS&44ADD,2,Hd%,Gd%,"Are you sure you want to print your work?":n%=Hd% 58744WHEN2:SYS&44ADD,2,Hd%,Gd%,"There are some unsaved files. Are you sure you want to quit?":n%=Hd% 58744WHEN3:SYS&44ADD,2,Hd%,Gd%,"The present tune has not been saved and loading a new file will lose it. Do you still want to load a new file?":n%=Hd% 58753WHEN4:SYS&44ADD,2,Hd%,Gd%,"That file already exists. Do you want to continue and overwrite it?":n%=Hd% 58771ENDCASE 58771_a%=n%:SYS&44ADD,1,Hd%,Fd%,"syes,pyes":SYS&44ADD,5,Hd%,Ed%,FALSE:SYS&44AD6,n%,-1:SYS&44AD9,n%,-1:`a%=j%:ENDPROC 58834DEFPROCc(E$):pc%=FALSE:`m%=-1:SYS&44ADD,2,Hd%,Gd%,E$:SYS&44ADD,1,Hd%,Fd%,"sok,pok":SYS&44ADD,5,Hd%,Ed%,TRUE:_a%=Hd%:SYS&44AD6,Hd%,-1:SYS&44AD9,Hd%,-1:`a%=-3:ENDPROC 58942DEFPROCVc(p%,d%):LOCALA%,C%,D%:IF(p%AND4)THEN 58978CASE_a%OF 58987WHENHd%:CASEd%OF 59005WHENFd%,Ed%:PROCe(Hd%,d%) 59032ENDCASE 59032WHENDd%:CASEd%OF 59050WHENBd%,Cd%:PROCe(Dd%,d%) 59077WHENyd%,Ad%:SYS&44ACA,Dd%,zd%,zd%-d%,Dk%,1 59095ENDCASE 59095ENDCASE 59104ENDIF 59113ENDPROC 59122DEFPROCcd(d%):LOCALA%:PROCh(_a%):SYS&44AD9,0,-2:CASE_a%OF 59176WHENHd%:A%=(d%=Fd%) 59194WHENDd%:A%=(d%=Cd%) 59203ENDCASE 59203CASE`a%OF 59212WHEN1:PROCjb(`m%,A%) 59230WHEN2:PROCxb(`m%,A%) 59239WHEN3:PROCmc(`m%,A%) 59248WHEN-1:va%=A% 59257WHEN-2:IFA%THENPROCnd(lm%,mm%) 59257WHEN-3:aa%-=1:IFaa%>=0THENPROCc(c$(ra%-aa%)) 59266WHEN-4:IFA%THENPROCsd 59275ENDCASE 59284ENDPROC 59293DEFPROCkb(j%):PROCc("Sorry, Print is disabled for this demo. The full version prints using any RISC OS printer driver."):ENDPROC 59320DEFPROCWa(m$):LOCALA%,B%,C%,Kc%,Lc%,Mc%,Nc%,Oc%,Pc%,Qc%,Rc%,Sc%,Tc%,f$:f$="s"+a$(b%(w%,!di%-1)):SYS&2E,40+256,U%,m$TO,,,Kc%,Lc%,Sc%,Mc%:SYS&2E,40+256,U%,f$TO,,,Nc%,Oc%,Tc%,Pc%:SYS&35,Mc%,3TO,,Qc%:SYS&35,Mc%,4TO,,A%:Kc%=Kc%<<A%:h%!8=(1<<A%) 59419SYS&35,Mc%,5TO,,A%:Lc%=Lc%<<A%:h%!12=(1<<A%):SYS&35,Pc%,3TO,,Rc%:SYS&35,Pc%,4TO,,A%:Nc%=(Nc%<<A%):h%!0=1<<A%:SYS&35,Pc%,5TO,,A%:Oc%=(Oc%<<A%):h%!4=1<<A%:IFQc%<>Rc%ORQc%<>15THEN 59518PROCb("Voice sprites must have 16 and only 16 colours.",FALSE) 59536ELSE:SYS&2002E,25+256,U%,"st7":SYS&2E,27+256,U%,m$,"st7":SYS&2E,60+256,U%,"st7",0TO,A%,B%,C%:SYS&2E,52+256,U%,f$,4,44,8,h%,0:SYS&2E,34+256,U%,m$,0,0,8:SYS&2E,60+256,A%,B%,C%:IFSc%=1THEN 59599SYS&2E,61+256,U%,"st7",0TO,A%,B%,C%:VDU18,0,128+63,23,17,3,&C0,0,0,0,0,0,0 59617SYS&2E,50+256,U%,f$,4,44,8,h%,0:SYS&2E,61,A%,B%,C% 59644ENDIF 59644ENDIF 59653ENDPROC
HIK��Na(�b$):�I%:ș&27,b$,a,256:b$="":I%=0:ȕa?I%>31:b$+=�(a?I%):I%+=1:�:� H�c��ra(m,E$,h):�Oa("Music Box has suffered an internal error and must quit. "+E$+" ("+�(h)+")"):� H���Oa(w$):��Pa(w$) H�)!a=�:$(a+4)=w$+�0:ș&400DF,a,1,U$:�Qa H���Pa(w$): I��<>b��b I�4 I�w$:�Qa I<��Ra(i):�j>i��Qa IE� IN��Qa:��Sa Ii Ir�f�ș&42589:f=� I{�Sa I���Sa: I� ��<>b� I��b:ș&400E3,b I�� I�ș&400DD:� I�g��ia(N$,O$,P$,k):�a 256:�Na(O$):�Na(P$):Z$=O$:_$=P$:f=�:j=-1:b=�:U$=N$:�k�ș&400C0,200,&4B534154,N$ JJ� JS��Ta(d%,X%,Y%):Ȏd%� Jw�gg%:�R(o%,d%,X%,Y%) J��ng%:�Ab%� J�Uș&44AE3,6,_%,o%:ș&44AE5,0,o%,X%,Y%,,vg%�,,d%:ș&44AE3,7,_%,o%:�d%>=Qf%�d%<=Rf%� J�-�j:�S(d%-Qf%+1):�k(b%(1,d%-Qf%),d%-Qf%+1) J�� J�� J�� J�� J�-��Ua(p%,d%,X%,Y%):�A%,C%,D%:�(p%�(4<<4))� K Ȏd%� K"�gg%,`f%:�G(o%,d%,X%,Y%) K=� K=� KF�(p%�4)� KX Ȏd%� Ka�dg%:�Va(1) K|�bg%:�Va(-1) K��eg%:�j K�(�cg%:ș&44ADD,3,o%,d%,1:zb%=�:�Va(1) K�*�lg%,kg%,fg%,hg%,ig%,jg%,_f%:�e(o%,d%) K��pg%:�Pa%��e(o%,d%) K�)ș&44AD4,1,o%,gg%�c%:c%-=1:�c%<0�c%=0 K�'ș&44AD4,2,o%,gg%,c%�c%:�d((c%+40)) L�qg%:�Pa%��e(o%,d%) L-ș&44AD4,1,o%,gg%�c%:c%+=1:�c%>255�c%=255 L9'ș&44AD4,2,o%,gg%,c%�c%:�d((c%+40)) LT�mg%:ș&44AD6,ld%,X%,Y% L].�gg%:ș&44AD4,0,o%,d%,X%,Y%�c%:�d((c%+40)) Lx)�`f%:ș&44AD4,0,o%,d%,X%,Y%�c%:�q(c%) L��ng%:�Ab%� L�Uș&44AE3,6,_%,o%:ș&44AE5,0,o%,X%,Y%,,vg%�,,d%:ș&44AE3,7,_%,o%:�d%>=Qf%�d%<=Rf%� L� �yb%� L��H(d%-Qf%+1,-1,o%,-1) L�� L��k(b%(1,d%-Qf%),d%-Qf%+1) L��:Ȏd%� L�=�0:�l(1):C%=X%:D%=Y%:A%=�(ei%):�(A%�&FF000000)=&FF000000� MB�c("You are not allowed that many instruments in one column.") M,�:A%=(A%<<8)>>8:�yb%� M>9fk%=�(ai%):gk%=fk%:hk%=(((gk%)�ik%)+1)*ik%-1:!qj%=fk% Mt�:�(!ni%<8)� M}�H(!ni%,10-(A%�&FF),o%,-1) M��:�!ni%=8+7� M�(�(!di%)>0��H(!di%,10-(A%�&FF),o%,-1) M�� M�� M�� M�Ȏ!ni%� M�:�6+8:�(A%>>20)>0�!di%=A%>>20:�Wa("st7_copy1"):�k(-1,6) M��7+8:�k(-1,5) M�� M�� M�8�Sf%,Sf%+1,Sf%+2,Tf%,Uf%:�p(d%)��k(-1,d%-Sf%+1)��Xa M�� N� N � N�Zf%:�Ab%� N('ș&44AE5,0,o%,X%,Y%,,vg%�,,d%:Ȏd%� N:�Wf%:�Ya(1) NL�Vf%:�Ya(-1) NU�Xf%,Yf%:�e(o%,-d%) N^� N^� Ng� Np� Ny� N���k(x%,q%):�A%,B%:�x%>=0� N�d$="s"+a$(x%) N��:�q%>=5�q%+=1 N�d$="st"+�(q%):q%+=8 N�� N��Za(d$):!ni%=q%:Bb%=q%:� O ��Xa:�Bb%>7� O�Bb%>12� O$2�k(-1,Bb%-9):ș&44ADD,7+512,o%,Qf%+Bb%-3,,,vg% O?4�:�k(-1,Bb%-8):ș&44ADD,7+512,o%,Qf%+Bb%-2,,,vg% OZ� OZ;�:ș&44ADD,7+512,o%,Qf%+Bb%-1,,,vg%:�k(b%(1,Bb%-1),Bb%) O~� O~� O���Za(d$):�A%,B%:Ȏd$� O��"st2":A%=4:B%=0 O��"st6":A%=4:B%=44 O��"st7":A%=4:B%=44 O�:A%=0:B%=0 O�� O�1ș&44AE3,1+2^11,U%,d$,wb%+A%,wb%+B%,_%�,,_%:� O�u��_a:�c%:�h(Bf%):�T(o%):�U(1):�y(2^Db%,gb%):�V(o%,`f%):ș&44AD4,1,o%,gg%�c%:�s(fg%,o%,0):�d(c%+40):�Xa:�z:�C(0):� P�f��`a(H%,J%,s%):�e%:�e%=0�Yf%:ș&44AE0,,vg%+4+32*e%,s%:�:�W(H%,J%):!Li%=H%:!Mi%=J%:�Di%:�X(H%,J%):� P���ab:�Ui%:� QݤH:jk%=�:=�I QR�ݤI:�kk%,lk%,mk%,e%,A%,P%:!ii%=K%/nk%:!ji%=4/nk%:ș&64AE2,259,nc%,"composegrid",2^4,(W%+1)*K%+4,K%*11+4,jk%�A%;P%:ș&64AE2,264,nc%,2,0:�(P%�1)=1� Q��ș&44AE2,259,nc%,"composegrid",2^4,8,8,jk%:�h(o%):�Y:�c("Not enough memory to use Tune Box. Try reducing the size of 'paper' in the configuration window. See manual for more hints."):=� Q�� Q��ș&64AE2,60,nc%,"composegrid",0�,kk%,lk%,mk%:ș&400E6,0:ȓȐ0,0,(W%+1)*K%+4,K%*11+4:ș&400E6,Cb%:�e%=1�11�2:ȓȐ0,K%*e%+2,(W%+1)*K%+4,K%:�:ș&400E6,7:�e%=0�11:ȓȐ0,K%*e%,(W%+1)*K%+4,3:�:�e%=0�W%+1 R*7ȓȐK%*e%,0,3,11*K%+4:�:ș&2E,60+256,kk%,lk%,mk%:=� R`P��Ya(ok%):�X%,Y%,B%,pk%,A%,T%,d%:A%=ok%*2:pk%=0:�:�xi%:�bb:ȗX%,Y%,B%:Ȏpk%� R�3�0:A%=ok%*4:T%=�:�:ȗX%,Y%,B%:�bb:��>T%+50�B%=0 R��10 S� S8pk%+=1:�B%=0�!Ai%<=0�!Ai%>=W%-24:�A%<0�d%=Vf%�d%=Wf% S!ș&44ADD,3+512,o%,d%,0,,vg%:� S/y��Va(ok%):�e%:�cb(�zb%):fk%=�(ai%):gk%=fk%:hk%=(((gk%)�ik%)+1)*ik%-1:!qj%=fk%:qk%=hk%:rk%=qk%:sk%=qk%:tk%=rk%:�ok%=1� S�.ș&44ADD,7,o%,dg%,1:!Hi%=0:!kj%=jc%:!pj%=0 S�;�:!Hi%=hk%:!kj%=jc%+fk%*12:!pj%=hk%:ș&44ADD,7,o%,bg%,1 S�� S��uk%=-99999:vk%=0:yb%=�:wk%=ok%:�g:!tj%=Yb%:!lj%=0:lj%!4=0:nj%!0=0:nj%!4=0:nj%!8=0:oj%!0=-1:oj%!4=-1:ș&401C0:�m:xk%=lb%:A%=1:�wi%:�wk%=1� T�%�e%=0�mb%:A%=e%*Q%:�!pj%>hk%�zb%� T�!pj%=0:!kj%=jc% T�� T� �rj%:� U%�:�e%=0�mb%:A%=e%*Q%:�!pj%<0�zb%� U!pj%=hk%:!kj%=jc%+hk%*12 U9� U9 �vj%:� UT� UT�t:�zb%�ș&44ADD,7,o%,cg%,1 Uf� Uoa��j:�m:!Hi%=-1:A%=1:�wi%:yb%=�:�g:ș&44ADD,7,o%,eg%,1:zb%=�:ș&44ADD,3,o%,cg%,0:�Bi%:�cb(�):� U�%��db:�Z%,A%,yk%,zk%:Z%=Ə:�wk%=1� V�Z%<xk%� V#2vk%+=mb%:�e%=1�mb%:A%=lb%+e%*Q%:�!pj%>hk%�zb%� VG!pj%=0:!kj%=jc% Vb� Vb"�rj%:�:rk%=qk%:qk%=sk%:sk%=hk% V�� V�)xk%=Z%:Ak%=(Z%�Q%)+vk%-mb%:�Ak%<>uk%� V�uk%=Ak%:�Ak%>rk%� V� �zb%� V�Ak%-=rk%+1:vk%-=rk%+1 V��:�j:Ak%=-100:� V�� V�� WA%=1:�(�zb%)� W"yk%=Ak%:�yk%>fk%-11�yk%=fk%-11 W(�yk%<12�yk%=12 W1'!zi%=(yk%-12)*K%:!Ai%=(yk%-12):A%=0 WU� WU!Hi%=Ak%:�wi% Wp� Wp�:�Z%<xk%� W�0vk%+=mb%:�e%=1�mb%:A%=lb%+e%*Q%:�!pj%<0�zb%� W�!pj%=hk%:!kj%=jc%+fk%*12 W�� W�"�vj%:�:rk%=qk%:qk%=sk%:sk%=hk% X � X -xk%=Z%:Ak%=tk%-(Z%�Q%)-vk%+mb%:�Ak%<>uk%� Xuk%=Ak%:�Ak%<0� X- �zb%� X6)Ak%+=tk%+1:uk%=Ak%:vk%-=tk%+1:tk%=rk% Xc�:�j:Ak%=-100:� Xl� Xu� X~A%=1:�(�zb%)� X�"yk%=Ak%:�yk%>fk%-11�yk%=fk%-11 X��yk%<12�yk%=12 X�'!zi%=(yk%-12)*K%:!Ai%=(yk%-12):A%=0 X�� X�!Hi%=Ak%:�wi% X�� X�� X�� X���z:�H� Yb�Za(d$):ș&44AE2,262+2^11,U%,"s?",,,,si%,ti%:ș&44AE2,262+2^11,U%,"tie01",,,,ui%,vi%:�ci%:�Bi% YM� YM� YV��Y:n=�:�g:�j:�r:�A:� Y�E��eb:�v%,b%,a%:g$="<MusicBoxD$Dir>.1":v%=�(ai%):a%=�J(g$):�a%=0�� Y�*b%=�f("MBTune ",a%):�b%=0�b%=�b(1,a%) Y��b%=0�b%=�f("Tune",a%) Y��b%=0�b%=�b(12*v%+12+8,a%) Z �b%=0�b%=�u(jc%,12*v%+12,a%) Z �b%=0�b%=�K(1,a%) Z�b%=0�b%=�L(1,a%) Z�b%=0�b%=�M(1,a%) Z%�b%=0�b%=�N(a%) Z.�b%=0�b%=�O(a%) Z7�b%=0�b%=�P(a%) Z@�b%=0�b%=�Q(a%) ZI�b%=0�b%=�f("EndX",a%) ZR�b%=0�b%=�b(-1,a%) Z[�b%=0�b%=�i(a%) Zd�b%=0�b%=�R(g$) ZmP�b%<>0��b(�c(b%+4),�):b%=�i(a%)��r:�c("I have succesfully saved your work.") Z� Z�9��fb(g$):�i:�j:�g$,".")=0�g$="<MBTuneFiles$Dir>."+g$ Z�a%=�l(g$):�a%=0�� Z�*b%=�h(b$,8,a%):�b%<>0��b(�c(b%+4),�):� Z�H�b$<>"MBCompos"�b$<>"MBTune "��b("File format not understood.",�):� Z�(b%=�a(c%,a%):�b%<>0��b(�c(b%+4),�):� Z�i�c%>1��b("This file was made by a newer version of MusicBox. You will need an upgrade to load it.",�) Z�*b%=�h(b$,4,a%):ȕb%=0�b$<>"EndX":Ȏb$� [!�"Tune":b%=�S(a%) [3�"Inst":b%=�v(1,a%) [<�"Temp":b%=�w(1,a%) [E�"Volu":b%=�x(1,a%) [N�"Octa":b%=�y(a%) [W�"Key ":b%=�z(a%) [`�"Pent":b%=�B(a%) [i�"Colu":b%=�T(a%) [r:b%=�j(a%) [{� [{�b%=0�b%=�h(b$,4,a%) [��:�b%<>0��b(�c(b%+4),�) [�b%=�i(a%):�p:�r:�w%=1� [��z:�C(0):ș&44AEB,3,o% [�� [�� [�LݤS(a%):�b%,v%:ș&44ADA,jc%,vb%*12:b%=�a(v%,a%):�b%=0�b%=�k(jc%,v%-8,a%) \&$v%=(((v%-8)�12)�24)+1:�v%>W%/24� \8 �Bk%� \A*W%=v%*24:!Zh%=W%:!_h%=W%*12:!mi%=W%*12 \n� \n&ș&44ADA,jc%+W%*12,vb%*12+12-W%*12 \�� \�=b% \���gb(d%):Ȏd%� \��fg%:�s(d%,o%,1) \��lg%:�v(o%,1) \��kg%:�v(o%,0) \��jg%:�p(d%)��hb \��ig%:�p(d%)��n(0,1) \��-Xf%:�C(0) \��-Yf%:�C(-1) \��_f%:�p(d%)��n(1,1) \��hg%:�h(o%):�Y ]�-1:�ib ]� ]� ]"k��hb:�A%:Ck%=(�(ai%)+1):�Ck%<1�Ck%>W%/2��c("The paper is not long enough to copy your present tune."):� ]O1Dk%=(W%/Ck%)-1:ș&44ACB,Dd%,zd%,1:�n(Dd%,1):� ]s��cb(A%):Ab%=A%:�A%� ]� !Zj%=2 ]��:!Zj%=1 ]�� ]�� ]�"��C(A%):�A%=-1�A%=�(ai%)-23+12 ]��A%<0�A%=0 ]��A%>W%-24�A%=W%-24 ]�a!zi%=A%*K%:!Ai%=A%:A%=0:�wi%:�Bi%:ș&44ADD,3+512,o%,Yf%,0,,vg%:ș&44ADD,3+512,o%,Xf%,0,,vg%:� ^9��jb(n%,Ek%):�Ek%� ^T Ȏn%� ^]+�0:ș&44ADA,jc%,W%*12:�z:�C(0):�j:�l(1) ^�c�Dd%:ș&44ACC,Dd%,zd%�,,Ek%:�e%=1�Ek%:ș&44AC7,Ck%*12,jc%,jc%+Ck%*e%*12:�:�z:�j:A%=0:�wi%:�l(1) ^� �1:�kb(1) ^�� ^�� _� _9ݤN(a%):�e%,c%,b%:b%=�f("Colu",a%):�b%=0�b%=�b(12,a%) _>�b%=0�b%=�b(Db%,a%) _G=b% _b#ݤT(a%):�e%,c%,b%:�Fk%�=�j(a%) _t#b%=�a(c%,a%):�b%=0�b%=�a(c%,a%) _�Db%=c%:�w%=1��y(2^Db%,gb%) _�=b% _�ݤp(d%):�y%:Ȏd%� _��Sf%:y%=Gk% _��Sf%+1:y%=Hk% _��Sf%+2:y%=Ik% _��Tf%:y%=Jk% _��Uf%:y%=Kk% _��jg%:y%=Lk% `�ig%:y%=Mk% ` �_f%:y%=Nk% `� `�y%��I `=y% `L��lb(d%,X%,Y%):�Ua%<>0�� `U Ȏd%� `^�uh%:�R(l%,d%,X%,Y%) `pM�oh%:ș&44AE3,6,_%,l%:ș&44AE5,1,l%,X%,Y%,,Hh%�,,d%:ș&44AE3,7,_%,l%:Ȏ�� `�Z�(d%>=ih%�d%<=jh%):ș&44ADD,7+512,l%,d%,1,,Hh%:�S(d%-ih%+1):�mb(b%(2,d%-ih%),d%-ih%+1) `�� `�� `�� `�3��nb(p%,d%,X%,Y%):�A%,C%,D%,B%,A$:�(p%�(4<<4))� a Ȏd%� a �uh%,yh%:�G(l%,d%,X%,Y%) a$� a$� a-�(p%�4)=4� a6 Ȏd%� a?,�rh%:ș&44ADD,7,l%,d%:�D(l%,sh%,wh%,1,�) acD�qh%:ș&44ADD,7,l%,d%:ș&44ADD,7,l%,rh%:Ok%=�:�D(l%,sh%,wh%,1,�) a�,�ph%:ș&44ADD,7,l%,d%:�D(l%,sh%,wh%,1,�) a��sh%:�o(l%,d%,wh%) a�1�th%:�l(2):ș&44ADD,7,l%,d%:�ob(l%,sh%,wh%,1) a�"�wh%,xh%,Bh%,Ch%,Dh%:�e(l%,d%) a�.�uh%:ș&44AD4,0,l%,d%,X%,Y%�c%:�d((c%+40)) b)�yh%:ș&44AD4,0,l%,d%,X%,Y%�c%:�q(c%) b)�Eh%:�Pa%��e(l%,d%) b2)ș&44AD4,1,l%,uh%�c%:c%-=1:�c%<0�c%=0 bM'ș&44AD4,2,l%,uh%,c%�c%:�d((c%+40)) bh�Fh%:�Pa%��e(l%,d%) bq-ș&44AD4,1,l%,uh%�c%:c%+=1:�c%>255�c%=255 b�'ș&44AD4,2,l%,uh%,c%�c%:�d((c%+40)) b��Ah%:ș&44AD6,ld%,X%,Y% b��oh%:�Ua%=0� b�Hș&44AE3,6,_%,l%:ș&44AE5,0,l%,X%,Y%,,Hh%�,,d%:ș&44AE3,7,_%,l%:Ȏ�� b�N�(d%>=ih%�d%<=jh%):�H(d%-ih%+1,-1,l%,-d%+ih%-1):�mb(b%(2,d%-ih%),d%-ih%+1) c��(d%>=lh%�d%<=lh%+kh%-1):h%(d%-lh%,0)=dc%:A$=a$(b%(2,dc%-1)):ș&44ADD,1+512,l%,d%,"s"+A$+",p"+A$,,Hh%:�Z(d%-lh%):�e(l%,-10-(d%-lh%)):�l(2) c@� c@� cI :Ȏ�� c[8�(d%>=mh%�d%<mh%+kh%):�Ua%=0��pb(d%-mh%,X%,Y%):�l(2) cm$�(d%>=nh%�d%<nh%+kh%):�Z(d%-nh%) c�� c�� c�� c�� c���mb(x%,q%):�x%>=0� c�d$="s"+a$(x%) c�"�:�1,"This should not happen!" c�� c�2ș&44AE3,1+2^11,U%,d$,wb%,wb%,_%�,,_%:dc%=q%:� c����qb:�c%:�h(Bf%):�T(l%):Ok%=�:�y(1,gb%):�rb:�U(2):�V(l%,yh%):ș&44AD4,1,l%,uh%�c%:�d(c%+40):ș&44ADD,7+512,l%,ih%+dc%-1,,,Hh%:Qa%=�:�g:�s(wh%,l%,0):�t:�mb(b%(2,dc%-1),dc%):� d�h��sb(H%,J%,s%):�e%:�e%=0�Gh%-1:ș&44AE0,,Hh%+4+32*e%,s%:�:�W(H%,J%):!Li%=H%:!Mi%=J%:�Ei%:�X(H%,J%):� e��tb:�d%,Pk%:�Ti%:�Ua%<>2� eA&ș&400CF,,h%:d%=h%!16:Pk%=ec%:Ȏ�� ee;�(h%!8�4)=4�(d%>=mh%�d%<=mh%+kh%-1):�Pk%<>d%-mh%�Pk%=-1 ew�Pa% e�2�(h%!8�4)=4�(d%>=nh%�d%<=nh%+kh%-1):Pk%=d%-nh% e�Pk%=-1 e�� e��ec%<>Pk%� e��Pk%=-1��ub��Z(Pk%) e�� e�� e�� e�Y��rb:ș&44AE3,1+2^11,U%,d$,wb%,wb%,_%�,,_%:ș&44AE2,262+2^11,U%,"Circle",,,,Pi%,Qi%:� e�*��vb:Qa%=�:�o(l%,d%,wh%):�m:�g:�A:�r:� fO��wb(d%):Ȏd%� fj�wh%:�s(d%,l%,1) f|�xh%:�h(l%):�vb f��Ch%:�v(l%,5) f��Bh%:�v(l%,4) f��Dh%:�Nk%��n(1,2)��I f�:�d%<0�d%>-8��ib f��d%<-9�d%>-10-kh%� f�Mș&44AE3,6,_%,l%:ș&44ADD,3+512,l%,-10-d%+lh%,0,,Hh%:ș&44AE3,7,_%,l%:�ub f�� f�� f�� f�j��pb(Qk%,X%,Y%):�f%:ș&44AE6,3,l%,X%,Y%�,,X%,Y%:f%=Ih%+Qk%*32:X%=X%-!f%:Y%=Y%-f%!4-2:�X%<K%+2�Y%+=K%/2 gBS%=Y%�K%:�S%<0�S%=0 gT�S%>10�S%=10 g] �X%<K%+2� gf�S%=0�S%=2�S%=6�S%=9�� go S%+=10 g�� g�1?(Jh%+Qk%*24+S%)=?(Jh%+Qk%*24+S%)�1:�X%<K%+2� g�Jș&400D1,l%,!f%+4,4+f%!4+(S%-10)*K%-K%/2,!f%+K%,f%!4+(S%-10+1)*K%-K%/2 g�?�:ș&400D1,l%,!f%+4+K%,4+f%!4+S%*K%,!f%+K%*2,f%!4+(S%+1)*K% g�� g� �Z(Qk%):� g�(��Z(Rk%):�e%,Sk%:�ub:�_(4,nh%+Rk%):� g���ub:�ec%>-1� h�_(5,nh%+ec%) h,� h,� h5!��xb(n%,Ek%):�Ek%�n%=1��kb(2) hP� hY(��yb(p%,d%):�Tk%,X%,Y%,B%,T%:�p%>7�� h}Tk%=-1:�d%>=If%�d%<=Lf%� h�eTk%=(d%-If%)�2:ș&44ADD,3,Mf%,Tk%*2+If%,1:ș&44ADD,6,Mf%,Tk%*2+Jf%,&7E200000,&FF200000:�Uk%<>Tk%� h�Kș&44ADD,3,Mf%,Uk%*2+If%,0:ș&44ADD,6,Mf%,Uk%*2+Jf%,&17000000,&FF200000 h�� h�"Vk%=Uk%:Uk%=Tk%:�zb(Tk%,Wk%,�) h��:�d%=Ff%�d%=Gf%��e(Mf%,d%) h�� i� i ^��zb(x%,q%,Xk%):�Wc%,i$,X%,Y%,B%,h$,P%,T%:h$=b$(x%):�(c%(x%)�2^26)=0�(c%(x%)�&80000000)=0� i:)�i:�:ș&20008,17,n$+"."+h$�N%:�N%<>1� i^9i$="Can't use that voice. ("+n$+"."+h$+" not found.)" ip@�:笤q�笤r�i$="Can't use that voice. (No voice slots left)" iy�q� i�+ș&2001E,0,n$+"."+h$�Wc%;P%:�(P%�1)<>0� i�3笤r�i$="Can't use that voice. ("+�c(Wc%+4)+")" i�F�:ș&60185,q%,0�,ja%:ș&6018A,q%,h$�;P%:ș&60185,q%,ja%:�(P%�1)=1� i�bi$="Voice module '"+h$+"' does not contain a voice called '"+h$+"'. Shall use an alternative." i��:c%(x%)=(c%(x%)�2^26) i�� i�� i� �:P%=1 j� j� j�i$<>""�(P%�1)=0:�p j6� j6�i$=""� j?�J(w%,q%,x%) jQd�:�b(i$,�):ș&44ADD,3,Mf%,Vk%*2+If%,1:ș&44ADD,6,Mf%,Vk%*2+Jf%,&7E200000,&FF200000:�Uk%<>Tk%Yk%� juKș&44ADD,3,Mf%,Uk%*2+If%,0:ș&44ADD,6,Mf%,Uk%*2+Jf%,&17000000,&FF200000 j�� j�Uk%=Vk% j�� j� �Xk%� j�dș&40189,q%,Yb%,a%(4)-&1000,100:T%=�:�:ȗX%,Y%,B%:�B%=0��>T%+5:ș&40189,q%,Yb%�2^7,a%(4)-&1000,1 j�� j�� j���S(q%):�e%,f%:�Ya%�� k'Wk%=q%:�e%=0�Gc%-1:�b%(w%,q%-1)=e%� k2Pș&44ADD,3,Mf%,e%*2+If%,1:ș&44ADD,6,Mf%,e%*2+Jf%,&7E200000,&FF200000:Uk%=e% kVK�:ș&44ADD,3,Mf%,e%*2+If%,0:ș&44ADD,6,Mf%,e%*2+Jf%,&17000000,&FF200000 kq� kqE�:Zk%=b%(w%,q%-1):ș&44AD6,Mf%,-1:ș&44AD9,Mf%,-1:_k%=qa%:�qa%��m k�� k���Ab:�zb(Zk%,Wk%,�):�Bb:� k���Bb:�e%,A$,A%:Ȏw%� l�0:ș&44ADD,6,t%,kf%,0,0 lB�1:�i:ș&44ADD,6,o%,Pf%,0,0:A%=Wk%:�bi%:�k(b%(1,Wk%-1),Wk%):�p lR^�2:ș&44ADD,6,l%,hh%,0,0:�k(b%(2,Wk%-1),Wk%):A$=a$(b%(2,Wk%-1)):�e%=0�kh%-1:�h%(e%,0)=Wk%� l0ș&44ADD,1+512,l%,lh%+e%,"s"+A$+",p"+A$,,Hh% l�� l�� l�E�3:�i:ș&44ADD,6,k%,yg%,0,0:ș&44AEB,3,dh%:�u(b%(3,Wk%-1),Wk%):�p l�� l� �h(Mf%):ș&44AD9,,-2:�_k%��t l�� l���Cb(d%):Ȏd%� m�Ff%:�Bb m3�Gf%:�Ab mE� mE� mNDݤq:�e%,y%,A%:y%=�:�e%=32�1�-1:ș&60183,0,e%�A%:�A%=0�y%=�:e%=-1 m� �:=y% m���Db(p%,d%):�p%>7�� m��i:Ȏd%� m��xf%:�Eb m��yf%:�_a m��zf%:�qb m��Af%:�Fb n� n�p:� n3��A:!g%=1:ș&7,14,g%:�(?g%<>&95�g%?1>4)�va%=�:� nA5ș&44AD6,Bf%,-1:ș&44ADD,3,-1,zc%,0:Aa%=�:w%=-1:� nw$��Gb:ș&44ADD,3,-1,zc%,1:Aa%=�:� n���R(n%,d%,X%,Y%):�Za%�� n�!`k%=n%:al%=d%:�`(Yh%,X%,Y%):� n�o��Hb(A%):A%=�(�"040060060065070080090100115130145160175190210",A%*3+1,3)):ș&44AD4,2,`k%,al%,A%-40:�d(A%):� o"��W(H%,J%):�X%,Y%:�w%<0�� oF�Y%=i%(w%):X%=Y%!4:Y%=Y%!8-eb%:ș&2E,(52+256),U%,"Metronome",H%+X%,J%+Y%,0,hc%,ic%:ș&44AE2,34,oc%,"PlotMe",H%+X%,J%+Y%+eb%,8:� o|��t:qa%=�:bl%=lb%:�tb%=1� o�'�e%=1�ob%:�8,&100+pb%,80,2,e%*nb%:� o�� o�!�d(qb%):Ȟlb%:�E(Ə,cl%):�g:� o�'��m:qa%=�:�E(kb%/4,�):ș&401C0:�g:� p9C��s(d%,n%,dl%):�A%,e%:ș&44ADE,1,n%,d%,h%+100,100:Ȏ�c(h%+100)� pf�"soff,poff":tb%=0 px�"son,pon":tb%=1 p�� p�tb%=(tb%�dl%):�dl%=1� p��tb%=1� p�ș&44ADD,1,n%,d%,"son,pon" p�"�:ș&44ADD,1,n%,d%,"soff,poff" p�� p�� p� �qa%� p�IA%=1:ȕA%*nb%<Ə:A%+=1:�:�e%=A%�ob%*2:�8,(&100+pb%)*tb%,80,2,e%*nb%:� q5� q5� qGg��d(A%):�g:qb%=A%:ȟib%*A%*Q%*&1000/12000:!jj%=((130-(A%-20)/2.3)/rb%)*2^10:�qa%=0�(�cl%)��E(sb%,�) q�,g=((12000)/(qb%*5*ib%))*2^8:!sj%=g:Ȏw%� q��0:ș&44ADD,2,t%,tf%,�(qb%) q��1:ș&44ADD,2,o%,og%,�(qb%) q��2:ș&44ADD,2,l%,vh%,�(qb%) q��3:ș&44ADD,2,k%,Yg%,�(qb%) q�� q�� q���y(A%,B%):�e%,Ac%,A,Bc%:Ac%=30:Q%=B%:ib%=2*A%:kb%=Q%*ib%:lb%=kb%*jb%:mb%=ib%*jb%:nb%=Q%*ib%/2:ob%=2*mb%/ib%:�Bc%=0�jb%:�e%=0�kb%*8�8:A=90+e%*360/(kb%*8):A=�(�(�(A))*Ac%+90) rgg!(Cc%+e%+kb%*8*Bc%)=(�(A)*rb%)*2^10:!(Cc%+e%+kb%*8*Bc%+4)=(�(A)*rb%)*2^10:�:�:�d(qb%):�E(kb%/4,�):� r�+��E(Z%,el%):�X%,Y%,A%,H%,J%:�tb%=1�qa%� r��Z%<bl%� r�+�e%=1�ob%:�8,&100+pb%,80,2,lb%+e%*nb%:� s � s bl%=Z% s� s �el%� sA%=Z%:�ej%:�w%<0�� s6�fl%=i%(w%):A%=Z%:ș&44AC7,20,fl%,h%:X%=h%!4:Y%=h%!8:ș&400C9,,h%�A%:H%=h%!4-h%!20:J%=h%!16-h%!24:ȕA%<>0:ș&44AE2,34,oc%,"PlotMe",H%+X%,J%+Y%,8:ș&400CA,,h%�A%:�:sb%=Z% s�� s�� s����Ib:�kk%,lk%,mk%,e%,A%:gl%=�:ș&400ED,&100,U%,"metronome",,,,hc%,ic%:ș&44AE2,259,oc%,"Met",2^4,cb%,db%,gl%:ș&44AE2,259,oc%,"PlotMe",2^4,cb%,db%,gl%:ș&44AE2,264,oc%,2,0:ș&44AE2,60,oc%,"Met",0�,kk%,lk%,mk% t�ș&44AE2,52+2^11,U%,"Metronome",0,-eb%,8,hc%,ic%:ș&2E,60,kk%,lk%,mk%:ș&44AE2,24,oc%,"met"�,,A%:!gj%=A%:ș&44AE2,24,oc%,"PlotMe"�,,A%:!hj%=A%:A%=0:�ej%:� t_<ݤL(j%,a%):�e%,c%,b%:b%=�f("Temp",a%):�b%=0�b%=�b(12,a%) t� Ȏj%� t��0:ș&44AD4,1,t%,of%�c% t��1:ș&44AD4,1,o%,gg%�c% t��2:ș&44AD4,1,l%,uh%�c% t��3:ș&44AD4,1,k%,Qg%�c% t�� t��b%=0�b%=�b(c%+40,a%) t�=b% t�ݤw(j%,a%):�e%,c%,b%:�hl%� t�#b%=�a(c%,a%):�b%=0�b%=�a(c%,a%) u �b%=0� u Ȏj%� u1�0:ș&44AD4,2,t%,of%,c%-40:ș&44ACB,t%,tf%,c% u@1�1:ș&44AD4,2,o%,gg%,c%-40:ș&44ACB,o%,og%,c% u[1�2:ș&44AD4,2,l%,uh%,c%-40:ș&44ACB,l%,vh%,c% uv1�3:ș&44AD4,2,k%,Qg%,c%-40:ș&44ACB,k%,Yg%,c% u�� u��w%=j%��d(c%) u�� u��:b%=�j(a%) u�� u�=b% u���Jb(p%,X%,Y%):�Jb%�� u��(p%�4)� u��l(3):ȎIb%� v.�1,2,3,4,5,6,7:�il%��K(Ib%,!Qj%+!Pj%*M%,�) v�11:�Kb(!Qj%,!Pj%) v*�10:�Lb(!Qj%,!Pj%) v3�9:�Mb(!Qj%,!Pj%) v<�13:�Nb(!Qj%,!Pj%) vE�14,15:�Ob(!Qj%,!Pj%,Ib%) vN� vN�:�(p%�1)� v`A%=!Qj%+!Pj%*M%:�A%>u%�� vr!�Nb(!Qj%,!Pj%):za%=�:Ca%=�:�w v�� v�� v�� v���Pb(d%,X%,Y%):Ȏd%� v��Qg%:�R(k%,d%,X%,Y%) v��Ig%:�Jb%� v�{ș&44AE3,6,_%,k%:ș&44AE3,6,Hc%,dh%:ș&44AE5,0,k%,X%,Y%,,eh%�,,d%:ș&44AE3,7,_%,k%:ș&44AE3,7,Hc%,dh%:�d%>=zg%�d%<=Ag%� w-�x:�S(d%-zg%+1):�u(b%(3,d%-zg%),d%-zg%+1) wA� wA� wJ� wS� w\-��Qb(p%,d%,X%,Y%):�A%,C%,D%:�(p%�(4<<4))� w� Ȏd%� w��Qg%,Og%:�G(k%,d%,X%,Y%) w�� w�� w��(p%�4)� w� Ȏd%� w��Lg%:�L(1) w��Jg%:�L(-1) w��Mg%:�x x'�Kg%:ș&44ADD,3,k%,d%,1:Ub%=�:�L(1) x4*�Ug%,Tg%,Pg%,Vg%,Rg%,Sg%,Wg%:�e(k%,d%) xF.�Qg%:ș&44AD4,0,k%,d%,X%,Y%�c%:�d((c%+40)) xa)�Og%:ș&44AD4,0,k%,d%,X%,Y%�c%:�q(c%) x|�Xg%:ș&44AD6,ld%,X%,Y% x��Zg%:�Pa%��e(k%,d%) x�)ș&44AD4,1,k%,Qg%�c%:c%-=1:�c%<0�c%=0 x�'ș&44AD4,2,k%,Qg%,c%�c%:�d((c%+40)) x��_g%:�Pa%��e(k%,d%) x�-ș&44AD4,1,k%,Qg%�c%:c%+=1:�c%>255�c%=255 x�'ș&44AD4,2,k%,Qg%,c%�c%:�d((c%+40)) y�Ig%:�Jb%� y{ș&44AE3,6,_%,k%:ș&44AE3,6,Hc%,dh%:ș&44AE5,0,k%,X%,Y%,,eh%�,,d%:ș&44AE3,7,_%,k%:ș&44AE3,7,Hc%,dh%:�d%>=zg%�d%<=Ag%� yB �Kb%� yK�H(d%-zg%+1,-1,k%,-1) y]� y]�u(b%(3,d%-zg%),d%-zg%+1) yo�:Ȏd%� yx8�Bg%,Bg%+1,Bg%+2,Cg%,Dg%:�s(d%)��u(-1,d%-Bg%+1)��Rb y�� y�� y�� y�,�Hg%:ș&44AE5,0,k%,X%,Y%,,eh%�,,d%:Ȏd%� y��Eg%:�ab%��Sb(-1):�Tb y�ș&44ADD,3+2^9,k%,d%,0,,eh% y��Fg%:�bb%��Sb(1):�Tb y�ș&44ADD,3+2^9,k%,d%,0,,eh% y��Gg%:�Ub z� z� z� z� z#t��Fb:�c%:�h(Bf%):�T(k%):�U(3):�Vb(Hb%,O%,jl%,�):�V(k%,Og%):ș&44AD4,1,k%,Qg%�c%:�s(Pg%,k%,0):�d(c%+40):�Rb:�Wb:� z�+��Wb:�Xb:!g%=dh%:ș&400CB,,g%:�Yb(g%):� z���Zb:�x:�A:�r:� {��u(x%,q%):�x%>=0� {:d$="s"+a$(x%) {L�:�q%>3�q%+=1 {Ud$="st"+�(q%):q%+=8 {p� {p�_b(d$):!Nj%=q%:Ib%=q%:� {���Rb:�Ib%>7� {��Ib%>12� {�2�u(-1,Ib%-9):ș&44ADD,7+512,k%,zg%+Ib%-3,,,eh% {�4�:�u(-1,Ib%-8):ș&44ADD,7+512,k%,zg%+Ib%-2,,,eh% {�� {�;�:ș&44ADD,7+512,k%,zg%+Ib%-1,,,eh%:�u(b%(3,Ib%-1),Ib%) |� |� |$)��`b(H%,J%,s%):!Li%=H%:!Mi%=J%:�Bj%:� |l|��ac(H%,J%,s%):�e%:�e%=0�Gg%:ș&44AE0,,eh%+4+32*e%,s%:�:�W(H%,J%):�X(H%,J%):ș&400E6,7:ȓH%+`g%,J%+ch%,bh%-`g%,ah%-ch%:� |�_��x:�m:Kb%=�:�g:ș&44ADD,7,k%,Mg%,1:ș&44ADD,3,k%,Kg%,0:A%=-1:B%=-1:�Fj%:Ub%=�:�bc:�cc(�):� }D��L(ok%):�e%:�Ub%� }hș&44ADD,7,k%,Kg%,1:!Tj%=0 }��:!Tj%=1 }�� }��cc(�Ub%):kl%=-1:�ok%=1� }�6ș&44ADD,7,k%,Lg%,1:A%=0:B%=0:�Fj%:!Rj%=-1:!Sj%=u% }�H�:ș&44ADD,7,k%,Jg%,1:A%=(u%-1)�M%:B%=(u%-1)�M%:�Fj%:!Rj%=u%:!Sj%=u% ~� ~^Kb%=�:ll%=ok%:�g:!tj%=Yb%:ș&401C0:�m:ml%=lb%:nl%=-mb%:�e%=0�mb%:A%=e%*Q%:�ll%=1��Uj%��Vj% ~��:�dc:�t:ol%=-100:� ~�O��Sb(A%):!g%=dh%:ș&400CB,,g%:g%!24+=A%*(Ob%+Rb%)*-1:�Yb(g%):ș&400C5,,g%:� ~���ec(d%):Ȏd%� �Pg%:�s(d%,k%,1) *�Ug%:�v(k%,3) 3�Tg%:�v(k%,2) <�Sg%:�s(d%)��fc <�Rg%:�s(d%)��n(0,3) E�Wg%:�s(d%)��n(1,3) N�Vg%:�h(k%):�Zb r�-1:�ib {$�-2:ș&44ADD,3+2^9,k%,Gg%,0,,eh% �� �� ���gc:�_i%:� �b��Xb:�_b(d$):ș&44AE2,262+2^11,U%,"s?",,,,si%,ti%:ș&44AE2,262+2^11,U%,"Pointer1",,,,Gj%,Hj%:� �ݤm:�Z%,A%:Z%=Ə:�ll%=1� �/�Z%<ml%� �8*�e%=1�mb%:A%=lb%+e%*Q%:�Uj%:�:nl%+=mb% �n� �nA%=(Z%�Q%)+nl%:�A%>=u%� ���Ub%�nl%-=u% ��� ���:�Z%<ml%� ��*�e%=1�mb%:A%=lb%+e%*Q%:�Vj%:�:nl%+=mb% ��� ��A%=(Z%�Q%)+nl%:�A%<0� ���Ub%�nl%+=u% ��� ��� �ml%=Z%:=Z% �+%��hc:�Z%,A%,yk%,zk%:Z%=�m:�ll%=1� �FA%=(Z%�Q%)+nl%:�A%<>kl%� �Xkl%=A%:�A%>=u%� �j �Ub%� �sA%-=u%:nl%-=u% ���:�x:A%=-100 ��� ��� ��7B%=A%�M%:A%=A%�M%:�Fj%:�A%<>ol%��Ub%��ic(A%):ol%=A% ��� ��#�:A%=u%-(Z%�Q%)-nl%-1:�A%<>kl%� ��kl%=A%:�A%<0� � �Ub%� �A%+=u%:nl%-=u% �0�:�x:A%=-100 �B� �B� �K7B%=A%�M%:A%=A%�M%:�Fj%:�A%<>ol%��Ub%��ic(A%):ol%=A% �o� �x� ��� ����dc:�Kb%� ��!ș&400D3,,g%:Fb%=�:�g%!0<>k%� ��<pl%=g%!0:ql%=g%!4:rl%=g%!8:sl%=g%!12:tl%=g%!16:ul%=g%!20 ��� ��ș&400D2,k%,-1,-200,200,0,0 �� �� ���jc:Fb%=�:� �>��bc:�Fb%�(�Kb%)� �Y*Fb%=�:ș&400D2,pl%,ql%,rl%,sl%,tl%,ul% �t� �t� �}@��kc(d%,vl%):A%=�"1234567 ",�(vl%)):�A%=0��Kb%�Ib%>7�(�wl%)� ��ș&400DC,s%!24 ���:�A%=8�A%=Ib% ��C%=�m:�ll%=1� ���K(A%,(C%�Q%)+nl%,�) ���:�K(A%,u%-(C%�Q%)-nl%-1,�) ��� ��� �� � ��K(A%,B%,xl%):�Yc%��l(3) �(�B%>=u%� �1 �Ub%� �: B%-=u% �L�:� �U� �^� �g�(Jj%)=0� �p6�b("Not allowed that many instruments at once.",�) ���:�lc(B%,A%,�,xl%) ��� ��� ��2��lc(B%,A%,yl%,xl%):�C%,D%,E%:�yl%�E%=Yb%�E%=0 �� �Kb%� ���ll%=1� ��+C%=�m�Q%:D%=B%:�D%<nl%+C%�(�xl%)�D%+=u% ��fȕ(nl%+C%<=D%�D%<=nl%+mb%*2)�xl%:ș&401C1,(D%-nl%)*Q%,0,(E%<<16�A%),(!Xj%�!Wj%<<16):D%+=u%:xl%=�:� �$2�:C%=�m�Q%:D%=u%-B%-1:�D%<nl%+C%�(�xl%)�D%+=u% �?fȕ(nl%+C%<=D%�D%<=nl%+mb%*2)�xl%:ș&401C1,(D%-nl%)*Q%,0,(E%<<16�A%),(!Xj%�!Wj%<<16):D%+=u%:xl%=�:� �u� �u*�:ș&40186,(E%<<16�A%),(!Xj%�!Wj%<<16) ��� ��-�xl%�ș&40186,(E%<<16�A%),(!Xj%�!Wj%<<16) ��� ����mc(n%,Ek%):�A%,B%:�Ek%� �� Ȏn%� ��O�0:ș&44ADA,V%,Sb%*M%*8:B%=O%*Hb%:A%=O%:�xj%:ș&44AEB,3,dh%:�ic(0):�x:�l(3) �2x�Dd%:ș&44ACC,Dd%,zd%�,,Ek%:�e%=1�Ek%:ș&44AC7,Ck%*8,V%,V%+Ck%*e%*8:�:�Vb(Hb%*(Ek%+1),O%,jl%,�):ș&44AEB,3,dh%:�l(3) �z �1:�kb(3) ��� ��� ��� ��(��ic(A%):!g%=dh%:ș&400CB,,g%:�A%=0� �� g%!24=Qb% ��6�:�g%!24<(A%)*(Ob%+Rb%)*-1�g%!24=(A%)*(Ob%+Rb%)*-1 ��R�g%!24-(g%!16-g%!8)>(A%+1)*(Ob%+Rb%)*-1�g%!24=(A%+1)*(Ob%+Rb%)*-1+(g%!16-g%!8) ��� ���Yb(g%):ș&400C5,,g%:� � ��Yb(s%):�g%!24>=Qb%� �%,�ab%�ș&44ADD,4+2^9,k%,Eg%,�,,eh%:ab%=� �.-�:�ab%�ș&44ADD,4+2^9,k%,Eg%,�,,eh%:ab%=� �@� �I*�g%!24<=g%!16-g%!8+(jl%)*(Ob%+Rb%)*-1� �R,�bb%�ș&44ADD,4+2^9,k%,Fg%,�,,eh%:bb%=� �[-�:�bb%�ș&44ADD,4+2^9,k%,Fg%,�,,eh%:bb%=� �m� �v� ���_b(d$):z$=d$:Ȏd$� ��7�"st2":A%=4:B%=0:C%=(O%-1)*20+2:D%=0:z$="st2"+�(O%) ���"st5":A%=0:B%=8:C%=0:D%=8 ���"st6":A%=4:B%=0:C%=4:D%=0 �� �"st7":A%=4:B%=44:C%=4:D%=44 ��:A%=0:B%=0:C%=0:D%=0 ��� ��_ș&44AE3,1+2^11,U%,d$,wb%+A%,wb%+B%,_%�,,_%:ș&44AE3,1+2^11,U%,z$,wb%+C%,wb%+D%,Hc%�,,Hc%:� ��W��Kb(zl%,Al%):�A%,B%,C%,D%,Bl%,Cl%:A%=zl%+Al%*M%:B%=?(A%*8+V%):Bl%=(B%�&F):�Bl%=0�� �3e?(A%*8+V%)=B%-1:Cl%=?(A%*8+V%+Bl%):?(A%*8+V%+Bl%)=0:C%=Al%:D%=zl%:�Yj%:za%=�:�w:�lc(A%,Cl%,�,�):� ��S��Nb(zl%,Al%):�A%,B%,C%,D%,Bl%:A%=zl%+Al%*M%:B%=?(A%*8+V%):Bl%=(B%�&F):�Bl%<2�� ��iB%=?(A%*8+V%+Bl%):D%=1:ȕD%<=Bl%:C%=?(A%*8+V%+D%):?(A%*8+V%+D%)=B%:B%=C%:D%+=1:�:C%=Al%:D%=zl%:�Yj%:� �8}��Lb(zl%,Al%):�A%,B%,C%,D%,Bl%:�u%<=O%��b("Sorry, you can't do that you must leave at least one beat on the screen.",�):� �\�A%=zl%+Al%*M%:ș&44AC7,u%*8-A%*8-8*O%,A%*8+V%+8*O%,A%*8+V%:ș&44ADA,u%*8+V%-O%*8,8*O%:�nc(Hb%-1):za%=�:Ca%=�:�w:�Kb%��L(ll%) ��� ��;��Mb(zl%,Al%):�A%,B%,C%,D%,Bl%,v%:A%=zl%+Al%*M%:�A%>u%� ��v%=(A%-u%)�O% �� �:v%=1 ��� ��V�(Hb%+v%)*O%/M%>jl%��b("No room to add any beats, ask your teacher for more.",�):� ��A%<=u%� �Aș&44AC7,u%*8-A%*8,A%*8+V%,A%*8+V%+8*O%:ș&44ADA,A%*8+V%,8*O% �+� �++�nc(Hb%+v%):za%=�:Ca%=�:�w:�Kb%��L(ll%) �a� �j9��oc(g$):�i:�x:�g$,".")=0�g$="<MBBeatFiles$Dir>."+g$ ��a%=�l(g$):�a%=0�� ��*b%=�h(b$,8,a%):�b%<>0��b(�c(b%+4),�):� ��H�b$<>"MBRhythm"�b$<>"MBBeat "��b("File format not understood.",�):� ��(b%=�a(c%,a%):�b%<>0��b(�c(b%+4),�):� ��i�c%>1��b("This file was made by a newer version of MusicBox. You will need an upgrade to load it.",�) ��*b%=�h(b$,4,a%):ȕb%=0�b$<>"EndX":Ȏb$� ���"Rthm":b%=�U(a%) ��"Inst":b%=�v(3,a%) ��"Temp":b%=�w(3,a%) ��"Volu":b%=�x(3,a%) �'�"Octa":b%=�y(a%) �0�"Key ":b%=�z(a%) �9�"Pent":b%=�B(a%) �B:b%=�j(a%) �K� �K�b%=0�b%=�h(b$,4,a%) �T�:�b%<>0��b(�c(b%+4),�) �o#b%=�i(a%):�p:�r:ș&44AEB,3,k%:� ��8ݤU(a%):�b%,v%,A%,B%:b%=�a(v%,a%):�b%=0�b%=�a(A%,a%) ���b%=0�b%=�a(B%,a%) ���b%<>0�=b% ��2ș&44ADA,V%,Sb%*M%*8:b%=�k(V%,v%-16,a%):�Dl%� ��#El%=A%*B%-1:A%=O%:B%=(El%�A%)+1 �#� �#�A%*B%>jl%*M%� �,�Bk%�jl%=((A%*B%-1)�M%)+1 �5� �>.�Vb(B%,A%,jl%,�):ș&44AEB,3,dh%:�ic(0):=b% �t���Vb(Fl%,Gl%,Hl%,Il%):�c%,Jl%,A%,B%:Jl%=O%:�Hl%>Sb%�Hl%=Sb%:�b("Number of rows reduced to the maximum setting of "+�(Sb%)+".") ��#c%=�:�Hl%<((Gl%*Fl%-1)/M%)�Il%� ���!g%=4:$(g%+4)="Reducing the maximum number of rows for the Beat Box will truncate the present tune. Shall I continue and reduce it?"+�0:ș&400DF,g%,%11011,o$�,c%:c%=(c%=1):�c%�Fl%=M%*Hl%/Gl% ��� ���c%� ��!Aj%=Hl%:jl%=Hl% �� ��O%=Gl%:Hb%=Fl%:u%=Gl%*Fl%:!Mj%=Gl%:!Lj%=(u%-1)�M%+1:!Kj%=(u%-1)�M%:ș&44ADA,V%+u%*8,Sb%*M%*8-u%*8:B%=Gl%*Fl%:A%=Gl%:�xj%:ș&44AEB,3,dh%:�!Nj%=10�w%=3��_b(d$) ���w%=3�((Jl%<>O%)�Il%)� ���Gl%>4� ���y(O%,hb%) ���:�y(O%,gb%) ��� ��� �� �Wb:� ��^��pc(S%,Kl%):�e%,e,c,d:Ll%=Kl%:!Ij%=Kl%:!yj%=S%:Ob%=S%:�e%=1�8:d=Mb%:c=d*e%-Mb%:�c>S%-Mb%� �?c=S%-Mb%:d=c/(e%-1) �Z� �Z;�e=0�7:!(Cj%+e%*32-32+e*4)=c-d*(e):�:�:ș&44AEB,3,dh%:� ��|��nc(Fl%):�A%,B%:Hb%=Fl%:u%=O%*Hb%:!Lj%=(u%-1)�M%+1:!Kj%=(u%-1)�M%:B%=u%:A%=O%:�xj%:ș&44AEB,3,dh%:�!Nj%=10�w%=3��_b(d$) �� �A��Ob(zl%,Al%,Ml%):�A%,B%,C%,D%,Bl%,Cl%:A%=zl%+Al%*M%:�Ml%=14� �D&B%=?(A%*8+V%):Bl%=(B%�&F):�Bl%=0�� �_�?(A%*8+V%)=B%-1:Cl%=?(A%*8+V%+Bl%):?(A%*8+V%+Bl%)=0:C%=Al%:D%=zl%:�Yj%:�lc(A%,Cl%,�,�):!di%=Cl%:�Wa("st7_copy2"):�w:�u(-1,6):za%=�:�w ���:B%=A%:A%=!di%:�B%>=u%� �� �Ub%� � B%-=u% ��:� �� �%� �.�(Jj%)=0� �76�b("Not allowed that many instruments at once.",�) �I)�:�lc(B%,A%,�,�):�w:�u(-1,5):za%=�:�w �� �� ��� ��#��Ub:�A%,B%,C%,D%:�Kb%�Ib%>7�� ��A%=Ib%:C%=�m:�ll%=1� ���K(A%,(C%�Q%)+nl%,�) ���:�K(A%,u%-(C%�Q%)-nl%-1,�) ��� ��,ș&44ADD,3+2^9,k%,Gg%,1,,eh%:�e(k%,-2):� �-��w:ș&44AE3,6,Hc%,dh%:ș&44AE3,6,_%,k%:� �<ݤs(d%):�y%:Ȏd%� �`�Bg%:y%=Gk% �r�Bg%+1:y%=Hk% �{�Bg%+2:y%=Ik% �� �Cg%:y%=� ���Dg%:y%=Kk% ���Sg%:y%=Lk% ���Rg%:y%=Mk% ���Wg%:y%=Nk% ��� ���y%��I ��=y% ��S��fc:�A%:Ck%=u%:�Ck%<1�Ck%>jl%*M%/2��c("No room to copy the present rhythm."):� ��5Dk%=(jl%*M%/Ck%)-1:ș&44ACB,Dd%,zd%,1:�n(Dd%,3):� �'��Tb:�A%,B%,C%:�:ȗA%,B%,C%:�C%=0:� �S��cc(A%):Jb%=A%:�A%� �w !dk%=2 ���:!dk%=1 ��� ��� �����qa:�Nl%:�b%(3,8):ș&40140,0,208,48:ș&40140,8:�Nl%=0�7:�Ol%=0�3:�J(Ol%,Nl%+1,Nl%):�:�:�Ol%=0�3:�J(Ol%,8,4):�:ș&6018A,8,"StringLib-Hard":� �4V��J(j%,q%,x%):�Cl%,e%:Cl%=b%(j%,q%-1):b%(j%,q%-1)=x%:�e%=0�7:�b%(j%,e%)=Cl%�Cl%=-1 �|6�:�Cl%<>-1�c%(Cl%)=((c%(Cl%)�2^(j%+27))�2^(j%+27)) ��-c%(x%)=c%(x%)�2^(j%+27):�w%=j%��qc(q%,j%) ��� ��.��U(j%):�e%:w%=j%:�e%=0�7:�qc(e%+1,j%):�:� ����qc(q%,j%):�A%,x%:�q%=8�� �"x%=b%(j%,q%-1):�b$(x%)="Rest"� �'ș&40185,q%,0 �9'�:ș&6018A,q%,b$(x%)�;P%:�(P%�1)=1� �K�rc(x%,q%,j%) �]� �]� �f8ș&40185,q%,0�,A%:ș&40185,q%,A%:?(mj%+q%)=A%:�q%<8� ��J$(kc%+26*(q%-1))="S"+a$(x%)+",P"+a$(x%):$(qi%+(q%-1)*16)="S"+a$(x%)+�0 ��� ��� ��@ݤK(j%,a%):�e%,b$,b%:b%=�f("Inst",a%):�b%=0�b%=�b(20*8+8,a%) ��7�e%=0�7:�b%=0�b%=�f(�b$(b%(j%,e%))+�20," "),20),a%) �� �:=b% �2ݤv(j%,a%):�e%,x%,b$,b%,v%,x$,N%:�Pl%�=�j(a%) �#4x$="":b%=�a(v%,a%):�e%=0�7:�b%=0�b%=�k(g%,20,a%) �G �b%=0� �PKg%?20=0:b$=�c(g%):b$=�b$,�b$," ")-1):N%=-1:�x%=0�ea%-1:�b$(x%)=b$�N%=x% ���:�N%=-1�x$=b$:N%=0 ��$b%(j%,e%)=N%:�w%=j%��qc(e%+1,j%) ��� ���:�x$<>""�pc%=��pc%=�:�b("Some instruments were not found including '"+x$+"'. They have been replaced with '"+b$(0)+"'.",�) ��=b% ��]��rc(x%,q%,j%):�Wc%,i$,X%,Y%,B%,h$,P%,T%:h$=b$(x%):�(c%(x%)�2^26)=0�(c%(x%)�&80000000)=0� ��)�i:�:ș&20008,17,n$+"."+h$�N%:�N%<>1� �Wi$="Can't use voice '"+h$+"'. Shall use an alternative. ("+n$+"."+h$+" not found.)" �1@�:笤q�笤r�i$="Can't use that voice. (No voice slots left)" �:�q� �C+ș&2001E,0,n$+"."+h$�Wc%;P%:�(P%�1)<>0� �UP笤r�i$="Can't use voice '"+h$+"'. Shall use an alternative.("+�c(Wc%+4)+")" �^F�:ș&60185,q%,0�,ja%:ș&6018A,q%,h$�;P%:ș&60185,q%,ja%:�(P%�1)=1� ��bi$="Voice module '"+h$+"' does not contain a voice called '"+h$+"'. Shall use an alternative." ���:c%(x%)=(c%(x%)�2^26) ��� ��� �� �:P%=1 ��� ��� ���i$<>""�(P%�1)=0:�p ��� ���i$=""� � �J(j%,q%,x%) ��:�b(i$,�):�J(j%,q%,0) �-� �-� �6[ݤr:�e%,Ql%:Ql%=-1:e%=0:ȕe%<Gc%�Ql%=-1:�(c%(e%)�&F8000000)=0�(c%(e%)�2^26)=2^26�Ql%=e% �ue%+=1:�:�Ql%=-1� ��Re%=0:ȕe%<Gc%�Ql%=-1:�(c%(e%)�2^(w%+27))=0�(c%(e%)�&84000000)=&04000000�Ql%=e% ��e%+=1:� ��� ���Ql%=-1�=� ��5ș&2001E,4,b$(Ql%):c%(Ql%)=(c%(Ql%)�2^26)�2^26:=� ��3��H(q%,Sk%,n%,d%):ș&40185,q%,?(mj%+q%):�Sk%<0� �Sk%=4:Rl%=a%(Sk%)-&1000 �)�:Rl%=a%(Sk%) �;� �;5ș&40189,q%,Yb%,Rl%,Xb%:�e(n%,d%):Sl%=d%:Tl%=q%:� �h'��ib:ș&40189,Tl%,Yb%+2^7,Rl%,Wb%:� ��+��sc:�e%:�e%=1�8:�e%,0,0,1:�:ș&401C0:� �ԅ��tc(c%):�e%:Ul%=c%:�e%=0�Zb%-1:a%(e%)=�(�"&1955&16AA&1555&12AA&1000&0EAA&0C00&0955&06AA&0555&02AA",e%*5+1,5))+Vl%*&1000:�:�Xa%� � �c%>7� �%jc%-=7:�e%=1�c%:a%(�(�"5263041",e%,1)))=�(�"&0D55&1400&0AAA&1155&1800&0EAA&1555",e%*5-4,5))+Vl%*&1000:� �R�:�c%>0� �[d�e%=1�c%:a%(�(�"1403625",e%,1)))=�(�"&1800&1155&1AAA&1400&0D55&16AA&1000",e%*5-4,5))+Vl%*&1000:� �� �� ��� ��-�e%=10�7�-1:a%(e%)=a%(e%-7)-&1000:�:�Xa%� ���a%(2)=a%(1):a%(1)=a%(0):a%(0)=a%(6)+&1000:a%(5)=a%(6):a%(6)=a%(7):a%(7)=a%(8):a%(8)=a%(10):a%(9)=a%(5)-&1000:a%(10)=a%(6)-&1000 �� ���e%=0�10:!(e%*4+uj%)=a%(10-e%):�:!Xj%=a%(4)-&1000:�e%=0�20:k%(e%)=�(�"&02AA&0555&06AA&0955&0C00&0EAA&1000&12AA&1555&16AA&1955&0400&7FFF&0800&0AAA&0D55&7FFF&1155&1400&7FFF&1800",e%*5+1,5))+Vl%*&1000:�:� �`9ݤO(a%):�e%,c%,b%:b%=�f("Octa",a%):�b%=0�b%=�b(12,a%) ���b%=0�b%=�b(Vl%,a%) ��=b% ��ݤy(a%):�e%,c%,b%:�Wl%� ��#b%=�a(c%,a%):�b%=0�b%=�a(c%,a%) ��Vl%=c%:�tc(Ul%) ���:b%=�j(a%) �� �=b% �9ݤP(a%):�e%,c%,b%:b%=�f("Key ",a%):�b%=0�b%=�b(12,a%) �8�b%=0�b%=�b(Ul%,a%) �A=b% �\9ݤQ(a%):�e%,c%,b%:b%=�f("Pent",a%):�b%=0�b%=�b(12,a%) �w�b%=0�b%=�b(Xa%,a%) ��=b% ��ݤz(a%):�e%,c%,b%:�Xl%� ��#b%=�a(c%,a%):�b%=0�b%=�a(c%,a%) ��Ul%=c%:�tc(Ul%) ���:b%=�j(a%) ��� ��=b% �ݤB(a%):�e%,c%,b%:�Xl%� �#b%=�a(c%,a%):�b%=0�b%=�a(c%,a%) �+Xa%=c%:�c%�c%=0�c%=2 �=!Fi%=c%:Cb%=c%:�tc(Ul%) �a�:b%=�j(a%) �s� �s=b% ��$��uc(d%):�d%=of%��R(t%,d%,X%,Y%) ���d%>=lf%�d%<=mf%� �� �Ua%<>2��S(((d%-lf%)�_b%)+1) ��� ��� ��'��vc(p%,d%,X%,Y%):�c%:�(p%�(5<<4))� �� Ȏd%� ���of%,qf%:�G(t%,d%,X%,Y%) �� �� ��(p%�4)� �' Ȏd%� �0$�df%,ef%,sf%,rf%:�p%<7��e(t%,d%) �B1�jf%:�l(0):ș&44ADD,7,t%,d%:�ob(t%,if%,df%,0) �o,�hf%:ș&44ADD,7,t%,d%:�D(t%,if%,df%,0,�) ��D�gf%:ș&44ADD,7,t%,d%:ș&44ADD,7,t%,hf%:Ok%=�:�D(t%,if%,df%,0,�) ��,�ff%:ș&44ADD,7,t%,d%:�D(t%,if%,df%,0,�) ���if%:�o(t%,d%,df%) ��.�of%:ș&44AD4,0,t%,d%,X%,Y%�c%:�d((c%+40)) ��)�qf%:ș&44AD4,0,t%,d%,X%,Y%�c%:�q(c%) ��uf%:�Pa%��e(t%,d%) �#)ș&44AD4,1,t%,of%�c%:c%-=1:�c%<0�c%=0 �>'ș&44AD4,2,t%,of%,c%�c%:�d((c%+40)) �Y�wf%:ș&44AD6,ld%,X%,Y% �b�vf%:�Pa%��e(t%,d%) �k-ș&44AD4,1,t%,of%�c%:c%+=1:�c%>255�c%=255 ��'ș&44AD4,2,t%,of%,c%�c%:�d((c%+40)) ��� ��� ��� ��i��Eb:�h(Bf%):�T(t%):�y(1,gb%):Ok%=�:�U(0):�V(t%,qf%):ș&44AD4,1,t%,of%�c%:�d(c%+40):�t:�s(df%,t%,0):� �1��wc:�d%:�Ua%<>2� �U>ș&400CF,,h%:d%=h%!16:�d%>=lf%�d%-lf%<=_b%*Zb%�(h%!8�4)=4� �p�xc(d%) �� �:�yc ��� ��� ��� ����xc(d%):�d%<>cc%� ���yc:�_(2,d%) ��� ��� ����yc:�cc%>-1� � �_(3,cc%) �� �� �%��zc(H%,J%):�W(H%,J%):�X(H%,J%):� �H"��Ac:�o(t%,if%,df%):�m:�A:�r:� ����Bc(d%):Ȏd%� ���df%:�s(d%,t%,1) ���ef%:�h(t%):�Ac ���sf%:�v(o%,7) ���rf%:�v(o%,6) ��� ��� ��+��ea:�Yl%:�:ș&400C7,Ma%,mc%�Yl%:ȎYl%� � �1:�Cc(mc%) �2�2:�Dc(mc%) �;�3:�Ec(!mc%) �D�4:�Fc(mc%) �M�5:�Gc(mc%) �V�6:�Hc(mc%) �_ �7:�Ic �h�8:�Jc(mc%) �q�9:�Kc(mc%) �z�11:�jc ���17,18:�Lc(mc%) ��� ���Yl%<>17�Yl%<>18��bb �� �va%:� ����Gc(s%):Ȏ!s%� �� �o%:Ka%=� �� �l%:Qa%=� �� �t%:La%=� ���k%,dh%:Ta%=�:�dc �� �m%:vc%=� ��� ���g:� � 8��Fc(s%):�A%,Zl%:Zl%=�:A%=!s%:�A%=ld%�ș&400C6,,s%:� �@Ȏ�� �I�Ka%:�ab:Ka%=�:Zl%=� �vN�Ta%:ș&400CF,,g%:�(g%!12<>dh%�g%!12<>k%)�(g%!12=A%�A%=k%)��gc:Ta%=�:Zl%=� ���Qa%:�tb:Qa%=�:Zl%=� ���La%:La%=�:Zl%=� ���vc%:vc%=�:�Mc ��� ���g:�Zl%=�� �� A%=0:�bj% �� �� �!��Ec(A%):�h(A%):ȎA%� �E�Bf%:�Gb �W�t%:�Ac �` �o%:�Y �i�vd%:�r �r�l%:�vb �{�k%:�Zb ��� ��� ����Lc(s%):Ȏs%!16� ���0:va%=� ���8:�Zc%�_c%�Yc%�Xc%� ��&�n(2,-1):s%!12=s%!8:ș&400E7,19,s% ��� ��M�3:�b("Loading via dragging not implemented yet. Try double clicking.",�) ���5:�Nc(s%) ��&400C1:�ca �� �� �\��Hc(s%):�p%,n%,d%,X%,Y%:X%=s%!0:Y%=s%!4:p%=s%!8:n%=s%!12:d%=s%!16:�n%<>Mf%�ș&44ACE,,s% �\�(p%�2)� �e Ȏn%� �n�-2:�`(Wh%,X%-50,96+44*3) ���t%:�uc(d%) ���o%:�Ta(d%,X%,Y%) ���l%:�lb(d%,X%,Y%) ���k%:�Pb(d%,X%,Y%) ���m%:�Oc(d%,X%,Y%) ���ld%:�h(ld%) ��� ���:Ȏn%� ���-2:�Aa%��A ���t%:�vc(p%,d%,X%,Y%) ���k%:�Qb(p%,d%,X%,Y%) ���Mf%:�yb(p%,d%) ���Bf%:�Db(p%,d%) ���o%:�Ua(p%,d%,X%,Y%) ��l%:�nb(p%,d%,X%,Y%) ��vd%:�Pc(p%,d%) ��Me%:�Qc(p%,d%,X%,Y%) �"�`%:�Rc(p%,d%,X%,Y%) �+�Od%:�Sc(p%,d%,X%,Y%) �4�m%:�Tc(p%,d%,X%,Y%) �=�We%:�Uc(p%,d%,X%,Y%) �F�dh%:�Jb(p%,X%,Y%) �O�_a%:�Vc(p%,d%) �X�jd%:�Wc(p%,X%,Y%) �a�ld%:�h(ld%) �j� �j� �s�n%<>Mf%�ș&44ACF,5 �|� ����Ic:�A%:Ȏ�� ���(Ja%<>0):�Xc ���Ia%:�Yc:Ia%=� ���Sa%:A%=�(V$):Sa%=� ��� ���g:� ����Zc(W$):Sa%=�:V$=W$:ȗX%,Y%,B%:h%!4=7:h%!8=X%:h%!12=Y%:h%!16=X%:h%!20=Y%:h%!24=0:h%!28=0:h%!32=wc%:h%!36=xc%:ș&400D0,,h%:� ����e(n%,d%):�X%,Y%,B%:�d%<0� ��#ȗX%,Y%,B%:ș&44AD9,X%,Y%,X%,Y% ���:ș&44ADD,3,n%,d%,1 ��� ��Pa%=�:_l%=n%:`l%=d%:�g:� ���_c:ș&400CF,,h%:�`l%<0� �5�h%!12<>_l%�(h%!8�7)=0� �>�`c:ș&44AD9,,-2 �Y� �Y(�:�h%!12<>_l%�h%!16<>`l%�(h%!8�7)=0� �k�`c:ș&44ADD,3,_l%,`l%,0 ��� ��� ��� ����`c:Ȏ_l%� ���o%:�gb(`l%) ���k%:�ec(`l%) ���Mf%:�Cb(`l%) ���t%:�Bc(`l%) ���l%:�wb(`l%) ���m%:�ad(`l%) ���vd%:�bd(`l%) ���_a%:�cd(`l%) �� �Pa%=�:�g:� ���bb:�A%:�za%� �C za%=� �U�:�Ua%<>0��dd �^�Pa%��_c �g�La%��wc �p�qa%��E(Ə,(cl%�qa%)) �y�Ia%��Yc ���Ka%��ab ���Ta%��gc ���Qa%��tb ���yb%��db ���Kb%��hc ���Ra%��ed ���vc%��Mc ��� ��.A%=&20+&20+&2:șA%�A%:�ub%=-1�ub%=A%+89975 ���A%>ub%��b(�(117),�):va%=� ��� ��C��Yc:�X%,Y%,B%,c%:ȗX%,Y%,B%:ș&44AD4,0,qc%,rc%,X%,Y%�c%:Ȏqc%� �H�m%:Ȏrc%� �ZT�he%:ș&44ACB,m%,ge%,(c%-128)*4096/128:ș&40187,(c%-128)*4096/128+ya%:sc%=-1:�Mc ���ie%:�fd(c%) ��� ���t%:Ȏrc%� ���of%:�d((c%+40)) ���qf%:�q(c%) ��� ���o%:Ȏrc%� ���gg%:�d((c%+40)) ���`f%:�q(c%) ��� ���l%:Ȏrc%� ��uh%:�d((c%+40)) � �yh%:�q(c%) �)� �)�k%:Ȏrc%� �;�Qg%:�d((c%+40)) �M�Og%:�q(c%) �V� �V� �_� �h8��gd(A%):!h%=A%:ș&400CB,,h%:h%!28=-1:ș&400C5,,h%:� �� ��Dc(s%):ș&44AE7,0,s%,Nh%:� ��4��Kc(s%):�am%:ș&400CF,,g%:�(g%!8�1)�am%=1�am%=2 �� �s%!4=-1� � Ȏbm%� � �Wh%:Ȏ!s%� �*�0:ș&400D4,,kd%,g%!0-50,g%!4+50:am%=3 �. �1:�hd �7 �2:�id �@� �@�Xh%:�jd(!s%) �R�Yh%:�Hb(!s%) �[� �[� �d Ȏam%� �m�1:ș&400D4,,bm% ��2:ș&400D4,,-1 ��� ��� ��-��`(A%,X%,Y%):ș&400D4,,A%,X%,Y%:bm%=A%:� ��'��h(A%):g%!0=A%:ș&44AE7,1,g%,Nh%:� ����Jc(s%):Ȏ!s%� ��vd%:�kd(s%!4,s%!24) ��k%:�kc(s%!4,s%!24) �!:ș&400DC,s%!24 �*� �*� �3M��g:�La%�(Ua%<>0)�Qa%�Pa%�yb%�Kb%�qa%�Ia%�Ka%�Ra%�Ta%�vc%�Ma%=Na%�Ma%=Oa% �N� �WD��G(n%,d%,X%,Y%):ș&44AD4,3,n%,d%,X%,Y%:rc%=d%:qc%=n%:Ia%=�:�g:� �����ca:�cm%:ș&35,-1,4�,,nk%:ș&35,-1,5�,,dm%:ș&35,-1,9�,,cm%:ș&35,-1,11�,,em%:ș&35,-1,12�,,fm%:nk%=2^nk%:dm%=2^dm%:em%=(em%+1)*nk%:fm%=(fm%+1)*dm%:�fm%<>xc%�em%<>wc%�Ra%=�:�g �<xc%=fm%:wc%=em%:�((nk%<>!Ni%)�(dm%<>!Oi%)�(cm%<>yc%))�� �/&yc%=cm%:!Ni%=nk%:!Oi%=dm%:�w%=1��z �\�Ib:�w%=2��rb �n �w%=3��Xb �w� ��+��Cc(s%):�X%,Y%,A%,H%,J%:!g%=!s%:Ȏ!g%� ���jd%:�ld ��O:ș&400C8,0,g%�A%:H%=g%!4-g%!20:J%=g%!16-g%!24:ȕA%<>0:ș&44ACD,,g%:Ȏ!g%� ���t%:�zc(H%,J%) ��o%:�`a(H%,J%,g%) ��k%:�ac(H%,J%,g%) ��l%:�sb(H%,J%,g%) �"�dh%:�`b(H%,J%,g%) �+� �+ș&400CA,,g%�A%:� �F� �F)�!g%=dh%�Ca%�ș&44AE3,7,Hc%,dh%:Ca%=� �O"ș&40+2�B%:�Eb%<0�Eb%=B%+89980 �a �B%>=Eb%� �j!A$=�3,1,"You"):�b(A$,�):va%=� ��� ��� ��R��ed:�e%:Ra%=�:�e%=0�gd%:h%!0=f%(e%,0):ș&600CB,,h%:�(h%!32�2^16)=2^16��md(e%) �� �:�g:� ��.��T(n%):�e%:�e%=0�gd%:�f%(e%,0)=n%��md(e%) �'�:� �9���md(gm%):�hm%,X%,Y%,n%,af%,S%,im%,jm%:n%=f%(gm%,0):af%=f%(gm%,1):S%=f%(gm%,2):im%=f%(gm%,3):jm%=f%(gm%,4):A%=�:!h%=n%:�Ba%� ��X%=wc%:Y%=xc% ��4�:X%=-1:Y%=-1:ș&400CB,,h%:�(h%!32�2^16)<>0�A%=� ��� ���X%<af%�X%=af% ���Y%<S%�Y%=S% ���A%� ��h%!4=wc%/2-X%/2:h%!8=xc%/2-Y%/2:h%!12=wc%/2+X%/2:h%!16=xc%/2+Y%/2:h%!20=im%-X%/2+af%/2:h%!24=jm%+Y%/2-S%/2:h%!28=-1:ș&44AE7,0,h%,Nh% �>� �> �Ba%� �GHș&400CB,,h%:h%!100=n%:ș&400E0,,h%+100:�h%!104<0�h%!12-=h%!4:h%!4=0 �k �h%!108<0�h%!16-=h%!8:h%!8=0 �t�h%!112>wc%� �}*h%!4-=(h%!112-wc%):h%!12-=(h%!112-wc%) ��� ���h%!116>xc%� ��*h%!8-=(h%!116-xc%):h%!16-=(h%!116-xc%) ��� ��"ș&400C6,,h%:ș&44AE7,0,h%,Nh% ��� ��� ����oa(j%):�q$,n%:Ȏj%� �!�0:q$="Sound Box - "+C$:n%=t% � �1:q$="Tune Box - "+v$:n%=o% �!�2:q$="Chord Box - "+D$:n%=l% �( �3:q$="Beat Box - "+B$:n%=k% �1� �1!q$+=�E(j%):ș&44AEB,1,n%,q$:� �LݤE(j%):�y%:Ȏj%� �p �0:y%=Zc% �� �1:y%=Xc% �� �2:y%=_c% �� �3:y%=Yc% ��� ���y%�=" *"�="" ����l(j%):�E(j%)=" *"�� �� Ȏj%� ���0:Zc%=� ���1:Xc%=� ���2:_c%=� ���3:Yc%=� ��� �� �oa(j%):� � (��id:�Zc%�_c%�Yc%�Xc%��n(2,-1)�va%=� �$� �-1��Pc(p%,d%):�Tk%,X%,Y%,B%,T%:�p%=4*16�d%=nd%� �Z� �l� �u�p%>7�� �~ Ȏd%� ���pd%:�e(vd%,d%) ���qd%:�e(vd%,d%) ��B�7:ș&44ADD,2,vd%,od%,"Competition":ș&400D2,vd%,od%,0,0,-1,11 ��� ��� ����v(n%,km%):�y%:Ȏkm%� �� �1:y%=Xc% � �3:y%=Yc% � �5:y%=_c% � �7:y%=Zc% � :y%=� �)� �)�y%� �2lm%=n%:mm%=km%:�n(3,-2) �V�:�nd(n%,km%) �h� �h� �q&��nd(n%,km%):�c$,t$,a$:�(km%�1)=1� ��c$="Load":�nm%��I:� ���:c$="Save":�om%��I:� ��� �� Ȏkm%� ���0,1:t$="Tune":a$=v$ ���2,3:t$="Beat":a$=B$ ���4,5:t$="Chord":a$=D$ ���6,7:t$="Sound":a$=C$ �� ��c$="Load"�a$="" � "ș&44ADD,2,vd%,od%,a$:�W(t$)� �^lm%=n%:pm%=km%:ș&44AEB,1,vd%,c$+" File":ș&44AE7,2,vd%,Nh%,-1,0:ș&400D2,vd%,od%,0,0,-1,0 �R� �R� �[��r:�h(vd%):�od:� ��yݤW(c$):�N%,u$,a$,A%,B%:�od:ș&20023,"MB"+c$+"Files$Dir",h%,-1,0,0�,,A%:�A%>=0��("*SET MB"+c$+"Files$Dir "+k$+"."+c$) ��Bu$="<MB"+c$+"Files$Dir>":ș&8,17,u$�N%:�N%=0�ș&20008,8,u$,,,0 ��vș&8,17,u$�N%:�N%<>2��b("Load / Save window can not be opened because no '!MBFiles' directory can be found.",�):=� ��Q!g%=1:g%!4=Da%:ș&64AEA,0,u$,g%,"*",pa%�A%,Vb%;P%:�(P%�1)=1��b(�c(A%+4),�):=� �M�A%=-1��c("Due to lack of memory, the list of files has been truncated.") �C!Sh%=!(!Vb%):Qh%!8=Vb%:ș&44AE8,0,Th%,Qh%:jd%=!Qh%:!Ph%=!Qh%:=� �iO��ld:!g%=jd%:g%!76=-2:ș&44AE8,3,g%,Qh%�A%:ȕA%<>0:ș&44AE8,3,g%,Qh%�A%:�:� ����od:�jd%<>0� ��!g%=jd%:ș&400C3,,g%:jd%=0 ��� ���Vb%<>0� ��ș&44AC3,,Vb%:Vb%=0 �� �� ���bd(d%):Ȏd%� �/�pd%:�pd �A�qd%:�r �J� �J� �S=��Wc(p%,X%,Y%):ș&44AE8,2,,Qh%,X%,Y%�,,,X%,Y%:�X%=0�Y%>0� �wcș&44ADD,2,vd%,od%,(!Vb%+4+16*Y%-16):ș&400D2,vd%,od%,0,0,-1,�(�c(!Vb%+4+16*Y%-16)):�(p%�5)<>0� ���pd ��D�:?(!Vb%+4+16*Y%-4)=1:�qd(X%,Y%):�Zc("FNA("+�(X%)+","+�(Y%)+")") ��� ��� ��� ��0ݤA(X%,Y%):?(!Vb%+4+16*Y%-4)=0:�qd(X%,Y%):=0 �"K��qd(X%,Y%):ș&44AE8,4,g%,Qh%,X%,Y%�A%:ȕA%<>0:ș&44AE8,3,g%,Qh%�A%:�:� �Od��pd:�a$:ș&44ADE,2,vd%,od%,h%,256:a$=�c(h%):�a$=""��c("Please type a name in the white box."):� ���a$="Competition"�pm%=0� ��A%=�X(a$):ȎA%� ���1:�n(4,-4) ���2:�rd(a$) ��� �� �:�rd(a$) ��� ��� �ߗ��sd:�a$,l$:ș&44ADE,2,vd%,od%,h%,256:a$=�c(h%):l$=�C(a$):ș&20008,6,l$�A%;P%:�(P%�1)<>0��b("Sorry I can't overwrite the file. ("+�c(A%+4)+")",�):� �' �rd(a$):� �9��rd(a$):�j%,A%:�(pm%�1)=1� �]eș&8,17,�C(a$)�A%:�A%<>1��c("File '"+a$+"' does not exist. Please try a different file."):j%=-2:� �o� �x Ȏpm%� ���0:�a$="Competition"� ���eb:v$=a$:Xc%=�:j%=1 ��N�:�c("Click on the competition icon and OK to save from this demo."):j%=-2 ��� ��/�1:�a$="Competition"�a$="<MusicBoxD$Dir>.1" ��v$=a$:Xc%=�:j%=1:�fb(a$) ��B�2:�c("You can not save beat box files from this demo."):j%=-4 ���3:�a$="Competition"� ��<�c("The competition file only works in Tune Box."):j%=-4 ��:�oc(a$):B$=a$:Yc%=�:j%=3 �� �C�4:�c("You can not save chord box files from this demo."):j%=-3 �,�5:�a$="Competition"� �5<�c("The competition file only works in Tune Box."):j%=-4 �G�:�F(a$,2):D$=a$:_c%=�:j%=2 �Y� �YC�6:�c("You can not save sound box files from this demo."):j%=-1 �k�7:�a$="Competition"� �t<�c("The competition file only works in Tune Box."):j%=-4 ���:�F(a$,0):C$=a$:Zc%=�:j%=0 ��� ��� ���j%>0��oa(j%) ��� ����kd(d%,vl%):�vl%=13� ���pd ���:ș&400DC,s%!24 ��� ��� ����Nc(s%):�s%!40<>Da%�� �;s%!12=s%!8:s%!16=4:ș&400E7,17,s%,s%!4:�td(�c(s%+44)):� �C:��td(e$):�A%,Vh%,xa%:ș&8,17,e$�A%,,,,xa%:�A%=1�xa%>4� �p6Vh%=�(e$):A$="":�A%=1�8:A$+=�(�#Vh%):�:�#Vh%:ȎA$� ��"�"MBCompos","MBTune ":�fb(e$) ��"�"MBRhythm","MBBeat ":�oc(e$) ���"MBSound ":�F(e$,0) ���"MBChord ":�F(e$,2) �� :A%=0 ��� �� �:A%=0 � � � .�A%=0��b("Music file not understood.",�):� � � �ݤJ(a$):=�D(a$,�) �?0ݤD(a$,qm%):�N%,A%:ș&20008,17,a$�N%:�N%<>0� �Z�N%<>1� �cR�b("File already exists as a directory. Please choose a different name.",�):=0 �u�:A%=1:�qm%� ��]$(g%+4)="File already exists. Do you want to overwrite it?"+�0:ș&400DF,g%,%011011,o$�,A% ��� �� �A%<>1�=0 ��3ș&20008,6,a$�A%;P%:�(P%�1)=1��b(�c(A%+4),�):=0 ��� ��� ��5ș&2000D,&83,a$�A%;P%:�(P%�1)=1��b(�c(A%+4),�):=0 ��=A% �D&ݤf(b$,a%):$g%=b$:=�u(g%,�(b$),a%) �h ݤb(l,a%):!g%=l:=�u(g%,4,a%) ��Lݤu(wa%,xa%,a%):�P%,A%,B%:ș&2000C,2,a%,wa%,xa%�B%,,,A%;P%:�(P%�1)=1�=B% ��3�A%<>0�!g%=4:$(g%+4)="No space on disc."+�0:=g% ��=0 �*ݤR(a$):�P%,A%:�Y(a$,"Defaults",8)�=0 �*ș&20008,18,a$,Da%�A%;P%:�(P%�1)=1�=A% �%=0 �@3ݤh(�b$,xa%,a%):�A%:A%=�k(g%,xa%,a%):�A%<>0�=A% �[,b$="":�A%=0�xa%-1:b$=b$+�(?(g%+A%)):�:=0 �!Eݤj(a%):�b%,c%:b%=�a(c%,a%):ș&20009,0,a%�A%,,B%;P%:�(P%�1)=1�=A% �E-ș&20009,1,a%,B%+c%-8�A%;P%:�(P%�1)=1�=A% �W=b% �rtݤY(Q$,R$,xa%):�rm%,I%:rm%=�:sm%=�(Q$):tm%=�(R$):�I%=0�xa%-1:�(�(�Q$,sm%-I%,1))�32)<>(�(�R$,tm%-I%,1))�32)�rm%=� �� �:=rm% ��:ݤX(a$):�c$,N%:a$=�C(a$):ș&20008,17,a$�N%:�(pm%�1)=1� ���N%<>0� ���N%<>1� �d�c("Sorry, I can't use that name because it is a directory. Please choose a different name."):=0 ��:=2 �&� �&� �/F�c("That file does not exist. Please choose a different name."):=0 �A �:�N%<>0� �J�N%<>1� �Ss�c("Sorry, I can't use that name because it already exists as a directory. Please choose a different name."):=0 �e�:=1 �w� �w� ��� ��=2 ��ݤC(a$):Ȏpm%� ���0,1:c$="Tune" ���2,3:c$="Beat" ���4,5:c$="Chord" ���6,7:c$="Sound" ��� ��,�a$="Competition"�a$="<MusicBoxD$Dir>.1" ��,�a$,".")=0�a$="<MB"+c$+"Files$Dir>."+a$ ��=a$ ���Oc(d%,X%,Y%):Ȏd%� ��Zd%:�`(Xh%,X%,Y%) �+�_d%:�e(m%,_d%) �4� �4� �=!��jd(c%):�c%>=0�c%<=14��M(c%) �X� �aݤn(p%,d%,X%,Y%):X%=�:Ȏd%� ��'�Ee%:ș&40187,um%:�(p%�4)=4��ud��vd ���De%:�(p%�4)=4��ud ���wd:�xd ���Fe%:�(p%�4)=4��ud ���wd ���xe%:�N(`%) ���ye%:�N(m%) ���ze%:�N(Od%) ��Ae%:�N(Me%) ��Be%:�N(We%) ��Ce%:�yd:�(p%�4)=4��ud��vd �' X%=� �9� �9=X% �T&��Sc(p%,d%,X%,Y%):�c%,A%,A$:�p%�5� �f笤n(p%,d%,X%,Y%)� �o Ȏd%� �x"�Ld%-1,Ld%+1,Ld%:�d%=Ld%�d%-=1 ��vm%+=Ld%-d%:�vm%>2�vm%=0 ���vm%<0�vm%=2 ��ș&44ADD,1,Od%,Ld%,�F(vm%) ��-�Id%-1,Id%+1:ș&44ACA,Od%,Id%,Id%-d%,16,1 ��,�Jd%-1,Jd%+1:ș&44ACA,Od%,Jd%,Jd%-d%,7,1 ��1�Kd%-1,Kd%+1:ș&44ACA,Od%,Kd%,Kd%-d%,vb%/24,1 ��� ��� ��� ��� �&��Qc(p%,d%,X%,Y%):�c%,A%,A$:�p%�5� �,笤n(p%,d%,X%,Y%)� �5 Ȏd%� �>,�Ge%-1,Ge%+1:ș&44ACC,Me%,Ge%�,,c%:Ȏc%� �Y�6:c%=5 �k�8:c%=6 �t�12:c%=7 �}� �}c%+=Ge%-d%:�c%<1�c%=7 �c%>7�c%=1 Ȏc%� ¡�5:c%=6 ³�6:c%=8 ¼�7:c%=12 ��� ��ș&44ACB,Me%,Ge%,c% ��,�He%-1,He%+1:ș&44ACA,Me%,He%,He%-d%,7,1 ��.�Ie%-1,Ie%+1:ș&44ACA,Me%,Ie%,Ie%-d%,Sb%,1 �Q�Je%-1,Je%+1:ș&44ADE,2,Me%,Je%,g%,16:c%=�(�c(g%))*2:c%+=(Je%-d%):�c%<2�c%=14 ��c%>14�c%=2 �(#ș&44ADD,2,Me%,Je%," "+�(c%/2) �:� �:� �C� �L� �U&��Rc(p%,d%,X%,Y%):�c%,A%,A$:�p%�5� �y笤n(p%,d%,X%,Y%)�  Ȏd%� Ë'�Pd%:ș&44ADE,3,`%,d%�,,,c%:�zd(c%) ï?�Qd%,Rd%,Sd%,Td%:ș&44ADD,7,`%,d%:ș&44ADD,4,`%,Ud%,d%<>Td% ��!�Vd%,Wd%,Xd%:ș&44ADD,7,`%,d% ��� ��� ��� ��� �&��Uc(p%,d%,X%,Y%):�c%,A%,A$:�p%�5� �笤n(p%,d%,X%,Y%)� �$ Ȏd%� �-�Ue%,Ve%:ș&44ADD,7,We%,d% �H� �H� �Q� �Z� �c-��Tc(p%,d%,X%,Y%):�c%,A%,A$:�(p%�(5<<4))� ć Ȏd%� Đ�ie%:�G(m%,d%,X%,Y%) ī6�he%:�c("Tuning has been disabled for this demo.") Ľ� Ľ�:�p%�5� ��笤n(p%,d%,X%,Y%)� �� Ȏd%� ��Y�`d%,ae%:ș&44ADD,7,m%,d%:ș&44ACC,m%,be%�,,c%:ș&44ADE,3,m%,ae%�,,,A%:�A%�c%>0�c%+=7 � �M(c%) � ��be%-1,be%+1:ș&44ACC,m%,be%�,,c%:c%+=be%-d%:ș&44ADE,3,m%,ae%�,,,A%:�c%<0�c%=7:ș&44ADD,3,m%,ae%,�A%:ș&44ADD,3,m%,`d%,A%:A%=�A% �D@�c%>7�c%=0:ș&44ADD,3,m%,ae%,�A%:ș&44ADD,3,m%,`d%,A%:A%=�A% �M�A%�c%>0�c%+=7 �V �M(c%) �h�_d%:�e(m%,_d%) �z*�ie%:ș&44AD4,0,m%,d%,X%,Y%�c%:�fd(c%) ŕZ�he%,ge%-1,ge%+1,fe%-1,fe%+1,ee%-1,ee%+1:�c("Tuning has been disabled for this demo.") ŧ�ce%:�M(0) Ź� Ź� ��� ��� ��� ��7��ad(d%):�X%,Y%,B%:ȗX%,Y%,B%:�d%=_d%��`(Xh%,X%,Y%) � � ���hd:Ȏw%� �.�0:�o(t%,if%,df%) �@ �1:�j �I�2:�o(l%,sh%,wh%) �R �3:�x �[� �[0wm%=qa%:�m:xm%=0:�vd:ș&44AD6,m%,-1:ym%=m%:� ƚ��N(n%):�n%=ym%�� ƵB!g%=ym%:ș&400CB,,g%:ș&400C6,,g%:!g%=n%:ș&400C5,,g%:ym%=n%:� �����vd:�c%:ș&44ADD,3,m%,ce%,Xa%:�M(Ul%):zm%=Vl%:ș&44ACB,m%,fe%,zm%-2:ș&40187,0�um%:ș&44ACB,m%,ge%,um%-ya%:ș&44AD4,2,m%,he%,((um%-ya%)*128/4096)+128:ș&44AD4,2,m%,ie%,pb%*2:Am%=pb%:ș&44ADD,3,m%,ke%,Ba% �i�ș&44ADD,3,m%,je%,Ya%:ș&44ADD,3,m%,le%,Za%:ș&44ADD,3,m%,me%,cl%:ș&44ADD,3,m%,ne%,Jk%:ș&44ADD,3,m%,oe%,Ik%:ș&44ADD,3,m%,pe%,Hk%:ș&44ADD,3,m%,qe%,Gk%:ș&44ADD,3,m%,re%,Kk%:ș&44ADD,3,m%,se%,Lk% Ǻ�ș&44ADD,3,m%,te%,Mk%:ș&44ADD,3,m%,ue%,nm%:ș&44ADD,3,m%,ve%,om%:ș&44ADD,3,m%,we%,Nk%:ș&44ADD,3,Od%,Md%,Bm%:ș&44ADD,3,Od%,Nd%,Cm%:ș&44ACB,Od%,Id%,ik%�(2^Db%):ș&44ACB,Od%,Jd%,Dm%:ș&44ACB,Od%,Kd%,W%/24:vm%=Db% �&�ș&44ADD,1,Od%,Ld%,�F(vm%):ș&44ACB,Me%,Ge%,O%:ș&44ACB,Me%,He%,Ll%:ș&44ACB,Me%,Ie%,jl%:c%=2*Ob%/K%:ș&44ADD,2,Me%,Je%," "+�(c%/2):ș&44ADD,3,Me%,Ke%,wl%:ș&44ADD,3,Me%,Le%,il%:�c%=0�3 ȀOș&44ADD,3,`%,Qd%+c%,(ga%�&F)=c%:�:�(ga%�3)=3�ga%>=0�ș&44ACB,`%,Ud%,ga%>>4 ț�ș&44ADD,4,`%,Ud%,(ga%�3)<>3�ga%<0:ș&44ADD,7,`%,Vd%+ha%:ș&44ADD,3,`%,Yd%,ia%:�zd(ga%>=0):ș&44ADD,3,We%,Ne%,Pl%:ș&44ADD,3,We%,Oe%,Em%:ș&44ADD,3,We%,Pe%,Xl%:ș&44ADD,3,We%,Qe%,Wl%:ș&44ADD,3,We%,Re%,hl% �bș&44ADD,3,We%,Se%,Fk%:ș&44ADD,3,We%,Te%,Dl%:ș&44ADD,3,We%,Ue%,Bk%:ș&44ADD,3,We%,Ve%,�Bk%:� �"ݤF(A%):ȎA%� �=�0:="snl1" �O�1:="snl2" �X�2:="snl3" �a� �a="" �|_��M(c%):�A$:A$=�" C G D A E BF#C# FBbEbAbDbGbCb",c%*2+1,2)+" Major":�A$,1,1)=" "�A$=�A$,2) ɗ0ș&44ADD,2,m%,Zd%,A$:�c%>7�Fm%=�:c%-=7�Fm%=� ɩ �c%>0� ɲ �Fm%� ɻș&44ADD,7,m%,ae% ���:ș&44ADD,7,m%,`d% ��� ��� ��=ș&44ACB,m%,be%,c%:ș&44ADE,3,m%,ce%�,,,A%:�A%�A%=-1�A%=0 ��ș&44ADD,4,m%,Zd%,A%:ș&44ADD,4,m%,ae%,A%:ș&44ADD,4,m%,`d%,A%:ș&44ADD,4,m%,be%-1,A%:ș&44ADD,4,m%,be%,A%:ș&44ADD,4,m%,be%+1,A%:ș&44ADD,4,m%,_d%,A%:� �KN��wd:�A%,c%:�i:ș&44ACC,m%,be%�,,c%:ș&44ADE,3,m%,ae%�,,,A%:�A%�c%>0�c%+=7 ʊ%ș&44ADE,3,m%,ce%�,,,A%:�Xa%<>A%� ʥXa%=A%:�A%�A%=0�A%=2 ʷ!Fi%=A%:Cb%=A%:�w%=1� ���z:A%=0:�wi% �� �� �Tș&44ACC,m%,fe%�,,A%:Vl%=A%+2:�tc(c%):ș&44AD4,1,m%,ie%�pb%:pb%=pb%/2:�Db%<>vm%� �G�w%=1��j:�y(2^vm%,gb%) �PDb%=vm% �b� �b%ș&44ADE,3,m%,ke%�,,,A%:�A%<>Ba%� �}Ba%=A%:Ȏw%� ˏ�0:�Ac:�Eb ˡ �1:�Y:�_a ˪�2:�vb:�qb ˳�3:�Zb:�Fb ˼� ˼� ��hș&44ADE,3,m%,je%�,,,Ya%:ș&44ADE,3,m%,le%�,,,Za%:ș&44ADE,3,m%,me%�,,,cl%:�((�cl%)�(w%>=0))��E(0,�) ��ș&44ADE,3,Od%,Md%�,,,Bm%:ș&44ADE,3,Od%,Nd%�,,,Cm%:ș&44ACC,Od%,Id%�,,ik%:ik%=ik%*(2^Db%):ș&44ACC,Od%,Jd%�,,Dm%:!ck%=Dm%:ș&44ACC,Od%,Kd%�,,A%:A%=A%*24:�A%<>W%� �Lc%=�:�A%<�(ai%)� �^�!g%=4:$(g%+4)="Reducing the paper length for the tune box will truncate the present tune. Shall I continue and reduce it?"+�0:ș&400DF,g%,%11011,o$�,c%:c%=(c%=1) ̋� ̋�c%� ̔YW%=A%:!Zh%=A%:!_h%=A%*12:!mi%=A%*12:ș&44ADA,jc%+A%*12,vb%*12+12-A%*12:�w%=1��z:�C(0) ��� ��� ��@ș&44ACC,Me%,Ge%�,,B%:ș&44ACC,Me%,Ie%�,,A%:C%=O%:�C%<1�C%=6 � 8C%=((Hb%*C%-1)�B%)+1:�jl%<>A%�O%<>B%��Vb(C%,B%,A%,�) �hș&44ACC,Me%,He%�,,B%:ș&44ADE,2,Me%,Je%,g%,16:A%=�(�c(g%))*2:A%=A%*K%/2:�A%<>Ob%�B%<>Ll%��pc(A%,B%) �Q�ș&44ADE,3,m%,ne%�,,,Jk%:ș&44ADE,3,m%,oe%�,,,Ik%:ș&44ADE,3,m%,pe%�,,,Hk%:ș&44ADE,3,m%,qe%�,,,Gk%:ș&44ADE,3,m%,re%�,,,Kk%:ș&44ADE,3,m%,se%�,,,Lk%:ș&44ADE,3,m%,te%�,,,Mk%:ș&44ADE,3,m%,ue%�,,,nm% ͢�ș&44ADE,3,m%,ve%�,,,om%:ș&44ADE,3,m%,we%�,,,Nk%:ș&44ADE,3,Me%,Ke%�,,,wl%:ș&44ADE,3,Me%,Le%�,,,il%:ș&44ACC,m%,ge%�,,c%:Gm%=c%:ș&44ADE,3,`%,Yd%�,,,ia%:ș&44ADE,3,`%,Pd%�,,,c%:�c%� � c%=-1 � 7�:c%=0:�e%=0�3:ș&44ADE,3,`%,Qd%+e%�,,,A%:�A%�c%=e% �D-�:�c%=3�ș&44ACC,`%,Ud%�,,c%:c%=(c%<<4�3) �V� �_<ga%=c%:c%=0:�e%=0�2:ș&44ADE,3,`%,Vd%+e%�,,,A%:�A%�c%=e% Ό�:ha%=c%:�Ad:�Bd:�p:� �¾��Ad:ș&44ADE,3,We%,Ne%�,,,Pl%:ș&44ADE,3,We%,Oe%�,,,Em%:ș&44ADE,3,We%,Pe%�,,,Xl%:ș&44ADE,3,We%,Qe%�,,,Wl%:ș&44ADE,3,We%,Re%�,,,hl%:ș&44ADE,3,We%,Se%�,,,Fk%:ș&44ADE,3,We%,Te%�,,,Dl% �ș&44ADE,3,We%,Ue%�,,,Bk%:� �.���yd:ia%=�:Bm%=�:Cm%=�:Ul%=2:Xa%=0:Vl%=4:Gm%=0:pb%=90:Ba%=�:Ya%=�:Za%=�:cl%=�:Jk%=�:Ik%=�:Hk%=�:Gk%=�:Kk%=�:Lk%=�:Mk%=�:nm%=�:om%=�:Nk%=�:ik%=4*2:Dm%=4:W%=100:Db%=1:O%=6:Ll%=4:jl%=100:Ob%=2*K%:wl%=�:il%=�:ga%=-1:ha%=0:Pl%=� Ѝ@Em%=�:Xl%=�:Wl%=�:hl%=�:Fk%=�:Dl%=�:Bk%=�:ș&40187,ya%+Gm%:� ���Mc:�A%,Sk%:ș&44ADE,2,m%,ee%,g%,8:c%=(�"A A#B C C#D D#E F F#G G#",�c(g%))-1)/2:Sk%=�(�"&0C00&0D55&0EAA&1000&1155&12AA&1400&1555&16AA&1800&1955&1AAA",c%*5+1,5))+&1000*zm%:ș&400CF,,g% �*A%=((rc%=he%)�(m%=qc%)�Ia%):�g%!12=m%� �/Ȏg%!16� �86�13,67,20,21,22,31,32,33,34,35,36,37,38,39,40:A%=� �J� �J� �S�A%� �\ �tc%� �e�sc%<>Sk%��8,&1FF,Sk%,255 �n�:�8,&17F,Sk%,255:tc%=� ђ� ђ�:�tc%��8,0,Sk%,1 Ѥ tc%=� Ѷ� Ѷ sc%=Sk%:� ��+��fd(c%):�A%:Am%=c%/2:ș&42�A%:�A%>xm%� �xm%=A%+30:�8,&100+Am%,80,2 �� �� �"��ud:�h(ym%):�wm%��t �F� �O���zd(c%):�A%,Hm%:c%=�c%:ș&44ADD,3,`%,Pd%,�c%:ș&44ADD,4,`%,Qd%,c%:ș&44ADD,4,`%,Rd%,c%:ș&44ADD,4,`%,Sd%,c%:ș&44ADD,4,`%,Td%,c%:Hm%=-1:�e%=0�3:ș&44ADE,3,`%,Qd%+e%�,,,A%:�A%�Hm%=e% ��'�:�Hm%=-1�Hm%=0:ș&44ADD,3,`%,Qd%,� ��#ș&44ADD,4,`%,Ud%,(c%�Hm%<>3):� ��K��xd:�v%,b%,a%,e$:e$="<MBConfigFiles$Dir>.Defaults":a%=�D(e$,�):�a%=0�� �*b%=�f("MBConfig",a%):�b%=0�b%=�b(1,a%) �0�b%=0�b%=�f("Conf",a%) �9�b%=0�b%=�b(41*4+8,a%) �B�b%=0�b%=�b(Ul%,a%) �K�b%=0�b%=�b(Xa%,a%) �T�b%=0�b%=�b(Vl%,a%) �]�b%=0�b%=�b(Gm%,a%) �f�b%=0�b%=�b(pb%,a%) �o�b%=0�b%=�b(Ba%,a%) �x�b%=0�b%=�b(Ya%,a%) Ӂ�b%=0�b%=�b(Za%,a%) ӊ�b%=0�b%=�b(cl%,a%) ӓ�b%=0�b%=�b(Jk%,a%) Ӝ�b%=0�b%=�b(Ik%,a%) ӥ�b%=0�b%=�b(Hk%,a%) Ӯ�b%=0�b%=�b(Gk%,a%) ӷ�b%=0�b%=�b(Kk%,a%) ��b%=0�b%=�b(Lk%,a%) ���b%=0�b%=�b(Mk%,a%) ���b%=0�b%=�b(nm%,a%) ���b%=0�b%=�b(om%,a%) ���b%=0�b%=�b(Nk%,a%) ���b%=0�b%=�b(ik%,a%) ��b%=0�b%=�b(Dm%,a%) ��b%=0�b%=�b(W%,a%) ��b%=0�b%=�b(Db%,a%) ��b%=0�b%=�b(O%,a%) ��b%=0�b%=�b(Ll%,a%) �#�b%=0�b%=�b(jl%,a%) �,�b%=0�b%=�b(Ob%,a%) �5�b%=0�b%=�b(wl%,a%) �>�b%=0�b%=�b(il%,a%) �G�b%=0�b%=�b(ga%,a%) �P�b%=0�b%=�b(ha%,a%) �Y�b%=0�b%=�b(Pl%,a%) �b�b%=0�b%=�b(Em%,a%) �k�b%=0�b%=�b(Xl%,a%) �t�b%=0�b%=�b(Wl%,a%) �}�b%=0�b%=�b(hl%,a%) Ԇ�b%=0�b%=�b(Fk%,a%) ԏ�b%=0�b%=�b(Dl%,a%) Ԙ�b%=0�b%=�b(Bk%,a%) ԡ�b%=0�b%=�b(Bm%,a%) Ԫ�b%=0�b%=�b(Cm%,a%) Գ�b%=0�b%=�b(ia%,a%) Լ�b%=0�b%=�f("EndX",a%) ���b%=0�b%=�b(-1,a%) ���b%=0�b%=�i(a%) ��#�b%<>0��b(�c(b%+4),�):b%=�i(a%) ��;e$="<MBConfigFiles$Dir>.StartUpCon":a%=�D(e$,�):�a%=0�� ��b%=0�b%=�b(ga%,a%) � �b%=0�b%=�b(ha%,a%) ��b%=0�b%=�b(ia%,a%) ��b%=0�b%=�i(a%) �((�b%<>0��b(�c(b%+4)+"/2",�):b%=�i(a%) �1� �:X��da:�v%,b%,a%,e$,A%,c%:�i:c%=0:e$="<MBConfigFiles$Dir>.Defaults":b%=0:笤g(e$)�b%=2 Ղ�b%=0�a%=�l(e$) Ջ�a%=0�b%=2 Ք�b%=0�b%=�h(b$,8,a%) ՝A�b$<>"MBConfig"�b%=0��b("File format not understood.",�):b%=1 զ�b%=0�b%=�a(c%,a%) կs�c%>1�b%=0��b("This file was made by a newer version of MusicBox. You will need an upgrade to load it.",�):b%=1 ո�b%=0�b%=�h(b$,4,a%) �ȕb%=0�b$<>"EndX":Ȏb$� ���"Conf":b%=�Z(a%) ��:b%=�j(a%) ��� ���b%=0�b%=�h(b$,4,a%) �'�:�b%<>0�b%<>1�b%<>2��b(�c(b%+4),�) ��b%<>2�A%=�i(a%) ��p:�b%<>0��yd �-��vd:Xa%=2:Db%=-1:W%=-1:O%=-1:jl%=-1:Ob%=-1:�wd:Pl%=�:Em%=�:Xl%=�:Wl%=�:hl%=�:Fk%=�:Dl%=�:Bk%=�:�g("<MBTuneFiles$Dir>.Defaults")��fb("Defaults") ��5�g("<MBBeatFiles$Dir>.Defaults")��oc("Defaults") ��7�g("<MBSoundFiles$Dir>.Defaults")��F("Defaults",0) ��7�g("<MBChordFiles$Dir>.Defaults")��F("Defaults",2) �� �Ad:� ��3ݤZ(a%):�b%,v%:b%=�a(v%,a%):�b%=0�b%=�a(Ul%,a%) � �b%=0�b%=�a(Xa%,a%) �)�b%=0�b%=�a(Vl%,a%) �2�b%=0�b%=�a(Gm%,a%) �;�b%=0�b%=�a(pb%,a%) �D�b%=0�b%=�a(Ba%,a%) �M�b%=0�b%=�a(Ya%,a%) �V�b%=0�b%=�a(Za%,a%) �_�b%=0�b%=�a(cl%,a%) �h�b%=0�b%=�a(Jk%,a%) �q�b%=0�b%=�a(Ik%,a%) �z�b%=0�b%=�a(Hk%,a%) ׃�b%=0�b%=�a(Gk%,a%) �b%=0�b%=�a(Kk%,a%) ו�b%=0�b%=�a(Lk%,a%) מ�b%=0�b%=�a(Mk%,a%) ק�b%=0�b%=�a(nm%,a%) װ�b%=0�b%=�a(om%,a%) �b%=0�b%=�a(Nk%,a%) ���b%=0�b%=�a(ik%,a%) ���b%=0�b%=�a(Dm%,a%) ���b%=0�b%=�a(W%,a%) ���b%=0�b%=�a(Db%,a%) ���b%=0�b%=�a(O%,a%) ���b%=0�b%=�a(Ll%,a%) ��b%=0�b%=�a(jl%,a%) ��b%=0�b%=�a(Ob%,a%) � �b%=0�b%=�a(wl%,a%) ��b%=0�b%=�a(il%,a%) ��b%=0�b%=�a(ga%,a%) �%�b%=0�b%=�a(ha%,a%) �.�b%=0�b%=�a(Pl%,a%) �7�b%=0�b%=�a(Em%,a%) �@�b%=0�b%=�a(Xl%,a%) �I�b%=0�b%=�a(Wl%,a%) �R�b%=0�b%=�a(hl%,a%) �[�b%=0�b%=�a(Fk%,a%) �d�b%=0�b%=�a(Dl%,a%) �m�b%=0�b%=�a(Bk%,a%) �v�b%=0�b%=�a(Bm%,a%) ��b%=0�b%=�a(Cm%,a%) ؈�b%=0�b%=�a(ia%,a%) ؑ�b%=0�ș&40187,ya%+Gm% ؚ=b% ؾ���Bd:ș&44ADD,1,t%,rf%,�d("Save",om%):ș&44ADD,1,t%,sf%,�d("Load",nm%):ș&44ADD,1,l%,Bh%,�d("Save",om%):ș&44ADD,1,l%,Ch%,�d("Load",nm%):ș&44ADD,1,l%,Dh%,�d("Print",Nk%):ș&44ADD,1,o%,kg%,�d("Save",om%) ��ș&44ADD,1,o%,lg%,�d("Load",nm%):ș&44ADD,1,o%,_f%,�d("Print",Nk%):ș&44ADD,1,o%,jg%,�d("Copy",Lk%):ș&44ADD,1,o%,ig%,�d("Clear",Mk%):ș&44ADD,1+2^9,o%,Sf%,�d("t1",Gk%),,vg% �3�ș&44ADD,1+2^9,o%,Sf%+1,�d("t2",Hk%),,vg%:ș&44ADD,1+2^9,o%,Sf%+2,�d("t3",Ik%),,vg%:ș&44ADD,1+2^9,o%,Tf%,�d("t4",Jk%),,vg%:ș&44ADD,1+2^9,o%,Uf%,�d("t6",Kk%),,vg%:ș&44ADD,1,k%,Tg%,�d("Save",om%) �i�ș&44ADD,1,k%,Ug%,�d("Load",nm%):ș&44ADD,1,k%,Wg%,�d("Print",Nk%):ș&44ADD,1,k%,Sg%,�d("Copy",Lk%):ș&44ADD,1,k%,Rg%,�d("Clear",Mk%):ș&44ADD,1+2^9,k%,Bg%,�d("t1",Gk%),,eh% ٖ�ș&44ADD,1+2^9,k%,Bg%+1,�d("t2",Hk%),,eh%:ș&44ADD,1+2^9,k%,Bg%+2,�d("t3",Ik%),,eh%:ș&44ADD,1+2^9,k%,Dg%,�d("t6",Kk%),,eh%:� ��ݤd(a$,Yl%):�Yl%�="sz,pz" ��="S"+a$+",p"+a$ �V��I:�b("You can not use that button. Ask your teacher if you want to use it.",�):� �<��_(Im%,d%):�A%:A%=�("FN"+�~(Im%)+"("+�(d%)+")"):�Ua%=1� �J�Jm%=0�Km%=0 �SuA%=�t:j%(Lm%)=A%:g%(Lm%)=Jm%:e%(0,Jm%,Lm%)=Im%:e%(1,Jm%,Lm%)=d%:e%(2,Jm%,Lm%)=A%:Jm%+=1:�Jm%>=Va%��o(Mm%,Nm%,Om%) ڛ� ڤ� ڭ��dd:�A%:A%=�t:�Ua%=2��Cd ��� ��ݤt:�A%:A%=Ə:�A%<Pm%� � �Qm%� ��Rm%�Jm%=0�Jm%=g%(Lm%) �"Sm%=j%(Lm%):Km%=0:Qm%=� �F�:Km%+=lb% �X� �X� �aPm%=A%:=A%+Km% ۅ7��o(n%,d%,Tm%):ș&44ADD,7,n%,d%,1:Ua%=0:Ok%=�:Ȏn%� ۩�t%:ș&44ADD,3,n%,gf%,0 ۻ�l%:ș&44ADD,3,n%,qh%,0 ��� ���m:�sc:�s(Tm%,n%,0):�t:� ��"��ob(n%,d%,Tm%,j%):Ok%=�:Ȏn%� ��t%:ș&44ADD,3,n%,gf%,0 �'�l%:ș&44ADD,3,n%,qh%,0 �0� �0[Qm%=�:Nm%=d%:Om%=Tm%:Mm%=n%:Lm%=j%:Ua%=1:Jm%=0:g%(Lm%)=-1:j%(Lm%)=0:Pm%=0:Km%=0:�m:�t:� ܮ`��D(n%,d%,Tm%,j%,Um%):Qm%=�:Rm%=Um%:Nm%=d%:Om%=Tm%:Mm%=n%:Lm%=j%:Ua%=2:�Um%�Jm%=0�Jm%=g%(j%) �"Sm%=j%(j%):Pm%=0:Km%=0:�m:�t:� �>��Cd:�A%:�Rm%� �b�:A%=�:�Jm%<=g%(Lm%)� �}�t>=e%(2,Jm%,Lm%)� ݆EA%=�("FN"+�~(e%(0,Jm%,Lm%))+"("+�(e%(1,Jm%,Lm%))+")"):Jm%+=1:A%=� ݪ� ݪ� ݳ�A%:�Jm%>g%(Lm%)� �� �Ok%� �� Qm%=� ���:�o(Mm%,Nm%,Om%) ��� ��� ��:�:A%=�:�Jm%>=0� ��t>=Sm%-e%(2,Jm%,Lm%)� �(GA%=�("FN"+�~(e%(0,Jm%,Lm%)�1)+"("+�(e%(1,Jm%,Lm%))+")"):Jm%-=1:A%=� �L� �L� �U�A%:�Jm%<0� �g �Ok%� �p Qm%=� ނ�:�o(Mm%,Nm%,Om%) ޔ� ޔ� ޝ� ަ� ޯiݤ2(d%):ș&44ADD,3,t%,d%,1:cc%=d%:Vm%=(d%-lf%)�_b%+1:Wm%=(d%-lf%)�_b%:ș&40189,Vm%,Yb%,a%(Wm%),Xb%:=0 �Iݤ3(d%):ș&44ADD,3,t%,d%,0:ș&40189,Vm%,Yb%+2^7,a%(Wm%),Wb%:cc%=-1:=0 �H�ݤ4(d%):�Rk%,e%,q%:ș&44ADD,3,l%,d%,1:Rk%=d%-nh%:ec%=Rk%:�e%=1�7:ș&40185,e%,?(mj%+h%(Rk%,0)):�:q%=1:�e%=0�20:�?(Jh%+Rk%*24+e%)� ߢ2ș&40189,q%,Yb%,k%(e%),Xb%:q%+=1:�q%>=8�e%=100 ߽� ���:=0 ��Rݤ5(d%):�Rk%,e%:ș&44ADD,3,l%,d%,0:Rk%=d%-nh%:q%=1:�e%=0�20:�?(Jh%+Rk%*24+e%)� � 6ș&40189,q%,Yb%+2^7,k%(e%),Wb%:q%+=1:�q%>=8�e%=100 �;� �D�:ec%=-1:=0 �qC��F(g$,j%):�v%,b%,a%,c$,Xm%,Ym%,e%,Bc%,A$,Zm%:Ym%=�:�i:�j:Ȏj%� �<�0:c$="Sound":Xm%=lf%:ș&44AEB,3,t%:�o(t%,if%,df%):Zm%=0 ��<�2:c$="Chord":Xm%=nh%:ș&44AEB,3,l%:�o(l%,sh%,wh%):Zm%=1 ��9:�0,"This procedure does not support that box type." ��� ��,�g$,".")=0�g$="<MB"+c$+"Files$Dir>."+g$ ��a%=�l(g$):�a%=0�� �*b%=�h(b$,8,a%):�b%<>0��b(�c(b%+4),�):� �D�b$<>"MB"+c$+" "��b("File format not understood.",�):b%=�G(a%):� �2b%=�a(c%,a%):�b%<>0��b(�c(b%+4),�):b%=�G(a%):� �.s�c%>1�b%=�G(a%):�b("This file was made by a newer version of MusicBox. You will need an upgrade to load it.",�) �7*b%=�h(b$,4,a%):ȕb%=0�b$<>"EndX":Ȏb$� �R�"Tape":b%=�_(Zm%,a%,Xm%) �d�"Inst":b%=�v(j%,a%):Ym%=� �m�"Temp":b%=�w(j%,a%) �v�"Volu":b%=�x(j%,a%) ��"Octa":b%=�y(a%) ��"Key ":b%=�z(a%) ��"Chor":b%=�`(a%) ��"Pent":�j%=0�b%=�B(a%) �:b%=�j(a%) �� ��b%=0�b%=�h(b$,4,a%) ��:�b%<>0��b(�c(b%+4),�) ��b%=�i(a%):�p:�r:�j%=2�Ym%� ���w%=2��k(b%(2,dc%-1),dc%) ��:�Bc%=0�6:A$=a$(b%(2,Bc%)):�e%=0�kh%-1:�h%(e%,0)=Bc%+1� �0ș&44ADD,1+512,l%,lh%+e%,"s"+A$+",p"+A$,,Hh% �*� �*�:� �E� �E� �N,ݤ_(j%,a%,Xm%):�v%,b%:�b%=0�b%=�a(v%,a%) �{�b%=0�b%=�a(v%,a%) �$g%(j%)=v%:�b%=0�b%=�a(j%(j%),a%) �(�e%=0�v%:�b%=0�b%=�a(e%(0,e%,j%),a%) ��b%=0�b%=�a(e%(1,e%,j%),a%) ��b%=0�e%(1,e%,j%)+=Xm% ��b%=0�b%=�a(e%(2,e%,j%),a%) �� �:=b% ��%ݤ`(a%):�v%,b%:�b%=0�b%=�a(v%,a%) �(�e%=0�kh%-1:�b%=0�b%=�a(h%(e%,0),a%) � �:�b%=0�b%=�k(Jh%,kh%*24,a%) �=b% �A��X(H%,J%):�w%<0�� �J^ș&400E6,5:�H%+d%(w%,0),J%+d%(w%,1):�H%+d%(w%,2),J%+d%(w%,3):�85,H%+d%(w%,2),J%+d%(w%,1):� �w#��q(_m%):_m%=_m%/2:�_m%<0�_m%=0 ��_m%>127�_m%=127 �ș&40180,_m%:� �+��V(n%,d%):ș&44AD4,1,n%,d%�c%:�q(c%):� ��<ݤM(j%,a%):�e%,c%,b%:b%=�f("Volu",a%):�b%=0�b%=�b(12,a%) � Ȏj%� ��0:ș&44AD4,1,t%,qf%�c% �+�1:ș&44AD4,1,o%,`f%�c% �4�2:ș&44AD4,1,l%,yh%�c% �=�3:ș&44AD4,1,k%,Og%�c% �F� �F�b%=0�b%=�b(c%,a%) �O=b% �jݤx(j%,a%):�e%,c%,b%:�Em%� �|#b%=�a(c%,a%):�b%=0�b%=�a(c%,a%) � �b%=0� � Ȏj%� ��0:ș&44AD4,2,t%,qf%,c% ��1:ș&44AD4,2,o%,`f%,c% ���2:ș&44AD4,2,l%,yh%,c% ���3:ș&44AD4,2,k%,Og%,c% ��� ���w%=j%��q(c%) �� ��:b%=�j(a%) �� �=b% �B��n(n%,j%):`m%=n%:Ȏn%� �T�Dd% �fH�0:ș&44ADD,2,Hd%,Gd%,"Are you sure you want to start again?":n%=Hd% �oL�1:ș&44ADD,2,Hd%,Gd%,"Are you sure you want to print your work?":n%=Hd% �x_�2:ș&44ADD,2,Hd%,Gd%,"There are some unsaved files. Are you sure you want to quit?":n%=Hd% �x��3:ș&44ADD,2,Hd%,Gd%,"The present tune has not been saved and loading a new file will lose it. Do you still want to load a new file?":n%=Hd% �f�4:ș&44ADD,2,Hd%,Gd%,"That file already exists. Do you want to continue and overwrite it?":n%=Hd% �� �e_a%=n%:ș&44ADD,1,Hd%,Fd%,"syes,pyes":ș&44ADD,5,Hd%,Ed%,�:ș&44AD6,n%,-1:ș&44AD9,n%,-1:`a%=j%:� �ґ��c(E$):pc%=�:`m%=-1:ș&44ADD,2,Hd%,Gd%,E$:ș&44ADD,1,Hd%,Fd%,"sok,pok":ș&44ADD,5,Hd%,Ed%,�:_a%=Hd%:ș&44AD6,Hd%,-1:ș&44AD9,Hd%,-1:`a%=-3:� �>"��Vc(p%,d%):�A%,C%,D%:�(p%�4)� �b Ȏ_a%� �k�Hd%:Ȏd%� �}�Fd%,Ed%:�e(Hd%,d%) �� ��Dd%:Ȏd%� ��Bd%,Cd%:�e(Dd%,d%) ��*�yd%,Ad%:ș&44ACA,Dd%,zd%,zd%-d%,Dk%,1 ��� ��� ��� ��� ��-��cd(d%):�A%:�h(_a%):ș&44AD9,0,-2:Ȏ_a%� �(�Hd%:A%=(d%=Fd%) �:�Dd%:A%=(d%=Cd%) �C� �C Ȏ`a%� �L�1:�jb(`m%,A%) �^�2:�xb(`m%,A%) �g�3:�mc(`m%,A%) �p�-1:va%=A% �y�-2:�A%��nd(lm%,mm%) �y&�-3:aa%-=1:�aa%>=0��c(c$(ra%-aa%)) ��-4:�A%��sd �� �� �v��kb(j%):�c("Sorry, Print is disabled for this demo. The full version prints using any RISC OS printer driver."):� ����Wa(m$):�A%,B%,C%,Kc%,Lc%,Mc%,Nc%,Oc%,Pc%,Qc%,Rc%,Sc%,Tc%,f$:f$="s"+a$(b%(w%,!di%-1)):ș&2E,40+256,U%,m$�,,,Kc%,Lc%,Sc%,Mc%:ș&2E,40+256,U%,f$�,,,Nc%,Oc%,Tc%,Pc%:ș&35,Mc%,3�,,Qc%:ș&35,Mc%,4�,,A%:Kc%=Kc%<<A%:h%!8=(1<<A%) ��ș&35,Mc%,5�,,A%:Lc%=Lc%<<A%:h%!12=(1<<A%):ș&35,Pc%,3�,,Rc%:ș&35,Pc%,4�,,A%:Nc%=(Nc%<<A%):h%!0=1<<A%:ș&35,Pc%,5�,,A%:Oc%=(Oc%<<A%):h%!4=1<<A%:�Qc%<>Rc%�Qc%<>15� �~;�b("Voice sprites must have 16 and only 16 colours.",�) 萯�:ș&2002E,25+256,U%,"st7":ș&2E,27+256,U%,m$,"st7":ș&2E,60+256,U%,"st7",0�,A%,B%,C%:ș&2E,52+256,U%,f$,4,44,8,h%,0:ș&2E,34+256,U%,m$,0,0,8:ș&2E,60+256,A%,B%,C%:�Sc%=1� ��Jș&2E,61+256,U%,"st7",0�,A%,B%,C%:�18,0,128+63,23,17,3,&C0,0,0,0,0,0,0 ��4ș&2E,50+256,U%,f$,4,44,8,h%,0:ș&2E,61,A%,B%,C% �� �� �� �
00000000 0d 48 49 4b dd f2 4e 61 28 f8 62 24 29 3a ea 49 |.HIK..Na(.b$):.I| 00000010 25 3a c8 99 26 32 37 2c 62 24 2c 61 2c 32 35 36 |%:..&27,b$,a,256| 00000020 3a 62 24 3d 22 22 3a 49 25 3d 30 3a c8 95 61 3f |:b$="":I%=0:..a?| 00000030 49 25 3e 33 31 3a 62 24 2b 3d bd 28 61 3f 49 25 |I%>31:b$+=.(a?I%| 00000040 29 3a 49 25 2b 3d 31 3a ce 3a e1 0d 48 91 63 dd |):I%+=1:.:..H.c.| 00000050 f2 72 61 28 6d 2c 45 24 2c 68 29 3a f2 4f 61 28 |.ra(m,E$,h):.Oa(| 00000060 22 4d 75 73 69 63 20 42 6f 78 20 68 61 73 20 73 |"Music Box has s| 00000070 75 66 66 65 72 65 64 20 61 6e 20 69 6e 74 65 72 |uffered an inter| 00000080 6e 61 6c 20 65 72 72 6f 72 20 61 6e 64 20 6d 75 |nal error and mu| 00000090 73 74 20 71 75 69 74 2e 20 22 2b 45 24 2b 22 20 |st quit. "+E$+" | 000000a0 28 22 2b c3 28 68 29 2b 22 29 22 29 3a e0 0d 48 |("+.(h)+")"):..H| 000000b0 ac 16 dd f2 4f 61 28 77 24 29 3a ee 85 f2 50 61 |....Oa(w$):...Pa| 000000c0 28 77 24 29 0d 48 c7 29 21 61 3d 9f 3a 24 28 61 |(w$).H.)!a=.:$(a| 000000d0 2b 34 29 3d 77 24 2b bd 30 3a c8 99 26 34 30 30 |+4)=w$+.0:..&400| 000000e0 44 46 2c 61 2c 31 2c 55 24 3a f2 51 61 0d 48 fd |DF,a,1,U$:.Qa.H.| 000000f0 10 dd f2 50 61 28 77 24 29 3a ee 85 87 0d 49 06 |...Pa(w$):....I.| 00000100 0c e7 eb 3c 3e 62 8c eb 62 0d 49 0f 06 ef 34 0d |...<>b..b.I...4.| 00000110 49 18 0b f1 77 24 3a f2 51 61 0d 49 3c 14 dd f2 |I...w$:.Qa.I<...| 00000120 52 61 28 69 29 3a e7 6a 3e 69 8c f2 51 61 0d 49 |Ra(i):.j>i..Qa.I| 00000130 45 05 e1 0d 49 4e 0e dd f2 51 61 3a ee 85 f2 53 |E...IN...Qa:...S| 00000140 61 0d 49 69 07 ee 85 87 0d 49 72 13 e7 66 8c c8 |a.Ii.....Ir..f..| 00000150 99 26 34 32 35 38 39 3a 66 3d a3 0d 49 7b 07 f2 |.&42589:f=..I{..| 00000160 53 61 0d 49 96 0c dd f2 53 61 3a ee 85 87 0d 49 |Sa.I....Sa:....I| 00000170 9f 0a e7 eb 3c 3e 62 8c 0d 49 a8 11 eb 62 3a c8 |....<>b..I...b:.| 00000180 99 26 34 30 30 45 33 2c 62 0d 49 c3 05 cd 0d 49 |.&400E3,b.I....I| 00000190 c3 0e c8 99 26 34 30 30 44 44 3a e0 0d 49 de 67 |....&400DD:..I.g| 000001a0 dd f2 69 61 28 4e 24 2c 4f 24 2c 50 24 2c 6b 29 |..ia(N$,O$,P$,k)| 000001b0 3a de 61 20 32 35 36 3a f2 4e 61 28 4f 24 29 3a |:.a 256:.Na(O$):| 000001c0 f2 4e 61 28 50 24 29 3a 5a 24 3d 4f 24 3a 5f 24 |.Na(P$):Z$=O$:_$| 000001d0 3d 50 24 3a 66 3d a3 3a 6a 3d 2d 31 3a 62 3d eb |=P$:f=.:j=-1:b=.| 000001e0 3a 55 24 3d 4e 24 3a e7 6b 8c c8 99 26 34 30 30 |:U$=N$:.k...&400| 000001f0 43 30 2c 32 30 30 2c 26 34 42 35 33 34 31 35 34 |C0,200,&4B534154| 00000200 2c 4e 24 0d 4a 4a 05 e1 0d 4a 53 18 dd f2 54 61 |,N$.JJ...JS...Ta| 00000210 28 64 25 2c 58 25 2c 59 25 29 3a c8 8e 64 25 ca |(d%,X%,Y%):..d%.| 00000220 0d 4a 77 18 c9 67 67 25 3a f2 52 28 6f 25 2c 64 |.Jw..gg%:.R(o%,d| 00000230 25 2c 58 25 2c 59 25 29 0d 4a 89 0f c9 6e 67 25 |%,X%,Y%).J...ng%| 00000240 3a e7 ac 41 62 25 8c 0d 4a 92 55 c8 99 26 34 34 |:..Ab%..J.U..&44| 00000250 41 45 33 2c 36 2c 5f 25 2c 6f 25 3a c8 99 26 34 |AE3,6,_%,o%:..&4| 00000260 34 41 45 35 2c 30 2c 6f 25 2c 58 25 2c 59 25 2c |4AE5,0,o%,X%,Y%,| 00000270 2c 76 67 25 b8 2c 2c 64 25 3a c8 99 26 34 34 41 |,vg%.,,d%:..&44A| 00000280 45 33 2c 37 2c 5f 25 2c 6f 25 3a e7 64 25 3e 3d |E3,7,_%,o%:.d%>=| 00000290 51 66 25 80 64 25 3c 3d 52 66 25 8c 0d 4a b6 2d |Qf%.d%<=Rf%..J.-| 000002a0 f2 6a 3a f2 53 28 64 25 2d 51 66 25 2b 31 29 3a |.j:.S(d%-Qf%+1):| 000002b0 f2 6b 28 62 25 28 31 2c 64 25 2d 51 66 25 29 2c |.k(b%(1,d%-Qf%),| 000002c0 64 25 2d 51 66 25 2b 31 29 0d 4a da 05 cd 0d 4a |d%-Qf%+1).J....J| 000002d0 da 05 cd 0d 4a e3 05 cb 0d 4a ec 05 e1 0d 4a f5 |....J....J....J.| 000002e0 2d dd f2 55 61 28 70 25 2c 64 25 2c 58 25 2c 59 |-..Ua(p%,d%,X%,Y| 000002f0 25 29 3a ea 41 25 2c 43 25 2c 44 25 3a e7 28 70 |%):.A%,C%,D%:.(p| 00000300 25 80 28 34 3c 3c 34 29 29 8c 0d 4b 19 09 c8 8e |%.(4<<4))..K....| 00000310 64 25 ca 0d 4b 22 1c c9 67 67 25 2c 60 66 25 3a |d%..K"..gg%,`f%:| 00000320 f2 47 28 6f 25 2c 64 25 2c 58 25 2c 59 25 29 0d |.G(o%,d%,X%,Y%).| 00000330 4b 3d 05 cb 0d 4b 3d 05 cd 0d 4b 46 0c e7 28 70 |K=...K=...KF..(p| 00000340 25 80 34 29 8c 0d 4b 58 09 c8 8e 64 25 ca 0d 4b |%.4)..KX...d%..K| 00000350 61 0f c9 64 67 25 3a f2 56 61 28 31 29 0d 4b 7c |a..dg%:.Va(1).K|| 00000360 10 c9 62 67 25 3a f2 56 61 28 2d 31 29 0d 4b 8e |..bg%:.Va(-1).K.| 00000370 0b c9 65 67 25 3a f2 6a 0d 4b a0 28 c9 63 67 25 |..eg%:.j.K.(.cg%| 00000380 3a c8 99 26 34 34 41 44 44 2c 33 2c 6f 25 2c 64 |:..&44ADD,3,o%,d| 00000390 25 2c 31 3a 7a 62 25 3d b9 3a f2 56 61 28 31 29 |%,1:zb%=.:.Va(1)| 000003a0 0d 4b c4 2a c9 6c 67 25 2c 6b 67 25 2c 66 67 25 |.K.*.lg%,kg%,fg%| 000003b0 2c 68 67 25 2c 69 67 25 2c 6a 67 25 2c 5f 66 25 |,hg%,ig%,jg%,_f%| 000003c0 3a f2 65 28 6f 25 2c 64 25 29 0d 4b d6 18 c9 70 |:.e(o%,d%).K...p| 000003d0 67 25 3a e7 ac 50 61 25 8c f2 65 28 6f 25 2c 64 |g%:..Pa%..e(o%,d| 000003e0 25 29 0d 4b df 29 c8 99 26 34 34 41 44 34 2c 31 |%).K.)..&44AD4,1| 000003f0 2c 6f 25 2c 67 67 25 b8 63 25 3a 63 25 2d 3d 31 |,o%,gg%.c%:c%-=1| 00000400 3a e7 63 25 3c 30 8c 63 25 3d 30 0d 4b fa 27 c8 |:.c%<0.c%=0.K.'.| 00000410 99 26 34 34 41 44 34 2c 32 2c 6f 25 2c 67 67 25 |.&44AD4,2,o%,gg%| 00000420 2c 63 25 b8 63 25 3a f2 64 28 28 63 25 2b 34 30 |,c%.c%:.d((c%+40| 00000430 29 29 0d 4c 15 18 c9 71 67 25 3a e7 ac 50 61 25 |)).L...qg%:..Pa%| 00000440 8c f2 65 28 6f 25 2c 64 25 29 0d 4c 1e 2d c8 99 |..e(o%,d%).L.-..| 00000450 26 34 34 41 44 34 2c 31 2c 6f 25 2c 67 67 25 b8 |&44AD4,1,o%,gg%.| 00000460 63 25 3a 63 25 2b 3d 31 3a e7 63 25 3e 32 35 35 |c%:c%+=1:.c%>255| 00000470 8c 63 25 3d 32 35 35 0d 4c 39 27 c8 99 26 34 34 |.c%=255.L9'..&44| 00000480 41 44 34 2c 32 2c 6f 25 2c 67 67 25 2c 63 25 b8 |AD4,2,o%,gg%,c%.| 00000490 63 25 3a f2 64 28 28 63 25 2b 34 30 29 29 0d 4c |c%:.d((c%+40)).L| 000004a0 54 1b c9 6d 67 25 3a c8 99 26 34 34 41 44 36 2c |T..mg%:..&44AD6,| 000004b0 6c 64 25 2c 58 25 2c 59 25 0d 4c 5d 2e c9 67 67 |ld%,X%,Y%.L]..gg| 000004c0 25 3a c8 99 26 34 34 41 44 34 2c 30 2c 6f 25 2c |%:..&44AD4,0,o%,| 000004d0 64 25 2c 58 25 2c 59 25 b8 63 25 3a f2 64 28 28 |d%,X%,Y%.c%:.d((| 000004e0 63 25 2b 34 30 29 29 0d 4c 78 29 c9 60 66 25 3a |c%+40)).Lx).`f%:| 000004f0 c8 99 26 34 34 41 44 34 2c 30 2c 6f 25 2c 64 25 |..&44AD4,0,o%,d%| 00000500 2c 58 25 2c 59 25 b8 63 25 3a f2 71 28 63 25 29 |,X%,Y%.c%:.q(c%)| 00000510 0d 4c 93 0f c9 6e 67 25 3a e7 ac 41 62 25 8c 0d |.L...ng%:..Ab%..| 00000520 4c 9c 55 c8 99 26 34 34 41 45 33 2c 36 2c 5f 25 |L.U..&44AE3,6,_%| 00000530 2c 6f 25 3a c8 99 26 34 34 41 45 35 2c 30 2c 6f |,o%:..&44AE5,0,o| 00000540 25 2c 58 25 2c 59 25 2c 2c 76 67 25 b8 2c 2c 64 |%,X%,Y%,,vg%.,,d| 00000550 25 3a c8 99 26 34 34 41 45 33 2c 37 2c 5f 25 2c |%:..&44AE3,7,_%,| 00000560 6f 25 3a e7 64 25 3e 3d 51 66 25 80 64 25 3c 3d |o%:.d%>=Qf%.d%<=| 00000570 52 66 25 8c 0d 4c c0 0a e7 ac 79 62 25 8c 0d 4c |Rf%..L....yb%..L| 00000580 c9 19 f2 48 28 64 25 2d 51 66 25 2b 31 2c 2d 31 |...H(d%-Qf%+1,-1| 00000590 2c 6f 25 2c 2d 31 29 0d 4c db 05 cd 0d 4c db 1d |,o%,-1).L....L..| 000005a0 f2 6b 28 62 25 28 31 2c 64 25 2d 51 66 25 29 2c |.k(b%(1,d%-Qf%),| 000005b0 64 25 2d 51 66 25 2b 31 29 0d 4c ed 0b cc 3a c8 |d%-Qf%+1).L...:.| 000005c0 8e 64 25 ca 0d 4c f6 3d c9 30 3a f2 6c 28 31 29 |.d%..L.=.0:.l(1)| 000005d0 3a 43 25 3d 58 25 3a 44 25 3d 59 25 3a 41 25 3d |:C%=X%:D%=Y%:A%=| 000005e0 ba 28 65 69 25 29 3a e7 28 41 25 80 26 46 46 30 |.(ei%):.(A%.&FF0| 000005f0 30 30 30 30 30 29 3d 26 46 46 30 30 30 30 30 30 |00000)=&FF000000| 00000600 8c 0d 4d 1a 42 f2 63 28 22 59 6f 75 20 61 72 65 |..M.B.c("You are| 00000610 20 6e 6f 74 20 61 6c 6c 6f 77 65 64 20 74 68 61 | not allowed tha| 00000620 74 20 6d 61 6e 79 20 69 6e 73 74 72 75 6d 65 6e |t many instrumen| 00000630 74 73 20 69 6e 20 6f 6e 65 20 63 6f 6c 75 6d 6e |ts in one column| 00000640 2e 22 29 0d 4d 2c 19 cc 3a 41 25 3d 28 41 25 3c |.").M,..:A%=(A%<| 00000650 3c 38 29 3e 3e 38 3a e7 79 62 25 8c 0d 4d 3e 39 |<8)>>8:.yb%..M>9| 00000660 66 6b 25 3d ba 28 61 69 25 29 3a 67 6b 25 3d 66 |fk%=.(ai%):gk%=f| 00000670 6b 25 3a 68 6b 25 3d 28 28 28 67 6b 25 29 81 69 |k%:hk%=(((gk%).i| 00000680 6b 25 29 2b 31 29 2a 69 6b 25 2d 31 3a 21 71 6a |k%)+1)*ik%-1:!qj| 00000690 25 3d 66 6b 25 0d 4d 74 10 cc 3a e7 28 21 6e 69 |%=fk%.Mt..:.(!ni| 000006a0 25 3c 38 29 8c 0d 4d 7d 1e f2 48 28 21 6e 69 25 |%<8)..M}..H(!ni%| 000006b0 2c 31 30 2d 28 41 25 80 26 46 46 29 2c 6f 25 2c |,10-(A%.&FF),o%,| 000006c0 2d 31 29 0d 4d 8f 10 cc 3a e7 21 6e 69 25 3d 38 |-1).M...:.!ni%=8| 000006d0 2b 37 8c 0d 4d 98 28 e7 28 21 64 69 25 29 3e 30 |+7..M.(.(!di%)>0| 000006e0 8c f2 48 28 21 64 69 25 2c 31 30 2d 28 41 25 80 |..H(!di%,10-(A%.| 000006f0 26 46 46 29 2c 6f 25 2c 2d 31 29 0d 4d a1 05 cd |&FF),o%,-1).M...| 00000700 0d 4d aa 05 cd 0d 4d b3 05 cd 0d 4d bc 0b c8 8e |.M....M....M....| 00000710 21 6e 69 25 ca 0d 4d c5 3a c9 36 2b 38 3a e7 28 |!ni%..M.:.6+8:.(| 00000720 41 25 3e 3e 32 30 29 3e 30 8c 21 64 69 25 3d 41 |A%>>20)>0.!di%=A| 00000730 25 3e 3e 32 30 3a f2 57 61 28 22 73 74 37 5f 63 |%>>20:.Wa("st7_c| 00000740 6f 70 79 31 22 29 3a f2 6b 28 2d 31 2c 36 29 0d |opy1"):.k(-1,6).| 00000750 4d ce 11 c9 37 2b 38 3a f2 6b 28 2d 31 2c 35 29 |M...7+8:.k(-1,5)| 00000760 0d 4d e0 05 cb 0d 4d e0 05 cd 0d 4d e9 38 c9 53 |.M....M....M.8.S| 00000770 66 25 2c 53 66 25 2b 31 2c 53 66 25 2b 32 2c 54 |f%,Sf%+1,Sf%+2,T| 00000780 66 25 2c 55 66 25 3a e7 a4 70 28 64 25 29 8c f2 |f%,Uf%:..p(d%)..| 00000790 6b 28 2d 31 2c 64 25 2d 53 66 25 2b 31 29 8b f2 |k(-1,d%-Sf%+1)..| 000007a0 58 61 0d 4d fb 05 cb 0d 4e 04 05 cd 0d 4e 0d 05 |Xa.M....N....N..| 000007b0 cd 0d 4e 16 0f c9 5a 66 25 3a e7 ac 41 62 25 8c |..N...Zf%:..Ab%.| 000007c0 0d 4e 28 27 c8 99 26 34 34 41 45 35 2c 30 2c 6f |.N('..&44AE5,0,o| 000007d0 25 2c 58 25 2c 59 25 2c 2c 76 67 25 b8 2c 2c 64 |%,X%,Y%,,vg%.,,d| 000007e0 25 3a c8 8e 64 25 ca 0d 4e 3a 0f c9 57 66 25 3a |%:..d%..N:..Wf%:| 000007f0 f2 59 61 28 31 29 0d 4e 4c 10 c9 56 66 25 3a f2 |.Ya(1).NL..Vf%:.| 00000800 59 61 28 2d 31 29 0d 4e 55 17 c9 58 66 25 2c 59 |Ya(-1).NU..Xf%,Y| 00000810 66 25 3a f2 65 28 6f 25 2c 2d 64 25 29 0d 4e 5e |f%:.e(o%,-d%).N^| 00000820 05 cb 0d 4e 5e 05 cd 0d 4e 67 05 cb 0d 4e 70 05 |...N^...Ng...Np.| 00000830 cd 0d 4e 79 05 e1 0d 4e 82 1d dd f2 6b 28 78 25 |..Ny...N....k(x%| 00000840 2c 71 25 29 3a ea 41 25 2c 42 25 3a e7 78 25 3e |,q%):.A%,B%:.x%>| 00000850 3d 30 8c 0d 4e a6 11 64 24 3d 22 73 22 2b 61 24 |=0..N..d$="s"+a$| 00000860 28 78 25 29 0d 4e b8 12 cc 3a e7 71 25 3e 3d 35 |(x%).N...:.q%>=5| 00000870 8c 71 25 2b 3d 31 0d 4e c1 17 64 24 3d 22 73 74 |.q%+=1.N..d$="st| 00000880 22 2b c3 28 71 25 29 3a 71 25 2b 3d 38 0d 4e dc |"+.(q%):q%+=8.N.| 00000890 05 cd 0d 4e dc 1c f2 5a 61 28 64 24 29 3a 21 6e |...N...Za(d$):!n| 000008a0 69 25 3d 71 25 3a 42 62 25 3d 71 25 3a e1 0d 4f |i%=q%:Bb%=q%:..O| 000008b0 00 10 dd f2 58 61 3a e7 42 62 25 3e 37 8c 0d 4f |....Xa:.Bb%>7..O| 000008c0 1b 0c e7 42 62 25 3e 31 32 8c 0d 4f 24 32 f2 6b |...Bb%>12..O$2.k| 000008d0 28 2d 31 2c 42 62 25 2d 39 29 3a c8 99 26 34 34 |(-1,Bb%-9):..&44| 000008e0 41 44 44 2c 37 2b 35 31 32 2c 6f 25 2c 51 66 25 |ADD,7+512,o%,Qf%| 000008f0 2b 42 62 25 2d 33 2c 2c 2c 76 67 25 0d 4f 3f 34 |+Bb%-3,,,vg%.O?4| 00000900 cc 3a f2 6b 28 2d 31 2c 42 62 25 2d 38 29 3a c8 |.:.k(-1,Bb%-8):.| 00000910 99 26 34 34 41 44 44 2c 37 2b 35 31 32 2c 6f 25 |.&44ADD,7+512,o%| 00000920 2c 51 66 25 2b 42 62 25 2d 32 2c 2c 2c 76 67 25 |,Qf%+Bb%-2,,,vg%| 00000930 0d 4f 5a 05 cd 0d 4f 5a 3b cc 3a c8 99 26 34 34 |.OZ...OZ;.:..&44| 00000940 41 44 44 2c 37 2b 35 31 32 2c 6f 25 2c 51 66 25 |ADD,7+512,o%,Qf%| 00000950 2b 42 62 25 2d 31 2c 2c 2c 76 67 25 3a f2 6b 28 |+Bb%-1,,,vg%:.k(| 00000960 62 25 28 31 2c 42 62 25 2d 31 29 2c 42 62 25 29 |b%(1,Bb%-1),Bb%)| 00000970 0d 4f 7e 05 cd 0d 4f 7e 05 e1 0d 4f 87 19 dd f2 |.O~...O~...O....| 00000980 5a 61 28 64 24 29 3a ea 41 25 2c 42 25 3a c8 8e |Za(d$):.A%,B%:..| 00000990 64 24 ca 0d 4f ab 14 c9 22 73 74 32 22 3a 41 25 |d$..O..."st2":A%| 000009a0 3d 34 3a 42 25 3d 30 0d 4f bd 15 c9 22 73 74 36 |=4:B%=0.O..."st6| 000009b0 22 3a 41 25 3d 34 3a 42 25 3d 34 34 0d 4f c6 15 |":A%=4:B%=44.O..| 000009c0 c9 22 73 74 37 22 3a 41 25 3d 34 3a 42 25 3d 34 |."st7":A%=4:B%=4| 000009d0 34 0d 4f cf 0f 7f 3a 41 25 3d 30 3a 42 25 3d 30 |4.O...:A%=0:B%=0| 000009e0 0d 4f d8 05 cb 0d 4f d8 31 c8 99 26 34 34 41 45 |.O....O.1..&44AE| 000009f0 33 2c 31 2b 32 5e 31 31 2c 55 25 2c 64 24 2c 77 |3,1+2^11,U%,d$,w| 00000a00 62 25 2b 41 25 2c 77 62 25 2b 42 25 2c 5f 25 b8 |b%+A%,wb%+B%,_%.| 00000a10 2c 2c 5f 25 3a e1 0d 4f ea 75 dd f2 5f 61 3a ea |,,_%:..O.u.._a:.| 00000a20 63 25 3a f2 68 28 42 66 25 29 3a f2 54 28 6f 25 |c%:.h(Bf%):.T(o%| 00000a30 29 3a f2 55 28 31 29 3a f2 79 28 32 5e 44 62 25 |):.U(1):.y(2^Db%| 00000a40 2c 67 62 25 29 3a f2 56 28 6f 25 2c 60 66 25 29 |,gb%):.V(o%,`f%)| 00000a50 3a c8 99 26 34 34 41 44 34 2c 31 2c 6f 25 2c 67 |:..&44AD4,1,o%,g| 00000a60 67 25 b8 63 25 3a f2 73 28 66 67 25 2c 6f 25 2c |g%.c%:.s(fg%,o%,| 00000a70 30 29 3a f2 64 28 63 25 2b 34 30 29 3a f2 58 61 |0):.d(c%+40):.Xa| 00000a80 3a f2 7a 3a f2 43 28 30 29 3a e1 0d 50 8c 66 dd |:.z:.C(0):..P.f.| 00000a90 f2 60 61 28 48 25 2c 4a 25 2c 73 25 29 3a ea 65 |.`a(H%,J%,s%):.e| 00000aa0 25 3a e3 65 25 3d 30 b8 59 66 25 3a c8 99 26 34 |%:.e%=0.Yf%:..&4| 00000ab0 34 41 45 30 2c 2c 76 67 25 2b 34 2b 33 32 2a 65 |4AE0,,vg%+4+32*e| 00000ac0 25 2c 73 25 3a ed 3a f2 57 28 48 25 2c 4a 25 29 |%,s%:.:.W(H%,J%)| 00000ad0 3a 21 4c 69 25 3d 48 25 3a 21 4d 69 25 3d 4a 25 |:!Li%=H%:!Mi%=J%| 00000ae0 3a d6 44 69 25 3a f2 58 28 48 25 2c 4a 25 29 3a |:.Di%:.X(H%,J%):| 00000af0 e1 0d 50 f8 0f dd f2 61 62 3a d6 55 69 25 3a e1 |..P....ab:.Ui%:.| 00000b00 0d 51 1c 11 dd a4 48 3a 6a 6b 25 3d eb 3a 3d a4 |.Q....H:jk%=.:=.| 00000b10 49 0d 51 52 95 dd a4 49 3a ea 6b 6b 25 2c 6c 6b |I.QR...I:.kk%,lk| 00000b20 25 2c 6d 6b 25 2c 65 25 2c 41 25 2c 50 25 3a 21 |%,mk%,e%,A%,P%:!| 00000b30 69 69 25 3d 4b 25 2f 6e 6b 25 3a 21 6a 69 25 3d |ii%=K%/nk%:!ji%=| 00000b40 34 2f 6e 6b 25 3a c8 99 26 36 34 41 45 32 2c 32 |4/nk%:..&64AE2,2| 00000b50 35 39 2c 6e 63 25 2c 22 63 6f 6d 70 6f 73 65 67 |59,nc%,"composeg| 00000b60 72 69 64 22 2c 32 5e 34 2c 28 57 25 2b 31 29 2a |rid",2^4,(W%+1)*| 00000b70 4b 25 2b 34 2c 4b 25 2a 31 31 2b 34 2c 6a 6b 25 |K%+4,K%*11+4,jk%| 00000b80 b8 41 25 3b 50 25 3a c8 99 26 36 34 41 45 32 2c |.A%;P%:..&64AE2,| 00000b90 32 36 34 2c 6e 63 25 2c 32 2c 30 3a e7 28 50 25 |264,nc%,2,0:.(P%| 00000ba0 80 31 29 3d 31 8c 0d 51 88 bd c8 99 26 34 34 41 |.1)=1..Q....&44A| 00000bb0 45 32 2c 32 35 39 2c 6e 63 25 2c 22 63 6f 6d 70 |E2,259,nc%,"comp| 00000bc0 6f 73 65 67 72 69 64 22 2c 32 5e 34 2c 38 2c 38 |osegrid",2^4,8,8| 00000bd0 2c 6a 6b 25 3a f2 68 28 6f 25 29 3a f2 59 3a f2 |,jk%:.h(o%):.Y:.| 00000be0 63 28 22 4e 6f 74 20 65 6e 6f 75 67 68 20 6d 65 |c("Not enough me| 00000bf0 6d 6f 72 79 20 74 6f 20 75 73 65 20 54 75 6e 65 |mory to use Tune| 00000c00 20 42 6f 78 2e 20 54 72 79 20 72 65 64 75 63 69 | Box. Try reduci| 00000c10 6e 67 20 74 68 65 20 73 69 7a 65 20 6f 66 20 27 |ng the size of '| 00000c20 70 61 70 65 72 27 20 69 6e 20 74 68 65 20 63 6f |paper' in the co| 00000c30 6e 66 69 67 75 72 61 74 69 6f 6e 20 77 69 6e 64 |nfiguration wind| 00000c40 6f 77 2e 20 53 65 65 20 6d 61 6e 75 61 6c 20 66 |ow. See manual f| 00000c50 6f 72 20 6d 6f 72 65 20 68 69 6e 74 73 2e 22 29 |or more hints.")| 00000c60 3a 3d a3 0d 51 be 05 cd 0d 51 be c9 c8 99 26 36 |:=..Q....Q....&6| 00000c70 34 41 45 32 2c 36 30 2c 6e 63 25 2c 22 63 6f 6d |4AE2,60,nc%,"com| 00000c80 70 6f 73 65 67 72 69 64 22 2c 30 b8 2c 6b 6b 25 |posegrid",0.,kk%| 00000c90 2c 6c 6b 25 2c 6d 6b 25 3a c8 99 26 34 30 30 45 |,lk%,mk%:..&400E| 00000ca0 36 2c 30 3a c8 93 c8 90 30 2c 30 2c 28 57 25 2b |6,0:....0,0,(W%+| 00000cb0 31 29 2a 4b 25 2b 34 2c 4b 25 2a 31 31 2b 34 3a |1)*K%+4,K%*11+4:| 00000cc0 c8 99 26 34 30 30 45 36 2c 43 62 25 3a e3 65 25 |..&400E6,Cb%:.e%| 00000cd0 3d 31 b8 31 31 88 32 3a c8 93 c8 90 30 2c 4b 25 |=1.11.2:....0,K%| 00000ce0 2a 65 25 2b 32 2c 28 57 25 2b 31 29 2a 4b 25 2b |*e%+2,(W%+1)*K%+| 00000cf0 34 2c 4b 25 3a ed 3a c8 99 26 34 30 30 45 36 2c |4,K%:.:..&400E6,| 00000d00 37 3a e3 65 25 3d 30 b8 31 31 3a c8 93 c8 90 30 |7:.e%=0.11:....0| 00000d10 2c 4b 25 2a 65 25 2c 28 57 25 2b 31 29 2a 4b 25 |,K%*e%,(W%+1)*K%| 00000d20 2b 34 2c 33 3a ed 3a e3 65 25 3d 30 b8 57 25 2b |+4,3:.:.e%=0.W%+| 00000d30 31 0d 52 2a 37 c8 93 c8 90 4b 25 2a 65 25 2c 30 |1.R*7....K%*e%,0| 00000d40 2c 33 2c 31 31 2a 4b 25 2b 34 3a ed 3a c8 99 26 |,3,11*K%+4:.:..&| 00000d50 32 45 2c 36 30 2b 32 35 36 2c 6b 6b 25 2c 6c 6b |2E,60+256,kk%,lk| 00000d60 25 2c 6d 6b 25 3a 3d b9 0d 52 60 50 dd f2 59 61 |%,mk%:=..R`P..Ya| 00000d70 28 6f 6b 25 29 3a ea 58 25 2c 59 25 2c 42 25 2c |(ok%):.X%,Y%,B%,| 00000d80 70 6b 25 2c 41 25 2c 54 25 2c 64 25 3a 41 25 3d |pk%,A%,T%,d%:A%=| 00000d90 6f 6b 25 2a 32 3a 70 6b 25 3d 30 3a f5 3a d6 78 |ok%*2:pk%=0:.:.x| 00000da0 69 25 3a f2 62 62 3a c8 97 58 25 2c 59 25 2c 42 |i%:.bb:..X%,Y%,B| 00000db0 25 3a c8 8e 70 6b 25 ca 0d 52 a8 33 c9 30 3a 41 |%:..pk%..R.3.0:A| 00000dc0 25 3d 6f 6b 25 2a 34 3a 54 25 3d 91 3a f5 3a c8 |%=ok%*4:T%=.:.:.| 00000dd0 97 58 25 2c 59 25 2c 42 25 3a f2 62 62 3a fd 91 |.X%,Y%,B%:.bb:..| 00000de0 3e 54 25 2b 35 30 84 42 25 3d 30 0d 52 f0 07 c9 |>T%+50.B%=0.R...| 00000df0 31 30 0d 53 02 05 cb 0d 53 02 38 70 6b 25 2b 3d |10.S....S.8pk%+=| 00000e00 31 3a fd 42 25 3d 30 84 21 41 69 25 3c 3d 30 84 |1:.B%=0.!Ai%<=0.| 00000e10 21 41 69 25 3e 3d 57 25 2d 32 34 3a e7 41 25 3c |!Ai%>=W%-24:.A%<| 00000e20 30 8c 64 25 3d 56 66 25 8b 64 25 3d 57 66 25 0d |0.d%=Vf%.d%=Wf%.| 00000e30 53 1d 21 c8 99 26 34 34 41 44 44 2c 33 2b 35 31 |S.!..&44ADD,3+51| 00000e40 32 2c 6f 25 2c 64 25 2c 30 2c 2c 76 67 25 3a e1 |2,o%,d%,0,,vg%:.| 00000e50 0d 53 2f 79 dd f2 56 61 28 6f 6b 25 29 3a ea 65 |.S/y..Va(ok%):.e| 00000e60 25 3a f2 63 62 28 ac 7a 62 25 29 3a 66 6b 25 3d |%:.cb(.zb%):fk%=| 00000e70 ba 28 61 69 25 29 3a 67 6b 25 3d 66 6b 25 3a 68 |.(ai%):gk%=fk%:h| 00000e80 6b 25 3d 28 28 28 67 6b 25 29 81 69 6b 25 29 2b |k%=(((gk%).ik%)+| 00000e90 31 29 2a 69 6b 25 2d 31 3a 21 71 6a 25 3d 66 6b |1)*ik%-1:!qj%=fk| 00000ea0 25 3a 71 6b 25 3d 68 6b 25 3a 72 6b 25 3d 71 6b |%:qk%=hk%:rk%=qk| 00000eb0 25 3a 73 6b 25 3d 71 6b 25 3a 74 6b 25 3d 72 6b |%:sk%=qk%:tk%=rk| 00000ec0 25 3a e7 6f 6b 25 3d 31 8c 0d 53 a4 2e c8 99 26 |%:.ok%=1..S....&| 00000ed0 34 34 41 44 44 2c 37 2c 6f 25 2c 64 67 25 2c 31 |44ADD,7,o%,dg%,1| 00000ee0 3a 21 48 69 25 3d 30 3a 21 6b 6a 25 3d 6a 63 25 |:!Hi%=0:!kj%=jc%| 00000ef0 3a 21 70 6a 25 3d 30 0d 53 d1 3b cc 3a 21 48 69 |:!pj%=0.S.;.:!Hi| 00000f00 25 3d 68 6b 25 3a 21 6b 6a 25 3d 6a 63 25 2b 66 |%=hk%:!kj%=jc%+f| 00000f10 6b 25 2a 31 32 3a 21 70 6a 25 3d 68 6b 25 3a c8 |k%*12:!pj%=hk%:.| 00000f20 99 26 34 34 41 44 44 2c 37 2c 6f 25 2c 62 67 25 |.&44ADD,7,o%,bg%| 00000f30 2c 31 0d 53 fe 05 cd 0d 53 fe 8d 75 6b 25 3d 2d |,1.S....S..uk%=-| 00000f40 39 39 39 39 39 3a 76 6b 25 3d 30 3a 79 62 25 3d |99999:vk%=0:yb%=| 00000f50 b9 3a 77 6b 25 3d 6f 6b 25 3a f2 67 3a 21 74 6a |.:wk%=ok%:.g:!tj| 00000f60 25 3d 59 62 25 3a 21 6c 6a 25 3d 30 3a 6c 6a 25 |%=Yb%:!lj%=0:lj%| 00000f70 21 34 3d 30 3a 6e 6a 25 21 30 3d 30 3a 6e 6a 25 |!4=0:nj%!0=0:nj%| 00000f80 21 34 3d 30 3a 6e 6a 25 21 38 3d 30 3a 6f 6a 25 |!4=0:nj%!8=0:oj%| 00000f90 21 30 3d 2d 31 3a 6f 6a 25 21 34 3d 2d 31 3a c8 |!0=-1:oj%!4=-1:.| 00000fa0 99 26 34 30 31 43 30 3a f2 6d 3a 78 6b 25 3d 6c |.&401C0:.m:xk%=l| 00000fb0 62 25 3a 41 25 3d 31 3a d6 77 69 25 3a e7 77 6b |b%:A%=1:.wi%:.wk| 00000fc0 25 3d 31 8c 0d 54 b2 25 e3 65 25 3d 30 b8 6d 62 |%=1..T.%.e%=0.mb| 00000fd0 25 3a 41 25 3d 65 25 2a 51 25 3a e7 21 70 6a 25 |%:A%=e%*Q%:.!pj%| 00000fe0 3e 68 6b 25 80 7a 62 25 8c 0d 54 cd 13 21 70 6a |>hk%.zb%..T..!pj| 00000ff0 25 3d 30 3a 21 6b 6a 25 3d 6a 63 25 0d 54 e8 05 |%=0:!kj%=jc%.T..| 00001000 cd 0d 54 e8 0a d6 72 6a 25 3a ed 0d 55 03 25 cc |..T...rj%:..U.%.| 00001010 3a e3 65 25 3d 30 b8 6d 62 25 3a 41 25 3d 65 25 |:.e%=0.mb%:A%=e%| 00001020 2a 51 25 3a e7 21 70 6a 25 3c 30 80 7a 62 25 8c |*Q%:.!pj%<0.zb%.| 00001030 0d 55 1e 1c 21 70 6a 25 3d 68 6b 25 3a 21 6b 6a |.U..!pj%=hk%:!kj| 00001040 25 3d 6a 63 25 2b 68 6b 25 2a 31 32 0d 55 39 05 |%=jc%+hk%*12.U9.| 00001050 cd 0d 55 39 0a d6 76 6a 25 3a ed 0d 55 54 05 cd |..U9..vj%:..UT..| 00001060 0d 55 54 1f f2 74 3a e7 7a 62 25 8c c8 99 26 34 |.UT..t:.zb%...&4| 00001070 34 41 44 44 2c 37 2c 6f 25 2c 63 67 25 2c 31 0d |4ADD,7,o%,cg%,1.| 00001080 55 66 05 e1 0d 55 6f 61 dd f2 6a 3a f2 6d 3a 21 |Uf...Uoa..j:.m:!| 00001090 48 69 25 3d 2d 31 3a 41 25 3d 31 3a d6 77 69 25 |Hi%=-1:A%=1:.wi%| 000010a0 3a 79 62 25 3d a3 3a f2 67 3a c8 99 26 34 34 41 |:yb%=.:.g:..&44A| 000010b0 44 44 2c 37 2c 6f 25 2c 65 67 25 2c 31 3a 7a 62 |DD,7,o%,eg%,1:zb| 000010c0 25 3d a3 3a c8 99 26 34 34 41 44 44 2c 33 2c 6f |%=.:..&44ADD,3,o| 000010d0 25 2c 63 67 25 2c 30 3a d6 42 69 25 3a f2 63 62 |%,cg%,0:.Bi%:.cb| 000010e0 28 a3 29 3a e1 0d 55 ed 25 dd f2 64 62 3a ea 5a |(.):..U.%..db:.Z| 000010f0 25 2c 41 25 2c 79 6b 25 2c 7a 6b 25 3a 5a 25 3d |%,A%,yk%,zk%:Z%=| 00001100 c6 8f 3a e7 77 6b 25 3d 31 8c 0d 56 1a 0c e7 5a |..:.wk%=1..V...Z| 00001110 25 3c 78 6b 25 8c 0d 56 23 32 76 6b 25 2b 3d 6d |%<xk%..V#2vk%+=m| 00001120 62 25 3a e3 65 25 3d 31 b8 6d 62 25 3a 41 25 3d |b%:.e%=1.mb%:A%=| 00001130 6c 62 25 2b 65 25 2a 51 25 3a e7 21 70 6a 25 3e |lb%+e%*Q%:.!pj%>| 00001140 68 6b 25 80 7a 62 25 8c 0d 56 47 13 21 70 6a 25 |hk%.zb%..VG.!pj%| 00001150 3d 30 3a 21 6b 6a 25 3d 6a 63 25 0d 56 62 05 cd |=0:!kj%=jc%.Vb..| 00001160 0d 56 62 22 d6 72 6a 25 3a ed 3a 72 6b 25 3d 71 |.Vb".rj%:.:rk%=q| 00001170 6b 25 3a 71 6b 25 3d 73 6b 25 3a 73 6b 25 3d 68 |k%:qk%=sk%:sk%=h| 00001180 6b 25 0d 56 98 05 cd 0d 56 98 29 78 6b 25 3d 5a |k%.V....V.)xk%=Z| 00001190 25 3a 41 6b 25 3d 28 5a 25 81 51 25 29 2b 76 6b |%:Ak%=(Z%.Q%)+vk| 000011a0 25 2d 6d 62 25 3a e7 41 6b 25 3c 3e 75 6b 25 8c |%-mb%:.Ak%<>uk%.| 000011b0 0d 56 b3 15 75 6b 25 3d 41 6b 25 3a e7 41 6b 25 |.V..uk%=Ak%:.Ak%| 000011c0 3e 72 6b 25 8c 0d 56 c5 09 e7 7a 62 25 8c 0d 56 |>rk%..V...zb%..V| 000011d0 ce 19 41 6b 25 2d 3d 72 6b 25 2b 31 3a 76 6b 25 |..Ak%-=rk%+1:vk%| 000011e0 2d 3d 72 6b 25 2b 31 0d 56 e9 13 cc 3a f2 6a 3a |-=rk%+1.V...:.j:| 000011f0 41 6b 25 3d 2d 31 30 30 3a e1 0d 56 f2 05 cd 0d |Ak%=-100:..V....| 00001200 56 fb 05 cd 0d 57 04 11 41 25 3d 31 3a e7 28 ac |V....W..A%=1:.(.| 00001210 7a 62 25 29 8c 0d 57 16 22 79 6b 25 3d 41 6b 25 |zb%)..W."yk%=Ak%| 00001220 3a e7 79 6b 25 3e 66 6b 25 2d 31 31 8c 79 6b 25 |:.yk%>fk%-11.yk%| 00001230 3d 66 6b 25 2d 31 31 0d 57 28 12 e7 79 6b 25 3c |=fk%-11.W(..yk%<| 00001240 31 32 8c 79 6b 25 3d 31 32 0d 57 31 27 21 7a 69 |12.yk%=12.W1'!zi| 00001250 25 3d 28 79 6b 25 2d 31 32 29 2a 4b 25 3a 21 41 |%=(yk%-12)*K%:!A| 00001260 69 25 3d 28 79 6b 25 2d 31 32 29 3a 41 25 3d 30 |i%=(yk%-12):A%=0| 00001270 0d 57 55 05 cd 0d 57 55 11 21 48 69 25 3d 41 6b |.WU...WU.!Hi%=Ak| 00001280 25 3a d6 77 69 25 0d 57 70 05 cd 0d 57 70 0e cc |%:.wi%.Wp...Wp..| 00001290 3a e7 5a 25 3c 78 6b 25 8c 0d 57 8b 30 76 6b 25 |:.Z%<xk%..W.0vk%| 000012a0 2b 3d 6d 62 25 3a e3 65 25 3d 31 b8 6d 62 25 3a |+=mb%:.e%=1.mb%:| 000012b0 41 25 3d 6c 62 25 2b 65 25 2a 51 25 3a e7 21 70 |A%=lb%+e%*Q%:.!p| 000012c0 6a 25 3c 30 80 7a 62 25 8c 0d 57 af 1c 21 70 6a |j%<0.zb%..W..!pj| 000012d0 25 3d 68 6b 25 3a 21 6b 6a 25 3d 6a 63 25 2b 66 |%=hk%:!kj%=jc%+f| 000012e0 6b 25 2a 31 32 0d 57 ca 05 cd 0d 57 ca 22 d6 76 |k%*12.W....W.".v| 000012f0 6a 25 3a ed 3a 72 6b 25 3d 71 6b 25 3a 71 6b 25 |j%:.:rk%=qk%:qk%| 00001300 3d 73 6b 25 3a 73 6b 25 3d 68 6b 25 0d 58 00 05 |=sk%:sk%=hk%.X..| 00001310 cd 0d 58 00 2d 78 6b 25 3d 5a 25 3a 41 6b 25 3d |..X.-xk%=Z%:Ak%=| 00001320 74 6b 25 2d 28 5a 25 81 51 25 29 2d 76 6b 25 2b |tk%-(Z%.Q%)-vk%+| 00001330 6d 62 25 3a e7 41 6b 25 3c 3e 75 6b 25 8c 0d 58 |mb%:.Ak%<>uk%..X| 00001340 1b 13 75 6b 25 3d 41 6b 25 3a e7 41 6b 25 3c 30 |..uk%=Ak%:.Ak%<0| 00001350 8c 0d 58 2d 09 e7 7a 62 25 8c 0d 58 36 29 41 6b |..X-..zb%..X6)Ak| 00001360 25 2b 3d 74 6b 25 2b 31 3a 75 6b 25 3d 41 6b 25 |%+=tk%+1:uk%=Ak%| 00001370 3a 76 6b 25 2d 3d 74 6b 25 2b 31 3a 74 6b 25 3d |:vk%-=tk%+1:tk%=| 00001380 72 6b 25 0d 58 63 13 cc 3a f2 6a 3a 41 6b 25 3d |rk%.Xc..:.j:Ak%=| 00001390 2d 31 30 30 3a e1 0d 58 6c 05 cd 0d 58 75 05 cd |-100:..Xl...Xu..| 000013a0 0d 58 7e 11 41 25 3d 31 3a e7 28 ac 7a 62 25 29 |.X~.A%=1:.(.zb%)| 000013b0 8c 0d 58 90 22 79 6b 25 3d 41 6b 25 3a e7 79 6b |..X."yk%=Ak%:.yk| 000013c0 25 3e 66 6b 25 2d 31 31 8c 79 6b 25 3d 66 6b 25 |%>fk%-11.yk%=fk%| 000013d0 2d 31 31 0d 58 a2 12 e7 79 6b 25 3c 31 32 8c 79 |-11.X...yk%<12.y| 000013e0 6b 25 3d 31 32 0d 58 ab 27 21 7a 69 25 3d 28 79 |k%=12.X.'!zi%=(y| 000013f0 6b 25 2d 31 32 29 2a 4b 25 3a 21 41 69 25 3d 28 |k%-12)*K%:!Ai%=(| 00001400 79 6b 25 2d 31 32 29 3a 41 25 3d 30 0d 58 cf 05 |yk%-12):A%=0.X..| 00001410 cd 0d 58 cf 11 21 48 69 25 3d 41 6b 25 3a d6 77 |..X..!Hi%=Ak%:.w| 00001420 69 25 0d 58 ea 05 cd 0d 58 ea 05 cd 0d 58 f3 05 |i%.X....X....X..| 00001430 e1 0d 58 fc 0c dd f2 7a 3a e7 a4 48 8c 0d 59 17 |..X....z:..H..Y.| 00001440 62 f2 5a 61 28 64 24 29 3a c8 99 26 34 34 41 45 |b.Za(d$):..&44AE| 00001450 32 2c 32 36 32 2b 32 5e 31 31 2c 55 25 2c 22 73 |2,262+2^11,U%,"s| 00001460 3f 22 2c 2c 2c 2c 73 69 25 2c 74 69 25 3a c8 99 |?",,,,si%,ti%:..| 00001470 26 34 34 41 45 32 2c 32 36 32 2b 32 5e 31 31 2c |&44AE2,262+2^11,| 00001480 55 25 2c 22 74 69 65 30 31 22 2c 2c 2c 2c 75 69 |U%,"tie01",,,,ui| 00001490 25 2c 76 69 25 3a d6 63 69 25 3a d6 42 69 25 0d |%,vi%:.ci%:.Bi%.| 000014a0 59 4d 05 cd 0d 59 4d 05 e1 0d 59 56 19 dd f2 59 |YM...YM...YV...Y| 000014b0 3a 6e 3d a3 3a f2 67 3a f2 6a 3a f2 72 3a f2 41 |:n=.:.g:.j:.r:.A| 000014c0 3a e1 0d 59 9e 45 dd f2 65 62 3a ea 76 25 2c 62 |:..Y.E..eb:.v%,b| 000014d0 25 2c 61 25 3a 67 24 3d 22 3c 4d 75 73 69 63 42 |%,a%:g$="<MusicB| 000014e0 6f 78 44 24 44 69 72 3e 2e 31 22 3a 76 25 3d ba |oxD$Dir>.1":v%=.| 000014f0 28 61 69 25 29 3a 61 25 3d a4 4a 28 67 24 29 3a |(ai%):a%=.J(g$):| 00001500 e7 61 25 3d 30 8c e1 0d 59 dd 2a 62 25 3d a4 66 |.a%=0...Y.*b%=.f| 00001510 28 22 4d 42 54 75 6e 65 20 20 22 2c 61 25 29 3a |("MBTune ",a%):| 00001520 e7 62 25 3d 30 8c 62 25 3d a4 62 28 31 2c 61 25 |.b%=0.b%=.b(1,a%| 00001530 29 0d 59 ef 1a e7 62 25 3d 30 8c 62 25 3d a4 66 |).Y...b%=0.b%=.f| 00001540 28 22 54 75 6e 65 22 2c 61 25 29 0d 59 f8 1e e7 |("Tune",a%).Y...| 00001550 62 25 3d 30 8c 62 25 3d a4 62 28 31 32 2a 76 25 |b%=0.b%=.b(12*v%| 00001560 2b 31 32 2b 38 2c 61 25 29 0d 5a 01 20 e7 62 25 |+12+8,a%).Z. .b%| 00001570 3d 30 8c 62 25 3d a4 75 28 6a 63 25 2c 31 32 2a |=0.b%=.u(jc%,12*| 00001580 76 25 2b 31 32 2c 61 25 29 0d 5a 0a 15 e7 62 25 |v%+12,a%).Z...b%| 00001590 3d 30 8c 62 25 3d a4 4b 28 31 2c 61 25 29 0d 5a |=0.b%=.K(1,a%).Z| 000015a0 13 15 e7 62 25 3d 30 8c 62 25 3d a4 4c 28 31 2c |...b%=0.b%=.L(1,| 000015b0 61 25 29 0d 5a 1c 15 e7 62 25 3d 30 8c 62 25 3d |a%).Z...b%=0.b%=| 000015c0 a4 4d 28 31 2c 61 25 29 0d 5a 25 13 e7 62 25 3d |.M(1,a%).Z%..b%=| 000015d0 30 8c 62 25 3d a4 4e 28 61 25 29 0d 5a 2e 13 e7 |0.b%=.N(a%).Z...| 000015e0 62 25 3d 30 8c 62 25 3d a4 4f 28 61 25 29 0d 5a |b%=0.b%=.O(a%).Z| 000015f0 37 13 e7 62 25 3d 30 8c 62 25 3d a4 50 28 61 25 |7..b%=0.b%=.P(a%| 00001600 29 0d 5a 40 13 e7 62 25 3d 30 8c 62 25 3d a4 51 |).Z@..b%=0.b%=.Q| 00001610 28 61 25 29 0d 5a 49 1a e7 62 25 3d 30 8c 62 25 |(a%).ZI..b%=0.b%| 00001620 3d a4 66 28 22 45 6e 64 58 22 2c 61 25 29 0d 5a |=.f("EndX",a%).Z| 00001630 52 16 e7 62 25 3d 30 8c 62 25 3d a4 62 28 2d 31 |R..b%=0.b%=.b(-1| 00001640 2c 61 25 29 0d 5a 5b 13 e7 62 25 3d 30 8c 62 25 |,a%).Z[..b%=0.b%| 00001650 3d a4 69 28 61 25 29 0d 5a 64 13 e7 62 25 3d 30 |=.i(a%).Zd..b%=0| 00001660 8c 62 25 3d a4 52 28 67 24 29 0d 5a 6d 50 e7 62 |.b%=.R(g$).ZmP.b| 00001670 25 3c 3e 30 8c f2 62 28 a4 63 28 62 25 2b 34 29 |%<>0..b(.c(b%+4)| 00001680 2c a3 29 3a 62 25 3d a4 69 28 61 25 29 8b f2 72 |,.):b%=.i(a%)..r| 00001690 3a f2 63 28 22 49 20 68 61 76 65 20 73 75 63 63 |:.c("I have succ| 000016a0 65 73 66 75 6c 6c 79 20 73 61 76 65 64 20 79 6f |esfully saved yo| 000016b0 75 72 20 77 6f 72 6b 2e 22 29 0d 5a 7f 05 e1 0d |ur work.").Z....| 000016c0 5a 88 39 dd f2 66 62 28 67 24 29 3a f2 69 3a f2 |Z.9..fb(g$):.i:.| 000016d0 6a 3a e7 a7 67 24 2c 22 2e 22 29 3d 30 8c 67 24 |j:..g$,".")=0.g$| 000016e0 3d 22 3c 4d 42 54 75 6e 65 46 69 6c 65 73 24 44 |="<MBTuneFiles$D| 000016f0 69 72 3e 2e 22 2b 67 24 0d 5a b5 15 61 25 3d a4 |ir>."+g$.Z..a%=.| 00001700 6c 28 67 24 29 3a e7 61 25 3d 30 8c e1 0d 5a c7 |l(g$):.a%=0...Z.| 00001710 2a 62 25 3d a4 68 28 62 24 2c 38 2c 61 25 29 3a |*b%=.h(b$,8,a%):| 00001720 e7 62 25 3c 3e 30 8c f2 62 28 a4 63 28 62 25 2b |.b%<>0..b(.c(b%+| 00001730 34 29 2c a3 29 3a e1 0d 5a d9 48 e7 62 24 3c 3e |4),.):..Z.H.b$<>| 00001740 22 4d 42 43 6f 6d 70 6f 73 22 80 62 24 3c 3e 22 |"MBCompos".b$<>"| 00001750 4d 42 54 75 6e 65 20 20 22 8c f2 62 28 22 46 69 |MBTune "..b("Fi| 00001760 6c 65 20 66 6f 72 6d 61 74 20 6e 6f 74 20 75 6e |le format not un| 00001770 64 65 72 73 74 6f 6f 64 2e 22 2c a3 29 3a e1 0d |derstood.",.):..| 00001780 5a e2 28 62 25 3d a4 61 28 63 25 2c 61 25 29 3a |Z.(b%=.a(c%,a%):| 00001790 e7 62 25 3c 3e 30 8c f2 62 28 a4 63 28 62 25 2b |.b%<>0..b(.c(b%+| 000017a0 34 29 2c a3 29 3a e1 0d 5a f4 69 e7 63 25 3e 31 |4),.):..Z.i.c%>1| 000017b0 8c f2 62 28 22 54 68 69 73 20 66 69 6c 65 20 77 |..b("This file w| 000017c0 61 73 20 6d 61 64 65 20 62 79 20 61 20 6e 65 77 |as made by a new| 000017d0 65 72 20 76 65 72 73 69 6f 6e 20 6f 66 20 4d 75 |er version of Mu| 000017e0 73 69 63 42 6f 78 2e 20 59 6f 75 20 77 69 6c 6c |sicBox. You will| 000017f0 20 6e 65 65 64 20 61 6e 20 75 70 67 72 61 64 65 | need an upgrade| 00001800 20 74 6f 20 6c 6f 61 64 20 69 74 2e 22 2c a3 29 | to load it.",.)| 00001810 0d 5a fd 2a 62 25 3d a4 68 28 62 24 2c 34 2c 61 |.Z.*b%=.h(b$,4,a| 00001820 25 29 3a c8 95 62 25 3d 30 80 62 24 3c 3e 22 45 |%):..b%=0.b$<>"E| 00001830 6e 64 58 22 3a c8 8e 62 24 ca 0d 5b 21 15 c9 22 |ndX":..b$..[!.."| 00001840 54 75 6e 65 22 3a 62 25 3d a4 53 28 61 25 29 0d |Tune":b%=.S(a%).| 00001850 5b 33 17 c9 22 49 6e 73 74 22 3a 62 25 3d a4 76 |[3.."Inst":b%=.v| 00001860 28 31 2c 61 25 29 0d 5b 3c 17 c9 22 54 65 6d 70 |(1,a%).[<.."Temp| 00001870 22 3a 62 25 3d a4 77 28 31 2c 61 25 29 0d 5b 45 |":b%=.w(1,a%).[E| 00001880 17 c9 22 56 6f 6c 75 22 3a 62 25 3d a4 78 28 31 |.."Volu":b%=.x(1| 00001890 2c 61 25 29 0d 5b 4e 15 c9 22 4f 63 74 61 22 3a |,a%).[N.."Octa":| 000018a0 62 25 3d a4 79 28 61 25 29 0d 5b 57 15 c9 22 4b |b%=.y(a%).[W.."K| 000018b0 65 79 20 22 3a 62 25 3d a4 7a 28 61 25 29 0d 5b |ey ":b%=.z(a%).[| 000018c0 60 15 c9 22 50 65 6e 74 22 3a 62 25 3d a4 42 28 |`.."Pent":b%=.B(| 000018d0 61 25 29 0d 5b 69 15 c9 22 43 6f 6c 75 22 3a 62 |a%).[i.."Colu":b| 000018e0 25 3d a4 54 28 61 25 29 0d 5b 72 0f 7f 3a 62 25 |%=.T(a%).[r..:b%| 000018f0 3d a4 6a 28 61 25 29 0d 5b 7b 05 cb 0d 5b 7b 18 |=.j(a%).[{...[{.| 00001900 e7 62 25 3d 30 8c 62 25 3d a4 68 28 62 24 2c 34 |.b%=0.b%=.h(b$,4| 00001910 2c 61 25 29 0d 5b 84 1b ce 3a e7 62 25 3c 3e 30 |,a%).[...:.b%<>0| 00001920 8c f2 62 28 a4 63 28 62 25 2b 34 29 2c a3 29 0d |..b(.c(b%+4),.).| 00001930 5b 9f 1a 62 25 3d a4 69 28 61 25 29 3a f2 70 3a |[..b%=.i(a%):.p:| 00001940 f2 72 3a e7 77 25 3d 31 8c 0d 5b c3 1a f2 7a 3a |.r:.w%=1..[...z:| 00001950 f2 43 28 30 29 3a c8 99 26 34 34 41 45 42 2c 33 |.C(0):..&44AEB,3| 00001960 2c 6f 25 0d 5b e7 05 cd 0d 5b e7 05 e1 0d 5b f0 |,o%.[....[....[.| 00001970 4c dd a4 53 28 61 25 29 3a ea 62 25 2c 76 25 3a |L..S(a%):.b%,v%:| 00001980 c8 99 26 34 34 41 44 41 2c 6a 63 25 2c 76 62 25 |..&44ADA,jc%,vb%| 00001990 2a 31 32 3a 62 25 3d a4 61 28 76 25 2c 61 25 29 |*12:b%=.a(v%,a%)| 000019a0 3a e7 62 25 3d 30 8c 62 25 3d a4 6b 28 6a 63 25 |:.b%=0.b%=.k(jc%| 000019b0 2c 76 25 2d 38 2c 61 25 29 0d 5c 26 24 76 25 3d |,v%-8,a%).\&$v%=| 000019c0 28 28 28 76 25 2d 38 29 81 31 32 29 81 32 34 29 |(((v%-8).12).24)| 000019d0 2b 31 3a e7 76 25 3e 57 25 2f 32 34 8c 0d 5c 38 |+1:.v%>W%/24..\8| 000019e0 0a e7 ac 42 6b 25 8c 0d 5c 41 2a 57 25 3d 76 25 |...Bk%..\A*W%=v%| 000019f0 2a 32 34 3a 21 5a 68 25 3d 57 25 3a 21 5f 68 25 |*24:!Zh%=W%:!_h%| 00001a00 3d 57 25 2a 31 32 3a 21 6d 69 25 3d 57 25 2a 31 |=W%*12:!mi%=W%*1| 00001a10 32 0d 5c 6e 05 cd 0d 5c 6e 26 c8 99 26 34 34 41 |2.\n...\n&..&44A| 00001a20 44 41 2c 6a 63 25 2b 57 25 2a 31 32 2c 76 62 25 |DA,jc%+W%*12,vb%| 00001a30 2a 31 32 2b 31 32 2d 57 25 2a 31 32 0d 5c 80 05 |*12+12-W%*12.\..| 00001a40 cd 0d 5c 80 07 3d 62 25 0d 5c 9b 12 dd f2 67 62 |..\..=b%.\....gb| 00001a50 28 64 25 29 3a c8 8e 64 25 ca 0d 5c a4 14 c9 66 |(d%):..d%..\...f| 00001a60 67 25 3a f2 73 28 64 25 2c 6f 25 2c 31 29 0d 5c |g%:.s(d%,o%,1).\| 00001a70 b6 11 c9 6c 67 25 3a f2 76 28 6f 25 2c 31 29 0d |...lg%:.v(o%,1).| 00001a80 5c bf 11 c9 6b 67 25 3a f2 76 28 6f 25 2c 30 29 |\...kg%:.v(o%,0)| 00001a90 0d 5c c8 14 c9 6a 67 25 3a e7 a4 70 28 64 25 29 |.\...jg%:..p(d%)| 00001aa0 8c f2 68 62 0d 5c c8 18 c9 69 67 25 3a e7 a4 70 |..hb.\...ig%:..p| 00001ab0 28 64 25 29 8c f2 6e 28 30 2c 31 29 0d 5c d1 0f |(d%)..n(0,1).\..| 00001ac0 c9 2d 58 66 25 3a f2 43 28 30 29 0d 5c e3 10 c9 |.-Xf%:.C(0).\...| 00001ad0 2d 59 66 25 3a f2 43 28 2d 31 29 0d 5c ec 18 c9 |-Yf%:.C(-1).\...| 00001ae0 5f 66 25 3a e7 a4 70 28 64 25 29 8c f2 6e 28 31 |_f%:..p(d%)..n(1| 00001af0 2c 31 29 0d 5c ec 12 c9 68 67 25 3a f2 68 28 6f |,1).\...hg%:.h(o| 00001b00 25 29 3a f2 59 0d 5d 10 0b c9 2d 31 3a f2 69 62 |%):.Y.]...-1:.ib| 00001b10 0d 5d 19 05 cb 0d 5d 19 05 e1 0d 5d 22 6b dd f2 |.]....]....]"k..| 00001b20 68 62 3a ea 41 25 3a 43 6b 25 3d 28 ba 28 61 69 |hb:.A%:Ck%=(.(ai| 00001b30 25 29 2b 31 29 3a e7 43 6b 25 3c 31 84 43 6b 25 |%)+1):.Ck%<1.Ck%| 00001b40 3e 57 25 2f 32 8c f2 63 28 22 54 68 65 20 70 61 |>W%/2..c("The pa| 00001b50 70 65 72 20 69 73 20 6e 6f 74 20 6c 6f 6e 67 20 |per is not long | 00001b60 65 6e 6f 75 67 68 20 74 6f 20 63 6f 70 79 20 79 |enough to copy y| 00001b70 6f 75 72 20 70 72 65 73 65 6e 74 20 74 75 6e 65 |our present tune| 00001b80 2e 22 29 3a e1 0d 5d 4f 31 44 6b 25 3d 28 57 25 |."):..]O1Dk%=(W%| 00001b90 2f 43 6b 25 29 2d 31 3a c8 99 26 34 34 41 43 42 |/Ck%)-1:..&44ACB| 00001ba0 2c 44 64 25 2c 7a 64 25 2c 31 3a f2 6e 28 44 64 |,Dd%,zd%,1:.n(Dd| 00001bb0 25 2c 31 29 3a e1 0d 5d 73 18 dd f2 63 62 28 41 |%,1):..]s...cb(A| 00001bc0 25 29 3a 41 62 25 3d 41 25 3a e7 41 25 8c 0d 5d |%):Ab%=A%:.A%..]| 00001bd0 97 0a 21 5a 6a 25 3d 32 0d 5d a9 0c cc 3a 21 5a |..!Zj%=2.]...:!Z| 00001be0 6a 25 3d 31 0d 5d bb 05 cd 0d 5d bb 05 e1 0d 5d |j%=1.]....]....]| 00001bf0 c4 22 dd f2 43 28 41 25 29 3a e7 41 25 3d 2d 31 |."..C(A%):.A%=-1| 00001c00 8c 41 25 3d ba 28 61 69 25 29 2d 32 33 2b 31 32 |.A%=.(ai%)-23+12| 00001c10 0d 5d df 0e e7 41 25 3c 30 8c 41 25 3d 30 0d 5d |.]...A%<0.A%=0.]| 00001c20 e8 16 e7 41 25 3e 57 25 2d 32 34 8c 41 25 3d 57 |...A%>W%-24.A%=W| 00001c30 25 2d 32 34 0d 5d f1 61 21 7a 69 25 3d 41 25 2a |%-24.].a!zi%=A%*| 00001c40 4b 25 3a 21 41 69 25 3d 41 25 3a 41 25 3d 30 3a |K%:!Ai%=A%:A%=0:| 00001c50 d6 77 69 25 3a d6 42 69 25 3a c8 99 26 34 34 41 |.wi%:.Bi%:..&44A| 00001c60 44 44 2c 33 2b 35 31 32 2c 6f 25 2c 59 66 25 2c |DD,3+512,o%,Yf%,| 00001c70 30 2c 2c 76 67 25 3a c8 99 26 34 34 41 44 44 2c |0,,vg%:..&44ADD,| 00001c80 33 2b 35 31 32 2c 6f 25 2c 58 66 25 2c 30 2c 2c |3+512,o%,Xf%,0,,| 00001c90 76 67 25 3a e1 0d 5e 39 16 dd f2 6a 62 28 6e 25 |vg%:..^9...jb(n%| 00001ca0 2c 45 6b 25 29 3a e7 45 6b 25 8c 0d 5e 54 09 c8 |,Ek%):.Ek%..^T..| 00001cb0 8e 6e 25 ca 0d 5e 5d 2b c9 30 3a c8 99 26 34 34 |.n%..^]+.0:..&44| 00001cc0 41 44 41 2c 6a 63 25 2c 57 25 2a 31 32 3a f2 7a |ADA,jc%,W%*12:.z| 00001cd0 3a f2 43 28 30 29 3a f2 6a 3a f2 6c 28 31 29 0d |:.C(0):.j:.l(1).| 00001ce0 5e 9c 63 c9 44 64 25 3a c8 99 26 34 34 41 43 43 |^.c.Dd%:..&44ACC| 00001cf0 2c 44 64 25 2c 7a 64 25 b8 2c 2c 45 6b 25 3a e3 |,Dd%,zd%.,,Ek%:.| 00001d00 65 25 3d 31 b8 45 6b 25 3a c8 99 26 34 34 41 43 |e%=1.Ek%:..&44AC| 00001d10 37 2c 43 6b 25 2a 31 32 2c 6a 63 25 2c 6a 63 25 |7,Ck%*12,jc%,jc%| 00001d20 2b 43 6b 25 2a 65 25 2a 31 32 3a ed 3a f2 7a 3a |+Ck%*e%*12:.:.z:| 00001d30 f2 6a 3a 41 25 3d 30 3a d6 77 69 25 3a f2 6c 28 |.j:A%=0:.wi%:.l(| 00001d40 31 29 0d 5e f6 0d c9 31 3a f2 6b 62 28 31 29 0d |1).^...1:.kb(1).| 00001d50 5e ff 05 cb 0d 5e ff 05 cd 0d 5f 08 05 e1 0d 5f |^....^...._...._| 00001d60 11 39 dd a4 4e 28 61 25 29 3a ea 65 25 2c 63 25 |.9..N(a%):.e%,c%| 00001d70 2c 62 25 3a 62 25 3d a4 66 28 22 43 6f 6c 75 22 |,b%:b%=.f("Colu"| 00001d80 2c 61 25 29 3a e7 62 25 3d 30 8c 62 25 3d a4 62 |,a%):.b%=0.b%=.b| 00001d90 28 31 32 2c 61 25 29 0d 5f 3e 17 e7 62 25 3d 30 |(12,a%)._>..b%=0| 00001da0 8c 62 25 3d a4 62 28 44 62 25 2c 61 25 29 0d 5f |.b%=.b(Db%,a%)._| 00001db0 47 07 3d 62 25 0d 5f 62 23 dd a4 54 28 61 25 29 |G.=b%._b#..T(a%)| 00001dc0 3a ea 65 25 2c 63 25 2c 62 25 3a e7 ac 46 6b 25 |:.e%,c%,b%:..Fk%| 00001dd0 8c 3d a4 6a 28 61 25 29 0d 5f 74 23 62 25 3d a4 |.=.j(a%)._t#b%=.| 00001de0 61 28 63 25 2c 61 25 29 3a e7 62 25 3d 30 8c 62 |a(c%,a%):.b%=0.b| 00001df0 25 3d a4 61 28 63 25 2c 61 25 29 0d 5f 86 1e 44 |%=.a(c%,a%)._..D| 00001e00 62 25 3d 63 25 3a e7 77 25 3d 31 8c f2 79 28 32 |b%=c%:.w%=1..y(2| 00001e10 5e 44 62 25 2c 67 62 25 29 0d 5f 98 07 3d 62 25 |^Db%,gb%)._..=b%| 00001e20 0d 5f b3 15 dd a4 70 28 64 25 29 3a ea 79 25 3a |._....p(d%):.y%:| 00001e30 c8 8e 64 25 ca 0d 5f c5 0f c9 53 66 25 3a 79 25 |..d%.._...Sf%:y%| 00001e40 3d 47 6b 25 0d 5f d7 11 c9 53 66 25 2b 31 3a 79 |=Gk%._...Sf%+1:y| 00001e50 25 3d 48 6b 25 0d 5f e0 11 c9 53 66 25 2b 32 3a |%=Hk%._...Sf%+2:| 00001e60 79 25 3d 49 6b 25 0d 5f e9 0f c9 54 66 25 3a 79 |y%=Ik%._...Tf%:y| 00001e70 25 3d 4a 6b 25 0d 5f f2 0f c9 55 66 25 3a 79 25 |%=Jk%._...Uf%:y%| 00001e80 3d 4b 6b 25 0d 5f fb 0f c9 6a 67 25 3a 79 25 3d |=Kk%._...jg%:y%=| 00001e90 4c 6b 25 0d 60 04 0f c9 69 67 25 3a 79 25 3d 4d |Lk%.`...ig%:y%=M| 00001ea0 6b 25 0d 60 0d 0f c9 5f 66 25 3a 79 25 3d 4e 6b |k%.`..._f%:y%=Nk| 00001eb0 25 0d 60 16 05 cb 0d 60 16 0b e7 ac 79 25 8c f2 |%.`....`....y%..| 00001ec0 49 0d 60 1f 07 3d 79 25 0d 60 4c 1c dd f2 6c 62 |I.`..=y%.`L...lb| 00001ed0 28 64 25 2c 58 25 2c 59 25 29 3a e7 55 61 25 3c |(d%,X%,Y%):.Ua%<| 00001ee0 3e 30 8c e1 0d 60 55 09 c8 8e 64 25 ca 0d 60 5e |>0...`U...d%..`^| 00001ef0 18 c9 75 68 25 3a f2 52 28 6c 25 2c 64 25 2c 58 |..uh%:.R(l%,d%,X| 00001f00 25 2c 59 25 29 0d 60 70 4d c9 6f 68 25 3a c8 99 |%,Y%).`pM.oh%:..| 00001f10 26 34 34 41 45 33 2c 36 2c 5f 25 2c 6c 25 3a c8 |&44AE3,6,_%,l%:.| 00001f20 99 26 34 34 41 45 35 2c 31 2c 6c 25 2c 58 25 2c |.&44AE5,1,l%,X%,| 00001f30 59 25 2c 2c 48 68 25 b8 2c 2c 64 25 3a c8 99 26 |Y%,,Hh%.,,d%:..&| 00001f40 34 34 41 45 33 2c 37 2c 5f 25 2c 6c 25 3a c8 8e |44AE3,7,_%,l%:..| 00001f50 b9 ca 0d 60 94 5a c9 28 64 25 3e 3d 69 68 25 80 |...`.Z.(d%>=ih%.| 00001f60 64 25 3c 3d 6a 68 25 29 3a c8 99 26 34 34 41 44 |d%<=jh%):..&44AD| 00001f70 44 2c 37 2b 35 31 32 2c 6c 25 2c 64 25 2c 31 2c |D,7+512,l%,d%,1,| 00001f80 2c 48 68 25 3a f2 53 28 64 25 2d 69 68 25 2b 31 |,Hh%:.S(d%-ih%+1| 00001f90 29 3a f2 6d 62 28 62 25 28 32 2c 64 25 2d 69 68 |):.mb(b%(2,d%-ih| 00001fa0 25 29 2c 64 25 2d 69 68 25 2b 31 29 0d 60 c1 05 |%),d%-ih%+1).`..| 00001fb0 cb 0d 60 c1 05 cb 0d 60 ca 05 e1 0d 60 d3 33 dd |..`....`....`.3.| 00001fc0 f2 6e 62 28 70 25 2c 64 25 2c 58 25 2c 59 25 29 |.nb(p%,d%,X%,Y%)| 00001fd0 3a ea 41 25 2c 43 25 2c 44 25 2c 42 25 2c 41 24 |:.A%,C%,D%,B%,A$| 00001fe0 3a e7 28 70 25 80 28 34 3c 3c 34 29 29 8c 0d 61 |:.(p%.(4<<4))..a| 00001ff0 00 09 c8 8e 64 25 ca 0d 61 09 1c c9 75 68 25 2c |....d%..a...uh%,| 00002000 79 68 25 3a f2 47 28 6c 25 2c 64 25 2c 58 25 2c |yh%:.G(l%,d%,X%,| 00002010 59 25 29 0d 61 24 05 cb 0d 61 24 05 cd 0d 61 2d |Y%).a$...a$...a-| 00002020 0e e7 28 70 25 80 34 29 3d 34 8c 0d 61 36 09 c8 |..(p%.4)=4..a6..| 00002030 8e 64 25 ca 0d 61 3f 2c c9 72 68 25 3a c8 99 26 |.d%..a?,.rh%:..&| 00002040 34 34 41 44 44 2c 37 2c 6c 25 2c 64 25 3a f2 44 |44ADD,7,l%,d%:.D| 00002050 28 6c 25 2c 73 68 25 2c 77 68 25 2c 31 2c b9 29 |(l%,sh%,wh%,1,.)| 00002060 0d 61 63 44 c9 71 68 25 3a c8 99 26 34 34 41 44 |.acD.qh%:..&44AD| 00002070 44 2c 37 2c 6c 25 2c 64 25 3a c8 99 26 34 34 41 |D,7,l%,d%:..&44A| 00002080 44 44 2c 37 2c 6c 25 2c 72 68 25 3a 4f 6b 25 3d |DD,7,l%,rh%:Ok%=| 00002090 b9 3a f2 44 28 6c 25 2c 73 68 25 2c 77 68 25 2c |.:.D(l%,sh%,wh%,| 000020a0 31 2c b9 29 0d 61 90 2c c9 70 68 25 3a c8 99 26 |1,.).a.,.ph%:..&| 000020b0 34 34 41 44 44 2c 37 2c 6c 25 2c 64 25 3a f2 44 |44ADD,7,l%,d%:.D| 000020c0 28 6c 25 2c 73 68 25 2c 77 68 25 2c 31 2c a3 29 |(l%,sh%,wh%,1,.)| 000020d0 0d 61 ab 16 c9 73 68 25 3a f2 6f 28 6c 25 2c 64 |.a...sh%:.o(l%,d| 000020e0 25 2c 77 68 25 29 0d 61 bd 31 c9 74 68 25 3a f2 |%,wh%).a.1.th%:.| 000020f0 6c 28 32 29 3a c8 99 26 34 34 41 44 44 2c 37 2c |l(2):..&44ADD,7,| 00002100 6c 25 2c 64 25 3a f2 6f 62 28 6c 25 2c 73 68 25 |l%,d%:.ob(l%,sh%| 00002110 2c 77 68 25 2c 31 29 0d 61 e1 22 c9 77 68 25 2c |,wh%,1).a.".wh%,| 00002120 78 68 25 2c 42 68 25 2c 43 68 25 2c 44 68 25 3a |xh%,Bh%,Ch%,Dh%:| 00002130 f2 65 28 6c 25 2c 64 25 29 0d 61 f3 2e c9 75 68 |.e(l%,d%).a...uh| 00002140 25 3a c8 99 26 34 34 41 44 34 2c 30 2c 6c 25 2c |%:..&44AD4,0,l%,| 00002150 64 25 2c 58 25 2c 59 25 b8 63 25 3a f2 64 28 28 |d%,X%,Y%.c%:.d((| 00002160 63 25 2b 34 30 29 29 0d 62 0e 29 c9 79 68 25 3a |c%+40)).b.).yh%:| 00002170 c8 99 26 34 34 41 44 34 2c 30 2c 6c 25 2c 64 25 |..&44AD4,0,l%,d%| 00002180 2c 58 25 2c 59 25 b8 63 25 3a f2 71 28 63 25 29 |,X%,Y%.c%:.q(c%)| 00002190 0d 62 29 18 c9 45 68 25 3a e7 ac 50 61 25 8c f2 |.b)..Eh%:..Pa%..| 000021a0 65 28 6c 25 2c 64 25 29 0d 62 32 29 c8 99 26 34 |e(l%,d%).b2)..&4| 000021b0 34 41 44 34 2c 31 2c 6c 25 2c 75 68 25 b8 63 25 |4AD4,1,l%,uh%.c%| 000021c0 3a 63 25 2d 3d 31 3a e7 63 25 3c 30 8c 63 25 3d |:c%-=1:.c%<0.c%=| 000021d0 30 0d 62 4d 27 c8 99 26 34 34 41 44 34 2c 32 2c |0.bM'..&44AD4,2,| 000021e0 6c 25 2c 75 68 25 2c 63 25 b8 63 25 3a f2 64 28 |l%,uh%,c%.c%:.d(| 000021f0 28 63 25 2b 34 30 29 29 0d 62 68 18 c9 46 68 25 |(c%+40)).bh..Fh%| 00002200 3a e7 ac 50 61 25 8c f2 65 28 6c 25 2c 64 25 29 |:..Pa%..e(l%,d%)| 00002210 0d 62 71 2d c8 99 26 34 34 41 44 34 2c 31 2c 6c |.bq-..&44AD4,1,l| 00002220 25 2c 75 68 25 b8 63 25 3a 63 25 2b 3d 31 3a e7 |%,uh%.c%:c%+=1:.| 00002230 63 25 3e 32 35 35 8c 63 25 3d 32 35 35 0d 62 8c |c%>255.c%=255.b.| 00002240 27 c8 99 26 34 34 41 44 34 2c 32 2c 6c 25 2c 75 |'..&44AD4,2,l%,u| 00002250 68 25 2c 63 25 b8 63 25 3a f2 64 28 28 63 25 2b |h%,c%.c%:.d((c%+| 00002260 34 30 29 29 0d 62 a7 1b c9 41 68 25 3a c8 99 26 |40)).b...Ah%:..&| 00002270 34 34 41 44 36 2c 6c 64 25 2c 58 25 2c 59 25 0d |44AD6,ld%,X%,Y%.| 00002280 62 b0 10 c9 6f 68 25 3a e7 55 61 25 3d 30 8c 0d |b...oh%:.Ua%=0..| 00002290 62 b9 48 c8 99 26 34 34 41 45 33 2c 36 2c 5f 25 |b.H..&44AE3,6,_%| 000022a0 2c 6c 25 3a c8 99 26 34 34 41 45 35 2c 30 2c 6c |,l%:..&44AE5,0,l| 000022b0 25 2c 58 25 2c 59 25 2c 2c 48 68 25 b8 2c 2c 64 |%,X%,Y%,,Hh%.,,d| 000022c0 25 3a c8 99 26 34 34 41 45 33 2c 37 2c 5f 25 2c |%:..&44AE3,7,_%,| 000022d0 6c 25 3a c8 8e b9 ca 0d 62 dd 4e c9 28 64 25 3e |l%:.....b.N.(d%>| 000022e0 3d 69 68 25 80 64 25 3c 3d 6a 68 25 29 3a f2 48 |=ih%.d%<=jh%):.H| 000022f0 28 64 25 2d 69 68 25 2b 31 2c 2d 31 2c 6c 25 2c |(d%-ih%+1,-1,l%,| 00002300 2d 64 25 2b 69 68 25 2d 31 29 3a f2 6d 62 28 62 |-d%+ih%-1):.mb(b| 00002310 25 28 32 2c 64 25 2d 69 68 25 29 2c 64 25 2d 69 |%(2,d%-ih%),d%-i| 00002320 68 25 2b 31 29 0d 63 01 8e c9 28 64 25 3e 3d 6c |h%+1).c...(d%>=l| 00002330 68 25 80 64 25 3c 3d 6c 68 25 2b 6b 68 25 2d 31 |h%.d%<=lh%+kh%-1| 00002340 29 3a 68 25 28 64 25 2d 6c 68 25 2c 30 29 3d 64 |):h%(d%-lh%,0)=d| 00002350 63 25 3a 41 24 3d 61 24 28 62 25 28 32 2c 64 63 |c%:A$=a$(b%(2,dc| 00002360 25 2d 31 29 29 3a c8 99 26 34 34 41 44 44 2c 31 |%-1)):..&44ADD,1| 00002370 2b 35 31 32 2c 6c 25 2c 64 25 2c 22 73 22 2b 41 |+512,l%,d%,"s"+A| 00002380 24 2b 22 2c 70 22 2b 41 24 2c 2c 48 68 25 3a f2 |$+",p"+A$,,Hh%:.| 00002390 5a 28 64 25 2d 6c 68 25 29 3a f2 65 28 6c 25 2c |Z(d%-lh%):.e(l%,| 000023a0 2d 31 30 2d 28 64 25 2d 6c 68 25 29 29 3a f2 6c |-10-(d%-lh%)):.l| 000023b0 28 32 29 0d 63 40 05 cb 0d 63 40 05 cd 0d 63 49 |(2).c@...c@...cI| 000023c0 0a 7f 3a c8 8e b9 ca 0d 63 5b 38 c9 28 64 25 3e |..:.....c[8.(d%>| 000023d0 3d 6d 68 25 80 64 25 3c 6d 68 25 2b 6b 68 25 29 |=mh%.d%<mh%+kh%)| 000023e0 3a e7 55 61 25 3d 30 8c f2 70 62 28 64 25 2d 6d |:.Ua%=0..pb(d%-m| 000023f0 68 25 2c 58 25 2c 59 25 29 3a f2 6c 28 32 29 0d |h%,X%,Y%):.l(2).| 00002400 63 6d 24 c9 28 64 25 3e 3d 6e 68 25 80 64 25 3c |cm$.(d%>=nh%.d%<| 00002410 6e 68 25 2b 6b 68 25 29 3a f2 5a 28 64 25 2d 6e |nh%+kh%):.Z(d%-n| 00002420 68 25 29 0d 63 88 05 cb 0d 63 88 05 cb 0d 63 91 |h%).c....c....c.| 00002430 05 cd 0d 63 9a 05 e1 0d 63 a3 17 dd f2 6d 62 28 |...c....c....mb(| 00002440 78 25 2c 71 25 29 3a e7 78 25 3e 3d 30 8c 0d 63 |x%,q%):.x%>=0..c| 00002450 be 11 64 24 3d 22 73 22 2b 61 24 28 78 25 29 0d |..d$="s"+a$(x%).| 00002460 63 d0 22 cc 3a 85 31 2c 22 54 68 69 73 20 73 68 |c.".:.1,"This sh| 00002470 6f 75 6c 64 20 6e 6f 74 20 68 61 70 70 65 6e 21 |ould not happen!| 00002480 22 0d 63 e2 05 cd 0d 63 e2 32 c8 99 26 34 34 41 |".c....c.2..&44A| 00002490 45 33 2c 31 2b 32 5e 31 31 2c 55 25 2c 64 24 2c |E3,1+2^11,U%,d$,| 000024a0 77 62 25 2c 77 62 25 2c 5f 25 b8 2c 2c 5f 25 3a |wb%,wb%,_%.,,_%:| 000024b0 64 63 25 3d 71 25 3a e1 0d 63 fd b1 dd f2 71 62 |dc%=q%:..c....qb| 000024c0 3a ea 63 25 3a f2 68 28 42 66 25 29 3a f2 54 28 |:.c%:.h(Bf%):.T(| 000024d0 6c 25 29 3a 4f 6b 25 3d a3 3a f2 79 28 31 2c 67 |l%):Ok%=.:.y(1,g| 000024e0 62 25 29 3a f2 72 62 3a f2 55 28 32 29 3a f2 56 |b%):.rb:.U(2):.V| 000024f0 28 6c 25 2c 79 68 25 29 3a c8 99 26 34 34 41 44 |(l%,yh%):..&44AD| 00002500 34 2c 31 2c 6c 25 2c 75 68 25 b8 63 25 3a f2 64 |4,1,l%,uh%.c%:.d| 00002510 28 63 25 2b 34 30 29 3a c8 99 26 34 34 41 44 44 |(c%+40):..&44ADD| 00002520 2c 37 2b 35 31 32 2c 6c 25 2c 69 68 25 2b 64 63 |,7+512,l%,ih%+dc| 00002530 25 2d 31 2c 2c 2c 48 68 25 3a 51 61 25 3d b9 3a |%-1,,,Hh%:Qa%=.:| 00002540 f2 67 3a f2 73 28 77 68 25 2c 6c 25 2c 30 29 3a |.g:.s(wh%,l%,0):| 00002550 f2 74 3a f2 6d 62 28 62 25 28 32 2c 64 63 25 2d |.t:.mb(b%(2,dc%-| 00002560 31 29 2c 64 63 25 29 3a e1 0d 64 a8 68 dd f2 73 |1),dc%):..d.h..s| 00002570 62 28 48 25 2c 4a 25 2c 73 25 29 3a ea 65 25 3a |b(H%,J%,s%):.e%:| 00002580 e3 65 25 3d 30 b8 47 68 25 2d 31 3a c8 99 26 34 |.e%=0.Gh%-1:..&4| 00002590 34 41 45 30 2c 2c 48 68 25 2b 34 2b 33 32 2a 65 |4AE0,,Hh%+4+32*e| 000025a0 25 2c 73 25 3a ed 3a f2 57 28 48 25 2c 4a 25 29 |%,s%:.:.W(H%,J%)| 000025b0 3a 21 4c 69 25 3d 48 25 3a 21 4d 69 25 3d 4a 25 |:!Li%=H%:!Mi%=J%| 000025c0 3a d6 45 69 25 3a f2 58 28 48 25 2c 4a 25 29 3a |:.Ei%:.X(H%,J%):| 000025d0 e1 0d 65 14 1e dd f2 74 62 3a ea 64 25 2c 50 6b |..e....tb:.d%,Pk| 000025e0 25 3a d6 54 69 25 3a e7 55 61 25 3c 3e 32 8c 0d |%:.Ti%:.Ua%<>2..| 000025f0 65 41 26 c8 99 26 34 30 30 43 46 2c 2c 68 25 3a |eA&..&400CF,,h%:| 00002600 64 25 3d 68 25 21 31 36 3a 50 6b 25 3d 65 63 25 |d%=h%!16:Pk%=ec%| 00002610 3a c8 8e b9 ca 0d 65 65 3b c9 28 68 25 21 38 80 |:.....ee;.(h%!8.| 00002620 34 29 3d 34 80 28 64 25 3e 3d 6d 68 25 80 64 25 |4)=4.(d%>=mh%.d%| 00002630 3c 3d 6d 68 25 2b 6b 68 25 2d 31 29 3a e7 50 6b |<=mh%+kh%-1):.Pk| 00002640 25 3c 3e 64 25 2d 6d 68 25 8c 50 6b 25 3d 2d 31 |%<>d%-mh%.Pk%=-1| 00002650 0d 65 77 08 c9 50 61 25 0d 65 89 32 c9 28 68 25 |.ew..Pa%.e.2.(h%| 00002660 21 38 80 34 29 3d 34 80 28 64 25 3e 3d 6e 68 25 |!8.4)=4.(d%>=nh%| 00002670 80 64 25 3c 3d 6e 68 25 2b 6b 68 25 2d 31 29 3a |.d%<=nh%+kh%-1):| 00002680 50 6b 25 3d 64 25 2d 6e 68 25 0d 65 9b 0b 7f 50 |Pk%=d%-nh%.e...P| 00002690 6b 25 3d 2d 31 0d 65 a4 05 cb 0d 65 a4 0e e7 65 |k%=-1.e....e...e| 000026a0 63 25 3c 3e 50 6b 25 8c 0d 65 ad 17 e7 50 6b 25 |c%<>Pk%..e...Pk%| 000026b0 3d 2d 31 8c f2 75 62 8b f2 5a 28 50 6b 25 29 0d |=-1..ub..Z(Pk%).| 000026c0 65 b6 05 cd 0d 65 bf 05 cd 0d 65 c8 05 e1 0d 65 |e....e....e....e| 000026d0 d1 59 dd f2 72 62 3a c8 99 26 34 34 41 45 33 2c |.Y..rb:..&44AE3,| 000026e0 31 2b 32 5e 31 31 2c 55 25 2c 64 24 2c 77 62 25 |1+2^11,U%,d$,wb%| 000026f0 2c 77 62 25 2c 5f 25 b8 2c 2c 5f 25 3a c8 99 26 |,wb%,_%.,,_%:..&| 00002700 34 34 41 45 32 2c 32 36 32 2b 32 5e 31 31 2c 55 |44AE2,262+2^11,U| 00002710 25 2c 22 43 69 72 63 6c 65 22 2c 2c 2c 2c 50 69 |%,"Circle",,,,Pi| 00002720 25 2c 51 69 25 3a e1 0d 65 fe 2a dd f2 76 62 3a |%,Qi%:..e.*..vb:| 00002730 51 61 25 3d a3 3a f2 6f 28 6c 25 2c 64 25 2c 77 |Qa%=.:.o(l%,d%,w| 00002740 68 25 29 3a f2 6d 3a f2 67 3a f2 41 3a f2 72 3a |h%):.m:.g:.A:.r:| 00002750 e1 0d 66 4f 12 dd f2 77 62 28 64 25 29 3a c8 8e |..fO...wb(d%):..| 00002760 64 25 ca 0d 66 6a 14 c9 77 68 25 3a f2 73 28 64 |d%..fj..wh%:.s(d| 00002770 25 2c 6c 25 2c 31 29 0d 66 7c 13 c9 78 68 25 3a |%,l%,1).f|..xh%:| 00002780 f2 68 28 6c 25 29 3a f2 76 62 0d 66 85 11 c9 43 |.h(l%):.vb.f...C| 00002790 68 25 3a f2 76 28 6c 25 2c 35 29 0d 66 8e 11 c9 |h%:.v(l%,5).f...| 000027a0 42 68 25 3a f2 76 28 6c 25 2c 34 29 0d 66 97 18 |Bh%:.v(l%,4).f..| 000027b0 c9 44 68 25 3a e7 4e 6b 25 8c f2 6e 28 31 2c 32 |.Dh%:.Nk%..n(1,2| 000027c0 29 8b f2 49 0d 66 97 15 7f 3a e7 64 25 3c 30 80 |)..I.f...:.d%<0.| 000027d0 64 25 3e 2d 38 8c f2 69 62 0d 66 a9 16 e7 64 25 |d%>-8..ib.f...d%| 000027e0 3c 2d 39 80 64 25 3e 2d 31 30 2d 6b 68 25 8c 0d |<-9.d%>-10-kh%..| 000027f0 66 b2 4d c8 99 26 34 34 41 45 33 2c 36 2c 5f 25 |f.M..&44AE3,6,_%| 00002800 2c 6c 25 3a c8 99 26 34 34 41 44 44 2c 33 2b 35 |,l%:..&44ADD,3+5| 00002810 31 32 2c 6c 25 2c 2d 31 30 2d 64 25 2b 6c 68 25 |12,l%,-10-d%+lh%| 00002820 2c 30 2c 2c 48 68 25 3a c8 99 26 34 34 41 45 33 |,0,,Hh%:..&44AE3| 00002830 2c 37 2c 5f 25 2c 6c 25 3a f2 75 62 0d 66 df 05 |,7,_%,l%:.ub.f..| 00002840 cd 0d 66 df 05 cb 0d 66 e8 05 e1 0d 66 f1 6a dd |..f....f....f.j.| 00002850 f2 70 62 28 51 6b 25 2c 58 25 2c 59 25 29 3a ea |.pb(Qk%,X%,Y%):.| 00002860 66 25 3a c8 99 26 34 34 41 45 36 2c 33 2c 6c 25 |f%:..&44AE6,3,l%| 00002870 2c 58 25 2c 59 25 b8 2c 2c 58 25 2c 59 25 3a 66 |,X%,Y%.,,X%,Y%:f| 00002880 25 3d 49 68 25 2b 51 6b 25 2a 33 32 3a 58 25 3d |%=Ih%+Qk%*32:X%=| 00002890 58 25 2d 21 66 25 3a 59 25 3d 59 25 2d 66 25 21 |X%-!f%:Y%=Y%-f%!| 000028a0 34 2d 32 3a e7 58 25 3c 4b 25 2b 32 8c 59 25 2b |4-2:.X%<K%+2.Y%+| 000028b0 3d 4b 25 2f 32 0d 67 42 17 53 25 3d 59 25 81 4b |=K%/2.gB.S%=Y%.K| 000028c0 25 3a e7 53 25 3c 30 8c 53 25 3d 30 0d 67 54 10 |%:.S%<0.S%=0.gT.| 000028d0 e7 53 25 3e 31 30 8c 53 25 3d 31 30 0d 67 5d 0d |.S%>10.S%=10.g].| 000028e0 e7 58 25 3c 4b 25 2b 32 8c 0d 67 66 1a e7 53 25 |.X%<K%+2..gf..S%| 000028f0 3d 30 84 53 25 3d 32 84 53 25 3d 36 84 53 25 3d |=0.S%=2.S%=6.S%=| 00002900 39 8c e1 0d 67 6f 0a 53 25 2b 3d 31 30 0d 67 81 |9...go.S%+=10.g.| 00002910 05 cd 0d 67 81 31 3f 28 4a 68 25 2b 51 6b 25 2a |...g.1?(Jh%+Qk%*| 00002920 32 34 2b 53 25 29 3d 3f 28 4a 68 25 2b 51 6b 25 |24+S%)=?(Jh%+Qk%| 00002930 2a 32 34 2b 53 25 29 82 31 3a e7 58 25 3c 4b 25 |*24+S%).1:.X%<K%| 00002940 2b 32 8c 0d 67 93 4a c8 99 26 34 30 30 44 31 2c |+2..g.J..&400D1,| 00002950 6c 25 2c 21 66 25 2b 34 2c 34 2b 66 25 21 34 2b |l%,!f%+4,4+f%!4+| 00002960 28 53 25 2d 31 30 29 2a 4b 25 2d 4b 25 2f 32 2c |(S%-10)*K%-K%/2,| 00002970 21 66 25 2b 4b 25 2c 66 25 21 34 2b 28 53 25 2d |!f%+K%,f%!4+(S%-| 00002980 31 30 2b 31 29 2a 4b 25 2d 4b 25 2f 32 0d 67 a5 |10+1)*K%-K%/2.g.| 00002990 3f cc 3a c8 99 26 34 30 30 44 31 2c 6c 25 2c 21 |?.:..&400D1,l%,!| 000029a0 66 25 2b 34 2b 4b 25 2c 34 2b 66 25 21 34 2b 53 |f%+4+K%,4+f%!4+S| 000029b0 25 2a 4b 25 2c 21 66 25 2b 4b 25 2a 32 2c 66 25 |%*K%,!f%+K%*2,f%| 000029c0 21 34 2b 28 53 25 2b 31 29 2a 4b 25 0d 67 b7 05 |!4+(S%+1)*K%.g..| 000029d0 cd 0d 67 b7 0d f2 5a 28 51 6b 25 29 3a e1 0d 67 |..g...Z(Qk%):..g| 000029e0 c9 28 dd f2 5a 28 52 6b 25 29 3a ea 65 25 2c 53 |.(..Z(Rk%):.e%,S| 000029f0 6b 25 3a f2 75 62 3a f2 5f 28 34 2c 6e 68 25 2b |k%:.ub:._(4,nh%+| 00002a00 52 6b 25 29 3a e1 0d 67 ff 11 dd f2 75 62 3a e7 |Rk%):..g....ub:.| 00002a10 65 63 25 3e 2d 31 8c 0d 68 1a 11 f2 5f 28 35 2c |ec%>-1..h..._(5,| 00002a20 6e 68 25 2b 65 63 25 29 0d 68 2c 05 cd 0d 68 2c |nh%+ec%).h,...h,| 00002a30 05 e1 0d 68 35 21 dd f2 78 62 28 6e 25 2c 45 6b |...h5!..xb(n%,Ek| 00002a40 25 29 3a e7 45 6b 25 80 6e 25 3d 31 8c f2 6b 62 |%):.Ek%.n%=1..kb| 00002a50 28 32 29 0d 68 50 05 e1 0d 68 59 28 dd f2 79 62 |(2).hP...hY(..yb| 00002a60 28 70 25 2c 64 25 29 3a ea 54 6b 25 2c 58 25 2c |(p%,d%):.Tk%,X%,| 00002a70 59 25 2c 42 25 2c 54 25 3a e7 70 25 3e 37 8c e1 |Y%,B%,T%:.p%>7..| 00002a80 0d 68 7d 1c 54 6b 25 3d 2d 31 3a e7 64 25 3e 3d |.h}.Tk%=-1:.d%>=| 00002a90 49 66 25 80 64 25 3c 3d 4c 66 25 8c 0d 68 8f 65 |If%.d%<=Lf%..h.e| 00002aa0 54 6b 25 3d 28 64 25 2d 49 66 25 29 81 32 3a c8 |Tk%=(d%-If%).2:.| 00002ab0 99 26 34 34 41 44 44 2c 33 2c 4d 66 25 2c 54 6b |.&44ADD,3,Mf%,Tk| 00002ac0 25 2a 32 2b 49 66 25 2c 31 3a c8 99 26 34 34 41 |%*2+If%,1:..&44A| 00002ad0 44 44 2c 36 2c 4d 66 25 2c 54 6b 25 2a 32 2b 4a |DD,6,Mf%,Tk%*2+J| 00002ae0 66 25 2c 26 37 45 32 30 30 30 30 30 2c 26 46 46 |f%,&7E200000,&FF| 00002af0 32 30 30 30 30 30 3a e7 55 6b 25 3c 3e 54 6b 25 |200000:.Uk%<>Tk%| 00002b00 8c 0d 68 b3 4b c8 99 26 34 34 41 44 44 2c 33 2c |..h.K..&44ADD,3,| 00002b10 4d 66 25 2c 55 6b 25 2a 32 2b 49 66 25 2c 30 3a |Mf%,Uk%*2+If%,0:| 00002b20 c8 99 26 34 34 41 44 44 2c 36 2c 4d 66 25 2c 55 |..&44ADD,6,Mf%,U| 00002b30 6b 25 2a 32 2b 4a 66 25 2c 26 31 37 30 30 30 30 |k%*2+Jf%,&170000| 00002b40 30 30 2c 26 46 46 32 30 30 30 30 30 0d 68 ce 05 |00,&FF200000.h..| 00002b50 cd 0d 68 ce 22 56 6b 25 3d 55 6b 25 3a 55 6b 25 |..h."Vk%=Uk%:Uk%| 00002b60 3d 54 6b 25 3a f2 7a 62 28 54 6b 25 2c 57 6b 25 |=Tk%:.zb(Tk%,Wk%| 00002b70 2c b9 29 0d 68 f2 1f cc 3a e7 64 25 3d 46 66 25 |,.).h...:.d%=Ff%| 00002b80 84 64 25 3d 47 66 25 8c f2 65 28 4d 66 25 2c 64 |.d%=Gf%..e(Mf%,d| 00002b90 25 29 0d 68 fb 05 cd 0d 69 04 05 e1 0d 69 0d 5e |%).h....i....i.^| 00002ba0 dd f2 7a 62 28 78 25 2c 71 25 2c 58 6b 25 29 3a |..zb(x%,q%,Xk%):| 00002bb0 ea 57 63 25 2c 69 24 2c 58 25 2c 59 25 2c 42 25 |.Wc%,i$,X%,Y%,B%| 00002bc0 2c 68 24 2c 50 25 2c 54 25 3a 68 24 3d 62 24 28 |,h$,P%,T%:h$=b$(| 00002bd0 78 25 29 3a e7 28 63 25 28 78 25 29 80 32 5e 32 |x%):.(c%(x%).2^2| 00002be0 36 29 3d 30 80 28 63 25 28 78 25 29 80 26 38 30 |6)=0.(c%(x%).&80| 00002bf0 30 30 30 30 30 30 29 3d 30 8c 0d 69 3a 29 f2 69 |000000)=0..i:).i| 00002c00 3a f5 3a c8 99 26 32 30 30 30 38 2c 31 37 2c 6e |:.:..&20008,17,n| 00002c10 24 2b 22 2e 22 2b 68 24 b8 4e 25 3a e7 4e 25 3c |$+"."+h$.N%:.N%<| 00002c20 3e 31 8c 0d 69 5e 39 69 24 3d 22 43 61 6e 27 74 |>1..i^9i$="Can't| 00002c30 20 75 73 65 20 74 68 61 74 20 76 6f 69 63 65 2e | use that voice.| 00002c40 20 28 22 2b 6e 24 2b 22 2e 22 2b 68 24 2b 22 20 | ("+n$+"."+h$+" | 00002c50 6e 6f 74 20 66 6f 75 6e 64 2e 29 22 0d 69 70 40 |not found.)".ip@| 00002c60 cc 3a e7 ac a4 71 8c e7 ac a4 72 8c 69 24 3d 22 |.:...q....r.i$="| 00002c70 43 61 6e 27 74 20 75 73 65 20 74 68 61 74 20 76 |Can't use that v| 00002c80 6f 69 63 65 2e 20 28 4e 6f 20 76 6f 69 63 65 20 |oice. (No voice | 00002c90 73 6c 6f 74 73 20 6c 65 66 74 29 22 0d 69 79 08 |slots left)".iy.| 00002ca0 e7 a4 71 8c 0d 69 82 2b c8 99 26 32 30 30 31 45 |..q..i.+..&2001E| 00002cb0 2c 30 2c 6e 24 2b 22 2e 22 2b 68 24 b8 57 63 25 |,0,n$+"."+h$.Wc%| 00002cc0 3b 50 25 3a e7 28 50 25 80 31 29 3c 3e 30 8c 0d |;P%:.(P%.1)<>0..| 00002cd0 69 94 33 e7 ac a4 72 8c 69 24 3d 22 43 61 6e 27 |i.3...r.i$="Can'| 00002ce0 74 20 75 73 65 20 74 68 61 74 20 76 6f 69 63 65 |t use that voice| 00002cf0 2e 20 28 22 2b a4 63 28 57 63 25 2b 34 29 2b 22 |. ("+.c(Wc%+4)+"| 00002d00 29 22 0d 69 9d 46 cc 3a c8 99 26 36 30 31 38 35 |)".i.F.:..&60185| 00002d10 2c 71 25 2c 30 b8 2c 6a 61 25 3a c8 99 26 36 30 |,q%,0.,ja%:..&60| 00002d20 31 38 41 2c 71 25 2c 68 24 b8 3b 50 25 3a c8 99 |18A,q%,h$.;P%:..| 00002d30 26 36 30 31 38 35 2c 71 25 2c 6a 61 25 3a e7 28 |&60185,q%,ja%:.(| 00002d40 50 25 80 31 29 3d 31 8c 0d 69 ca 62 69 24 3d 22 |P%.1)=1..i.bi$="| 00002d50 56 6f 69 63 65 20 6d 6f 64 75 6c 65 20 27 22 2b |Voice module '"+| 00002d60 68 24 2b 22 27 20 64 6f 65 73 20 6e 6f 74 20 63 |h$+"' does not c| 00002d70 6f 6e 74 61 69 6e 20 61 20 76 6f 69 63 65 20 63 |ontain a voice c| 00002d80 61 6c 6c 65 64 20 27 22 2b 68 24 2b 22 27 2e 20 |alled '"+h$+"'. | 00002d90 53 68 61 6c 6c 20 75 73 65 20 61 6e 20 61 6c 74 |Shall use an alt| 00002da0 65 72 6e 61 74 69 76 65 2e 22 0d 69 dc 1a cc 3a |ernative.".i...:| 00002db0 63 25 28 78 25 29 3d 28 63 25 28 78 25 29 84 32 |c%(x%)=(c%(x%).2| 00002dc0 5e 32 36 29 0d 69 ee 05 cd 0d 69 ee 05 cd 0d 69 |^26).i....i....i| 00002dd0 f7 0a cc 3a 50 25 3d 31 0d 6a 12 05 cd 0d 6a 12 |...:P%=1.j....j.| 00002de0 05 cd 0d 6a 1b 17 fd 69 24 3c 3e 22 22 84 28 50 |...j...i$<>"".(P| 00002df0 25 80 31 29 3d 30 3a f2 70 0d 6a 36 05 cd 0d 6a |%.1)=0:.p.j6...j| 00002e00 36 0b e7 69 24 3d 22 22 8c 0d 6a 3f 10 f2 4a 28 |6..i$=""..j?..J(| 00002e10 77 25 2c 71 25 2c 78 25 29 0d 6a 51 64 cc 3a f2 |w%,q%,x%).jQd.:.| 00002e20 62 28 69 24 2c a3 29 3a c8 99 26 34 34 41 44 44 |b(i$,.):..&44ADD| 00002e30 2c 33 2c 4d 66 25 2c 56 6b 25 2a 32 2b 49 66 25 |,3,Mf%,Vk%*2+If%| 00002e40 2c 31 3a c8 99 26 34 34 41 44 44 2c 36 2c 4d 66 |,1:..&44ADD,6,Mf| 00002e50 25 2c 56 6b 25 2a 32 2b 4a 66 25 2c 26 37 45 32 |%,Vk%*2+Jf%,&7E2| 00002e60 30 30 30 30 30 2c 26 46 46 32 30 30 30 30 30 3a |00000,&FF200000:| 00002e70 e7 55 6b 25 3c 3e 54 6b 25 59 6b 25 8c 0d 6a 75 |.Uk%<>Tk%Yk%..ju| 00002e80 4b c8 99 26 34 34 41 44 44 2c 33 2c 4d 66 25 2c |K..&44ADD,3,Mf%,| 00002e90 55 6b 25 2a 32 2b 49 66 25 2c 30 3a c8 99 26 34 |Uk%*2+If%,0:..&4| 00002ea0 34 41 44 44 2c 36 2c 4d 66 25 2c 55 6b 25 2a 32 |4ADD,6,Mf%,Uk%*2| 00002eb0 2b 4a 66 25 2c 26 31 37 30 30 30 30 30 30 2c 26 |+Jf%,&17000000,&| 00002ec0 46 46 32 30 30 30 30 30 0d 6a 90 05 cd 0d 6a 90 |FF200000.j....j.| 00002ed0 0b 55 6b 25 3d 56 6b 25 0d 6a a2 05 cd 0d 6a a2 |.Uk%=Vk%.j....j.| 00002ee0 09 e7 58 6b 25 8c 0d 6a ab 64 c8 99 26 34 30 31 |..Xk%..j.d..&401| 00002ef0 38 39 2c 71 25 2c 59 62 25 2c 61 25 28 34 29 2d |89,q%,Yb%,a%(4)-| 00002f00 26 31 30 30 30 2c 31 30 30 3a 54 25 3d 91 3a f5 |&1000,100:T%=.:.| 00002f10 3a c8 97 58 25 2c 59 25 2c 42 25 3a fd 42 25 3d |:..X%,Y%,B%:.B%=| 00002f20 30 80 91 3e 54 25 2b 35 3a c8 99 26 34 30 31 38 |0..>T%+5:..&4018| 00002f30 39 2c 71 25 2c 59 62 25 84 32 5e 37 2c 61 25 28 |9,q%,Yb%.2^7,a%(| 00002f40 34 29 2d 26 31 30 30 30 2c 31 0d 6a ea 05 cd 0d |4)-&1000,1.j....| 00002f50 6a ea 05 e1 0d 6a f3 1a dd f2 53 28 71 25 29 3a |j....j....S(q%):| 00002f60 ea 65 25 2c 66 25 3a e7 ac 59 61 25 8c e1 0d 6b |.e%,f%:..Ya%...k| 00002f70 17 27 57 6b 25 3d 71 25 3a e3 65 25 3d 30 b8 47 |.'Wk%=q%:.e%=0.G| 00002f80 63 25 2d 31 3a e7 62 25 28 77 25 2c 71 25 2d 31 |c%-1:.b%(w%,q%-1| 00002f90 29 3d 65 25 8c 0d 6b 32 50 c8 99 26 34 34 41 44 |)=e%..k2P..&44AD| 00002fa0 44 2c 33 2c 4d 66 25 2c 65 25 2a 32 2b 49 66 25 |D,3,Mf%,e%*2+If%| 00002fb0 2c 31 3a c8 99 26 34 34 41 44 44 2c 36 2c 4d 66 |,1:..&44ADD,6,Mf| 00002fc0 25 2c 65 25 2a 32 2b 4a 66 25 2c 26 37 45 32 30 |%,e%*2+Jf%,&7E20| 00002fd0 30 30 30 30 2c 26 46 46 32 30 30 30 30 30 3a 55 |0000,&FF200000:U| 00002fe0 6b 25 3d 65 25 0d 6b 56 4b cc 3a c8 99 26 34 34 |k%=e%.kVK.:..&44| 00002ff0 41 44 44 2c 33 2c 4d 66 25 2c 65 25 2a 32 2b 49 |ADD,3,Mf%,e%*2+I| 00003000 66 25 2c 30 3a c8 99 26 34 34 41 44 44 2c 36 2c |f%,0:..&44ADD,6,| 00003010 4d 66 25 2c 65 25 2a 32 2b 4a 66 25 2c 26 31 37 |Mf%,e%*2+Jf%,&17| 00003020 30 30 30 30 30 30 2c 26 46 46 32 30 30 30 30 30 |000000,&FF200000| 00003030 0d 6b 71 05 cd 0d 6b 71 45 ed 3a 5a 6b 25 3d 62 |.kq...kqE.:Zk%=b| 00003040 25 28 77 25 2c 71 25 2d 31 29 3a c8 99 26 34 34 |%(w%,q%-1):..&44| 00003050 41 44 36 2c 4d 66 25 2c 2d 31 3a c8 99 26 34 34 |AD6,Mf%,-1:..&44| 00003060 41 44 39 2c 4d 66 25 2c 2d 31 3a 5f 6b 25 3d 71 |AD9,Mf%,-1:_k%=q| 00003070 61 25 3a e7 71 61 25 8c f2 6d 0d 6b a7 05 e1 0d |a%:.qa%..m.k....| 00003080 6b b0 1d dd f2 41 62 3a f2 7a 62 28 5a 6b 25 2c |k....Ab:.zb(Zk%,| 00003090 57 6b 25 2c a3 29 3a f2 42 62 3a e1 0d 6b dd 18 |Wk%,.):.Bb:..k..| 000030a0 dd f2 42 62 3a ea 65 25 2c 41 24 2c 41 25 3a c8 |..Bb:.e%,A$,A%:.| 000030b0 8e 77 25 ca 0d 6c 01 1c c9 30 3a c8 99 26 34 34 |.w%..l...0:..&44| 000030c0 41 44 44 2c 36 2c 74 25 2c 6b 66 25 2c 30 2c 30 |ADD,6,t%,kf%,0,0| 000030d0 0d 6c 13 42 c9 31 3a f2 69 3a c8 99 26 34 34 41 |.l.B.1:.i:..&44A| 000030e0 44 44 2c 36 2c 6f 25 2c 50 66 25 2c 30 2c 30 3a |DD,6,o%,Pf%,0,0:| 000030f0 41 25 3d 57 6b 25 3a d6 62 69 25 3a f2 6b 28 62 |A%=Wk%:.bi%:.k(b| 00003100 25 28 31 2c 57 6b 25 2d 31 29 2c 57 6b 25 29 3a |%(1,Wk%-1),Wk%):| 00003110 f2 70 0d 6c 52 5e c9 32 3a c8 99 26 34 34 41 44 |.p.lR^.2:..&44AD| 00003120 44 2c 36 2c 6c 25 2c 68 68 25 2c 30 2c 30 3a f2 |D,6,l%,hh%,0,0:.| 00003130 6b 28 62 25 28 32 2c 57 6b 25 2d 31 29 2c 57 6b |k(b%(2,Wk%-1),Wk| 00003140 25 29 3a 41 24 3d 61 24 28 62 25 28 32 2c 57 6b |%):A$=a$(b%(2,Wk| 00003150 25 2d 31 29 29 3a e3 65 25 3d 30 b8 6b 68 25 2d |%-1)):.e%=0.kh%-| 00003160 31 3a e7 68 25 28 65 25 2c 30 29 3d 57 6b 25 8c |1:.h%(e%,0)=Wk%.| 00003170 0d 6c 7f 30 c8 99 26 34 34 41 44 44 2c 31 2b 35 |.l.0..&44ADD,1+5| 00003180 31 32 2c 6c 25 2c 6c 68 25 2b 65 25 2c 22 73 22 |12,l%,lh%+e%,"s"| 00003190 2b 41 24 2b 22 2c 70 22 2b 41 24 2c 2c 48 68 25 |+A$+",p"+A$,,Hh%| 000031a0 0d 6c 91 05 cd 0d 6c 91 05 ed 0d 6c a3 45 c9 33 |.l....l....l.E.3| 000031b0 3a f2 69 3a c8 99 26 34 34 41 44 44 2c 36 2c 6b |:.i:..&44ADD,6,k| 000031c0 25 2c 79 67 25 2c 30 2c 30 3a c8 99 26 34 34 41 |%,yg%,0,0:..&44A| 000031d0 45 42 2c 33 2c 64 68 25 3a f2 75 28 62 25 28 33 |EB,3,dh%:.u(b%(3| 000031e0 2c 57 6b 25 2d 31 29 2c 57 6b 25 29 3a f2 70 0d |,Wk%-1),Wk%):.p.| 000031f0 6c d9 05 cb 0d 6c d9 20 f2 68 28 4d 66 25 29 3a |l....l. .h(Mf%):| 00003200 c8 99 26 34 34 41 44 39 2c 2c 2d 32 3a e7 5f 6b |..&44AD9,,-2:._k| 00003210 25 8c f2 74 0d 6c f4 05 e1 0d 6c fd 12 dd f2 43 |%..t.l....l....C| 00003220 62 28 64 25 29 3a c8 8e 64 25 ca 0d 6d 18 0c c9 |b(d%):..d%..m...| 00003230 46 66 25 3a f2 42 62 0d 6d 33 0c c9 47 66 25 3a |Ff%:.Bb.m3..Gf%:| 00003240 f2 41 62 0d 6d 45 05 cb 0d 6d 45 05 e1 0d 6d 4e |.Ab.mE...mE...mN| 00003250 44 dd a4 71 3a ea 65 25 2c 79 25 2c 41 25 3a 79 |D..q:.e%,y%,A%:y| 00003260 25 3d a3 3a e3 65 25 3d 33 32 b8 31 88 2d 31 3a |%=.:.e%=32.1.-1:| 00003270 c8 99 26 36 30 31 38 33 2c 30 2c 65 25 b8 41 25 |..&60183,0,e%.A%| 00003280 3a e7 41 25 3d 30 8c 79 25 3d b9 3a 65 25 3d 2d |:.A%=0.y%=.:e%=-| 00003290 31 0d 6d 8d 09 ed 3a 3d 79 25 0d 6d ba 17 dd f2 |1.m...:=y%.m....| 000032a0 44 62 28 70 25 2c 64 25 29 3a e7 70 25 3e 37 8c |Db(p%,d%):.p%>7.| 000032b0 e1 0d 6d c3 0c f2 69 3a c8 8e 64 25 ca 0d 6d d5 |..m...i:..d%..m.| 000032c0 0c c9 78 66 25 3a f2 45 62 0d 6d e7 0c c9 79 66 |..xf%:.Eb.m...yf| 000032d0 25 3a f2 5f 61 0d 6d f0 0c c9 7a 66 25 3a f2 71 |%:._a.m...zf%:.q| 000032e0 62 0d 6d f9 0c c9 41 66 25 3a f2 46 62 0d 6e 02 |b.m...Af%:.Fb.n.| 000032f0 05 cb 0d 6e 02 08 f2 70 3a e1 0d 6e 14 33 dd f2 |...n...p:..n.3..| 00003300 41 3a 21 67 25 3d 31 3a c8 99 26 37 2c 31 34 2c |A:!g%=1:..&7,14,| 00003310 67 25 3a e7 28 3f 67 25 3c 3e 26 39 35 84 67 25 |g%:.(?g%<>&95.g%| 00003320 3f 31 3e 34 29 8c 76 61 25 3d b9 3a e0 0d 6e 41 |?1>4).va%=.:..nA| 00003330 35 c8 99 26 34 34 41 44 36 2c 42 66 25 2c 2d 31 |5..&44AD6,Bf%,-1| 00003340 3a c8 99 26 34 34 41 44 44 2c 33 2c 2d 31 2c 7a |:..&44ADD,3,-1,z| 00003350 63 25 2c 30 3a 41 61 25 3d b9 3a 77 25 3d 2d 31 |c%,0:Aa%=.:w%=-1| 00003360 3a e1 0d 6e 77 24 dd f2 47 62 3a c8 99 26 34 34 |:..nw$..Gb:..&44| 00003370 41 44 44 2c 33 2c 2d 31 2c 7a 63 25 2c 31 3a 41 |ADD,3,-1,zc%,1:A| 00003380 61 25 3d a3 3a e1 0d 6e a4 1c dd f2 52 28 6e 25 |a%=.:..n....R(n%| 00003390 2c 64 25 2c 58 25 2c 59 25 29 3a e7 ac 5a 61 25 |,d%,X%,Y%):..Za%| 000033a0 8c e1 0d 6e c8 21 60 6b 25 3d 6e 25 3a 61 6c 25 |...n.!`k%=n%:al%| 000033b0 3d 64 25 3a f2 60 28 59 68 25 2c 58 25 2c 59 25 |=d%:.`(Yh%,X%,Y%| 000033c0 29 3a e1 0d 6e ec 6f dd f2 48 62 28 41 25 29 3a |):..n.o..Hb(A%):| 000033d0 41 25 3d a0 28 c1 22 30 34 30 30 36 30 30 36 30 |A%=.(."040060060| 000033e0 30 36 35 30 37 30 30 38 30 30 39 30 31 30 30 31 |0650700800901001| 000033f0 31 35 31 33 30 31 34 35 31 36 30 31 37 35 31 39 |1513014516017519| 00003400 30 32 31 30 22 2c 41 25 2a 33 2b 31 2c 33 29 29 |0210",A%*3+1,3))| 00003410 3a c8 99 26 34 34 41 44 34 2c 32 2c 60 6b 25 2c |:..&44AD4,2,`k%,| 00003420 61 6c 25 2c 41 25 2d 34 30 3a f2 64 28 41 25 29 |al%,A%-40:.d(A%)| 00003430 3a e1 0d 6f 22 1d dd f2 57 28 48 25 2c 4a 25 29 |:..o"...W(H%,J%)| 00003440 3a ea 58 25 2c 59 25 3a e7 77 25 3c 30 8c e1 0d |:.X%,Y%:.w%<0...| 00003450 6f 46 82 59 25 3d 69 25 28 77 25 29 3a 58 25 3d |oF.Y%=i%(w%):X%=| 00003460 59 25 21 34 3a 59 25 3d 59 25 21 38 2d 65 62 25 |Y%!4:Y%=Y%!8-eb%| 00003470 3a c8 99 26 32 45 2c 28 35 32 2b 32 35 36 29 2c |:..&2E,(52+256),| 00003480 55 25 2c 22 4d 65 74 72 6f 6e 6f 6d 65 22 2c 48 |U%,"Metronome",H| 00003490 25 2b 58 25 2c 4a 25 2b 59 25 2c 30 2c 68 63 25 |%+X%,J%+Y%,0,hc%| 000034a0 2c 69 63 25 3a c8 99 26 34 34 41 45 32 2c 33 34 |,ic%:..&44AE2,34| 000034b0 2c 6f 63 25 2c 22 50 6c 6f 74 4d 65 22 2c 48 25 |,oc%,"PlotMe",H%| 000034c0 2b 58 25 2c 4a 25 2b 59 25 2b 65 62 25 2c 38 3a |+X%,J%+Y%+eb%,8:| 000034d0 e1 0d 6f 7c 1d dd f2 74 3a 71 61 25 3d b9 3a 62 |..o|...t:qa%=.:b| 000034e0 6c 25 3d 6c 62 25 3a e7 74 62 25 3d 31 8c 0d 6f |l%=lb%:.tb%=1..o| 000034f0 a9 27 e3 65 25 3d 31 b8 6f 62 25 3a d4 38 2c 26 |.'.e%=1.ob%:.8,&| 00003500 31 30 30 2b 70 62 25 2c 38 30 2c 32 2c 65 25 2a |100+pb%,80,2,e%*| 00003510 6e 62 25 3a ed 0d 6f cd 05 cd 0d 6f cd 21 f2 64 |nb%:..o....o.!.d| 00003520 28 71 62 25 29 3a c8 9e 6c 62 25 3a f2 45 28 c6 |(qb%):..lb%:.E(.| 00003530 8f 2c 63 6c 25 29 3a f2 67 3a e1 0d 6f fa 27 dd |.,cl%):.g:..o.'.| 00003540 f2 6d 3a 71 61 25 3d a3 3a f2 45 28 6b 62 25 2f |.m:qa%=.:.E(kb%/| 00003550 34 2c b9 29 3a c8 99 26 34 30 31 43 30 3a f2 67 |4,.):..&401C0:.g| 00003560 3a e1 0d 70 39 43 dd f2 73 28 64 25 2c 6e 25 2c |:..p9C..s(d%,n%,| 00003570 64 6c 25 29 3a ea 41 25 2c 65 25 3a c8 99 26 34 |dl%):.A%,e%:..&4| 00003580 34 41 44 45 2c 31 2c 6e 25 2c 64 25 2c 68 25 2b |4ADE,1,n%,d%,h%+| 00003590 31 30 30 2c 31 30 30 3a c8 8e a4 63 28 68 25 2b |100,100:...c(h%+| 000035a0 31 30 30 29 ca 0d 70 66 16 c9 22 73 6f 66 66 2c |100)..pf.."soff,| 000035b0 70 6f 66 66 22 3a 74 62 25 3d 30 0d 70 78 14 c9 |poff":tb%=0.px..| 000035c0 22 73 6f 6e 2c 70 6f 6e 22 3a 74 62 25 3d 31 0d |"son,pon":tb%=1.| 000035d0 70 81 05 cb 0d 70 81 19 74 62 25 3d 28 74 62 25 |p....p..tb%=(tb%| 000035e0 82 64 6c 25 29 3a e7 64 6c 25 3d 31 8c 0d 70 93 |.dl%):.dl%=1..p.| 000035f0 0b e7 74 62 25 3d 31 8c 0d 70 9c 1e c8 99 26 34 |..tb%=1..p....&4| 00003600 34 41 44 44 2c 31 2c 6e 25 2c 64 25 2c 22 73 6f |4ADD,1,n%,d%,"so| 00003610 6e 2c 70 6f 6e 22 0d 70 ae 22 cc 3a c8 99 26 34 |n,pon".p.".:..&4| 00003620 34 41 44 44 2c 31 2c 6e 25 2c 64 25 2c 22 73 6f |4ADD,1,n%,d%,"so| 00003630 66 66 2c 70 6f 66 66 22 0d 70 c0 05 cd 0d 70 c0 |ff,poff".p....p.| 00003640 05 cd 0d 70 c9 09 e7 71 61 25 8c 0d 70 ed 49 41 |...p...qa%..p.IA| 00003650 25 3d 31 3a c8 95 41 25 2a 6e 62 25 3c c6 8f 3a |%=1:..A%*nb%<..:| 00003660 41 25 2b 3d 31 3a ce 3a e3 65 25 3d 41 25 b8 6f |A%+=1:.:.e%=A%.o| 00003670 62 25 2a 32 3a d4 38 2c 28 26 31 30 30 2b 70 62 |b%*2:.8,(&100+pb| 00003680 25 29 2a 74 62 25 2c 38 30 2c 32 2c 65 25 2a 6e |%)*tb%,80,2,e%*n| 00003690 62 25 3a ed 0d 71 35 05 cd 0d 71 35 05 e1 0d 71 |b%:..q5...q5...q| 000036a0 47 67 dd f2 64 28 41 25 29 3a ea 67 3a 71 62 25 |Gg..d(A%):.g:qb%| 000036b0 3d 41 25 3a c8 9f 69 62 25 2a 41 25 2a 51 25 2a |=A%:..ib%*A%*Q%*| 000036c0 26 31 30 30 30 2f 31 32 30 30 30 3a 21 6a 6a 25 |&1000/12000:!jj%| 000036d0 3d 28 28 31 33 30 2d 28 41 25 2d 32 30 29 2f 32 |=((130-(A%-20)/2| 000036e0 2e 33 29 2f 72 62 25 29 2a 32 5e 31 30 3a e7 71 |.3)/rb%)*2^10:.q| 000036f0 61 25 3d 30 84 28 ac 63 6c 25 29 8c f2 45 28 73 |a%=0.(.cl%)..E(s| 00003700 62 25 2c b9 29 0d 71 86 2c 67 3d 28 28 31 32 30 |b%,.).q.,g=((120| 00003710 30 30 29 2f 28 71 62 25 2a 35 2a 69 62 25 29 29 |00)/(qb%*5*ib%))| 00003720 2a 32 5e 38 3a 21 73 6a 25 3d 67 3a c8 8e 77 25 |*2^8:!sj%=g:..w%| 00003730 ca 0d 71 aa 1f c9 30 3a c8 99 26 34 34 41 44 44 |..q...0:..&44ADD| 00003740 2c 32 2c 74 25 2c 74 66 25 2c c3 28 71 62 25 29 |,2,t%,tf%,.(qb%)| 00003750 0d 71 bc 1f c9 31 3a c8 99 26 34 34 41 44 44 2c |.q...1:..&44ADD,| 00003760 32 2c 6f 25 2c 6f 67 25 2c c3 28 71 62 25 29 0d |2,o%,og%,.(qb%).| 00003770 71 c5 1f c9 32 3a c8 99 26 34 34 41 44 44 2c 32 |q...2:..&44ADD,2| 00003780 2c 6c 25 2c 76 68 25 2c c3 28 71 62 25 29 0d 71 |,l%,vh%,.(qb%).q| 00003790 ce 1f c9 33 3a c8 99 26 34 34 41 44 44 2c 32 2c |...3:..&44ADD,2,| 000037a0 6b 25 2c 59 67 25 2c c3 28 71 62 25 29 0d 71 d7 |k%,Yg%,.(qb%).q.| 000037b0 05 cb 0d 71 d7 05 e1 0d 71 e0 b1 dd f2 79 28 41 |...q....q....y(A| 000037c0 25 2c 42 25 29 3a ea 65 25 2c 41 63 25 2c 41 2c |%,B%):.e%,Ac%,A,| 000037d0 42 63 25 3a 41 63 25 3d 33 30 3a 51 25 3d 42 25 |Bc%:Ac%=30:Q%=B%| 000037e0 3a 69 62 25 3d 32 2a 41 25 3a 6b 62 25 3d 51 25 |:ib%=2*A%:kb%=Q%| 000037f0 2a 69 62 25 3a 6c 62 25 3d 6b 62 25 2a 6a 62 25 |*ib%:lb%=kb%*jb%| 00003800 3a 6d 62 25 3d 69 62 25 2a 6a 62 25 3a 6e 62 25 |:mb%=ib%*jb%:nb%| 00003810 3d 51 25 2a 69 62 25 2f 32 3a 6f 62 25 3d 32 2a |=Q%*ib%/2:ob%=2*| 00003820 6d 62 25 2f 69 62 25 3a e3 42 63 25 3d 30 b8 6a |mb%/ib%:.Bc%=0.j| 00003830 62 25 3a e3 65 25 3d 30 b8 6b 62 25 2a 38 88 38 |b%:.e%=0.kb%*8.8| 00003840 3a 41 3d 39 30 2b 65 25 2a 33 36 30 2f 28 6b 62 |:A=90+e%*360/(kb| 00003850 25 2a 38 29 3a 41 3d b2 28 b5 28 b2 28 41 29 29 |%*8):A=.(.(.(A))| 00003860 2a 41 63 25 2b 39 30 29 0d 72 67 67 21 28 43 63 |*Ac%+90).rgg!(Cc| 00003870 25 2b 65 25 2b 6b 62 25 2a 38 2a 42 63 25 29 3d |%+e%+kb%*8*Bc%)=| 00003880 28 9b 28 41 29 2a 72 62 25 29 2a 32 5e 31 30 3a |(.(A)*rb%)*2^10:| 00003890 21 28 43 63 25 2b 65 25 2b 6b 62 25 2a 38 2a 42 |!(Cc%+e%+kb%*8*B| 000038a0 63 25 2b 34 29 3d 28 b5 28 41 29 2a 72 62 25 29 |c%+4)=(.(A)*rb%)| 000038b0 2a 32 5e 31 30 3a ed 3a ed 3a f2 64 28 71 62 25 |*2^10:.:.:.d(qb%| 000038c0 29 3a f2 45 28 6b 62 25 2f 34 2c b9 29 3a e1 0d |):.E(kb%/4,.):..| 000038d0 72 a6 2b dd f2 45 28 5a 25 2c 65 6c 25 29 3a ea |r.+..E(Z%,el%):.| 000038e0 58 25 2c 59 25 2c 41 25 2c 48 25 2c 4a 25 3a e7 |X%,Y%,A%,H%,J%:.| 000038f0 74 62 25 3d 31 80 71 61 25 8c 0d 72 d3 0c e7 5a |tb%=1.qa%..r...Z| 00003900 25 3c 62 6c 25 8c 0d 72 dc 2b e3 65 25 3d 31 b8 |%<bl%..r.+.e%=1.| 00003910 6f 62 25 3a d4 38 2c 26 31 30 30 2b 70 62 25 2c |ob%:.8,&100+pb%,| 00003920 38 30 2c 32 2c 6c 62 25 2b 65 25 2a 6e 62 25 3a |80,2,lb%+e%*nb%:| 00003930 ed 0d 73 00 05 cd 0d 73 00 0a 62 6c 25 3d 5a 25 |..s....s..bl%=Z%| 00003940 0d 73 12 05 cd 0d 73 12 09 e7 65 6c 25 8c 0d 73 |.s....s...el%..s| 00003950 1b 16 41 25 3d 5a 25 3a d6 65 6a 25 3a e7 77 25 |..A%=Z%:.ej%:.w%| 00003960 3c 30 8c e1 0d 73 36 ac 66 6c 25 3d 69 25 28 77 |<0...s6.fl%=i%(w| 00003970 25 29 3a 41 25 3d 5a 25 3a c8 99 26 34 34 41 43 |%):A%=Z%:..&44AC| 00003980 37 2c 32 30 2c 66 6c 25 2c 68 25 3a 58 25 3d 68 |7,20,fl%,h%:X%=h| 00003990 25 21 34 3a 59 25 3d 68 25 21 38 3a c8 99 26 34 |%!4:Y%=h%!8:..&4| 000039a0 30 30 43 39 2c 2c 68 25 b8 41 25 3a 48 25 3d 68 |00C9,,h%.A%:H%=h| 000039b0 25 21 34 2d 68 25 21 32 30 3a 4a 25 3d 68 25 21 |%!4-h%!20:J%=h%!| 000039c0 31 36 2d 68 25 21 32 34 3a c8 95 41 25 3c 3e 30 |16-h%!24:..A%<>0| 000039d0 3a c8 99 26 34 34 41 45 32 2c 33 34 2c 6f 63 25 |:..&44AE2,34,oc%| 000039e0 2c 22 50 6c 6f 74 4d 65 22 2c 48 25 2b 58 25 2c |,"PlotMe",H%+X%,| 000039f0 4a 25 2b 59 25 2c 38 3a c8 99 26 34 30 30 43 41 |J%+Y%,8:..&400CA| 00003a00 2c 2c 68 25 b8 41 25 3a ce 3a 73 62 25 3d 5a 25 |,,h%.A%:.:sb%=Z%| 00003a10 0d 73 b4 05 cd 0d 73 b4 05 e1 0d 73 bd d4 dd f2 |.s....s....s....| 00003a20 49 62 3a ea 6b 6b 25 2c 6c 6b 25 2c 6d 6b 25 2c |Ib:.kk%,lk%,mk%,| 00003a30 65 25 2c 41 25 3a 67 6c 25 3d eb 3a c8 99 26 34 |e%,A%:gl%=.:..&4| 00003a40 30 30 45 44 2c 26 31 30 30 2c 55 25 2c 22 6d 65 |00ED,&100,U%,"me| 00003a50 74 72 6f 6e 6f 6d 65 22 2c 2c 2c 2c 68 63 25 2c |tronome",,,,hc%,| 00003a60 69 63 25 3a c8 99 26 34 34 41 45 32 2c 32 35 39 |ic%:..&44AE2,259| 00003a70 2c 6f 63 25 2c 22 4d 65 74 22 2c 32 5e 34 2c 63 |,oc%,"Met",2^4,c| 00003a80 62 25 2c 64 62 25 2c 67 6c 25 3a c8 99 26 34 34 |b%,db%,gl%:..&44| 00003a90 41 45 32 2c 32 35 39 2c 6f 63 25 2c 22 50 6c 6f |AE2,259,oc%,"Plo| 00003aa0 74 4d 65 22 2c 32 5e 34 2c 63 62 25 2c 64 62 25 |tMe",2^4,cb%,db%| 00003ab0 2c 67 6c 25 3a c8 99 26 34 34 41 45 32 2c 32 36 |,gl%:..&44AE2,26| 00003ac0 34 2c 6f 63 25 2c 32 2c 30 3a c8 99 26 34 34 41 |4,oc%,2,0:..&44A| 00003ad0 45 32 2c 36 30 2c 6f 63 25 2c 22 4d 65 74 22 2c |E2,60,oc%,"Met",| 00003ae0 30 b8 2c 6b 6b 25 2c 6c 6b 25 2c 6d 6b 25 0d 74 |0.,kk%,lk%,mk%.t| 00003af0 0e 9e c8 99 26 34 34 41 45 32 2c 35 32 2b 32 5e |....&44AE2,52+2^| 00003b00 31 31 2c 55 25 2c 22 4d 65 74 72 6f 6e 6f 6d 65 |11,U%,"Metronome| 00003b10 22 2c 30 2c 2d 65 62 25 2c 38 2c 68 63 25 2c 69 |",0,-eb%,8,hc%,i| 00003b20 63 25 3a c8 99 26 32 45 2c 36 30 2c 6b 6b 25 2c |c%:..&2E,60,kk%,| 00003b30 6c 6b 25 2c 6d 6b 25 3a c8 99 26 34 34 41 45 32 |lk%,mk%:..&44AE2| 00003b40 2c 32 34 2c 6f 63 25 2c 22 6d 65 74 22 b8 2c 2c |,24,oc%,"met".,,| 00003b50 41 25 3a 21 67 6a 25 3d 41 25 3a c8 99 26 34 34 |A%:!gj%=A%:..&44| 00003b60 41 45 32 2c 32 34 2c 6f 63 25 2c 22 50 6c 6f 74 |AE2,24,oc%,"Plot| 00003b70 4d 65 22 b8 2c 2c 41 25 3a 21 68 6a 25 3d 41 25 |Me".,,A%:!hj%=A%| 00003b80 3a 41 25 3d 30 3a d6 65 6a 25 3a e1 0d 74 5f 3c |:A%=0:.ej%:..t_<| 00003b90 dd a4 4c 28 6a 25 2c 61 25 29 3a ea 65 25 2c 63 |..L(j%,a%):.e%,c| 00003ba0 25 2c 62 25 3a 62 25 3d a4 66 28 22 54 65 6d 70 |%,b%:b%=.f("Temp| 00003bb0 22 2c 61 25 29 3a e7 62 25 3d 30 8c 62 25 3d a4 |",a%):.b%=0.b%=.| 00003bc0 62 28 31 32 2c 61 25 29 0d 74 8c 09 c8 8e 6a 25 |b(12,a%).t....j%| 00003bd0 ca 0d 74 95 1b c9 30 3a c8 99 26 34 34 41 44 34 |..t...0:..&44AD4| 00003be0 2c 31 2c 74 25 2c 6f 66 25 b8 63 25 0d 74 a7 1b |,1,t%,of%.c%.t..| 00003bf0 c9 31 3a c8 99 26 34 34 41 44 34 2c 31 2c 6f 25 |.1:..&44AD4,1,o%| 00003c00 2c 67 67 25 b8 63 25 0d 74 b0 1b c9 32 3a c8 99 |,gg%.c%.t...2:..| 00003c10 26 34 34 41 44 34 2c 31 2c 6c 25 2c 75 68 25 b8 |&44AD4,1,l%,uh%.| 00003c20 63 25 0d 74 b9 1b c9 33 3a c8 99 26 34 34 41 44 |c%.t...3:..&44AD| 00003c30 34 2c 31 2c 6b 25 2c 51 67 25 b8 63 25 0d 74 c2 |4,1,k%,Qg%.c%.t.| 00003c40 05 cb 0d 74 c2 19 e7 62 25 3d 30 8c 62 25 3d a4 |...t...b%=0.b%=.| 00003c50 62 28 63 25 2b 34 30 2c 61 25 29 0d 74 cb 07 3d |b(c%+40,a%).t..=| 00003c60 62 25 0d 74 e6 1e dd a4 77 28 6a 25 2c 61 25 29 |b%.t....w(j%,a%)| 00003c70 3a ea 65 25 2c 63 25 2c 62 25 3a e7 68 6c 25 8c |:.e%,c%,b%:.hl%.| 00003c80 0d 74 f8 23 62 25 3d a4 61 28 63 25 2c 61 25 29 |.t.#b%=.a(c%,a%)| 00003c90 3a e7 62 25 3d 30 8c 62 25 3d a4 61 28 63 25 2c |:.b%=0.b%=.a(c%,| 00003ca0 61 25 29 0d 75 0a 0a e7 62 25 3d 30 8c 0d 75 13 |a%).u...b%=0..u.| 00003cb0 09 c8 8e 6a 25 ca 0d 75 1c 31 c9 30 3a c8 99 26 |...j%..u.1.0:..&| 00003cc0 34 34 41 44 34 2c 32 2c 74 25 2c 6f 66 25 2c 63 |44AD4,2,t%,of%,c| 00003cd0 25 2d 34 30 3a c8 99 26 34 34 41 43 42 2c 74 25 |%-40:..&44ACB,t%| 00003ce0 2c 74 66 25 2c 63 25 0d 75 40 31 c9 31 3a c8 99 |,tf%,c%.u@1.1:..| 00003cf0 26 34 34 41 44 34 2c 32 2c 6f 25 2c 67 67 25 2c |&44AD4,2,o%,gg%,| 00003d00 63 25 2d 34 30 3a c8 99 26 34 34 41 43 42 2c 6f |c%-40:..&44ACB,o| 00003d10 25 2c 6f 67 25 2c 63 25 0d 75 5b 31 c9 32 3a c8 |%,og%,c%.u[1.2:.| 00003d20 99 26 34 34 41 44 34 2c 32 2c 6c 25 2c 75 68 25 |.&44AD4,2,l%,uh%| 00003d30 2c 63 25 2d 34 30 3a c8 99 26 34 34 41 43 42 2c |,c%-40:..&44ACB,| 00003d40 6c 25 2c 76 68 25 2c 63 25 0d 75 76 31 c9 33 3a |l%,vh%,c%.uv1.3:| 00003d50 c8 99 26 34 34 41 44 34 2c 32 2c 6b 25 2c 51 67 |..&44AD4,2,k%,Qg| 00003d60 25 2c 63 25 2d 34 30 3a c8 99 26 34 34 41 43 42 |%,c%-40:..&44ACB| 00003d70 2c 6b 25 2c 59 67 25 2c 63 25 0d 75 91 05 cb 0d |,k%,Yg%,c%.u....| 00003d80 75 91 11 e7 77 25 3d 6a 25 8c f2 64 28 63 25 29 |u...w%=j%..d(c%)| 00003d90 0d 75 9a 05 cd 0d 75 a3 0f cc 3a 62 25 3d a4 6a |.u....u...:b%=.j| 00003da0 28 61 25 29 0d 75 be 05 cd 0d 75 be 07 3d 62 25 |(a%).u....u..=b%| 00003db0 0d 75 eb 19 dd f2 4a 62 28 70 25 2c 58 25 2c 59 |.u....Jb(p%,X%,Y| 00003dc0 25 29 3a e7 4a 62 25 8c e1 0d 75 f4 0c e7 28 70 |%):.Jb%...u...(p| 00003dd0 25 80 34 29 8c 0d 75 fd 10 f2 6c 28 33 29 3a c8 |%.4)..u...l(3):.| 00003de0 8e 49 62 25 ca 0d 76 0f 2e c9 31 2c 32 2c 33 2c |.Ib%..v...1,2,3,| 00003df0 34 2c 35 2c 36 2c 37 3a e7 69 6c 25 8c f2 4b 28 |4,5,6,7:.il%..K(| 00003e00 49 62 25 2c 21 51 6a 25 2b 21 50 6a 25 2a 4d 25 |Ib%,!Qj%+!Pj%*M%| 00003e10 2c a3 29 0d 76 18 16 c9 31 31 3a f2 4b 62 28 21 |,.).v...11:.Kb(!| 00003e20 51 6a 25 2c 21 50 6a 25 29 0d 76 2a 16 c9 31 30 |Qj%,!Pj%).v*..10| 00003e30 3a f2 4c 62 28 21 51 6a 25 2c 21 50 6a 25 29 0d |:.Lb(!Qj%,!Pj%).| 00003e40 76 33 15 c9 39 3a f2 4d 62 28 21 51 6a 25 2c 21 |v3..9:.Mb(!Qj%,!| 00003e50 50 6a 25 29 0d 76 3c 16 c9 31 33 3a f2 4e 62 28 |Pj%).v<..13:.Nb(| 00003e60 21 51 6a 25 2c 21 50 6a 25 29 0d 76 45 1d c9 31 |!Qj%,!Pj%).vE..1| 00003e70 34 2c 31 35 3a f2 4f 62 28 21 51 6a 25 2c 21 50 |4,15:.Ob(!Qj%,!P| 00003e80 6a 25 2c 49 62 25 29 0d 76 4e 05 cb 0d 76 4e 0e |j%,Ib%).vN...vN.| 00003e90 cc 3a e7 28 70 25 80 31 29 8c 0d 76 60 1c 41 25 |.:.(p%.1)..v`.A%| 00003ea0 3d 21 51 6a 25 2b 21 50 6a 25 2a 4d 25 3a e7 41 |=!Qj%+!Pj%*M%:.A| 00003eb0 25 3e 75 25 8c e1 0d 76 72 21 f2 4e 62 28 21 51 |%>u%...vr!.Nb(!Q| 00003ec0 6a 25 2c 21 50 6a 25 29 3a 7a 61 25 3d b9 3a 43 |j%,!Pj%):za%=.:C| 00003ed0 61 25 3d b9 3a f2 77 0d 76 9f 05 cd 0d 76 9f 05 |a%=.:.w.v....v..| 00003ee0 cd 0d 76 a8 05 e1 0d 76 b1 18 dd f2 50 62 28 64 |..v....v....Pb(d| 00003ef0 25 2c 58 25 2c 59 25 29 3a c8 8e 64 25 ca 0d 76 |%,X%,Y%):..d%..v| 00003f00 cc 18 c9 51 67 25 3a f2 52 28 6b 25 2c 64 25 2c |...Qg%:.R(k%,d%,| 00003f10 58 25 2c 59 25 29 0d 76 de 0f c9 49 67 25 3a e7 |X%,Y%).v...Ig%:.| 00003f20 ac 4a 62 25 8c 0d 76 e7 7b c8 99 26 34 34 41 45 |.Jb%..v.{..&44AE| 00003f30 33 2c 36 2c 5f 25 2c 6b 25 3a c8 99 26 34 34 41 |3,6,_%,k%:..&44A| 00003f40 45 33 2c 36 2c 48 63 25 2c 64 68 25 3a c8 99 26 |E3,6,Hc%,dh%:..&| 00003f50 34 34 41 45 35 2c 30 2c 6b 25 2c 58 25 2c 59 25 |44AE5,0,k%,X%,Y%| 00003f60 2c 2c 65 68 25 b8 2c 2c 64 25 3a c8 99 26 34 34 |,,eh%.,,d%:..&44| 00003f70 41 45 33 2c 37 2c 5f 25 2c 6b 25 3a c8 99 26 34 |AE3,7,_%,k%:..&4| 00003f80 34 41 45 33 2c 37 2c 48 63 25 2c 64 68 25 3a e7 |4AE3,7,Hc%,dh%:.| 00003f90 64 25 3e 3d 7a 67 25 80 64 25 3c 3d 41 67 25 8c |d%>=zg%.d%<=Ag%.| 00003fa0 0d 77 1d 2d f2 78 3a f2 53 28 64 25 2d 7a 67 25 |.w.-.x:.S(d%-zg%| 00003fb0 2b 31 29 3a f2 75 28 62 25 28 33 2c 64 25 2d 7a |+1):.u(b%(3,d%-z| 00003fc0 67 25 29 2c 64 25 2d 7a 67 25 2b 31 29 0d 77 41 |g%),d%-zg%+1).wA| 00003fd0 05 cd 0d 77 41 05 cd 0d 77 4a 05 cb 0d 77 53 05 |...wA...wJ...wS.| 00003fe0 e1 0d 77 5c 2d dd f2 51 62 28 70 25 2c 64 25 2c |..w\-..Qb(p%,d%,| 00003ff0 58 25 2c 59 25 29 3a ea 41 25 2c 43 25 2c 44 25 |X%,Y%):.A%,C%,D%| 00004000 3a e7 28 70 25 80 28 34 3c 3c 34 29 29 8c 0d 77 |:.(p%.(4<<4))..w| 00004010 89 09 c8 8e 64 25 ca 0d 77 92 1c c9 51 67 25 2c |....d%..w...Qg%,| 00004020 4f 67 25 3a f2 47 28 6b 25 2c 64 25 2c 58 25 2c |Og%:.G(k%,d%,X%,| 00004030 59 25 29 0d 77 ad 05 cb 0d 77 ad 05 cd 0d 77 b6 |Y%).w....w....w.| 00004040 0c e7 28 70 25 80 34 29 8c 0d 77 c8 09 c8 8e 64 |..(p%.4)..w....d| 00004050 25 ca 0d 77 d1 0e c9 4c 67 25 3a f2 4c 28 31 29 |%..w...Lg%:.L(1)| 00004060 0d 77 ec 0f c9 4a 67 25 3a f2 4c 28 2d 31 29 0d |.w...Jg%:.L(-1).| 00004070 77 fe 0b c9 4d 67 25 3a f2 78 0d 78 10 27 c9 4b |w...Mg%:.x.x.'.K| 00004080 67 25 3a c8 99 26 34 34 41 44 44 2c 33 2c 6b 25 |g%:..&44ADD,3,k%| 00004090 2c 64 25 2c 31 3a 55 62 25 3d b9 3a f2 4c 28 31 |,d%,1:Ub%=.:.L(1| 000040a0 29 0d 78 34 2a c9 55 67 25 2c 54 67 25 2c 50 67 |).x4*.Ug%,Tg%,Pg| 000040b0 25 2c 56 67 25 2c 52 67 25 2c 53 67 25 2c 57 67 |%,Vg%,Rg%,Sg%,Wg| 000040c0 25 3a f2 65 28 6b 25 2c 64 25 29 0d 78 46 2e c9 |%:.e(k%,d%).xF..| 000040d0 51 67 25 3a c8 99 26 34 34 41 44 34 2c 30 2c 6b |Qg%:..&44AD4,0,k| 000040e0 25 2c 64 25 2c 58 25 2c 59 25 b8 63 25 3a f2 64 |%,d%,X%,Y%.c%:.d| 000040f0 28 28 63 25 2b 34 30 29 29 0d 78 61 29 c9 4f 67 |((c%+40)).xa).Og| 00004100 25 3a c8 99 26 34 34 41 44 34 2c 30 2c 6b 25 2c |%:..&44AD4,0,k%,| 00004110 64 25 2c 58 25 2c 59 25 b8 63 25 3a f2 71 28 63 |d%,X%,Y%.c%:.q(c| 00004120 25 29 0d 78 7c 1b c9 58 67 25 3a c8 99 26 34 34 |%).x|..Xg%:..&44| 00004130 41 44 36 2c 6c 64 25 2c 58 25 2c 59 25 0d 78 85 |AD6,ld%,X%,Y%.x.| 00004140 18 c9 5a 67 25 3a e7 ac 50 61 25 8c f2 65 28 6b |..Zg%:..Pa%..e(k| 00004150 25 2c 64 25 29 0d 78 8e 29 c8 99 26 34 34 41 44 |%,d%).x.)..&44AD| 00004160 34 2c 31 2c 6b 25 2c 51 67 25 b8 63 25 3a 63 25 |4,1,k%,Qg%.c%:c%| 00004170 2d 3d 31 3a e7 63 25 3c 30 8c 63 25 3d 30 0d 78 |-=1:.c%<0.c%=0.x| 00004180 a9 27 c8 99 26 34 34 41 44 34 2c 32 2c 6b 25 2c |.'..&44AD4,2,k%,| 00004190 51 67 25 2c 63 25 b8 63 25 3a f2 64 28 28 63 25 |Qg%,c%.c%:.d((c%| 000041a0 2b 34 30 29 29 0d 78 c4 18 c9 5f 67 25 3a e7 ac |+40)).x..._g%:..| 000041b0 50 61 25 8c f2 65 28 6b 25 2c 64 25 29 0d 78 cd |Pa%..e(k%,d%).x.| 000041c0 2d c8 99 26 34 34 41 44 34 2c 31 2c 6b 25 2c 51 |-..&44AD4,1,k%,Q| 000041d0 67 25 b8 63 25 3a 63 25 2b 3d 31 3a e7 63 25 3e |g%.c%:c%+=1:.c%>| 000041e0 32 35 35 8c 63 25 3d 32 35 35 0d 78 e8 27 c8 99 |255.c%=255.x.'..| 000041f0 26 34 34 41 44 34 2c 32 2c 6b 25 2c 51 67 25 2c |&44AD4,2,k%,Qg%,| 00004200 63 25 b8 63 25 3a f2 64 28 28 63 25 2b 34 30 29 |c%.c%:.d((c%+40)| 00004210 29 0d 79 03 0f c9 49 67 25 3a e7 ac 4a 62 25 8c |).y...Ig%:..Jb%.| 00004220 0d 79 0c 7b c8 99 26 34 34 41 45 33 2c 36 2c 5f |.y.{..&44AE3,6,_| 00004230 25 2c 6b 25 3a c8 99 26 34 34 41 45 33 2c 36 2c |%,k%:..&44AE3,6,| 00004240 48 63 25 2c 64 68 25 3a c8 99 26 34 34 41 45 35 |Hc%,dh%:..&44AE5| 00004250 2c 30 2c 6b 25 2c 58 25 2c 59 25 2c 2c 65 68 25 |,0,k%,X%,Y%,,eh%| 00004260 b8 2c 2c 64 25 3a c8 99 26 34 34 41 45 33 2c 37 |.,,d%:..&44AE3,7| 00004270 2c 5f 25 2c 6b 25 3a c8 99 26 34 34 41 45 33 2c |,_%,k%:..&44AE3,| 00004280 37 2c 48 63 25 2c 64 68 25 3a e7 64 25 3e 3d 7a |7,Hc%,dh%:.d%>=z| 00004290 67 25 80 64 25 3c 3d 41 67 25 8c 0d 79 42 0a e7 |g%.d%<=Ag%..yB..| 000042a0 ac 4b 62 25 8c 0d 79 4b 19 f2 48 28 64 25 2d 7a |.Kb%..yK..H(d%-z| 000042b0 67 25 2b 31 2c 2d 31 2c 6b 25 2c 2d 31 29 0d 79 |g%+1,-1,k%,-1).y| 000042c0 5d 05 cd 0d 79 5d 1d f2 75 28 62 25 28 33 2c 64 |]...y]..u(b%(3,d| 000042d0 25 2d 7a 67 25 29 2c 64 25 2d 7a 67 25 2b 31 29 |%-zg%),d%-zg%+1)| 000042e0 0d 79 6f 0b cc 3a c8 8e 64 25 ca 0d 79 78 38 c9 |.yo..:..d%..yx8.| 000042f0 42 67 25 2c 42 67 25 2b 31 2c 42 67 25 2b 32 2c |Bg%,Bg%+1,Bg%+2,| 00004300 43 67 25 2c 44 67 25 3a e7 a4 73 28 64 25 29 8c |Cg%,Dg%:..s(d%).| 00004310 f2 75 28 2d 31 2c 64 25 2d 42 67 25 2b 31 29 8b |.u(-1,d%-Bg%+1).| 00004320 f2 52 62 0d 79 8a 05 cb 0d 79 93 05 cd 0d 79 9c |.Rb.y....y....y.| 00004330 05 cd 0d 79 a5 2c c9 48 67 25 3a c8 99 26 34 34 |...y.,.Hg%:..&44| 00004340 41 45 35 2c 30 2c 6b 25 2c 58 25 2c 59 25 2c 2c |AE5,0,k%,X%,Y%,,| 00004350 65 68 25 b8 2c 2c 64 25 3a c8 8e 64 25 ca 0d 79 |eh%.,,d%:..d%..y| 00004360 c0 1a c9 45 67 25 3a e7 ac 61 62 25 8c f2 53 62 |...Eg%:..ab%..Sb| 00004370 28 2d 31 29 3a f2 54 62 0d 79 d2 1f c8 99 26 34 |(-1):.Tb.y....&4| 00004380 34 41 44 44 2c 33 2b 32 5e 39 2c 6b 25 2c 64 25 |4ADD,3+2^9,k%,d%| 00004390 2c 30 2c 2c 65 68 25 0d 79 e4 19 c9 46 67 25 3a |,0,,eh%.y...Fg%:| 000043a0 e7 ac 62 62 25 8c f2 53 62 28 31 29 3a f2 54 62 |..bb%..Sb(1):.Tb| 000043b0 0d 79 ed 1f c8 99 26 34 34 41 44 44 2c 33 2b 32 |.y....&44ADD,3+2| 000043c0 5e 39 2c 6b 25 2c 64 25 2c 30 2c 2c 65 68 25 0d |^9,k%,d%,0,,eh%.| 000043d0 79 ff 0c c9 47 67 25 3a f2 55 62 0d 7a 08 05 cb |y...Gg%:.Ub.z...| 000043e0 0d 7a 08 05 cb 0d 7a 11 05 cd 0d 7a 1a 05 e1 0d |.z....z....z....| 000043f0 7a 23 74 dd f2 46 62 3a ea 63 25 3a f2 68 28 42 |z#t..Fb:.c%:.h(B| 00004400 66 25 29 3a f2 54 28 6b 25 29 3a f2 55 28 33 29 |f%):.T(k%):.U(3)| 00004410 3a f2 56 62 28 48 62 25 2c 4f 25 2c 6a 6c 25 2c |:.Vb(Hb%,O%,jl%,| 00004420 b9 29 3a f2 56 28 6b 25 2c 4f 67 25 29 3a c8 99 |.):.V(k%,Og%):..| 00004430 26 34 34 41 44 34 2c 31 2c 6b 25 2c 51 67 25 b8 |&44AD4,1,k%,Qg%.| 00004440 63 25 3a f2 73 28 50 67 25 2c 6b 25 2c 30 29 3a |c%:.s(Pg%,k%,0):| 00004450 f2 64 28 63 25 2b 34 30 29 3a f2 52 62 3a f2 57 |.d(c%+40):.Rb:.W| 00004460 62 3a e1 0d 7a aa 2b dd f2 57 62 3a f2 58 62 3a |b:..z.+..Wb:.Xb:| 00004470 21 67 25 3d 64 68 25 3a c8 99 26 34 30 30 43 42 |!g%=dh%:..&400CB| 00004480 2c 2c 67 25 3a f2 59 62 28 67 25 29 3a e1 0d 7a |,,g%:.Yb(g%):..z| 00004490 e9 13 dd f2 5a 62 3a f2 78 3a f2 41 3a f2 72 3a |....Zb:.x:.A:.r:| 000044a0 e1 0d 7b 1f 16 dd f2 75 28 78 25 2c 71 25 29 3a |..{....u(x%,q%):| 000044b0 e7 78 25 3e 3d 30 8c 0d 7b 3a 11 64 24 3d 22 73 |.x%>=0..{:.d$="s| 000044c0 22 2b 61 24 28 78 25 29 0d 7b 4c 11 cc 3a e7 71 |"+a$(x%).{L..:.q| 000044d0 25 3e 33 8c 71 25 2b 3d 31 0d 7b 55 17 64 24 3d |%>3.q%+=1.{U.d$=| 000044e0 22 73 74 22 2b c3 28 71 25 29 3a 71 25 2b 3d 38 |"st"+.(q%):q%+=8| 000044f0 0d 7b 70 05 cd 0d 7b 70 1c f2 5f 62 28 64 24 29 |.{p...{p.._b(d$)| 00004500 3a 21 4e 6a 25 3d 71 25 3a 49 62 25 3d 71 25 3a |:!Nj%=q%:Ib%=q%:| 00004510 e1 0d 7b 9d 10 dd f2 52 62 3a e7 49 62 25 3e 37 |..{....Rb:.Ib%>7| 00004520 8c 0d 7b b8 0c e7 49 62 25 3e 31 32 8c 0d 7b c1 |..{...Ib%>12..{.| 00004530 32 f2 75 28 2d 31 2c 49 62 25 2d 39 29 3a c8 99 |2.u(-1,Ib%-9):..| 00004540 26 34 34 41 44 44 2c 37 2b 35 31 32 2c 6b 25 2c |&44ADD,7+512,k%,| 00004550 7a 67 25 2b 49 62 25 2d 33 2c 2c 2c 65 68 25 0d |zg%+Ib%-3,,,eh%.| 00004560 7b dc 34 cc 3a f2 75 28 2d 31 2c 49 62 25 2d 38 |{.4.:.u(-1,Ib%-8| 00004570 29 3a c8 99 26 34 34 41 44 44 2c 37 2b 35 31 32 |):..&44ADD,7+512| 00004580 2c 6b 25 2c 7a 67 25 2b 49 62 25 2d 32 2c 2c 2c |,k%,zg%+Ib%-2,,,| 00004590 65 68 25 0d 7b f7 05 cd 0d 7b f7 3b cc 3a c8 99 |eh%.{....{.;.:..| 000045a0 26 34 34 41 44 44 2c 37 2b 35 31 32 2c 6b 25 2c |&44ADD,7+512,k%,| 000045b0 7a 67 25 2b 49 62 25 2d 31 2c 2c 2c 65 68 25 3a |zg%+Ib%-1,,,eh%:| 000045c0 f2 75 28 62 25 28 33 2c 49 62 25 2d 31 29 2c 49 |.u(b%(3,Ib%-1),I| 000045d0 62 25 29 0d 7c 1b 05 cd 0d 7c 1b 05 e1 0d 7c 24 |b%).|....|....|$| 000045e0 29 dd f2 60 62 28 48 25 2c 4a 25 2c 73 25 29 3a |)..`b(H%,J%,s%):| 000045f0 21 4c 69 25 3d 48 25 3a 21 4d 69 25 3d 4a 25 3a |!Li%=H%:!Mi%=J%:| 00004600 d6 42 6a 25 3a e1 0d 7c 6c 7c dd f2 61 63 28 48 |.Bj%:..|l|..ac(H| 00004610 25 2c 4a 25 2c 73 25 29 3a ea 65 25 3a e3 65 25 |%,J%,s%):.e%:.e%| 00004620 3d 30 b8 47 67 25 3a c8 99 26 34 34 41 45 30 2c |=0.Gg%:..&44AE0,| 00004630 2c 65 68 25 2b 34 2b 33 32 2a 65 25 2c 73 25 3a |,eh%+4+32*e%,s%:| 00004640 ed 3a f2 57 28 48 25 2c 4a 25 29 3a f2 58 28 48 |.:.W(H%,J%):.X(H| 00004650 25 2c 4a 25 29 3a c8 99 26 34 30 30 45 36 2c 37 |%,J%):..&400E6,7| 00004660 3a c8 93 48 25 2b 60 67 25 2c 4a 25 2b 63 68 25 |:..H%+`g%,J%+ch%| 00004670 2c 62 68 25 2d 60 67 25 2c 61 68 25 2d 63 68 25 |,bh%-`g%,ah%-ch%| 00004680 3a e1 0d 7c cf 5f dd f2 78 3a f2 6d 3a 4b 62 25 |:..|._..x:.m:Kb%| 00004690 3d a3 3a f2 67 3a c8 99 26 34 34 41 44 44 2c 37 |=.:.g:..&44ADD,7| 000046a0 2c 6b 25 2c 4d 67 25 2c 31 3a c8 99 26 34 34 41 |,k%,Mg%,1:..&44A| 000046b0 44 44 2c 33 2c 6b 25 2c 4b 67 25 2c 30 3a 41 25 |DD,3,k%,Kg%,0:A%| 000046c0 3d 2d 31 3a 42 25 3d 2d 31 3a d6 46 6a 25 3a 55 |=-1:B%=-1:.Fj%:U| 000046d0 62 25 3d a3 3a f2 62 63 3a f2 63 63 28 a3 29 3a |b%=.:.bc:.cc(.):| 000046e0 e1 0d 7d 44 16 dd f2 4c 28 6f 6b 25 29 3a ea 65 |..}D...L(ok%):.e| 000046f0 25 3a e7 55 62 25 8c 0d 7d 68 1e c8 99 26 34 34 |%:.Ub%..}h...&44| 00004700 41 44 44 2c 37 2c 6b 25 2c 4b 67 25 2c 31 3a 21 |ADD,7,k%,Kg%,1:!| 00004710 54 6a 25 3d 30 0d 7d 83 0c cc 3a 21 54 6a 25 3d |Tj%=0.}...:!Tj%=| 00004720 31 0d 7d 95 05 cd 0d 7d 95 1c f2 63 63 28 ac 55 |1.}....}...cc(.U| 00004730 62 25 29 3a 6b 6c 25 3d 2d 31 3a e7 6f 6b 25 3d |b%):kl%=-1:.ok%=| 00004740 31 8c 0d 7d b0 36 c8 99 26 34 34 41 44 44 2c 37 |1..}.6..&44ADD,7| 00004750 2c 6b 25 2c 4c 67 25 2c 31 3a 41 25 3d 30 3a 42 |,k%,Lg%,1:A%=0:B| 00004760 25 3d 30 3a d6 46 6a 25 3a 21 52 6a 25 3d 2d 31 |%=0:.Fj%:!Rj%=-1| 00004770 3a 21 53 6a 25 3d 75 25 0d 7d dd 48 cc 3a c8 99 |:!Sj%=u%.}.H.:..| 00004780 26 34 34 41 44 44 2c 37 2c 6b 25 2c 4a 67 25 2c |&44ADD,7,k%,Jg%,| 00004790 31 3a 41 25 3d 28 75 25 2d 31 29 81 4d 25 3a 42 |1:A%=(u%-1).M%:B| 000047a0 25 3d 28 75 25 2d 31 29 83 4d 25 3a d6 46 6a 25 |%=(u%-1).M%:.Fj%| 000047b0 3a 21 52 6a 25 3d 75 25 3a 21 53 6a 25 3d 75 25 |:!Rj%=u%:!Sj%=u%| 000047c0 0d 7e 1c 05 cd 0d 7e 1c 5e 4b 62 25 3d b9 3a 6c |.~....~.^Kb%=.:l| 000047d0 6c 25 3d 6f 6b 25 3a f2 67 3a 21 74 6a 25 3d 59 |l%=ok%:.g:!tj%=Y| 000047e0 62 25 3a c8 99 26 34 30 31 43 30 3a f2 6d 3a 6d |b%:..&401C0:.m:m| 000047f0 6c 25 3d 6c 62 25 3a 6e 6c 25 3d 2d 6d 62 25 3a |l%=lb%:nl%=-mb%:| 00004800 e3 65 25 3d 30 b8 6d 62 25 3a 41 25 3d 65 25 2a |.e%=0.mb%:A%=e%*| 00004810 51 25 3a e7 6c 6c 25 3d 31 8c d6 55 6a 25 8b d6 |Q%:.ll%=1..Uj%..| 00004820 56 6a 25 0d 7e 88 17 ed 3a f2 64 63 3a f2 74 3a |Vj%.~...:.dc:.t:| 00004830 6f 6c 25 3d 2d 31 30 30 3a e1 0d 7e b5 4f dd f2 |ol%=-100:..~.O..| 00004840 53 62 28 41 25 29 3a 21 67 25 3d 64 68 25 3a c8 |Sb(A%):!g%=dh%:.| 00004850 99 26 34 30 30 43 42 2c 2c 67 25 3a 67 25 21 32 |.&400CB,,g%:g%!2| 00004860 34 2b 3d 41 25 2a 28 4f 62 25 2b 52 62 25 29 2a |4+=A%*(Ob%+Rb%)*| 00004870 2d 31 3a f2 59 62 28 67 25 29 3a c8 99 26 34 30 |-1:.Yb(g%):..&40| 00004880 30 43 35 2c 2c 67 25 3a e1 0d 7e fd 12 dd f2 65 |0C5,,g%:..~....e| 00004890 63 28 64 25 29 3a c8 8e 64 25 ca 0d 7f 18 14 c9 |c(d%):..d%......| 000048a0 50 67 25 3a f2 73 28 64 25 2c 6b 25 2c 31 29 0d |Pg%:.s(d%,k%,1).| 000048b0 7f 2a 11 c9 55 67 25 3a f2 76 28 6b 25 2c 33 29 |.*..Ug%:.v(k%,3)| 000048c0 0d 7f 33 11 c9 54 67 25 3a f2 76 28 6b 25 2c 32 |..3..Tg%:.v(k%,2| 000048d0 29 0d 7f 3c 14 c9 53 67 25 3a e7 a4 73 28 64 25 |)..<..Sg%:..s(d%| 000048e0 29 8c f2 66 63 0d 7f 3c 18 c9 52 67 25 3a e7 a4 |)..fc..<..Rg%:..| 000048f0 73 28 64 25 29 8c f2 6e 28 30 2c 33 29 0d 7f 45 |s(d%)..n(0,3)..E| 00004900 18 c9 57 67 25 3a e7 a4 73 28 64 25 29 8c f2 6e |..Wg%:..s(d%)..n| 00004910 28 31 2c 33 29 0d 7f 4e 13 c9 56 67 25 3a f2 68 |(1,3)..N..Vg%:.h| 00004920 28 6b 25 29 3a f2 5a 62 0d 7f 72 0b c9 2d 31 3a |(k%):.Zb..r..-1:| 00004930 f2 69 62 0d 7f 7b 24 c9 2d 32 3a c8 99 26 34 34 |.ib..{$.-2:..&44| 00004940 41 44 44 2c 33 2b 32 5e 39 2c 6b 25 2c 47 67 25 |ADD,3+2^9,k%,Gg%| 00004950 2c 30 2c 2c 65 68 25 0d 7f 84 05 cb 0d 7f 84 05 |,0,,eh%.........| 00004960 e1 0d 7f 8d 0f dd f2 67 63 3a d6 5f 69 25 3a e1 |.......gc:._i%:.| 00004970 0d 7f b1 62 dd f2 58 62 3a f2 5f 62 28 64 24 29 |...b..Xb:._b(d$)| 00004980 3a c8 99 26 34 34 41 45 32 2c 32 36 32 2b 32 5e |:..&44AE2,262+2^| 00004990 31 31 2c 55 25 2c 22 73 3f 22 2c 2c 2c 2c 73 69 |11,U%,"s?",,,,si| 000049a0 25 2c 74 69 25 3a c8 99 26 34 34 41 45 32 2c 32 |%,ti%:..&44AE2,2| 000049b0 36 32 2b 32 5e 31 31 2c 55 25 2c 22 50 6f 69 6e |62+2^11,U%,"Poin| 000049c0 74 65 72 31 22 2c 2c 2c 2c 47 6a 25 2c 48 6a 25 |ter1",,,,Gj%,Hj%| 000049d0 3a e1 0d 7f f0 1c dd a4 6d 3a ea 5a 25 2c 41 25 |:.......m:.Z%,A%| 000049e0 3a 5a 25 3d c6 8f 3a e7 6c 6c 25 3d 31 8c 0d 80 |:Z%=..:.ll%=1...| 000049f0 2f 0c e7 5a 25 3c 6d 6c 25 8c 0d 80 38 2a e3 65 |/..Z%<ml%...8*.e| 00004a00 25 3d 31 b8 6d 62 25 3a 41 25 3d 6c 62 25 2b 65 |%=1.mb%:A%=lb%+e| 00004a10 25 2a 51 25 3a d6 55 6a 25 3a ed 3a 6e 6c 25 2b |%*Q%:.Uj%:.:nl%+| 00004a20 3d 6d 62 25 0d 80 6e 05 cd 0d 80 6e 1b 41 25 3d |=mb%..n....n.A%=| 00004a30 28 5a 25 81 51 25 29 2b 6e 6c 25 3a e7 41 25 3e |(Z%.Q%)+nl%:.A%>| 00004a40 3d 75 25 8c 0d 80 80 10 e7 55 62 25 8c 6e 6c 25 |=u%......Ub%.nl%| 00004a50 2d 3d 75 25 0d 80 89 05 cd 0d 80 92 0e cc 3a e7 |-=u%..........:.| 00004a60 5a 25 3c 6d 6c 25 8c 0d 80 a4 2a e3 65 25 3d 31 |Z%<ml%....*.e%=1| 00004a70 b8 6d 62 25 3a 41 25 3d 6c 62 25 2b 65 25 2a 51 |.mb%:A%=lb%+e%*Q| 00004a80 25 3a d6 56 6a 25 3a ed 3a 6e 6c 25 2b 3d 6d 62 |%:.Vj%:.:nl%+=mb| 00004a90 25 0d 80 da 05 cd 0d 80 da 19 41 25 3d 28 5a 25 |%.........A%=(Z%| 00004aa0 81 51 25 29 2b 6e 6c 25 3a e7 41 25 3c 30 8c 0d |.Q%)+nl%:.A%<0..| 00004ab0 80 ec 10 e7 55 62 25 8c 6e 6c 25 2b 3d 75 25 0d |....Ub%.nl%+=u%.| 00004ac0 80 f5 05 cd 0d 80 fe 05 cd 0d 81 07 0e 6d 6c 25 |.............ml%| 00004ad0 3d 5a 25 3a 3d 5a 25 0d 81 2b 25 dd f2 68 63 3a |=Z%:=Z%..+%..hc:| 00004ae0 ea 5a 25 2c 41 25 2c 79 6b 25 2c 7a 6b 25 3a 5a |.Z%,A%,yk%,zk%:Z| 00004af0 25 3d a4 6d 3a e7 6c 6c 25 3d 31 8c 0d 81 46 1c |%=.m:.ll%=1...F.| 00004b00 41 25 3d 28 5a 25 81 51 25 29 2b 6e 6c 25 3a e7 |A%=(Z%.Q%)+nl%:.| 00004b10 41 25 3c 3e 6b 6c 25 8c 0d 81 58 13 6b 6c 25 3d |A%<>kl%...X.kl%=| 00004b20 41 25 3a e7 41 25 3e 3d 75 25 8c 0d 81 6a 09 e7 |A%:.A%>=u%...j..| 00004b30 55 62 25 8c 0d 81 73 12 41 25 2d 3d 75 25 3a 6e |Ub%...s.A%-=u%:n| 00004b40 6c 25 2d 3d 75 25 0d 81 8e 10 cc 3a f2 78 3a 41 |l%-=u%.....:.x:A| 00004b50 25 3d 2d 31 30 30 0d 81 a0 05 cd 0d 81 a0 05 cd |%=-100..........| 00004b60 0d 81 a9 37 42 25 3d 41 25 83 4d 25 3a 41 25 3d |...7B%=A%.M%:A%=| 00004b70 41 25 81 4d 25 3a d6 46 6a 25 3a e7 41 25 3c 3e |A%.M%:.Fj%:.A%<>| 00004b80 6f 6c 25 80 ac 55 62 25 8c f2 69 63 28 41 25 29 |ol%..Ub%..ic(A%)| 00004b90 3a 6f 6c 25 3d 41 25 0d 81 cd 05 cd 0d 81 d6 23 |:ol%=A%........#| 00004ba0 cc 3a 41 25 3d 75 25 2d 28 5a 25 81 51 25 29 2d |.:A%=u%-(Z%.Q%)-| 00004bb0 6e 6c 25 2d 31 3a e7 41 25 3c 3e 6b 6c 25 8c 0d |nl%-1:.A%<>kl%..| 00004bc0 81 fa 11 6b 6c 25 3d 41 25 3a e7 41 25 3c 30 8c |...kl%=A%:.A%<0.| 00004bd0 0d 82 0c 09 e7 55 62 25 8c 0d 82 15 12 41 25 2b |.....Ub%.....A%+| 00004be0 3d 75 25 3a 6e 6c 25 2d 3d 75 25 0d 82 30 10 cc |=u%:nl%-=u%..0..| 00004bf0 3a f2 78 3a 41 25 3d 2d 31 30 30 0d 82 42 05 cd |:.x:A%=-100..B..| 00004c00 0d 82 42 05 cd 0d 82 4b 37 42 25 3d 41 25 83 4d |..B....K7B%=A%.M| 00004c10 25 3a 41 25 3d 41 25 81 4d 25 3a d6 46 6a 25 3a |%:A%=A%.M%:.Fj%:| 00004c20 e7 41 25 3c 3e 6f 6c 25 80 ac 55 62 25 8c f2 69 |.A%<>ol%..Ub%..i| 00004c30 63 28 41 25 29 3a 6f 6c 25 3d 41 25 0d 82 6f 05 |c(A%):ol%=A%..o.| 00004c40 cd 0d 82 78 05 cd 0d 82 81 05 e1 0d 82 8a 0e dd |...x............| 00004c50 f2 64 63 3a e7 4b 62 25 8c 0d 82 a5 21 c8 99 26 |.dc:.Kb%....!..&| 00004c60 34 30 30 44 33 2c 2c 67 25 3a 46 62 25 3d b9 3a |400D3,,g%:Fb%=.:| 00004c70 e7 67 25 21 30 3c 3e 6b 25 8c 0d 82 c0 3c 70 6c |.g%!0<>k%....<pl| 00004c80 25 3d 67 25 21 30 3a 71 6c 25 3d 67 25 21 34 3a |%=g%!0:ql%=g%!4:| 00004c90 72 6c 25 3d 67 25 21 38 3a 73 6c 25 3d 67 25 21 |rl%=g%!8:sl%=g%!| 00004ca0 31 32 3a 74 6c 25 3d 67 25 21 31 36 3a 75 6c 25 |12:tl%=g%!16:ul%| 00004cb0 3d 67 25 21 32 30 0d 82 ff 05 cd 0d 82 ff 1f c8 |=g%!20..........| 00004cc0 99 26 34 30 30 44 32 2c 6b 25 2c 2d 31 2c 2d 32 |.&400D2,k%,-1,-2| 00004cd0 30 30 2c 32 30 30 2c 30 2c 30 0d 83 11 05 cd 0d |00,200,0,0......| 00004ce0 83 11 05 e1 0d 83 1a 10 dd f2 6a 63 3a 46 62 25 |..........jc:Fb%| 00004cf0 3d a3 3a e1 0d 83 3e 15 dd f2 62 63 3a e7 46 62 |=.:...>...bc:.Fb| 00004d00 25 80 28 ac 4b 62 25 29 8c 0d 83 59 2a 46 62 25 |%.(.Kb%)...Y*Fb%| 00004d10 3d a3 3a c8 99 26 34 30 30 44 32 2c 70 6c 25 2c |=.:..&400D2,pl%,| 00004d20 71 6c 25 2c 72 6c 25 2c 73 6c 25 2c 74 6c 25 2c |ql%,rl%,sl%,tl%,| 00004d30 75 6c 25 0d 83 74 05 cd 0d 83 74 05 e1 0d 83 7d |ul%..t....t....}| 00004d40 40 dd f2 6b 63 28 64 25 2c 76 6c 25 29 3a 41 25 |@..kc(d%,vl%):A%| 00004d50 3d a7 22 31 32 33 34 35 36 37 20 22 2c bd 28 76 |=."1234567 ",.(v| 00004d60 6c 25 29 29 3a e7 41 25 3d 30 84 ac 4b 62 25 84 |l%)):.A%=0..Kb%.| 00004d70 49 62 25 3e 37 84 28 ac 77 6c 25 29 8c 0d 83 a1 |Ib%>7.(.wl%)....| 00004d80 12 c8 99 26 34 30 30 44 43 2c 73 25 21 32 34 0d |...&400DC,s%!24.| 00004d90 83 b3 12 cc 3a e7 41 25 3d 38 8c 41 25 3d 49 62 |....:.A%=8.A%=Ib| 00004da0 25 0d 83 bc 11 43 25 3d a4 6d 3a e7 6c 6c 25 3d |%....C%=.m:.ll%=| 00004db0 31 8c 0d 83 d7 18 f2 4b 28 41 25 2c 28 43 25 81 |1......K(A%,(C%.| 00004dc0 51 25 29 2b 6e 6c 25 2c b9 29 0d 83 e9 1f cc 3a |Q%)+nl%,.).....:| 00004dd0 f2 4b 28 41 25 2c 75 25 2d 28 43 25 81 51 25 29 |.K(A%,u%-(C%.Q%)| 00004de0 2d 6e 6c 25 2d 31 2c b9 29 0d 83 fb 05 cd 0d 83 |-nl%-1,.).......| 00004df0 fb 05 cd 0d 84 04 05 e1 0d 84 0d 1e dd f2 4b 28 |..............K(| 00004e00 41 25 2c 42 25 2c 78 6c 25 29 3a e7 ac 59 63 25 |A%,B%,xl%):..Yc%| 00004e10 8c f2 6c 28 33 29 0d 84 28 0c e7 42 25 3e 3d 75 |..l(3)..(..B%>=u| 00004e20 25 8c 0d 84 31 09 e7 55 62 25 8c 0d 84 3a 0a 42 |%...1..Ub%...:.B| 00004e30 25 2d 3d 75 25 0d 84 4c 07 cc 3a e1 0d 84 55 05 |%-=u%..L..:...U.| 00004e40 cd 0d 84 5e 05 cd 0d 84 67 0e e7 ba 28 4a 6a 25 |...^....g...(Jj%| 00004e50 29 3d 30 8c 0d 84 70 36 f2 62 28 22 4e 6f 74 20 |)=0...p6.b("Not | 00004e60 61 6c 6c 6f 77 65 64 20 74 68 61 74 20 6d 61 6e |allowed that man| 00004e70 79 20 69 6e 73 74 72 75 6d 65 6e 74 73 20 61 74 |y instruments at| 00004e80 20 6f 6e 63 65 2e 22 2c a3 29 0d 84 82 16 cc 3a | once.",.).....:| 00004e90 f2 6c 63 28 42 25 2c 41 25 2c b9 2c 78 6c 25 29 |.lc(B%,A%,.,xl%)| 00004ea0 0d 84 94 05 cd 0d 84 94 05 e1 0d 84 9d 32 dd f2 |.............2..| 00004eb0 6c 63 28 42 25 2c 41 25 2c 79 6c 25 2c 78 6c 25 |lc(B%,A%,yl%,xl%| 00004ec0 29 3a ea 43 25 2c 44 25 2c 45 25 3a e7 79 6c 25 |):.C%,D%,E%:.yl%| 00004ed0 8c 45 25 3d 59 62 25 8b 45 25 3d 30 0d 84 c1 09 |.E%=Yb%.E%=0....| 00004ee0 e7 4b 62 25 8c 0d 84 ca 0b e7 6c 6c 25 3d 31 8c |.Kb%......ll%=1.| 00004ef0 0d 84 d3 2b 43 25 3d a4 6d 81 51 25 3a 44 25 3d |...+C%=.m.Q%:D%=| 00004f00 42 25 3a e7 44 25 3c 6e 6c 25 2b 43 25 80 28 ac |B%:.D%<nl%+C%.(.| 00004f10 78 6c 25 29 8c 44 25 2b 3d 75 25 0d 84 ee 66 c8 |xl%).D%+=u%...f.| 00004f20 95 28 6e 6c 25 2b 43 25 3c 3d 44 25 80 44 25 3c |.(nl%+C%<=D%.D%<| 00004f30 3d 6e 6c 25 2b 6d 62 25 2a 32 29 84 78 6c 25 3a |=nl%+mb%*2).xl%:| 00004f40 c8 99 26 34 30 31 43 31 2c 28 44 25 2d 6e 6c 25 |..&401C1,(D%-nl%| 00004f50 29 2a 51 25 2c 30 2c 28 45 25 3c 3c 31 36 84 41 |)*Q%,0,(E%<<16.A| 00004f60 25 29 2c 28 21 58 6a 25 84 21 57 6a 25 3c 3c 31 |%),(!Xj%.!Wj%<<1| 00004f70 36 29 3a 44 25 2b 3d 75 25 3a 78 6c 25 3d a3 3a |6):D%+=u%:xl%=.:| 00004f80 ce 0d 85 24 32 cc 3a 43 25 3d a4 6d 81 51 25 3a |...$2.:C%=.m.Q%:| 00004f90 44 25 3d 75 25 2d 42 25 2d 31 3a e7 44 25 3c 6e |D%=u%-B%-1:.D%<n| 00004fa0 6c 25 2b 43 25 80 28 ac 78 6c 25 29 8c 44 25 2b |l%+C%.(.xl%).D%+| 00004fb0 3d 75 25 0d 85 3f 66 c8 95 28 6e 6c 25 2b 43 25 |=u%..?f..(nl%+C%| 00004fc0 3c 3d 44 25 80 44 25 3c 3d 6e 6c 25 2b 6d 62 25 |<=D%.D%<=nl%+mb%| 00004fd0 2a 32 29 84 78 6c 25 3a c8 99 26 34 30 31 43 31 |*2).xl%:..&401C1| 00004fe0 2c 28 44 25 2d 6e 6c 25 29 2a 51 25 2c 30 2c 28 |,(D%-nl%)*Q%,0,(| 00004ff0 45 25 3c 3c 31 36 84 41 25 29 2c 28 21 58 6a 25 |E%<<16.A%),(!Xj%| 00005000 84 21 57 6a 25 3c 3c 31 36 29 3a 44 25 2b 3d 75 |.!Wj%<<16):D%+=u| 00005010 25 3a 78 6c 25 3d a3 3a ce 0d 85 75 05 cd 0d 85 |%:xl%=.:...u....| 00005020 75 2a cc 3a c8 99 26 34 30 31 38 36 2c 28 45 25 |u*.:..&40186,(E%| 00005030 3c 3c 31 36 84 41 25 29 2c 28 21 58 6a 25 84 21 |<<16.A%),(!Xj%.!| 00005040 57 6a 25 3c 3c 31 36 29 0d 85 90 05 cd 0d 85 90 |Wj%<<16)........| 00005050 2d e7 78 6c 25 8c c8 99 26 34 30 31 38 36 2c 28 |-.xl%...&40186,(| 00005060 45 25 3c 3c 31 36 84 41 25 29 2c 28 21 58 6a 25 |E%<<16.A%),(!Xj%| 00005070 84 21 57 6a 25 3c 3c 31 36 29 0d 85 99 05 e1 0d |.!Wj%<<16)......| 00005080 85 a2 1d dd f2 6d 63 28 6e 25 2c 45 6b 25 29 3a |.....mc(n%,Ek%):| 00005090 ea 41 25 2c 42 25 3a e7 45 6b 25 8c 0d 85 c6 09 |.A%,B%:.Ek%.....| 000050a0 c8 8e 6e 25 ca 0d 85 cf 4f c9 30 3a c8 99 26 34 |..n%....O.0:..&4| 000050b0 34 41 44 41 2c 56 25 2c 53 62 25 2a 4d 25 2a 38 |4ADA,V%,Sb%*M%*8| 000050c0 3a 42 25 3d 4f 25 2a 48 62 25 3a 41 25 3d 4f 25 |:B%=O%*Hb%:A%=O%| 000050d0 3a d6 78 6a 25 3a c8 99 26 34 34 41 45 42 2c 33 |:.xj%:..&44AEB,3| 000050e0 2c 64 68 25 3a f2 69 63 28 30 29 3a f2 78 3a f2 |,dh%:.ic(0):.x:.| 000050f0 6c 28 33 29 0d 86 32 78 c9 44 64 25 3a c8 99 26 |l(3)..2x.Dd%:..&| 00005100 34 34 41 43 43 2c 44 64 25 2c 7a 64 25 b8 2c 2c |44ACC,Dd%,zd%.,,| 00005110 45 6b 25 3a e3 65 25 3d 31 b8 45 6b 25 3a c8 99 |Ek%:.e%=1.Ek%:..| 00005120 26 34 34 41 43 37 2c 43 6b 25 2a 38 2c 56 25 2c |&44AC7,Ck%*8,V%,| 00005130 56 25 2b 43 6b 25 2a 65 25 2a 38 3a ed 3a f2 56 |V%+Ck%*e%*8:.:.V| 00005140 62 28 48 62 25 2a 28 45 6b 25 2b 31 29 2c 4f 25 |b(Hb%*(Ek%+1),O%| 00005150 2c 6a 6c 25 2c a3 29 3a c8 99 26 34 34 41 45 42 |,jl%,.):..&44AEB| 00005160 2c 33 2c 64 68 25 3a f2 6c 28 33 29 0d 86 7a 0d |,3,dh%:.l(3)..z.| 00005170 c9 31 3a f2 6b 62 28 33 29 0d 86 83 05 cb 0d 86 |.1:.kb(3).......| 00005180 83 05 cd 0d 86 8c 05 e1 0d 86 95 28 dd f2 69 63 |...........(..ic| 00005190 28 41 25 29 3a 21 67 25 3d 64 68 25 3a c8 99 26 |(A%):!g%=dh%:..&| 000051a0 34 30 30 43 42 2c 2c 67 25 3a e7 41 25 3d 30 8c |400CB,,g%:.A%=0.| 000051b0 0d 86 c2 0d 67 25 21 32 34 3d 51 62 25 0d 86 d4 |....g%!24=Qb%...| 000051c0 36 cc 3a e7 67 25 21 32 34 3c 28 41 25 29 2a 28 |6.:.g%!24<(A%)*(| 000051d0 4f 62 25 2b 52 62 25 29 2a 2d 31 8c 67 25 21 32 |Ob%+Rb%)*-1.g%!2| 000051e0 34 3d 28 41 25 29 2a 28 4f 62 25 2b 52 62 25 29 |4=(A%)*(Ob%+Rb%)| 000051f0 2a 2d 31 0d 86 dd 52 e7 67 25 21 32 34 2d 28 67 |*-1...R.g%!24-(g| 00005200 25 21 31 36 2d 67 25 21 38 29 3e 28 41 25 2b 31 |%!16-g%!8)>(A%+1| 00005210 29 2a 28 4f 62 25 2b 52 62 25 29 2a 2d 31 8c 67 |)*(Ob%+Rb%)*-1.g| 00005220 25 21 32 34 3d 28 41 25 2b 31 29 2a 28 4f 62 25 |%!24=(A%+1)*(Ob%| 00005230 2b 52 62 25 29 2a 2d 31 2b 28 67 25 21 31 36 2d |+Rb%)*-1+(g%!16-| 00005240 67 25 21 38 29 0d 86 e6 05 cd 0d 86 ef 1a f2 59 |g%!8)..........Y| 00005250 62 28 67 25 29 3a c8 99 26 34 30 30 43 35 2c 2c |b(g%):..&400C5,,| 00005260 67 25 3a e1 0d 87 0a 19 dd f2 59 62 28 73 25 29 |g%:.......Yb(s%)| 00005270 3a e7 67 25 21 32 34 3e 3d 51 62 25 8c 0d 87 25 |:.g%!24>=Qb%...%| 00005280 2c e7 ac 61 62 25 8c c8 99 26 34 34 41 44 44 2c |,..ab%...&44ADD,| 00005290 34 2b 32 5e 39 2c 6b 25 2c 45 67 25 2c b9 2c 2c |4+2^9,k%,Eg%,.,,| 000052a0 65 68 25 3a 61 62 25 3d b9 0d 87 2e 2d cc 3a e7 |eh%:ab%=....-.:.| 000052b0 61 62 25 8c c8 99 26 34 34 41 44 44 2c 34 2b 32 |ab%...&44ADD,4+2| 000052c0 5e 39 2c 6b 25 2c 45 67 25 2c a3 2c 2c 65 68 25 |^9,k%,Eg%,.,,eh%| 000052d0 3a 61 62 25 3d a3 0d 87 40 05 cd 0d 87 49 2a e7 |:ab%=...@....I*.| 000052e0 67 25 21 32 34 3c 3d 67 25 21 31 36 2d 67 25 21 |g%!24<=g%!16-g%!| 000052f0 38 2b 28 6a 6c 25 29 2a 28 4f 62 25 2b 52 62 25 |8+(jl%)*(Ob%+Rb%| 00005300 29 2a 2d 31 8c 0d 87 52 2c e7 ac 62 62 25 8c c8 |)*-1...R,..bb%..| 00005310 99 26 34 34 41 44 44 2c 34 2b 32 5e 39 2c 6b 25 |.&44ADD,4+2^9,k%| 00005320 2c 46 67 25 2c b9 2c 2c 65 68 25 3a 62 62 25 3d |,Fg%,.,,eh%:bb%=| 00005330 b9 0d 87 5b 2d cc 3a e7 62 62 25 8c c8 99 26 34 |...[-.:.bb%...&4| 00005340 34 41 44 44 2c 34 2b 32 5e 39 2c 6b 25 2c 46 67 |4ADD,4+2^9,k%,Fg| 00005350 25 2c a3 2c 2c 65 68 25 3a 62 62 25 3d a3 0d 87 |%,.,,eh%:bb%=...| 00005360 6d 05 cd 0d 87 76 05 e1 0d 87 7f 18 dd f2 5f 62 |m....v........_b| 00005370 28 64 24 29 3a 7a 24 3d 64 24 3a c8 8e 64 24 ca |(d$):z$=d$:..d$.| 00005380 0d 87 a3 37 c9 22 73 74 32 22 3a 41 25 3d 34 3a |...7."st2":A%=4:| 00005390 42 25 3d 30 3a 43 25 3d 28 4f 25 2d 31 29 2a 32 |B%=0:C%=(O%-1)*2| 000053a0 30 2b 32 3a 44 25 3d 30 3a 7a 24 3d 22 73 74 32 |0+2:D%=0:z$="st2| 000053b0 22 2b c3 28 4f 25 29 0d 87 b5 1e c9 22 73 74 35 |"+.(O%)....."st5| 000053c0 22 3a 41 25 3d 30 3a 42 25 3d 38 3a 43 25 3d 30 |":A%=0:B%=8:C%=0| 000053d0 3a 44 25 3d 38 0d 87 be 1e c9 22 73 74 36 22 3a |:D%=8....."st6":| 000053e0 41 25 3d 34 3a 42 25 3d 30 3a 43 25 3d 34 3a 44 |A%=4:B%=0:C%=4:D| 000053f0 25 3d 30 0d 87 c7 20 c9 22 73 74 37 22 3a 41 25 |%=0... ."st7":A%| 00005400 3d 34 3a 42 25 3d 34 34 3a 43 25 3d 34 3a 44 25 |=4:B%=44:C%=4:D%| 00005410 3d 34 34 0d 87 d0 19 7f 3a 41 25 3d 30 3a 42 25 |=44.....:A%=0:B%| 00005420 3d 30 3a 43 25 3d 30 3a 44 25 3d 30 0d 87 d9 05 |=0:C%=0:D%=0....| 00005430 cb 0d 87 d9 5f c8 99 26 34 34 41 45 33 2c 31 2b |...._..&44AE3,1+| 00005440 32 5e 31 31 2c 55 25 2c 64 24 2c 77 62 25 2b 41 |2^11,U%,d$,wb%+A| 00005450 25 2c 77 62 25 2b 42 25 2c 5f 25 b8 2c 2c 5f 25 |%,wb%+B%,_%.,,_%| 00005460 3a c8 99 26 34 34 41 45 33 2c 31 2b 32 5e 31 31 |:..&44AE3,1+2^11| 00005470 2c 55 25 2c 7a 24 2c 77 62 25 2b 43 25 2c 77 62 |,U%,z$,wb%+C%,wb| 00005480 25 2b 44 25 2c 48 63 25 b8 2c 2c 48 63 25 3a e1 |%+D%,Hc%.,,Hc%:.| 00005490 0d 87 f4 57 dd f2 4b 62 28 7a 6c 25 2c 41 6c 25 |...W..Kb(zl%,Al%| 000054a0 29 3a ea 41 25 2c 42 25 2c 43 25 2c 44 25 2c 42 |):.A%,B%,C%,D%,B| 000054b0 6c 25 2c 43 6c 25 3a 41 25 3d 7a 6c 25 2b 41 6c |l%,Cl%:A%=zl%+Al| 000054c0 25 2a 4d 25 3a 42 25 3d 3f 28 41 25 2a 38 2b 56 |%*M%:B%=?(A%*8+V| 000054d0 25 29 3a 42 6c 25 3d 28 42 25 80 26 46 29 3a e7 |%):Bl%=(B%.&F):.| 000054e0 42 6c 25 3d 30 8c e1 0d 88 33 65 3f 28 41 25 2a |Bl%=0....3e?(A%*| 000054f0 38 2b 56 25 29 3d 42 25 2d 31 3a 43 6c 25 3d 3f |8+V%)=B%-1:Cl%=?| 00005500 28 41 25 2a 38 2b 56 25 2b 42 6c 25 29 3a 3f 28 |(A%*8+V%+Bl%):?(| 00005510 41 25 2a 38 2b 56 25 2b 42 6c 25 29 3d 30 3a 43 |A%*8+V%+Bl%)=0:C| 00005520 25 3d 41 6c 25 3a 44 25 3d 7a 6c 25 3a d6 59 6a |%=Al%:D%=zl%:.Yj| 00005530 25 3a 7a 61 25 3d b9 3a f2 77 3a f2 6c 63 28 41 |%:za%=.:.w:.lc(A| 00005540 25 2c 43 6c 25 2c a3 2c a3 29 3a e1 0d 88 8d 53 |%,Cl%,.,.):....S| 00005550 dd f2 4e 62 28 7a 6c 25 2c 41 6c 25 29 3a ea 41 |..Nb(zl%,Al%):.A| 00005560 25 2c 42 25 2c 43 25 2c 44 25 2c 42 6c 25 3a 41 |%,B%,C%,D%,Bl%:A| 00005570 25 3d 7a 6c 25 2b 41 6c 25 2a 4d 25 3a 42 25 3d |%=zl%+Al%*M%:B%=| 00005580 3f 28 41 25 2a 38 2b 56 25 29 3a 42 6c 25 3d 28 |?(A%*8+V%):Bl%=(| 00005590 42 25 80 26 46 29 3a e7 42 6c 25 3c 32 8c e1 0d |B%.&F):.Bl%<2...| 000055a0 88 cc 69 42 25 3d 3f 28 41 25 2a 38 2b 56 25 2b |..iB%=?(A%*8+V%+| 000055b0 42 6c 25 29 3a 44 25 3d 31 3a c8 95 44 25 3c 3d |Bl%):D%=1:..D%<=| 000055c0 42 6c 25 3a 43 25 3d 3f 28 41 25 2a 38 2b 56 25 |Bl%:C%=?(A%*8+V%| 000055d0 2b 44 25 29 3a 3f 28 41 25 2a 38 2b 56 25 2b 44 |+D%):?(A%*8+V%+D| 000055e0 25 29 3d 42 25 3a 42 25 3d 43 25 3a 44 25 2b 3d |%)=B%:B%=C%:D%+=| 000055f0 31 3a ce 3a 43 25 3d 41 6c 25 3a 44 25 3d 7a 6c |1:.:C%=Al%:D%=zl| 00005600 25 3a d6 59 6a 25 3a e1 0d 89 38 7d dd f2 4c 62 |%:.Yj%:...8}..Lb| 00005610 28 7a 6c 25 2c 41 6c 25 29 3a ea 41 25 2c 42 25 |(zl%,Al%):.A%,B%| 00005620 2c 43 25 2c 44 25 2c 42 6c 25 3a e7 75 25 3c 3d |,C%,D%,Bl%:.u%<=| 00005630 4f 25 8c f2 62 28 22 53 6f 72 72 79 2c 20 79 6f |O%..b("Sorry, yo| 00005640 75 20 63 61 6e 27 74 20 64 6f 20 74 68 61 74 20 |u can't do that | 00005650 79 6f 75 20 6d 75 73 74 20 6c 65 61 76 65 20 61 |you must leave a| 00005660 74 20 6c 65 61 73 74 20 6f 6e 65 20 62 65 61 74 |t least one beat| 00005670 20 6f 6e 20 74 68 65 20 73 63 72 65 65 6e 2e 22 | on the screen."| 00005680 2c a3 29 3a e1 0d 89 5c 80 41 25 3d 7a 6c 25 2b |,.):...\.A%=zl%+| 00005690 41 6c 25 2a 4d 25 3a c8 99 26 34 34 41 43 37 2c |Al%*M%:..&44AC7,| 000056a0 75 25 2a 38 2d 41 25 2a 38 2d 38 2a 4f 25 2c 41 |u%*8-A%*8-8*O%,A| 000056b0 25 2a 38 2b 56 25 2b 38 2a 4f 25 2c 41 25 2a 38 |%*8+V%+8*O%,A%*8| 000056c0 2b 56 25 3a c8 99 26 34 34 41 44 41 2c 75 25 2a |+V%:..&44ADA,u%*| 000056d0 38 2b 56 25 2d 4f 25 2a 38 2c 38 2a 4f 25 3a f2 |8+V%-O%*8,8*O%:.| 000056e0 6e 63 28 48 62 25 2d 31 29 3a 7a 61 25 3d b9 3a |nc(Hb%-1):za%=.:| 000056f0 43 61 25 3d b9 3a f2 77 3a e7 4b 62 25 8c f2 4c |Ca%=.:.w:.Kb%..L| 00005700 28 6c 6c 25 29 0d 89 a4 05 e1 0d 89 ad 3b dd f2 |(ll%)........;..| 00005710 4d 62 28 7a 6c 25 2c 41 6c 25 29 3a ea 41 25 2c |Mb(zl%,Al%):.A%,| 00005720 42 25 2c 43 25 2c 44 25 2c 42 6c 25 2c 76 25 3a |B%,C%,D%,Bl%,v%:| 00005730 41 25 3d 7a 6c 25 2b 41 6c 25 2a 4d 25 3a e7 41 |A%=zl%+Al%*M%:.A| 00005740 25 3e 75 25 8c 0d 89 da 11 76 25 3d 28 41 25 2d |%>u%.....v%=(A%-| 00005750 75 25 29 81 4f 25 0d 89 ec 0a cc 3a 76 25 3d 31 |u%).O%.....:v%=1| 00005760 0d 89 fe 05 cd 0d 89 fe 56 e7 28 48 62 25 2b 76 |........V.(Hb%+v| 00005770 25 29 2a 4f 25 2f 4d 25 3e 6a 6c 25 8c f2 62 28 |%)*O%/M%>jl%..b(| 00005780 22 4e 6f 20 72 6f 6f 6d 20 74 6f 20 61 64 64 20 |"No room to add | 00005790 61 6e 79 20 62 65 61 74 73 2c 20 61 73 6b 20 79 |any beats, ask y| 000057a0 6f 75 72 20 74 65 61 63 68 65 72 20 66 6f 72 20 |our teacher for | 000057b0 6d 6f 72 65 2e 22 2c a3 29 3a e1 0d 8a 07 0c e7 |more.",.):......| 000057c0 41 25 3c 3d 75 25 8c 0d 8a 10 41 c8 99 26 34 34 |A%<=u%....A..&44| 000057d0 41 43 37 2c 75 25 2a 38 2d 41 25 2a 38 2c 41 25 |AC7,u%*8-A%*8,A%| 000057e0 2a 38 2b 56 25 2c 41 25 2a 38 2b 56 25 2b 38 2a |*8+V%,A%*8+V%+8*| 000057f0 4f 25 3a c8 99 26 34 34 41 44 41 2c 41 25 2a 38 |O%:..&44ADA,A%*8| 00005800 2b 56 25 2c 38 2a 4f 25 0d 8a 2b 05 cd 0d 8a 2b |+V%,8*O%..+....+| 00005810 2b f2 6e 63 28 48 62 25 2b 76 25 29 3a 7a 61 25 |+.nc(Hb%+v%):za%| 00005820 3d b9 3a 43 61 25 3d b9 3a f2 77 3a e7 4b 62 25 |=.:Ca%=.:.w:.Kb%| 00005830 8c f2 4c 28 6c 6c 25 29 0d 8a 61 05 e1 0d 8a 6a |..L(ll%)..a....j| 00005840 39 dd f2 6f 63 28 67 24 29 3a f2 69 3a f2 78 3a |9..oc(g$):.i:.x:| 00005850 e7 a7 67 24 2c 22 2e 22 29 3d 30 8c 67 24 3d 22 |..g$,".")=0.g$="| 00005860 3c 4d 42 42 65 61 74 46 69 6c 65 73 24 44 69 72 |<MBBeatFiles$Dir| 00005870 3e 2e 22 2b 67 24 0d 8a 97 15 61 25 3d a4 6c 28 |>."+g$....a%=.l(| 00005880 67 24 29 3a e7 61 25 3d 30 8c e1 0d 8a a9 2a 62 |g$):.a%=0.....*b| 00005890 25 3d a4 68 28 62 24 2c 38 2c 61 25 29 3a e7 62 |%=.h(b$,8,a%):.b| 000058a0 25 3c 3e 30 8c f2 62 28 a4 63 28 62 25 2b 34 29 |%<>0..b(.c(b%+4)| 000058b0 2c a3 29 3a e1 0d 8a bb 48 e7 62 24 3c 3e 22 4d |,.):....H.b$<>"M| 000058c0 42 52 68 79 74 68 6d 22 80 62 24 3c 3e 22 4d 42 |BRhythm".b$<>"MB| 000058d0 42 65 61 74 20 20 22 8c f2 62 28 22 46 69 6c 65 |Beat "..b("File| 000058e0 20 66 6f 72 6d 61 74 20 6e 6f 74 20 75 6e 64 65 | format not unde| 000058f0 72 73 74 6f 6f 64 2e 22 2c a3 29 3a e1 0d 8a c4 |rstood.",.):....| 00005900 28 62 25 3d a4 61 28 63 25 2c 61 25 29 3a e7 62 |(b%=.a(c%,a%):.b| 00005910 25 3c 3e 30 8c f2 62 28 a4 63 28 62 25 2b 34 29 |%<>0..b(.c(b%+4)| 00005920 2c a3 29 3a e1 0d 8a d6 69 e7 63 25 3e 31 8c f2 |,.):....i.c%>1..| 00005930 62 28 22 54 68 69 73 20 66 69 6c 65 20 77 61 73 |b("This file was| 00005940 20 6d 61 64 65 20 62 79 20 61 20 6e 65 77 65 72 | made by a newer| 00005950 20 76 65 72 73 69 6f 6e 20 6f 66 20 4d 75 73 69 | version of Musi| 00005960 63 42 6f 78 2e 20 59 6f 75 20 77 69 6c 6c 20 6e |cBox. You will n| 00005970 65 65 64 20 61 6e 20 75 70 67 72 61 64 65 20 74 |eed an upgrade t| 00005980 6f 20 6c 6f 61 64 20 69 74 2e 22 2c a3 29 0d 8a |o load it.",.)..| 00005990 df 2a 62 25 3d a4 68 28 62 24 2c 34 2c 61 25 29 |.*b%=.h(b$,4,a%)| 000059a0 3a c8 95 62 25 3d 30 80 62 24 3c 3e 22 45 6e 64 |:..b%=0.b$<>"End| 000059b0 58 22 3a c8 8e 62 24 ca 0d 8a fa 15 c9 22 52 74 |X":..b$......"Rt| 000059c0 68 6d 22 3a 62 25 3d a4 55 28 61 25 29 0d 8b 0c |hm":b%=.U(a%)...| 000059d0 17 c9 22 49 6e 73 74 22 3a 62 25 3d a4 76 28 33 |.."Inst":b%=.v(3| 000059e0 2c 61 25 29 0d 8b 15 17 c9 22 54 65 6d 70 22 3a |,a%)....."Temp":| 000059f0 62 25 3d a4 77 28 33 2c 61 25 29 0d 8b 1e 17 c9 |b%=.w(3,a%).....| 00005a00 22 56 6f 6c 75 22 3a 62 25 3d a4 78 28 33 2c 61 |"Volu":b%=.x(3,a| 00005a10 25 29 0d 8b 27 15 c9 22 4f 63 74 61 22 3a 62 25 |%)..'.."Octa":b%| 00005a20 3d a4 79 28 61 25 29 0d 8b 30 15 c9 22 4b 65 79 |=.y(a%)..0.."Key| 00005a30 20 22 3a 62 25 3d a4 7a 28 61 25 29 0d 8b 39 15 | ":b%=.z(a%)..9.| 00005a40 c9 22 50 65 6e 74 22 3a 62 25 3d a4 42 28 61 25 |."Pent":b%=.B(a%| 00005a50 29 0d 8b 42 0f 7f 3a 62 25 3d a4 6a 28 61 25 29 |)..B..:b%=.j(a%)| 00005a60 0d 8b 4b 05 cb 0d 8b 4b 18 e7 62 25 3d 30 8c 62 |..K....K..b%=0.b| 00005a70 25 3d a4 68 28 62 24 2c 34 2c 61 25 29 0d 8b 54 |%=.h(b$,4,a%)..T| 00005a80 1b ce 3a e7 62 25 3c 3e 30 8c f2 62 28 a4 63 28 |..:.b%<>0..b(.c(| 00005a90 62 25 2b 34 29 2c a3 29 0d 8b 6f 23 62 25 3d a4 |b%+4),.)..o#b%=.| 00005aa0 69 28 61 25 29 3a f2 70 3a f2 72 3a c8 99 26 34 |i(a%):.p:.r:..&4| 00005ab0 34 41 45 42 2c 33 2c 6b 25 3a e1 0d 8b 9c 38 dd |4AEB,3,k%:....8.| 00005ac0 a4 55 28 61 25 29 3a ea 62 25 2c 76 25 2c 41 25 |.U(a%):.b%,v%,A%| 00005ad0 2c 42 25 3a 62 25 3d a4 61 28 76 25 2c 61 25 29 |,B%:b%=.a(v%,a%)| 00005ae0 3a e7 62 25 3d 30 8c 62 25 3d a4 61 28 41 25 2c |:.b%=0.b%=.a(A%,| 00005af0 61 25 29 0d 8b c9 16 e7 62 25 3d 30 8c 62 25 3d |a%).....b%=0.b%=| 00005b00 a4 61 28 42 25 2c 61 25 29 0d 8b d2 0e e7 62 25 |.a(B%,a%).....b%| 00005b10 3c 3e 30 8c 3d 62 25 0d 8b db 32 c8 99 26 34 34 |<>0.=b%...2..&44| 00005b20 41 44 41 2c 56 25 2c 53 62 25 2a 4d 25 2a 38 3a |ADA,V%,Sb%*M%*8:| 00005b30 62 25 3d a4 6b 28 56 25 2c 76 25 2d 31 36 2c 61 |b%=.k(V%,v%-16,a| 00005b40 25 29 3a e7 ac 44 6c 25 8c 0d 8b ff 23 45 6c 25 |%):..Dl%....#El%| 00005b50 3d 41 25 2a 42 25 2d 31 3a 41 25 3d 4f 25 3a 42 |=A%*B%-1:A%=O%:B| 00005b60 25 3d 28 45 6c 25 81 41 25 29 2b 31 0d 8c 23 05 |%=(El%.A%)+1..#.| 00005b70 cd 0d 8c 23 12 e7 41 25 2a 42 25 3e 6a 6c 25 2a |...#..A%*B%>jl%*| 00005b80 4d 25 8c 0d 8c 2c 1e e7 ac 42 6b 25 8c 6a 6c 25 |M%...,...Bk%.jl%| 00005b90 3d 28 28 41 25 2a 42 25 2d 31 29 81 4d 25 29 2b |=((A%*B%-1).M%)+| 00005ba0 31 0d 8c 35 05 cd 0d 8c 3e 2e f2 56 62 28 42 25 |1..5....>..Vb(B%| 00005bb0 2c 41 25 2c 6a 6c 25 2c a3 29 3a c8 99 26 34 34 |,A%,jl%,.):..&44| 00005bc0 41 45 42 2c 33 2c 64 68 25 3a f2 69 63 28 30 29 |AEB,3,dh%:.ic(0)| 00005bd0 3a 3d 62 25 0d 8c 74 82 dd f2 56 62 28 46 6c 25 |:=b%..t...Vb(Fl%| 00005be0 2c 47 6c 25 2c 48 6c 25 2c 49 6c 25 29 3a ea 63 |,Gl%,Hl%,Il%):.c| 00005bf0 25 2c 4a 6c 25 2c 41 25 2c 42 25 3a 4a 6c 25 3d |%,Jl%,A%,B%:Jl%=| 00005c00 4f 25 3a e7 48 6c 25 3e 53 62 25 8c 48 6c 25 3d |O%:.Hl%>Sb%.Hl%=| 00005c10 53 62 25 3a f2 62 28 22 4e 75 6d 62 65 72 20 6f |Sb%:.b("Number o| 00005c20 66 20 72 6f 77 73 20 72 65 64 75 63 65 64 20 74 |f rows reduced t| 00005c30 6f 20 74 68 65 20 6d 61 78 69 6d 75 6d 20 73 65 |o the maximum se| 00005c40 74 74 69 6e 67 20 6f 66 20 22 2b c3 28 53 62 25 |tting of "+.(Sb%| 00005c50 29 2b 22 2e 22 29 0d 8c 8f 23 63 25 3d b9 3a e7 |)+".")...#c%=.:.| 00005c60 48 6c 25 3c 28 28 47 6c 25 2a 46 6c 25 2d 31 29 |Hl%<((Gl%*Fl%-1)| 00005c70 2f 4d 25 29 80 49 6c 25 8c 0d 8c aa c2 21 67 25 |/M%).Il%.....!g%| 00005c80 3d 34 3a 24 28 67 25 2b 34 29 3d 22 52 65 64 75 |=4:$(g%+4)="Redu| 00005c90 63 69 6e 67 20 74 68 65 20 6d 61 78 69 6d 75 6d |cing the maximum| 00005ca0 20 6e 75 6d 62 65 72 20 6f 66 20 72 6f 77 73 20 | number of rows | 00005cb0 66 6f 72 20 74 68 65 20 42 65 61 74 20 42 6f 78 |for the Beat Box| 00005cc0 20 77 69 6c 6c 20 74 72 75 6e 63 61 74 65 20 74 | will truncate t| 00005cd0 68 65 20 70 72 65 73 65 6e 74 20 74 75 6e 65 2e |he present tune.| 00005ce0 20 53 68 61 6c 6c 20 49 20 63 6f 6e 74 69 6e 75 | Shall I continu| 00005cf0 65 20 61 6e 64 20 72 65 64 75 63 65 20 69 74 3f |e and reduce it?| 00005d00 22 2b bd 30 3a c8 99 26 34 30 30 44 46 2c 67 25 |"+.0:..&400DF,g%| 00005d10 2c 25 31 31 30 31 31 2c 6f 24 b8 2c 63 25 3a 63 |,%11011,o$.,c%:c| 00005d20 25 3d 28 63 25 3d 31 29 3a e7 63 25 8c 46 6c 25 |%=(c%=1):.c%.Fl%| 00005d30 3d 4d 25 2a 48 6c 25 2f 47 6c 25 0d 8c d7 05 cd |=M%*Hl%/Gl%.....| 00005d40 0d 8c e0 08 e7 63 25 8c 0d 8c e9 14 21 41 6a 25 |.....c%.....!Aj%| 00005d50 3d 48 6c 25 3a 6a 6c 25 3d 48 6c 25 0d 8d 04 05 |=Hl%:jl%=Hl%....| 00005d60 cd 0d 8d 04 a1 4f 25 3d 47 6c 25 3a 48 62 25 3d |.....O%=Gl%:Hb%=| 00005d70 46 6c 25 3a 75 25 3d 47 6c 25 2a 46 6c 25 3a 21 |Fl%:u%=Gl%*Fl%:!| 00005d80 4d 6a 25 3d 47 6c 25 3a 21 4c 6a 25 3d 28 75 25 |Mj%=Gl%:!Lj%=(u%| 00005d90 2d 31 29 83 4d 25 2b 31 3a 21 4b 6a 25 3d 28 75 |-1).M%+1:!Kj%=(u| 00005da0 25 2d 31 29 81 4d 25 3a c8 99 26 34 34 41 44 41 |%-1).M%:..&44ADA| 00005db0 2c 56 25 2b 75 25 2a 38 2c 53 62 25 2a 4d 25 2a |,V%+u%*8,Sb%*M%*| 00005dc0 38 2d 75 25 2a 38 3a 42 25 3d 47 6c 25 2a 46 6c |8-u%*8:B%=Gl%*Fl| 00005dd0 25 3a 41 25 3d 47 6c 25 3a d6 78 6a 25 3a c8 99 |%:A%=Gl%:.xj%:..| 00005de0 26 34 34 41 45 42 2c 33 2c 64 68 25 3a e7 21 4e |&44AEB,3,dh%:.!N| 00005df0 6a 25 3d 31 30 80 77 25 3d 33 8c f2 5f 62 28 64 |j%=10.w%=3.._b(d| 00005e00 24 29 0d 8d 8b 1a e7 77 25 3d 33 80 28 28 4a 6c |$).....w%=3.((Jl| 00005e10 25 3c 3e 4f 25 29 84 49 6c 25 29 8c 0d 8d 94 0b |%<>O%).Il%).....| 00005e20 e7 47 6c 25 3e 34 8c 0d 8d 9d 0e f2 79 28 4f 25 |.Gl%>4......y(O%| 00005e30 2c 68 62 25 29 0d 8d af 10 cc 3a f2 79 28 4f 25 |,hb%).....:.y(O%| 00005e40 2c 67 62 25 29 0d 8d c1 05 cd 0d 8d c1 05 cd 0d |,gb%)...........| 00005e50 8d ca 09 f2 57 62 3a e1 0d 8d dc 5e dd f2 70 63 |....Wb:....^..pc| 00005e60 28 53 25 2c 4b 6c 25 29 3a ea 65 25 2c 65 2c 63 |(S%,Kl%):.e%,e,c| 00005e70 2c 64 3a 4c 6c 25 3d 4b 6c 25 3a 21 49 6a 25 3d |,d:Ll%=Kl%:!Ij%=| 00005e80 4b 6c 25 3a 21 79 6a 25 3d 53 25 3a 4f 62 25 3d |Kl%:!yj%=S%:Ob%=| 00005e90 53 25 3a e3 65 25 3d 31 b8 38 3a 64 3d 4d 62 25 |S%:.e%=1.8:d=Mb%| 00005ea0 3a 63 3d 64 2a 65 25 2d 4d 62 25 3a e7 63 3e 53 |:c=d*e%-Mb%:.c>S| 00005eb0 25 2d 4d 62 25 8c 0d 8e 3f 17 63 3d 53 25 2d 4d |%-Mb%...?.c=S%-M| 00005ec0 62 25 3a 64 3d 63 2f 28 65 25 2d 31 29 0d 8e 5a |b%:d=c/(e%-1)..Z| 00005ed0 05 cd 0d 8e 5a 3b e3 65 3d 30 b8 37 3a 21 28 43 |....Z;.e=0.7:!(C| 00005ee0 6a 25 2b 65 25 2a 33 32 2d 33 32 2b 65 2a 34 29 |j%+e%*32-32+e*4)| 00005ef0 3d 63 2d 64 2a 28 65 29 3a ed 3a ed 3a c8 99 26 |=c-d*(e):.:.:..&| 00005f00 34 34 41 45 42 2c 33 2c 64 68 25 3a e1 0d 8e 90 |44AEB,3,dh%:....| 00005f10 7c dd f2 6e 63 28 46 6c 25 29 3a ea 41 25 2c 42 ||..nc(Fl%):.A%,B| 00005f20 25 3a 48 62 25 3d 46 6c 25 3a 75 25 3d 4f 25 2a |%:Hb%=Fl%:u%=O%*| 00005f30 48 62 25 3a 21 4c 6a 25 3d 28 75 25 2d 31 29 83 |Hb%:!Lj%=(u%-1).| 00005f40 4d 25 2b 31 3a 21 4b 6a 25 3d 28 75 25 2d 31 29 |M%+1:!Kj%=(u%-1)| 00005f50 81 4d 25 3a 42 25 3d 75 25 3a 41 25 3d 4f 25 3a |.M%:B%=u%:A%=O%:| 00005f60 d6 78 6a 25 3a c8 99 26 34 34 41 45 42 2c 33 2c |.xj%:..&44AEB,3,| 00005f70 64 68 25 3a e7 21 4e 6a 25 3d 31 30 80 77 25 3d |dh%:.!Nj%=10.w%=| 00005f80 33 8c f2 5f 62 28 64 24 29 0d 8f 0e 05 e1 0d 8f |3.._b(d$).......| 00005f90 17 41 dd f2 4f 62 28 7a 6c 25 2c 41 6c 25 2c 4d |.A..Ob(zl%,Al%,M| 00005fa0 6c 25 29 3a ea 41 25 2c 42 25 2c 43 25 2c 44 25 |l%):.A%,B%,C%,D%| 00005fb0 2c 42 6c 25 2c 43 6c 25 3a 41 25 3d 7a 6c 25 2b |,Bl%,Cl%:A%=zl%+| 00005fc0 41 6c 25 2a 4d 25 3a e7 4d 6c 25 3d 31 34 8c 0d |Al%*M%:.Ml%=14..| 00005fd0 8f 44 26 42 25 3d 3f 28 41 25 2a 38 2b 56 25 29 |.D&B%=?(A%*8+V%)| 00005fe0 3a 42 6c 25 3d 28 42 25 80 26 46 29 3a e7 42 6c |:Bl%=(B%.&F):.Bl| 00005ff0 25 3d 30 8c e1 0d 8f 5f 89 3f 28 41 25 2a 38 2b |%=0...._.?(A%*8+| 00006000 56 25 29 3d 42 25 2d 31 3a 43 6c 25 3d 3f 28 41 |V%)=B%-1:Cl%=?(A| 00006010 25 2a 38 2b 56 25 2b 42 6c 25 29 3a 3f 28 41 25 |%*8+V%+Bl%):?(A%| 00006020 2a 38 2b 56 25 2b 42 6c 25 29 3d 30 3a 43 25 3d |*8+V%+Bl%)=0:C%=| 00006030 41 6c 25 3a 44 25 3d 7a 6c 25 3a d6 59 6a 25 3a |Al%:D%=zl%:.Yj%:| 00006040 f2 6c 63 28 41 25 2c 43 6c 25 2c a3 2c a3 29 3a |.lc(A%,Cl%,.,.):| 00006050 21 64 69 25 3d 43 6c 25 3a f2 57 61 28 22 73 74 |!di%=Cl%:.Wa("st| 00006060 37 5f 63 6f 70 79 32 22 29 3a f2 77 3a f2 75 28 |7_copy2"):.w:.u(| 00006070 2d 31 2c 36 29 3a 7a 61 25 3d b9 3a f2 77 0d 8f |-1,6):za%=.:.w..| 00006080 dd 1c cc 3a 42 25 3d 41 25 3a 41 25 3d 21 64 69 |...:B%=A%:A%=!di| 00006090 25 3a e7 42 25 3e 3d 75 25 8c 0d 8f f8 09 e7 55 |%:.B%>=u%......U| 000060a0 62 25 8c 0d 90 01 0a 42 25 2d 3d 75 25 0d 90 13 |b%.....B%-=u%...| 000060b0 07 cc 3a e1 0d 90 1c 05 cd 0d 90 25 05 cd 0d 90 |..:........%....| 000060c0 2e 0e e7 ba 28 4a 6a 25 29 3d 30 8c 0d 90 37 36 |....(Jj%)=0...76| 000060d0 f2 62 28 22 4e 6f 74 20 61 6c 6c 6f 77 65 64 20 |.b("Not allowed | 000060e0 74 68 61 74 20 6d 61 6e 79 20 69 6e 73 74 72 75 |that many instru| 000060f0 6d 65 6e 74 73 20 61 74 20 6f 6e 63 65 2e 22 2c |ments at once.",| 00006100 a3 29 0d 90 49 29 cc 3a f2 6c 63 28 42 25 2c 41 |.)..I).:.lc(B%,A| 00006110 25 2c b9 2c a3 29 3a f2 77 3a f2 75 28 2d 31 2c |%,.,.):.w:.u(-1,| 00006120 35 29 3a 7a 61 25 3d b9 3a f2 77 0d 90 7f 05 cd |5):za%=.:.w.....| 00006130 0d 90 7f 05 cd 0d 90 88 05 e1 0d 90 91 23 dd f2 |.............#..| 00006140 55 62 3a ea 41 25 2c 42 25 2c 43 25 2c 44 25 3a |Ub:.A%,B%,C%,D%:| 00006150 e7 ac 4b 62 25 84 49 62 25 3e 37 8c e1 0d 90 b5 |..Kb%.Ib%>7.....| 00006160 18 41 25 3d 49 62 25 3a 43 25 3d a4 6d 3a e7 6c |.A%=Ib%:C%=.m:.l| 00006170 6c 25 3d 31 8c 0d 90 d0 18 f2 4b 28 41 25 2c 28 |l%=1......K(A%,(| 00006180 43 25 81 51 25 29 2b 6e 6c 25 2c b9 29 0d 90 e2 |C%.Q%)+nl%,.)...| 00006190 1f cc 3a f2 4b 28 41 25 2c 75 25 2d 28 43 25 81 |..:.K(A%,u%-(C%.| 000061a0 51 25 29 2d 6e 6c 25 2d 31 2c b9 29 0d 90 f4 05 |Q%)-nl%-1,.)....| 000061b0 cd 0d 90 f4 2c c8 99 26 34 34 41 44 44 2c 33 2b |....,..&44ADD,3+| 000061c0 32 5e 39 2c 6b 25 2c 47 67 25 2c 31 2c 2c 65 68 |2^9,k%,Gg%,1,,eh| 000061d0 25 3a f2 65 28 6b 25 2c 2d 32 29 3a e1 0d 91 0f |%:.e(k%,-2):....| 000061e0 2d dd f2 77 3a c8 99 26 34 34 41 45 33 2c 36 2c |-..w:..&44AE3,6,| 000061f0 48 63 25 2c 64 68 25 3a c8 99 26 34 34 41 45 33 |Hc%,dh%:..&44AE3| 00006200 2c 36 2c 5f 25 2c 6b 25 3a e1 0d 91 3c 15 dd a4 |,6,_%,k%:...<...| 00006210 73 28 64 25 29 3a ea 79 25 3a c8 8e 64 25 ca 0d |s(d%):.y%:..d%..| 00006220 91 60 0f c9 42 67 25 3a 79 25 3d 47 6b 25 0d 91 |.`..Bg%:y%=Gk%..| 00006230 72 11 c9 42 67 25 2b 31 3a 79 25 3d 48 6b 25 0d |r..Bg%+1:y%=Hk%.| 00006240 91 7b 11 c9 42 67 25 2b 32 3a 79 25 3d 49 6b 25 |.{..Bg%+2:y%=Ik%| 00006250 0d 91 84 0d c9 43 67 25 3a 79 25 3d b9 0d 91 8d |.....Cg%:y%=....| 00006260 0f c9 44 67 25 3a 79 25 3d 4b 6b 25 0d 91 96 0f |..Dg%:y%=Kk%....| 00006270 c9 53 67 25 3a 79 25 3d 4c 6b 25 0d 91 9f 0f c9 |.Sg%:y%=Lk%.....| 00006280 52 67 25 3a 79 25 3d 4d 6b 25 0d 91 a8 0f c9 57 |Rg%:y%=Mk%.....W| 00006290 67 25 3a 79 25 3d 4e 6b 25 0d 91 b1 05 cb 0d 91 |g%:y%=Nk%.......| 000062a0 b1 0b e7 ac 79 25 8c f2 49 0d 91 ba 07 3d 79 25 |....y%..I....=y%| 000062b0 0d 91 d5 53 dd f2 66 63 3a ea 41 25 3a 43 6b 25 |...S..fc:.A%:Ck%| 000062c0 3d 75 25 3a e7 43 6b 25 3c 31 84 43 6b 25 3e 6a |=u%:.Ck%<1.Ck%>j| 000062d0 6c 25 2a 4d 25 2f 32 8c f2 63 28 22 4e 6f 20 72 |l%*M%/2..c("No r| 000062e0 6f 6f 6d 20 74 6f 20 63 6f 70 79 20 74 68 65 20 |oom to copy the | 000062f0 70 72 65 73 65 6e 74 20 72 68 79 74 68 6d 2e 22 |present rhythm."| 00006300 29 3a e1 0d 91 f0 35 44 6b 25 3d 28 6a 6c 25 2a |):....5Dk%=(jl%*| 00006310 4d 25 2f 43 6b 25 29 2d 31 3a c8 99 26 34 34 41 |M%/Ck%)-1:..&44A| 00006320 43 42 2c 44 64 25 2c 7a 64 25 2c 31 3a f2 6e 28 |CB,Dd%,zd%,1:.n(| 00006330 44 64 25 2c 33 29 3a e1 0d 92 14 27 dd f2 54 62 |Dd%,3):....'..Tb| 00006340 3a ea 41 25 2c 42 25 2c 43 25 3a f5 3a c8 97 41 |:.A%,B%,C%:.:..A| 00006350 25 2c 42 25 2c 43 25 3a fd 43 25 3d 30 3a e1 0d |%,B%,C%:.C%=0:..| 00006360 92 53 18 dd f2 63 63 28 41 25 29 3a 4a 62 25 3d |.S...cc(A%):Jb%=| 00006370 41 25 3a e7 41 25 8c 0d 92 77 0a 21 64 6b 25 3d |A%:.A%...w.!dk%=| 00006380 32 0d 92 89 0c cc 3a 21 64 6b 25 3d 31 0d 92 9b |2.....:!dk%=1...| 00006390 05 cd 0d 92 9b 05 e1 0d 92 a4 90 dd f2 71 61 3a |.............qa:| 000063a0 ea 4e 6c 25 3a de 62 25 28 33 2c 38 29 3a c8 99 |.Nl%:.b%(3,8):..| 000063b0 26 34 30 31 34 30 2c 30 2c 32 30 38 2c 34 38 3a |&40140,0,208,48:| 000063c0 c8 99 26 34 30 31 34 30 2c 38 3a e3 4e 6c 25 3d |..&40140,8:.Nl%=| 000063d0 30 b8 37 3a e3 4f 6c 25 3d 30 b8 33 3a f2 4a 28 |0.7:.Ol%=0.3:.J(| 000063e0 4f 6c 25 2c 4e 6c 25 2b 31 2c 4e 6c 25 29 3a ed |Ol%,Nl%+1,Nl%):.| 000063f0 3a ed 3a e3 4f 6c 25 3d 30 b8 33 3a f2 4a 28 4f |:.:.Ol%=0.3:.J(O| 00006400 6c 25 2c 38 2c 34 29 3a ed 3a c8 99 26 36 30 31 |l%,8,4):.:..&601| 00006410 38 41 2c 38 2c 22 53 74 72 69 6e 67 4c 69 62 2d |8A,8,"StringLib-| 00006420 48 61 72 64 22 3a e1 0d 93 34 56 dd f2 4a 28 6a |Hard":...4V..J(j| 00006430 25 2c 71 25 2c 78 25 29 3a ea 43 6c 25 2c 65 25 |%,q%,x%):.Cl%,e%| 00006440 3a 43 6c 25 3d 62 25 28 6a 25 2c 71 25 2d 31 29 |:Cl%=b%(j%,q%-1)| 00006450 3a 62 25 28 6a 25 2c 71 25 2d 31 29 3d 78 25 3a |:b%(j%,q%-1)=x%:| 00006460 e3 65 25 3d 30 b8 37 3a e7 62 25 28 6a 25 2c 65 |.e%=0.7:.b%(j%,e| 00006470 25 29 3d 43 6c 25 8c 43 6c 25 3d 2d 31 0d 93 7c |%)=Cl%.Cl%=-1..|| 00006480 36 ed 3a e7 43 6c 25 3c 3e 2d 31 8c 63 25 28 43 |6.:.Cl%<>-1.c%(C| 00006490 6c 25 29 3d 28 28 63 25 28 43 6c 25 29 84 32 5e |l%)=((c%(Cl%).2^| 000064a0 28 6a 25 2b 32 37 29 29 82 32 5e 28 6a 25 2b 32 |(j%+27)).2^(j%+2| 000064b0 37 29 29 0d 93 8e 2d 63 25 28 78 25 29 3d 63 25 |7))...-c%(x%)=c%| 000064c0 28 78 25 29 84 32 5e 28 6a 25 2b 32 37 29 3a e7 |(x%).2^(j%+27):.| 000064d0 77 25 3d 6a 25 8c f2 71 63 28 71 25 2c 6a 25 29 |w%=j%..qc(q%,j%)| 000064e0 0d 93 a0 05 e1 0d 93 a9 2e dd f2 55 28 6a 25 29 |...........U(j%)| 000064f0 3a ea 65 25 3a 77 25 3d 6a 25 3a e3 65 25 3d 30 |:.e%:w%=j%:.e%=0| 00006500 b8 37 3a f2 71 63 28 65 25 2b 31 2c 6a 25 29 3a |.7:.qc(e%+1,j%):| 00006510 ed 3a e1 0d 93 f1 1e dd f2 71 63 28 71 25 2c 6a |.:.......qc(q%,j| 00006520 25 29 3a ea 41 25 2c 78 25 3a e7 71 25 3d 38 8c |%):.A%,x%:.q%=8.| 00006530 e1 0d 94 15 22 78 25 3d 62 25 28 6a 25 2c 71 25 |...."x%=b%(j%,q%| 00006540 2d 31 29 3a e7 62 24 28 78 25 29 3d 22 52 65 73 |-1):.b$(x%)="Res| 00006550 74 22 8c 0d 94 27 11 c8 99 26 34 30 31 38 35 2c |t"...'...&40185,| 00006560 71 25 2c 30 0d 94 39 27 cc 3a c8 99 26 36 30 31 |q%,0..9'.:..&601| 00006570 38 41 2c 71 25 2c 62 24 28 78 25 29 b8 3b 50 25 |8A,q%,b$(x%).;P%| 00006580 3a e7 28 50 25 80 31 29 3d 31 8c 0d 94 4b 11 f2 |:.(P%.1)=1...K..| 00006590 72 63 28 78 25 2c 71 25 2c 6a 25 29 0d 94 5d 05 |rc(x%,q%,j%)..].| 000065a0 cd 0d 94 5d 05 cd 0d 94 66 38 c8 99 26 34 30 31 |...]....f8..&401| 000065b0 38 35 2c 71 25 2c 30 b8 2c 41 25 3a c8 99 26 34 |85,q%,0.,A%:..&4| 000065c0 30 31 38 35 2c 71 25 2c 41 25 3a 3f 28 6d 6a 25 |0185,q%,A%:?(mj%| 000065d0 2b 71 25 29 3d 41 25 3a e7 71 25 3c 38 8c 0d 94 |+q%)=A%:.q%<8...| 000065e0 8a 4a 24 28 6b 63 25 2b 32 36 2a 28 71 25 2d 31 |.J$(kc%+26*(q%-1| 000065f0 29 29 3d 22 53 22 2b 61 24 28 78 25 29 2b 22 2c |))="S"+a$(x%)+",| 00006600 50 22 2b 61 24 28 78 25 29 3a 24 28 71 69 25 2b |P"+a$(x%):$(qi%+| 00006610 28 71 25 2d 31 29 2a 31 36 29 3d 22 53 22 2b 61 |(q%-1)*16)="S"+a| 00006620 24 28 78 25 29 2b bd 30 0d 94 a5 05 cd 0d 94 a5 |$(x%)+.0........| 00006630 05 e1 0d 94 ae 40 dd a4 4b 28 6a 25 2c 61 25 29 |.....@..K(j%,a%)| 00006640 3a ea 65 25 2c 62 24 2c 62 25 3a 62 25 3d a4 66 |:.e%,b$,b%:b%=.f| 00006650 28 22 49 6e 73 74 22 2c 61 25 29 3a e7 62 25 3d |("Inst",a%):.b%=| 00006660 30 8c 62 25 3d a4 62 28 32 30 2a 38 2b 38 2c 61 |0.b%=.b(20*8+8,a| 00006670 25 29 0d 94 db 37 e3 65 25 3d 30 b8 37 3a e7 62 |%)...7.e%=0.7:.b| 00006680 25 3d 30 8c 62 25 3d a4 66 28 c0 62 24 28 62 25 |%=0.b%=.f(.b$(b%| 00006690 28 6a 25 2c 65 25 29 29 2b c4 32 30 2c 22 20 22 |(j%,e%))+.20," "| 000066a0 29 2c 32 30 29 2c 61 25 29 0d 94 ed 09 ed 3a 3d |),20),a%).....:=| 000066b0 62 25 0d 95 11 32 dd a4 76 28 6a 25 2c 61 25 29 |b%...2..v(j%,a%)| 000066c0 3a ea 65 25 2c 78 25 2c 62 24 2c 62 25 2c 76 25 |:.e%,x%,b$,b%,v%| 000066d0 2c 78 24 2c 4e 25 3a e7 ac 50 6c 25 8c 3d a4 6a |,x$,N%:..Pl%.=.j| 000066e0 28 61 25 29 0d 95 23 34 78 24 3d 22 22 3a 62 25 |(a%)..#4x$="":b%| 000066f0 3d a4 61 28 76 25 2c 61 25 29 3a e3 65 25 3d 30 |=.a(v%,a%):.e%=0| 00006700 b8 37 3a e7 62 25 3d 30 8c 62 25 3d a4 6b 28 67 |.7:.b%=0.b%=.k(g| 00006710 25 2c 32 30 2c 61 25 29 0d 95 47 0a e7 62 25 3d |%,20,a%)..G..b%=| 00006720 30 8c 0d 95 50 4b 67 25 3f 32 30 3d 30 3a 62 24 |0...PKg%?20=0:b$| 00006730 3d a4 63 28 67 25 29 3a 62 24 3d c0 62 24 2c a7 |=.c(g%):b$=.b$,.| 00006740 62 24 2c 22 20 22 29 2d 31 29 3a 4e 25 3d 2d 31 |b$," ")-1):N%=-1| 00006750 3a e3 78 25 3d 30 b8 65 61 25 2d 31 3a e7 62 24 |:.x%=0.ea%-1:.b$| 00006760 28 78 25 29 3d 62 24 8c 4e 25 3d 78 25 0d 95 86 |(x%)=b$.N%=x%...| 00006770 17 ed 3a e7 4e 25 3d 2d 31 8c 78 24 3d 62 24 3a |..:.N%=-1.x$=b$:| 00006780 4e 25 3d 30 0d 95 98 24 62 25 28 6a 25 2c 65 25 |N%=0...$b%(j%,e%| 00006790 29 3d 4e 25 3a e7 77 25 3d 6a 25 8c f2 71 63 28 |)=N%:.w%=j%..qc(| 000067a0 65 25 2b 31 2c 6a 25 29 0d 95 aa 05 cd 0d 95 b3 |e%+1,j%)........| 000067b0 7f ed 3a e7 78 24 3c 3e 22 22 80 70 63 25 3d a3 |..:.x$<>"".pc%=.| 000067c0 8c 70 63 25 3d b9 3a f2 62 28 22 53 6f 6d 65 20 |.pc%=.:.b("Some | 000067d0 69 6e 73 74 72 75 6d 65 6e 74 73 20 77 65 72 65 |instruments were| 000067e0 20 6e 6f 74 20 66 6f 75 6e 64 20 69 6e 63 6c 75 | not found inclu| 000067f0 64 69 6e 67 20 27 22 2b 78 24 2b 22 27 2e 20 54 |ding '"+x$+"'. T| 00006800 68 65 79 20 68 61 76 65 20 62 65 65 6e 20 72 65 |hey have been re| 00006810 70 6c 61 63 65 64 20 77 69 74 68 20 27 22 2b 62 |placed with '"+b| 00006820 24 28 30 29 2b 22 27 2e 22 2c a3 29 0d 95 c5 07 |$(0)+"'.",.)....| 00006830 3d 62 25 0d 95 e0 5d dd f2 72 63 28 78 25 2c 71 |=b%...]..rc(x%,q| 00006840 25 2c 6a 25 29 3a ea 57 63 25 2c 69 24 2c 58 25 |%,j%):.Wc%,i$,X%| 00006850 2c 59 25 2c 42 25 2c 68 24 2c 50 25 2c 54 25 3a |,Y%,B%,h$,P%,T%:| 00006860 68 24 3d 62 24 28 78 25 29 3a e7 28 63 25 28 78 |h$=b$(x%):.(c%(x| 00006870 25 29 80 32 5e 32 36 29 3d 30 80 28 63 25 28 78 |%).2^26)=0.(c%(x| 00006880 25 29 80 26 38 30 30 30 30 30 30 30 29 3d 30 8c |%).&80000000)=0.| 00006890 0d 95 fb 29 f2 69 3a f5 3a c8 99 26 32 30 30 30 |...).i:.:..&2000| 000068a0 38 2c 31 37 2c 6e 24 2b 22 2e 22 2b 68 24 b8 4e |8,17,n$+"."+h$.N| 000068b0 25 3a e7 4e 25 3c 3e 31 8c 0d 96 1f 57 69 24 3d |%:.N%<>1....Wi$=| 000068c0 22 43 61 6e 27 74 20 75 73 65 20 76 6f 69 63 65 |"Can't use voice| 000068d0 20 27 22 2b 68 24 2b 22 27 2e 20 53 68 61 6c 6c | '"+h$+"'. Shall| 000068e0 20 75 73 65 20 61 6e 20 61 6c 74 65 72 6e 61 74 | use an alternat| 000068f0 69 76 65 2e 20 28 22 2b 6e 24 2b 22 2e 22 2b 68 |ive. ("+n$+"."+h| 00006900 24 2b 22 20 6e 6f 74 20 66 6f 75 6e 64 2e 29 22 |$+" not found.)"| 00006910 0d 96 31 40 cc 3a e7 ac a4 71 8c e7 ac a4 72 8c |..1@.:...q....r.| 00006920 69 24 3d 22 43 61 6e 27 74 20 75 73 65 20 74 68 |i$="Can't use th| 00006930 61 74 20 76 6f 69 63 65 2e 20 28 4e 6f 20 76 6f |at voice. (No vo| 00006940 69 63 65 20 73 6c 6f 74 73 20 6c 65 66 74 29 22 |ice slots left)"| 00006950 0d 96 3a 08 e7 a4 71 8c 0d 96 43 2b c8 99 26 32 |..:...q...C+..&2| 00006960 30 30 31 45 2c 30 2c 6e 24 2b 22 2e 22 2b 68 24 |001E,0,n$+"."+h$| 00006970 b8 57 63 25 3b 50 25 3a e7 28 50 25 80 31 29 3c |.Wc%;P%:.(P%.1)<| 00006980 3e 30 8c 0d 96 55 50 e7 ac a4 72 8c 69 24 3d 22 |>0...UP...r.i$="| 00006990 43 61 6e 27 74 20 75 73 65 20 76 6f 69 63 65 20 |Can't use voice | 000069a0 27 22 2b 68 24 2b 22 27 2e 20 53 68 61 6c 6c 20 |'"+h$+"'. Shall | 000069b0 75 73 65 20 61 6e 20 61 6c 74 65 72 6e 61 74 69 |use an alternati| 000069c0 76 65 2e 28 22 2b a4 63 28 57 63 25 2b 34 29 2b |ve.("+.c(Wc%+4)+| 000069d0 22 29 22 0d 96 5e 46 cc 3a c8 99 26 36 30 31 38 |")"..^F.:..&6018| 000069e0 35 2c 71 25 2c 30 b8 2c 6a 61 25 3a c8 99 26 36 |5,q%,0.,ja%:..&6| 000069f0 30 31 38 41 2c 71 25 2c 68 24 b8 3b 50 25 3a c8 |018A,q%,h$.;P%:.| 00006a00 99 26 36 30 31 38 35 2c 71 25 2c 6a 61 25 3a e7 |.&60185,q%,ja%:.| 00006a10 28 50 25 80 31 29 3d 31 8c 0d 96 8b 62 69 24 3d |(P%.1)=1....bi$=| 00006a20 22 56 6f 69 63 65 20 6d 6f 64 75 6c 65 20 27 22 |"Voice module '"| 00006a30 2b 68 24 2b 22 27 20 64 6f 65 73 20 6e 6f 74 20 |+h$+"' does not | 00006a40 63 6f 6e 74 61 69 6e 20 61 20 76 6f 69 63 65 20 |contain a voice | 00006a50 63 61 6c 6c 65 64 20 27 22 2b 68 24 2b 22 27 2e |called '"+h$+"'.| 00006a60 20 53 68 61 6c 6c 20 75 73 65 20 61 6e 20 61 6c | Shall use an al| 00006a70 74 65 72 6e 61 74 69 76 65 2e 22 0d 96 9d 1a cc |ternative.".....| 00006a80 3a 63 25 28 78 25 29 3d 28 63 25 28 78 25 29 84 |:c%(x%)=(c%(x%).| 00006a90 32 5e 32 36 29 0d 96 af 05 cd 0d 96 af 05 cd 0d |2^26)...........| 00006aa0 96 b8 0a cc 3a 50 25 3d 31 0d 96 d3 05 cd 0d 96 |....:P%=1.......| 00006ab0 d3 05 cd 0d 96 dc 17 fd 69 24 3c 3e 22 22 84 28 |........i$<>"".(| 00006ac0 50 25 80 31 29 3d 30 3a f2 70 0d 96 f7 05 cd 0d |P%.1)=0:.p......| 00006ad0 96 f7 0b e7 69 24 3d 22 22 8c 0d 97 00 10 f2 4a |....i$=""......J| 00006ae0 28 6a 25 2c 71 25 2c 78 25 29 0d 97 12 1a cc 3a |(j%,q%,x%).....:| 00006af0 f2 62 28 69 24 2c a3 29 3a f2 4a 28 6a 25 2c 71 |.b(i$,.):.J(j%,q| 00006b00 25 2c 30 29 0d 97 2d 05 cd 0d 97 2d 05 e1 0d 97 |%,0)..-....-....| 00006b10 36 5b dd a4 72 3a ea 65 25 2c 51 6c 25 3a 51 6c |6[..r:.e%,Ql%:Ql| 00006b20 25 3d 2d 31 3a 65 25 3d 30 3a c8 95 65 25 3c 47 |%=-1:e%=0:..e%<G| 00006b30 63 25 80 51 6c 25 3d 2d 31 3a e7 28 63 25 28 65 |c%.Ql%=-1:.(c%(e| 00006b40 25 29 80 26 46 38 30 30 30 30 30 30 29 3d 30 80 |%).&F8000000)=0.| 00006b50 28 63 25 28 65 25 29 80 32 5e 32 36 29 3d 32 5e |(c%(e%).2^26)=2^| 00006b60 32 36 8c 51 6c 25 3d 65 25 0d 97 75 14 65 25 2b |26.Ql%=e%..u.e%+| 00006b70 3d 31 3a ce 3a e7 51 6c 25 3d 2d 31 8c 0d 97 90 |=1:.:.Ql%=-1....| 00006b80 52 65 25 3d 30 3a c8 95 65 25 3c 47 63 25 80 51 |Re%=0:..e%<Gc%.Q| 00006b90 6c 25 3d 2d 31 3a e7 28 63 25 28 65 25 29 80 32 |l%=-1:.(c%(e%).2| 00006ba0 5e 28 77 25 2b 32 37 29 29 3d 30 80 28 63 25 28 |^(w%+27))=0.(c%(| 00006bb0 65 25 29 80 26 38 34 30 30 30 30 30 30 29 3d 26 |e%).&84000000)=&| 00006bc0 30 34 30 30 30 30 30 30 8c 51 6c 25 3d 65 25 0d |04000000.Ql%=e%.| 00006bd0 97 ab 0b 65 25 2b 3d 31 3a ce 0d 97 c6 05 cd 0d |...e%+=1:.......| 00006be0 97 c6 0e e7 51 6c 25 3d 2d 31 8c 3d a3 0d 97 cf |....Ql%=-1.=....| 00006bf0 35 c8 99 26 32 30 30 31 45 2c 34 2c 62 24 28 51 |5..&2001E,4,b$(Q| 00006c00 6c 25 29 3a 63 25 28 51 6c 25 29 3d 28 63 25 28 |l%):c%(Ql%)=(c%(| 00006c10 51 6c 25 29 84 32 5e 32 36 29 82 32 5e 32 36 3a |Ql%).2^26).2^26:| 00006c20 3d b9 0d 97 fc 33 dd f2 48 28 71 25 2c 53 6b 25 |=....3..H(q%,Sk%| 00006c30 2c 6e 25 2c 64 25 29 3a c8 99 26 34 30 31 38 35 |,n%,d%):..&40185| 00006c40 2c 71 25 2c 3f 28 6d 6a 25 2b 71 25 29 3a e7 53 |,q%,?(mj%+q%):.S| 00006c50 6b 25 3c 30 8c 0d 98 17 1b 53 6b 25 3d 34 3a 52 |k%<0.....Sk%=4:R| 00006c60 6c 25 3d 61 25 28 53 6b 25 29 2d 26 31 30 30 30 |l%=a%(Sk%)-&1000| 00006c70 0d 98 29 11 cc 3a 52 6c 25 3d 61 25 28 53 6b 25 |..)..:Rl%=a%(Sk%| 00006c80 29 0d 98 3b 05 cd 0d 98 3b 35 c8 99 26 34 30 31 |)..;....;5..&401| 00006c90 38 39 2c 71 25 2c 59 62 25 2c 52 6c 25 2c 58 62 |89,q%,Yb%,Rl%,Xb| 00006ca0 25 3a f2 65 28 6e 25 2c 64 25 29 3a 53 6c 25 3d |%:.e(n%,d%):Sl%=| 00006cb0 64 25 3a 54 6c 25 3d 71 25 3a e1 0d 98 68 27 dd |d%:Tl%=q%:...h'.| 00006cc0 f2 69 62 3a c8 99 26 34 30 31 38 39 2c 54 6c 25 |.ib:..&40189,Tl%| 00006cd0 2c 59 62 25 2b 32 5e 37 2c 52 6c 25 2c 57 62 25 |,Yb%+2^7,Rl%,Wb%| 00006ce0 3a e1 0d 98 8c 2b dd f2 73 63 3a ea 65 25 3a e3 |:....+..sc:.e%:.| 00006cf0 65 25 3d 31 b8 38 3a d4 65 25 2c 30 2c 30 2c 31 |e%=1.8:.e%,0,0,1| 00006d00 3a ed 3a c8 99 26 34 30 31 43 30 3a e1 0d 98 d4 |:.:..&401C0:....| 00006d10 85 dd f2 74 63 28 63 25 29 3a ea 65 25 3a 55 6c |...tc(c%):.e%:Ul| 00006d20 25 3d 63 25 3a e3 65 25 3d 30 b8 5a 62 25 2d 31 |%=c%:.e%=0.Zb%-1| 00006d30 3a 61 25 28 65 25 29 3d a0 28 c1 22 26 31 39 35 |:a%(e%)=.(."&195| 00006d40 35 26 31 36 41 41 26 31 35 35 35 26 31 32 41 41 |5&16AA&1555&12AA| 00006d50 26 31 30 30 30 26 30 45 41 41 26 30 43 30 30 26 |&1000&0EAA&0C00&| 00006d60 30 39 35 35 26 30 36 41 41 26 30 35 35 35 26 30 |0955&06AA&0555&0| 00006d70 32 41 41 22 2c 65 25 2a 35 2b 31 2c 35 29 29 2b |2AA",e%*5+1,5))+| 00006d80 56 6c 25 2a 26 31 30 30 30 3a ed 3a e7 ac 58 61 |Vl%*&1000:.:..Xa| 00006d90 25 8c 0d 99 1c 0a e7 63 25 3e 37 8c 0d 99 25 6a |%......c%>7...%j| 00006da0 63 25 2d 3d 37 3a e3 65 25 3d 31 b8 63 25 3a 61 |c%-=7:.e%=1.c%:a| 00006db0 25 28 a0 28 c1 22 35 32 36 33 30 34 31 22 2c 65 |%(.(."5263041",e| 00006dc0 25 2c 31 29 29 29 3d a0 28 c1 22 26 30 44 35 35 |%,1)))=.(."&0D55| 00006dd0 26 31 34 30 30 26 30 41 41 41 26 31 31 35 35 26 |&1400&0AAA&1155&| 00006de0 31 38 30 30 26 30 45 41 41 26 31 35 35 35 22 2c |1800&0EAA&1555",| 00006df0 65 25 2a 35 2d 34 2c 35 29 29 2b 56 6c 25 2a 26 |e%*5-4,5))+Vl%*&| 00006e00 31 30 30 30 3a ed 0d 99 52 0c cc 3a e7 63 25 3e |1000:...R..:.c%>| 00006e10 30 8c 0d 99 5b 64 e3 65 25 3d 31 b8 63 25 3a 61 |0...[d.e%=1.c%:a| 00006e20 25 28 a0 28 c1 22 31 34 30 33 36 32 35 22 2c 65 |%(.(."1403625",e| 00006e30 25 2c 31 29 29 29 3d a0 28 c1 22 26 31 38 30 30 |%,1)))=.(."&1800| 00006e40 26 31 31 35 35 26 31 41 41 41 26 31 34 30 30 26 |&1155&1AAA&1400&| 00006e50 30 44 35 35 26 31 36 41 41 26 31 30 30 30 22 2c |0D55&16AA&1000",| 00006e60 65 25 2a 35 2d 34 2c 35 29 29 2b 56 6c 25 2a 26 |e%*5-4,5))+Vl%*&| 00006e70 31 30 30 30 3a ed 0d 99 7f 05 cd 0d 99 7f 05 cd |1000:...........| 00006e80 0d 99 88 05 cd 0d 99 91 2d e3 65 25 3d 31 30 b8 |........-.e%=10.| 00006e90 37 88 2d 31 3a 61 25 28 65 25 29 3d 61 25 28 65 |7.-1:a%(e%)=a%(e| 00006ea0 25 2d 37 29 2d 26 31 30 30 30 3a ed 3a e7 58 61 |%-7)-&1000:.:.Xa| 00006eb0 25 8c 0d 99 b5 83 61 25 28 32 29 3d 61 25 28 31 |%.....a%(2)=a%(1| 00006ec0 29 3a 61 25 28 31 29 3d 61 25 28 30 29 3a 61 25 |):a%(1)=a%(0):a%| 00006ed0 28 30 29 3d 61 25 28 36 29 2b 26 31 30 30 30 3a |(0)=a%(6)+&1000:| 00006ee0 61 25 28 35 29 3d 61 25 28 36 29 3a 61 25 28 36 |a%(5)=a%(6):a%(6| 00006ef0 29 3d 61 25 28 37 29 3a 61 25 28 37 29 3d 61 25 |)=a%(7):a%(7)=a%| 00006f00 28 38 29 3a 61 25 28 38 29 3d 61 25 28 31 30 29 |(8):a%(8)=a%(10)| 00006f10 3a 61 25 28 39 29 3d 61 25 28 35 29 2d 26 31 30 |:a%(9)=a%(5)-&10| 00006f20 30 30 3a 61 25 28 31 30 29 3d 61 25 28 36 29 2d |00:a%(10)=a%(6)-| 00006f30 26 31 30 30 30 0d 9a 0f 05 cd 0d 9a 0f cd e3 65 |&1000..........e| 00006f40 25 3d 30 b8 31 30 3a 21 28 65 25 2a 34 2b 75 6a |%=0.10:!(e%*4+uj| 00006f50 25 29 3d 61 25 28 31 30 2d 65 25 29 3a ed 3a 21 |%)=a%(10-e%):.:!| 00006f60 58 6a 25 3d 61 25 28 34 29 2d 26 31 30 30 30 3a |Xj%=a%(4)-&1000:| 00006f70 e3 65 25 3d 30 b8 32 30 3a 6b 25 28 65 25 29 3d |.e%=0.20:k%(e%)=| 00006f80 a0 28 c1 22 26 30 32 41 41 26 30 35 35 35 26 30 |.(."&02AA&0555&0| 00006f90 36 41 41 26 30 39 35 35 26 30 43 30 30 26 30 45 |6AA&0955&0C00&0E| 00006fa0 41 41 26 31 30 30 30 26 31 32 41 41 26 31 35 35 |AA&1000&12AA&155| 00006fb0 35 26 31 36 41 41 26 31 39 35 35 26 30 34 30 30 |5&16AA&1955&0400| 00006fc0 26 37 46 46 46 26 30 38 30 30 26 30 41 41 41 26 |&7FFF&0800&0AAA&| 00006fd0 30 44 35 35 26 37 46 46 46 26 31 31 35 35 26 31 |0D55&7FFF&1155&1| 00006fe0 34 30 30 26 37 46 46 46 26 31 38 30 30 22 2c 65 |400&7FFF&1800",e| 00006ff0 25 2a 35 2b 31 2c 35 29 29 2b 56 6c 25 2a 26 31 |%*5+1,5))+Vl%*&1| 00007000 30 30 30 3a ed 3a e1 0d 9a 60 39 dd a4 4f 28 61 |000:.:...`9..O(a| 00007010 25 29 3a ea 65 25 2c 63 25 2c 62 25 3a 62 25 3d |%):.e%,c%,b%:b%=| 00007020 a4 66 28 22 4f 63 74 61 22 2c 61 25 29 3a e7 62 |.f("Octa",a%):.b| 00007030 25 3d 30 8c 62 25 3d a4 62 28 31 32 2c 61 25 29 |%=0.b%=.b(12,a%)| 00007040 0d 9a 8d 17 e7 62 25 3d 30 8c 62 25 3d a4 62 28 |.....b%=0.b%=.b(| 00007050 56 6c 25 2c 61 25 29 0d 9a 96 07 3d 62 25 0d 9a |Vl%,a%)....=b%..| 00007060 b1 1b dd a4 79 28 61 25 29 3a ea 65 25 2c 63 25 |....y(a%):.e%,c%| 00007070 2c 62 25 3a e7 57 6c 25 8c 0d 9a c3 23 62 25 3d |,b%:.Wl%....#b%=| 00007080 a4 61 28 63 25 2c 61 25 29 3a e7 62 25 3d 30 8c |.a(c%,a%):.b%=0.| 00007090 62 25 3d a4 61 28 63 25 2c 61 25 29 0d 9a d5 13 |b%=.a(c%,a%)....| 000070a0 56 6c 25 3d 63 25 3a f2 74 63 28 55 6c 25 29 0d |Vl%=c%:.tc(Ul%).| 000070b0 9a f0 0f cc 3a 62 25 3d a4 6a 28 61 25 29 0d 9b |....:b%=.j(a%)..| 000070c0 02 05 cd 0d 9b 02 07 3d 62 25 0d 9b 1d 39 dd a4 |.......=b%...9..| 000070d0 50 28 61 25 29 3a ea 65 25 2c 63 25 2c 62 25 3a |P(a%):.e%,c%,b%:| 000070e0 62 25 3d a4 66 28 22 4b 65 79 20 22 2c 61 25 29 |b%=.f("Key ",a%)| 000070f0 3a e7 62 25 3d 30 8c 62 25 3d a4 62 28 31 32 2c |:.b%=0.b%=.b(12,| 00007100 61 25 29 0d 9b 38 17 e7 62 25 3d 30 8c 62 25 3d |a%)..8..b%=0.b%=| 00007110 a4 62 28 55 6c 25 2c 61 25 29 0d 9b 41 07 3d 62 |.b(Ul%,a%)..A.=b| 00007120 25 0d 9b 5c 39 dd a4 51 28 61 25 29 3a ea 65 25 |%..\9..Q(a%):.e%| 00007130 2c 63 25 2c 62 25 3a 62 25 3d a4 66 28 22 50 65 |,c%,b%:b%=.f("Pe| 00007140 6e 74 22 2c 61 25 29 3a e7 62 25 3d 30 8c 62 25 |nt",a%):.b%=0.b%| 00007150 3d a4 62 28 31 32 2c 61 25 29 0d 9b 77 17 e7 62 |=.b(12,a%)..w..b| 00007160 25 3d 30 8c 62 25 3d a4 62 28 58 61 25 2c 61 25 |%=0.b%=.b(Xa%,a%| 00007170 29 0d 9b 80 07 3d 62 25 0d 9b 9b 1b dd a4 7a 28 |)....=b%......z(| 00007180 61 25 29 3a ea 65 25 2c 63 25 2c 62 25 3a e7 58 |a%):.e%,c%,b%:.X| 00007190 6c 25 8c 0d 9b ad 23 62 25 3d a4 61 28 63 25 2c |l%....#b%=.a(c%,| 000071a0 61 25 29 3a e7 62 25 3d 30 8c 62 25 3d a4 61 28 |a%):.b%=0.b%=.a(| 000071b0 63 25 2c 61 25 29 0d 9b bf 13 55 6c 25 3d 63 25 |c%,a%)....Ul%=c%| 000071c0 3a f2 74 63 28 55 6c 25 29 0d 9b da 0f cc 3a 62 |:.tc(Ul%).....:b| 000071d0 25 3d a4 6a 28 61 25 29 0d 9b ec 05 cd 0d 9b ec |%=.j(a%)........| 000071e0 07 3d 62 25 0d 9c 07 1b dd a4 42 28 61 25 29 3a |.=b%......B(a%):| 000071f0 ea 65 25 2c 63 25 2c 62 25 3a e7 58 6c 25 8c 0d |.e%,c%,b%:.Xl%..| 00007200 9c 19 23 62 25 3d a4 61 28 63 25 2c 61 25 29 3a |..#b%=.a(c%,a%):| 00007210 e7 62 25 3d 30 8c 62 25 3d a4 61 28 63 25 2c 61 |.b%=0.b%=.a(c%,a| 00007220 25 29 0d 9c 2b 18 58 61 25 3d 63 25 3a e7 63 25 |%)..+.Xa%=c%:.c%| 00007230 8c 63 25 3d 30 8b 63 25 3d 32 0d 9c 3d 1b 21 46 |.c%=0.c%=2..=.!F| 00007240 69 25 3d 63 25 3a 43 62 25 3d 63 25 3a f2 74 63 |i%=c%:Cb%=c%:.tc| 00007250 28 55 6c 25 29 0d 9c 61 0f cc 3a 62 25 3d a4 6a |(Ul%)..a..:b%=.j| 00007260 28 61 25 29 0d 9c 73 05 cd 0d 9c 73 07 3d 62 25 |(a%)..s....s.=b%| 00007270 0d 9c 97 24 dd f2 75 63 28 64 25 29 3a e7 64 25 |...$..uc(d%):.d%| 00007280 3d 6f 66 25 8c f2 52 28 74 25 2c 64 25 2c 58 25 |=of%..R(t%,d%,X%| 00007290 2c 59 25 29 0d 9c a9 15 e7 64 25 3e 3d 6c 66 25 |,Y%).....d%>=lf%| 000072a0 80 64 25 3c 3d 6d 66 25 8c 0d 9c b2 20 e7 55 61 |.d%<=mf%.... .Ua| 000072b0 25 3c 3e 32 8c f2 53 28 28 28 64 25 2d 6c 66 25 |%<>2..S(((d%-lf%| 000072c0 29 83 5f 62 25 29 2b 31 29 0d 9c bb 05 cd 0d 9c |)._b%)+1).......| 000072d0 c4 05 e1 0d 9c cd 27 dd f2 76 63 28 70 25 2c 64 |......'..vc(p%,d| 000072e0 25 2c 58 25 2c 59 25 29 3a ea 63 25 3a e7 28 70 |%,X%,Y%):.c%:.(p| 000072f0 25 80 28 35 3c 3c 34 29 29 8c 0d 9c f1 09 c8 8e |%.(5<<4)).......| 00007300 64 25 ca 0d 9c fa 1c c9 6f 66 25 2c 71 66 25 3a |d%......of%,qf%:| 00007310 f2 47 28 74 25 2c 64 25 2c 58 25 2c 59 25 29 0d |.G(t%,d%,X%,Y%).| 00007320 9d 15 05 cb 0d 9d 15 05 cd 0d 9d 1e 0c e7 28 70 |..............(p| 00007330 25 80 34 29 8c 0d 9d 27 09 c8 8e 64 25 ca 0d 9d |%.4)...'...d%...| 00007340 30 24 c9 64 66 25 2c 65 66 25 2c 73 66 25 2c 72 |0$.df%,ef%,sf%,r| 00007350 66 25 3a e7 70 25 3c 37 8c f2 65 28 74 25 2c 64 |f%:.p%<7..e(t%,d| 00007360 25 29 0d 9d 42 31 c9 6a 66 25 3a f2 6c 28 30 29 |%)..B1.jf%:.l(0)| 00007370 3a c8 99 26 34 34 41 44 44 2c 37 2c 74 25 2c 64 |:..&44ADD,7,t%,d| 00007380 25 3a f2 6f 62 28 74 25 2c 69 66 25 2c 64 66 25 |%:.ob(t%,if%,df%| 00007390 2c 30 29 0d 9d 6f 2c c9 68 66 25 3a c8 99 26 34 |,0)..o,.hf%:..&4| 000073a0 34 41 44 44 2c 37 2c 74 25 2c 64 25 3a f2 44 28 |4ADD,7,t%,d%:.D(| 000073b0 74 25 2c 69 66 25 2c 64 66 25 2c 30 2c b9 29 0d |t%,if%,df%,0,.).| 000073c0 9d 8a 44 c9 67 66 25 3a c8 99 26 34 34 41 44 44 |..D.gf%:..&44ADD| 000073d0 2c 37 2c 74 25 2c 64 25 3a c8 99 26 34 34 41 44 |,7,t%,d%:..&44AD| 000073e0 44 2c 37 2c 74 25 2c 68 66 25 3a 4f 6b 25 3d b9 |D,7,t%,hf%:Ok%=.| 000073f0 3a f2 44 28 74 25 2c 69 66 25 2c 64 66 25 2c 30 |:.D(t%,if%,df%,0| 00007400 2c b9 29 0d 9d b7 2c c9 66 66 25 3a c8 99 26 34 |,.)...,.ff%:..&4| 00007410 34 41 44 44 2c 37 2c 74 25 2c 64 25 3a f2 44 28 |4ADD,7,t%,d%:.D(| 00007420 74 25 2c 69 66 25 2c 64 66 25 2c 30 2c a3 29 0d |t%,if%,df%,0,.).| 00007430 9d d2 16 c9 69 66 25 3a f2 6f 28 74 25 2c 64 25 |....if%:.o(t%,d%| 00007440 2c 64 66 25 29 0d 9d e4 2e c9 6f 66 25 3a c8 99 |,df%).....of%:..| 00007450 26 34 34 41 44 34 2c 30 2c 74 25 2c 64 25 2c 58 |&44AD4,0,t%,d%,X| 00007460 25 2c 59 25 b8 63 25 3a f2 64 28 28 63 25 2b 34 |%,Y%.c%:.d((c%+4| 00007470 30 29 29 0d 9d ff 29 c9 71 66 25 3a c8 99 26 34 |0))...).qf%:..&4| 00007480 34 41 44 34 2c 30 2c 74 25 2c 64 25 2c 58 25 2c |4AD4,0,t%,d%,X%,| 00007490 59 25 b8 63 25 3a f2 71 28 63 25 29 0d 9e 1a 18 |Y%.c%:.q(c%)....| 000074a0 c9 75 66 25 3a e7 ac 50 61 25 8c f2 65 28 74 25 |.uf%:..Pa%..e(t%| 000074b0 2c 64 25 29 0d 9e 23 29 c8 99 26 34 34 41 44 34 |,d%)..#)..&44AD4| 000074c0 2c 31 2c 74 25 2c 6f 66 25 b8 63 25 3a 63 25 2d |,1,t%,of%.c%:c%-| 000074d0 3d 31 3a e7 63 25 3c 30 8c 63 25 3d 30 0d 9e 3e |=1:.c%<0.c%=0..>| 000074e0 27 c8 99 26 34 34 41 44 34 2c 32 2c 74 25 2c 6f |'..&44AD4,2,t%,o| 000074f0 66 25 2c 63 25 b8 63 25 3a f2 64 28 28 63 25 2b |f%,c%.c%:.d((c%+| 00007500 34 30 29 29 0d 9e 59 1b c9 77 66 25 3a c8 99 26 |40))..Y..wf%:..&| 00007510 34 34 41 44 36 2c 6c 64 25 2c 58 25 2c 59 25 0d |44AD6,ld%,X%,Y%.| 00007520 9e 62 18 c9 76 66 25 3a e7 ac 50 61 25 8c f2 65 |.b..vf%:..Pa%..e| 00007530 28 74 25 2c 64 25 29 0d 9e 6b 2d c8 99 26 34 34 |(t%,d%)..k-..&44| 00007540 41 44 34 2c 31 2c 74 25 2c 6f 66 25 b8 63 25 3a |AD4,1,t%,of%.c%:| 00007550 63 25 2b 3d 31 3a e7 63 25 3e 32 35 35 8c 63 25 |c%+=1:.c%>255.c%| 00007560 3d 32 35 35 0d 9e 86 27 c8 99 26 34 34 41 44 34 |=255...'..&44AD4| 00007570 2c 32 2c 74 25 2c 6f 66 25 2c 63 25 b8 63 25 3a |,2,t%,of%,c%.c%:| 00007580 f2 64 28 28 63 25 2b 34 30 29 29 0d 9e aa 05 cb |.d((c%+40)).....| 00007590 0d 9e aa 05 cd 0d 9e b3 05 e1 0d 9e bc 69 dd f2 |.............i..| 000075a0 45 62 3a f2 68 28 42 66 25 29 3a f2 54 28 74 25 |Eb:.h(Bf%):.T(t%| 000075b0 29 3a f2 79 28 31 2c 67 62 25 29 3a 4f 6b 25 3d |):.y(1,gb%):Ok%=| 000075c0 a3 3a f2 55 28 30 29 3a f2 56 28 74 25 2c 71 66 |.:.U(0):.V(t%,qf| 000075d0 25 29 3a c8 99 26 34 34 41 44 34 2c 31 2c 74 25 |%):..&44AD4,1,t%| 000075e0 2c 6f 66 25 b8 63 25 3a f2 64 28 63 25 2b 34 30 |,of%.c%:.d(c%+40| 000075f0 29 3a f2 74 3a f2 73 28 64 66 25 2c 74 25 2c 30 |):.t:.s(df%,t%,0| 00007600 29 3a e1 0d 9f 31 15 dd f2 77 63 3a ea 64 25 3a |):...1...wc:.d%:| 00007610 e7 55 61 25 3c 3e 32 8c 0d 9f 55 3e c8 99 26 34 |.Ua%<>2...U>..&4| 00007620 30 30 43 46 2c 2c 68 25 3a 64 25 3d 68 25 21 31 |00CF,,h%:d%=h%!1| 00007630 36 3a e7 64 25 3e 3d 6c 66 25 80 64 25 2d 6c 66 |6:.d%>=lf%.d%-lf| 00007640 25 3c 3d 5f 62 25 2a 5a 62 25 80 28 68 25 21 38 |%<=_b%*Zb%.(h%!8| 00007650 80 34 29 3d 34 8c 0d 9f 70 0b f2 78 63 28 64 25 |.4)=4...p..xc(d%| 00007660 29 0d 9f 82 09 cc 3a f2 79 63 0d 9f 94 05 cd 0d |).....:.yc......| 00007670 9f 94 05 cd 0d 9f 9d 05 e1 0d 9f a6 16 dd f2 78 |...............x| 00007680 63 28 64 25 29 3a e7 64 25 3c 3e 63 63 25 8c 0d |c(d%):.d%<>cc%..| 00007690 9f c1 10 f2 79 63 3a f2 5f 28 32 2c 64 25 29 0d |....yc:._(2,d%).| 000076a0 9f dc 05 cd 0d 9f dc 05 e1 0d 9f e5 11 dd f2 79 |...............y| 000076b0 63 3a e7 63 63 25 3e 2d 31 8c 0d a0 00 0d f2 5f |c:.cc%>-1......_| 000076c0 28 33 2c 63 63 25 29 0d a0 12 05 cd 0d a0 12 05 |(3,cc%).........| 000076d0 e1 0d a0 1b 25 dd f2 7a 63 28 48 25 2c 4a 25 29 |....%..zc(H%,J%)| 000076e0 3a f2 57 28 48 25 2c 4a 25 29 3a f2 58 28 48 25 |:.W(H%,J%):.X(H%| 000076f0 2c 4a 25 29 3a e1 0d a0 48 22 dd f2 41 63 3a f2 |,J%):...H"..Ac:.| 00007700 6f 28 74 25 2c 69 66 25 2c 64 66 25 29 3a f2 6d |o(t%,if%,df%):.m| 00007710 3a f2 41 3a f2 72 3a e1 0d a0 87 12 dd f2 42 63 |:.A:.r:.......Bc| 00007720 28 64 25 29 3a c8 8e 64 25 ca 0d a0 a2 14 c9 64 |(d%):..d%......d| 00007730 66 25 3a f2 73 28 64 25 2c 74 25 2c 31 29 0d a0 |f%:.s(d%,t%,1)..| 00007740 b4 13 c9 65 66 25 3a f2 68 28 74 25 29 3a f2 41 |...ef%:.h(t%):.A| 00007750 63 0d a0 bd 11 c9 73 66 25 3a f2 76 28 6f 25 2c |c.....sf%:.v(o%,| 00007760 37 29 0d a0 c6 11 c9 72 66 25 3a f2 76 28 6f 25 |7).....rf%:.v(o%| 00007770 2c 36 29 0d a0 cf 05 cb 0d a0 cf 05 e1 0d a0 d8 |,6).............| 00007780 2b dd f2 65 61 3a ea 59 6c 25 3a f5 3a c8 99 26 |+..ea:.Yl%:.:..&| 00007790 34 30 30 43 37 2c 4d 61 25 2c 6d 63 25 b8 59 6c |400C7,Ma%,mc%.Yl| 000077a0 25 3a c8 8e 59 6c 25 ca 0d a1 20 0f c9 31 3a f2 |%:..Yl%... ..1:.| 000077b0 43 63 28 6d 63 25 29 0d a1 32 0f c9 32 3a f2 44 |Cc(mc%)..2..2:.D| 000077c0 63 28 6d 63 25 29 0d a1 3b 10 c9 33 3a f2 45 63 |c(mc%)..;..3:.Ec| 000077d0 28 21 6d 63 25 29 0d a1 44 0f c9 34 3a f2 46 63 |(!mc%)..D..4:.Fc| 000077e0 28 6d 63 25 29 0d a1 4d 0f c9 35 3a f2 47 63 28 |(mc%)..M..5:.Gc(| 000077f0 6d 63 25 29 0d a1 56 0f c9 36 3a f2 48 63 28 6d |mc%)..V..6:.Hc(m| 00007800 63 25 29 0d a1 5f 0a c9 37 3a f2 49 63 0d a1 68 |c%).._..7:.Ic..h| 00007810 0f c9 38 3a f2 4a 63 28 6d 63 25 29 0d a1 71 0f |..8:.Jc(mc%)..q.| 00007820 c9 39 3a f2 4b 63 28 6d 63 25 29 0d a1 7a 0b c9 |.9:.Kc(mc%)..z..| 00007830 31 31 3a f2 6a 63 0d a1 83 13 c9 31 37 2c 31 38 |11:.jc.....17,18| 00007840 3a f2 4c 63 28 6d 63 25 29 0d a1 8c 05 cb 0d a1 |:.Lc(mc%).......| 00007850 8c 18 e7 59 6c 25 3c 3e 31 37 80 59 6c 25 3c 3e |...Yl%<>17.Yl%<>| 00007860 31 38 8c f2 62 62 0d a1 95 0a fd 76 61 25 3a e1 |18..bb.....va%:.| 00007870 0d a1 a7 13 dd f2 47 63 28 73 25 29 3a c8 8e 21 |......Gc(s%):..!| 00007880 73 25 ca 0d a1 c2 0d c9 6f 25 3a 4b 61 25 3d b9 |s%......o%:Ka%=.| 00007890 0d a1 d4 0d c9 6c 25 3a 51 61 25 3d b9 0d a1 dd |.....l%:Qa%=....| 000078a0 0d c9 74 25 3a 4c 61 25 3d b9 0d a1 e6 15 c9 6b |..t%:La%=......k| 000078b0 25 2c 64 68 25 3a 54 61 25 3d b9 3a f2 64 63 0d |%,dh%:Ta%=.:.dc.| 000078c0 a1 ef 0d c9 6d 25 3a 76 63 25 3d b9 0d a1 f8 05 |....m%:vc%=.....| 000078d0 cb 0d a1 f8 08 f2 67 3a e1 0d a2 0a 38 dd f2 46 |......g:....8..F| 000078e0 63 28 73 25 29 3a ea 41 25 2c 5a 6c 25 3a 5a 6c |c(s%):.A%,Zl%:Zl| 000078f0 25 3d a3 3a 41 25 3d 21 73 25 3a e7 41 25 3d 6c |%=.:A%=!s%:.A%=l| 00007900 64 25 8c c8 99 26 34 30 30 43 36 2c 2c 73 25 3a |d%...&400C6,,s%:| 00007910 e1 0d a2 40 08 c8 8e b9 ca 0d a2 49 18 c9 4b 61 |...@.......I..Ka| 00007920 25 3a f2 61 62 3a 4b 61 25 3d a3 3a 5a 6c 25 3d |%:.ab:Ka%=.:Zl%=| 00007930 b9 0d a2 76 4e c9 54 61 25 3a c8 99 26 34 30 30 |...vN.Ta%:..&400| 00007940 43 46 2c 2c 67 25 3a e7 28 67 25 21 31 32 3c 3e |CF,,g%:.(g%!12<>| 00007950 64 68 25 80 67 25 21 31 32 3c 3e 6b 25 29 84 28 |dh%.g%!12<>k%).(| 00007960 67 25 21 31 32 3d 41 25 80 41 25 3d 6b 25 29 8c |g%!12=A%.A%=k%).| 00007970 f2 67 63 3a 54 61 25 3d a3 3a 5a 6c 25 3d b9 0d |.gc:Ta%=.:Zl%=..| 00007980 a2 88 18 c9 51 61 25 3a f2 74 62 3a 51 61 25 3d |....Qa%:.tb:Qa%=| 00007990 a3 3a 5a 6c 25 3d b9 0d a2 b5 14 c9 4c 61 25 3a |.:Zl%=......La%:| 000079a0 4c 61 25 3d a3 3a 5a 6c 25 3d b9 0d a2 d0 12 c9 |La%=.:Zl%=......| 000079b0 76 63 25 3a 76 63 25 3d a3 3a f2 4d 63 0d a2 eb |vc%:vc%=.:.Mc...| 000079c0 05 cb 0d a2 eb 0e f2 67 3a e7 5a 6c 25 3d b9 8c |.......g:.Zl%=..| 000079d0 0d a2 fd 0d 41 25 3d 30 3a d6 62 6a 25 0d a3 18 |....A%=0:.bj%...| 000079e0 05 cd 0d a3 18 05 e1 0d a3 21 19 dd f2 45 63 28 |.........!...Ec(| 000079f0 41 25 29 3a f2 68 28 41 25 29 3a c8 8e 41 25 ca |A%):.h(A%):..A%.| 00007a00 0d a3 45 0c c9 42 66 25 3a f2 47 62 0d a3 57 0b |..E..Bf%:.Gb..W.| 00007a10 c9 74 25 3a f2 41 63 0d a3 60 0a c9 6f 25 3a f2 |.t%:.Ac..`..o%:.| 00007a20 59 0d a3 69 0b c9 76 64 25 3a f2 72 0d a3 72 0b |Y..i..vd%:.r..r.| 00007a30 c9 6c 25 3a f2 76 62 0d a3 7b 0b c9 6b 25 3a f2 |.l%:.vb..{..k%:.| 00007a40 5a 62 0d a3 84 05 cb 0d a3 84 05 e1 0d a3 8d 15 |Zb..............| 00007a50 dd f2 4c 63 28 73 25 29 3a c8 8e 73 25 21 31 36 |..Lc(s%):..s%!16| 00007a60 ca 0d a3 a8 0c c9 30 3a 76 61 25 3d b9 0d a3 ba |......0:va%=....| 00007a70 18 c9 38 3a e7 5a 63 25 84 5f 63 25 84 59 63 25 |..8:.Zc%._c%.Yc%| 00007a80 84 58 63 25 8c 0d a3 c3 26 f2 6e 28 32 2c 2d 31 |.Xc%....&.n(2,-1| 00007a90 29 3a 73 25 21 31 32 3d 73 25 21 38 3a c8 99 26 |):s%!12=s%!8:..&| 00007aa0 34 30 30 45 37 2c 31 39 2c 73 25 0d a3 e7 05 cd |400E7,19,s%.....| 00007ab0 0d a3 e7 4d c9 33 3a f2 62 28 22 4c 6f 61 64 69 |...M.3:.b("Loadi| 00007ac0 6e 67 20 76 69 61 20 64 72 61 67 67 69 6e 67 20 |ng via dragging | 00007ad0 6e 6f 74 20 69 6d 70 6c 65 6d 65 6e 74 65 64 20 |not implemented | 00007ae0 79 65 74 2e 20 54 72 79 20 64 6f 75 62 6c 65 20 |yet. Try double | 00007af0 63 6c 69 63 6b 69 6e 67 2e 22 2c a3 29 0d a3 f9 |clicking.",.)...| 00007b00 0e c9 35 3a f2 4e 63 28 73 25 29 0d a4 02 0f c9 |..5:.Nc(s%).....| 00007b10 26 34 30 30 43 31 3a f2 63 61 0d a4 0b 05 cb 0d |&400C1:.ca......| 00007b20 a4 0b 05 e1 0d a4 14 5c dd f2 48 63 28 73 25 29 |.......\..Hc(s%)| 00007b30 3a ea 70 25 2c 6e 25 2c 64 25 2c 58 25 2c 59 25 |:.p%,n%,d%,X%,Y%| 00007b40 3a 58 25 3d 73 25 21 30 3a 59 25 3d 73 25 21 34 |:X%=s%!0:Y%=s%!4| 00007b50 3a 70 25 3d 73 25 21 38 3a 6e 25 3d 73 25 21 31 |:p%=s%!8:n%=s%!1| 00007b60 32 3a 64 25 3d 73 25 21 31 36 3a e7 6e 25 3c 3e |2:d%=s%!16:.n%<>| 00007b70 4d 66 25 8c c8 99 26 34 34 41 43 45 2c 2c 73 25 |Mf%...&44ACE,,s%| 00007b80 0d a4 5c 0c e7 28 70 25 80 32 29 8c 0d a4 65 09 |..\..(p%.2)...e.| 00007b90 c8 8e 6e 25 ca 0d a4 6e 1d c9 2d 32 3a f2 60 28 |..n%...n..-2:.`(| 00007ba0 57 68 25 2c 58 25 2d 35 30 2c 39 36 2b 34 34 2a |Wh%,X%-50,96+44*| 00007bb0 33 29 0d a4 80 0f c9 74 25 3a f2 75 63 28 64 25 |3).....t%:.uc(d%| 00007bc0 29 0d a4 89 15 c9 6f 25 3a f2 54 61 28 64 25 2c |).....o%:.Ta(d%,| 00007bd0 58 25 2c 59 25 29 0d a4 92 15 c9 6c 25 3a f2 6c |X%,Y%).....l%:.l| 00007be0 62 28 64 25 2c 58 25 2c 59 25 29 0d a4 9b 15 c9 |b(d%,X%,Y%).....| 00007bf0 6b 25 3a f2 50 62 28 64 25 2c 58 25 2c 59 25 29 |k%:.Pb(d%,X%,Y%)| 00007c00 0d a4 a4 15 c9 6d 25 3a f2 4f 63 28 64 25 2c 58 |.....m%:.Oc(d%,X| 00007c10 25 2c 59 25 29 0d a4 ad 10 c9 6c 64 25 3a f2 68 |%,Y%).....ld%:.h| 00007c20 28 6c 64 25 29 0d a4 b6 05 cb 0d a4 b6 0b cc 3a |(ld%)..........:| 00007c30 c8 8e 6e 25 ca 0d a4 c8 10 c9 2d 32 3a e7 ac 41 |..n%......-2:..A| 00007c40 61 25 8c f2 41 0d a4 d1 18 c9 74 25 3a f2 76 63 |a%..A.....t%:.vc| 00007c50 28 70 25 2c 64 25 2c 58 25 2c 59 25 29 0d a4 e3 |(p%,d%,X%,Y%)...| 00007c60 18 c9 6b 25 3a f2 51 62 28 70 25 2c 64 25 2c 58 |..k%:.Qb(p%,d%,X| 00007c70 25 2c 59 25 29 0d a4 ec 13 c9 4d 66 25 3a f2 79 |%,Y%).....Mf%:.y| 00007c80 62 28 70 25 2c 64 25 29 0d a4 f5 13 c9 42 66 25 |b(p%,d%).....Bf%| 00007c90 3a f2 44 62 28 70 25 2c 64 25 29 0d a4 fe 18 c9 |:.Db(p%,d%).....| 00007ca0 6f 25 3a f2 55 61 28 70 25 2c 64 25 2c 58 25 2c |o%:.Ua(p%,d%,X%,| 00007cb0 59 25 29 0d a5 07 18 c9 6c 25 3a f2 6e 62 28 70 |Y%).....l%:.nb(p| 00007cc0 25 2c 64 25 2c 58 25 2c 59 25 29 0d a5 10 13 c9 |%,d%,X%,Y%).....| 00007cd0 76 64 25 3a f2 50 63 28 70 25 2c 64 25 29 0d a5 |vd%:.Pc(p%,d%)..| 00007ce0 19 19 c9 4d 65 25 3a f2 51 63 28 70 25 2c 64 25 |...Me%:.Qc(p%,d%| 00007cf0 2c 58 25 2c 59 25 29 0d a5 22 18 c9 60 25 3a f2 |,X%,Y%).."..`%:.| 00007d00 52 63 28 70 25 2c 64 25 2c 58 25 2c 59 25 29 0d |Rc(p%,d%,X%,Y%).| 00007d10 a5 2b 19 c9 4f 64 25 3a f2 53 63 28 70 25 2c 64 |.+..Od%:.Sc(p%,d| 00007d20 25 2c 58 25 2c 59 25 29 0d a5 34 18 c9 6d 25 3a |%,X%,Y%)..4..m%:| 00007d30 f2 54 63 28 70 25 2c 64 25 2c 58 25 2c 59 25 29 |.Tc(p%,d%,X%,Y%)| 00007d40 0d a5 3d 19 c9 57 65 25 3a f2 55 63 28 70 25 2c |..=..We%:.Uc(p%,| 00007d50 64 25 2c 58 25 2c 59 25 29 0d a5 46 16 c9 64 68 |d%,X%,Y%)..F..dh| 00007d60 25 3a f2 4a 62 28 70 25 2c 58 25 2c 59 25 29 0d |%:.Jb(p%,X%,Y%).| 00007d70 a5 4f 13 c9 5f 61 25 3a f2 56 63 28 70 25 2c 64 |.O.._a%:.Vc(p%,d| 00007d80 25 29 0d a5 58 16 c9 6a 64 25 3a f2 57 63 28 70 |%)..X..jd%:.Wc(p| 00007d90 25 2c 58 25 2c 59 25 29 0d a5 61 10 c9 6c 64 25 |%,X%,Y%)..a..ld%| 00007da0 3a f2 68 28 6c 64 25 29 0d a5 6a 05 cb 0d a5 6a |:.h(ld%)..j....j| 00007db0 05 cd 0d a5 73 17 e7 6e 25 3c 3e 4d 66 25 8c c8 |....s..n%<>Mf%..| 00007dc0 99 26 34 34 41 43 46 2c 35 0d a5 7c 05 e1 0d a5 |.&44ACF,5..|....| 00007dd0 85 11 dd f2 49 63 3a ea 41 25 3a c8 8e b9 ca 0d |....Ic:.A%:.....| 00007de0 a5 a9 11 c9 28 4a 61 25 3c 3e 30 29 3a f2 58 63 |....(Ja%<>0):.Xc| 00007df0 0d a5 bb 12 c9 49 61 25 3a f2 59 63 3a 49 61 25 |.....Ia%:.Yc:Ia%| 00007e00 3d a3 0d a5 d6 17 c9 53 61 25 3a 41 25 3d a0 28 |=......Sa%:A%=.(| 00007e10 56 24 29 3a 53 61 25 3d a3 0d a5 f1 05 cb 0d a5 |V$):Sa%=........| 00007e20 f1 08 f2 67 3a e1 0d a6 03 80 dd f2 5a 63 28 57 |...g:.......Zc(W| 00007e30 24 29 3a 53 61 25 3d b9 3a 56 24 3d 57 24 3a c8 |$):Sa%=.:V$=W$:.| 00007e40 97 58 25 2c 59 25 2c 42 25 3a 68 25 21 34 3d 37 |.X%,Y%,B%:h%!4=7| 00007e50 3a 68 25 21 38 3d 58 25 3a 68 25 21 31 32 3d 59 |:h%!8=X%:h%!12=Y| 00007e60 25 3a 68 25 21 31 36 3d 58 25 3a 68 25 21 32 30 |%:h%!16=X%:h%!20| 00007e70 3d 59 25 3a 68 25 21 32 34 3d 30 3a 68 25 21 32 |=Y%:h%!24=0:h%!2| 00007e80 38 3d 30 3a 68 25 21 33 32 3d 77 63 25 3a 68 25 |8=0:h%!32=wc%:h%| 00007e90 21 33 36 3d 78 63 25 3a c8 99 26 34 30 30 44 30 |!36=xc%:..&400D0| 00007ea0 2c 2c 68 25 3a e1 0d a6 93 1f dd f2 65 28 6e 25 |,,h%:.......e(n%| 00007eb0 2c 64 25 29 3a ea 58 25 2c 59 25 2c 42 25 3a e7 |,d%):.X%,Y%,B%:.| 00007ec0 64 25 3c 30 8c 0d a6 b7 23 c8 97 58 25 2c 59 25 |d%<0....#..X%,Y%| 00007ed0 2c 42 25 3a c8 99 26 34 34 41 44 39 2c 58 25 2c |,B%:..&44AD9,X%,| 00007ee0 59 25 2c 58 25 2c 59 25 0d a6 d2 18 cc 3a c8 99 |Y%,X%,Y%.....:..| 00007ef0 26 34 34 41 44 44 2c 33 2c 6e 25 2c 64 25 2c 31 |&44ADD,3,n%,d%,1| 00007f00 0d a6 e4 05 cd 0d a6 e4 1c 50 61 25 3d b9 3a 5f |.........Pa%=.:_| 00007f10 6c 25 3d 6e 25 3a 60 6c 25 3d 64 25 3a f2 67 3a |l%=n%:`l%=d%:.g:| 00007f20 e1 0d a7 11 1d dd f2 5f 63 3a c8 99 26 34 30 30 |......._c:..&400| 00007f30 43 46 2c 2c 68 25 3a e7 60 6c 25 3c 30 8c 0d a7 |CF,,h%:.`l%<0...| 00007f40 35 1b e7 68 25 21 31 32 3c 3e 5f 6c 25 84 28 68 |5..h%!12<>_l%.(h| 00007f50 25 21 38 80 37 29 3d 30 8c 0d a7 3e 14 f2 60 63 |%!8.7)=0...>..`c| 00007f60 3a c8 99 26 34 34 41 44 39 2c 2c 2d 32 0d a7 59 |:..&44AD9,,-2..Y| 00007f70 05 cd 0d a7 59 28 cc 3a e7 68 25 21 31 32 3c 3e |....Y(.:.h%!12<>| 00007f80 5f 6c 25 84 68 25 21 31 36 3c 3e 60 6c 25 84 28 |_l%.h%!16<>`l%.(| 00007f90 68 25 21 38 80 37 29 3d 30 8c 0d a7 6b 1c f2 60 |h%!8.7)=0...k..`| 00007fa0 63 3a c8 99 26 34 34 41 44 44 2c 33 2c 5f 6c 25 |c:..&44ADD,3,_l%| 00007fb0 2c 60 6c 25 2c 30 0d a7 86 05 cd 0d a7 86 05 cd |,`l%,0..........| 00007fc0 0d a7 8f 05 e1 0d a7 98 0f dd f2 60 63 3a c8 8e |...........`c:..| 00007fd0 5f 6c 25 ca 0d a7 b3 10 c9 6f 25 3a f2 67 62 28 |_l%......o%:.gb(| 00007fe0 60 6c 25 29 0d a7 c5 10 c9 6b 25 3a f2 65 63 28 |`l%).....k%:.ec(| 00007ff0 60 6c 25 29 0d a7 ce 11 c9 4d 66 25 3a f2 43 62 |`l%).....Mf%:.Cb| 00008000 28 60 6c 25 29 0d a7 d7 10 c9 74 25 3a f2 42 63 |(`l%).....t%:.Bc| 00008010 28 60 6c 25 29 0d a7 e0 10 c9 6c 25 3a f2 77 62 |(`l%).....l%:.wb| 00008020 28 60 6c 25 29 0d a7 e9 10 c9 6d 25 3a f2 61 64 |(`l%).....m%:.ad| 00008030 28 60 6c 25 29 0d a7 f2 11 c9 76 64 25 3a f2 62 |(`l%).....vd%:.b| 00008040 64 28 60 6c 25 29 0d a7 fb 11 c9 5f 61 25 3a f2 |d(`l%)....._a%:.| 00008050 63 64 28 60 6c 25 29 0d a8 04 05 cb 0d a8 04 0e |cd(`l%).........| 00008060 50 61 25 3d a3 3a f2 67 3a e1 0d a8 1f 12 dd f2 |Pa%=.:.g:.......| 00008070 62 62 3a ea 41 25 3a e7 7a 61 25 8c 0d a8 43 09 |bb:.A%:.za%...C.| 00008080 7a 61 25 3d a3 0d a8 55 11 cc 3a e7 55 61 25 3c |za%=...U..:.Ua%<| 00008090 3e 30 8c f2 64 64 0d a8 5e 0c e7 50 61 25 8c f2 |>0..dd..^..Pa%..| 000080a0 5f 63 0d a8 67 0c e7 4c 61 25 8c f2 77 63 0d a8 |_c..g..La%..wc..| 000080b0 70 19 e7 71 61 25 8c f2 45 28 c6 8f 2c 28 63 6c |p..qa%..E(..,(cl| 000080c0 25 80 71 61 25 29 29 0d a8 79 0c e7 49 61 25 8c |%.qa%))..y..Ia%.| 000080d0 f2 59 63 0d a8 82 0c e7 4b 61 25 8c f2 61 62 0d |.Yc.....Ka%..ab.| 000080e0 a8 8b 0c e7 54 61 25 8c f2 67 63 0d a8 94 0c e7 |....Ta%..gc.....| 000080f0 51 61 25 8c f2 74 62 0d a8 9d 0c e7 79 62 25 8c |Qa%..tb.....yb%.| 00008100 f2 64 62 0d a8 a6 0c e7 4b 62 25 8c f2 68 63 0d |.db.....Kb%..hc.| 00008110 a8 af 0c e7 52 61 25 8c f2 65 64 0d a8 b8 0c e7 |....Ra%..ed.....| 00008120 76 63 25 8c f2 4d 63 0d a8 c1 05 cd 0d a8 ca 2e |vc%..Mc.........| 00008130 41 25 3d 26 32 30 2b 26 32 30 2b 26 32 3a c8 99 |A%=&20+&20+&2:..| 00008140 41 25 b8 41 25 3a e7 75 62 25 3d 2d 31 8c 75 62 |A%.A%:.ub%=-1.ub| 00008150 25 3d 41 25 2b 38 39 39 37 35 0d a8 e5 1e e7 41 |%=A%+89975.....A| 00008160 25 3e 75 62 25 8c f2 62 28 bd 28 31 31 37 29 2c |%>ub%..b(.(117),| 00008170 b9 29 3a 76 61 25 3d b9 0d a8 ee 05 e1 0d a8 f7 |.):va%=.........| 00008180 43 dd f2 59 63 3a ea 58 25 2c 59 25 2c 42 25 2c |C..Yc:.X%,Y%,B%,| 00008190 63 25 3a c8 97 58 25 2c 59 25 2c 42 25 3a c8 99 |c%:..X%,Y%,B%:..| 000081a0 26 34 34 41 44 34 2c 30 2c 71 63 25 2c 72 63 25 |&44AD4,0,qc%,rc%| 000081b0 2c 58 25 2c 59 25 b8 63 25 3a c8 8e 71 63 25 ca |,X%,Y%.c%:..qc%.| 000081c0 0d a9 48 0e c9 6d 25 3a c8 8e 72 63 25 ca 0d a9 |..H..m%:..rc%...| 000081d0 5a 54 c9 68 65 25 3a c8 99 26 34 34 41 43 42 2c |ZT.he%:..&44ACB,| 000081e0 6d 25 2c 67 65 25 2c 28 63 25 2d 31 32 38 29 2a |m%,ge%,(c%-128)*| 000081f0 34 30 39 36 2f 31 32 38 3a c8 99 26 34 30 31 38 |4096/128:..&4018| 00008200 37 2c 28 63 25 2d 31 32 38 29 2a 34 30 39 36 2f |7,(c%-128)*4096/| 00008210 31 32 38 2b 79 61 25 3a 73 63 25 3d 2d 31 3a f2 |128+ya%:sc%=-1:.| 00008220 4d 63 0d a9 90 10 c9 69 65 25 3a f2 66 64 28 63 |Mc.....ie%:.fd(c| 00008230 25 29 0d a9 a2 05 cb 0d a9 a2 0e c9 74 25 3a c8 |%)..........t%:.| 00008240 8e 72 63 25 ca 0d a9 b4 14 c9 6f 66 25 3a f2 64 |.rc%......of%:.d| 00008250 28 28 63 25 2b 34 30 29 29 0d a9 c6 0f c9 71 66 |((c%+40)).....qf| 00008260 25 3a f2 71 28 63 25 29 0d a9 cf 05 cb 0d a9 cf |%:.q(c%)........| 00008270 0e c9 6f 25 3a c8 8e 72 63 25 ca 0d a9 e1 14 c9 |..o%:..rc%......| 00008280 67 67 25 3a f2 64 28 28 63 25 2b 34 30 29 29 0d |gg%:.d((c%+40)).| 00008290 a9 f3 0f c9 60 66 25 3a f2 71 28 63 25 29 0d a9 |....`f%:.q(c%)..| 000082a0 fc 05 cb 0d a9 fc 0e c9 6c 25 3a c8 8e 72 63 25 |........l%:..rc%| 000082b0 ca 0d aa 0e 14 c9 75 68 25 3a f2 64 28 28 63 25 |......uh%:.d((c%| 000082c0 2b 34 30 29 29 0d aa 20 0f c9 79 68 25 3a f2 71 |+40)).. ..yh%:.q| 000082d0 28 63 25 29 0d aa 29 05 cb 0d aa 29 0e c9 6b 25 |(c%)..)....)..k%| 000082e0 3a c8 8e 72 63 25 ca 0d aa 3b 14 c9 51 67 25 3a |:..rc%...;..Qg%:| 000082f0 f2 64 28 28 63 25 2b 34 30 29 29 0d aa 4d 0f c9 |.d((c%+40))..M..| 00008300 4f 67 25 3a f2 71 28 63 25 29 0d aa 56 05 cb 0d |Og%:.q(c%)..V...| 00008310 aa 56 05 cb 0d aa 5f 05 e1 0d aa 68 38 dd f2 67 |.V...._....h8..g| 00008320 64 28 41 25 29 3a 21 68 25 3d 41 25 3a c8 99 26 |d(A%):!h%=A%:..&| 00008330 34 30 30 43 42 2c 2c 68 25 3a 68 25 21 32 38 3d |400CB,,h%:h%!28=| 00008340 2d 31 3a c8 99 26 34 30 30 43 35 2c 2c 68 25 3a |-1:..&400C5,,h%:| 00008350 e1 0d aa a7 20 dd f2 44 63 28 73 25 29 3a c8 99 |.... ..Dc(s%):..| 00008360 26 34 34 41 45 37 2c 30 2c 73 25 2c 4e 68 25 3a |&44AE7,0,s%,Nh%:| 00008370 e1 0d aa cb 34 dd f2 4b 63 28 73 25 29 3a ea 61 |....4..Kc(s%):.a| 00008380 6d 25 3a c8 99 26 34 30 30 43 46 2c 2c 67 25 3a |m%:..&400CF,,g%:| 00008390 e7 28 67 25 21 38 80 31 29 8c 61 6d 25 3d 31 8b |.(g%!8.1).am%=1.| 000083a0 61 6d 25 3d 32 0d aa f8 0d e7 73 25 21 34 3d 2d |am%=2.....s%!4=-| 000083b0 31 8c 0d ab 01 0a c8 8e 62 6d 25 ca 0d ab 0a 0f |1.......bm%.....| 000083c0 c9 57 68 25 3a c8 8e 21 73 25 ca 0d ab 1c 2a c9 |.Wh%:..!s%....*.| 000083d0 30 3a c8 99 26 34 30 30 44 34 2c 2c 6b 64 25 2c |0:..&400D4,,kd%,| 000083e0 67 25 21 30 2d 35 30 2c 67 25 21 34 2b 35 30 3a |g%!0-50,g%!4+50:| 000083f0 61 6d 25 3d 33 0d ab 2e 0a c9 31 3a f2 68 64 0d |am%=3.....1:.hd.| 00008400 ab 37 0a c9 32 3a f2 69 64 0d ab 40 05 cb 0d ab |.7..2:.id..@....| 00008410 40 11 c9 58 68 25 3a f2 6a 64 28 21 73 25 29 0d |@..Xh%:.jd(!s%).| 00008420 ab 52 11 c9 59 68 25 3a f2 48 62 28 21 73 25 29 |.R..Yh%:.Hb(!s%)| 00008430 0d ab 5b 05 cb 0d ab 5b 05 cd 0d ab 64 0a c8 8e |..[....[....d...| 00008440 61 6d 25 ca 0d ab 6d 14 c9 31 3a c8 99 26 34 30 |am%...m..1:..&40| 00008450 30 44 34 2c 2c 62 6d 25 0d ab 7f 13 c9 32 3a c8 |0D4,,bm%.....2:.| 00008460 99 26 34 30 30 44 34 2c 2c 2d 31 0d ab 88 05 cb |.&400D4,,-1.....| 00008470 0d ab 88 05 e1 0d ab 91 2d dd f2 60 28 41 25 2c |........-..`(A%,| 00008480 58 25 2c 59 25 29 3a c8 99 26 34 30 30 44 34 2c |X%,Y%):..&400D4,| 00008490 2c 41 25 2c 58 25 2c 59 25 3a 62 6d 25 3d 41 25 |,A%,X%,Y%:bm%=A%| 000084a0 3a e1 0d ab be 27 dd f2 68 28 41 25 29 3a 67 25 |:....'..h(A%):g%| 000084b0 21 30 3d 41 25 3a c8 99 26 34 34 41 45 37 2c 31 |!0=A%:..&44AE7,1| 000084c0 2c 67 25 2c 4e 68 25 3a e1 0d ab eb 13 dd f2 4a |,g%,Nh%:.......J| 000084d0 63 28 73 25 29 3a c8 8e 21 73 25 ca 0d ac 06 18 |c(s%):..!s%.....| 000084e0 c9 76 64 25 3a f2 6b 64 28 73 25 21 34 2c 73 25 |.vd%:.kd(s%!4,s%| 000084f0 21 32 34 29 0d ac 18 17 c9 6b 25 3a f2 6b 63 28 |!24).....k%:.kc(| 00008500 73 25 21 34 2c 73 25 21 32 34 29 0d ac 21 14 7f |s%!4,s%!24)..!..| 00008510 3a c8 99 26 34 30 30 44 43 2c 73 25 21 32 34 0d |:..&400DC,s%!24.| 00008520 ac 2a 05 cb 0d ac 2a 05 e1 0d ac 33 4d dd f2 67 |.*....*....3M..g| 00008530 3a e7 4c 61 25 84 28 55 61 25 3c 3e 30 29 84 51 |:.La%.(Ua%<>0).Q| 00008540 61 25 84 50 61 25 84 79 62 25 84 4b 62 25 84 71 |a%.Pa%.yb%.Kb%.q| 00008550 61 25 84 49 61 25 84 4b 61 25 84 52 61 25 84 54 |a%.Ia%.Ka%.Ra%.T| 00008560 61 25 84 76 63 25 8c 4d 61 25 3d 4e 61 25 8b 4d |a%.vc%.Ma%=Na%.M| 00008570 61 25 3d 4f 61 25 0d ac 4e 05 e1 0d ac 57 44 dd |a%=Oa%..N....WD.| 00008580 f2 47 28 6e 25 2c 64 25 2c 58 25 2c 59 25 29 3a |.G(n%,d%,X%,Y%):| 00008590 c8 99 26 34 34 41 44 34 2c 33 2c 6e 25 2c 64 25 |..&44AD4,3,n%,d%| 000085a0 2c 58 25 2c 59 25 3a 72 63 25 3d 64 25 3a 71 63 |,X%,Y%:rc%=d%:qc| 000085b0 25 3d 6e 25 3a 49 61 25 3d b9 3a f2 67 3a e1 0d |%=n%:Ia%=.:.g:..| 000085c0 ac 9f b4 dd f2 63 61 3a ea 63 6d 25 3a c8 99 26 |.....ca:.cm%:..&| 000085d0 33 35 2c 2d 31 2c 34 b8 2c 2c 6e 6b 25 3a c8 99 |35,-1,4.,,nk%:..| 000085e0 26 33 35 2c 2d 31 2c 35 b8 2c 2c 64 6d 25 3a c8 |&35,-1,5.,,dm%:.| 000085f0 99 26 33 35 2c 2d 31 2c 39 b8 2c 2c 63 6d 25 3a |.&35,-1,9.,,cm%:| 00008600 c8 99 26 33 35 2c 2d 31 2c 31 31 b8 2c 2c 65 6d |..&35,-1,11.,,em| 00008610 25 3a c8 99 26 33 35 2c 2d 31 2c 31 32 b8 2c 2c |%:..&35,-1,12.,,| 00008620 66 6d 25 3a 6e 6b 25 3d 32 5e 6e 6b 25 3a 64 6d |fm%:nk%=2^nk%:dm| 00008630 25 3d 32 5e 64 6d 25 3a 65 6d 25 3d 28 65 6d 25 |%=2^dm%:em%=(em%| 00008640 2b 31 29 2a 6e 6b 25 3a 66 6d 25 3d 28 66 6d 25 |+1)*nk%:fm%=(fm%| 00008650 2b 31 29 2a 64 6d 25 3a e7 66 6d 25 3c 3e 78 63 |+1)*dm%:.fm%<>xc| 00008660 25 84 65 6d 25 3c 3e 77 63 25 8c 52 61 25 3d b9 |%.em%<>wc%.Ra%=.| 00008670 3a f2 67 0d ad 1d 3c 78 63 25 3d 66 6d 25 3a 77 |:.g...<xc%=fm%:w| 00008680 63 25 3d 65 6d 25 3a e7 ac 28 28 6e 6b 25 3c 3e |c%=em%:..((nk%<>| 00008690 21 4e 69 25 29 84 28 64 6d 25 3c 3e 21 4f 69 25 |!Ni%).(dm%<>!Oi%| 000086a0 29 84 28 63 6d 25 3c 3e 79 63 25 29 29 8c e1 0d |).(cm%<>yc%))...| 000086b0 ad 2f 26 79 63 25 3d 63 6d 25 3a 21 4e 69 25 3d |./&yc%=cm%:!Ni%=| 000086c0 6e 6b 25 3a 21 4f 69 25 3d 64 6d 25 3a e7 77 25 |nk%:!Oi%=dm%:.w%| 000086d0 3d 31 8c f2 7a 0d ad 5c 11 f2 49 62 3a e7 77 25 |=1..z..\..Ib:.w%| 000086e0 3d 32 8c f2 72 62 0d ad 6e 0d e7 77 25 3d 33 8c |=2..rb..n..w%=3.| 000086f0 f2 58 62 0d ad 77 05 e1 0d ad 80 2b dd f2 43 63 |.Xb..w.....+..Cc| 00008700 28 73 25 29 3a ea 58 25 2c 59 25 2c 41 25 2c 48 |(s%):.X%,Y%,A%,H| 00008710 25 2c 4a 25 3a 21 67 25 3d 21 73 25 3a c8 8e 21 |%,J%:!g%=!s%:..!| 00008720 67 25 ca 0d ad ad 0c c9 6a 64 25 3a f2 6c 64 0d |g%......jd%:.ld.| 00008730 ad bf 4f 7f 3a c8 99 26 34 30 30 43 38 2c 30 2c |..O.:..&400C8,0,| 00008740 67 25 b8 41 25 3a 48 25 3d 67 25 21 34 2d 67 25 |g%.A%:H%=g%!4-g%| 00008750 21 32 30 3a 4a 25 3d 67 25 21 31 36 2d 67 25 21 |!20:J%=g%!16-g%!| 00008760 32 34 3a c8 95 41 25 3c 3e 30 3a c8 99 26 34 34 |24:..A%<>0:..&44| 00008770 41 43 44 2c 2c 67 25 3a c8 8e 21 67 25 ca 0d ad |ACD,,g%:..!g%...| 00008780 f5 12 c9 74 25 3a f2 7a 63 28 48 25 2c 4a 25 29 |...t%:.zc(H%,J%)| 00008790 0d ae 07 15 c9 6f 25 3a f2 60 61 28 48 25 2c 4a |.....o%:.`a(H%,J| 000087a0 25 2c 67 25 29 0d ae 10 15 c9 6b 25 3a f2 61 63 |%,g%).....k%:.ac| 000087b0 28 48 25 2c 4a 25 2c 67 25 29 0d ae 19 15 c9 6c |(H%,J%,g%).....l| 000087c0 25 3a f2 73 62 28 48 25 2c 4a 25 2c 67 25 29 0d |%:.sb(H%,J%,g%).| 000087d0 ae 22 16 c9 64 68 25 3a f2 60 62 28 48 25 2c 4a |."..dh%:.`b(H%,J| 000087e0 25 2c 67 25 29 0d ae 2b 05 cb 0d ae 2b 15 c8 99 |%,g%)..+....+...| 000087f0 26 34 30 30 43 41 2c 2c 67 25 b8 41 25 3a ce 0d |&400CA,,g%.A%:..| 00008800 ae 46 05 cb 0d ae 46 29 e7 21 67 25 3d 64 68 25 |.F....F).!g%=dh%| 00008810 80 43 61 25 8c c8 99 26 34 34 41 45 33 2c 37 2c |.Ca%...&44AE3,7,| 00008820 48 63 25 2c 64 68 25 3a 43 61 25 3d a3 0d ae 4f |Hc%,dh%:Ca%=...O| 00008830 22 c8 99 26 34 30 2b 32 b8 42 25 3a e7 45 62 25 |"..&40+2.B%:.Eb%| 00008840 3c 30 8c 45 62 25 3d 42 25 2b 38 39 39 38 30 0d |<0.Eb%=B%+89980.| 00008850 ae 61 0d e7 42 25 3e 3d 45 62 25 8c 0d ae 6a 21 |.a..B%>=Eb%...j!| 00008860 41 24 3d c1 33 2c 31 2c 22 59 6f 75 22 29 3a f2 |A$=.3,1,"You"):.| 00008870 62 28 41 24 2c b9 29 3a 76 61 25 3d b9 0d ae 8e |b(A$,.):va%=....| 00008880 05 cd 0d ae 8e 05 e1 0d ae 97 52 dd f2 65 64 3a |..........R..ed:| 00008890 ea 65 25 3a 52 61 25 3d a3 3a e3 65 25 3d 30 b8 |.e%:Ra%=.:.e%=0.| 000088a0 67 64 25 3a 68 25 21 30 3d 66 25 28 65 25 2c 30 |gd%:h%!0=f%(e%,0| 000088b0 29 3a c8 99 26 36 30 30 43 42 2c 2c 68 25 3a e7 |):..&600CB,,h%:.| 000088c0 28 68 25 21 33 32 80 32 5e 31 36 29 3d 32 5e 31 |(h%!32.2^16)=2^1| 000088d0 36 8c f2 6d 64 28 65 25 29 0d ae df 0a ed 3a f2 |6..md(e%).....:.| 000088e0 67 3a e1 0d ae fa 2e dd f2 54 28 6e 25 29 3a ea |g:.......T(n%):.| 000088f0 65 25 3a e3 65 25 3d 30 b8 67 64 25 3a e7 66 25 |e%:.e%=0.gd%:.f%| 00008900 28 65 25 2c 30 29 3d 6e 25 8c f2 6d 64 28 65 25 |(e%,0)=n%..md(e%| 00008910 29 0d af 27 07 ed 3a e1 0d af 39 80 dd f2 6d 64 |)..'..:...9...md| 00008920 28 67 6d 25 29 3a ea 68 6d 25 2c 58 25 2c 59 25 |(gm%):.hm%,X%,Y%| 00008930 2c 6e 25 2c 61 66 25 2c 53 25 2c 69 6d 25 2c 6a |,n%,af%,S%,im%,j| 00008940 6d 25 3a 6e 25 3d 66 25 28 67 6d 25 2c 30 29 3a |m%:n%=f%(gm%,0):| 00008950 61 66 25 3d 66 25 28 67 6d 25 2c 31 29 3a 53 25 |af%=f%(gm%,1):S%| 00008960 3d 66 25 28 67 6d 25 2c 32 29 3a 69 6d 25 3d 66 |=f%(gm%,2):im%=f| 00008970 25 28 67 6d 25 2c 33 29 3a 6a 6d 25 3d 66 25 28 |%(gm%,3):jm%=f%(| 00008980 67 6d 25 2c 34 29 3a 41 25 3d b9 3a 21 68 25 3d |gm%,4):A%=.:!h%=| 00008990 6e 25 3a e7 42 61 25 8c 0d af 9c 11 58 25 3d 77 |n%:.Ba%.....X%=w| 000089a0 63 25 3a 59 25 3d 78 63 25 0d af ae 34 cc 3a 58 |c%:Y%=xc%...4.:X| 000089b0 25 3d 2d 31 3a 59 25 3d 2d 31 3a c8 99 26 34 30 |%=-1:Y%=-1:..&40| 000089c0 30 43 42 2c 2c 68 25 3a e7 28 68 25 21 33 32 80 |0CB,,h%:.(h%!32.| 000089d0 32 5e 31 36 29 3c 3e 30 8c 41 25 3d a3 0d af c9 |2^16)<>0.A%=....| 000089e0 05 cd 0d af d2 12 e7 58 25 3c 61 66 25 8c 58 25 |.......X%<af%.X%| 000089f0 3d 61 66 25 0d af db 10 e7 59 25 3c 53 25 8c 59 |=af%.....Y%<S%.Y| 00008a00 25 3d 53 25 0d af e4 08 e7 41 25 8c 0d af ed 89 |%=S%.....A%.....| 00008a10 68 25 21 34 3d 77 63 25 2f 32 2d 58 25 2f 32 3a |h%!4=wc%/2-X%/2:| 00008a20 68 25 21 38 3d 78 63 25 2f 32 2d 59 25 2f 32 3a |h%!8=xc%/2-Y%/2:| 00008a30 68 25 21 31 32 3d 77 63 25 2f 32 2b 58 25 2f 32 |h%!12=wc%/2+X%/2| 00008a40 3a 68 25 21 31 36 3d 78 63 25 2f 32 2b 59 25 2f |:h%!16=xc%/2+Y%/| 00008a50 32 3a 68 25 21 32 30 3d 69 6d 25 2d 58 25 2f 32 |2:h%!20=im%-X%/2| 00008a60 2b 61 66 25 2f 32 3a 68 25 21 32 34 3d 6a 6d 25 |+af%/2:h%!24=jm%| 00008a70 2b 59 25 2f 32 2d 53 25 2f 32 3a 68 25 21 32 38 |+Y%/2-S%/2:h%!28| 00008a80 3d 2d 31 3a c8 99 26 34 34 41 45 37 2c 30 2c 68 |=-1:..&44AE7,0,h| 00008a90 25 2c 4e 68 25 0d b0 3e 05 cd 0d b0 3e 0a e7 ac |%,Nh%..>....>...| 00008aa0 42 61 25 8c 0d b0 47 48 c8 99 26 34 30 30 43 42 |Ba%...GH..&400CB| 00008ab0 2c 2c 68 25 3a 68 25 21 31 30 30 3d 6e 25 3a c8 |,,h%:h%!100=n%:.| 00008ac0 99 26 34 30 30 45 30 2c 2c 68 25 2b 31 30 30 3a |.&400E0,,h%+100:| 00008ad0 e7 68 25 21 31 30 34 3c 30 8c 68 25 21 31 32 2d |.h%!104<0.h%!12-| 00008ae0 3d 68 25 21 34 3a 68 25 21 34 3d 30 0d b0 6b 20 |=h%!4:h%!4=0..k | 00008af0 e7 68 25 21 31 30 38 3c 30 8c 68 25 21 31 36 2d |.h%!108<0.h%!16-| 00008b00 3d 68 25 21 38 3a 68 25 21 38 3d 30 0d b0 74 10 |=h%!8:h%!8=0..t.| 00008b10 e7 68 25 21 31 31 32 3e 77 63 25 8c 0d b0 7d 2a |.h%!112>wc%...}*| 00008b20 68 25 21 34 2d 3d 28 68 25 21 31 31 32 2d 77 63 |h%!4-=(h%!112-wc| 00008b30 25 29 3a 68 25 21 31 32 2d 3d 28 68 25 21 31 31 |%):h%!12-=(h%!11| 00008b40 32 2d 77 63 25 29 0d b0 98 05 cd 0d b0 98 10 e7 |2-wc%)..........| 00008b50 68 25 21 31 31 36 3e 78 63 25 8c 0d b0 a1 2a 68 |h%!116>xc%....*h| 00008b60 25 21 38 2d 3d 28 68 25 21 31 31 36 2d 78 63 25 |%!8-=(h%!116-xc%| 00008b70 29 3a 68 25 21 31 36 2d 3d 28 68 25 21 31 31 36 |):h%!16-=(h%!116| 00008b80 2d 78 63 25 29 0d b0 bc 05 cd 0d b0 bc 22 c8 99 |-xc%)........"..| 00008b90 26 34 30 30 43 36 2c 2c 68 25 3a c8 99 26 34 34 |&400C6,,h%:..&44| 00008ba0 41 45 37 2c 30 2c 68 25 2c 4e 68 25 0d b0 d7 05 |AE7,0,h%,Nh%....| 00008bb0 cd 0d b0 d7 05 e1 0d b0 e0 19 dd f2 6f 61 28 6a |............oa(j| 00008bc0 25 29 3a ea 71 24 2c 6e 25 3a c8 8e 6a 25 ca 0d |%):.q$,n%:..j%..| 00008bd0 b1 04 21 c9 30 3a 71 24 3d 22 53 6f 75 6e 64 20 |..!.0:q$="Sound | 00008be0 42 6f 78 20 2d 20 22 2b 43 24 3a 6e 25 3d 74 25 |Box - "+C$:n%=t%| 00008bf0 0d b1 16 20 c9 31 3a 71 24 3d 22 54 75 6e 65 20 |... .1:q$="Tune | 00008c00 42 6f 78 20 2d 20 22 2b 76 24 3a 6e 25 3d 6f 25 |Box - "+v$:n%=o%| 00008c10 0d b1 1f 21 c9 32 3a 71 24 3d 22 43 68 6f 72 64 |...!.2:q$="Chord| 00008c20 20 42 6f 78 20 2d 20 22 2b 44 24 3a 6e 25 3d 6c | Box - "+D$:n%=l| 00008c30 25 0d b1 28 20 c9 33 3a 71 24 3d 22 42 65 61 74 |%..( .3:q$="Beat| 00008c40 20 42 6f 78 20 2d 20 22 2b 42 24 3a 6e 25 3d 6b | Box - "+B$:n%=k| 00008c50 25 0d b1 31 05 cb 0d b1 31 21 71 24 2b 3d a4 45 |%..1....1!q$+=.E| 00008c60 28 6a 25 29 3a c8 99 26 34 34 41 45 42 2c 31 2c |(j%):..&44AEB,1,| 00008c70 6e 25 2c 71 24 3a e1 0d b1 4c 15 dd a4 45 28 6a |n%,q$:...L...E(j| 00008c80 25 29 3a ea 79 25 3a c8 8e 6a 25 ca 0d b1 70 0d |%):.y%:..j%...p.| 00008c90 c9 30 3a 79 25 3d 5a 63 25 0d b1 82 0d c9 31 3a |.0:y%=Zc%.....1:| 00008ca0 79 25 3d 58 63 25 0d b1 8b 0d c9 32 3a 79 25 3d |y%=Xc%.....2:y%=| 00008cb0 5f 63 25 0d b1 94 0d c9 33 3a 79 25 3d 59 63 25 |_c%.....3:y%=Yc%| 00008cc0 0d b1 9d 05 cb 0d b1 9d 11 e7 79 25 8c 3d 22 20 |..........y%.=" | 00008cd0 2a 22 8b 3d 22 22 0d b1 a6 1a dd f2 6c 28 6a 25 |*".=""......l(j%| 00008ce0 29 3a e7 a4 45 28 6a 25 29 3d 22 20 2a 22 8c e1 |):..E(j%)=" *"..| 00008cf0 0d b1 c1 09 c8 8e 6a 25 ca 0d b1 ca 0c c9 30 3a |......j%......0:| 00008d00 5a 63 25 3d b9 0d b1 dc 0c c9 31 3a 58 63 25 3d |Zc%=......1:Xc%=| 00008d10 b9 0d b1 e5 0c c9 32 3a 5f 63 25 3d b9 0d b1 ee |......2:_c%=....| 00008d20 0c c9 33 3a 59 63 25 3d b9 0d b1 f7 05 cb 0d b1 |..3:Yc%=........| 00008d30 f7 0d f2 6f 61 28 6a 25 29 3a e1 0d b2 09 28 dd |...oa(j%):....(.| 00008d40 f2 69 64 3a e7 5a 63 25 84 5f 63 25 84 59 63 25 |.id:.Zc%._c%.Yc%| 00008d50 84 58 63 25 8c f2 6e 28 32 2c 2d 31 29 8b 76 61 |.Xc%..n(2,-1).va| 00008d60 25 3d b9 0d b2 24 05 e1 0d b2 2d 31 dd f2 50 63 |%=...$....-1..Pc| 00008d70 28 70 25 2c 64 25 29 3a ea 54 6b 25 2c 58 25 2c |(p%,d%):.Tk%,X%,| 00008d80 59 25 2c 42 25 2c 54 25 3a e7 70 25 3d 34 2a 31 |Y%,B%,T%:.p%=4*1| 00008d90 36 80 64 25 3d 6e 64 25 8c 0d b2 5a 05 e1 0d b2 |6.d%=nd%...Z....| 00008da0 6c 05 cd 0d b2 75 0b e7 70 25 3e 37 8c e1 0d b2 |l....u..p%>7....| 00008db0 7e 09 c8 8e 64 25 ca 0d b2 90 13 c9 70 64 25 3a |~...d%......pd%:| 00008dc0 f2 65 28 76 64 25 2c 64 25 29 0d b2 a2 13 c9 71 |.e(vd%,d%).....q| 00008dd0 64 25 3a f2 65 28 76 64 25 2c 64 25 29 0d b2 ab |d%:.e(vd%,d%)...| 00008de0 42 c9 37 3a c8 99 26 34 34 41 44 44 2c 32 2c 76 |B.7:..&44ADD,2,v| 00008df0 64 25 2c 6f 64 25 2c 22 43 6f 6d 70 65 74 69 74 |d%,od%,"Competit| 00008e00 69 6f 6e 22 3a c8 99 26 34 30 30 44 32 2c 76 64 |ion":..&400D2,vd| 00008e10 25 2c 6f 64 25 2c 30 2c 30 2c 2d 31 2c 31 31 0d |%,od%,0,0,-1,11.| 00008e20 b2 c6 05 cb 0d b2 c6 05 e1 0d b2 cf 1a dd f2 76 |...............v| 00008e30 28 6e 25 2c 6b 6d 25 29 3a ea 79 25 3a c8 8e 6b |(n%,km%):.y%:..k| 00008e40 6d 25 ca 0d b2 f3 0d c9 31 3a 79 25 3d 58 63 25 |m%......1:y%=Xc%| 00008e50 0d b3 05 0d c9 33 3a 79 25 3d 59 63 25 0d b3 0e |.....3:y%=Yc%...| 00008e60 0d c9 35 3a 79 25 3d 5f 63 25 0d b3 17 0d c9 37 |..5:y%=_c%.....7| 00008e70 3a 79 25 3d 5a 63 25 0d b3 20 0a 7f 3a 79 25 3d |:y%=Zc%.. ..:y%=| 00008e80 a3 0d b3 29 05 cb 0d b3 29 08 e7 79 25 8c 0d b3 |...)....)..y%...| 00008e90 32 1b 6c 6d 25 3d 6e 25 3a 6d 6d 25 3d 6b 6d 25 |2.lm%=n%:mm%=km%| 00008ea0 3a f2 6e 28 33 2c 2d 32 29 0d b3 56 11 cc 3a f2 |:.n(3,-2)..V..:.| 00008eb0 6e 64 28 6e 25 2c 6b 6d 25 29 0d b3 68 05 cd 0d |nd(n%,km%)..h...| 00008ec0 b3 68 05 e1 0d b3 71 26 dd f2 6e 64 28 6e 25 2c |.h....q&..nd(n%,| 00008ed0 6b 6d 25 29 3a ea 63 24 2c 74 24 2c 61 24 3a e7 |km%):.c$,t$,a$:.| 00008ee0 28 6b 6d 25 80 31 29 3d 31 8c 0d b3 95 18 63 24 |(km%.1)=1.....c$| 00008ef0 3d 22 4c 6f 61 64 22 3a e7 ac 6e 6d 25 8c f2 49 |="Load":..nm%..I| 00008f00 3a e1 0d b3 a7 1a cc 3a 63 24 3d 22 53 61 76 65 |:......:c$="Save| 00008f10 22 3a e7 ac 6f 6d 25 8c f2 49 3a e1 0d b3 c2 05 |":..om%..I:.....| 00008f20 cd 0d b3 cb 0a c8 8e 6b 6d 25 ca 0d b3 d4 18 c9 |.......km%......| 00008f30 30 2c 31 3a 74 24 3d 22 54 75 6e 65 22 3a 61 24 |0,1:t$="Tune":a$| 00008f40 3d 76 24 0d b3 e6 18 c9 32 2c 33 3a 74 24 3d 22 |=v$.....2,3:t$="| 00008f50 42 65 61 74 22 3a 61 24 3d 42 24 0d b3 ef 19 c9 |Beat":a$=B$.....| 00008f60 34 2c 35 3a 74 24 3d 22 43 68 6f 72 64 22 3a 61 |4,5:t$="Chord":a| 00008f70 24 3d 44 24 0d b3 f8 19 c9 36 2c 37 3a 74 24 3d |$=D$.....6,7:t$=| 00008f80 22 53 6f 75 6e 64 22 3a 61 24 3d 43 24 0d b4 01 |"Sound":a$=C$...| 00008f90 05 cb 0d b4 01 14 e7 63 24 3d 22 4c 6f 61 64 22 |.......c$="Load"| 00008fa0 8c 61 24 3d 22 22 0d b4 0a 22 c8 99 26 34 34 41 |.a$=""..."..&44A| 00008fb0 44 44 2c 32 2c 76 64 25 2c 6f 64 25 2c 61 24 3a |DD,2,vd%,od%,a$:| 00008fc0 e7 a4 57 28 74 24 29 8c 0d b4 1c 5e 6c 6d 25 3d |..W(t$)....^lm%=| 00008fd0 6e 25 3a 70 6d 25 3d 6b 6d 25 3a c8 99 26 34 34 |n%:pm%=km%:..&44| 00008fe0 41 45 42 2c 31 2c 76 64 25 2c 63 24 2b 22 20 46 |AEB,1,vd%,c$+" F| 00008ff0 69 6c 65 22 3a c8 99 26 34 34 41 45 37 2c 32 2c |ile":..&44AE7,2,| 00009000 76 64 25 2c 4e 68 25 2c 2d 31 2c 30 3a c8 99 26 |vd%,Nh%,-1,0:..&| 00009010 34 30 30 44 32 2c 76 64 25 2c 6f 64 25 2c 30 2c |400D2,vd%,od%,0,| 00009020 30 2c 2d 31 2c 30 0d b4 52 05 cd 0d b4 52 05 e1 |0,-1,0..R....R..| 00009030 0d b4 5b 15 dd f2 72 3a f2 68 28 76 64 25 29 3a |..[...r:.h(vd%):| 00009040 f2 6f 64 3a e1 0d b4 88 79 dd a4 57 28 63 24 29 |.od:....y..W(c$)| 00009050 3a ea 4e 25 2c 75 24 2c 61 24 2c 41 25 2c 42 25 |:.N%,u$,a$,A%,B%| 00009060 3a f2 6f 64 3a c8 99 26 32 30 30 32 33 2c 22 4d |:.od:..&20023,"M| 00009070 42 22 2b 63 24 2b 22 46 69 6c 65 73 24 44 69 72 |B"+c$+"Files$Dir| 00009080 22 2c 68 25 2c 2d 31 2c 30 2c 30 b8 2c 2c 41 25 |",h%,-1,0,0.,,A%| 00009090 3a e7 41 25 3e 3d 30 8c ff 28 22 2a 53 45 54 20 |:.A%>=0..("*SET | 000090a0 4d 42 22 2b 63 24 2b 22 46 69 6c 65 73 24 44 69 |MB"+c$+"Files$Di| 000090b0 72 20 22 2b 6b 24 2b 22 2e 22 2b 63 24 29 0d b4 |r "+k$+"."+c$)..| 000090c0 be 42 75 24 3d 22 3c 4d 42 22 2b 63 24 2b 22 46 |.Bu$="<MB"+c$+"F| 000090d0 69 6c 65 73 24 44 69 72 3e 22 3a c8 99 26 38 2c |iles$Dir>":..&8,| 000090e0 31 37 2c 75 24 b8 4e 25 3a e7 4e 25 3d 30 8c c8 |17,u$.N%:.N%=0..| 000090f0 99 26 32 30 30 30 38 2c 38 2c 75 24 2c 2c 2c 30 |.&20008,8,u$,,,0| 00009100 0d b4 d9 76 c8 99 26 38 2c 31 37 2c 75 24 b8 4e |...v..&8,17,u$.N| 00009110 25 3a e7 4e 25 3c 3e 32 8c f2 62 28 22 4c 6f 61 |%:.N%<>2..b("Loa| 00009120 64 20 2f 20 53 61 76 65 20 77 69 6e 64 6f 77 20 |d / Save window | 00009130 63 61 6e 20 6e 6f 74 20 62 65 20 6f 70 65 6e 65 |can not be opene| 00009140 64 20 62 65 63 61 75 73 65 20 6e 6f 20 27 21 4d |d because no '!M| 00009150 42 46 69 6c 65 73 27 20 64 69 72 65 63 74 6f 72 |BFiles' director| 00009160 79 20 63 61 6e 20 62 65 20 66 6f 75 6e 64 2e 22 |y can be found."| 00009170 2c a3 29 3a 3d a3 0d b4 eb 51 21 67 25 3d 31 3a |,.):=....Q!g%=1:| 00009180 67 25 21 34 3d 44 61 25 3a c8 99 26 36 34 41 45 |g%!4=Da%:..&64AE| 00009190 41 2c 30 2c 75 24 2c 67 25 2c 22 2a 22 2c 70 61 |A,0,u$,g%,"*",pa| 000091a0 25 b8 41 25 2c 56 62 25 3b 50 25 3a e7 28 50 25 |%.A%,Vb%;P%:.(P%| 000091b0 80 31 29 3d 31 8c f2 62 28 a4 63 28 41 25 2b 34 |.1)=1..b(.c(A%+4| 000091c0 29 2c a3 29 3a 3d a3 0d b5 0f 4d e7 41 25 3d 2d |),.):=....M.A%=-| 000091d0 31 8c f2 63 28 22 44 75 65 20 74 6f 20 6c 61 63 |1..c("Due to lac| 000091e0 6b 20 6f 66 20 6d 65 6d 6f 72 79 2c 20 74 68 65 |k of memory, the| 000091f0 20 6c 69 73 74 20 6f 66 20 66 69 6c 65 73 20 68 | list of files h| 00009200 61 73 20 62 65 65 6e 20 74 72 75 6e 63 61 74 65 |as been truncate| 00009210 64 2e 22 29 0d b5 18 43 21 53 68 25 3d 21 28 21 |d.")...C!Sh%=!(!| 00009220 56 62 25 29 3a 51 68 25 21 38 3d 56 62 25 3a c8 |Vb%):Qh%!8=Vb%:.| 00009230 99 26 34 34 41 45 38 2c 30 2c 54 68 25 2c 51 68 |.&44AE8,0,Th%,Qh| 00009240 25 3a 6a 64 25 3d 21 51 68 25 3a 21 50 68 25 3d |%:jd%=!Qh%:!Ph%=| 00009250 21 51 68 25 3a 3d b9 0d b5 69 4f dd f2 6c 64 3a |!Qh%:=...iO..ld:| 00009260 21 67 25 3d 6a 64 25 3a 67 25 21 37 36 3d 2d 32 |!g%=jd%:g%!76=-2| 00009270 3a c8 99 26 34 34 41 45 38 2c 33 2c 67 25 2c 51 |:..&44AE8,3,g%,Q| 00009280 68 25 b8 41 25 3a c8 95 41 25 3c 3e 30 3a c8 99 |h%.A%:..A%<>0:..| 00009290 26 34 34 41 45 38 2c 33 2c 67 25 2c 51 68 25 b8 |&44AE8,3,g%,Qh%.| 000092a0 41 25 3a ce 3a e1 0d b5 a8 11 dd f2 6f 64 3a e7 |A%:.:.......od:.| 000092b0 6a 64 25 3c 3e 30 8c 0d b5 c3 1e 21 67 25 3d 6a |jd%<>0.....!g%=j| 000092c0 64 25 3a c8 99 26 34 30 30 43 33 2c 2c 67 25 3a |d%:..&400C3,,g%:| 000092d0 6a 64 25 3d 30 0d b5 e7 05 cd 0d b5 e7 0c e7 56 |jd%=0..........V| 000092e0 62 25 3c 3e 30 8c 0d b5 f0 17 c8 99 26 34 34 41 |b%<>0.......&44A| 000092f0 43 33 2c 2c 56 62 25 3a 56 62 25 3d 30 0d b6 0b |C3,,Vb%:Vb%=0...| 00009300 05 cd 0d b6 0b 05 e1 0d b6 14 12 dd f2 62 64 28 |.............bd(| 00009310 64 25 29 3a c8 8e 64 25 ca 0d b6 2f 0c c9 70 64 |d%):..d%.../..pd| 00009320 25 3a f2 70 64 0d b6 41 0b c9 71 64 25 3a f2 72 |%:.pd..A..qd%:.r| 00009330 0d b6 4a 05 cb 0d b6 4a 05 e1 0d b6 53 3d dd f2 |..J....J....S=..| 00009340 57 63 28 70 25 2c 58 25 2c 59 25 29 3a c8 99 26 |Wc(p%,X%,Y%):..&| 00009350 34 34 41 45 38 2c 32 2c 2c 51 68 25 2c 58 25 2c |44AE8,2,,Qh%,X%,| 00009360 59 25 b8 2c 2c 2c 58 25 2c 59 25 3a e7 58 25 3d |Y%.,,,X%,Y%:.X%=| 00009370 30 80 59 25 3e 30 8c 0d b6 77 63 c8 99 26 34 34 |0.Y%>0...wc..&44| 00009380 41 44 44 2c 32 2c 76 64 25 2c 6f 64 25 2c 28 21 |ADD,2,vd%,od%,(!| 00009390 56 62 25 2b 34 2b 31 36 2a 59 25 2d 31 36 29 3a |Vb%+4+16*Y%-16):| 000093a0 c8 99 26 34 30 30 44 32 2c 76 64 25 2c 6f 64 25 |..&400D2,vd%,od%| 000093b0 2c 30 2c 30 2c 2d 31 2c a9 28 a4 63 28 21 56 62 |,0,0,-1,.(.c(!Vb| 000093c0 25 2b 34 2b 31 36 2a 59 25 2d 31 36 29 29 3a e7 |%+4+16*Y%-16)):.| 000093d0 28 70 25 80 35 29 3c 3e 30 8c 0d b6 92 07 f2 70 |(p%.5)<>0......p| 000093e0 64 0d b6 a4 44 cc 3a 3f 28 21 56 62 25 2b 34 2b |d...D.:?(!Vb%+4+| 000093f0 31 36 2a 59 25 2d 34 29 3d 31 3a f2 71 64 28 58 |16*Y%-4)=1:.qd(X| 00009400 25 2c 59 25 29 3a f2 5a 63 28 22 46 4e 41 28 22 |%,Y%):.Zc("FNA("| 00009410 2b c3 28 58 25 29 2b 22 2c 22 2b c3 28 59 25 29 |+.(X%)+","+.(Y%)| 00009420 2b 22 29 22 29 0d b6 c8 05 cd 0d b6 c8 05 cd 0d |+")")...........| 00009430 b6 d1 05 e1 0d b6 da 30 dd a4 41 28 58 25 2c 59 |.......0..A(X%,Y| 00009440 25 29 3a 3f 28 21 56 62 25 2b 34 2b 31 36 2a 59 |%):?(!Vb%+4+16*Y| 00009450 25 2d 34 29 3d 30 3a f2 71 64 28 58 25 2c 59 25 |%-4)=0:.qd(X%,Y%| 00009460 29 3a 3d 30 0d b7 22 4b dd f2 71 64 28 58 25 2c |):=0.."K..qd(X%,| 00009470 59 25 29 3a c8 99 26 34 34 41 45 38 2c 34 2c 67 |Y%):..&44AE8,4,g| 00009480 25 2c 51 68 25 2c 58 25 2c 59 25 b8 41 25 3a c8 |%,Qh%,X%,Y%.A%:.| 00009490 95 41 25 3c 3e 30 3a c8 99 26 34 34 41 45 38 2c |.A%<>0:..&44AE8,| 000094a0 33 2c 67 25 2c 51 68 25 b8 41 25 3a ce 3a e1 0d |3,g%,Qh%.A%:.:..| 000094b0 b7 4f 64 dd f2 70 64 3a ea 61 24 3a c8 99 26 34 |.Od..pd:.a$:..&4| 000094c0 34 41 44 45 2c 32 2c 76 64 25 2c 6f 64 25 2c 68 |4ADE,2,vd%,od%,h| 000094d0 25 2c 32 35 36 3a 61 24 3d a4 63 28 68 25 29 3a |%,256:a$=.c(h%):| 000094e0 e7 61 24 3d 22 22 8c f2 63 28 22 50 6c 65 61 73 |.a$=""..c("Pleas| 000094f0 65 20 74 79 70 65 20 61 20 6e 61 6d 65 20 69 6e |e type a name in| 00009500 20 74 68 65 20 77 68 69 74 65 20 62 6f 78 2e 22 | the white box."| 00009510 29 3a e1 0d b7 85 1c e7 61 24 3d 22 43 6f 6d 70 |):......a$="Comp| 00009520 65 74 69 74 69 6f 6e 22 80 70 6d 25 3d 30 8c 0d |etition".pm%=0..| 00009530 b7 8e 13 41 25 3d a4 58 28 61 24 29 3a c8 8e 41 |...A%=.X(a$):..A| 00009540 25 ca 0d b7 a0 0f c9 31 3a f2 6e 28 34 2c 2d 34 |%......1:.n(4,-4| 00009550 29 0d b7 b2 0e c9 32 3a f2 72 64 28 61 24 29 0d |).....2:.rd(a$).| 00009560 b7 bb 05 cb 0d b7 bb 0d cc 3a f2 72 64 28 61 24 |.........:.rd(a$| 00009570 29 0d b7 d6 05 cd 0d b7 d6 05 e1 0d b7 df 97 dd |)...............| 00009580 f2 73 64 3a ea 61 24 2c 6c 24 3a c8 99 26 34 34 |.sd:.a$,l$:..&44| 00009590 41 44 45 2c 32 2c 76 64 25 2c 6f 64 25 2c 68 25 |ADE,2,vd%,od%,h%| 000095a0 2c 32 35 36 3a 61 24 3d a4 63 28 68 25 29 3a 6c |,256:a$=.c(h%):l| 000095b0 24 3d a4 43 28 61 24 29 3a c8 99 26 32 30 30 30 |$=.C(a$):..&2000| 000095c0 38 2c 36 2c 6c 24 b8 41 25 3b 50 25 3a e7 28 50 |8,6,l$.A%;P%:.(P| 000095d0 25 80 31 29 3c 3e 30 8c f2 62 28 22 53 6f 72 72 |%.1)<>0..b("Sorr| 000095e0 79 20 49 20 63 61 6e 27 74 20 6f 76 65 72 77 72 |y I can't overwr| 000095f0 69 74 65 20 74 68 65 20 66 69 6c 65 2e 20 28 22 |ite the file. ("| 00009600 2b a4 63 28 41 25 2b 34 29 2b 22 29 22 2c a3 29 |+.c(A%+4)+")",.)| 00009610 3a e1 0d b8 27 0d f2 72 64 28 61 24 29 3a e1 0d |:...'..rd(a$):..| 00009620 b8 39 1f dd f2 72 64 28 61 24 29 3a ea 6a 25 2c |.9...rd(a$):.j%,| 00009630 41 25 3a e7 28 70 6d 25 80 31 29 3d 31 8c 0d b8 |A%:.(pm%.1)=1...| 00009640 5d 65 c8 99 26 38 2c 31 37 2c a4 43 28 61 24 29 |]e..&8,17,.C(a$)| 00009650 b8 41 25 3a e7 41 25 3c 3e 31 8c f2 63 28 22 46 |.A%:.A%<>1..c("F| 00009660 69 6c 65 20 27 22 2b 61 24 2b 22 27 20 64 6f 65 |ile '"+a$+"' doe| 00009670 73 20 6e 6f 74 20 65 78 69 73 74 2e 20 50 6c 65 |s not exist. Ple| 00009680 61 73 65 20 74 72 79 20 61 20 64 69 66 66 65 72 |ase try a differ| 00009690 65 6e 74 20 66 69 6c 65 2e 22 29 3a 6a 25 3d 2d |ent file."):j%=-| 000096a0 32 3a e1 0d b8 6f 05 cd 0d b8 78 0a c8 8e 70 6d |2:...o....x...pm| 000096b0 25 ca 0d b8 81 19 c9 30 3a e7 61 24 3d 22 43 6f |%......0:.a$="Co| 000096c0 6d 70 65 74 69 74 69 6f 6e 22 8c 0d b8 93 18 f2 |mpetition"......| 000096d0 65 62 3a 76 24 3d 61 24 3a 58 63 25 3d a3 3a 6a |eb:v$=a$:Xc%=.:j| 000096e0 25 3d 31 0d b8 a5 4e cc 3a f2 63 28 22 43 6c 69 |%=1...N.:.c("Cli| 000096f0 63 6b 20 6f 6e 20 74 68 65 20 63 6f 6d 70 65 74 |ck on the compet| 00009700 69 74 69 6f 6e 20 69 63 6f 6e 20 61 6e 64 20 4f |ition icon and O| 00009710 4b 20 74 6f 20 73 61 76 65 20 66 72 6f 6d 20 74 |K to save from t| 00009720 68 69 73 20 64 65 6d 6f 2e 22 29 3a 6a 25 3d 2d |his demo."):j%=-| 00009730 32 0d b8 b7 05 cd 0d b8 b7 2f c9 31 3a e7 61 24 |2......../.1:.a$| 00009740 3d 22 43 6f 6d 70 65 74 69 74 69 6f 6e 22 8c 61 |="Competition".a| 00009750 24 3d 22 3c 4d 75 73 69 63 42 6f 78 44 24 44 69 |$="<MusicBoxD$Di| 00009760 72 3e 2e 31 22 0d b8 c9 1c 76 24 3d 61 24 3a 58 |r>.1"....v$=a$:X| 00009770 63 25 3d a3 3a 6a 25 3d 31 3a f2 66 62 28 61 24 |c%=.:j%=1:.fb(a$| 00009780 29 0d b8 e4 42 c9 32 3a f2 63 28 22 59 6f 75 20 |)...B.2:.c("You | 00009790 63 61 6e 20 6e 6f 74 20 73 61 76 65 20 62 65 61 |can not save bea| 000097a0 74 20 62 6f 78 20 66 69 6c 65 73 20 66 72 6f 6d |t box files from| 000097b0 20 74 68 69 73 20 64 65 6d 6f 2e 22 29 3a 6a 25 | this demo."):j%| 000097c0 3d 2d 34 0d b8 ed 19 c9 33 3a e7 61 24 3d 22 43 |=-4.....3:.a$="C| 000097d0 6f 6d 70 65 74 69 74 69 6f 6e 22 8c 0d b8 f6 3c |ompetition"....<| 000097e0 f2 63 28 22 54 68 65 20 63 6f 6d 70 65 74 69 74 |.c("The competit| 000097f0 69 6f 6e 20 66 69 6c 65 20 6f 6e 6c 79 20 77 6f |ion file only wo| 00009800 72 6b 73 20 69 6e 20 54 75 6e 65 20 42 6f 78 2e |rks in Tune Box.| 00009810 22 29 3a 6a 25 3d 2d 34 0d b9 08 1e cc 3a f2 6f |"):j%=-4.....:.o| 00009820 63 28 61 24 29 3a 42 24 3d 61 24 3a 59 63 25 3d |c(a$):B$=a$:Yc%=| 00009830 a3 3a 6a 25 3d 33 0d b9 1a 05 cd 0d b9 1a 43 c9 |.:j%=3........C.| 00009840 34 3a f2 63 28 22 59 6f 75 20 63 61 6e 20 6e 6f |4:.c("You can no| 00009850 74 20 73 61 76 65 20 63 68 6f 72 64 20 62 6f 78 |t save chord box| 00009860 20 66 69 6c 65 73 20 66 72 6f 6d 20 74 68 69 73 | files from this| 00009870 20 64 65 6d 6f 2e 22 29 3a 6a 25 3d 2d 33 0d b9 | demo."):j%=-3..| 00009880 2c 19 c9 35 3a e7 61 24 3d 22 43 6f 6d 70 65 74 |,..5:.a$="Compet| 00009890 69 74 69 6f 6e 22 8c 0d b9 35 3c f2 63 28 22 54 |ition"...5<.c("T| 000098a0 68 65 20 63 6f 6d 70 65 74 69 74 69 6f 6e 20 66 |he competition f| 000098b0 69 6c 65 20 6f 6e 6c 79 20 77 6f 72 6b 73 20 69 |ile only works i| 000098c0 6e 20 54 75 6e 65 20 42 6f 78 2e 22 29 3a 6a 25 |n Tune Box."):j%| 000098d0 3d 2d 34 0d b9 47 1f cc 3a f2 46 28 61 24 2c 32 |=-4..G..:.F(a$,2| 000098e0 29 3a 44 24 3d 61 24 3a 5f 63 25 3d a3 3a 6a 25 |):D$=a$:_c%=.:j%| 000098f0 3d 32 0d b9 59 05 cd 0d b9 59 43 c9 36 3a f2 63 |=2..Y....YC.6:.c| 00009900 28 22 59 6f 75 20 63 61 6e 20 6e 6f 74 20 73 61 |("You can not sa| 00009910 76 65 20 73 6f 75 6e 64 20 62 6f 78 20 66 69 6c |ve sound box fil| 00009920 65 73 20 66 72 6f 6d 20 74 68 69 73 20 64 65 6d |es from this dem| 00009930 6f 2e 22 29 3a 6a 25 3d 2d 31 0d b9 6b 19 c9 37 |o."):j%=-1..k..7| 00009940 3a e7 61 24 3d 22 43 6f 6d 70 65 74 69 74 69 6f |:.a$="Competitio| 00009950 6e 22 8c 0d b9 74 3c f2 63 28 22 54 68 65 20 63 |n"...t<.c("The c| 00009960 6f 6d 70 65 74 69 74 69 6f 6e 20 66 69 6c 65 20 |ompetition file | 00009970 6f 6e 6c 79 20 77 6f 72 6b 73 20 69 6e 20 54 75 |only works in Tu| 00009980 6e 65 20 42 6f 78 2e 22 29 3a 6a 25 3d 2d 34 0d |ne Box."):j%=-4.| 00009990 b9 86 1f cc 3a f2 46 28 61 24 2c 30 29 3a 43 24 |....:.F(a$,0):C$| 000099a0 3d 61 24 3a 5a 63 25 3d a3 3a 6a 25 3d 30 0d b9 |=a$:Zc%=.:j%=0..| 000099b0 98 05 cd 0d b9 98 05 cb 0d b9 a1 11 e7 6a 25 3e |.............j%>| 000099c0 30 8c f2 6f 61 28 6a 25 29 0d b9 aa 05 e1 0d b9 |0..oa(j%).......| 000099d0 b3 19 dd f2 6b 64 28 64 25 2c 76 6c 25 29 3a e7 |....kd(d%,vl%):.| 000099e0 76 6c 25 3d 31 33 8c 0d b9 ce 07 f2 70 64 0d b9 |vl%=13......pd..| 000099f0 e0 14 cc 3a c8 99 26 34 30 30 44 43 2c 73 25 21 |...:..&400DC,s%!| 00009a00 32 34 0d b9 f2 05 cd 0d b9 f2 05 e1 0d b9 fb 1a |24..............| 00009a10 dd f2 4e 63 28 73 25 29 3a e7 73 25 21 34 30 3c |..Nc(s%):.s%!40<| 00009a20 3e 44 61 25 8c e1 0d ba 16 3b 73 25 21 31 32 3d |>Da%.....;s%!12=| 00009a30 73 25 21 38 3a 73 25 21 31 36 3d 34 3a c8 99 26 |s%!8:s%!16=4:..&| 00009a40 34 30 30 45 37 2c 31 37 2c 73 25 2c 73 25 21 34 |400E7,17,s%,s%!4| 00009a50 3a f2 74 64 28 a4 63 28 73 25 2b 34 34 29 29 3a |:.td(.c(s%+44)):| 00009a60 e1 0d ba 43 3a dd f2 74 64 28 65 24 29 3a ea 41 |...C:..td(e$):.A| 00009a70 25 2c 56 68 25 2c 78 61 25 3a c8 99 26 38 2c 31 |%,Vh%,xa%:..&8,1| 00009a80 37 2c 65 24 b8 41 25 2c 2c 2c 2c 78 61 25 3a e7 |7,e$.A%,,,,xa%:.| 00009a90 41 25 3d 31 80 78 61 25 3e 34 8c 0d ba 70 36 56 |A%=1.xa%>4...p6V| 00009aa0 68 25 3d 8e 28 65 24 29 3a 41 24 3d 22 22 3a e3 |h%=.(e$):A$="":.| 00009ab0 41 25 3d 31 b8 38 3a 41 24 2b 3d bd 28 9a 23 56 |A%=1.8:A$+=.(.#V| 00009ac0 68 25 29 3a ed 3a d9 23 56 68 25 3a c8 8e 41 24 |h%):.:.#Vh%:..A$| 00009ad0 ca 0d ba af 22 c9 22 4d 42 43 6f 6d 70 6f 73 22 |...."."MBCompos"| 00009ae0 2c 22 4d 42 54 75 6e 65 20 20 22 3a f2 66 62 28 |,"MBTune ":.fb(| 00009af0 65 24 29 0d ba c1 22 c9 22 4d 42 52 68 79 74 68 |e$)..."."MBRhyth| 00009b00 6d 22 2c 22 4d 42 42 65 61 74 20 20 22 3a f2 6f |m","MBBeat ":.o| 00009b10 63 28 65 24 29 0d ba ca 18 c9 22 4d 42 53 6f 75 |c(e$)....."MBSou| 00009b20 6e 64 20 22 3a f2 46 28 65 24 2c 30 29 0d ba d3 |nd ":.F(e$,0)...| 00009b30 18 c9 22 4d 42 43 68 6f 72 64 20 22 3a f2 46 28 |.."MBChord ":.F(| 00009b40 65 24 2c 32 29 0d ba dc 0a 7f 3a 41 25 3d 30 0d |e$,2).....:A%=0.| 00009b50 ba e5 05 cb 0d ba e5 0a cc 3a 41 25 3d 30 0d bb |.........:A%=0..| 00009b60 00 05 cd 0d bb 00 2e e7 41 25 3d 30 8c f2 62 28 |........A%=0..b(| 00009b70 22 4d 75 73 69 63 20 66 69 6c 65 20 6e 6f 74 20 |"Music file not | 00009b80 75 6e 64 65 72 73 74 6f 6f 64 2e 22 2c a3 29 3a |understood.",.):| 00009b90 e1 0d bb 09 05 e1 0d bb 12 15 dd a4 4a 28 61 24 |............J(a$| 00009ba0 29 3a 3d a4 44 28 61 24 2c b9 29 0d bb 3f 30 dd |):=.D(a$,.)..?0.| 00009bb0 a4 44 28 61 24 2c 71 6d 25 29 3a ea 4e 25 2c 41 |.D(a$,qm%):.N%,A| 00009bc0 25 3a c8 99 26 32 30 30 30 38 2c 31 37 2c 61 24 |%:..&20008,17,a$| 00009bd0 b8 4e 25 3a e7 4e 25 3c 3e 30 8c 0d bb 5a 0b e7 |.N%:.N%<>0...Z..| 00009be0 4e 25 3c 3e 31 8c 0d bb 63 52 f2 62 28 22 46 69 |N%<>1...cR.b("Fi| 00009bf0 6c 65 20 61 6c 72 65 61 64 79 20 65 78 69 73 74 |le already exist| 00009c00 73 20 61 73 20 61 20 64 69 72 65 63 74 6f 72 79 |s as a directory| 00009c10 2e 20 50 6c 65 61 73 65 20 63 68 6f 6f 73 65 20 |. Please choose | 00009c20 61 20 64 69 66 66 65 72 65 6e 74 20 6e 61 6d 65 |a different name| 00009c30 2e 22 2c a3 29 3a 3d 30 0d bb 75 10 cc 3a 41 25 |.",.):=0..u..:A%| 00009c40 3d 31 3a e7 71 6d 25 8c 0d bb 87 5d 24 28 67 25 |=1:.qm%....]$(g%| 00009c50 2b 34 29 3d 22 46 69 6c 65 20 61 6c 72 65 61 64 |+4)="File alread| 00009c60 79 20 65 78 69 73 74 73 2e 20 44 6f 20 79 6f 75 |y exists. Do you| 00009c70 20 77 61 6e 74 20 74 6f 20 6f 76 65 72 77 72 69 | want to overwri| 00009c80 74 65 20 69 74 3f 22 2b bd 30 3a c8 99 26 34 30 |te it?"+.0:..&40| 00009c90 30 44 46 2c 67 25 2c 25 30 31 31 30 31 31 2c 6f |0DF,g%,%011011,o| 00009ca0 24 b8 2c 41 25 0d bb a2 05 cd 0d bb a2 0d e7 41 |$.,A%..........A| 00009cb0 25 3c 3e 31 8c 3d 30 0d bb ab 33 c8 99 26 32 30 |%<>1.=0...3..&20| 00009cc0 30 30 38 2c 36 2c 61 24 b8 41 25 3b 50 25 3a e7 |008,6,a$.A%;P%:.| 00009cd0 28 50 25 80 31 29 3d 31 8c f2 62 28 a4 63 28 41 |(P%.1)=1..b(.c(A| 00009ce0 25 2b 34 29 2c a3 29 3a 3d 30 0d bb bd 05 cd 0d |%+4),.):=0......| 00009cf0 bb c6 05 cd 0d bb cf 35 c8 99 26 32 30 30 30 44 |.......5..&2000D| 00009d00 2c 26 38 33 2c 61 24 b8 41 25 3b 50 25 3a e7 28 |,&83,a$.A%;P%:.(| 00009d10 50 25 80 31 29 3d 31 8c f2 62 28 a4 63 28 41 25 |P%.1)=1..b(.c(A%| 00009d20 2b 34 29 2c a3 29 3a 3d 30 0d bb e1 07 3d 41 25 |+4),.):=0....=A%| 00009d30 0d bc 44 26 dd a4 66 28 62 24 2c 61 25 29 3a 24 |..D&..f(b$,a%):$| 00009d40 67 25 3d 62 24 3a 3d a4 75 28 67 25 2c a9 28 62 |g%=b$:=.u(g%,.(b| 00009d50 24 29 2c 61 25 29 0d bc 68 20 dd a4 62 28 6c 2c |$),a%)..h ..b(l,| 00009d60 61 25 29 3a 21 67 25 3d 6c 3a 3d a4 75 28 67 25 |a%):!g%=l:=.u(g%| 00009d70 2c 34 2c 61 25 29 0d bc 8c 4c dd a4 75 28 77 61 |,4,a%)...L..u(wa| 00009d80 25 2c 78 61 25 2c 61 25 29 3a ea 50 25 2c 41 25 |%,xa%,a%):.P%,A%| 00009d90 2c 42 25 3a c8 99 26 32 30 30 30 43 2c 32 2c 61 |,B%:..&2000C,2,a| 00009da0 25 2c 77 61 25 2c 78 61 25 b8 42 25 2c 2c 2c 41 |%,wa%,xa%.B%,,,A| 00009db0 25 3b 50 25 3a e7 28 50 25 80 31 29 3d 31 8c 3d |%;P%:.(P%.1)=1.=| 00009dc0 42 25 0d bc a7 33 e7 41 25 3c 3e 30 8c 21 67 25 |B%...3.A%<>0.!g%| 00009dd0 3d 34 3a 24 28 67 25 2b 34 29 3d 22 4e 6f 20 73 |=4:$(g%+4)="No s| 00009de0 70 61 63 65 20 6f 6e 20 64 69 73 63 2e 22 2b bd |pace on disc."+.| 00009df0 30 3a 3d 67 25 0d bc b0 06 3d 30 0d bd 01 2a dd |0:=g%....=0...*.| 00009e00 a4 52 28 61 24 29 3a ea 50 25 2c 41 25 3a e7 a4 |.R(a$):.P%,A%:..| 00009e10 59 28 61 24 2c 22 44 65 66 61 75 6c 74 73 22 2c |Y(a$,"Defaults",| 00009e20 38 29 8c 3d 30 0d bd 13 2a c8 99 26 32 30 30 30 |8).=0...*..&2000| 00009e30 38 2c 31 38 2c 61 24 2c 44 61 25 b8 41 25 3b 50 |8,18,a$,Da%.A%;P| 00009e40 25 3a e7 28 50 25 80 31 29 3d 31 8c 3d 41 25 0d |%:.(P%.1)=1.=A%.| 00009e50 bd 25 06 3d 30 0d bd 40 33 dd a4 68 28 f8 62 24 |.%.=0..@3..h(.b$| 00009e60 2c 78 61 25 2c 61 25 29 3a ea 41 25 3a 41 25 3d |,xa%,a%):.A%:A%=| 00009e70 a4 6b 28 67 25 2c 78 61 25 2c 61 25 29 3a e7 41 |.k(g%,xa%,a%):.A| 00009e80 25 3c 3e 30 8c 3d 41 25 0d bd 5b 2c 62 24 3d 22 |%<>0.=A%..[,b$="| 00009e90 22 3a e3 41 25 3d 30 b8 78 61 25 2d 31 3a 62 24 |":.A%=0.xa%-1:b$| 00009ea0 3d 62 24 2b bd 28 3f 28 67 25 2b 41 25 29 29 3a |=b$+.(?(g%+A%)):| 00009eb0 ed 3a 3d 30 0d be 21 45 dd a4 6a 28 61 25 29 3a |.:=0..!E..j(a%):| 00009ec0 ea 62 25 2c 63 25 3a 62 25 3d a4 61 28 63 25 2c |.b%,c%:b%=.a(c%,| 00009ed0 61 25 29 3a c8 99 26 32 30 30 30 39 2c 30 2c 61 |a%):..&20009,0,a| 00009ee0 25 b8 41 25 2c 2c 42 25 3b 50 25 3a e7 28 50 25 |%.A%,,B%;P%:.(P%| 00009ef0 80 31 29 3d 31 8c 3d 41 25 0d be 45 2d c8 99 26 |.1)=1.=A%..E-..&| 00009f00 32 30 30 30 39 2c 31 2c 61 25 2c 42 25 2b 63 25 |20009,1,a%,B%+c%| 00009f10 2d 38 b8 41 25 3b 50 25 3a e7 28 50 25 80 31 29 |-8.A%;P%:.(P%.1)| 00009f20 3d 31 8c 3d 41 25 0d be 57 07 3d 62 25 0d be 72 |=1.=A%..W.=b%..r| 00009f30 74 dd a4 59 28 51 24 2c 52 24 2c 78 61 25 29 3a |t..Y(Q$,R$,xa%):| 00009f40 ea 72 6d 25 2c 49 25 3a 72 6d 25 3d b9 3a 73 6d |.rm%,I%:rm%=.:sm| 00009f50 25 3d a9 28 51 24 29 3a 74 6d 25 3d a9 28 52 24 |%=.(Q$):tm%=.(R$| 00009f60 29 3a e3 49 25 3d 30 b8 78 61 25 2d 31 3a e7 28 |):.I%=0.xa%-1:.(| 00009f70 97 28 c1 51 24 2c 73 6d 25 2d 49 25 2c 31 29 29 |.(.Q$,sm%-I%,1))| 00009f80 84 33 32 29 3c 3e 28 97 28 c1 52 24 2c 74 6d 25 |.32)<>(.(.R$,tm%| 00009f90 2d 49 25 2c 31 29 29 84 33 32 29 8c 72 6d 25 3d |-I%,1)).32).rm%=| 00009fa0 a3 0d be a8 0a ed 3a 3d 72 6d 25 0d be cc 3a dd |......:=rm%...:.| 00009fb0 a4 58 28 61 24 29 3a ea 63 24 2c 4e 25 3a 61 24 |.X(a$):.c$,N%:a$| 00009fc0 3d a4 43 28 61 24 29 3a c8 99 26 32 30 30 30 38 |=.C(a$):..&20008| 00009fd0 2c 31 37 2c 61 24 b8 4e 25 3a e7 28 70 6d 25 80 |,17,a$.N%:.(pm%.| 00009fe0 31 29 3d 31 8c 0d be f0 0b e7 4e 25 3c 3e 30 8c |1)=1......N%<>0.| 00009ff0 0d be f9 0b e7 4e 25 3c 3e 31 8c 0d bf 02 64 f2 |.....N%<>1....d.| 0000a000 63 28 22 53 6f 72 72 79 2c 20 49 20 63 61 6e 27 |c("Sorry, I can'| 0000a010 74 20 75 73 65 20 74 68 61 74 20 6e 61 6d 65 20 |t use that name | 0000a020 62 65 63 61 75 73 65 20 69 74 20 69 73 20 61 20 |because it is a | 0000a030 64 69 72 65 63 74 6f 72 79 2e 20 50 6c 65 61 73 |directory. Pleas| 0000a040 65 20 63 68 6f 6f 73 65 20 61 20 64 69 66 66 65 |e choose a diffe| 0000a050 72 65 6e 74 20 6e 61 6d 65 2e 22 29 3a 3d 30 0d |rent name."):=0.| 0000a060 bf 14 08 cc 3a 3d 32 0d bf 26 05 cd 0d bf 26 05 |....:=2..&....&.| 0000a070 cd 0d bf 2f 46 f2 63 28 22 54 68 61 74 20 66 69 |.../F.c("That fi| 0000a080 6c 65 20 64 6f 65 73 20 6e 6f 74 20 65 78 69 73 |le does not exis| 0000a090 74 2e 20 50 6c 65 61 73 65 20 63 68 6f 6f 73 65 |t. Please choose| 0000a0a0 20 61 20 64 69 66 66 65 72 65 6e 74 20 6e 61 6d | a different nam| 0000a0b0 65 2e 22 29 3a 3d 30 0d bf 41 0d cc 3a e7 4e 25 |e."):=0..A..:.N%| 0000a0c0 3c 3e 30 8c 0d bf 4a 0b e7 4e 25 3c 3e 31 8c 0d |<>0...J..N%<>1..| 0000a0d0 bf 53 73 f2 63 28 22 53 6f 72 72 79 2c 20 49 20 |.Ss.c("Sorry, I | 0000a0e0 63 61 6e 27 74 20 75 73 65 20 74 68 61 74 20 6e |can't use that n| 0000a0f0 61 6d 65 20 62 65 63 61 75 73 65 20 69 74 20 61 |ame because it a| 0000a100 6c 72 65 61 64 79 20 65 78 69 73 74 73 20 61 73 |lready exists as| 0000a110 20 61 20 64 69 72 65 63 74 6f 72 79 2e 20 50 6c | a directory. Pl| 0000a120 65 61 73 65 20 63 68 6f 6f 73 65 20 61 20 64 69 |ease choose a di| 0000a130 66 66 65 72 65 6e 74 20 6e 61 6d 65 2e 22 29 3a |fferent name."):| 0000a140 3d 30 0d bf 65 08 cc 3a 3d 31 0d bf 77 05 cd 0d |=0..e..:=1..w...| 0000a150 bf 77 05 cd 0d bf 80 05 cd 0d bf 89 06 3d 32 0d |.w...........=2.| 0000a160 bf a4 12 dd a4 43 28 61 24 29 3a c8 8e 70 6d 25 |.....C(a$):..pm%| 0000a170 ca 0d bf ad 12 c9 30 2c 31 3a 63 24 3d 22 54 75 |......0,1:c$="Tu| 0000a180 6e 65 22 0d bf bf 12 c9 32 2c 33 3a 63 24 3d 22 |ne".....2,3:c$="| 0000a190 42 65 61 74 22 0d bf c8 13 c9 34 2c 35 3a 63 24 |Beat".....4,5:c$| 0000a1a0 3d 22 43 68 6f 72 64 22 0d bf d1 13 c9 36 2c 37 |="Chord".....6,7| 0000a1b0 3a 63 24 3d 22 53 6f 75 6e 64 22 0d bf da 05 cb |:c$="Sound".....| 0000a1c0 0d bf da 2c e7 61 24 3d 22 43 6f 6d 70 65 74 69 |...,.a$="Competi| 0000a1d0 74 69 6f 6e 22 8c 61 24 3d 22 3c 4d 75 73 69 63 |tion".a$="<Music| 0000a1e0 42 6f 78 44 24 44 69 72 3e 2e 31 22 0d bf e3 2c |BoxD$Dir>.1"...,| 0000a1f0 e7 a7 61 24 2c 22 2e 22 29 3d 30 8c 61 24 3d 22 |..a$,".")=0.a$="| 0000a200 3c 4d 42 22 2b 63 24 2b 22 46 69 6c 65 73 24 44 |<MB"+c$+"Files$D| 0000a210 69 72 3e 2e 22 2b 61 24 0d bf ec 07 3d 61 24 0d |ir>."+a$....=a$.| 0000a220 c0 10 18 dd f2 4f 63 28 64 25 2c 58 25 2c 59 25 |.....Oc(d%,X%,Y%| 0000a230 29 3a c8 8e 64 25 ca 0d c0 19 16 c9 5a 64 25 3a |):..d%......Zd%:| 0000a240 f2 60 28 58 68 25 2c 58 25 2c 59 25 29 0d c0 2b |.`(Xh%,X%,Y%)..+| 0000a250 13 c9 5f 64 25 3a f2 65 28 6d 25 2c 5f 64 25 29 |.._d%:.e(m%,_d%)| 0000a260 0d c0 34 05 cb 0d c0 34 05 e1 0d c0 3d 21 dd f2 |..4....4....=!..| 0000a270 6a 64 28 63 25 29 3a e7 63 25 3e 3d 30 80 63 25 |jd(c%):.c%>=0.c%| 0000a280 3c 3d 31 34 8c f2 4d 28 63 25 29 0d c0 58 05 e1 |<=14..M(c%)..X..| 0000a290 0d c0 61 1f dd a4 6e 28 70 25 2c 64 25 2c 58 25 |..a...n(p%,d%,X%| 0000a2a0 2c 59 25 29 3a 58 25 3d b9 3a c8 8e 64 25 ca 0d |,Y%):X%=.:..d%..| 0000a2b0 c0 85 27 c9 45 65 25 3a c8 99 26 34 30 31 38 37 |..'.Ee%:..&40187| 0000a2c0 2c 75 6d 25 3a e7 28 70 25 80 34 29 3d 34 8c f2 |,um%:.(p%.4)=4..| 0000a2d0 75 64 8b f2 76 64 0d c0 a0 16 c9 44 65 25 3a e7 |ud..vd.....De%:.| 0000a2e0 28 70 25 80 34 29 3d 34 8c f2 75 64 0d c0 b2 0b |(p%.4)=4..ud....| 0000a2f0 f2 77 64 3a f2 78 64 0d c0 cd 16 c9 46 65 25 3a |.wd:.xd.....Fe%:| 0000a300 e7 28 70 25 80 34 29 3d 34 8c f2 75 64 0d c0 d6 |.(p%.4)=4..ud...| 0000a310 07 f2 77 64 0d c0 e8 0f c9 78 65 25 3a f2 4e 28 |..wd.....xe%:.N(| 0000a320 60 25 29 0d c0 f1 0f c9 79 65 25 3a f2 4e 28 6d |`%).....ye%:.N(m| 0000a330 25 29 0d c0 fa 10 c9 7a 65 25 3a f2 4e 28 4f 64 |%).....ze%:.N(Od| 0000a340 25 29 0d c1 03 10 c9 41 65 25 3a f2 4e 28 4d 65 |%).....Ae%:.N(Me| 0000a350 25 29 0d c1 0c 10 c9 42 65 25 3a f2 4e 28 57 65 |%).....Be%:.N(We| 0000a360 25 29 0d c1 15 1e c9 43 65 25 3a f2 79 64 3a e7 |%).....Ce%:.yd:.| 0000a370 28 70 25 80 34 29 3d 34 8c f2 75 64 8b f2 76 64 |(p%.4)=4..ud..vd| 0000a380 0d c1 27 09 7f 58 25 3d a3 0d c1 39 05 cb 0d c1 |..'..X%=...9....| 0000a390 39 07 3d 58 25 0d c1 54 26 dd f2 53 63 28 70 25 |9.=X%..T&..Sc(p%| 0000a3a0 2c 64 25 2c 58 25 2c 59 25 29 3a ea 63 25 2c 41 |,d%,X%,Y%):.c%,A| 0000a3b0 25 2c 41 24 3a e7 70 25 80 35 8c 0d c1 66 16 e7 |%,A$:.p%.5...f..| 0000a3c0 ac a4 6e 28 70 25 2c 64 25 2c 58 25 2c 59 25 29 |..n(p%,d%,X%,Y%)| 0000a3d0 8c 0d c1 6f 09 c8 8e 64 25 ca 0d c1 78 22 c9 4c |...o...d%...x".L| 0000a3e0 64 25 2d 31 2c 4c 64 25 2b 31 2c 4c 64 25 3a e7 |d%-1,Ld%+1,Ld%:.| 0000a3f0 64 25 3d 4c 64 25 8c 64 25 2d 3d 31 0d c1 8a 1c |d%=Ld%.d%-=1....| 0000a400 76 6d 25 2b 3d 4c 64 25 2d 64 25 3a e7 76 6d 25 |vm%+=Ld%-d%:.vm%| 0000a410 3e 32 8c 76 6d 25 3d 30 0d c1 9c 10 e7 76 6d 25 |>2.vm%=0.....vm%| 0000a420 3c 30 8c 76 6d 25 3d 32 0d c1 a5 1e c8 99 26 34 |<0.vm%=2......&4| 0000a430 34 41 44 44 2c 31 2c 4f 64 25 2c 4c 64 25 2c a4 |4ADD,1,Od%,Ld%,.| 0000a440 46 28 76 6d 25 29 0d c1 b7 2d c9 49 64 25 2d 31 |F(vm%)...-.Id%-1| 0000a450 2c 49 64 25 2b 31 3a c8 99 26 34 34 41 43 41 2c |,Id%+1:..&44ACA,| 0000a460 4f 64 25 2c 49 64 25 2c 49 64 25 2d 64 25 2c 31 |Od%,Id%,Id%-d%,1| 0000a470 36 2c 31 0d c1 c9 2c c9 4a 64 25 2d 31 2c 4a 64 |6,1...,.Jd%-1,Jd| 0000a480 25 2b 31 3a c8 99 26 34 34 41 43 41 2c 4f 64 25 |%+1:..&44ACA,Od%| 0000a490 2c 4a 64 25 2c 4a 64 25 2d 64 25 2c 37 2c 31 0d |,Jd%,Jd%-d%,7,1.| 0000a4a0 c1 db 31 c9 4b 64 25 2d 31 2c 4b 64 25 2b 31 3a |..1.Kd%-1,Kd%+1:| 0000a4b0 c8 99 26 34 34 41 43 41 2c 4f 64 25 2c 4b 64 25 |..&44ACA,Od%,Kd%| 0000a4c0 2c 4b 64 25 2d 64 25 2c 76 62 25 2f 32 34 2c 31 |,Kd%-d%,vb%/24,1| 0000a4d0 0d c1 ed 05 cb 0d c1 ed 05 cd 0d c1 f6 05 cd 0d |................| 0000a4e0 c1 ff 05 e1 0d c2 08 26 dd f2 51 63 28 70 25 2c |.......&..Qc(p%,| 0000a4f0 64 25 2c 58 25 2c 59 25 29 3a ea 63 25 2c 41 25 |d%,X%,Y%):.c%,A%| 0000a500 2c 41 24 3a e7 70 25 80 35 8c 0d c2 2c 16 e7 ac |,A$:.p%.5...,...| 0000a510 a4 6e 28 70 25 2c 64 25 2c 58 25 2c 59 25 29 8c |.n(p%,d%,X%,Y%).| 0000a520 0d c2 35 09 c8 8e 64 25 ca 0d c2 3e 2c c9 47 65 |..5...d%...>,.Ge| 0000a530 25 2d 31 2c 47 65 25 2b 31 3a c8 99 26 34 34 41 |%-1,Ge%+1:..&44A| 0000a540 43 43 2c 4d 65 25 2c 47 65 25 b8 2c 2c 63 25 3a |CC,Me%,Ge%.,,c%:| 0000a550 c8 8e 63 25 ca 0d c2 59 0b c9 36 3a 63 25 3d 35 |..c%...Y..6:c%=5| 0000a560 0d c2 6b 0b c9 38 3a 63 25 3d 36 0d c2 74 0c c9 |..k..8:c%=6..t..| 0000a570 31 32 3a 63 25 3d 37 0d c2 7d 05 cb 0d c2 7d 19 |12:c%=7..}....}.| 0000a580 63 25 2b 3d 47 65 25 2d 64 25 3a e7 63 25 3c 31 |c%+=Ge%-d%:.c%<1| 0000a590 8c 63 25 3d 37 0d c2 8f 0e e7 63 25 3e 37 8c 63 |.c%=7.....c%>7.c| 0000a5a0 25 3d 31 0d c2 98 09 c8 8e 63 25 ca 0d c2 a1 0b |%=1......c%.....| 0000a5b0 c9 35 3a 63 25 3d 36 0d c2 b3 0b c9 36 3a 63 25 |.5:c%=6.....6:c%| 0000a5c0 3d 38 0d c2 bc 0c c9 37 3a 63 25 3d 31 32 0d c2 |=8.....7:c%=12..| 0000a5d0 c5 05 cb 0d c2 c5 17 c8 99 26 34 34 41 43 42 2c |.........&44ACB,| 0000a5e0 4d 65 25 2c 47 65 25 2c 63 25 0d c2 d7 2c c9 48 |Me%,Ge%,c%...,.H| 0000a5f0 65 25 2d 31 2c 48 65 25 2b 31 3a c8 99 26 34 34 |e%-1,He%+1:..&44| 0000a600 41 43 41 2c 4d 65 25 2c 48 65 25 2c 48 65 25 2d |ACA,Me%,He%,He%-| 0000a610 64 25 2c 37 2c 31 0d c2 e9 2e c9 49 65 25 2d 31 |d%,7,1.....Ie%-1| 0000a620 2c 49 65 25 2b 31 3a c8 99 26 34 34 41 43 41 2c |,Ie%+1:..&44ACA,| 0000a630 4d 65 25 2c 49 65 25 2c 49 65 25 2d 64 25 2c 53 |Me%,Ie%,Ie%-d%,S| 0000a640 62 25 2c 31 0d c2 fb 51 c9 4a 65 25 2d 31 2c 4a |b%,1...Q.Je%-1,J| 0000a650 65 25 2b 31 3a c8 99 26 34 34 41 44 45 2c 32 2c |e%+1:..&44ADE,2,| 0000a660 4d 65 25 2c 4a 65 25 2c 67 25 2c 31 36 3a 63 25 |Me%,Je%,g%,16:c%| 0000a670 3d a0 28 a4 63 28 67 25 29 29 2a 32 3a 63 25 2b |=.(.c(g%))*2:c%+| 0000a680 3d 28 4a 65 25 2d 64 25 29 3a e7 63 25 3c 32 8c |=(Je%-d%):.c%<2.| 0000a690 63 25 3d 31 34 0d c3 1f 0f e7 63 25 3e 31 34 8c |c%=14.....c%>14.| 0000a6a0 63 25 3d 32 0d c3 28 23 c8 99 26 34 34 41 44 44 |c%=2..(#..&44ADD| 0000a6b0 2c 32 2c 4d 65 25 2c 4a 65 25 2c 22 20 20 22 2b |,2,Me%,Je%," "+| 0000a6c0 c3 28 63 25 2f 32 29 0d c3 3a 05 cb 0d c3 3a 05 |.(c%/2)..:....:.| 0000a6d0 cd 0d c3 43 05 cd 0d c3 4c 05 e1 0d c3 55 26 dd |...C....L....U&.| 0000a6e0 f2 52 63 28 70 25 2c 64 25 2c 58 25 2c 59 25 29 |.Rc(p%,d%,X%,Y%)| 0000a6f0 3a ea 63 25 2c 41 25 2c 41 24 3a e7 70 25 80 35 |:.c%,A%,A$:.p%.5| 0000a700 8c 0d c3 79 16 e7 ac a4 6e 28 70 25 2c 64 25 2c |...y....n(p%,d%,| 0000a710 58 25 2c 59 25 29 8c 0d c3 82 09 c8 8e 64 25 ca |X%,Y%).......d%.| 0000a720 0d c3 8b 27 c9 50 64 25 3a c8 99 26 34 34 41 44 |...'.Pd%:..&44AD| 0000a730 45 2c 33 2c 60 25 2c 64 25 b8 2c 2c 2c 63 25 3a |E,3,`%,d%.,,,c%:| 0000a740 f2 7a 64 28 63 25 29 0d c3 af 3f c9 51 64 25 2c |.zd(c%)...?.Qd%,| 0000a750 52 64 25 2c 53 64 25 2c 54 64 25 3a c8 99 26 34 |Rd%,Sd%,Td%:..&4| 0000a760 34 41 44 44 2c 37 2c 60 25 2c 64 25 3a c8 99 26 |4ADD,7,`%,d%:..&| 0000a770 34 34 41 44 44 2c 34 2c 60 25 2c 55 64 25 2c 64 |44ADD,4,`%,Ud%,d| 0000a780 25 3c 3e 54 64 25 0d c3 ca 21 c9 56 64 25 2c 57 |%<>Td%...!.Vd%,W| 0000a790 64 25 2c 58 64 25 3a c8 99 26 34 34 41 44 44 2c |d%,Xd%:..&44ADD,| 0000a7a0 37 2c 60 25 2c 64 25 0d c3 dc 05 cb 0d c3 dc 05 |7,`%,d%.........| 0000a7b0 cd 0d c3 e5 05 cd 0d c3 ee 05 e1 0d c3 f7 26 dd |..............&.| 0000a7c0 f2 55 63 28 70 25 2c 64 25 2c 58 25 2c 59 25 29 |.Uc(p%,d%,X%,Y%)| 0000a7d0 3a ea 63 25 2c 41 25 2c 41 24 3a e7 70 25 80 35 |:.c%,A%,A$:.p%.5| 0000a7e0 8c 0d c4 1b 16 e7 ac a4 6e 28 70 25 2c 64 25 2c |........n(p%,d%,| 0000a7f0 58 25 2c 59 25 29 8c 0d c4 24 09 c8 8e 64 25 ca |X%,Y%)...$...d%.| 0000a800 0d c4 2d 1e c9 55 65 25 2c 56 65 25 3a c8 99 26 |..-..Ue%,Ve%:..&| 0000a810 34 34 41 44 44 2c 37 2c 57 65 25 2c 64 25 0d c4 |44ADD,7,We%,d%..| 0000a820 48 05 cb 0d c4 48 05 cd 0d c4 51 05 cd 0d c4 5a |H....H....Q....Z| 0000a830 05 e1 0d c4 63 2d dd f2 54 63 28 70 25 2c 64 25 |....c-..Tc(p%,d%| 0000a840 2c 58 25 2c 59 25 29 3a ea 63 25 2c 41 25 2c 41 |,X%,Y%):.c%,A%,A| 0000a850 24 3a e7 28 70 25 80 28 35 3c 3c 34 29 29 8c 0d |$:.(p%.(5<<4))..| 0000a860 c4 87 09 c8 8e 64 25 ca 0d c4 90 18 c9 69 65 25 |.....d%......ie%| 0000a870 3a f2 47 28 6d 25 2c 64 25 2c 58 25 2c 59 25 29 |:.G(m%,d%,X%,Y%)| 0000a880 0d c4 ab 36 c9 68 65 25 3a f2 63 28 22 54 75 6e |...6.he%:.c("Tun| 0000a890 69 6e 67 20 68 61 73 20 62 65 65 6e 20 64 69 73 |ing has been dis| 0000a8a0 61 62 6c 65 64 20 66 6f 72 20 74 68 69 73 20 64 |abled for this d| 0000a8b0 65 6d 6f 2e 22 29 0d c4 bd 05 cb 0d c4 bd 0c cc |emo.")..........| 0000a8c0 3a e7 70 25 80 35 8c 0d c4 cf 16 e7 ac a4 6e 28 |:.p%.5........n(| 0000a8d0 70 25 2c 64 25 2c 58 25 2c 59 25 29 8c 0d c4 d8 |p%,d%,X%,Y%)....| 0000a8e0 09 c8 8e 64 25 ca 0d c4 e1 59 c9 60 64 25 2c 61 |...d%....Y.`d%,a| 0000a8f0 65 25 3a c8 99 26 34 34 41 44 44 2c 37 2c 6d 25 |e%:..&44ADD,7,m%| 0000a900 2c 64 25 3a c8 99 26 34 34 41 43 43 2c 6d 25 2c |,d%:..&44ACC,m%,| 0000a910 62 65 25 b8 2c 2c 63 25 3a c8 99 26 34 34 41 44 |be%.,,c%:..&44AD| 0000a920 45 2c 33 2c 6d 25 2c 61 65 25 b8 2c 2c 2c 41 25 |E,3,m%,ae%.,,,A%| 0000a930 3a e7 41 25 80 63 25 3e 30 8c 63 25 2b 3d 37 0d |:.A%.c%>0.c%+=7.| 0000a940 c5 0e 0a f2 4d 28 63 25 29 0d c5 20 85 c9 62 65 |....M(c%).. ..be| 0000a950 25 2d 31 2c 62 65 25 2b 31 3a c8 99 26 34 34 41 |%-1,be%+1:..&44A| 0000a960 43 43 2c 6d 25 2c 62 65 25 b8 2c 2c 63 25 3a 63 |CC,m%,be%.,,c%:c| 0000a970 25 2b 3d 62 65 25 2d 64 25 3a c8 99 26 34 34 41 |%+=be%-d%:..&44A| 0000a980 44 45 2c 33 2c 6d 25 2c 61 65 25 b8 2c 2c 2c 41 |DE,3,m%,ae%.,,,A| 0000a990 25 3a e7 63 25 3c 30 8c 63 25 3d 37 3a c8 99 26 |%:.c%<0.c%=7:..&| 0000a9a0 34 34 41 44 44 2c 33 2c 6d 25 2c 61 65 25 2c ac |44ADD,3,m%,ae%,.| 0000a9b0 41 25 3a c8 99 26 34 34 41 44 44 2c 33 2c 6d 25 |A%:..&44ADD,3,m%| 0000a9c0 2c 60 64 25 2c 41 25 3a 41 25 3d ac 41 25 0d c5 |,`d%,A%:A%=.A%..| 0000a9d0 44 40 e7 63 25 3e 37 8c 63 25 3d 30 3a c8 99 26 |D@.c%>7.c%=0:..&| 0000a9e0 34 34 41 44 44 2c 33 2c 6d 25 2c 61 65 25 2c ac |44ADD,3,m%,ae%,.| 0000a9f0 41 25 3a c8 99 26 34 34 41 44 44 2c 33 2c 6d 25 |A%:..&44ADD,3,m%| 0000aa00 2c 60 64 25 2c 41 25 3a 41 25 3d ac 41 25 0d c5 |,`d%,A%:A%=.A%..| 0000aa10 4d 12 e7 41 25 80 63 25 3e 30 8c 63 25 2b 3d 37 |M..A%.c%>0.c%+=7| 0000aa20 0d c5 56 0a f2 4d 28 63 25 29 0d c5 68 13 c9 5f |..V..M(c%)..h.._| 0000aa30 64 25 3a f2 65 28 6d 25 2c 5f 64 25 29 0d c5 7a |d%:.e(m%,_d%)..z| 0000aa40 2a c9 69 65 25 3a c8 99 26 34 34 41 44 34 2c 30 |*.ie%:..&44AD4,0| 0000aa50 2c 6d 25 2c 64 25 2c 58 25 2c 59 25 b8 63 25 3a |,m%,d%,X%,Y%.c%:| 0000aa60 f2 66 64 28 63 25 29 0d c5 95 5a c9 68 65 25 2c |.fd(c%)...Z.he%,| 0000aa70 67 65 25 2d 31 2c 67 65 25 2b 31 2c 66 65 25 2d |ge%-1,ge%+1,fe%-| 0000aa80 31 2c 66 65 25 2b 31 2c 65 65 25 2d 31 2c 65 65 |1,fe%+1,ee%-1,ee| 0000aa90 25 2b 31 3a f2 63 28 22 54 75 6e 69 6e 67 20 68 |%+1:.c("Tuning h| 0000aaa0 61 73 20 62 65 65 6e 20 64 69 73 61 62 6c 65 64 |as been disabled| 0000aab0 20 66 6f 72 20 74 68 69 73 20 64 65 6d 6f 2e 22 | for this demo."| 0000aac0 29 0d c5 a7 0e c9 63 65 25 3a f2 4d 28 30 29 0d |).....ce%:.M(0).| 0000aad0 c5 b9 05 cb 0d c5 b9 05 cd 0d c5 c2 05 cd 0d c5 |................| 0000aae0 cb 05 cd 0d c5 d4 05 e1 0d c5 dd 37 dd f2 61 64 |...........7..ad| 0000aaf0 28 64 25 29 3a ea 58 25 2c 59 25 2c 42 25 3a c8 |(d%):.X%,Y%,B%:.| 0000ab00 97 58 25 2c 59 25 2c 42 25 3a e7 64 25 3d 5f 64 |.X%,Y%,B%:.d%=_d| 0000ab10 25 8c f2 60 28 58 68 25 2c 58 25 2c 59 25 29 0d |%..`(Xh%,X%,Y%).| 0000ab20 c6 0a 05 e1 0d c6 13 0e dd f2 68 64 3a c8 8e 77 |..........hd:..w| 0000ab30 25 ca 0d c6 2e 15 c9 30 3a f2 6f 28 74 25 2c 69 |%......0:.o(t%,i| 0000ab40 66 25 2c 64 66 25 29 0d c6 40 09 c9 31 3a f2 6a |f%,df%)..@..1:.j| 0000ab50 0d c6 49 15 c9 32 3a f2 6f 28 6c 25 2c 73 68 25 |..I..2:.o(l%,sh%| 0000ab60 2c 77 68 25 29 0d c6 52 09 c9 33 3a f2 78 0d c6 |,wh%)..R..3:.x..| 0000ab70 5b 05 cb 0d c6 5b 30 77 6d 25 3d 71 61 25 3a f2 |[....[0wm%=qa%:.| 0000ab80 6d 3a 78 6d 25 3d 30 3a f2 76 64 3a c8 99 26 34 |m:xm%=0:.vd:..&4| 0000ab90 34 41 44 36 2c 6d 25 2c 2d 31 3a 79 6d 25 3d 6d |4AD6,m%,-1:ym%=m| 0000aba0 25 3a e1 0d c6 9a 15 dd f2 4e 28 6e 25 29 3a e7 |%:.......N(n%):.| 0000abb0 6e 25 3d 79 6d 25 8c e1 0d c6 b5 42 21 67 25 3d |n%=ym%.....B!g%=| 0000abc0 79 6d 25 3a c8 99 26 34 30 30 43 42 2c 2c 67 25 |ym%:..&400CB,,g%| 0000abd0 3a c8 99 26 34 30 30 43 36 2c 2c 67 25 3a 21 67 |:..&400C6,,g%:!g| 0000abe0 25 3d 6e 25 3a c8 99 26 34 30 30 43 35 2c 2c 67 |%=n%:..&400C5,,g| 0000abf0 25 3a 79 6d 25 3d 6e 25 3a e1 0d c6 f4 d0 dd f2 |%:ym%=n%:.......| 0000ac00 76 64 3a ea 63 25 3a c8 99 26 34 34 41 44 44 2c |vd:.c%:..&44ADD,| 0000ac10 33 2c 6d 25 2c 63 65 25 2c 58 61 25 3a f2 4d 28 |3,m%,ce%,Xa%:.M(| 0000ac20 55 6c 25 29 3a 7a 6d 25 3d 56 6c 25 3a c8 99 26 |Ul%):zm%=Vl%:..&| 0000ac30 34 34 41 43 42 2c 6d 25 2c 66 65 25 2c 7a 6d 25 |44ACB,m%,fe%,zm%| 0000ac40 2d 32 3a c8 99 26 34 30 31 38 37 2c 30 b8 75 6d |-2:..&40187,0.um| 0000ac50 25 3a c8 99 26 34 34 41 43 42 2c 6d 25 2c 67 65 |%:..&44ACB,m%,ge| 0000ac60 25 2c 75 6d 25 2d 79 61 25 3a c8 99 26 34 34 41 |%,um%-ya%:..&44A| 0000ac70 44 34 2c 32 2c 6d 25 2c 68 65 25 2c 28 28 75 6d |D4,2,m%,he%,((um| 0000ac80 25 2d 79 61 25 29 2a 31 32 38 2f 34 30 39 36 29 |%-ya%)*128/4096)| 0000ac90 2b 31 32 38 3a c8 99 26 34 34 41 44 34 2c 32 2c |+128:..&44AD4,2,| 0000aca0 6d 25 2c 69 65 25 2c 70 62 25 2a 32 3a 41 6d 25 |m%,ie%,pb%*2:Am%| 0000acb0 3d 70 62 25 3a c8 99 26 34 34 41 44 44 2c 33 2c |=pb%:..&44ADD,3,| 0000acc0 6d 25 2c 6b 65 25 2c 42 61 25 0d c7 69 c9 c8 99 |m%,ke%,Ba%..i...| 0000acd0 26 34 34 41 44 44 2c 33 2c 6d 25 2c 6a 65 25 2c |&44ADD,3,m%,je%,| 0000ace0 59 61 25 3a c8 99 26 34 34 41 44 44 2c 33 2c 6d |Ya%:..&44ADD,3,m| 0000acf0 25 2c 6c 65 25 2c 5a 61 25 3a c8 99 26 34 34 41 |%,le%,Za%:..&44A| 0000ad00 44 44 2c 33 2c 6d 25 2c 6d 65 25 2c 63 6c 25 3a |DD,3,m%,me%,cl%:| 0000ad10 c8 99 26 34 34 41 44 44 2c 33 2c 6d 25 2c 6e 65 |..&44ADD,3,m%,ne| 0000ad20 25 2c 4a 6b 25 3a c8 99 26 34 34 41 44 44 2c 33 |%,Jk%:..&44ADD,3| 0000ad30 2c 6d 25 2c 6f 65 25 2c 49 6b 25 3a c8 99 26 34 |,m%,oe%,Ik%:..&4| 0000ad40 34 41 44 44 2c 33 2c 6d 25 2c 70 65 25 2c 48 6b |4ADD,3,m%,pe%,Hk| 0000ad50 25 3a c8 99 26 34 34 41 44 44 2c 33 2c 6d 25 2c |%:..&44ADD,3,m%,| 0000ad60 71 65 25 2c 47 6b 25 3a c8 99 26 34 34 41 44 44 |qe%,Gk%:..&44ADD| 0000ad70 2c 33 2c 6d 25 2c 72 65 25 2c 4b 6b 25 3a c8 99 |,3,m%,re%,Kk%:..| 0000ad80 26 34 34 41 44 44 2c 33 2c 6d 25 2c 73 65 25 2c |&44ADD,3,m%,se%,| 0000ad90 4c 6b 25 0d c7 ba da c8 99 26 34 34 41 44 44 2c |Lk%......&44ADD,| 0000ada0 33 2c 6d 25 2c 74 65 25 2c 4d 6b 25 3a c8 99 26 |3,m%,te%,Mk%:..&| 0000adb0 34 34 41 44 44 2c 33 2c 6d 25 2c 75 65 25 2c 6e |44ADD,3,m%,ue%,n| 0000adc0 6d 25 3a c8 99 26 34 34 41 44 44 2c 33 2c 6d 25 |m%:..&44ADD,3,m%| 0000add0 2c 76 65 25 2c 6f 6d 25 3a c8 99 26 34 34 41 44 |,ve%,om%:..&44AD| 0000ade0 44 2c 33 2c 6d 25 2c 77 65 25 2c 4e 6b 25 3a c8 |D,3,m%,we%,Nk%:.| 0000adf0 99 26 34 34 41 44 44 2c 33 2c 4f 64 25 2c 4d 64 |.&44ADD,3,Od%,Md| 0000ae00 25 2c 42 6d 25 3a c8 99 26 34 34 41 44 44 2c 33 |%,Bm%:..&44ADD,3| 0000ae10 2c 4f 64 25 2c 4e 64 25 2c 43 6d 25 3a c8 99 26 |,Od%,Nd%,Cm%:..&| 0000ae20 34 34 41 43 42 2c 4f 64 25 2c 49 64 25 2c 69 6b |44ACB,Od%,Id%,ik| 0000ae30 25 81 28 32 5e 44 62 25 29 3a c8 99 26 34 34 41 |%.(2^Db%):..&44A| 0000ae40 43 42 2c 4f 64 25 2c 4a 64 25 2c 44 6d 25 3a c8 |CB,Od%,Jd%,Dm%:.| 0000ae50 99 26 34 34 41 43 42 2c 4f 64 25 2c 4b 64 25 2c |.&44ACB,Od%,Kd%,| 0000ae60 57 25 2f 32 34 3a 76 6d 25 3d 44 62 25 0d c8 26 |W%/24:vm%=Db%..&| 0000ae70 be c8 99 26 34 34 41 44 44 2c 31 2c 4f 64 25 2c |...&44ADD,1,Od%,| 0000ae80 4c 64 25 2c a4 46 28 76 6d 25 29 3a c8 99 26 34 |Ld%,.F(vm%):..&4| 0000ae90 34 41 43 42 2c 4d 65 25 2c 47 65 25 2c 4f 25 3a |4ACB,Me%,Ge%,O%:| 0000aea0 c8 99 26 34 34 41 43 42 2c 4d 65 25 2c 48 65 25 |..&44ACB,Me%,He%| 0000aeb0 2c 4c 6c 25 3a c8 99 26 34 34 41 43 42 2c 4d 65 |,Ll%:..&44ACB,Me| 0000aec0 25 2c 49 65 25 2c 6a 6c 25 3a 63 25 3d 32 2a 4f |%,Ie%,jl%:c%=2*O| 0000aed0 62 25 2f 4b 25 3a c8 99 26 34 34 41 44 44 2c 32 |b%/K%:..&44ADD,2| 0000aee0 2c 4d 65 25 2c 4a 65 25 2c 22 20 20 22 2b c3 28 |,Me%,Je%," "+.(| 0000aef0 63 25 2f 32 29 3a c8 99 26 34 34 41 44 44 2c 33 |c%/2):..&44ADD,3| 0000af00 2c 4d 65 25 2c 4b 65 25 2c 77 6c 25 3a c8 99 26 |,Me%,Ke%,wl%:..&| 0000af10 34 34 41 44 44 2c 33 2c 4d 65 25 2c 4c 65 25 2c |44ADD,3,Me%,Le%,| 0000af20 69 6c 25 3a e3 63 25 3d 30 b8 33 0d c8 80 4f c8 |il%:.c%=0.3...O.| 0000af30 99 26 34 34 41 44 44 2c 33 2c 60 25 2c 51 64 25 |.&44ADD,3,`%,Qd%| 0000af40 2b 63 25 2c 28 67 61 25 80 26 46 29 3d 63 25 3a |+c%,(ga%.&F)=c%:| 0000af50 ed 3a e7 28 67 61 25 80 33 29 3d 33 80 67 61 25 |.:.(ga%.3)=3.ga%| 0000af60 3e 3d 30 8c c8 99 26 34 34 41 43 42 2c 60 25 2c |>=0...&44ACB,`%,| 0000af70 55 64 25 2c 67 61 25 3e 3e 34 0d c8 9b d1 c8 99 |Ud%,ga%>>4......| 0000af80 26 34 34 41 44 44 2c 34 2c 60 25 2c 55 64 25 2c |&44ADD,4,`%,Ud%,| 0000af90 28 67 61 25 80 33 29 3c 3e 33 84 67 61 25 3c 30 |(ga%.3)<>3.ga%<0| 0000afa0 3a c8 99 26 34 34 41 44 44 2c 37 2c 60 25 2c 56 |:..&44ADD,7,`%,V| 0000afb0 64 25 2b 68 61 25 3a c8 99 26 34 34 41 44 44 2c |d%+ha%:..&44ADD,| 0000afc0 33 2c 60 25 2c 59 64 25 2c 69 61 25 3a f2 7a 64 |3,`%,Yd%,ia%:.zd| 0000afd0 28 67 61 25 3e 3d 30 29 3a c8 99 26 34 34 41 44 |(ga%>=0):..&44AD| 0000afe0 44 2c 33 2c 57 65 25 2c 4e 65 25 2c 50 6c 25 3a |D,3,We%,Ne%,Pl%:| 0000aff0 c8 99 26 34 34 41 44 44 2c 33 2c 57 65 25 2c 4f |..&44ADD,3,We%,O| 0000b000 65 25 2c 45 6d 25 3a c8 99 26 34 34 41 44 44 2c |e%,Em%:..&44ADD,| 0000b010 33 2c 57 65 25 2c 50 65 25 2c 58 6c 25 3a c8 99 |3,We%,Pe%,Xl%:..| 0000b020 26 34 34 41 44 44 2c 33 2c 57 65 25 2c 51 65 25 |&44ADD,3,We%,Qe%| 0000b030 2c 57 6c 25 3a c8 99 26 34 34 41 44 44 2c 33 2c |,Wl%:..&44ADD,3,| 0000b040 57 65 25 2c 52 65 25 2c 68 6c 25 0d c8 f5 62 c8 |We%,Re%,hl%...b.| 0000b050 99 26 34 34 41 44 44 2c 33 2c 57 65 25 2c 53 65 |.&44ADD,3,We%,Se| 0000b060 25 2c 46 6b 25 3a c8 99 26 34 34 41 44 44 2c 33 |%,Fk%:..&44ADD,3| 0000b070 2c 57 65 25 2c 54 65 25 2c 44 6c 25 3a c8 99 26 |,We%,Te%,Dl%:..&| 0000b080 34 34 41 44 44 2c 33 2c 57 65 25 2c 55 65 25 2c |44ADD,3,We%,Ue%,| 0000b090 42 6b 25 3a c8 99 26 34 34 41 44 44 2c 33 2c 57 |Bk%:..&44ADD,3,W| 0000b0a0 65 25 2c 56 65 25 2c ac 42 6b 25 3a e1 0d c9 22 |e%,Ve%,.Bk%:..."| 0000b0b0 11 dd a4 46 28 41 25 29 3a c8 8e 41 25 ca 0d c9 |...F(A%):..A%...| 0000b0c0 3d 0e c9 30 3a 3d 22 73 6e 6c 31 22 0d c9 4f 0e |=..0:="snl1"..O.| 0000b0d0 c9 31 3a 3d 22 73 6e 6c 32 22 0d c9 58 0e c9 32 |.1:="snl2"..X..2| 0000b0e0 3a 3d 22 73 6e 6c 33 22 0d c9 61 05 cb 0d c9 61 |:="snl3"..a....a| 0000b0f0 07 3d 22 22 0d c9 7c 5f dd f2 4d 28 63 25 29 3a |.=""..|_..M(c%):| 0000b100 ea 41 24 3a 41 24 3d c1 22 20 43 20 47 20 44 20 |.A$:A$=." C G D | 0000b110 41 20 45 20 42 46 23 43 23 20 46 42 62 45 62 41 |A E BF#C# FBbEbA| 0000b120 62 44 62 47 62 43 62 22 2c 63 25 2a 32 2b 31 2c |bDbGbCb",c%*2+1,| 0000b130 32 29 2b 22 20 4d 61 6a 6f 72 22 3a e7 c1 41 24 |2)+" Major":..A$| 0000b140 2c 31 2c 31 29 3d 22 20 22 8c 41 24 3d c1 41 24 |,1,1)=" ".A$=.A$| 0000b150 2c 32 29 0d c9 97 30 c8 99 26 34 34 41 44 44 2c |,2)...0..&44ADD,| 0000b160 32 2c 6d 25 2c 5a 64 25 2c 41 24 3a e7 63 25 3e |2,m%,Zd%,A$:.c%>| 0000b170 37 8c 46 6d 25 3d b9 3a 63 25 2d 3d 37 8b 46 6d |7.Fm%=.:c%-=7.Fm| 0000b180 25 3d a3 0d c9 a9 0a e7 63 25 3e 30 8c 0d c9 b2 |%=......c%>0....| 0000b190 09 e7 46 6d 25 8c 0d c9 bb 15 c8 99 26 34 34 41 |..Fm%.......&44A| 0000b1a0 44 44 2c 37 2c 6d 25 2c 61 65 25 0d c9 cd 17 cc |DD,7,m%,ae%.....| 0000b1b0 3a c8 99 26 34 34 41 44 44 2c 37 2c 6d 25 2c 60 |:..&44ADD,7,m%,`| 0000b1c0 64 25 0d c9 df 05 cd 0d c9 df 05 cd 0d c9 e8 3d |d%.............=| 0000b1d0 c8 99 26 34 34 41 43 42 2c 6d 25 2c 62 65 25 2c |..&44ACB,m%,be%,| 0000b1e0 63 25 3a c8 99 26 34 34 41 44 45 2c 33 2c 6d 25 |c%:..&44ADE,3,m%| 0000b1f0 2c 63 65 25 b8 2c 2c 2c 41 25 3a e7 41 25 8c 41 |,ce%.,,,A%:.A%.A| 0000b200 25 3d 2d 31 8b 41 25 3d 30 0d ca 03 9c c8 99 26 |%=-1.A%=0......&| 0000b210 34 34 41 44 44 2c 34 2c 6d 25 2c 5a 64 25 2c 41 |44ADD,4,m%,Zd%,A| 0000b220 25 3a c8 99 26 34 34 41 44 44 2c 34 2c 6d 25 2c |%:..&44ADD,4,m%,| 0000b230 61 65 25 2c 41 25 3a c8 99 26 34 34 41 44 44 2c |ae%,A%:..&44ADD,| 0000b240 34 2c 6d 25 2c 60 64 25 2c 41 25 3a c8 99 26 34 |4,m%,`d%,A%:..&4| 0000b250 34 41 44 44 2c 34 2c 6d 25 2c 62 65 25 2d 31 2c |4ADD,4,m%,be%-1,| 0000b260 41 25 3a c8 99 26 34 34 41 44 44 2c 34 2c 6d 25 |A%:..&44ADD,4,m%| 0000b270 2c 62 65 25 2c 41 25 3a c8 99 26 34 34 41 44 44 |,be%,A%:..&44ADD| 0000b280 2c 34 2c 6d 25 2c 62 65 25 2b 31 2c 41 25 3a c8 |,4,m%,be%+1,A%:.| 0000b290 99 26 34 34 41 44 44 2c 34 2c 6d 25 2c 5f 64 25 |.&44ADD,4,m%,_d%| 0000b2a0 2c 41 25 3a e1 0d ca 4b 4e dd f2 77 64 3a ea 41 |,A%:...KN..wd:.A| 0000b2b0 25 2c 63 25 3a f2 69 3a c8 99 26 34 34 41 43 43 |%,c%:.i:..&44ACC| 0000b2c0 2c 6d 25 2c 62 65 25 b8 2c 2c 63 25 3a c8 99 26 |,m%,be%.,,c%:..&| 0000b2d0 34 34 41 44 45 2c 33 2c 6d 25 2c 61 65 25 b8 2c |44ADE,3,m%,ae%.,| 0000b2e0 2c 2c 41 25 3a e7 41 25 80 63 25 3e 30 8c 63 25 |,,A%:.A%.c%>0.c%| 0000b2f0 2b 3d 37 0d ca 8a 25 c8 99 26 34 34 41 44 45 2c |+=7...%..&44ADE,| 0000b300 33 2c 6d 25 2c 63 65 25 b8 2c 2c 2c 41 25 3a e7 |3,m%,ce%.,,,A%:.| 0000b310 58 61 25 3c 3e 41 25 8c 0d ca a5 18 58 61 25 3d |Xa%<>A%.....Xa%=| 0000b320 41 25 3a e7 41 25 8c 41 25 3d 30 8b 41 25 3d 32 |A%:.A%.A%=0.A%=2| 0000b330 0d ca b7 19 21 46 69 25 3d 41 25 3a 43 62 25 3d |....!Fi%=A%:Cb%=| 0000b340 41 25 3a e7 77 25 3d 31 8c 0d ca d2 10 f2 7a 3a |A%:.w%=1......z:| 0000b350 41 25 3d 30 3a d6 77 69 25 0d ca f6 05 cd 0d ca |A%=0:.wi%.......| 0000b360 f6 05 cd 0d ca ff 54 c8 99 26 34 34 41 43 43 2c |......T..&44ACC,| 0000b370 6d 25 2c 66 65 25 b8 2c 2c 41 25 3a 56 6c 25 3d |m%,fe%.,,A%:Vl%=| 0000b380 41 25 2b 32 3a f2 74 63 28 63 25 29 3a c8 99 26 |A%+2:.tc(c%):..&| 0000b390 34 34 41 44 34 2c 31 2c 6d 25 2c 69 65 25 b8 70 |44AD4,1,m%,ie%.p| 0000b3a0 62 25 3a 70 62 25 3d 70 62 25 2f 32 3a e7 44 62 |b%:pb%=pb%/2:.Db| 0000b3b0 25 3c 3e 76 6d 25 8c 0d cb 47 1a e7 77 25 3d 31 |%<>vm%...G..w%=1| 0000b3c0 8c f2 6a 3a f2 79 28 32 5e 76 6d 25 2c 67 62 25 |..j:.y(2^vm%,gb%| 0000b3d0 29 0d cb 50 0b 44 62 25 3d 76 6d 25 0d cb 62 05 |)..P.Db%=vm%..b.| 0000b3e0 cd 0d cb 62 25 c8 99 26 34 34 41 44 45 2c 33 2c |...b%..&44ADE,3,| 0000b3f0 6d 25 2c 6b 65 25 b8 2c 2c 2c 41 25 3a e7 41 25 |m%,ke%.,,,A%:.A%| 0000b400 3c 3e 42 61 25 8c 0d cb 7d 10 42 61 25 3d 41 25 |<>Ba%...}.Ba%=A%| 0000b410 3a c8 8e 77 25 ca 0d cb 8f 0e c9 30 3a f2 41 63 |:..w%......0:.Ac| 0000b420 3a f2 45 62 0d cb a1 0d c9 31 3a f2 59 3a f2 5f |:.Eb.....1:.Y:._| 0000b430 61 0d cb aa 0e c9 32 3a f2 76 62 3a f2 71 62 0d |a.....2:.vb:.qb.| 0000b440 cb b3 0e c9 33 3a f2 5a 62 3a f2 46 62 0d cb bc |....3:.Zb:.Fb...| 0000b450 05 cb 0d cb bc 05 cd 0d cb c5 68 c8 99 26 34 34 |..........h..&44| 0000b460 41 44 45 2c 33 2c 6d 25 2c 6a 65 25 b8 2c 2c 2c |ADE,3,m%,je%.,,,| 0000b470 59 61 25 3a c8 99 26 34 34 41 44 45 2c 33 2c 6d |Ya%:..&44ADE,3,m| 0000b480 25 2c 6c 65 25 b8 2c 2c 2c 5a 61 25 3a c8 99 26 |%,le%.,,,Za%:..&| 0000b490 34 34 41 44 45 2c 33 2c 6d 25 2c 6d 65 25 b8 2c |44ADE,3,m%,me%.,| 0000b4a0 2c 2c 63 6c 25 3a e7 28 28 ac 63 6c 25 29 80 28 |,,cl%:.((.cl%).(| 0000b4b0 77 25 3e 3d 30 29 29 8c f2 45 28 30 2c b9 29 0d |w%>=0))..E(0,.).| 0000b4c0 cb f2 a6 c8 99 26 34 34 41 44 45 2c 33 2c 4f 64 |.....&44ADE,3,Od| 0000b4d0 25 2c 4d 64 25 b8 2c 2c 2c 42 6d 25 3a c8 99 26 |%,Md%.,,,Bm%:..&| 0000b4e0 34 34 41 44 45 2c 33 2c 4f 64 25 2c 4e 64 25 b8 |44ADE,3,Od%,Nd%.| 0000b4f0 2c 2c 2c 43 6d 25 3a c8 99 26 34 34 41 43 43 2c |,,,Cm%:..&44ACC,| 0000b500 4f 64 25 2c 49 64 25 b8 2c 2c 69 6b 25 3a 69 6b |Od%,Id%.,,ik%:ik| 0000b510 25 3d 69 6b 25 2a 28 32 5e 44 62 25 29 3a c8 99 |%=ik%*(2^Db%):..| 0000b520 26 34 34 41 43 43 2c 4f 64 25 2c 4a 64 25 b8 2c |&44ACC,Od%,Jd%.,| 0000b530 2c 44 6d 25 3a 21 63 6b 25 3d 44 6d 25 3a c8 99 |,Dm%:!ck%=Dm%:..| 0000b540 26 34 34 41 43 43 2c 4f 64 25 2c 4b 64 25 b8 2c |&44ACC,Od%,Kd%.,| 0000b550 2c 41 25 3a 41 25 3d 41 25 2a 32 34 3a e7 41 25 |,A%:A%=A%*24:.A%| 0000b560 3c 3e 57 25 8c 0d cc 4c 14 63 25 3d b9 3a e7 41 |<>W%...L.c%=.:.A| 0000b570 25 3c ba 28 61 69 25 29 8c 0d cc 5e a5 21 67 25 |%<.(ai%)...^.!g%| 0000b580 3d 34 3a 24 28 67 25 2b 34 29 3d 22 52 65 64 75 |=4:$(g%+4)="Redu| 0000b590 63 69 6e 67 20 74 68 65 20 70 61 70 65 72 20 6c |cing the paper l| 0000b5a0 65 6e 67 74 68 20 66 6f 72 20 74 68 65 20 74 75 |ength for the tu| 0000b5b0 6e 65 20 62 6f 78 20 77 69 6c 6c 20 74 72 75 6e |ne box will trun| 0000b5c0 63 61 74 65 20 74 68 65 20 70 72 65 73 65 6e 74 |cate the present| 0000b5d0 20 74 75 6e 65 2e 20 53 68 61 6c 6c 20 49 20 63 | tune. Shall I c| 0000b5e0 6f 6e 74 69 6e 75 65 20 61 6e 64 20 72 65 64 75 |ontinue and redu| 0000b5f0 63 65 20 69 74 3f 22 2b bd 30 3a c8 99 26 34 30 |ce it?"+.0:..&40| 0000b600 30 44 46 2c 67 25 2c 25 31 31 30 31 31 2c 6f 24 |0DF,g%,%11011,o$| 0000b610 b8 2c 63 25 3a 63 25 3d 28 63 25 3d 31 29 0d cc |.,c%:c%=(c%=1)..| 0000b620 8b 05 cd 0d cc 8b 08 e7 63 25 8c 0d cc 94 59 57 |........c%....YW| 0000b630 25 3d 41 25 3a 21 5a 68 25 3d 41 25 3a 21 5f 68 |%=A%:!Zh%=A%:!_h| 0000b640 25 3d 41 25 2a 31 32 3a 21 6d 69 25 3d 41 25 2a |%=A%*12:!mi%=A%*| 0000b650 31 32 3a c8 99 26 34 34 41 44 41 2c 6a 63 25 2b |12:..&44ADA,jc%+| 0000b660 41 25 2a 31 32 2c 76 62 25 2a 31 32 2b 31 32 2d |A%*12,vb%*12+12-| 0000b670 41 25 2a 31 32 3a e7 77 25 3d 31 8c f2 7a 3a f2 |A%*12:.w%=1..z:.| 0000b680 43 28 30 29 0d cc ca 05 cd 0d cc d3 05 cd 0d cc |C(0)............| 0000b690 dc 40 c8 99 26 34 34 41 43 43 2c 4d 65 25 2c 47 |.@..&44ACC,Me%,G| 0000b6a0 65 25 b8 2c 2c 42 25 3a c8 99 26 34 34 41 43 43 |e%.,,B%:..&44ACC| 0000b6b0 2c 4d 65 25 2c 49 65 25 b8 2c 2c 41 25 3a 43 25 |,Me%,Ie%.,,A%:C%| 0000b6c0 3d 4f 25 3a e7 43 25 3c 31 8c 43 25 3d 36 0d cd |=O%:.C%<1.C%=6..| 0000b6d0 09 38 43 25 3d 28 28 48 62 25 2a 43 25 2d 31 29 |.8C%=((Hb%*C%-1)| 0000b6e0 81 42 25 29 2b 31 3a e7 6a 6c 25 3c 3e 41 25 84 |.B%)+1:.jl%<>A%.| 0000b6f0 4f 25 3c 3e 42 25 8c f2 56 62 28 43 25 2c 42 25 |O%<>B%..Vb(C%,B%| 0000b700 2c 41 25 2c b9 29 0d cd 1b 68 c8 99 26 34 34 41 |,A%,.)...h..&44A| 0000b710 43 43 2c 4d 65 25 2c 48 65 25 b8 2c 2c 42 25 3a |CC,Me%,He%.,,B%:| 0000b720 c8 99 26 34 34 41 44 45 2c 32 2c 4d 65 25 2c 4a |..&44ADE,2,Me%,J| 0000b730 65 25 2c 67 25 2c 31 36 3a 41 25 3d a0 28 a4 63 |e%,g%,16:A%=.(.c| 0000b740 28 67 25 29 29 2a 32 3a 41 25 3d 41 25 2a 4b 25 |(g%))*2:A%=A%*K%| 0000b750 2f 32 3a e7 41 25 3c 3e 4f 62 25 84 42 25 3c 3e |/2:.A%<>Ob%.B%<>| 0000b760 4c 6c 25 8c f2 70 63 28 41 25 2c 42 25 29 0d cd |Ll%..pc(A%,B%)..| 0000b770 51 cb c8 99 26 34 34 41 44 45 2c 33 2c 6d 25 2c |Q...&44ADE,3,m%,| 0000b780 6e 65 25 b8 2c 2c 2c 4a 6b 25 3a c8 99 26 34 34 |ne%.,,,Jk%:..&44| 0000b790 41 44 45 2c 33 2c 6d 25 2c 6f 65 25 b8 2c 2c 2c |ADE,3,m%,oe%.,,,| 0000b7a0 49 6b 25 3a c8 99 26 34 34 41 44 45 2c 33 2c 6d |Ik%:..&44ADE,3,m| 0000b7b0 25 2c 70 65 25 b8 2c 2c 2c 48 6b 25 3a c8 99 26 |%,pe%.,,,Hk%:..&| 0000b7c0 34 34 41 44 45 2c 33 2c 6d 25 2c 71 65 25 b8 2c |44ADE,3,m%,qe%.,| 0000b7d0 2c 2c 47 6b 25 3a c8 99 26 34 34 41 44 45 2c 33 |,,Gk%:..&44ADE,3| 0000b7e0 2c 6d 25 2c 72 65 25 b8 2c 2c 2c 4b 6b 25 3a c8 |,m%,re%.,,,Kk%:.| 0000b7f0 99 26 34 34 41 44 45 2c 33 2c 6d 25 2c 73 65 25 |.&44ADE,3,m%,se%| 0000b800 b8 2c 2c 2c 4c 6b 25 3a c8 99 26 34 34 41 44 45 |.,,,Lk%:..&44ADE| 0000b810 2c 33 2c 6d 25 2c 74 65 25 b8 2c 2c 2c 4d 6b 25 |,3,m%,te%.,,,Mk%| 0000b820 3a c8 99 26 34 34 41 44 45 2c 33 2c 6d 25 2c 75 |:..&44ADE,3,m%,u| 0000b830 65 25 b8 2c 2c 2c 6e 6d 25 0d cd a2 bc c8 99 26 |e%.,,,nm%......&| 0000b840 34 34 41 44 45 2c 33 2c 6d 25 2c 76 65 25 b8 2c |44ADE,3,m%,ve%.,| 0000b850 2c 2c 6f 6d 25 3a c8 99 26 34 34 41 44 45 2c 33 |,,om%:..&44ADE,3| 0000b860 2c 6d 25 2c 77 65 25 b8 2c 2c 2c 4e 6b 25 3a c8 |,m%,we%.,,,Nk%:.| 0000b870 99 26 34 34 41 44 45 2c 33 2c 4d 65 25 2c 4b 65 |.&44ADE,3,Me%,Ke| 0000b880 25 b8 2c 2c 2c 77 6c 25 3a c8 99 26 34 34 41 44 |%.,,,wl%:..&44AD| 0000b890 45 2c 33 2c 4d 65 25 2c 4c 65 25 b8 2c 2c 2c 69 |E,3,Me%,Le%.,,,i| 0000b8a0 6c 25 3a c8 99 26 34 34 41 43 43 2c 6d 25 2c 67 |l%:..&44ACC,m%,g| 0000b8b0 65 25 b8 2c 2c 63 25 3a 47 6d 25 3d 63 25 3a c8 |e%.,,c%:Gm%=c%:.| 0000b8c0 99 26 34 34 41 44 45 2c 33 2c 60 25 2c 59 64 25 |.&44ADE,3,`%,Yd%| 0000b8d0 b8 2c 2c 2c 69 61 25 3a c8 99 26 34 34 41 44 45 |.,,,ia%:..&44ADE| 0000b8e0 2c 33 2c 60 25 2c 50 64 25 b8 2c 2c 2c 63 25 3a |,3,`%,Pd%.,,,c%:| 0000b8f0 e7 ac 63 25 8c 0d ce 0e 09 63 25 3d 2d 31 0d ce |..c%.....c%=-1..| 0000b900 20 37 cc 3a 63 25 3d 30 3a e3 65 25 3d 30 b8 33 | 7.:c%=0:.e%=0.3| 0000b910 3a c8 99 26 34 34 41 44 45 2c 33 2c 60 25 2c 51 |:..&44ADE,3,`%,Q| 0000b920 64 25 2b 65 25 b8 2c 2c 2c 41 25 3a e7 41 25 8c |d%+e%.,,,A%:.A%.| 0000b930 63 25 3d 65 25 0d ce 44 2d ed 3a e7 63 25 3d 33 |c%=e%..D-.:.c%=3| 0000b940 8c c8 99 26 34 34 41 43 43 2c 60 25 2c 55 64 25 |...&44ACC,`%,Ud%| 0000b950 b8 2c 2c 63 25 3a 63 25 3d 28 63 25 3c 3c 34 84 |.,,c%:c%=(c%<<4.| 0000b960 33 29 0d ce 56 05 cd 0d ce 5f 3c 67 61 25 3d 63 |3)..V...._<ga%=c| 0000b970 25 3a 63 25 3d 30 3a e3 65 25 3d 30 b8 32 3a c8 |%:c%=0:.e%=0.2:.| 0000b980 99 26 34 34 41 44 45 2c 33 2c 60 25 2c 56 64 25 |.&44ADE,3,`%,Vd%| 0000b990 2b 65 25 b8 2c 2c 2c 41 25 3a e7 41 25 8c 63 25 |+e%.,,,A%:.A%.c%| 0000b9a0 3d 65 25 0d ce 8c 19 ed 3a 68 61 25 3d 63 25 3a |=e%.....:ha%=c%:| 0000b9b0 f2 41 64 3a f2 42 64 3a f2 70 3a e1 0d ce c2 be |.Ad:.Bd:.p:.....| 0000b9c0 dd f2 41 64 3a c8 99 26 34 34 41 44 45 2c 33 2c |..Ad:..&44ADE,3,| 0000b9d0 57 65 25 2c 4e 65 25 b8 2c 2c 2c 50 6c 25 3a c8 |We%,Ne%.,,,Pl%:.| 0000b9e0 99 26 34 34 41 44 45 2c 33 2c 57 65 25 2c 4f 65 |.&44ADE,3,We%,Oe| 0000b9f0 25 b8 2c 2c 2c 45 6d 25 3a c8 99 26 34 34 41 44 |%.,,,Em%:..&44AD| 0000ba00 45 2c 33 2c 57 65 25 2c 50 65 25 b8 2c 2c 2c 58 |E,3,We%,Pe%.,,,X| 0000ba10 6c 25 3a c8 99 26 34 34 41 44 45 2c 33 2c 57 65 |l%:..&44ADE,3,We| 0000ba20 25 2c 51 65 25 b8 2c 2c 2c 57 6c 25 3a c8 99 26 |%,Qe%.,,,Wl%:..&| 0000ba30 34 34 41 44 45 2c 33 2c 57 65 25 2c 52 65 25 b8 |44ADE,3,We%,Re%.| 0000ba40 2c 2c 2c 68 6c 25 3a c8 99 26 34 34 41 44 45 2c |,,,hl%:..&44ADE,| 0000ba50 33 2c 57 65 25 2c 53 65 25 b8 2c 2c 2c 46 6b 25 |3,We%,Se%.,,,Fk%| 0000ba60 3a c8 99 26 34 34 41 44 45 2c 33 2c 57 65 25 2c |:..&44ADE,3,We%,| 0000ba70 54 65 25 b8 2c 2c 2c 44 6c 25 0d cf 1c 1f c8 99 |Te%.,,,Dl%......| 0000ba80 26 34 34 41 44 45 2c 33 2c 57 65 25 2c 55 65 25 |&44ADE,3,We%,Ue%| 0000ba90 b8 2c 2c 2c 42 6b 25 3a e1 0d cf 2e e3 dd f2 79 |.,,,Bk%:.......y| 0000baa0 64 3a 69 61 25 3d b9 3a 42 6d 25 3d b9 3a 43 6d |d:ia%=.:Bm%=.:Cm| 0000bab0 25 3d a3 3a 55 6c 25 3d 32 3a 58 61 25 3d 30 3a |%=.:Ul%=2:Xa%=0:| 0000bac0 56 6c 25 3d 34 3a 47 6d 25 3d 30 3a 70 62 25 3d |Vl%=4:Gm%=0:pb%=| 0000bad0 39 30 3a 42 61 25 3d a3 3a 59 61 25 3d b9 3a 5a |90:Ba%=.:Ya%=.:Z| 0000bae0 61 25 3d b9 3a 63 6c 25 3d b9 3a 4a 6b 25 3d b9 |a%=.:cl%=.:Jk%=.| 0000baf0 3a 49 6b 25 3d b9 3a 48 6b 25 3d b9 3a 47 6b 25 |:Ik%=.:Hk%=.:Gk%| 0000bb00 3d b9 3a 4b 6b 25 3d b9 3a 4c 6b 25 3d b9 3a 4d |=.:Kk%=.:Lk%=.:M| 0000bb10 6b 25 3d b9 3a 6e 6d 25 3d b9 3a 6f 6d 25 3d b9 |k%=.:nm%=.:om%=.| 0000bb20 3a 4e 6b 25 3d b9 3a 69 6b 25 3d 34 2a 32 3a 44 |:Nk%=.:ik%=4*2:D| 0000bb30 6d 25 3d 34 3a 57 25 3d 31 30 30 3a 44 62 25 3d |m%=4:W%=100:Db%=| 0000bb40 31 3a 4f 25 3d 36 3a 4c 6c 25 3d 34 3a 6a 6c 25 |1:O%=6:Ll%=4:jl%| 0000bb50 3d 31 30 30 3a 4f 62 25 3d 32 2a 4b 25 3a 77 6c |=100:Ob%=2*K%:wl| 0000bb60 25 3d b9 3a 69 6c 25 3d b9 3a 67 61 25 3d 2d 31 |%=.:il%=.:ga%=-1| 0000bb70 3a 68 61 25 3d 30 3a 50 6c 25 3d b9 0d d0 8d 40 |:ha%=0:Pl%=....@| 0000bb80 45 6d 25 3d a3 3a 58 6c 25 3d a3 3a 57 6c 25 3d |Em%=.:Xl%=.:Wl%=| 0000bb90 a3 3a 68 6c 25 3d a3 3a 46 6b 25 3d a3 3a 44 6c |.:hl%=.:Fk%=.:Dl| 0000bba0 25 3d a3 3a 42 6b 25 3d a3 3a c8 99 26 34 30 31 |%=.:Bk%=.:..&401| 0000bbb0 38 37 2c 79 61 25 2b 47 6d 25 3a e1 0d d0 de bc |87,ya%+Gm%:.....| 0000bbc0 dd f2 4d 63 3a ea 41 25 2c 53 6b 25 3a c8 99 26 |..Mc:.A%,Sk%:..&| 0000bbd0 34 34 41 44 45 2c 32 2c 6d 25 2c 65 65 25 2c 67 |44ADE,2,m%,ee%,g| 0000bbe0 25 2c 38 3a 63 25 3d 28 a7 22 41 20 41 23 42 20 |%,8:c%=(."A A#B | 0000bbf0 43 20 43 23 44 20 44 23 45 20 46 20 46 23 47 20 |C C#D D#E F F#G | 0000bc00 47 23 22 2c a4 63 28 67 25 29 29 2d 31 29 2f 32 |G#",.c(g%))-1)/2| 0000bc10 3a 53 6b 25 3d a0 28 c1 22 26 30 43 30 30 26 30 |:Sk%=.(."&0C00&0| 0000bc20 44 35 35 26 30 45 41 41 26 31 30 30 30 26 31 31 |D55&0EAA&1000&11| 0000bc30 35 35 26 31 32 41 41 26 31 34 30 30 26 31 35 35 |55&12AA&1400&155| 0000bc40 35 26 31 36 41 41 26 31 38 30 30 26 31 39 35 35 |5&16AA&1800&1955| 0000bc50 26 31 41 41 41 22 2c 63 25 2a 35 2b 31 2c 35 29 |&1AAA",c%*5+1,5)| 0000bc60 29 2b 26 31 30 30 30 2a 7a 6d 25 3a c8 99 26 34 |)+&1000*zm%:..&4| 0000bc70 30 30 43 46 2c 2c 67 25 0d d1 1d 2a 41 25 3d 28 |00CF,,g%...*A%=(| 0000bc80 28 72 63 25 3d 68 65 25 29 80 28 6d 25 3d 71 63 |(rc%=he%).(m%=qc| 0000bc90 25 29 80 49 61 25 29 3a e7 67 25 21 31 32 3d 6d |%).Ia%):.g%!12=m| 0000bca0 25 8c 0d d1 2f 0c c8 8e 67 25 21 31 36 ca 0d d1 |%.../...g%!16...| 0000bcb0 38 36 c9 31 33 2c 36 37 2c 32 30 2c 32 31 2c 32 |86.13,67,20,21,2| 0000bcc0 32 2c 33 31 2c 33 32 2c 33 33 2c 33 34 2c 33 35 |2,31,32,33,34,35| 0000bcd0 2c 33 36 2c 33 37 2c 33 38 2c 33 39 2c 34 30 3a |,36,37,38,39,40:| 0000bce0 41 25 3d b9 0d d1 4a 05 cb 0d d1 4a 05 cd 0d d1 |A%=...J....J....| 0000bcf0 53 08 e7 41 25 8c 0d d1 5c 09 e7 74 63 25 8c 0d |S..A%...\..tc%..| 0000bd00 d1 65 1d e7 73 63 25 3c 3e 53 6b 25 8c d4 38 2c |.e..sc%<>Sk%..8,| 0000bd10 26 31 46 46 2c 53 6b 25 2c 32 35 35 0d d1 6e 1b |&1FF,Sk%,255..n.| 0000bd20 cc 3a d4 38 2c 26 31 37 46 2c 53 6b 25 2c 32 35 |.:.8,&17F,Sk%,25| 0000bd30 35 3a 74 63 25 3d b9 0d d1 92 05 cd 0d d1 92 15 |5:tc%=..........| 0000bd40 cc 3a e7 74 63 25 8c d4 38 2c 30 2c 53 6b 25 2c |.:.tc%..8,0,Sk%,| 0000bd50 31 0d d1 a4 09 74 63 25 3d a3 0d d1 b6 05 cd 0d |1....tc%=.......| 0000bd60 d1 b6 0d 73 63 25 3d 53 6b 25 3a e1 0d d1 c8 2b |...sc%=Sk%:....+| 0000bd70 dd f2 66 64 28 63 25 29 3a ea 41 25 3a 41 6d 25 |..fd(c%):.A%:Am%| 0000bd80 3d 63 25 2f 32 3a c8 99 26 34 32 b8 41 25 3a e7 |=c%/2:..&42.A%:.| 0000bd90 41 25 3e 78 6d 25 8c 0d d1 fe 1e 78 6d 25 3d 41 |A%>xm%.....xm%=A| 0000bda0 25 2b 33 30 3a d4 38 2c 26 31 30 30 2b 41 6d 25 |%+30:.8,&100+Am%| 0000bdb0 2c 38 30 2c 32 0d d2 19 05 cd 0d d2 19 05 e1 0d |,80,2...........| 0000bdc0 d2 22 18 dd f2 75 64 3a f2 68 28 79 6d 25 29 3a |."...ud:.h(ym%):| 0000bdd0 e7 77 6d 25 8c f2 74 0d d2 46 05 e1 0d d2 4f ba |.wm%..t..F....O.| 0000bde0 dd f2 7a 64 28 63 25 29 3a ea 41 25 2c 48 6d 25 |..zd(c%):.A%,Hm%| 0000bdf0 3a 63 25 3d ac 63 25 3a c8 99 26 34 34 41 44 44 |:c%=.c%:..&44ADD| 0000be00 2c 33 2c 60 25 2c 50 64 25 2c ac 63 25 3a c8 99 |,3,`%,Pd%,.c%:..| 0000be10 26 34 34 41 44 44 2c 34 2c 60 25 2c 51 64 25 2c |&44ADD,4,`%,Qd%,| 0000be20 63 25 3a c8 99 26 34 34 41 44 44 2c 34 2c 60 25 |c%:..&44ADD,4,`%| 0000be30 2c 52 64 25 2c 63 25 3a c8 99 26 34 34 41 44 44 |,Rd%,c%:..&44ADD| 0000be40 2c 34 2c 60 25 2c 53 64 25 2c 63 25 3a c8 99 26 |,4,`%,Sd%,c%:..&| 0000be50 34 34 41 44 44 2c 34 2c 60 25 2c 54 64 25 2c 63 |44ADD,4,`%,Td%,c| 0000be60 25 3a 48 6d 25 3d 2d 31 3a e3 65 25 3d 30 b8 33 |%:Hm%=-1:.e%=0.3| 0000be70 3a c8 99 26 34 34 41 44 45 2c 33 2c 60 25 2c 51 |:..&44ADE,3,`%,Q| 0000be80 64 25 2b 65 25 b8 2c 2c 2c 41 25 3a e7 41 25 8c |d%+e%.,,,A%:.A%.| 0000be90 48 6d 25 3d 65 25 0d d2 c4 27 ed 3a e7 48 6d 25 |Hm%=e%...'.:.Hm%| 0000bea0 3d 2d 31 8c 48 6d 25 3d 30 3a c8 99 26 34 34 41 |=-1.Hm%=0:..&44A| 0000beb0 44 44 2c 33 2c 60 25 2c 51 64 25 2c b9 0d d2 d6 |DD,3,`%,Qd%,....| 0000bec0 23 c8 99 26 34 34 41 44 44 2c 34 2c 60 25 2c 55 |#..&44ADD,4,`%,U| 0000bed0 64 25 2c 28 63 25 84 48 6d 25 3c 3e 33 29 3a e1 |d%,(c%.Hm%<>3):.| 0000bee0 0d d2 e8 4b dd f2 78 64 3a ea 76 25 2c 62 25 2c |...K..xd:.v%,b%,| 0000bef0 61 25 2c 65 24 3a 65 24 3d 22 3c 4d 42 43 6f 6e |a%,e$:e$="<MBCon| 0000bf00 66 69 67 46 69 6c 65 73 24 44 69 72 3e 2e 44 65 |figFiles$Dir>.De| 0000bf10 66 61 75 6c 74 73 22 3a 61 25 3d a4 44 28 65 24 |faults":a%=.D(e$| 0000bf20 2c a3 29 3a e7 61 25 3d 30 8c e1 0d d3 1e 2a 62 |,.):.a%=0.....*b| 0000bf30 25 3d a4 66 28 22 4d 42 43 6f 6e 66 69 67 22 2c |%=.f("MBConfig",| 0000bf40 61 25 29 3a e7 62 25 3d 30 8c 62 25 3d a4 62 28 |a%):.b%=0.b%=.b(| 0000bf50 31 2c 61 25 29 0d d3 30 1a e7 62 25 3d 30 8c 62 |1,a%)..0..b%=0.b| 0000bf60 25 3d a4 66 28 22 43 6f 6e 66 22 2c 61 25 29 0d |%=.f("Conf",a%).| 0000bf70 d3 39 1a e7 62 25 3d 30 8c 62 25 3d a4 62 28 34 |.9..b%=0.b%=.b(4| 0000bf80 31 2a 34 2b 38 2c 61 25 29 0d d3 42 17 e7 62 25 |1*4+8,a%)..B..b%| 0000bf90 3d 30 8c 62 25 3d a4 62 28 55 6c 25 2c 61 25 29 |=0.b%=.b(Ul%,a%)| 0000bfa0 0d d3 4b 17 e7 62 25 3d 30 8c 62 25 3d a4 62 28 |..K..b%=0.b%=.b(| 0000bfb0 58 61 25 2c 61 25 29 0d d3 54 17 e7 62 25 3d 30 |Xa%,a%)..T..b%=0| 0000bfc0 8c 62 25 3d a4 62 28 56 6c 25 2c 61 25 29 0d d3 |.b%=.b(Vl%,a%)..| 0000bfd0 5d 17 e7 62 25 3d 30 8c 62 25 3d a4 62 28 47 6d |]..b%=0.b%=.b(Gm| 0000bfe0 25 2c 61 25 29 0d d3 66 17 e7 62 25 3d 30 8c 62 |%,a%)..f..b%=0.b| 0000bff0 25 3d a4 62 28 70 62 25 2c 61 25 29 0d d3 6f 17 |%=.b(pb%,a%)..o.| 0000c000 e7 62 25 3d 30 8c 62 25 3d a4 62 28 42 61 25 2c |.b%=0.b%=.b(Ba%,| 0000c010 61 25 29 0d d3 78 17 e7 62 25 3d 30 8c 62 25 3d |a%)..x..b%=0.b%=| 0000c020 a4 62 28 59 61 25 2c 61 25 29 0d d3 81 17 e7 62 |.b(Ya%,a%).....b| 0000c030 25 3d 30 8c 62 25 3d a4 62 28 5a 61 25 2c 61 25 |%=0.b%=.b(Za%,a%| 0000c040 29 0d d3 8a 17 e7 62 25 3d 30 8c 62 25 3d a4 62 |).....b%=0.b%=.b| 0000c050 28 63 6c 25 2c 61 25 29 0d d3 93 17 e7 62 25 3d |(cl%,a%).....b%=| 0000c060 30 8c 62 25 3d a4 62 28 4a 6b 25 2c 61 25 29 0d |0.b%=.b(Jk%,a%).| 0000c070 d3 9c 17 e7 62 25 3d 30 8c 62 25 3d a4 62 28 49 |....b%=0.b%=.b(I| 0000c080 6b 25 2c 61 25 29 0d d3 a5 17 e7 62 25 3d 30 8c |k%,a%).....b%=0.| 0000c090 62 25 3d a4 62 28 48 6b 25 2c 61 25 29 0d d3 ae |b%=.b(Hk%,a%)...| 0000c0a0 17 e7 62 25 3d 30 8c 62 25 3d a4 62 28 47 6b 25 |..b%=0.b%=.b(Gk%| 0000c0b0 2c 61 25 29 0d d3 b7 17 e7 62 25 3d 30 8c 62 25 |,a%).....b%=0.b%| 0000c0c0 3d a4 62 28 4b 6b 25 2c 61 25 29 0d d3 c0 17 e7 |=.b(Kk%,a%).....| 0000c0d0 62 25 3d 30 8c 62 25 3d a4 62 28 4c 6b 25 2c 61 |b%=0.b%=.b(Lk%,a| 0000c0e0 25 29 0d d3 c9 17 e7 62 25 3d 30 8c 62 25 3d a4 |%).....b%=0.b%=.| 0000c0f0 62 28 4d 6b 25 2c 61 25 29 0d d3 d2 17 e7 62 25 |b(Mk%,a%).....b%| 0000c100 3d 30 8c 62 25 3d a4 62 28 6e 6d 25 2c 61 25 29 |=0.b%=.b(nm%,a%)| 0000c110 0d d3 db 17 e7 62 25 3d 30 8c 62 25 3d a4 62 28 |.....b%=0.b%=.b(| 0000c120 6f 6d 25 2c 61 25 29 0d d3 e4 17 e7 62 25 3d 30 |om%,a%).....b%=0| 0000c130 8c 62 25 3d a4 62 28 4e 6b 25 2c 61 25 29 0d d3 |.b%=.b(Nk%,a%)..| 0000c140 ed 17 e7 62 25 3d 30 8c 62 25 3d a4 62 28 69 6b |...b%=0.b%=.b(ik| 0000c150 25 2c 61 25 29 0d d3 f6 17 e7 62 25 3d 30 8c 62 |%,a%).....b%=0.b| 0000c160 25 3d a4 62 28 44 6d 25 2c 61 25 29 0d d3 ff 16 |%=.b(Dm%,a%)....| 0000c170 e7 62 25 3d 30 8c 62 25 3d a4 62 28 57 25 2c 61 |.b%=0.b%=.b(W%,a| 0000c180 25 29 0d d4 08 17 e7 62 25 3d 30 8c 62 25 3d a4 |%).....b%=0.b%=.| 0000c190 62 28 44 62 25 2c 61 25 29 0d d4 11 16 e7 62 25 |b(Db%,a%).....b%| 0000c1a0 3d 30 8c 62 25 3d a4 62 28 4f 25 2c 61 25 29 0d |=0.b%=.b(O%,a%).| 0000c1b0 d4 1a 17 e7 62 25 3d 30 8c 62 25 3d a4 62 28 4c |....b%=0.b%=.b(L| 0000c1c0 6c 25 2c 61 25 29 0d d4 23 17 e7 62 25 3d 30 8c |l%,a%)..#..b%=0.| 0000c1d0 62 25 3d a4 62 28 6a 6c 25 2c 61 25 29 0d d4 2c |b%=.b(jl%,a%)..,| 0000c1e0 17 e7 62 25 3d 30 8c 62 25 3d a4 62 28 4f 62 25 |..b%=0.b%=.b(Ob%| 0000c1f0 2c 61 25 29 0d d4 35 17 e7 62 25 3d 30 8c 62 25 |,a%)..5..b%=0.b%| 0000c200 3d a4 62 28 77 6c 25 2c 61 25 29 0d d4 3e 17 e7 |=.b(wl%,a%)..>..| 0000c210 62 25 3d 30 8c 62 25 3d a4 62 28 69 6c 25 2c 61 |b%=0.b%=.b(il%,a| 0000c220 25 29 0d d4 47 17 e7 62 25 3d 30 8c 62 25 3d a4 |%)..G..b%=0.b%=.| 0000c230 62 28 67 61 25 2c 61 25 29 0d d4 50 17 e7 62 25 |b(ga%,a%)..P..b%| 0000c240 3d 30 8c 62 25 3d a4 62 28 68 61 25 2c 61 25 29 |=0.b%=.b(ha%,a%)| 0000c250 0d d4 59 17 e7 62 25 3d 30 8c 62 25 3d a4 62 28 |..Y..b%=0.b%=.b(| 0000c260 50 6c 25 2c 61 25 29 0d d4 62 17 e7 62 25 3d 30 |Pl%,a%)..b..b%=0| 0000c270 8c 62 25 3d a4 62 28 45 6d 25 2c 61 25 29 0d d4 |.b%=.b(Em%,a%)..| 0000c280 6b 17 e7 62 25 3d 30 8c 62 25 3d a4 62 28 58 6c |k..b%=0.b%=.b(Xl| 0000c290 25 2c 61 25 29 0d d4 74 17 e7 62 25 3d 30 8c 62 |%,a%)..t..b%=0.b| 0000c2a0 25 3d a4 62 28 57 6c 25 2c 61 25 29 0d d4 7d 17 |%=.b(Wl%,a%)..}.| 0000c2b0 e7 62 25 3d 30 8c 62 25 3d a4 62 28 68 6c 25 2c |.b%=0.b%=.b(hl%,| 0000c2c0 61 25 29 0d d4 86 17 e7 62 25 3d 30 8c 62 25 3d |a%).....b%=0.b%=| 0000c2d0 a4 62 28 46 6b 25 2c 61 25 29 0d d4 8f 17 e7 62 |.b(Fk%,a%).....b| 0000c2e0 25 3d 30 8c 62 25 3d a4 62 28 44 6c 25 2c 61 25 |%=0.b%=.b(Dl%,a%| 0000c2f0 29 0d d4 98 17 e7 62 25 3d 30 8c 62 25 3d a4 62 |).....b%=0.b%=.b| 0000c300 28 42 6b 25 2c 61 25 29 0d d4 a1 17 e7 62 25 3d |(Bk%,a%).....b%=| 0000c310 30 8c 62 25 3d a4 62 28 42 6d 25 2c 61 25 29 0d |0.b%=.b(Bm%,a%).| 0000c320 d4 aa 17 e7 62 25 3d 30 8c 62 25 3d a4 62 28 43 |....b%=0.b%=.b(C| 0000c330 6d 25 2c 61 25 29 0d d4 b3 17 e7 62 25 3d 30 8c |m%,a%).....b%=0.| 0000c340 62 25 3d a4 62 28 69 61 25 2c 61 25 29 0d d4 bc |b%=.b(ia%,a%)...| 0000c350 1a e7 62 25 3d 30 8c 62 25 3d a4 66 28 22 45 6e |..b%=0.b%=.f("En| 0000c360 64 58 22 2c 61 25 29 0d d4 c5 16 e7 62 25 3d 30 |dX",a%).....b%=0| 0000c370 8c 62 25 3d a4 62 28 2d 31 2c 61 25 29 0d d4 ce |.b%=.b(-1,a%)...| 0000c380 13 e7 62 25 3d 30 8c 62 25 3d a4 69 28 61 25 29 |..b%=0.b%=.i(a%)| 0000c390 0d d4 d7 23 e7 62 25 3c 3e 30 8c f2 62 28 a4 63 |...#.b%<>0..b(.c| 0000c3a0 28 62 25 2b 34 29 2c a3 29 3a 62 25 3d a4 69 28 |(b%+4),.):b%=.i(| 0000c3b0 61 25 29 0d d4 e0 3b 65 24 3d 22 3c 4d 42 43 6f |a%)...;e$="<MBCo| 0000c3c0 6e 66 69 67 46 69 6c 65 73 24 44 69 72 3e 2e 53 |nfigFiles$Dir>.S| 0000c3d0 74 61 72 74 55 70 43 6f 6e 22 3a 61 25 3d a4 44 |tartUpCon":a%=.D| 0000c3e0 28 65 24 2c a3 29 3a e7 61 25 3d 30 8c e1 0d d5 |(e$,.):.a%=0....| 0000c3f0 04 17 e7 62 25 3d 30 8c 62 25 3d a4 62 28 67 61 |...b%=0.b%=.b(ga| 0000c400 25 2c 61 25 29 0d d5 0d 17 e7 62 25 3d 30 8c 62 |%,a%).....b%=0.b| 0000c410 25 3d a4 62 28 68 61 25 2c 61 25 29 0d d5 16 17 |%=.b(ha%,a%)....| 0000c420 e7 62 25 3d 30 8c 62 25 3d a4 62 28 69 61 25 2c |.b%=0.b%=.b(ia%,| 0000c430 61 25 29 0d d5 1f 13 e7 62 25 3d 30 8c 62 25 3d |a%).....b%=0.b%=| 0000c440 a4 69 28 61 25 29 0d d5 28 28 e7 62 25 3c 3e 30 |.i(a%)..((.b%<>0| 0000c450 8c f2 62 28 a4 63 28 62 25 2b 34 29 2b 22 2f 32 |..b(.c(b%+4)+"/2| 0000c460 22 2c a3 29 3a 62 25 3d a4 69 28 61 25 29 0d d5 |",.):b%=.i(a%)..| 0000c470 31 05 e1 0d d5 3a 58 dd f2 64 61 3a ea 76 25 2c |1....:X..da:.v%,| 0000c480 62 25 2c 61 25 2c 65 24 2c 41 25 2c 63 25 3a f2 |b%,a%,e$,A%,c%:.| 0000c490 69 3a 63 25 3d 30 3a 65 24 3d 22 3c 4d 42 43 6f |i:c%=0:e$="<MBCo| 0000c4a0 6e 66 69 67 46 69 6c 65 73 24 44 69 72 3e 2e 44 |nfigFiles$Dir>.D| 0000c4b0 65 66 61 75 6c 74 73 22 3a 62 25 3d 30 3a e7 ac |efaults":b%=0:..| 0000c4c0 a4 67 28 65 24 29 8c 62 25 3d 32 0d d5 82 13 e7 |.g(e$).b%=2.....| 0000c4d0 62 25 3d 30 8c 61 25 3d a4 6c 28 65 24 29 0d d5 |b%=0.a%=.l(e$)..| 0000c4e0 8b 0e e7 61 25 3d 30 8c 62 25 3d 32 0d d5 94 18 |...a%=0.b%=2....| 0000c4f0 e7 62 25 3d 30 8c 62 25 3d a4 68 28 62 24 2c 38 |.b%=0.b%=.h(b$,8| 0000c500 2c 61 25 29 0d d5 9d 41 e7 62 24 3c 3e 22 4d 42 |,a%)...A.b$<>"MB| 0000c510 43 6f 6e 66 69 67 22 80 62 25 3d 30 8c f2 62 28 |Config".b%=0..b(| 0000c520 22 46 69 6c 65 20 66 6f 72 6d 61 74 20 6e 6f 74 |"File format not| 0000c530 20 75 6e 64 65 72 73 74 6f 6f 64 2e 22 2c a3 29 | understood.",.)| 0000c540 3a 62 25 3d 31 0d d5 a6 16 e7 62 25 3d 30 8c 62 |:b%=1.....b%=0.b| 0000c550 25 3d a4 61 28 63 25 2c 61 25 29 0d d5 af 73 e7 |%=.a(c%,a%)...s.| 0000c560 63 25 3e 31 80 62 25 3d 30 8c f2 62 28 22 54 68 |c%>1.b%=0..b("Th| 0000c570 69 73 20 66 69 6c 65 20 77 61 73 20 6d 61 64 65 |is file was made| 0000c580 20 62 79 20 61 20 6e 65 77 65 72 20 76 65 72 73 | by a newer vers| 0000c590 69 6f 6e 20 6f 66 20 4d 75 73 69 63 42 6f 78 2e |ion of MusicBox.| 0000c5a0 20 59 6f 75 20 77 69 6c 6c 20 6e 65 65 64 20 61 | You will need a| 0000c5b0 6e 20 75 70 67 72 61 64 65 20 74 6f 20 6c 6f 61 |n upgrade to loa| 0000c5c0 64 20 69 74 2e 22 2c a3 29 3a 62 25 3d 31 0d d5 |d it.",.):b%=1..| 0000c5d0 b8 18 e7 62 25 3d 30 8c 62 25 3d a4 68 28 62 24 |...b%=0.b%=.h(b$| 0000c5e0 2c 34 2c 61 25 29 0d d5 c1 1b c8 95 62 25 3d 30 |,4,a%)......b%=0| 0000c5f0 80 62 24 3c 3e 22 45 6e 64 58 22 3a c8 8e 62 24 |.b$<>"EndX":..b$| 0000c600 ca 0d d5 d3 15 c9 22 43 6f 6e 66 22 3a 62 25 3d |......"Conf":b%=| 0000c610 a4 5a 28 61 25 29 0d d5 e5 0f 7f 3a 62 25 3d a4 |.Z(a%).....:b%=.| 0000c620 6a 28 61 25 29 0d d5 ee 05 cb 0d d5 ee 18 e7 62 |j(a%)..........b| 0000c630 25 3d 30 8c 62 25 3d a4 68 28 62 24 2c 34 2c 61 |%=0.b%=.h(b$,4,a| 0000c640 25 29 0d d5 f7 27 ce 3a e7 62 25 3c 3e 30 80 62 |%)...'.:.b%<>0.b| 0000c650 25 3c 3e 31 80 62 25 3c 3e 32 8c f2 62 28 a4 63 |%<>1.b%<>2..b(.c| 0000c660 28 62 25 2b 34 29 2c a3 29 0d d6 12 14 e7 62 25 |(b%+4),.).....b%| 0000c670 3c 3e 32 8c 41 25 3d a4 69 28 61 25 29 0d d6 1b |<>2.A%=.i(a%)...| 0000c680 11 f2 70 3a e7 62 25 3c 3e 30 8c f2 79 64 0d d6 |..p:.b%<>0..yd..| 0000c690 2d 94 f2 76 64 3a 58 61 25 3d 32 3a 44 62 25 3d |-..vd:Xa%=2:Db%=| 0000c6a0 2d 31 3a 57 25 3d 2d 31 3a 4f 25 3d 2d 31 3a 6a |-1:W%=-1:O%=-1:j| 0000c6b0 6c 25 3d 2d 31 3a 4f 62 25 3d 2d 31 3a f2 77 64 |l%=-1:Ob%=-1:.wd| 0000c6c0 3a 50 6c 25 3d b9 3a 45 6d 25 3d b9 3a 58 6c 25 |:Pl%=.:Em%=.:Xl%| 0000c6d0 3d a3 3a 57 6c 25 3d a3 3a 68 6c 25 3d b9 3a 46 |=.:Wl%=.:hl%=.:F| 0000c6e0 6b 25 3d a3 3a 44 6c 25 3d a3 3a 42 6b 25 3d b9 |k%=.:Dl%=.:Bk%=.| 0000c6f0 3a e7 a4 67 28 22 3c 4d 42 54 75 6e 65 46 69 6c |:..g("<MBTuneFil| 0000c700 65 73 24 44 69 72 3e 2e 44 65 66 61 75 6c 74 73 |es$Dir>.Defaults| 0000c710 22 29 8c f2 66 62 28 22 44 65 66 61 75 6c 74 73 |")..fb("Defaults| 0000c720 22 29 0d d6 c6 35 e7 a4 67 28 22 3c 4d 42 42 65 |")...5..g("<MBBe| 0000c730 61 74 46 69 6c 65 73 24 44 69 72 3e 2e 44 65 66 |atFiles$Dir>.Def| 0000c740 61 75 6c 74 73 22 29 8c f2 6f 63 28 22 44 65 66 |aults")..oc("Def| 0000c750 61 75 6c 74 73 22 29 0d d6 cf 37 e7 a4 67 28 22 |aults")...7..g("| 0000c760 3c 4d 42 53 6f 75 6e 64 46 69 6c 65 73 24 44 69 |<MBSoundFiles$Di| 0000c770 72 3e 2e 44 65 66 61 75 6c 74 73 22 29 8c f2 46 |r>.Defaults")..F| 0000c780 28 22 44 65 66 61 75 6c 74 73 22 2c 30 29 0d d6 |("Defaults",0)..| 0000c790 d8 37 e7 a4 67 28 22 3c 4d 42 43 68 6f 72 64 46 |.7..g("<MBChordF| 0000c7a0 69 6c 65 73 24 44 69 72 3e 2e 44 65 66 61 75 6c |iles$Dir>.Defaul| 0000c7b0 74 73 22 29 8c f2 46 28 22 44 65 66 61 75 6c 74 |ts")..F("Default| 0000c7c0 73 22 2c 32 29 0d d6 e1 09 f2 41 64 3a e1 0d d6 |s",2).....Ad:...| 0000c7d0 f3 33 dd a4 5a 28 61 25 29 3a ea 62 25 2c 76 25 |.3..Z(a%):.b%,v%| 0000c7e0 3a 62 25 3d a4 61 28 76 25 2c 61 25 29 3a e7 62 |:b%=.a(v%,a%):.b| 0000c7f0 25 3d 30 8c 62 25 3d a4 61 28 55 6c 25 2c 61 25 |%=0.b%=.a(Ul%,a%| 0000c800 29 0d d7 20 17 e7 62 25 3d 30 8c 62 25 3d a4 61 |).. ..b%=0.b%=.a| 0000c810 28 58 61 25 2c 61 25 29 0d d7 29 17 e7 62 25 3d |(Xa%,a%)..)..b%=| 0000c820 30 8c 62 25 3d a4 61 28 56 6c 25 2c 61 25 29 0d |0.b%=.a(Vl%,a%).| 0000c830 d7 32 17 e7 62 25 3d 30 8c 62 25 3d a4 61 28 47 |.2..b%=0.b%=.a(G| 0000c840 6d 25 2c 61 25 29 0d d7 3b 17 e7 62 25 3d 30 8c |m%,a%)..;..b%=0.| 0000c850 62 25 3d a4 61 28 70 62 25 2c 61 25 29 0d d7 44 |b%=.a(pb%,a%)..D| 0000c860 17 e7 62 25 3d 30 8c 62 25 3d a4 61 28 42 61 25 |..b%=0.b%=.a(Ba%| 0000c870 2c 61 25 29 0d d7 4d 17 e7 62 25 3d 30 8c 62 25 |,a%)..M..b%=0.b%| 0000c880 3d a4 61 28 59 61 25 2c 61 25 29 0d d7 56 17 e7 |=.a(Ya%,a%)..V..| 0000c890 62 25 3d 30 8c 62 25 3d a4 61 28 5a 61 25 2c 61 |b%=0.b%=.a(Za%,a| 0000c8a0 25 29 0d d7 5f 17 e7 62 25 3d 30 8c 62 25 3d a4 |%).._..b%=0.b%=.| 0000c8b0 61 28 63 6c 25 2c 61 25 29 0d d7 68 17 e7 62 25 |a(cl%,a%)..h..b%| 0000c8c0 3d 30 8c 62 25 3d a4 61 28 4a 6b 25 2c 61 25 29 |=0.b%=.a(Jk%,a%)| 0000c8d0 0d d7 71 17 e7 62 25 3d 30 8c 62 25 3d a4 61 28 |..q..b%=0.b%=.a(| 0000c8e0 49 6b 25 2c 61 25 29 0d d7 7a 17 e7 62 25 3d 30 |Ik%,a%)..z..b%=0| 0000c8f0 8c 62 25 3d a4 61 28 48 6b 25 2c 61 25 29 0d d7 |.b%=.a(Hk%,a%)..| 0000c900 83 17 e7 62 25 3d 30 8c 62 25 3d a4 61 28 47 6b |...b%=0.b%=.a(Gk| 0000c910 25 2c 61 25 29 0d d7 8c 17 e7 62 25 3d 30 8c 62 |%,a%).....b%=0.b| 0000c920 25 3d a4 61 28 4b 6b 25 2c 61 25 29 0d d7 95 17 |%=.a(Kk%,a%)....| 0000c930 e7 62 25 3d 30 8c 62 25 3d a4 61 28 4c 6b 25 2c |.b%=0.b%=.a(Lk%,| 0000c940 61 25 29 0d d7 9e 17 e7 62 25 3d 30 8c 62 25 3d |a%).....b%=0.b%=| 0000c950 a4 61 28 4d 6b 25 2c 61 25 29 0d d7 a7 17 e7 62 |.a(Mk%,a%).....b| 0000c960 25 3d 30 8c 62 25 3d a4 61 28 6e 6d 25 2c 61 25 |%=0.b%=.a(nm%,a%| 0000c970 29 0d d7 b0 17 e7 62 25 3d 30 8c 62 25 3d a4 61 |).....b%=0.b%=.a| 0000c980 28 6f 6d 25 2c 61 25 29 0d d7 b9 17 e7 62 25 3d |(om%,a%).....b%=| 0000c990 30 8c 62 25 3d a4 61 28 4e 6b 25 2c 61 25 29 0d |0.b%=.a(Nk%,a%).| 0000c9a0 d7 c2 17 e7 62 25 3d 30 8c 62 25 3d a4 61 28 69 |....b%=0.b%=.a(i| 0000c9b0 6b 25 2c 61 25 29 0d d7 cb 17 e7 62 25 3d 30 8c |k%,a%).....b%=0.| 0000c9c0 62 25 3d a4 61 28 44 6d 25 2c 61 25 29 0d d7 d4 |b%=.a(Dm%,a%)...| 0000c9d0 16 e7 62 25 3d 30 8c 62 25 3d a4 61 28 57 25 2c |..b%=0.b%=.a(W%,| 0000c9e0 61 25 29 0d d7 dd 17 e7 62 25 3d 30 8c 62 25 3d |a%).....b%=0.b%=| 0000c9f0 a4 61 28 44 62 25 2c 61 25 29 0d d7 e6 16 e7 62 |.a(Db%,a%).....b| 0000ca00 25 3d 30 8c 62 25 3d a4 61 28 4f 25 2c 61 25 29 |%=0.b%=.a(O%,a%)| 0000ca10 0d d7 ef 17 e7 62 25 3d 30 8c 62 25 3d a4 61 28 |.....b%=0.b%=.a(| 0000ca20 4c 6c 25 2c 61 25 29 0d d7 f8 17 e7 62 25 3d 30 |Ll%,a%).....b%=0| 0000ca30 8c 62 25 3d a4 61 28 6a 6c 25 2c 61 25 29 0d d8 |.b%=.a(jl%,a%)..| 0000ca40 01 17 e7 62 25 3d 30 8c 62 25 3d a4 61 28 4f 62 |...b%=0.b%=.a(Ob| 0000ca50 25 2c 61 25 29 0d d8 0a 17 e7 62 25 3d 30 8c 62 |%,a%).....b%=0.b| 0000ca60 25 3d a4 61 28 77 6c 25 2c 61 25 29 0d d8 13 17 |%=.a(wl%,a%)....| 0000ca70 e7 62 25 3d 30 8c 62 25 3d a4 61 28 69 6c 25 2c |.b%=0.b%=.a(il%,| 0000ca80 61 25 29 0d d8 1c 17 e7 62 25 3d 30 8c 62 25 3d |a%).....b%=0.b%=| 0000ca90 a4 61 28 67 61 25 2c 61 25 29 0d d8 25 17 e7 62 |.a(ga%,a%)..%..b| 0000caa0 25 3d 30 8c 62 25 3d a4 61 28 68 61 25 2c 61 25 |%=0.b%=.a(ha%,a%| 0000cab0 29 0d d8 2e 17 e7 62 25 3d 30 8c 62 25 3d a4 61 |).....b%=0.b%=.a| 0000cac0 28 50 6c 25 2c 61 25 29 0d d8 37 17 e7 62 25 3d |(Pl%,a%)..7..b%=| 0000cad0 30 8c 62 25 3d a4 61 28 45 6d 25 2c 61 25 29 0d |0.b%=.a(Em%,a%).| 0000cae0 d8 40 17 e7 62 25 3d 30 8c 62 25 3d a4 61 28 58 |.@..b%=0.b%=.a(X| 0000caf0 6c 25 2c 61 25 29 0d d8 49 17 e7 62 25 3d 30 8c |l%,a%)..I..b%=0.| 0000cb00 62 25 3d a4 61 28 57 6c 25 2c 61 25 29 0d d8 52 |b%=.a(Wl%,a%)..R| 0000cb10 17 e7 62 25 3d 30 8c 62 25 3d a4 61 28 68 6c 25 |..b%=0.b%=.a(hl%| 0000cb20 2c 61 25 29 0d d8 5b 17 e7 62 25 3d 30 8c 62 25 |,a%)..[..b%=0.b%| 0000cb30 3d a4 61 28 46 6b 25 2c 61 25 29 0d d8 64 17 e7 |=.a(Fk%,a%)..d..| 0000cb40 62 25 3d 30 8c 62 25 3d a4 61 28 44 6c 25 2c 61 |b%=0.b%=.a(Dl%,a| 0000cb50 25 29 0d d8 6d 17 e7 62 25 3d 30 8c 62 25 3d a4 |%)..m..b%=0.b%=.| 0000cb60 61 28 42 6b 25 2c 61 25 29 0d d8 76 17 e7 62 25 |a(Bk%,a%)..v..b%| 0000cb70 3d 30 8c 62 25 3d a4 61 28 42 6d 25 2c 61 25 29 |=0.b%=.a(Bm%,a%)| 0000cb80 0d d8 7f 17 e7 62 25 3d 30 8c 62 25 3d a4 61 28 |.....b%=0.b%=.a(| 0000cb90 43 6d 25 2c 61 25 29 0d d8 88 17 e7 62 25 3d 30 |Cm%,a%).....b%=0| 0000cba0 8c 62 25 3d a4 61 28 69 61 25 2c 61 25 29 0d d8 |.b%=.a(ia%,a%)..| 0000cbb0 91 1a e7 62 25 3d 30 8c c8 99 26 34 30 31 38 37 |...b%=0...&40187| 0000cbc0 2c 79 61 25 2b 47 6d 25 0d d8 9a 07 3d 62 25 0d |,ya%+Gm%....=b%.| 0000cbd0 d8 be cf dd f2 42 64 3a c8 99 26 34 34 41 44 44 |.....Bd:..&44ADD| 0000cbe0 2c 31 2c 74 25 2c 72 66 25 2c a4 64 28 22 53 61 |,1,t%,rf%,.d("Sa| 0000cbf0 76 65 22 2c 6f 6d 25 29 3a c8 99 26 34 34 41 44 |ve",om%):..&44AD| 0000cc00 44 2c 31 2c 74 25 2c 73 66 25 2c a4 64 28 22 4c |D,1,t%,sf%,.d("L| 0000cc10 6f 61 64 22 2c 6e 6d 25 29 3a c8 99 26 34 34 41 |oad",nm%):..&44A| 0000cc20 44 44 2c 31 2c 6c 25 2c 42 68 25 2c a4 64 28 22 |DD,1,l%,Bh%,.d("| 0000cc30 53 61 76 65 22 2c 6f 6d 25 29 3a c8 99 26 34 34 |Save",om%):..&44| 0000cc40 41 44 44 2c 31 2c 6c 25 2c 43 68 25 2c a4 64 28 |ADD,1,l%,Ch%,.d(| 0000cc50 22 4c 6f 61 64 22 2c 6e 6d 25 29 3a c8 99 26 34 |"Load",nm%):..&4| 0000cc60 34 41 44 44 2c 31 2c 6c 25 2c 44 68 25 2c a4 64 |4ADD,1,l%,Dh%,.d| 0000cc70 28 22 50 72 69 6e 74 22 2c 4e 6b 25 29 3a c8 99 |("Print",Nk%):..| 0000cc80 26 34 34 41 44 44 2c 31 2c 6f 25 2c 6b 67 25 2c |&44ADD,1,o%,kg%,| 0000cc90 a4 64 28 22 53 61 76 65 22 2c 6f 6d 25 29 0d d9 |.d("Save",om%)..| 0000cca0 06 b1 c8 99 26 34 34 41 44 44 2c 31 2c 6f 25 2c |....&44ADD,1,o%,| 0000ccb0 6c 67 25 2c a4 64 28 22 4c 6f 61 64 22 2c 6e 6d |lg%,.d("Load",nm| 0000ccc0 25 29 3a c8 99 26 34 34 41 44 44 2c 31 2c 6f 25 |%):..&44ADD,1,o%| 0000ccd0 2c 5f 66 25 2c a4 64 28 22 50 72 69 6e 74 22 2c |,_f%,.d("Print",| 0000cce0 4e 6b 25 29 3a c8 99 26 34 34 41 44 44 2c 31 2c |Nk%):..&44ADD,1,| 0000ccf0 6f 25 2c 6a 67 25 2c a4 64 28 22 43 6f 70 79 22 |o%,jg%,.d("Copy"| 0000cd00 2c 4c 6b 25 29 3a c8 99 26 34 34 41 44 44 2c 31 |,Lk%):..&44ADD,1| 0000cd10 2c 6f 25 2c 69 67 25 2c a4 64 28 22 43 6c 65 61 |,o%,ig%,.d("Clea| 0000cd20 72 22 2c 4d 6b 25 29 3a c8 99 26 34 34 41 44 44 |r",Mk%):..&44ADD| 0000cd30 2c 31 2b 32 5e 39 2c 6f 25 2c 53 66 25 2c a4 64 |,1+2^9,o%,Sf%,.d| 0000cd40 28 22 74 31 22 2c 47 6b 25 29 2c 2c 76 67 25 0d |("t1",Gk%),,vg%.| 0000cd50 d9 33 c8 c8 99 26 34 34 41 44 44 2c 31 2b 32 5e |.3...&44ADD,1+2^| 0000cd60 39 2c 6f 25 2c 53 66 25 2b 31 2c a4 64 28 22 74 |9,o%,Sf%+1,.d("t| 0000cd70 32 22 2c 48 6b 25 29 2c 2c 76 67 25 3a c8 99 26 |2",Hk%),,vg%:..&| 0000cd80 34 34 41 44 44 2c 31 2b 32 5e 39 2c 6f 25 2c 53 |44ADD,1+2^9,o%,S| 0000cd90 66 25 2b 32 2c a4 64 28 22 74 33 22 2c 49 6b 25 |f%+2,.d("t3",Ik%| 0000cda0 29 2c 2c 76 67 25 3a c8 99 26 34 34 41 44 44 2c |),,vg%:..&44ADD,| 0000cdb0 31 2b 32 5e 39 2c 6f 25 2c 54 66 25 2c a4 64 28 |1+2^9,o%,Tf%,.d(| 0000cdc0 22 74 34 22 2c 4a 6b 25 29 2c 2c 76 67 25 3a c8 |"t4",Jk%),,vg%:.| 0000cdd0 99 26 34 34 41 44 44 2c 31 2b 32 5e 39 2c 6f 25 |.&44ADD,1+2^9,o%| 0000cde0 2c 55 66 25 2c a4 64 28 22 74 36 22 2c 4b 6b 25 |,Uf%,.d("t6",Kk%| 0000cdf0 29 2c 2c 76 67 25 3a c8 99 26 34 34 41 44 44 2c |),,vg%:..&44ADD,| 0000ce00 31 2c 6b 25 2c 54 67 25 2c a4 64 28 22 53 61 76 |1,k%,Tg%,.d("Sav| 0000ce10 65 22 2c 6f 6d 25 29 0d d9 69 b1 c8 99 26 34 34 |e",om%)..i...&44| 0000ce20 41 44 44 2c 31 2c 6b 25 2c 55 67 25 2c a4 64 28 |ADD,1,k%,Ug%,.d(| 0000ce30 22 4c 6f 61 64 22 2c 6e 6d 25 29 3a c8 99 26 34 |"Load",nm%):..&4| 0000ce40 34 41 44 44 2c 31 2c 6b 25 2c 57 67 25 2c a4 64 |4ADD,1,k%,Wg%,.d| 0000ce50 28 22 50 72 69 6e 74 22 2c 4e 6b 25 29 3a c8 99 |("Print",Nk%):..| 0000ce60 26 34 34 41 44 44 2c 31 2c 6b 25 2c 53 67 25 2c |&44ADD,1,k%,Sg%,| 0000ce70 a4 64 28 22 43 6f 70 79 22 2c 4c 6b 25 29 3a c8 |.d("Copy",Lk%):.| 0000ce80 99 26 34 34 41 44 44 2c 31 2c 6b 25 2c 52 67 25 |.&44ADD,1,k%,Rg%| 0000ce90 2c a4 64 28 22 43 6c 65 61 72 22 2c 4d 6b 25 29 |,.d("Clear",Mk%)| 0000cea0 3a c8 99 26 34 34 41 44 44 2c 31 2b 32 5e 39 2c |:..&44ADD,1+2^9,| 0000ceb0 6b 25 2c 42 67 25 2c a4 64 28 22 74 31 22 2c 47 |k%,Bg%,.d("t1",G| 0000cec0 6b 25 29 2c 2c 65 68 25 0d d9 96 81 c8 99 26 34 |k%),,eh%......&4| 0000ced0 34 41 44 44 2c 31 2b 32 5e 39 2c 6b 25 2c 42 67 |4ADD,1+2^9,k%,Bg| 0000cee0 25 2b 31 2c a4 64 28 22 74 32 22 2c 48 6b 25 29 |%+1,.d("t2",Hk%)| 0000cef0 2c 2c 65 68 25 3a c8 99 26 34 34 41 44 44 2c 31 |,,eh%:..&44ADD,1| 0000cf00 2b 32 5e 39 2c 6b 25 2c 42 67 25 2b 32 2c a4 64 |+2^9,k%,Bg%+2,.d| 0000cf10 28 22 74 33 22 2c 49 6b 25 29 2c 2c 65 68 25 3a |("t3",Ik%),,eh%:| 0000cf20 c8 99 26 34 34 41 44 44 2c 31 2b 32 5e 39 2c 6b |..&44ADD,1+2^9,k| 0000cf30 25 2c 44 67 25 2c a4 64 28 22 74 36 22 2c 4b 6b |%,Dg%,.d("t6",Kk| 0000cf40 25 29 2c 2c 65 68 25 3a e1 0d d9 cc 1e dd a4 64 |%),,eh%:.......d| 0000cf50 28 61 24 2c 59 6c 25 29 3a e7 ac 59 6c 25 8c 3d |(a$,Yl%):..Yl%.=| 0000cf60 22 73 7a 2c 70 7a 22 0d d9 e7 13 3d 22 53 22 2b |"sz,pz"....="S"+| 0000cf70 61 24 2b 22 2c 70 22 2b 61 24 0d da 02 56 dd f2 |a$+",p"+a$...V..| 0000cf80 49 3a f2 62 28 22 59 6f 75 20 63 61 6e 20 6e 6f |I:.b("You can no| 0000cf90 74 20 75 73 65 20 74 68 61 74 20 62 75 74 74 6f |t use that butto| 0000cfa0 6e 2e 20 41 73 6b 20 79 6f 75 72 20 74 65 61 63 |n. Ask your teac| 0000cfb0 68 65 72 20 69 66 20 79 6f 75 20 77 61 6e 74 20 |her if you want | 0000cfc0 74 6f 20 75 73 65 20 69 74 2e 22 2c a3 29 3a e1 |to use it.",.):.| 0000cfd0 0d da 14 3c dd f2 5f 28 49 6d 25 2c 64 25 29 3a |...<.._(Im%,d%):| 0000cfe0 ea 41 25 3a 41 25 3d a0 28 22 46 4e 22 2b c3 7e |.A%:A%=.("FN"+.~| 0000cff0 28 49 6d 25 29 2b 22 28 22 2b c3 28 64 25 29 2b |(Im%)+"("+.(d%)+| 0000d000 22 29 22 29 3a e7 55 61 25 3d 31 8c 0d da 4a 10 |")"):.Ua%=1...J.| 0000d010 e7 4a 6d 25 3d 30 8c 4b 6d 25 3d 30 0d da 53 75 |.Jm%=0.Km%=0..Su| 0000d020 41 25 3d a4 74 3a 6a 25 28 4c 6d 25 29 3d 41 25 |A%=.t:j%(Lm%)=A%| 0000d030 3a 67 25 28 4c 6d 25 29 3d 4a 6d 25 3a 65 25 28 |:g%(Lm%)=Jm%:e%(| 0000d040 30 2c 4a 6d 25 2c 4c 6d 25 29 3d 49 6d 25 3a 65 |0,Jm%,Lm%)=Im%:e| 0000d050 25 28 31 2c 4a 6d 25 2c 4c 6d 25 29 3d 64 25 3a |%(1,Jm%,Lm%)=d%:| 0000d060 65 25 28 32 2c 4a 6d 25 2c 4c 6d 25 29 3d 41 25 |e%(2,Jm%,Lm%)=A%| 0000d070 3a 4a 6d 25 2b 3d 31 3a e7 4a 6d 25 3e 3d 56 61 |:Jm%+=1:.Jm%>=Va| 0000d080 25 8c f2 6f 28 4d 6d 25 2c 4e 6d 25 2c 4f 6d 25 |%..o(Mm%,Nm%,Om%| 0000d090 29 0d da 9b 05 cd 0d da a4 05 e1 0d da ad 1d dd |)...............| 0000d0a0 f2 64 64 3a ea 41 25 3a 41 25 3d a4 74 3a e7 55 |.dd:.A%:A%=.t:.U| 0000d0b0 61 25 3d 32 8c f2 43 64 0d da da 05 e1 0d da e3 |a%=2..Cd........| 0000d0c0 1a dd a4 74 3a ea 41 25 3a 41 25 3d c6 8f 3a e7 |...t:.A%:A%=..:.| 0000d0d0 41 25 3c 50 6d 25 8c 0d db 10 09 e7 51 6d 25 8c |A%<Pm%......Qm%.| 0000d0e0 0d db 19 1a e7 52 6d 25 8c 4a 6d 25 3d 30 8b 4a |.....Rm%.Jm%=0.J| 0000d0f0 6d 25 3d 67 25 28 4c 6d 25 29 0d db 22 1b 53 6d |m%=g%(Lm%)..".Sm| 0000d100 25 3d 6a 25 28 4c 6d 25 29 3a 4b 6d 25 3d 30 3a |%=j%(Lm%):Km%=0:| 0000d110 51 6d 25 3d a3 0d db 46 0e cc 3a 4b 6d 25 2b 3d |Qm%=...F..:Km%+=| 0000d120 6c 62 25 0d db 58 05 cd 0d db 58 05 cd 0d db 61 |lb%..X....X....a| 0000d130 12 50 6d 25 3d 41 25 3a 3d 41 25 2b 4b 6d 25 0d |.Pm%=A%:=A%+Km%.| 0000d140 db 85 37 dd f2 6f 28 6e 25 2c 64 25 2c 54 6d 25 |..7..o(n%,d%,Tm%| 0000d150 29 3a c8 99 26 34 34 41 44 44 2c 37 2c 6e 25 2c |):..&44ADD,7,n%,| 0000d160 64 25 2c 31 3a 55 61 25 3d 30 3a 4f 6b 25 3d a3 |d%,1:Ua%=0:Ok%=.| 0000d170 3a c8 8e 6e 25 ca 0d db a9 1b c9 74 25 3a c8 99 |:..n%......t%:..| 0000d180 26 34 34 41 44 44 2c 33 2c 6e 25 2c 67 66 25 2c |&44ADD,3,n%,gf%,| 0000d190 30 0d db bb 1b c9 6c 25 3a c8 99 26 34 34 41 44 |0.....l%:..&44AD| 0000d1a0 44 2c 33 2c 6e 25 2c 71 68 25 2c 30 0d db c4 05 |D,3,n%,qh%,0....| 0000d1b0 cb 0d db c4 1c f2 6d 3a f2 73 63 3a f2 73 28 54 |......m:.sc:.s(T| 0000d1c0 6d 25 2c 6e 25 2c 30 29 3a f2 74 3a e1 0d db f1 |m%,n%,0):.t:....| 0000d1d0 22 dd f2 6f 62 28 6e 25 2c 64 25 2c 54 6d 25 2c |"..ob(n%,d%,Tm%,| 0000d1e0 6a 25 29 3a 4f 6b 25 3d a3 3a c8 8e 6e 25 ca 0d |j%):Ok%=.:..n%..| 0000d1f0 dc 15 1b c9 74 25 3a c8 99 26 34 34 41 44 44 2c |....t%:..&44ADD,| 0000d200 33 2c 6e 25 2c 67 66 25 2c 30 0d dc 27 1b c9 6c |3,n%,gf%,0..'..l| 0000d210 25 3a c8 99 26 34 34 41 44 44 2c 33 2c 6e 25 2c |%:..&44ADD,3,n%,| 0000d220 71 68 25 2c 30 0d dc 30 05 cb 0d dc 30 5b 51 6d |qh%,0..0....0[Qm| 0000d230 25 3d a3 3a 4e 6d 25 3d 64 25 3a 4f 6d 25 3d 54 |%=.:Nm%=d%:Om%=T| 0000d240 6d 25 3a 4d 6d 25 3d 6e 25 3a 4c 6d 25 3d 6a 25 |m%:Mm%=n%:Lm%=j%| 0000d250 3a 55 61 25 3d 31 3a 4a 6d 25 3d 30 3a 67 25 28 |:Ua%=1:Jm%=0:g%(| 0000d260 4c 6d 25 29 3d 2d 31 3a 6a 25 28 4c 6d 25 29 3d |Lm%)=-1:j%(Lm%)=| 0000d270 30 3a 50 6d 25 3d 30 3a 4b 6d 25 3d 30 3a f2 6d |0:Pm%=0:Km%=0:.m| 0000d280 3a f2 74 3a e1 0d dc ae 60 dd f2 44 28 6e 25 2c |:.t:....`..D(n%,| 0000d290 64 25 2c 54 6d 25 2c 6a 25 2c 55 6d 25 29 3a 51 |d%,Tm%,j%,Um%):Q| 0000d2a0 6d 25 3d a3 3a 52 6d 25 3d 55 6d 25 3a 4e 6d 25 |m%=.:Rm%=Um%:Nm%| 0000d2b0 3d 64 25 3a 4f 6d 25 3d 54 6d 25 3a 4d 6d 25 3d |=d%:Om%=Tm%:Mm%=| 0000d2c0 6e 25 3a 4c 6d 25 3d 6a 25 3a 55 61 25 3d 32 3a |n%:Lm%=j%:Ua%=2:| 0000d2d0 e7 55 6d 25 8c 4a 6d 25 3d 30 8b 4a 6d 25 3d 67 |.Um%.Jm%=0.Jm%=g| 0000d2e0 25 28 6a 25 29 0d dd 08 22 53 6d 25 3d 6a 25 28 |%(j%)..."Sm%=j%(| 0000d2f0 6a 25 29 3a 50 6d 25 3d 30 3a 4b 6d 25 3d 30 3a |j%):Pm%=0:Km%=0:| 0000d300 f2 6d 3a f2 74 3a e1 0d dd 3e 12 dd f2 43 64 3a |.m:.t:...>...Cd:| 0000d310 ea 41 25 3a e7 52 6d 25 8c 0d dd 62 19 f5 3a 41 |.A%:.Rm%...b..:A| 0000d320 25 3d b9 3a e7 4a 6d 25 3c 3d 67 25 28 4c 6d 25 |%=.:.Jm%<=g%(Lm%| 0000d330 29 8c 0d dd 7d 17 e7 a4 74 3e 3d 65 25 28 32 2c |)...}...t>=e%(2,| 0000d340 4a 6d 25 2c 4c 6d 25 29 8c 0d dd 86 45 41 25 3d |Jm%,Lm%)....EA%=| 0000d350 a0 28 22 46 4e 22 2b c3 7e 28 65 25 28 30 2c 4a |.("FN"+.~(e%(0,J| 0000d360 6d 25 2c 4c 6d 25 29 29 2b 22 28 22 2b c3 28 65 |m%,Lm%))+"("+.(e| 0000d370 25 28 31 2c 4a 6d 25 2c 4c 6d 25 29 29 2b 22 29 |%(1,Jm%,Lm%))+")| 0000d380 22 29 3a 4a 6d 25 2b 3d 31 3a 41 25 3d a3 0d dd |"):Jm%+=1:A%=...| 0000d390 aa 05 cd 0d dd aa 05 cd 0d dd b3 15 fd 41 25 3a |.............A%:| 0000d3a0 e7 4a 6d 25 3e 67 25 28 4c 6d 25 29 8c 0d dd c5 |.Jm%>g%(Lm%)....| 0000d3b0 09 e7 4f 6b 25 8c 0d dd ce 09 51 6d 25 3d b9 0d |..Ok%.....Qm%=..| 0000d3c0 dd e0 15 cc 3a f2 6f 28 4d 6d 25 2c 4e 6d 25 2c |....:.o(Mm%,Nm%,| 0000d3d0 4f 6d 25 29 0d dd f2 05 cd 0d dd f2 05 cd 0d dd |Om%)............| 0000d3e0 fb 15 cc 3a f5 3a 41 25 3d b9 3a e7 4a 6d 25 3e |...:.:A%=.:.Jm%>| 0000d3f0 3d 30 8c 0d de 1f 1b e7 a4 74 3e 3d 53 6d 25 2d |=0.......t>=Sm%-| 0000d400 65 25 28 32 2c 4a 6d 25 2c 4c 6d 25 29 8c 0d de |e%(2,Jm%,Lm%)...| 0000d410 28 47 41 25 3d a0 28 22 46 4e 22 2b c3 7e 28 65 |(GA%=.("FN"+.~(e| 0000d420 25 28 30 2c 4a 6d 25 2c 4c 6d 25 29 82 31 29 2b |%(0,Jm%,Lm%).1)+| 0000d430 22 28 22 2b c3 28 65 25 28 31 2c 4a 6d 25 2c 4c |"("+.(e%(1,Jm%,L| 0000d440 6d 25 29 29 2b 22 29 22 29 3a 4a 6d 25 2d 3d 31 |m%))+")"):Jm%-=1| 0000d450 3a 41 25 3d a3 0d de 4c 05 cd 0d de 4c 05 cd 0d |:A%=...L....L...| 0000d460 de 55 0f fd 41 25 3a e7 4a 6d 25 3c 30 8c 0d de |.U..A%:.Jm%<0...| 0000d470 67 09 e7 4f 6b 25 8c 0d de 70 09 51 6d 25 3d b9 |g..Ok%...p.Qm%=.| 0000d480 0d de 82 15 cc 3a f2 6f 28 4d 6d 25 2c 4e 6d 25 |.....:.o(Mm%,Nm%| 0000d490 2c 4f 6d 25 29 0d de 94 05 cd 0d de 94 05 cd 0d |,Om%)...........| 0000d4a0 de 9d 05 cd 0d de a6 05 e1 0d de af 69 dd a4 32 |............i..2| 0000d4b0 28 64 25 29 3a c8 99 26 34 34 41 44 44 2c 33 2c |(d%):..&44ADD,3,| 0000d4c0 74 25 2c 64 25 2c 31 3a 63 63 25 3d 64 25 3a 56 |t%,d%,1:cc%=d%:V| 0000d4d0 6d 25 3d 28 64 25 2d 6c 66 25 29 83 5f 62 25 2b |m%=(d%-lf%)._b%+| 0000d4e0 31 3a 57 6d 25 3d 28 64 25 2d 6c 66 25 29 81 5f |1:Wm%=(d%-lf%)._| 0000d4f0 62 25 3a c8 99 26 34 30 31 38 39 2c 56 6d 25 2c |b%:..&40189,Vm%,| 0000d500 59 62 25 2c 61 25 28 57 6d 25 29 2c 58 62 25 3a |Yb%,a%(Wm%),Xb%:| 0000d510 3d 30 0d df 12 49 dd a4 33 28 64 25 29 3a c8 99 |=0...I..3(d%):..| 0000d520 26 34 34 41 44 44 2c 33 2c 74 25 2c 64 25 2c 30 |&44ADD,3,t%,d%,0| 0000d530 3a c8 99 26 34 30 31 38 39 2c 56 6d 25 2c 59 62 |:..&40189,Vm%,Yb| 0000d540 25 2b 32 5e 37 2c 61 25 28 57 6d 25 29 2c 57 62 |%+2^7,a%(Wm%),Wb| 0000d550 25 3a 63 63 25 3d 2d 31 3a 3d 30 0d df 48 84 dd |%:cc%=-1:=0..H..| 0000d560 a4 34 28 64 25 29 3a ea 52 6b 25 2c 65 25 2c 71 |.4(d%):.Rk%,e%,q| 0000d570 25 3a c8 99 26 34 34 41 44 44 2c 33 2c 6c 25 2c |%:..&44ADD,3,l%,| 0000d580 64 25 2c 31 3a 52 6b 25 3d 64 25 2d 6e 68 25 3a |d%,1:Rk%=d%-nh%:| 0000d590 65 63 25 3d 52 6b 25 3a e3 65 25 3d 31 b8 37 3a |ec%=Rk%:.e%=1.7:| 0000d5a0 c8 99 26 34 30 31 38 35 2c 65 25 2c 3f 28 6d 6a |..&40185,e%,?(mj| 0000d5b0 25 2b 68 25 28 52 6b 25 2c 30 29 29 3a ed 3a 71 |%+h%(Rk%,0)):.:q| 0000d5c0 25 3d 31 3a e3 65 25 3d 30 b8 32 30 3a e7 3f 28 |%=1:.e%=0.20:.?(| 0000d5d0 4a 68 25 2b 52 6b 25 2a 32 34 2b 65 25 29 8c 0d |Jh%+Rk%*24+e%)..| 0000d5e0 df a2 32 c8 99 26 34 30 31 38 39 2c 71 25 2c 59 |..2..&40189,q%,Y| 0000d5f0 62 25 2c 6b 25 28 65 25 29 2c 58 62 25 3a 71 25 |b%,k%(e%),Xb%:q%| 0000d600 2b 3d 31 3a e7 71 25 3e 3d 38 8c 65 25 3d 31 30 |+=1:.q%>=8.e%=10| 0000d610 30 0d df bd 05 cd 0d df c6 08 ed 3a 3d 30 0d df |0..........:=0..| 0000d620 ea 52 dd a4 35 28 64 25 29 3a ea 52 6b 25 2c 65 |.R..5(d%):.Rk%,e| 0000d630 25 3a c8 99 26 34 34 41 44 44 2c 33 2c 6c 25 2c |%:..&44ADD,3,l%,| 0000d640 64 25 2c 30 3a 52 6b 25 3d 64 25 2d 6e 68 25 3a |d%,0:Rk%=d%-nh%:| 0000d650 71 25 3d 31 3a e3 65 25 3d 30 b8 32 30 3a e7 3f |q%=1:.e%=0.20:.?| 0000d660 28 4a 68 25 2b 52 6b 25 2a 32 34 2b 65 25 29 8c |(Jh%+Rk%*24+e%).| 0000d670 0d e0 20 36 c8 99 26 34 30 31 38 39 2c 71 25 2c |.. 6..&40189,q%,| 0000d680 59 62 25 2b 32 5e 37 2c 6b 25 28 65 25 29 2c 57 |Yb%+2^7,k%(e%),W| 0000d690 62 25 3a 71 25 2b 3d 31 3a e7 71 25 3e 3d 38 8c |b%:q%+=1:.q%>=8.| 0000d6a0 65 25 3d 31 30 30 0d e0 3b 05 cd 0d e0 44 0f ed |e%=100..;....D..| 0000d6b0 3a 65 63 25 3d 2d 31 3a 3d 30 0d e0 71 43 dd f2 |:ec%=-1:=0..qC..| 0000d6c0 46 28 67 24 2c 6a 25 29 3a ea 76 25 2c 62 25 2c |F(g$,j%):.v%,b%,| 0000d6d0 61 25 2c 63 24 2c 58 6d 25 2c 59 6d 25 2c 65 25 |a%,c$,Xm%,Ym%,e%| 0000d6e0 2c 42 63 25 2c 41 24 2c 5a 6d 25 3a 59 6d 25 3d |,Bc%,A$,Zm%:Ym%=| 0000d6f0 a3 3a f2 69 3a f2 6a 3a c8 8e 6a 25 ca 0d e0 9e |.:.i:.j:..j%....| 0000d700 3c c9 30 3a 63 24 3d 22 53 6f 75 6e 64 22 3a 58 |<.0:c$="Sound":X| 0000d710 6d 25 3d 6c 66 25 3a c8 99 26 34 34 41 45 42 2c |m%=lf%:..&44AEB,| 0000d720 33 2c 74 25 3a f2 6f 28 74 25 2c 69 66 25 2c 64 |3,t%:.o(t%,if%,d| 0000d730 66 25 29 3a 5a 6d 25 3d 30 0d e0 c2 3c c9 32 3a |f%):Zm%=0...<.2:| 0000d740 63 24 3d 22 43 68 6f 72 64 22 3a 58 6d 25 3d 6e |c$="Chord":Xm%=n| 0000d750 68 25 3a c8 99 26 34 34 41 45 42 2c 33 2c 6c 25 |h%:..&44AEB,3,l%| 0000d760 3a f2 6f 28 6c 25 2c 73 68 25 2c 77 68 25 29 3a |:.o(l%,sh%,wh%):| 0000d770 5a 6d 25 3d 31 0d e0 dd 39 7f 3a 85 30 2c 22 54 |Zm%=1...9.:.0,"T| 0000d780 68 69 73 20 70 72 6f 63 65 64 75 72 65 20 64 6f |his procedure do| 0000d790 65 73 20 6e 6f 74 20 73 75 70 70 6f 72 74 20 74 |es not support t| 0000d7a0 68 61 74 20 62 6f 78 20 74 79 70 65 2e 22 0d e0 |hat box type."..| 0000d7b0 e6 05 cb 0d e0 e6 2c e7 a7 67 24 2c 22 2e 22 29 |......,..g$,".")| 0000d7c0 3d 30 8c 67 24 3d 22 3c 4d 42 22 2b 63 24 2b 22 |=0.g$="<MB"+c$+"| 0000d7d0 46 69 6c 65 73 24 44 69 72 3e 2e 22 2b 67 24 0d |Files$Dir>."+g$.| 0000d7e0 e0 ef 15 61 25 3d a4 6c 28 67 24 29 3a e7 61 25 |...a%=.l(g$):.a%| 0000d7f0 3d 30 8c e1 0d e1 01 2a 62 25 3d a4 68 28 62 24 |=0.....*b%=.h(b$| 0000d800 2c 38 2c 61 25 29 3a e7 62 25 3c 3e 30 8c f2 62 |,8,a%):.b%<>0..b| 0000d810 28 a4 63 28 62 25 2b 34 29 2c a3 29 3a e1 0d e1 |(.c(b%+4),.):...| 0000d820 13 44 e7 62 24 3c 3e 22 4d 42 22 2b 63 24 2b 22 |.D.b$<>"MB"+c$+"| 0000d830 20 22 8c f2 62 28 22 46 69 6c 65 20 66 6f 72 6d | "..b("File form| 0000d840 61 74 20 6e 6f 74 20 75 6e 64 65 72 73 74 6f 6f |at not understoo| 0000d850 64 2e 22 2c a3 29 3a 62 25 3d a4 47 28 61 25 29 |d.",.):b%=.G(a%)| 0000d860 3a e1 0d e1 1c 32 62 25 3d a4 61 28 63 25 2c 61 |:....2b%=.a(c%,a| 0000d870 25 29 3a e7 62 25 3c 3e 30 8c f2 62 28 a4 63 28 |%):.b%<>0..b(.c(| 0000d880 62 25 2b 34 29 2c a3 29 3a 62 25 3d a4 47 28 61 |b%+4),.):b%=.G(a| 0000d890 25 29 3a e1 0d e1 2e 73 e7 63 25 3e 31 8c 62 25 |%):....s.c%>1.b%| 0000d8a0 3d a4 47 28 61 25 29 3a f2 62 28 22 54 68 69 73 |=.G(a%):.b("This| 0000d8b0 20 66 69 6c 65 20 77 61 73 20 6d 61 64 65 20 62 | file was made b| 0000d8c0 79 20 61 20 6e 65 77 65 72 20 76 65 72 73 69 6f |y a newer versio| 0000d8d0 6e 20 6f 66 20 4d 75 73 69 63 42 6f 78 2e 20 59 |n of MusicBox. Y| 0000d8e0 6f 75 20 77 69 6c 6c 20 6e 65 65 64 20 61 6e 20 |ou will need an | 0000d8f0 75 70 67 72 61 64 65 20 74 6f 20 6c 6f 61 64 20 |upgrade to load | 0000d900 69 74 2e 22 2c a3 29 0d e1 37 2a 62 25 3d a4 68 |it.",.)..7*b%=.h| 0000d910 28 62 24 2c 34 2c 61 25 29 3a c8 95 62 25 3d 30 |(b$,4,a%):..b%=0| 0000d920 80 62 24 3c 3e 22 45 6e 64 58 22 3a c8 8e 62 24 |.b$<>"EndX":..b$| 0000d930 ca 0d e1 52 1d c9 22 54 61 70 65 22 3a 62 25 3d |...R.."Tape":b%=| 0000d940 a4 5f 28 5a 6d 25 2c 61 25 2c 58 6d 25 29 0d e1 |._(Zm%,a%,Xm%)..| 0000d950 64 1e c9 22 49 6e 73 74 22 3a 62 25 3d a4 76 28 |d.."Inst":b%=.v(| 0000d960 6a 25 2c 61 25 29 3a 59 6d 25 3d b9 0d e1 6d 18 |j%,a%):Ym%=...m.| 0000d970 c9 22 54 65 6d 70 22 3a 62 25 3d a4 77 28 6a 25 |."Temp":b%=.w(j%| 0000d980 2c 61 25 29 0d e1 76 18 c9 22 56 6f 6c 75 22 3a |,a%)..v.."Volu":| 0000d990 62 25 3d a4 78 28 6a 25 2c 61 25 29 0d e1 7f 15 |b%=.x(j%,a%)....| 0000d9a0 c9 22 4f 63 74 61 22 3a 62 25 3d a4 79 28 61 25 |."Octa":b%=.y(a%| 0000d9b0 29 0d e1 88 15 c9 22 4b 65 79 20 22 3a 62 25 3d |)....."Key ":b%=| 0000d9c0 a4 7a 28 61 25 29 0d e1 91 15 c9 22 43 68 6f 72 |.z(a%)....."Chor| 0000d9d0 22 3a 62 25 3d a4 60 28 61 25 29 0d e1 9a 1b c9 |":b%=.`(a%).....| 0000d9e0 22 50 65 6e 74 22 3a e7 6a 25 3d 30 8c 62 25 3d |"Pent":.j%=0.b%=| 0000d9f0 a4 42 28 61 25 29 0d e1 9a 0f 7f 3a 62 25 3d a4 |.B(a%).....:b%=.| 0000da00 6a 28 61 25 29 0d e1 ac 05 cb 0d e1 ac 18 e7 62 |j(a%)..........b| 0000da10 25 3d 30 8c 62 25 3d a4 68 28 62 24 2c 34 2c 61 |%=0.b%=.h(b$,4,a| 0000da20 25 29 0d e1 b5 1b ce 3a e7 62 25 3c 3e 30 8c f2 |%).....:.b%<>0..| 0000da30 62 28 a4 63 28 62 25 2b 34 29 2c a3 29 0d e1 c7 |b(.c(b%+4),.)...| 0000da40 1e 62 25 3d a4 69 28 61 25 29 3a f2 70 3a f2 72 |.b%=.i(a%):.p:.r| 0000da50 3a e7 6a 25 3d 32 80 59 6d 25 8c 0d e1 eb 1d e7 |:.j%=2.Ym%......| 0000da60 77 25 3d 32 8c f2 6b 28 62 25 28 32 2c 64 63 25 |w%=2..k(b%(2,dc%| 0000da70 2d 31 29 2c 64 63 25 29 0d e1 f4 3a e3 42 63 25 |-1),dc%)...:.Bc%| 0000da80 3d 30 b8 36 3a 41 24 3d 61 24 28 62 25 28 32 2c |=0.6:A$=a$(b%(2,| 0000da90 42 63 25 29 29 3a e3 65 25 3d 30 b8 6b 68 25 2d |Bc%)):.e%=0.kh%-| 0000daa0 31 3a e7 68 25 28 65 25 2c 30 29 3d 42 63 25 2b |1:.h%(e%,0)=Bc%+| 0000dab0 31 8c 0d e2 18 30 c8 99 26 34 34 41 44 44 2c 31 |1....0..&44ADD,1| 0000dac0 2b 35 31 32 2c 6c 25 2c 6c 68 25 2b 65 25 2c 22 |+512,l%,lh%+e%,"| 0000dad0 73 22 2b 41 24 2b 22 2c 70 22 2b 41 24 2c 2c 48 |s"+A$+",p"+A$,,H| 0000dae0 68 25 0d e2 2a 05 cd 0d e2 2a 07 ed 3a ed 0d e2 |h%..*....*..:...| 0000daf0 45 05 cd 0d e2 45 05 e1 0d e2 4e 2c dd a4 5f 28 |E....E....N,.._(| 0000db00 6a 25 2c 61 25 2c 58 6d 25 29 3a ea 76 25 2c 62 |j%,a%,Xm%):.v%,b| 0000db10 25 3a e7 62 25 3d 30 8c 62 25 3d a4 61 28 76 25 |%:.b%=0.b%=.a(v%| 0000db20 2c 61 25 29 0d e2 7b 16 e7 62 25 3d 30 8c 62 25 |,a%)..{..b%=0.b%| 0000db30 3d a4 61 28 76 25 2c 61 25 29 0d e2 84 24 67 25 |=.a(v%,a%)...$g%| 0000db40 28 6a 25 29 3d 76 25 3a e7 62 25 3d 30 8c 62 25 |(j%)=v%:.b%=0.b%| 0000db50 3d a4 61 28 6a 25 28 6a 25 29 2c 61 25 29 0d e2 |=.a(j%(j%),a%)..| 0000db60 96 28 e3 65 25 3d 30 b8 76 25 3a e7 62 25 3d 30 |.(.e%=0.v%:.b%=0| 0000db70 8c 62 25 3d a4 61 28 65 25 28 30 2c 65 25 2c 6a |.b%=.a(e%(0,e%,j| 0000db80 25 29 2c 61 25 29 0d e2 a8 1f e7 62 25 3d 30 8c |%),a%).....b%=0.| 0000db90 62 25 3d a4 61 28 65 25 28 31 2c 65 25 2c 6a 25 |b%=.a(e%(1,e%,j%| 0000dba0 29 2c 61 25 29 0d e2 b1 1a e7 62 25 3d 30 8c 65 |),a%).....b%=0.e| 0000dbb0 25 28 31 2c 65 25 2c 6a 25 29 2b 3d 58 6d 25 0d |%(1,e%,j%)+=Xm%.| 0000dbc0 e2 ba 1f e7 62 25 3d 30 8c 62 25 3d a4 61 28 65 |....b%=0.b%=.a(e| 0000dbd0 25 28 32 2c 65 25 2c 6a 25 29 2c 61 25 29 0d e2 |%(2,e%,j%),a%)..| 0000dbe0 c3 09 ed 3a 3d 62 25 0d e2 e7 25 dd a4 60 28 61 |...:=b%...%..`(a| 0000dbf0 25 29 3a ea 76 25 2c 62 25 3a e7 62 25 3d 30 8c |%):.v%,b%:.b%=0.| 0000dc00 62 25 3d a4 61 28 76 25 2c 61 25 29 0d e2 f9 28 |b%=.a(v%,a%)...(| 0000dc10 e3 65 25 3d 30 b8 6b 68 25 2d 31 3a e7 62 25 3d |.e%=0.kh%-1:.b%=| 0000dc20 30 8c 62 25 3d a4 61 28 68 25 28 65 25 2c 30 29 |0.b%=.a(h%(e%,0)| 0000dc30 2c 61 25 29 0d e3 0b 20 ed 3a e7 62 25 3d 30 8c |,a%)... .:.b%=0.| 0000dc40 62 25 3d a4 6b 28 4a 68 25 2c 6b 68 25 2a 32 34 |b%=.k(Jh%,kh%*24| 0000dc50 2c 61 25 29 0d e3 1d 07 3d 62 25 0d e3 41 16 dd |,a%)....=b%..A..| 0000dc60 f2 58 28 48 25 2c 4a 25 29 3a e7 77 25 3c 30 8c |.X(H%,J%):.w%<0.| 0000dc70 e1 0d e3 4a 5e c8 99 26 34 30 30 45 36 2c 35 3a |...J^..&400E6,5:| 0000dc80 ec 48 25 2b 64 25 28 77 25 2c 30 29 2c 4a 25 2b |.H%+d%(w%,0),J%+| 0000dc90 64 25 28 77 25 2c 31 29 3a ec 48 25 2b 64 25 28 |d%(w%,1):.H%+d%(| 0000dca0 77 25 2c 32 29 2c 4a 25 2b 64 25 28 77 25 2c 33 |w%,2),J%+d%(w%,3| 0000dcb0 29 3a f0 38 35 2c 48 25 2b 64 25 28 77 25 2c 32 |):.85,H%+d%(w%,2| 0000dcc0 29 2c 4a 25 2b 64 25 28 77 25 2c 31 29 3a e1 0d |),J%+d%(w%,1):..| 0000dcd0 e3 77 23 dd f2 71 28 5f 6d 25 29 3a 5f 6d 25 3d |.w#..q(_m%):_m%=| 0000dce0 5f 6d 25 2f 32 3a e7 5f 6d 25 3c 30 8c 5f 6d 25 |_m%/2:._m%<0._m%| 0000dcf0 3d 30 0d e3 9b 14 e7 5f 6d 25 3e 31 32 37 8c 5f |=0....._m%>127._| 0000dd00 6d 25 3d 31 32 37 0d e3 a4 12 c8 99 26 34 30 31 |m%=127......&401| 0000dd10 38 30 2c 5f 6d 25 3a e1 0d e3 b6 2b dd f2 56 28 |80,_m%:....+..V(| 0000dd20 6e 25 2c 64 25 29 3a c8 99 26 34 34 41 44 34 2c |n%,d%):..&44AD4,| 0000dd30 31 2c 6e 25 2c 64 25 b8 63 25 3a f2 71 28 63 25 |1,n%,d%.c%:.q(c%| 0000dd40 29 3a e1 0d e3 e3 3c dd a4 4d 28 6a 25 2c 61 25 |):....<..M(j%,a%| 0000dd50 29 3a ea 65 25 2c 63 25 2c 62 25 3a 62 25 3d a4 |):.e%,c%,b%:b%=.| 0000dd60 66 28 22 56 6f 6c 75 22 2c 61 25 29 3a e7 62 25 |f("Volu",a%):.b%| 0000dd70 3d 30 8c 62 25 3d a4 62 28 31 32 2c 61 25 29 0d |=0.b%=.b(12,a%).| 0000dd80 e4 10 09 c8 8e 6a 25 ca 0d e4 19 1b c9 30 3a c8 |.....j%......0:.| 0000dd90 99 26 34 34 41 44 34 2c 31 2c 74 25 2c 71 66 25 |.&44AD4,1,t%,qf%| 0000dda0 b8 63 25 0d e4 2b 1b c9 31 3a c8 99 26 34 34 41 |.c%..+..1:..&44A| 0000ddb0 44 34 2c 31 2c 6f 25 2c 60 66 25 b8 63 25 0d e4 |D4,1,o%,`f%.c%..| 0000ddc0 34 1b c9 32 3a c8 99 26 34 34 41 44 34 2c 31 2c |4..2:..&44AD4,1,| 0000ddd0 6c 25 2c 79 68 25 b8 63 25 0d e4 3d 1b c9 33 3a |l%,yh%.c%..=..3:| 0000dde0 c8 99 26 34 34 41 44 34 2c 31 2c 6b 25 2c 4f 67 |..&44AD4,1,k%,Og| 0000ddf0 25 b8 63 25 0d e4 46 05 cb 0d e4 46 16 e7 62 25 |%.c%..F....F..b%| 0000de00 3d 30 8c 62 25 3d a4 62 28 63 25 2c 61 25 29 0d |=0.b%=.b(c%,a%).| 0000de10 e4 4f 07 3d 62 25 0d e4 6a 1e dd a4 78 28 6a 25 |.O.=b%..j...x(j%| 0000de20 2c 61 25 29 3a ea 65 25 2c 63 25 2c 62 25 3a e7 |,a%):.e%,c%,b%:.| 0000de30 45 6d 25 8c 0d e4 7c 23 62 25 3d a4 61 28 63 25 |Em%...|#b%=.a(c%| 0000de40 2c 61 25 29 3a e7 62 25 3d 30 8c 62 25 3d a4 61 |,a%):.b%=0.b%=.a| 0000de50 28 63 25 2c 61 25 29 0d e4 8e 0a e7 62 25 3d 30 |(c%,a%).....b%=0| 0000de60 8c 0d e4 97 09 c8 8e 6a 25 ca 0d e4 a0 1b c9 30 |.......j%......0| 0000de70 3a c8 99 26 34 34 41 44 34 2c 32 2c 74 25 2c 71 |:..&44AD4,2,t%,q| 0000de80 66 25 2c 63 25 0d e4 bb 1b c9 31 3a c8 99 26 34 |f%,c%.....1:..&4| 0000de90 34 41 44 34 2c 32 2c 6f 25 2c 60 66 25 2c 63 25 |4AD4,2,o%,`f%,c%| 0000dea0 0d e4 cd 1b c9 32 3a c8 99 26 34 34 41 44 34 2c |.....2:..&44AD4,| 0000deb0 32 2c 6c 25 2c 79 68 25 2c 63 25 0d e4 df 1b c9 |2,l%,yh%,c%.....| 0000dec0 33 3a c8 99 26 34 34 41 44 34 2c 32 2c 6b 25 2c |3:..&44AD4,2,k%,| 0000ded0 4f 67 25 2c 63 25 0d e4 f1 05 cb 0d e4 f1 11 e7 |Og%,c%..........| 0000dee0 77 25 3d 6a 25 8c f2 71 28 63 25 29 0d e4 fa 05 |w%=j%..q(c%)....| 0000def0 cd 0d e5 03 0f cc 3a 62 25 3d a4 6a 28 61 25 29 |......:b%=.j(a%)| 0000df00 0d e5 1e 05 cd 0d e5 1e 07 3d 62 25 0d e5 42 1b |.........=b%..B.| 0000df10 dd f2 6e 28 6e 25 2c 6a 25 29 3a 60 6d 25 3d 6e |..n(n%,j%):`m%=n| 0000df20 25 3a c8 8e 6e 25 ca 0d e5 54 08 c9 44 64 25 0d |%:..n%...T..Dd%.| 0000df30 e5 66 48 c9 30 3a c8 99 26 34 34 41 44 44 2c 32 |.fH.0:..&44ADD,2| 0000df40 2c 48 64 25 2c 47 64 25 2c 22 41 72 65 20 79 6f |,Hd%,Gd%,"Are yo| 0000df50 75 20 73 75 72 65 20 79 6f 75 20 77 61 6e 74 20 |u sure you want | 0000df60 74 6f 20 73 74 61 72 74 20 61 67 61 69 6e 3f 22 |to start again?"| 0000df70 3a 6e 25 3d 48 64 25 0d e5 6f 4c c9 31 3a c8 99 |:n%=Hd%..oL.1:..| 0000df80 26 34 34 41 44 44 2c 32 2c 48 64 25 2c 47 64 25 |&44ADD,2,Hd%,Gd%| 0000df90 2c 22 41 72 65 20 79 6f 75 20 73 75 72 65 20 79 |,"Are you sure y| 0000dfa0 6f 75 20 77 61 6e 74 20 74 6f 20 70 72 69 6e 74 |ou want to print| 0000dfb0 20 79 6f 75 72 20 77 6f 72 6b 3f 22 3a 6e 25 3d | your work?":n%=| 0000dfc0 48 64 25 0d e5 78 5f c9 32 3a c8 99 26 34 34 41 |Hd%..x_.2:..&44A| 0000dfd0 44 44 2c 32 2c 48 64 25 2c 47 64 25 2c 22 54 68 |DD,2,Hd%,Gd%,"Th| 0000dfe0 65 72 65 20 61 72 65 20 73 6f 6d 65 20 75 6e 73 |ere are some uns| 0000dff0 61 76 65 64 20 66 69 6c 65 73 2e 20 41 72 65 20 |aved files. Are | 0000e000 79 6f 75 20 73 75 72 65 20 79 6f 75 20 77 61 6e |you sure you wan| 0000e010 74 20 74 6f 20 71 75 69 74 3f 22 3a 6e 25 3d 48 |t to quit?":n%=H| 0000e020 64 25 0d e5 78 91 c9 33 3a c8 99 26 34 34 41 44 |d%..x..3:..&44AD| 0000e030 44 2c 32 2c 48 64 25 2c 47 64 25 2c 22 54 68 65 |D,2,Hd%,Gd%,"The| 0000e040 20 70 72 65 73 65 6e 74 20 74 75 6e 65 20 68 61 | present tune ha| 0000e050 73 20 6e 6f 74 20 62 65 65 6e 20 73 61 76 65 64 |s not been saved| 0000e060 20 61 6e 64 20 6c 6f 61 64 69 6e 67 20 61 20 6e | and loading a n| 0000e070 65 77 20 66 69 6c 65 20 77 69 6c 6c 20 6c 6f 73 |ew file will los| 0000e080 65 20 69 74 2e 20 44 6f 20 79 6f 75 20 73 74 69 |e it. Do you sti| 0000e090 6c 6c 20 77 61 6e 74 20 74 6f 20 6c 6f 61 64 20 |ll want to load | 0000e0a0 61 20 6e 65 77 20 66 69 6c 65 3f 22 3a 6e 25 3d |a new file?":n%=| 0000e0b0 48 64 25 0d e5 81 66 c9 34 3a c8 99 26 34 34 41 |Hd%...f.4:..&44A| 0000e0c0 44 44 2c 32 2c 48 64 25 2c 47 64 25 2c 22 54 68 |DD,2,Hd%,Gd%,"Th| 0000e0d0 61 74 20 66 69 6c 65 20 61 6c 72 65 61 64 79 20 |at file already | 0000e0e0 65 78 69 73 74 73 2e 20 44 6f 20 79 6f 75 20 77 |exists. Do you w| 0000e0f0 61 6e 74 20 74 6f 20 63 6f 6e 74 69 6e 75 65 20 |ant to continue | 0000e100 61 6e 64 20 6f 76 65 72 77 72 69 74 65 20 69 74 |and overwrite it| 0000e110 3f 22 3a 6e 25 3d 48 64 25 0d e5 93 05 cb 0d e5 |?":n%=Hd%.......| 0000e120 93 65 5f 61 25 3d 6e 25 3a c8 99 26 34 34 41 44 |.e_a%=n%:..&44AD| 0000e130 44 2c 31 2c 48 64 25 2c 46 64 25 2c 22 73 79 65 |D,1,Hd%,Fd%,"sye| 0000e140 73 2c 70 79 65 73 22 3a c8 99 26 34 34 41 44 44 |s,pyes":..&44ADD| 0000e150 2c 35 2c 48 64 25 2c 45 64 25 2c a3 3a c8 99 26 |,5,Hd%,Ed%,.:..&| 0000e160 34 34 41 44 36 2c 6e 25 2c 2d 31 3a c8 99 26 34 |44AD6,n%,-1:..&4| 0000e170 34 41 44 39 2c 6e 25 2c 2d 31 3a 60 61 25 3d 6a |4AD9,n%,-1:`a%=j| 0000e180 25 3a e1 0d e5 d2 91 dd f2 63 28 45 24 29 3a 70 |%:.......c(E$):p| 0000e190 63 25 3d a3 3a 60 6d 25 3d 2d 31 3a c8 99 26 34 |c%=.:`m%=-1:..&4| 0000e1a0 34 41 44 44 2c 32 2c 48 64 25 2c 47 64 25 2c 45 |4ADD,2,Hd%,Gd%,E| 0000e1b0 24 3a c8 99 26 34 34 41 44 44 2c 31 2c 48 64 25 |$:..&44ADD,1,Hd%| 0000e1c0 2c 46 64 25 2c 22 73 6f 6b 2c 70 6f 6b 22 3a c8 |,Fd%,"sok,pok":.| 0000e1d0 99 26 34 34 41 44 44 2c 35 2c 48 64 25 2c 45 64 |.&44ADD,5,Hd%,Ed| 0000e1e0 25 2c b9 3a 5f 61 25 3d 48 64 25 3a c8 99 26 34 |%,.:_a%=Hd%:..&4| 0000e1f0 34 41 44 36 2c 48 64 25 2c 2d 31 3a c8 99 26 34 |4AD6,Hd%,-1:..&4| 0000e200 34 41 44 39 2c 48 64 25 2c 2d 31 3a 60 61 25 3d |4AD9,Hd%,-1:`a%=| 0000e210 2d 33 3a e1 0d e6 3e 22 dd f2 56 63 28 70 25 2c |-3:...>"..Vc(p%,| 0000e220 64 25 29 3a ea 41 25 2c 43 25 2c 44 25 3a e7 28 |d%):.A%,C%,D%:.(| 0000e230 70 25 80 34 29 8c 0d e6 62 0a c8 8e 5f 61 25 ca |p%.4)...b..._a%.| 0000e240 0d e6 6b 0e c9 48 64 25 3a c8 8e 64 25 ca 0d e6 |..k..Hd%:..d%...| 0000e250 7d 17 c9 46 64 25 2c 45 64 25 3a f2 65 28 48 64 |}..Fd%,Ed%:.e(Hd| 0000e260 25 2c 64 25 29 0d e6 98 05 cb 0d e6 98 0e c9 44 |%,d%)..........D| 0000e270 64 25 3a c8 8e 64 25 ca 0d e6 aa 17 c9 42 64 25 |d%:..d%......Bd%| 0000e280 2c 43 64 25 3a f2 65 28 44 64 25 2c 64 25 29 0d |,Cd%:.e(Dd%,d%).| 0000e290 e6 c5 2a c9 79 64 25 2c 41 64 25 3a c8 99 26 34 |..*.yd%,Ad%:..&4| 0000e2a0 34 41 43 41 2c 44 64 25 2c 7a 64 25 2c 7a 64 25 |4ACA,Dd%,zd%,zd%| 0000e2b0 2d 64 25 2c 44 6b 25 2c 31 0d e6 d7 05 cb 0d e6 |-d%,Dk%,1.......| 0000e2c0 d7 05 cb 0d e6 e0 05 cd 0d e6 e9 05 e1 0d e6 f2 |................| 0000e2d0 2d dd f2 63 64 28 64 25 29 3a ea 41 25 3a f2 68 |-..cd(d%):.A%:.h| 0000e2e0 28 5f 61 25 29 3a c8 99 26 34 34 41 44 39 2c 30 |(_a%):..&44AD9,0| 0000e2f0 2c 2d 32 3a c8 8e 5f 61 25 ca 0d e7 28 14 c9 48 |,-2:.._a%...(..H| 0000e300 64 25 3a 41 25 3d 28 64 25 3d 46 64 25 29 0d e7 |d%:A%=(d%=Fd%)..| 0000e310 3a 14 c9 44 64 25 3a 41 25 3d 28 64 25 3d 43 64 |:..Dd%:A%=(d%=Cd| 0000e320 25 29 0d e7 43 05 cb 0d e7 43 0a c8 8e 60 61 25 |%)..C....C...`a%| 0000e330 ca 0d e7 4c 12 c9 31 3a f2 6a 62 28 60 6d 25 2c |...L..1:.jb(`m%,| 0000e340 41 25 29 0d e7 5e 12 c9 32 3a f2 78 62 28 60 6d |A%)..^..2:.xb(`m| 0000e350 25 2c 41 25 29 0d e7 67 12 c9 33 3a f2 6d 63 28 |%,A%)..g..3:.mc(| 0000e360 60 6d 25 2c 41 25 29 0d e7 70 0e c9 2d 31 3a 76 |`m%,A%)..p..-1:v| 0000e370 61 25 3d 41 25 0d e7 79 18 c9 2d 32 3a e7 41 25 |a%=A%..y..-2:.A%| 0000e380 8c f2 6e 64 28 6c 6d 25 2c 6d 6d 25 29 0d e7 79 |..nd(lm%,mm%)..y| 0000e390 26 c9 2d 33 3a 61 61 25 2d 3d 31 3a e7 61 61 25 |&.-3:aa%-=1:.aa%| 0000e3a0 3e 3d 30 8c f2 63 28 63 24 28 72 61 25 2d 61 61 |>=0..c(c$(ra%-aa| 0000e3b0 25 29 29 0d e7 82 0f c9 2d 34 3a e7 41 25 8c f2 |%)).....-4:.A%..| 0000e3c0 73 64 0d e7 8b 05 cb 0d e7 94 05 e1 0d e7 9d 76 |sd.............v| 0000e3d0 dd f2 6b 62 28 6a 25 29 3a f2 63 28 22 53 6f 72 |..kb(j%):.c("Sor| 0000e3e0 72 79 2c 20 50 72 69 6e 74 20 69 73 20 64 69 73 |ry, Print is dis| 0000e3f0 61 62 6c 65 64 20 66 6f 72 20 74 68 69 73 20 64 |abled for this d| 0000e400 65 6d 6f 2e 20 54 68 65 20 66 75 6c 6c 20 76 65 |emo. The full ve| 0000e410 72 73 69 6f 6e 20 70 72 69 6e 74 73 20 75 73 69 |rsion prints usi| 0000e420 6e 67 20 61 6e 79 20 52 49 53 43 20 4f 53 20 70 |ng any RISC OS p| 0000e430 72 69 6e 74 65 72 20 64 72 69 76 65 72 2e 22 29 |rinter driver.")| 0000e440 3a e1 0d e7 b8 e2 dd f2 57 61 28 6d 24 29 3a ea |:.......Wa(m$):.| 0000e450 41 25 2c 42 25 2c 43 25 2c 4b 63 25 2c 4c 63 25 |A%,B%,C%,Kc%,Lc%| 0000e460 2c 4d 63 25 2c 4e 63 25 2c 4f 63 25 2c 50 63 25 |,Mc%,Nc%,Oc%,Pc%| 0000e470 2c 51 63 25 2c 52 63 25 2c 53 63 25 2c 54 63 25 |,Qc%,Rc%,Sc%,Tc%| 0000e480 2c 66 24 3a 66 24 3d 22 73 22 2b 61 24 28 62 25 |,f$:f$="s"+a$(b%| 0000e490 28 77 25 2c 21 64 69 25 2d 31 29 29 3a c8 99 26 |(w%,!di%-1)):..&| 0000e4a0 32 45 2c 34 30 2b 32 35 36 2c 55 25 2c 6d 24 b8 |2E,40+256,U%,m$.| 0000e4b0 2c 2c 2c 4b 63 25 2c 4c 63 25 2c 53 63 25 2c 4d |,,,Kc%,Lc%,Sc%,M| 0000e4c0 63 25 3a c8 99 26 32 45 2c 34 30 2b 32 35 36 2c |c%:..&2E,40+256,| 0000e4d0 55 25 2c 66 24 b8 2c 2c 2c 4e 63 25 2c 4f 63 25 |U%,f$.,,,Nc%,Oc%| 0000e4e0 2c 54 63 25 2c 50 63 25 3a c8 99 26 33 35 2c 4d |,Tc%,Pc%:..&35,M| 0000e4f0 63 25 2c 33 b8 2c 2c 51 63 25 3a c8 99 26 33 35 |c%,3.,,Qc%:..&35| 0000e500 2c 4d 63 25 2c 34 b8 2c 2c 41 25 3a 4b 63 25 3d |,Mc%,4.,,A%:Kc%=| 0000e510 4b 63 25 3c 3c 41 25 3a 68 25 21 38 3d 28 31 3c |Kc%<<A%:h%!8=(1<| 0000e520 3c 41 25 29 0d e8 1b a7 c8 99 26 33 35 2c 4d 63 |<A%)......&35,Mc| 0000e530 25 2c 35 b8 2c 2c 41 25 3a 4c 63 25 3d 4c 63 25 |%,5.,,A%:Lc%=Lc%| 0000e540 3c 3c 41 25 3a 68 25 21 31 32 3d 28 31 3c 3c 41 |<<A%:h%!12=(1<<A| 0000e550 25 29 3a c8 99 26 33 35 2c 50 63 25 2c 33 b8 2c |%):..&35,Pc%,3.,| 0000e560 2c 52 63 25 3a c8 99 26 33 35 2c 50 63 25 2c 34 |,Rc%:..&35,Pc%,4| 0000e570 b8 2c 2c 41 25 3a 4e 63 25 3d 28 4e 63 25 3c 3c |.,,A%:Nc%=(Nc%<<| 0000e580 41 25 29 3a 68 25 21 30 3d 31 3c 3c 41 25 3a c8 |A%):h%!0=1<<A%:.| 0000e590 99 26 33 35 2c 50 63 25 2c 35 b8 2c 2c 41 25 3a |.&35,Pc%,5.,,A%:| 0000e5a0 4f 63 25 3d 28 4f 63 25 3c 3c 41 25 29 3a 68 25 |Oc%=(Oc%<<A%):h%| 0000e5b0 21 34 3d 31 3c 3c 41 25 3a e7 51 63 25 3c 3e 52 |!4=1<<A%:.Qc%<>R| 0000e5c0 63 25 84 51 63 25 3c 3e 31 35 8c 0d e8 7e 3b f2 |c%.Qc%<>15...~;.| 0000e5d0 62 28 22 56 6f 69 63 65 20 73 70 72 69 74 65 73 |b("Voice sprites| 0000e5e0 20 6d 75 73 74 20 68 61 76 65 20 31 36 20 61 6e | must have 16 an| 0000e5f0 64 20 6f 6e 6c 79 20 31 36 20 63 6f 6c 6f 75 72 |d only 16 colour| 0000e600 73 2e 22 2c a3 29 0d e8 90 af cc 3a c8 99 26 32 |s.",.).....:..&2| 0000e610 30 30 32 45 2c 32 35 2b 32 35 36 2c 55 25 2c 22 |002E,25+256,U%,"| 0000e620 73 74 37 22 3a c8 99 26 32 45 2c 32 37 2b 32 35 |st7":..&2E,27+25| 0000e630 36 2c 55 25 2c 6d 24 2c 22 73 74 37 22 3a c8 99 |6,U%,m$,"st7":..| 0000e640 26 32 45 2c 36 30 2b 32 35 36 2c 55 25 2c 22 73 |&2E,60+256,U%,"s| 0000e650 74 37 22 2c 30 b8 2c 41 25 2c 42 25 2c 43 25 3a |t7",0.,A%,B%,C%:| 0000e660 c8 99 26 32 45 2c 35 32 2b 32 35 36 2c 55 25 2c |..&2E,52+256,U%,| 0000e670 66 24 2c 34 2c 34 34 2c 38 2c 68 25 2c 30 3a c8 |f$,4,44,8,h%,0:.| 0000e680 99 26 32 45 2c 33 34 2b 32 35 36 2c 55 25 2c 6d |.&2E,34+256,U%,m| 0000e690 24 2c 30 2c 30 2c 38 3a c8 99 26 32 45 2c 36 30 |$,0,0,8:..&2E,60| 0000e6a0 2b 32 35 36 2c 41 25 2c 42 25 2c 43 25 3a e7 53 |+256,A%,B%,C%:.S| 0000e6b0 63 25 3d 31 8c 0d e8 cf 4a c8 99 26 32 45 2c 36 |c%=1....J..&2E,6| 0000e6c0 31 2b 32 35 36 2c 55 25 2c 22 73 74 37 22 2c 30 |1+256,U%,"st7",0| 0000e6d0 b8 2c 41 25 2c 42 25 2c 43 25 3a ef 31 38 2c 30 |.,A%,B%,C%:.18,0| 0000e6e0 2c 31 32 38 2b 36 33 2c 32 33 2c 31 37 2c 33 2c |,128+63,23,17,3,| 0000e6f0 26 43 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 0d |&C0,0,0,0,0,0,0.| 0000e700 e8 e1 34 c8 99 26 32 45 2c 35 30 2b 32 35 36 2c |..4..&2E,50+256,| 0000e710 55 25 2c 66 24 2c 34 2c 34 34 2c 38 2c 68 25 2c |U%,f$,4,44,8,h%,| 0000e720 30 3a c8 99 26 32 45 2c 36 31 2c 41 25 2c 42 25 |0:..&2E,61,A%,B%| 0000e730 2c 43 25 0d e8 fc 05 cd 0d e8 fc 05 cd 0d e9 05 |,C%.............| 0000e740 05 e1 0d ff |....| 0000e744