w8 · tx · Cht···36e

tx · ChtSv1AseKpKtu36yP5ZvmQnnUXbfv1EekzVwjGGh36e

3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh:  -0.00900000 Waves

2022.12.01 23:33 [2341748] smart account 3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "ChtSv1AseKpKtu36yP5ZvmQnnUXbfv1EekzVwjGGh36e",
    "fee": 900000,
    "feeAssetId": null,
    "timestamp": 1669926873937,
    "version": 2,
    "chainId": 84,
    "sender": "3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh",
    "senderPublicKey": "HscGVyJG5M3NMHWKfQbucCBsFLGPi8VmTxTAmcBbaWTa",
    "proofs": [
        "3wqLXKB82B9jrJ2tNBxLus7xzYTdjDhzxkKrv15Ui4YTim6wJxwcFRQ1vE4rqA1AfVC2DH9mBRk8kcEVknSXeF5b"
    ],
    "script": "base64:BgITCAISAwoBCBIDCgEIEgASAwoBARMABlNjYWxlNgDAhD0ABlNjYWxlOACAwtcvAAdTY2FsZTE2CQBoAgUGU2NhbGU4BQZTY2FsZTgACnZhbGlkYXRvcnMJAMwIAgIjM05BbXFHanhSQlJQb1JIWlVVcXZoaU5TNmF4bkdwaW5MSEMFA25pbAAHYXNzZXRJZAIsSEhtYUZRcFVvYndLeHpqejRFQ2FCUHRvRjY5a3VqS3dVMmNvemFVelRzZ3YAC3B1enpsZVBvb2xzCQDMCAICIzNONlN0SmRnbVRmQVJzUk5uOVh0NXJEWUVzM3ByNEtHeTF2BQNuaWwBCmdldEJhbGFuY2UBB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIEVW5pdAQBeAUHJG1hdGNoMAgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAPAHAgUEdGhpcwkBBXZhbHVlAQUHYXNzZXRJZAEJdHJ5R2V0SW50AgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAmggCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABCXRyeUdldFN0cgIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJ0IAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYgUHJG1hdGNoMAUBYgIAAQ5nZXRBc3NldFN0cmluZwEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFiBQckbWF0Y2gwCQDYBAEFAWICBVdBVkVTARtnZXRQdXp6bGVQb29sU3VwcGxpZWRBbW91bnQBBnBvb2xJZAQHYmFsYW5jZQkA8AcCCQEHQWRkcmVzcwEJANkEAQUGcG9vbElkCQDZBAEFB2Fzc2V0SWQFB2JhbGFuY2UBFmdldFRvdGFsU3VwcGxpZWRBbW91bnQABAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwkAAAIFC2N1cnJlbnRQb29sAgAJAAIBCQCsAgICGUNhbm5vdCBmaW5kIHBvb2wgd2l0aCBpZCAFC2N1cnJlbnRQb29sCQEbZ2V0UHV6emxlUG9vbFN1cHBsaWVkQW1vdW50AQULY3VycmVudFBvb2wBFndpdGhkcmF3RnJvbVB1enpsZVBvb2wCBnBvb2xJZAZhbW91bnQEC3Bvb2xBZGRyZXNzCQEHQWRkcmVzcwEJANkEAQUGcG9vbElkBAp3aXRoZHJhd1R4AwkAZgIFBmFtb3VudAAACQD8BwQFC3Bvb2xBZGRyZXNzAgh3aXRoZHJhdwkAzAgCBQdhc3NldElkCQDMCAIFBmFtb3VudAUDbmlsBQNuaWwCAAMJAAACBQp3aXRoZHJhd1R4BQp3aXRoZHJhd1R4BQp3aXRoZHJhd1R4CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQ5jYWxjdWxhdGVTUmF0ZQAEDmxhc3RDaGVja1NSYXRlCQEJdHJ5R2V0SW50AgUEdGhpcwIVZ2xvYmFsX2xhc3RDaGVja1NSYXRlBAxzdGFrZWRBbW91bnQJAQl0cnlHZXRJbnQCBQR0aGlzAg1nbG9iYWxfc3Rha2VkBBFsYXN0Q2hlY2tTQW1vdW51dAkAawMFDHN0YWtlZEFtb3VudAUObGFzdENoZWNrU1JhdGUFBlNjYWxlOAMJAAACBRFsYXN0Q2hlY2tTQW1vdW51dAAABQZTY2FsZTgEBXNSYXRlCQBrAwUObGFzdENoZWNrU1JhdGUJARZnZXRUb3RhbFN1cHBsaWVkQW1vdW50AAURbGFzdENoZWNrU0Ftb3VudXQDCQBmAgUGU2NhbGU4BQVzUmF0ZQUGU2NhbGU4BQVzUmF0ZQEMcmVjYWxjUmVzdWx0AQxzdGFrZWRDaGFuZ2UEDHN0YWtlZEFtb3VudAkBCXRyeUdldEludAIFBHRoaXMCDWdsb2JhbF9zdGFrZWQEBXNSYXRlCQEOY2FsY3VsYXRlU1JhdGUACQDMCAIJAQxJbnRlZ2VyRW50cnkCAg1nbG9iYWxfc3Rha2VkCQBkAgUMc3Rha2VkQW1vdW50BQxzdGFrZWRDaGFuZ2UJAMwIAgkBDEludGVnZXJFbnRyeQICFWdsb2JhbF9sYXN0Q2hlY2tTUmF0ZQUFc1JhdGUFA25pbAEMc3VwcGx5UmVzdWx0AQZwb29sSWQDCQAAAgkAzwgCBQtwdXp6bGVQb29scwUGcG9vbElkBQR1bml0CQACAQkArAICAg9Vbmtub3duIHBvb2xJZCAFBnBvb2xJZAQKYXNzZXRCeXRlcwkA2QQBBQdhc3NldElkBAdiYWxhbmNlCQEKZ2V0QmFsYW5jZQEFCmFzc2V0Qnl0ZXMEA2ludgkA/AcECQEHQWRkcmVzcwEJANkEAQUGcG9vbElkAgZzdXBwbHkFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUKYXNzZXRCeXRlcwUHYmFsYW5jZQUDbmlsAwkAAAIFA2ludgUDaW52CQDMCAIJAQtTdHJpbmdFbnRyeQICC2N1cnJlbnRQb29sBQZwb29sSWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEOd2l0aGRyYXdSZXN1bHQABAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwkAAAIFC2N1cnJlbnRQb29sAgAJAAIBCQCsAgICGUNhbm5vdCBmaW5kIHBvb2wgd2l0aCBpZCAFC2N1cnJlbnRQb29sBAZhbW91bnQJARtnZXRQdXp6bGVQb29sU3VwcGxpZWRBbW91bnQBBQtjdXJyZW50UG9vbAQCdHgJARZ3aXRoZHJhd0Zyb21QdXp6bGVQb29sAgULY3VycmVudFBvb2wFBmFtb3VudAMJAAACBQJ0eAUCdHgFAnR4CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQtzdGFrZVJlc3VsdAIEdXNlcgZhbW91bnQEB3NBbW91bnQJAGsDBQZhbW91bnQFBlNjYWxlOAkBDmNhbGN1bGF0ZVNSYXRlAAkAzggCCQEMcmVjYWxjUmVzdWx0AQUHc0Ftb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQR1c2VyAgdfc3Rha2VkCQBkAgkBCXRyeUdldEludAIFBHRoaXMJAKwCAgUEdXNlcgIHX3N0YWtlZAUHc0Ftb3VudAUDbmlsAQ11bnN0YWtlUmVzdWx0AgR1c2VyBmFtb3VudAQHc0Ftb3VudAkAawMFBmFtb3VudAUGU2NhbGU4CQEOY2FsY3VsYXRlU1JhdGUABAp1c2VyU3Rha2VkCQEJdHJ5R2V0SW50AgUEdGhpcwkArAICBQR1c2VyAgdfc3Rha2VkBA11bnN0YWtlQW1vdW50AwkAZgIFB3NBbW91bnQFCnVzZXJTdGFrZWQFCnVzZXJTdGFrZWQFB3NBbW91bnQJAM4IAgkBDHJlY2FsY1Jlc3VsdAEJAQEtAQUNdW5zdGFrZUFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQR1c2VyAgdfc3Rha2VkCQBlAgUKdXNlclN0YWtlZAUNdW5zdGFrZUFtb3VudAUDbmlsBAFpAQRpbml0AQZwb29sSWQEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wDCQAAAgkAzwgCBQp2YWxpZGF0b3JzCQClCAEIBQFpBmNhbGxlcgUEdW5pdAkAAgECDUFjY2VzcyBkZW5pZWQDCQAAAgULY3VycmVudFBvb2wCAAkAzAgCCQELU3RyaW5nRW50cnkCAgtjdXJyZW50UG9vbAUGcG9vbElkBQNuaWwFA25pbAFpAQlyZWJhbGFuY2UBBnBvb2xJZAQLY3VycmVudFBvb2wJAQl0cnlHZXRTdHICBQR0aGlzAgtjdXJyZW50UG9vbAMJAAACCQDPCAIFCnZhbGlkYXRvcnMJAKUIAQgFAWkGY2FsbGVyBQR1bml0CQACAQINQWNjZXNzIGRlbmllZAMJAAACBQtjdXJyZW50UG9vbAUGcG9vbElkCQACAQkArAICAhNBbHJlYWR5IHN1cHBsaWVkIHRvBQtjdXJyZW50UG9vbAQKd2l0aGRyYXdUeAkBDndpdGhkcmF3UmVzdWx0AAMJAAACBQp3aXRoZHJhd1R4BQp3aXRoZHJhd1R4CQDOCAIJAQxzdXBwbHlSZXN1bHQBBQZwb29sSWQJAQxyZWNhbGNSZXN1bHQBAAAJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEFc3Rha2UABAR1c2VyCQClCAEIBQFpBmNhbGxlcgQGYW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQLY3VycmVudFBvb2wJAQl0cnlHZXRTdHICBQR0aGlzAgtjdXJyZW50UG9vbAMDCQBnAgAABQZhbW91bnQGCQECIT0CCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJANkEAQUHYXNzZXRJZAkAAgECFmludmFsaWQgdG9rZW4gYXR0YWNoZWQDCQAAAgULY3VycmVudFBvb2wCAAkAAgECFFBvb2wgbm90IGluaXRpYWxpemVkCQDOCAIJAQtzdGFrZVJlc3VsdAIFBHVzZXIFBmFtb3VudAkBDHN1cHBseVJlc3VsdAEFC2N1cnJlbnRQb29sAWkBB3Vuc3Rha2UBBmFtb3VudAQEdXNlcgkApQgBCAUBaQZjYWxsZXIEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wEAnR4CQEWd2l0aGRyYXdGcm9tUHV6emxlUG9vbAIFC2N1cnJlbnRQb29sBQZhbW91bnQDCQAAAgUCdHgFAnR4CQDOCAIJAQ11bnN0YWtlUmVzdWx0AgUEdXNlcgUGYW1vdW50CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUGYW1vdW50CQDZBAEFB2Fzc2V0SWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXkuxZBd",
    "height": 2341748,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4CuLC9CLa76mqGzE5JGsAFmXKDGJf9Xr6ThwyGB3G6V5
