tx · HJDexyHNWhhogFU8eWXHsr6R94iU86X99WsXwXV6147J

3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh:  -0.01000000 Waves

2022.12.02 17:58 [2342876] smart account 3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HJDexyHNWhhogFU8eWXHsr6R94iU86X99WsXwXV6147J",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1669993128444,
    "version": 2,
    "chainId": 84,
    "sender": "3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh",
    "senderPublicKey": "HscGVyJG5M3NMHWKfQbucCBsFLGPi8VmTxTAmcBbaWTa",
    "proofs": [
        "4KKiEKKeRBffYjt6VfZjcwmNCuWoMQWobEkRE6NDbqjkq58BwBgBcrShU7htFgne4PCh4vjsu5Csri1zQuTL6TfL"
    ],
    "script": "base64:BgITCAISAwoBCBIDCgEIEgASAwoBARYABlNjYWxlNgDAhD0ABlNjYWxlOACAwtcvAAdTY2FsZTE2CQBoAgUGU2NhbGU4BQZTY2FsZTgACnZhbGlkYXRvcnMJAMwIAgIjM05BbXFHanhSQlJQb1JIWlVVcXZoaU5TNmF4bkdwaW5MSEMFA25pbAAPbW9uZXlCb3hBZGRyZXNzCQEHQWRkcmVzcwEBGgFUZKnP467xWXotJQOt2k8QiNBvrQpHH8SpAAdhc3NldElkAixISG1hRlFwVW9id0t4emp6NEVDYUJQdG9GNjlrdWpLd1UyY296YVV6VHNndgALcHV6emxlUG9vbHMJAMwIAgIjM042U3RKZGdtVGZBUnNSTm45WHQ1ckRZRXMzcHI0S0d5MXYFA25pbAEKZ2V0QmFsYW5jZQEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgRVbml0BAF4BQckbWF0Y2gwCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQkA8AcCBQR0aGlzCQEFdmFsdWUBBQdhc3NldElkAQl0cnlHZXRJbnQCB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCaCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAEJdHJ5R2V0U3RyAgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAnQgCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFiBQckbWF0Y2gwBQFiAgABDmdldEFzc2V0U3RyaW5nAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAWIFByRtYXRjaDAJANgEAQUBYgIFV0FWRVMBG2dldFB1enpsZVBvb2xTdXBwbGllZEFtb3VudAEGcG9vbElkBAdiYWxhbmNlCQDwBwIJAQdBZGRyZXNzAQkA2QQBBQZwb29sSWQJANkEAQUHYXNzZXRJZAUHYmFsYW5jZQEWZ2V0VG90YWxTdXBwbGllZEFtb3VudAAEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wDCQAAAgULY3VycmVudFBvb2wCAAkAAgEJAKwCAgIZQ2Fubm90IGZpbmQgcG9vbCB3aXRoIGlkIAULY3VycmVudFBvb2wJARtnZXRQdXp6bGVQb29sU3VwcGxpZWRBbW91bnQBBQtjdXJyZW50UG9vbAEWd2l0aGRyYXdGcm9tUHV6emxlUG9vbAIGcG9vbElkBmFtb3VudAQLcG9vbEFkZHJlc3MJAQdBZGRyZXNzAQkA2QQBBQZwb29sSWQECndpdGhkcmF3VHgDCQBmAgUGYW1vdW50AAAJAPwHBAULcG9vbEFkZHJlc3MCCHdpdGhkcmF3CQDMCAIFB2Fzc2V0SWQJAMwIAgUGYW1vdW50BQNuaWwFA25pbAIAAwkAAAIFCndpdGhkcmF3VHgFCndpdGhkcmF3VHgFCndpdGhkcmF3VHgJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BDmNhbGN1bGF0ZVNSYXRlAAQObGFzdENoZWNrU1JhdGUJAQl0cnlHZXRJbnQCBQR0aGlzAhVnbG9iYWxfbGFzdENoZWNrU1JhdGUEDHN0YWtlZEFtb3VudAkBCXRyeUdldEludAIFBHRoaXMCDWdsb2JhbF9zdGFrZWQEEWxhc3RDaGVja1NBbW91bnV0CQBrAwUMc3Rha2VkQW1vdW50BQ5sYXN0Q2hlY2tTUmF0ZQUGU2NhbGU4BBN0b3RhbFN1cHBsaWVkQW1vdW50CQEWZ2V0VG90YWxTdXBwbGllZEFtb3VudAADCQAAAgURbGFzdENoZWNrU0Ftb3VudXQAAAUGU2NhbGU4BAx0b3RhbFN1cGxpZWQFE3RvdGFsU3VwcGxpZWRBbW91bnQEBXNSYXRlCQBrAwUObGFzdENoZWNrU1JhdGUFDHRvdGFsU3VwbGllZAURbGFzdENoZWNrU0Ftb3VudXQDCQBmAgUGU2NhbGU4BQVzUmF0ZQUGU2NhbGU4BQVzUmF0ZQEHY2FsY0ZlZQAEDHN0YWtlZEFtb3VudAkBCXRyeUdldEludAIFBHRoaXMCDWdsb2JhbF9zdGFrZWQECWxhc3RTUmF0ZQkBCXRyeUdldEludAIFBHRoaXMCFWdsb2JhbF9sYXN0Q2hlY2tTUmF0ZQQEZGlmZgkAZQIJARZnZXRUb3RhbFN1cHBsaWVkQW1vdW50AAkAawMFDHN0YWtlZEFtb3VudAUJbGFzdFNSYXRlBQZTY2FsZTgEA2ZlZQkAawMFBGRpZmYAwJaxAgUGU2NhbGU4AwkAZgIFA2ZlZQAABQNmZWUAAAEPY2hhcmdlRmVlUmVzdWx0AAQLY3VycmVudFBvb2wJAQl0cnlHZXRTdHICBQR0aGlzAgtjdXJyZW50UG9vbAQDZmVlCQEHY2FsY0ZlZQADCQAAAgULY3VycmVudFBvb2wCAAkAAgEJAKwCAgIZQ2Fubm90IGZpbmQgcG9vbCB3aXRoIGlkIAULY3VycmVudFBvb2wECndpdGhkcmF3VHgJARZ3aXRoZHJhd0Zyb21QdXp6bGVQb29sAgULY3VycmVudFBvb2wFA2ZlZQMJAAACBQp3aXRoZHJhd1R4BQp3aXRoZHJhd1R4BAhjaGFyZ2VUeAMJAGYCBQNmZWUAAAkA/AcEBQ9tb25leUJveEFkZHJlc3MCB2RlcG9zaXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQdhc3NldElkBQNmZWUFA25pbAIAAwkAAAIFCGNoYXJnZVR4BQhjaGFyZ2VUeAUIY2hhcmdlVHgJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BDHJlY2FsY1Jlc3VsdAEMc3Rha2VkQ2hhbmdlBAxzdGFrZWRBbW91bnQJAQl0cnlHZXRJbnQCBQR0aGlzAg1nbG9iYWxfc3Rha2VkCQDMCAIJAQxJbnRlZ2VyRW50cnkCAg1nbG9iYWxfc3Rha2VkCQBkAgUMc3Rha2VkQW1vdW50BQxzdGFrZWRDaGFuZ2UJAMwIAgkBDEludGVnZXJFbnRyeQICFWdsb2JhbF9sYXN0Q2hlY2tTUmF0ZQkBDmNhbGN1bGF0ZVNSYXRlAAUDbmlsAQxzdXBwbHlSZXN1bHQBBnBvb2xJZAMJAAACCQDPCAIFC3B1enpsZVBvb2xzBQZwb29sSWQFBHVuaXQJAAIBCQCsAgICD1Vua25vd24gcG9vbElkIAUGcG9vbElkBAphc3NldEJ5dGVzCQDZBAEFB2Fzc2V0SWQEB2JhbGFuY2UJAQpnZXRCYWxhbmNlAQUKYXNzZXRCeXRlcwQDaW52CQD8BwQJAQdBZGRyZXNzAQkA2QQBBQZwb29sSWQCBnN1cHBseQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQphc3NldEJ5dGVzBQdiYWxhbmNlBQNuaWwDCQAAAgUDaW52BQNpbnYJAMwIAgkBC1N0cmluZ0VudHJ5AgILY3VycmVudFBvb2wFBnBvb2xJZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQ53aXRoZHJhd1Jlc3VsdAAEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wDCQAAAgULY3VycmVudFBvb2wCAAkAAgEJAKwCAgIZQ2Fubm90IGZpbmQgcG9vbCB3aXRoIGlkIAULY3VycmVudFBvb2wEBmFtb3VudAkBG2dldFB1enpsZVBvb2xTdXBwbGllZEFtb3VudAEFC2N1cnJlbnRQb29sBAJ0eAkBFndpdGhkcmF3RnJvbVB1enpsZVBvb2wCBQtjdXJyZW50UG9vbAUGYW1vdW50AwkAAAIFAnR4BQJ0eAUCdHgJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BC3N0YWtlUmVzdWx0AgR1c2VyBmFtb3VudAQHc0Ftb3VudAkAawMFBmFtb3VudAUGU2NhbGU4CQEOY2FsY3VsYXRlU1JhdGUABAtjaGFyZ2VGZWVUeAkBD2NoYXJnZUZlZVJlc3VsdAADCQAAAgULY2hhcmdlRmVlVHgFC2NoYXJnZUZlZVR4CQDOCAIJAQxyZWNhbGNSZXN1bHQBBQdzQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHVzZXICB19zdGFrZWQJAGQCCQEJdHJ5R2V0SW50AgUEdGhpcwkArAICBQR1c2VyAgdfc3Rha2VkBQdzQW1vdW50BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BDXVuc3Rha2VSZXN1bHQCBHVzZXIGYW1vdW50BAdzQW1vdW50CQBrAwUGYW1vdW50BQZTY2FsZTgJAQ5jYWxjdWxhdGVTUmF0ZQAECnVzZXJTdGFrZWQJAQl0cnlHZXRJbnQCBQR0aGlzCQCsAgIFBHVzZXICB19zdGFrZWQEDXVuc3Rha2VBbW91bnQDCQBmAgUHc0Ftb3VudAUKdXNlclN0YWtlZAUKdXNlclN0YWtlZAUHc0Ftb3VudAQLY2hhcmdlRmVlVHgJAQ9jaGFyZ2VGZWVSZXN1bHQAAwkAAAIFC2NoYXJnZUZlZVR4BQtjaGFyZ2VGZWVUeAkAzggCCQEMcmVjYWxjUmVzdWx0AQkBAS0BBQ11bnN0YWtlQW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHVzZXICB19zdGFrZWQJAGUCBQp1c2VyU3Rha2VkBQ11bnN0YWtlQW1vdW50BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4EAWkBBGluaXQBBnBvb2xJZAQLY3VycmVudFBvb2wJAQl0cnlHZXRTdHICBQR0aGlzAgtjdXJyZW50UG9vbAMJAAACCQDPCAIFCnZhbGlkYXRvcnMJAKUIAQgFAWkGY2FsbGVyBQR1bml0CQACAQINQWNjZXNzIGRlbmllZAMJAAACBQtjdXJyZW50UG9vbAIACQDMCAIJAQtTdHJpbmdFbnRyeQICC2N1cnJlbnRQb29sBQZwb29sSWQFA25pbAUDbmlsAWkBCXJlYmFsYW5jZQEGcG9vbElkBAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwkAAAIJAM8IAgUKdmFsaWRhdG9ycwkApQgBCAUBaQZjYWxsZXIFBHVuaXQJAAIBAg1BY2Nlc3MgZGVuaWVkAwkAAAIFC2N1cnJlbnRQb29sBQZwb29sSWQJAAIBCQCsAgICE0FscmVhZHkgc3VwcGxpZWQgdG8FC2N1cnJlbnRQb29sBAp3aXRoZHJhd1R4CQEOd2l0aGRyYXdSZXN1bHQAAwkAAAIFCndpdGhkcmF3VHgFCndpdGhkcmF3VHgJAM4IAgkBDHN1cHBseVJlc3VsdAEFBnBvb2xJZAkBDHJlY2FsY1Jlc3VsdAEAAAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQVzdGFrZQAEBHVzZXIJAKUIAQgFAWkGY2FsbGVyBAZhbW91bnQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwMJAGcCAAAFBmFtb3VudAYJAQIhPQIICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAkA2QQBBQdhc3NldElkCQACAQIWaW52YWxpZCB0b2tlbiBhdHRhY2hlZAMJAAACBQtjdXJyZW50UG9vbAIACQACAQIUUG9vbCBub3QgaW5pdGlhbGl6ZWQJAM4IAgkBC3N0YWtlUmVzdWx0AgUEdXNlcgUGYW1vdW50CQEMc3VwcGx5UmVzdWx0AQULY3VycmVudFBvb2wBaQEHdW5zdGFrZQEGYW1vdW50BAR1c2VyCQClCAEIBQFpBmNhbGxlcgQLY3VycmVudFBvb2wJAQl0cnlHZXRTdHICBQR0aGlzAgtjdXJyZW50UG9vbAQCdHgJARZ3aXRoZHJhd0Zyb21QdXp6bGVQb29sAgULY3VycmVudFBvb2wFBmFtb3VudAMJAAACBQJ0eAUCdHgJAM4IAgkBDXVuc3Rha2VSZXN1bHQCBQR1c2VyBQZhbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQZhbW91bnQJANkEAQUHYXNzZXRJZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleQC+iIg=",
    "height": 2342876,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BMmtsE62guFK8mdcNokNen9ZN5BD9176PSoVBVmFMEjM
