tx · DufuYD9u5wXSXHa6inCHyfBFAYfTmZsR85hHpi7s7Agq

3MsgzbtRg8NEkbTcHBywtwTdCe9BRxMQo5T:  -0.00400000 Waves

2024.09.26 09:05 [3300196] smart account 3MsgzbtRg8NEkbTcHBywtwTdCe9BRxMQo5T > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DufuYD9u5wXSXHa6inCHyfBFAYfTmZsR85hHpi7s7Agq",
    "fee": 400000,
    "feeAssetId": null,
    "timestamp": 1727330762875,
    "version": 2,
    "chainId": 84,
    "sender": "3MsgzbtRg8NEkbTcHBywtwTdCe9BRxMQo5T",
    "senderPublicKey": "iTiQR3Kvxn7i8PFgEbZn36n5iFLxFwkTA6M3wi846Vx",
    "proofs": [
        "fSpY3Tc9buWJfBA5HjL8JovFRc51XuXrPAUryiwZBjFxJL4zid3Foejkb7KWqgDuyva8fnysoAKZJS48FwayBmX"
    ],
    "script": "base64:BwJLCAISAwoBCBIECgIICBIECgIIARIECgIIBBIECgIIAhIDCgEIEgUKAwIBBBIECgICARIFCgMCAQISBQoDAhIREgQKAgIBEgQKAggYEQAJc2VwYXJhdG9yAgJfXwALd2F2ZXNTdHJpbmcCBVdBVkVTABBjb250cmFjdEZpbGVuYW1lAhRtZW1lX2ltX2ZhY3RvcnkucmlkZQALa1ByaWNlQXNzZXQCDHByaWNlX19hc3NldAAJa1NodXRkb3duAg5zaHV0ZG93bl9fZmxhZwAIc2h1dGRvd24JAQt2YWx1ZU9yRWxzZQIJAKAIAQUJa1NodXRkb3duBwEHd3JhcEVycgEBcwkArAICCQCsAgIFEGNvbnRyYWN0RmlsZW5hbWUCAjogBQFzAQh0aHJvd0VycgEBcwkAAgEJAQd3cmFwRXJyAQUBcwEPdmFsaWRhdGVBZGRyZXNzAQdhZGRyZXNzCQEJaXNEZWZpbmVkAQkApggBBQdhZGRyZXNzABJrQ2FsY3VsYXRvckFkZHJlc3MCE2NhbGN1bGF0b3JfX2FkZHJlc3MAF2NhbGN1bGF0b3JBZGRyZXNzT3B0aW9uBAckbWF0Y2gwCQCdCAIFBHRoaXMFEmtDYWxjdWxhdG9yQWRkcmVzcwMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJAKYIAQUBcwMJAAECBQckbWF0Y2gwAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IAEWNhbGN1bGF0b3JBZGRyZXNzCQETdmFsdWVPckVycm9yTWVzc2FnZQIFF2NhbGN1bGF0b3JBZGRyZXNzT3B0aW9uCQEHd3JhcEVycgECGmludmFsaWQgY2FsY3VsYXRvciBhZGRyZXNzAQttdXN0QWRkcmVzcwIBaQdhZGRyZXNzAwkAAAIIBQFpBmNhbGxlcgUHYWRkcmVzcwYJAQh0aHJvd0VycgECEXBlcm1pc3Npb24gZGVuaWVkAQhtdXN0VGhpcwEBaQkBC211c3RBZGRyZXNzAgUBaQUEdGhpcwEObXVzdENhbGN1bGF0b3IBAWkJAQttdXN0QWRkcmVzcwIFAWkFEWNhbGN1bGF0b3JBZGRyZXNzAQxwYXJzZUFzc2V0SWQBBWlucHV0AwkAAAIFBWlucHV0BQt3YXZlc1N0cmluZwUEdW5pdAkA2QQBBQVpbnB1dAEPYXNzZXRJZFRvU3RyaW5nAQVpbnB1dAMJAAACBQVpbnB1dAUEdW5pdAULd2F2ZXNTdHJpbmcJANgEAQkBBXZhbHVlAQUFaW5wdXQMAWkBBGluaXQBFGNhbGN1bGF0b3JBZGRyZXNzU3RyBAtjaGVja0NhbGxlcgkBCG11c3RUaGlzAQUBaQMJAAACBQtjaGVja0NhbGxlcgULY2hlY2tDYWxsZXIJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBRJrQ2FsY3VsYXRvckFkZHJlc3MFFGNhbGN1bGF0b3JBZGRyZXNzU3RyCQDMCAIJAQtTdHJpbmdFbnRyeQIFC2tQcmljZUFzc2V0BQt3YXZlc1N0cmluZwUDbmlsBQR1bml0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBC3N0cmluZ0VudHJ5AgNrZXkDdmFsAwMJAQEhAQUIc2h1dGRvd24JAQ5tdXN0Q2FsY3VsYXRvcgEFAWkHCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgUDa2V5BQN2YWwFA25pbAUDa2V5CQEIdGhyb3dFcnIBAgtub3QgYWxsb3dlZAFpAQxpbnRlZ2VyRW50cnkCA2tleQN2YWwDAwkBASEBBQhzaHV0ZG93bgkBDm11c3RDYWxjdWxhdG9yAQUBaQcJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgUDa2V5BQN2YWwFA25pbAUDa2V5CQEIdGhyb3dFcnIBAgtub3QgYWxsb3dlZAFpAQxib29sZWFuRW50cnkCA2tleQN2YWwDAwkBASEBBQhzaHV0ZG93bgkBDm11c3RDYWxjdWxhdG9yAQUBaQcJAJQKAgkAzAgCCQEMQm9vbGVhbkVudHJ5AgUDa2V5BQN2YWwFA25pbAUDa2V5CQEIdGhyb3dFcnIBAgtub3QgYWxsb3dlZAFpAQtiaW5hcnlFbnRyeQIDa2V5A3ZhbAMDCQEBIQEFCHNodXRkb3duCQEObXVzdENhbGN1bGF0b3IBBQFpBwkAlAoCCQDMCAIJAQtCaW5hcnlFbnRyeQIFA2tleQUDdmFsBQNuaWwFA2tleQkBCHRocm93RXJyAQILbm90IGFsbG93ZWQBaQELZGVsZXRlRW50cnkBA2tleQMDCQEBIQEFCHNodXRkb3duCQEObXVzdENhbGN1bGF0b3IBBQFpBwkAlAoCCQDMCAIJAQtEZWxldGVFbnRyeQEFA2tleQUDbmlsBQNrZXkJAQh0aHJvd0VycgECC25vdCBhbGxvd2VkAWkBB3JlaXNzdWUDB2Fzc2V0SWQGYW1vdW50CnJlaXNzdWFibGUDAwkBASEBBQhzaHV0ZG93bgkBDm11c3RDYWxjdWxhdG9yAQUBaQcJAJQKAgkAzAgCCQEHUmVpc3N1ZQMFB2Fzc2V0SWQFBmFtb3VudAUKcmVpc3N1YWJsZQUDbmlsBQZhbW91bnQJAQh0aHJvd0VycgECC25vdCBhbGxvd2VkAWkBBGJ1cm4CB2Fzc2V0SWQGYW1vdW50AwMJAQEhAQUIc2h1dGRvd24JAQ5tdXN0Q2FsY3VsYXRvcgEFAWkHCQCUCgIJAMwIAgkBBEJ1cm4CBQdhc3NldElkBQZhbW91bnQFA25pbAUGYW1vdW50CQEIdGhyb3dFcnIBAgtub3QgYWxsb3dlZAFpAQ10cmFuc2ZlckFzc2V0Aw5yZWNpcGllbnRCeXRlcwZhbW91bnQHYXNzZXRJZAMDCQEBIQEFCHNodXRkb3duCQEObXVzdENhbGN1bGF0b3IBBQFpBwkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQUOcmVjaXBpZW50Qnl0ZXMFBmFtb3VudAUHYXNzZXRJZAUDbmlsBQZhbW91bnQJAQh0aHJvd0VycgECC25vdCBhbGxvd2VkAWkBDnRyYW5zZmVyQXNzZXRzAw5yZWNpcGllbnRCeXRlcwphc3NldHNMaXN0C2Ftb3VudHNMaXN0AwMJAQEhAQUIc2h1dGRvd24JAQ5tdXN0Q2FsY3VsYXRvcgEFAWkHCgEOYWRkTmV3VHJhbnNmZXICA2FjYwtuZXh0QXNzZXRJZAQLJHQwMzE4NjMyMTAFA2FjYwQJdHJhbnNmZXJzCAULJHQwMzE4NjMyMTACXzEEAWoIBQskdDAzMTg2MzIxMAJfMgQLbmV3VHJhbnNmZXIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQUOcmVjaXBpZW50Qnl0ZXMJAJEDAgULYW1vdW50c0xpc3QFAWoJAJEDAgUKYXNzZXRzTGlzdAUBagQQdXBkYXRlZFRyYW5zZmVycwkAzQgCBQl0cmFuc2ZlcnMFC25ld1RyYW5zZmVyCQCUCgIFEHVwZGF0ZWRUcmFuc2ZlcnMJAGQCBQFqAAEECyR0MDM0MzYzNTE3CgACJGwFCmFzc2V0c0xpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFA25pbAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ5hZGROZXdUcmFuc2ZlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgQPYXNzZXRzVHJhbnNmZXJzCAULJHQwMzQzNjM1MTcCXzEECl9sYXN0SW5kZXgIBQskdDAzNDM2MzUxNwJfMgkAlAoCBQ9hc3NldHNUcmFuc2ZlcnMFBHVuaXQJAQh0aHJvd0VycgECC25vdCBhbGxvd2VkAWkBDXRyYW5zZmVyV2F2ZXMCDnJlY2lwaWVudEJ5dGVzBmFtb3VudAMDCQEBIQEFCHNodXRkb3duCQEObXVzdENhbGN1bGF0b3IBBQFpBwkAlAoCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQUOcmVjaXBpZW50Qnl0ZXMFBmFtb3VudAUEdW5pdAUDbmlsBQZhbW91bnQJAQh0aHJvd0VycgECC25vdCBhbGxvd2VkAWkBBGNhbGwCCGZ1bmN0aW9uBGFyZ3MEDWNsZWFuUGF5bWVudHMDCQAAAggFAWkPY2FsbGVyUHVibGljS2V5ASAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAUDbmlsCAUBaQhwYXltZW50cwQGcmVzdWx0CQD9BwQFEWNhbGN1bGF0b3JBZGRyZXNzBQhmdW5jdGlvbgkAzAgCCAUBaQ9jYWxsZXJQdWJsaWNLZXkJAMwIAgUEYXJncwUDbmlsBQ1jbGVhblBheW1lbnRzCQCUCgIFA25pbAUGcmVzdWx0AJ7SxsM=",
    "height": 3300196,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: kRCDW286NqnJjmQ3Nt1MuK4xUYDmTFjP7f5jmcPvEED
