WinDialogSet::add:
		link	$3
		pushi	$99		; 153, respondsTo
		push1
		pushi	$c8		; 200, handleEvent
		lap	param[$1]
		send	$6
		bnot
		not
		bnt	code_00a6
		push1
		lofsa	string_005c	; "Found it."
		push
		callk	kernel_132, $2
		bnot
code_00a6:	pushi	$9f		; 159, add
		push1
		lsp	param[$1]
		&rest	$2
		super	Set, $6
		bnot
		ret

WinDialogHandler::init:
		pToa	pWindow
		bnt	code_00c3
		push2
		pushi	$2c		; 44, ',', window
		push
		callk	kernel_118, $4
		bnot
		ldi	$0
		aTop	pWindow
code_00c3:	push2
		pushi	$2b		; 43, '+', type
		push2
		pushi	$9		; inLeft
		lsp	param[$1]
		callk	kernel_91, $4
		bnot
		push
		callk	kernel_118, $4
		bnot
		aTop	pWindow
		pushi	$9f		; 159, add
		push1
		pushSelf
		class	WinDialogSet
		send	$6
		bnot
		ret

WinDialogHandler::dispose:
		pToa	pWindow
		bnt	code_00f1
		push2
		pushi	$2c		; 44, ',', window
		push
		callk	kernel_118, $4
		bnot
		ldi	$0
		aTop	pWindow
code_00f1:	pushi	$58		; 88, 'X', delete
		push1
		pushSelf
		class	WinDialogSet
		send	$6
		bnot
		pushi	$95		; 149, dispose
		push0
		&rest	$1
		super	Obj, $4
		bnot
		ret

WinDialogHandler::handleEvent:
		ldi	$0
		ret

WinDialogHandler::disable:
		push2
		pushi	$32		; 50, '2', edit
		pTos	pWindow
		callk	kernel_118, $4
		bnot
code_0111:	pushi	$2b		; 43, '+', type
		push0
		pushi	$f3		; 243, nextEvent
		push1
		pushi	$7fff		; 32767
		lag	global[$e]
		send	$6
		bnot
		send	$4
		bnot
		push
		ldi	$0
		ne?
		bnt	code_012b
		jmp	code_0111

code_012b:	ret

WinDialogHandler::enable:
		push2
		pushi	$31		; 49, '1', message
		pTos	pWindow
		callk	kernel_118, $4
		bnot
code_0135:	pushi	$2b		; 43, '+', type
		push0
		pushi	$f3		; 243, nextEvent
		push1
		pushi	$7fff		; 32767
		lag	global[$e]
		send	$6
		bnot
		send	$4
		bnot
		push
		ldi	$0
		ne?
		bnt	code_014f
		jmp	code_0135

code_014f:	ret

DialogHandler::doit:
		lap	param[$0]
		bnt	code_016b
		pushi	$24e		; 590, handsOff
		push0
		lag	global[$2]
		send	$4
		bnot
		lap	param[$1]
		bnt	code_0167
		ldi	$1
		sag	global[$32]
		jmp	code_016b

code_0167:	ldi	$0
		aTop	scratch
code_016b:	ret

DialogHandler::init:
		selfID
		sag	global[$13]
		pushi	$94		; 148, init
		push0
		super	Set, $4
		bnot
		pushi	$9f		; 159, add
		push0
		self	$4
		bnot
		ret

DialogHandler::dispose:
		ldi	$0
		sag	global[$13]
		pushi	$95		; 149, dispose
		push0
		super	Set, $4
		bnot
		ret

DialogHandler::handleEvent:
		link	$1
		pushi	$2b		; 43, '+', type
		push0
		lap	param[$1]
		send	$4
		bnot
		push
		ldi	$100		; 256, strMax
		and
		bnt	code_01b6
		pushi	$a0		; 160, firstTrue
		push2
		pushi	$c8		; 200, handleEvent
		lsp	param[$1]
		class	WinDialogSet
		send	$8
		bnot
		pushi	$50		; 80, 'P', claimed
		push1
		push1
		lap	param[$1]
		send	$6
		bnot
		jmp	code_01c2

code_01b6:	pushi	$a0		; 160, firstTrue
		push2
		pushi	$1ce		; 462, process
		lsp	param[$1]
		self	$8
		bnot
code_01c2:	pushi	$50		; 80, 'P', claimed
		push0
		lap	param[$1]
		send	$4
		bnot
		ret