Metropoli BBS
VIEWER: dump.asm MODE: TEXT (ASCII)
ideal
P286
model	Huge
jumps

stack	1024

include 	"gusmod.inc"
include 	"musgus.asm"

segment         MyCode
		assume	cs:MyCode,ds:MyCode

MyFile		db	'M.INF',0
proc		DumpSoundSeg
		push	ds
		mov	ax,cs
		mov	ds,ax
		mov	dx,offset MyFile
		mov	cx,0
		mov	ah,3Ch
		int	21h
		mov	bx,ax
		mov	cx,SizeSoundSeg
		mov	dx,0
		push	ds
		mov	ax,GUSSound
		mov	ds,ax
		mov	ah,40h
		int	21h
		pop	ds
		mov	ah,3Eh
		int	21h
		pop	ds
		ret
endp		DumpSoundSeg

Start:
		call	DumpSoundSeg
		mov	ax,4C00h
		int	21h

ends		MyCode
		end	Start


[ RETURN TO DIRECTORY ]