w8 · tx · 9mq···c5F

tx · 9mqX3bDoDeF3GW55sTyqrv8K2zfCcr5tAhdGHib1uc5F

3MpcyLdYAQ6Z14cs1Fy3o7XK1cAHajK5g5N:  -0.01000000 Waves

2022.04.26 17:32 [2025582] smart account 3MpcyLdYAQ6Z14cs1Fy3o7XK1cAHajK5g5N > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9mqX3bDoDeF3GW55sTyqrv8K2zfCcr5tAhdGHib1uc5F",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1650983577895,
    "version": 2,
    "chainId": 84,
    "sender": "3MpcyLdYAQ6Z14cs1Fy3o7XK1cAHajK5g5N",
    "senderPublicKey": "CpN2UR96CYA49vvxNChb3NFpAE9TK2nyuCptRU4VkHzS",
    "proofs": [
        "5LdSA131z5AVhkgiqLzaA9r9efXszdoCsaiZNeXdhJZMzQCaYJzxJUsmX1FPKssEyAbJZD4V8gKDk8GMn2y14wpF"
    ],
    "script": "base64:AAIFAAAAAAAAABcIAhIDCgEIEgcKBQEBAQEIEgMKAQESAAAAABoAAAAAA3ZlcgIAAAADMS4wAAAAAAR5ZWFyAAAAAAAACAUgAAAAAAlzZXBhcmF0b3ICAAAAAl9fAAAAAApXQVZFU0lEU1RSAgAAAAVXQVZFUwAAAAAHV0FWRVNJRAkAAlkAAAABBQAAAApXQVZFU0lEU1RSAAAAAAxtYXhJbnZlc3RLZXkCAAAADSVzX19tYXhJbnZlc3QAAAAADnRvdGFsSW52ZXN0S2V5AgAAAA8lc19fdG90YWxJbnZlc3QAAAAADmludmVzdEFzc2V0S2V5AgAAABElc19faW52ZXN0QXNzZXRJZAAAAAAKYXB5RnJvbUtleQIAAAALJXNfX2FweUZyb20AAAAACGFweVRvS2V5AgAAAAklc19fYXB5VG8AAAAAFGludmVzdEludGVydmFsTWluS2V5AgAAAA8lc19faW50ZXJ2YWxNaW4AAAAADm1heEludGVydmFsS2V5AgAAAA4lX19tYXhJbnRlcnZhbAEAAAAQZ2V0VXNlckludmVzdEtleQAAAAEAAAAEdXNlcgkABLkAAAACCQAETAAAAAICAAAABiVzJXMkZAkABEwAAAACAgAAAApjbHJjSW52ZXN0CQAETAAAAAIFAAAABHVzZXIFAAAAA25pbAUAAAAJc2VwYXJhdG9yAQAAAA52YWx1ZU9yRGVmYXVsdAAAAAIAAAADdmFsAAAACmRlZmF1bHRWYWwDCQEAAAACIT0AAAACCQEAAAALdmFsdWVPckVsc2UAAAACBQAAAAN2YWwAAAAAAAAAAAAAAAAAAAAAAAAFAAAAA3ZhbAUAAAAKZGVmYXVsdFZhbAEAAAAJZ2V0TWluVmFsAAAAAgAAAAR2YWwxAAAABHZhbDIDCQAAZgAAAAIFAAAABHZhbDEFAAAABHZhbDIFAAAABHZhbDIFAAAABHZhbDEBAAAACWdldE1heFZhbAAAAAIAAAAEdmFsMQAAAAR2YWwyAwkAAGYAAAACBQAAAAR2YWwyBQAAAAR2YWwxBQAAAAR2YWwyBQAAAAR2YWwxAQAAAAxnZXRJbnRPclplcm8AAAABAAAAA2tleQkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkAAAAAAAAAAAABAAAADGdldEludE9yRWxzZQAAAAIAAAADa2V5AAAACmRlZmF1bHRWYWwJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5BQAAAApkZWZhdWx0VmFsAQAAAAxnZXRJbnRPckZhaWwAAAABAAAAA2tleQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQkAASwAAAACCQABLAAAAAICAAAAD01hbmRhdG9yeSB0aGlzLgUAAAADa2V5AgAAAA8gaXMgbm90IGRlZmluZWQBAAAADGdldFN0ck9yRWxzZQAAAAIAAAADa2V5AAAACmRlZmF1bHRWYWwJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAQdAAAAAgUAAAAEdGhpcwUAAAADa2V5BQAAAApkZWZhdWx0VmFsAQAAAA9nZXRTdHJpbmdPckZhaWwAAAABAAAAA2tleQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEHQAAAAIFAAAABHRoaXMFAAAAA2tleQkAASwAAAACCQABLAAAAAICAAAAD01hbmRhdG9yeSB0aGlzLgUAAAADa2V5AgAAAA8gaXMgbm90IGRlZmluZWQBAAAAC3RvQXNzZXRWZWN0AAAAAQAAAAhhc3NldFN0cgMJAAAAAAAAAgUAAAAIYXNzZXRTdHIFAAAACldBVkVTSURTVFIFAAAABHVuaXQJAAJZAAAAAQUAAAAIYXNzZXRTdHIBAAAABmdldEFweQAAAAQAAAAIaW50ZXJ2YWwAAAAHYXB5RnJvbQAAAAVhcHlUbwAAAAttYXhJbnRlcnZhbAkAAGQAAAACCQAAaAAAAAIJAABpAAAAAgkAAGgAAAACCQAAZQAAAAIFAAAABWFweVRvBQAAAAdhcHlGcm9tAAAAAAAAD0JACQAAZQAAAAIFAAAAC21heEludGVydmFsAAAAAAAAAAABCQAAZQAAAAIFAAAACGludGVydmFsAAAAAAAAAAABBQAAAAdhcHlGcm9tAQAAAAxyZWFkVXNlckRhdGEAAAABAAAABHVzZXIEAAAABGRhdGEJAAS1AAAAAgkBAAAADGdldFN0ck9yRWxzZQAAAAIJAQAAABBnZXRVc2VySW52ZXN0S2V5AAAAAQUAAAAEdXNlcgIAAAAABQAAAAlzZXBhcmF0b3IDCQAAZgAAAAIAAAAAAAAAAAcJAAGQAAAAAQUAAAAEZGF0YQkABEwAAAACAAAAAAAAAAAACQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgAAAAAAAAAAAAkABEwAAAACAAAAAAAAAAAACQAETAAAAAIAAAAAAAAAAAAJAARMAAAAAgAAAAAAAAAAAAkABEwAAAACAAAAAAAAAAAABQAAAANuaWwEAAAAC2hlaWdodFN0YXJ0CQEAAAALdmFsdWVPckVsc2UAAAACCQAEtgAAAAEJAAGRAAAAAgUAAAAEZGF0YQAAAAAAAAAAAQAAAAAAAAAAAAQAAAAJaGVpZ2h0RW5kCQEAAAALdmFsdWVPckVsc2UAAAACCQAEtgAAAAEJAAGRAAAAAgUAAAAEZGF0YQAAAAAAAAAAAgAAAAAAAAAAAAQAAAAHY2xhaW1lZAkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABLYAAAABCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAMAAAAAAAAAAAAEAAAABmFtb3VudAkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABLYAAAABCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAQAAAAAAAAAAAAEAAAAB3RvQ2xhaW0JAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAAS2AAAAAQkAAZEAAAACBQAAAARkYXRhAAAAAAAAAAAFAAAAAAAAAAAABAAAAAtjbGFpbUhlaWdodAkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABLYAAAABCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAYAAAAAAAAAAAAEAAAAA2FweQkBAAAAC3ZhbHVlT3JFbHNlAAAAAgkABLYAAAABCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAcAAAAAAAAAAAAJAARMAAAAAgUAAAALaGVpZ2h0U3RhcnQJAARMAAAAAgUAAAAJaGVpZ2h0RW5kCQAETAAAAAIFAAAAC2NsYWltSGVpZ2h0CQAETAAAAAIFAAAABmFtb3VudAkABEwAAAACBQAAAAd0b0NsYWltCQAETAAAAAIFAAAAB2NsYWltZWQJAARMAAAAAgUAAAADYXB5BQAAAANuaWwBAAAAC3NldFVzZXJEYXRhAAAACAAAAAR1c2VyAAAAC2hlaWdodFN0YXJ0AAAACWhlaWdodEVuZAAAAAtjbGFpbUhlaWdodAAAAAZhbW91bnQAAAAHdG9DbGFpbQAAAAdjbGFpbWVkAAAAA2FweQQAAAADa2V5CQEAAAAQZ2V0VXNlckludmVzdEtleQAAAAEFAAAABHVzZXIEAAAABGRhdGEJAAS5AAAAAgkABEwAAAACAgAAAAwlZCVkJWQlZCVkJWQJAARMAAAAAgkAAaQAAAABBQAAAAtoZWlnaHRTdGFydAkABEwAAAACCQABpAAAAAEFAAAACWhlaWdodEVuZAkABEwAAAACCQABpAAAAAEFAAAAC2NsYWltSGVpZ2h0CQAETAAAAAIJAAGkAAAAAQUAAAAGYW1vdW50CQAETAAAAAIJAAGkAAAAAQUAAAAHdG9DbGFpbQkABEwAAAACCQABpAAAAAEFAAAAB2NsYWltZWQJAARMAAAAAgkAAaQAAAABBQAAAANhcHkFAAAAA25pbAUAAAAJc2VwYXJhdG9yCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAANrZXkFAAAABGRhdGEBAAAAEGNhbGN1bGF0ZVRvQ2xhaW0AAAAHAAAAC2hlaWdodFN0YXJ0AAAACWhlaWdodEVuZAAAAAtjbGFpbUhlaWdodAAAAAZhbW91bnQAAAAHdG9DbGFpbQAAAAdjbGFpbWVkAAAAA2FweQQAAAANdG9DbGFpbUhlaWdodAkBAAAADnZhbHVlT3JEZWZhdWx0AAAAAgUAAAALY2xhaW1IZWlnaHQFAAAAC2hlaWdodFN0YXJ0BAAAAAt0b0VuZEhlaWdodAkBAAAACWdldE1pblZhbAAAAAIFAAAACWhlaWdodEVuZAUAAAAGaGVpZ2h0BAAAAAVkZWx0YQkAAGsAAAADAAAAAAAAAYagCQAAZQAAAAIFAAAAC3RvRW5kSGVpZ2h0BQAAAA10b0NsYWltSGVpZ2h0BQAAAAR5ZWFyCQAAZAAAAAIJAABpAAAAAgkAAGkAAAACCQAAaAAAAAIJAABoAAAAAgUAAAAFZGVsdGEFAAAABmFtb3VudAUAAAADYXB5AAAAAAAAAYagAAAAAAAAAYagBQAAAAd0b0NsYWltAAAABAAAAAFpAQAAAA1jbGFpbVJlYWRvbmx5AAAAAQAAAAR1c2VyBAAAAARkYXRhCQEAAAAMcmVhZFVzZXJEYXRhAAAAAQUAAAAEdXNlcgQAAAAHdG9DbGFpbQkBAAAAEGNhbGN1bGF0ZVRvQ2xhaW0AAAAHCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAAJAAGRAAAAAgUAAAAEZGF0YQAAAAAAAAAAAQkAAZEAAAACBQAAAARkYXRhAAAAAAAAAAACCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAMJAAGRAAAAAgUAAAAEZGF0YQAAAAAAAAAABAkAAZEAAAACBQAAAARkYXRhAAAAAAAAAAAFCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAYJAAUUAAAAAgUAAAADbmlsBQAAAAd0b0NsYWltAAAAAWkBAAAACXNldFBhcmFtcwAAAAUAAAAHYXB5RnJvbQAAAAVhcHlUbwAAABFtYXhJbnRlcnZhbE1vbnRocwAAAAltYXhJbnZlc3QAAAALaW52ZXN0QXNzZXQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAOaW52ZXN0QXNzZXRLZXkFAAAAC2ludmVzdEFzc2V0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAAhhcHlUb0tleQUAAAAFYXB5VG8JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAACmFweUZyb21LZXkFAAAAB2FweUZyb20JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAADm1heEludGVydmFsS2V5BQAAABFtYXhJbnRlcnZhbE1vbnRocwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAMbWF4SW52ZXN0S2V5BQAAAAltYXhJbnZlc3QFAAAAA25pbAAAAAFpAQAAAAdkZXBvc2l0AAAAAQAAAAhpbnRlcnZhbAQAAAALbWluSW50ZXJ2YWwJAQAAAAxnZXRJbnRPckVsc2UAAAACBQAAABRpbnZlc3RJbnRlcnZhbE1pbktleQAAAAAAAACowAQAAAAJbWF4SW52ZXN0CQEAAAAMZ2V0SW50T3JaZXJvAAAAAQUAAAAMbWF4SW52ZXN0S2V5BAAAAA10b3RhbEludmVzdGVkCQEAAAAMZ2V0SW50T3JaZXJvAAAAAQUAAAAOdG90YWxJbnZlc3RLZXkEAAAAC2ludmVzdEFzc2V0CQEAAAAPZ2V0U3RyaW5nT3JGYWlsAAAAAQUAAAAOaW52ZXN0QXNzZXRLZXkEAAAAC3VzZXJBZGRyZXNzCAUAAAABaQAAAAZjYWxsZXIEAAAAEXVzZXJBZGRyZXNzU3RyaW5nCQAEJQAAAAEFAAAAC3VzZXJBZGRyZXNzBAAAAAVhcHlUbwkBAAAADGdldEludE9yWmVybwAAAAEFAAAACmFweUZyb21LZXkEAAAAB2FweUZyb20JAQAAAAxnZXRJbnRPclplcm8AAAABBQAAAAhhcHlUb0tleQQAAAALbWF4SW50ZXJ2YWwJAQAAAAxnZXRJbnRPclplcm8AAAABBQAAAA5tYXhJbnRlcnZhbEtleQQAAAALaW52ZXN0U3RhcnQFAAAABmhlaWdodAQAAAAJaW52ZXN0RW5kCQAAZAAAAAIFAAAAC2ludmVzdFN0YXJ0CQAAaAAAAAIFAAAAC21pbkludGVydmFsBQAAAAhpbnRlcnZhbAQAAAATaW52YWxpZEFzc2V0TWVzc2FnZQkAASwAAAACCQABLAAAAAICAAAAD0ludmFsaWQgYXNzZXQuIAUAAAALaW52ZXN0QXNzZXQCAAAADCBpcyBleHBlY3RlZAMDCQAAZgAAAAIAAAAAAAAAAAEFAAAACGludGVydmFsBgkAAGYAAAACBQAAAAhpbnRlcnZhbAUAAAALbWF4SW50ZXJ2YWwJAAACAAAAAQIAAAAOV3JvbmcgaW50ZXJ2YWwDCQEAAAACIT0AAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAABCQAAAgAAAAECAAAAFUludmFsaWQgcGF5bWVudHMgc2l6ZQQAAAAHcGF5bWVudAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAQAAAAGYW1vdW50CAUAAAAHcGF5bWVudAAAAAZhbW91bnQEAAAAB2Fzc2V0SWQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAggFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAUAAAATaW52YWxpZEFzc2V0TWVzc2FnZQMJAQAAAAIhPQAAAAIJAAJYAAAAAQUAAAAHYXNzZXRJZAUAAAALaW52ZXN0QXNzZXQJAAACAAAAAQUAAAATaW52YWxpZEFzc2V0TWVzc2FnZQMJAABmAAAAAgkAAGQAAAACBQAAAAZhbW91bnQFAAAADXRvdGFsSW52ZXN0ZWQFAAAACW1heEludmVzdAkAAAIAAAABAgAAACVUaGUgbWF4IGludmVzdCBsaW1pdCBoYXMgYmVlbiByZWFjaGVkBAAAAApjdXJyZW50QXB5CQEAAAAGZ2V0QXB5AAAABAUAAAAIaW50ZXJ2YWwFAAAAB2FweUZyb20FAAAABWFweVRvBQAAAAttYXhJbnRlcnZhbAQAAAAIdXNlckRhdGEJAQAAAAxyZWFkVXNlckRhdGEAAAABBQAAABF1c2VyQWRkcmVzc1N0cmluZwQAAAALY2xhaW1IZWlnaHQJAAGRAAAAAgUAAAAIdXNlckRhdGEAAAAAAAAAAAIEAAAACWFsbEFtb3VudAkAAGQAAAACBQAAAAZhbW91bnQJAAGRAAAAAgUAAAAIdXNlckRhdGEAAAAAAAAAAAMEAAAAB2NsYWltZWQJAAGRAAAAAgUAAAAIdXNlckRhdGEAAAAAAAAAAAQEAAAAB3RvQ2xhaW0JAAGRAAAAAgUAAAAIdXNlckRhdGEAAAAAAAAAAAUJAARMAAAAAgkBAAAAC3NldFVzZXJEYXRhAAAACAUAAAARdXNlckFkZHJlc3NTdHJpbmcFAAAAC2ludmVzdFN0YXJ0BQAAAAlpbnZlc3RFbmQFAAAAC2NsYWltSGVpZ2h0BQAAAAlhbGxBbW91bnQFAAAAB3RvQ2xhaW0FAAAAB2NsYWltZWQFAAAACmN1cnJlbnRBcHkFAAAAA25pbAAAAAFpAQAAAAVjbGFpbQAAAAAEAAAAC2ludmVzdEFzc2V0CQEAAAAPZ2V0U3RyaW5nT3JGYWlsAAAAAQUAAAAOaW52ZXN0QXNzZXRLZXkEAAAABGRhdGEJAQAAAAxyZWFkVXNlckRhdGEAAAABCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgMJAABmAAAAAgAAAAAAAAAABwkAAZAAAAABBQAAAARkYXRhCQAAAgAAAAECAAAAEVVzZXIgaGFzJ3QgaW52ZXN0BAAAAAd0b0NsYWltCQEAAAAQY2FsY3VsYXRlVG9DbGFpbQAAAAcJAAGRAAAAAgUAAAAEZGF0YQAAAAAAAAAAAAkAAZEAAAACBQAAAARkYXRhAAAAAAAAAAABCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAIJAAGRAAAAAgUAAAAEZGF0YQAAAAAAAAAAAwkAAZEAAAACBQAAAARkYXRhAAAAAAAAAAAECQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAUJAAGRAAAAAgUAAAAEZGF0YQAAAAAAAAAABgQAAAAHY2xhaW1lZAkAAGQAAAACCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAQFAAAAB3RvQ2xhaW0EAAAAC2NsYWltSGVpZ2h0BQAAAAZoZWlnaHQDAwMJAQAAAAlpc0RlZmluZWQAAAABBQAAAAd0b0NsYWltBgkAAAAAAAACBQAAAAd0b0NsYWltAAAAAAAAAAAABgkAAAAAAAACCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAAAAAAAAAAAAAAJAAACAAAAAQIAAAAQTm90aGluZyB0byBjbGFpbQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAB3RvQ2xhaW0JAAJZAAAAAQUAAAALaW52ZXN0QXNzZXQJAARMAAAAAgkBAAAAC3NldFVzZXJEYXRhAAAACAkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIJAAGRAAAAAgUAAAAEZGF0YQAAAAAAAAAAAAkAAZEAAAACBQAAAARkYXRhAAAAAAAAAAABBQAAAAtjbGFpbUhlaWdodAkAAZEAAAACBQAAAARkYXRhAAAAAAAAAAADAAAAAAAAAAAABQAAAAdjbGFpbWVkCQABkQAAAAIFAAAABGRhdGEAAAAAAAAAAAYFAAAAA25pbAAAAACVYEUM",
    "height": 2025582,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 8amoenAomWEpXPyFf245wX4x6Cnr4xfBw9mqgMXDJvdv
