' *** DOSOUND.LST *** 2nd GFA-Manual, page 16-11 > PROCEDURE dosound(adr%) ' ' *** Play XBIOS 32 sound-string (at address adr%) ' ~XBIOS(32,L:adr%) RETURN ' ********* '