w8 · tx · 65r···MTs

tx · 65roaXkivzfvJk5hy8imrW2AvJSYjGDpUhpb647KDMTs

3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh:  -0.00900000 Waves

2022.12.02 01:29 [2341867] smart account 3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "65roaXkivzfvJk5hy8imrW2AvJSYjGDpUhpb647KDMTs",
    "fee": 900000,
    "feeAssetId": null,
    "timestamp": 1669933809076,
    "version": 2,
    "chainId": 84,
    "sender": "3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh",
    "senderPublicKey": "HscGVyJG5M3NMHWKfQbucCBsFLGPi8VmTxTAmcBbaWTa",
    "proofs": [
        "28csRkTVS32ghViBNnrtBV8VayMdYg9KTShtmvUj6ivSo96Fy8SBviBLgPD8VfiXKX3WdYq6Fpc6annC9yCCXME9"
    ],
    "script": "base64:BgITCAISAwoBCBIDCgEIEgASAwoBARQABlNjYWxlNgDAhD0ABlNjYWxlOACAwtcvAAdTY2FsZTE2CQBoAgUGU2NhbGU4BQZTY2FsZTgACnZhbGlkYXRvcnMJAMwIAgIjM05BbXFHanhSQlJQb1JIWlVVcXZoaU5TNmF4bkdwaW5MSEMFA25pbAATcG9maXRBY2NvdW50QWRkcmVzcwkBB0FkZHJlc3MBARoBVGSpz+Ou8Vl6LSUDrdpPEIjQb60KRx/EqQAHYXNzZXRJZAIsSEhtYUZRcFVvYndLeHpqejRFQ2FCUHRvRjY5a3VqS3dVMmNvemFVelRzZ3YAC3B1enpsZVBvb2xzCQDMCAICIzNONlN0SmRnbVRmQVJzUk5uOVh0NXJEWUVzM3ByNEtHeTF2BQNuaWwBCmdldEJhbGFuY2UBB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIEVW5pdAQBeAUHJG1hdGNoMAgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAPAHAgUEdGhpcwkBBXZhbHVlAQUHYXNzZXRJZAEJdHJ5R2V0SW50AgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAmggCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABCXRyeUdldFN0cgIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJ0IAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYgUHJG1hdGNoMAUBYgIAAQ5nZXRBc3NldFN0cmluZwEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFiBQckbWF0Y2gwCQDYBAEFAWICBVdBVkVTARtnZXRQdXp6bGVQb29sU3VwcGxpZWRBbW91bnQBBnBvb2xJZAQHYmFsYW5jZQkA8AcCCQEHQWRkcmVzcwEJANkEAQUGcG9vbElkCQDZBAEFB2Fzc2V0SWQFB2JhbGFuY2UBFmdldFRvdGFsU3VwcGxpZWRBbW91bnQABAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwkAAAIFC2N1cnJlbnRQb29sAgAJAAIBCQCsAgICGUNhbm5vdCBmaW5kIHBvb2wgd2l0aCBpZCAFC2N1cnJlbnRQb29sCQEbZ2V0UHV6emxlUG9vbFN1cHBsaWVkQW1vdW50AQULY3VycmVudFBvb2wBFndpdGhkcmF3RnJvbVB1enpsZVBvb2wCBnBvb2xJZAZhbW91bnQEC3Bvb2xBZGRyZXNzCQEHQWRkcmVzcwEJANkEAQUGcG9vbElkBAp3aXRoZHJhd1R4AwkAZgIFBmFtb3VudAAACQD8BwQFC3Bvb2xBZGRyZXNzAgh3aXRoZHJhdwkAzAgCBQdhc3NldElkCQDMCAIFBmFtb3VudAUDbmlsBQNuaWwCAAMJAAACBQp3aXRoZHJhd1R4BQp3aXRoZHJhd1R4BQp3aXRoZHJhd1R4CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQ5jYWxjdWxhdGVTUmF0ZQAEDmxhc3RDaGVja1NSYXRlCQEJdHJ5R2V0SW50AgUEdGhpcwIVZ2xvYmFsX2xhc3RDaGVja1NSYXRlBAxzdGFrZWRBbW91bnQJAQl0cnlHZXRJbnQCBQR0aGlzAg1nbG9iYWxfc3Rha2VkBBFsYXN0Q2hlY2tTQW1vdW51dAkAawMFDHN0YWtlZEFtb3VudAUObGFzdENoZWNrU1JhdGUFBlNjYWxlOAQTdG90YWxTdXBwbGllZEFtb3VudAkBFmdldFRvdGFsU3VwcGxpZWRBbW91bnQAAwkAAAIFEWxhc3RDaGVja1NBbW91bnV0AAAFBlNjYWxlOAQMdG90YWxTdXBsaWVkBRN0b3RhbFN1cHBsaWVkQW1vdW50BAVzUmF0ZQkAawMFDmxhc3RDaGVja1NSYXRlBQx0b3RhbFN1cGxpZWQFEWxhc3RDaGVja1NBbW91bnV0AwkAZgIFBlNjYWxlOAUFc1JhdGUFBlNjYWxlOAUFc1JhdGUBDHJlY2FsY1Jlc3VsdAEMc3Rha2VkQ2hhbmdlBAxzdGFrZWRBbW91bnQJAQl0cnlHZXRJbnQCBQR0aGlzAg1nbG9iYWxfc3Rha2VkBAVzUmF0ZQkBDmNhbGN1bGF0ZVNSYXRlAAkAzAgCCQEMSW50ZWdlckVudHJ5AgINZ2xvYmFsX3N0YWtlZAkAZAIFDHN0YWtlZEFtb3VudAUMc3Rha2VkQ2hhbmdlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhVnbG9iYWxfbGFzdENoZWNrU1JhdGUFBXNSYXRlBQNuaWwBDHN1cHBseVJlc3VsdAEGcG9vbElkAwkAAAIJAM8IAgULcHV6emxlUG9vbHMFBnBvb2xJZAUEdW5pdAkAAgEJAKwCAgIPVW5rbm93biBwb29sSWQgBQZwb29sSWQECmFzc2V0Qnl0ZXMJANkEAQUHYXNzZXRJZAQHYmFsYW5jZQkBCmdldEJhbGFuY2UBBQphc3NldEJ5dGVzBANpbnYJAPwHBAkBB0FkZHJlc3MBCQDZBAEFBnBvb2xJZAIGc3VwcGx5BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCmFzc2V0Qnl0ZXMFB2JhbGFuY2UFA25pbAMJAAACBQNpbnYFA2ludgkAzAgCCQELU3RyaW5nRW50cnkCAgtjdXJyZW50UG9vbAUGcG9vbElkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BDndpdGhkcmF3UmVzdWx0AAQLY3VycmVudFBvb2wJAQl0cnlHZXRTdHICBQR0aGlzAgtjdXJyZW50UG9vbAMJAAACBQtjdXJyZW50UG9vbAIACQACAQkArAICAhlDYW5ub3QgZmluZCBwb29sIHdpdGggaWQgBQtjdXJyZW50UG9vbAQGYW1vdW50CQEbZ2V0UHV6emxlUG9vbFN1cHBsaWVkQW1vdW50AQULY3VycmVudFBvb2wEAnR4CQEWd2l0aGRyYXdGcm9tUHV6emxlUG9vbAIFC2N1cnJlbnRQb29sBQZhbW91bnQDCQAAAgUCdHgFAnR4BQJ0eAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgELc3Rha2VSZXN1bHQCBHVzZXIGYW1vdW50BAdzQW1vdW50CQBrAwUGYW1vdW50BQZTY2FsZTgJAQ5jYWxjdWxhdGVTUmF0ZQAJAM4IAgkBDHJlY2FsY1Jlc3VsdAEFB3NBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEdXNlcgIHX3N0YWtlZAkAZAIJAQl0cnlHZXRJbnQCBQR0aGlzCQCsAgIFBHVzZXICB19zdGFrZWQFB3NBbW91bnQFA25pbAENdW5zdGFrZVJlc3VsdAIEdXNlcgZhbW91bnQEB3NBbW91bnQJAGsDBQZhbW91bnQFBlNjYWxlOAkBDmNhbGN1bGF0ZVNSYXRlAAQKdXNlclN0YWtlZAkBCXRyeUdldEludAIFBHRoaXMJAKwCAgUEdXNlcgIHX3N0YWtlZAQNdW5zdGFrZUFtb3VudAMJAGYCBQdzQW1vdW50BQp1c2VyU3Rha2VkBQp1c2VyU3Rha2VkBQdzQW1vdW50CQDOCAIJAQxyZWNhbGNSZXN1bHQBCQEBLQEFDXVuc3Rha2VBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEdXNlcgIHX3N0YWtlZAkAZQIFCnVzZXJTdGFrZWQFDXVuc3Rha2VBbW91bnQFA25pbAQBaQEEaW5pdAEGcG9vbElkBAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwkAAAIJAM8IAgUKdmFsaWRhdG9ycwkApQgBCAUBaQZjYWxsZXIFBHVuaXQJAAIBAg1BY2Nlc3MgZGVuaWVkAwkAAAIFC2N1cnJlbnRQb29sAgAJAMwIAgkBC1N0cmluZ0VudHJ5AgILY3VycmVudFBvb2wFBnBvb2xJZAUDbmlsBQNuaWwBaQEJcmViYWxhbmNlAQZwb29sSWQEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wDCQAAAgkAzwgCBQp2YWxpZGF0b3JzCQClCAEIBQFpBmNhbGxlcgUEdW5pdAkAAgECDUFjY2VzcyBkZW5pZWQDCQAAAgULY3VycmVudFBvb2wFBnBvb2xJZAkAAgEJAKwCAgITQWxyZWFkeSBzdXBwbGllZCB0bwULY3VycmVudFBvb2wECndpdGhkcmF3VHgJAQ53aXRoZHJhd1Jlc3VsdAADCQAAAgUKd2l0aGRyYXdUeAUKd2l0aGRyYXdUeAkAzggCCQEMc3VwcGx5UmVzdWx0AQUGcG9vbElkCQEMcmVjYWxjUmVzdWx0AQAACQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBBXN0YWtlAAQEdXNlcgkApQgBCAUBaQZjYWxsZXIEBmFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wDAwkAZwIAAAUGYW1vdW50BgkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCQDZBAEFB2Fzc2V0SWQJAAIBAhZpbnZhbGlkIHRva2VuIGF0dGFjaGVkAwkAAAIFC2N1cnJlbnRQb29sAgAJAAIBAhRQb29sIG5vdCBpbml0aWFsaXplZAkAzggCCQELc3Rha2VSZXN1bHQCBQR1c2VyBQZhbW91bnQJAQxzdXBwbHlSZXN1bHQBBQtjdXJyZW50UG9vbAFpAQd1bnN0YWtlAQZhbW91bnQEBHVzZXIJAKUIAQgFAWkGY2FsbGVyBAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sBAJ0eAkBFndpdGhkcmF3RnJvbVB1enpsZVBvb2wCBQtjdXJyZW50UG9vbAUGYW1vdW50AwkAAAIFAnR4BQJ0eAkAzggCCQENdW5zdGFrZVJlc3VsdAIFBHVzZXIFBmFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFBmFtb3VudAkA2QQBBQdhc3NldElkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5DyzSZg==",
    "height": 2341867,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2Fkxhf667NGGxfWfthkhKDEGnhUJfddZgBbeYveGkGgQ
