tx · 5TD5sEdEFDUW5mQRbzn8qxqxe3MpK2NEqtFxNRBu49he

3PAKh7wC23MF5gzcL853E5jA1yYPWYGPobZ:  -0.01000000 Waves

2022.12.19 03:59 [3431975] smart account 3PAKh7wC23MF5gzcL853E5jA1yYPWYGPobZ > SELF 0.00000000 Waves

{ "type": 13, "id": "5TD5sEdEFDUW5mQRbzn8qxqxe3MpK2NEqtFxNRBu49he", "fee": 1000000, "feeAssetId": null, "timestamp": 1671411587163, "version": 2, "chainId": 87, "sender": "3PAKh7wC23MF5gzcL853E5jA1yYPWYGPobZ", "senderPublicKey": "CsN4cyFHy1krXTa5Qokrh7yj9XL5GDQi9BdrAsmfYNHd", "proofs": [ "5yaBqayFro3D4a6ccrVssZKcmYyYimNRFu8XobTAKmwCR2GPz3Vc2QccTN3huyixpH1VdRbSSGHh3h4NCvrRTBWX" ], "script": "base64:BgIECAISAAQAClVTRE5fQVNTRVQBILYmKcME9c5TkaQOS3UkL2SMUbH6369UKb1I0h0qsqrRAAt2ZXN0aW5nRGFwcAkBB0FkZHJlc3MBARoBV3US3ZOCD1veJXYVOctJ1R9TKAnE6HFeJwAKZmVlQWRkcmVzcwkBB0FkZHJlc3MBARoBV4BgbgzvHyYN1DzUQg5XAhrGavOJAcHziwADZmVlAA8BAWkBAnZmAAQQd2l0aGRyYXdhbEFtb3VudAkA/AcEBQt2ZXN0aW5nRGFwcAIVd2l0aGRyYXdWZXN0ZWRBbGxVU0ROCQDMCAIHCQDMCAIGBQNuaWwFA25pbAMJAAACBRB3aXRoZHJhd2FsQW1vdW50BRB3aXRoZHJhd2FsQW1vdW50BAckbWF0Y2gwBRB3aXRoZHJhd2FsQW1vdW50AwkAAQIFByRtYXRjaDACA0ludAQGYW1vdW50BQckbWF0Y2gwBAlmZWVBbW91bnQJAGsDBQZhbW91bnQFA2ZlZQBkCQCUCgIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUKZmVlQWRkcmVzcwUJZmVlQW1vdW50BQpVU0ROX0FTU0VUBQNuaWwFCWZlZUFtb3VudAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgCUxJmp", "height": 3431975, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 3tiHGEkFfgYkXeBC7v2okzmhUd8ZRRswTVcy5bJEpMTi Next: DgYFMiwXZ4ZLFzseUQSRavNFgCLPTu6CzMXsHEJBB1wt Diff:
OldNewDifferences
55
66 let vestingDapp = Address(base58'3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk')
77
8-let adminAddress = Address(base58'3P3ct5dTqVmei17Y55rnC6rxqiZhtQmdc9U')
8+let feeAddress = Address(base58'3PDdgjsD1xqR8M3vLicvmGKFFpMmTmzaDKG')
99
1010 let fee = 15
1111
1212 @Callable(i)
13-func vf (whale,regular) = if ((i.caller != adminAddress))
14- then throw("only admin allowed")
15- else {
16- let withdrawalAmount = invoke(vestingDapp, "withdrawVestedAllUSDN", [whale, regular], nil)
17- if ((withdrawalAmount == withdrawalAmount))
18- then match withdrawalAmount {
19- case amount: Int =>
20- let feeAmount = fraction(amount, fee, 100)
21-[ScriptTransfer(adminAddress, feeAmount, USDN_ASSET)]
22- case _ =>
23- throw("Strict value is not equal to itself.")
24- }
25- else throw("Strict value is not equal to itself.")
13+func vf () = {
14+ let withdrawalAmount = invoke(vestingDapp, "withdrawVestedAllUSDN", [false, true], nil)
15+ if ((withdrawalAmount == withdrawalAmount))
16+ then match withdrawalAmount {
17+ case amount: Int =>
18+ let feeAmount = fraction(amount, fee, 100)
19+ $Tuple2([ScriptTransfer(feeAddress, feeAmount, USDN_ASSET)], feeAmount)
20+ case _ =>
21+ throw("Strict value is not equal to itself.")
2622 }
23+ else throw("Strict value is not equal to itself.")
24+ }
2725
2826
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let USDN_ASSET = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
55
66 let vestingDapp = Address(base58'3PCbvPVQfSvVu88ip8Fm5YjwJhjEYk1Txhk')
77
8-let adminAddress = Address(base58'3P3ct5dTqVmei17Y55rnC6rxqiZhtQmdc9U')
8+let feeAddress = Address(base58'3PDdgjsD1xqR8M3vLicvmGKFFpMmTmzaDKG')
99
1010 let fee = 15
1111
1212 @Callable(i)
13-func vf (whale,regular) = if ((i.caller != adminAddress))
14- then throw("only admin allowed")
15- else {
16- let withdrawalAmount = invoke(vestingDapp, "withdrawVestedAllUSDN", [whale, regular], nil)
17- if ((withdrawalAmount == withdrawalAmount))
18- then match withdrawalAmount {
19- case amount: Int =>
20- let feeAmount = fraction(amount, fee, 100)
21-[ScriptTransfer(adminAddress, feeAmount, USDN_ASSET)]
22- case _ =>
23- throw("Strict value is not equal to itself.")
24- }
25- else throw("Strict value is not equal to itself.")
13+func vf () = {
14+ let withdrawalAmount = invoke(vestingDapp, "withdrawVestedAllUSDN", [false, true], nil)
15+ if ((withdrawalAmount == withdrawalAmount))
16+ then match withdrawalAmount {
17+ case amount: Int =>
18+ let feeAmount = fraction(amount, fee, 100)
19+ $Tuple2([ScriptTransfer(feeAddress, feeAmount, USDN_ASSET)], feeAmount)
20+ case _ =>
21+ throw("Strict value is not equal to itself.")
2622 }
23+ else throw("Strict value is not equal to itself.")
24+ }
2725
2826

github/deemru/w8io/3ef1775 
35.62 ms