Next: AV6LNnpCmZaQpp7FVdiCHf8cAJ2d9L7B2eDKPg6sF5Rc

Diff: 
Old New Differences
130 130      let unstakeAmount = if ((sAmount > userStaked))
131 131          then userStaked
132 132          else sAmount
133 -     (recalcResult(-(sAmount)) ++ [IntegerEntry((user + "_staked"), (userStaked - unstakeAmount))])
133 +     (recalcResult(-(unstakeAmount)) ++ [IntegerEntry((user + "_staked"), (userStaked - unstakeAmount))])
134 134      }
135 135  
136 136  
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 assetId = "HHmaFQpUobwKxzjz4ECaBPtoF69kujKwU2cozaUzTsgv"
13 13  
14 14  let puzzlePools = ["3N6StJdgmTfARsRNn9Xt5rDYEs3pr4KGy1v"]
15 15  
16 16  func getBalance (assetId) = match assetId {
17 17      case x: Unit => 
18 18          wavesBalance(this).available
19 19      case _ => 
20 20          assetBalance(this, value(assetId))
21 21  }
22 22  
23 23  
24 24  func tryGetInt (address,key) = match getInteger(address, key) {
25 25      case b: Int => 
26 26          b
27 27      case _ => 
28 28          0
29 29  }
30 30  
31 31  
32 32  func tryGetStr (address,key) = match getString(address, key) {
33 33      case b: String => 
34 34          b
35 35      case _ => 
36 36          ""
37 37  }
38 38  
39 39  
40 40  func getAssetString (assetId) = match assetId {
41 41      case b: ByteVector => 
42 42          toBase58String(b)
43 43      case _ => 
44 44          "WAVES"
45 45  }
46 46  
47 47  
48 48  func getPuzzlePoolSuppliedAmount (poolId) = {
49 49      let balance = assetBalance(Address(fromBase58String(poolId)), fromBase58String(assetId))
50 50      balance
51 51      }
52 52  
53 53  
54 54  func getTotalSuppliedAmount () = {
55 55      let currentPool = tryGetStr(this, "currentPool")
56 56      if ((currentPool == ""))
57 57          then throw(("Cannot find pool with id " + currentPool))
58 58          else getPuzzlePoolSuppliedAmount(currentPool)
59 59      }
60 60  
61 61  
62 62  func withdrawFromPuzzlePool (poolId,amount) = {
63 63      let poolAddress = Address(fromBase58String(poolId))
64 64      let withdrawTx = if ((amount > 0))
65 65          then invoke(poolAddress, "withdraw", [assetId, amount], nil)
66 66          else ""
67 67      if ((withdrawTx == withdrawTx))
68 68          then withdrawTx
69 69          else throw("Strict value is not equal to itself.")
70 70      }
71 71  
72 72  
73 73  func calculateSRate () = {
74 74      let lastCheckSRate = tryGetInt(this, "global_lastCheckSRate")
75 75      let stakedAmount = tryGetInt(this, "global_staked")
76 76      let lastCheckSAmounut = fraction(stakedAmount, lastCheckSRate, Scale8)
77 77      if ((lastCheckSAmounut == 0))
78 78          then Scale8
79 79          else {
80 80              let sRate = fraction(lastCheckSRate, getTotalSuppliedAmount(), lastCheckSAmounut)
81 81              if ((Scale8 > sRate))
82 82                  then Scale8
83 83                  else sRate
84 84              }
85 85      }
86 86  
87 87  
88 88  func recalcResult (stakedChange) = {
89 89      let stakedAmount = tryGetInt(this, "global_staked")
90 90      let sRate = calculateSRate()
91 91  [IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", sRate)]
92 92      }
93 93  
94 94  
95 95  func supplyResult (poolId) = if ((indexOf(puzzlePools, poolId) == unit))
96 96      then throw(("Unknown poolId " + poolId))
97 97      else {
98 98          let assetBytes = fromBase58String(assetId)
99 99          let balance = getBalance(assetBytes)
100 100          let inv = invoke(Address(fromBase58String(poolId)), "supply", nil, [AttachedPayment(assetBytes, balance)])
101 101          if ((inv == inv))
102 102              then [StringEntry("currentPool", poolId)]
103 103              else throw("Strict value is not equal to itself.")
104 104          }
105 105  
106 106  
107 107  func withdrawResult () = {
108 108      let currentPool = tryGetStr(this, "currentPool")
109 109      if ((currentPool == ""))
110 110          then throw(("Cannot find pool with id " + currentPool))
111 111          else {
112 112              let amount = getPuzzlePoolSuppliedAmount(currentPool)
113 113              let tx = withdrawFromPuzzlePool(currentPool, amount)
114 114              if ((tx == tx))
115 115                  then tx
116 116                  else throw("Strict value is not equal to itself.")
117 117              }
118 118      }
119 119  
120 120  
121 121  func stakeResult (user,amount) = {
122 122      let sAmount = fraction(amount, Scale8, calculateSRate())
123 123      (recalcResult(sAmount) ++ [IntegerEntry((user + "_staked"), (tryGetInt(this, (user + "_staked")) + sAmount))])
124 124      }
125 125  
126 126  
127 127  func unstakeResult (user,amount) = {
128 128      let sAmount = fraction(amount, Scale8, calculateSRate())
129 129      let userStaked = tryGetInt(this, (user + "_staked"))
130 130      let unstakeAmount = if ((sAmount > userStaked))
131 131          then userStaked
132 132          else sAmount
133 -     (recalcResult(-(sAmount)) ++ [IntegerEntry((user + "_staked"), (userStaked - unstakeAmount))])
133 +     (recalcResult(-(unstakeAmount)) ++ [IntegerEntry((user + "_staked"), (userStaked - unstakeAmount))])
134 134      }
135 135  
136 136  
137 137  @Callable(i)
138 138  func init (poolId) = {
139 139      let currentPool = tryGetStr(this, "currentPool")
140 140      if ((indexOf(validators, toString(i.caller)) == unit))
141 141          then throw("Access denied")
142 142          else if ((currentPool == ""))
143 143              then [StringEntry("currentPool", poolId)]
144 144              else nil
145 145      }
146 146  
147 147  
148 148  
149 149  @Callable(i)
150 150  func rebalance (poolId) = {
151 151      let currentPool = tryGetStr(this, "currentPool")
152 152      if ((indexOf(validators, toString(i.caller)) == unit))
153 153          then throw("Access denied")
154 154          else if ((currentPool == poolId))
155 155              then throw(("Already supplied to" + currentPool))
156 156              else {
157 157                  let withdrawTx = withdrawResult()
158 158                  if ((withdrawTx == withdrawTx))
159 159                      then (supplyResult(poolId) ++ recalcResult(0))
160 160                      else throw("Strict value is not equal to itself.")
161 161                  }
162 162      }
163 163  
164 164  
165 165  
166 166  @Callable(i)
167 167  func stake () = {
168 168      let user = toString(i.caller)
169 169      let amount = i.payments[0].amount
170 170      let currentPool = tryGetStr(this, "currentPool")
171 171      if (if ((0 >= amount))
172 172          then true
173 173          else (i.payments[0].assetId != fromBase58String(assetId)))
174 174          then throw("invalid token attached")
175 175          else if ((currentPool == ""))
176 176              then throw("Pool not initialized")
177 177              else (stakeResult(user, amount) ++ supplyResult(currentPool))
178 178      }
179 179  
180 180  
181 181  
182 182  @Callable(i)
183 183  func unstake (amount) = {
184 184      let user = toString(i.caller)
185 185      let currentPool = tryGetStr(this, "currentPool")
186 186      let tx = withdrawFromPuzzlePool(currentPool, amount)
187 187      if ((tx == tx))
188 188          then (unstakeResult(user, amount) ++ [ScriptTransfer(i.caller, amount, fromBase58String(assetId))])
189 189          else throw("Strict value is not equal to itself.")
190 190      }
191 191  
192 192  
193 193  @Verifier(tx)
194 194  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
195 195

Old	New		Differences
130	130		let unstakeAmount = if ((sAmount > userStaked))
131	131		then userStaked
132	132		else sAmount
133		-	(recalcResult(-(~~sAmount~~)) ++ [IntegerEntry((user + "_staked"), (userStaked - unstakeAmount))])
	133	+	(recalcResult(-(unstakeAmount)) ++ [IntegerEntry((user + "_staked"), (userStaked - unstakeAmount))])
134	134		}
135	135
136	136

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 assetId = "HHmaFQpUobwKxzjz4ECaBPtoF69kujKwU2cozaUzTsgv"
13	13
14	14		let puzzlePools = ["3N6StJdgmTfARsRNn9Xt5rDYEs3pr4KGy1v"]
15	15
16	16		func getBalance (assetId) = match assetId {
17	17		case x: Unit =>
18	18		wavesBalance(this).available
19	19		case _ =>
20	20		assetBalance(this, value(assetId))
21	21		}
22	22
23	23
24	24		func tryGetInt (address,key) = match getInteger(address, key) {
25	25		case b: Int =>
26	26		b
27	27		case _ =>
28	28		0
29	29		}
30	30
31	31
32	32		func tryGetStr (address,key) = match getString(address, key) {
33	33		case b: String =>
34	34		b
35	35		case _ =>
36	36		""
37	37		}
38	38
39	39
40	40		func getAssetString (assetId) = match assetId {
41	41		case b: ByteVector =>
42	42		toBase58String(b)
43	43		case _ =>
44	44		"WAVES"
45	45		}
46	46
47	47
48	48		func getPuzzlePoolSuppliedAmount (poolId) = {
49	49		let balance = assetBalance(Address(fromBase58String(poolId)), fromBase58String(assetId))
50	50		balance
51	51		}
52	52
53	53
54	54		func getTotalSuppliedAmount () = {
55	55		let currentPool = tryGetStr(this, "currentPool")
56	56		if ((currentPool == ""))
57	57		then throw(("Cannot find pool with id " + currentPool))
58	58		else getPuzzlePoolSuppliedAmount(currentPool)
59	59		}
60	60
61	61
62	62		func withdrawFromPuzzlePool (poolId,amount) = {
63	63		let poolAddress = Address(fromBase58String(poolId))
64	64		let withdrawTx = if ((amount > 0))
65	65		then invoke(poolAddress, "withdraw", [assetId, amount], nil)
66	66		else ""
67	67		if ((withdrawTx == withdrawTx))
68	68		then withdrawTx
69	69		else throw("Strict value is not equal to itself.")
70	70		}
71	71
72	72
73	73		func calculateSRate () = {
74	74		let lastCheckSRate = tryGetInt(this, "global_lastCheckSRate")
75	75		let stakedAmount = tryGetInt(this, "global_staked")
76	76		let lastCheckSAmounut = fraction(stakedAmount, lastCheckSRate, Scale8)
77	77		if ((lastCheckSAmounut == 0))
78	78		then Scale8
79	79		else {
80	80		let sRate = fraction(lastCheckSRate, getTotalSuppliedAmount(), lastCheckSAmounut)
81	81		if ((Scale8 > sRate))
82	82		then Scale8
83	83		else sRate
84	84		}
85	85		}
86	86
87	87
88	88		func recalcResult (stakedChange) = {
89	89		let stakedAmount = tryGetInt(this, "global_staked")
90	90		let sRate = calculateSRate()
91	91		[IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", sRate)]
92	92		}
93	93
94	94
95	95		func supplyResult (poolId) = if ((indexOf(puzzlePools, poolId) == unit))
96	96		then throw(("Unknown poolId " + poolId))
97	97		else {
98	98		let assetBytes = fromBase58String(assetId)
99	99		let balance = getBalance(assetBytes)
100	100		let inv = invoke(Address(fromBase58String(poolId)), "supply", nil, [AttachedPayment(assetBytes, balance)])
101	101		if ((inv == inv))
102	102		then [StringEntry("currentPool", poolId)]
103	103		else throw("Strict value is not equal to itself.")
104	104		}
105	105
106	106
107	107		func withdrawResult () = {
108	108		let currentPool = tryGetStr(this, "currentPool")
109	109		if ((currentPool == ""))
110	110		then throw(("Cannot find pool with id " + currentPool))
111	111		else {
112	112		let amount = getPuzzlePoolSuppliedAmount(currentPool)
113	113		let tx = withdrawFromPuzzlePool(currentPool, amount)
114	114		if ((tx == tx))
115	115		then tx
116	116		else throw("Strict value is not equal to itself.")
117	117		}
118	118		}
119	119
120	120
121	121		func stakeResult (user,amount) = {
122	122		let sAmount = fraction(amount, Scale8, calculateSRate())
123	123		(recalcResult(sAmount) ++ [IntegerEntry((user + "_staked"), (tryGetInt(this, (user + "_staked")) + sAmount))])
124	124		}
125	125
126	126
127	127		func unstakeResult (user,amount) = {
128	128		let sAmount = fraction(amount, Scale8, calculateSRate())
129	129		let userStaked = tryGetInt(this, (user + "_staked"))
130	130		let unstakeAmount = if ((sAmount > userStaked))
131	131		then userStaked
132	132		else sAmount
133		-	(recalcResult(-(~~sAmount~~)) ++ [IntegerEntry((user + "_staked"), (userStaked - unstakeAmount))])
	133	+	(recalcResult(-(unstakeAmount)) ++ [IntegerEntry((user + "_staked"), (userStaked - unstakeAmount))])
134	134		}
135	135
136	136
137	137		@Callable(i)
138	138		func init (poolId) = {
139	139		let currentPool = tryGetStr(this, "currentPool")
140	140		if ((indexOf(validators, toString(i.caller)) == unit))
141	141		then throw("Access denied")
142	142		else if ((currentPool == ""))
143	143		then [StringEntry("currentPool", poolId)]
144	144		else nil
145	145		}
146	146
147	147
148	148
149	149		@Callable(i)
150	150		func rebalance (poolId) = {
151	151		let currentPool = tryGetStr(this, "currentPool")
152	152		if ((indexOf(validators, toString(i.caller)) == unit))
153	153		then throw("Access denied")
154	154		else if ((currentPool == poolId))
155	155		then throw(("Already supplied to" + currentPool))
156	156		else {
157	157		let withdrawTx = withdrawResult()
158	158		if ((withdrawTx == withdrawTx))
159	159		then (supplyResult(poolId) ++ recalcResult(0))
160	160		else throw("Strict value is not equal to itself.")
161	161		}
162	162		}
163	163
164	164
165	165
166	166		@Callable(i)
167	167		func stake () = {
168	168		let user = toString(i.caller)
169	169		let amount = i.payments[0].amount
170	170		let currentPool = tryGetStr(this, "currentPool")
171	171		if (if ((0 >= amount))
172	172		then true
173	173		else (i.payments[0].assetId != fromBase58String(assetId)))
174	174		then throw("invalid token attached")
175	175		else if ((currentPool == ""))
176	176		then throw("Pool not initialized")
177	177		else (stakeResult(user, amount) ++ supplyResult(currentPool))
178	178		}
179	179
180	180
181	181
182	182		@Callable(i)
183	183		func unstake (amount) = {
184	184		let user = toString(i.caller)
185	185		let currentPool = tryGetStr(this, "currentPool")
186	186		let tx = withdrawFromPuzzlePool(currentPool, amount)
187	187		if ((tx == tx))
188	188		then (unstakeResult(user, amount) ++ [ScriptTransfer(i.caller, amount, fromBase58String(assetId))])
189	189		else throw("Strict value is not equal to itself.")
190	190		}
191	191
192	192
193	193		@Verifier(tx)
194	194		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
195	195

github/deemru/w8io/c3f4982 
30.38 ms ◑