Next: Dx5X6jTzddhTLs3hzMRv7zZeN1ANCubmWHZgSmkW5QCQ

Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = 1000000
5 5  
6 6  let b = 100000000
7 7  
8 8  let c = (b * b)
9 9  
10 10  let d = ["3NAmqGjxRBRPoRHZUUqvhiNS6axnGpinLHC"]
11 11  
12 12  let e = Address(base58'3My6LmrRSRvJ73T14oT5k53SGPavGFoacWc')
13 13  
14 14  let f = "HHmaFQpUobwKxzjz4ECaBPtoF69kujKwU2cozaUzTsgv"
15 15  
16 16  let g = ["3N6StJdgmTfARsRNn9Xt5rDYEs3pr4KGy1v"]
17 17  
18 18  func h (f) = {
19 19      let i = f
20 20      if ($isInstanceOf(i, "Unit"))
21 21          then {
22 22              let j = i
23 23              wavesBalance(this).available
24 24              }
25 25          else assetBalance(this, value(f))
26 26      }
27 27  
28 28  
29 29  func k (l,m) = {
30 30      let i = getInteger(l, m)
31 31      if ($isInstanceOf(i, "Int"))
32 32          then {
33 33              let n = i
34 34              n
35 35              }
36 36          else 0
37 37      }
38 38  
39 39  
40 40  func o (l,m) = {
41 41      let i = getString(l, m)
42 42      if ($isInstanceOf(i, "String"))
43 43          then {
44 44              let n = i
45 45              n
46 46              }
47 47          else ""
48 48      }
49 49  
50 50  
51 51  func p (f) = {
52 52      let i = f
53 53      if ($isInstanceOf(i, "ByteVector"))
54 54          then {
55 55              let n = i
56 56              toBase58String(n)
57 57              }
58 58          else "WAVES"
59 59      }
60 60  
61 61  
62 62  func q (r) = {
63 63      let s = assetBalance(Address(fromBase58String(r)), fromBase58String(f))
64 64      s
65 65      }
66 66  
67 67  
68 68  func t () = {
69 69      let u = o(this, "currentPool")
70 70      if ((u == ""))
71 71          then throw(("Cannot find pool with id " + u))
72 72          else q(u)
73 73      }
74 74  
75 75  
76 76  func v (r,w) = {
77 77      let x = Address(fromBase58String(r))
78 78      let y = if ((w > 0))
79 79          then invoke(x, "withdraw", [f, w], nil)
80 80          else ""
81 81      if ((y == y))
82 82          then y
83 83          else throw("Strict value is not equal to itself.")
84 84      }
85 85  
86 86  
87 87  func z () = {
88 88      let A = k(this, "global_lastCheckSRate")
89 89      let B = k(this, "global_staked")
90 90      let C = fraction(B, A, b)
91 91      let D = t()
92 92      if ((C == 0))
93 93          then b
94 94          else {
95 95              let E = D
96 96              let F = fraction(A, E, C)
97 97              if ((b > F))
98 98                  then b
99 99                  else F
100 100              }
101 101      }
102 102  
103 103  
104 104  func G (H) = {
105 105      let B = k(this, "global_staked")
106 106      let F = z()
107 107  [IntegerEntry("global_staked", (B + H)), IntegerEntry("global_lastCheckSRate", F)]
108 108      }
109 109  
110 110  
111 111  func I (r) = if ((indexOf(g, r) == unit))
112 112      then throw(("Unknown poolId " + r))
113 113      else {
114 114          let J = fromBase58String(f)
115 115          let s = h(J)
116 116          let K = invoke(Address(fromBase58String(r)), "supply", nil, [AttachedPayment(J, s)])
117 117          if ((K == K))
118 118              then [StringEntry("currentPool", r)]
119 119              else throw("Strict value is not equal to itself.")
120 120          }
121 121  
122 122  
123 123  func L () = {
124 124      let u = o(this, "currentPool")
125 125      if ((u == ""))
126 126          then throw(("Cannot find pool with id " + u))
127 127          else {
128 128              let w = q(u)
129 129              let M = v(u, w)
130 130              if ((M == M))
131 131                  then M
132 132                  else throw("Strict value is not equal to itself.")
133 133              }
134 134      }
135 135  
136 136  
137 137  func N (O,w) = {
138 138      let P = fraction(w, b, z())
139 139      (G(P) ++ [IntegerEntry((O + "_staked"), (k(this, (O + "_staked")) + P))])
140 140      }
141 141  
142 142  
143 143  func Q (O,w) = {
144 144      let P = fraction(w, b, z())
145 145      let R = k(this, (O + "_staked"))
146 146      let S = if ((P > R))
147 147          then R
148 148          else P
149 149      (G(-(S)) ++ [IntegerEntry((O + "_staked"), (R - S))])
150 150      }
151 151  
152 152  
153 153  @Callable(T)
154 154  func init (r) = {
155 155      let u = o(this, "currentPool")
156 156      if ((indexOf(d, toString(T.caller)) == unit))
157 157          then throw("Access denied")
158 158          else if ((u == ""))
159 159              then [StringEntry("currentPool", r)]
160 160              else nil
161 161      }
162 162  
163 163  
164 164  
165 165  @Callable(T)
166 166  func rebalance (r) = {
167 167      let u = o(this, "currentPool")
168 168      if ((indexOf(d, toString(T.caller)) == unit))
169 169          then throw("Access denied")
170 170          else if ((u == r))
171 171              then throw(("Already supplied to" + u))
172 172              else {
173 173                  let y = L()
174 174                  if ((y == y))
175 175                      then (I(r) ++ G(0))
176 176                      else throw("Strict value is not equal to itself.")
177 177                  }
178 178      }
179 179  
180 180  
181 181  
182 182  @Callable(T)
183 183  func stake () = {
184 184      let O = toString(T.caller)
185 185      let w = T.payments[0].amount
186 186      let u = o(this, "currentPool")
187 187      if (if ((0 >= w))
188 188          then true
189 189          else (T.payments[0].assetId != fromBase58String(f)))
190 190          then throw("invalid token attached")
191 191          else if ((u == ""))
192 192              then throw("Pool not initialized")
193 193              else (N(O, w) ++ I(u))
194 194      }
195 195  
196 196  
197 197  
198 198  @Callable(T)
199 199  func unstake (w) = {
200 200      let O = toString(T.caller)
201 201      let u = o(this, "currentPool")
202 202      let M = v(u, w)
203 203      if ((M == M))
204 204          then (Q(O, w) ++ [ScriptTransfer(T.caller, w, fromBase58String(f))])
205 205          else throw("Strict value is not equal to itself.")
206 206      }
207 207  
208 208  
209 209  @Verifier(M)
210 210  func U () = sigVerify(M.bodyBytes, M.proofs[0], M.senderPublicKey)
211 211

