255 lines
3.6 KiB
Plaintext
255 lines
3.6 KiB
Plaintext
NetMsgProcessor::init:
|
|
pushi $94 ; 148, init
|
|
push0
|
|
super Code, $4
|
|
bnot
|
|
lsg global[$12]
|
|
selfID
|
|
ne?
|
|
bnt code_006a
|
|
selfID
|
|
sag global[$12]
|
|
lag global[$28]
|
|
not
|
|
bnt code_005f
|
|
selfID
|
|
sag global[$28]
|
|
code_005f: pushi $8d ; 141, new
|
|
push0
|
|
class Set
|
|
send $4
|
|
bnot
|
|
aTop nmpQueue
|
|
code_006a: ret
|
|
|
|
NetMsgProcessor::dispose:
|
|
ldi $0
|
|
sag global[$12]
|
|
lsg global[$28]
|
|
selfID
|
|
eq?
|
|
bnt code_0079
|
|
ldi $0
|
|
sag global[$28]
|
|
code_0079: pushi $95 ; 149, dispose
|
|
push0
|
|
pToa nmpQueue
|
|
send $4
|
|
bnot
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
super Code, $4
|
|
bnot
|
|
ret
|
|
|
|
NetMsgProcessor::getMsg:
|
|
link $1
|
|
pushi $4b ; 75, 'K', at
|
|
push1
|
|
lsp param[$0]
|
|
ldi $1
|
|
ge?
|
|
bnt code_009b
|
|
lap param[$1]
|
|
jmp code_009d
|
|
|
|
code_009b: ldi $0
|
|
code_009d: push
|
|
pToa nmpQueue
|
|
send $6
|
|
bnot
|
|
sat temp[$0]
|
|
pushi $58 ; 88, 'X', delete
|
|
push1
|
|
aTop lastMsg
|
|
push
|
|
pToa nmpQueue
|
|
send $6
|
|
bnot
|
|
lat temp[$0]
|
|
ret
|
|
|
|
NetMsgProcessor::putMsg:
|
|
pushi $9f ; 159, add
|
|
push1
|
|
lsp param[$1]
|
|
pToa nmpQueue
|
|
send $6
|
|
bnot
|
|
ret
|
|
|
|
NetMsgProcessor::processMsg:
|
|
link $1
|
|
pushi $2ee ; 750, getMsg
|
|
push0
|
|
&rest $1
|
|
self $4
|
|
bnot
|
|
sat temp[$0]
|
|
not
|
|
bt code_00dc
|
|
pushi $97 ; 151, isKindOf
|
|
push1
|
|
class NetMsg
|
|
push
|
|
lat temp[$0]
|
|
send $6
|
|
bnot
|
|
not
|
|
code_00dc: bnt code_00e1
|
|
ldi $0
|
|
ret
|
|
|
|
code_00e1: pushi $2de ; 734, to
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
bnt code_0116
|
|
pushi $9b ; 155, handleMsg
|
|
push1
|
|
lst temp[$0]
|
|
pushi $2de ; 734, to
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
send $6
|
|
bnot
|
|
pushi $50 ; 80, 'P', claimed
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
not
|
|
bnt code_0126
|
|
pushi $9b ; 155, handleMsg
|
|
push1
|
|
lst temp[$0]
|
|
lag global[$2f]
|
|
send $6
|
|
bnot
|
|
jmp code_0126
|
|
|
|
code_0116: lag global[$4a]
|
|
bnt code_0126
|
|
push1
|
|
lofsa string_0026 ; "NMP: Msg with illegal to? property."
|
|
push
|
|
calle export60029_0, $2
|
|
bnot
|
|
code_0126: pushi $a3 ; 163, contains
|
|
push1
|
|
lst temp[$0]
|
|
pToa nmpQueue
|
|
send $6
|
|
bnot
|
|
not
|
|
bnt code_013d
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
code_013d: ldi $0
|
|
ret
|
|
|
|
NetMsgProcessor::doit:
|
|
link $2
|
|
ldi $0
|
|
ret
|
|
|
|
pToa paused
|
|
bt code_014f
|
|
lap param[$0]
|
|
bnt code_0168
|
|
lap param[$1]
|
|
code_014f: bnt code_0168
|
|
pToa paused
|
|
sat temp[$1]
|
|
ldi $1
|
|
aTop paused
|
|
pushi $9b ; 155, handleMsg
|
|
push0
|
|
self $4
|
|
bnot
|
|
sat temp[$0]
|
|
lat temp[$1]
|
|
aTop paused
|
|
jmp code_0171
|
|
|
|
code_0168: pushi $2f0 ; 752, processMsg
|
|
push0
|
|
self $4
|
|
bnot
|
|
sat temp[$0]
|
|
code_0171: lat temp[$0]
|
|
ret
|
|
|
|
NetMsgProcessor::handleMsg:
|
|
link $1
|
|
pToa processing
|
|
not
|
|
bnt code_01dd
|
|
lsp param[$0]
|
|
ldi $1
|
|
eq?
|
|
bnt code_0186
|
|
lap param[$1]
|
|
jmp code_018f
|
|
|
|
code_0186: pushi $2f1 ; 753, nextNetMsg
|
|
push0
|
|
lag global[$e]
|
|
send $4
|
|
bnot
|
|
code_018f: sat temp[$0]
|
|
push
|
|
ldi $0
|
|
eq?
|
|
bnt code_019a
|
|
ldi $0
|
|
ret
|
|
|
|
code_019a: ldi $1
|
|
aTop processing
|
|
pushi $94 ; 148, init
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
pushi $2de ; 734, to
|
|
push0
|
|
lat temp[$0]
|
|
send $4
|
|
bnot
|
|
bnt code_01ce
|
|
pushi $2ef ; 751, putMsg
|
|
push1
|
|
lst temp[$0]
|
|
self $6
|
|
bnot
|
|
pToa paused
|
|
not
|
|
bnt code_01c7
|
|
pushi $2f0 ; 752, processMsg
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_01c7: ldi $0
|
|
aTop processing
|
|
ldi $1
|
|
ret
|
|
|
|
code_01ce: lat temp[$0]
|
|
bnt code_01d9
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
code_01d9: ldi $0
|
|
aTop processing
|
|
code_01dd: ldi $0
|
|
ret
|
|
|