Sound::dispose:
		pushi	$141		; 321, stop
		push0
		self	$4
		bnot
		pushi	$95		; 149, dispose
		push0
		&rest	$1
		super	Obj, $4
		bnot
		ret

Sound::play:
		pTos	pHandle
		ldi	$ff		; 255, asInteger
		ne?
		bnt	code_00e2
		pushi	$141		; 321, stop
		push0
		self	$4
		bnot
code_00e2:	push2
		push0
		lsp	param[$1]
		callk	kernel_117, $4
		bnot
		aTop	pHandle
		push2
		push2
		pTos	pHandle
		callk	kernel_117, $4
		bnot
		ret

Sound::stop:
		push2
		push1
		pTos	pHandle
		callk	kernel_117, $4
		bnot
		push2
		pushi	$3		; z
		pTos	pHandle
		callk	kernel_117, $4
		bnot
		ldi	$ff		; 255, asInteger
		aTop	pHandle
		ret

PanHandler::doit:
		link	$2
		push1
		pTos	pObject
		calle	export60000_0, $2
		bnot
		bnt	code_0171
		ldi	$80		; 128, lastKey
		sat	temp[$1]
		pushi	$144		; 324, scaler
		push0
		pToa	pObject
		send	$4
		bnot
		bnt	code_013b
		pushi	$145		; 325, frontSize
		push0
		pushi	$144		; 324, scaler
		push0
		pToa	pObject
		send	$4
		bnot
		send	$4
		bnot
		sat	temp[$1]
code_013b:	pushi	$5		; scaleY
		dup
		pTos	pSoundID
		push1
		push0
		pToa	pObject
		send	$4
		bnot
		push
		pushi	$5		; scaleY
		push0
		pToa	pObject
		send	$4
		bnot
		push
		lst	temp[$1]
		callk	kernel_117, $a
		bnot
		push
		ldi	$ff		; 255, asInteger
		eq?
		bnt	code_0182
		pushi	$58		; 88, 'X', delete
		push1
		pushSelf
		lofsa	SoundList
		send	$6
		bnot
		pushi	$95		; 149, dispose
		push0
		self	$4
		bnot
		ret

		jmp	code_0182

code_0171:	pushi	$58		; 88, 'X', delete
		push1
		pushSelf
		lofsa	SoundList
		send	$6
		bnot
		pushi	$95		; 149, dispose
		push0
		self	$4
		bnot
code_0182:	ret

SoundMgr::play:
		link	$3
		pushi	$3		; z
		push0
		lsp	param[$1]
		lsp	param[$0]
		ldi	$2
		gt?
		bnt	code_0195
		lap	param[$3]
		jmp	code_0197

code_0195:	ldi	$1
code_0197:	push
		callk	kernel_117, $6
		bnot
		sat	temp[$0]
		lsp	param[$0]
		ldi	$1
		gt?
		bnt	code_01d7
		lap	param[$2]
		bnt	code_01d7
		pushi	$142		; 322, pObject
		push1
		lsp	param[$2]
		pushi	$143		; 323, pSoundID
		push1
		lst	temp[$0]
		pushi	$8d		; 141, new
		push0
		class	PanHandler
		send	$4
		bnot
		sat	temp[$2]
		send	$c
		bnot
		pushi	$9f		; 159, add
		push1
		lst	temp[$2]
		lofsa	SoundList
		send	$6
		bnot
		pushi	$45		; 69, 'E', doit
		push0
		lat	temp[$2]
		send	$4
		bnot
code_01d7:	lat	temp[$0]
		ret

SoundMgr::doit:
		pushi	$9d		; 157, eachElementDo
		push1
		pushi	$45		; 69, 'E', doit
		lofsa	SoundList
		send	$6
		bnot
		ret

