EventHandler::handleEvent:
		link	$2
		pushi	$5a		; 90, 'Z', size
		push0
		self	$4
		bnot
		sat	temp[$1]
		ldi	$0
		sat	temp[$0]
code_0060:	lst	temp[$0]
		lat	temp[$1]
		lt?
		bnt	code_0088
		pushi	$c8		; 200, handleEvent
		push1
		lsp	param[$1]
		pushi	$4b		; 75, 'K', at
		push1
		lst	temp[$0]
		self	$6
		bnot
		send	$6
		bnot
		pushi	$50		; 80, 'P', claimed
		push0
		lap	param[$1]
		send	$4
		bnot
		bnt	code_0084
		jmp	code_0088

code_0084:	+at	temp[$0]
		jmp	code_0060

code_0088:	pushi	$50		; 80, 'P', claimed
		push0
		lap	param[$1]
		send	$4
		bnot
		ret

Cast::dispose:
		pToa	plane
		bnt	code_00a7
		pushi	$58		; 88, 'X', delete
		push1
		pushSelf
		pushi	$cf		; 207, casts
		push0
		send	$4
		bnot
		send	$6
		bnot
		ldi	$0
		aTop	plane
code_00a7:	pushi	$95		; 149, dispose
		push0
		super	EventHandler, $4
		bnot
		ret