w8 · tx · Den···BzP

tx · DenCzwpnkrHEiLXGvfxzq4WFwqaxuhqZZcgHA3urvBzP

3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh:  -0.00900000 Waves

2022.12.02 01:58 [2341899] smart account 3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "DenCzwpnkrHEiLXGvfxzq4WFwqaxuhqZZcgHA3urvBzP",
    "fee": 900000,
    "feeAssetId": null,
    "timestamp": 1669935502302,
    "version": 2,
    "chainId": 84,
    "sender": "3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh",
    "senderPublicKey": "HscGVyJG5M3NMHWKfQbucCBsFLGPi8VmTxTAmcBbaWTa",
    "proofs": [
        "3TmAN13UtboiTvg3rASJLQeJBrcmq8B9AYTXCyYbEGx1cy85EbGmsZomg6WvZR8tGMi2YGhLFwRgqCGTzTKwxCi2"
    ],
    "script": "base64:BgITCAISAwoBCBIDCgEIEgASAwoBARUABlNjYWxlNgDAhD0ABlNjYWxlOACAwtcvAAdTY2FsZTE2CQBoAgUGU2NhbGU4BQZTY2FsZTgACnZhbGlkYXRvcnMJAMwIAgIjM05BbXFHanhSQlJQb1JIWlVVcXZoaU5TNmF4bkdwaW5MSEMFA25pbAATcG9maXRBY2NvdW50QWRkcmVzcwkBB0FkZHJlc3MBARoBVGSpz+Ou8Vl6LSUDrdpPEIjQb60KRx/EqQAHYXNzZXRJZAIsSEhtYUZRcFVvYndLeHpqejRFQ2FCUHRvRjY5a3VqS3dVMmNvemFVelRzZ3YAC3B1enpsZVBvb2xzCQDMCAICIzNONlN0SmRnbVRmQVJzUk5uOVh0NXJEWUVzM3ByNEtHeTF2BQNuaWwBCmdldEJhbGFuY2UBB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIEVW5pdAQBeAUHJG1hdGNoMAgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAPAHAgUEdGhpcwkBBXZhbHVlAQUHYXNzZXRJZAEJdHJ5R2V0SW50AgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAmggCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABCXRyeUdldFN0cgIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJ0IAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYgUHJG1hdGNoMAUBYgIAAQ5nZXRBc3NldFN0cmluZwEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFiBQckbWF0Y2gwCQDYBAEFAWICBVdBVkVTARtnZXRQdXp6bGVQb29sU3VwcGxpZWRBbW91bnQBBnBvb2xJZAQHYmFsYW5jZQkA8AcCCQEHQWRkcmVzcwEJANkEAQUGcG9vbElkCQDZBAEFB2Fzc2V0SWQFB2JhbGFuY2UBFmdldFRvdGFsU3VwcGxpZWRBbW91bnQABAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwkAAAIFC2N1cnJlbnRQb29sAgAJAAIBCQCsAgICGUNhbm5vdCBmaW5kIHBvb2wgd2l0aCBpZCAFC2N1cnJlbnRQb29sCQEbZ2V0UHV6emxlUG9vbFN1cHBsaWVkQW1vdW50AQULY3VycmVudFBvb2wBFndpdGhkcmF3RnJvbVB1enpsZVBvb2wCBnBvb2xJZAZhbW91bnQEC3Bvb2xBZGRyZXNzCQEHQWRkcmVzcwEJANkEAQUGcG9vbElkBAp3aXRoZHJhd1R4AwkAZgIFBmFtb3VudAAACQD8BwQFC3Bvb2xBZGRyZXNzAgh3aXRoZHJhdwkAzAgCBQdhc3NldElkCQDMCAIFBmFtb3VudAUDbmlsBQNuaWwCAAMJAAACBQp3aXRoZHJhd1R4BQp3aXRoZHJhd1R4BQp3aXRoZHJhd1R4CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQ5jYWxjdWxhdGVTUmF0ZQAEDmxhc3RDaGVja1NSYXRlCQEJdHJ5R2V0SW50AgUEdGhpcwIVZ2xvYmFsX2xhc3RDaGVja1NSYXRlBAxzdGFrZWRBbW91bnQJAQl0cnlHZXRJbnQCBQR0aGlzAg1nbG9iYWxfc3Rha2VkBBFsYXN0Q2hlY2tTQW1vdW51dAkAawMFDHN0YWtlZEFtb3VudAUObGFzdENoZWNrU1JhdGUFBlNjYWxlOAQTdG90YWxTdXBwbGllZEFtb3VudAkBFmdldFRvdGFsU3VwcGxpZWRBbW91bnQAAwkAAAIFEWxhc3RDaGVja1NBbW91bnV0AAAFBlNjYWxlOAQMdG90YWxTdXBsaWVkBRN0b3RhbFN1cHBsaWVkQW1vdW50BAVzUmF0ZQkAawMFDmxhc3RDaGVja1NSYXRlBQx0b3RhbFN1cGxpZWQFEWxhc3RDaGVja1NBbW91bnV0AwkAZgIFBlNjYWxlOAUFc1JhdGUFBlNjYWxlOAUFc1JhdGUBD2NoYXJnZUZlZVJlc3VsdAAEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wEDHN0YWtlZEFtb3VudAkBCXRyeUdldEludAIFBHRoaXMCDWdsb2JhbF9zdGFrZWQECWxhc3RTUmF0ZQkBCXRyeUdldEludAIFBHRoaXMCFWdsb2JhbF9sYXN0Q2hlY2tTUmF0ZQQEZGlmZgkAZQIJARZnZXRUb3RhbFN1cHBsaWVkQW1vdW50AAkAawMFDHN0YWtlZEFtb3VudAUJbGFzdFNSYXRlBQZTY2FsZTgEA2ZlZQkAawMFBGRpZmYAwJaxAgUGU2NhbGU4BAZwcm9maXQDCQBmAgUDZmVlAAAFA2ZlZQAAAwkAAAIFC2N1cnJlbnRQb29sAgAJAAIBCQCsAgICGUNhbm5vdCBmaW5kIHBvb2wgd2l0aCBpZCAFC2N1cnJlbnRQb29sBAJ0eAkBFndpdGhkcmF3RnJvbVB1enpsZVBvb2wCBQtjdXJyZW50UG9vbAUGcHJvZml0AwkAAAIFAnR4BQJ0eAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBRNwb2ZpdEFjY291bnRBZGRyZXNzBQZwcm9maXQJANkEAQUHYXNzZXRJZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQxyZWNhbGNSZXN1bHQBDHN0YWtlZENoYW5nZQQMc3Rha2VkQW1vdW50CQEJdHJ5R2V0SW50AgUEdGhpcwINZ2xvYmFsX3N0YWtlZAkAzggCCQEPY2hhcmdlRmVlUmVzdWx0AAkAzAgCCQEMSW50ZWdlckVudHJ5AgINZ2xvYmFsX3N0YWtlZAkAZAIFDHN0YWtlZEFtb3VudAUMc3Rha2VkQ2hhbmdlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhVnbG9iYWxfbGFzdENoZWNrU1JhdGUJAQ5jYWxjdWxhdGVTUmF0ZQAFA25pbAEMc3VwcGx5UmVzdWx0AQZwb29sSWQDCQAAAgkAzwgCBQtwdXp6bGVQb29scwUGcG9vbElkBQR1bml0CQACAQkArAICAg9Vbmtub3duIHBvb2xJZCAFBnBvb2xJZAQKYXNzZXRCeXRlcwkA2QQBBQdhc3NldElkBAdiYWxhbmNlCQEKZ2V0QmFsYW5jZQEFCmFzc2V0Qnl0ZXMEA2ludgkA/AcECQEHQWRkcmVzcwEJANkEAQUGcG9vbElkAgZzdXBwbHkFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUKYXNzZXRCeXRlcwUHYmFsYW5jZQUDbmlsAwkAAAIFA2ludgUDaW52CQDMCAIJAQtTdHJpbmdFbnRyeQICC2N1cnJlbnRQb29sBQZwb29sSWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEOd2l0aGRyYXdSZXN1bHQABAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwkAAAIFC2N1cnJlbnRQb29sAgAJAAIBCQCsAgICGUNhbm5vdCBmaW5kIHBvb2wgd2l0aCBpZCAFC2N1cnJlbnRQb29sBAZhbW91bnQJARtnZXRQdXp6bGVQb29sU3VwcGxpZWRBbW91bnQBBQtjdXJyZW50UG9vbAQCdHgJARZ3aXRoZHJhd0Zyb21QdXp6bGVQb29sAgULY3VycmVudFBvb2wFBmFtb3VudAMJAAACBQJ0eAUCdHgFAnR4CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQtzdGFrZVJlc3VsdAIEdXNlcgZhbW91bnQEB3NBbW91bnQJAGsDBQZhbW91bnQFBlNjYWxlOAkBDmNhbGN1bGF0ZVNSYXRlAAkAzggCCQEMcmVjYWxjUmVzdWx0AQUHc0Ftb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQR1c2VyAgdfc3Rha2VkCQBkAgkBCXRyeUdldEludAIFBHRoaXMJAKwCAgUEdXNlcgIHX3N0YWtlZAUHc0Ftb3VudAUDbmlsAQ11bnN0YWtlUmVzdWx0AgR1c2VyBmFtb3VudAQHc0Ftb3VudAkAawMFBmFtb3VudAUGU2NhbGU4CQEOY2FsY3VsYXRlU1JhdGUABAp1c2VyU3Rha2VkCQEJdHJ5R2V0SW50AgUEdGhpcwkArAICBQR1c2VyAgdfc3Rha2VkBA11bnN0YWtlQW1vdW50AwkAZgIFB3NBbW91bnQFCnVzZXJTdGFrZWQFCnVzZXJTdGFrZWQFB3NBbW91bnQJAM4IAgkBDHJlY2FsY1Jlc3VsdAEJAQEtAQUNdW5zdGFrZUFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQR1c2VyAgdfc3Rha2VkCQBlAgUKdXNlclN0YWtlZAUNdW5zdGFrZUFtb3VudAUDbmlsBAFpAQRpbml0AQZwb29sSWQEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wDCQAAAgkAzwgCBQp2YWxpZGF0b3JzCQClCAEIBQFpBmNhbGxlcgUEdW5pdAkAAgECDUFjY2VzcyBkZW5pZWQDCQAAAgULY3VycmVudFBvb2wCAAkAzAgCCQELU3RyaW5nRW50cnkCAgtjdXJyZW50UG9vbAUGcG9vbElkBQNuaWwFA25pbAFpAQlyZWJhbGFuY2UBBnBvb2xJZAQLY3VycmVudFBvb2wJAQl0cnlHZXRTdHICBQR0aGlzAgtjdXJyZW50UG9vbAMJAAACCQDPCAIFCnZhbGlkYXRvcnMJAKUIAQgFAWkGY2FsbGVyBQR1bml0CQACAQINQWNjZXNzIGRlbmllZAMJAAACBQtjdXJyZW50UG9vbAUGcG9vbElkCQACAQkArAICAhNBbHJlYWR5IHN1cHBsaWVkIHRvBQtjdXJyZW50UG9vbAQKd2l0aGRyYXdUeAkBDndpdGhkcmF3UmVzdWx0AAMJAAACBQp3aXRoZHJhd1R4BQp3aXRoZHJhd1R4CQDOCAIJAQxzdXBwbHlSZXN1bHQBBQZwb29sSWQJAQxyZWNhbGNSZXN1bHQBAAAJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEFc3Rha2UABAR1c2VyCQClCAEIBQFpBmNhbGxlcgQGYW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQLY3VycmVudFBvb2wJAQl0cnlHZXRTdHICBQR0aGlzAgtjdXJyZW50UG9vbAMDCQBnAgAABQZhbW91bnQGCQECIT0CCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJANkEAQUHYXNzZXRJZAkAAgECFmludmFsaWQgdG9rZW4gYXR0YWNoZWQDCQAAAgULY3VycmVudFBvb2wCAAkAAgECFFBvb2wgbm90IGluaXRpYWxpemVkCQDOCAIJAQtzdGFrZVJlc3VsdAIFBHVzZXIFBmFtb3VudAkBDHN1cHBseVJlc3VsdAEFC2N1cnJlbnRQb29sAWkBB3Vuc3Rha2UBBmFtb3VudAQEdXNlcgkApQgBCAUBaQZjYWxsZXIEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wEAnR4CQEWd2l0aGRyYXdGcm9tUHV6emxlUG9vbAIFC2N1cnJlbnRQb29sBQZhbW91bnQDCQAAAgUCdHgFAnR4CQDOCAIJAQ11bnN0YWtlUmVzdWx0AgUEdXNlcgUGYW1vdW50CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUGYW1vdW50CQDZBAEFB2Fzc2V0SWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXmHiM6Q",
    "height": 2341899,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 79PVBjAjRaf6UWWiH3bsvsjrKoEpGvXEk5yoR9omySVa
Next: FaF1r5e9nU1WtieWT2NrcRLjkdMXy6vjdbEQNAdQ48rt

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

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

github/deemru/w8io/169f3d6 
33.04 ms ◑