You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

62 lines
1.1 KiB

PROGRAM{
DECLPROC __tact_verify_address
DECLPROC __tact_store_address
2 years ago
DECLPROC __tact_store_address_opt
DECLPROC __gen_write_TONBWallet
DECLPROC $__gen_TONBWallet_init
107886 DECLMETHOD init
DECLPROC main
__tact_verify_address PROCINLINE:<{
SBITS
267 PUSHINT
NEQ
136 THROWIFNOT
}>
__tact_store_address PROCINLINE:<{
STSLICER
}>
2 years ago
__tact_store_address_opt PROCINLINE:<{
DUP
ISNULL
IF:<{
DROP
0 PUSHINT
SWAP
2 STU
}>ELSE<{
__tact_store_address INLINECALLDICT
}>
}>
__gen_write_TONBWallet PROCREF:<{
2 years ago
s3 s4 XCHG2
257 PUSHINT
STIX
SWAP
__tact_store_address INLINECALLDICT
SWAP
__tact_store_address INLINECALLDICT
2 years ago
NEWC
ROT
__tact_store_address_opt INLINECALLDICT
ENDC
SWAP
STREF
}>
$__gen_TONBWallet_init PROC:<{
2 years ago
PUSHNULL
0 PUSHINT
2 years ago
s0 s4 XCHG
NEWC
STREF
2 years ago
s0 s4 XCHG
s3 s3 XCHG2
__gen_write_TONBWallet INLINECALLDICT
ENDC
}>
init PROC:<{
$__gen_TONBWallet_init CALLDICT
}>
main PROC:<{
}>
}END>c