|
|
|
PROGRAM{
|
|
|
|
DECLPROC __tact_verify_address
|
|
|
|
DECLPROC __tact_store_address
|
|
|
|
DECLPROC __tact_store_address_opt
|
|
|
|
DECLPROC __gen_write_WithdrawalRequests
|
|
|
|
DECLPROC __gen_write_TONB
|
|
|
|
DECLPROC $__gen_TONB_init
|
|
|
|
107886 DECLMETHOD init
|
|
|
|
DECLPROC main
|
|
|
|
__tact_verify_address PROCINLINE:<{
|
|
|
|
SBITS
|
|
|
|
267 PUSHINT
|
|
|
|
NEQ
|
|
|
|
136 THROWIFNOT
|
|
|
|
}>
|
|
|
|
__tact_store_address PROCINLINE:<{
|
|
|
|
STSLICER
|
|
|
|
}>
|
|
|
|
__tact_store_address_opt PROCINLINE:<{
|
|
|
|
DUP
|
|
|
|
ISNULL
|
|
|
|
IF:<{
|
|
|
|
DROP
|
|
|
|
0 PUSHINT
|
|
|
|
SWAP
|
|
|
|
2 STU
|
|
|
|
}>ELSE<{
|
|
|
|
__tact_store_address INLINECALLDICT
|
|
|
|
}>
|
|
|
|
}>
|
|
|
|
__gen_write_WithdrawalRequests PROCINLINE:<{
|
|
|
|
s2 s3 XCHG2
|
|
|
|
STDICT
|
|
|
|
STDICT
|
|
|
|
257 PUSHINT
|
|
|
|
STIX
|
|
|
|
}>
|
|
|
|
__gen_write_TONB PROCINLINE:<{
|
|
|
|
s12 s11 XCHG2
|
|
|
|
STGRAMS
|
|
|
|
s0 s9 XCHG2
|
|
|
|
__tact_store_address INLINECALLDICT
|
|
|
|
s7 PUSH
|
|
|
|
ISNULL
|
|
|
|
NOT
|
|
|
|
IF:<{
|
|
|
|
TRUE
|
|
|
|
SWAP
|
|
|
|
1 STI
|
|
|
|
s1 s7 XCHG
|
|
|
|
STREF
|
|
|
|
}>ELSE<{
|
|
|
|
s7 POP
|
|
|
|
FALSE
|
|
|
|
s0 s7 XCHG2
|
|
|
|
1 STI
|
|
|
|
}>
|
|
|
|
s1 s5 XCHG
|
|
|
|
1 STI
|
|
|
|
s0 s3 XCHG2
|
|
|
|
__tact_store_address_opt INLINECALLDICT
|
|
|
|
SWAP
|
|
|
|
__tact_store_address_opt INLINECALLDICT
|
|
|
|
SWAP
|
|
|
|
NEWC
|
|
|
|
257 PUSHINT
|
|
|
|
STIX
|
|
|
|
ROT
|
|
|
|
__tact_store_address_opt INLINECALLDICT
|
|
|
|
s1 s2 XCHG
|
|
|
|
257 PUSHINT
|
|
|
|
STIX
|
|
|
|
NEWC
|
|
|
|
s3 s1 s3 XCHG3
|
|
|
|
s5 s4 XCHG2
|
|
|
|
__gen_write_WithdrawalRequests INLINECALLDICT
|
|
|
|
ENDC
|
|
|
|
ROT
|
|
|
|
STREF
|
|
|
|
ENDC
|
|
|
|
SWAP
|
|
|
|
STREF
|
|
|
|
}>
|
|
|
|
$__gen_TONB_init PROC:<{
|
|
|
|
PUSHNULL
|
|
|
|
PUSHNULL
|
|
|
|
0 PUSHINT
|
|
|
|
s0 s0 PUSH2
|
|
|
|
TRUE
|
|
|
|
PUSHNULL
|
|
|
|
PUSHNULL
|
|
|
|
s3 PUSH
|
|
|
|
s0 s12 XCHG
|
|
|
|
NEWC
|
|
|
|
STREF
|
|
|
|
s0 s12 XCHG
|
|
|
|
s4 s11 XCHG
|
|
|
|
s4 s10 XCHG
|
|
|
|
s4 s9 XCHG
|
|
|
|
s3 s8 XCHG
|
|
|
|
s3 s7 XCHG
|
|
|
|
s3 s6 XCHG
|
|
|
|
s3 s5 XCHG
|
|
|
|
__gen_write_TONB INLINECALLDICT
|
|
|
|
ENDC
|
|
|
|
}>
|
|
|
|
init PROC:<{
|
|
|
|
$__gen_TONB_init CALLDICT
|
|
|
|
}>
|
|
|
|
main PROC:<{
|
|
|
|
}>
|
|
|
|
}END>c
|