Old	New	Differences
1	1	{-# STDLIB_VERSION 6 #-}
2	2	{-# SCRIPT_TYPE ACCOUNT #-}
3	3	{-# CONTENT_TYPE DAPP #-}
4	4	let a = 1000000
5	5
6	6	let b = 100000000
7	7
8	8	let c = (b * b)
9	9
10	10	let d = ["3NAmqGjxRBRPoRHZUUqvhiNS6axnGpinLHC"]
11	11
12	12	let e = Address(base58'3My6LmrRSRvJ73T14oT5k53SGPavGFoacWc')
13	13
14	14	let f = "HHmaFQpUobwKxzjz4ECaBPtoF69kujKwU2cozaUzTsgv"
15	15
16	16	let g = ["3N6StJdgmTfARsRNn9Xt5rDYEs3pr4KGy1v"]
17	17
18	18	func h (f) = {
19	19	let i = f
20	20	if ($isInstanceOf(i, "Unit"))
21	21	then {
22	22	let j = i
23	23	wavesBalance(this).available
24	24	}
25	25	else assetBalance(this, value(f))
26	26	}
27	27
28	28
29	29	func k (l,m) = {
30	30	let i = getInteger(l, m)
31	31	if ($isInstanceOf(i, "Int"))
32	32	then {
33	33	let n = i
34	34	n
35	35	}
36	36	else 0
37	37	}
38	38
39	39
40	40	func o (l,m) = {
41	41	let i = getString(l, m)
42	42	if ($isInstanceOf(i, "String"))
43	43	then {
44	44	let n = i
45	45	n
46	46	}
47	47	else ""
48	48	}
49	49
50	50
51	51	func p (f) = {
52	52	let i = f
53	53	if ($isInstanceOf(i, "ByteVector"))
54	54	then {
55	55	let n = i
56	56	toBase58String(n)
57	57	}
58	58	else "WAVES"
59	59	}
60	60
61	61
62	62	func q (r) = {
63	63	let s = assetBalance(Address(fromBase58String(r)), fromBase58String(f))
64	64	s
65	65	}
66	66
67	67
68	68	func t () = {
69	69	let u = o(this, "currentPool")
70	70	if ((u == ""))
71	71	then throw(("Cannot find pool with id " + u))
72	72	else q(u)
73	73	}
74	74
75	75
76	76	func v (r,w) = {
77	77	let x = Address(fromBase58String(r))
78	78	let y = if ((w > 0))
79	79	then invoke(x, "withdraw", [f, w], nil)
80	80	else ""
81	81	if ((y == y))
82	82	then y
83	83	else throw("Strict value is not equal to itself.")
84	84	}
85	85
86	86
87	87	func z () = {
88	88	let A = k(this, "global_lastCheckSRate")
89	89	let B = k(this, "global_staked")
90	90	let C = fraction(B, A, b)
91	91	let D = t()
92	92	if ((C == 0))
93	93	then b
94	94	else {
95	95	let E = D
96	96	let F = fraction(A, E, C)
97	97	if ((b > F))
98	98	then b
99	99	else F
100	100	}
101	101	}
102	102
103	103
104	104	func G (H) = {
105	105	let B = k(this, "global_staked")
106	106	let F = z()
107	107	[IntegerEntry("global_staked", (B + H)), IntegerEntry("global_lastCheckSRate", F)]
108	108	}
109	109
110	110
111	111	func I (r) = if ((indexOf(g, r) == unit))
112	112	then throw(("Unknown poolId " + r))
113	113	else {
114	114	let J = fromBase58String(f)
115	115	let s = h(J)
116	116	let K = invoke(Address(fromBase58String(r)), "supply", nil, [AttachedPayment(J, s)])
117	117	if ((K == K))
118	118	then [StringEntry("currentPool", r)]
119	119	else throw("Strict value is not equal to itself.")
120	120	}
121	121
122	122
123	123	func L () = {
124	124	let u = o(this, "currentPool")
125	125	if ((u == ""))
126	126	then throw(("Cannot find pool with id " + u))
127	127	else {
128	128	let w = q(u)
129	129	let M = v(u, w)
130	130	if ((M == M))
131	131	then M
132	132	else throw("Strict value is not equal to itself.")
133	133	}
134	134	}
135	135
136	136
137	137	func N (O,w) = {
138	138	let P = fraction(w, b, z())
139	139	(G(P) ++ [IntegerEntry((O + "_staked"), (k(this, (O + "_staked")) + P))])
140	140	}
141	141
142	142
143	143	func Q (O,w) = {
144	144	let P = fraction(w, b, z())
145	145	let R = k(this, (O + "_staked"))
146	146	let S = if ((P > R))
147	147	then R
148	148	else P
149	149	(G(-(S)) ++ [IntegerEntry((O + "_staked"), (R - S))])
150	150	}
151	151
152	152
153	153	@Callable(T)
154	154	func init (r) = {
155	155	let u = o(this, "currentPool")
156	156	if ((indexOf(d, toString(T.caller)) == unit))
157	157	then throw("Access denied")
158	158	else if ((u == ""))
159	159	then [StringEntry("currentPool", r)]
160	160	else nil
161	161	}
162	162
163	163
164	164
165	165	@Callable(T)
166	166	func rebalance (r) = {
167	167	let u = o(this, "currentPool")
168	168	if ((indexOf(d, toString(T.caller)) == unit))
169	169	then throw("Access denied")
170	170	else if ((u == r))
171	171	then throw(("Already supplied to" + u))
172	172	else {
173	173	let y = L()
174	174	if ((y == y))
175	175	then (I(r) ++ G(0))
176	176	else throw("Strict value is not equal to itself.")
177	177	}
178	178	}
179	179
180	180
181	181
182	182	@Callable(T)
183	183	func stake () = {
184	184	let O = toString(T.caller)
185	185	let w = T.payments[0].amount
186	186	let u = o(this, "currentPool")
187	187	if (if ((0 >= w))
188	188	then true
189	189	else (T.payments[0].assetId != fromBase58String(f)))
190	190	then throw("invalid token attached")
191	191	else if ((u == ""))
192	192	then throw("Pool not initialized")
193	193	else (N(O, w) ++ I(u))
194	194	}
195	195
196	196
197	197
198	198	@Callable(T)
199	199	func unstake (w) = {
200	200	let O = toString(T.caller)
201	201	let u = o(this, "currentPool")
202	202	let M = v(u, w)
203	203	if ((M == M))
204	204	then (Q(O, w) ++ [ScriptTransfer(T.caller, w, fromBase58String(f))])
205	205	else throw("Strict value is not equal to itself.")
206	206	}
207	207
208	208
209	209	@Verifier(M)
210	210	func U () = sigVerify(M.bodyBytes, M.proofs[0], M.senderPublicKey)
211	211

github/deemru/w8io/c3f4982 
27.49 ms ◑