w8 · tx · AJ5···WLR

tx · AJ5mgzmcfVHV29pjPZ9PQM1RYGQL2ibddzhjt856fWLR

3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq:  -0.01000000 Waves

2023.06.23 02:25 [2634502] smart account 3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "AJ5mgzmcfVHV29pjPZ9PQM1RYGQL2ibddzhjt856fWLR",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1687476334785,
    "version": 2,
    "chainId": 84,
    "sender": "3NBbFNBed9tcU5AmsJAuExWvgJyNmJxqjWq",
    "senderPublicKey": "ERewvWFUFQfR1eCnipNAv9n7SdQhof2ESP6PGVjTueLd",
    "proofs": [
        "5kFmdFdRBVEVgQfAUcG7yDHGZ2ye11jYNQgGr3pawXjdNCBh84Di1Gkx9bPsHrBTRzHhfcpaLGSJos4WAQVU7F6N"
    ],
    "script": "base64:BgIfCAISAwoBARIDCgEBEgMKAQESBAoCCAESABIECgIIAQMAA2FycgkAzAgCAAEJAMwIAgACCQDMCAIAAwkAzAgCAAQJAMwIAgAFBQNuaWwABGFycjIJAMwIAgABCQDMCAIAAgUDbmlsAQNzdW0CAWEBYgkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBAiMzTjNEblZmZm5VeVp0ejJNUmJrNVU3Z2lOMTEyV2VtcE1OZAIGYm9ycm93CQDMCAICLDI1RkVxRWpSa3FLNnlDa2lUN0x6NlNBWXo3Z1VGQ3R4ZkNDaG5yVkZENUFUCQDMCAIAwIQ9BQNuaWwFA25pbAYBaQEGYm9ycm93AQthc3NldEFtb3VudAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEA3JlcwkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBAiMzTjNEblZmZm5VeVp0ejJNUmJrNVU3Z2lOMTEyV2VtcE1OZAIGYm9ycm93CQDMCAICLDI1RkVxRWpSa3FLNnlDa2lUN0x6NlNBWXo3Z1VGQ3R4ZkNDaG5yVkZENUFUCQDMCAIFC2Fzc2V0QW1vdW50BQNuaWwFA25pbAMJAAACBQNyZXMFA3JlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFC2Fzc2V0QW1vdW50ASAP8hwSrOTEPJrsRhqrJaiw7LoHK0bMbYhy8LXikkkBtAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIFB2FkZHJlc3MCCl9ib3Jyb3dlZF8CLDI1RkVxRWpSa3FLNnlDa2lUN0x6NlNBWXo3Z1VGQ3R4ZkNDaG5yVkZENUFUBQthc3NldEFtb3VudAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBB2JvcnJvdzIBC2Fzc2V0QW1vdW50BAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgoBCnJlcGVhdEZ1bmMCBWFjY3VtBG5leHQJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM04zRG5WZmZuVXladHoyTVJiazVVN2dpTjExMldlbXBNTmQCBmJvcnJvdwkAzAgCAiwyNUZFcUVqUmtxSzZ5Q2tpVDdMejZTQVl6N2dVRkN0eGZDQ2huclZGRDVBVAkAzAgCBQthc3NldEFtb3VudAUDbmlsBQNuaWwEBWFycmF5CQDMCAIAAQkAzAgCAAIFA25pbAQDcmVzCgACJGwFBWFycmF5CgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQpyZXBlYXRGdW5jAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyAyCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgMJAAACBQNyZXMFA3JlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIJAGgCBQthc3NldEFtb3VudAACASAP8hwSrOTEPJrsRhqrJaiw7LoHK0bMbYhy8LXikkkBtAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIFB2FkZHJlc3MCCl9ib3Jyb3dlZF8CLDI1RkVxRWpSa3FLNnlDa2lUN0x6NlNBWXo3Z1VGQ3R4ZkNDaG5yVkZENUFUBQthc3NldEFtb3VudAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBDGJvcnJvdzJfdGVzdAELYXNzZXRBbW91bnQEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyCgEKcmVwZWF0RnVuYwIFYWNjdW0EbmV4dAQGcmVzdWx0CQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNOM0RuVmZmblV5WnR6Mk1SYms1VTdnaU4xMTJXZW1wTU5kAgZib3Jyb3cJAMwIAgIsMjVGRXFFalJrcUs2eUNraVQ3THo2U0FZejdnVUZDdHhmQ0NobnJWRkQ1QVQJAMwIAgULYXNzZXRBbW91bnQFA25pbAUDbmlsAwkAAAIFBnJlc3VsdAUGcmVzdWx0CQBkAgUFYWNjdW0FBG5leHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4EBWFycmF5CQDMCAIFC2Fzc2V0QW1vdW50CQDMCAIFC2Fzc2V0QW1vdW50BQNuaWwEA3JlcwoAAiRsBQVhcnJheQoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKcmVwZWF0RnVuYwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICBQdhZGRyZXNzAgpfYm9ycm93ZWRfAiwyNUZFcUVqUmtxSzZ5Q2tpVDdMejZTQVl6N2dVRkN0eGZDQ2huclZGRDVBVAULYXNzZXRBbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQNyZXMBIA/yHBKs5MQ8muxGGqslqLDsugcrRsxtiHLwteKSSQG0BQNuaWwBaQEHYm9ycm93NQIKYXNzZXRJZFN0cgthc3NldEFtb3VudAQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEA3JlcwoAAiRsBQNhcnIKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBA3N1bQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUDCQAAAgUDcmVzBQNyZXMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICBQdhZGRyZXNzAgpfYm9ycm93ZWRfBQphc3NldElkU3RyBQthc3NldEFtb3VudAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBB2RlcG9zaXQABAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgQDcmVzCQD8BwQJARFAZXh0ck5hdGl2ZSgxMDYyKQECIzNOM0RuVmZmblV5WnR6Mk1SYms1VTdnaU4xMTJXZW1wTU5kAgZzdXBwbHkFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUEdW5pdADAhD0FA25pbAMJAAACBQNyZXMFA3JlcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQdhZGRyZXNzAgxzdXBwbHlfd2F2ZXMAwIQ9BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEId2l0aGRyYXcCCmFzc2V0SWRTdHILYXNzZXRBbW91bnQEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyBANyZXMJAPwHBAkBEUBleHRyTmF0aXZlKDEwNjIpAQIjM04zRG5WZmZuVXladHoyTVJiazVVN2dpTjExMldlbXBNTmQCCHdpdGhkcmF3CQDMCAIFCmFzc2V0SWRTdHIJAMwIAgULYXNzZXRBbW91bnQFA25pbAUDbmlsAwkAAAIFA3JlcwUDcmVzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgUHYWRkcmVzcwIKX3dpdGhkcmV3XwUKYXNzZXRJZFN0cgULYXNzZXRBbW91bnQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXmrsi/r",
    "height": 2634502,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: FT6JFdPBZD6fyzLrriCDyJyauvMFmQCLWJEVeaRXZRU3
