tx · 91YTspwf5m6NRyGGsdJj2rmiHdHEY44zmoxDSr9sWL5f

3MuS6qVvhBR6wSynFRdcE3fVqmGBjoc7Hhx:  -0.00500000 Waves

2023.08.18 10:23 [2715738] smart account 3MuS6qVvhBR6wSynFRdcE3fVqmGBjoc7Hhx > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "91YTspwf5m6NRyGGsdJj2rmiHdHEY44zmoxDSr9sWL5f",
    "fee": 500000,
    "feeAssetId": null,
    "timestamp": 1692343420903,
    "version": 1,
    "sender": "3MuS6qVvhBR6wSynFRdcE3fVqmGBjoc7Hhx",
    "senderPublicKey": "62CHk4MqTdq3LqeUycy7TPnpvwrjgerSa2FqAY2EafXn",
    "proofs": [
        "4tsV7AfUn5RttbvbJkNKpker34wVPBvvgAHvHJwRWR9h1D1xNKJPn4mdqd4368VS8UjfqyourXedJ2nHFdCwJKMA"
    ],
    "script": "base64:BgIKCAISBAoCCAESAAEBBHRlc3QABARsaXN0CQDMCAIJAJQKAgIBYQAACQDMCAIJAJQKAgIBYgABCQDMCAIJAJQKAgIBYwACBQNuaWwKAQNiYXICA2FjYwRuZXh0BAkkdDAxOTEyMDgFBG5leHQEAWEIBQkkdDAxOTEyMDgCXzEEAWIIBQkkdDAxOTEyMDgCXzIEAWMJAPwHBAUEdGhpcwIDZm9vCQDMCAIFAWEJAMwIAgUBYgUDbmlsBQNuaWwDCQAAAgUBYwUBYwAACQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCgACJGwFBGxpc3QKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA2JhcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgIBaQEDZm9vAgFhAWIJAMwIAgkBDEludGVnZXJFbnRyeQIFAWEFAWIFA25pbAFpAQFhAAQBYQkBBHRlc3QAAwkAAAIFAWEFAWEFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgARkt5a",
    "chainId": 84,
    "height": 2715738,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: FmtVFbr79GPrefoRWByCjQuLwHJcYBFS7XZ5CRFnbJij
Next: DygbdmnjtaS9cYUyP4yqdooK3Fs8n1uQmZwsXh2EyByL

