tx · 7eXrXzaVWkdgVs98T6rPjZVJ7r1Y6tj5q6L19mKBurQm

3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh:  -0.00900000 Waves

2022.12.07 01:44 [2349101] smart account 3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7eXrXzaVWkdgVs98T6rPjZVJ7r1Y6tj5q6L19mKBurQm",
    "fee": 900000,
    "feeAssetId": null,
    "timestamp": 1670366667757,
    "version": 2,
    "chainId": 84,
    "sender": "3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh",
    "senderPublicKey": "HscGVyJG5M3NMHWKfQbucCBsFLGPi8VmTxTAmcBbaWTa",
    "proofs": [
        "5qtnKWpiRWb4XW1FE1SZckNQQt9WdjeWBpWp2YxsUG78BYGBPT9TnsUvPWzE9hF1joCiYDGQHtcrCEgDwZxKKSFB"
    ],
    "script": "base64:BgITCAISAwoBCBIDCgEIEgASAwoBARYABlNjYWxlNgDAhD0ABlNjYWxlOACAwtcvAAdTY2FsZTE2CQBoAgUGU2NhbGU4BQZTY2FsZTgACnZhbGlkYXRvcnMJAMwIAgIjM05BbXFHanhSQlJQb1JIWlVVcXZoaU5TNmF4bkdwaW5MSEMFA25pbAAPbW9uZXlCb3hBZGRyZXNzCQEHQWRkcmVzcwEBGgFUZKnP467xWXotJQOt2k8QiNBvrQpHH8SpAAdhc3NldElkAixISG1hRlFwVW9id0t4emp6NEVDYUJQdG9GNjlrdWpLd1UyY296YVV6VHNndgALcHV6emxlUG9vbHMJAMwIAgIjM042U3RKZGdtVGZBUnNSTm45WHQ1ckRZRXMzcHI0S0d5MXYFA25pbAEKZ2V0QmFsYW5jZQEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgRVbml0BAF4BQckbWF0Y2gwCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQkA8AcCBQR0aGlzCQEFdmFsdWUBBQdhc3NldElkAQl0cnlHZXRJbnQCB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCaCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAEJdHJ5R2V0U3RyAgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAnQgCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFiBQckbWF0Y2gwBQFiAgABDmdldEFzc2V0U3RyaW5nAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAWIFByRtYXRjaDAJANgEAQUBYgIFV0FWRVMBG2dldFB1enpsZVBvb2xTdXBwbGllZEFtb3VudAEGcG9vbElkBAdiYWxhbmNlCQDwBwIJAQdBZGRyZXNzAQkA2QQBBQZwb29sSWQJANkEAQUHYXNzZXRJZAUHYmFsYW5jZQEWZ2V0VG90YWxTdXBwbGllZEFtb3VudAAEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wDCQAAAgULY3VycmVudFBvb2wCAAkAAgEJAKwCAgIZQ2Fubm90IGZpbmQgcG9vbCB3aXRoIGlkIAULY3VycmVudFBvb2wJARtnZXRQdXp6bGVQb29sU3VwcGxpZWRBbW91bnQBBQtjdXJyZW50UG9vbAEWd2l0aGRyYXdGcm9tUHV6emxlUG9vbAIGcG9vbElkBmFtb3VudAQLcG9vbEFkZHJlc3MJAQdBZGRyZXNzAQkA2QQBBQZwb29sSWQECndpdGhkcmF3VHgDCQBmAgUGYW1vdW50AAAJAPwHBAULcG9vbEFkZHJlc3MCCHdpdGhkcmF3CQDMCAIFB2Fzc2V0SWQJAMwIAgUGYW1vdW50BQNuaWwFA25pbAIAAwkAAAIFCndpdGhkcmF3VHgFCndpdGhkcmF3VHgFCndpdGhkcmF3VHgJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BDGNhbGN1bGF0ZUZlZQAEDHN0YWtlZEFtb3VudAkBCXRyeUdldEludAIFBHRoaXMCDWdsb2JhbF9zdGFrZWQECWxhc3RTUmF0ZQkBCXRyeUdldEludAIFBHRoaXMCFWdsb2JhbF9sYXN0Q2hlY2tTUmF0ZQQHc0Ftb3VudAkAawMFDHN0YWtlZEFtb3VudAUJbGFzdFNSYXRlBQZTY2FsZTgEDXRvdGFsU3VwcGxpZWQJARZnZXRUb3RhbFN1cHBsaWVkQW1vdW50AAQEZGlmZgkAZQIFDXRvdGFsU3VwcGxpZWQFB3NBbW91bnQEA2ZlZQkAawMFBGRpZmYAwJaxAgUGU2NhbGU4AwkAZgIFA2ZlZQAABQNmZWUAAAEOY2FsY3VsYXRlU1JhdGUABA5sYXN0Q2hlY2tTUmF0ZQkBCXRyeUdldEludAIFBHRoaXMCFWdsb2JhbF9sYXN0Q2hlY2tTUmF0ZQQMc3Rha2VkQW1vdW50CQEJdHJ5R2V0SW50AgUEdGhpcwINZ2xvYmFsX3N0YWtlZAQRbGFzdENoZWNrU0Ftb3VudXQJAGsDBQxzdGFrZWRBbW91bnQFDmxhc3RDaGVja1NSYXRlBQZTY2FsZTgDCQAAAgUObGFzdENoZWNrU1JhdGUAAAUGU2NhbGU4AwkAAAIFEWxhc3RDaGVja1NBbW91bnV0AAAFDmxhc3RDaGVja1NSYXRlBAVzUmF0ZQkAawMFDmxhc3RDaGVja1NSYXRlCQBkAgkAawMJAGUCCQBrAwkBFmdldFRvdGFsU3VwcGxpZWRBbW91bnQABQZTY2FsZTYFEWxhc3RDaGVja1NBbW91bnV0BQZTY2FsZTYJAGUCBQZTY2FsZTgAwJaxAgUGU2NhbGU4BQZTY2FsZTYFBlNjYWxlNgMJAGYCBQZTY2FsZTgFBXNSYXRlBQ5sYXN0Q2hlY2tTUmF0ZQUFc1JhdGUBDHJlY2FsY1Jlc3VsdAEMc3Rha2VkQ2hhbmdlBAxzdGFrZWRBbW91bnQJAQl0cnlHZXRJbnQCBQR0aGlzAg1nbG9iYWxfc3Rha2VkBAVzUmF0ZQkBDmNhbGN1bGF0ZVNSYXRlAAkAzAgCCQEMSW50ZWdlckVudHJ5AgINZ2xvYmFsX3N0YWtlZAkAZAIFDHN0YWtlZEFtb3VudAUMc3Rha2VkQ2hhbmdlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhVnbG9iYWxfbGFzdENoZWNrU1JhdGUFBXNSYXRlBQNuaWwBDHN1cHBseVJlc3VsdAIGcG9vbElkA2ZlZQMJAAACCQDPCAIFC3B1enpsZVBvb2xzBQZwb29sSWQFBHVuaXQJAAIBCQCsAgICD1Vua25vd24gcG9vbElkIAUGcG9vbElkBAphc3NldEJ5dGVzCQDZBAEFB2Fzc2V0SWQEB2JhbGFuY2UJAQpnZXRCYWxhbmNlAQUKYXNzZXRCeXRlcwQIc3VwcGx5VHgJAPwHBAkBB0FkZHJlc3MBCQDZBAEFBnBvb2xJZAIGc3VwcGx5BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCmFzc2V0Qnl0ZXMFB2JhbGFuY2UFA25pbAMJAAACBQhzdXBwbHlUeAUIc3VwcGx5VHgEDXdpdGhkcmF3RmVlVHgJARZ3aXRoZHJhd0Zyb21QdXp6bGVQb29sAgUGcG9vbElkBQNmZWUDCQAAAgUNd2l0aGRyYXdGZWVUeAUNd2l0aGRyYXdGZWVUeAkAzAgCCQELU3RyaW5nRW50cnkCAgtjdXJyZW50UG9vbAUGcG9vbElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFD21vbmV5Qm94QWRkcmVzcwUDZmVlCQDZBAEFB2Fzc2V0SWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEOd2l0aGRyYXdSZXN1bHQABAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwkAAAIFC2N1cnJlbnRQb29sAgAJAAIBCQCsAgICGUNhbm5vdCBmaW5kIHBvb2wgd2l0aCBpZCAFC2N1cnJlbnRQb29sBAZhbW91bnQJARtnZXRQdXp6bGVQb29sU3VwcGxpZWRBbW91bnQBBQtjdXJyZW50UG9vbAQCdHgJARZ3aXRoZHJhd0Zyb21QdXp6bGVQb29sAgULY3VycmVudFBvb2wFBmFtb3VudAMJAAACBQJ0eAUCdHgFAnR4CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQtzdGFrZVJlc3VsdAIEdXNlcgZhbW91bnQEB3NBbW91bnQJAGsDBQZhbW91bnQFBlNjYWxlOAkBDmNhbGN1bGF0ZVNSYXRlAAkAzggCCQEMcmVjYWxjUmVzdWx0AQUHc0Ftb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQR1c2VyAgdfc3Rha2VkCQBkAgkBCXRyeUdldEludAIFBHRoaXMJAKwCAgUEdXNlcgIHX3N0YWtlZAUHc0Ftb3VudAUDbmlsAQ11bnN0YWtlUmVzdWx0AgR1c2VyBmFtb3VudAQHc0Ftb3VudAkAawMFBmFtb3VudAUGU2NhbGU4CQEOY2FsY3VsYXRlU1JhdGUABAp1c2VyU3Rha2VkCQEJdHJ5R2V0SW50AgUEdGhpcwkArAICBQR1c2VyAgdfc3Rha2VkBA11bnN0YWtlQW1vdW50AwkAZgIFB3NBbW91bnQFCnVzZXJTdGFrZWQFCnVzZXJTdGFrZWQFB3NBbW91bnQJAM4IAgkBDHJlY2FsY1Jlc3VsdAEJAQEtAQUNdW5zdGFrZUFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQR1c2VyAgdfc3Rha2VkCQBlAgUKdXNlclN0YWtlZAUNdW5zdGFrZUFtb3VudAUDbmlsAQlkb1Vuc3Rha2UEC2N1cnJlbnRQb29sBmNhbGxlcgZhbW91bnQDZmVlBAJ0eAkBFndpdGhkcmF3RnJvbVB1enpsZVBvb2wCBQtjdXJyZW50UG9vbAkAZAIFBmFtb3VudAUDZmVlAwkAAAIFAnR4BQJ0eAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQZjYWxsZXIFBmFtb3VudAkA2QQBBQdhc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFD21vbmV5Qm94QWRkcmVzcwUDZmVlCQDZBAEFB2Fzc2V0SWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQBaQEEaW5pdAEGcG9vbElkBAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwkAAAIJAM8IAgUKdmFsaWRhdG9ycwkApQgBCAUBaQZjYWxsZXIFBHVuaXQJAAIBAg1BY2Nlc3MgZGVuaWVkAwkAAAIFC2N1cnJlbnRQb29sAgAJAMwIAgkBC1N0cmluZ0VudHJ5AgILY3VycmVudFBvb2wFBnBvb2xJZAUDbmlsBQNuaWwBaQEJcmViYWxhbmNlAQZwb29sSWQEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wDCQAAAgkAzwgCBQp2YWxpZGF0b3JzCQClCAEIBQFpBmNhbGxlcgUEdW5pdAkAAgECDUFjY2VzcyBkZW5pZWQDCQAAAgULY3VycmVudFBvb2wFBnBvb2xJZAkAAgEJAKwCAgITQWxyZWFkeSBzdXBwbGllZCB0bwULY3VycmVudFBvb2wECndpdGhkcmF3VHgJAQ53aXRoZHJhd1Jlc3VsdAADCQAAAgUKd2l0aGRyYXdUeAUKd2l0aGRyYXdUeAkAzggCCQEMc3VwcGx5UmVzdWx0AgUGcG9vbElkAAAJAQxyZWNhbGNSZXN1bHQBAAAJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEFc3Rha2UABAR1c2VyCQClCAEIBQFpBmNhbGxlcgQGYW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQLY3VycmVudFBvb2wJAQl0cnlHZXRTdHICBQR0aGlzAgtjdXJyZW50UG9vbAMDCQBnAgAABQZhbW91bnQGCQECIT0CCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJANkEAQUHYXNzZXRJZAkAAgECFmludmFsaWQgdG9rZW4gYXR0YWNoZWQDCQAAAgULY3VycmVudFBvb2wCAAkAAgECFFBvb2wgbm90IGluaXRpYWxpemVkBANmZWUJAQxjYWxjdWxhdGVGZWUACQDOCAIJAQtzdGFrZVJlc3VsdAIFBHVzZXIFBmFtb3VudAkBDHN1cHBseVJlc3VsdAIFC2N1cnJlbnRQb29sBQNmZWUBaQEHdW5zdGFrZQEGYW1vdW50BAR1c2VyCQClCAEIBQFpBmNhbGxlcgQLY3VycmVudFBvb2wJAQl0cnlHZXRTdHICBQR0aGlzAgtjdXJyZW50UG9vbAQDZmVlCQEMY2FsY3VsYXRlRmVlAAQFYXNzZXQJANkEAQUHYXNzZXRJZAkAzggCCQENdW5zdGFrZVJlc3VsdAIFBHVzZXIFBmFtb3VudAkBCWRvVW5zdGFrZQQFC2N1cnJlbnRQb29sCAUBaQZjYWxsZXIFBmFtb3VudAUDZmVlAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleQbrdcM=",
    "height": 2349101,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6yHNs9NXxA2wdRXzugyjU2Js7TbqU8uVb2xr2ZqaSXSY