Next: 9swq2oBKmbm4BChnXnNAMexpjisZaUzr28X96mUfBpjc

Diff: 
Old New Differences
147 147                              let allAmount = (amount + userData[3])
148 148                              let claimed = userData[4]
149 149                              let toClaim = userData[5]
150 -                             let key = getUserInvestKey(userAddressString)
151 -                             let dataToSave = makeString(["%d%d%d%d%d%d", toString(investStart), toString(investEnd), toString(claimHeight), toString(amount), toString(toClaim), toString(claimed), toString(currentApy)], separator)
152 - [StringEntry(key, dataToSave)]
150 + [setUserData(userAddressString, investStart, investEnd, claimHeight, allAmount, toClaim, claimed, currentApy)]
153 151                              }
154 152                  }
155 153      }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let ver = "1.0"
5 5  
6 6  let year = 525600
7 7  
8 8  let separator = "__"
9 9  
10 10  let WAVESIDSTR = "WAVES"
11 11  
12 12  let WAVESID = fromBase58String(WAVESIDSTR)
13 13  
14 14  let maxInvestKey = "%s__maxInvest"
15 15  
16 16  let totalInvestKey = "%s__totalInvest"
17 17  
18 18  let investAssetKey = "%s__investAssetId"
19 19  
20 20  let apyFromKey = "%s__apyFrom"
21 21  
22 22  let apyToKey = "%s__apyTo"
23 23  
24 24  let investIntervalMinKey = "%s__intervalMin"
25 25  
26 26  let maxIntervalKey = "%__maxInterval"
27 27  
28 28  func getUserInvestKey (user) = makeString(["%s%s$d", "clrcInvest", user], separator)
29 29  
30 30  
31 31  func valueOrDefault (val,defaultVal) = if ((valueOrElse(val, 0) != 0))
32 32      then val
33 33      else defaultVal
34 34  
35 35  
36 36  func getMinVal (val1,val2) = if ((val1 > val2))
37 37      then val2
38 38      else val1
39 39  
40 40  
41 41  func getMaxVal (val1,val2) = if ((val2 > val1))
42 42      then val2
43 43      else val1
44 44  
45 45  
46 46  func getIntOrZero (key) = valueOrElse(getInteger(this, key), 0)
47 47  
48 48  
49 49  func getIntOrElse (key,defaultVal) = valueOrElse(getInteger(this, key), defaultVal)
50 50  
51 51  
52 52  func getIntOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("Mandatory this." + key) + " is not defined"))
53 53  
54 54  
55 55  func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
56 56  
57 57  
58 58  func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (("Mandatory this." + key) + " is not defined"))
59 59  
60 60  
61 61  func toAssetVect (assetStr) = if ((assetStr == WAVESIDSTR))
62 62      then unit
63 63      else fromBase58String(assetStr)
64 64  
65 65  
66 66  func getApy (interval,apyFrom,apyTo,maxInterval) = (((((apyTo - apyFrom) * 1000000) / (maxInterval - 1)) * (interval - 1)) + apyFrom)
67 67  
68 68  
69 69  func readUserData (user) = {
70 70      let data = split(getStrOrElse(getUserInvestKey(user), ""), separator)
71 71      if ((7 > size(data)))
72 72          then [0, 0, 0, 0, 0, 0, 0]
73 73          else {
74 74              let heightStart = valueOrElse(parseInt(data[1]), 0)
75 75              let heightEnd = valueOrElse(parseInt(data[2]), 0)
76 76              let claimed = valueOrElse(parseInt(data[3]), 0)
77 77              let amount = valueOrElse(parseInt(data[4]), 0)
78 78              let toClaim = valueOrElse(parseInt(data[5]), 0)
79 79              let claimHeight = valueOrElse(parseInt(data[6]), 0)
80 80              let apy = valueOrElse(parseInt(data[7]), 0)
81 81  [heightStart, heightEnd, claimHeight, amount, toClaim, claimed, apy]
82 82              }
83 83      }
84 84  
85 85  
86 86  func setUserData (user,heightStart,heightEnd,claimHeight,amount,toClaim,claimed,apy) = {
87 87      let key = getUserInvestKey(user)
88 88      let data = makeString(["%d%d%d%d%d%d", toString(heightStart), toString(heightEnd), toString(claimHeight), toString(amount), toString(toClaim), toString(claimed), toString(apy)], separator)
89 89      StringEntry(key, data)
90 90      }
91 91  
92 92  
93 93  func calculateToClaim (heightStart,heightEnd,claimHeight,amount,toClaim,claimed,apy) = {
94 94      let toClaimHeight = valueOrDefault(claimHeight, heightStart)
95 95      let toEndHeight = getMinVal(heightEnd, height)
96 96      let delta = fraction(100000, (toEndHeight - toClaimHeight), year)
97 97      (((((delta * amount) * apy) / 100000) / 100000) + toClaim)
98 98      }
99 99  
100 100  
101 101  @Callable(i)
102 102  func claimReadonly (user) = {
103 103      let data = readUserData(user)
104 104      let toClaim = calculateToClaim(data[0], data[1], data[2], data[3], data[4], data[5], data[6])
105 105      $Tuple2(nil, toClaim)
106 106      }
107 107  
108 108  
109 109  
110 110  @Callable(i)
111 111  func setParams (apyFrom,apyTo,maxIntervalMonths,maxInvest,investAsset) = [StringEntry(investAssetKey, investAsset), IntegerEntry(apyToKey, apyTo), IntegerEntry(apyFromKey, apyFrom), IntegerEntry(maxIntervalKey, maxIntervalMonths), IntegerEntry(maxInvestKey, maxInvest)]
112 112  
113 113  
114 114  
115 115  @Callable(i)
116 116  func deposit (interval) = {
117 117      let minInterval = getIntOrElse(investIntervalMinKey, 43200)
118 118      let maxInvest = getIntOrZero(maxInvestKey)
119 119      let totalInvested = getIntOrZero(totalInvestKey)
120 120      let investAsset = getStringOrFail(investAssetKey)
121 121      let userAddress = i.caller
122 122      let userAddressString = toString(userAddress)
123 123      let apyTo = getIntOrZero(apyFromKey)
124 124      let apyFrom = getIntOrZero(apyToKey)
125 125      let maxInterval = getIntOrZero(maxIntervalKey)
126 126      let investStart = height
127 127      let investEnd = (investStart + (minInterval * interval))
128 128      let invalidAssetMessage = (("Invalid asset. " + investAsset) + " is expected")
129 129      if (if ((1 > interval))
130 130          then true
131 131          else (interval > maxInterval))
132 132          then throw("Wrong interval")
133 133          else if ((size(i.payments) != 1))
134 134              then throw("Invalid payments size")
135 135              else {
136 136                  let payment = i.payments[0]
137 137                  let amount = payment.amount
138 138                  let assetId = valueOrErrorMessage(payment.assetId, invalidAssetMessage)
139 139                  if ((toBase58String(assetId) != investAsset))
140 140                      then throw(invalidAssetMessage)
141 141                      else if (((amount + totalInvested) > maxInvest))
142 142                          then throw("The max invest limit has been reached")
143 143                          else {
144 144                              let currentApy = getApy(interval, apyFrom, apyTo, maxInterval)
145 145                              let userData = readUserData(userAddressString)
146 146                              let claimHeight = userData[2]
147 147                              let allAmount = (amount + userData[3])
148 148                              let claimed = userData[4]
149 149                              let toClaim = userData[5]
150 -                             let key = getUserInvestKey(userAddressString)
151 -                             let dataToSave = makeString(["%d%d%d%d%d%d", toString(investStart), toString(investEnd), toString(claimHeight), toString(amount), toString(toClaim), toString(claimed), toString(currentApy)], separator)
152 - [StringEntry(key, dataToSave)]
150 + [setUserData(userAddressString, investStart, investEnd, claimHeight, allAmount, toClaim, claimed, currentApy)]
153 151                              }
154 152                  }
155 153      }
156 154  
157 155  
158 156  
159 157  @Callable(i)
160 158  func claim () = {
161 159      let investAsset = getStringOrFail(investAssetKey)
162 160      let data = readUserData(toString(i.caller))
163 161      if ((7 > size(data)))
164 162          then throw("User has't invest")
165 163          else {
166 164              let toClaim = calculateToClaim(data[0], data[1], data[2], data[3], data[4], data[5], data[6])
167 165              let claimed = (data[4] + toClaim)
168 166              let claimHeight = height
169 167              if (if (if (isDefined(toClaim))
170 168                  then true
171 169                  else (toClaim == 0))
172 170                  then true
173 171                  else (data[0] == 0))
174 172                  then throw("Nothing to claim")
175 173                  else [ScriptTransfer(i.caller, toClaim, fromBase58String(investAsset)), setUserData(toString(i.caller), data[0], data[1], claimHeight, data[3], 0, claimed, data[6])]
176 174              }
177 175      }
178 176  
179 177

