tx · GErDwtn8AyQHUx9mF7pUohd6vm6cxF1wYUDwYmHPRHTo

3N5LuKQTLpnuibSzamYvruXsbp7YpqzKDA2:  -0.00300000 Waves

2023.04.25 22:23 [2550485] smart account 3N5LuKQTLpnuibSzamYvruXsbp7YpqzKDA2 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "GErDwtn8AyQHUx9mF7pUohd6vm6cxF1wYUDwYmHPRHTo",
    "fee": 300000,
    "feeAssetId": null,
    "timestamp": 1682450665897,
    "version": 2,
    "chainId": 84,
    "sender": "3N5LuKQTLpnuibSzamYvruXsbp7YpqzKDA2",
    "senderPublicKey": "BgxpCm4wxbW8SKLPKZnf4KU2D6ZU29ov8MgZrkaSAqpY",
    "proofs": [
        "5g2BVZ1nTX6B7YVAhizW8yTD4So1EaoR7QMxx9RPxVMeVc1G7c57ksfRh87Eyy1Sxm246Dxr8Fb8KmyyEAdmAXkn"
    ],
    "script": "base64:BgIJCAISAwoBCBIABwEPZ2V0QXNzZXRCYWxhbmNlAgdhZGRyZXNzB2Fzc2V0SWQEAWEJAPAHAgUHYWRkcmVzcwUHYXNzZXRJZAUBYQEPZ2V0V2F2ZXNCYWxhbmNlAQdhZGRyZXNzBAF3CAkA7wcBBQdhZGRyZXNzCWF2YWlsYWJsZQUBdwEKZ2V0QmFsYW5jZQIGcmVzdWx0B2Fzc2V0SWQEB2FkZHJlc3MJAK8CAgUGcmVzdWx0ACMEBGFkZHIJAQdBZGRyZXNzAQkA2QQBBQdhZGRyZXNzBAdiYWxhbmNlAwkAAAIFB2Fzc2V0SWQCBVdBVkVTCQEPZ2V0V2F2ZXNCYWxhbmNlAQUEYWRkcgQDYUlkCQDZBAEFB2Fzc2V0SWQJAQ9nZXRBc3NldEJhbGFuY2UCBQRhZGRyBQNhSWQEA2xlbgkAsQIBBQZyZXN1bHQJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQdhZGRyZXNzCQCwAgIFBnJlc3VsdAAjBQdhc3NldElkAgE6CQCkAwEFB2JhbGFuY2UCASwBB2RvUG9vbHMBCnBvb2xQYXJhbXMEA2FycgkAvAkCBQpwb29sUGFyYW1zAgE7BAokdDA5NDkxMDAzCQCVCgMJAJEDAgUDYXJyAAAJAJEDAgUDYXJyAAEJAJEDAgUDYXJyAAIEB2FkZHJlc3MIBQokdDA5NDkxMDAzAl8xBAR0eXBlCAUKJHQwOTQ5MTAwMwJfMgQGYXNzZXRzCAUKJHQwOTQ5MTAwMwJfMwAAAQl0ZXN0X2xvb3ACBnJlc3VsdANlbGUJAMwIAgUDZWxlBQZyZXN1bHQBDmdldEJhbGFuY2VzU3RyAglhc3NldHNTdHIHYWRkcmVzcwQGYXNzZXRzCQC8CQIFCWFzc2V0c1N0cgIBLAQDcmVzCgACJGwFBmFzc2V0cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFB2FkZHJlc3MKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCmdldEJhbGFuY2UCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACBAhiYWxhbmNlcwkAsAICBQNyZXMAIwUIYmFsYW5jZXMBB3Byb2Nlc3MCBnJlc3VsdAZwYXJhbXMEA2FycgkAvAkCBQZwYXJhbXMCATsECyR0MDE0MDUxNDYyCQCVCgMJAJEDAgUDYXJyAAAJAJEDAgUDYXJyAAEJAJEDAgUDYXJyAAIEB2FkZHJlc3MIBQskdDAxNDA1MTQ2MgJfMQQEdHlwZQgFCyR0MDE0MDUxNDYyAl8yBAlhc3NldHNTdHIIBQskdDAxNDA1MTQ2MgJfMwQMYXNzZXRzU3RyaW5nCQEOZ2V0QmFsYW5jZXNTdHICBQlhc3NldHNTdHIFB2FkZHJlc3MEB3Jlc0l0ZW0JAKwCAgkArAICBQdhZGRyZXNzAgEvBQxhc3NldHNTdHJpbmcJAMwIAgUHcmVzSXRlbQUGcmVzdWx0AgFpAQVnZXRXWAEGcGFyYW1zBAxwb29sc19wYXJhbXMJALwJAgUGcGFyYW1zAgF8BAZyZXNBcnIKAAIkbAUMcG9vbHNfcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQdwcm9jZXNzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA4MAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgAOQA6ADsAPAA9AD4APwBAAEEAQgBDAEQARQBGAEcASABJAEoASwBMAE0ATgBPAFAEBnJlc3VsdAkAuQkCBQZyZXNBcnICAXwJAAIBBQZyZXN1bHQBaQEEdGVzdAAEAWEJAMwIAgIBMQkAzAgCAgEyCQDMCAICATMJAMwIAgIBNAkAzAgCAgE1BQNuaWwEA3JlcwoAAiRsBQFhCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQl0ZXN0X2xvb3ACBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoEBnJlc3VsdAkAuQkCBQNyZXMCASoJAAIBBQZyZXN1bHQA9YSaYA==",
    "height": 2550485,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 8zW1Lim1B7VF1UpAMBGiYhxzkmcA1qQPnoor4rykKCkD
