194 lines
2.8 KiB
Plaintext
194 lines
2.8 KiB
Plaintext
GSGetMailScript::handleMsg:
|
|
link $5
|
|
pushi $3 ; z
|
|
pushi $a ; 10, inTop
|
|
push0
|
|
lsp param[$1]
|
|
callk kernel_118, $6
|
|
bnot
|
|
bnt code_01ef
|
|
ldi $1
|
|
aTop cycles
|
|
code_01ef: ret
|
|
|
|
GSGetMailScript::changeState:
|
|
lap param[$1]
|
|
aTop state
|
|
push
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_020c
|
|
pushi $3 ; z
|
|
pushi $e ; 14, view
|
|
lofsa string_01b0 ; "t"
|
|
push
|
|
pushi $87 ; 135, left
|
|
callk kernel_128, $6
|
|
bnot
|
|
jmp code_0219
|
|
|
|
code_020c: dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_0219
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_0219: toss
|
|
ret
|
|
|
|
GSSendMailScript::dispose:
|
|
pToa pObj
|
|
bnt code_022a
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
send $4
|
|
bnot
|
|
ldi $0
|
|
aTop pObj
|
|
code_022a: pushi $95 ; 149, dispose
|
|
push0
|
|
&rest $1
|
|
super GSActionScript, $4
|
|
bnot
|
|
ret
|
|
|
|
GSSendMailScript::handleMsg:
|
|
link $5
|
|
pushi $3 ; z
|
|
pushi $a ; 10, inTop
|
|
push0
|
|
lsp param[$1]
|
|
callk kernel_118, $6
|
|
bnot
|
|
bnt code_0248
|
|
ldi $1
|
|
aTop cycles
|
|
code_0248: ret
|
|
|
|
GSSendMailScript::changeState:
|
|
lap param[$1]
|
|
aTop state
|
|
push
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_0277
|
|
pushi $5 ; scaleY
|
|
pushi $e ; 14, view
|
|
lofsa string_01c2 ; "ta"
|
|
push
|
|
pushi $8a ; 138, bottom
|
|
pushi $5a ; 90, 'Z', size
|
|
push0
|
|
pToa pObj
|
|
send $4
|
|
bnot
|
|
push
|
|
pushi $71 ; 113, 'q', data
|
|
push0
|
|
pToa pObj
|
|
send $4
|
|
bnot
|
|
push
|
|
callk kernel_128, $a
|
|
bnot
|
|
jmp code_0284
|
|
|
|
code_0277: dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_0284
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_0284: toss
|
|
ret
|
|
|
|
GSGetMailMsgScript::handleMsg:
|
|
pushi $3 ; z
|
|
pushi $a ; 10, inTop
|
|
push0
|
|
lsp param[$1]
|
|
callk kernel_118, $6
|
|
bnot
|
|
bnt code_0297
|
|
ldi $1
|
|
aTop cycles
|
|
code_0297: ret
|
|
|
|
GSGetMailMsgScript::changeState:
|
|
lap param[$1]
|
|
aTop state
|
|
push
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_02b6
|
|
pushi $4 ; scaleX
|
|
pushi $e ; 14, view
|
|
lofsa string_01d6 ; "tw"
|
|
push
|
|
pushi $88 ; 136, right
|
|
pTos pNumber
|
|
callk kernel_128, $8
|
|
bnot
|
|
jmp code_02c3
|
|
|
|
code_02b6: dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_02c3
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_02c3: toss
|
|
ret
|
|
|
|
GSEraseMailMsgScript::handleMsg:
|
|
link $8
|
|
pushi $3 ; z
|
|
pushi $a ; 10, inTop
|
|
push0
|
|
lsp param[$1]
|
|
callk kernel_118, $6
|
|
bnot
|
|
bnt code_02d8
|
|
ldi $1
|
|
aTop cycles
|
|
code_02d8: ret
|
|
|
|
GSEraseMailMsgScript::changeState:
|
|
lap param[$1]
|
|
aTop state
|
|
push
|
|
dup
|
|
ldi $0
|
|
eq?
|
|
bnt code_02f7
|
|
pushi $4 ; scaleX
|
|
pushi $e ; 14, view
|
|
lofsa string_01d6 ; "tw"
|
|
push
|
|
pushi $89 ; 137, top
|
|
pTos pNumber
|
|
callk kernel_128, $8
|
|
bnot
|
|
jmp code_0304
|
|
|
|
code_02f7: dup
|
|
ldi $1
|
|
eq?
|
|
bnt code_0304
|
|
pushi $95 ; 149, dispose
|
|
push0
|
|
self $4
|
|
bnot
|
|
code_0304: toss
|
|
ret
|
|
|