Old	New		Differences
147	147		let allAmount = (amount + userData[3])
148	148		let claimed = userData[4]
149	149		let toClaim = userData[5]
150		-	let key = getUserInvestKey(userAddressString)
151		-	let dataToSave = makeString(["%d%d%d%d%d%d", toString(investStart), toString(investEnd), toString(claimHeight), toString(amount), toString(toClaim), toString(claimed), toString(currentApy)], separator)
152		-	[StringEntry(key, dataToSave)]
	150	+	[setUserData(userAddressString, investStart, investEnd, claimHeight, allAmount, toClaim, claimed, currentApy)]
153	151		}
154	152		}
155	153		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let ver = "1.0"
5	5
6	6		let year = 525600
7	7
8	8		let separator = "__"
9	9
10	10		let WAVESIDSTR = "WAVES"
11	11
12	12		let WAVESID = fromBase58String(WAVESIDSTR)
13	13
14	14		let maxInvestKey = "%s__maxInvest"
15	15
16	16		let totalInvestKey = "%s__totalInvest"
17	17
18	18		let investAssetKey = "%s__investAssetId"
19	19
20	20		let apyFromKey = "%s__apyFrom"
21	21
22	22		let apyToKey = "%s__apyTo"
23	23
24	24		let investIntervalMinKey = "%s__intervalMin"
25	25
26	26		let maxIntervalKey = "%__maxInterval"
27	27
28	28		func getUserInvestKey (user) = makeString(["%s%s$d", "clrcInvest", user], separator)
29	29
30	30
31	31		func valueOrDefault (val,defaultVal) = if ((valueOrElse(val, 0) != 0))
32	32		then val
33	33		else defaultVal
34	34
35	35
36	36		func getMinVal (val1,val2) = if ((val1 > val2))
37	37		then val2
38	38		else val1
39	39
40	40
41	41		func getMaxVal (val1,val2) = if ((val2 > val1))
42	42		then val2
43	43		else val1
44	44
45	45
46	46		func getIntOrZero (key) = valueOrElse(getInteger(this, key), 0)
47	47
48	48
49	49		func getIntOrElse (key,defaultVal) = valueOrElse(getInteger(this, key), defaultVal)
50	50
51	51
52	52		func getIntOrFail (key) = valueOrErrorMessage(getInteger(this, key), (("Mandatory this." + key) + " is not defined"))
53	53
54	54
55	55		func getStrOrElse (key,defaultVal) = valueOrElse(getString(this, key), defaultVal)
56	56
57	57
58	58		func getStringOrFail (key) = valueOrErrorMessage(getString(this, key), (("Mandatory this." + key) + " is not defined"))
59	59
60	60
61	61		func toAssetVect (assetStr) = if ((assetStr == WAVESIDSTR))
62	62		then unit
63	63		else fromBase58String(assetStr)
64	64
65	65
66	66		func getApy (interval,apyFrom,apyTo,maxInterval) = (((((apyTo - apyFrom) * 1000000) / (maxInterval - 1)) * (interval - 1)) + apyFrom)
67	67
68	68
69	69		func readUserData (user) = {
70	70		let data = split(getStrOrElse(getUserInvestKey(user), ""), separator)
71	71		if ((7 > size(data)))
72	72		then [0, 0, 0, 0, 0, 0, 0]
73	73		else {
74	74		let heightStart = valueOrElse(parseInt(data[1]), 0)
75	75		let heightEnd = valueOrElse(parseInt(data[2]), 0)
76	76		let claimed = valueOrElse(parseInt(data[3]), 0)
77	77		let amount = valueOrElse(parseInt(data[4]), 0)
78	78		let toClaim = valueOrElse(parseInt(data[5]), 0)
79	79		let claimHeight = valueOrElse(parseInt(data[6]), 0)
80	80		let apy = valueOrElse(parseInt(data[7]), 0)
81	81		[heightStart, heightEnd, claimHeight, amount, toClaim, claimed, apy]
82	82		}
83	83		}
84	84
85	85
86	86		func setUserData (user,heightStart,heightEnd,claimHeight,amount,toClaim,claimed,apy) = {
87	87		let key = getUserInvestKey(user)
88	88		let data = makeString(["%d%d%d%d%d%d", toString(heightStart), toString(heightEnd), toString(claimHeight), toString(amount), toString(toClaim), toString(claimed), toString(apy)], separator)
89	89		StringEntry(key, data)
90	90		}
91	91
92	92
93	93		func calculateToClaim (heightStart,heightEnd,claimHeight,amount,toClaim,claimed,apy) = {
94	94		let toClaimHeight = valueOrDefault(claimHeight, heightStart)
95	95		let toEndHeight = getMinVal(heightEnd, height)
96	96		let delta = fraction(100000, (toEndHeight - toClaimHeight), year)
97	97		(((((delta * amount) * apy) / 100000) / 100000) + toClaim)
98	98		}
99	99
100	100
101	101		@Callable(i)
102	102		func claimReadonly (user) = {
103	103		let data = readUserData(user)
104	104		let toClaim = calculateToClaim(data[0], data[1], data[2], data[3], data[4], data[5], data[6])
105	105		$Tuple2(nil, toClaim)
106	106		}
107	107
108	108
109	109
110	110		@Callable(i)
111	111		func setParams (apyFrom,apyTo,maxIntervalMonths,maxInvest,investAsset) = [StringEntry(investAssetKey, investAsset), IntegerEntry(apyToKey, apyTo), IntegerEntry(apyFromKey, apyFrom), IntegerEntry(maxIntervalKey, maxIntervalMonths), IntegerEntry(maxInvestKey, maxInvest)]
112	112
113	113
114	114
115	115		@Callable(i)
116	116		func deposit (interval) = {
117	117		let minInterval = getIntOrElse(investIntervalMinKey, 43200)
118	118		let maxInvest = getIntOrZero(maxInvestKey)
119	119		let totalInvested = getIntOrZero(totalInvestKey)
120	120		let investAsset = getStringOrFail(investAssetKey)
121	121		let userAddress = i.caller
122	122		let userAddressString = toString(userAddress)
123	123		let apyTo = getIntOrZero(apyFromKey)
124	124		let apyFrom = getIntOrZero(apyToKey)
125	125		let maxInterval = getIntOrZero(maxIntervalKey)
126	126		let investStart = height
127	127		let investEnd = (investStart + (minInterval * interval))
128	128		let invalidAssetMessage = (("Invalid asset. " + investAsset) + " is expected")
129	129		if (if ((1 > interval))
130	130		then true
131	131		else (interval > maxInterval))
132	132		then throw("Wrong interval")
133	133		else if ((size(i.payments) != 1))
134	134		then throw("Invalid payments size")
135	135		else {
136	136		let payment = i.payments[0]
137	137		let amount = payment.amount
138	138		let assetId = valueOrErrorMessage(payment.assetId, invalidAssetMessage)
139	139		if ((toBase58String(assetId) != investAsset))
140	140		then throw(invalidAssetMessage)
141	141		else if (((amount + totalInvested) > maxInvest))
142	142		then throw("The max invest limit has been reached")
143	143		else {
144	144		let currentApy = getApy(interval, apyFrom, apyTo, maxInterval)
145	145		let userData = readUserData(userAddressString)
146	146		let claimHeight = userData[2]
147	147		let allAmount = (amount + userData[3])
148	148		let claimed = userData[4]
149	149		let toClaim = userData[5]
150		-	let key = getUserInvestKey(userAddressString)
151		-	let dataToSave = makeString(["%d%d%d%d%d%d", toString(investStart), toString(investEnd), toString(claimHeight), toString(amount), toString(toClaim), toString(claimed), toString(currentApy)], separator)
152		-	[StringEntry(key, dataToSave)]
	150	+	[setUserData(userAddressString, investStart, investEnd, claimHeight, allAmount, toClaim, claimed, currentApy)]
153	151		}
154	152		}
155	153		}
156	154
157	155
158	156
159	157		@Callable(i)
160	158		func claim () = {
161	159		let investAsset = getStringOrFail(investAssetKey)
162	160		let data = readUserData(toString(i.caller))
163	161		if ((7 > size(data)))
164	162		then throw("User has't invest")
165	163		else {
166	164		let toClaim = calculateToClaim(data[0], data[1], data[2], data[3], data[4], data[5], data[6])
167	165		let claimed = (data[4] + toClaim)
168	166		let claimHeight = height
169	167		if (if (if (isDefined(toClaim))
170	168		then true
171	169		else (toClaim == 0))
172	170		then true
173	171		else (data[0] == 0))
174	172		then throw("Nothing to claim")
175	173		else [ScriptTransfer(i.caller, toClaim, fromBase58String(investAsset)), setUserData(toString(i.caller), data[0], data[1], claimHeight, data[3], 0, claimed, data[6])]
176	174		}
177	175		}
178	176
179	177

github/deemru/w8io/3ef1775 
53.64 ms ◑