@L|/}6CD l0C)HCC WhL/h `CmCDiD`  R@P1  Y0@R !L` D  C D     )16CS S)  C)D1 p p 0 C9DI pCDL~CiCDiD` #0&<EEEEEA00EIL\n{EE4he}!ntic-usic0rocessor6ersion3ongand.ote0rogram%ditor6/)#%6/)#%6/)#%6/)#%%nter#ommand}"eats/ct%nv4empo-eter$ur1+ey-em!-0 4he!ntic-usic}0rocessor0rogrammed"y3teven,ashower6er# !rgo3oft0roductionsڰlay-usicŬoad-usicdit-usicųave-usic}lear-usicĤisk$irectoryempoæormat$isk3elect)tem(1%34(1%34:7(1% }3 4:7(1%34:)nvalid#ommand  4oo-any"eats } .ot%nough"eats K:>"')@  [_ $dlm}T* H$ @ `0 yslfa[WŹztn } !yrlf`[UQLHD@<952/-*(%#!  }@<'ɼg|ɧ <Z !  !ՠ!YX ! !!`RTU[ V0`!" }` ذ1 ٰ, #L "հL "#8#0`8`.))?eii}L'"`8394!X#LM 8 *M X"+ ~#3ԭ6TL}#8A; 663V568W"}#W866W 33L"336W3Vԥ 6i 6L #3 *7;O;OF6L}##36}L}#; <12 -<6L}#2 -<6` ! 轵 `!ԩթ>Ȍ! #! #` ؠ}8#$ )J8``ԭ ݩԥj ` ة+ ٥ԍJՍK g$ $ ؠɀ}.L>$ȱɀi҅* g$`ȱ8 )<ȱ L|$<` % FڠV8L$F}FFL$%$ԩ ݩԅiVWeԅԐL$ (` }e`*8這/ }!9 "9 &L8/ %$p %$[!UR!0MEFEԩ ة* g$ȩȘe}Fԩ %& g$L8L.%$0#@L% ٥Ԧ`$`/Э ԍ< <` }$%` ;<` ;<`҅* ݭEԩ ` ٰ*)Ei!9 "9 &L&A!9 "9 &`&'}b \$' !ЍЍЩ'߅խ0i#Ԑ ؠɀ )L&) } '"0+1"/܅) Y!a'L?' i'j'lPECTLSDF2y'M,S1/0--/ 2/L8+, pppB'}A+ìock nlock oreletefiles 0ress2eturnto#ontinue0ress94o#lear!,,-usic)n-emoryV}VVV-* ,' Y!YL&&'1,')+-/&i,-( ,i* ,i}, ,i.//.iiL&)+-/` .L& ~.k.ZY}k. .' !'XY+ .+O .YiYiL@-CY i+8 -.k. .}ix΅+ '" Y!ɛL&L UDL-ixZ .L&L&8qZ .k. .L-#$!RTU[} V0`1Մ ؠɀ )1LB.)1k. . '" Y!hhL&D1:*.* D1:*.*+8 ./`,*}<< 1< q1L.0oi Y!ɛ n.``~ީn.L. }!)n.i`L.K2,* '" Y!.ɛ*13<)2,*f2 '" Y!YL&<l.܅)k./0 !}.L& .ڭթ .Zk. .XY .݄2L/2 '" Y!L& 8 . 7 2 .XY0"} .XY1( .XY/.iȩ . ./.imm1#}01$ԭՠȑȑԭi 22i10L&b . .Zk. .XY2 . 7 8$} . 2 .XY0 .XY .XY . .L& . n. !L&$ir,o%}ad123ave,ock5nlock$elete4empo  -easuresx y &ile.ameƩ x&}xx0ress2eturnto#ontinue .ot!n!-0-usic&ile 0ress2eturnto#ontine&ormat7hich$rive  0ress9to'}&ormat$rive2{3AM1/8'Y.8&XYXiXY&'`` .^]_`LQ3L&n.(} ذ ٥ԍ]Ս^k.,]_^`LD3ʆ ذ ٰԍ_Ս` `ڰ ٰD3j)} Y!ɛ,L&5|3w4180iii iQiLl3jL&j"iL33elect6oicesҍ*}ҩ061 6{\7ԭթoԽ&a$ `8_`L4 k6"+}Vȱ]ȱ^ix4s5LW48 _`ЯnXs80rG7 \ ,}8"$/L8L&rr 80r {6{LC5mJJvvv ѭ i-}iFmAi _i_`t5o6$ $ L4 k6X 0L#6V L7L#6L56Y )8L7TUriѝ.}L6r iѠ)<)JJJJ{<v!m<iѮmL4iUriѝ} D  C D     )16CS S)  C)D1 p p 0}0 C9DI pCDL~CiCDiD` DD˙` d J)L !1}D L(( LL()  L| L( S LH 0p n  2} CY?  q  L L  ` )3} `A! d߰")-݆ "  $G@LLL&0") $G%4}H0 3S8`G ȱG ȱG   Gȭ Gȭ GG}GHiH8(()) G$H% `(05})8` d)L ݆ & LGȘ ݆LL d  ! LL d)N>Q  HH)6}  hyhyB q L> Lm JJ  Ln*` dB%'7}8  H H` 1 { LL   !L     Hh SY?  q  1L8}  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L9}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@:}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q;} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF <} G) *Gȩ GȽG GȌd q q G`  8   0G  `D=}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y>}`piH n0)բY? 08`0 ?}  0$L GGȽG L `8L`L@}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`A}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTEB} H8EEȱEEȩEh J E8   . m  i`LI!)E1FRC}1LJ舩9GIH`LJJ`HGHh l`D} S gL   8 rii `дCDCG W  E}C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}F}" |||DDOS DOSDOS SYS }G}}G}H}BLAMP12 OBJC/DOS SYSSLOT OBJBtEDITOR M65B{<MAIN M65BeSUPPORT M65B%CONVERT BASBY9AMP I} DOC 0`BDELV !B J}`LVUQ   ]   TU J ]L!T  #      TU K} L ? .  t`GBJ V~DEHI B V0dVL}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEhM}DEL8HI   0 HI,0 0  9 .G VLON},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHIO} V0 0`B;DELV䌚 !B y`@ʆ v s? F0Ξ05: [ BDEHIP} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO Q}STILL RUN DOS B;DE J V (` 9 V⪍ ઍ  -R}LLu DEHILV 9 .l 9 .l  `` s$B VBHS}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVLT}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2eU}1i1232435ޥ<<8} CE: vC y@y@`A# *` :105L; 0L>! * 0` * : ;` 1 *` 1 *` Disk Drive SpW}eed:XXX RPM~~~Drive # X PRESS:C > check drive speedL > list error sectorsP > print error sectorsW > write alX}l zeroesto error sectorsM > return to main menui0k ^ 1 :ɛL 800 퍍L5 RETRY ERROR 1 TIME(S)؆莟Y}R'S  `=D;EHI 1 1! @ :ɛ8A0.) ȅ 1 1iZ}il ! 1L NO SUCH ITEMSELECT ITEM OR FOR MENU!L; .{z:*{}.|~ 1 0 0[}JB 18L^%|DLl%DIRECTORY--SEARCH SPEC,LIST FILE? # O 0 n&|D! 1L NOT A DISK FILE\}N !B 1L " 1 !BDED:}:1BJ|DE 1DEBH]}I 1 h0ߢ 0.  0?詛 1 ~0YЛ 1 "L<" "L ^} BL1TYPE "Y" TO DELETE...DELETE FILE SPECCOPY--FROM, TO?OPTION NOT ALLOWED IMAGE3D 066 COPYING---D1:IMAG_}E3D.RUN# 0|D .L$A#B#C#JB|DE 1BHIDD#E 1D#0: B`} 1L B#C#C#B# B 1N#$0SYS1}:e#D# d# D# .d#ȽD# d# 𩛙d#X# 1,A#a}PdD#ELO- A.BJdD#E 1 1HH 0hh|DL^%1}:e# Lt% e#dD#EL%b} 1 0 . .0% 1L WILD CARDS NOT ALLOWED IN DESTINATION 0 A.|K@C> ` 0>>  D, q; ,`COPY SECTORS`RLS ; , ,>  , ,r}ۢ>  ,?  , ,`= `=L :ɛ`hL S SL1) 8`NAME OF FILE TO MOVE?- 0 0|DLts}% A.= ` <0 0 .@L# .BJ 1  DEHIB V L1 = g <0,L. t} JB|,A#Pd#DE 1 HI BDEHHII 1 B 1 = ` <0,0Lf- B Vu},A#P= ` <0 0L#L ߢ) 1* 1 ~0YjC8C}mm ݭv}}`8}``|* ? ɛ,`|:(|/ 1L `INVALID DESTINATIw}ON:DOS.SYS0 0H{ $22Δ $28/L /) $2 Π $2 0 ξx}hAΞB,0 J 1 BޝDEHI,HDE 1H$IHIDELSAVE-y}GIVE FILE,START,END(,INIT,RUN)O X0 1`BDEPHI V` X0H 1 L z}0 0 1L0`PLEASE TYPE 1 LETTER,0`hhL <0 1L0LA1 ,;ɛ7,"ɛ:ݦ1ݥ{}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{|}NAME TOO LONG B VL ` L1I H1EӝDL1|mDiE` V0`8d/8 i:"2!22 1}} L ERROR- 165ɛ+,' 20*.. өw2 1``2TOO MANY DIGITSINVALID~} HEXADECIMAL PARAMETER800 0 8 00`,0'D800H,ɛh`2L1NEED D1 THRU D4C} $;CC $;C $;CC 8C Z: *DCC ,=  , lɀL +}CCC.LE4 k:泭C0iiCLg3CL<3 Z: *DCC ,=  , /,C0 8} l0N S0G :CC# k:浭C0iiCЪL<3 ,٢=  * q;L8 D, q; $; ,WC } L 4C>  :A>810CC ,/> 1C1>  :Z>810CC ,C> 1CCC , 1= 1 :Yh}hL `=CCЍCCCCCCCCC ; ; ; , 4L3 ,\> 1 * 鈹CɛሢCɛ )CC0}CC ~* 5CCCC Co> 1 * Cɛ ~* 5ܭCCCC C˭CCLE5CCLE5`C`}`C`~, , E5C 4L3? , E5CC 4C $;D浭CC 8CCCBC} lɀYC :L6 : lC񠀈Ѱиi iACCC k:LX6CCCCC q};L8= ; , ,p  , ,  ,1@  :ɛL 15))C q+L 7= , ,V@  ,u@  :ɛL H 7 }7Lj7 7Lj7D 8 7L7 7L7բ@ `ߢC ` ,@  * ECɛ>0$C *00C0C *0" CCL}7`C X*`8` ,@  *0\X TCɛM ~*HC)JJJJ *6CȽC) *(CC0CC}C`8`=8W=Wy 8W=PyL5 ON ,C` ; *nDEǍHI 1C L!9 :C }q+L8L 9 q;L8P 9 q;L8W +L8ML 15))C g+L8 ,C&D?E BHCCC /,C\}XCC X*C-?0  -?C0L8:8鉍C mC mCE?1?C V0*CCC LW9C? }`CL09PC B VB DAEJNK V0 09 ,ʢ? PC D,P B V`CC mC mC?1?L9}CC`i`i`i`i`i`P B} VBDAEJ VBHIL1HI B} V@`HS S ShH )Lc;Lj;h` 0)¢})  q; ,` M;hL$; b,hL$; ,>  , ,L,=L1 :HOh:` ; 0L>!}DISK UTILITIES (c)1984 Atari V}er 2.6f enhancements by L J SilverA. DISK DIRECTORY K. BINARY SAVEB. RUN CARTRIDGE L. BINARY LOADC. COPY FILE }M. RUN AT ADDRESSD. DELETE FILE N. CREATE MEM.SAVE. RENAME FILE O. DUPLICATE FILEF. LOCK FILE P. COPY SECTORSG}. UNLOCK FILE Q. CHECK SECTORSH. WRITE DOS/DUP R. RADIX CONVERTI. FORMAT DISK S. DRIVE SPEEDJ. DUPLICATE DISK T. WR}ITE VERIFY:ƛ9!&x#!7&p))'&5./)L''-66C76u8COPY DISK Insert source disk and Λ Insert DESTINATION }disk and Λ IT'S DONE !'Y' to execute or for menuSource drive # ?DESTINATION drive # ?Source drive is # 1Des}tination drive is # 1Enter first sectorEnter last sectorCHECK DRIVE # X >>>>ERROR # <<<Q  HH)$}  hyhyB q L> Lm JJ  Ln*` dB%'$}8  H H` 1 { LL   !L     Hh SY?  q  1L$}  !? S   q 1 L   Ll  Lg E`L   !L)  q 1L$}) `L0AM݊L݉ ML  N݆LLLNLMLHG!@$}1F GȱGLLEEȩÑEȑEEȑE Ed E7EȩE  q$} L !,0,0SGɛ L 1 !L EHEh W G gLLSROTCES EERF $} G) *Gȩ GȽG GȌd q q G`  8   0G  `D$}CEDC0X:Ȣ Y ȱC* ? 0.. , 0%n ?A[ 0 : L`L  `, 0`Y$}`piH n0)բY? 08`0 $}  0$L GGȽG L `8L`L$}8`  05G)݁,G)ȱGȱGHh0})Hh` B! 8`8iiiLE`$}E8FEh( l0`ɃLL L8^~jj8jHi hEEEiEȱEiE` dTE$} H8EEȱEEȩEh J E8   . m  i`LI!)E1FR$}1LJ舩9GIH`LJJ`HGHh l`$} S gL   8 rii `дCDCG W  $}C  Lq` X٨`DOS SYS IIIIIIIIIIIIIIIC`0 ߩ0}}$}" |||DDOS DOSDOS SYS }$}}G}$}BLAMP12 OBJC/DOS SYSSLOT OBJBtEDITOR M65B{<MAIN M65BeSUPPORT M65B%CONVERT BASBY9AMP $} DOC 0`BDELV !B $}`LVUQ   ]   TU J ]L!T  #      TU $} L ? .  t`GBJ V~DEHI B V0dV$}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh$}DEL8HI   0 HI,0 0  9 .G VLO$},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DELV䌚 !B y`@ʆ v s? F0Ξ05: [ BDEHI$} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO $}STILL RUN DOS B;DE J V (` 9 V⪍ ઍ  -$}LLu DEHILV 9 .l 9 .l  `` s$B VBH$}I|DE V BLV nB,DE J V* \*` B V BLVDEHI BLVL$}1u H232435; 1 ;  hh@2 e1i1LHҍ 00) 08 109hh@ Ҡ2e&}8 &X;A.M.P. Antic Music Processor V1.2X;Music Editor and Routines"X;Programmed By Steven Lashower(X;Revision Date: } 6-05-882"X;(C) 1988 ArgoSoft Productions<EDITORQ>4?DLIFPP Q>5?DLIZPdQ>nPx %>4?VBI $>5?VBIQ }> SETVBV Q>4?DLSTP0 Q>5?DLSTP1Q>(PQ>Po $>4SCREEN %>5SCREEN CLEAR Q>4SC }REEN PDESTIN" Q>5SCREEN,PDESTIN6 Q>4EDIT@ PSOURCEJ Q>5EDITTPSOURCE^ PTXTh CLRERRrQ>|P } PVNUM$>˚ XX0 FVCE SAVD DATINT PO25 "VNUMHXX0 #VNUM LOADD Q>4?DLSTP0 Q>5?DLST }P1 ?INITPMQ>"&P/0 XX1 PBOT: CLRINPD !GETCHRN?DLST p=p=p=BX SCREENb" ====;$02,$02, }$02,$02l ========v =======€MSG MEMFL =B SCREENH =A ?DLST }?VBIQ> PDCNT PHPOSP0PHPOSP0PHPOSP0PHPOSP0Q>P !XITVBV  ?DLI5A 5*C45> # }DCNTH $VNUMR QOFF9\ RDCNTf FDLI20p DDLI20z !?DLI21 DLI20Q> PHPOSP0PHPOSP0?DLI21QON9 R }DCNT H?DLI2QHVPOS9? QHVP19PHPOSP0 'HPOSP0?DLI2QDCNTR> HDENDQ>P$ DEND7 }.?87B>L7V9`ON ===jOFF ===tHVPOS 8==8=~HVP1 X==X=5MEMFL A *** }Memory Full *** A(SOFF TOP=TOP=BOTTOM=BOTTOMCMND4 AMETxA AMxxxA AKEY=A ATxxxA APA= }== ALA===GETCHR PO25 KGETCHR> HNOESCQ> P/ !STARTNOESCR>;;Control+Delete( }HNSDL2 !DELETE<NSDLR>;;Control+InsertFHGT2P !INSERTZGT2R>;;Shift+DeletedHGT3n !PADELxGT3R>;;Shift }+InsertHGT4 !PAINS GT4R>} HUPDN !BUFCLRUPDNR>;;UP Arrow? FNINS2R> HNOTDWNNINS2 POINTER } BTPN !GETCHRNOTDWNM>R>|;;Shift DOWN? HNJDWN CALCP" TRANS, CLACCN6 !MDOWN@NJDWNR>_;;Shift } Up?J HLANDRT CLACCN^!MUPh LANDRR>r FRIGHT|R> FLEFT %XPOS PINBUF8R>~ H?NODEL)> FGET }CHRQ>1 PINPUT8Q>PINBUF8 "XPOS !GETCHR?NODELR>;;RETURN? H?NORET&)>;;Input?0H?PARS }ER;;Yes...: CLRERRDGC1!GETCHRN?NORET)>XFGC1bR>!;;<=47 "0"?lDGC1;;YES...vR>a DNOTLOWS>!NOTL }OWO>` PINPUT8 #XPOS !GETCHRLEFT SAVD WAIT "VNUMHNZ0Q> PVNUMNZ0 LOADD PBOT  CLAC }CN !GETCHR RIGHT SAVD* WAIT4 #VNUM> QVNUMHR>RHNZ0\Q>f PVNUMpHNZ0z?PARSERQ> PINBUF8Q> } PPOINT CLRERRPLP1QPOINTT?T??$>PLP2QINBUF9;;Entry Char=RCMND48;;Table Char?HPLP3;;No }pe; Try next2;;Yes..Next char 3 (>;;All Chars? HPLP2;;Nope...Again$ !MATCH;;We've matched!. PLP3QCMND488 R> }xB FMATCHL #POINTV QPOINT;;INCTable Entry` R>;;Table Finishd?j HPLP1;;Yep.No Matcht !CHKNOTE~ MATCHQPOINT  }T? ? QJPARS8 PTMP QJPARS8 PTMP !@TMP:  Q>Y P@TMP7 !TM8 GNM!NOMATCH MEASR$>( %CIX2 MEA2QINBUF9< R>F FNEXTMP  }R>0Z DGNMd R>@n EGNMx P@IBUFF7 2 3 (XPOS HMEA2 Q> P@IBUFF7  AFP  FPI EGNM QFR0 HMEA3 } QFR0 FGNM MEA3!MSRCH NEXTM CALCP INSM" %>, Q>V6 P@TMP7@ CLACCNJ MEASCT NXTM2A DATINT^ } CLRINPh BCHKr Q>| !UPDN NXTM2 DATINT CLRINP QACT R>T FNXTM6 > QNOTES9 P QDISTO9 , } OVOLU P %DUR 3 NXTM4$> NXTM50& HNXTM50 1: HNXTM4D Q>N PX Pb NXTM6Q>l !UPDNv ?TPRO }QXPOS R> FTBACK Q>4INBUF PIBUFF Q>5INBUF PIBUFF TEMPO ETBACK CALCP INSM %>  }Q>X P@TMP7 3 QTMPO PTEMP P@TMP7* 34 Q>> P@TMP7H PTMPOR $>\ TM6QINBUF9f R>p DTM7z Q>  }TM7PSTMP9 0 ITM6 TM8 DATINT CLRINP Q> !UPDN TBACK!NOMATCH PLAYC$> Q> PLC2PPFLAG9 0 }IPLC2 $VNUMQ>PPFLAG9$Q>. PFLAG8Q>BPMYL PMYV !PLAYR`VOLPR%OFFSETj3t QINBUF8~R>/ } HKEY0%>VOL0QINBUF81R> HVOL0Q>PINBUF83Q> PFLAGVOLP0QFLAG, T? OFLA }G>(Q>2 PTEMPS< %OFFSETF3P3ZVOLP1QINBUF8d RVOL29n FVOLP15x "FLAG IVOLP0 GKEY0 VOLP1523 } "TEMPS IVOLP1 QFLAG PVOLU !?NDONEKEYPRQXPOSR> HKEY0KEY2QINBUFR>0 DKEY0R>8" E }KEY0, QINBUF6R>#@ HKEY25JQ>TPKEY^ !KEY3hKEY0!NOMATCHr KEY25R>F| HKEY0Q>PKEYKEY3QIN }BUF;S>0 PKEY,O> PSKEY PEDIT$KEY QPKEY9 PSKEY PEDIT!XX1PKEY A#bA& }CHKNOTE%>0 QINBUF8:R>RD HCHK0NQ>TXPACTbQ>l PFLAGvQ> POFFSET "XPOS !CHK24 CHK0R>A D }KEY0R>H EKEY0 PACT8Q> PACTQOCT PACTQDUR PACT  QVOLUME PVOLU  PACT* QENV }LPE4PENV>Q>H PPOINTR QXPOS\ PTEMPfQ>p POFFSETz PFLAG "XPOSCHK24QXPOS ROFFSET HCHK25 !?N }DONECHK25QFLAGT?? Q?JLOCS8PTMPQ?JLOCS8 PTMP %OFFSETQINBUF8 !@TMP:CHK3#FLAG$ } QFLAG.R>8 HCHK25B !NOMATCHLCHK26#OFFSETV #FLAG` QFLAGjR>t HCHK24~ !NOMATCHCHKACCR>N FCHKAC2 }R>F FCHKAC2R># FCHKAC2 !CHK3CHKAC2PACT !CHK26CHKOCTR>1 DCHK3R>7 ECHK3 ;S>0 } PACT(Q>2 PLOCT< !CHK26F?CHKDURQ>PPFR0Z?CDUR0#FR0dQFR0nR>x F?CDUR3 %OFFSET3T?T? }>?CDUR15QDTXT9 F?CDUR2,O>  RINBUF8 H?CDUR032 !?CDUR15?CDUR2QFR01"1, 'OFFSET6>@ } QDURT9J PACTTQ>^ PACTh !CHK26r?CDUR3QINBUF8|R>^ F?CDUR4 !CHK3 ?CDUR4C>%CIX2?C }DUR45QINBUF9R>0 D?CDUR5R>: E?CDUR5 P@IBUFF732 !?CDUR45?CDUR5Q>& P@IBUFF700:0D &OFFSE }TN AFPX FPIb E?CDUR8l QFR0v H?CDUR8QFR0 H?CDUR7 QFR0 H?CDUR7?CDUR8!NOMATCH?CDUR7QFR0 } PACT QFR0 PACT !CHK26CHKENV%OFFSET3$> QINBUF R>R F?CDUR8 CEV1QINBUF8* RETBL }94 FCEV2>0H ICEV1R !CHK3\ CEV2&ENVf !CHK26p?JLOCS CHKACC=CHKOCTz$ ?CHKDUR=CHKENV=VOLPR=NOMATCHERR! }NOMATCH?NDONE NDONEQACTR>FERRR>T F?NDON2R>BEERR?NDON2 CALCP INSM%>QACT }P@TMP73QDUR$ P@TMP7.38QDURATEB P@TMP7L !NXTM2VCLRINP%>;;Routine to`Q>;;clear bothjPINPUT8;; }screen & memorytQ>;;input areas~ PINBUF81ICLRINP3 'XPOS:CLRERRQ>4CLINEPMSG Q>5CLINE P }MSG:?INITPMQ> PGRACTLQ>  PSIZEP0PSIZEP0Q>(P 2P<Q>F PPCOLR0PPPCOLR0Z: }d DATINT$VNUM;;Data Interprtrn QYPOS9x PVERTQ> PYPOS9 DAT2%> $VNUM QYPOS9T?, OYPOS9? }Q@DATPNT7;;Get PointerR>;;End? Yep... FDAT3R>V;;Measure Bar?HNEXT;;Nope...Next3Q@DATPNT7;;Get Hi/Lo" }PFR0;;Bytes and,3;;store in6Q@DATPNT7;;Floating Pt@ PFR0J$>4MEAS;;Get MeasureT%>5MEAS;;Bar Address^ PRN }T;;And print!h ITOFPr QOFFSET| %LENGTH PRNT2 !NEXT3 NEXTR>V ENEXT3 PNOTE NEXT3R>X HNEXT43 } Q@DATPNT7 PTEMP $>4TMTXT %>5TMTXT PRNT PTMPO N36 NEXT4R>Y& HNEXT410 $>4LYTXT: %>5LYTXTD }PRNTNNEXT41$VNUMX #YPOS9b QYPOS9lR>v FDAT3 !DAT2DAT3QYPOS9 PYMAX9 DT36R> EDAT4 $>4BLANK } %>5BLANK PRNT $VNUM #YPOS9 QYPOS9 !DT36DAT4QVERT;;Restore VERT toPYPOS9;;original value.  PBOT }:;;All Done!  PTMPOQ>* PFR04 QTEMP>,HO>#RPFR0\DN35f #FR0pN35 ITOFPz:N36%LENGTHQ> } POFFSET PRNT2:PRNT&TMP;;Routine to'TMP;;print 16 chars%>;;from location PO2;;TMP to PRINT }?PR1Q@TMP73 P@DESTIN7)> H?PR1:;;Return!!NOTE AC C#D D#E F F#G A$ AG#A A#B R A.FNOT AC DbD EbE F } GbG A8 AAbA BbB R ABMEAS A ALTMTXT ATempo= AVLYTXT ALyric Advance A`BLANK A } Aj8VOL Appppp p mp mf f ff fffF1 F2 F3 F4 F5 F6 F7 At9VOL2 APPPPPPMPMFFFFFFFF1F2F3F4F5F6 }F7A~POINTERPTEMP%> PO2 CALCP%> Q@TMP7R>VHPO1 CLACCN $VNUM PO1QTEMPR>HN }U;;UP....BELOW.... CHKST  QYPOS9R> HPO251( QFLAG2 FPO250<:FPO251"YPOS9P !PO25ZPO250 DATDECd }DATINTn !PO25x NUQYPOS9R> FPO245 RYMAX9 FPO25 #YPOS9 !PO25PO245QYMAX9R> HPO25 DATIN }C DATINT PO25%>_ PO2QVNUMT?> QSOFF9"PDESTIN, QSOFF96 PDESTIN@ $VNUMJ QYPOS9T>^ P }O3(>hFPO4r0| QDESTIN,O>( PDESTINDPO3#DESTIN!PO3PO4C%> P@DESTIN7 $VNUM: }PNOTE3 PNNOTE Q@DATPNT7 PDURATE 3& Q@DATPNT70 PDURATE: QNNOTED R>TN FPN2X DIVIDEb #OCTAVEl !P }N3v PN2Q> PNNOTE PN3%>  PO2 QNNOTE T? $KEY (> HNPLA , O> NPLA> %> NPLOQNOTE9! } FNPLO1 ! P@DESTIN7!2 !3*!)>4! HNPLO>!NPLO1QNNOTEH!R> R! FNPL2\! QOCTAVEf!,p!O>z! P@DESTIN7!3!NPL2 }DURPRO!1! NPL24Q>! P@DESTIN7!3!)>! HNPL24!%>! QNNOTE!R> ! HNPL25!:" NPL253" Q@DESTIN7" HN }PL25$" PENV." PVOL8":B"PVOLQDURATEL"M>V" PVOLU`"Q>j" P@DESTIN7t"3~" QVOLU"T?"," OVOLU">"Q>" } PTEMPS"NPLO2QVOL9" P@DESTIN7"3"2" "TEMPS" INPLO2#: #DIVIDE$># QNNOTE# POCTAVE(#Q>2#DIV1TOC }TAVE<#U?F#R> P# DBRANCHZ#S> d# #OCTAVEn# BRANCH0x# HDIV1# PNNOTE#:#PENVQDURATE#M>#V?#V?#V?#V? }#>#(>#FPE3#PE2QETBL9#;$S> $ P@DESTIN7$3"$PE3:,$ MDOWN%>6$ Q@DATPNT7@$R>J$ FMFNDAT$ DATINC^$ } Q@DATPNT7h$R>Vr$ HMDOWN|$MFND DATINT$ $VNUM$Q>$ PYPOS9$ POINTER$ !GETCHR$MFNDA DATDEC$ $VNUM$Q> }$ PYPOS9$ DATINT$ POINTER$ !GETCHR$ MUP$VNUM% "YPOS9% CALCP% #YPOS9&% TRANS0% CHKST:% QFLAGD% FMLU }1N%%>X% PO2b% $VNUMl%Q>v% PYPOS9% !GETCHR% MLU1%>% DATDEC% Q@DATPNT7%R>% FMFND%R>V% FMFND% ! }MLU1% CHKSTQ>% PFLAG%?%CHKN0Q@DATPNT7& RCHKN28 & HCHKN1&3 &)>*& HCHKN04&Q>>& PFLAGH&CHKN1$VNUMR& }:\&CHKN2 V==f&MSRCH FVCEp& MSR0%>z& Q@DATPNT7&R>& HMSR1& DATDEC& !MMATC& MSR1R>V& HMNEXT&3& } Q@DATPNT7&RFR0& HMNEXT&3& Q@DATPNT7& RFR0' HMNEXT'MMATC CLRINP' !MFND$'MNEXT DATINC.' !MSR08'ME }ASCQVNUMB'T?L'>V' QFLAG9`' PSOURCEj' QFLAG9t'PSOURCE~'Q>' PDESTIN'PDESTIN' MEAL1%>' Q@SOURCE7 }'R>V' HMEAL2' QDESTIN','O>' PDESTIN' DMEAL25'#DESTIN( MEAL253 ( QDESTIN( P@SOURCE7(3((QDESTIN !}2( P@SOURCE7<(MEAL2QSOURCEF(,P(O>Z( PSOURCEd( DMEAL3n(#SOURCEx( MEAL3%>( Q@SOURCE7(R>( HMEAL1(: "}(INSERTQLAST( HINSRT2( !GETCHR(INSRT2 CALCP( QLAST(R>V( HINSRT3( !NEXTM(INSRT3 INSM)%>) QLAST #}) P@TMP7")3,) QLAST6) P@TMP7@)3J) QLASTT) P@TMP7^) DATINTh) CLRINPr)Q>|) !UPDN) DATINC,) QDATPNT)O $}>) PDATPNT) DDAT1)#DATPNT) DAT1:) DATDEC;) QDATPNT)S>) PDATPNT) EDAT1)"DATPNT*:*TRANSQT %}MP* PDATPNT&* QTMP0*PDATPNT:*:D*CLACCN$>N*Q>X* PACCN9b*0l*HCLACCNv*:* WAITQ Ԋ*R>* HWAIT* &}:*5FULBF A *** Note Paste Buffer Full *** A*5BUFCL A *** Note Paste Buffer Cleared! *** A* INSMQ>* P '}NUMB*IM2QMEM* HINSM0*QMEM* RNUMB* EINSM0+7 +7+ Q>4MEMFL +PMSG*+ Q>5MEMFL4+ PMSG>+ BUZZERH+!XX (}1R+INSM0QLYEN\+PSOURCEf+PDESTINp+ QLYENz+ PSOURCE+%>+,+ ONUMB+ PDESTIN+ DINSM1+#DESTIN+ )}INSM1Q@SOURCE7+ P@DESTIN7+1+ IINSM1+ QSOURCE+;+S>, PSOURCE, EINSM2,"SOURCE$,INSM2QDESTIN.,;8,S *}>B, PDESTINL, EINSM3V,"DESTIN`, INSM3%>j, QDESTINt,RTMP~, HINSM1,QDESTIN, RTMP, HINSM1,%>, +}QV4EN,,, ONUMB, PV4EN, DINSM36A, #V4EN,INSM36AQV4EN,,- ONUMB - PLYST- DINSM36B- #LYST(-INSM36 ,}BQLYEN2-,<- ONUMBF- PLYENP- DINSM36Z- #LYENd- INSM36Cn-T?x->- )VNUM- FINSM4- QFLAG9-,- ONUMB- PFLAG9 -}- DINSM37- #FLAG9- INSM371-QDTPNTS9-,- ONUMB-PDTPNTS9. DINSM36.#DTPNTS9. !INSM36". INSM4:, .}.BUFCLRQ>4BUFCL6.PMSG@.Q>5BUFCLJ. PMSGT.Q>^. PBPNTh.!XX1r. PADELQ>|. PFLAG. QBPNT.R>T. HPADL2 /}. Q>4FULBF.PMSG. Q>5FULBF. PMSG. BUZZER.!XX1.PADL2 DEL0. !GETCHR.DELETEQ>. PFLAG/DEL0 CALCP 0}/%>/ Q@TMP7&/R>0/ HDEL1A:/ !GETCHRD/DEL1AQFLAGN/ FDEL1X/ #BPNTb/ QBPNTl/T?v/,/ OBPNT/>/ Q@TMP7/PN 1}BUFFR9/3/ Q@TMP7/PNBUFFR9/3/ Q@TMP7/PNBUFFR9/ !DEL05/DEL1Q@TMP7/ PLAST03 0 Q@TMP70 PLAST 2} 03*0 Q@TMP740 PLAST>0 DEL05%>H0QTMPR0 PDESTIN\0 QTMPf0PDESTINp0PSOURCEz0QTMP0,0 PSOURCE0 3}O>0 PDESTIN0 DDEL150#DESTIN0DEL15Q@DESTIN70 P@SOURCE7010 IDEL150 QSOURCE0,0O>1 PSOURCE1 DDE 4}L161#SOURCE$1DEL16QDESTIN.1,81O>B1 PDESTINL1 DDEL17V1#DESTIN`1 DEL17%>j1 QSOURCEt1 RLYEN~1 HDEL151 5}QSOURCE1 RLYEN1 HDEL151%>1 QV4EN1;1S>1 PV4EN1 EDEL36A1 "V4EN1DEL36AQLYST1;2S> 2 P 6}LYST2 EDEL36B2 "LYST(2DEL36BQLYEN22;<2S>F2 PLYENP2 EDEL36Z2 "LYENd2 DEL36Cn2T?x2>2 )VNUM2 FDEL42 7}QFLAG92;2S>2 PFLAG92 EDEL372 "FLAG92 DEL3712QDTPNTS92;2S>2PDTPNTS93 EDEL363"DTPNTS 8}93 !DEL36"3DEL4 MEASC,3 DATINT63 CLRINP@3 QFLAGJ3 FDEL5T3:^3DEL5!GETCHRh3PAINSQBPNTr3 FDEL5|3 CALCP3 Q 9}BPNT3T?3,3 OBPNT3 PNUMB3 IM23%>3DOAGQNBUFFR83 P@TMP7333 QNBUFFR83 P@TMP7334 QNBUFFR84 P@TMP :}743&4 )NUMB04 HDOAG:4 MEASCD4 DATINTN4 CLRINPX4 !GETCHRb4V1STR V==l4 ==v4V2STR V==4 == ;}4V3STR V==4 ==4V4STR V==4V4END ==4LYSTR ==4 LYRENven Lashower(X;Revision Date: ^; EIF&X;A.M.P. Antic Music Processor V1.2(#X;Main Menu and Various Routines2"X;Programmed By Steven Lashower<=}X;Revision Date: 08-29-88F"X;(C) 1988 ArgoSoft ProductionsP DATPNTZ SCRPTd SOURCEn DESTINx LPOINTԂ>} FR0Ԍ CIX FASCؠ IFP٪ FPIٴ FSUB`ھ AFP FMOVE IBUFF FDIV( ZF1F?} TMP ICCMDR ICBALT ICAX1Z ICAX2[" ICBLLX, ICBLHY6 CIOVV@ AUDF1J AUDC1T@}AUDCTL^ SKCTLhGRACTLrHPOSP0|CONSOLІSDMCTL/SIZEP0КPCOLR0SETVBV\A}XITVBVb INBUF XPOS POINT VNUM  VERTYPOS ===YMAX ==== OB}FFSET LENGTH NNOTE& OCTAVE 0DURATE 0=: VOLUME D FLAGN TEMPSXV1ST V1STRbV2ST V2C}STRlV3ST V3STRvV4ST V4STRV4EN V4END TMPO A KEY = OCT  DUR 0=ACT ===0= NTMPD}  TEMP  DTPNTS METX  METY LAST == MEM ENV   ENVLPE  ACCN =====E}==  LOCT * LACT 4 VOLU > COUNT H DOPER RFUNC =\ MXf MYp V1Pz VNUM2 PFLAF}GCL1 === ARGO HORIZ ===VOLUM === DCNT  ENVLO ACTU FUNC2 G}BPNT  NUMB  LYLAST LYST LYSTRLYEN LYRENLYLEN =$NBUFFR.>D:SUPPORT.M658B H}STARTQ>L %>4XITVBVV $>5XITVBV` SETVBVjQ>tP~Q> PFLAG $>4SCREEN %>5SCREEN CLEARQ>PI}PP Q>4SCREEN PDESTIN Q>5SCREENPDESTIN Q>4MAIN  PSOURCE Q>5MAINPSOURCE(Q>2PJ}<Q>F PFR0P QTMPOZ,dO>#nPFR0xDNCT #FR0 NCT IFP FASC%>NCT0Q@IBUFF7R> ENK}CT1M> PMAIN8 PEDIT83 !NCT0 NCT1M> PMAIN8 PEDIT8Q> " PMAIN8,Q>6 PMAINL}8@)>J HNCT2T PEDIT8^NCT2 PTXTh Q>4DLISTrP0| Q>5DLISTP1Q>"P/Q>4SCREENX PDESTINM}Q>5SCREENXPDESTINGKEY KGETCH$>NOPERETXT9FYEP2(> HNOPE !GKEYYEPA&T?0>:N} QJLOCS9D PSOURCENQJLOCS9XPSOURCEb !@SOURCE:lETXT APECTLSDFAv;JLOCS PLAY=EDITR=CLRM=TPRO=LOAD=SAO}VE=DIR=FORMATEDITR RSTQ>P/ !EDITORSCREENTOPSCREENeSOCTSCREENYSENVSCREENbP}SDURSCREENSBTSSCREENNSMEMSCREENSMTRSCREENvINPUTSCREEN BOTTOMSCREEN Q}STMPSCREENmSKEYSCREEN CLINESCREEN* BUFFER A A4DLIST p=p=p=B> SCREENHR} ====R ====\ ====f ====p ==z A DLIST0DIRTXT Aock, nlockS}, or elete file(s)?A APress Return to ContinueA5CLTXT APress 'Y' To Clear ALL Music In Memory ANOMUS V==T} == V== == V== == V== == === CLRMQ>4SCREEN PU}SCRPT Q>5SCREEN$ PSCRPT. $>8 %>B CLRM3QCLTXT9L P@SCRPT7V 3` 2j (>'t HCLRM3~ KGETCH R> Y V}FCLRM4 !START CLRM4%> QV1ST PSCRPT QV1ST PSCRPT CLRM5QNOMUS8 P@SCRPT7 3 )> HCLRM5 W} QV1ST PV2ST PV3ST( PV4ST2 PV4EN< ,F QV1STP O>Z PV2STd DCLRM6n CLRM10x CLRM6 O>X} PV3ST DCLRM7 CLRM11 CLRM7 O> PV4ST DCLRM8 CLRM12 CLRM8 O> PV4EN DCLRM9 #V4EN Y} CLRM9Q> PLYLEN" PLYLEN, QV4EN6 PLYST@ PLYENJ QV4ENT ,^ O>h PLYSTr PLYEN| DCLRM90 #LZ}YST #LYEN CLRM90QLYEN , O> PLYEN DCLRM91 #LYEN CLRM91!START CLRM10#V2ST CLRM11#[}V3ST CLRM12#V4ST #V4EN : DIR$> MSGF& R>0 HDIR01: !STARTD DIR01QXPOSN HDIR2X $>b D\}IR0QDEV29l PDEVICE9v 0 IDIR0 DIR2Q> PICAX1 Q> PCOUNT Q> $>4DEVICE %>5DEVICE  DOCIO;;OPEN #]}1,6,0,"D: $>4SCREEN %>5SCREEN CLEAR Q>4SCREEN PSCRPT Q>5SCREEN PSCRPT LOOPQ>* PICBLL4 Q>> ^} PICBLHH Q>R $>4BUFFER\ %>5BUFFERf DOCIOp QBUFFER z R> O FL1 PRINT QCOUNT , O> PCOUNT Q_}SCRPT , O> PSCRPT DLOOP #SCRPT !LOOP L1$>%>C QCOUNT$FL2. QSCRPT8,BO>L PSCRPTV`}DL2` #SCRPTjL2QBUFFER9t;~S>  P@SCRPT710IL2 $>4DEVICE %>5DEVICEQ>  DOCIO QSCRPTa}PDESTIN QSCRPT,O>x  PDESTINDL5#DESTIN(L5Q>4DIRTXT2 PSOURCE< Q>5DIRTXTFPSOURCEP b} PTXTZL6 KGETCHd%>nR>xHNR !START NRR> LFL73R> UFL73R> DFL7!L6 L7QSCRPTc}O>x PSCRPTDL75 #SCRPTL75C" PDOPER, GETFILE6R>@HL8J !STARTT L8QXPOS^HL9h !STARTrLd}9QDESTIN|;S>q PDESTINEL10"DESTINL10%DOPER QDCMD8 $>4DEVICE %>5DEVICE DOCIO !DIR2e}DCMD #=$=!DOCIOPICCMD &ICBAL 'ICBALQ> PICAX2&$>0 CIOV:)>D GERRORN:XERRORQ>4ERf}TXTb PSOURCEl Q>5ERTXTvPSOURCEQ> PFR0'FR0 IFP FASC%>$>ER2Q@IBUFF7R>Eg}ER3M> PERTXT923 !ER2 ER3M>  PERTXT9* $>4DEVICE4 %>5DEVICE>Q> H DOCIOR PTXT\ KGETCHfq}vBLAUTORUN SYSB'/DOS SYSLVDUP SYSBtEDITOR M65B{<MAIN M65BeSUPPORT M65B%CONVERT BASBY9AMP DOCBAMPINFO DOC'NARF SYS7p7z !START#DEVICE AD1:*.* A=DEV2 AD1:*.*A PRINT%>PR1QBUFFER8;S>  P@SCRPT71r}IPR1:MSGFQ>4SCREEN PSCRPTQ>5SCREEN PSCRPTAGETFILEPTEMP$ "TEMP.$>8%> BGET3s}QFNT29L P@SCRPT7V2`3j(>t HGET3~ QTEMP T?;; *2 T?;; *4 T?;; *8>2%>GET0QFNT19R> FGt}ET34 P@SCRPT723 !GET0  GET34Q>%>0GET3XP@SCRPT7(32)>o< HGET3XF QSCRPTP,ZO>d PSCRPTnu} DGET35x #SCRPT GET35%> 'XPOSGETKEY KGETCH %XPOSR> HNOTRETQ>STUFFPDEVICE83)>v} HSTUFF:NOTRETR> HNOTESC:NOTESCR>~" HNOTDEL,)>6 FGETKEY@Q>J1T P@SCRPT7^Q>hPDEw}VICE8r "XPOS| !GETKEYNOTDEL)> FGETKEYR>! DGETKEYM>PDEVICE8,O>` P@SCRPT7 #XPOSx} !GETKEYFORMATQ>4FORTXT PSOURCE Q>5FORTXTPSOURCEQ>4SCREEN& PDESTIN0Q>5SCREEN:PDESTINy}D PTXTNFKEY KGETCHXR>bFFNOlR>vFFNOR>1 DFKEYR>3 EFKEY PTEMPM> PFTXT2Q>4z}SCREEN PDESTINQ>5SCREENPDESTIN Q>4FTXT2 PSOURCE Q>5FTXT2 PSOURCE PTXT  KGETCH*{}R> Y4 FFYEP>FNO!STARTHFYEPQTEMPRPDEVICE\Q>4SCREENXf PDESTINpQ>5SCREENXzPDESTINQ> $|}>4DEVICE %>5DEVICE DOCIO !START LOAD$> MSGFR>FFNO QXPOSFFNOQ>  DOCIOQ> PI}}CAX1Q>$ $>4DEVICE. %>5DEVICE8 DOCIOBQ>L PICBLLVQ>` PICBLHjQ>t $>4INBUF~ %>5INBUF DOCIO~}$>LOAD1QINBUF9 RLTXT9 HGOERR0 ILOAD1 !LOAD2GOERRQ>4LETXT PSOURCE Q>5LETXTPSOURCE }PTXT  KGETCH !STARTLOAD2 WOWBUF(Q>2 DOCIO<Q>F LD25P GETNUMZQ>d DOCIOnQ>x PICBLLQ>} PICBLH $>4TMPO %>5TMPOQ> DOCIOQ> PICBLLQ> PICBLHQ> PLYLEN PLYLEN QINBUF}R>1 HNOLYR" $>4LYLEN, %>5LYLEN6Q>@ DOCIOJ QLYLENT PICBLL^ QLYLENh PICBLHr QV4EN|? Q}V4EN,O>> DLYR03 LYR0Q> DOCIO NOLYRQ>  DOCIO QV4EN PLYST QV4EN,O> P}LYST& DNOLY00 #LYST:NOLY0QLYSTD,N OLYLENX PLYENb QLYSTl,v OLYLEN PLYEN DNOLY2 #LYEN}NOLY2QINBUFR>1FLYR QLYSTPFR0 QLYST PFR0%>Q> P@FR073 P@FR073 P@}FR07 QLYEN ,O>  PLYEN*DLYR4 #LYEN> LYR RSTH QKEYR,\O>f PEDITp$KEYz QKTX9 PEDIT}ՎFNO2!START KTX A#bA SAVE$> MSGFR> FFNO2 QXPOS FFNO2Q>  DOCIOQ> PICAX1Q>} $>4DEVICE %>5DEVICE$ DOCIO.Q>8 PICBLLBQ>L PICBLHV $>4LTXT` %>5LTXTjQ> t DOCIO~ GETLEN} WOWBUF;;WRITE BUFFERQ>  DOCIO;;" """ GETNUMQ>  DOCIO;;WRITE MUSIC DATAQ> PICBLLQ>} PICBLH $>4TMPO %>5TMPOQ>  DOCIOQ> PICBLL(Q>2 PICBLH< $>4LYLENF %>5LYLENPQ> Z DOCIOd }QLYLENn PICBLLx QLYLEN PICBLH $LYST %LYSTQ>  DOCIOQ>  DOCIO !START TPRO$> MSG}FR> FFNO2A QXPOS FFNO2AQ>4DEVICE PIBUFF"Q>5DEVICE, PIBUFF6 TEMPO@ ETPROJFNO2A!STA}RTTgFNT1 A Dir Load Save Lock Unlock Delete Tempo (35-290): Measures (x,y):A^&FNT2 AFile Name}: Ah:ERTXT AɯϠ - #xxxPress Return to ContinueArELETXT A*** Not An AMP Music File ***Press} Return to ContineA|)FORTXT AFormat Which Drive (1-2)?A+FTXT2 APress 'Y' to Format Drive # ALTXT AAM1AGE}TNUMQV4EN; SV1ST PICBLL QV4EN; SV1ST PICBLL EGET1 "ICBLLGET1QICBLL , O> }PICBLL& DGET1A0 #ICBLH: GET1A$V1STD %V1STN :X RST$>b Q>l LD1PYPOS9v 0 ILD1 : PLAY$> MS}GF R> FNOPL QXPOS HPARSER Q> PMX Q> PMX Q>!PMY ! PMY!!CV1 !NOPL!START*!PARSE}RQ>4DEVICE4! PIBUFF>!Q>5DEVICEH! PIBUFFR!Q>\!PCIXf! AFPp! XXXEPLAYz! FMOVE! FPI! QFR0!HXX}2!QFR0! FPLAY! XX2QFR0!PMX! QFR0! PMX!$>!PLR2QDEVICE9!R> ,! FPLR3"2"(>" HPLR2$"QMX}."PMY8" QMXB" PMYL"!PL4V" PLR30`"0j"&CIXt" AFP~"EXXX" FPI"EXXX"QFR0"PMY" QFR0" PMY}" PL4 IFP" FSUB"EXXX" FPI"EXXX" CV1$>#%>D #CV2QCVTXT9# P@SCRPT7#2(#32#(><#HCV2F#$>P# ZE}ROQ>Z# PPFLAG9d#2n#(>x# HZERO#GCVK KGETCH#R># FGCVK2#R># HGCVK1# !START# GCVK1R> 5# EGCVK#R> }1# DGCVK#;#S>0#>$,$QPFLAG9$O>"$PPFLAG9,$A6$T?@$,J$O>QT$?^$ Q@SCRPT7h$,r$O>|$ P@SCRPT7$} !GCVK$ GCVK2$>$G25QPFLAG9$FG3$0$IG25$ !START$ G3$>$G4QPFLAG9$2$(>$ FPLAYR$R>%FG4%}Q>%PPFLAG9&%!G40%#CVTXT ASelect Voices: A:% PLAYRQ>D% PAUDCTLN%PX%Q>b% PSKCTLl% Q>4PLRDLv%P}0% Q>5PLRDL%P1% INITPM%Q>% PDCNT% Q>4DLI%P% Q>5DLI%P% QLYST% PLPOINT% QLYST%PLPOIN}T&Q> &P&Q> &P*&Q>4&Po>&$>H&Q>R&P\&CPYVPQV1ST9f& PV1P9p&2z&(>& HCPYVP& QVNUM&}>&Q>& PVNUM& QFLAG& FSEARCH&A&T?&>&QDATPNT& PV1P9& QDATPNT';'S>' PV1P9$'ESE0.' "V1}P98' SE0$>B' !ZPFLGL'SEARCH TRNVPV' SLOOP%>`' Q@SOURCE7j'R>t' FSREN0~'R>V' HSNXT'3' Q@SOURCE7'RM}X' HSNXT'3' Q@SOURCE7' RMX' FSREN'SNXTQSOURCE','O>( PSOURCE ( DSLOOP(#SOURCE( !SLOOP((SRE}N0QSOURCE2(;<(S>F( PSOURCEP( ESRENZ(#SOURCEd(SRENQVNUMn(T?x(>( QSOURCE( PV1P9(QSOURCE( PV1P}9(SREN2#VNUM( QVNUM(R>( HSEARCH($>( ZPFLGQ>( PCL19( PACTU9( PVOLU9)Q>) PHORIZ9)2")(>,) }HZPFLG6)Q>@) PVNUMJ)Q>T);^) STMPOh) PARGOr)Q>|) PLYLAST) %>4VBI) $>5VBI)Q>) SETVBV) LYCLR) PLR}LPQ)R>) HPLO1)$>)L21XPHPOSP09)0) IL21X) L21A$>*Q>*L21PAUDF19*0&*IL210* QFLAG:*FL22D*}Q>N*P/X* !EDITORb*L22!STARTl*PLO1"ARGOv* QARGO*HLO2*Q>*;* STMPO* PARGO* DELAY* LO2$VNUM*QE}NVLO9*?*R>* HLO2X* !LO2Y*LO2XQCL19+)> + FLO25+V? +)>*+ HLO254+V?>+LO25RVOLUM9H+ELO3R+}QVOLUM9\+FLO3f+"VOLUM9p+ "ACTU9z+LO2Y%VNUM+C+T?+>+ QACTU8+PAUDC19+ LO3QVNUM+T?+ PV}NUM2+ $VNUM+QPFLAG9+HL4A+ QCL19+HL4A, $VNUM2,T?, QV1P9$,,.,O>8, PV1P9B,DL35L, #V1P9}V, L35QFLAG`, FL35Bj, #FLAGt,R> ~, HL35B, !L21A,L35B TRNVP,%>, Q@SOURCE7,R>, FENDA,R>X, HL35C,}%>, Q@SOURCE7, PTMPO,!L4- L35CR>V - HL35AA- !CEND- L4A!L4(- ENDA!END2- L35AAR>Y<- HL35AF- LVBIP- !}CENDZ- L35AR>Td-HL36n- $VNUMx-Q>U-PHORIZ9-Q>- PACTU9- QVNUM2->-Q>-PAUDF19-PAUDC19-}!PL8- L36$VNUM-PHORIZ9->- QNOTES9. $VNUM2.PAUDF19.%>". Q@SOURCE7,.M>6. PTEMP@. Q@SOURCE7J.M}>T.V?^.V?h.V?r.V?|. $VNUM.PENVLO9. QTEMP.PVOLUM9.%>. Q@SOURCE7.>. QDISTO9.,. OTEMP. $VNU}M2.PAUDC19. $VNUM. PACTU9/ PL8%>/ Q@SOURCE7/ $VNUM&/ PCL190/ L4#VNUM:/ QVNUMD/R>N/HPL5X/Q>}b/ PVNUMl/PL5!PLRLPv/ ENDQ>/ $VNUM/PPFLAG9/Q>U/PHORIZ9/ $VNUM2/Q>/PAUDC19/PAUDF19}/$>/EN1QPFLAG9/R>/FL4/20(> 0HEN10 QFLAG 0FEN2*0 EN3Q>40P/>0 !EDITORH0EN2!STARTR0TRNV}PQVNUM\0T?f0>p0 QV1P9z0 PSOURCE0 QV1P90PSOURCE0:0 DELAY$>0 VB1QCL190FVB20 "CL190VB200I}VB10:0INITPMQ>0Po0$>1 CLOPQ>1 PSIZEP091 PHPOSP09$1Q>.1P 9810B1 ICLOPL1Q>V1 PPCOLR0`1Q>j}1PPCOLR0t1Q>D~1PPCOLR01Q>1PPCOLR01:1PLRDL p=p=p=B1 PLAYSC1 =p=p1H ======}================1$ ==========1 A1 PLRDL16PLAYSC A The Antic} Music Processor Version 1.2 A1/ A (C) 1988 ArgoSoft Productions A2 TEXT A A 2 VBI$>2Q}>2P(2VBI2PHPOSP09220<2 IVBI2F2Q>P2 PDCNTZ2 !XITVBVd2DLI5n2Ax252C252 #DCNT2R>"2%>2 DLI1Q>}2,2SVOLUM82 RDCNT2 FDLI22QVOLUM82,2O>3 RDCNT3 FDLI213 DDLI21"3 !DLI3,3 DLI21Q>63PHPOSP0}8@3 !DLI3J3DLI2QHORIZ8T3T?^3,h3O>7r3PHPOSP08|3 DLI313 HDLI1373?373>37393 CEND%>333 Q@}SOURCE73RMY3 DCEND13 FCEND1434 Q@SOURCE74 RMY&4 HCEND104!END:4 CEND1!L4D4LD25PTEMPN4T?X4>b4QBUFF}ER9l4,v4 OV1ST4 PV1ST94QBUFFER94,4 OV1ST4 PV1ST94DLD34 #V1ST94 LD3#TEMP4 QTEMP4R>4} HLD254LD2:4GETLENQ>5 PTEMP 5GETV1QTEMP5T? 5>*5 QV1ST945;>5 SV1STH5PBUFFER9R5 QV1ST9\5;f5 S}V1STp5PBUFFER9z5 EGET25"BUFFER95GET2#TEMP5 QTEMP5R>5 HGETV15:5WOWBUF$>4BUFFER5 %>5BUFFER5Q>} 5 PICBLL5Q>5 PICBLH5:6LYCLR%>;;Clear6 Q>;;the6PL1PTEXT8;;lyric$6 1;;line.6IPL186:B6 LVBI%>L6 Q@}LPOINT7V6R>`6 HLPL18j6:t6LPL18)LYLAST~6 FLPL196 Q@LPOINT76M>?6 PTEXT8636 !LPL186LPL19%LYLAST6!LPL2}Q@LPOINT7;;Find Next Inv6 )LYLAST6 FLPL216R>`6 ELPL36 LPL21M>?7N>@ 7 PTEXT8737)>(7 FLPL427 !LPL2<7}LPL3'LYLASTF7LPL35Q@LPOINT7P7M>?Z7 PTEXT8d73n7)>x7 HLPL357:7 LPL4Q>7 PLYLAST7 QLPOINT7,7O>7 PLP}OINT7 DLPL57#LPOINT7 LPL5:7>D:EDITOR.M6577 START Various Routines2"X;Programmed By Steven Lashower<G?1 &X;A.M.P. Antic Music Processor V1.2#X;Miscellaneous Routines Program"X;Programmed By Steven Lashower(X;Revision }Date: 8-29-882"X;(C) 1988 ArgoSoft Productions<X;FEIP4EDIT A The Antic Music Processor Version 1.2AZ$ ASong and }Note Program EditorAd AVOICE #1VOICE #2An AVOICE #3VOICE #4Ax AEnter Command: A A}A ABeats:A A Oct:A A4 Env:A A> Tempo:A A100Meter:A A4/4 Dur:A AQ Key:A A0# } Mem:A A AX;---------------------X;Main Menu Screen DataX;---------------------0MAIN AA.M.P. - The An}tic Music ProcessorA- AProgrammed By Steven LashowerVer 1.2A& A(C) 1988ArgoSoft ProductionsA" Alay Musicoad} MusicA, Adit Musicave MusicA6" Alear Musicisk DirectoryA@! Aempo ( ormat DiskAJ ASelect ItemAT}pDTXT AH.. Q.. E.. S.. T.. H. Q. E. S. T. Z. W3 H3 Q3 E3 S3 T3 Z3 W H Q E S T Z A^5INVAL A }Invalid Command -> Ah3BCM A *** Too Many Beats *** Ar3BCL A *** Not Enough Bea}ts *** A|KDV AK:A=ETBL >="='=)NTBA @= =====CHANGE  = ===== KEYD =}====[=_= = =$=d=l=m=}=SDURT =T=*== ==H=$== ===@= ======`=0== =}=-NOTES =y=s=l=f=a=[=W====' ========z=t=n=' ===========}' y=r=l=f=`=[=U=Q=L=H=D=@' <=9=5=2=/=-=*=(=%=#=!= =====X;--------------------}--X;Note Distortion ValuesX;-----------------------DISTO ===========&' ======}=====0' ===========:' ===========D' =========}==N =====XMTGY ===== bX;------------------------lX;Get A Character thru CIOvX;--------}----------------KGETCHQ>;;Null CharPQ>P;;No inverse!Q>@P;;Upper Case! KG1QR>;;Cha}r Pressed?FKG1;;Nope....R><FKG1R>'FKG1R> FKG1R>g FKG1*R>|4FKG1>R>HFKG1R KG2}Q \R><;;No Jitter!!!fHKG2pQ>;;Set To Readz PICAX1Q> ;;CLOSE #1 DOCIO2;; $>4KDV%>5KDV;;Get Device}Q>;;Address and DOCIO2;;Open Ch. #1 $>4CHAR%>5CHAR;;Buffer AddressQ>PICBLL;;One CharacterQ>;};Only!!! PICBLLQ>;;GET #1,Char DOCIO2Q> ;;CLOSE #1 DOCIO2$ QCHAR.:;;Back To Program8DOCIO2PICCMD;};CIO commandB&ICBAL;;Store bufferL'ICBAL;;address/deviceVQ>` PICAX2j$>;;Use Channel #1t CIOV;;Call CIO~})>GKGETCH;;Error? Yep...:;;Nope.... CHARX;-------------------------X;Clear Screen (1024 Bytes)X;---}---------------------- CLEAR&SCRPT;;X has low adrs'SCRPT;;Y has hi adrs$> CLR0%> CLR1Q> P@SCRPT7}3  HCLR1 #SCRPT0( HCLR02:<X;---------------------FX;Tempo Entry ProcessorPX;---------------------Z }TEMPOQ>dPCIXn AFP;;Atascci To F.P.xETERR;;Bad Numbr? Yep! FPI;;F.P. To IntegerETERR;;Bad Intgr? Yep! QF}R0HTM1QFR0R>#ETM1Q>!TM5TM1QFR0ETM4R>FTM3 TM2Q>!TM5 TM3QFR0"R>}#,ETM26 TM4QFR0@;JS>#T TM5PTMPO^,;;Clear Carry(OK)h:;;and Exit!rTERR;;;Set Carry (Err)|:;;and Exit!}X;-------------------------X;Print Text String RoutineX;------------------------- PTXT%>Q@SOURCE7;;Get Source}R>;;My EOText?FPSCE;;Yep...R>;;Special Space?DPSCA;;Nope... M>;;M>?;;Special Space:,;;Add number}ODESTIN;;of spacesPDESTIN;;to desination DPSCX#DESTIN& PSCXQ>0PSCAP@DESTIN7;;Print Char: QSOURCED},NO>;;Increase sourceXPSOURCE;;addressb DPCA1l#SOURCEv PCA1QDESTIN;;Increase dest. ,;;AddressO> }PDESTIN DPTXT#DESTIN!PTXT;;Do it again!PSCE:;;Return to prog!X;--------------------X;Process Note Ro}utineX;--------------------NDONEQACT;;New or LastPOCT;;Store OctaveQACT;;New or LastPDUR;;Store Dur}ation  PDURATEQVOLU;;New Or Last PVOLUME;;Store Volume*$ENV;;New Or Last4&ENVLPE;;Store Envelope>QETBL9;;Ge}t Screen byteH;;;Get screen byteRS> ;;for envelope\PSENV;;and print!f QENVLPEpT?;;Store envelopezT?;;in the lef}tmostT?;;4 bits of theT?;;byte....LVOLU;;vol in right 4!PDURATE;;Store byte! Q>4SDURPDESTIN;;Get Scre}en DurQ>5SDUR;;AddressPDESTIN%>Q>;;Clear thatSDLP@DESTIN7;;part of the 1;;screen!HSDL  DUR}PRO;;Print Durate QOCT;;-SCALE ROUTINE- PFR0$ QACT;;Is note a rest?. R>T8 HNDXB !ND3;;Yeah. No scale!L NDX;V }S>A;;Note letter to` >;;number (eg A=1)j PNTMPt QCHANGE9;;Get note #~ PACT;;and store... "ACT QOCT;;Don't scal}e if RLOCT;;last oct<>oct! HND05 QACT ;;;Subtract the SLACT;;last note from R>;;the current DND03;;note }to see QLACT;;whether to add ;;;or subtract for SACT;;Absolute value ND03R> DND05;;LAST>CURRENT? QACT R}LACT( DND04;;CURRENT>LAST?2 QOCT< R>;;Decrease octaveF FND05;;only if it isntP "OCT;;already = to 1Z !ND05d ND}04QOCT;;Icrease octaven R>;;only if it isntx FND05;;already = to 6 #OCT ND05QACT;;store current PLACT;;note a}s last QOCT;;note...same for PLOCT;;octave PFR0 ND1"FR0 QFR0 FND2 QACT;;NOTE=NOTE+13 ,;;for each octa}ve O> PACT !ND1 ND2QOCT;;Get ATASCII L>;;screen code" PSOCT;;and print..., QACT;;and store!6 FND20}@ $NTMP;;Get #/b/NJ PACCN9;;store itT ND20$NTMP^ QACCN9;;Load for noteh R>;;a "N"atural?r FND24| R>F;;a} "F"lat (b)? HND21 "ACT;;Yea..Dec note !ND3 ND21R>#;;a Sharp (#)? HND3 #ACT;;Yea..Inc note !ND3 ND24}$NTMP;;Check to see QNTBA9;;if note was PTEMP;;previously QKEY;;a "#" or "b" FND25;;in the measrue $KEY;;b}y checking QKEYD9;;Also check if MTEMP;;Note needs to FND3;;because of the& "ACT;;key signature0 !ND3: ND25}$KEYD QKEYD9N MTEMPX FND3b #ACTl ND3:;;Bye Bye!v X;---------------------- X;Duration Print Routine X;-----}----------------- DURPRO$> DL1QDURT9 RDURATE FDUR1 2 (> FDUR2 HDL1 DUR1A T? T? > DUR11}QDTXT9 P@DESTIN7 3* 24 QDTXT9> R> H DDUR11R :\ DUR2QDURATEf PFR0p Q>z PFR0 Q>> P@DESTIN7 3} 'DURATE ITOFP %DURATE 'OFFSET PRNT2 3 : X;------------------------- X;Integer to Floating Point X};-------------------------ITOFP IFP;;Integer to F.P. FASC;;F.P. to ATASCII%>$ ILO13.Q@IBUFF7;;Get ATASCII8};;;string of FPBS> ;;and store...L PINBUF8VIILO1;;End of num?`M>jPINBUF8;;yeah...tC~'LENGTH;;Store leng}thV?POFFSET;;divide lengthQ>;;by 2...and;;;do centeringSOFFSET;;formula! POFFSET:;;Return to prog!}X;------------------------X;Print from ITOFP RoutineX;------------------------PRNT2%OFFSET;;Get Offset$>}PR2QINBUF9;;Source P@DESTIN7;;Destination23("LENGTH;;All done?2IPR2;;No...More!<:;;Bye bye!FX;-----------}------PX;Print Free MemoryZX;-----------------dPBOTQLYEN;;Calc Free Mem!nPFR0xQLYEN;;Where's dataPFR0};;ending at? IFP FMOVEQ>;;Subtract RAMTOPPFR0;;(RAMTP-DataEnd)Qj;;=Free Memory!! PFR0 IFP }FSUB FASCQ>4SMEM;;Let's set upPDESTIN;;the printingQ>5SMEM;;address!PDESTIN FPIQFR0"PMEM, }QFR06 PMEM@ PSC0;;Print FREE MEM!JX;---------------------TX;Print Measure's Beats^X;---------------------h}BTPN BEATr FASC;;Beat Count to|%>;;ATASCII String!PSC16Q@IBUFF7R>EPSC19;;Print until EOSR>.;;or d}ecimal point! FPSC173!PSC16;;Do Again PSC1733Q@IBUFF7;;Print twoR>;;numbersEPSC19;;following ,};;decimal Q@IBUFF7O> P@IBUFF7&PSC19Q>4SBTS;;Set up to0PDESTIN;;print BEATS: Q>5SBTSDPDESTINN PSC}0;;Print it!X:;;Bye Bye!b"X;-----------------------------l"X;Print ATASCII Version Of F.P.v"X;--------------------------}--- PSC0%>3 Q@IBUFF7;S> ;;Print CharP@DESTIN7;;Done yet??IPSC0;;Nope...M>P@DESTIN7;;Pri}nt LastQ>;;Character 'TEMPPSCL3;;Make sureQ@DESTIN7;;all of theR> ;;last number EPSCL1;;was erasedQ}>;;with the new P@DESTIN7;;number!!!* !PSCL4PSCL1%TEMP>:HX;--------------------------RX;Calculate Beats in M}easure\X;--------------------------fBEAT$VNUM;;Which Voice?p "YPOS9z CALCP #YPOS9$>;;Clear F.P. Regs Z}F1BEAT1%>;;Find theQ@TMP7;;beginning ofR>V;;the measure FBEAT2QTMP;QTMPS>PTMP EBEAT1} "TMP !BEAT1 BEAT2QMETY;;METER=Metx/Mety$ PSOURCE.Q>8PSOURCEB BEAT3VSOURCE;;Caclulate forLQSOUR }CE;;METYV FBEAT4`VSOURCEj !BEAT3tBEAT4QSOURCE~PFR0Q> PFR0 IFP FMOVE;;Set up to divide }Q>;;later on....PFR0 PFR0BEAT5,;;Point to nextQTMP;;Note in memoryO>PTMP DBEAT6 #TMP  } BEAT6%>Q@TMP7;;duration ofR>V;;Next Measure or(FBEAT7;;End of voice?2R><FBEAT7;;then we're doneFR>W }P EBEAT5Z%>;;Get durationd Q@TMP7n,xOFR0PFR0;;add all of theDBEAT5;;durations #FR0 !BEAT5BE }AT7 IFP FDIV;;Now divide!:;;We're done!!!X;-------------------------X;Calculate Memory PositionX;-----------}--------------CALCPQDATPNT;;Get the loc.PTMP;;for the topQDATPNT;;of currentPTMP;;voice column $VNU}MQYPOS9;;add our "Y""T?;;position *3,,;;to that to get6OYPOS9;;our current@,;;memory loc.JOTMP;;for currentT}PTMP;;voice!!^ DCALC2h #TMPrCALC2:;;That all folks!|X;-----------------X;Note Pitch ValuesX;-------------}----X;----------------------X;Note Distortion ValuesX;----------------------X;-----------------------X;Invalid} Command RoutineX;-----------------------NOMATCH%>QINPUT8;;Transfer the;;;command to theS>;;INVAL text}PINVAL8;;by1;;adding $128 toINOMATCH;;each byteQ>4INVAL;;to inverse&PMSG0Q>5INVAL;;New address:PM}SG;;for DLISTD BUZZER;;Do the Buzzer!N!XX1;;Back to Program!XX;---------------------bX;Meter Entry ProcessorlX};---------------------v METER$>Q>/ PPOINTQ> PSOURCE MET15 QFLAG HMET4Q> PPOINTQ> }PSOURCE $OFFSET2 MET15  QFLAG HMET4 QTMP*R>!4 EMET4>$>HMET16QMTGY9R0\ GMET4f RTMP}p HMET16zQTMP PMETX QTMP PMETY QMETXPFR0Q> PFR0 IFP FASC Q>4SMTR PDESTIN Q}>5SMTRPDESTIN PSC03Q>$ P@DESTIN7.38CB,L ODESTINV PDESTIN` DPSC5j#DESTINtPSC5QMETY}~PFR0Q> PFR0 IFP FASC PSC0!XX1MET4!NOMATCHMET15%CIXQ> PFLAGMET2QINBUF9} RPOINT FMET3 R>0 DMET35R>@( EMET352 P@IBUFF7<2F3P !MET2ZMET3&OFFSETdQ>n P@IBUFF7x AFP} FPI QFR0 HMET35QFR0 $SOURCE PTMP9: MET35Q> PFLAG:X;--------------------X;Speaker Bu}zz RoutineX;--------------------BUZZER%>;;Buzzer Durate.CLICK0$>/;;Buzzer PitchCLICK1&CONSOL;;Click Spkr!"}Q ,PTEMP;;My Simulated6CLICK2Q ;;STA WSYNC@ RTEMPJ FCLICK2T0^ ICLICK1h1r ICLICK0|:;;Return to prog!}#X;------------------------------#X;Get Starting Address: Voice #x#X;------------------------------FVCEQVNUMT?}> QFLAG9 PDATPNT QFLAG9PDATPNT:#X;------------------------------#X;Save Current Address: Voice #x }#X;------------------------------SAVDQVNUMT?&>0 QDATPNT:PDTPNTS9DQDATPNTNPDTPNTS9X:b"X;---!}--------------------------l"X;Get Current Address: Voice #xv"X;-----------------------------LOADDQVNUMT?>QDT"}PNTS9 PDATPNTQDTPNTS9PDATPNT:BCHKQ>4SBTS PIBUFF Q>5SBTS PIBUFFQ>PCIX  AFP#} FMOVE  QMETX*PFR04Q>> PFR0H IFPR FSUB\ FPIf ENX2Ap QSBTSzM> RMETX FNX2B Q>4BCL$}PMSG Q>5BCL PMSG BUZZER !NX2BNX2AQ>4BCMPMSG Q>5BCM PMSG BUZZER NX2B:(X;Revision o()< Q MEASAVLLESMUSMEMNUNCHH@@@&}  AMS II To AMP Ver 1.0Music File Converte'}r##Programmed By Steven Lashower(##(C) 1988 ArgoSoft Productions2Revision 5-24-88<FRR;A%,9@(},9@,9@,;@,;I:,&A,P5+(#} AMS II to AMP 1.0 File Converter5 @Z(($(Enter)} Source File name: (d@n @@x'-@@'@8, 336-*}8@,%8@,%8@,%8@,-@)@67,.>:, 68@,-8@,&+}&68@,-8@,&8@,&&68@,-8@,&8@,&&68@,-8@,&8@,#6-@,}#6. AMP6--@@6-@&&(Converting Notes For Voice #U67B:,%-}@,.V$6-B:,38,"K67B:,%@,.U A -@8,@"I)@)@.})"@g56-@IACCOUNT FOR AMS I,*6-&@"6@*6-@6#"A'6-@#TEMPO/}@<!A'6-&A(+6-%@H<HANDLE ---)---J<A6-&A+6-%@<HANDLE ---'---T>0}A(6-&A(+6-%@2>HANDLE ----"----^6-%@h-67<,.>:,6-%@-67<,.>:,r61}-%@|i"@:7<,,.67B:,%@,.>:@,8 AA6-B:,O6-%@[6-i6-%@ 2},67B:,&@,.,6-B:,%@68,-B:,&@ ((Doing Durations...6-6-@3}6-@>-@@&8,"46-%@> AP-@8,@/)@4})@/6-%+AV$,67<,.>:'@,6-%@9"@:7<,,6-%@+6-96-%@5}6-%@ 6-%@& 0##67B:,%@,. A0$:<-@@ 6-8,.6-$6}@8 A< D;@(-(Destination Filename: 1; ANC@+@@87}(@C@X%bc6-P:'AV,$6-&AV$B67%@<%@,.>:,`67%@<%@,.>:,8}c$ D:CONVERT.BASLESMUSMEMNUNCHH@@@  FF x        :} ;} ***Program Submission*** Steven LashowerThe Antic Music Processor <} Programmed By Steven Lashower Cypress, Ca 90630(C) 1988 ArgoSoft ProductionsA=}ll Rights Reserved USER MANUAL 5-30-88For use with the Atari 400/800/1200, XL or XE >}Series ComputersI. Introduction and Program Overview The Antic Music Processor [AMP] is designed to take full adva?}ntage of the sound producing hardware of the 8-bit Atari computer. Written completely in assembly language, AMP can play up @}to four voices over a range of 5 1/2 octaves simultaneously. AMP features a user friendly note entry system with an "intelliA}gent" parser. Songs with over 10,000 notes can quickly and easily be entered. And because the editor is set up like a spreaB}dsheet, any part of a song can be located within seconds. In order to enter music, a knowledge of reading sheet music is desC}ired. Of course, the music files created with AMP can be saved to and loaded from diskettes. AMP also includes a diskette mD}anagement system so you never have to exit the program to go to DOS. As a bonus, AMP comes with an "Advanced Music SystE}em to AMP" converter program. Written in BASIC, this program automatically makes thousands of Advanced Music System II filesF} which are available all over the Atari community instantly compatible with AMP.II. Getting Started Check to see iG}f all the cartridges are removed from your Atari computer. Remember to make sure the computer is off before you remove any cH}artridges. If disk drive #1 isn't already turned on, you may do that now. Insert the diskette, label side up, and turn the I}computer on. If you are using a XL or XE series computer, make sure you hold down OPTION as you turn the computer on. The MJ}ain Menu should appear in about twenty seconds.III. Using AMPТ 㛛 Pressing "P" will cause the music iK}n memory to be played back through your TV or monitor's speaker. First though, AMP would like to know what voices and measurL}es to play. Select Voices: The highlighted (inversed) voice numbers are the ones that are going to be played. DefaultsM} to: Voices 1,2,3, and 4. If you do not want a voice to be played, type the number (1-4) of that voice. Typing the number aN}gain will turn the voice back on. Press RETURN when voices are selected. Select Measures [x,y]: Measures to be plO}ayed: starting at measure #x and playing through measure #y. Defaults to: Playing all measures. Press RETURN when measP}ures are selected. Playback will now begin. Pressing START before playback ends, will return you to the Main Menu.Q} 㛛 Pressing "E" brings you to the Music Editor. At first appearance, the Editor seems rather complicatR}ed. But with a little practice, it will become second nature to you. When entering the editor, the Voice #1 column will be S}highlighted. The first measure of each voice will be displayed. At the very bottom of the screen are the status lines.T} The status lines show:1) Number of beats in the present measure (e.g., Beats=0)2) The current Meter and Tempo (e.g., MetU}er=4/4 and Tempo=100)3) The key signature (e.g., Key=0#)4) The amount of memory left for entering notes (e.g. Mem=312V}50) 󛛛"Backus-Naur Form" The following command specifications are written in W}Backus-Naur Form, using the following symbols: [ ] An optional construct : Separates alternative substitutions X}All special keys found on the Atari keyboard are indicated in CAPITAL LETTERS. 󪪛 Note[Acc][Oct][Dur][EY}nv][/Dyn] : Rest[Dur] Note: A-G Rest: R Accidental (Optional): #:F:N (1) Octave (Optional): 1-6 (2) DuraZ}tion (Optional): D:D.:D..:D3:^X (D=W:H:Q:E:S:T:Z; X=1-255) Envelope: ):>:':" (3) Dynamic: PPP:PP:P:MP:MF:F:FF:[}FFF:F1:F2:F3:F4:F5:F6:F7 If not specified, all optional items take on the values shown in the status lines at the botto\}m of the screen.(1) A note can be followed by an accidental ('#'-sharp, 'F'-Flat, or "N"-natural). You don't have to e]}nter accidentals if they're in the key signature. If you do use an accidental, it carries through until the end of a^} measure, or until you specify a new accidental (e.g. C# remains sharp until you enter CN). AMP does not underst_}and double sharps or flats, but Dbb (double flat) can be entered as CN or B# (the equivalent pitch.)(2) Note C, octave `}4 (C4) is middle C. If you do not specify the octave, the octave number of the note nearest the previous note is usea}d. For example, a C followed by a B3 is interpreted as C4, not C3. Of course, you can always specify the octave numb}ber.(3) -)- Ties notes together ->- Normal note envelope (not printed on screen after each note entered) c}-'- Slightly faster decay than ->- -"- Fastest note decay (stacatto)󪪛 M: Insert measure marker at cursord}着 Tx: Change Tempo to x (x=30-290) at cursor 󪪛 CTRL+Up Arrow: Move cursor up Ce}TRL+Down Arrow: Move cursor down CTRL+Left Arrow: Move to voice edit column on the left CTRL+Right Arrow: Move to voice ef}dit column on the right SHIFT+Up Arrow: Move cursor up to previous measure SHIFT+Down Arrow: Move cursor down to previousg} measure 󪪛 Mx: Display measure x MET=x/y: Change meter (x=1-32, y=1:2:4:8:16:32) KEY=na: Change kh}ey signature (n=0-7, a=#:F) P: Play Notes in current edit column 媪 DELETE: Delete last characteri} in data entry line CTRL+DELETE: Delete note at cursor CTRL+INSERT: Undelete note at cursor 媪 SHIFT+j}DELETE: Place note at cursor in buffer SHIFT+INSERT: Place notes in buffer at cursor SHIFT+CLEAR: Clear out all data in tk}he buffer󪪛 ESC: Returns to Main Menu (1)(1) Escape can be used at any point in the program (except l} during playback) to return you to the Main Menu.â 㛛 Typing "C" will clear all of the notes that currenm}tly reside in the computer's memory. Answering "Y" to the prompt will carry out the function. Pressing any other key will rn}eturn you to the Main Menu.Ԣ  Tempo is the speed of playback. Tempo can be selected using this function fromo} the main menu, or embedding tempo commands in with the notes. Tempo can range from 35 (slowest) to 290 (fastest), inclusivep}. Also, the most recent tempo change (if any) encountered during playback will be displayed here.̢ 四 Typeq} "L" Load a music file from drive #1. Type in the file name and press RETURN. Format: filename.EXT If wildcards are r}used, the first file found will be loaded. Use '?' to substitute for single characters. An asterisk (*) can stand for any vs}alid combination of characters. Please refer to your DOS manual for information on valid filenames and DOS I/O error messaget}s.Ӣ 四 Typing "S" will save a music file to drive #1. Type in the file name and press RETURN. Should a fiu}le with the same selected already exist, the old file will be erased and replaced with the new file.Ģ v} A directory, showing the files in Drive #1 is available with this menu selection. Pressing RETURN without specifying a fiw}le name will list all of the files on the disk. Wild card can be used. Once the directory has been displayed, you havex} the option to Lock, Unlock or Delete a file, selected by L, U, or D, respectively, followed by a file name. Lock is used toy} write protect a single file. A locked file cannot be written over or deleted. It is designated by an asterisk (*) in a dirz}ectory. Unlock removes the write protection. Delete erases a file from the disk and the directory. Wild cards can be used,{} but be careful when using them with Delete!Ƣ 뛛 To initialize a disk for the storing of data, it must be|} formatted. After typing "F", a prompt will then be displayed asking you to confirm whether or not you wish to format the di}}skette. If confirmed, the AMP will then proceed and format the diskette in drive #1. ALL previous information on it will be~} lost, including locked files.IV. Musical Demonstrations AMP includes six demonstration piece}s (located on the back side of the AMP diskette.) They'll give you an idea of the power and versatility of AMP. To loa}d and play a song type "L" followed by one of the filenames listed below. When the song is loaded, type "P" and press RETURN} twice. To prematurely stop the playback, press START.ś This piece is "Flight of the Bumblebee", by Rimsky-Korsakov}. Try playing BEE at different tempos.̛ This piece is "Come Sail Away", by the rock group, STYX. This top-ten} single appeared on their Grand Illusion album. Contains the instrumental solo found only on the album. This file uses shor}t notes with different dynamics tied together to create custom envelopes.Л This is Fantasy-Impromptu in C# minor}, Op.66, by Chopin.Λ This file is "Grand Designs", by the rock group, RUSH. Notice the heavy percussion AMP is} capable of producing using very short low notes. AMP creates a nice visual display when playing this song.ӛ T}he theme from the "Munsters" television series. This piece shows off the built-in envelope capabilities of AMP.ԛ Th}is is the Overture to The Nutcracker, by Tchaikovsky. Notice the different degrees of articulation used.V. AMS F}ile Translator A special program is included on your AMP diskette: an AMS II to AMP file translator. With this progra}m, you can convert any Advanced Music System II file to a file that will work with AMP. Load the Translator using BASIC}. Type RUN"D:CONVERT" to use the program. Type in the source and destination files when prompted. Be sure to include the d}evice specification (e.g. "D1:" or "D2:".) Depending on the length of the file, the translation process may take quite a lon}g time. Once finished, load AMP. Then, load in the converted file by typing "L" and then the destination file name you used} in the translator program. And last, but not least, play it! ź Duration errors may be encountered through }the conversion process. Notes longer with durations longer than 255 clocks (e.g. W.,W..) will be interpreted differently by }AMP. These notes should be deleted using the AMP Music Editor and re-entered using shorter durations and ties. This process} can be used to create notes of any length.      ,  FF x "} "} ***Program Submission*** Steven LashowerThe Antic Music Processor "} Programmed By Steven Lashower (C) 1988 ArgoSoft ProductionsA"}ll Rights Reserved To the Editor: 󺛛Make sure no car"}tridges are in the computer and load AMP (hold down OPTION on XL/XE).Then when the Main Menu appears... AMP includes "}six demonstration pieces (located on back side of diskette.) They'll give you an idea of the power and versatility of AMP. "}To load and play a song type "L" followed by one of the filenames listed below. When the song is loaded, type "P" and press "}RETURN twice. To prematurely stop the playback, press START.ś This piece is "Flight of the Bumblebee", by Rimsky-K"}orsakov. Try playing BEE at different tempos.̛ This piece is "Come Sail Away", by the rock group, STYX. This "}top-ten single appeared on their Grand Illusion album. Contains the instrumental solo found only on the album. This file us"}es short notes with different dynamics tied together to create custom envelopes.Л This is Fantasy-Impromptu in C"}# minor, Op.66, by Chopin.Λ This file is "Grand Designs", by the rock group, RUSH. Notice the heavy percussion"} AMP is capable of producing using very short low notes. ӛ The theme from the "Munsters" television series. Thi"}s piece shows off the built-in envelope capabilities of AMP.ԛ This is the Overture to The Nutcracker, by Tchaikovsky"}. Notice the different degrees of articulation used.***Program Submission*** Steven LashowerThe Antic "}Music Processor Programmed By Steven Lashower (C) 1988 Argo"}Soft ProductionsAll Rights Reserved κSide #1 Directory (Alphab"}etical Order)AMP .DOC 089 - Instruction Manual (Atari Writer Plus)AMPINFO .DOC 025 - You're Looking at it (Atari Write"}r Plus)AUTORUN .SYS 071 - AMP Object Code (Machine Language)CONVERT .BAS 020 - AMS II to AMP Converter (Basic SAVED)EDTIOR"} .M65 112 - AMP Music Editor (MAC 65 Source Code)MAIN .M65 109 - AMP Menu and Player (MAC 65 Source Code)SUPPORT .M65 1"}03 - AMP Misc. Routines (MAC 65 Source Code)Side #2 Directory (Alphabetical Order)BEE 052 - AMP Music File (Dem"}onstration)COMESAIL 199 - AMP Music File (Demonstration)FANTIMPU 116 - AMP Music File (Demonstration)GRNDDSGN "}156 - AMP Music File (Demonstration)MUNSTERS 013 - AMP Music File (Demonstration)NUT 106 - AMP Music File (Dem"}onstration) FF x Ѣi$/L8L& p6k7_``nn`oНЩ 𩔍čD`pppB6pp}A64he!ntic-usic0rocessor6ersion# !rgo3oft0roductions}{LbHHH{"l7g8v{vi{L7L7r i7ψhhh@ȱ_ ȱ`L56L#6<} +m''+m&&'<<`<< '8'+&8&+ޛ+<<`+ XY`37``̇ })?37L28̇`)?I@37LE8)?3h8c97`iԐ`D9Ԡ+9 \091(o' }!' '" > *& :& > @ J&091 >"/ # >L9pppB'›9B*A9}{ЍЍЍЩLbHHH{9{Ld9Ѝd9_:9{ 99ЌЭ{hhh@88XX } -emory&ull '')=)QMETxMxxxKEY=TxxxPL @ Y!/L&LDLBɜLbDɝLyE}LPD i@ }6$L9)| % #C ,CLA_ ,CL BfF~`:[;*L9 R >L9!a!i`*L9 :& 7C} J& # ,CL9 :& 7Cݩ > 9 L;9x L< ;;lL%2;<;} < ;.% % CYL;L.%ɛ(0@ ٰե\;W<L`B % CV ,C B > > Z&L: > >6T%} ҽ!mXҬ4ȢҍҩL:F !9 % CXȭ0<ȩ d?* > >L:L.%}ji$_`L3ȹ/hɛȩ$$ m$X}08# 1L$ D>E>l$T=O>$L.%$$L.%N F#LR=}7L_=17808VL_=ԥ/  i L=Ԉ 9:L_=^LR=0 :L=} ٰ L.%ԍ9Ս:L_=ȢRݔ LR=LL_=o===#>.<.%P>K?L.% ^"6TB % C6ȭ4}ȭ"L;*Ȍ`F!9+"9`ЩЍ Щ ЍЩ` }]V ȱȱբˠ?} ? # #L ?V @Xȱ<ܠ? ? d? x?Y? ?L>? L?G@?LC? #`խ<}i#Ԑ #` #` @ȑ`##$$%&&''!!"2#$b$%b%&'b'!b!"b"2RRRRRRRRRRRRRRRR4empo},yric!dvanceppppppmpmfffffff&&&&&&&PPPPPPMPH@CAMFFFFFFFF1F2F3F4F}5F6F7< @ %V ,C< BB$`L@ C >L@ L@ C >_ 99}ʥi(L@`ȍ!ȱ"T A LA  @ 1i?DA?B i ~#} `ȱ A uA`")XȭX mX% @%`  *  `")JJJJ 8 `} CV > i@L9 C > i@L9 % #C BB$ @L9 CVL@B;C0B$]B} $`V *& CLBVȱ ȱ >LA CLcB $%Viȥȥi}`GL9 %GVLe; CGȭHȭI > >L:i`8``N`  >$`L9 % m Cȹȹ̆ B }> >L9VVVV&EA00EIL\n{EE4he)1i1232435ޥ<<8$}