Next: 4K3HusN3QcHdVxM2CXv9yxRxnr4WKpK7HNs7nt2MdrRM

Diff: 
Old
New
Differences
37
37
 
    }
38
38
 
39
39
 
40
-
func loop (result,ele) = ele :: result
40
+
func test_loop (result,ele) = ele :: result
41
41
 
42
42
 
43
-
@Callable(i)
44
-
func asss (assetsStr,address) = {
43
+
func getBalancesStr (assetsStr,address) = {
45
44
 
    let assets = split_4C(assetsStr, ",")
46
45
 
    let res = {
47
46
 
        let $l = assets
53
52
 
54
53
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
55
54
 
            then $a
56
-
            else throw("List size exceeds 10")
55
+
            else throw("List size exceeds 2")
57
56
 
58
-
        $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)
57
+
        $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
59
58
 
        }
60
59
 
    let balances = drop(res, 35)
61
-
    throw(("result: " + balances))
60
+
    balances
61
+
    }
62
+
63
+
64
+
func process (result,params) = {
65
+
    let arr = split_4C(params, ";")
66
+
    let $t014051462 = $Tuple3(arr[0], arr[1], arr[2])
67
+
    let address = $t014051462._1
68
+
    let type = $t014051462._2
69
+
    let assetsStr = $t014051462._3
70
+
    let assetsString = getBalancesStr(assetsStr, address)
71
+
    let resItem = ((address + "/") + assetsString)
72
+
resItem :: result
73
+
    }
74
+
75
+
76
+
@Callable(i)
77
+
func getWX (params) = {
78
+
    let pools_params = split_4C(params, "|")
79
+
    let resArr = {
80
+
        let $l = pools_params
81
+
        let $s = size($l)
82
+
        let $acc0 = nil
83
+
        func $f0_1 ($a,$i) =         if (($i >= $s))
84
+
            then $a
85
+
            else process($a, $l[$i])
86
+
87
+
        func $f0_2 ($a,$i) =         if (($i >= $s))
88
+
            then $a
89
+
            else throw("List size exceeds 80")
90
+
91
+
        $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($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), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80)
92
+
        }
93
+
    let result = makeString(resArr, "|")
94
+
    throw(result)
62
95
 
    }
63
96
 
64
97
 
72
105
 
        let $acc0 = nil
73
106
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
74
107
 
            then $a
75
-
            else loop($a, $l[$i])
108
+
            else test_loop($a, $l[$i])
76
109
 
77
110
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
78
111
 
            then $a
85
118
 
    }
86
119
 
87
120
 
88
-
89
-
@Callable(i)
90
-
func get (params) = {
91
-
    let pools = split_4C(params, "|")
92
-
    nil
93
-
    }
94
-
95
-

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
func getAssetBalance (address,assetId) = {
5
5
 
    let a = assetBalance(address, assetId)
6
6
 
    a
7
7
 
    }
8
8
 
9
9
 
10
10
 
func getWavesBalance (address) = {
11
11
 
    let w = wavesBalance(address).available
12
12
 
    w
13
13
 
    }
