w8 · tx · 2Fk···GgQ

tx · 2Fkxhf667NGGxfWfthkhKDEGnhUJfddZgBbeYveGkGgQ

3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh:  -0.00900000 Waves

2022.12.02 01:27 [2341865] smart account 3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2Fkxhf667NGGxfWfthkhKDEGnhUJfddZgBbeYveGkGgQ",
    "fee": 900000,
    "feeAssetId": null,
    "timestamp": 1669933644744,
    "version": 2,
    "chainId": 84,
    "sender": "3MwLW8P5yh5T2xML9QqFuVxkVkm9RXqnzXh",
    "senderPublicKey": "HscGVyJG5M3NMHWKfQbucCBsFLGPi8VmTxTAmcBbaWTa",
    "proofs": [
        "jLS1JkUgfvjjzdfS1DyZ2GS2FBDMXWH28Na9MTbdyw2k3vBpMFGEGJ2CeP9SWRaiUfRdy57EtX2o6t4YQqcWaeC"
    ],
    "script": "base64:BgITCAISAwoBCBIDCgEIEgASAwoBARQABlNjYWxlNgDAhD0ABlNjYWxlOACAwtcvAAdTY2FsZTE2CQBoAgUGU2NhbGU4BQZTY2FsZTgACnZhbGlkYXRvcnMJAMwIAgIjM05BbXFHanhSQlJQb1JIWlVVcXZoaU5TNmF4bkdwaW5MSEMFA25pbAATcG9maXRBY2NvdW50QWRkcmVzcwkBB0FkZHJlc3MBARoBVGSpz+Ou8Vl6LSUDrdpPEIjQb60KRx/EqQAHYXNzZXRJZAIsSEhtYUZRcFVvYndLeHpqejRFQ2FCUHRvRjY5a3VqS3dVMmNvemFVelRzZ3YAC3B1enpsZVBvb2xzCQDMCAICIzNONlN0SmRnbVRmQVJzUk5uOVh0NXJEWUVzM3ByNEtHeTF2BQNuaWwBCmdldEJhbGFuY2UBB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIEVW5pdAQBeAUHJG1hdGNoMAgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAPAHAgUEdGhpcwkBBXZhbHVlAQUHYXNzZXRJZAEJdHJ5R2V0SW50AgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAmggCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABCXRyeUdldFN0cgIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJ0IAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYgUHJG1hdGNoMAUBYgIAAQ5nZXRBc3NldFN0cmluZwEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFiBQckbWF0Y2gwCQDYBAEFAWICBVdBVkVTARtnZXRQdXp6bGVQb29sU3VwcGxpZWRBbW91bnQBBnBvb2xJZAQHYmFsYW5jZQkA8AcCCQEHQWRkcmVzcwEJANkEAQUGcG9vbElkCQDZBAEFB2Fzc2V0SWQFB2JhbGFuY2UBFmdldFRvdGFsU3VwcGxpZWRBbW91bnQABAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwkAAAIFC2N1cnJlbnRQb29sAgAJAAIBCQCsAgICGUNhbm5vdCBmaW5kIHBvb2wgd2l0aCBpZCAFC2N1cnJlbnRQb29sCQEbZ2V0UHV6emxlUG9vbFN1cHBsaWVkQW1vdW50AQULY3VycmVudFBvb2wBFndpdGhkcmF3RnJvbVB1enpsZVBvb2wCBnBvb2xJZAZhbW91bnQEC3Bvb2xBZGRyZXNzCQEHQWRkcmVzcwEJANkEAQUGcG9vbElkBAp3aXRoZHJhd1R4AwkAZgIFBmFtb3VudAAACQD8BwQFC3Bvb2xBZGRyZXNzAgh3aXRoZHJhdwkAzAgCBQdhc3NldElkCQDMCAIFBmFtb3VudAUDbmlsBQNuaWwCAAMJAAACBQp3aXRoZHJhd1R4BQp3aXRoZHJhd1R4BQp3aXRoZHJhd1R4CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQ5jYWxjdWxhdGVTUmF0ZQAEDmxhc3RDaGVja1NSYXRlCQEJdHJ5R2V0SW50AgUEdGhpcwIVZ2xvYmFsX2xhc3RDaGVja1NSYXRlBAxzdGFrZWRBbW91bnQJAQl0cnlHZXRJbnQCBQR0aGlzAg1nbG9iYWxfc3Rha2VkBBFsYXN0Q2hlY2tTQW1vdW51dAkAawMFDHN0YWtlZEFtb3VudAUObGFzdENoZWNrU1JhdGUFBlNjYWxlOAQTdG90YWxTdXBwbGllZEFtb3VudAkBFmdldFRvdGFsU3VwcGxpZWRBbW91bnQAAwkAAAIFEWxhc3RDaGVja1NBbW91bnV0AAAFBlNjYWxlOAQMdG90YWxTdXBsaWVkBRN0b3RhbFN1cHBsaWVkQW1vdW50BAVzUmF0ZQkAawMFDmxhc3RDaGVja1NSYXRlBQx0b3RhbFN1cGxpZWQFEWxhc3RDaGVja1NBbW91bnV0AwkAZgIFBlNjYWxlOAUFc1JhdGUFBlNjYWxlOAUFc1JhdGUBDHJlY2FsY1Jlc3VsdAEMc3Rha2VkQ2hhbmdlBAxzdGFrZWRBbW91bnQJAQl0cnlHZXRJbnQCBQR0aGlzAg1nbG9iYWxfc3Rha2VkBAVzUmF0ZQkBDmNhbGN1bGF0ZVNSYXRlAAkAzAgCCQEMSW50ZWdlckVudHJ5AgINZ2xvYmFsX3N0YWtlZAkAZAIFDHN0YWtlZEFtb3VudAUMc3Rha2VkQ2hhbmdlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhVnbG9iYWxfbGFzdENoZWNrU1JhdGUFBXNSYXRlBQNuaWwBDHN1cHBseVJlc3VsdAEGcG9vbElkAwkAAAIJAM8IAgULcHV6emxlUG9vbHMFBnBvb2xJZAUEdW5pdAkAAgEJAKwCAgIPVW5rbm93biBwb29sSWQgBQZwb29sSWQECmFzc2V0Qnl0ZXMJANkEAQUHYXNzZXRJZAQHYmFsYW5jZQkBCmdldEJhbGFuY2UBBQphc3NldEJ5dGVzBANpbnYJAPwHBAkBB0FkZHJlc3MBCQDZBAEFBnBvb2xJZAIGc3VwcGx5BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCmFzc2V0Qnl0ZXMFB2JhbGFuY2UFA25pbAMJAAACBQNpbnYFA2ludgkAzAgCCQELU3RyaW5nRW50cnkCAgtjdXJyZW50UG9vbAUGcG9vbElkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BDndpdGhkcmF3UmVzdWx0AAQLY3VycmVudFBvb2wJAQl0cnlHZXRTdHICBQR0aGlzAgtjdXJyZW50UG9vbAMJAAACBQtjdXJyZW50UG9vbAIACQACAQkArAICAhlDYW5ub3QgZmluZCBwb29sIHdpdGggaWQgBQtjdXJyZW50UG9vbAQGYW1vdW50CQEbZ2V0UHV6emxlUG9vbFN1cHBsaWVkQW1vdW50AQULY3VycmVudFBvb2wEAnR4CQEWd2l0aGRyYXdGcm9tUHV6emxlUG9vbAIFC2N1cnJlbnRQb29sBQZhbW91bnQDCQAAAgUCdHgFAnR4BQJ0eAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgELc3Rha2VSZXN1bHQCBHVzZXIGYW1vdW50BAdzQW1vdW50CQBrAwUGYW1vdW50BQZTY2FsZTgJAQ5jYWxjdWxhdGVTUmF0ZQAJAM4IAgkBDHJlY2FsY1Jlc3VsdAEFB3NBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEdXNlcgIHX3N0YWtlZAkAZAIJAQl0cnlHZXRJbnQCBQR0aGlzCQCsAgIFBHVzZXICB19zdGFrZWQFB3NBbW91bnQFA25pbAENdW5zdGFrZVJlc3VsdAIEdXNlcgZhbW91bnQEB3NBbW91bnQJAGsDBQZhbW91bnQFBlNjYWxlOAkBDmNhbGN1bGF0ZVNSYXRlAAQKdXNlclN0YWtlZAkBCXRyeUdldEludAIFBHRoaXMJAKwCAgUEdXNlcgIHX3N0YWtlZAQNdW5zdGFrZUFtb3VudAMJAGYCBQdzQW1vdW50BQp1c2VyU3Rha2VkBQp1c2VyU3Rha2VkBQdzQW1vdW50CQDOCAIJAQxyZWNhbGNSZXN1bHQBCQEBLQEFDXVuc3Rha2VBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEdXNlcgIHX3N0YWtlZAkAZQIFCnVzZXJTdGFrZWQFDXVuc3Rha2VBbW91bnQFA25pbAQBaQEEaW5pdAEGcG9vbElkBAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sAwkAAAIJAM8IAgUKdmFsaWRhdG9ycwkApQgBCAUBaQZjYWxsZXIFBHVuaXQJAAIBAg1BY2Nlc3MgZGVuaWVkAwkAAAIFC2N1cnJlbnRQb29sAgAJAMwIAgkBC1N0cmluZ0VudHJ5AgILY3VycmVudFBvb2wFBnBvb2xJZAUDbmlsBQNuaWwBaQEJcmViYWxhbmNlAQZwb29sSWQEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wDCQAAAgkAzwgCBQp2YWxpZGF0b3JzCQClCAEIBQFpBmNhbGxlcgUEdW5pdAkAAgECDUFjY2VzcyBkZW5pZWQDCQAAAgULY3VycmVudFBvb2wFBnBvb2xJZAkAAgEJAKwCAgITQWxyZWFkeSBzdXBwbGllZCB0bwULY3VycmVudFBvb2wECndpdGhkcmF3VHgJAQ53aXRoZHJhd1Jlc3VsdAADCQAAAgUKd2l0aGRyYXdUeAUKd2l0aGRyYXdUeAkAzggCCQEMc3VwcGx5UmVzdWx0AQUGcG9vbElkCQEMcmVjYWxjUmVzdWx0AQAACQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBBXN0YWtlAAQEdXNlcgkApQgBCAUBaQZjYWxsZXIEBmFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQEC2N1cnJlbnRQb29sCQEJdHJ5R2V0U3RyAgUEdGhpcwILY3VycmVudFBvb2wDAwkAZwIAAAUGYW1vdW50BgkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCQDZBAEFB2Fzc2V0SWQJAAIBAhZpbnZhbGlkIHRva2VuIGF0dGFjaGVkAwkAAAIFC2N1cnJlbnRQb29sAgAJAAIBAhRQb29sIG5vdCBpbml0aWFsaXplZAkAzggCCQELc3Rha2VSZXN1bHQCBQR1c2VyBQZhbW91bnQJAQxzdXBwbHlSZXN1bHQBBQtjdXJyZW50UG9vbAFpAQd1bnN0YWtlAQZhbW91bnQEBHVzZXIJAKUIAQgFAWkGY2FsbGVyBAtjdXJyZW50UG9vbAkBCXRyeUdldFN0cgIFBHRoaXMCC2N1cnJlbnRQb29sBAJ0eAkBFndpdGhkcmF3RnJvbVB1enpsZVBvb2wCBQtjdXJyZW50UG9vbAUGYW1vdW50AwkAAAIFAnR4BQJ0eAkAzggCCQENdW5zdGFrZVJlc3VsdAIFBHVzZXIFBmFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFBmFtb3VudAkA2QQBBQdhc3NldElkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5DyzSZg==",
    "height": 2341865,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7SuCJMShZiZ9cBUzC5E8j83YtgFzHgFkSBmpaX257wst