Next: 9qU7EAnwWLH1QGDQ1rLaqUkncccAESQxL1TLBzpDcTNG

Diff: 
Old
New
Differences
6
6
 
let wavesString = "WAVES"
7
7
 
8
8
 
let contractFilename = "meme_im_factory.ride"
9
+
10
+
let kPriceAsset = "price__asset"
9
11
 
10
12
 
let kShutdown = "shutdown__flag"
11
13
 
58
60
 
func init (calculatorAddressStr) = {
59
61
 
    let checkCaller = mustThis(i)
60
62
 
    if ((checkCaller == checkCaller))
61
-
        then $Tuple2([StringEntry(kCalculatorAddress, calculatorAddressStr), StringEntry("price__asset", wavesString)], unit)
63
+
        then $Tuple2([StringEntry(kCalculatorAddress, calculatorAddressStr), StringEntry(kPriceAsset, wavesString)], unit)
62
64
 
        else throw("Strict value is not equal to itself.")
63
65
 
    }
64
66
 
142
144
 
    else false)
143
145
 
    then {
144
146
 
        func addNewTransfer (acc,nextAssetId) =         {
145
-
            let $t031563180 = acc
146
-
            let transfers = $t031563180._1
147
-
            let j = $t031563180._2
147
+
            let $t031863210 = acc
148
+
            let transfers = $t031863210._1
149
+
            let j = $t031863210._2
148
150
 
            let newTransfer = ScriptTransfer(Address(recipientBytes), amountsList[j], assetsList[j])
149
151
 
            let updatedTransfers = (transfers :+ newTransfer)
150
152
 
            $Tuple2(updatedTransfers, (j + 1))
151
153
 
            }
152
154
 
153
-
        let $t034063487 = {
155
+
        let $t034363517 = {
154
156
 
            let $l = assetsList
155
157
 
            let $s = size($l)
156
158
 
            let $acc0 = $Tuple2(nil, 0)
164
166
 
165
167
 
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
166
168
 
            }
167
-
        let assetsTransfers = $t034063487._1
168
-
        let _lastIndex = $t034063487._2
169
+
        let assetsTransfers = $t034363517._1
170
+
        let _lastIndex = $t034363517._2
169
171
 
        $Tuple2(assetsTransfers, unit)
170
172
 
        }
171
173
 
    else throwErr("not allowed")
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 7 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let separator = "__"
5
5
 
6
6
 
let wavesString = "WAVES"
7
7
 
8
8
 
let contractFilename = "meme_im_factory.ride"
9
+
10
+
let kPriceAsset = "price__asset"
9
11
 
10
12
 
let kShutdown = "shutdown__flag"
11
13
 
12
14
 
let shutdown = valueOrElse(getBoolean(kShutdown), false)
13
15
 
14
16
 
func wrapErr (s) = ((contractFilename + ": ") + s)
15
17
 
16
18
 
17
19
 
func throwErr (s) = throw(wrapErr(s))
18
20
 
19
21
 
20
22
 
func validateAddress (address) = isDefined(addressFromString(address))
21
23
 
22
24
 
23
25
 
let kCalculatorAddress = "calculator__address"
24
26
 
25
27
 
let calculatorAddressOption = match getString(this, kCalculatorAddress) {
26
28
 
    case s: String => 
27
29
 
        addressFromString(s)
28
30
 
    case _: Unit => 
29
31
 
        unit
30
32
 
    case _ => 
31
33
 
        throw("Match error")
32
34
 
}
33
35
 
34
36
 
let calculatorAddress = valueOrErrorMessage(calculatorAddressOption, wrapErr("invalid calculator address"))
35
37
 
36
38
 
func mustAddress (i,address) = if ((i.caller == address))
37
39
 
    then true
38
40
 
    else throwErr("permission denied")
39
41
 
40
42
 
41
43
 
func mustThis (i) = mustAddress(i, this)
42
44
 
43
45
 
44
46
 
func mustCalculator (i) = mustAddress(i, calculatorAddress)
45
47
 
46
48
 
47
49
 
func parseAssetId (input) = if ((input == wavesString))
48
50
 
    then unit
49
51
 
    else fromBase58String(input)
50
52
 
51
53
 
52
54
 
func assetIdToString (input) = if ((input == unit))
53
55
 
    then wavesString
54
56
 
    else toBase58String(value(input))
55
57
 
56
58
 
57
59
 
@Callable(i)
58
60
 
func init (calculatorAddressStr) = {
59
61
 
    let checkCaller = mustThis(i)
60
62
 
    if ((checkCaller == checkCaller))
61
-
        then $Tuple2([StringEntry(kCalculatorAddress, calculatorAddressStr), StringEntry("price__asset", wavesString)], unit)
63
+
        then $Tuple2([StringEntry(kCalculatorAddress, calculatorAddressStr), StringEntry(kPriceAsset, wavesString)], unit)
62
64
 
        else throw("Strict value is not equal to itself.")
63
65
 
    }
64
66
 
65
67
 
66
68
 
67
69
 
@Callable(i)
68
70
 
func stringEntry (key,val) = if (if (!(shutdown))
69
71
 
    then mustCalculator(i)
70
72
 
    else false)
71
73
 
    then $Tuple2([StringEntry(key, val)], key)
72
74
 
    else throwErr("not allowed")
73
75
 
74
76
 
75
77
 
76
78
 
@Callable(i)
77
79
 
func integerEntry (key,val) = if (if (!(shutdown))
78
80
 
    then mustCalculator(i)
79
81
 
    else false)
80
82
 
    then $Tuple2([IntegerEntry(key, val)], key)
81
83
 
    else throwErr("not allowed")
82
84
 
83
85
 
84
86
 
85
87
 
@Callable(i)
86
88
 
func booleanEntry (key,val) = if (if (!(shutdown))
87
89
 
    then mustCalculator(i)
88
90
 
    else false)
89
91
 
    then $Tuple2([BooleanEntry(key, val)], key)
90
92
 
    else throwErr("not allowed")
91
93
 
92
94
 
93
95
 
94
96
 
@Callable(i)
95
97
 
func binaryEntry (key,val) = if (if (!(shutdown))
96
98
 
    then mustCalculator(i)
97
99
 
    else false)
98
100
 
    then $Tuple2([BinaryEntry(key, val)], key)
99
101
 
    else throwErr("not allowed")
100
102
 
101
103
 
102
104
 
103
105
 
@Callable(i)
104
106
 
func deleteEntry (key) = if (if (!(shutdown))
105
107
 
    then mustCalculator(i)
106
108
 
    else false)
107
109
 
    then $Tuple2([DeleteEntry(key)], key)
108
110
 
    else throwErr("not allowed")
109
111
 
110
112
 
111
113
 
112
114
 
@Callable(i)
113
115
 
func reissue (assetId,amount,reissuable) = if (if (!(shutdown))
114
116
 
    then mustCalculator(i)
115
117
 
    else false)
116
118
 
    then $Tuple2([Reissue(assetId, amount, reissuable)], amount)
117
119
 
    else throwErr("not allowed")
118
120
 
119
121
 
120
122
 
121
123
 
@Callable(i)
122
124
 
func burn (assetId,amount) = if (if (!(shutdown))
123
125
 
    then mustCalculator(i)
124
126
 
    else false)
125
127
 
    then $Tuple2([Burn(assetId, amount)], amount)
126
128
 
    else throwErr("not allowed")
127
129
 
128
130
 
129
131
 
130
132
 
@Callable(i)
131
133
 
func transferAsset (recipientBytes,amount,assetId) = if (if (!(shutdown))
132
134
 
    then mustCalculator(i)
133
135
 
    else false)
134
136
 
    then $Tuple2([ScriptTransfer(Address(recipientBytes), amount, assetId)], amount)
135
137
 
    else throwErr("not allowed")
136
138
 
137
139
 
138
140
 
139
141
 
@Callable(i)
140
142
 
func transferAssets (recipientBytes,assetsList,amountsList) = if (if (!(shutdown))
141
143
 
    then mustCalculator(i)
142
144
 
    else false)
143
145
 
    then {
144
146
 
        func addNewTransfer (acc,nextAssetId) =         {
145
-
            let $t031563180 = acc
146
-
            let transfers = $t031563180._1
147
-
            let j = $t031563180._2
147
+
            let $t031863210 = acc
148
+
            let transfers = $t031863210._1
149
+
            let j = $t031863210._2
148
150
 
            let newTransfer = ScriptTransfer(Address(recipientBytes), amountsList[j], assetsList[j])
149
151
 
            let updatedTransfers = (transfers :+ newTransfer)
150
152
 
            $Tuple2(updatedTransfers, (j + 1))
151
153
 
            }
152
154
 
153
-
        let $t034063487 = {
155
+
        let $t034363517 = {
154
156
 
            let $l = assetsList
155
157
 
            let $s = size($l)
156
158
 
            let $acc0 = $Tuple2(nil, 0)
157
159
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
158
160
 
                then $a
159
161
 
                else addNewTransfer($a, $l[$i])
160
162
 
161
163
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
162
164
 
                then $a
163
165
 
                else throw("List size exceeds 10")
164
166
 
165
167
 
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
166
168
 
            }
167
-
        let assetsTransfers = $t034063487._1
168
-
        let _lastIndex = $t034063487._2
169
+
        let assetsTransfers = $t034363517._1
170
+
        let _lastIndex = $t034363517._2
169
171
 
        $Tuple2(assetsTransfers, unit)
170
172
 
        }
171
173
 
    else throwErr("not allowed")
172
174
 
173
175
 
174
176
 
175
177
 
@Callable(i)
176
178
 
func transferWaves (recipientBytes,amount) = if (if (!(shutdown))
177
179
 
    then mustCalculator(i)
178
180
 
    else false)
179
181
 
    then $Tuple2([ScriptTransfer(Address(recipientBytes), amount, unit)], amount)
180
182
 
    else throwErr("not allowed")
181
183
 
182
184
 
183
185
 
184
186
 
@Callable(i)
185
187
 
func call (function,args) = {
186
188
 
    let cleanPayments = if ((i.callerPublicKey == base58'11111111111111111111111111111111'))
187
189
 
        then nil
188
190
 
        else i.payments
189
191
 
    let result = reentrantInvoke(calculatorAddress, function, [i.callerPublicKey, args], cleanPayments)
190
192
 
    $Tuple2(nil, result)
191
193
 
    }
192
194
 
193
195
 

github/deemru/w8io/026f985 
28.86 ms ◑