tx · HmZknou31oxGgwGBbncHLQcsuaCMuDVzQLFsSEEo1NrX

3NBVuUaCPkisW3rusUXZidNobSR4uRAhRbB:  -0.01000000 Waves

2023.04.03 19:32 [2518636] smart account 3NBVuUaCPkisW3rusUXZidNobSR4uRAhRbB > SELF 0.00000000 Waves

{ "type": 13, "id": "HmZknou31oxGgwGBbncHLQcsuaCMuDVzQLFsSEEo1NrX", "fee": 1000000, "feeAssetId": null, "timestamp": 1680539341511, "version": 2, "chainId": 84, "sender": "3NBVuUaCPkisW3rusUXZidNobSR4uRAhRbB", "senderPublicKey": "GjZRDYvGdnoZKj1SFJc48reNrp9ysLGYD25ENjpsC7gz", "proofs": [ "76qv2ihFFuJsjLhhJsDLRVvHSovQ1NhmHPjZLHuieyfjGWNm72Nt4HK9qPDf59xciEEjDKgGBVME31yHjbEbfyV" ], "script": "base64:BQQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzAgAAACw5eTU2MUt1UFE1ZEhXenEzNVlMSjlYQWpHWGFZMTM1aTRockJpV3E5OG5RYQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFzBQAAAAckbWF0Y2gwCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAkAAlkAAAABBQAAAAFzCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAAAnR4AAAAD3NlbmRlclB1YmxpY0tleYqo4hQ=", "height": 2518636, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 9puvBRSbjprvbnMLxRmXxbJMDXsaVG41xqqwiX7KKCSz Next: none Full:
OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
2-{-# SCRIPT_TYPE ACCOUNT #-}
3-{-# CONTENT_TYPE DAPP #-}
4-let recipient = value(addressFromString("3MxNnYVp81YfYpvdpskfCAS4SdmNYcrtYLE"))
5-
6-let otherActions = value(addressFromString("3MrimhqvGvTQ4wREK4y76JC7Ux4oCKqXgdL"))
7-
8-func isFirstlevel () = match invoke(this, "Firstlevel", nil, nil) {
9- case a: Boolean =>
10- a
2+{-# CONTENT_TYPE EXPRESSION #-}
3+match getString(this, "9y561KuPQ5dHWzq35YLJ9XAjGXaY135i4hrBiWq98nQa") {
4+ case s: String =>
5+ sigVerify(tx.bodyBytes, tx.proofs[0], fromBase58String(s))
116 case _ =>
12- throw("Unsupported result format (Firstlevel)")
7+ sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
138 }
14-
15-
16-func isSecondlevel () = match invoke(this, "Secondlevel", nil, nil) {
17- case a: Boolean =>
18- a
19- case _ =>
20- throw("Unsupported result format (Secondlevel)")
21-}
22-
23-
24-func isThirdlevel () = match invoke(this, "Thirdlevel", nil, nil) {
25- case a: Boolean =>
26- a
27- case _ =>
28- throw("Unsupported result format (Thirdlevel)")
29-}
30-
31-
32-@Callable(i)
33-func Firstlevel () = {
34- let asset = Issue("RTokenRToken11", "This is an ordinary token", 1000000, 2, true, unit, 0)
35- let assetId = calculateAssetId(asset)
36- let lease = Lease(recipient, 1, 1)
37- let id = calculateLeaseId(lease)
38- let a = isSecondlevel()
39- if ((a == a))
40- then {
41- let b = invoke(otherActions, "otherActionsFirstlevel", nil, nil)
42- if ((b == b))
43- then $Tuple2([BinaryEntry("bin1", base58''), BooleanEntry("bool1", true), IntegerEntry("int1", 1), StringEntry("str1", ""), DeleteEntry("str1"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 1000000, unit), lease, Issue("UberToken11", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
44- else throw("Strict value is not equal to itself.")
45- }
46- else throw("Strict value is not equal to itself.")
47- }
48-
49-
50-
51-@Callable(i)
52-func Secondlevel () = {
53- let asset = Issue("RTokenRToken22", "This is an ordinary token", 1000000, 2, true, unit, 0)
54- let assetId = calculateAssetId(asset)
55- let lease = Lease(recipient, 1, 2)
56- let id = calculateLeaseId(lease)
57- let a = isThirdlevel()
58- if ((a == a))
59- then $Tuple2([BinaryEntry("bin2", base58''), BooleanEntry("bool2", true), IntegerEntry("int2", 1), StringEntry("str2", ""), DeleteEntry("str2"), asset, Reissue(assetId, 1, true), Burn(assetId, 1000000), ScriptTransfer(recipient, 2000000, unit), lease, Issue("UberToken22", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
60- else throw("Strict value is not equal to itself.")
61- }
62-
63-
64-
65-@Callable(i)
66-func Thirdlevel () = {
67- let asset = Issue("RTokenRToken33", "This is an ordinary token", 1000000, 2, true, unit, 0)
68- let assetId = calculateAssetId(asset)
69- let lease = Lease(recipient, 1, 3)
70- let id = calculateLeaseId(lease)
71- $Tuple2([BinaryEntry("bin3", base58''), BooleanEntry("bool3", true), IntegerEntry("int3", 1), StringEntry("str3", ""), DeleteEntry("str3"), asset, Reissue(assetId, 1, true), Burn(assetId, 1), ScriptTransfer(recipient, 3000000, unit), lease, Issue("UberToken33", "The ultimate token. One and only", 1, 0, false), LeaseCancel(id)], true)
72- }
73-
74-

github/deemru/w8io/169f3d6 
35.74 ms