tx · GfStx347QWVzUGEth9J3quABHUeR3uG3KaGg1nTFbvAg

3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq:  -0.01000000 Waves

2023.06.23 02:00 [2634482] smart account 3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "GfStx347QWVzUGEth9J3quABHUeR3uG3KaGg1nTFbvAg",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1687474829438,
    "version": 2,
    "chainId": 84,
    "sender": "3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq",
    "senderPublicKey": "ERewvWFUFQfR1eCnipNAv9n7SdQhof2ESP6PGVjTueLd",
    "proofs": [
        "4rCSMYPPPYCgADQ1NpTQhsgnMVHi9mMhs97QMhKWsxjQsPKX54ixG6sKqcxURg3TyXPdAcR1YhDwsuj6QH87eZEL"
    ],
    "script": "base64:BgIaCAISAwoBARIDCgEBEgQKAggBEgASBAoCCAEDAANhcnIJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQUDbmlsAARhcnIyCQDMCAIAAQkAzAgCAAIFA25pbAEDc3VtAgFhAWIJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM04zRG5WZmZuVXladHoyTVJiazVVN2dpTjExMldlbXBNTmQCBmJvcnJvdwkAzAgCAiwyNUZFcUVqUmtxSzZ5Q2tpVDdMejZTQVl6N2dVRkN0eGZDQ2huclZGRDVBVAkAzAgCAMCEPQUDbmlsBQNuaWwFAWkBBmJvcnJvdwELYXNzZXRBbW91bnQEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyBANyZXMJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM04zRG5WZmZuVXladHoyTVJiazVVN2dpTjExMldlbXBNTmQCBmJvcnJvdwkAzAgCAiwyNUZFcUVqUmtxSzZ5Q2tpVDdMejZTQVl6N2dVRkN0eGZDQ2huclZGRDVBVAkAzAgCBQthc3NldEFtb3VudAUDbmlsBQNuaWwDCQAAAgUDcmVzBQNyZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQthc3NldEFtb3VudAEgD/IcEqzkxDya7EYaqyWosOy6BytGzG2IcvC14pJJAbQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICBQdhZGRyZXNzAgpfYm9ycm93ZWRfAiwyNUZFcUVqUmtxSzZ5Q2tpVDdMejZTQVl6N2dVRkN0eGZDQ2huclZGRDVBVAULYXNzZXRBbW91bnQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQdib3Jyb3cyAQthc3NldEFtb3VudAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEBWFycmF5CQDMCAIFC2Fzc2V0QW1vdW50CQDMCAIFC2Fzc2V0QW1vdW50BQNuaWwKAQpyZXBlYXRGdW5jAgVhY2N1bQRuZXh0BAJyZQkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBAiMzTjNEblZmZm5VeVp0ejJNUmJrNVU3Z2lOMTEyV2VtcE1OZAIGYm9ycm93CQDMCAICLDI1RkVxRWpSa3FLNnlDa2lUN0x6NlNBWXo3Z1VGQ3R4ZkNDaG5yVkZENUFUCQDMCAIFC2Fzc2V0QW1vdW50BQNuaWwFA25pbAMJAAACBQJyZQUCcmUJAMwIAgkAZAIFBWFjY3VtBQRuZXh0BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4EA3JlcwoAAiRsBQRhcnIyCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpyZXBlYXRGdW5jAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyAyCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgMJAAACBQNyZXMFA3JlcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIFB2FkZHJlc3MCCl9ib3Jyb3dlZF8CLDI1RkVxRWpSa3FLNnlDa2lUN0x6NlNBWXo3Z1VGQ3R4ZkNDaG5yVkZENUFUBQthc3NldEFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgIMVG90YWwgQW1vdW50BQNyZXMFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQdib3Jyb3c1Agphc3NldElkU3RyC2Fzc2V0QW1vdW50BAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgQDcmVzCgACJGwFA2FycgoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEDc3VtAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQMJAAACBQNyZXMFA3JlcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIFB2FkZHJlc3MCCl9ib3Jyb3dlZF8FCmFzc2V0SWRTdHIFC2Fzc2V0QW1vdW50BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEHZGVwb3NpdAAEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyBANyZXMJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM04zRG5WZmZuVXladHoyTVJiazVVN2dpTjExMldlbXBNTmQCBnN1cHBseQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQR1bml0AMCEPQUDbmlsAwkAAAIFA3JlcwUDcmVzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFB2FkZHJlc3MCDHN1cHBseV93YXZlcwDAhD0FA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQh3aXRoZHJhdwIKYXNzZXRJZFN0cgthc3NldEFtb3VudAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEA3JlcwkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBAiMzTjNEblZmZm5VeVp0ejJNUmJrNVU3Z2lOMTEyV2VtcE1OZAIId2l0aGRyYXcJAMwIAgUKYXNzZXRJZFN0cgkAzAgCBQthc3NldEFtb3VudAUDbmlsBQNuaWwDCQAAAgUDcmVzBQNyZXMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICBQdhZGRyZXNzAgpfd2l0aGRyZXdfBQphc3NldElkU3RyBQthc3NldEFtb3VudAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleb0skiw=",
    "height": 2634482,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 5xZxCaFtXQbtTv8XGgcysaQfzGjQ5BiNP5DK97dG2vDS