Next: 6X9nJY2a5MHNTh6Dv3asvksAVwHaUYgUJvknNfJWsYUB

Diff: 
Old
New
Differences
121
121
 
    }
122
122
 
123
123
 
124
-
func M (r) = if ((indexOf(g, r) == unit))
124
+
func M (r,F) = if ((indexOf(g, r) == unit))
125
125
 
    then throw(("Unknown poolId " + r))
126
126
 
    else {
127
127
 
        let N = fromBase58String(f)
128
128
 
        let s = h(N)
129
129
 
        let O = invoke(Address(fromBase58String(r)), "supply", nil, [AttachedPayment(N, s)])
130
130
 
        if ((O == O))
131
-
            then [StringEntry("currentPool", r)]
131
+
            then {
132
+
                let P = v(r, F)
133
+
                if ((P == P))
134
+
                    then [StringEntry("currentPool", r), ScriptTransfer(e, F, fromBase58String(f))]
135
+
                    else throw("Strict value is not equal to itself.")
136
+
                }
132
137
 
            else throw("Strict value is not equal to itself.")
133
138
 
        }
134
139
 
135
140
 
136
-
func P (r,F) = {
137
-
    let Q = v(r, F)
138
-
    if ((Q == Q))
139
-
        then [ScriptTransfer(e, F, fromBase58String(f))]
140
-
        else throw("Strict value is not equal to itself.")
141
-
    }