14
14
 
15
15
 
16
16
 
func getBalance (result,assetId) = {
17
17
 
    let address = take(result, 35)
18
18
 
    let addr = Address(fromBase58String(address))
19
19
 
    let balance = if ((assetId == "WAVES"))
20
20
 
        then getWavesBalance(addr)
21
21
 
        else {
22
22
 
            let aId = fromBase58String(assetId)
23
23
 
            getAssetBalance(addr, aId)
24
24
 
            }
25
25
 
    let len = size(result)
26
26
 
    (((((address + drop(result, 35)) + assetId) + ":") + toString(balance)) + ",")
27
27
 
    }
28
28
 
29
29
 
30
30
 
func doPools (poolParams) = {
31
31
 
    let arr = split_4C(poolParams, ";")
32
32
 
    let $t09491003 = $Tuple3(arr[0], arr[1], arr[2])
33
33
 
    let address = $t09491003._1
34
34
 
    let type = $t09491003._2
35
35
 
    let assets = $t09491003._3
36
36
 
    0
37
37
 
    }
38
38
 
39
39
 
40
-
func loop (result,ele) = ele :: result
40
+
func test_loop (result,ele) = ele :: result
41
41
 
42
42
 
43
-
@Callable(i)
44
-
func asss (assetsStr,address) = {
43
+
func getBalancesStr (assetsStr,address) = {
45
44
 
    let assets = split_4C(assetsStr, ",")
46
45
 
    let res = {
47
46
 
        let $l = assets
48
47
 
        let $s = size($l)
49
48
 
        let $acc0 = address
50
49
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
51
50
 
            then $a
52
51
 
            else getBalance($a, $l[$i])
53
52
 
54
53
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
55
54
 
            then $a
56
-
            else throw("List size exceeds 10")
55
+
            else throw("List size exceeds 2")
57
56
 
58
-
        $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)
57
+
        $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
59
58
 
        }
60
59
 
    let balances = drop(res, 35)
61
-
    throw(("result: " + balances))
60
+
    balances
61
+
    }
62
+
63
+
64
+
func process (result,params) = {
65
+
    let arr = split_4C(params, ";")
66
+
    let $t014051462 = $Tuple3(arr[0], arr[1], arr[2])
67
+
    let address = $t014051462._1
68
+
    let type = $t014051462._2
69
+
    let assetsStr = $t014051462._3
70
+
    let assetsString = getBalancesStr(assetsStr, address)
71
+
    let resItem = ((address + "/") + assetsString)
72
+
resItem :: result
73
+
    }
74
+
75
+
76
+
@Callable(i)
77
+
func getWX (params) = {
78
+
    let pools_params = split_4C(params, "|")
79
+
    let resArr = {
80
+
        let $l = pools_params
81
+
        let $s = size($l)
82
+
        let $acc0 = nil
83
+
        func $f0_1 ($a,$i) =         if (($i >= $s))
84
+
            then $a
85
+
            else process($a, $l[$i])
86
+
87
+
        func $f0_2 ($a,$i) =         if (($i >= $s))
88
+
            then $a
89
+
            else throw("List size exceeds 80")
90
+
91
+
        $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($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), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80)
92
+
        }
93
+
    let result = makeString(resArr, "|")
94
+
    throw(result)
62
95
 
    }
63
96
 
64
97
 
65
98
 
66
99
 
@Callable(i)
67
100
 
func test () = {
68
101
 
    let a = ["1", "2", "3", "4", "5"]
69
102
 
    let res = {
70
103
 
        let $l = a
71
104
 
        let $s = size($l)
72
105
 
        let $acc0 = nil
73
106
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
74
107
 
            then $a
75
-
            else loop($a, $l[$i])
108
+
            else test_loop($a, $l[$i])
76
109
 
77
110
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
78
111
 
            then $a
79
112
 
            else throw("List size exceeds 10")
80
113
 
81
114
 
        $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)
82
115
 
        }
83
116
 
    let result = makeString(res, "*")
84
117
 
    throw(result)
85
118
 
    }
86
119
 
87
120
 
88
-
89
-
@Callable(i)
90
-
func get (params) = {
91
-
    let pools = split_4C(params, "|")
92
-
    nil
93
-
    }
94
-
95
-

github/deemru/w8io/03bedc9 
31.58 ms ◑