Next: 3k8ws5ubAroCNfTEXEvY7T1agLqKifk8bfMYk1BbpsNG

Diff: 
Old
New
Differences
22
22
 
@Callable(i)
23
23
 
func borrow2 (assetAmount) = {
24
24
 
    let address = toString(i.caller)
25
-
    func repeatFunc (a,b) =     {
25
+
    let array = [assetAmount, assetAmount]
26
+
    func repeatFunc (accum,next) =     {
26
27
 
        let re = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", assetAmount], nil)
27
28
 
        if ((re == re))
28
-
            then [ScriptTransfer(i.caller, assetAmount, base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT')]
29
+
            then [(accum + next)]
29
30
 
            else throw("Strict value is not equal to itself.")
30
31
 
        }
31
32
 
44
45
 
        $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
45
46
 
        }
46
47
 
    if ((res == res))
47
-
        then [IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount)]
48
+
        then [IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount), IntegerEntry("Total Amount", res)]
48
49
 
        else throw("Strict value is not equal to itself.")
49
50
 
    }
50
51
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let arr = [1, 2, 3, 4, 5]
5
5
 
6
6
 
let arr2 = [1, 2]
7
7
 
8
8
 
func sum (a,b) = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", 1000000], nil)
9
9
 
10
10
 
11
11
 
@Callable(i)
12
12
 
func borrow (assetAmount) = {
13
13
 
    let address = toString(i.caller)
14
14
 
    let res = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", assetAmount], nil)
15
15
 
    if ((res == res))
16
16
 
        then [ScriptTransfer(i.caller, assetAmount, base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'), IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount)]
17
17
 
        else throw("Strict value is not equal to itself.")
18
18
 
    }
19
19
 
20
20
 
21
21
 
22
22
 
@Callable(i)
23
23
 
func borrow2 (assetAmount) = {
24
24
 
    let address = toString(i.caller)
25
-
    func repeatFunc (a,b) =     {
25
+
    let array = [assetAmount, assetAmount]
26
+
    func repeatFunc (accum,next) =     {
26
27
 
        let re = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", assetAmount], nil)
27
28
 
        if ((re == re))
28
-
            then [ScriptTransfer(i.caller, assetAmount, base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT')]
29
+
            then [(accum + next)]
29
30
 
            else throw("Strict value is not equal to itself.")
30
31
 
        }
31
32
 
32
33
 
    let res = {
33
34
 
        let $l = arr2
34
35
 
        let $s = size($l)
35
36
 
        let $acc0 = 0
36
37
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
37
38
 
            then $a
38
39
 
            else repeatFunc($a, $l[$i])
39
40
 
40
41
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
41
42
 
            then $a
42
43
 
            else throw("List size exceeds 2")
43
44
 
44
45
 
        $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
45
46
 
        }
46
47
 
    if ((res == res))
47
-
        then [IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount)]
48
+
        then [IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount), IntegerEntry("Total Amount", res)]
48
49
 
        else throw("Strict value is not equal to itself.")
49
50
 
    }
50
51
 
51
52
 
52
53
 
53
54
 
@Callable(i)
54
55
 
func borrow5 (assetIdStr,assetAmount) = {
55
56
 
    let address = toString(i.caller)
56
57
 
    let res = {
57
58
 
        let $l = arr
58
59
 
        let $s = size($l)
59
60
 
        let $acc0 = 0
60
61
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
61
62
 
            then $a
62
63
 
            else sum($a, $l[$i])
63
64
 
64
65
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
65
66
 
            then $a
66
67
 
            else throw("List size exceeds 5")
67
68
 
68
69
 
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
69
70
 
        }
70
71
 
    if ((res == res))
71
72
 
        then [IntegerEntry(((address + "_borrowed_") + assetIdStr), assetAmount)]
72
73
 
        else throw("Strict value is not equal to itself.")
73
74
 
    }
74
75
 
75
76
 
76
77
 
77
78
 
@Callable(i)
78
79
 
func deposit () = {
79
80
 
    let address = toString(i.caller)
80
81
 
    let res = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "supply", nil, [AttachedPayment(unit, 1000000)])
81
82
 
    if ((res == res))
82
83
 
        then [IntegerEntry((address + "supply_waves"), 1000000)]
83
84
 
        else throw("Strict value is not equal to itself.")
84
85
 
    }
85
86
 
86
87
 
87
88
 
88
89
 
@Callable(i)
89
90
 
func withdraw (assetIdStr,assetAmount) = {
90
91
 
    let address = toString(i.caller)
91
92
 
    let res = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "withdraw", [assetIdStr, assetAmount], nil)
92
93
 
    if ((res == res))
93
94
 
        then [IntegerEntry(((address + "_withdrew_") + assetIdStr), assetAmount)]
94
95
 
        else throw("Strict value is not equal to itself.")
95
96
 
    }
96
97
 
97
98
 
98
99
 
@Verifier(tx)
99
100
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
100
101
 

github/deemru/w8io/873ac7e 
36.06 ms ◑