Listing of file='GAMSND.MAC;01' on disk='vmedia/taylor-sideB-sector.ccvf'
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ; ROUTINES TO MAKE GAME SOUNDS ; TITLE GAMSND ; VALUES ON ENTRY: ; IRRELEVANT ; ; RETURNS: ; NOTHING ; ; DESTROYS: ; ALL REGISTERS ; ; ; EXTERNALS - REQUIRED SUBROUTINES ; EXTRN SOUND,PITCH,DURN,NSTEPS,STEP1,STEP2 ;USES "OVERLAPPED" SOUNDWARE ROUTINE ;.............................................................. ; ; MAKE "EXPLOSION" SOUND ; ENTRY BOOM BOOM: LXI H,0240H SHLD PITCH LXI H,4 SHLD DURN MVI A,5 STA NSTEPS MVI A,129 STA STEP1 MVI A,127 STA STEP2 CALL SOUND RET ; ; MAKE LASER SOUND ; ENTRY LASER LASER: LXI H,0102H SHLD PITCH LXI H,10 SHLD DURN MVI A,10 STA NSTEPS MVI A,1 STA STEP1 XRA A STA STEP2 CALL SOUND RET END