tx · Apv59Goc2s9qBowc2YNYVwxaZrLL6Mwcm13RnEBaipmU

3P8auNWJkxxByyJtwErFXaxiXcGM45qQ1hA:  -0.01000000 Waves

2022.07.18 21:14 [3211076] smart account 3P8auNWJkxxByyJtwErFXaxiXcGM45qQ1hA > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Apv59Goc2s9qBowc2YNYVwxaZrLL6Mwcm13RnEBaipmU",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1658168045108,
    "version": 1,
    "sender": "3P8auNWJkxxByyJtwErFXaxiXcGM45qQ1hA",
    "senderPublicKey": "9yREzSJ1wKURauYzfP3BPiQqjfujdgnAsSAYoA1sSN1q",
    "proofs": [
        "5KANz2Y6NLwGgi6CH2FWuZFBJbEzhhnRdMzV7k8z6Qdsyf5pHb8iDyhhbfie1vveTYoRF2QCCtY4gBmVcRNYGpVk"
    ],
    "script": "base64:BgIMCAISAwoBCBIDCgEIAAIBaQEBeAEBcwMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECASEKAQF5AgF0AXYDCQAAAgUBdAIBaQkBDXBhcnNlSW50VmFsdWUBBQF2AwkAAAIFAXQCAXMFAXYDCQAAAgUBdAIBYgkAAAIFAXYCATEJAAIBBQF0CgEBZwIBbgF2AwkAAAIFAW4CAAUDbmlsAwkAAAIFAW4CATEEAXQJALUJAgUBdgIBOgkAzAgCCQEBeQIJAJEDAgUBdAAACQCRAwIFAXQAAQUDbmlsAwkAAAIFAW4CATIEAXQJALUJAgUBdgIBOgkAzAgCCQEBeQIJAJEDAgUBdAAACQCRAwIFAXQAAQkAzAgCCQEBeQIJAJEDAgUBdAACCQCRAwIFAXQAAwUDbmlsAwkAAAIFAW4CATMEAXQJALUJAgUBdgIBOgkAzAgCCQEBeQIJAJEDAgUBdAAACQCRAwIFAXQAAQkAzAgCCQEBeQIJAJEDAgUBdAACCQCRAwIFAXQAAwkAzAgCCQEBeQIJAJEDAgUBdAAECQCRAwIFAXQABQUDbmlsAwkAAAIFAW4CATQEAXQJALUJAgUBdgIBOgkAzAgCCQEBeQIJAJEDAgUBdAAACQCRAwIFAXQAAQkAzAgCCQEBeQIJAJEDAgUBdAACCQCRAwIFAXQAAwkAzAgCCQEBeQIJAJEDAgUBdAAECQCRAwIFAXQABQkAzAgCCQEBeQIJAJEDAgUBdAAGCQCRAwIFAXQABwUDbmlsAwkAAAIFAW4CATUEAXQJALUJAgUBdgIBOgkAzAgCCQEBeQIJAJEDAgUBdAAACQCRAwIFAXQAAQkAzAgCCQEBeQIJAJEDAgUBdAACCQCRAwIFAXQAAwkAzAgCCQEBeQIJAJEDAgUBdAAECQCRAwIFAXQABQkAzAgCCQEBeQIJAJEDAgUBdAAGCQCRAwIFAXQABwkAzAgCCQEBeQIJAJEDAgUBdAAICQCRAwIFAXQACQUDbmlsCQACAQUBbgoBAXcBAXYDCQAAAgUBdgIABQR1bml0CQDZBAEFAXYKAQFwAgFuAXYDCQAAAgUBbgIABQNuaWwDCQAAAgUBbgIBMQQBdAkAtQkCBQF2AgE6CQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQEBdwEJAJEDAgUBdAAACQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUBdAABBQNuaWwDCQAAAgUBbgIBMgQBdAkAtQkCBQF2AgE6CQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQEBdwEJAJEDAgUBdAAACQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUBdAABCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQEBdwEJAJEDAgUBdAACCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUBdAADBQNuaWwJAAIBBQFuCgEBZgIBYQF2BAF0CQC1CQIFAXYCATsJAPwHBAkBB0FkZHJlc3MBCQDZBAEJAJEDAgUBdAAACQCRAwIFAXQAAQkBAWcCCQCRAwIFAXQAAgkAkQMCBQF0AAMJAQFwAgkAkQMCBQF0AAQJAJEDAgUBdAAFBAFjAwkAAAIJALECAQUBcwABCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzBQFzBQFzBAF4CgACJGwJALUJAgkAsAkBCQDbBAEFAWMCAXwKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBAWYCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgMJAAACBQF4BQF4BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEBbwEBcwMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECASEKAQFhAQFsBAckbWF0Y2gwCQCmCAEFAWwDCQABAgUHJG1hdGNoMAIHQWRkcmVzcwQBYQUHJG1hdGNoMAUBYQkApAgBCQEFQWxpYXMBBQFsCgEBZgIBYQF2BAF0CQC1CQIFAXYCATsEAXUJAJEDAgUBdAAACQDOCAIFAWEDCQAAAgUBdQIBMAkAzAgCCQELQmluYXJ5RW50cnkCCQCRAwIFAXQAAQkA2QQBCQCRAwIFAXQAAgUDbmlsAwkAAAIFAXUCATEJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAJEDAgUBdAABCQAAAgkAkQMCBQF0AAICATEFA25pbAMJAAACBQF1AgEyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCRAwIFAXQAAQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAXQAAgUDbmlsAwkAAAIFAXUCATMJAMwIAgkBC1N0cmluZ0VudHJ5AgkAkQMCBQF0AAEJAJEDAgUBdAACBQNuaWwDCQAAAgUBdQIBNAkAzAgCCQELRGVsZXRlRW50cnkBCQCRAwIFAXQAAQUDbmlsAwkAAAIFAXUCATUJAMwIAgkAwwgHCQCRAwIFAXQAAQkAkQMCBQF0AAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQF0AAMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQF0AAQJAAACCQCRAwIFAXQABQIBMQUEdW5pdAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAXQABwUDbmlsAwkAAAIFAXUCATYJAMwIAgkBB1JlaXNzdWUDCQDZBAEJAJEDAgUBdAABCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUBdAACCQAAAgkAkQMCBQF0AAMCATEFA25pbAMJAAACBQF1AgE3CQDMCAIJAQRCdXJuAgkA2QQBCQCRAwIFAXQAAQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFAXQAAgUDbmlsAwkAAAIFAXUCATgJAMwIAgkBClNwb25zb3JGZWUCCQDZBAEJAJEDAgUBdAABAwkAAAIJAJEDAgUBdAACAgAFBHVuaXQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQF0AAIFA25pbAMJAAACBQF1AgE5CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQFhAQkAkQMCBQF0AAEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQF0AAIDCQAAAgkAkQMCBQF0AAMCAAUEdW5pdAkA2QQBCQCRAwIFAXQAAwUDbmlsAwkAAAIFAXUCAWEJAMwIAgkAxQgDCQEBYQEJAJEDAgUBdAABCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUBdAACCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUBdAADBQNuaWwDCQAAAgUBdQIBYgkAzAgCCQELTGVhc2VDYW5jZWwBCQDZBAEJAJEDAgUBdAABBQNuaWwJAAIBBQF1CgACJGwJALUJAgkAsAkBCQDbBAEFAXMCAXwKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBAWYCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDUwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgDHwRky",
    "chainId": 87,
    "height": 3211076,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Djwwt5CrcSTS6rAGtu9NXbBR442AS48RivMhtKk73y6h