142
-
143
-
144
-
func R () = {
141
+
func Q () = {
145
142
 
    let u = o(this, "currentPool")
146
143
 
    if ((u == ""))
147
144
 
        then throw(("Cannot find pool with id " + u))
148
145
 
        else {
149
146
 
            let w = q(u)
150
-
            let S = v(u, w)
151
-
            if ((S == S))
152
-
                then S
147
+
            let R = v(u, w)
148
+
            if ((R == R))
149
+
                then R
153
150
 
                else throw("Strict value is not equal to itself.")
154
151
 
            }
155
152
 
    }
156
153
 
157
154
 
158
-
func T (U,w) = {
155
+
func S (T,w) = {
159
156
 
    let C = fraction(w, b, G())
160
-
    (K(C) ++ [IntegerEntry((U + "_staked"), (k(this, (U + "_staked")) + C))])
157
+
    (K(C) ++ [IntegerEntry((T + "_staked"), (k(this, (T + "_staked")) + C))])
161
158
 
    }
162
159
 
163
160
 
164
-
func V (U,w) = {
161
+
func U (T,w) = {
165
162
 
    let C = fraction(w, b, G())
166
-
    let W = k(this, (U + "_staked"))
167
-
    let X = if ((C > W))
168
-
        then W
163
+
    let V = k(this, (T + "_staked"))
164
+
    let W = if ((C > V))
165
+
        then V
169
166
 
        else C
170
-
    (K(-(X)) ++ [IntegerEntry((U + "_staked"), (W - X))])
167
+
    (K(-(W)) ++ [IntegerEntry((T + "_staked"), (V - W))])
171
168
 
    }
172
169
 
173
170
 
174
-
func Y (u,Z,w) = {
175
-
    let S = v(u, w)
176
-
    if ((S == S))
177
-
        then [ScriptTransfer(Z, w, fromBase58String(f))]
171
+
func X (u,Y,w,F) = {
172
+
    let R = v(u, (w + F))
173
+
    if ((R == R))
174
+
        then [ScriptTransfer(Y, w, fromBase58String(f)), ScriptTransfer(e, F, fromBase58String(f))]
178
175
 
        else throw("Strict value is not equal to itself.")
179
176
 
    }
180
177
 
181
178
 
182
-
@Callable(aa)
179
+
@Callable(Z)
183
180
 
func init (r) = {
184
181
 
    let u = o(this, "currentPool")
185
-
    if ((indexOf(d, toString(aa.caller)) == unit))
182
+
    if ((indexOf(d, toString(Z.caller)) == unit))
186
183
 
        then throw("Access denied")
187
184
 
        else if ((u == ""))
188
185
 
            then [StringEntry("currentPool", r)]
191
188
 
192
189
 
193
190
 
194
-
@Callable(aa)
191
+
@Callable(Z)
195
192
 
func rebalance (r) = {
196
193
 
    let u = o(this, "currentPool")
197
-
    if ((indexOf(d, toString(aa.caller)) == unit))
194
+
    if ((indexOf(d, toString(Z.caller)) == unit))
198
195
 
        then throw("Access denied")
199
196
 
        else if ((u == r))
200
197
 
            then throw(("Already supplied to" + u))
201
198
 
            else {
202
-
                let y = R()
199
+
                let y = Q()
203
200
 
                if ((y == y))
204
-
                    then M(r)
201
+
                    then (M(r, 0) ++ K(0))
205
202
 
                    else throw("Strict value is not equal to itself.")
206
203
 
                }
207
204
 
    }
208
205
 
209
206
 
210
207
 
211
-
@Callable(aa)
208
+
@Callable(Z)
212
209
 
func stake () = {
213
-
    let U = toString(aa.caller)
214
-
    let w = aa.payments[0].amount
210
+
    let T = toString(Z.caller)
211
+
    let w = Z.payments[0].amount
215
212
 
    let u = o(this, "currentPool")
216
213
 
    if (if ((0 >= w))
217
214
 
        then true
218
-
        else (aa.payments[0].assetId != fromBase58String(f)))
215
+
        else (Z.payments[0].assetId != fromBase58String(f)))
219
216
 
        then throw("invalid token attached")
220
217
 
        else if ((u == ""))
221
218
 
            then throw("Pool not initialized")
222
219
 
            else {
223
220
 
                let F = z()
224
-
                ((T(U, w) ++ M(u)) ++ P(u, F))
221
+
                (S(T, w) ++ M(u, F))
225
222
 
                }
226
223
 
    }
227
224
 
228
225
 
229
226
 
230
-
@Callable(aa)
227
+
@Callable(Z)
231
228
 
func unstake (w) = {
232
-
    let U = toString(aa.caller)
229
+
    let T = toString(Z.caller)
233
230
 
    let u = o(this, "currentPool")
234
231
 
    let F = z()
235
-
    let ab = fromBase58String(f)
236
-
    ((V(U, w) ++ Y(u, aa.caller, w)) ++ P(u, F))
232
+
    let aa = fromBase58String(f)
233
+
    (U(T, w) ++ X(u, Z.caller, w, F))
237
234
 
    }
238
235
 
239
236
 
240
-
@Verifier(S)
241
-
func ac () = sigVerify(S.bodyBytes, S.proofs[0], S.senderPublicKey)
237
+
@Verifier(R)
238
+
func ab () = sigVerify(R.bodyBytes, R.proofs[0], R.senderPublicKey)
242
239
 

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_staked")
89
89
 
    let B = k(this, "global_lastCheckSRate")
90
90
 
    let C = fraction(A, B, b)
91
91
 
    let D = t()
92
92
 
    let E = (D - C)
93
93
 
    let F = fraction(E, 5000000, b)
94
94
 
    if ((F > 0))
95
95
 
        then F
96
96
 
        else 0
97
97
 
    }
98
98
 
99
99
 
100
100
 
func G () = {
101
101
 
    let H = k(this, "global_lastCheckSRate")
102
102
 
    let A = k(this, "global_staked")
103
103
 
    let I = fraction(A, H, b)
104
104
 
    if ((H == 0))
105
105
 
        then b
106
106
 
        else if ((I == 0))
107
107
 
            then H
108
108
 
            else {
109
109
 
                let J = fraction(H, (fraction((fraction(t(), a, I) - a), (b - 5000000), b) + a), a)
110
110
 
                if ((b > J))
111
111
 
                    then H
112
112
 
                    else J
113
113
 
                }
114
114
 
    }
115
115
 
116
116
 
117
117
 
func K (L) = {
118
118
 
    let A = k(this, "global_staked")
119
119
 
    let J = G()
120
120
 
[IntegerEntry("global_staked", (A + L)), IntegerEntry("global_lastCheckSRate", J)]
121
121
 
    }
122
122
 
123
123
 
124
-
func M (r) = if ((indexOf(g, r) == unit))
124
+
func M (r,F) = if ((indexOf(g, r) == unit))
125
125
 
    then throw(("Unknown poolId " + r))
126
126
 
    else {
127
127
 
        let N = fromBase58String(f)
128
128
 
        let s = h(N)
129
129
 
        let O = invoke(Address(fromBase58String(r)), "supply", nil, [AttachedPayment(N, s)])
130
130
 
        if ((O == O))
131
-
            then [StringEntry("currentPool", r)]
131
+
            then {
132
+
                let P = v(r, F)
133
+
                if ((P == P))
134
+
                    then [StringEntry("currentPool", r), ScriptTransfer(e, F, fromBase58String(f))]
135
+
                    else throw("Strict value is not equal to itself.")
136
+
                }
132
137
 
            else throw("Strict value is not equal to itself.")
133
138
 
        }
134
139
 
135
140
 
136
-
func P (r,F) = {
137
-
    let Q = v(r, F)
138
-
    if ((Q == Q))
139
-
        then [ScriptTransfer(e, F, fromBase58String(f))]
140
-
        else throw("Strict value is not equal to itself.")
141
-
    }
142
-
143
-
144
-
func R () = {
141
+
func Q () = {
145
142
 
    let u = o(this, "currentPool")
146
143
 
    if ((u == ""))
147
144
 
        then throw(("Cannot find pool with id " + u))
148
145
 
        else {
149
146
 
            let w = q(u)
150
-
            let S = v(u, w)
151
-
            if ((S == S))
152
-
                then S
147
+
            let R = v(u, w)
148
+
            if ((R == R))
149
+
                then R
153
150
 
                else throw("Strict value is not equal to itself.")
154
151
 
            }
155
152
 
    }
156
153
 
157
154
 
158
-
func T (U,w) = {
155
+
func S (T,w) = {
159
156
 
    let C = fraction(w, b, G())
160
-
    (K(C) ++ [IntegerEntry((U + "_staked"), (k(this, (U + "_staked")) + C))])
157
+
    (K(C) ++ [IntegerEntry((T + "_staked"), (k(this, (T + "_staked")) + C))])
161
158
 
    }
162
159
 
163
160
 
164
-
func V (U,w) = {
161
+
func U (T,w) = {
165
162
 
    let C = fraction(w, b, G())
166
-
    let W = k(this, (U + "_staked"))
167
-
    let X = if ((C > W))
168
-
        then W
163
+
    let V = k(this, (T + "_staked"))
164
+
    let W = if ((C > V))
165
+
        then V
169
166
 
        else C
170
-
    (K(-(X)) ++ [IntegerEntry((U + "_staked"), (W - X))])
167
+
    (K(-(W)) ++ [IntegerEntry((T + "_staked"), (V - W))])
171
168
 
    }
172
169
 
173
170
 
174
-
func Y (u,Z,w) = {
175
-
    let S = v(u, w)
176
-
    if ((S == S))
177
-
        then [ScriptTransfer(Z, w, fromBase58String(f))]
171
+
func X (u,Y,w,F) = {
172
+
    let R = v(u, (w + F))
173
+
    if ((R == R))
174
+
        then [ScriptTransfer(Y, w, fromBase58String(f)), ScriptTransfer(e, F, fromBase58String(f))]
178
175
 
        else throw("Strict value is not equal to itself.")
179
176
 
    }
180
177
 
181
178
 
182
-
@Callable(aa)
179
+
@Callable(Z)
183
180
 
func init (r) = {
184
181
 
    let u = o(this, "currentPool")
185
-
    if ((indexOf(d, toString(aa.caller)) == unit))
182
+
    if ((indexOf(d, toString(Z.caller)) == unit))
186
183
 
        then throw("Access denied")
187
184
 
        else if ((u == ""))
188
185
 
            then [StringEntry("currentPool", r)]
189
186
 
            else nil
190
187
 
    }
191
188
 
192
189
 
193
190
 
194
-
@Callable(aa)
191
+
@Callable(Z)
195
192
 
func rebalance (r) = {
196
193
 
    let u = o(this, "currentPool")
197
-
    if ((indexOf(d, toString(aa.caller)) == unit))
194
+
    if ((indexOf(d, toString(Z.caller)) == unit))
198
195
 
        then throw("Access denied")
199
196
 
        else if ((u == r))
200
197
 
            then throw(("Already supplied to" + u))
201
198
 
            else {
202
-
                let y = R()
199
+
                let y = Q()
203
200
 
                if ((y == y))
204
-
                    then M(r)
201
+
                    then (M(r, 0) ++ K(0))
205
202
 
                    else throw("Strict value is not equal to itself.")
206
203
 
                }
207
204
 
    }
208
205
 
209
206
 
210
207
 
211
-
@Callable(aa)
208
+
@Callable(Z)
212
209
 
func stake () = {
213
-
    let U = toString(aa.caller)
214
-
    let w = aa.payments[0].amount
210
+
    let T = toString(Z.caller)
211
+
    let w = Z.payments[0].amount
215
212
 
    let u = o(this, "currentPool")
216
213
 
    if (if ((0 >= w))
217
214
 
        then true
218
-
        else (aa.payments[0].assetId != fromBase58String(f)))
215
+
        else (Z.payments[0].assetId != fromBase58String(f)))
219
216
 
        then throw("invalid token attached")
220
217
 
        else if ((u == ""))
221
218
 
            then throw("Pool not initialized")
222
219
 
            else {
223
220
 
                let F = z()
224
-
                ((T(U, w) ++ M(u)) ++ P(u, F))
221
+
                (S(T, w) ++ M(u, F))
225
222
 
                }
226
223
 
    }
227
224
 
228
225
 
229
226
 
230
-
@Callable(aa)
227
+
@Callable(Z)
231
228
 
func unstake (w) = {
232
-
    let U = toString(aa.caller)
229
+
    let T = toString(Z.caller)
233
230
 
    let u = o(this, "currentPool")
234
231
 
    let F = z()
235
-
    let ab = fromBase58String(f)
236
-
    ((V(U, w) ++ Y(u, aa.caller, w)) ++ P(u, F))
232
+
    let aa = fromBase58String(f)
233
+
    (U(T, w) ++ X(u, Z.caller, w, F))
237
234
 
    }
238
235
 
239
236
 
240
-
@Verifier(S)
241
-
func ac () = sigVerify(S.bodyBytes, S.proofs[0], S.senderPublicKey)
237
+
@Verifier(R)
238
+
func ab () = sigVerify(R.bodyBytes, R.proofs[0], R.senderPublicKey)
242
239
 

github/deemru/w8io/169f3d6 
71.47 ms ◑