Full: 
Old
New
Differences
1
-
{-# STDLIB_VERSION 7 #-}
1
+
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
let a = "__"
4
+
func b () = {
5
+
    let c = [$Tuple2("a", 0), $Tuple2("b", 1), $Tuple2("c", 2)]
6
+
    func d (e,f) =     {
7
+
        let g = f
8
+
        let h = g._1
9
+
        let i = g._2
10
+
        let j = invoke(this, "foo", [h, i], nil)
11
+
        if ((j == j))
12
+
            then 0
13
+
            else throw("Strict value is not equal to itself.")
14
+
        }
5
15
 
6
-
let b = "WAVES"
16
+
    let k = c
17
+
    let l = size(k)
18
+
    let m = 0
19
+
    func n (o,p) =     if ((p >= l))
20
+
        then o
21
+
        else d(o, k[p])
7
22
 
8
-
let c = "factory.ride"
23
+
    func q (o,p) =     if ((p >= l))
24
+
        then o
25
+
        else throw("List size exceeds 10")
9
26
 
10
-
func d (e) = ((c + ": ") + e)
11
-
12
-
13
-
func f (e) = throw(d(e))
14
-
15
-
16
-
func g (e) = if ((e == b))
17
-
    then unit
18
-
    else fromBase58String(e)
19
-
20
-
21
-
let h = 5
22
-
23
-
let i = 3
24
-
25
-
let j = 32
26
-
27
-
func k (l) = makeString(["%s%s%s", "allowTxId", l], a)
28
-
29
-
30
-
func m (n,o) = makeString([n, o], a)
31
-
32
-
33
-
func p () = makeString(["%s", "adminAddressList"], a)
34
-
35
-
36
-
func q () = makeString(["%s", "txId"], a)
37
-
38
-
39
-
func r (n,s) = {
40
-
    let t = m(n, s)
41
-
    valueOrElse(getInteger(t), 0)
27
+
    q(n(n(n(n(n(n(n(n(n(n(m, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
42
28
 
    }
43
29
 
44
30
 
45
-
func u () = {
46
-
    let v = getString(this, p())
47
-
    if ($isInstanceOf(v, "String"))
48
-
        then {
49
-
            let e = v
50
-
            split(e, a)
51
-
            }
52
-
        else nil
53
-
    }
31
+
@Callable(r)
32
+
func foo (h,i) = [IntegerEntry(h, i)]
54
33
 
55
34
 
56
-
func w (x) = containsElement(u(), x)
57
35
 
58
-
59
-
func y (z,o) = {
60
-
    let A = z
61
-
    let B = A._1
62
-
    let n = A._2
63
-
    $Tuple2((B :+ m(n, o)), n)
64
-
    }
65
-
66
-
67
-
func C (D) = {
68
-
    let E = p()
69
-
    let F = {
70
-
        let G = u()
71
-
        let H = size(G)
72
-
        let I = $Tuple2(nil, D)
73
-
        func J (K,L) =         if ((L >= H))
74
-
            then K
75
-
            else y(K, G[L])
76
-
77
-
        func M (K,L) =         if ((L >= H))
78
-
            then K
79
-
            else throw("List size exceeds 5")
80
-
81
-
        M(J(J(J(J(J(I, 0), 1), 2), 3), 4), 5)
82
-
        }
83
-
    let B = F._1
84
-
    let n = F._2
85
-
    B
86
-
    }
87
-
88
-
89
-
func N (B,t) = (B + valueOrElse(getInteger(t), 0))
90
-
91
-
92
-
func O (n) = {
93
-
    let P = C(n)
94
-
    let G = P
95
-
    let H = size(G)
96
-
    let I = 0
97
-
    func J (K,L) =     if ((L >= H))
98
-
        then K
99
-
        else N(K, G[L])
100
-
101
-
    func M (K,L) =     if ((L >= H))
102
-
        then K
103
-
        else throw("List size exceeds 5")
104
-
105
-
    M(J(J(J(J(J(I, 0), 1), 2), 3), 4), 5)
106
-
    }
107
-
108
-
109
-
func Q (B,R) = (B :+ DeleteEntry(R))
110
-
111
-
112
-
func S (n) = {
113
-
    let P = C(n)
114
-
    let G = P
115
-
    let H = size(G)
116
-
    let I = nil
117
-
    func J (K,L) =     if ((L >= H))
118
-
        then K
119
-
        else Q(K, G[L])
120
-
121
-
    func M (K,L) =     if ((L >= H))
122
-
        then K
123
-
        else throw("List size exceeds 5")
124
-
125
-
    M(J(J(J(J(J(I, 0), 1), 2), 3), 4), 5)
126
-
    }
127
-
128
-
129
-
func T (U,D,V,W) = {
130
-
    let t = m(D, U)
131
-
    let X = r(D, U)
132
-
    let Y = if (!(w(U)))
133
-
        then f((("Address: " + U) + " not in Admin list"))
134
-
        else if ((X == 1))
135
-
            then f((t + " you already voted"))
136
-
            else unit
137
-
    if ((Y == Y))
138
-
        then {
139
-
            let P = O(D)
140
-
            if (((P + 1) >= V))
141
-
                then {
142
-
                    let Z = S(D)
143
-
                    (Z ++ W)
144
-
                    }
145
-
                else [IntegerEntry(t, 1)]
146
-
            }
36
+
@Callable(r)
37
+
func a () = {
38
+
    let h = b()
39
+
    if ((h == h))
40
+
        then nil
147
41
 
        else throw("Strict value is not equal to itself.")
148
42
 
    }
149
43
 
150
-
151
-
func aa () = "%s__calculator"
152
-
153
-
154
-
func ab () = "%s__proxyTreasury"
155
-
156
-
157
-
func ac () = "%s__child"
158
-
159
-
160
-
func ad () = "%s__blockProcessingReward"
161
-
162
-
163
-
func ae () = "%s__nextBlockToProcess"
164
-
165
-
166
-
func af () = "%s__lpAssetId"
167
-
168
-
169
-
let ag = {
170
-
    let v = getString(this, aa())
171
-
    if ($isInstanceOf(v, "String"))
172
-
        then {
173
-
            let e = v
174
-
            addressFromString(e)
175
-
            }
176
-
        else if ($isInstanceOf(v, "Unit"))
177
-
            then unit
178
-
            else throw("Match error")
179
-
    }
180
-
181
-
let ah = valueOrErrorMessage(ag, d("invalid calculator address"))
182
-
183
-
let ai = {
184
-
    let v = getString(this, ab())
185
-
    if ($isInstanceOf(v, "String"))
186
-
        then {
187
-
            let e = v
188
-
            addressFromString(e)
189
-
            }
190
-
        else if ($isInstanceOf(v, "Unit"))
191
-
            then unit
192
-
            else throw("Match error")
193
-
    }
194
-
195
-
let aj = valueOrErrorMessage(ai, d("invalid proxy treasury address"))
196
-
197
-
func ak () = "%s__config"
198
-
199
-
200
-
func al () = "contract_children"
201
-
202
-
203
-
func am () = "contract_voting_result"
204
-
205
-
206
-
func an (x,l) = ((("proposal_allow_broadcast_" + toString(x)) + "_") + toBase58String(l))
207
-
208
-
209
-
func ao (ap,aq) = makeString(["investor", toString(ap), toString(aq)], "_")
210
-
211
-
212
-
let ar = {
213
-
    let v = getString(this, ak())
214
-
    if ($isInstanceOf(v, "String"))
215
-
        then {
216
-
            let e = v
217
-
            addressFromString(e)
218
-
            }
219
-
        else if ($isInstanceOf(v, "Unit"))
220
-
            then unit
221
-
            else throw("Match error")
222
-
    }
223
-
224
-
let as = valueOrErrorMessage(ar, d("invalid config address"))
225
-
226
-
let at = {
227
-
    let v = ar
228
-
    if ($isInstanceOf(v, "Address"))
229
-
        then {
230
-
            let z = v
231
-
            let au = getString(z, am())
232
-
            if ($isInstanceOf(au, "String"))
233
-
                then {
234
-
                    let e = au
235
-
                    addressFromString(e)
236
-
                    }
237
-
                else if ($isInstanceOf(au, "Unit"))
238
-
                    then unit
239
-
                    else throw("Match error")
240
-
            }
241
-
        else if ($isInstanceOf(v, "Unit"))
242
-
            then unit
243
-
            else throw("Match error")
244
-
    }
245
-
246
-
let av = valueOrErrorMessage(at, d("invalid voting result address"))
247
-
248
-
let aw = {
249
-
    let v = ar
250
-
    if ($isInstanceOf(v, "Address"))
251
-
        then {
252
-
            let z = v
253
-
            let au = getString(z, al())
254
-
            if ($isInstanceOf(au, "String"))
255
-
                then {
256
-
                    let e = au
257
-
                    addressFromString(e)
258
-
                    }
259
-
                else if ($isInstanceOf(au, "Unit"))
260
-
                    then unit
261
-
                    else throw("Match error")
262
-
            }
263
-
        else if ($isInstanceOf(v, "Unit"))
264
-
            then unit
265
-
            else throw("Match error")
266
-
    }
267
-
268
-
let ax = valueOrErrorMessage(aw, d("invalid children address"))
269
-
270
-
let ay = {
271
-
    let v = getString(this, af())
272
-
    if ($isInstanceOf(v, "String"))
273
-
        then {
274
-
            let e = v
275
-
            fromBase58String(e)
276
-
            }
277
-
        else if ($isInstanceOf(v, "Unit"))
278
-
            then unit
279
-
            else throw("Match error")
280
-
    }
281
-
282
-
let az = valueOrErrorMessage(ay, d("invalid lpAssetId"))
283
-
284
-
func aA (aB,x) = if ((aB.caller == x))
285
-
    then true
286
-
    else f("permission denied")
287
-
288
-
289
-
func aC (aB) = aA(aB, this)
290
-
291
-
292
-
func aD (aB) = aA(aB, ah)
293
-
294
-
295
-
@Callable(aB)
296
-
func stringEntry (R,aE) = if (aD(aB))
297
-
    then $Tuple2([StringEntry(R, aE)], R)
298
-
    else $Tuple2(nil, unit)
299
-
300
-
301
-
302
-
@Callable(aB)
303
-
func integerEntry (R,aE) = if (aD(aB))
304
-
    then $Tuple2([IntegerEntry(R, aE)], R)
305
-
    else $Tuple2(nil, unit)
306
-
307
-
308
-
309
-
@Callable(aB)
310
-
func booleanEntry (R,aE) = if (aD(aB))
311
-
    then $Tuple2([BooleanEntry(R, aE)], R)
312
-
    else $Tuple2(nil, unit)
313
-
314
-
315
-
316
-
@Callable(aB)
317
-
func binaryEntry (R,aE) = if (aD(aB))
318
-
    then $Tuple2([BinaryEntry(R, aE)], R)
319
-
    else $Tuple2(nil, unit)
320
-
321
-
322
-
323
-
@Callable(aB)
324
-
func deleteEntry (R) = if (aD(aB))
325
-
    then $Tuple2([DeleteEntry(R)], R)
326
-
    else $Tuple2(nil, unit)
327
-
328
-
329
-
330
-
@Callable(aB)
331
-
func reissue (aF) = if (aD(aB))
332
-
    then $Tuple2([Reissue(az, aF, true)], aF)
333
-
    else $Tuple2(nil, unit)
334
-
335
-
336
-
337
-
@Callable(aB)
338
-
func burn (aF) = if (aD(aB))
339
-
    then $Tuple2([Burn(az, aF)], aF)
340
-
    else $Tuple2(nil, unit)
341
-
342
-
343
-
344
-
@Callable(aB)
345
-
func transferAsset (aG,aF,aH) = if (aD(aB))
346
-
    then $Tuple2([ScriptTransfer(Address(aG), aF, aH)], aF)
347
-
    else $Tuple2(nil, unit)
348
-
349
-
350
-
351
-
@Callable(aB)
352
-
func transferAssets (aG,aI,aJ) = if (aD(aB))
353
-
    then {
354
-
        func aK (aL,aM) =         {
355
-
            let aN = aL
356
-
            let aO = aN._1
357
-
            let aP = aN._2
358
-
            let aQ = ScriptTransfer(Address(aG), parseIntValue(aJ[aP]), g(aI[aP]))
359
-
            let aR = (aO :+ aQ)
360
-
            $Tuple2(aR, (aP + 1))
361
-
            }
362
-
363
-
        let aS = {
364
-
            let G = aI
365
-
            let H = size(G)
366
-
            let I = $Tuple2(nil, 0)
367
-
            func J (K,L) =             if ((L >= H))
368
-
                then K
369
-
                else aK(K, G[L])
370
-
371
-
            func M (K,L) =             if ((L >= H))
372
-
                then K
373
-
                else throw("List size exceeds 10")
374
-
375
-
            M(J(J(J(J(J(J(J(J(J(J(I, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
376
-
            }
377
-
        let aT = aS._1
378
-
        let aU = aS._2
379
-
        $Tuple2(aT, unit)
380
-
        }
381
-
    else $Tuple2(nil, unit)
382
-
383
-
384
-
385
-
@Callable(aB)
386
-
func transferWaves (aG,aF) = if (aD(aB))
387
-
    then $Tuple2([ScriptTransfer(Address(aG), aF, unit)], aF)
388
-
    else $Tuple2(nil, unit)
389
-
390
-
391
-
392
-
@Callable(aB)
393
-
func transferFromProxyTreasury (aV,aW) = if (aD(aB))
394
-
    then $Tuple2(nil, invoke(aj, "transferWaves", [aV, aW], nil))
395
-
    else $Tuple2(nil, unit)
396
-
397
-
398
-
399
-
@Callable(aB)
400
-
func finalize (aX,aY,aZ) = $Tuple2(nil, reentrantInvoke(ah, "finalize", [aB.caller.bytes, aX, aY, aZ], aB.payments))
401
-
402
-
403
-
404
-
@Callable(aB)
405
-
func finalizeREADONLY (aX,aY,aZ) = $Tuple2(nil, reentrantInvoke(ah, "finalizeREADONLY", [aX, aY, aZ], nil))
406
-
407
-
408
-
409
-
@Callable(aB)
410
-
func claimLP () = $Tuple2(nil, reentrantInvoke(ah, "claimLP", [aB.caller.bytes], aB.payments))
411
-
412
-
413
-
414
-
@Callable(aB)
415
-
func claimCollateral (ba) = $Tuple2(nil, reentrantInvoke(ah, "claimCollateral", [aB.caller.bytes, ba], aB.payments))
416
-
417
-
418
-
419
-
@Callable(aB)
420
-
func claimCollateralBulk (bb) = $Tuple2(nil, reentrantInvoke(ah, "claimCollateralBulk", [aB.caller.bytes, bb], aB.payments))
421
-
422
-
423
-
424
-
@Callable(aB)
425
-
func invest () = $Tuple2(nil, reentrantInvoke(ah, "invest", [aB.caller.bytes], aB.payments))
426
-
427
-
428
-
429
-
@Callable(aB)
430
-
func withdraw () = $Tuple2(nil, reentrantInvoke(ah, "withdraw", [aB.caller.bytes], aB.payments))
431
-
432
-
433
-
434
-
@Callable(aB)
435
-
func cancelWithdraw (ba) = $Tuple2(nil, reentrantInvoke(ah, "cancelWithdraw", [aB.caller.bytes, fromBase58String(ba)], aB.payments))
436
-
437
-
438
-
439
-
@Callable(aB)
440
-
func processBlocks () = $Tuple2(nil, reentrantInvoke(ah, "processBlocks", [aB.caller.bytes], aB.payments))
441
-
442
-
443
-
444
-
@Callable(aB)
445
-
func claimCollateralREADONLY (aq,ba) = $Tuple2(nil, reentrantInvoke(ah, "claimCollateralREADONLY", [fromBase58String(aq), ba], nil))
446
-
447
-
448
-
449
-
@Callable(aB)
450
-
func claimCollateralBulkREADONLY (aq,bb) = $Tuple2(nil, reentrantInvoke(ah, "claimCollateralBulkREADONLY", [fromBase58String(aq), bb], nil))
451
-
452
-
453
-
454
-
@Callable(aB)
455
-
func voteForTxId (l) = {
456
-
    let U = toBase58String(aB.caller.bytes)
457
-
    let D = k(l)
458
-
    let B = [StringEntry(q(), l)]
459
-
    let bc = getString(this, q())
460
-
    let Y = [if ((size(fromBase58String(l)) == j))
461
-
        then true
462
-
        else f((l + " is not valid txId")), if (if ((bc == unit))
463
-
        then true
464
-
        else (value(bc) != l))
465
-
        then true
466
-
        else f((l + " is already allowed"))]
467
-
    if ((Y == Y))
468
-
        then T(U, D, i, B)
469
-
        else throw("Strict value is not equal to itself.")
470
-
    }
471
-
472
-
473
-
@Verifier(bd)
474
-
func be () = {
475
-
    let bf = {
476
-
        let v = at
477
-
        if ($isInstanceOf(v, "Address"))
478
-
            then {
479
-
                let bg = v
480
-
                valueOrElse(getBoolean(bg, an(this, bd.id)), false)
481
-
                }
482
-
            else false
483
-
        }
484
-
    let bh = (bd.id == fromBase58String(valueOrElse(getString(this, q()), "")))
485
-
    let bi = if ((size(u()) >= i))
486
-
        then false
487
-
        else sigVerify(bd.bodyBytes, bd.proofs[0], bd.senderPublicKey)
488
-
    if (if (bf)
489
-
        then true
490
-
        else bh)
491
-
        then true
492
-
        else bi
493
-
    }
494
44
 

github/deemru/w8io/026f985 
32.10 ms ◑