62 lines
896 B
Plaintext
62 lines
896 B
Plaintext
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
|
|
|