w8 · tx · 2u3···52o

tx · 2u3faHFP2Kn2Gsp5oiLk9QUFc3PhWj3ogPyf3PG5t52o

3MxovCV2pBS5Z6YEcj3Gap5ish6dX3YERfP:  -0.05000000 Waves

2022.11.09 21:00 [2309929] smart account 3MxovCV2pBS5Z6YEcj3Gap5ish6dX3YERfP > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2u3faHFP2Kn2Gsp5oiLk9QUFc3PhWj3ogPyf3PG5t52o",
    "fee": 5000000,
    "feeAssetId": null,
    "timestamp": 1668016866900,
    "version": 2,
    "chainId": 84,
    "sender": "3MxovCV2pBS5Z6YEcj3Gap5ish6dX3YERfP",
    "senderPublicKey": "6aZUzHaTgW7zPizjKqNFNAaKdYXVUaNwstd6E3NsD3YF",
    "proofs": [
        "36jTcEoJc5RihMJhhTYrpYBfJHS8Lfb6kYFzcyujJH6SQSLV1pko4727fCzAN7drZQxXVDXaraFooEKMRuXw6Fcx"
    ],
    "script": "base64:AAIFAAAAAAAAAA0IAhIDCgEIEgASABIAAAAAEwAAAAAJcHJlY2lzaW9uAA3gtrOnZAAAAQAAABNrZXlNYW5hZ2VyUHVibGljS2V5AAAAAAkABCIAAAABAgAAABBtYW5hZ2VyUHVibGljS2V5AQAAABZtYW5hZ2VyUHVibGljS2V5T3JVbml0AAAAAAQAAAAHJG1hdGNoMAkBAAAAE2tleU1hbmFnZXJQdWJsaWNLZXkAAAAAAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAXMFAAAAByRtYXRjaDAJAAJZAAAAAQUAAAABcwMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAEVW5pdAUAAAAEdW5pdAkAAAIAAAABAgAAAAtNYXRjaCBlcnJvcgEAAAALbXVzdE1hbmFnZXIAAAABAAAAAWkEAAAAAnBkCQAAAgAAAAECAAAAEXBlcm1pc3Npb24gZGVuaWVkBAAAAAckbWF0Y2gwCQEAAAAWbWFuYWdlclB1YmxpY0tleU9yVW5pdAAAAAADCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACkJ5dGVWZWN0b3IEAAAAAnBrBQAAAAckbWF0Y2gwAwkAAAAAAAACCAUAAAABaQAAAA9jYWxsZXJQdWJsaWNLZXkFAAAAAnBrBgUAAAACcGQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABFVuaXQDCQAAAAAAAAIIBQAAAAFpAAAABmNhbGxlcgUAAAAEdGhpcwYFAAAAAnBkCQAAAgAAAAECAAAAC01hdGNoIGVycm9yAQAAAA1tdXN0Tm90SW5pdGVkAAAAAAQAAAAHJG1hdGNoMAkABCAAAAABAgAAAAZpbml0ZWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAB0Jvb2xlYW4EAAAABmluaXRlZAUAAAAHJG1hdGNoMAMJAAAAAAAAAgUAAAAGaW5pdGVkBwYJAAACAAAAAQIAAAAOQWxyZWFkeSBpbml0ZWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABFVuaXQHCQAAAgAAAAECAAAAC01hdGNoIGVycm9yAQAAAAtjYW5jZWxMZWFzZQAAAAAEAAAAByRtYXRjaDAJAAQhAAAAAQIAAAAHbGVhc2VJZAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAKQnl0ZVZlY3RvcgQAAAACaWQFAAAAByRtYXRjaDAJAARMAAAAAgkBAAAAC0xlYXNlQ2FuY2VsAAAAAQUAAAACaWQJAARMAAAAAgkBAAAAC0RlbGV0ZUVudHJ5AAAAAQIAAAAHbGVhc2VJZAUAAAADbmlsAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAARVbml0BQAAAANuaWwJAAACAAAAAQIAAAALTWF0Y2ggZXJyb3IBAAAACmdldEJhbGFuY2UAAAAACQEAAAALdmFsdWVPckVsc2UAAAACCQAEHwAAAAECAAAAB2JhbGFuY2UAAAAAAAAAAAABAAAACnNldEJhbGFuY2UAAAABAAAABmFtb3VudAkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAB2JhbGFuY2UFAAAABmFtb3VudAEAAAAFbGVhc2UAAAABAAAABmFtb3VudAMJAAAAAAAAAgUAAAAGYW1vdW50AAAAAAAAAAAABQAAAANuaWwEAAAADWxlYXNlckFkZHJlc3MJAQAAAAdBZGRyZXNzAAAAAQkAAlkAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1OCkAAAABAgAAAA1sZWFzZXJBZGRyZXNzBAAAAA1jdXJyZW50QW1vdW50CQEAAAAKZ2V0QmFsYW5jZQAAAAAEAAAACW5ld0Ftb3VudAkAAGQAAAACBQAAAA1jdXJyZW50QW1vdW50BQAAAAZhbW91bnQEAAAADGxlYXNlQWN0aW9ucwMJAABmAAAAAgUAAAAJbmV3QW1vdW50AAAAAAAAAAAABAAAAAhuZXdMZWFzZQkABEQAAAACBQAAAA1sZWFzZXJBZGRyZXNzBQAAAAluZXdBbW91bnQEAAAACm5ld0xlYXNlSWQJAAQ5AAAAAQUAAAAIbmV3TGVhc2UJAARMAAAAAgUAAAAIbmV3TGVhc2UJAARMAAAAAgkBAAAAC0JpbmFyeUVudHJ5AAAAAgIAAAAHbGVhc2VJZAUAAAAKbmV3TGVhc2VJZAUAAAADbmlsBQAAAANuaWwJAARNAAAAAgkABE4AAAACCQEAAAALY2FuY2VsTGVhc2UAAAAABQAAAAxsZWFzZUFjdGlvbnMJAQAAAApzZXRCYWxhbmNlAAAAAQUAAAAJbmV3QW1vdW50AQAAAAtpc3N1ZVNXYXZlcwAAAAEAAAAGYW1vdW50BAAAAA1zV2F2ZXNBc3NldElkCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDU4KQAAAAECAAAADXNXYXZlc0Fzc2V0SWQJAQAAAAdSZWlzc3VlAAAAAwUAAAANc1dhdmVzQXNzZXRJZAUAAAAGYW1vdW50BgEAAAAKYnVyblNXYXZlcwAAAAEAAAAGYW1vdW50BAAAAA1zV2F2ZXNBc3NldElkCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDU4KQAAAAECAAAADXNXYXZlc0Fzc2V0SWQJAQAAAARCdXJuAAAAAgUAAAANc1dhdmVzQXNzZXRJZAUAAAAGYW1vdW50AQAAAApzZW5kU1dhdmVzAAAAAgAAAAlyZWNpcGllbnQAAAAGYW1vdW50BAAAAA1zV2F2ZXNBc3NldElkCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDU4KQAAAAECAAAADXNXYXZlc0Fzc2V0SWQJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAACXJlY2lwaWVudAUAAAAGYW1vdW50BQAAAA1zV2F2ZXNBc3NldElkAQAAAAlzZW5kV2F2ZXMAAAACAAAACXJlY2lwaWVudAAAAAZhbW91bnQJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAACXJlY2lwaWVudAUAAAAGYW1vdW50BQAAAAR1bml0AQAAAA5zV2F2ZXNRdWFudGl0eQAAAAAEAAAAB2Fzc2V0SWQJAAJZAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTgpAAAAAQIAAAANc1dhdmVzQXNzZXRJZAQAAAAHJG1hdGNoMAkAA+wAAAABBQAAAAdhc3NldElkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAVBc3NldAQAAAAFYXNzZXQFAAAAByRtYXRjaDAIBQAAAAVhc3NldAAAAAhxdWFudGl0eQkAAAIAAAABAgAAABBDYW4ndCBmaW5kIGFzc2V0AQAAAA5nZXRFeGNlc3NXYXZlcwAAAAAEAAAADWxlYXNlckFkZHJlc3MJAQAAAAdBZGRyZXNzAAAAAQkAAlkAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA1OCkAAAABAgAAAA1sZWFzZXJBZGRyZXNzCAkAA+8AAAABBQAAAA1sZWFzZXJBZGRyZXNzAAAAB3JlZ3VsYXIBAAAAB3NldFJhdGUAAAACAAAABHJhdGUAAAAKZ3Jvd3RoUmF0ZQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAIbGFzdFJhdGUFAAAABHJhdGUJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAADWxhc3RUaW1lc3RhbXAIBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAApncm93dGhSYXRlBQAAAApncm93dGhSYXRlBQAAAANuaWwBAAAACHdpdGhkcmF3AAAAAAQAAAAMbWluZXJBZGRyZXNzCQEAAAAHQWRkcmVzcwAAAAEJAAJZAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTgpAAAAAQIAAAANbGVhc2VyQWRkcmVzcwQAAAAGcmVzdWx0CQAD/AAAAAQFAAAADG1pbmVyQWRkcmVzcwIAAAAId2l0aGRyYXcFAAAAA25pbAUAAAADbmlsAwkAAAAAAAACBQAAAAZyZXN1bHQFAAAABnJlc3VsdAUAAAAGcmVzdWx0CQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEAAAALY3VycmVudFJhdGUAAAABAAAAAmR0CQAAZAAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDU1KQAAAAECAAAACGxhc3RSYXRlCQAAaAAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDU1KQAAAAECAAAACmdyb3d0aFJhdGUFAAAAAmR0AQAAABhnZXRDb21wb3VuZFRpbWVzdGFtcERpZmYAAAAACQAAZQAAAAIIBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wCQEAAAARQGV4dHJOYXRpdmUoMTA1NSkAAAABAgAAAA1sYXN0VGltZXN0YW1wAAAABAAAAAFpAQAAAARpbml0AAAAAQAAAA1sZWFzZXJBZGRyZXNzBAAAAAZjaGVja3MJAARMAAAAAgkBAAAAC211c3RNYW5hZ2VyAAAAAQUAAAABaQkABEwAAAACCQEAAAANbXVzdE5vdEluaXRlZAAAAAAFAAAAA25pbAMJAAAAAAAAAgUAAAAGY2hlY2tzBQAAAAZjaGVja3MEAAAABnNXYXZlcwkABEMAAAAHAgAAAAZzV2F2ZXMCAAAAAAAAAAAAAAAAAAAAAAAAAAAACAYFAAAABHVuaXQAAAAAAAAAAAAEAAAADXNXYXZlc0Fzc2V0SWQJAAQ4AAAAAQUAAAAGc1dhdmVzCQAETAAAAAIJAQAAAAxCb29sZWFuRW50cnkAAAACAgAAAAZpbml0ZWQGCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAICAAAADXNXYXZlc0Fzc2V0SWQJAAJYAAAAAQUAAAANc1dhdmVzQXNzZXRJZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACAgAAAA1sZWFzZXJBZGRyZXNzBQAAAA1sZWFzZXJBZGRyZXNzCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAhsYXN0UmF0ZQUAAAAJcHJlY2lzaW9uCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAA1sYXN0VGltZXN0YW1wCAUAAAAJbGFzdEJsb2NrAAAACXRpbWVzdGFtcAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAKZ3Jvd3RoUmF0ZQAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAHYmFsYW5jZQAAAAAAAAAAAAkABEwAAAACBQAAAAZzV2F2ZXMFAAAAA25pbAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAABaQEAAAAIY29tcG91bmQAAAAABAAAAAJkdAkBAAAAGGdldENvbXBvdW5kVGltZXN0YW1wRGlmZgAAAAAEAAAAC3NXYXZlc1RvdGFsCQEAAAAOc1dhdmVzUXVhbnRpdHkAAAAAAwMJAAAAAAAAAgUAAAACZHQAAAAAAAAAAAAGCQAAAAAAAAIFAAAAC3NXYXZlc1RvdGFsAAAAAAAAAAAABQAAAANuaWwEAAAABHJhdGUJAQAAAAtjdXJyZW50UmF0ZQAAAAEFAAAAAmR0BAAAAAtleGNlc3NXYXZlcwkBAAAADmdldEV4Y2Vzc1dhdmVzAAAAAAMJAAAAAAAAAgUAAAALZXhjZXNzV2F2ZXMFAAAAC2V4Y2Vzc1dhdmVzBAAAAApncm93dGhSYXRlCQAAaQAAAAIJAABrAAAAAwUAAAALZXhjZXNzV2F2ZXMFAAAACXByZWNpc2lvbgUAAAALc1dhdmVzVG90YWwFAAAAAmR0BAAAAA53aXRoZHJhd1Jlc3VsdAkBAAAACHdpdGhkcmF3AAAAAAMJAAAAAAAAAgUAAAAOd2l0aGRyYXdSZXN1bHQFAAAADndpdGhkcmF3UmVzdWx0CQAETgAAAAIJAQAAAAVsZWFzZQAAAAEFAAAAC2V4Y2Vzc1dhdmVzCQEAAAAHc2V0UmF0ZQAAAAIFAAAABHJhdGUFAAAACmdyb3d0aFJhdGUJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFpAQAAAAVzdGFrZQAAAAAEAAAAB3BheW1lbnQJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAADCQEAAAACIT0AAAACCAUAAAAHcGF5bWVudAAAAAdhc3NldElkBQAAAAR1bml0CQAAAgAAAAECAAAAFE9ubHkgV0FWRVMgc3VwcG9ydGVkAwkBAAAAAiE9AAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQkAAAIAAAABAgAAABVXcm9uZyBwYXltZW50cyBhbW91bnQEAAAAAmR0CQEAAAAYZ2V0Q29tcG91bmRUaW1lc3RhbXBEaWZmAAAAAAQAAAAEcmF0ZQkBAAAAC2N1cnJlbnRSYXRlAAAAAQUAAAACZHQEAAAACXRvUmVpc3N1ZQkAAGsAAAADCAUAAAAHcGF5bWVudAAAAAZhbW91bnQFAAAACXByZWNpc2lvbgUAAAAEcmF0ZQQAAAAGcmVzdWx0CQAD/AAAAAQFAAAABHRoaXMCAAAACGNvbXBvdW5kBQAAAANuaWwFAAAAA25pbAMJAAAAAAAAAgUAAAAGcmVzdWx0BQAAAAZyZXN1bHQJAARNAAAAAgkABE0AAAACCQEAAAAFbGVhc2UAAAABCAUAAAAHcGF5bWVudAAAAAZhbW91bnQJAQAAAAtpc3N1ZVNXYXZlcwAAAAEFAAAACXRvUmVpc3N1ZQkBAAAACnNlbmRTV2F2ZXMAAAACCAUAAAABaQAAAAZjYWxsZXIFAAAACXRvUmVpc3N1ZQkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAABaQEAAAAHdW5zdGFrZQAAAAAEAAAAB3BheW1lbnQJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAADXNXYXZlc0Fzc2V0SWQJAAJZAAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNTgpAAAAAQIAAAANc1dhdmVzQXNzZXRJZAMJAQAAAAIhPQAAAAIIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQFAAAADXNXYXZlc0Fzc2V0SWQJAAACAAAAAQIAAAAVT25seSBzV0FWRVMgc3VwcG9ydGVkAwkBAAAAAiE9AAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQkAAAIAAAABAgAAABVXcm9uZyBwYXltZW50cyBhbW91bnQEAAAAAmR0CQEAAAAYZ2V0Q29tcG91bmRUaW1lc3RhbXBEaWZmAAAAAAQAAAAEcmF0ZQkBAAAAC2N1cnJlbnRSYXRlAAAAAQUAAAACZHQEAAAADnRyYW5zZmVyQW1vdW50CQAAawAAAAMIBQAAAAdwYXltZW50AAAABmFtb3VudAUAAAAEcmF0ZQUAAAAJcHJlY2lzaW9uBAAAAAZyZXN1bHQJAAP8AAAABAUAAAAEdGhpcwIAAAAIY29tcG91bmQFAAAAA25pbAUAAAADbmlsAwkAAAAAAAACBQAAAAZyZXN1bHQFAAAABnJlc3VsdAkABE0AAAACCQAETQAAAAIJAQAAAAVsZWFzZQAAAAEJAQAAAAEtAAAAAQUAAAAOdHJhbnNmZXJBbW91bnQJAQAAAApidXJuU1dhdmVzAAAAAQgFAAAAB3BheW1lbnQAAAAGYW1vdW50CQEAAAAJc2VuZFdhdmVzAAAAAggFAAAAAWkAAAAGY2FsbGVyBQAAAA50cmFuc2ZlckFtb3VudAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAACQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAAAnR4AAAAD3NlbmRlclB1YmxpY0tleZJfT0Q=",
    "height": 2309929,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6ZAaHhj1he28UkFKT3YcTsLXLfvhizgYniWba3Rkta6x