Next: 92njsk8b2LnSTSqJj4JDfqoy9E3XGKJhG94ZccpQmr54

Diff: 
Old
New
Differences
123
123
 
124
124
 
func recalcResult (stakedChange) = {
125
125
 
    let stakedAmount = tryGetInt(this, "global_staked")
126
-
    let chargeFeeTx = chargeFeeResult()
127
-
    if ((chargeFeeTx == chargeFeeTx))
128
-
        then [IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", calculateSRate())]
129
-
        else throw("Strict value is not equal to itself.")
126
+
[IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", calculateSRate())]
130
127
 
    }
131
128
 
132
129
 
133
130
 
func supplyResult (poolId) = if ((indexOf(puzzlePools, poolId) == unit))
134
131
 
    then throw(("Unknown poolId " + poolId))
135
132
 
    else {
136
-
        let fee = calcFee()
137
133
 
        let assetBytes = fromBase58String(assetId)
138
134
 
        let balance = getBalance(assetBytes)
139
135
 
        let inv = invoke(Address(fromBase58String(poolId)), "supply", nil, [AttachedPayment(assetBytes, balance)])
159
155
 
160
156
 
func stakeResult (user,amount) = {
161
157
 
    let sAmount = fraction(amount, Scale8, calculateSRate())
162
-
    (recalcResult(sAmount) ++ [IntegerEntry((user + "_staked"), (tryGetInt(this, (user + "_staked")) + sAmount))])
158
+
    let chargeFeeTx = chargeFeeResult()
159
+
    if ((chargeFeeTx == chargeFeeTx))
160
+
        then (recalcResult(sAmount) ++ [IntegerEntry((user + "_staked"), (tryGetInt(this, (user + "_staked")) + sAmount))])
161
+
        else throw("Strict value is not equal to itself.")
163
162
 
    }
164
163
 
165
164
 
169
168
 
    let unstakeAmount = if ((sAmount > userStaked))
170
169
 
        then userStaked
171
170
 
        else sAmount
172
-
    (recalcResult(-(unstakeAmount)) ++ [IntegerEntry((user + "_staked"), (userStaked - unstakeAmount))])
171
+
    let chargeFeeTx = chargeFeeResult()
172
+
    if ((chargeFeeTx == chargeFeeTx))
173
+
        then (recalcResult(-(unstakeAmount)) ++ [IntegerEntry((user + "_staked"), (userStaked - unstakeAmount))])
174
+
        else throw("Strict value is not equal to itself.")
173
175
 
    }
174
176
 
175
177
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let Scale6 = 1000000
5
5
 
6
6
 
let Scale8 = 100000000
7
7
 
8
8
 
let Scale16 = (Scale8 * Scale8)
9
9
 
10
10
 
let validators = ["3NAmqGjxRBRPoRHZUUqvhiNS6axnGpinLHC"]
11
11
 
12
12
 
let moneyBoxAddress = Address(base58'3My6LmrRSRvJ73T14oT5k53SGPavGFoacWc')
13
13
 
14
14
 
let assetId = "HHmaFQpUobwKxzjz4ECaBPtoF69kujKwU2cozaUzTsgv"
15
15
 
16
16
 
let puzzlePools = ["3N6StJdgmTfARsRNn9Xt5rDYEs3pr4KGy1v"]
17
17
 
18
18
 
func getBalance (assetId) = match assetId {
19
19
 
    case x: Unit => 
20
20
 
        wavesBalance(this).available
21
21
 
    case _ => 
22
22
 
        assetBalance(this, value(assetId))
23
23
 
}
24
24
 
25
25
 
26
26
 
func tryGetInt (address,key) = match getInteger(address, key) {
27
27
 
    case b: Int => 
28
28
 
        b
29
29
 
    case _ => 
30
30
 
        0
31
31
 
}
32
32
 
33
33
 
34
34
 
func tryGetStr (address,key) = match getString(address, key) {
35
35
 
    case b: String => 
36
36
 
        b
37
37
 
    case _ => 
38
38
 
        ""
39
39
 
}
40
40
 
41
41
 
42
42
 
func getAssetString (assetId) = match assetId {
43
43
 
    case b: ByteVector => 
44
44
 
        toBase58String(b)
45
45
 
    case _ => 
46
46
 
        "WAVES"
47
47
 
}
48
48
 
49
49
 
50
50
 
func getPuzzlePoolSuppliedAmount (poolId) = {
51
51
 
    let balance = assetBalance(Address(fromBase58String(poolId)), fromBase58String(assetId))
52
52
 
    balance
53
53
 
    }
54
54
 
55
55
 
56
56
 
func getTotalSuppliedAmount () = {
57
57
 
    let currentPool = tryGetStr(this, "currentPool")
58
58
 
    if ((currentPool == ""))
59
59
 
        then throw(("Cannot find pool with id " + currentPool))
60
60
 
        else getPuzzlePoolSuppliedAmount(currentPool)
61
61
 
    }
62
62
 
63
63
 
64
64
 
func withdrawFromPuzzlePool (poolId,amount) = {
65
65
 
    let poolAddress = Address(fromBase58String(poolId))
66
66
 
    let withdrawTx = if ((amount > 0))
67
67
 
        then invoke(poolAddress, "withdraw", [assetId, amount], nil)
68
68
 
        else ""
69
69
 
    if ((withdrawTx == withdrawTx))
70
70
 
        then withdrawTx
71
71
 
        else throw("Strict value is not equal to itself.")
72
72
 
    }
73
73
 
74
74
 
75
75
 
func calculateSRate () = {
76
76
 
    let lastCheckSRate = tryGetInt(this, "global_lastCheckSRate")
77
77
 
    let stakedAmount = tryGetInt(this, "global_staked")
78
78
 
    let lastCheckSAmounut = fraction(stakedAmount, lastCheckSRate, Scale8)
79
79
 
    let totalSuppliedAmount = getTotalSuppliedAmount()
80
80
 
    if ((lastCheckSAmounut == 0))
81
81
 
        then Scale8
82
82
 
        else {
83
83
 
            let totalSuplied = totalSuppliedAmount
84
84
 
            let sRate = fraction(lastCheckSRate, totalSuplied, lastCheckSAmounut)
85
85
 
            if ((Scale8 > sRate))
86
86
 
                then Scale8
87
87
 
                else sRate
88
88
 
            }
89
89
 
    }
90
90
 
91
91
 
92
92
 
func calcFee () = {
93
93
 
    let stakedAmount = tryGetInt(this, "global_staked")
94
94
 
    let lastSRate = tryGetInt(this, "global_lastCheckSRate")
95
95
 
    let diff = (getTotalSuppliedAmount() - fraction(stakedAmount, lastSRate, Scale8))
96
96
 
    let fee = fraction(diff, 5000000, Scale8)
97
97
 
    if ((fee > 0))
98
98
 
        then fee
99
99
 
        else 0
100
100
 
    }
101
101
 
102
102
 
103
103
 
func chargeFeeResult () = {
104
104
 
    let currentPool = tryGetStr(this, "currentPool")
105
105
 
    let fee = calcFee()
106
106
 
    if ((currentPool == ""))
107
107
 
        then throw(("Cannot find pool with id " + currentPool))
108
108
 
        else {
109
109
 
            let withdrawTx = withdrawFromPuzzlePool(currentPool, fee)
110
110
 
            if ((withdrawTx == withdrawTx))
111
111
 
                then {
112
112
 
                    let chargeTx = if ((fee > 0))
113
113
 
                        then invoke(moneyBoxAddress, "deposit", nil, [AttachedPayment(fromBase58String(assetId), fee)])
114
114
 
                        else ""
115
115
 
                    if ((chargeTx == chargeTx))
116
116
 
                        then chargeTx
117
117
 
                        else throw("Strict value is not equal to itself.")
118
118
 
                    }
119
119
 
                else throw("Strict value is not equal to itself.")
120
120
 
            }
121
121
 
    }
122
122
 
123
123
 
124
124
 
func recalcResult (stakedChange) = {
125
125
 
    let stakedAmount = tryGetInt(this, "global_staked")
126
-
    let chargeFeeTx = chargeFeeResult()
127
-
    if ((chargeFeeTx == chargeFeeTx))
128
-
        then [IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", calculateSRate())]
129
-
        else throw("Strict value is not equal to itself.")
126
+
[IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", calculateSRate())]
130
127
 
    }
131
128
 
132
129
 
133
130
 
func supplyResult (poolId) = if ((indexOf(puzzlePools, poolId) == unit))
134
131
 
    then throw(("Unknown poolId " + poolId))
135
132
 
    else {
136
-
        let fee = calcFee()
137
133
 
        let assetBytes = fromBase58String(assetId)
138
134
 
        let balance = getBalance(assetBytes)
139
135
 
        let inv = invoke(Address(fromBase58String(poolId)), "supply", nil, [AttachedPayment(assetBytes, balance)])
140
136
 
        if ((inv == inv))
141
137
 
            then [StringEntry("currentPool", poolId)]
142
138
 
            else throw("Strict value is not equal to itself.")
143
139
 
        }
144
140
 
145
141
 
146
142
 
func withdrawResult () = {
147
143
 
    let currentPool = tryGetStr(this, "currentPool")
148
144
 
    if ((currentPool == ""))
149
145
 
        then throw(("Cannot find pool with id " + currentPool))
150
146
 
        else {
151
147
 
            let amount = getPuzzlePoolSuppliedAmount(currentPool)
152
148
 
            let tx = withdrawFromPuzzlePool(currentPool, amount)
153
149
 
            if ((tx == tx))
154
150
 
                then tx
155
151
 
                else throw("Strict value is not equal to itself.")
156
152
 
            }
157
153
 
    }
158
154
 
159
155
 
160
156
 
func stakeResult (user,amount) = {
161
157
 
    let sAmount = fraction(amount, Scale8, calculateSRate())
162
-
    (recalcResult(sAmount) ++ [IntegerEntry((user + "_staked"), (tryGetInt(this, (user + "_staked")) + sAmount))])
158
+
    let chargeFeeTx = chargeFeeResult()
159
+
    if ((chargeFeeTx == chargeFeeTx))
160
+
        then (recalcResult(sAmount) ++ [IntegerEntry((user + "_staked"), (tryGetInt(this, (user + "_staked")) + sAmount))])
161
+
        else throw("Strict value is not equal to itself.")
163
162
 
    }
164
163
 
165
164
 
166
165
 
func unstakeResult (user,amount) = {
167
166
 
    let sAmount = fraction(amount, Scale8, calculateSRate())
168
167
 
    let userStaked = tryGetInt(this, (user + "_staked"))
169
168
 
    let unstakeAmount = if ((sAmount > userStaked))
170
169
 
        then userStaked
171
170
 
        else sAmount
172
-
    (recalcResult(-(unstakeAmount)) ++ [IntegerEntry((user + "_staked"), (userStaked - unstakeAmount))])
171
+
    let chargeFeeTx = chargeFeeResult()
172
+
    if ((chargeFeeTx == chargeFeeTx))
173
+
        then (recalcResult(-(unstakeAmount)) ++ [IntegerEntry((user + "_staked"), (userStaked - unstakeAmount))])
174
+
        else throw("Strict value is not equal to itself.")
173
175
 
    }
174
176
 
175
177
 
176
178
 
@Callable(i)
177
179
 
func init (poolId) = {
178
180
 
    let currentPool = tryGetStr(this, "currentPool")
179
181
 
    if ((indexOf(validators, toString(i.caller)) == unit))
180
182
 
        then throw("Access denied")
181
183
 
        else if ((currentPool == ""))
182
184
 
            then [StringEntry("currentPool", poolId)]
183
185
 
            else nil
184
186
 
    }
185
187
 
186
188
 
187
189
 
188
190
 
@Callable(i)
189
191
 
func rebalance (poolId) = {
190
192
 
    let currentPool = tryGetStr(this, "currentPool")
191
193
 
    if ((indexOf(validators, toString(i.caller)) == unit))
192
194
 
        then throw("Access denied")
193
195
 
        else if ((currentPool == poolId))
194
196
 
            then throw(("Already supplied to" + currentPool))
195
197
 
            else {
196
198
 
                let withdrawTx = withdrawResult()
197
199
 
                if ((withdrawTx == withdrawTx))
198
200
 
                    then (supplyResult(poolId) ++ recalcResult(0))
199
201
 
                    else throw("Strict value is not equal to itself.")
200
202
 
                }
201
203
 
    }
202
204
 
203
205
 
204
206
 
205
207
 
@Callable(i)
206
208
 
func stake () = {
207
209
 
    let user = toString(i.caller)
208
210
 
    let amount = i.payments[0].amount
209
211
 
    let currentPool = tryGetStr(this, "currentPool")
210
212
 
    if (if ((0 >= amount))
211
213
 
        then true
212
214
 
        else (i.payments[0].assetId != fromBase58String(assetId)))
213
215
 
        then throw("invalid token attached")
214
216
 
        else if ((currentPool == ""))
215
217
 
            then throw("Pool not initialized")
216
218
 
            else (stakeResult(user, amount) ++ supplyResult(currentPool))
217
219
 
    }
218
220
 
219
221
 
220
222
 
221
223
 
@Callable(i)
222
224
 
func unstake (amount) = {
223
225
 
    let user = toString(i.caller)
224
226
 
    let currentPool = tryGetStr(this, "currentPool")
225
227
 
    let tx = withdrawFromPuzzlePool(currentPool, amount)
226
228
 
    if ((tx == tx))
227
229
 
        then (unstakeResult(user, amount) ++ [ScriptTransfer(i.caller, amount, fromBase58String(assetId))])
228
230
 
        else throw("Strict value is not equal to itself.")
229
231
 
    }
230
232
 
231
233
 
232
234
 
@Verifier(tx)
233
235
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
234
236
 

github/deemru/w8io/169f3d6 
45.27 ms ◑