Next: FFJHDnwdX2YyUPaLuSELm8sGo5oRmrG19ZMAgLPBqJFa

Diff: 
Old
New
Differences
1
-
{-# STDLIB_VERSION 5 #-}
1
+
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
func n (a,d,u) = {
5
-
    let b = assetBalance(d, a)
6
-
    if ((u > b))
7
-
        then 0
8
-
        else {
9
-
            let z = {
10
-
                let @ = invoke(d, "userBalance", [toString(this)], nil)
11
-
                if ($isInstanceOf(@, "(Int, Int, Int, Int, Int, Boolean)"))
12
-
                    then @
13
-
                    else throw("Couldn't cast Any to (Int, Int, Int, Int, Int, Boolean)")
14
-
                }
15
-
            if (((u / 10) > z._2))
16
-
                then 0
17
-
                else {
18
-
                    let i = invoke(addressFromStringValue("3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT"), "withdraw", [toBase58String(a), if ((b > z._2))
19
-
                        then -1
20
-
                        else b], nil)
21
-
                    if ((i == i))
22
-
                        then 1
23
-
                        else throw("Strict value is not equal to itself.")
24
-
                    }
25
-
            }
26
-
    }
27
-
28
-
29
-
@Callable(i)
30
-
func g () = if ((i.caller != this))
31
-
    then throw("!")
32
-
    else {
33
-
        let u = getIntegerValue(this, "n")
34
-
        if (((n(base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ', addressFromStringValue("3PEiD1zJWTMZNWSCyzhvBw9pxxAWeEwaghR"), u) + n(base58'6XtHjpXbs9RRJP2Sr9GUyVqzACcby9TkThHXnjVC5CDJ', addressFromStringValue("3PGCkrHBxFMi7tz1xqnxgBpeNvn5E4M4g8S"), u)) == 0))
35
-
            then throw("!")
36
-
            else nil
37
-
        }
38
-
39
-
40
-
41
-
@Callable(i)
42
-
func f () = if ((i.caller != this))
43
-
    then throw("!")
44
-
    else if (((n(base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ', addressFromStringValue("3PEiD1zJWTMZNWSCyzhvBw9pxxAWeEwaghR"), 10) + n(base58'6XtHjpXbs9RRJP2Sr9GUyVqzACcby9TkThHXnjVC5CDJ', addressFromStringValue("3PGCkrHBxFMi7tz1xqnxgBpeNvn5E4M4g8S"), 10)) == -1))
45
-
        then throw("!")
46
-
        else nil
47
-
48
4
 
49
5
 
50
6
 
@Callable(i)
124
80
 
125
81
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
126
82
 
                then $a
127
-
                else throw("List size exceeds 18")
83
+
                else throw("List size exceeds 50")
128
84
 
129
-
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18)
85
+
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50)
130
86
 
            }
131
87
 
        if ((x == x))
132
88
 
            then nil
195
151
 
        }
196
152
 
197
153
 
198
-
199
-
@Callable(i)
200
-
func s () = if ((i.caller != this))
201
-
    then throw("!")
202
-
    else {
203
-
        let s = invoke(this, "x", ["s"], nil)
204
-
        if ((s == s))
205
-
            then nil
206
-
            else throw("Strict value is not equal to itself.")
207
-
        }
208
-
209
-

Full: 
Old
New
Differences
1
-
{-# STDLIB_VERSION 5 #-}
1
+
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
-
func n (a,d,u) = {
5
-
    let b = assetBalance(d, a)
6
-
    if ((u > b))
7
-
        then 0
8
-
        else {
9
-
            let z = {
10
-
                let @ = invoke(d, "userBalance", [toString(this)], nil)
11
-
                if ($isInstanceOf(@, "(Int, Int, Int, Int, Int, Boolean)"))
12
-
                    then @
13
-
                    else throw("Couldn't cast Any to (Int, Int, Int, Int, Int, Boolean)")
14
-
                }
15
-
            if (((u / 10) > z._2))
16
-
                then 0
17
-
                else {
18
-
                    let i = invoke(addressFromStringValue("3PAZv9tgK1PX7dKR7b4kchq5qdpUS3G5sYT"), "withdraw", [toBase58String(a), if ((b > z._2))
19
-
                        then -1
20
-
                        else b], nil)
21
-
                    if ((i == i))
22
-
                        then 1
23
-
                        else throw("Strict value is not equal to itself.")
24
-
                    }
25
-
            }
26
-
    }
27
-
28
-
29
-
@Callable(i)
30
-
func g () = if ((i.caller != this))
31
-
    then throw("!")
32
-
    else {
33
-
        let u = getIntegerValue(this, "n")
34
-
        if (((n(base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ', addressFromStringValue("3PEiD1zJWTMZNWSCyzhvBw9pxxAWeEwaghR"), u) + n(base58'6XtHjpXbs9RRJP2Sr9GUyVqzACcby9TkThHXnjVC5CDJ', addressFromStringValue("3PGCkrHBxFMi7tz1xqnxgBpeNvn5E4M4g8S"), u)) == 0))
35
-
            then throw("!")
36
-
            else nil
37
-
        }
38
-
39
-
40
-
41
-
@Callable(i)
42
-
func f () = if ((i.caller != this))
43
-
    then throw("!")
44
-
    else if (((n(base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ', addressFromStringValue("3PEiD1zJWTMZNWSCyzhvBw9pxxAWeEwaghR"), 10) + n(base58'6XtHjpXbs9RRJP2Sr9GUyVqzACcby9TkThHXnjVC5CDJ', addressFromStringValue("3PGCkrHBxFMi7tz1xqnxgBpeNvn5E4M4g8S"), 10)) == -1))
45
-
        then throw("!")
46
-
        else nil
47
-
48
4
 
49
5
 
50
6
 
@Callable(i)
51
7
 
func x (s) = if ((i.caller != this))
52
8
 
    then throw("!")
53
9
 
    else {
54
10
 
        func y (t,v) =         if ((t == "i"))
55
11
 
            then parseIntValue(v)
56
12
 
            else if ((t == "s"))
57
13
 
                then v
58
14
 
                else if ((t == "b"))
59
15
 
                    then (v == "1")
60
16
 
                    else throw(t)
61
17
 
62
18
 
        func g (n,v) =         if ((n == ""))
63
19
 
            then nil
64
20
 
            else if ((n == "1"))
65
21
 
                then {
66
22
 
                    let t = split(v, ":")
67
23
 
[y(t[0], t[1])]
68
24
 
                    }
69
25
 
                else if ((n == "2"))
70
26
 
                    then {
71
27
 
                        let t = split(v, ":")
72
28
 
[y(t[0], t[1]), y(t[2], t[3])]
73
29
 
                        }
74
30
 
                    else if ((n == "3"))
75
31
 
                        then {
76
32
 
                            let t = split(v, ":")
77
33
 
[y(t[0], t[1]), y(t[2], t[3]), y(t[4], t[5])]
78
34
 
                            }
79
35
 
                        else if ((n == "4"))
80
36
 
                            then {
81
37
 
                                let t = split(v, ":")
82
38
 
[y(t[0], t[1]), y(t[2], t[3]), y(t[4], t[5]), y(t[6], t[7])]
83
39
 
                                }
84
40
 
                            else if ((n == "5"))
85
41
 
                                then {
86
42
 
                                    let t = split(v, ":")
87
43
 
[y(t[0], t[1]), y(t[2], t[3]), y(t[4], t[5]), y(t[6], t[7]), y(t[8], t[9])]
88
44
 
                                    }
89
45
 
                                else throw(n)
90
46
 
91
47
 
        func w (v) =         if ((v == ""))
92
48
 
            then unit
93
49
 
            else fromBase58String(v)
94
50
 
95
51
 
        func p (n,v) =         if ((n == ""))
96
52
 
            then nil
97
53
 
            else if ((n == "1"))
98
54
 
                then {
99
55
 
                    let t = split(v, ":")
100
56
 
[AttachedPayment(w(t[0]), parseIntValue(t[1]))]
101
57
 
                    }
102
58
 
                else if ((n == "2"))
103
59
 
                    then {
104
60
 
                        let t = split(v, ":")
105
61
 
[AttachedPayment(w(t[0]), parseIntValue(t[1])), AttachedPayment(w(t[2]), parseIntValue(t[3]))]
106
62
 
                        }
107
63
 
                    else throw(n)
108
64
 
109
65
 
        func f (a,v) =         {
110
66
 
            let t = split(v, ";")
111
67
 
            invoke(Address(fromBase58String(t[0])), t[1], g(t[2], t[3]), p(t[4], t[5]))
112
68
 
            }
113
69
 
114
70
 
        let c = if ((size(s) == 1))
115
71
 
            then getStringValue(this, s)
116
72
 
            else s
117
73
 
        let x = {
118
74
 
            let $l = split(toUtf8String(fromBase64String(c)), "|")
119
75
 
            let $s = size($l)
120
76
 
            let $acc0 = 0
121
77
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
122
78
 
                then $a
123
79
 
                else f($a, $l[$i])
124
80
 
125
81
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
126
82
 
                then $a
127
-
                else throw("List size exceeds 18")
83
+
                else throw("List size exceeds 50")
128
84
 
129
-
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18)
85
+
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50)
130
86
 
            }
131
87
 
        if ((x == x))
132
88
 
            then nil
133
89
 
            else throw("Strict value is not equal to itself.")
134
90
 
        }
135
91
 
136
92
 
137
93
 
138
94
 
@Callable(i)
139
95
 
func o (s) = if ((i.caller != this))
140
96
 
    then throw("!")
141
97
 
    else {
142
98
 
        func a (l) =                 match addressFromString(l) {
143
99
 
            case a: Address => 
144
100
 
                a
145
101
 
            case _ => 
146
102
 
                addressFromRecipient(Alias(l))
147
103
 
        }
148
104
 
149
105
 
        func f (a,v) =         {
150
106
 
            let t = split(v, ";")
151
107
 
            let u = t[0]
152
108
 
            (a ++ (if ((u == "0"))
153
109
 
                then [BinaryEntry(t[1], fromBase58String(t[2]))]
154
110
 
                else if ((u == "1"))
155
111
 
                    then [BooleanEntry(t[1], (t[2] == "1"))]
156
112
 
                    else if ((u == "2"))
157
113
 
                        then [IntegerEntry(t[1], parseIntValue(t[2]))]
158
114
 
                        else if ((u == "3"))
159
115
 
                            then [StringEntry(t[1], t[2])]
160
116
 
                            else if ((u == "4"))
161
117
 
                                then [DeleteEntry(t[1])]
162
118
 
                                else if ((u == "5"))
163
119
 
                                    then [Issue(t[1], t[2], parseIntValue(t[3]), parseIntValue(t[4]), (t[5] == "1"), unit, parseIntValue(t[7]))]
164
120
 
                                    else if ((u == "6"))
165
121
 
                                        then [Reissue(fromBase58String(t[1]), parseIntValue(t[2]), (t[3] == "1"))]
166
122
 
                                        else if ((u == "7"))
167
123
 
                                            then [Burn(fromBase58String(t[1]), parseIntValue(t[2]))]
168
124
 
                                            else if ((u == "8"))
169
125
 
                                                then [SponsorFee(fromBase58String(t[1]), if ((t[2] == ""))
170
126
 
                                                    then unit
171
127
 
                                                    else parseIntValue(t[2]))]
172
128
 
                                                else if ((u == "9"))
173
129
 
                                                    then [ScriptTransfer(a(t[1]), parseIntValue(t[2]), if ((t[3] == ""))
174
130
 
                                                        then unit
175
131
 
                                                        else fromBase58String(t[3]))]
176
132
 
                                                    else if ((u == "a"))
177
133
 
                                                        then [Lease(a(t[1]), parseIntValue(t[2]), parseIntValue(t[3]))]
178
134
 
                                                        else if ((u == "b"))
179
135
 
                                                            then [LeaseCancel(fromBase58String(t[1]))]
180
136
 
                                                            else throw(u)))
181
137
 
            }
182
138
 
183
139
 
        let $l = split(toUtf8String(fromBase64String(s)), "|")
184
140
 
        let $s = size($l)
185
141
 
        let $acc0 = nil
186
142
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
187
143
 
            then $a
188
144
 
            else f($a, $l[$i])
189
145
 
190
146
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
191
147
 
            then $a
192
148
 
            else throw("List size exceeds 50")
193
149
 
194
150
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50)
195
151
 
        }
196
152
 
197
153
 
198
-
199
-
@Callable(i)
200
-
func s () = if ((i.caller != this))
201
-
    then throw("!")
202
-
    else {
203
-
        let s = invoke(this, "x", ["s"], nil)
204
-
        if ((s == s))
205
-
            then nil
206
-
            else throw("Strict value is not equal to itself.")
207
-
        }
208
-
209
-

github/deemru/w8io/6500d08 
59.50 ms ◑