w8 · tx · 8gh···oXK

tx · 8ghsb6PRD6YLWPrEDv8ctB6UKeik88n12CNvWZzb3oXK

3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh:  -0.00900000 Waves

2022.12.06 22:34 [2348914] smart account 3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "8ghsb6PRD6YLWPrEDv8ctB6UKeik88n12CNvWZzb3oXK",
    "fee": 900000,
    "feeAssetId": null,
    "timestamp": 1670355301388,
    "version": 2,
    "chainId": 84,
    "sender": "3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh",
    "senderPublicKey": "HscGVyJG5M3NMHWKfQbucCBsFLGPi8VmTxTAmcBbaWTa",
    "proofs": [
        "3YRZa2KYuSYJZChTE8fF3SNpBdwEpvrCyXd1iE4ydV2nGTxNHyWLadbwbdiXtZm7CdcxkfLio7tGk9CpH9W7eVbP"
    ],
    "script": "base64:BgITCAISAwoBCBIDCgEIEgASAwoBARYABlNjYWxlNgDAhD0ABlNjYWxlOACAwtcvAAdTY2FsZTE2CQBoAgUGU2NhbGU4BQZTY2FsZTgACnZhbGlkYXRvcnMJAMwIAgIjM05BbXFHanhSQlJQb1JIWlVVcXZoaU5TNmF4bkdwaW5MSEMFA25pbAAPbW9uZXlCb3hBZGRyZXNzCQEHQWRkcmVzcwEBGgFUZKnP467xWXotJQOt2k8QiNBvrQpHH8SpAAdhc3NldElkAixISG1hRlFwVW9id0t4emp6NEVDYUJQdG9GNjlrdWpLd1UyY296YVV6VHNndgALcHV6emxlUG9vbHMJAMwIAgIjM042U3RKZGdtVGZBUnNSTm45WHQ1ckRZRXMzcHI0S0d5MXYFA25pbAEKZ2V0QmFsYW5jZQEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgRVbml0BAF4BQckbWF0Y2gwCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQkA8AcCBQR0aGlzCQEFdmFsdWUBBQdhc3NldElkAQl0cnlHZXRJbnQCB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCaCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAEJdHJ5R2V0U3RyAgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAnQgCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFiBQckbWF0Y2gwBQFiAgABDmdldEFzc2V0U3RyaW5nAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAWIFByRtYXRjaDAJANgEAQUBYgIFV0FWRVMBG2dldFB1enpsZVBvb2xTdXBwbGllZEFtb3VudAEGcG9vbElkBAdiYWxhbmNlCQDwBwIJAQdBZGRyZXNzAQkA2QQBBQZwb29sSWQJANkEAQUHYXNzZXRJZAUHYmFsYW5jZQEWZ2V0VG90YWxTdXBwbGllZEFtb3VudAAEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wDCQAAAgULY3VycmVudFBvb2wCAAkAAgEJAKwCAgIZQ2Fubm90IGZpbmQgcG9vbCB3aXRoIGlkIAULY3VycmVudFBvb2wJARtnZXRQdXp6bGVQb29sU3VwcGxpZWRBbW91bnQBBQtjdXJyZW50UG9vbAEWd2l0aGRyYXdGcm9tUHV6emxlUG9vbAIGcG9vbElkBmFtb3VudAQLcG9vbEFkZHJlc3MJAQdBZGRyZXNzAQkA2QQBBQZwb29sSWQECndpdGhkcmF3VHgDCQBmAgUGYW1vdW50AAAJAPwHBAULcG9vbEFkZHJlc3MCCHdpdGhkcmF3CQDMCAIFB2Fzc2V0SWQJAMwIAgUGYW1vdW50BQNuaWwFA25pbAIAAwkAAAIFCndpdGhkcmF3VHgFCndpdGhkcmF3VHgFCndpdGhkcmF3VHgJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BB2NhbGNGZWUABAxzdGFrZWRBbW91bnQJAQl0cnlHZXRJbnQCBQR0aGlzAg1nbG9iYWxfc3Rha2VkBAlsYXN0U1JhdGUJAQl0cnlHZXRJbnQCBQR0aGlzAhVnbG9iYWxfbGFzdENoZWNrU1JhdGUEB3NBbW91bnQJAGsDBQxzdGFrZWRBbW91bnQFCWxhc3RTUmF0ZQUGU2NhbGU4BA10b3RhbFN1cHBsaWVkCQEWZ2V0VG90YWxTdXBwbGllZEFtb3VudAAEBGRpZmYJAGUCBQ10b3RhbFN1cHBsaWVkBQdzQW1vdW50BANmZWUJAGsDBQRkaWZmAMCWsQIFBlNjYWxlOAMJAGYCBQNmZWUAAAUDZmVlAAABDmNhbGN1bGF0ZVNSYXRlAAQObGFzdENoZWNrU1JhdGUJAQl0cnlHZXRJbnQCBQR0aGlzAhVnbG9iYWxfbGFzdENoZWNrU1JhdGUEDHN0YWtlZEFtb3VudAkBCXRyeUdldEludAIFBHRoaXMCDWdsb2JhbF9zdGFrZWQEEWxhc3RDaGVja1NBbW91bnV0CQBrAwUMc3Rha2VkQW1vdW50BQ5sYXN0Q2hlY2tTUmF0ZQUGU2NhbGU4AwkAAAIFDmxhc3RDaGVja1NSYXRlAAAFBlNjYWxlOAMJAAACBRFsYXN0Q2hlY2tTQW1vdW51dAAABQ5sYXN0Q2hlY2tTUmF0ZQQFc1JhdGUJAGsDBQ5sYXN0Q2hlY2tTUmF0ZQkAZAIJAGsDCQBlAgkAawMJARZnZXRUb3RhbFN1cHBsaWVkQW1vdW50AAUGU2NhbGU2BRFsYXN0Q2hlY2tTQW1vdW51dAUGU2NhbGU2CQBlAgUGU2NhbGU4AMCWsQIFBlNjYWxlOAUGU2NhbGU2BQZTY2FsZTYDCQBmAgUGU2NhbGU4BQVzUmF0ZQUObGFzdENoZWNrU1JhdGUFBXNSYXRlAQ9jaGFyZ2VGZWVSZXN1bHQABAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sBANmZWUJAQdjYWxjRmVlAAMJAAACBQtjdXJyZW50UG9vbAIACQACAQkArAICAhlDYW5ub3QgZmluZCBwb29sIHdpdGggaWQgBQtjdXJyZW50UG9vbAQKd2l0aGRyYXdUeAkBFndpdGhkcmF3RnJvbVB1enpsZVBvb2wCBQtjdXJyZW50UG9vbAUDZmVlAwkAAAIFCndpdGhkcmF3VHgFCndpdGhkcmF3VHgJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUPbW9uZXlCb3hBZGRyZXNzBQNmZWUJANkEAQUHYXNzZXRJZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQxyZWNhbGNSZXN1bHQBDHN0YWtlZENoYW5nZQQMc3Rha2VkQW1vdW50CQEJdHJ5R2V0SW50AgUEdGhpcwINZ2xvYmFsX3N0YWtlZAQFc1JhdGUJAQ5jYWxjdWxhdGVTUmF0ZQADCQBmAgUFc1JhdGUAAAkAAgEJAKwCAgIHc1JhdGU6IAkApAMBBQVzUmF0ZQkAzAgCCQEMSW50ZWdlckVudHJ5AgINZ2xvYmFsX3N0YWtlZAkAZAIFDHN0YWtlZEFtb3VudAUMc3Rha2VkQ2hhbmdlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhVnbG9iYWxfbGFzdENoZWNrU1JhdGUFBXNSYXRlBQNuaWwBDHN1cHBseVJlc3VsdAEGcG9vbElkAwkAAAIJAM8IAgULcHV6emxlUG9vbHMFBnBvb2xJZAUEdW5pdAkAAgEJAKwCAgIPVW5rbm93biBwb29sSWQgBQZwb29sSWQECmFzc2V0Qnl0ZXMJANkEAQUHYXNzZXRJZAQHYmFsYW5jZQkBCmdldEJhbGFuY2UBBQphc3NldEJ5dGVzBANpbnYJAPwHBAkBB0FkZHJlc3MBCQDZBAEFBnBvb2xJZAIGc3VwcGx5BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCmFzc2V0Qnl0ZXMFB2JhbGFuY2UFA25pbAMJAAACBQNpbnYFA2ludgkAzAgCCQELU3RyaW5nRW50cnkCAgtjdXJyZW50UG9vbAUGcG9vbElkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BDndpdGhkcmF3UmVzdWx0AAQLY3VycmVudFBvb2wJAQl0cnlHZXRTdHICBQR0aGlzAgtjdXJyZW50UG9vbAMJAAACBQtjdXJyZW50UG9vbAIACQACAQkArAICAhlDYW5ub3QgZmluZCBwb29sIHdpdGggaWQgBQtjdXJyZW50UG9vbAQGYW1vdW50CQEbZ2V0UHV6emxlUG9vbFN1cHBsaWVkQW1vdW50AQULY3VycmVudFBvb2wEAnR4CQEWd2l0aGRyYXdGcm9tUHV6emxlUG9vbAIFC2N1cnJlbnRQb29sBQZhbW91bnQDCQAAAgUCdHgFAnR4BQJ0eAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgELc3Rha2VSZXN1bHQCBHVzZXIGYW1vdW50BAdzQW1vdW50CQBrAwUGYW1vdW50BQZTY2FsZTgJAQ5jYWxjdWxhdGVTUmF0ZQAJAM4IAgkBDHJlY2FsY1Jlc3VsdAEFB3NBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEdXNlcgIHX3N0YWtlZAkAZAIJAQl0cnlHZXRJbnQCBQR0aGlzCQCsAgIFBHVzZXICB19zdGFrZWQFB3NBbW91bnQFA25pbAENdW5zdGFrZVJlc3VsdAIEdXNlcgZhbW91bnQEB3NBbW91bnQJAGsDBQZhbW91bnQFBlNjYWxlOAkBDmNhbGN1bGF0ZVNSYXRlAAQKdXNlclN0YWtlZAkBCXRyeUdldEludAIFBHRoaXMJAKwCAgUEdXNlcgIHX3N0YWtlZAQNdW5zdGFrZUFtb3VudAMJAGYCBQdzQW1vdW50BQp1c2VyU3Rha2VkBQp1c2VyU3Rha2VkBQdzQW1vdW50CQDOCAIJAQxyZWNhbGNSZXN1bHQBCQEBLQEFDXVuc3Rha2VBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEdXNlcgIHX3N0YWtlZAkAZQIFCnVzZXJTdGFrZWQFDXVuc3Rha2VBbW91bnQFA25pbAQBaQEEaW5pdAEGcG9vbElkBAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwkAAAIJAM8IAgUKdmFsaWRhdG9ycwkApQgBCAUBaQZjYWxsZXIFBHVuaXQJAAIBAg1BY2Nlc3MgZGVuaWVkAwkAAAIFC2N1cnJlbnRQb29sAgAJAMwIAgkBC1N0cmluZ0VudHJ5AgILY3VycmVudFBvb2wFBnBvb2xJZAUDbmlsBQNuaWwBaQEJcmViYWxhbmNlAQZwb29sSWQEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wDCQAAAgkAzwgCBQp2YWxpZGF0b3JzCQClCAEIBQFpBmNhbGxlcgUEdW5pdAkAAgECDUFjY2VzcyBkZW5pZWQDCQAAAgULY3VycmVudFBvb2wFBnBvb2xJZAkAAgEJAKwCAgITQWxyZWFkeSBzdXBwbGllZCB0bwULY3VycmVudFBvb2wECndpdGhkcmF3VHgJAQ53aXRoZHJhd1Jlc3VsdAADCQAAAgUKd2l0aGRyYXdUeAUKd2l0aGRyYXdUeAkAzggCCQEMc3VwcGx5UmVzdWx0AQUGcG9vbElkCQEMcmVjYWxjUmVzdWx0AQAACQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBBXN0YWtlAAQEdXNlcgkApQgBCAUBaQZjYWxsZXIEBmFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wDAwkAZwIAAAUGYW1vdW50BgkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCQDZBAEFB2Fzc2V0SWQJAAIBAhZpbnZhbGlkIHRva2VuIGF0dGFjaGVkAwkAAAIFC2N1cnJlbnRQb29sAgAJAAIBAhRQb29sIG5vdCBpbml0aWFsaXplZAkAzggCCQDOCAIJAQtzdGFrZVJlc3VsdAIFBHVzZXIFBmFtb3VudAkBD2NoYXJnZUZlZVJlc3VsdAAJAQxzdXBwbHlSZXN1bHQBBQtjdXJyZW50UG9vbAFpAQd1bnN0YWtlAQZhbW91bnQEBHVzZXIJAKUIAQgFAWkGY2FsbGVyBAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sBAtjaGFyZ2VGZWVUeAkBD2NoYXJnZUZlZVJlc3VsdAADCQAAAgULY2hhcmdlRmVlVHgFC2NoYXJnZUZlZVR4BAJ0eAkBFndpdGhkcmF3RnJvbVB1enpsZVBvb2wCBQtjdXJyZW50UG9vbAUGYW1vdW50AwkAAAIFAnR4BQJ0eAkAzggCCQENdW5zdGFrZVJlc3VsdAIFBHVzZXIFBmFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFBmFtb3VudAkA2QQBBQdhc3NldElkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5Mbb44g==",
    "height": 2348914,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2oDq6CKCBRqQRzoRtTCiZZNVbgRvjVs4giQgZf9WDq7m
