code_004d:	add
		link	$9
		pushi	$b9		; 185, localize
		push1
		push0
		push0
		lag	global[$3]
		send	$4
		bnot
		push
		lap	param[$1]
		send	$6
		bnot
		ldi	$0
		sat	temp[$0]
		ldi	$0
		sat	temp[$1]
		push2
		push0
		lag	global[$1]
		send	$4
		bnot
		sat	temp[$7]
		ldi	$0
		sat	temp[$4]
		lst	temp[$4]
		lsp	param[$0]
		ldi	$1
		sub
		lt?
		bnt	$d1
		lat	temp[$4]
		lapi	param[$2]
		sat	temp[$2]
		bnt	$cd
		pushi	$5a		; 90, 'Z', size
		push0
		send	$4
		bnot
		sat	temp[$8]
		ldi	$0
		sat	temp[$5]
		lst	temp[$5]
		lat	temp[$8]
		lt?
		bnt	$cd
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$5]
		lat	temp[$2]
		send	$6
		bnot
		sat	temp[$3]
		pushi	$eb		; 235, onMe
		push1
		lsp	param[$1]
		send	$6
		bnot
		bnt	$c9
		push2
		push0
		lat	temp[$3]
		send	$4
		bnot
		sat	temp[$6]
		push
		lat	temp[$1]
		gt?
		bnt	$c9
		lat	temp[$3]
		sat	temp[$0]
		lat	temp[$6]
		sat	temp[$1]
		+at	temp[$5]
		jmp	$94

		+at	temp[$4]
		jmp	$76

		lat	temp[$0]
		bnt	$de
		pushi	$c8		; 200, handleEvent
		push1
		lsp	param[$1]
		send	$6
		bnot
		pushi	$ba		; 186, globalize
		push0
		lap	param[$1]
		send	$4
		bnot
		lat	temp[$0]
		ret

curNetMsg::dispose:
		link	$1
		pToa	data
		sat	temp[$0]
		ldi	$0
		aTop	data
		pushi	$95		; 149, dispose
		push0
		super	NetMsg, $4
		bnot
		lat	temp[$0]
		aTop	data
		ldi	$0
		aTop	claimed
		ret

netMsgHandler::handleMsg:
		link	$2
		pToa	elements
		bnt	code_0146
		pushi	$8d		; 141, new
		push1
		pushSelf
		class	Sequence
		send	$6
		bnot
		sat	temp[$0]
code_0117:	pushi	$4c		; 76, 'L', next
		push0
		lat	temp[$0]
		send	$4
		bnot
		sat	temp[$1]
		bnt	code_013d
		pushi	$50		; 80, 'P', claimed
		push0
		lap	param[$1]
		send	$4
		bnot
		not
		bnt	code_013d
		pushi	$9b		; 155, handleMsg
		push1
		lsp	param[$1]
		&rest	$2
		lat	temp[$1]
		send	$6
		bnot
		jmp	code_0117

code_013d:	pushi	$95		; 149, dispose
		push0
		lat	temp[$0]
		send	$4
		bnot
code_0146:	pushi	$50		; 80, 'P', claimed
		push0
		lap	param[$1]
		send	$4
		bnot
		ret

NetUser::init:
		pushi	$94		; 148, init
		push0
		super	User, $4
		bnot
		lofsa	netMsgHandler
		sag	global[$2f]
		pushi	$71		; 113, 'q', data
		push1
		pushi	$3		; z
		push0
		pushi	$ff		; 255, asInteger
		push2
		callk	kernel_91, $6
		bnot
		push
		lofsa	curNetMsg
		aTop	curMsg
		send	$6
		bnot
		ret

NetUser::doit:
		link	$9
		pToa	curMsg
		sat	temp[$0]
		ldi	$1
		sat	temp[$5]
		ldi	$0
		sat	temp[$3]
code_0182:	lag	global[$4f]
		bnt	code_0198
		push2
		pushi	$d		; 13, seenRect
		pushi	$71		; 113, 'q', data
		push0
		lat	temp[$0]
		send	$4
		bnot
		push
		callk	kernel_128, $4
		bnot
		sat	temp[$3]
code_0198:	bt	code_019c
		lat	temp[$5]