Next: 3Gi7aWwEtg4WaJFxza41sPRcK9uKdZs1PDavHsn1L56n

Diff: 
Old New Differences
71 71  
72 72          $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
73 73          }
74 - [ScriptTransfer(i.caller, (assetAmount * 2), base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'), IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount), IntegerEntry("Total", res)]
74 + [IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount), ScriptTransfer(i.caller, res, base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT')]
75 75      }
76 76  
77 77  
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 25      func repeatFunc (accum,next) =     invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", assetAmount], nil)
26 26  
27 27      let array = [1, 2]
28 28      let res = {
29 29          let $l = array
30 30          let $s = size($l)
31 31          let $acc0 = 0
32 32          func $f0_1 ($a,$i) =         if (($i >= $s))
33 33              then $a
34 34              else repeatFunc($a, $l[$i])
35 35  
36 36          func $f0_2 ($a,$i) =         if (($i >= $s))
37 37              then $a
38 38              else throw("List size exceeds 2")
39 39  
40 40          $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
41 41          }
42 42      if ((res == res))
43 43          then [ScriptTransfer(i.caller, (assetAmount * 2), base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'), IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount)]
44 44          else throw("Strict value is not equal to itself.")
45 45      }
46 46  
47 47  
48 48  
49 49  @Callable(i)
50 50  func borrow2_test (assetAmount) = {
51 51      let address = toString(i.caller)
52 52      func repeatFunc (accum,next) =     {
53 53          let result = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", assetAmount], nil)
54 54          if ((result == result))
55 55              then (accum + next)
56 56              else throw("Strict value is not equal to itself.")
57 57          }
58 58  
59 59      let array = [assetAmount, assetAmount]
60 60      let res = {
61 61          let $l = array
62 62          let $s = size($l)
63 63          let $acc0 = 0
64 64          func $f0_1 ($a,$i) =         if (($i >= $s))
65 65              then $a
66 66              else repeatFunc($a, $l[$i])
67 67  
68 68          func $f0_2 ($a,$i) =         if (($i >= $s))
69 69              then $a
70 70              else throw("List size exceeds 2")
71 71  
72 72          $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
73 73          }
74 - [ScriptTransfer(i.caller, (assetAmount * 2), base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'), IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount), IntegerEntry("Total", res)]
74 + [IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount), ScriptTransfer(i.caller, res, base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT')]
75 75      }
76 76  
77 77  
78 78  
79 79  @Callable(i)
80 80  func borrow5 (assetIdStr,assetAmount) = {
81 81      let address = toString(i.caller)
82 82      let res = {
83 83          let $l = arr
84 84          let $s = size($l)
85 85          let $acc0 = 0
86 86          func $f0_1 ($a,$i) =         if (($i >= $s))
87 87              then $a
88 88              else sum($a, $l[$i])
89 89  
90 90          func $f0_2 ($a,$i) =         if (($i >= $s))
91 91              then $a
92 92              else throw("List size exceeds 5")
93 93  
94 94          $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
95 95          }
96 96      if ((res == res))
97 97          then [IntegerEntry(((address + "_borrowed_") + assetIdStr), assetAmount)]
98 98          else throw("Strict value is not equal to itself.")
99 99      }
100 100  
101 101  
102 102  
103 103  @Callable(i)
104 104  func deposit () = {
105 105      let address = toString(i.caller)
106 106      let res = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "supply", nil, [AttachedPayment(unit, 1000000)])
107 107      if ((res == res))
108 108          then [IntegerEntry((address + "supply_waves"), 1000000)]
109 109          else throw("Strict value is not equal to itself.")
110 110      }
111 111  
112 112  
113 113  
114 114  @Callable(i)
115 115  func withdraw (assetIdStr,assetAmount) = {
116 116      let address = toString(i.caller)
117 117      let res = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "withdraw", [assetIdStr, assetAmount], nil)
118 118      if ((res == res))
119 119          then [IntegerEntry(((address + "_withdrew_") + assetIdStr), assetAmount)]
120 120          else throw("Strict value is not equal to itself.")
121 121      }
122 122  
123 123  
124 124  @Verifier(tx)
125 125  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
126 126

Old	New		Differences
71	71
72	72		$f0_2($f0_1($f0_1($acc0, 0), 1), 2)
73	73		}
74		-	[~~ScriptTransfer(i.caller, (assetAmount * 2), base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'),~~ IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount), ~~IntegerEntry~~(~~"Total"~~, res)]
	74	+	[IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount), ScriptTransfer(i.caller, res, base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT')]
75	75		}
76	76
77	77

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	25		func repeatFunc (accum,next) = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", assetAmount], nil)
26	26
27	27		let array = [1, 2]
28	28		let res = {
29	29		let $l = array
30	30		let $s = size($l)
31	31		let $acc0 = 0
32	32		func $f0_1 ($a,$i) = if (($i >= $s))
33	33		then $a
34	34		else repeatFunc($a, $l[$i])
35	35
36	36		func $f0_2 ($a,$i) = if (($i >= $s))
37	37		then $a
38	38		else throw("List size exceeds 2")
39	39
40	40		$f0_2($f0_1($f0_1($acc0, 0), 1), 2)
41	41		}
42	42		if ((res == res))
43	43		then [ScriptTransfer(i.caller, (assetAmount * 2), base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'), IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount)]
44	44		else throw("Strict value is not equal to itself.")
45	45		}
46	46
47	47
48	48
49	49		@Callable(i)
50	50		func borrow2_test (assetAmount) = {
51	51		let address = toString(i.caller)
52	52		func repeatFunc (accum,next) = {
53	53		let result = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "borrow", ["25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT", assetAmount], nil)
54	54		if ((result == result))
55	55		then (accum + next)
56	56		else throw("Strict value is not equal to itself.")
57	57		}
58	58
59	59		let array = [assetAmount, assetAmount]
60	60		let res = {
61	61		let $l = array
62	62		let $s = size($l)
63	63		let $acc0 = 0
64	64		func $f0_1 ($a,$i) = if (($i >= $s))
65	65		then $a
66	66		else repeatFunc($a, $l[$i])
67	67
68	68		func $f0_2 ($a,$i) = if (($i >= $s))
69	69		then $a
70	70		else throw("List size exceeds 2")
71	71
72	72		$f0_2($f0_1($f0_1($acc0, 0), 1), 2)
73	73		}
74		-	[~~ScriptTransfer(i.caller, (assetAmount * 2), base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT'),~~ IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount), ~~IntegerEntry~~(~~"Total"~~, res)]
	74	+	[IntegerEntry(((address + "_borrowed_") + "25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT"), assetAmount), ScriptTransfer(i.caller, res, base58'25FEqEjRkqK6yCkiT7Lz6SAYz7gUFCtxfCChnrVFD5AT')]
75	75		}
76	76
77	77
78	78
79	79		@Callable(i)
80	80		func borrow5 (assetIdStr,assetAmount) = {
81	81		let address = toString(i.caller)
82	82		let res = {
83	83		let $l = arr
84	84		let $s = size($l)
85	85		let $acc0 = 0
86	86		func $f0_1 ($a,$i) = if (($i >= $s))
87	87		then $a
88	88		else sum($a, $l[$i])
89	89
90	90		func $f0_2 ($a,$i) = if (($i >= $s))
91	91		then $a
92	92		else throw("List size exceeds 5")
93	93
94	94		$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
95	95		}
96	96		if ((res == res))
97	97		then [IntegerEntry(((address + "_borrowed_") + assetIdStr), assetAmount)]
98	98		else throw("Strict value is not equal to itself.")
99	99		}
100	100
101	101
102	102
103	103		@Callable(i)
104	104		func deposit () = {
105	105		let address = toString(i.caller)
106	106		let res = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "supply", nil, [AttachedPayment(unit, 1000000)])
107	107		if ((res == res))
108	108		then [IntegerEntry((address + "supply_waves"), 1000000)]
109	109		else throw("Strict value is not equal to itself.")
110	110		}
111	111
112	112
113	113
114	114		@Callable(i)
115	115		func withdraw (assetIdStr,assetAmount) = {
116	116		let address = toString(i.caller)
117	117		let res = invoke(addressFromStringValue("3N3DnVffnUyZtz2MRbk5U7giN112WempMNd"), "withdraw", [assetIdStr, assetAmount], nil)
118	118		if ((res == res))
119	119		then [IntegerEntry(((address + "_withdrew_") + assetIdStr), assetAmount)]
120	120		else throw("Strict value is not equal to itself.")
121	121		}
122	122
123	123
124	124		@Verifier(tx)
125	125		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
126	126

github/deemru/w8io/169f3d6 
36.24 ms ◑