Next: 21PJcZh8EsoTeA5SiDqADUGuK7HhxncLkm5HnYdunEQs

Diff: 
Old New Differences
119 119  func recalcResult (stakedChange) = {
120 120      let stakedAmount = tryGetInt(this, "global_staked")
121 121      let sRate = calculateSRate()
122 - [IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", sRate)]
122 +     if ((sRate > 0))
123 +         then throw(("sRate: " + toString(sRate)))
124 +         else [IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", sRate)]
123 125      }
124 126  
125 127  
205 207          then throw("invalid token attached")
206 208          else if ((currentPool == ""))
207 209              then throw("Pool not initialized")
208 -             else ((stakeResult(user, amount) ++ supplyResult(currentPool)) ++ chargeFeeResult())
210 +             else ((stakeResult(user, amount) ++ chargeFeeResult()) ++ supplyResult(currentPool))
209 211      }
210 212  
211 213  
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 calcFee () = {
76 76      let stakedAmount = tryGetInt(this, "global_staked")
77 77      let lastSRate = tryGetInt(this, "global_lastCheckSRate")
78 78      let sAmount = fraction(stakedAmount, lastSRate, Scale8)
79 79      let totalSupplied = getTotalSuppliedAmount()
80 80      let diff = (totalSupplied - sAmount)
81 81      let fee = fraction(diff, 5000000, Scale8)
82 82      if ((fee > 0))
83 83          then fee
84 84          else 0
85 85      }
86 86  
87 87  
88 88  func calculateSRate () = {
89 89      let lastCheckSRate = tryGetInt(this, "global_lastCheckSRate")
90 90      let stakedAmount = tryGetInt(this, "global_staked")
91 91      let lastCheckSAmounut = fraction(stakedAmount, lastCheckSRate, Scale8)
92 92      if ((lastCheckSRate == 0))
93 93          then Scale8
94 94          else if ((lastCheckSAmounut == 0))
95 95              then lastCheckSRate
96 96              else {
97 97                  let sRate = fraction(lastCheckSRate, (fraction((fraction(getTotalSuppliedAmount(), Scale6, lastCheckSAmounut) - Scale6), (Scale8 - 5000000), Scale8) + Scale6), Scale6)
98 98                  if ((Scale8 > sRate))
99 99                      then lastCheckSRate
100 100                      else sRate
101 101                  }
102 102      }
103 103  
104 104  
105 105  func chargeFeeResult () = {
106 106      let currentPool = tryGetStr(this, "currentPool")
107 107      let fee = calcFee()
108 108      if ((currentPool == ""))
109 109          then throw(("Cannot find pool with id " + currentPool))
110 110          else {
111 111              let withdrawTx = withdrawFromPuzzlePool(currentPool, fee)
112 112              if ((withdrawTx == withdrawTx))
113 113                  then [ScriptTransfer(moneyBoxAddress, fee, fromBase58String(assetId))]
114 114                  else throw("Strict value is not equal to itself.")
115 115              }
116 116      }
117 117  
118 118  
119 119  func recalcResult (stakedChange) = {
120 120      let stakedAmount = tryGetInt(this, "global_staked")
121 121      let sRate = calculateSRate()
122 - [IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", sRate)]
122 +     if ((sRate > 0))
123 +         then throw(("sRate: " + toString(sRate)))
124 +         else [IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", sRate)]
123 125      }
124 126  
125 127  
126 128  func supplyResult (poolId) = if ((indexOf(puzzlePools, poolId) == unit))
127 129      then throw(("Unknown poolId " + poolId))
128 130      else {
129 131          let assetBytes = fromBase58String(assetId)
130 132          let balance = getBalance(assetBytes)
131 133          let inv = invoke(Address(fromBase58String(poolId)), "supply", nil, [AttachedPayment(assetBytes, balance)])
132 134          if ((inv == inv))
133 135              then [StringEntry("currentPool", poolId)]
134 136              else throw("Strict value is not equal to itself.")
135 137          }
136 138  
137 139  
138 140  func withdrawResult () = {
139 141      let currentPool = tryGetStr(this, "currentPool")
140 142      if ((currentPool == ""))
141 143          then throw(("Cannot find pool with id " + currentPool))
142 144          else {
143 145              let amount = getPuzzlePoolSuppliedAmount(currentPool)
144 146              let tx = withdrawFromPuzzlePool(currentPool, amount)
145 147              if ((tx == tx))
146 148                  then tx
147 149                  else throw("Strict value is not equal to itself.")
148 150              }
149 151      }
150 152  
151 153  
152 154  func stakeResult (user,amount) = {
153 155      let sAmount = fraction(amount, Scale8, calculateSRate())
154 156      (recalcResult(sAmount) ++ [IntegerEntry((user + "_staked"), (tryGetInt(this, (user + "_staked")) + sAmount))])
155 157      }
156 158  
157 159  
158 160  func unstakeResult (user,amount) = {
159 161      let sAmount = fraction(amount, Scale8, calculateSRate())
160 162      let userStaked = tryGetInt(this, (user + "_staked"))
161 163      let unstakeAmount = if ((sAmount > userStaked))
162 164          then userStaked
163 165          else sAmount
164 166      (recalcResult(-(unstakeAmount)) ++ [IntegerEntry((user + "_staked"), (userStaked - unstakeAmount))])
165 167      }
166 168  
167 169  
168 170  @Callable(i)
169 171  func init (poolId) = {
170 172      let currentPool = tryGetStr(this, "currentPool")
171 173      if ((indexOf(validators, toString(i.caller)) == unit))
172 174          then throw("Access denied")
173 175          else if ((currentPool == ""))
174 176              then [StringEntry("currentPool", poolId)]
175 177              else nil
176 178      }
177 179  
178 180  
179 181  
180 182  @Callable(i)
181 183  func rebalance (poolId) = {
182 184      let currentPool = tryGetStr(this, "currentPool")
183 185      if ((indexOf(validators, toString(i.caller)) == unit))
184 186          then throw("Access denied")
185 187          else if ((currentPool == poolId))
186 188              then throw(("Already supplied to" + currentPool))
187 189              else {
188 190                  let withdrawTx = withdrawResult()
189 191                  if ((withdrawTx == withdrawTx))
190 192                      then (supplyResult(poolId) ++ recalcResult(0))
191 193                      else throw("Strict value is not equal to itself.")
192 194                  }
193 195      }
194 196  
195 197  
196 198  
197 199  @Callable(i)
198 200  func stake () = {
199 201      let user = toString(i.caller)
200 202      let amount = i.payments[0].amount
201 203      let currentPool = tryGetStr(this, "currentPool")
202 204      if (if ((0 >= amount))
203 205          then true
204 206          else (i.payments[0].assetId != fromBase58String(assetId)))
205 207          then throw("invalid token attached")
206 208          else if ((currentPool == ""))
207 209              then throw("Pool not initialized")
208 -             else ((stakeResult(user, amount) ++ supplyResult(currentPool)) ++ chargeFeeResult())
210 +             else ((stakeResult(user, amount) ++ chargeFeeResult()) ++ supplyResult(currentPool))
209 211      }
210 212  
211 213  
212 214  
213 215  @Callable(i)
214 216  func unstake (amount) = {
215 217      let user = toString(i.caller)
216 218      let currentPool = tryGetStr(this, "currentPool")
217 219      let chargeFeeTx = chargeFeeResult()
218 220      if ((chargeFeeTx == chargeFeeTx))
219 221          then {
220 222              let tx = withdrawFromPuzzlePool(currentPool, amount)
221 223              if ((tx == tx))
222 224                  then (unstakeResult(user, amount) ++ [ScriptTransfer(i.caller, amount, fromBase58String(assetId))])
223 225                  else throw("Strict value is not equal to itself.")
224 226              }
225 227          else throw("Strict value is not equal to itself.")
226 228      }
227 229  
228 230  
229 231  @Verifier(tx)
230 232  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
231 233

Old	New		Differences
119	119		func recalcResult (stakedChange) = {
120	120		let stakedAmount = tryGetInt(this, "global_staked")
121	121		let sRate = calculateSRate()
122		-	[IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", sRate)]
	122	+	if ((sRate > 0))
	123	+	then throw(("sRate: " + toString(sRate)))
	124	+	else [IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", sRate)]
123	125		}
124	126
125	127

205	207		then throw("invalid token attached")
206	208		else if ((currentPool == ""))
207	209		then throw("Pool not initialized")
208		-	else ((stakeResult(user, amount) ++ ~~supplyResult~~(~~currentPool~~)) ++ ~~chargeFeeResult~~())
	210	+	else ((stakeResult(user, amount) ++ chargeFeeResult()) ++ supplyResult(currentPool))
209	211		}
210	212
211	213

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 calcFee () = {
76	76		let stakedAmount = tryGetInt(this, "global_staked")
77	77		let lastSRate = tryGetInt(this, "global_lastCheckSRate")
78	78		let sAmount = fraction(stakedAmount, lastSRate, Scale8)
79	79		let totalSupplied = getTotalSuppliedAmount()
80	80		let diff = (totalSupplied - sAmount)
81	81		let fee = fraction(diff, 5000000, Scale8)
82	82		if ((fee > 0))
83	83		then fee
84	84		else 0
85	85		}
86	86
87	87
88	88		func calculateSRate () = {
89	89		let lastCheckSRate = tryGetInt(this, "global_lastCheckSRate")
90	90		let stakedAmount = tryGetInt(this, "global_staked")
91	91		let lastCheckSAmounut = fraction(stakedAmount, lastCheckSRate, Scale8)
92	92		if ((lastCheckSRate == 0))
93	93		then Scale8
94	94		else if ((lastCheckSAmounut == 0))
95	95		then lastCheckSRate
96	96		else {
97	97		let sRate = fraction(lastCheckSRate, (fraction((fraction(getTotalSuppliedAmount(), Scale6, lastCheckSAmounut) - Scale6), (Scale8 - 5000000), Scale8) + Scale6), Scale6)
98	98		if ((Scale8 > sRate))
99	99		then lastCheckSRate
100	100		else sRate
101	101		}
102	102		}
103	103
104	104
105	105		func chargeFeeResult () = {
106	106		let currentPool = tryGetStr(this, "currentPool")
107	107		let fee = calcFee()
108	108		if ((currentPool == ""))
109	109		then throw(("Cannot find pool with id " + currentPool))
110	110		else {
111	111		let withdrawTx = withdrawFromPuzzlePool(currentPool, fee)
112	112		if ((withdrawTx == withdrawTx))
113	113		then [ScriptTransfer(moneyBoxAddress, fee, fromBase58String(assetId))]
114	114		else throw("Strict value is not equal to itself.")
115	115		}
116	116		}
117	117
118	118
119	119		func recalcResult (stakedChange) = {
120	120		let stakedAmount = tryGetInt(this, "global_staked")
121	121		let sRate = calculateSRate()
122		-	[IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", sRate)]
	122	+	if ((sRate > 0))
	123	+	then throw(("sRate: " + toString(sRate)))
	124	+	else [IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", sRate)]
123	125		}
124	126
125	127
126	128		func supplyResult (poolId) = if ((indexOf(puzzlePools, poolId) == unit))
127	129		then throw(("Unknown poolId " + poolId))
128	130		else {
129	131		let assetBytes = fromBase58String(assetId)
130	132		let balance = getBalance(assetBytes)
131	133		let inv = invoke(Address(fromBase58String(poolId)), "supply", nil, [AttachedPayment(assetBytes, balance)])
132	134		if ((inv == inv))
133	135		then [StringEntry("currentPool", poolId)]
134	136		else throw("Strict value is not equal to itself.")
135	137		}
136	138
137	139
138	140		func withdrawResult () = {
139	141		let currentPool = tryGetStr(this, "currentPool")
140	142		if ((currentPool == ""))
141	143		then throw(("Cannot find pool with id " + currentPool))
142	144		else {
143	145		let amount = getPuzzlePoolSuppliedAmount(currentPool)
144	146		let tx = withdrawFromPuzzlePool(currentPool, amount)
145	147		if ((tx == tx))
146	148		then tx
147	149		else throw("Strict value is not equal to itself.")
148	150		}
149	151		}
150	152
151	153
152	154		func stakeResult (user,amount) = {
153	155		let sAmount = fraction(amount, Scale8, calculateSRate())
154	156		(recalcResult(sAmount) ++ [IntegerEntry((user + "_staked"), (tryGetInt(this, (user + "_staked")) + sAmount))])
155	157		}
156	158
157	159
158	160		func unstakeResult (user,amount) = {
159	161		let sAmount = fraction(amount, Scale8, calculateSRate())
160	162		let userStaked = tryGetInt(this, (user + "_staked"))
161	163		let unstakeAmount = if ((sAmount > userStaked))
162	164		then userStaked
163	165		else sAmount
164	166		(recalcResult(-(unstakeAmount)) ++ [IntegerEntry((user + "_staked"), (userStaked - unstakeAmount))])
165	167		}
166	168
167	169
168	170		@Callable(i)
169	171		func init (poolId) = {
170	172		let currentPool = tryGetStr(this, "currentPool")
171	173		if ((indexOf(validators, toString(i.caller)) == unit))
172	174		then throw("Access denied")
173	175		else if ((currentPool == ""))
174	176		then [StringEntry("currentPool", poolId)]
175	177		else nil
176	178		}
177	179
178	180
179	181
180	182		@Callable(i)
181	183		func rebalance (poolId) = {
182	184		let currentPool = tryGetStr(this, "currentPool")
183	185		if ((indexOf(validators, toString(i.caller)) == unit))
184	186		then throw("Access denied")
185	187		else if ((currentPool == poolId))
186	188		then throw(("Already supplied to" + currentPool))
187	189		else {
188	190		let withdrawTx = withdrawResult()
189	191		if ((withdrawTx == withdrawTx))
190	192		then (supplyResult(poolId) ++ recalcResult(0))
191	193		else throw("Strict value is not equal to itself.")
192	194		}
193	195		}
194	196
195	197
196	198
197	199		@Callable(i)
198	200		func stake () = {
199	201		let user = toString(i.caller)
200	202		let amount = i.payments[0].amount
201	203		let currentPool = tryGetStr(this, "currentPool")
202	204		if (if ((0 >= amount))
203	205		then true
204	206		else (i.payments[0].assetId != fromBase58String(assetId)))
205	207		then throw("invalid token attached")
206	208		else if ((currentPool == ""))
207	209		then throw("Pool not initialized")
208		-	else ((stakeResult(user, amount) ++ ~~supplyResult~~(~~currentPool~~)) ++ ~~chargeFeeResult~~())
	210	+	else ((stakeResult(user, amount) ++ chargeFeeResult()) ++ supplyResult(currentPool))
209	211		}
210	212
211	213
212	214
213	215		@Callable(i)
214	216		func unstake (amount) = {
215	217		let user = toString(i.caller)
216	218		let currentPool = tryGetStr(this, "currentPool")
217	219		let chargeFeeTx = chargeFeeResult()
218	220		if ((chargeFeeTx == chargeFeeTx))
219	221		then {
220	222		let tx = withdrawFromPuzzlePool(currentPool, amount)
221	223		if ((tx == tx))
222	224		then (unstakeResult(user, amount) ++ [ScriptTransfer(i.caller, amount, fromBase58String(assetId))])
223	225		else throw("Strict value is not equal to itself.")
224	226		}
225	227		else throw("Strict value is not equal to itself.")
226	228		}
227	229
228	230
229	231		@Verifier(tx)
230	232		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
231	233

github/deemru/w8io/873ac7e 
27.01 ms ◑