Next: D4fQUVJCGNPLJ4gUXXZ5QLPw5VAW9t1oR3QgjPhHYvgm

Diff: 
Old New Differences
159 159          else {
160 160              let rate = currentRate(dt)
161 161              let excessWaves = getExcessWaves()
162 -             let growthRate = (fraction(excessWaves, precision, sWavesTotal) / dt)
163 -             let withdrawResult = withdraw()
164 -             if ((withdrawResult == withdrawResult))
165 -                 then (lease(excessWaves) ++ setRate(rate, growthRate))
162 +             if ((excessWaves == excessWaves))
163 +                 then {
164 +                     let growthRate = (fraction(excessWaves, precision, sWavesTotal) / dt)
165 +                     let withdrawResult = withdraw()
166 +                     if ((withdrawResult == withdrawResult))
167 +                         then (lease(excessWaves) ++ setRate(rate, growthRate))
168 +                         else throw("Strict value is not equal to itself.")
169 +                     }
166 170                  else throw("Strict value is not equal to itself.")
167 171              }
168 172      }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let precision = 1000000000000000000
5 5  
6 6  func keyManagerPublicKey () = getString("managerPublicKey")
7 7  
8 8  
9 9  func managerPublicKeyOrUnit () = match keyManagerPublicKey() {
10 10      case s: String => 
11 11          fromBase58String(s)
12 12      case _: Unit => 
13 13          unit
14 14      case _ => 
15 15          throw("Match error")
16 16  }
17 17  
18 18  
19 19  func mustManager (i) = {
20 20      let pd = throw("permission denied")
21 21      match managerPublicKeyOrUnit() {
22 22          case pk: ByteVector => 
23 23              if ((i.callerPublicKey == pk))
24 24                  then true
25 25                  else pd
26 26          case _: Unit => 
27 27              if ((i.caller == this))
28 28                  then true
29 29                  else pd
30 30          case _ => 
31 31              throw("Match error")
32 32      }
33 33      }
34 34  
35 35  
36 36  func mustNotInited () = match getBoolean("inited") {
37 37      case inited: Boolean => 
38 38          if ((inited == false))
39 39              then true
40 40              else throw("Already inited")
41 41      case _: Unit => 
42 42          false
43 43      case _ => 
44 44          throw("Match error")
45 45  }
46 46  
47 47  
48 48  func cancelLease () = match getBinary("leaseId") {
49 49      case id: ByteVector => 
50 50  [LeaseCancel(id), DeleteEntry("leaseId")]
51 51      case _: Unit => 
52 52          nil
53 53      case _ => 
54 54          throw("Match error")
55 55  }
56 56  
57 57  
58 58  func getBalance () = valueOrElse(getInteger("balance"), 0)
59 59  
60 60  
61 61  func setBalance (amount) = IntegerEntry("balance", amount)
62 62  
63 63  
64 64  func lease (amount) = if ((amount == 0))
65 65      then nil
66 66      else {
67 67          let leaserAddress = Address(fromBase58String(getStringValue("leaserAddress")))
68 68          let currentAmount = getBalance()
69 69          let newAmount = (currentAmount + amount)
70 70          let leaseActions = if ((newAmount > 0))
71 71              then {
72 72                  let newLease = Lease(leaserAddress, newAmount)
73 73                  let newLeaseId = calculateLeaseId(newLease)
74 74  [newLease, BinaryEntry("leaseId", newLeaseId)]
75 75                  }
76 76              else nil
77 77          ((cancelLease() ++ leaseActions) :+ setBalance(newAmount))
78 78          }
79 79  
80 80  
81 81  func issueSWaves (amount) = {
82 82      let sWavesAssetId = fromBase58String(getStringValue("sWavesAssetId"))
83 83      Reissue(sWavesAssetId, amount, true)
84 84      }
85 85  
86 86  
87 87  func burnSWaves (amount) = {
88 88      let sWavesAssetId = fromBase58String(getStringValue("sWavesAssetId"))
89 89      Burn(sWavesAssetId, amount)
90 90      }
91 91  
92 92  
93 93  func sendSWaves (recipient,amount) = {
94 94      let sWavesAssetId = fromBase58String(getStringValue("sWavesAssetId"))
95 95      ScriptTransfer(recipient, amount, sWavesAssetId)
96 96      }
97 97  
98 98  
99 99  func sendWaves (recipient,amount) = ScriptTransfer(recipient, amount, unit)
100 100  
101 101  
102 102  func sWavesQuantity () = {
103 103      let assetId = fromBase58String(getStringValue("sWavesAssetId"))
104 104      match assetInfo(assetId) {
105 105          case asset: Asset => 
106 106              asset.quantity
107 107          case _ => 
108 108              throw("Can't find asset")
109 109      }
110 110      }
111 111  
112 112  
113 113  func getExcessWaves () = {
114 114      let leaserAddress = Address(fromBase58String(getStringValue("leaserAddress")))
115 115      wavesBalance(leaserAddress).regular
116 116      }
117 117  
118 118  
119 119  func setRate (rate,growthRate) = [IntegerEntry("lastRate", rate), IntegerEntry("lastTimestamp", lastBlock.timestamp), IntegerEntry("growthRate", growthRate)]
120 120  
121 121  
122 122  func withdraw () = {
123 123      let minerAddress = Address(fromBase58String(getStringValue("leaserAddress")))
124 124      let result = invoke(minerAddress, "withdraw", nil, nil)
125 125      if ((result == result))
126 126          then result
127 127          else throw("Strict value is not equal to itself.")
128 128      }
129 129  
130 130  
131 131  func currentRate (dt) = (getIntegerValue("lastRate") + (getIntegerValue("growthRate") * dt))
132 132  
133 133  
134 134  func getCompoundTimestampDiff () = (lastBlock.timestamp - getIntegerValue("lastTimestamp"))
135 135  
136 136  
137 137  @Callable(i)
138 138  func init (leaserAddress) = {
139 139      let checks = [mustManager(i), mustNotInited()]
140 140      if ((checks == checks))
141 141          then {
142 142              let sWaves = Issue("sWaves", "", 0, 8, true, unit, 0)
143 143              let sWavesAssetId = calculateAssetId(sWaves)
144 144  [BooleanEntry("inited", true), StringEntry("sWavesAssetId", toBase58String(sWavesAssetId)), StringEntry("leaserAddress", leaserAddress), IntegerEntry("lastRate", precision), IntegerEntry("lastTimestamp", lastBlock.timestamp), IntegerEntry("growthRate", 0), IntegerEntry("balance", 0), sWaves]
145 145              }
146 146          else throw("Strict value is not equal to itself.")
147 147      }
148 148  
149 149  
150 150  
151 151  @Callable(i)
152 152  func compound () = {
153 153      let dt = getCompoundTimestampDiff()
154 154      let sWavesTotal = sWavesQuantity()
155 155      if (if ((dt == 0))
156 156          then true
157 157          else (sWavesTotal == 0))
158 158          then nil
159 159          else {
160 160              let rate = currentRate(dt)
161 161              let excessWaves = getExcessWaves()
162 -             let growthRate = (fraction(excessWaves, precision, sWavesTotal) / dt)
163 -             let withdrawResult = withdraw()
164 -             if ((withdrawResult == withdrawResult))
165 -                 then (lease(excessWaves) ++ setRate(rate, growthRate))
162 +             if ((excessWaves == excessWaves))
163 +                 then {
164 +                     let growthRate = (fraction(excessWaves, precision, sWavesTotal) / dt)
165 +                     let withdrawResult = withdraw()
166 +                     if ((withdrawResult == withdrawResult))
167 +                         then (lease(excessWaves) ++ setRate(rate, growthRate))
168 +                         else throw("Strict value is not equal to itself.")
169 +                     }
166 170                  else throw("Strict value is not equal to itself.")
167 171              }
168 172      }
169 173  
170 174  
171 175  
172 176  @Callable(i)
173 177  func stake () = {
174 178      let payment = i.payments[0]
175 179      if ((payment.assetId != unit))
176 180          then throw("Only WAVES supported")
177 181          else if ((size(i.payments) != 1))
178 182              then throw("Wrong payments amount")
179 183              else {
180 184                  let dt = getCompoundTimestampDiff()
181 185                  let rate = currentRate(dt)
182 186                  let toReissue = fraction(payment.amount, precision, rate)
183 187                  let result = invoke(this, "compound", nil, nil)
184 188                  if ((result == result))
185 189                      then ((lease(payment.amount) :+ issueSWaves(toReissue)) :+ sendSWaves(i.caller, toReissue))
186 190                      else throw("Strict value is not equal to itself.")
187 191                  }
188 192      }
189 193  
190 194  
191 195  
192 196  @Callable(i)
193 197  func unstake () = {
194 198      let payment = i.payments[0]
195 199      let sWavesAssetId = fromBase58String(getStringValue("sWavesAssetId"))
196 200      if ((payment.assetId != sWavesAssetId))
197 201          then throw("Only sWAVES supported")
198 202          else if ((size(i.payments) != 1))
199 203              then throw("Wrong payments amount")
200 204              else {
201 205                  let dt = getCompoundTimestampDiff()
202 206                  let rate = currentRate(dt)
203 207                  let transferAmount = fraction(payment.amount, rate, precision)
204 208                  let result = invoke(this, "compound", nil, nil)
205 209                  if ((result == result))
206 210                      then ((lease(-(transferAmount)) :+ burnSWaves(payment.amount)) :+ sendWaves(i.caller, transferAmount))
207 211                      else throw("Strict value is not equal to itself.")
208 212                  }
209 213      }
210 214  
211 215  
212 216  @Verifier(tx)
213 217  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
214 218

