0100 ; SOUNDMAC.LIB›0110 ;›0120 .IF .NOT .DEF OSEQU›0130 .ERROR "Must include OSEQU.LIB"›0140 .ENDIF ›0150 ;›0160 ;›0170 ;›0180 ; MACRO: SOUND›0190 ;›0200 ; FORM: SOUND ch,pitch,timbre,voulme›0210 ;›0220 ; same as basic sound command›0230 ;›0240 .MACRO SOUND ›0250 @LA %1›0260 STA TEMP›0270 CLC ›0280 ADC TEMP›0290 TAX ›0300 @LA %2›0310 STA AUDF1,X›0320 @LA %3›0330 ASL A›0340 ASL A›0350 ASL A›0360 ASL A›0370 STA TEMP›0380 @LA %4›0390 ORA TEMP›0400 STA AUDC1,X›0410 .ENDM ›0420 ;›0430 ;›0440 ;›