code_019c:	bnt	code_02cb
		ldi	$0
		sat	temp[$5]
		pToa	curEvent
		sat	temp[$1]
		pushi	$8d		; 141, new
		push1
		pushi	$7fff		; 32767
		send	$6
		bnot
		pushi	$2b		; 43, '+', type
		push0
		lat	temp[$1]
		send	$4
		bnot
		sat	temp[$2]
		pToa	input
		bnt	code_01d7
		lst	temp[$2]
		ldi	$4		; scaleX
		eq?
		bt	code_01cc
		lst	temp[$2]
		ldi	$100		; 256, strMax
		eq?
code_01cc:	bnt	code_01d7
		pushi	$c8		; 200, handleEvent
		push1
		lst	temp[$1]
		self	$6
		bnot
code_01d7:	pToa	controls
		bnt	code_02a6
		pushi	$5a		; 90, 'Z', size
		push0
		lag	global[$4d]
		send	$4
		bnot
		bnt	code_01f4
		pushi	$9d		; 157, eachElementDo
		push2
		pushi	$1ce		; 462, process
		lst	temp[$1]
		lag	global[$4d]
		send	$8
		bnot
code_01f4:	lag	global[$1]
		bnt	code_0227
		pToa	controls
		bnt	code_0227
		lst	temp[$2]
		ldi	$100		; 256, strMax
		eq?
		bnt	code_0227
		pushi	$31		; 49, '1', message
		push0
		lat	temp[$1]
		send	$4
		bnot
		push
		ldi	$8		; fixPriority
		eq?
		bnt	code_0227
		pushi	$316		; 790, handleVerb
		push1
		pushi	$48		; 72, 'H', modifiers
		push0
		lat	temp[$1]
		send	$4
		bnot
		push
		lag	global[$1]
		send	$6
		bnot
		jmp	code_02a6

code_0227:	lag	global[$1]
		bnt	code_0296
		pToa	controls
		bnt	code_0296
		lst	temp[$2]
		ldi	$100		; 256, strMax
		eq?
		bnt	code_0296
		pushi	$31		; 49, '1', message
		push0
		lat	temp[$1]
		send	$4
		bnot
		push
		ldi	$10		; 16, cel
		eq?
		bnt	code_0296
		push2
		lst	temp[$1]
		pushi	$f2		; 242, pCast
		push0
		lag	global[$3]
		send	$4
		bnot
		push
		call	code_004d, $4
		bnot
		sat	temp[$4]
		bnt	code_02a6
		pushi	$2b		; 43, '+', type
		push1
		pushi	$4000		; 16384
		pushi	$31		; 49, '1', message
		push1
		push2
		lat	temp[$1]
		send	$c
		bnot
		pushi	$32d		; 813, pObj
		push1
		pushi	$48		; 72, 'H', modifiers
		push0
		lat	temp[$1]
		send	$4
		bnot
		push
		class	WDragger
		send	$6
		bnot
		pushi	$c8		; 200, handleEvent
		push2
		lst	temp[$1]
		lst	temp[$4]
		lag	global[$1]
		send	$8
		bnot
		pushi	$32d		; 813, pObj
		push1
		push0
		class	WDragger
		send	$6
		bnot
		jmp	code_02a6

code_0296:	lst	temp[$2]
		ldi	$0
		ne?
		bnt	code_02a6
		pushi	$c8		; 200, handleEvent
		push1
		lst	temp[$1]
		self	$6
		bnot
code_02a6:	lat	temp[$3]
		bnt	code_0182
		pushi	$2dc		; 732, _len_
		push1
		push
		lat	temp[$0]
		send	$6
		bnot
		pushi	$9b		; 155, handleMsg
		push1
		lst	temp[$0]
		lag	global[$12]
		send	$6
		bnot
		pushi	$45		; 69, 'E', doit
		push0
		lag	global[$6a]
		send	$4
		bnot
		jmp	code_0182

code_02cb:	ret

NetUser::nextNetMsg:
		link	$2
		pToa	curMsg
		sat	temp[$1]
		push2
		pushi	$d		; 13, seenRect
		pushi	$71		; 113, 'q', data
		push0
		send	$4
		bnot
		push
		callk	kernel_128, $4
		bnot
		sat	temp[$0]
		not
		bnt	code_02e8
		ldi	$0
		ret

code_02e8:	pushi	$2dc		; 732, _len_
		push1
		lst	temp[$0]
		pushi	$94		; 148, init
		push0
		lat	temp[$1]
		send	$a
		bnot
		lat	temp[$1]
		ret