Next: 65roaXkivzfvJk5hy8imrW2AvJSYjGDpUhpb647KDMTs

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

Old	New		Differences
80	80		if ((lastCheckSAmounut == 0))
81	81		then Scale8
82	82		else {
83		-	let fee = fraction((totalSuppliedAmount - lastCheckSAmounut), 95000000, Scale8)
84		-	let totalSuplied = (totalSuppliedAmount - (if ((fee > 0))
85		-	then fee
86		-	else 0))
	83	+	let totalSuplied = totalSuppliedAmount
87	84		let sRate = fraction(lastCheckSRate, totalSuplied, lastCheckSAmounut)
88	85		if ((Scale8 > sRate))
89	86		then Scale8

95	92		func recalcResult (stakedChange) = {
96	93		let stakedAmount = tryGetInt(this, "global_staked")
97	94		let sRate = calculateSRate()
98		-	let profit = (getTotalSuppliedAmount() - fraction(stakedAmount, sRate, Scale8))
99		-	let profitAmount = if ((profit > 0))
100		-	then profit
101		-	else 0
102		-	[ScriptTransfer(pofitAccountAddress, profitAmount, fromBase58String(assetId)), IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", sRate)]
	95	+	[IntegerEntry("global_staked", (stakedAmount + stakedChange)), IntegerEntry("global_lastCheckSRate", sRate)]
103	96		}
104	97
105	98

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

github/deemru/w8io/c3f4982 
38.52 ms ◑