Home » Archimedes archive » Acorn Computing » 1995 01 subscription disc.adf » 9501s » MusicBox/!MusicBoxD/Main
MusicBox/!MusicBoxD/Main
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/Main |
Read OK: | ✔ |
File size: | 4777 bytes |
Load address: | 0000 |
Exec address: | 0000 |
File contents
2494DEFPROCka 2503*TUNING 0 2503SYS&40187,0TOya%:za%=FALSE:Aa%=FALSE:Ba%=FALSE:Ca%=FALSE:Da%=&BC7:Ea%=4:Fa%=3:Ga%=2:Ha%=1:sa%=0:w%=-1:Ia%=FALSE:qa%=FALSE:Ja%=0:Ka%=FALSE:La%=FALSE:Ma%=&81001:Na%=&81000:Oa%=Ma%:va%=FALSE:Pa%=FALSE:Qa%=FALSE:Ra%=FALSE:Sa%=FALSE:Ta%=FALSE:Ua%=0:Va%=256:SYS&8,17,"<MusicBoxD$Dir>.Config"TO,,,,v% 2764DIMe%(4,Va% ,3):DIMj%(3):DIMg%(3):g%()=-1:SYS&44AC1,,pa%,2048TO,Wa%:Xa%=FALSE:Ya%=TRUE:Za%=TRUE:_a%=0:`a%=-1:ab%=FALSE:bb%=FALSE:DIMi%(3):cb%=67*2:db%=66*2:eb%=56:fb%=30:gb%=32*2:hb%=32*2/4:Q%=32*2:ib%=2*4:jb%=1:SYS&411C0,(!Wa%+2048-v%):SYS&40880,"<MusicBoxD$Dir>.4" 2989kb%=Q%*ib%:lb%=kb%*jb%:mb%=ib%*jb%:nb%=Q%*ib%/2:ob%=2*mb%/ib%:pb%=80:qb%=125:rb%=130:sb%=0:tb%=0:ub%=-1:!ua%=1:SYS&7,14,ua%:IF?ua%=&95THENSYS&44ADC,(!Wa%+2048-v%+4),!Wa%TOv% 3115vb%=24*20:W%=100:K%=40:wb%=18:d$="s?":z$="s?":xb%=Q%/2:yb%=FALSE:zb%=FALSE:Ab%=FALSE:Bb%=1:Cb%=2:Db%=2:Eb%=-1:IF?ua%=&95THENSYS&1E,11,!Wa%,v% 3250Fb%=FALSE:Gb%=1:Hb%=1:Ib%=1:Jb%=FALSE:Kb%=FALSE:Lb%=10:Mb%=40:M%=24:Nb%=Mb%*M%:O%=4:Ob%=4*40:Pb%=52:Qb%=52:Rb%=52:Sb%=100:Tb%=40:Ub%=FALSE:DIMV% Sb%*M%*8:SYS&44ADA,V%,Sb%*M%*8:SYS&44AC3,,Wa%:Vb%=0:Wb%=2:Xb%=&FF:Yb%=&17F:Zb%=11:_b%=7:X$="s?" 3529`b%=18*2:ac%=18:bc%=pa%:cc%=-1:dc%=1:ec%=-1:DIMa%(Zb%-1):DIMk%(20):DIMh%(7,0):DIMfc% gc%:h%()=2:DIMd%(3,3):DIMhc% 16:DIMic% 64*4:DIMjc% vb%*12+12*2:SYS&44ADA,jc%,vb%*12+12*2:jc%+=12:DIMkc% 26*7+1:lc%=kc%+26*7:?lc%=0:IF?ua%=&95THEN 3745SYS&411C2,fc%:PROCsa 3772ENDIF 3772DIMmc% 256:ENDPROC 3790DEFPROCla:SYS&44AE2,256,pa%,0TO,nc%:SYS&44AE2,256,pa%,0TO,oc%:ENDPROC 3835DEFPROCha:LOCALA%:pc%=FALSE:gc%=(2^9)*(5*3+4):qc%=0:rc%=-1:sc%=-1:tc%=FALSE:uc%=FALSE:vc%=FALSE:o$="Music Box Demo":S$="MusicBoxD":y$=o$:k$="<"+S$+"$Dir>":n$="<MBInstruments$Dir>":G$="MBInstruments$Dir":H$="<MBInstrumentSprites$Dir>" 3997I$="<MBInstrumentSprites22$Dir>":J$="<ROMInstrumentSprites$Dir>":K$="<ROMInstrumentSprites22$Dir>":T$="1.25D (26 Nov 1994)":wc%=-1:xc%=-1:yc%=0:SYS&400C0,200,&4B534154,o$TO,ca%:DIMA% 25:$A%="S!MusicBoxD,!MusicBoxE"+CHR$0:A%?25=0 4114!h%=-1:h%!4=0:h%!8=0:h%!12=68:h%!16=68:h%!20=&311B+2^21:h%!24=A%+25:h%!28=A%:h%!32=1:SYS&400C2,,h%TOzc%:ENDPROC 4177DEFPROCsa:LOCALe%,Ac%,A,Bc%:Ac%=30:DIMCc% (Q%*M%*2+1)*8*(jb%+1):FORBc%=0TOjb%:FORe%=0TOkb%*8STEP8:A=e%*360/(kb%*8):A=RAD(SIN(RAD(A))*Ac%+90):!(Cc%+e%+kb%*8*Bc%)=(COS(A)*rb%)*2^10:!(Cc%+e%+kb%*8*Bc%+4)=(SIN(A)*rb%)*2^10:NEXT:NEXT:ENDPROC 4321DEFPROCma:LOCALA%,G%,Dc%,Ec%,Fc%,B%,b$,e%,A$:DIMb$(ea%-1):DIMc%(ea%-1):DIMa$(ea%-1):Fc%=FALSE:IFj$="22"THENr$=""ELSEr$="22" 4609IFFNg(k$+".Defaults"+j$)THENA$=j$ELSEA$=r$ 4618SYS&411C0,,pa%,k$+".Defaults"+A$TO,Dc%:SYS&411C0,,pa%,k$+".Defaults"+A$TO,r%:IFFNg(k$+".Tools"+j$)THENA$=j$ELSEA$=r$ 4654SYS&411C1,,r%,k$+".Tools"+A$:SYS&44AE2,256,pa%,0TO,G%:Gc%=0:Ec%=0:SYS&20023,"MBROM$Instruments",h%,256,0,0TO,,A%:h%?A%=0:h%?255=0:A$=FNc(h%):IFA%>0THEN 4753e%=1:WHILEe%<A%+1:b$="":WHILEASC(MID$(A$,e%,1))>32:b$+=MID$(A$,e%,1):e%+=1:ENDWHILE:IFb$<>""THENPROCta(b$) 4825e%+=1:ENDWHILE:PROCua:SYS&20023,G$,h%,-1,0,0TO,,A%:IFA%<0THENPROCva(n$,ea%-2,"FNV(F$)") 4870PROCwa:b$(Gc%)="Rest":c%(Gc%)=&80000000:a$(Gc%)="Rest":Gc%+=1:A%=FNe(r%,"Rest",r%,"none","pnone","snone"):A%=FNe(r%,"?",r%,"unknown","punknown","sunknown"):SYS&64AE2,260,Dc%,"sZ",r%,"sprintinst"+a$,0TO;P% 4969PROCB(r%,"sprintinst",r%,"sprint",1):SYS&64AE2,25,r%,"sprint":FORe%=1TO6:A%=FNe(r%,"t"+STR$(e%),r%,"tool"+STR$(e%),"ptool"+STR$(e%),"-"):SYS&64AE2,25,r%,"tool"+STR$(e%):SYS&64AE2,25,r%,"ptool"+STR$(e%):NEXT 5041A%=FNe(r%,"speaker",r%,"speak","pspeak","-"):A%=FNe(r%,"load",r%,"_load","_load","-"):A%=FNe(r%,"save",r%,"_save","_save","-"):A%=FNe(r%,"clear",r%,"_clear","_clear","-") 5077A%=FNe(r%,"copy",r%,"_copy","_copy","-"):A%=FNe(r%,"yes",r%,"_yes","_yes","-"):A%=FNe(r%,"no",r%,"_no","_no","-"):A%=FNe(r%,"Print",r%,"_print","_print","-"):A%=FNe(r%,"Slow",r%,"_Slow","_Slow","-") 5122A%=FNe(r%,"Fast",r%,"_Fast","_Fast","-"):A%=FNe(r%,"Ok",r%,"_Ok","_Ok","-"):SYS&64AE2,25,r%,"_ok":SYS&64AE2,25,r%,"_save":SYS&64AE2,25,r%,"_load":SYS&64AE2,25,r%,"_slow":SYS&64AE2,25,r%,"_fast":SYS&64AE2,25,r%,"_yes" 5194SYS&64AE2,25,r%,"_no":SYS&64AE2,25,r%,"_print":SYS&64AE2,25,r%,"_copy":SYS&64AE2,25,r%,"_clear":SYS&64AE2,25,r%,"speak":SYS&64AE2,25,r%,"pspeak":SYS&64AE2,25,r%,"none":SYS&64AE2,25,r%,"pnone":SYS&64AE2,25,r%,"snone" 5275SYS&64AE2,25,r%,"unknown":SYS&64AE2,25,r%,"punknown":SYS&64AE2,25,r%,"sunknown":SYS&44AC3,,G%:SYS&44AC3,,Dc%:IFFNg(k$+".Sprites"+j$)THENA$=j$ELSEA$=r$ 5356IFNOTFNg(k$+".Sprites"+A$)THENPROCb("Sprites file missign from inside MusicBox. Sorry I can't continue.",TRUE) 5365SYS&411C1,,r%,k$+".Sprites"+A$TO;A%:IFFNg(k$+".Menu"+j$)THENA$=j$ELSEA$=r$ 5383IF(A%AND1)=0ANDia%THENSYS&411C1,,r%,k$+".Menu"+A$TO;A% 5392IF(A%AND1)THENPROCb("Not enough memory to load MusicBox.",TRUE) 5401A%=!r%:DIMU% A%!0:SYS&44AC7,A%!0,A%,U%:SYS&44AC3,,r%:r%=-1:SYS&44AE3,1+2^11,U%,"S?",wb%,wb%,pa%TO,,_%:SYS&44AE3,1+2^11,U%,"S?",wb%,wb%,pa%TO,,Hc%:SYS&40880,"<MusicBoxD$Dir>.11":ENDPROC 5491DEFFNV(a$):LOCALP%,A%,B%:IFGc%<ea%THEN 5716b$(Gc%)=a$:c%(Gc%)=0:IFj$="22"THEN 5743SYS&64AE2,258,G%,H$+"."+a$TO;P%:SYS&64AE2,258,G%,I$+"."+a$TO;P% 5770ELSE:SYS&64AE2,258,G%,I$+"."+a$TO;P%:SYS&64AE2,258,G%,H$+"."+a$TO;P% 5797ENDIF 5797A%=FNe(r%,a$,G%,"Normal","Playing","Small"):IFA%THEN 5851a$(Gc%)=RIGHT$(a$,11) 5869ELSE:a$(Gc%)="?" 5887ENDIF 5887SYS&64AE2,25,G%,"Normal":SYS&64AE2,25,G%,"Playing":SYS&64AE2,25,G%,"Small":Gc%+=1 5932ENDIF 5932=0 6013DEFPROCB(Ic%,m$,Jc%,f$,z%):LOCALA%,B%,C%,Kc%,Lc%,Mc%,Nc%,Oc%,Pc%,Qc%,Rc%,Sc%,Tc%:SYS&44AE2,40,Ic%,m$TO,,,Kc%,Lc%,Sc%,Mc%:SYS&44AE2,40,Jc%,f$TO,,,Nc%,Oc%,Tc%,Pc%:SYS&35,Mc%,3TO,,Qc%:SYS&35,Mc%,4TO,,A%:Kc%=Kc%<<A%:h%!8=(1<<A%)*z%:SYS&35,Mc%,5TO,,A% 6085Lc%=Lc%<<A%:h%!12=(1<<A%)*z%: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 6175PROCb("Voice sprites must have 16 colours",FALSE) 6193ELSE:SYS&44AE2,60,Ic%,m$,0TO,A%,B%,C%:SYS&44AE2,52,Jc%,f$,((Kc%+2)*z%-Nc%)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),8,h%,0:SYS&2E,60,A%,B%,C%:IFSc%=1THEN 6229SYS&44AE2,61,Ic%,m$,0TO,A%,B%,C%:VDU18,0,128+63,23,17,3,&C0,0,0,0,0,0,0 6247SYS&44AE2,50,Jc%,f$,((Kc%+2)*z%-Nc%)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),8,h%,0:SYS&2E,61,A%,B%,C% 6274ENDIF 6274ENDIF 6283ENDPROC 6292DEFPROCta(a$):LOCALe%,f%,l$,Y$:l$=RIGHT$(a$,10):FORe%=1TO31:SYS&60183,0,e%TOf%:IFFNc(f%)=a$THEN 6490b$(Gc%)=a$:c%(Gc%)=&80000000:IFj$="22"THEN 6517SYS&64AE2,258,G%,J$+"."+l$TO;P%:SYS&64AE2,258,G%,K$+"."+l$TO;P% 6544ELSE:SYS&64AE2,258,G%,K$+"."+l$TO;P%:SYS&64AE2,258,G%,J$+"."+l$TO;P% 6571ENDIF 6571IFFNe(r%,l$,G%,"Normal","Playing","Small")THEN 6580a$(Gc%)=l$ 6598ELSE:a$(Gc%)="?" 6616ENDIF 6616SYS&64AE2,25,G%,"Normal":SYS&64AE2,25,G%,"Playing":SYS&64AE2,25,G%,"Small":Gc%+=1:Ec%+=1 6670ENDIF 6670NEXT:ENDPROC 6688DEFPROCva(A$,Uc%,L$):LOCALVc%,R%,Y%,F$,P%,Wc%,A%:P%=0:REPEAT:SYS&2000C,10,A$,h%,1,P%,64,"*"TOA%,,,R%,P%;Wc%:IF(Wc%AND1)=0THEN 6760IFR%>0THEN 6769F$=FNc(h%+20):IF((!h%)AND&FFF00000)=&FFF00000AND(h%!16AND1)=1THEN 6787Vc%=!h%AND&FFF00 6805ELSE:Vc%=0 6823ENDIF 6823IFVc%=&FFA00THEN 6832IFEc%>Uc%THEN 6841PROCb("Music Box can only handle a maximum of "+STR$(ea%)+" instruments. So I shall only use the first "+STR$(ea%)+".",FALSE):ENDPROC 6850ELSE:Vc%=EVAL(L$):Ec%+=1 6886ENDIF 6886ENDIF 6895F$=A$+"."+F$:IFh%!16=2THENPROCva(F$,Uc%,L$) 6913ENDIF 6922ELSE:PROCb(FNc(A%+4),FALSE):R%=0 6958ENDIF 6958UNTILR%=0ORP%=-1OREc%>Uc%+1:ENDPROC 6976DEFFNe(Ic%,a$,G%,s$,l$,p$):LOCALA%:SYS&64AE2,261,G%,s$TOA%:IFA%THEN 7048a$=RIGHT$(a$,11):SYS&44AE2,260,Dc%,"Z",Ic%,a$,0TO;A%:SYS&44AE2,260,Dc%,"pZ",Ic%,"p"+a$,0TO;P%:A%=(P%ORA%):IFp$<>"-"THEN 7093SYS&44AE2,260,Dc%,"sZ",Ic%,"s"+a$,0TO;P%:A%=(((P%ORA%)AND1)=0) 7120ENDIF 7120IFA%THEN 7129PROCB(Ic%,a$,G%,s$,1):SYS&64AE2,261,G%,l$TOB%:IFB%THEN 7156PROCB(Ic%,"p"+a$,G%,l$,1) 7174ELSE:PROCB(Ic%,"p"+a$,G%,s$,1) 7192ENDIF 7192IFp$<>"-"THEN 7201SYS&64AE2,261,G%,p$TOB%:IFB%THEN 7219PROCB(Ic%,"s"+a$,G%,p$,1) 7237ELSE:PROCB(Ic%,"s"+a$,G%,s$,2) 7255ENDIF 7255ENDIF 7264ELSE:SYS&64AE2,25,G%,a$:SYS&64AE2,25,G%,"p"+a$:SYS&64AE2,25,G%,"s"+a$ 7309ENDIF 7309ELSE:A%=TRUE:IFNOTFc%THEN 7336PROCb("Some instruments (eg "+a$+") do not have a sprite file containing a sprite called '"+s$+"'. I will create a sprite for these instruments.",FALSE):Fc%=TRUE 7363ENDIF 7363a$=RIGHT$(a$,11):SYS&44AE2,260,Dc%,"Z",Ic%,a$,0TO;A%:SYS&44AE2,260,Dc%,"pZ",Ic%,"p"+a$,0TO;P%:A%=(P%ORA%):IFp$<>"-"THEN 7408SYS&44AE2,260,Dc%,"sZ",Ic%,"s"+a$,0TO;P%:A%=(((P%ORA%)AND1)=0) 7435ENDIF 7435IFA%THEN 7444PROCxa(Ic%,a$,G%,a$,1):PROCxa(Ic%,"p"+a$,G%,a$,1):IFp$<>"-"THENPROCxa(Ic%,"s"+a$,G%,a$,2) 7471ELSE:SYS&64AE2,25,G%,a$:SYS&64AE2,25,G%,"p"+a$:SYS&64AE2,25,G%,"s"+a$ 7516ENDIF 7516ENDIF 7525=A% 7624DEFPROCxa(Ic%,m$,Jc%,f$,z%):LOCALA%,B%,C%,Kc%,Lc%,Mc%,Nc%,Oc%,Pc%,Qc%,Rc%,Sc%,Tc%:SYS&44AE2,40,Ic%,m$TO,,,Kc%,Lc%,Sc%,Mc%:SYS&35,Mc%,4TO,,A%:Kc%=Kc%<<A%:h%!8=(1<<A%)*z%:SYS&35,Mc%,5TO,,A%:Lc%=Lc%<<A%:h%!12=(1<<A%)*z%:SYS&35,Pc%,4TO,,A%:Nc%=16*2*2:h%!0=4 7732SYS&35,Pc%,5TO,,A%:Oc%=36*2:h%!4=8:SYS&44AE2,60,Ic%,m$,0TO,A%,B%,C%:GCOL8:IFLEN(f$)>1THEN 7786SYS&44AE2,51,ASC(MID$(f$,1,1)),,((Kc%+2)*z%-Nc%)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),0,h%:SYS&44AE2,51,ASC(MID$(f$,2,1)),,((Kc%+2)*z%)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),0,h% 7813ELSE:SYS&44AE2,51,ASC(MID$(f$,1,1)),,((Kc%+2)*z%-Nc%/2)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),0,h% 7831ENDIF 7831SYS&2E,60,A%,B%,C%:IFSc%=1THEN 7849SYS&44AE2,61,Ic%,m$,0TO,A%,B%,C%:VDU18,0,63,23,17,3,&C0,0,0,0,0,0,0 7867IFLEN(f$)>1THEN 7876SYS&44AE2,51,ASC(MID$(f$,1,1)),,((Kc%+2)*z%-Nc%)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),0,h%:SYS&44AE2,51,ASC(MID$(f$,2,1)),,((Kc%+2)*z%)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),0,h% 7903ELSE:SYS&44AE2,51,ASC(MID$(f$,1,1)),,((Kc%+2)*z%-Nc%/2)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),0,h% 7921ENDIF 7921SYS&2E,61,A%,B%,C% 7939ENDIF 7939ENDPROC 7948DEFPROCwa:v$=FNo("Tune"):B$=FNo("Beat"):C$=FNo("Sound"):D$=FNo("Chord"):Xc%=FALSE:Yc%=FALSE:Zc%=FALSE:_c%=FALSE:ENDPROC 8047DEFFNo(c$):LOCALs%,A%,`c%,f%,b$,Uc%,c%:!g%=1:g%!4=Da%:SYS&44AEA,0,"<MB"+c$+"Files$Dir>",g%,c$+"*",pa%TO,s%:f%=!s%:`c%=!f%:Uc%=1:IF`c%>0THEN 8137f%+=4+16*`c%-16+LEN(c$):REPEAT:A%=f%:f%-=16:WHILE?A%>=ASC("0")AND?A%<=ASC("9"):A%+=1:ENDWHILE:IF?A%<32OR?A%=127THEN 8209c%=(EVAL(FNc(f%+16)))+1:IFc%>Uc%THENUc%=c% 8227ENDIF 8236`c%-=1:UNTIL`c%=0 8263ENDIF 8263SYS&44AC3,,s%:=c$+STR$(Uc%) 8299DEFPROCua:LOCALA%,a$,ad%,bd%:ad%=FALSE:bd%=FALSE:SYS&20023,G$,h%,-1,0,0TO,,A%:IFA%<0THENbd%=TRUE 8335SYS&20023,"MBBeatFiles$Dir",h%,-1,0,0TO,,A%:IFA%<0THENad%=TRUE 8353IFad%ANDbd%THENENDPROC 8362IF(NOTad%)AND(NOTbd%)THEN 8371PROCya("Please insert a disc containing !MBInsts and !MBFiles into drive 0 ",3) 8389ELSE:IFNOTad%THEN 8398PROCya("Please insert a disc containing !MBFiles into drive 0 ",1) 8416ELSE:PROCya("Please insert a disc containing !MBInsts into drive 0 ",2) 8434ENDIF 8434ENDIF 8443ENDPROC 8452DEFPROCya(M$,F%):REPEAT:!h%=0:$(h%+4)=M$+CHR$0:SYS&400DF,h%,3+2^4,"Message from MusicBox"TO,A%:IFA%<>1THENENDPROC 8506CASEF%OF 8515WHEN1:SYS&20008,17,"ADFS::0.$.!MBFiles"TOA% 8542WHEN2:SYS&8,17,"ADFS::0.$.!MBInsts"TOA% 8560WHEN3:SYS&20008,17,"ADFS::0.$.!MBFiles"TOA%:IFA%=2THENSYS&8,17,"ADFS::0.$.!MBInsts"TOA% 8578ENDCASE 8587UNTILA%=2:SYS&40245,"0",h%:a$="ADFS::":A%=0:WHILEA%<12AND?(h%+A%+22)>32:a$+=CHR$(?(h%+A%+22)):A%+=1:ENDWHILE:a$+=".$":IF(F%AND1)=1THEN 8677OSCLI("*SET MBTuneFiles$Dir "+a$+".!MBFiles.Tunes"):OSCLI("*SET MBBeatFiles$Dir "+a$+".!MBFiles.Beats"):OSCLI("*SET MBChordFiles$Dir "+a$+".!MBFiles.Chords"):OSCLI("*SET MBSoundFiles$Dir "+a$+".!MBFiles.Sounds") 8722ENDIF 8722IF(F%AND2)=2THEN 8731OSCLI("*SET MBInstruments$Dir "+a$+".!MBInsts.Instrumnts"):OSCLI("*SET MBInstrumentSprites$Dir "+a$+".!MBInsts.Sprites"):OSCLI("*SET MBInstrumentSprites22$Dir "+a$+".!MBInsts.Sprites22") 8767ENDIF 8767ENDPROC 8776DEFPROCna(e$):LOCALcd%,dd%,ed%,f%,fd%:gd%=3:DIMf%(gd%,4):fd%=0:cd%=4096:hd%=5120+2024:DIMdd% hd%:id%=dd%:SYS&44AC1,,pa%,cd%+20TO,i%:ed%=!i%:i%=ed%+20:SYS&8,17,e$TOja%:IFja%<>1THENPROCb("Template file not found.",TRUE):ENDPROC 9118SYS&400D9,,e$:PROCza:PROCAa:PROCBa:PROCCa:PROCDa:PROCEa:PROCFa:PROCGa:PROCHa:PROCIa:PROCJa:PROCKa:SYS&400DA:jd%=0:PROCLa:ENDPROC 9298DEFPROCza:PROCf("info"):SYS&400C1,,i%TOkd%:SYS&44AD0,kd%,9,T$+CHR$0:ENDPROC 9478DEFPROCAa:PROCf("Topo"):SYS&400C1,,i%TOld%:ENDPROC 9523DEFPROCBa:LOCALf%:PROCf("LdSv"):md%=1:nd%=3:od%=4:pd%=5:qd%=6:f%=88+i%+md%*32:rd%=(!f%+f%!8)/2-1:sd%=(f%!4+f%!12)/2+2:td%=f%!12-f%!4-16:ud%=f%!8-f%!0-8-48:SYS&400C1,,i%TOvd%:ENDPROC 9766DEFPROCMa:PROCf("List"):DIMwd% 32:SYS&44AC7,32,i%+88,wd%:i%!84=0:SYS&400C1,,i%TOxd%:ENDPROC 9838DEFPROCJa:PROCf("Copy"):yd%=4:zd%=5:Ad%=6:Bd%=7:Cd%=8:SYS&400C1,,i%TODd%:ENDPROC 9964DEFPROCIa:PROCf("Ques"):Ed%=2:Fd%=3:Gd%=1:SYS&400C1,,i%TOHd%:ENDPROC 10072DEFPROCGa:PROCf("ConfTune"):Id%=22:Jd%=25:Kd%=28:Ld%=31:Md%=37:Nd%=38:SYS&400C1,,i%TOOd%:PROCf("ConfStart"):Pd%=16:Qd%=17:Rd%=18:Sd%=19:Td%=20:Ud%=21:Vd%=22:Wd%=23:Xd%=24:Yd%=29:SYS&400C1,,i%TO`%:PROCf("ConfGlobal"):Zd%=23:_d%=24:`d%=25 10414ae%=26:be%=28:ce%=30:de%=11:ee%=32:fe%=35:ge%=38:he%=40:ie%=41:je%=42:ke%=43:le%=44:me%=45:ne%=47:oe%=49:pe%=51:qe%=53:re%=55:se%=57:te%=59:ue%=61:ve%=63:we%=65:SYS&400C1,,i%TOm%:xe%=3:ye%=4:ze%=5:Ae%=6:Be%=7:Ce%=8:De%=9 10711Ee%=10:Fe%=11:PROCf("ConfBeat"):Ge%=23:He%=26:Ie%=29:Je%=32:Ke%=36:Le%=37:SYS&400C1,,i%TOMe%:PROCf("ConfLdSv"):Ne%=14:Oe%=15:Pe%=16:Qe%=17:Re%=18:Se%=19:Te%=20:Ue%=22:Ve%=23:SYS&400C1,,i%TOWe%:ENDPROC 10918DEFPROCCa:LOCALXe%,Ye%,Ze%,_e%,`e%,af%,S%,bf%,cf%,X%,Y%,A%,f%:PROCf("SndB"):df%=15:ef%=16:ff%=4:gf%=5:hf%=6:if%=7:jf%=8:kf%=0:lf%=i%!84-2:mf%=lf%+_b%*Zb%:nf%=14:of%=11:pf%=9:qf%=10:rf%=18:sf%=19:tf%=21:uf%=12:vf%=13:wf%=20 11368f%=i%+88+32*pf%:d%(0,0)=f%!0:d%(0,1)=f%!4:d%(0,2)=f%!8:d%(0,3)=f%!12:SYS&44ADD,5+256,i%,pf%,1:f%=i%+88+32*lf%:Xe%=f%!16:af%=f%!8-f%!0:S%=f%!12-f%!4:cf%=f%!8-f%!40:bf%=f%!12-f%!44:Ye%=f%!0-bf%*(_b%-1) 11530Ze%=f%!4-cf%*(Zb%-1):_e%=f%!8:`e%=f%!12:FORY%=0TOZb%-1:FORX%=0TO_b%-1:f%!0=Ye%+X%*bf%:f%!4=`e%-Y%*cf%-S%:f%!8=Ye%+X%*bf%+S%:f%!12=`e%-Y%*cf%:f%!16=Xe%:f%!20=lc%:f%!24=kc%+26*X%:f%!28=1:f%+=32:NEXT,:f%=i%+88+32*kf%:!f%=Ye%-8:f%!4=Ze%-8:f%!8=_e%+8 11719f%!12=`e%+8:i%!84=mf%:SYS&44ADD,5+256,i%,nf%,1:SYS&400C1,,i%TOt%:PROCP(i%,t%):DIMA% 40:i%(0)=A%:PROCQ(A%,i%+88+32*nf%,t%):ENDPROC 11809DEFPROCDa:IFia%THENPROCf("Menu")ELSEPROCf("Menu2") 11962xf%=3:yf%=4:zf%=5:Af%=6:SYS&400C1,,i%TOBf%:ENDPROC 12016DEFPROCEa:LOCALe%,A%,B%,f%,Cf%,Df%,bf%,cf%,Ef%:PROCf("Inst"):i%!64=U%:Ff%=1:Gf%=2:Hf%=0:If%=3:Jf%=4:Ef%=5:Kf%=If%+2*(Gc%-1):Lf%=Jf%+2*(Gc%-1):i%!84=Lf%+1:Cf%=i%+88+If%*32:Df%=i%+88+Ef%*32:bf%=!Df%-!Cf%:cf%=Df%!4-Cf%!4:Df%=i%+88+Jf%*32 12376Cf%=i%+88+If%*32:f%=Cf%:DIMA% (26+21)*Gc%:FORe%=0TOGc%-1:!f%=!Cf%+bf%*(e%MOD3):f%!4=Cf%!4+cf%*(e%DIV3):f%!8=Cf%!8+bf%*(e%MOD3):f%!12=Cf%!12+cf%*(e%DIV3):f%!16=Cf%!16:f%!20=lc%:f%!24=A%:f%!28=1:$A%="S"+a$(e%)+",p"+a$(e%)+CHR$0:A%+=26:f%+=32 12511!f%=!Df%+bf%*(e%MOD3):f%!4=Df%!4+cf%*(e%DIV3):f%!8=Df%!8+bf%*(e%MOD3):f%!12=Df%!12+cf%*(e%DIV3):f%!16=Df%!16:f%!20=A%:f%!24=0:f%!28=21:$A%=b$(e%)+CHR$0:A%+=21:f%+=32:NEXT:f%=i%+88+Ff%*32:A%=!Cf%+bf%*3:!f%=!f%-f%!8+A%-8:f%!8=A%-8 12664A%=Cf%!4+cf%*((Gc%-3)DIV3)-4:B%=f%!12-f%!4:f%!12=A%-4:f%!4=A%-B%-4:Cf%=f%:f%=i%+88+Gf%*32:A%=!Cf%:!f%=!f%-f%!8+A%-8:f%!8=A%-8:f%!12=Cf%!12:f%!4=Cf%!4:f%=Cf%:Cf%=i%+88+Hf%*32:Cf%!8=f%!8+8:Cf%!4=f%!4-8:i%!8=i%!0+f%!8+12 12844i%!4=i%!12+f%!4-12:SYS&400C1,,i%TOMf%:ENDPROC 12889DEFPROCFa:LOCALf%,Nf%,Of%,e%,A%:PROCf("Comp"):Of%=0:Pf%=1:Qf%=2:Rf%=8:Sf%=9:Tf%=12:Uf%=13:Vf%=14:Wf%=15:Xf%=16:Yf%=17:Zf%=18:_f%=38:`f%=23:ag%=24:bg%=25:cg%=26:dg%=27:eg%=28:fg%=29:Nf%=30:gg%=31:hg%=32:ig%=43:jg%=35:kg%=36:lg%=37:mg%=39 13411ng%=33:og%=40:pg%=41:qg%=42:f%=i%+88+32*ag%:d%(1,0)=f%!0:d%(1,1)=f%!4:d%(1,2)=f%!8:d%(1,3)=f%!12:SYS&44ADD,5+256,i%,ag%,1:SYS&44ADD,5+256,i%,Of%,1:f%=i%+88+Of%*32:rg%=f%!0:sg%=f%!4:tg%=f%!8:ug%=f%!12:A%=Yf%-Of%+1 13582SYS&44ADD,5+256,i%,Of%,1:SYS&44ADD,6+256,i%,ng%,0,2^2:FORe%=Of%TOWf%:SYS&44ADD,6+256,i%,e%,0,2^2:NEXT:DIMvg% 4+32*A%:SYS&44AC7,32*A%,i%+88+32*Of%,vg%+4:!vg%=A%:FORe%=Of%TOYf%:SYS&44ADD,5+256,i%,e%,1:NEXT:SYS&44ADD,5+256,i%,Nf%,1:SYS&400C1,,i%TOo% 13699PROCP(i%,o%):DIMA% 40:PROCQ(A%,i%+88+32*Nf%,o%):i%(1)=A%:Qf%-=Of%:Rf%-=Of%:Sf%-=Of%:Tf%-=Of%:Vf%-=Of%:Wf%-=Of%:Xf%-=Of%:Yf%-=Of%:Of%=0:FORe%=Qf%TORf%:!(vg%+4+24+32*e%)=kc%+26*(e%-Qf%):NEXT:ENDPROC 13861DEFPROCKa:LOCALf%,wg%,xg%,e%,A%:PROCf("RtmB"):xg%=0:yg%=1:zg%=2:Ag%=8:Bg%=9:Cg%=12:Dg%=13:Eg%=14:Fg%=15:Gg%=16:Hg%=17:Ig%=18:Jg%=42:Kg%=20:Lg%=21:Mg%=22:Ng%=24:Og%=25:Pg%=27:wg%=29:Qg%=31:Rg%=40:Sg%=34:Tg%=35:Ug%=36:Vg%=37:Wg%=38:Xg%=39 14419Yg%=41:Zg%=28:_g%=30:f%=i%+88+32*Ng%:d%(3,0)=f%!0:d%(3,1)=f%!4:d%(3,2)=f%!8:d%(3,3)=f%!12:SYS&44ADD,5+256,i%,Ng%,1:SYS&44ADD,5+256,i%,xg%,1:f%=i%+88+xg%*32:`g%=f%!0:ah%=f%!4:bh%=f%!8-1:ch%=f%!12-1:SYS&44ADA,g%,88:g%!0=`g%:g%!4=ah% 14617g%!8=bh%-2:g%!12=ch%-2:g%!20=Qb%:g%!24=-1:g%!28=&80000062:g%!32=&000702FF:g%!40=-Pb%:g%!44=-90000:g%!48=(bh%-`g%)-Pb%:g%!52=Qb%:g%!60=3<<12:g%!64=r%:SYS&400C1,,g%TOdh%:SYS&44ADD,5+256,i%,xg%,1:A%=Gg%-xg%+1 14770SYS&44ADD,6+256,i%,Ig%,0,2^2:FORe%=xg%TOGg%:SYS&44ADD,6+256,i%,e%,0,2^2:NEXT:DIMeh% 4+32*A%:SYS&44AC7,32*A%,i%+88+32*xg%,eh%+4:!eh%=A%:FORe%=xg%TOGg%:SYS&44ADD,5+256,i%,e%,1:NEXT:SYS&44ADD,5+256,i%,wg%,1:SYS&400C1,,i%TOk%:PROCP(i%,k%):DIMA% 40 14896PROCQ(A%,i%+88+32*wg%,k%):i%(3)=A%:zg%-=xg%:Ag%-=xg%:Bg%-=xg%:Cg%-=xg%:Eg%-=xg%:Fg%-=xg%:Gg%-=xg%:xg%=0:FORe%=zg%TOAg%:!(eh%+4+24+32*e%)=kc%+26*(e%-zg%):NEXT:ENDPROC 15022DEFPROCHa:LOCALf%,fh%,gh%,e%,A%:PROCf("CrdB"):hh%=30:ih%=2:jh%=8:kh%=7:IFkh%<>7THENERROR0,"Reassemble MCode" 15220lh%=9:mh%=lh%+kh%*1:nh%=lh%+kh%*2:oh%=30:ph%=32:qh%=33:rh%=34:sh%=35:th%=36:fh%=41:uh%=44:vh%=52:wh%=39:xh%=37:yh%=47:zh%=46:Ah%=40:Bh%=49:Ch%=50:Dh%=51:Eh%=42:Fh%=43:f%=i%+88+32*zh%:d%(2,0)=f%!0:d%(2,1)=f%!4:d%(2,2)=f%!8 15463d%(2,3)=f%!12:SYS&44ADD,5+256,i%,zh%,1:Gh%=mh%+kh%-ih%:DIMHh% 4+32*Gh%:SYS&44AC7,32*Gh%,i%+88+32*ih%,Hh%+4:!Hh%=Gh%:FORe%=ih%TOmh%-1:SYS&44ADD,5+256,i%,e%,1:NEXT:FORe%=mh%TOmh%+kh%-1:SYS&44ADD,6+256,i%,e%,3<<12,&FFFFFFFF:NEXT 15580SYS&44ADD,5+256,i%,fh%,1:SYS&400C1,,i%TOl%:PROCP(i%,l%):DIMA% 40:PROCQ(A%,i%+88+32*fh%,l%):i%(2)=A%:jh%-=ih%:lh%-=ih%:Ih%=Hh%+4+(mh%-ih%)*32:ih%-=ih%:FORe%=ih%TOjh%:!(Hh%+4+24+32*e%)=kc%+26*(e%-ih%):NEXT:FORe%=0TOkh%-1:A%=h%(e%,0) 15715SYS&44ADD,1+512,l%,e%+lh%,"s"+a$(A%-1)+",p"+a$(A%-1),,Hh%:NEXT:DIMJh% kh%*24:SYS&44ADA,Jh%,kh%*24:ENDPROC 15760DEFPROCf(a$):LOCALN%:$ed%=a$+CHR$0:SYS&400DB,,i%,id%,dd%+hd%,-1,ed%,0TO,,id%,,,,N%:IFN%=0THENPROCb("Template not found for "+a$+" window",TRUE) 15904i%!64=U%:ENDPROC 15922DEFPROCQ(A%,B%,n%):!A%=n%:A%!4=B%!0:A%!8=B%!4+eb%:A%!12=B%!8:A%!16=B%!12:ENDPROC 15994DEFPROCP(i%,n%):f%(fd%,0)=n%:f%(fd%,1)=i%!8-i%!0:f%(fd%,2)=i%!12-i%!4:f%(fd%,3)=i%!16:f%(fd%,4)=i%!20:fd%+=1:ENDPROC 16075DEFPROCLa:LOCALKh%,v%,Lh%,Mh%:v%=1024:DIMMh% v%:FORKh%=8TO10STEP2:P%=Mh%:L%=Mh%+v%:[OPT Kh%:.Nh%:EQUD Lh%-Nh%:EQUD vd%:EQUD Oh%-Ph%+8:EQUD0:.Ph%:EQUD0:EQUD%0111011100010010:EQUD rd%:EQUD sd%:EQUD0:EQUD0:EQUD Qh%:EQUD-1:.Oh%:EQUD k% 16300EQUD Lh%-Rh%:.Rh%:EQUD0:EQUD dh%:EQUD%0111011110011010:EQUD(`g%+bh%)/2:EQUD(ch%+ah%)/2+1:EQUD0:EQUD0:EQUD0:EQUD-1:EQUD-1:.Lh%:.Qh%:EQUD0:EQUD1:EQUD0:EQUD6:EQUD1:EQUD1-1:EQUD-1:EQUD-1:EQUD0:.Sh%:EQUD12 16543EQUD ud%:EQUD52:EQUD1:EQUD1:EQUD0:EQUD0:EQUD0:.Th%:EQUD0:EQUD-td%:EQUD ud%:EQUD0:EQUD ud%:EQUD1:EQUD&10000062:EQUB1:EQUB10:EQUB0:EQUB0:EQUS"Files"+CHR$0:ALIGN: ]:NEXT:ENDPROC 16759DEFPROCpa:LOCALgc%,Uh%,ja%,b$,A%:SYS&411C3TOUh%:Vh%=OPENIN("<MusicBoxD$Dir>.MCodeVars"):PROCa(Wh%):PROCa(Xh%):PROCa(Yh%):PROCa(Zh%):PROCa(_h%):PROCa(`h%):PROCa(ai%):PROCa(bi%):PROCa(ci%):PROCa(di%):PROCa(ei%):PROCa(fi%):PROCa(gi%):PROCa(hi%):PROCa(ii%):PROCa(ji%):PROCa(ki%):PROCa(li%):PROCa(mi%) 17056PROCa(ni%):PROCa(oi%):PROCa(pi%):PROCa(qi%):PROCa(ri%):PROCa(si%):PROCa(ti%):PROCa(ui%):PROCa(vi%):PROCa(wi%):PROCa(xi%):PROCa(yi%):PROCa(zi%):PROCa(Ai%):PROCa(Bi%):PROCa(Ci%):PROCa(Di%):PROCa(Ei%):PROCa(Fi%):PROCa(Gi%):PROCa(Hi%):PROCa(Ii%):PROCa(Ji%):PROCa(Ki%):PROCa(Li%):PROCa(Mi%):PROCa(Ni%):PROCa(Oi%) 17308PROCa(Pi%):PROCa(Qi%):PROCa(Ri%):PROCa(Si%):PROCa(Ti%):PROCa(Ui%):PROCa(Vi%):PROCa(Wi%):PROCa(Xi%):PROCa(Yi%):PROCa(Zi%):PROCa(_i%):PROCa(`i%):PROCa(aj%):PROCa(bj%):PROCa(cj%):PROCa(dj%):PROCa(ej%):PROCa(fj%):PROCa(gj%):PROCa(hj%):PROCa(ij%):PROCa(jj%):PROCa(kj%):PROCa(lj%):PROCa(mj%):PROCa(nj%):PROCa(oj%) 17560PROCa(pj%):PROCa(qj%):PROCa(rj%):PROCa(sj%):PROCa(tj%):PROCa(uj%):PROCa(vj%):PROCa(wj%):PROCa(xj%):PROCa(yj%):PROCa(zj%):PROCa(Aj%):PROCa(Bj%):PROCa(Cj%):PROCa(Dj%):PROCa(Ej%):PROCa(Fj%):PROCa(Gj%):PROCa(Hj%):PROCa(Ij%):PROCa(Jj%):PROCa(Kj%):PROCa(Lj%):PROCa(Mj%):PROCa(Nj%):PROCa(Oj%):PROCa(Pj%) 17803PROCa(Qj%):PROCa(Rj%):PROCa(Sj%):PROCa(Tj%):PROCa(Uj%):PROCa(Vj%):PROCa(Wj%):PROCa(Xj%):PROCa(Yj%):PROCa(Zj%):PROCa(_j%):PROCa(`j%):PROCa(ak%):PROCa(bk%):PROCa(ck%):PROCa(dk%):CLOSE#Vh%:Wh%!32=kd%:!li%=jc%:!mi%=W%*12:!Ci%=vg%:Gi%!0=rg%:Gi%!4=sg%:Gi%!8=tg%:Gi%!12=ug% 18028Ii%!0=rg%:Ii%!4=sg%-4:Ii%!8=tg%:Ii%!12=ug%+4:!Ji%=nc%:!Ki%=g%:fi%!0=rg%:fi%!4=sg%:fi%!8=tg%:fi%!12=ug%:!Ri%=Jh%-24:!Si%=Ih%-32:!Vi%=o%:!Wi%=l%:!Xi%=_%:!Yi%=Hc%:!Zi%=h%:!`i%=k%:!aj%=dh%:!cj%=U%:!fj%=oc%:!ij%=Cc% 18226!yj%=Ob%:!zj%=V%:!Aj%=Lb%:!Oj%=V%:!(Yh%+4*10)=_j%:!(Yh%+4*52)=`j%:!(Yh%+4*64)=ak%:!(Yh%+4*94)=bk%:Qh%!4=wj%:ENDPROC 18334DEFPROCa(RETURNek%):INPUT#Vh%,ek%:ek%+=Uh%:ENDPROC
���ka � *TUNING 0 ��ș&40187,0�ya%:za%=�:Aa%=�:Ba%=�:Ca%=�:Da%=&BC7:Ea%=4:Fa%=3:Ga%=2:Ha%=1:sa%=0:w%=-1:Ia%=�:qa%=�:Ja%=0:Ka%=�:La%=�:Ma%=&81001:Na%=&81000:Oa%=Ma%:va%=�:Pa%=�:Qa%=�:Ra%=�:Sa%=�:Ta%=�:Ua%=0:Va%=256:ș&8,17,"<MusicBoxD$Dir>.Config"�,,,,v% ���e%(4,Va% ,3):�j%(3):�g%(3):g%()=-1:ș&44AC1,,pa%,2048�,Wa%:Xa%=�:Ya%=�:Za%=�:_a%=0:`a%=-1:ab%=�:bb%=�:�i%(3):cb%=67*2:db%=66*2:eb%=56:fb%=30:gb%=32*2:hb%=32*2/4:Q%=32*2:ib%=2*4:jb%=1:ș&411C0,(!Wa%+2048-v%):ș&40880,"<MusicBoxD$Dir>.4" ��kb%=Q%*ib%:lb%=kb%*jb%:mb%=ib%*jb%:nb%=Q%*ib%/2:ob%=2*mb%/ib%:pb%=80:qb%=125:rb%=130:sb%=0:tb%=0:ub%=-1:!ua%=1:ș&7,14,ua%:�?ua%=&95�ș&44ADC,(!Wa%+2048-v%+4),!Wa%�v% +�vb%=24*20:W%=100:K%=40:wb%=18:d$="s?":z$="s?":xb%=Q%/2:yb%=�:zb%=�:Ab%=�:Bb%=1:Cb%=2:Db%=2:Eb%=-1:�?ua%=&95�ș&1E,11,!Wa%,v% ��Fb%=�:Gb%=1:Hb%=1:Ib%=1:Jb%=�:Kb%=�:Lb%=10:Mb%=40:M%=24:Nb%=Mb%*M%:O%=4:Ob%=4*40:Pb%=52:Qb%=52:Rb%=52:Sb%=100:Tb%=40:Ub%=�:�V% Sb%*M%*8:ș&44ADA,V%,Sb%*M%*8:ș&44AC3,,Wa%:Vb%=0:Wb%=2:Xb%=&FF:Yb%=&17F:Zb%=11:_b%=7:X$="s?" ��`b%=18*2:ac%=18:bc%=pa%:cc%=-1:dc%=1:ec%=-1:�a%(Zb%-1):�k%(20):�h%(7,0):�fc% gc%:h%()=2:�d%(3,3):�hc% 16:�ic% 64*4:�jc% vb%*12+12*2:ș&44ADA,jc%,vb%*12+12*2:jc%+=12:�kc% 26*7+1:lc%=kc%+26*7:?lc%=0:�?ua%=&95� �ș&411C2,fc%:�sa �� ��mc% 256:� �:��la:ș&44AE2,256,pa%,0�,nc%:ș&44AE2,256,pa%,0�,oc%:� ����ha:�A%:pc%=�:gc%=(2^9)*(5*3+4):qc%=0:rc%=-1:sc%=-1:tc%=�:uc%=�:vc%=�:o$="Music Box Demo":S$="MusicBoxD":y$=o$:k$="<"+S$+"$Dir>":n$="<MBInstruments$Dir>":G$="MBInstruments$Dir":H$="<MBInstrumentSprites$Dir>" ��I$="<MBInstrumentSprites22$Dir>":J$="<ROMInstrumentSprites$Dir>":K$="<ROMInstrumentSprites22$Dir>":T$="1.25D (26 Nov 1994)":wc%=-1:xc%=-1:yc%=0:ș&400C0,200,&4B534154,o$�,ca%:�A% 25:$A%="S!MusicBoxD,!MusicBoxE"+�0:A%?25=0 k!h%=-1:h%!4=0:h%!8=0:h%!12=68:h%!16=68:h%!20=&311B+2^21:h%!24=A%+25:h%!28=A%:h%!32=1:ș&400C2,,h%�zc%:� Q���sa:�e%,Ac%,A,Bc%:Ac%=30:�Cc% (Q%*M%*2+1)*8*(jb%+1):�Bc%=0�jb%:�e%=0�kb%*8�8:A=e%*360/(kb%*8):A=�(�(�(A))*Ac%+90):!(Cc%+e%+kb%*8*Bc%)=(�(A)*rb%)*2^10:!(Cc%+e%+kb%*8*Bc%+4)=(�(A)*rb%)*2^10:�:�:� �e��ma:�A%,G%,Dc%,Ec%,Fc%,B%,b$,e%,A$:�b$(ea%-1):�c%(ea%-1):�a$(ea%-1):Fc%=�:�j$="22"�r$=""�r$="22" &�g(k$+".Defaults"+j$)�A$=j$�A$=r$ lș&411C0,,pa%,k$+".Defaults"+A$�,Dc%:ș&411C0,,pa%,k$+".Defaults"+A$�,r%:�g(k$+".Tools"+j$)�A$=j$�A$=r$ .�ș&411C1,,r%,k$+".Tools"+A$:ș&44AE2,256,pa%,0�,G%:Gc%=0:Ec%=0:ș&20023,"MBROM$Instruments",h%,256,0,0�,,A%:h%?A%=0:h%?255=0:A$=�c(h%):�A%>0� �Pe%=1:ȕe%<A%+1:b$="":ȕ�(�A$,e%,1))>32:b$+=�A$,e%,1):e%+=1:�:�b$<>""��ta(b$) �He%+=1:�:�ua:ș&20023,G$,h%,-1,0,0�,,A%:�A%<0��va(n$,ea%-2,"FNV(F$)") ��wa:b$(Gc%)="Rest":c%(Gc%)=&80000000:a$(Gc%)="Rest":Gc%+=1:A%=�e(r%,"Rest",r%,"none","pnone","snone"):A%=�e(r%,"?",r%,"unknown","punknown","sunknown"):ș&64AE2,260,Dc%,"sZ",r%,"sprintinst"+a$,0�;P% i��B(r%,"sprintinst",r%,"sprint",1):ș&64AE2,25,r%,"sprint":�e%=1�6:A%=�e(r%,"t"+�(e%),r%,"tool"+�(e%),"ptool"+�(e%),"-"):ș&64AE2,25,r%,"tool"+�(e%):ș&64AE2,25,r%,"ptool"+�(e%):� ��A%=�e(r%,"speaker",r%,"speak","pspeak","-"):A%=�e(r%,"load",r%,"_load","_load","-"):A%=�e(r%,"save",r%,"_save","_save","-"):A%=�e(r%,"clear",r%,"_clear","_clear","-") ��A%=�e(r%,"copy",r%,"_copy","_copy","-"):A%=�e(r%,"yes",r%,"_yes","_yes","-"):A%=�e(r%,"no",r%,"_no","_no","-"):A%=�e(r%,"Print",r%,"_print","_print","-"):A%=�e(r%,"Slow",r%,"_Slow","_Slow","-") �A%=�e(r%,"Fast",r%,"_Fast","_Fast","-"):A%=�e(r%,"Ok",r%,"_Ok","_Ok","-"):ș&64AE2,25,r%,"_ok":ș&64AE2,25,r%,"_save":ș&64AE2,25,r%,"_load":ș&64AE2,25,r%,"_slow":ș&64AE2,25,r%,"_fast":ș&64AE2,25,r%,"_yes" J�ș&64AE2,25,r%,"_no":ș&64AE2,25,r%,"_print":ș&64AE2,25,r%,"_copy":ș&64AE2,25,r%,"_clear":ș&64AE2,25,r%,"speak":ș&64AE2,25,r%,"pspeak":ș&64AE2,25,r%,"none":ș&64AE2,25,r%,"pnone":ș&64AE2,25,r%,"snone" ��ș&64AE2,25,r%,"unknown":ș&64AE2,25,r%,"punknown":ș&64AE2,25,r%,"sunknown":ș&44AC3,,G%:ș&44AC3,,Dc%:�g(k$+".Sprites"+j$)�A$=j$�A$=r$ �e笤g(k$+".Sprites"+A$)��b("Sprites file missign from inside MusicBox. Sorry I can't continue.",�) �Dș&411C1,,r%,k$+".Sprites"+A$�;A%:�g(k$+".Menu"+j$)�A$=j$�A$=r$ 0�(A%�1)=0�ia%�ș&411C1,,r%,k$+".Menu"+A$�;A% 7�(A%�1)��b("Not enough memory to load MusicBox.",�) �A%=!r%:�U% A%!0:ș&44AC7,A%!0,A%,U%:ș&44AC3,,r%:r%=-1:ș&44AE3,1+2^11,U%,"S?",wb%,wb%,pa%�,,_%:ș&44AE3,1+2^11,U%,"S?",wb%,wb%,pa%�,,Hc%:ș&40880,"<MusicBoxD$Dir>.11":� sݤV(a$):�P%,A%,B%:�Gc%<ea%� T"b$(Gc%)=a$:c%(Gc%)=0:�j$="22"� o?ș&64AE2,258,G%,H$+"."+a$�;P%:ș&64AE2,258,G%,I$+"."+a$�;P% �A�:ș&64AE2,258,G%,I$+"."+a$�;P%:ș&64AE2,258,G%,H$+"."+a$�;P% �� �3A%=�e(r%,a$,G%,"Normal","Playing","Small"):�A%� �a$(Gc%)=�a$,11) ��:a$(Gc%)="?" �� �Rș&64AE2,25,G%,"Normal":ș&64AE2,25,G%,"Playing":ș&64AE2,25,G%,"Small":Gc%+=1 ,� ,=0 }���B(Ic%,m$,Jc%,f$,z%):�A%,B%,C%,Kc%,Lc%,Mc%,Nc%,Oc%,Pc%,Qc%,Rc%,Sc%,Tc%:ș&44AE2,40,Ic%,m$�,,,Kc%,Lc%,Sc%,Mc%:ș&44AE2,40,Jc%,f$�,,,Nc%,Oc%,Tc%,Pc%:ș&35,Mc%,3�,,Qc%:ș&35,Mc%,4�,,A%:Kc%=Kc%<<A%:h%!8=(1<<A%)*z%:ș&35,Mc%,5�,,A% řLc%=Lc%<<A%:h%!12=(1<<A%)*z%:ș&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 colours",�) 1��:ș&44AE2,60,Ic%,m$,0�,A%,B%,C%:ș&44AE2,52,Jc%,f$,((Kc%+2)*z%-Nc%)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),8,h%,0:ș&2E,60,A%,B%,C%:�Sc%=1� UGș&44AE2,61,Ic%,m$,0�,A%,B%,C%:�18,0,128+63,23,17,3,&C0,0,0,0,0,0,0 g_ș&44AE2,50,Jc%,f$,((Kc%+2)*z%-Nc%)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),8,h%,0:ș&2E,61,A%,B%,C% �� �� �� �J��ta(a$):�e%,f%,l$,Y$:l$=�a$,10):�e%=1�31:ș&60183,0,e%�f%:�c(f%)=a$� Z*b$(Gc%)=a$:c%(Gc%)=&80000000:�j$="22"� u?ș&64AE2,258,G%,J$+"."+l$�;P%:ș&64AE2,258,G%,K$+"."+l$�;P% �A�:ș&64AE2,258,G%,K$+"."+l$�;P%:ș&64AE2,258,G%,J$+"."+l$�;P% �� �-�e(r%,l$,G%,"Normal","Playing","Small")� �a$(Gc%)=l$ ��:a$(Gc%)="?" �� �Yș&64AE2,25,G%,"Normal":ș&64AE2,25,G%,"Playing":ș&64AE2,25,G%,"Small":Gc%+=1:Ec%+=1 � �:� k��va(A$,Uc%,L$):�Vc%,R%,Y%,F$,P%,Wc%,A%:P%=0:�:ș&2000C,10,A$,h%,1,P%,64,"*"�A%,,,R%,P%;Wc%:�(Wc%�1)=0� h �R%>0� q:F$=�c(h%+20):�((!h%)�&FFF00000)=&FFF00000�(h%!16�1)=1� �Vc%=!h%�&FFF00 ��:Vc%=0 �� ��Vc%=&FFA00� � �Ec%>Uc%� �v�b("Music Box can only handle a maximum of "+�(ea%)+" instruments. So I shall only use the first "+�(ea%)+".",�):� ��:Vc%=�(L$):Ec%+=1 �� �� �(F$=A$+"."+F$:�h%!16=2��va(F$,Uc%,L$) � �:�b(�c(A%+4),�):R%=0 .� .�R%=0�P%=-1�Ec%>Uc%+1:� @:ݤe(Ic%,a$,G%,s$,l$,p$):�A%:ș&64AE2,261,G%,s$�A%:�A%� �la$=�a$,11):ș&44AE2,260,Dc%,"Z",Ic%,a$,0�;A%:ș&44AE2,260,Dc%,"pZ",Ic%,"p"+a$,0�;P%:A%=(P%�A%):�p$<>"-"� �=ș&44AE2,260,Dc%,"sZ",Ic%,"s"+a$,0�;P%:A%=(((P%�A%)�1)=0) �� ��A%� �1�B(Ic%,a$,G%,s$,1):ș&64AE2,261,G%,l$�B%:�B%� ��B(Ic%,"p"+a$,G%,l$,1) �:�B(Ic%,"p"+a$,G%,s$,1) � �p$<>"-"� !ș&64AE2,261,G%,p$�B%:�B%� 3�B(Ic%,"s"+a$,G%,p$,1) E�:�B(Ic%,"s"+a$,G%,s$,2) W� W� `C�:ș&64AE2,25,G%,a$:ș&64AE2,25,G%,"p"+a$:ș&64AE2,25,G%,"s"+a$ �� ��:A%=�:�Fc%� ���b("Some instruments (eg "+a$+") do not have a sprite file containing a sprite called '"+s$+"'. I will create a sprite for these instruments.",�):Fc%=� �� �la$=�a$,11):ș&44AE2,260,Dc%,"Z",Ic%,a$,0�;A%:ș&44AE2,260,Dc%,"pZ",Ic%,"p"+a$,0�;P%:A%=(P%�A%):�p$<>"-"� �=ș&44AE2,260,Dc%,"sZ",Ic%,"s"+a$,0�;P%:A%=(((P%�A%)�1)=0) � �A%� P�xa(Ic%,a$,G%,a$,1):�xa(Ic%,"p"+a$,G%,a$,1):�p$<>"-"��xa(Ic%,"s"+a$,G%,a$,2) /C�:ș&64AE2,25,G%,a$:ș&64AE2,25,G%,"p"+a$:ș&64AE2,25,G%,"s"+a$ \� \� e=A% ����xa(Ic%,m$,Jc%,f$,z%):�A%,B%,C%,Kc%,Lc%,Mc%,Nc%,Oc%,Pc%,Qc%,Rc%,Sc%,Tc%:ș&44AE2,40,Ic%,m$�,,,Kc%,Lc%,Sc%,Mc%:ș&35,Mc%,4�,,A%:Kc%=Kc%<<A%:h%!8=(1<<A%)*z%:ș&35,Mc%,5�,,A%:Lc%=Lc%<<A%:h%!12=(1<<A%)*z%:ș&35,Pc%,4�,,A%:Nc%=16*2*2:h%!0=4 4Pș&35,Pc%,5�,,A%:Oc%=36*2:h%!4=8:ș&44AE2,60,Ic%,m$,0�,A%,B%,C%:�8:�(f$)>1� j�ș&44AE2,51,�(�f$,1,1)),,((Kc%+2)*z%-Nc%)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),0,h%:ș&44AE2,51,�(�f$,2,1)),,((Kc%+2)*z%)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),0,h% �U�:ș&44AE2,51,�(�f$,1,1)),,((Kc%+2)*z%-Nc%/2)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),0,h% �� �ș&2E,60,A%,B%,C%:�Sc%=1� �Cș&44AE2,61,Ic%,m$,0�,A%,B%,C%:�18,0,63,23,17,3,&C0,0,0,0,0,0,0 � �(f$)>1� ěș&44AE2,51,�(�f$,1,1)),,((Kc%+2)*z%-Nc%)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),0,h%:ș&44AE2,51,�(�f$,2,1)),,((Kc%+2)*z%)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),0,h% �U�:ș&44AE2,51,�(�f$,1,1)),,((Kc%+2)*z%-Nc%/2)/(z%*2),((Lc%+2)*z%-Oc%)/(z%*2),0,h% �� �ș&2E,61,A%,B%,C% � � \��wa:v$=�o("Tune"):B$=�o("Beat"):C$=�o("Sound"):D$=�o("Chord"):Xc%=�:Yc%=�:Zc%=�:_c%=�:� o�ݤo(c$):�s%,A%,`c%,f%,b$,Uc%,c%:!g%=1:g%!4=Da%:ș&44AEA,0,"<MB"+c$+"Files$Dir>",g%,c$+"*",pa%�,s%:f%=!s%:`c%=!f%:Uc%=1:�`c%>0� �[f%+=4+16*`c%-16+�(c$):�:A%=f%:f%-=16:ȕ?A%>=�("0")�?A%<=�("9"):A%+=1:�:�?A%<32�?A%=127� &c%=(�(�c(f%+16)))+1:�c%>Uc%�Uc%=c% #� ,`c%-=1:�`c%=0 G� Gș&44AC3,,s%:=c$+�(Uc%) kJ��ua:�A%,a$,ad%,bd%:ad%=�:bd%=�:ș&20023,G$,h%,-1,0,0�,,A%:�A%<0�bd%=� �9ș&20023,"MBBeatFiles$Dir",h%,-1,0,0�,,A%:�A%<0�ad%=� ��ad%�bd%�� ��(�ad%)�(�bd%)� �P�ya("Please insert a disc containing !MBInsts and !MBFiles into drive 0 ",3) ��:�ad%� �C�ya("Please insert a disc containing !MBFiles into drive 0 ",1) �E�:�ya("Please insert a disc containing !MBInsts into drive 0 ",2) �� �� �� !\��ya(M$,F%):�:!h%=0:$(h%+4)=M$+�0:ș&400DF,h%,3+2^4,"Message from MusicBox"�,A%:�A%<>1�� !: ȎF%� !C*�1:ș&20008,17,"ADFS::0.$.!MBFiles"�A% !^&�2:ș&8,17,"ADFS::0.$.!MBInsts"�A% !pP�3:ș&20008,17,"ADFS::0.$.!MBFiles"�A%:�A%=2�ș&8,17,"ADFS::0.$.!MBInsts"�A% !�� !�p�A%=2:ș&40245,"0",h%:a$="ADFS::":A%=0:ȕA%<12�?(h%+A%+22)>32:a$+=�(?(h%+A%+22)):A%+=1:�:a$+=".$":�(F%�1)=1� !��("*SET MBTuneFiles$Dir "+a$+".!MBFiles.Tunes"):�("*SET MBBeatFiles$Dir "+a$+".!MBFiles.Beats"):�("*SET MBChordFiles$Dir "+a$+".!MBFiles.Chords"):�("*SET MBSoundFiles$Dir "+a$+".!MBFiles.Sounds") "� "�(F%�2)=2� "��("*SET MBInstruments$Dir "+a$+".!MBInsts.Instrumnts"):�("*SET MBInstrumentSprites$Dir "+a$+".!MBInsts.Sprites"):�("*SET MBInstrumentSprites22$Dir "+a$+".!MBInsts.Sprites22") "?� "?� "H���na(e$):�cd%,dd%,ed%,f%,fd%:gd%=3:�f%(gd%,4):fd%=0:cd%=4096:hd%=5120+2024:�dd% hd%:id%=dd%:ș&44AC1,,pa%,cd%+20�,i%:ed%=!i%:i%=ed%+20:ș&8,17,e$�ja%:�ja%<>1��b("Template file not found.",�):� #�Uș&400D9,,e$:�za:�Aa:�Ba:�Ca:�Da:�Ea:�Fa:�Ga:�Ha:�Ia:�Ja:�Ka:ș&400DA:jd%=0:�La:� $R;��za:�f("info"):ș&400C1,,i%�kd%:ș&44AD0,kd%,9,T$+�0:� %&��Aa:�f("Topo"):ș&400C1,,i%�ld%:� %3���Ba:�f%:�f("LdSv"):md%=1:nd%=3:od%=4:pd%=5:qd%=6:f%=88+i%+md%*32:rd%=(!f%+f%!8)/2-1:sd%=(f%!4+f%!12)/2+2:td%=f%!12-f%!4-16:ud%=f%!8-f%!0-8-48:ș&400C1,,i%�vd%:� &&L��Ma:�f("List"):�wd% 32:ș&44AC7,32,i%+88,wd%:i%!84=0:ș&400C1,,i%�xd%:� &nD��Ja:�f("Copy"):yd%=4:zd%=5:Ad%=6:Bd%=7:Cd%=8:ș&400C1,,i%�Dd%:� &�8��Ia:�f("Ques"):Ed%=2:Fd%=3:Gd%=1:ș&400C1,,i%�Hd%:� 'X���Ga:�f("ConfTune"):Id%=22:Jd%=25:Kd%=28:Ld%=31:Md%=37:Nd%=38:ș&400C1,,i%�Od%:�f("ConfStart"):Pd%=16:Qd%=17:Rd%=18:Sd%=19:Td%=20:Ud%=21:Vd%=22:Wd%=23:Xd%=24:Yd%=29:ș&400C1,,i%�`%:�f("ConfGlobal"):Zd%=23:_d%=24:`d%=25 (��ae%=26:be%=28:ce%=30:de%=11:ee%=32:fe%=35:ge%=38:he%=40:ie%=41:je%=42:ke%=43:le%=44:me%=45:ne%=47:oe%=49:pe%=51:qe%=53:re%=55:se%=57:te%=59:ue%=61:ve%=63:we%=65:ș&400C1,,i%�m%:xe%=3:ye%=4:ze%=5:Ae%=6:Be%=7:Ce%=8:De%=9 )Ee%=10:Fe%=11:�f("ConfBeat"):Ge%=23:He%=26:Ie%=29:Je%=32:Ke%=36:Le%=37:ș&400C1,,i%�Me%:�f("ConfLdSv"):Ne%=14:Oe%=15:Pe%=16:Qe%=17:Re%=18:Se%=19:Te%=20:Ue%=22:Ve%=23:ș&400C1,,i%�We%:� *����Ca:�Xe%,Ye%,Ze%,_e%,`e%,af%,S%,bf%,cf%,X%,Y%,A%,f%:�f("SndB"):df%=15:ef%=16:ff%=4:gf%=5:hf%=6:if%=7:jf%=8:kf%=0:lf%=i%!84-2:mf%=lf%+_b%*Zb%:nf%=14:of%=11:pf%=9:qf%=10:rf%=18:sf%=19:tf%=21:uf%=12:vf%=13:wf%=20 ,h�f%=i%+88+32*pf%:d%(0,0)=f%!0:d%(0,1)=f%!4:d%(0,2)=f%!8:d%(0,3)=f%!12:ș&44ADD,5+256,i%,pf%,1:f%=i%+88+32*lf%:Xe%=f%!16:af%=f%!8-f%!0:S%=f%!12-f%!4:cf%=f%!8-f%!40:bf%=f%!12-f%!44:Ye%=f%!0-bf%*(_b%-1) - �Ze%=f%!4-cf%*(Zb%-1):_e%=f%!8:`e%=f%!12:�Y%=0�Zb%-1:�X%=0�_b%-1:f%!0=Ye%+X%*bf%:f%!4=`e%-Y%*cf%-S%:f%!8=Ye%+X%*bf%+S%:f%!12=`e%-Y%*cf%:f%!16=Xe%:f%!20=lc%:f%!24=kc%+26*X%:f%!28=1:f%+=32:�,:f%=i%+88+32*kf%:!f%=Ye%-8:f%!4=Ze%-8:f%!8=_e%+8 -�tf%!12=`e%+8:i%!84=mf%:ș&44ADD,5+256,i%,nf%,1:ș&400C1,,i%�t%:�P(i%,t%):�A% 40:i%(0)=A%:�Q(A%,i%+88+32*nf%,t%):� .!$��Da:�ia%��f("Menu")��f("Menu2") .�.xf%=3:yf%=4:zf%=5:Af%=6:ș&400C1,,i%�Bf%:� .����Ea:�e%,A%,B%,f%,Cf%,Df%,bf%,cf%,Ef%:�f("Inst"):i%!64=U%:Ff%=1:Gf%=2:Hf%=0:If%=3:Jf%=4:Ef%=5:Kf%=If%+2*(Gc%-1):Lf%=Jf%+2*(Gc%-1):i%!84=Lf%+1:Cf%=i%+88+If%*32:Df%=i%+88+Ef%*32:bf%=!Df%-!Cf%:cf%=Df%!4-Cf%!4:Df%=i%+88+Jf%*32 0X�Cf%=i%+88+If%*32:f%=Cf%:�A% (26+21)*Gc%:�e%=0�Gc%-1:!f%=!Cf%+bf%*(e%�3):f%!4=Cf%!4+cf%*(e%�3):f%!8=Cf%!8+bf%*(e%�3):f%!12=Cf%!12+cf%*(e%�3):f%!16=Cf%!16:f%!20=lc%:f%!24=A%:f%!28=1:$A%="S"+a$(e%)+",p"+a$(e%)+�0:A%+=26:f%+=32 0��!f%=!Df%+bf%*(e%�3):f%!4=Df%!4+cf%*(e%�3):f%!8=Df%!8+bf%*(e%�3):f%!12=Df%!12+cf%*(e%�3):f%!16=Df%!16:f%!20=A%:f%!24=0:f%!28=21:$A%=b$(e%)+�0:A%+=21:f%+=32:�:f%=i%+88+Ff%*32:A%=!Cf%+bf%*3:!f%=!f%-f%!8+A%-8:f%!8=A%-8 1x�A%=Cf%!4+cf%*((Gc%-3)�3)-4:B%=f%!12-f%!4:f%!12=A%-4:f%!4=A%-B%-4:Cf%=f%:f%=i%+88+Gf%*32:A%=!Cf%:!f%=!f%-f%!8+A%-8:f%!8=A%-8:f%!12=Cf%!12:f%!4=Cf%!4:f%=Cf%:Cf%=i%+88+Hf%*32:Cf%!8=f%!8+8:Cf%!4=f%!4-8:i%!8=i%!0+f%!8+12 2,)i%!4=i%!12+f%!4-12:ș&400C1,,i%�Mf%:� 2Y���Fa:�f%,Nf%,Of%,e%,A%:�f("Comp"):Of%=0:Pf%=1:Qf%=2:Rf%=8:Sf%=9:Tf%=12:Uf%=13:Vf%=14:Wf%=15:Xf%=16:Yf%=17:Zf%=18:_f%=38:`f%=23:ag%=24:bg%=25:cg%=26:dg%=27:eg%=28:fg%=29:Nf%=30:gg%=31:hg%=32:ig%=43:jg%=35:kg%=36:lg%=37:mg%=39 4c�ng%=33:og%=40:pg%=41:qg%=42:f%=i%+88+32*ag%:d%(1,0)=f%!0:d%(1,1)=f%!4:d%(1,2)=f%!8:d%(1,3)=f%!12:ș&44ADD,5+256,i%,ag%,1:ș&44ADD,5+256,i%,Of%,1:f%=i%+88+Of%*32:rg%=f%!0:sg%=f%!4:tg%=f%!8:ug%=f%!12:A%=Yf%-Of%+1 5�ș&44ADD,5+256,i%,Of%,1:ș&44ADD,6+256,i%,ng%,0,2^2:�e%=Of%�Wf%:ș&44ADD,6+256,i%,e%,0,2^2:�:�vg% 4+32*A%:ș&44AC7,32*A%,i%+88+32*Of%,vg%+4:!vg%=A%:�e%=Of%�Yf%:ș&44ADD,5+256,i%,e%,1:�:ș&44ADD,5+256,i%,Nf%,1:ș&400C1,,i%�o% 5���P(i%,o%):�A% 40:�Q(A%,i%+88+32*Nf%,o%):i%(1)=A%:Qf%-=Of%:Rf%-=Of%:Sf%-=Of%:Tf%-=Of%:Vf%-=Of%:Wf%-=Of%:Xf%-=Of%:Yf%-=Of%:Of%=0:�e%=Qf%�Rf%:!(vg%+4+24+32*e%)=kc%+26*(e%-Qf%):�:� 6%���Ka:�f%,wg%,xg%,e%,A%:�f("RtmB"):xg%=0:yg%=1:zg%=2:Ag%=8:Bg%=9:Cg%=12:Dg%=13:Eg%=14:Fg%=15:Gg%=16:Hg%=17:Ig%=18:Jg%=42:Kg%=20:Lg%=21:Mg%=22:Ng%=24:Og%=25:Pg%=27:wg%=29:Qg%=31:Rg%=40:Sg%=34:Tg%=35:Ug%=36:Vg%=37:Wg%=38:Xg%=39 8S�Yg%=41:Zg%=28:_g%=30:f%=i%+88+32*Ng%:d%(3,0)=f%!0:d%(3,1)=f%!4:d%(3,2)=f%!8:d%(3,3)=f%!12:ș&44ADD,5+256,i%,Ng%,1:ș&44ADD,5+256,i%,xg%,1:f%=i%+88+xg%*32:`g%=f%!0:ah%=f%!4:bh%=f%!8-1:ch%=f%!12-1:ș&44ADA,g%,88:g%!0=`g%:g%!4=ah% 9�g%!8=bh%-2:g%!12=ch%-2:g%!20=Qb%:g%!24=-1:g%!28=&80000062:g%!32=&000702FF:g%!40=-Pb%:g%!44=-90000:g%!48=(bh%-`g%)-Pb%:g%!52=Qb%:g%!60=3<<12:g%!64=r%:ș&400C1,,g%�dh%:ș&44ADD,5+256,i%,xg%,1:A%=Gg%-xg%+1 9��ș&44ADD,6+256,i%,Ig%,0,2^2:�e%=xg%�Gg%:ș&44ADD,6+256,i%,e%,0,2^2:�:�eh% 4+32*A%:ș&44AC7,32*A%,i%+88+32*xg%,eh%+4:!eh%=A%:�e%=xg%�Gg%:ș&44ADD,5+256,i%,e%,1:�:ș&44ADD,5+256,i%,wg%,1:ș&400C1,,i%�k%:�P(i%,k%):�A% 40 :0��Q(A%,i%+88+32*wg%,k%):i%(3)=A%:zg%-=xg%:Ag%-=xg%:Bg%-=xg%:Cg%-=xg%:Eg%-=xg%:Fg%-=xg%:Gg%-=xg%:xg%=0:�e%=zg%�Ag%:!(eh%+4+24+32*e%)=kc%+26*(e%-zg%):�:� :�\��Ha:�f%,fh%,gh%,e%,A%:�f("CrdB"):hh%=30:ih%=2:jh%=8:kh%=7:�kh%<>7��0,"Reassemble MCode" ;t�lh%=9:mh%=lh%+kh%*1:nh%=lh%+kh%*2:oh%=30:ph%=32:qh%=33:rh%=34:sh%=35:th%=36:fh%=41:uh%=44:vh%=52:wh%=39:xh%=37:yh%=47:zh%=46:Ah%=40:Bh%=49:Ch%=50:Dh%=51:Eh%=42:Fh%=43:f%=i%+88+32*zh%:d%(2,0)=f%!0:d%(2,1)=f%!4:d%(2,2)=f%!8 <g�d%(2,3)=f%!12:ș&44ADD,5+256,i%,zh%,1:Gh%=mh%+kh%-ih%:�Hh% 4+32*Gh%:ș&44AC7,32*Gh%,i%+88+32*ih%,Hh%+4:!Hh%=Gh%:�e%=ih%�mh%-1:ș&44ADD,5+256,i%,e%,1:�:�e%=mh%�mh%+kh%-1:ș&44ADD,6+256,i%,e%,3<<12,&FFFFFFFF:� <��ș&44ADD,5+256,i%,fh%,1:ș&400C1,,i%�l%:�P(i%,l%):�A% 40:�Q(A%,i%+88+32*fh%,l%):i%(2)=A%:jh%-=ih%:lh%-=ih%:Ih%=Hh%+4+(mh%-ih%)*32:ih%-=ih%:�e%=ih%�jh%:!(Hh%+4+24+32*e%)=kc%+26*(e%-ih%):�:�e%=0�kh%-1:A%=h%(e%,0) =c`ș&44ADD,1+512,l%,e%+lh%,"s"+a$(A%-1)+",p"+a$(A%-1),,Hh%:�:�Jh% kh%*24:ș&44ADA,Jh%,kh%*24:� =�{��f(a$):�N%:$ed%=a$+�0:ș&400DB,,i%,id%,dd%+hd%,-1,ed%,0�,,id%,,,,N%:�N%=0��b("Template not found for "+a$+" window",�) > i%!64=U%:� >2I��Q(A%,B%,n%):!A%=n%:A%!4=B%!0:A%!8=B%!4+eb%:A%!12=B%!8:A%!16=B%!12:� >zm��P(i%,n%):f%(fd%,0)=n%:f%(fd%,1)=i%!8-i%!0:f%(fd%,2)=i%!12-i%!4:f%(fd%,3)=i%!16:f%(fd%,4)=i%!20:fd%+=1:� >����La:�Kh%,v%,Lh%,Mh%:v%=1024:�Mh% v%:�Kh%=8�10�2:P%=Mh%:L%=Mh%+v%:[OPT Kh%:.Nh%:EQUD Lh%-Nh%:EQUD vd%:EQUD Oh%-Ph%+8:EQUD0:.Ph%:EQUD0:EQUD%0111011100010010:EQUD rd%:EQUD sd%:EQUD0:EQUD0:EQUD Qh%:EQUD-1:.Oh%:EQUD k% ?��EQUD Lh%-Rh%:.Rh%:EQUD0:EQUD dh%:EQUD%0111011110011010:EQUD(`g%+bh%)/2:EQUD(ch%+ah%)/2+1:EQUD0:EQUD0:EQUD0:EQUD-1:EQUD-1:.Lh%:.Qh%:EQUD0:EQUD1:EQUD0:EQUD6:EQUD1:EQUD1-1:EQUD-1:EQUD-1:EQUD0:.Sh%:EQUD12 @��EQUD ud%:EQUD52:EQUD1:EQUD1:EQUD0:EQUD0:EQUD0:.Th%:EQUD0:EQUD-td%:EQUD ud%:EQUD0:EQUD ud%:EQUD1:EQUD&10000062:EQUB1:EQUB10:EQUB0:EQUB0:EQUS"Files"+�0:ALIGN: ]:�:� Aw���pa:�gc%,Uh%,ja%,b$,A%:ș&411C3�Uh%:Vh%=�("<MusicBoxD$Dir>.MCodeVars"):�a(Wh%):�a(Xh%):�a(Yh%):�a(Zh%):�a(_h%):�a(`h%):�a(ai%):�a(bi%):�a(ci%):�a(di%):�a(ei%):�a(fi%):�a(gi%):�a(hi%):�a(ii%):�a(ji%):�a(ki%):�a(li%):�a(mi%) B���a(ni%):�a(oi%):�a(pi%):�a(qi%):�a(ri%):�a(si%):�a(ti%):�a(ui%):�a(vi%):�a(wi%):�a(xi%):�a(yi%):�a(zi%):�a(Ai%):�a(Bi%):�a(Ci%):�a(Di%):�a(Ei%):�a(Fi%):�a(Gi%):�a(Hi%):�a(Ii%):�a(Ji%):�a(Ki%):�a(Li%):�a(Mi%):�a(Ni%):�a(Oi%) C���a(Pi%):�a(Qi%):�a(Ri%):�a(Si%):�a(Ti%):�a(Ui%):�a(Vi%):�a(Wi%):�a(Xi%):�a(Yi%):�a(Zi%):�a(_i%):�a(`i%):�a(aj%):�a(bj%):�a(cj%):�a(dj%):�a(ej%):�a(fj%):�a(gj%):�a(hj%):�a(ij%):�a(jj%):�a(kj%):�a(lj%):�a(mj%):�a(nj%):�a(oj%) D���a(pj%):�a(qj%):�a(rj%):�a(sj%):�a(tj%):�a(uj%):�a(vj%):�a(wj%):�a(xj%):�a(yj%):�a(zj%):�a(Aj%):�a(Bj%):�a(Cj%):�a(Dj%):�a(Ej%):�a(Fj%):�a(Gj%):�a(Hj%):�a(Ij%):�a(Jj%):�a(Kj%):�a(Lj%):�a(Mj%):�a(Nj%):�a(Oj%):�a(Pj%) E���a(Qj%):�a(Rj%):�a(Sj%):�a(Tj%):�a(Uj%):�a(Vj%):�a(Wj%):�a(Xj%):�a(Yj%):�a(Zj%):�a(_j%):�a(`j%):�a(ak%):�a(bk%):�a(ck%):�a(dk%):�#Vh%:Wh%!32=kd%:!li%=jc%:!mi%=W%*12:!Ci%=vg%:Gi%!0=rg%:Gi%!4=sg%:Gi%!8=tg%:Gi%!12=ug% Fl�Ii%!0=rg%:Ii%!4=sg%-4:Ii%!8=tg%:Ii%!12=ug%+4:!Ji%=nc%:!Ki%=g%:fi%!0=rg%:fi%!4=sg%:fi%!8=tg%:fi%!12=ug%:!Ri%=Jh%-24:!Si%=Ih%-32:!Vi%=o%:!Wi%=l%:!Xi%=_%:!Yi%=Hc%:!Zi%=h%:!`i%=k%:!aj%=dh%:!cj%=U%:!fj%=oc%:!ij%=Cc% G2q!yj%=Ob%:!zj%=V%:!Aj%=Lb%:!Oj%=V%:!(Yh%+4*10)=_j%:!(Yh%+4*52)=`j%:!(Yh%+4*64)=ak%:!(Yh%+4*94)=bk%:Qh%!4=wj%:� G�"��a(�ek%):�#Vh%,ek%:ek%+=Uh%:� �
00000000 0d 09 be 08 dd f2 6b 61 0d 09 c7 0d 2a 54 55 4e |......ka....*TUN| 00000010 49 4e 47 20 30 0d 09 c7 ed c8 99 26 34 30 31 38 |ING 0......&4018| 00000020 37 2c 30 b8 79 61 25 3a 7a 61 25 3d a3 3a 41 61 |7,0.ya%:za%=.:Aa| 00000030 25 3d a3 3a 42 61 25 3d a3 3a 43 61 25 3d a3 3a |%=.:Ba%=.:Ca%=.:| 00000040 44 61 25 3d 26 42 43 37 3a 45 61 25 3d 34 3a 46 |Da%=&BC7:Ea%=4:F| 00000050 61 25 3d 33 3a 47 61 25 3d 32 3a 48 61 25 3d 31 |a%=3:Ga%=2:Ha%=1| 00000060 3a 73 61 25 3d 30 3a 77 25 3d 2d 31 3a 49 61 25 |:sa%=0:w%=-1:Ia%| 00000070 3d a3 3a 71 61 25 3d a3 3a 4a 61 25 3d 30 3a 4b |=.:qa%=.:Ja%=0:K| 00000080 61 25 3d a3 3a 4c 61 25 3d a3 3a 4d 61 25 3d 26 |a%=.:La%=.:Ma%=&| 00000090 38 31 30 30 31 3a 4e 61 25 3d 26 38 31 30 30 30 |81001:Na%=&81000| 000000a0 3a 4f 61 25 3d 4d 61 25 3a 76 61 25 3d a3 3a 50 |:Oa%=Ma%:va%=.:P| 000000b0 61 25 3d a3 3a 51 61 25 3d a3 3a 52 61 25 3d a3 |a%=.:Qa%=.:Ra%=.| 000000c0 3a 53 61 25 3d a3 3a 54 61 25 3d a3 3a 55 61 25 |:Sa%=.:Ta%=.:Ua%| 000000d0 3d 30 3a 56 61 25 3d 32 35 36 3a c8 99 26 38 2c |=0:Va%=256:..&8,| 000000e0 31 37 2c 22 3c 4d 75 73 69 63 42 6f 78 44 24 44 |17,"<MusicBoxD$D| 000000f0 69 72 3e 2e 43 6f 6e 66 69 67 22 b8 2c 2c 2c 2c |ir>.Config".,,,,| 00000100 76 25 0d 0a cc f0 de 65 25 28 34 2c 56 61 25 20 |v%.....e%(4,Va% | 00000110 2c 33 29 3a de 6a 25 28 33 29 3a de 67 25 28 33 |,3):.j%(3):.g%(3| 00000120 29 3a 67 25 28 29 3d 2d 31 3a c8 99 26 34 34 41 |):g%()=-1:..&44A| 00000130 43 31 2c 2c 70 61 25 2c 32 30 34 38 b8 2c 57 61 |C1,,pa%,2048.,Wa| 00000140 25 3a 58 61 25 3d a3 3a 59 61 25 3d b9 3a 5a 61 |%:Xa%=.:Ya%=.:Za| 00000150 25 3d b9 3a 5f 61 25 3d 30 3a 60 61 25 3d 2d 31 |%=.:_a%=0:`a%=-1| 00000160 3a 61 62 25 3d a3 3a 62 62 25 3d a3 3a de 69 25 |:ab%=.:bb%=.:.i%| 00000170 28 33 29 3a 63 62 25 3d 36 37 2a 32 3a 64 62 25 |(3):cb%=67*2:db%| 00000180 3d 36 36 2a 32 3a 65 62 25 3d 35 36 3a 66 62 25 |=66*2:eb%=56:fb%| 00000190 3d 33 30 3a 67 62 25 3d 33 32 2a 32 3a 68 62 25 |=30:gb%=32*2:hb%| 000001a0 3d 33 32 2a 32 2f 34 3a 51 25 3d 33 32 2a 32 3a |=32*2/4:Q%=32*2:| 000001b0 69 62 25 3d 32 2a 34 3a 6a 62 25 3d 31 3a c8 99 |ib%=2*4:jb%=1:..| 000001c0 26 34 31 31 43 30 2c 28 21 57 61 25 2b 32 30 34 |&411C0,(!Wa%+204| 000001d0 38 2d 76 25 29 3a c8 99 26 34 30 38 38 30 2c 22 |8-v%):..&40880,"| 000001e0 3c 4d 75 73 69 63 42 6f 78 44 24 44 69 72 3e 2e |<MusicBoxD$Dir>.| 000001f0 34 22 0d 0b ad aa 6b 62 25 3d 51 25 2a 69 62 25 |4"....kb%=Q%*ib%| 00000200 3a 6c 62 25 3d 6b 62 25 2a 6a 62 25 3a 6d 62 25 |:lb%=kb%*jb%:mb%| 00000210 3d 69 62 25 2a 6a 62 25 3a 6e 62 25 3d 51 25 2a |=ib%*jb%:nb%=Q%*| 00000220 69 62 25 2f 32 3a 6f 62 25 3d 32 2a 6d 62 25 2f |ib%/2:ob%=2*mb%/| 00000230 69 62 25 3a 70 62 25 3d 38 30 3a 71 62 25 3d 31 |ib%:pb%=80:qb%=1| 00000240 32 35 3a 72 62 25 3d 31 33 30 3a 73 62 25 3d 30 |25:rb%=130:sb%=0| 00000250 3a 74 62 25 3d 30 3a 75 62 25 3d 2d 31 3a 21 75 |:tb%=0:ub%=-1:!u| 00000260 61 25 3d 31 3a c8 99 26 37 2c 31 34 2c 75 61 25 |a%=1:..&7,14,ua%| 00000270 3a e7 3f 75 61 25 3d 26 39 35 8c c8 99 26 34 34 |:.?ua%=&95...&44| 00000280 41 44 43 2c 28 21 57 61 25 2b 32 30 34 38 2d 76 |ADC,(!Wa%+2048-v| 00000290 25 2b 34 29 2c 21 57 61 25 b8 76 25 0d 0c 2b 80 |%+4),!Wa%.v%..+.| 000002a0 76 62 25 3d 32 34 2a 32 30 3a 57 25 3d 31 30 30 |vb%=24*20:W%=100| 000002b0 3a 4b 25 3d 34 30 3a 77 62 25 3d 31 38 3a 64 24 |:K%=40:wb%=18:d$| 000002c0 3d 22 73 3f 22 3a 7a 24 3d 22 73 3f 22 3a 78 62 |="s?":z$="s?":xb| 000002d0 25 3d 51 25 2f 32 3a 79 62 25 3d a3 3a 7a 62 25 |%=Q%/2:yb%=.:zb%| 000002e0 3d a3 3a 41 62 25 3d a3 3a 42 62 25 3d 31 3a 43 |=.:Ab%=.:Bb%=1:C| 000002f0 62 25 3d 32 3a 44 62 25 3d 32 3a 45 62 25 3d 2d |b%=2:Db%=2:Eb%=-| 00000300 31 3a e7 3f 75 61 25 3d 26 39 35 8c c8 99 26 31 |1:.?ua%=&95...&1| 00000310 45 2c 31 31 2c 21 57 61 25 2c 76 25 0d 0c b2 e0 |E,11,!Wa%,v%....| 00000320 46 62 25 3d a3 3a 47 62 25 3d 31 3a 48 62 25 3d |Fb%=.:Gb%=1:Hb%=| 00000330 31 3a 49 62 25 3d 31 3a 4a 62 25 3d a3 3a 4b 62 |1:Ib%=1:Jb%=.:Kb| 00000340 25 3d a3 3a 4c 62 25 3d 31 30 3a 4d 62 25 3d 34 |%=.:Lb%=10:Mb%=4| 00000350 30 3a 4d 25 3d 32 34 3a 4e 62 25 3d 4d 62 25 2a |0:M%=24:Nb%=Mb%*| 00000360 4d 25 3a 4f 25 3d 34 3a 4f 62 25 3d 34 2a 34 30 |M%:O%=4:Ob%=4*40| 00000370 3a 50 62 25 3d 35 32 3a 51 62 25 3d 35 32 3a 52 |:Pb%=52:Qb%=52:R| 00000380 62 25 3d 35 32 3a 53 62 25 3d 31 30 30 3a 54 62 |b%=52:Sb%=100:Tb| 00000390 25 3d 34 30 3a 55 62 25 3d a3 3a de 56 25 20 53 |%=40:Ub%=.:.V% S| 000003a0 62 25 2a 4d 25 2a 38 3a c8 99 26 34 34 41 44 41 |b%*M%*8:..&44ADA| 000003b0 2c 56 25 2c 53 62 25 2a 4d 25 2a 38 3a c8 99 26 |,V%,Sb%*M%*8:..&| 000003c0 34 34 41 43 33 2c 2c 57 61 25 3a 56 62 25 3d 30 |44AC3,,Wa%:Vb%=0| 000003d0 3a 57 62 25 3d 32 3a 58 62 25 3d 26 46 46 3a 59 |:Wb%=2:Xb%=&FF:Y| 000003e0 62 25 3d 26 31 37 46 3a 5a 62 25 3d 31 31 3a 5f |b%=&17F:Zb%=11:_| 000003f0 62 25 3d 37 3a 58 24 3d 22 73 3f 22 0d 0d c9 d3 |b%=7:X$="s?"....| 00000400 60 62 25 3d 31 38 2a 32 3a 61 63 25 3d 31 38 3a |`b%=18*2:ac%=18:| 00000410 62 63 25 3d 70 61 25 3a 63 63 25 3d 2d 31 3a 64 |bc%=pa%:cc%=-1:d| 00000420 63 25 3d 31 3a 65 63 25 3d 2d 31 3a de 61 25 28 |c%=1:ec%=-1:.a%(| 00000430 5a 62 25 2d 31 29 3a de 6b 25 28 32 30 29 3a de |Zb%-1):.k%(20):.| 00000440 68 25 28 37 2c 30 29 3a de 66 63 25 20 67 63 25 |h%(7,0):.fc% gc%| 00000450 3a 68 25 28 29 3d 32 3a de 64 25 28 33 2c 33 29 |:h%()=2:.d%(3,3)| 00000460 3a de 68 63 25 20 31 36 3a de 69 63 25 20 36 34 |:.hc% 16:.ic% 64| 00000470 2a 34 3a de 6a 63 25 20 76 62 25 2a 31 32 2b 31 |*4:.jc% vb%*12+1| 00000480 32 2a 32 3a c8 99 26 34 34 41 44 41 2c 6a 63 25 |2*2:..&44ADA,jc%| 00000490 2c 76 62 25 2a 31 32 2b 31 32 2a 32 3a 6a 63 25 |,vb%*12+12*2:jc%| 000004a0 2b 3d 31 32 3a de 6b 63 25 20 32 36 2a 37 2b 31 |+=12:.kc% 26*7+1| 000004b0 3a 6c 63 25 3d 6b 63 25 2b 32 36 2a 37 3a 3f 6c |:lc%=kc%+26*7:?l| 000004c0 63 25 3d 30 3a e7 3f 75 61 25 3d 26 39 35 8c 0d |c%=0:.?ua%=&95..| 000004d0 0e a1 14 c8 99 26 34 31 31 43 32 2c 66 63 25 3a |.....&411C2,fc%:| 000004e0 f2 73 61 0d 0e bc 05 cd 0d 0e bc 0e de 6d 63 25 |.sa..........mc%| 000004f0 20 32 35 36 3a e1 0d 0e ce 3a dd f2 6c 61 3a c8 | 256:....:..la:.| 00000500 99 26 34 34 41 45 32 2c 32 35 36 2c 70 61 25 2c |.&44AE2,256,pa%,| 00000510 30 b8 2c 6e 63 25 3a c8 99 26 34 34 41 45 32 2c |0.,nc%:..&44AE2,| 00000520 32 35 36 2c 70 61 25 2c 30 b8 2c 6f 63 25 3a e1 |256,pa%,0.,oc%:.| 00000530 0d 0e fb d4 dd f2 68 61 3a ea 41 25 3a 70 63 25 |......ha:.A%:pc%| 00000540 3d a3 3a 67 63 25 3d 28 32 5e 39 29 2a 28 35 2a |=.:gc%=(2^9)*(5*| 00000550 33 2b 34 29 3a 71 63 25 3d 30 3a 72 63 25 3d 2d |3+4):qc%=0:rc%=-| 00000560 31 3a 73 63 25 3d 2d 31 3a 74 63 25 3d a3 3a 75 |1:sc%=-1:tc%=.:u| 00000570 63 25 3d a3 3a 76 63 25 3d a3 3a 6f 24 3d 22 4d |c%=.:vc%=.:o$="M| 00000580 75 73 69 63 20 42 6f 78 20 44 65 6d 6f 22 3a 53 |usic Box Demo":S| 00000590 24 3d 22 4d 75 73 69 63 42 6f 78 44 22 3a 79 24 |$="MusicBoxD":y$| 000005a0 3d 6f 24 3a 6b 24 3d 22 3c 22 2b 53 24 2b 22 24 |=o$:k$="<"+S$+"$| 000005b0 44 69 72 3e 22 3a 6e 24 3d 22 3c 4d 42 49 6e 73 |Dir>":n$="<MBIns| 000005c0 74 72 75 6d 65 6e 74 73 24 44 69 72 3e 22 3a 47 |truments$Dir>":G| 000005d0 24 3d 22 4d 42 49 6e 73 74 72 75 6d 65 6e 74 73 |$="MBInstruments| 000005e0 24 44 69 72 22 3a 48 24 3d 22 3c 4d 42 49 6e 73 |$Dir":H$="<MBIns| 000005f0 74 72 75 6d 65 6e 74 53 70 72 69 74 65 73 24 44 |trumentSprites$D| 00000600 69 72 3e 22 0d 0f 9d e1 49 24 3d 22 3c 4d 42 49 |ir>"....I$="<MBI| 00000610 6e 73 74 72 75 6d 65 6e 74 53 70 72 69 74 65 73 |nstrumentSprites| 00000620 32 32 24 44 69 72 3e 22 3a 4a 24 3d 22 3c 52 4f |22$Dir>":J$="<RO| 00000630 4d 49 6e 73 74 72 75 6d 65 6e 74 53 70 72 69 74 |MInstrumentSprit| 00000640 65 73 24 44 69 72 3e 22 3a 4b 24 3d 22 3c 52 4f |es$Dir>":K$="<RO| 00000650 4d 49 6e 73 74 72 75 6d 65 6e 74 53 70 72 69 74 |MInstrumentSprit| 00000660 65 73 32 32 24 44 69 72 3e 22 3a 54 24 3d 22 31 |es22$Dir>":T$="1| 00000670 2e 32 35 44 20 28 32 36 20 4e 6f 76 20 31 39 39 |.25D (26 Nov 199| 00000680 34 29 22 3a 77 63 25 3d 2d 31 3a 78 63 25 3d 2d |4)":wc%=-1:xc%=-| 00000690 31 3a 79 63 25 3d 30 3a c8 99 26 34 30 30 43 30 |1:yc%=0:..&400C0| 000006a0 2c 32 30 30 2c 26 34 42 35 33 34 31 35 34 2c 6f |,200,&4B534154,o| 000006b0 24 b8 2c 63 61 25 3a de 41 25 20 32 35 3a 24 41 |$.,ca%:.A% 25:$A| 000006c0 25 3d 22 53 21 4d 75 73 69 63 42 6f 78 44 2c 21 |%="S!MusicBoxD,!| 000006d0 4d 75 73 69 63 42 6f 78 45 22 2b bd 30 3a 41 25 |MusicBoxE"+.0:A%| 000006e0 3f 32 35 3d 30 0d 10 12 6b 21 68 25 3d 2d 31 3a |?25=0...k!h%=-1:| 000006f0 68 25 21 34 3d 30 3a 68 25 21 38 3d 30 3a 68 25 |h%!4=0:h%!8=0:h%| 00000700 21 31 32 3d 36 38 3a 68 25 21 31 36 3d 36 38 3a |!12=68:h%!16=68:| 00000710 68 25 21 32 30 3d 26 33 31 31 42 2b 32 5e 32 31 |h%!20=&311B+2^21| 00000720 3a 68 25 21 32 34 3d 41 25 2b 32 35 3a 68 25 21 |:h%!24=A%+25:h%!| 00000730 32 38 3d 41 25 3a 68 25 21 33 32 3d 31 3a c8 99 |28=A%:h%!32=1:..| 00000740 26 34 30 30 43 32 2c 2c 68 25 b8 7a 63 25 3a e1 |&400C2,,h%.zc%:.| 00000750 0d 10 51 c6 dd f2 73 61 3a ea 65 25 2c 41 63 25 |..Q...sa:.e%,Ac%| 00000760 2c 41 2c 42 63 25 3a 41 63 25 3d 33 30 3a de 43 |,A,Bc%:Ac%=30:.C| 00000770 63 25 20 28 51 25 2a 4d 25 2a 32 2b 31 29 2a 38 |c% (Q%*M%*2+1)*8| 00000780 2a 28 6a 62 25 2b 31 29 3a e3 42 63 25 3d 30 b8 |*(jb%+1):.Bc%=0.| 00000790 6a 62 25 3a e3 65 25 3d 30 b8 6b 62 25 2a 38 88 |jb%:.e%=0.kb%*8.| 000007a0 38 3a 41 3d 65 25 2a 33 36 30 2f 28 6b 62 25 2a |8:A=e%*360/(kb%*| 000007b0 38 29 3a 41 3d b2 28 b5 28 b2 28 41 29 29 2a 41 |8):A=.(.(.(A))*A| 000007c0 63 25 2b 39 30 29 3a 21 28 43 63 25 2b 65 25 2b |c%+90):!(Cc%+e%+| 000007d0 6b 62 25 2a 38 2a 42 63 25 29 3d 28 9b 28 41 29 |kb%*8*Bc%)=(.(A)| 000007e0 2a 72 62 25 29 2a 32 5e 31 30 3a 21 28 43 63 25 |*rb%)*2^10:!(Cc%| 000007f0 2b 65 25 2b 6b 62 25 2a 38 2a 42 63 25 2b 34 29 |+e%+kb%*8*Bc%+4)| 00000800 3d 28 b5 28 41 29 2a 72 62 25 29 2a 32 5e 31 30 |=(.(A)*rb%)*2^10| 00000810 3a ed 3a ed 3a e1 0d 10 e1 65 dd f2 6d 61 3a ea |:.:.:....e..ma:.| 00000820 41 25 2c 47 25 2c 44 63 25 2c 45 63 25 2c 46 63 |A%,G%,Dc%,Ec%,Fc| 00000830 25 2c 42 25 2c 62 24 2c 65 25 2c 41 24 3a de 62 |%,B%,b$,e%,A$:.b| 00000840 24 28 65 61 25 2d 31 29 3a de 63 25 28 65 61 25 |$(ea%-1):.c%(ea%| 00000850 2d 31 29 3a de 61 24 28 65 61 25 2d 31 29 3a 46 |-1):.a$(ea%-1):F| 00000860 63 25 3d a3 3a e7 6a 24 3d 22 32 32 22 8c 72 24 |c%=.:.j$="22".r$| 00000870 3d 22 22 8b 72 24 3d 22 32 32 22 0d 12 01 26 e7 |="".r$="22"...&.| 00000880 a4 67 28 6b 24 2b 22 2e 44 65 66 61 75 6c 74 73 |.g(k$+".Defaults| 00000890 22 2b 6a 24 29 8c 41 24 3d 6a 24 8b 41 24 3d 72 |"+j$).A$=j$.A$=r| 000008a0 24 0d 12 0a 6c c8 99 26 34 31 31 43 30 2c 2c 70 |$...l..&411C0,,p| 000008b0 61 25 2c 6b 24 2b 22 2e 44 65 66 61 75 6c 74 73 |a%,k$+".Defaults| 000008c0 22 2b 41 24 b8 2c 44 63 25 3a c8 99 26 34 31 31 |"+A$.,Dc%:..&411| 000008d0 43 30 2c 2c 70 61 25 2c 6b 24 2b 22 2e 44 65 66 |C0,,pa%,k$+".Def| 000008e0 61 75 6c 74 73 22 2b 41 24 b8 2c 72 25 3a e7 a4 |aults"+A$.,r%:..| 000008f0 67 28 6b 24 2b 22 2e 54 6f 6f 6c 73 22 2b 6a 24 |g(k$+".Tools"+j$| 00000900 29 8c 41 24 3d 6a 24 8b 41 24 3d 72 24 0d 12 2e |).A$=j$.A$=r$...| 00000910 91 c8 99 26 34 31 31 43 31 2c 2c 72 25 2c 6b 24 |...&411C1,,r%,k$| 00000920 2b 22 2e 54 6f 6f 6c 73 22 2b 41 24 3a c8 99 26 |+".Tools"+A$:..&| 00000930 34 34 41 45 32 2c 32 35 36 2c 70 61 25 2c 30 b8 |44AE2,256,pa%,0.| 00000940 2c 47 25 3a 47 63 25 3d 30 3a 45 63 25 3d 30 3a |,G%:Gc%=0:Ec%=0:| 00000950 c8 99 26 32 30 30 32 33 2c 22 4d 42 52 4f 4d 24 |..&20023,"MBROM$| 00000960 49 6e 73 74 72 75 6d 65 6e 74 73 22 2c 68 25 2c |Instruments",h%,| 00000970 32 35 36 2c 30 2c 30 b8 2c 2c 41 25 3a 68 25 3f |256,0,0.,,A%:h%?| 00000980 41 25 3d 30 3a 68 25 3f 32 35 35 3d 30 3a 41 24 |A%=0:h%?255=0:A$| 00000990 3d a4 63 28 68 25 29 3a e7 41 25 3e 30 8c 0d 12 |=.c(h%):.A%>0...| 000009a0 91 50 65 25 3d 31 3a c8 95 65 25 3c 41 25 2b 31 |.Pe%=1:..e%<A%+1| 000009b0 3a 62 24 3d 22 22 3a c8 95 97 28 c1 41 24 2c 65 |:b$="":...(.A$,e| 000009c0 25 2c 31 29 29 3e 33 32 3a 62 24 2b 3d c1 41 24 |%,1))>32:b$+=.A$| 000009d0 2c 65 25 2c 31 29 3a 65 25 2b 3d 31 3a ce 3a e7 |,e%,1):e%+=1:.:.| 000009e0 62 24 3c 3e 22 22 8c f2 74 61 28 62 24 29 0d 12 |b$<>""..ta(b$)..| 000009f0 d9 48 65 25 2b 3d 31 3a ce 3a f2 75 61 3a c8 99 |.He%+=1:.:.ua:..| 00000a00 26 32 30 30 32 33 2c 47 24 2c 68 25 2c 2d 31 2c |&20023,G$,h%,-1,| 00000a10 30 2c 30 b8 2c 2c 41 25 3a e7 41 25 3c 30 8c f2 |0,0.,,A%:.A%<0..| 00000a20 76 61 28 6e 24 2c 65 61 25 2d 32 2c 22 46 4e 56 |va(n$,ea%-2,"FNV| 00000a30 28 46 24 29 22 29 0d 13 06 c9 f2 77 61 3a 62 24 |(F$)").....wa:b$| 00000a40 28 47 63 25 29 3d 22 52 65 73 74 22 3a 63 25 28 |(Gc%)="Rest":c%(| 00000a50 47 63 25 29 3d 26 38 30 30 30 30 30 30 30 3a 61 |Gc%)=&80000000:a| 00000a60 24 28 47 63 25 29 3d 22 52 65 73 74 22 3a 47 63 |$(Gc%)="Rest":Gc| 00000a70 25 2b 3d 31 3a 41 25 3d a4 65 28 72 25 2c 22 52 |%+=1:A%=.e(r%,"R| 00000a80 65 73 74 22 2c 72 25 2c 22 6e 6f 6e 65 22 2c 22 |est",r%,"none","| 00000a90 70 6e 6f 6e 65 22 2c 22 73 6e 6f 6e 65 22 29 3a |pnone","snone"):| 00000aa0 41 25 3d a4 65 28 72 25 2c 22 3f 22 2c 72 25 2c |A%=.e(r%,"?",r%,| 00000ab0 22 75 6e 6b 6e 6f 77 6e 22 2c 22 70 75 6e 6b 6e |"unknown","punkn| 00000ac0 6f 77 6e 22 2c 22 73 75 6e 6b 6e 6f 77 6e 22 29 |own","sunknown")| 00000ad0 3a c8 99 26 36 34 41 45 32 2c 32 36 30 2c 44 63 |:..&64AE2,260,Dc| 00000ae0 25 2c 22 73 5a 22 2c 72 25 2c 22 73 70 72 69 6e |%,"sZ",r%,"sprin| 00000af0 74 69 6e 73 74 22 2b 61 24 2c 30 b8 3b 50 25 0d |tinst"+a$,0.;P%.| 00000b00 13 69 b6 f2 42 28 72 25 2c 22 73 70 72 69 6e 74 |.i..B(r%,"sprint| 00000b10 69 6e 73 74 22 2c 72 25 2c 22 73 70 72 69 6e 74 |inst",r%,"sprint| 00000b20 22 2c 31 29 3a c8 99 26 36 34 41 45 32 2c 32 35 |",1):..&64AE2,25| 00000b30 2c 72 25 2c 22 73 70 72 69 6e 74 22 3a e3 65 25 |,r%,"sprint":.e%| 00000b40 3d 31 b8 36 3a 41 25 3d a4 65 28 72 25 2c 22 74 |=1.6:A%=.e(r%,"t| 00000b50 22 2b c3 28 65 25 29 2c 72 25 2c 22 74 6f 6f 6c |"+.(e%),r%,"tool| 00000b60 22 2b c3 28 65 25 29 2c 22 70 74 6f 6f 6c 22 2b |"+.(e%),"ptool"+| 00000b70 c3 28 65 25 29 2c 22 2d 22 29 3a c8 99 26 36 34 |.(e%),"-"):..&64| 00000b80 41 45 32 2c 32 35 2c 72 25 2c 22 74 6f 6f 6c 22 |AE2,25,r%,"tool"| 00000b90 2b c3 28 65 25 29 3a c8 99 26 36 34 41 45 32 2c |+.(e%):..&64AE2,| 00000ba0 32 35 2c 72 25 2c 22 70 74 6f 6f 6c 22 2b c3 28 |25,r%,"ptool"+.(| 00000bb0 65 25 29 3a ed 0d 13 b1 aa 41 25 3d a4 65 28 72 |e%):.....A%=.e(r| 00000bc0 25 2c 22 73 70 65 61 6b 65 72 22 2c 72 25 2c 22 |%,"speaker",r%,"| 00000bd0 73 70 65 61 6b 22 2c 22 70 73 70 65 61 6b 22 2c |speak","pspeak",| 00000be0 22 2d 22 29 3a 41 25 3d a4 65 28 72 25 2c 22 6c |"-"):A%=.e(r%,"l| 00000bf0 6f 61 64 22 2c 72 25 2c 22 5f 6c 6f 61 64 22 2c |oad",r%,"_load",| 00000c00 22 5f 6c 6f 61 64 22 2c 22 2d 22 29 3a 41 25 3d |"_load","-"):A%=| 00000c10 a4 65 28 72 25 2c 22 73 61 76 65 22 2c 72 25 2c |.e(r%,"save",r%,| 00000c20 22 5f 73 61 76 65 22 2c 22 5f 73 61 76 65 22 2c |"_save","_save",| 00000c30 22 2d 22 29 3a 41 25 3d a4 65 28 72 25 2c 22 63 |"-"):A%=.e(r%,"c| 00000c40 6c 65 61 72 22 2c 72 25 2c 22 5f 63 6c 65 61 72 |lear",r%,"_clear| 00000c50 22 2c 22 5f 63 6c 65 61 72 22 2c 22 2d 22 29 0d |","_clear","-").| 00000c60 13 d5 c5 41 25 3d a4 65 28 72 25 2c 22 63 6f 70 |...A%=.e(r%,"cop| 00000c70 79 22 2c 72 25 2c 22 5f 63 6f 70 79 22 2c 22 5f |y",r%,"_copy","_| 00000c80 63 6f 70 79 22 2c 22 2d 22 29 3a 41 25 3d a4 65 |copy","-"):A%=.e| 00000c90 28 72 25 2c 22 79 65 73 22 2c 72 25 2c 22 5f 79 |(r%,"yes",r%,"_y| 00000ca0 65 73 22 2c 22 5f 79 65 73 22 2c 22 2d 22 29 3a |es","_yes","-"):| 00000cb0 41 25 3d a4 65 28 72 25 2c 22 6e 6f 22 2c 72 25 |A%=.e(r%,"no",r%| 00000cc0 2c 22 5f 6e 6f 22 2c 22 5f 6e 6f 22 2c 22 2d 22 |,"_no","_no","-"| 00000cd0 29 3a 41 25 3d a4 65 28 72 25 2c 22 50 72 69 6e |):A%=.e(r%,"Prin| 00000ce0 74 22 2c 72 25 2c 22 5f 70 72 69 6e 74 22 2c 22 |t",r%,"_print","| 00000cf0 5f 70 72 69 6e 74 22 2c 22 2d 22 29 3a 41 25 3d |_print","-"):A%=| 00000d00 a4 65 28 72 25 2c 22 53 6c 6f 77 22 2c 72 25 2c |.e(r%,"Slow",r%,| 00000d10 22 5f 53 6c 6f 77 22 2c 22 5f 53 6c 6f 77 22 2c |"_Slow","_Slow",| 00000d20 22 2d 22 29 0d 14 02 d4 41 25 3d a4 65 28 72 25 |"-")....A%=.e(r%| 00000d30 2c 22 46 61 73 74 22 2c 72 25 2c 22 5f 46 61 73 |,"Fast",r%,"_Fas| 00000d40 74 22 2c 22 5f 46 61 73 74 22 2c 22 2d 22 29 3a |t","_Fast","-"):| 00000d50 41 25 3d a4 65 28 72 25 2c 22 4f 6b 22 2c 72 25 |A%=.e(r%,"Ok",r%| 00000d60 2c 22 5f 4f 6b 22 2c 22 5f 4f 6b 22 2c 22 2d 22 |,"_Ok","_Ok","-"| 00000d70 29 3a c8 99 26 36 34 41 45 32 2c 32 35 2c 72 25 |):..&64AE2,25,r%| 00000d80 2c 22 5f 6f 6b 22 3a c8 99 26 36 34 41 45 32 2c |,"_ok":..&64AE2,| 00000d90 32 35 2c 72 25 2c 22 5f 73 61 76 65 22 3a c8 99 |25,r%,"_save":..| 00000da0 26 36 34 41 45 32 2c 32 35 2c 72 25 2c 22 5f 6c |&64AE2,25,r%,"_l| 00000db0 6f 61 64 22 3a c8 99 26 36 34 41 45 32 2c 32 35 |oad":..&64AE2,25| 00000dc0 2c 72 25 2c 22 5f 73 6c 6f 77 22 3a c8 99 26 36 |,r%,"_slow":..&6| 00000dd0 34 41 45 32 2c 32 35 2c 72 25 2c 22 5f 66 61 73 |4AE2,25,r%,"_fas| 00000de0 74 22 3a c8 99 26 36 34 41 45 32 2c 32 35 2c 72 |t":..&64AE2,25,r| 00000df0 25 2c 22 5f 79 65 73 22 0d 14 4a d2 c8 99 26 36 |%,"_yes"..J...&6| 00000e00 34 41 45 32 2c 32 35 2c 72 25 2c 22 5f 6e 6f 22 |4AE2,25,r%,"_no"| 00000e10 3a c8 99 26 36 34 41 45 32 2c 32 35 2c 72 25 2c |:..&64AE2,25,r%,| 00000e20 22 5f 70 72 69 6e 74 22 3a c8 99 26 36 34 41 45 |"_print":..&64AE| 00000e30 32 2c 32 35 2c 72 25 2c 22 5f 63 6f 70 79 22 3a |2,25,r%,"_copy":| 00000e40 c8 99 26 36 34 41 45 32 2c 32 35 2c 72 25 2c 22 |..&64AE2,25,r%,"| 00000e50 5f 63 6c 65 61 72 22 3a c8 99 26 36 34 41 45 32 |_clear":..&64AE2| 00000e60 2c 32 35 2c 72 25 2c 22 73 70 65 61 6b 22 3a c8 |,25,r%,"speak":.| 00000e70 99 26 36 34 41 45 32 2c 32 35 2c 72 25 2c 22 70 |.&64AE2,25,r%,"p| 00000e80 73 70 65 61 6b 22 3a c8 99 26 36 34 41 45 32 2c |speak":..&64AE2,| 00000e90 32 35 2c 72 25 2c 22 6e 6f 6e 65 22 3a c8 99 26 |25,r%,"none":..&| 00000ea0 36 34 41 45 32 2c 32 35 2c 72 25 2c 22 70 6e 6f |64AE2,25,r%,"pno| 00000eb0 6e 65 22 3a c8 99 26 36 34 41 45 32 2c 32 35 2c |ne":..&64AE2,25,| 00000ec0 72 25 2c 22 73 6e 6f 6e 65 22 0d 14 9b 8d c8 99 |r%,"snone"......| 00000ed0 26 36 34 41 45 32 2c 32 35 2c 72 25 2c 22 75 6e |&64AE2,25,r%,"un| 00000ee0 6b 6e 6f 77 6e 22 3a c8 99 26 36 34 41 45 32 2c |known":..&64AE2,| 00000ef0 32 35 2c 72 25 2c 22 70 75 6e 6b 6e 6f 77 6e 22 |25,r%,"punknown"| 00000f00 3a c8 99 26 36 34 41 45 32 2c 32 35 2c 72 25 2c |:..&64AE2,25,r%,| 00000f10 22 73 75 6e 6b 6e 6f 77 6e 22 3a c8 99 26 34 34 |"sunknown":..&44| 00000f20 41 43 33 2c 2c 47 25 3a c8 99 26 34 34 41 43 33 |AC3,,G%:..&44AC3| 00000f30 2c 2c 44 63 25 3a e7 a4 67 28 6b 24 2b 22 2e 53 |,,Dc%:..g(k$+".S| 00000f40 70 72 69 74 65 73 22 2b 6a 24 29 8c 41 24 3d 6a |prites"+j$).A$=j| 00000f50 24 8b 41 24 3d 72 24 0d 14 ec 65 e7 ac a4 67 28 |$.A$=r$...e...g(| 00000f60 6b 24 2b 22 2e 53 70 72 69 74 65 73 22 2b 41 24 |k$+".Sprites"+A$| 00000f70 29 8c f2 62 28 22 53 70 72 69 74 65 73 20 66 69 |)..b("Sprites fi| 00000f80 6c 65 20 6d 69 73 73 69 67 6e 20 66 72 6f 6d 20 |le missign from | 00000f90 69 6e 73 69 64 65 20 4d 75 73 69 63 42 6f 78 2e |inside MusicBox.| 00000fa0 20 53 6f 72 72 79 20 49 20 63 61 6e 27 74 20 63 | Sorry I can't c| 00000fb0 6f 6e 74 69 6e 75 65 2e 22 2c b9 29 0d 14 f5 44 |ontinue.",.)...D| 00000fc0 c8 99 26 34 31 31 43 31 2c 2c 72 25 2c 6b 24 2b |..&411C1,,r%,k$+| 00000fd0 22 2e 53 70 72 69 74 65 73 22 2b 41 24 b8 3b 41 |".Sprites"+A$.;A| 00000fe0 25 3a e7 a4 67 28 6b 24 2b 22 2e 4d 65 6e 75 22 |%:..g(k$+".Menu"| 00000ff0 2b 6a 24 29 8c 41 24 3d 6a 24 8b 41 24 3d 72 24 |+j$).A$=j$.A$=r$| 00001000 0d 15 07 30 e7 28 41 25 80 31 29 3d 30 80 69 61 |...0.(A%.1)=0.ia| 00001010 25 8c c8 99 26 34 31 31 43 31 2c 2c 72 25 2c 6b |%...&411C1,,r%,k| 00001020 24 2b 22 2e 4d 65 6e 75 22 2b 41 24 b8 3b 41 25 |$+".Menu"+A$.;A%| 00001030 0d 15 10 37 e7 28 41 25 80 31 29 8c f2 62 28 22 |...7.(A%.1)..b("| 00001040 4e 6f 74 20 65 6e 6f 75 67 68 20 6d 65 6d 6f 72 |Not enough memor| 00001050 79 20 74 6f 20 6c 6f 61 64 20 4d 75 73 69 63 42 |y to load MusicB| 00001060 6f 78 2e 22 2c b9 29 0d 15 19 ad 41 25 3d 21 72 |ox.",.)....A%=!r| 00001070 25 3a de 55 25 20 41 25 21 30 3a c8 99 26 34 34 |%:.U% A%!0:..&44| 00001080 41 43 37 2c 41 25 21 30 2c 41 25 2c 55 25 3a c8 |AC7,A%!0,A%,U%:.| 00001090 99 26 34 34 41 43 33 2c 2c 72 25 3a 72 25 3d 2d |.&44AC3,,r%:r%=-| 000010a0 31 3a c8 99 26 34 34 41 45 33 2c 31 2b 32 5e 31 |1:..&44AE3,1+2^1| 000010b0 31 2c 55 25 2c 22 53 3f 22 2c 77 62 25 2c 77 62 |1,U%,"S?",wb%,wb| 000010c0 25 2c 70 61 25 b8 2c 2c 5f 25 3a c8 99 26 34 34 |%,pa%.,,_%:..&44| 000010d0 41 45 33 2c 31 2b 32 5e 31 31 2c 55 25 2c 22 53 |AE3,1+2^11,U%,"S| 000010e0 3f 22 2c 77 62 25 2c 77 62 25 2c 70 61 25 b8 2c |?",wb%,wb%,pa%.,| 000010f0 2c 48 63 25 3a c8 99 26 34 30 38 38 30 2c 22 3c |,Hc%:..&40880,"<| 00001100 4d 75 73 69 63 42 6f 78 44 24 44 69 72 3e 2e 31 |MusicBoxD$Dir>.1| 00001110 31 22 3a e1 0d 15 73 1f dd a4 56 28 61 24 29 3a |1":...s...V(a$):| 00001120 ea 50 25 2c 41 25 2c 42 25 3a e7 47 63 25 3c 65 |.P%,A%,B%:.Gc%<e| 00001130 61 25 8c 0d 16 54 22 62 24 28 47 63 25 29 3d 61 |a%...T"b$(Gc%)=a| 00001140 24 3a 63 25 28 47 63 25 29 3d 30 3a e7 6a 24 3d |$:c%(Gc%)=0:.j$=| 00001150 22 32 32 22 8c 0d 16 6f 3f c8 99 26 36 34 41 45 |"22"...o?..&64AE| 00001160 32 2c 32 35 38 2c 47 25 2c 48 24 2b 22 2e 22 2b |2,258,G%,H$+"."+| 00001170 61 24 b8 3b 50 25 3a c8 99 26 36 34 41 45 32 2c |a$.;P%:..&64AE2,| 00001180 32 35 38 2c 47 25 2c 49 24 2b 22 2e 22 2b 61 24 |258,G%,I$+"."+a$| 00001190 b8 3b 50 25 0d 16 8a 41 cc 3a c8 99 26 36 34 41 |.;P%...A.:..&64A| 000011a0 45 32 2c 32 35 38 2c 47 25 2c 49 24 2b 22 2e 22 |E2,258,G%,I$+"."| 000011b0 2b 61 24 b8 3b 50 25 3a c8 99 26 36 34 41 45 32 |+a$.;P%:..&64AE2| 000011c0 2c 32 35 38 2c 47 25 2c 48 24 2b 22 2e 22 2b 61 |,258,G%,H$+"."+a| 000011d0 24 b8 3b 50 25 0d 16 a5 05 cd 0d 16 a5 33 41 25 |$.;P%........3A%| 000011e0 3d a4 65 28 72 25 2c 61 24 2c 47 25 2c 22 4e 6f |=.e(r%,a$,G%,"No| 000011f0 72 6d 61 6c 22 2c 22 50 6c 61 79 69 6e 67 22 2c |rmal","Playing",| 00001200 22 53 6d 61 6c 6c 22 29 3a e7 41 25 8c 0d 16 db |"Small"):.A%....| 00001210 13 61 24 28 47 63 25 29 3d c2 61 24 2c 31 31 29 |.a$(Gc%)=.a$,11)| 00001220 0d 16 ed 11 cc 3a 61 24 28 47 63 25 29 3d 22 3f |.....:a$(Gc%)="?| 00001230 22 0d 16 ff 05 cd 0d 16 ff 52 c8 99 26 36 34 41 |"........R..&64A| 00001240 45 32 2c 32 35 2c 47 25 2c 22 4e 6f 72 6d 61 6c |E2,25,G%,"Normal| 00001250 22 3a c8 99 26 36 34 41 45 32 2c 32 35 2c 47 25 |":..&64AE2,25,G%| 00001260 2c 22 50 6c 61 79 69 6e 67 22 3a c8 99 26 36 34 |,"Playing":..&64| 00001270 41 45 32 2c 32 35 2c 47 25 2c 22 53 6d 61 6c 6c |AE2,25,G%,"Small| 00001280 22 3a 47 63 25 2b 3d 31 0d 17 2c 05 cd 0d 17 2c |":Gc%+=1..,....,| 00001290 06 3d 30 0d 17 7d e7 dd f2 42 28 49 63 25 2c 6d |.=0..}...B(Ic%,m| 000012a0 24 2c 4a 63 25 2c 66 24 2c 7a 25 29 3a ea 41 25 |$,Jc%,f$,z%):.A%| 000012b0 2c 42 25 2c 43 25 2c 4b 63 25 2c 4c 63 25 2c 4d |,B%,C%,Kc%,Lc%,M| 000012c0 63 25 2c 4e 63 25 2c 4f 63 25 2c 50 63 25 2c 51 |c%,Nc%,Oc%,Pc%,Q| 000012d0 63 25 2c 52 63 25 2c 53 63 25 2c 54 63 25 3a c8 |c%,Rc%,Sc%,Tc%:.| 000012e0 99 26 34 34 41 45 32 2c 34 30 2c 49 63 25 2c 6d |.&44AE2,40,Ic%,m| 000012f0 24 b8 2c 2c 2c 4b 63 25 2c 4c 63 25 2c 53 63 25 |$.,,,Kc%,Lc%,Sc%| 00001300 2c 4d 63 25 3a c8 99 26 34 34 41 45 32 2c 34 30 |,Mc%:..&44AE2,40| 00001310 2c 4a 63 25 2c 66 24 b8 2c 2c 2c 4e 63 25 2c 4f |,Jc%,f$.,,,Nc%,O| 00001320 63 25 2c 54 63 25 2c 50 63 25 3a c8 99 26 33 35 |c%,Tc%,Pc%:..&35| 00001330 2c 4d 63 25 2c 33 b8 2c 2c 51 63 25 3a c8 99 26 |,Mc%,3.,,Qc%:..&| 00001340 33 35 2c 4d 63 25 2c 34 b8 2c 2c 41 25 3a 4b 63 |35,Mc%,4.,,A%:Kc| 00001350 25 3d 4b 63 25 3c 3c 41 25 3a 68 25 21 38 3d 28 |%=Kc%<<A%:h%!8=(| 00001360 31 3c 3c 41 25 29 2a 7a 25 3a c8 99 26 33 35 2c |1<<A%)*z%:..&35,| 00001370 4d 63 25 2c 35 b8 2c 2c 41 25 0d 17 c5 99 4c 63 |Mc%,5.,,A%....Lc| 00001380 25 3d 4c 63 25 3c 3c 41 25 3a 68 25 21 31 32 3d |%=Lc%<<A%:h%!12=| 00001390 28 31 3c 3c 41 25 29 2a 7a 25 3a c8 99 26 33 35 |(1<<A%)*z%:..&35| 000013a0 2c 50 63 25 2c 33 b8 2c 2c 52 63 25 3a c8 99 26 |,Pc%,3.,,Rc%:..&| 000013b0 33 35 2c 50 63 25 2c 34 b8 2c 2c 41 25 3a 4e 63 |35,Pc%,4.,,A%:Nc| 000013c0 25 3d 28 4e 63 25 3c 3c 41 25 29 3a 68 25 21 30 |%=(Nc%<<A%):h%!0| 000013d0 3d 31 3c 3c 41 25 3a c8 99 26 33 35 2c 50 63 25 |=1<<A%:..&35,Pc%| 000013e0 2c 35 b8 2c 2c 41 25 3a 4f 63 25 3d 28 4f 63 25 |,5.,,A%:Oc%=(Oc%| 000013f0 3c 3c 41 25 29 3a 68 25 21 34 3d 31 3c 3c 41 25 |<<A%):h%!4=1<<A%| 00001400 3a e7 51 63 25 3c 3e 52 63 25 84 51 63 25 3c 3e |:.Qc%<>Rc%.Qc%<>| 00001410 31 35 8c 0d 18 1f 2e f2 62 28 22 56 6f 69 63 65 |15......b("Voice| 00001420 20 73 70 72 69 74 65 73 20 6d 75 73 74 20 68 61 | sprites must ha| 00001430 76 65 20 31 36 20 63 6f 6c 6f 75 72 73 22 2c a3 |ve 16 colours",.| 00001440 29 0d 18 31 88 cc 3a c8 99 26 34 34 41 45 32 2c |)..1..:..&44AE2,| 00001450 36 30 2c 49 63 25 2c 6d 24 2c 30 b8 2c 41 25 2c |60,Ic%,m$,0.,A%,| 00001460 42 25 2c 43 25 3a c8 99 26 34 34 41 45 32 2c 35 |B%,C%:..&44AE2,5| 00001470 32 2c 4a 63 25 2c 66 24 2c 28 28 4b 63 25 2b 32 |2,Jc%,f$,((Kc%+2| 00001480 29 2a 7a 25 2d 4e 63 25 29 2f 28 7a 25 2a 32 29 |)*z%-Nc%)/(z%*2)| 00001490 2c 28 28 4c 63 25 2b 32 29 2a 7a 25 2d 4f 63 25 |,((Lc%+2)*z%-Oc%| 000014a0 29 2f 28 7a 25 2a 32 29 2c 38 2c 68 25 2c 30 3a |)/(z%*2),8,h%,0:| 000014b0 c8 99 26 32 45 2c 36 30 2c 41 25 2c 42 25 2c 43 |..&2E,60,A%,B%,C| 000014c0 25 3a e7 53 63 25 3d 31 8c 0d 18 55 47 c8 99 26 |%:.Sc%=1...UG..&| 000014d0 34 34 41 45 32 2c 36 31 2c 49 63 25 2c 6d 24 2c |44AE2,61,Ic%,m$,| 000014e0 30 b8 2c 41 25 2c 42 25 2c 43 25 3a ef 31 38 2c |0.,A%,B%,C%:.18,| 000014f0 30 2c 31 32 38 2b 36 33 2c 32 33 2c 31 37 2c 33 |0,128+63,23,17,3| 00001500 2c 26 43 30 2c 30 2c 30 2c 30 2c 30 2c 30 2c 30 |,&C0,0,0,0,0,0,0| 00001510 0d 18 67 5f c8 99 26 34 34 41 45 32 2c 35 30 2c |..g_..&44AE2,50,| 00001520 4a 63 25 2c 66 24 2c 28 28 4b 63 25 2b 32 29 2a |Jc%,f$,((Kc%+2)*| 00001530 7a 25 2d 4e 63 25 29 2f 28 7a 25 2a 32 29 2c 28 |z%-Nc%)/(z%*2),(| 00001540 28 4c 63 25 2b 32 29 2a 7a 25 2d 4f 63 25 29 2f |(Lc%+2)*z%-Oc%)/| 00001550 28 7a 25 2a 32 29 2c 38 2c 68 25 2c 30 3a c8 99 |(z%*2),8,h%,0:..| 00001560 26 32 45 2c 36 31 2c 41 25 2c 42 25 2c 43 25 0d |&2E,61,A%,B%,C%.| 00001570 18 82 05 cd 0d 18 82 05 cd 0d 18 8b 05 e1 0d 18 |................| 00001580 94 4a dd f2 74 61 28 61 24 29 3a ea 65 25 2c 66 |.J..ta(a$):.e%,f| 00001590 25 2c 6c 24 2c 59 24 3a 6c 24 3d c2 61 24 2c 31 |%,l$,Y$:l$=.a$,1| 000015a0 30 29 3a e3 65 25 3d 31 b8 33 31 3a c8 99 26 36 |0):.e%=1.31:..&6| 000015b0 30 31 38 33 2c 30 2c 65 25 b8 66 25 3a e7 a4 63 |0183,0,e%.f%:..c| 000015c0 28 66 25 29 3d 61 24 8c 0d 19 5a 2a 62 24 28 47 |(f%)=a$...Z*b$(G| 000015d0 63 25 29 3d 61 24 3a 63 25 28 47 63 25 29 3d 26 |c%)=a$:c%(Gc%)=&| 000015e0 38 30 30 30 30 30 30 30 3a e7 6a 24 3d 22 32 32 |80000000:.j$="22| 000015f0 22 8c 0d 19 75 3f c8 99 26 36 34 41 45 32 2c 32 |"...u?..&64AE2,2| 00001600 35 38 2c 47 25 2c 4a 24 2b 22 2e 22 2b 6c 24 b8 |58,G%,J$+"."+l$.| 00001610 3b 50 25 3a c8 99 26 36 34 41 45 32 2c 32 35 38 |;P%:..&64AE2,258| 00001620 2c 47 25 2c 4b 24 2b 22 2e 22 2b 6c 24 b8 3b 50 |,G%,K$+"."+l$.;P| 00001630 25 0d 19 90 41 cc 3a c8 99 26 36 34 41 45 32 2c |%...A.:..&64AE2,| 00001640 32 35 38 2c 47 25 2c 4b 24 2b 22 2e 22 2b 6c 24 |258,G%,K$+"."+l$| 00001650 b8 3b 50 25 3a c8 99 26 36 34 41 45 32 2c 32 35 |.;P%:..&64AE2,25| 00001660 38 2c 47 25 2c 4a 24 2b 22 2e 22 2b 6c 24 b8 3b |8,G%,J$+"."+l$.;| 00001670 50 25 0d 19 ab 05 cd 0d 19 ab 2d e7 a4 65 28 72 |P%........-..e(r| 00001680 25 2c 6c 24 2c 47 25 2c 22 4e 6f 72 6d 61 6c 22 |%,l$,G%,"Normal"| 00001690 2c 22 50 6c 61 79 69 6e 67 22 2c 22 53 6d 61 6c |,"Playing","Smal| 000016a0 6c 22 29 8c 0d 19 b4 0e 61 24 28 47 63 25 29 3d |l").....a$(Gc%)=| 000016b0 6c 24 0d 19 c6 11 cc 3a 61 24 28 47 63 25 29 3d |l$.....:a$(Gc%)=| 000016c0 22 3f 22 0d 19 d8 05 cd 0d 19 d8 59 c8 99 26 36 |"?"........Y..&6| 000016d0 34 41 45 32 2c 32 35 2c 47 25 2c 22 4e 6f 72 6d |4AE2,25,G%,"Norm| 000016e0 61 6c 22 3a c8 99 26 36 34 41 45 32 2c 32 35 2c |al":..&64AE2,25,| 000016f0 47 25 2c 22 50 6c 61 79 69 6e 67 22 3a c8 99 26 |G%,"Playing":..&| 00001700 36 34 41 45 32 2c 32 35 2c 47 25 2c 22 53 6d 61 |64AE2,25,G%,"Sma| 00001710 6c 6c 22 3a 47 63 25 2b 3d 31 3a 45 63 25 2b 3d |ll":Gc%+=1:Ec%+=| 00001720 31 0d 1a 0e 05 cd 0d 1a 0e 07 ed 3a e1 0d 1a 20 |1..........:... | 00001730 6b dd f2 76 61 28 41 24 2c 55 63 25 2c 4c 24 29 |k..va(A$,Uc%,L$)| 00001740 3a ea 56 63 25 2c 52 25 2c 59 25 2c 46 24 2c 50 |:.Vc%,R%,Y%,F$,P| 00001750 25 2c 57 63 25 2c 41 25 3a 50 25 3d 30 3a f5 3a |%,Wc%,A%:P%=0:.:| 00001760 c8 99 26 32 30 30 30 43 2c 31 30 2c 41 24 2c 68 |..&2000C,10,A$,h| 00001770 25 2c 31 2c 50 25 2c 36 34 2c 22 2a 22 b8 41 25 |%,1,P%,64,"*".A%| 00001780 2c 2c 2c 52 25 2c 50 25 3b 57 63 25 3a e7 28 57 |,,,R%,P%;Wc%:.(W| 00001790 63 25 80 31 29 3d 30 8c 0d 1a 68 0a e7 52 25 3e |c%.1)=0...h..R%>| 000017a0 30 8c 0d 1a 71 3a 46 24 3d a4 63 28 68 25 2b 32 |0...q:F$=.c(h%+2| 000017b0 30 29 3a e7 28 28 21 68 25 29 80 26 46 46 46 30 |0):.((!h%).&FFF0| 000017c0 30 30 30 30 29 3d 26 46 46 46 30 30 30 30 30 80 |0000)=&FFF00000.| 000017d0 28 68 25 21 31 36 80 31 29 3d 31 8c 0d 1a 83 12 |(h%!16.1)=1.....| 000017e0 56 63 25 3d 21 68 25 80 26 46 46 46 30 30 0d 1a |Vc%=!h%.&FFF00..| 000017f0 95 0b cc 3a 56 63 25 3d 30 0d 1a a7 05 cd 0d 1a |...:Vc%=0.......| 00001800 a7 10 e7 56 63 25 3d 26 46 46 41 30 30 8c 0d 1a |...Vc%=&FFA00...| 00001810 b0 0d e7 45 63 25 3e 55 63 25 8c 0d 1a b9 76 f2 |...Ec%>Uc%....v.| 00001820 62 28 22 4d 75 73 69 63 20 42 6f 78 20 63 61 6e |b("Music Box can| 00001830 20 6f 6e 6c 79 20 68 61 6e 64 6c 65 20 61 20 6d | only handle a m| 00001840 61 78 69 6d 75 6d 20 6f 66 20 22 2b c3 28 65 61 |aximum of "+.(ea| 00001850 25 29 2b 22 20 69 6e 73 74 72 75 6d 65 6e 74 73 |%)+" instruments| 00001860 2e 20 53 6f 20 49 20 73 68 61 6c 6c 20 6f 6e 6c |. So I shall onl| 00001870 79 20 75 73 65 20 74 68 65 20 66 69 72 73 74 20 |y use the first | 00001880 22 2b c3 28 65 61 25 29 2b 22 2e 22 2c a3 29 3a |"+.(ea%)+".",.):| 00001890 e1 0d 1a c2 16 cc 3a 56 63 25 3d a0 28 4c 24 29 |......:Vc%=.(L$)| 000018a0 3a 45 63 25 2b 3d 31 0d 1a e6 05 cd 0d 1a e6 05 |:Ec%+=1.........| 000018b0 cd 0d 1a ef 28 46 24 3d 41 24 2b 22 2e 22 2b 46 |....(F$=A$+"."+F| 000018c0 24 3a e7 68 25 21 31 36 3d 32 8c f2 76 61 28 46 |$:.h%!16=2..va(F| 000018d0 24 2c 55 63 25 2c 4c 24 29 0d 1b 01 05 cd 0d 1b |$,Uc%,L$).......| 000018e0 0a 19 cc 3a f2 62 28 a4 63 28 41 25 2b 34 29 2c |...:.b(.c(A%+4),| 000018f0 a3 29 3a 52 25 3d 30 0d 1b 2e 05 cd 0d 1b 2e 1b |.):R%=0.........| 00001900 fd 52 25 3d 30 84 50 25 3d 2d 31 84 45 63 25 3e |.R%=0.P%=-1.Ec%>| 00001910 55 63 25 2b 31 3a e1 0d 1b 40 3a dd a4 65 28 49 |Uc%+1:...@:..e(I| 00001920 63 25 2c 61 24 2c 47 25 2c 73 24 2c 6c 24 2c 70 |c%,a$,G%,s$,l$,p| 00001930 24 29 3a ea 41 25 3a c8 99 26 36 34 41 45 32 2c |$):.A%:..&64AE2,| 00001940 32 36 31 2c 47 25 2c 73 24 b8 41 25 3a e7 41 25 |261,G%,s$.A%:.A%| 00001950 8c 0d 1b 88 6c 61 24 3d c2 61 24 2c 31 31 29 3a |....la$=.a$,11):| 00001960 c8 99 26 34 34 41 45 32 2c 32 36 30 2c 44 63 25 |..&44AE2,260,Dc%| 00001970 2c 22 5a 22 2c 49 63 25 2c 61 24 2c 30 b8 3b 41 |,"Z",Ic%,a$,0.;A| 00001980 25 3a c8 99 26 34 34 41 45 32 2c 32 36 30 2c 44 |%:..&44AE2,260,D| 00001990 63 25 2c 22 70 5a 22 2c 49 63 25 2c 22 70 22 2b |c%,"pZ",Ic%,"p"+| 000019a0 61 24 2c 30 b8 3b 50 25 3a 41 25 3d 28 50 25 84 |a$,0.;P%:A%=(P%.| 000019b0 41 25 29 3a e7 70 24 3c 3e 22 2d 22 8c 0d 1b b5 |A%):.p$<>"-"....| 000019c0 3d c8 99 26 34 34 41 45 32 2c 32 36 30 2c 44 63 |=..&44AE2,260,Dc| 000019d0 25 2c 22 73 5a 22 2c 49 63 25 2c 22 73 22 2b 61 |%,"sZ",Ic%,"s"+a| 000019e0 24 2c 30 b8 3b 50 25 3a 41 25 3d 28 28 28 50 25 |$,0.;P%:A%=(((P%| 000019f0 84 41 25 29 80 31 29 3d 30 29 0d 1b d0 05 cd 0d |.A%).1)=0)......| 00001a00 1b d0 08 e7 41 25 8c 0d 1b d9 31 f2 42 28 49 63 |....A%....1.B(Ic| 00001a10 25 2c 61 24 2c 47 25 2c 73 24 2c 31 29 3a c8 99 |%,a$,G%,s$,1):..| 00001a20 26 36 34 41 45 32 2c 32 36 31 2c 47 25 2c 6c 24 |&64AE2,261,G%,l$| 00001a30 b8 42 25 3a e7 42 25 8c 0d 1b f4 1a f2 42 28 49 |.B%:.B%......B(I| 00001a40 63 25 2c 22 70 22 2b 61 24 2c 47 25 2c 6c 24 2c |c%,"p"+a$,G%,l$,| 00001a50 31 29 0d 1c 06 1c cc 3a f2 42 28 49 63 25 2c 22 |1).....:.B(Ic%,"| 00001a60 70 22 2b 61 24 2c 47 25 2c 73 24 2c 31 29 0d 1c |p"+a$,G%,s$,1)..| 00001a70 18 05 cd 0d 1c 18 0d e7 70 24 3c 3e 22 2d 22 8c |........p$<>"-".| 00001a80 0d 1c 21 1e c8 99 26 36 34 41 45 32 2c 32 36 31 |..!...&64AE2,261| 00001a90 2c 47 25 2c 70 24 b8 42 25 3a e7 42 25 8c 0d 1c |,G%,p$.B%:.B%...| 00001aa0 33 1a f2 42 28 49 63 25 2c 22 73 22 2b 61 24 2c |3..B(Ic%,"s"+a$,| 00001ab0 47 25 2c 70 24 2c 31 29 0d 1c 45 1c cc 3a f2 42 |G%,p$,1)..E..:.B| 00001ac0 28 49 63 25 2c 22 73 22 2b 61 24 2c 47 25 2c 73 |(Ic%,"s"+a$,G%,s| 00001ad0 24 2c 32 29 0d 1c 57 05 cd 0d 1c 57 05 cd 0d 1c |$,2)..W....W....| 00001ae0 60 43 cc 3a c8 99 26 36 34 41 45 32 2c 32 35 2c |`C.:..&64AE2,25,| 00001af0 47 25 2c 61 24 3a c8 99 26 36 34 41 45 32 2c 32 |G%,a$:..&64AE2,2| 00001b00 35 2c 47 25 2c 22 70 22 2b 61 24 3a c8 99 26 36 |5,G%,"p"+a$:..&6| 00001b10 34 41 45 32 2c 32 35 2c 47 25 2c 22 73 22 2b 61 |4AE2,25,G%,"s"+a| 00001b20 24 0d 1c 8d 05 cd 0d 1c 8d 11 cc 3a 41 25 3d b9 |$..........:A%=.| 00001b30 3a e7 ac 46 63 25 8c 0d 1c a8 9b f2 62 28 22 53 |:..Fc%......b("S| 00001b40 6f 6d 65 20 69 6e 73 74 72 75 6d 65 6e 74 73 20 |ome instruments | 00001b50 28 65 67 20 22 2b 61 24 2b 22 29 20 64 6f 20 6e |(eg "+a$+") do n| 00001b60 6f 74 20 68 61 76 65 20 61 20 73 70 72 69 74 65 |ot have a sprite| 00001b70 20 66 69 6c 65 20 63 6f 6e 74 61 69 6e 69 6e 67 | file containing| 00001b80 20 61 20 73 70 72 69 74 65 20 63 61 6c 6c 65 64 | a sprite called| 00001b90 20 27 22 2b 73 24 2b 22 27 2e 20 49 20 77 69 6c | '"+s$+"'. I wil| 00001ba0 6c 20 63 72 65 61 74 65 20 61 20 73 70 72 69 74 |l create a sprit| 00001bb0 65 20 66 6f 72 20 74 68 65 73 65 20 69 6e 73 74 |e for these inst| 00001bc0 72 75 6d 65 6e 74 73 2e 22 2c a3 29 3a 46 63 25 |ruments.",.):Fc%| 00001bd0 3d b9 0d 1c c3 05 cd 0d 1c c3 6c 61 24 3d c2 61 |=.........la$=.a| 00001be0 24 2c 31 31 29 3a c8 99 26 34 34 41 45 32 2c 32 |$,11):..&44AE2,2| 00001bf0 36 30 2c 44 63 25 2c 22 5a 22 2c 49 63 25 2c 61 |60,Dc%,"Z",Ic%,a| 00001c00 24 2c 30 b8 3b 41 25 3a c8 99 26 34 34 41 45 32 |$,0.;A%:..&44AE2| 00001c10 2c 32 36 30 2c 44 63 25 2c 22 70 5a 22 2c 49 63 |,260,Dc%,"pZ",Ic| 00001c20 25 2c 22 70 22 2b 61 24 2c 30 b8 3b 50 25 3a 41 |%,"p"+a$,0.;P%:A| 00001c30 25 3d 28 50 25 84 41 25 29 3a e7 70 24 3c 3e 22 |%=(P%.A%):.p$<>"| 00001c40 2d 22 8c 0d 1c f0 3d c8 99 26 34 34 41 45 32 2c |-"....=..&44AE2,| 00001c50 32 36 30 2c 44 63 25 2c 22 73 5a 22 2c 49 63 25 |260,Dc%,"sZ",Ic%| 00001c60 2c 22 73 22 2b 61 24 2c 30 b8 3b 50 25 3a 41 25 |,"s"+a$,0.;P%:A%| 00001c70 3d 28 28 28 50 25 84 41 25 29 80 31 29 3d 30 29 |=(((P%.A%).1)=0)| 00001c80 0d 1d 0b 05 cd 0d 1d 0b 08 e7 41 25 8c 0d 1d 14 |..........A%....| 00001c90 50 f2 78 61 28 49 63 25 2c 61 24 2c 47 25 2c 61 |P.xa(Ic%,a$,G%,a| 00001ca0 24 2c 31 29 3a f2 78 61 28 49 63 25 2c 22 70 22 |$,1):.xa(Ic%,"p"| 00001cb0 2b 61 24 2c 47 25 2c 61 24 2c 31 29 3a e7 70 24 |+a$,G%,a$,1):.p$| 00001cc0 3c 3e 22 2d 22 8c f2 78 61 28 49 63 25 2c 22 73 |<>"-"..xa(Ic%,"s| 00001cd0 22 2b 61 24 2c 47 25 2c 61 24 2c 32 29 0d 1d 2f |"+a$,G%,a$,2)../| 00001ce0 43 cc 3a c8 99 26 36 34 41 45 32 2c 32 35 2c 47 |C.:..&64AE2,25,G| 00001cf0 25 2c 61 24 3a c8 99 26 36 34 41 45 32 2c 32 35 |%,a$:..&64AE2,25| 00001d00 2c 47 25 2c 22 70 22 2b 61 24 3a c8 99 26 36 34 |,G%,"p"+a$:..&64| 00001d10 41 45 32 2c 32 35 2c 47 25 2c 22 73 22 2b 61 24 |AE2,25,G%,"s"+a$| 00001d20 0d 1d 5c 05 cd 0d 1d 5c 05 cd 0d 1d 65 07 3d 41 |..\....\....e.=A| 00001d30 25 0d 1d c8 f0 dd f2 78 61 28 49 63 25 2c 6d 24 |%......xa(Ic%,m$| 00001d40 2c 4a 63 25 2c 66 24 2c 7a 25 29 3a ea 41 25 2c |,Jc%,f$,z%):.A%,| 00001d50 42 25 2c 43 25 2c 4b 63 25 2c 4c 63 25 2c 4d 63 |B%,C%,Kc%,Lc%,Mc| 00001d60 25 2c 4e 63 25 2c 4f 63 25 2c 50 63 25 2c 51 63 |%,Nc%,Oc%,Pc%,Qc| 00001d70 25 2c 52 63 25 2c 53 63 25 2c 54 63 25 3a c8 99 |%,Rc%,Sc%,Tc%:..| 00001d80 26 34 34 41 45 32 2c 34 30 2c 49 63 25 2c 6d 24 |&44AE2,40,Ic%,m$| 00001d90 b8 2c 2c 2c 4b 63 25 2c 4c 63 25 2c 53 63 25 2c |.,,,Kc%,Lc%,Sc%,| 00001da0 4d 63 25 3a c8 99 26 33 35 2c 4d 63 25 2c 34 b8 |Mc%:..&35,Mc%,4.| 00001db0 2c 2c 41 25 3a 4b 63 25 3d 4b 63 25 3c 3c 41 25 |,,A%:Kc%=Kc%<<A%| 00001dc0 3a 68 25 21 38 3d 28 31 3c 3c 41 25 29 2a 7a 25 |:h%!8=(1<<A%)*z%| 00001dd0 3a c8 99 26 33 35 2c 4d 63 25 2c 35 b8 2c 2c 41 |:..&35,Mc%,5.,,A| 00001de0 25 3a 4c 63 25 3d 4c 63 25 3c 3c 41 25 3a 68 25 |%:Lc%=Lc%<<A%:h%| 00001df0 21 31 32 3d 28 31 3c 3c 41 25 29 2a 7a 25 3a c8 |!12=(1<<A%)*z%:.| 00001e00 99 26 33 35 2c 50 63 25 2c 34 b8 2c 2c 41 25 3a |.&35,Pc%,4.,,A%:| 00001e10 4e 63 25 3d 31 36 2a 32 2a 32 3a 68 25 21 30 3d |Nc%=16*2*2:h%!0=| 00001e20 34 0d 1e 34 50 c8 99 26 33 35 2c 50 63 25 2c 35 |4..4P..&35,Pc%,5| 00001e30 b8 2c 2c 41 25 3a 4f 63 25 3d 33 36 2a 32 3a 68 |.,,A%:Oc%=36*2:h| 00001e40 25 21 34 3d 38 3a c8 99 26 34 34 41 45 32 2c 36 |%!4=8:..&44AE2,6| 00001e50 30 2c 49 63 25 2c 6d 24 2c 30 b8 2c 41 25 2c 42 |0,Ic%,m$,0.,A%,B| 00001e60 25 2c 43 25 3a e6 38 3a e7 a9 28 66 24 29 3e 31 |%,C%:.8:..(f$)>1| 00001e70 8c 0d 1e 6a 9b c8 99 26 34 34 41 45 32 2c 35 31 |...j...&44AE2,51| 00001e80 2c 97 28 c1 66 24 2c 31 2c 31 29 29 2c 2c 28 28 |,.(.f$,1,1)),,((| 00001e90 4b 63 25 2b 32 29 2a 7a 25 2d 4e 63 25 29 2f 28 |Kc%+2)*z%-Nc%)/(| 00001ea0 7a 25 2a 32 29 2c 28 28 4c 63 25 2b 32 29 2a 7a |z%*2),((Lc%+2)*z| 00001eb0 25 2d 4f 63 25 29 2f 28 7a 25 2a 32 29 2c 30 2c |%-Oc%)/(z%*2),0,| 00001ec0 68 25 3a c8 99 26 34 34 41 45 32 2c 35 31 2c 97 |h%:..&44AE2,51,.| 00001ed0 28 c1 66 24 2c 32 2c 31 29 29 2c 2c 28 28 4b 63 |(.f$,2,1)),,((Kc| 00001ee0 25 2b 32 29 2a 7a 25 29 2f 28 7a 25 2a 32 29 2c |%+2)*z%)/(z%*2),| 00001ef0 28 28 4c 63 25 2b 32 29 2a 7a 25 2d 4f 63 25 29 |((Lc%+2)*z%-Oc%)| 00001f00 2f 28 7a 25 2a 32 29 2c 30 2c 68 25 0d 1e 85 55 |/(z%*2),0,h%...U| 00001f10 cc 3a c8 99 26 34 34 41 45 32 2c 35 31 2c 97 28 |.:..&44AE2,51,.(| 00001f20 c1 66 24 2c 31 2c 31 29 29 2c 2c 28 28 4b 63 25 |.f$,1,1)),,((Kc%| 00001f30 2b 32 29 2a 7a 25 2d 4e 63 25 2f 32 29 2f 28 7a |+2)*z%-Nc%/2)/(z| 00001f40 25 2a 32 29 2c 28 28 4c 63 25 2b 32 29 2a 7a 25 |%*2),((Lc%+2)*z%| 00001f50 2d 4f 63 25 29 2f 28 7a 25 2a 32 29 2c 30 2c 68 |-Oc%)/(z%*2),0,h| 00001f60 25 0d 1e 97 05 cd 0d 1e 97 1d c8 99 26 32 45 2c |%...........&2E,| 00001f70 36 30 2c 41 25 2c 42 25 2c 43 25 3a e7 53 63 25 |60,A%,B%,C%:.Sc%| 00001f80 3d 31 8c 0d 1e a9 43 c8 99 26 34 34 41 45 32 2c |=1....C..&44AE2,| 00001f90 36 31 2c 49 63 25 2c 6d 24 2c 30 b8 2c 41 25 2c |61,Ic%,m$,0.,A%,| 00001fa0 42 25 2c 43 25 3a ef 31 38 2c 30 2c 36 33 2c 32 |B%,C%:.18,0,63,2| 00001fb0 33 2c 31 37 2c 33 2c 26 43 30 2c 30 2c 30 2c 30 |3,17,3,&C0,0,0,0| 00001fc0 2c 30 2c 30 2c 30 0d 1e bb 0d e7 a9 28 66 24 29 |,0,0,0......(f$)| 00001fd0 3e 31 8c 0d 1e c4 9b c8 99 26 34 34 41 45 32 2c |>1.......&44AE2,| 00001fe0 35 31 2c 97 28 c1 66 24 2c 31 2c 31 29 29 2c 2c |51,.(.f$,1,1)),,| 00001ff0 28 28 4b 63 25 2b 32 29 2a 7a 25 2d 4e 63 25 29 |((Kc%+2)*z%-Nc%)| 00002000 2f 28 7a 25 2a 32 29 2c 28 28 4c 63 25 2b 32 29 |/(z%*2),((Lc%+2)| 00002010 2a 7a 25 2d 4f 63 25 29 2f 28 7a 25 2a 32 29 2c |*z%-Oc%)/(z%*2),| 00002020 30 2c 68 25 3a c8 99 26 34 34 41 45 32 2c 35 31 |0,h%:..&44AE2,51| 00002030 2c 97 28 c1 66 24 2c 32 2c 31 29 29 2c 2c 28 28 |,.(.f$,2,1)),,((| 00002040 4b 63 25 2b 32 29 2a 7a 25 29 2f 28 7a 25 2a 32 |Kc%+2)*z%)/(z%*2| 00002050 29 2c 28 28 4c 63 25 2b 32 29 2a 7a 25 2d 4f 63 |),((Lc%+2)*z%-Oc| 00002060 25 29 2f 28 7a 25 2a 32 29 2c 30 2c 68 25 0d 1e |%)/(z%*2),0,h%..| 00002070 df 55 cc 3a c8 99 26 34 34 41 45 32 2c 35 31 2c |.U.:..&44AE2,51,| 00002080 97 28 c1 66 24 2c 31 2c 31 29 29 2c 2c 28 28 4b |.(.f$,1,1)),,((K| 00002090 63 25 2b 32 29 2a 7a 25 2d 4e 63 25 2f 32 29 2f |c%+2)*z%-Nc%/2)/| 000020a0 28 7a 25 2a 32 29 2c 28 28 4c 63 25 2b 32 29 2a |(z%*2),((Lc%+2)*| 000020b0 7a 25 2d 4f 63 25 29 2f 28 7a 25 2a 32 29 2c 30 |z%-Oc%)/(z%*2),0| 000020c0 2c 68 25 0d 1e f1 05 cd 0d 1e f1 15 c8 99 26 32 |,h%...........&2| 000020d0 45 2c 36 31 2c 41 25 2c 42 25 2c 43 25 0d 1f 03 |E,61,A%,B%,C%...| 000020e0 05 cd 0d 1f 03 05 e1 0d 1f 0c 5c dd f2 77 61 3a |..........\..wa:| 000020f0 76 24 3d a4 6f 28 22 54 75 6e 65 22 29 3a 42 24 |v$=.o("Tune"):B$| 00002100 3d a4 6f 28 22 42 65 61 74 22 29 3a 43 24 3d a4 |=.o("Beat"):C$=.| 00002110 6f 28 22 53 6f 75 6e 64 22 29 3a 44 24 3d a4 6f |o("Sound"):D$=.o| 00002120 28 22 43 68 6f 72 64 22 29 3a 58 63 25 3d a3 3a |("Chord"):Xc%=.:| 00002130 59 63 25 3d a3 3a 5a 63 25 3d a3 3a 5f 63 25 3d |Yc%=.:Zc%=.:_c%=| 00002140 a3 3a e1 0d 1f 6f 82 dd a4 6f 28 63 24 29 3a ea |.:...o...o(c$):.| 00002150 73 25 2c 41 25 2c 60 63 25 2c 66 25 2c 62 24 2c |s%,A%,`c%,f%,b$,| 00002160 55 63 25 2c 63 25 3a 21 67 25 3d 31 3a 67 25 21 |Uc%,c%:!g%=1:g%!| 00002170 34 3d 44 61 25 3a c8 99 26 34 34 41 45 41 2c 30 |4=Da%:..&44AEA,0| 00002180 2c 22 3c 4d 42 22 2b 63 24 2b 22 46 69 6c 65 73 |,"<MB"+c$+"Files| 00002190 24 44 69 72 3e 22 2c 67 25 2c 63 24 2b 22 2a 22 |$Dir>",g%,c$+"*"| 000021a0 2c 70 61 25 b8 2c 73 25 3a 66 25 3d 21 73 25 3a |,pa%.,s%:f%=!s%:| 000021b0 60 63 25 3d 21 66 25 3a 55 63 25 3d 31 3a e7 60 |`c%=!f%:Uc%=1:.`| 000021c0 63 25 3e 30 8c 0d 1f c9 5b 66 25 2b 3d 34 2b 31 |c%>0....[f%+=4+1| 000021d0 36 2a 60 63 25 2d 31 36 2b a9 28 63 24 29 3a f5 |6*`c%-16+.(c$):.| 000021e0 3a 41 25 3d 66 25 3a 66 25 2d 3d 31 36 3a c8 95 |:A%=f%:f%-=16:..| 000021f0 3f 41 25 3e 3d 97 28 22 30 22 29 80 3f 41 25 3c |?A%>=.("0").?A%<| 00002200 3d 97 28 22 39 22 29 3a 41 25 2b 3d 31 3a ce 3a |=.("9"):A%+=1:.:| 00002210 e7 3f 41 25 3c 33 32 84 3f 41 25 3d 31 32 37 8c |.?A%<32.?A%=127.| 00002220 0d 20 11 26 63 25 3d 28 a0 28 a4 63 28 66 25 2b |. .&c%=(.(.c(f%+| 00002230 31 36 29 29 29 2b 31 3a e7 63 25 3e 55 63 25 8c |16)))+1:.c%>Uc%.| 00002240 55 63 25 3d 63 25 0d 20 23 05 cd 0d 20 2c 11 60 |Uc%=c%. #... ,.`| 00002250 63 25 2d 3d 31 3a fd 60 63 25 3d 30 0d 20 47 05 |c%-=1:.`c%=0. G.| 00002260 cd 0d 20 47 1b c8 99 26 34 34 41 43 33 2c 2c 73 |.. G...&44AC3,,s| 00002270 25 3a 3d 63 24 2b c3 28 55 63 25 29 0d 20 6b 4a |%:=c$+.(Uc%). kJ| 00002280 dd f2 75 61 3a ea 41 25 2c 61 24 2c 61 64 25 2c |..ua:.A%,a$,ad%,| 00002290 62 64 25 3a 61 64 25 3d a3 3a 62 64 25 3d a3 3a |bd%:ad%=.:bd%=.:| 000022a0 c8 99 26 32 30 30 32 33 2c 47 24 2c 68 25 2c 2d |..&20023,G$,h%,-| 000022b0 31 2c 30 2c 30 b8 2c 2c 41 25 3a e7 41 25 3c 30 |1,0,0.,,A%:.A%<0| 000022c0 8c 62 64 25 3d b9 0d 20 8f 39 c8 99 26 32 30 30 |.bd%=.. .9..&200| 000022d0 32 33 2c 22 4d 42 42 65 61 74 46 69 6c 65 73 24 |23,"MBBeatFiles$| 000022e0 44 69 72 22 2c 68 25 2c 2d 31 2c 30 2c 30 b8 2c |Dir",h%,-1,0,0.,| 000022f0 2c 41 25 3a e7 41 25 3c 30 8c 61 64 25 3d b9 0d |,A%:.A%<0.ad%=..| 00002300 20 a1 0e e7 61 64 25 80 62 64 25 8c e1 0d 20 aa | ...ad%.bd%... .| 00002310 13 e7 28 ac 61 64 25 29 80 28 ac 62 64 25 29 8c |..(.ad%).(.bd%).| 00002320 0d 20 b3 50 f2 79 61 28 22 50 6c 65 61 73 65 20 |. .P.ya("Please | 00002330 69 6e 73 65 72 74 20 61 20 64 69 73 63 20 63 6f |insert a disc co| 00002340 6e 74 61 69 6e 69 6e 67 20 21 4d 42 49 6e 73 74 |ntaining !MBInst| 00002350 73 20 61 6e 64 20 21 4d 42 46 69 6c 65 73 20 69 |s and !MBFiles i| 00002360 6e 74 6f 20 64 72 69 76 65 20 30 20 22 2c 33 29 |nto drive 0 ",3)| 00002370 0d 20 c5 0c cc 3a e7 ac 61 64 25 8c 0d 20 ce 43 |. ...:..ad%.. .C| 00002380 f2 79 61 28 22 50 6c 65 61 73 65 20 69 6e 73 65 |.ya("Please inse| 00002390 72 74 20 61 20 64 69 73 63 20 63 6f 6e 74 61 69 |rt a disc contai| 000023a0 6e 69 6e 67 20 21 4d 42 46 69 6c 65 73 20 69 6e |ning !MBFiles in| 000023b0 74 6f 20 64 72 69 76 65 20 30 20 22 2c 31 29 0d |to drive 0 ",1).| 000023c0 20 e0 45 cc 3a f2 79 61 28 22 50 6c 65 61 73 65 | .E.:.ya("Please| 000023d0 20 69 6e 73 65 72 74 20 61 20 64 69 73 63 20 63 | insert a disc c| 000023e0 6f 6e 74 61 69 6e 69 6e 67 20 21 4d 42 49 6e 73 |ontaining !MBIns| 000023f0 74 73 20 69 6e 74 6f 20 64 72 69 76 65 20 30 20 |ts into drive 0 | 00002400 22 2c 32 29 0d 20 f2 05 cd 0d 20 f2 05 cd 0d 20 |",2). .... .... | 00002410 fb 05 e1 0d 21 04 5c dd f2 79 61 28 4d 24 2c 46 |....!.\..ya(M$,F| 00002420 25 29 3a f5 3a 21 68 25 3d 30 3a 24 28 68 25 2b |%):.:!h%=0:$(h%+| 00002430 34 29 3d 4d 24 2b bd 30 3a c8 99 26 34 30 30 44 |4)=M$+.0:..&400D| 00002440 46 2c 68 25 2c 33 2b 32 5e 34 2c 22 4d 65 73 73 |F,h%,3+2^4,"Mess| 00002450 61 67 65 20 66 72 6f 6d 20 4d 75 73 69 63 42 6f |age from MusicBo| 00002460 78 22 b8 2c 41 25 3a e7 41 25 3c 3e 31 8c e1 0d |x".,A%:.A%<>1...| 00002470 21 3a 09 c8 8e 46 25 ca 0d 21 43 2a c9 31 3a c8 |!:...F%..!C*.1:.| 00002480 99 26 32 30 30 30 38 2c 31 37 2c 22 41 44 46 53 |.&20008,17,"ADFS| 00002490 3a 3a 30 2e 24 2e 21 4d 42 46 69 6c 65 73 22 b8 |::0.$.!MBFiles".| 000024a0 41 25 0d 21 5e 26 c9 32 3a c8 99 26 38 2c 31 37 |A%.!^&.2:..&8,17| 000024b0 2c 22 41 44 46 53 3a 3a 30 2e 24 2e 21 4d 42 49 |,"ADFS::0.$.!MBI| 000024c0 6e 73 74 73 22 b8 41 25 0d 21 70 50 c9 33 3a c8 |nsts".A%.!pP.3:.| 000024d0 99 26 32 30 30 30 38 2c 31 37 2c 22 41 44 46 53 |.&20008,17,"ADFS| 000024e0 3a 3a 30 2e 24 2e 21 4d 42 46 69 6c 65 73 22 b8 |::0.$.!MBFiles".| 000024f0 41 25 3a e7 41 25 3d 32 8c c8 99 26 38 2c 31 37 |A%:.A%=2...&8,17| 00002500 2c 22 41 44 46 53 3a 3a 30 2e 24 2e 21 4d 42 49 |,"ADFS::0.$.!MBI| 00002510 6e 73 74 73 22 b8 41 25 0d 21 82 05 cb 0d 21 8b |nsts".A%.!....!.| 00002520 70 fd 41 25 3d 32 3a c8 99 26 34 30 32 34 35 2c |p.A%=2:..&40245,| 00002530 22 30 22 2c 68 25 3a 61 24 3d 22 41 44 46 53 3a |"0",h%:a$="ADFS:| 00002540 3a 22 3a 41 25 3d 30 3a c8 95 41 25 3c 31 32 80 |:":A%=0:..A%<12.| 00002550 3f 28 68 25 2b 41 25 2b 32 32 29 3e 33 32 3a 61 |?(h%+A%+22)>32:a| 00002560 24 2b 3d bd 28 3f 28 68 25 2b 41 25 2b 32 32 29 |$+=.(?(h%+A%+22)| 00002570 29 3a 41 25 2b 3d 31 3a ce 3a 61 24 2b 3d 22 2e |):A%+=1:.:a$+=".| 00002580 24 22 3a e7 28 46 25 80 31 29 3d 31 8c 0d 21 e5 |$":.(F%.1)=1..!.| 00002590 c7 ff 28 22 2a 53 45 54 20 4d 42 54 75 6e 65 46 |..("*SET MBTuneF| 000025a0 69 6c 65 73 24 44 69 72 20 22 2b 61 24 2b 22 2e |iles$Dir "+a$+".| 000025b0 21 4d 42 46 69 6c 65 73 2e 54 75 6e 65 73 22 29 |!MBFiles.Tunes")| 000025c0 3a ff 28 22 2a 53 45 54 20 4d 42 42 65 61 74 46 |:.("*SET MBBeatF| 000025d0 69 6c 65 73 24 44 69 72 20 22 2b 61 24 2b 22 2e |iles$Dir "+a$+".| 000025e0 21 4d 42 46 69 6c 65 73 2e 42 65 61 74 73 22 29 |!MBFiles.Beats")| 000025f0 3a ff 28 22 2a 53 45 54 20 4d 42 43 68 6f 72 64 |:.("*SET MBChord| 00002600 46 69 6c 65 73 24 44 69 72 20 22 2b 61 24 2b 22 |Files$Dir "+a$+"| 00002610 2e 21 4d 42 46 69 6c 65 73 2e 43 68 6f 72 64 73 |.!MBFiles.Chords| 00002620 22 29 3a ff 28 22 2a 53 45 54 20 4d 42 53 6f 75 |"):.("*SET MBSou| 00002630 6e 64 46 69 6c 65 73 24 44 69 72 20 22 2b 61 24 |ndFiles$Dir "+a$| 00002640 2b 22 2e 21 4d 42 46 69 6c 65 73 2e 53 6f 75 6e |+".!MBFiles.Soun| 00002650 64 73 22 29 0d 22 12 05 cd 0d 22 12 0e e7 28 46 |ds")."...."...(F| 00002660 25 80 32 29 3d 32 8c 0d 22 1b b2 ff 28 22 2a 53 |%.2)=2.."...("*S| 00002670 45 54 20 4d 42 49 6e 73 74 72 75 6d 65 6e 74 73 |ET MBInstruments| 00002680 24 44 69 72 20 22 2b 61 24 2b 22 2e 21 4d 42 49 |$Dir "+a$+".!MBI| 00002690 6e 73 74 73 2e 49 6e 73 74 72 75 6d 6e 74 73 22 |nsts.Instrumnts"| 000026a0 29 3a ff 28 22 2a 53 45 54 20 4d 42 49 6e 73 74 |):.("*SET MBInst| 000026b0 72 75 6d 65 6e 74 53 70 72 69 74 65 73 24 44 69 |rumentSprites$Di| 000026c0 72 20 22 2b 61 24 2b 22 2e 21 4d 42 49 6e 73 74 |r "+a$+".!MBInst| 000026d0 73 2e 53 70 72 69 74 65 73 22 29 3a ff 28 22 2a |s.Sprites"):.("*| 000026e0 53 45 54 20 4d 42 49 6e 73 74 72 75 6d 65 6e 74 |SET MBInstrument| 000026f0 53 70 72 69 74 65 73 32 32 24 44 69 72 20 22 2b |Sprites22$Dir "+| 00002700 61 24 2b 22 2e 21 4d 42 49 6e 73 74 73 2e 53 70 |a$+".!MBInsts.Sp| 00002710 72 69 74 65 73 32 32 22 29 0d 22 3f 05 cd 0d 22 |rites22")."?..."| 00002720 3f 05 e1 0d 22 48 c4 dd f2 6e 61 28 65 24 29 3a |?..."H...na(e$):| 00002730 ea 63 64 25 2c 64 64 25 2c 65 64 25 2c 66 25 2c |.cd%,dd%,ed%,f%,| 00002740 66 64 25 3a 67 64 25 3d 33 3a de 66 25 28 67 64 |fd%:gd%=3:.f%(gd| 00002750 25 2c 34 29 3a 66 64 25 3d 30 3a 63 64 25 3d 34 |%,4):fd%=0:cd%=4| 00002760 30 39 36 3a 68 64 25 3d 35 31 32 30 2b 32 30 32 |096:hd%=5120+202| 00002770 34 3a de 64 64 25 20 68 64 25 3a 69 64 25 3d 64 |4:.dd% hd%:id%=d| 00002780 64 25 3a c8 99 26 34 34 41 43 31 2c 2c 70 61 25 |d%:..&44AC1,,pa%| 00002790 2c 63 64 25 2b 32 30 b8 2c 69 25 3a 65 64 25 3d |,cd%+20.,i%:ed%=| 000027a0 21 69 25 3a 69 25 3d 65 64 25 2b 32 30 3a c8 99 |!i%:i%=ed%+20:..| 000027b0 26 38 2c 31 37 2c 65 24 b8 6a 61 25 3a e7 6a 61 |&8,17,e$.ja%:.ja| 000027c0 25 3c 3e 31 8c f2 62 28 22 54 65 6d 70 6c 61 74 |%<>1..b("Templat| 000027d0 65 20 66 69 6c 65 20 6e 6f 74 20 66 6f 75 6e 64 |e file not found| 000027e0 2e 22 2c b9 29 3a e1 0d 23 9e 55 c8 99 26 34 30 |.",.):..#.U..&40| 000027f0 30 44 39 2c 2c 65 24 3a f2 7a 61 3a f2 41 61 3a |0D9,,e$:.za:.Aa:| 00002800 f2 42 61 3a f2 43 61 3a f2 44 61 3a f2 45 61 3a |.Ba:.Ca:.Da:.Ea:| 00002810 f2 46 61 3a f2 47 61 3a f2 48 61 3a f2 49 61 3a |.Fa:.Ga:.Ha:.Ia:| 00002820 f2 4a 61 3a f2 4b 61 3a c8 99 26 34 30 30 44 41 |.Ja:.Ka:..&400DA| 00002830 3a 6a 64 25 3d 30 3a f2 4c 61 3a e1 0d 24 52 3b |:jd%=0:.La:..$R;| 00002840 dd f2 7a 61 3a f2 66 28 22 69 6e 66 6f 22 29 3a |..za:.f("info"):| 00002850 c8 99 26 34 30 30 43 31 2c 2c 69 25 b8 6b 64 25 |..&400C1,,i%.kd%| 00002860 3a c8 99 26 34 34 41 44 30 2c 6b 64 25 2c 39 2c |:..&44AD0,kd%,9,| 00002870 54 24 2b bd 30 3a e1 0d 25 06 26 dd f2 41 61 3a |T$+.0:..%.&..Aa:| 00002880 f2 66 28 22 54 6f 70 6f 22 29 3a c8 99 26 34 30 |.f("Topo"):..&40| 00002890 30 43 31 2c 2c 69 25 b8 6c 64 25 3a e1 0d 25 33 |0C1,,i%.ld%:..%3| 000028a0 a5 dd f2 42 61 3a ea 66 25 3a f2 66 28 22 4c 64 |...Ba:.f%:.f("Ld| 000028b0 53 76 22 29 3a 6d 64 25 3d 31 3a 6e 64 25 3d 33 |Sv"):md%=1:nd%=3| 000028c0 3a 6f 64 25 3d 34 3a 70 64 25 3d 35 3a 71 64 25 |:od%=4:pd%=5:qd%| 000028d0 3d 36 3a 66 25 3d 38 38 2b 69 25 2b 6d 64 25 2a |=6:f%=88+i%+md%*| 000028e0 33 32 3a 72 64 25 3d 28 21 66 25 2b 66 25 21 38 |32:rd%=(!f%+f%!8| 000028f0 29 2f 32 2d 31 3a 73 64 25 3d 28 66 25 21 34 2b |)/2-1:sd%=(f%!4+| 00002900 66 25 21 31 32 29 2f 32 2b 32 3a 74 64 25 3d 66 |f%!12)/2+2:td%=f| 00002910 25 21 31 32 2d 66 25 21 34 2d 31 36 3a 75 64 25 |%!12-f%!4-16:ud%| 00002920 3d 66 25 21 38 2d 66 25 21 30 2d 38 2d 34 38 3a |=f%!8-f%!0-8-48:| 00002930 c8 99 26 34 30 30 43 31 2c 2c 69 25 b8 76 64 25 |..&400C1,,i%.vd%| 00002940 3a e1 0d 26 26 4c dd f2 4d 61 3a f2 66 28 22 4c |:..&&L..Ma:.f("L| 00002950 69 73 74 22 29 3a de 77 64 25 20 33 32 3a c8 99 |ist"):.wd% 32:..| 00002960 26 34 34 41 43 37 2c 33 32 2c 69 25 2b 38 38 2c |&44AC7,32,i%+88,| 00002970 77 64 25 3a 69 25 21 38 34 3d 30 3a c8 99 26 34 |wd%:i%!84=0:..&4| 00002980 30 30 43 31 2c 2c 69 25 b8 78 64 25 3a e1 0d 26 |00C1,,i%.xd%:..&| 00002990 6e 44 dd f2 4a 61 3a f2 66 28 22 43 6f 70 79 22 |nD..Ja:.f("Copy"| 000029a0 29 3a 79 64 25 3d 34 3a 7a 64 25 3d 35 3a 41 64 |):yd%=4:zd%=5:Ad| 000029b0 25 3d 36 3a 42 64 25 3d 37 3a 43 64 25 3d 38 3a |%=6:Bd%=7:Cd%=8:| 000029c0 c8 99 26 34 30 30 43 31 2c 2c 69 25 b8 44 64 25 |..&400C1,,i%.Dd%| 000029d0 3a e1 0d 26 ec 38 dd f2 49 61 3a f2 66 28 22 51 |:..&.8..Ia:.f("Q| 000029e0 75 65 73 22 29 3a 45 64 25 3d 32 3a 46 64 25 3d |ues"):Ed%=2:Fd%=| 000029f0 33 3a 47 64 25 3d 31 3a c8 99 26 34 30 30 43 31 |3:Gd%=1:..&400C1| 00002a00 2c 2c 69 25 b8 48 64 25 3a e1 0d 27 58 de dd f2 |,,i%.Hd%:..'X...| 00002a10 47 61 3a f2 66 28 22 43 6f 6e 66 54 75 6e 65 22 |Ga:.f("ConfTune"| 00002a20 29 3a 49 64 25 3d 32 32 3a 4a 64 25 3d 32 35 3a |):Id%=22:Jd%=25:| 00002a30 4b 64 25 3d 32 38 3a 4c 64 25 3d 33 31 3a 4d 64 |Kd%=28:Ld%=31:Md| 00002a40 25 3d 33 37 3a 4e 64 25 3d 33 38 3a c8 99 26 34 |%=37:Nd%=38:..&4| 00002a50 30 30 43 31 2c 2c 69 25 b8 4f 64 25 3a f2 66 28 |00C1,,i%.Od%:.f(| 00002a60 22 43 6f 6e 66 53 74 61 72 74 22 29 3a 50 64 25 |"ConfStart"):Pd%| 00002a70 3d 31 36 3a 51 64 25 3d 31 37 3a 52 64 25 3d 31 |=16:Qd%=17:Rd%=1| 00002a80 38 3a 53 64 25 3d 31 39 3a 54 64 25 3d 32 30 3a |8:Sd%=19:Td%=20:| 00002a90 55 64 25 3d 32 31 3a 56 64 25 3d 32 32 3a 57 64 |Ud%=21:Vd%=22:Wd| 00002aa0 25 3d 32 33 3a 58 64 25 3d 32 34 3a 59 64 25 3d |%=23:Xd%=24:Yd%=| 00002ab0 32 39 3a c8 99 26 34 30 30 43 31 2c 2c 69 25 b8 |29:..&400C1,,i%.| 00002ac0 60 25 3a f2 66 28 22 43 6f 6e 66 47 6c 6f 62 61 |`%:.f("ConfGloba| 00002ad0 6c 22 29 3a 5a 64 25 3d 32 33 3a 5f 64 25 3d 32 |l"):Zd%=23:_d%=2| 00002ae0 34 3a 60 64 25 3d 32 35 0d 28 ae de 61 65 25 3d |4:`d%=25.(..ae%=| 00002af0 32 36 3a 62 65 25 3d 32 38 3a 63 65 25 3d 33 30 |26:be%=28:ce%=30| 00002b00 3a 64 65 25 3d 31 31 3a 65 65 25 3d 33 32 3a 66 |:de%=11:ee%=32:f| 00002b10 65 25 3d 33 35 3a 67 65 25 3d 33 38 3a 68 65 25 |e%=35:ge%=38:he%| 00002b20 3d 34 30 3a 69 65 25 3d 34 31 3a 6a 65 25 3d 34 |=40:ie%=41:je%=4| 00002b30 32 3a 6b 65 25 3d 34 33 3a 6c 65 25 3d 34 34 3a |2:ke%=43:le%=44:| 00002b40 6d 65 25 3d 34 35 3a 6e 65 25 3d 34 37 3a 6f 65 |me%=45:ne%=47:oe| 00002b50 25 3d 34 39 3a 70 65 25 3d 35 31 3a 71 65 25 3d |%=49:pe%=51:qe%=| 00002b60 35 33 3a 72 65 25 3d 35 35 3a 73 65 25 3d 35 37 |53:re%=55:se%=57| 00002b70 3a 74 65 25 3d 35 39 3a 75 65 25 3d 36 31 3a 76 |:te%=59:ue%=61:v| 00002b80 65 25 3d 36 33 3a 77 65 25 3d 36 35 3a c8 99 26 |e%=63:we%=65:..&| 00002b90 34 30 30 43 31 2c 2c 69 25 b8 6d 25 3a 78 65 25 |400C1,,i%.m%:xe%| 00002ba0 3d 33 3a 79 65 25 3d 34 3a 7a 65 25 3d 35 3a 41 |=3:ye%=4:ze%=5:A| 00002bb0 65 25 3d 36 3a 42 65 25 3d 37 3a 43 65 25 3d 38 |e%=6:Be%=7:Ce%=8| 00002bc0 3a 44 65 25 3d 39 0d 29 d7 bc 45 65 25 3d 31 30 |:De%=9.)..Ee%=10| 00002bd0 3a 46 65 25 3d 31 31 3a f2 66 28 22 43 6f 6e 66 |:Fe%=11:.f("Conf| 00002be0 42 65 61 74 22 29 3a 47 65 25 3d 32 33 3a 48 65 |Beat"):Ge%=23:He| 00002bf0 25 3d 32 36 3a 49 65 25 3d 32 39 3a 4a 65 25 3d |%=26:Ie%=29:Je%=| 00002c00 33 32 3a 4b 65 25 3d 33 36 3a 4c 65 25 3d 33 37 |32:Ke%=36:Le%=37| 00002c10 3a c8 99 26 34 30 30 43 31 2c 2c 69 25 b8 4d 65 |:..&400C1,,i%.Me| 00002c20 25 3a f2 66 28 22 43 6f 6e 66 4c 64 53 76 22 29 |%:.f("ConfLdSv")| 00002c30 3a 4e 65 25 3d 31 34 3a 4f 65 25 3d 31 35 3a 50 |:Ne%=14:Oe%=15:P| 00002c40 65 25 3d 31 36 3a 51 65 25 3d 31 37 3a 52 65 25 |e%=16:Qe%=17:Re%| 00002c50 3d 31 38 3a 53 65 25 3d 31 39 3a 54 65 25 3d 32 |=18:Se%=19:Te%=2| 00002c60 30 3a 55 65 25 3d 32 32 3a 56 65 25 3d 32 33 3a |0:Ue%=22:Ve%=23:| 00002c70 c8 99 26 34 30 30 43 31 2c 2c 69 25 b8 57 65 25 |..&400C1,,i%.We%| 00002c80 3a e1 0d 2a a6 d6 dd f2 43 61 3a ea 58 65 25 2c |:..*....Ca:.Xe%,| 00002c90 59 65 25 2c 5a 65 25 2c 5f 65 25 2c 60 65 25 2c |Ye%,Ze%,_e%,`e%,| 00002ca0 61 66 25 2c 53 25 2c 62 66 25 2c 63 66 25 2c 58 |af%,S%,bf%,cf%,X| 00002cb0 25 2c 59 25 2c 41 25 2c 66 25 3a f2 66 28 22 53 |%,Y%,A%,f%:.f("S| 00002cc0 6e 64 42 22 29 3a 64 66 25 3d 31 35 3a 65 66 25 |ndB"):df%=15:ef%| 00002cd0 3d 31 36 3a 66 66 25 3d 34 3a 67 66 25 3d 35 3a |=16:ff%=4:gf%=5:| 00002ce0 68 66 25 3d 36 3a 69 66 25 3d 37 3a 6a 66 25 3d |hf%=6:if%=7:jf%=| 00002cf0 38 3a 6b 66 25 3d 30 3a 6c 66 25 3d 69 25 21 38 |8:kf%=0:lf%=i%!8| 00002d00 34 2d 32 3a 6d 66 25 3d 6c 66 25 2b 5f 62 25 2a |4-2:mf%=lf%+_b%*| 00002d10 5a 62 25 3a 6e 66 25 3d 31 34 3a 6f 66 25 3d 31 |Zb%:nf%=14:of%=1| 00002d20 31 3a 70 66 25 3d 39 3a 71 66 25 3d 31 30 3a 72 |1:pf%=9:qf%=10:r| 00002d30 66 25 3d 31 38 3a 73 66 25 3d 31 39 3a 74 66 25 |f%=18:sf%=19:tf%| 00002d40 3d 32 31 3a 75 66 25 3d 31 32 3a 76 66 25 3d 31 |=21:uf%=12:vf%=1| 00002d50 33 3a 77 66 25 3d 32 30 0d 2c 68 ca 66 25 3d 69 |3:wf%=20.,h.f%=i| 00002d60 25 2b 38 38 2b 33 32 2a 70 66 25 3a 64 25 28 30 |%+88+32*pf%:d%(0| 00002d70 2c 30 29 3d 66 25 21 30 3a 64 25 28 30 2c 31 29 |,0)=f%!0:d%(0,1)| 00002d80 3d 66 25 21 34 3a 64 25 28 30 2c 32 29 3d 66 25 |=f%!4:d%(0,2)=f%| 00002d90 21 38 3a 64 25 28 30 2c 33 29 3d 66 25 21 31 32 |!8:d%(0,3)=f%!12| 00002da0 3a c8 99 26 34 34 41 44 44 2c 35 2b 32 35 36 2c |:..&44ADD,5+256,| 00002db0 69 25 2c 70 66 25 2c 31 3a 66 25 3d 69 25 2b 38 |i%,pf%,1:f%=i%+8| 00002dc0 38 2b 33 32 2a 6c 66 25 3a 58 65 25 3d 66 25 21 |8+32*lf%:Xe%=f%!| 00002dd0 31 36 3a 61 66 25 3d 66 25 21 38 2d 66 25 21 30 |16:af%=f%!8-f%!0| 00002de0 3a 53 25 3d 66 25 21 31 32 2d 66 25 21 34 3a 63 |:S%=f%!12-f%!4:c| 00002df0 66 25 3d 66 25 21 38 2d 66 25 21 34 30 3a 62 66 |f%=f%!8-f%!40:bf| 00002e00 25 3d 66 25 21 31 32 2d 66 25 21 34 34 3a 59 65 |%=f%!12-f%!44:Ye| 00002e10 25 3d 66 25 21 30 2d 62 66 25 2a 28 5f 62 25 2d |%=f%!0-bf%*(_b%-| 00002e20 31 29 0d 2d 0a f0 5a 65 25 3d 66 25 21 34 2d 63 |1).-..Ze%=f%!4-c| 00002e30 66 25 2a 28 5a 62 25 2d 31 29 3a 5f 65 25 3d 66 |f%*(Zb%-1):_e%=f| 00002e40 25 21 38 3a 60 65 25 3d 66 25 21 31 32 3a e3 59 |%!8:`e%=f%!12:.Y| 00002e50 25 3d 30 b8 5a 62 25 2d 31 3a e3 58 25 3d 30 b8 |%=0.Zb%-1:.X%=0.| 00002e60 5f 62 25 2d 31 3a 66 25 21 30 3d 59 65 25 2b 58 |_b%-1:f%!0=Ye%+X| 00002e70 25 2a 62 66 25 3a 66 25 21 34 3d 60 65 25 2d 59 |%*bf%:f%!4=`e%-Y| 00002e80 25 2a 63 66 25 2d 53 25 3a 66 25 21 38 3d 59 65 |%*cf%-S%:f%!8=Ye| 00002e90 25 2b 58 25 2a 62 66 25 2b 53 25 3a 66 25 21 31 |%+X%*bf%+S%:f%!1| 00002ea0 32 3d 60 65 25 2d 59 25 2a 63 66 25 3a 66 25 21 |2=`e%-Y%*cf%:f%!| 00002eb0 31 36 3d 58 65 25 3a 66 25 21 32 30 3d 6c 63 25 |16=Xe%:f%!20=lc%| 00002ec0 3a 66 25 21 32 34 3d 6b 63 25 2b 32 36 2a 58 25 |:f%!24=kc%+26*X%| 00002ed0 3a 66 25 21 32 38 3d 31 3a 66 25 2b 3d 33 32 3a |:f%!28=1:f%+=32:| 00002ee0 ed 2c 3a 66 25 3d 69 25 2b 38 38 2b 33 32 2a 6b |.,:f%=i%+88+32*k| 00002ef0 66 25 3a 21 66 25 3d 59 65 25 2d 38 3a 66 25 21 |f%:!f%=Ye%-8:f%!| 00002f00 34 3d 5a 65 25 2d 38 3a 66 25 21 38 3d 5f 65 25 |4=Ze%-8:f%!8=_e%| 00002f10 2b 38 0d 2d c7 74 66 25 21 31 32 3d 60 65 25 2b |+8.-.tf%!12=`e%+| 00002f20 38 3a 69 25 21 38 34 3d 6d 66 25 3a c8 99 26 34 |8:i%!84=mf%:..&4| 00002f30 34 41 44 44 2c 35 2b 32 35 36 2c 69 25 2c 6e 66 |4ADD,5+256,i%,nf| 00002f40 25 2c 31 3a c8 99 26 34 30 30 43 31 2c 2c 69 25 |%,1:..&400C1,,i%| 00002f50 b8 74 25 3a f2 50 28 69 25 2c 74 25 29 3a de 41 |.t%:.P(i%,t%):.A| 00002f60 25 20 34 30 3a 69 25 28 30 29 3d 41 25 3a f2 51 |% 40:i%(0)=A%:.Q| 00002f70 28 41 25 2c 69 25 2b 38 38 2b 33 32 2a 6e 66 25 |(A%,i%+88+32*nf%| 00002f80 2c 74 25 29 3a e1 0d 2e 21 24 dd f2 44 61 3a e7 |,t%):...!$..Da:.| 00002f90 69 61 25 8c f2 66 28 22 4d 65 6e 75 22 29 8b f2 |ia%..f("Menu")..| 00002fa0 66 28 22 4d 65 6e 75 32 22 29 0d 2e ba 2e 78 66 |f("Menu2")....xf| 00002fb0 25 3d 33 3a 79 66 25 3d 34 3a 7a 66 25 3d 35 3a |%=3:yf%=4:zf%=5:| 00002fc0 41 66 25 3d 36 3a c8 99 26 34 30 30 43 31 2c 2c |Af%=6:..&400C1,,| 00002fd0 69 25 b8 42 66 25 3a e1 0d 2e f0 e2 dd f2 45 61 |i%.Bf%:.......Ea| 00002fe0 3a ea 65 25 2c 41 25 2c 42 25 2c 66 25 2c 43 66 |:.e%,A%,B%,f%,Cf| 00002ff0 25 2c 44 66 25 2c 62 66 25 2c 63 66 25 2c 45 66 |%,Df%,bf%,cf%,Ef| 00003000 25 3a f2 66 28 22 49 6e 73 74 22 29 3a 69 25 21 |%:.f("Inst"):i%!| 00003010 36 34 3d 55 25 3a 46 66 25 3d 31 3a 47 66 25 3d |64=U%:Ff%=1:Gf%=| 00003020 32 3a 48 66 25 3d 30 3a 49 66 25 3d 33 3a 4a 66 |2:Hf%=0:If%=3:Jf| 00003030 25 3d 34 3a 45 66 25 3d 35 3a 4b 66 25 3d 49 66 |%=4:Ef%=5:Kf%=If| 00003040 25 2b 32 2a 28 47 63 25 2d 31 29 3a 4c 66 25 3d |%+2*(Gc%-1):Lf%=| 00003050 4a 66 25 2b 32 2a 28 47 63 25 2d 31 29 3a 69 25 |Jf%+2*(Gc%-1):i%| 00003060 21 38 34 3d 4c 66 25 2b 31 3a 43 66 25 3d 69 25 |!84=Lf%+1:Cf%=i%| 00003070 2b 38 38 2b 49 66 25 2a 33 32 3a 44 66 25 3d 69 |+88+If%*32:Df%=i| 00003080 25 2b 38 38 2b 45 66 25 2a 33 32 3a 62 66 25 3d |%+88+Ef%*32:bf%=| 00003090 21 44 66 25 2d 21 43 66 25 3a 63 66 25 3d 44 66 |!Df%-!Cf%:cf%=Df| 000030a0 25 21 34 2d 43 66 25 21 34 3a 44 66 25 3d 69 25 |%!4-Cf%!4:Df%=i%| 000030b0 2b 38 38 2b 4a 66 25 2a 33 32 0d 30 58 e3 43 66 |+88+Jf%*32.0X.Cf| 000030c0 25 3d 69 25 2b 38 38 2b 49 66 25 2a 33 32 3a 66 |%=i%+88+If%*32:f| 000030d0 25 3d 43 66 25 3a de 41 25 20 28 32 36 2b 32 31 |%=Cf%:.A% (26+21| 000030e0 29 2a 47 63 25 3a e3 65 25 3d 30 b8 47 63 25 2d |)*Gc%:.e%=0.Gc%-| 000030f0 31 3a 21 66 25 3d 21 43 66 25 2b 62 66 25 2a 28 |1:!f%=!Cf%+bf%*(| 00003100 65 25 83 33 29 3a 66 25 21 34 3d 43 66 25 21 34 |e%.3):f%!4=Cf%!4| 00003110 2b 63 66 25 2a 28 65 25 81 33 29 3a 66 25 21 38 |+cf%*(e%.3):f%!8| 00003120 3d 43 66 25 21 38 2b 62 66 25 2a 28 65 25 83 33 |=Cf%!8+bf%*(e%.3| 00003130 29 3a 66 25 21 31 32 3d 43 66 25 21 31 32 2b 63 |):f%!12=Cf%!12+c| 00003140 66 25 2a 28 65 25 81 33 29 3a 66 25 21 31 36 3d |f%*(e%.3):f%!16=| 00003150 43 66 25 21 31 36 3a 66 25 21 32 30 3d 6c 63 25 |Cf%!16:f%!20=lc%| 00003160 3a 66 25 21 32 34 3d 41 25 3a 66 25 21 32 38 3d |:f%!24=A%:f%!28=| 00003170 31 3a 24 41 25 3d 22 53 22 2b 61 24 28 65 25 29 |1:$A%="S"+a$(e%)| 00003180 2b 22 2c 70 22 2b 61 24 28 65 25 29 2b bd 30 3a |+",p"+a$(e%)+.0:| 00003190 41 25 2b 3d 32 36 3a 66 25 2b 3d 33 32 0d 30 df |A%+=26:f%+=32.0.| 000031a0 da 21 66 25 3d 21 44 66 25 2b 62 66 25 2a 28 65 |.!f%=!Df%+bf%*(e| 000031b0 25 83 33 29 3a 66 25 21 34 3d 44 66 25 21 34 2b |%.3):f%!4=Df%!4+| 000031c0 63 66 25 2a 28 65 25 81 33 29 3a 66 25 21 38 3d |cf%*(e%.3):f%!8=| 000031d0 44 66 25 21 38 2b 62 66 25 2a 28 65 25 83 33 29 |Df%!8+bf%*(e%.3)| 000031e0 3a 66 25 21 31 32 3d 44 66 25 21 31 32 2b 63 66 |:f%!12=Df%!12+cf| 000031f0 25 2a 28 65 25 81 33 29 3a 66 25 21 31 36 3d 44 |%*(e%.3):f%!16=D| 00003200 66 25 21 31 36 3a 66 25 21 32 30 3d 41 25 3a 66 |f%!16:f%!20=A%:f| 00003210 25 21 32 34 3d 30 3a 66 25 21 32 38 3d 32 31 3a |%!24=0:f%!28=21:| 00003220 24 41 25 3d 62 24 28 65 25 29 2b bd 30 3a 41 25 |$A%=b$(e%)+.0:A%| 00003230 2b 3d 32 31 3a 66 25 2b 3d 33 32 3a ed 3a 66 25 |+=21:f%+=32:.:f%| 00003240 3d 69 25 2b 38 38 2b 46 66 25 2a 33 32 3a 41 25 |=i%+88+Ff%*32:A%| 00003250 3d 21 43 66 25 2b 62 66 25 2a 33 3a 21 66 25 3d |=!Cf%+bf%*3:!f%=| 00003260 21 66 25 2d 66 25 21 38 2b 41 25 2d 38 3a 66 25 |!f%-f%!8+A%-8:f%| 00003270 21 38 3d 41 25 2d 38 0d 31 78 db 41 25 3d 43 66 |!8=A%-8.1x.A%=Cf| 00003280 25 21 34 2b 63 66 25 2a 28 28 47 63 25 2d 33 29 |%!4+cf%*((Gc%-3)| 00003290 81 33 29 2d 34 3a 42 25 3d 66 25 21 31 32 2d 66 |.3)-4:B%=f%!12-f| 000032a0 25 21 34 3a 66 25 21 31 32 3d 41 25 2d 34 3a 66 |%!4:f%!12=A%-4:f| 000032b0 25 21 34 3d 41 25 2d 42 25 2d 34 3a 43 66 25 3d |%!4=A%-B%-4:Cf%=| 000032c0 66 25 3a 66 25 3d 69 25 2b 38 38 2b 47 66 25 2a |f%:f%=i%+88+Gf%*| 000032d0 33 32 3a 41 25 3d 21 43 66 25 3a 21 66 25 3d 21 |32:A%=!Cf%:!f%=!| 000032e0 66 25 2d 66 25 21 38 2b 41 25 2d 38 3a 66 25 21 |f%-f%!8+A%-8:f%!| 000032f0 38 3d 41 25 2d 38 3a 66 25 21 31 32 3d 43 66 25 |8=A%-8:f%!12=Cf%| 00003300 21 31 32 3a 66 25 21 34 3d 43 66 25 21 34 3a 66 |!12:f%!4=Cf%!4:f| 00003310 25 3d 43 66 25 3a 43 66 25 3d 69 25 2b 38 38 2b |%=Cf%:Cf%=i%+88+| 00003320 48 66 25 2a 33 32 3a 43 66 25 21 38 3d 66 25 21 |Hf%*32:Cf%!8=f%!| 00003330 38 2b 38 3a 43 66 25 21 34 3d 66 25 21 34 2d 38 |8+8:Cf%!4=f%!4-8| 00003340 3a 69 25 21 38 3d 69 25 21 30 2b 66 25 21 38 2b |:i%!8=i%!0+f%!8+| 00003350 31 32 0d 32 2c 29 69 25 21 34 3d 69 25 21 31 32 |12.2,)i%!4=i%!12| 00003360 2b 66 25 21 34 2d 31 32 3a c8 99 26 34 30 30 43 |+f%!4-12:..&400C| 00003370 31 2c 2c 69 25 b8 4d 66 25 3a e1 0d 32 59 e4 dd |1,,i%.Mf%:..2Y..| 00003380 f2 46 61 3a ea 66 25 2c 4e 66 25 2c 4f 66 25 2c |.Fa:.f%,Nf%,Of%,| 00003390 65 25 2c 41 25 3a f2 66 28 22 43 6f 6d 70 22 29 |e%,A%:.f("Comp")| 000033a0 3a 4f 66 25 3d 30 3a 50 66 25 3d 31 3a 51 66 25 |:Of%=0:Pf%=1:Qf%| 000033b0 3d 32 3a 52 66 25 3d 38 3a 53 66 25 3d 39 3a 54 |=2:Rf%=8:Sf%=9:T| 000033c0 66 25 3d 31 32 3a 55 66 25 3d 31 33 3a 56 66 25 |f%=12:Uf%=13:Vf%| 000033d0 3d 31 34 3a 57 66 25 3d 31 35 3a 58 66 25 3d 31 |=14:Wf%=15:Xf%=1| 000033e0 36 3a 59 66 25 3d 31 37 3a 5a 66 25 3d 31 38 3a |6:Yf%=17:Zf%=18:| 000033f0 5f 66 25 3d 33 38 3a 60 66 25 3d 32 33 3a 61 67 |_f%=38:`f%=23:ag| 00003400 25 3d 32 34 3a 62 67 25 3d 32 35 3a 63 67 25 3d |%=24:bg%=25:cg%=| 00003410 32 36 3a 64 67 25 3d 32 37 3a 65 67 25 3d 32 38 |26:dg%=27:eg%=28| 00003420 3a 66 67 25 3d 32 39 3a 4e 66 25 3d 33 30 3a 67 |:fg%=29:Nf%=30:g| 00003430 67 25 3d 33 31 3a 68 67 25 3d 33 32 3a 69 67 25 |g%=31:hg%=32:ig%| 00003440 3d 34 33 3a 6a 67 25 3d 33 35 3a 6b 67 25 3d 33 |=43:jg%=35:kg%=3| 00003450 36 3a 6c 67 25 3d 33 37 3a 6d 67 25 3d 33 39 0d |6:lg%=37:mg%=39.| 00003460 34 63 d6 6e 67 25 3d 33 33 3a 6f 67 25 3d 34 30 |4c.ng%=33:og%=40| 00003470 3a 70 67 25 3d 34 31 3a 71 67 25 3d 34 32 3a 66 |:pg%=41:qg%=42:f| 00003480 25 3d 69 25 2b 38 38 2b 33 32 2a 61 67 25 3a 64 |%=i%+88+32*ag%:d| 00003490 25 28 31 2c 30 29 3d 66 25 21 30 3a 64 25 28 31 |%(1,0)=f%!0:d%(1| 000034a0 2c 31 29 3d 66 25 21 34 3a 64 25 28 31 2c 32 29 |,1)=f%!4:d%(1,2)| 000034b0 3d 66 25 21 38 3a 64 25 28 31 2c 33 29 3d 66 25 |=f%!8:d%(1,3)=f%| 000034c0 21 31 32 3a c8 99 26 34 34 41 44 44 2c 35 2b 32 |!12:..&44ADD,5+2| 000034d0 35 36 2c 69 25 2c 61 67 25 2c 31 3a c8 99 26 34 |56,i%,ag%,1:..&4| 000034e0 34 41 44 44 2c 35 2b 32 35 36 2c 69 25 2c 4f 66 |4ADD,5+256,i%,Of| 000034f0 25 2c 31 3a 66 25 3d 69 25 2b 38 38 2b 4f 66 25 |%,1:f%=i%+88+Of%| 00003500 2a 33 32 3a 72 67 25 3d 66 25 21 30 3a 73 67 25 |*32:rg%=f%!0:sg%| 00003510 3d 66 25 21 34 3a 74 67 25 3d 66 25 21 38 3a 75 |=f%!4:tg%=f%!8:u| 00003520 67 25 3d 66 25 21 31 32 3a 41 25 3d 59 66 25 2d |g%=f%!12:A%=Yf%-| 00003530 4f 66 25 2b 31 0d 35 0e e4 c8 99 26 34 34 41 44 |Of%+1.5....&44AD| 00003540 44 2c 35 2b 32 35 36 2c 69 25 2c 4f 66 25 2c 31 |D,5+256,i%,Of%,1| 00003550 3a c8 99 26 34 34 41 44 44 2c 36 2b 32 35 36 2c |:..&44ADD,6+256,| 00003560 69 25 2c 6e 67 25 2c 30 2c 32 5e 32 3a e3 65 25 |i%,ng%,0,2^2:.e%| 00003570 3d 4f 66 25 b8 57 66 25 3a c8 99 26 34 34 41 44 |=Of%.Wf%:..&44AD| 00003580 44 2c 36 2b 32 35 36 2c 69 25 2c 65 25 2c 30 2c |D,6+256,i%,e%,0,| 00003590 32 5e 32 3a ed 3a de 76 67 25 20 34 2b 33 32 2a |2^2:.:.vg% 4+32*| 000035a0 41 25 3a c8 99 26 34 34 41 43 37 2c 33 32 2a 41 |A%:..&44AC7,32*A| 000035b0 25 2c 69 25 2b 38 38 2b 33 32 2a 4f 66 25 2c 76 |%,i%+88+32*Of%,v| 000035c0 67 25 2b 34 3a 21 76 67 25 3d 41 25 3a e3 65 25 |g%+4:!vg%=A%:.e%| 000035d0 3d 4f 66 25 b8 59 66 25 3a c8 99 26 34 34 41 44 |=Of%.Yf%:..&44AD| 000035e0 44 2c 35 2b 32 35 36 2c 69 25 2c 65 25 2c 31 3a |D,5+256,i%,e%,1:| 000035f0 ed 3a c8 99 26 34 34 41 44 44 2c 35 2b 32 35 36 |.:..&44ADD,5+256| 00003600 2c 69 25 2c 4e 66 25 2c 31 3a c8 99 26 34 30 30 |,i%,Nf%,1:..&400| 00003610 43 31 2c 2c 69 25 b8 6f 25 0d 35 83 b4 f2 50 28 |C1,,i%.o%.5...P(| 00003620 69 25 2c 6f 25 29 3a de 41 25 20 34 30 3a f2 51 |i%,o%):.A% 40:.Q| 00003630 28 41 25 2c 69 25 2b 38 38 2b 33 32 2a 4e 66 25 |(A%,i%+88+32*Nf%| 00003640 2c 6f 25 29 3a 69 25 28 31 29 3d 41 25 3a 51 66 |,o%):i%(1)=A%:Qf| 00003650 25 2d 3d 4f 66 25 3a 52 66 25 2d 3d 4f 66 25 3a |%-=Of%:Rf%-=Of%:| 00003660 53 66 25 2d 3d 4f 66 25 3a 54 66 25 2d 3d 4f 66 |Sf%-=Of%:Tf%-=Of| 00003670 25 3a 56 66 25 2d 3d 4f 66 25 3a 57 66 25 2d 3d |%:Vf%-=Of%:Wf%-=| 00003680 4f 66 25 3a 58 66 25 2d 3d 4f 66 25 3a 59 66 25 |Of%:Xf%-=Of%:Yf%| 00003690 2d 3d 4f 66 25 3a 4f 66 25 3d 30 3a e3 65 25 3d |-=Of%:Of%=0:.e%=| 000036a0 51 66 25 b8 52 66 25 3a 21 28 76 67 25 2b 34 2b |Qf%.Rf%:!(vg%+4+| 000036b0 32 34 2b 33 32 2a 65 25 29 3d 6b 63 25 2b 32 36 |24+32*e%)=kc%+26| 000036c0 2a 28 65 25 2d 51 66 25 29 3a ed 3a e1 0d 36 25 |*(e%-Qf%):.:..6%| 000036d0 e4 dd f2 4b 61 3a ea 66 25 2c 77 67 25 2c 78 67 |...Ka:.f%,wg%,xg| 000036e0 25 2c 65 25 2c 41 25 3a f2 66 28 22 52 74 6d 42 |%,e%,A%:.f("RtmB| 000036f0 22 29 3a 78 67 25 3d 30 3a 79 67 25 3d 31 3a 7a |"):xg%=0:yg%=1:z| 00003700 67 25 3d 32 3a 41 67 25 3d 38 3a 42 67 25 3d 39 |g%=2:Ag%=8:Bg%=9| 00003710 3a 43 67 25 3d 31 32 3a 44 67 25 3d 31 33 3a 45 |:Cg%=12:Dg%=13:E| 00003720 67 25 3d 31 34 3a 46 67 25 3d 31 35 3a 47 67 25 |g%=14:Fg%=15:Gg%| 00003730 3d 31 36 3a 48 67 25 3d 31 37 3a 49 67 25 3d 31 |=16:Hg%=17:Ig%=1| 00003740 38 3a 4a 67 25 3d 34 32 3a 4b 67 25 3d 32 30 3a |8:Jg%=42:Kg%=20:| 00003750 4c 67 25 3d 32 31 3a 4d 67 25 3d 32 32 3a 4e 67 |Lg%=21:Mg%=22:Ng| 00003760 25 3d 32 34 3a 4f 67 25 3d 32 35 3a 50 67 25 3d |%=24:Og%=25:Pg%=| 00003770 32 37 3a 77 67 25 3d 32 39 3a 51 67 25 3d 33 31 |27:wg%=29:Qg%=31| 00003780 3a 52 67 25 3d 34 30 3a 53 67 25 3d 33 34 3a 54 |:Rg%=40:Sg%=34:T| 00003790 67 25 3d 33 35 3a 55 67 25 3d 33 36 3a 56 67 25 |g%=35:Ug%=36:Vg%| 000037a0 3d 33 37 3a 57 67 25 3d 33 38 3a 58 67 25 3d 33 |=37:Wg%=38:Xg%=3| 000037b0 39 0d 38 53 e7 59 67 25 3d 34 31 3a 5a 67 25 3d |9.8S.Yg%=41:Zg%=| 000037c0 32 38 3a 5f 67 25 3d 33 30 3a 66 25 3d 69 25 2b |28:_g%=30:f%=i%+| 000037d0 38 38 2b 33 32 2a 4e 67 25 3a 64 25 28 33 2c 30 |88+32*Ng%:d%(3,0| 000037e0 29 3d 66 25 21 30 3a 64 25 28 33 2c 31 29 3d 66 |)=f%!0:d%(3,1)=f| 000037f0 25 21 34 3a 64 25 28 33 2c 32 29 3d 66 25 21 38 |%!4:d%(3,2)=f%!8| 00003800 3a 64 25 28 33 2c 33 29 3d 66 25 21 31 32 3a c8 |:d%(3,3)=f%!12:.| 00003810 99 26 34 34 41 44 44 2c 35 2b 32 35 36 2c 69 25 |.&44ADD,5+256,i%| 00003820 2c 4e 67 25 2c 31 3a c8 99 26 34 34 41 44 44 2c |,Ng%,1:..&44ADD,| 00003830 35 2b 32 35 36 2c 69 25 2c 78 67 25 2c 31 3a 66 |5+256,i%,xg%,1:f| 00003840 25 3d 69 25 2b 38 38 2b 78 67 25 2a 33 32 3a 60 |%=i%+88+xg%*32:`| 00003850 67 25 3d 66 25 21 30 3a 61 68 25 3d 66 25 21 34 |g%=f%!0:ah%=f%!4| 00003860 3a 62 68 25 3d 66 25 21 38 2d 31 3a 63 68 25 3d |:bh%=f%!8-1:ch%=| 00003870 66 25 21 31 32 2d 31 3a c8 99 26 34 34 41 44 41 |f%!12-1:..&44ADA| 00003880 2c 67 25 2c 38 38 3a 67 25 21 30 3d 60 67 25 3a |,g%,88:g%!0=`g%:| 00003890 67 25 21 34 3d 61 68 25 0d 39 19 ce 67 25 21 38 |g%!4=ah%.9..g%!8| 000038a0 3d 62 68 25 2d 32 3a 67 25 21 31 32 3d 63 68 25 |=bh%-2:g%!12=ch%| 000038b0 2d 32 3a 67 25 21 32 30 3d 51 62 25 3a 67 25 21 |-2:g%!20=Qb%:g%!| 000038c0 32 34 3d 2d 31 3a 67 25 21 32 38 3d 26 38 30 30 |24=-1:g%!28=&800| 000038d0 30 30 30 36 32 3a 67 25 21 33 32 3d 26 30 30 30 |00062:g%!32=&000| 000038e0 37 30 32 46 46 3a 67 25 21 34 30 3d 2d 50 62 25 |702FF:g%!40=-Pb%| 000038f0 3a 67 25 21 34 34 3d 2d 39 30 30 30 30 3a 67 25 |:g%!44=-90000:g%| 00003900 21 34 38 3d 28 62 68 25 2d 60 67 25 29 2d 50 62 |!48=(bh%-`g%)-Pb| 00003910 25 3a 67 25 21 35 32 3d 51 62 25 3a 67 25 21 36 |%:g%!52=Qb%:g%!6| 00003920 30 3d 33 3c 3c 31 32 3a 67 25 21 36 34 3d 72 25 |0=3<<12:g%!64=r%| 00003930 3a c8 99 26 34 30 30 43 31 2c 2c 67 25 b8 64 68 |:..&400C1,,g%.dh| 00003940 25 3a c8 99 26 34 34 41 44 44 2c 35 2b 32 35 36 |%:..&44ADD,5+256| 00003950 2c 69 25 2c 78 67 25 2c 31 3a 41 25 3d 47 67 25 |,i%,xg%,1:A%=Gg%| 00003960 2d 78 67 25 2b 31 0d 39 b2 dd c8 99 26 34 34 41 |-xg%+1.9....&44A| 00003970 44 44 2c 36 2b 32 35 36 2c 69 25 2c 49 67 25 2c |DD,6+256,i%,Ig%,| 00003980 30 2c 32 5e 32 3a e3 65 25 3d 78 67 25 b8 47 67 |0,2^2:.e%=xg%.Gg| 00003990 25 3a c8 99 26 34 34 41 44 44 2c 36 2b 32 35 36 |%:..&44ADD,6+256| 000039a0 2c 69 25 2c 65 25 2c 30 2c 32 5e 32 3a ed 3a de |,i%,e%,0,2^2:.:.| 000039b0 65 68 25 20 34 2b 33 32 2a 41 25 3a c8 99 26 34 |eh% 4+32*A%:..&4| 000039c0 34 41 43 37 2c 33 32 2a 41 25 2c 69 25 2b 38 38 |4AC7,32*A%,i%+88| 000039d0 2b 33 32 2a 78 67 25 2c 65 68 25 2b 34 3a 21 65 |+32*xg%,eh%+4:!e| 000039e0 68 25 3d 41 25 3a e3 65 25 3d 78 67 25 b8 47 67 |h%=A%:.e%=xg%.Gg| 000039f0 25 3a c8 99 26 34 34 41 44 44 2c 35 2b 32 35 36 |%:..&44ADD,5+256| 00003a00 2c 69 25 2c 65 25 2c 31 3a ed 3a c8 99 26 34 34 |,i%,e%,1:.:..&44| 00003a10 41 44 44 2c 35 2b 32 35 36 2c 69 25 2c 77 67 25 |ADD,5+256,i%,wg%| 00003a20 2c 31 3a c8 99 26 34 30 30 43 31 2c 2c 69 25 b8 |,1:..&400C1,,i%.| 00003a30 6b 25 3a f2 50 28 69 25 2c 6b 25 29 3a de 41 25 |k%:.P(i%,k%):.A%| 00003a40 20 34 30 0d 3a 30 9a f2 51 28 41 25 2c 69 25 2b | 40.:0..Q(A%,i%+| 00003a50 38 38 2b 33 32 2a 77 67 25 2c 6b 25 29 3a 69 25 |88+32*wg%,k%):i%| 00003a60 28 33 29 3d 41 25 3a 7a 67 25 2d 3d 78 67 25 3a |(3)=A%:zg%-=xg%:| 00003a70 41 67 25 2d 3d 78 67 25 3a 42 67 25 2d 3d 78 67 |Ag%-=xg%:Bg%-=xg| 00003a80 25 3a 43 67 25 2d 3d 78 67 25 3a 45 67 25 2d 3d |%:Cg%-=xg%:Eg%-=| 00003a90 78 67 25 3a 46 67 25 2d 3d 78 67 25 3a 47 67 25 |xg%:Fg%-=xg%:Gg%| 00003aa0 2d 3d 78 67 25 3a 78 67 25 3d 30 3a e3 65 25 3d |-=xg%:xg%=0:.e%=| 00003ab0 7a 67 25 b8 41 67 25 3a 21 28 65 68 25 2b 34 2b |zg%.Ag%:!(eh%+4+| 00003ac0 32 34 2b 33 32 2a 65 25 29 3d 6b 63 25 2b 32 36 |24+32*e%)=kc%+26| 00003ad0 2a 28 65 25 2d 7a 67 25 29 3a ed 3a e1 0d 3a ae |*(e%-zg%):.:..:.| 00003ae0 5c dd f2 48 61 3a ea 66 25 2c 66 68 25 2c 67 68 |\..Ha:.f%,fh%,gh| 00003af0 25 2c 65 25 2c 41 25 3a f2 66 28 22 43 72 64 42 |%,e%,A%:.f("CrdB| 00003b00 22 29 3a 68 68 25 3d 33 30 3a 69 68 25 3d 32 3a |"):hh%=30:ih%=2:| 00003b10 6a 68 25 3d 38 3a 6b 68 25 3d 37 3a e7 6b 68 25 |jh%=8:kh%=7:.kh%| 00003b20 3c 3e 37 8c 85 30 2c 22 52 65 61 73 73 65 6d 62 |<>7..0,"Reassemb| 00003b30 6c 65 20 4d 43 6f 64 65 22 0d 3b 74 e1 6c 68 25 |le MCode".;t.lh%| 00003b40 3d 39 3a 6d 68 25 3d 6c 68 25 2b 6b 68 25 2a 31 |=9:mh%=lh%+kh%*1| 00003b50 3a 6e 68 25 3d 6c 68 25 2b 6b 68 25 2a 32 3a 6f |:nh%=lh%+kh%*2:o| 00003b60 68 25 3d 33 30 3a 70 68 25 3d 33 32 3a 71 68 25 |h%=30:ph%=32:qh%| 00003b70 3d 33 33 3a 72 68 25 3d 33 34 3a 73 68 25 3d 33 |=33:rh%=34:sh%=3| 00003b80 35 3a 74 68 25 3d 33 36 3a 66 68 25 3d 34 31 3a |5:th%=36:fh%=41:| 00003b90 75 68 25 3d 34 34 3a 76 68 25 3d 35 32 3a 77 68 |uh%=44:vh%=52:wh| 00003ba0 25 3d 33 39 3a 78 68 25 3d 33 37 3a 79 68 25 3d |%=39:xh%=37:yh%=| 00003bb0 34 37 3a 7a 68 25 3d 34 36 3a 41 68 25 3d 34 30 |47:zh%=46:Ah%=40| 00003bc0 3a 42 68 25 3d 34 39 3a 43 68 25 3d 35 30 3a 44 |:Bh%=49:Ch%=50:D| 00003bd0 68 25 3d 35 31 3a 45 68 25 3d 34 32 3a 46 68 25 |h%=51:Eh%=42:Fh%| 00003be0 3d 34 33 3a 66 25 3d 69 25 2b 38 38 2b 33 32 2a |=43:f%=i%+88+32*| 00003bf0 7a 68 25 3a 64 25 28 32 2c 30 29 3d 66 25 21 30 |zh%:d%(2,0)=f%!0| 00003c00 3a 64 25 28 32 2c 31 29 3d 66 25 21 34 3a 64 25 |:d%(2,1)=f%!4:d%| 00003c10 28 32 2c 32 29 3d 66 25 21 38 0d 3c 67 d3 64 25 |(2,2)=f%!8.<g.d%| 00003c20 28 32 2c 33 29 3d 66 25 21 31 32 3a c8 99 26 34 |(2,3)=f%!12:..&4| 00003c30 34 41 44 44 2c 35 2b 32 35 36 2c 69 25 2c 7a 68 |4ADD,5+256,i%,zh| 00003c40 25 2c 31 3a 47 68 25 3d 6d 68 25 2b 6b 68 25 2d |%,1:Gh%=mh%+kh%-| 00003c50 69 68 25 3a de 48 68 25 20 34 2b 33 32 2a 47 68 |ih%:.Hh% 4+32*Gh| 00003c60 25 3a c8 99 26 34 34 41 43 37 2c 33 32 2a 47 68 |%:..&44AC7,32*Gh| 00003c70 25 2c 69 25 2b 38 38 2b 33 32 2a 69 68 25 2c 48 |%,i%+88+32*ih%,H| 00003c80 68 25 2b 34 3a 21 48 68 25 3d 47 68 25 3a e3 65 |h%+4:!Hh%=Gh%:.e| 00003c90 25 3d 69 68 25 b8 6d 68 25 2d 31 3a c8 99 26 34 |%=ih%.mh%-1:..&4| 00003ca0 34 41 44 44 2c 35 2b 32 35 36 2c 69 25 2c 65 25 |4ADD,5+256,i%,e%| 00003cb0 2c 31 3a ed 3a e3 65 25 3d 6d 68 25 b8 6d 68 25 |,1:.:.e%=mh%.mh%| 00003cc0 2b 6b 68 25 2d 31 3a c8 99 26 34 34 41 44 44 2c |+kh%-1:..&44ADD,| 00003cd0 36 2b 32 35 36 2c 69 25 2c 65 25 2c 33 3c 3c 31 |6+256,i%,e%,3<<1| 00003ce0 32 2c 26 46 46 46 46 46 46 46 46 3a ed 0d 3c dc |2,&FFFFFFFF:..<.| 00003cf0 d6 c8 99 26 34 34 41 44 44 2c 35 2b 32 35 36 2c |...&44ADD,5+256,| 00003d00 69 25 2c 66 68 25 2c 31 3a c8 99 26 34 30 30 43 |i%,fh%,1:..&400C| 00003d10 31 2c 2c 69 25 b8 6c 25 3a f2 50 28 69 25 2c 6c |1,,i%.l%:.P(i%,l| 00003d20 25 29 3a de 41 25 20 34 30 3a f2 51 28 41 25 2c |%):.A% 40:.Q(A%,| 00003d30 69 25 2b 38 38 2b 33 32 2a 66 68 25 2c 6c 25 29 |i%+88+32*fh%,l%)| 00003d40 3a 69 25 28 32 29 3d 41 25 3a 6a 68 25 2d 3d 69 |:i%(2)=A%:jh%-=i| 00003d50 68 25 3a 6c 68 25 2d 3d 69 68 25 3a 49 68 25 3d |h%:lh%-=ih%:Ih%=| 00003d60 48 68 25 2b 34 2b 28 6d 68 25 2d 69 68 25 29 2a |Hh%+4+(mh%-ih%)*| 00003d70 33 32 3a 69 68 25 2d 3d 69 68 25 3a e3 65 25 3d |32:ih%-=ih%:.e%=| 00003d80 69 68 25 b8 6a 68 25 3a 21 28 48 68 25 2b 34 2b |ih%.jh%:!(Hh%+4+| 00003d90 32 34 2b 33 32 2a 65 25 29 3d 6b 63 25 2b 32 36 |24+32*e%)=kc%+26| 00003da0 2a 28 65 25 2d 69 68 25 29 3a ed 3a e3 65 25 3d |*(e%-ih%):.:.e%=| 00003db0 30 b8 6b 68 25 2d 31 3a 41 25 3d 68 25 28 65 25 |0.kh%-1:A%=h%(e%| 00003dc0 2c 30 29 0d 3d 63 60 c8 99 26 34 34 41 44 44 2c |,0).=c`..&44ADD,| 00003dd0 31 2b 35 31 32 2c 6c 25 2c 65 25 2b 6c 68 25 2c |1+512,l%,e%+lh%,| 00003de0 22 73 22 2b 61 24 28 41 25 2d 31 29 2b 22 2c 70 |"s"+a$(A%-1)+",p| 00003df0 22 2b 61 24 28 41 25 2d 31 29 2c 2c 48 68 25 3a |"+a$(A%-1),,Hh%:| 00003e00 ed 3a de 4a 68 25 20 6b 68 25 2a 32 34 3a c8 99 |.:.Jh% kh%*24:..| 00003e10 26 34 34 41 44 41 2c 4a 68 25 2c 6b 68 25 2a 32 |&44ADA,Jh%,kh%*2| 00003e20 34 3a e1 0d 3d 90 7b dd f2 66 28 61 24 29 3a ea |4:..=.{..f(a$):.| 00003e30 4e 25 3a 24 65 64 25 3d 61 24 2b bd 30 3a c8 99 |N%:$ed%=a$+.0:..| 00003e40 26 34 30 30 44 42 2c 2c 69 25 2c 69 64 25 2c 64 |&400DB,,i%,id%,d| 00003e50 64 25 2b 68 64 25 2c 2d 31 2c 65 64 25 2c 30 b8 |d%+hd%,-1,ed%,0.| 00003e60 2c 2c 69 64 25 2c 2c 2c 2c 4e 25 3a e7 4e 25 3d |,,id%,,,,N%:.N%=| 00003e70 30 8c f2 62 28 22 54 65 6d 70 6c 61 74 65 20 6e |0..b("Template n| 00003e80 6f 74 20 66 6f 75 6e 64 20 66 6f 72 20 22 2b 61 |ot found for "+a| 00003e90 24 2b 22 20 77 69 6e 64 6f 77 22 2c b9 29 0d 3e |$+" window",.).>| 00003ea0 20 0e 69 25 21 36 34 3d 55 25 3a e1 0d 3e 32 49 | .i%!64=U%:..>2I| 00003eb0 dd f2 51 28 41 25 2c 42 25 2c 6e 25 29 3a 21 41 |..Q(A%,B%,n%):!A| 00003ec0 25 3d 6e 25 3a 41 25 21 34 3d 42 25 21 30 3a 41 |%=n%:A%!4=B%!0:A| 00003ed0 25 21 38 3d 42 25 21 34 2b 65 62 25 3a 41 25 21 |%!8=B%!4+eb%:A%!| 00003ee0 31 32 3d 42 25 21 38 3a 41 25 21 31 36 3d 42 25 |12=B%!8:A%!16=B%| 00003ef0 21 31 32 3a e1 0d 3e 7a 6d dd f2 50 28 69 25 2c |!12:..>zm..P(i%,| 00003f00 6e 25 29 3a 66 25 28 66 64 25 2c 30 29 3d 6e 25 |n%):f%(fd%,0)=n%| 00003f10 3a 66 25 28 66 64 25 2c 31 29 3d 69 25 21 38 2d |:f%(fd%,1)=i%!8-| 00003f20 69 25 21 30 3a 66 25 28 66 64 25 2c 32 29 3d 69 |i%!0:f%(fd%,2)=i| 00003f30 25 21 31 32 2d 69 25 21 34 3a 66 25 28 66 64 25 |%!12-i%!4:f%(fd%| 00003f40 2c 33 29 3d 69 25 21 31 36 3a 66 25 28 66 64 25 |,3)=i%!16:f%(fd%| 00003f50 2c 34 29 3d 69 25 21 32 30 3a 66 64 25 2b 3d 31 |,4)=i%!20:fd%+=1| 00003f60 3a e1 0d 3e cb da dd f2 4c 61 3a ea 4b 68 25 2c |:..>....La:.Kh%,| 00003f70 76 25 2c 4c 68 25 2c 4d 68 25 3a 76 25 3d 31 30 |v%,Lh%,Mh%:v%=10| 00003f80 32 34 3a de 4d 68 25 20 76 25 3a e3 4b 68 25 3d |24:.Mh% v%:.Kh%=| 00003f90 38 b8 31 30 88 32 3a 50 25 3d 4d 68 25 3a 4c 25 |8.10.2:P%=Mh%:L%| 00003fa0 3d 4d 68 25 2b 76 25 3a 5b 4f 50 54 20 4b 68 25 |=Mh%+v%:[OPT Kh%| 00003fb0 3a 2e 4e 68 25 3a 45 51 55 44 20 4c 68 25 2d 4e |:.Nh%:EQUD Lh%-N| 00003fc0 68 25 3a 45 51 55 44 20 76 64 25 3a 45 51 55 44 |h%:EQUD vd%:EQUD| 00003fd0 20 4f 68 25 2d 50 68 25 2b 38 3a 45 51 55 44 30 | Oh%-Ph%+8:EQUD0| 00003fe0 3a 2e 50 68 25 3a 45 51 55 44 30 3a 45 51 55 44 |:.Ph%:EQUD0:EQUD| 00003ff0 25 30 31 31 31 30 31 31 31 30 30 30 31 30 30 31 |%011101110001001| 00004000 30 3a 45 51 55 44 20 72 64 25 3a 45 51 55 44 20 |0:EQUD rd%:EQUD | 00004010 73 64 25 3a 45 51 55 44 30 3a 45 51 55 44 30 3a |sd%:EQUD0:EQUD0:| 00004020 45 51 55 44 20 51 68 25 3a 45 51 55 44 2d 31 3a |EQUD Qh%:EQUD-1:| 00004030 2e 4f 68 25 3a 45 51 55 44 20 6b 25 0d 3f ac cc |.Oh%:EQUD k%.?..| 00004040 45 51 55 44 20 4c 68 25 2d 52 68 25 3a 2e 52 68 |EQUD Lh%-Rh%:.Rh| 00004050 25 3a 45 51 55 44 30 3a 45 51 55 44 20 64 68 25 |%:EQUD0:EQUD dh%| 00004060 3a 45 51 55 44 25 30 31 31 31 30 31 31 31 31 30 |:EQUD%0111011110| 00004070 30 31 31 30 31 30 3a 45 51 55 44 28 60 67 25 2b |011010:EQUD(`g%+| 00004080 62 68 25 29 2f 32 3a 45 51 55 44 28 63 68 25 2b |bh%)/2:EQUD(ch%+| 00004090 61 68 25 29 2f 32 2b 31 3a 45 51 55 44 30 3a 45 |ah%)/2+1:EQUD0:E| 000040a0 51 55 44 30 3a 45 51 55 44 30 3a 45 51 55 44 2d |QUD0:EQUD0:EQUD-| 000040b0 31 3a 45 51 55 44 2d 31 3a 2e 4c 68 25 3a 2e 51 |1:EQUD-1:.Lh%:.Q| 000040c0 68 25 3a 45 51 55 44 30 3a 45 51 55 44 31 3a 45 |h%:EQUD0:EQUD1:E| 000040d0 51 55 44 30 3a 45 51 55 44 36 3a 45 51 55 44 31 |QUD0:EQUD6:EQUD1| 000040e0 3a 45 51 55 44 31 2d 31 3a 45 51 55 44 2d 31 3a |:EQUD1-1:EQUD-1:| 000040f0 45 51 55 44 2d 31 3a 45 51 55 44 30 3a 2e 53 68 |EQUD-1:EQUD0:.Sh| 00004100 25 3a 45 51 55 44 31 32 0d 40 9f a6 45 51 55 44 |%:EQUD12.@..EQUD| 00004110 20 75 64 25 3a 45 51 55 44 35 32 3a 45 51 55 44 | ud%:EQUD52:EQUD| 00004120 31 3a 45 51 55 44 31 3a 45 51 55 44 30 3a 45 51 |1:EQUD1:EQUD0:EQ| 00004130 55 44 30 3a 45 51 55 44 30 3a 2e 54 68 25 3a 45 |UD0:EQUD0:.Th%:E| 00004140 51 55 44 30 3a 45 51 55 44 2d 74 64 25 3a 45 51 |QUD0:EQUD-td%:EQ| 00004150 55 44 20 75 64 25 3a 45 51 55 44 30 3a 45 51 55 |UD ud%:EQUD0:EQU| 00004160 44 20 75 64 25 3a 45 51 55 44 31 3a 45 51 55 44 |D ud%:EQUD1:EQUD| 00004170 26 31 30 30 30 30 30 36 32 3a 45 51 55 42 31 3a |&10000062:EQUB1:| 00004180 45 51 55 42 31 30 3a 45 51 55 42 30 3a 45 51 55 |EQUB10:EQUB0:EQU| 00004190 42 30 3a 45 51 55 53 22 46 69 6c 65 73 22 2b bd |B0:EQUS"Files"+.| 000041a0 30 3a 41 4c 49 47 4e 3a 20 5d 3a ed 3a e1 0d 41 |0:ALIGN: ]:.:..A| 000041b0 77 e3 dd f2 70 61 3a ea 67 63 25 2c 55 68 25 2c |w...pa:.gc%,Uh%,| 000041c0 6a 61 25 2c 62 24 2c 41 25 3a c8 99 26 34 31 31 |ja%,b$,A%:..&411| 000041d0 43 33 b8 55 68 25 3a 56 68 25 3d 8e 28 22 3c 4d |C3.Uh%:Vh%=.("<M| 000041e0 75 73 69 63 42 6f 78 44 24 44 69 72 3e 2e 4d 43 |usicBoxD$Dir>.MC| 000041f0 6f 64 65 56 61 72 73 22 29 3a f2 61 28 57 68 25 |odeVars"):.a(Wh%| 00004200 29 3a f2 61 28 58 68 25 29 3a f2 61 28 59 68 25 |):.a(Xh%):.a(Yh%| 00004210 29 3a f2 61 28 5a 68 25 29 3a f2 61 28 5f 68 25 |):.a(Zh%):.a(_h%| 00004220 29 3a f2 61 28 60 68 25 29 3a f2 61 28 61 69 25 |):.a(`h%):.a(ai%| 00004230 29 3a f2 61 28 62 69 25 29 3a f2 61 28 63 69 25 |):.a(bi%):.a(ci%| 00004240 29 3a f2 61 28 64 69 25 29 3a f2 61 28 65 69 25 |):.a(di%):.a(ei%| 00004250 29 3a f2 61 28 66 69 25 29 3a f2 61 28 67 69 25 |):.a(fi%):.a(gi%| 00004260 29 3a f2 61 28 68 69 25 29 3a f2 61 28 69 69 25 |):.a(hi%):.a(ii%| 00004270 29 3a f2 61 28 6a 69 25 29 3a f2 61 28 6b 69 25 |):.a(ji%):.a(ki%| 00004280 29 3a f2 61 28 6c 69 25 29 3a f2 61 28 6d 69 25 |):.a(li%):.a(mi%| 00004290 29 0d 42 a0 e3 f2 61 28 6e 69 25 29 3a f2 61 28 |).B...a(ni%):.a(| 000042a0 6f 69 25 29 3a f2 61 28 70 69 25 29 3a f2 61 28 |oi%):.a(pi%):.a(| 000042b0 71 69 25 29 3a f2 61 28 72 69 25 29 3a f2 61 28 |qi%):.a(ri%):.a(| 000042c0 73 69 25 29 3a f2 61 28 74 69 25 29 3a f2 61 28 |si%):.a(ti%):.a(| 000042d0 75 69 25 29 3a f2 61 28 76 69 25 29 3a f2 61 28 |ui%):.a(vi%):.a(| 000042e0 77 69 25 29 3a f2 61 28 78 69 25 29 3a f2 61 28 |wi%):.a(xi%):.a(| 000042f0 79 69 25 29 3a f2 61 28 7a 69 25 29 3a f2 61 28 |yi%):.a(zi%):.a(| 00004300 41 69 25 29 3a f2 61 28 42 69 25 29 3a f2 61 28 |Ai%):.a(Bi%):.a(| 00004310 43 69 25 29 3a f2 61 28 44 69 25 29 3a f2 61 28 |Ci%):.a(Di%):.a(| 00004320 45 69 25 29 3a f2 61 28 46 69 25 29 3a f2 61 28 |Ei%):.a(Fi%):.a(| 00004330 47 69 25 29 3a f2 61 28 48 69 25 29 3a f2 61 28 |Gi%):.a(Hi%):.a(| 00004340 49 69 25 29 3a f2 61 28 4a 69 25 29 3a f2 61 28 |Ii%):.a(Ji%):.a(| 00004350 4b 69 25 29 3a f2 61 28 4c 69 25 29 3a f2 61 28 |Ki%):.a(Li%):.a(| 00004360 4d 69 25 29 3a f2 61 28 4e 69 25 29 3a f2 61 28 |Mi%):.a(Ni%):.a(| 00004370 4f 69 25 29 0d 43 9c e3 f2 61 28 50 69 25 29 3a |Oi%).C...a(Pi%):| 00004380 f2 61 28 51 69 25 29 3a f2 61 28 52 69 25 29 3a |.a(Qi%):.a(Ri%):| 00004390 f2 61 28 53 69 25 29 3a f2 61 28 54 69 25 29 3a |.a(Si%):.a(Ti%):| 000043a0 f2 61 28 55 69 25 29 3a f2 61 28 56 69 25 29 3a |.a(Ui%):.a(Vi%):| 000043b0 f2 61 28 57 69 25 29 3a f2 61 28 58 69 25 29 3a |.a(Wi%):.a(Xi%):| 000043c0 f2 61 28 59 69 25 29 3a f2 61 28 5a 69 25 29 3a |.a(Yi%):.a(Zi%):| 000043d0 f2 61 28 5f 69 25 29 3a f2 61 28 60 69 25 29 3a |.a(_i%):.a(`i%):| 000043e0 f2 61 28 61 6a 25 29 3a f2 61 28 62 6a 25 29 3a |.a(aj%):.a(bj%):| 000043f0 f2 61 28 63 6a 25 29 3a f2 61 28 64 6a 25 29 3a |.a(cj%):.a(dj%):| 00004400 f2 61 28 65 6a 25 29 3a f2 61 28 66 6a 25 29 3a |.a(ej%):.a(fj%):| 00004410 f2 61 28 67 6a 25 29 3a f2 61 28 68 6a 25 29 3a |.a(gj%):.a(hj%):| 00004420 f2 61 28 69 6a 25 29 3a f2 61 28 6a 6a 25 29 3a |.a(ij%):.a(jj%):| 00004430 f2 61 28 6b 6a 25 29 3a f2 61 28 6c 6a 25 29 3a |.a(kj%):.a(lj%):| 00004440 f2 61 28 6d 6a 25 29 3a f2 61 28 6e 6a 25 29 3a |.a(mj%):.a(nj%):| 00004450 f2 61 28 6f 6a 25 29 0d 44 98 db f2 61 28 70 6a |.a(oj%).D...a(pj| 00004460 25 29 3a f2 61 28 71 6a 25 29 3a f2 61 28 72 6a |%):.a(qj%):.a(rj| 00004470 25 29 3a f2 61 28 73 6a 25 29 3a f2 61 28 74 6a |%):.a(sj%):.a(tj| 00004480 25 29 3a f2 61 28 75 6a 25 29 3a f2 61 28 76 6a |%):.a(uj%):.a(vj| 00004490 25 29 3a f2 61 28 77 6a 25 29 3a f2 61 28 78 6a |%):.a(wj%):.a(xj| 000044a0 25 29 3a f2 61 28 79 6a 25 29 3a f2 61 28 7a 6a |%):.a(yj%):.a(zj| 000044b0 25 29 3a f2 61 28 41 6a 25 29 3a f2 61 28 42 6a |%):.a(Aj%):.a(Bj| 000044c0 25 29 3a f2 61 28 43 6a 25 29 3a f2 61 28 44 6a |%):.a(Cj%):.a(Dj| 000044d0 25 29 3a f2 61 28 45 6a 25 29 3a f2 61 28 46 6a |%):.a(Ej%):.a(Fj| 000044e0 25 29 3a f2 61 28 47 6a 25 29 3a f2 61 28 48 6a |%):.a(Gj%):.a(Hj| 000044f0 25 29 3a f2 61 28 49 6a 25 29 3a f2 61 28 4a 6a |%):.a(Ij%):.a(Jj| 00004500 25 29 3a f2 61 28 4b 6a 25 29 3a f2 61 28 4c 6a |%):.a(Kj%):.a(Lj| 00004510 25 29 3a f2 61 28 4d 6a 25 29 3a f2 61 28 4e 6a |%):.a(Mj%):.a(Nj| 00004520 25 29 3a f2 61 28 4f 6a 25 29 3a f2 61 28 50 6a |%):.a(Oj%):.a(Pj| 00004530 25 29 0d 45 8b da f2 61 28 51 6a 25 29 3a f2 61 |%).E...a(Qj%):.a| 00004540 28 52 6a 25 29 3a f2 61 28 53 6a 25 29 3a f2 61 |(Rj%):.a(Sj%):.a| 00004550 28 54 6a 25 29 3a f2 61 28 55 6a 25 29 3a f2 61 |(Tj%):.a(Uj%):.a| 00004560 28 56 6a 25 29 3a f2 61 28 57 6a 25 29 3a f2 61 |(Vj%):.a(Wj%):.a| 00004570 28 58 6a 25 29 3a f2 61 28 59 6a 25 29 3a f2 61 |(Xj%):.a(Yj%):.a| 00004580 28 5a 6a 25 29 3a f2 61 28 5f 6a 25 29 3a f2 61 |(Zj%):.a(_j%):.a| 00004590 28 60 6a 25 29 3a f2 61 28 61 6b 25 29 3a f2 61 |(`j%):.a(ak%):.a| 000045a0 28 62 6b 25 29 3a f2 61 28 63 6b 25 29 3a f2 61 |(bk%):.a(ck%):.a| 000045b0 28 64 6b 25 29 3a d9 23 56 68 25 3a 57 68 25 21 |(dk%):.#Vh%:Wh%!| 000045c0 33 32 3d 6b 64 25 3a 21 6c 69 25 3d 6a 63 25 3a |32=kd%:!li%=jc%:| 000045d0 21 6d 69 25 3d 57 25 2a 31 32 3a 21 43 69 25 3d |!mi%=W%*12:!Ci%=| 000045e0 76 67 25 3a 47 69 25 21 30 3d 72 67 25 3a 47 69 |vg%:Gi%!0=rg%:Gi| 000045f0 25 21 34 3d 73 67 25 3a 47 69 25 21 38 3d 74 67 |%!4=sg%:Gi%!8=tg| 00004600 25 3a 47 69 25 21 31 32 3d 75 67 25 0d 46 6c d6 |%:Gi%!12=ug%.Fl.| 00004610 49 69 25 21 30 3d 72 67 25 3a 49 69 25 21 34 3d |Ii%!0=rg%:Ii%!4=| 00004620 73 67 25 2d 34 3a 49 69 25 21 38 3d 74 67 25 3a |sg%-4:Ii%!8=tg%:| 00004630 49 69 25 21 31 32 3d 75 67 25 2b 34 3a 21 4a 69 |Ii%!12=ug%+4:!Ji| 00004640 25 3d 6e 63 25 3a 21 4b 69 25 3d 67 25 3a 66 69 |%=nc%:!Ki%=g%:fi| 00004650 25 21 30 3d 72 67 25 3a 66 69 25 21 34 3d 73 67 |%!0=rg%:fi%!4=sg| 00004660 25 3a 66 69 25 21 38 3d 74 67 25 3a 66 69 25 21 |%:fi%!8=tg%:fi%!| 00004670 31 32 3d 75 67 25 3a 21 52 69 25 3d 4a 68 25 2d |12=ug%:!Ri%=Jh%-| 00004680 32 34 3a 21 53 69 25 3d 49 68 25 2d 33 32 3a 21 |24:!Si%=Ih%-32:!| 00004690 56 69 25 3d 6f 25 3a 21 57 69 25 3d 6c 25 3a 21 |Vi%=o%:!Wi%=l%:!| 000046a0 58 69 25 3d 5f 25 3a 21 59 69 25 3d 48 63 25 3a |Xi%=_%:!Yi%=Hc%:| 000046b0 21 5a 69 25 3d 68 25 3a 21 60 69 25 3d 6b 25 3a |!Zi%=h%:!`i%=k%:| 000046c0 21 61 6a 25 3d 64 68 25 3a 21 63 6a 25 3d 55 25 |!aj%=dh%:!cj%=U%| 000046d0 3a 21 66 6a 25 3d 6f 63 25 3a 21 69 6a 25 3d 43 |:!fj%=oc%:!ij%=C| 000046e0 63 25 0d 47 32 71 21 79 6a 25 3d 4f 62 25 3a 21 |c%.G2q!yj%=Ob%:!| 000046f0 7a 6a 25 3d 56 25 3a 21 41 6a 25 3d 4c 62 25 3a |zj%=V%:!Aj%=Lb%:| 00004700 21 4f 6a 25 3d 56 25 3a 21 28 59 68 25 2b 34 2a |!Oj%=V%:!(Yh%+4*| 00004710 31 30 29 3d 5f 6a 25 3a 21 28 59 68 25 2b 34 2a |10)=_j%:!(Yh%+4*| 00004720 35 32 29 3d 60 6a 25 3a 21 28 59 68 25 2b 34 2a |52)=`j%:!(Yh%+4*| 00004730 36 34 29 3d 61 6b 25 3a 21 28 59 68 25 2b 34 2a |64)=ak%:!(Yh%+4*| 00004740 39 34 29 3d 62 6b 25 3a 51 68 25 21 34 3d 77 6a |94)=bk%:Qh%!4=wj| 00004750 25 3a e1 0d 47 9e 22 dd f2 61 28 f8 65 6b 25 29 |%:..G."..a(.ek%)| 00004760 3a e8 23 56 68 25 2c 65 6b 25 3a 65 6b 25 2b 3d |:.#Vh%,ek%:ek%+=| 00004770 55 68 25 3a e1 0d ff |Uh%:...| 00004777