Old	New		Differences
159	159		else {
160	160		let rate = currentRate(dt)
161	161		let excessWaves = getExcessWaves()
162		-	let growthRate = (fraction(excessWaves, precision, sWavesTotal) / dt)
163		-	let withdrawResult = withdraw()
164		-	if ((withdrawResult == withdrawResult))
165		-	then (lease(excessWaves) ++ setRate(rate, growthRate))
	162	+	if ((excessWaves == excessWaves))
	163	+	then {
	164	+	let growthRate = (fraction(excessWaves, precision, sWavesTotal) / dt)
	165	+	let withdrawResult = withdraw()
	166	+	if ((withdrawResult == withdrawResult))
	167	+	then (lease(excessWaves) ++ setRate(rate, growthRate))
	168	+	else throw("Strict value is not equal to itself.")
	169	+	}
166	170		else throw("Strict value is not equal to itself.")
167	171		}
168	172		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let precision = 1000000000000000000
5	5
6	6		func keyManagerPublicKey () = getString("managerPublicKey")
7	7
8	8
9	9		func managerPublicKeyOrUnit () = match keyManagerPublicKey() {
10	10		case s: String =>
11	11		fromBase58String(s)
12	12		case _: Unit =>
13	13		unit
14	14		case _ =>
15	15		throw("Match error")
16	16		}
17	17
18	18
19	19		func mustManager (i) = {
20	20		let pd = throw("permission denied")
21	21		match managerPublicKeyOrUnit() {
22	22		case pk: ByteVector =>
23	23		if ((i.callerPublicKey == pk))
24	24		then true
25	25		else pd
26	26		case _: Unit =>
27	27		if ((i.caller == this))
28	28		then true
29	29		else pd
30	30		case _ =>
31	31		throw("Match error")
32	32		}
33	33		}
34	34
35	35
36	36		func mustNotInited () = match getBoolean("inited") {
37	37		case inited: Boolean =>
38	38		if ((inited == false))
39	39		then true
40	40		else throw("Already inited")
41	41		case _: Unit =>
42	42		false
43	43		case _ =>
44	44		throw("Match error")
45	45		}
46	46
47	47
48	48		func cancelLease () = match getBinary("leaseId") {
49	49		case id: ByteVector =>
50	50		[LeaseCancel(id), DeleteEntry("leaseId")]
51	51		case _: Unit =>
52	52		nil
53	53		case _ =>
54	54		throw("Match error")
55	55		}
56	56
57	57
58	58		func getBalance () = valueOrElse(getInteger("balance"), 0)
59	59
60	60
61	61		func setBalance (amount) = IntegerEntry("balance", amount)
62	62
63	63
64	64		func lease (amount) = if ((amount == 0))
65	65		then nil
66	66		else {
67	67		let leaserAddress = Address(fromBase58String(getStringValue("leaserAddress")))
68	68		let currentAmount = getBalance()
69	69		let newAmount = (currentAmount + amount)
70	70		let leaseActions = if ((newAmount > 0))
71	71		then {
72	72		let newLease = Lease(leaserAddress, newAmount)
73	73		let newLeaseId = calculateLeaseId(newLease)
74	74		[newLease, BinaryEntry("leaseId", newLeaseId)]
75	75		}
76	76		else nil
77	77		((cancelLease() ++ leaseActions) :+ setBalance(newAmount))
78	78		}
79	79
80	80
81	81		func issueSWaves (amount) = {
82	82		let sWavesAssetId = fromBase58String(getStringValue("sWavesAssetId"))
83	83		Reissue(sWavesAssetId, amount, true)
84	84		}
85	85
86	86
87	87		func burnSWaves (amount) = {
88	88		let sWavesAssetId = fromBase58String(getStringValue("sWavesAssetId"))
89	89		Burn(sWavesAssetId, amount)
90	90		}
91	91
92	92
93	93		func sendSWaves (recipient,amount) = {
94	94		let sWavesAssetId = fromBase58String(getStringValue("sWavesAssetId"))
95	95		ScriptTransfer(recipient, amount, sWavesAssetId)
96	96		}
97	97
98	98
99	99		func sendWaves (recipient,amount) = ScriptTransfer(recipient, amount, unit)
100	100
101	101
102	102		func sWavesQuantity () = {
103	103		let assetId = fromBase58String(getStringValue("sWavesAssetId"))
104	104		match assetInfo(assetId) {
105	105		case asset: Asset =>
106	106		asset.quantity
107	107		case _ =>
108	108		throw("Can't find asset")
109	109		}
110	110		}
111	111
112	112
113	113		func getExcessWaves () = {
114	114		let leaserAddress = Address(fromBase58String(getStringValue("leaserAddress")))
115	115		wavesBalance(leaserAddress).regular
116	116		}
117	117
118	118
119	119		func setRate (rate,growthRate) = [IntegerEntry("lastRate", rate), IntegerEntry("lastTimestamp", lastBlock.timestamp), IntegerEntry("growthRate", growthRate)]
120	120
121	121
122	122		func withdraw () = {
123	123		let minerAddress = Address(fromBase58String(getStringValue("leaserAddress")))
124	124		let result = invoke(minerAddress, "withdraw", nil, nil)
125	125		if ((result == result))
126	126		then result
127	127		else throw("Strict value is not equal to itself.")
128	128		}
129	129
130	130
131	131		func currentRate (dt) = (getIntegerValue("lastRate") + (getIntegerValue("growthRate") * dt))
132	132
133	133
134	134		func getCompoundTimestampDiff () = (lastBlock.timestamp - getIntegerValue("lastTimestamp"))
135	135
136	136
137	137		@Callable(i)
138	138		func init (leaserAddress) = {
139	139		let checks = [mustManager(i), mustNotInited()]
140	140		if ((checks == checks))
141	141		then {
142	142		let sWaves = Issue("sWaves", "", 0, 8, true, unit, 0)
143	143		let sWavesAssetId = calculateAssetId(sWaves)
144	144		[BooleanEntry("inited", true), StringEntry("sWavesAssetId", toBase58String(sWavesAssetId)), StringEntry("leaserAddress", leaserAddress), IntegerEntry("lastRate", precision), IntegerEntry("lastTimestamp", lastBlock.timestamp), IntegerEntry("growthRate", 0), IntegerEntry("balance", 0), sWaves]
145	145		}
146	146		else throw("Strict value is not equal to itself.")
147	147		}
148	148
149	149
150	150
151	151		@Callable(i)
152	152		func compound () = {
153	153		let dt = getCompoundTimestampDiff()
154	154		let sWavesTotal = sWavesQuantity()
155	155		if (if ((dt == 0))
156	156		then true
157	157		else (sWavesTotal == 0))
158	158		then nil
159	159		else {
160	160		let rate = currentRate(dt)
161	161		let excessWaves = getExcessWaves()
162		-	let growthRate = (fraction(excessWaves, precision, sWavesTotal) / dt)
163		-	let withdrawResult = withdraw()
164		-	if ((withdrawResult == withdrawResult))
165		-	then (lease(excessWaves) ++ setRate(rate, growthRate))
	162	+	if ((excessWaves == excessWaves))
	163	+	then {
	164	+	let growthRate = (fraction(excessWaves, precision, sWavesTotal) / dt)
	165	+	let withdrawResult = withdraw()
	166	+	if ((withdrawResult == withdrawResult))
	167	+	then (lease(excessWaves) ++ setRate(rate, growthRate))
	168	+	else throw("Strict value is not equal to itself.")
	169	+	}
166	170		else throw("Strict value is not equal to itself.")
167	171		}
168	172		}
169	173
170	174
171	175
172	176		@Callable(i)
173	177		func stake () = {
174	178		let payment = i.payments[0]
175	179		if ((payment.assetId != unit))
176	180		then throw("Only WAVES supported")
177	181		else if ((size(i.payments) != 1))
178	182		then throw("Wrong payments amount")
179	183		else {
180	184		let dt = getCompoundTimestampDiff()
181	185		let rate = currentRate(dt)
182	186		let toReissue = fraction(payment.amount, precision, rate)
183	187		let result = invoke(this, "compound", nil, nil)
184	188		if ((result == result))
185	189		then ((lease(payment.amount) :+ issueSWaves(toReissue)) :+ sendSWaves(i.caller, toReissue))
186	190		else throw("Strict value is not equal to itself.")
187	191		}
188	192		}
189	193
190	194
191	195
192	196		@Callable(i)
193	197		func unstake () = {
194	198		let payment = i.payments[0]
195	199		let sWavesAssetId = fromBase58String(getStringValue("sWavesAssetId"))
196	200		if ((payment.assetId != sWavesAssetId))
197	201		then throw("Only sWAVES supported")
198	202		else if ((size(i.payments) != 1))
199	203		then throw("Wrong payments amount")
200	204		else {
201	205		let dt = getCompoundTimestampDiff()
202	206		let rate = currentRate(dt)
203	207		let transferAmount = fraction(payment.amount, rate, precision)
204	208		let result = invoke(this, "compound", nil, nil)
205	209		if ((result == result))
206	210		then ((lease(-(transferAmount)) :+ burnSWaves(payment.amount)) :+ sendWaves(i.caller, transferAmount))
207	211		else throw("Strict value is not equal to itself.")
208	212		}
209	213		}
210	214
211	215
212	216		@Verifier(tx)
213	217		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
214	218

github/deemru/w8io/169f3d6 
51.31 ms ◑