w8 · tx · 92F···N7U

tx · 92FsFgCi6vH5Z4FYgsCMFsvx9oV53K6etmeWdYjhZN7U

3MvMpGD5MxbUW2EJn6jtViDu6NHNqu8PKq8:  -0.01100000 Waves

2022.08.26 04:40 [2200796] smart account 3MvMpGD5MxbUW2EJn6jtViDu6NHNqu8PKq8 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "92FsFgCi6vH5Z4FYgsCMFsvx9oV53K6etmeWdYjhZN7U",
    "fee": 1100000,
    "feeAssetId": null,
    "timestamp": 1661478037629,
    "version": 2,
    "chainId": 84,
    "sender": "3MvMpGD5MxbUW2EJn6jtViDu6NHNqu8PKq8",
    "senderPublicKey": "2MhVDhjG7eJ6SY8og2HRd4Bam75FsCSg2Vude8gutmZe",
    "proofs": [
        "4PvCxSJJ49bTNuekiWmBD3L7Gxg8zryeRpeVeugn1n9FQxQvW6myMxi6eUQQrYd5uagjqy9uHgojEizrNhhXsWST"
    ],
    "script": "base64:AAIFAAAAAAAAAB4IAhIDCgEIEgoKCAEBAQEICAgBEgASABIFCgMBCAgAAAAQAAAAAAJwcwIAAAANUFJFU0FMRV9TVEFSVAAAAAACcGQCAAAAEFBSRVNBTEVfRFVSQVRJT04AAAAAAmNzAgAAAAtDTEFJTV9TVEFSVAAAAAACY2QCAAAADkNMQUlNX0RVUkFUSU9OAAAAAAFwAgAAAAlQUklDRV9JRE8AAAAABHAxSUQCAAAAEFBSSUNFXzFfQVNTRVRfSUQAAAAABHAySUQCAAAAEFBSSUNFXzJfQVNTRVRfSUQAAAAABHAzSUQCAAAAEFBSSUNFXzNfQVNTRVRfSUQAAAAAA21pYQIAAAARTUlOX0FNT1VOVF9JTlZFU1QAAAAABW1haW5hAgAAAApNQUlOX0FTU0VUAAAAAAdmb3JTYWxlAgAAAA5UT1RBTF9GT1JfU0FMRQAAAAAJdG90YWxTYWxlAgAAAApUT1RBTF9TQUxFAAAAAAd0aW52ZXN0AgAAAA1UT1RBTF9JTlZFU1RfAAAAAAVkaXNkdQIAAAAVRElTVFJJQlVUSU9OX0RVUkFUSU9OAAAAAAJEOAAAAAAABfXhAAEAAAAPZ2V0QXNzZXRJZlZhbGlkAAAAAQAAAAdhc3NldElkCQACWAAAAAEJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAggJAQAAAAV2YWx1ZQAAAAEJAAPsAAAAAQkAAlkAAAABBQAAAAdhc3NldElkAAAAAmlkCQABLAAAAAIJAAEsAAAAAgIAAAAKQXNzZXQgSWQ6IAUAAAAHYXNzZXRJZAIAAAAMIGlzIGludmFsaWQuAAAABQAAAAFpAQAAAAhhZGRBZG1pbgAAAAEAAAAHYWRkcmVzcwMJAAAAAAAAAggFAAAAAWkAAAAGY2FsbGVyBQAAAAR0aGlzCQAETAAAAAIJAQAAAAtCaW5hcnlFbnRyeQAAAAICAAAABWFkbWluCQACWQAAAAEFAAAAB2FkZHJlc3MFAAAAA25pbAkAAAIAAAABAgAAAC5Pbmx5IHRoZSBBZG1pbiBpdHNlbGYgY2FuIGludm9rZSB0aGlzIGZ1bmN0aW9uAAAAAWkBAAAAC2NvbnN0cnVjdG9yAAAACAAAAAxwcmVzYWxlU3RhcnQAAAAPcHJlc2FsZUR1cmF0aW9uAAAAFGRpc3RyaWJ1dGlvbkR1cmF0aW9uAAAABXByaWNlAAAAD3ByaWNlMUFzc2V0SWQ1OAAAAA9wcmljZTJBc3NldElkNTgAAAAPcHJpY2UzQXNzZXRJZDU4AAAAD21pbkludmVzdEFtb3VudAQAAAAGYXNzZXQxCQEAAAAPZ2V0QXNzZXRJZlZhbGlkAAAAAQUAAAAPcHJpY2UxQXNzZXRJZDU4BAAAAAZhc3NldDIJAQAAAA9nZXRBc3NldElmVmFsaWQAAAABBQAAAA9wcmljZTJBc3NldElkNTgEAAAABmFzc2V0MwkBAAAAD2dldEFzc2V0SWZWYWxpZAAAAAEFAAAAD3ByaWNlM0Fzc2V0SWQ1OAMDCQAAAAAAAAIIBQAAAAFpAAAABmNhbGxlcgUAAAAEdGhpcwYJAAAAAAAAAggFAAAAAWkAAAAGY2FsbGVyCQEAAAAHQWRkcmVzcwAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUyKQAAAAIFAAAABHRoaXMCAAAABWFkbWluAwkAAGcAAAACBQAAAA9wcmVzYWxlRHVyYXRpb24FAAAADHByZXNhbGVTdGFydAkAAAIAAAABAgAAADJQcmVzYWxlRHVyYXRpb24gY2FuJ3QgYmUgYmlnZ2VyIHRoYW4gIFByZXNhbGVTdGFydAMJAABmAAAAAgUAAAAPbWluSW52ZXN0QW1vdW50BQAAAAVwcmljZQkAAAIAAAABAgAAACptaW5JbnZlc3RBbW91bnQgY2FuJ3QgYmUgYmlnZ2VyIHRoYW4gcHJpY2UDAwMJAAAAAAAAAgUAAAAGYXNzZXQxBQAAAAZhc3NldDIGCQAAAAAAAAIFAAAABmFzc2V0MQUAAAAGYXNzZXQzBgkAAAAAAAACBQAAAAZhc3NldDIFAAAABmFzc2V0MwkAAAIAAAABAgAAACxFYWNoIEFzc2V0IG11c3QgYmUgZGlmZmVyZW50IGZyb20gdGhlIG90aGVyLgMJAQAAAAIhPQAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAEJAAACAAAAAQIAAAAiZXhhY3RseSAxIHBheW1lbnQgbXVzdCBiZSBhdHRhY2hlZAkABEwAAAACCQEAAAALQmluYXJ5RW50cnkAAAACBQAAAAVtYWluYQkBAAAABXZhbHVlAAAAAQgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAHYXNzZXRJZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAARwMUlEBQAAAA9wcmljZTFBc3NldElkNTgJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAAEcDJJRAUAAAAPcHJpY2UyQXNzZXRJZDU4CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAABHAzSUQFAAAAD3ByaWNlM0Fzc2V0SWQ1OAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAACcHMFAAAADHByZXNhbGVTdGFydAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAACcGQFAAAAD3ByZXNhbGVEdXJhdGlvbgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAABcAUAAAAFcHJpY2UJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAAA21pYQUAAAAPbWluSW52ZXN0QW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAAdmb3JTYWxlCAkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIFAAAACXRvdGFsU2FsZQAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAFZGlzZHUFAAAAFGRpc3RyaWJ1dGlvbkR1cmF0aW9uBQAAAANuaWwJAAACAAAAAQIAAAAuT25seSB0aGUgQWRtaW4gaXRzZWxmIGNhbiBpbnZva2UgdGhpcyBmdW5jdGlvbgAAAAFpAQAAAAZpbnZlc3QAAAAABAAAAAltYWluQXNzZXQJAQAAABFAZXh0ck5hdGl2ZSgxMDUyKQAAAAIFAAAABHRoaXMFAAAABW1haW5hBAAAAAxwcmVzYWxlU3RhcnQJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMFAAAAAnBzBAAAAA9wcmVzYWxlRHVyYXRpb24JAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMFAAAAAnBkBAAAAApwcmVzYWxlRW5kCQAAZAAAAAIFAAAADHByZXNhbGVTdGFydAUAAAAPcHJlc2FsZUR1cmF0aW9uBAAAAAVwcmljZQkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgUAAAAEdGhpcwUAAAABcAQAAAABaAUAAAAGaGVpZ2h0BAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAACnBtdEFzc2V0SWQJAAJYAAAAAQkBAAAABXZhbHVlAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkBAAAAAlwbXRBbW91bnQIBQAAAANwbXQAAAAGYW1vdW50BAAAAAZhc3NldDEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAABHAxSUQEAAAABmFzc2V0MgkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwUAAAAEcDJJRAQAAAAGYXNzZXQzCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzBQAAAARwM0lEBAAAAAp0b3RhbFNhbGVlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAAl0b3RhbFNhbGUEAAAACGZvclNhbGVlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAAdmb3JTYWxlBAAAAAltaW5JbnZlc3QJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMFAAAAA21pYQMJAABnAAAAAgUAAAAMcHJlc2FsZVN0YXJ0BQAAAAFoCQAAAgAAAAECAAAAIHByZXNhbGUgaGFzIG5vdCBiZWVuIHN0YXJ0ZWQgeWV0AwkAAGcAAAACBQAAAAFoBQAAAApwcmVzYWxlRW5kCQAAAgAAAAECAAAAHnByZXNhbGUgaGFzIGJlZW4gYWxyZWFkeSBlbmRlZAMJAQAAAAIhPQAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAEJAAACAAAAAQIAAAAdZXhhY3RseSAxIHBheW1lbnQgaXMgZXhwZWN0ZWQDAwMJAQAAAAIhPQAAAAIFAAAACnBtdEFzc2V0SWQFAAAABmFzc2V0MQkBAAAAAiE9AAAAAgUAAAAKcG10QXNzZXRJZAUAAAAGYXNzZXQyBwkBAAAAAiE9AAAAAgUAAAAKcG10QXNzZXRJZAUAAAAGYXNzZXQzBwkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAABlpbnZhbGlkIHBheW1lbnQgYXNzZXQgaWQ6BQAAAApwbXRBc3NldElkAgAAAAogRXhwZWN0ZWQ6BQAAAAZhc3NldDEDCQAAZwAAAAIFAAAACnRvdGFsU2FsZWUFAAAACGZvclNhbGVlCQAAAgAAAAECAAAAPlByZS1zYWxlIGFzc2V0IGhhcyBiZWVuIC0gc29sZCBjb25zaWRlciB0byB1c2Ugc21hbGxlciBwYXltZW50AwkAAGYAAAACBQAAAAltaW5JbnZlc3QFAAAACXBtdEFtb3VudAkAAAIAAAABAgAAACxBbW91bnQgbGVzcyB0aGFuIHRoZSBtaW5pbXVtIHRvIGJlIGludmVzdGVkLgQAAAAEY2FsYwkAAGgAAAACCQAAaQAAAAIFAAAACXBtdEFtb3VudAUAAAAFcHJpY2UFAAAAAkQ4CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAAl0b3RhbFNhbGUJAABkAAAAAgUAAAAKdG90YWxTYWxlZQUAAAAEY2FsYwkABEwAAAACCQEAAAAMQm9vbGVhbkVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAHdGludmVzdAkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAAAJfXwUAAAAKcG10QXNzZXRJZAYFAAAAA25pbAAAAAFpAQAAAAxjbGFpbVByZXNhbGUAAAAABAAAAApjbGFpblN0YXJ0CQAAZAAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMFAAAAAnBkCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAAJwcwQAAAAUZGlzdHJpYnV0aW9uRHVyYXRpb24JAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMFAAAABWRpc2R1BAAAAApsaW1pdENsYWluCQAAZAAAAAIFAAAACmNsYWluU3RhcnQFAAAAFGRpc3RyaWJ1dGlvbkR1cmF0aW9uBAAAAAltYWluQXNzZXQJAQAAABFAZXh0ck5hdGl2ZSgxMDUyKQAAAAIFAAAABHRoaXMFAAAABW1haW5hBAAAAAFoBQAAAAZoZWlnaHQEAAAABXByaWNlCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAAFwAwkAAGcAAAACBQAAAApjbGFpblN0YXJ0BQAAAAFoCQAAAgAAAAECAAAAH1RoZSBQcmVzYWxlIGlzIHN0aWxsIGhhcHBlbmluZy4EAAAAB2Rpdmlzb3IDCQAAZgAAAAIFAAAAAWgFAAAACmxpbWl0Q2xhaW4JAAE2AAAAAQAAAAAAAAAAZAkAAToAAAACCQABOQAAAAIJAAE2AAAAAQUAAAABaAkAATYAAAABBQAAAAJEOAkAATkAAAACCQABNgAAAAEFAAAACmxpbWl0Q2xhaW4JAAE2AAAAAQUAAAACRDgEAAAADmdldFRvdGFsSW52ZXN0CQEAAAATdmFsdWVPckVycm9yTWVzc2FnZQAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAHdGludmVzdAkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAgAAACBZb3Ugd2VyZSBub3QgcGFydCBvZiB0aGUgcHJlc2FsZQQAAAAEY2FsYwkAAToAAAACCQABOQAAAAIJAAE2AAAAAQUAAAAOZ2V0VG90YWxJbnZlc3QJAAE5AAAAAgUAAAAHZGl2aXNvcgkAATYAAAABBQAAAAJEOAkAATYAAAABAAAAAAAAAABkBAAAABB1cGRhdGVUb3RhbEludmV0CQABOAAAAAIJAAE2AAAAAQUAAAAOZ2V0VG90YWxJbnZlc3QFAAAABGNhbGMDCQAAAAAAAAIJAQAAAAt2YWx1ZU9yRWxzZQAAAAIJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIFAAAABHRoaXMJAAEsAAAAAgIAAAAKT0xEX1RPVEFMXwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAAAAAAAAAAAAAAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAAB3RpbnZlc3QJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwkAAaAAAAABBQAAABB1cGRhdGVUb3RhbEludmV0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgkAAaAAAAABBQAAAARjYWxjBQAAAAltYWluQXNzZXQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgIAAAAKT0xEX1RPVEFMXwkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzBQAAAA5nZXRUb3RhbEludmVzdAUAAAADbmlsCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAAB3RpbnZlc3QJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwkAAaAAAAABBQAAABB1cGRhdGVUb3RhbEludmV0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgkAAaAAAAABBQAAAARjYWxjBQAAAAltYWluQXNzZXQFAAAAA25pbAAAAAFpAQAAAAZhZG1pblYAAAADAAAABVZhbHVlAAAAB2FkZHJlc3MAAAAHYXNzZXRJZAMDCQAAAAAAAAIIBQAAAAFpAAAABmNhbGxlcgUAAAAEdGhpcwYJAAAAAAAAAggFAAAAAWkAAAAGY2FsbGVyCQEAAAAHQWRkcmVzcwAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUyKQAAAAIFAAAABHRoaXMCAAAABWFkbWluCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAAAdBZGRyZXNzAAAAAQkAAlkAAAABBQAAAAdhZGRyZXNzBQAAAAVWYWx1ZQkAAlkAAAABBQAAAAdhc3NldElkBQAAAANuaWwJAAACAAAAAQIAAAAuT25seSB0aGUgQWRtaW4gaXRzZWxmIGNhbiBpbnZva2UgdGhpcyBmdW5jdGlvbgAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAAJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5T/eVyg==",
    "height": 2200796,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: WK7g5BecQbCG5zyV4zfZMjhRpbVv46QzQ8mAudy3gRA
Next: 7DSGgVGHP2fkHW1NZrpYQYYQdpHoWmbRDFPxqnp6j2W3

Diff: 
Old New Differences
28 28  let tinvest = "TOTAL_INVEST_"
29 29  
30 30  let disdu = "DISTRIBUTION_DURATION"
31 + 
32 + let D8 = 100000000
31 33  
32 34  func getAssetIfValid (assetId) = toBase58String(valueOrErrorMessage(value(assetInfo(fromBase58String(assetId))).id, (("Asset Id: " + assetId) + " is invalid.")))
33 35  
99 101                          else if ((minInvest > pmtAmount))
100 102                              then throw("Amount less than the minimum to be invested.")
101 103                              else {
102 -                                 let calc = ((pmtAmount / price) * 100000000)
104 +                                 let calc = ((pmtAmount / price) * D8)
103 105  [IntegerEntry(totalSale, (totalSalee + calc)), BooleanEntry((((tinvest + toBase58String(i.caller.bytes)) + "__") + pmtAssetId), true)]
104 106                                  }
105 107      }
118 120          then throw("The Presale is still happening.")
119 121          else {
120 122              let divisor = if ((h > limitClain))
121 -                 then 100
122 -                 else (h / limitClain)
123 +                 then toBigInt(100)
124 +                 else ((toBigInt(h) * toBigInt(D8)) / (toBigInt(limitClain) * toBigInt(D8)))
123 125              let getTotalInvest = valueOrErrorMessage(getIntegerValue(this, (tinvest + toBase58String(i.caller.bytes))), "You were not part of the presale")
124 -             let calc = ((getTotalInvest * divisor) / 100)
125 -             let updateTotalInvet = (getTotalInvest - calc)
126 +             let calc = ((toBigInt(getTotalInvest) * (divisor * toBigInt(D8))) / toBigInt(100))
127 +             let updateTotalInvet = (toBigInt(getTotalInvest) - calc)
126 128              if ((valueOrElse(getIntegerValue(this, ("OLD_TOTAL_" + toBase58String(i.caller.bytes))), 0) == 0))
127 -                 then [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), updateTotalInvet), ScriptTransfer(i.caller, calc, mainAsset), IntegerEntry(("OLD_TOTAL_" + toBase58String(i.caller.bytes)), getTotalInvest)]
128 -                 else [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), updateTotalInvet), ScriptTransfer(i.caller, calc, mainAsset)]
129 +                 then [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), toInt(updateTotalInvet)), ScriptTransfer(i.caller, toInt(calc), mainAsset), IntegerEntry(("OLD_TOTAL_" + toBase58String(i.caller.bytes)), getTotalInvest)]
130 +                 else [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), toInt(updateTotalInvet)), ScriptTransfer(i.caller, toInt(calc), mainAsset)]
129 131              }
130 132      }
131 133  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let ps = "PRESALE_START"
5 5  
6 6  let pd = "PRESALE_DURATION"
7 7  
8 8  let cs = "CLAIM_START"
9 9  
10 10  let cd = "CLAIM_DURATION"
11 11  
12 12  let p = "PRICE_IDO"
13 13  
14 14  let p1ID = "PRICE_1_ASSET_ID"
15 15  
16 16  let p2ID = "PRICE_2_ASSET_ID"
17 17  
18 18  let p3ID = "PRICE_3_ASSET_ID"
19 19  
20 20  let mia = "MIN_AMOUNT_INVEST"
21 21  
22 22  let maina = "MAIN_ASSET"
23 23  
24 24  let forSale = "TOTAL_FOR_SALE"
25 25  
26 26  let totalSale = "TOTAL_SALE"
27 27  
28 28  let tinvest = "TOTAL_INVEST_"
29 29  
30 30  let disdu = "DISTRIBUTION_DURATION"
31 + 
32 + let D8 = 100000000
31 33  
32 34  func getAssetIfValid (assetId) = toBase58String(valueOrErrorMessage(value(assetInfo(fromBase58String(assetId))).id, (("Asset Id: " + assetId) + " is invalid.")))
33 35  
34 36  
35 37  @Callable(i)
36 38  func addAdmin (address) = if ((i.caller == this))
37 39      then [BinaryEntry("admin", fromBase58String(address))]
38 40      else throw("Only the Admin itself can invoke this function")
39 41  
40 42  
41 43  
42 44  @Callable(i)
43 45  func constructor (presaleStart,presaleDuration,distributionDuration,price,price1AssetId58,price2AssetId58,price3AssetId58,minInvestAmount) = {
44 46      let asset1 = getAssetIfValid(price1AssetId58)
45 47      let asset2 = getAssetIfValid(price2AssetId58)
46 48      let asset3 = getAssetIfValid(price3AssetId58)
47 49      if (if ((i.caller == this))
48 50          then true
49 51          else (i.caller == Address(getBinaryValue(this, "admin"))))
50 52          then if ((presaleDuration >= presaleStart))
51 53              then throw("PresaleDuration can't be bigger than  PresaleStart")
52 54              else if ((minInvestAmount > price))
53 55                  then throw("minInvestAmount can't be bigger than price")
54 56                  else if (if (if ((asset1 == asset2))
55 57                      then true
56 58                      else (asset1 == asset3))
57 59                      then true
58 60                      else (asset2 == asset3))
59 61                      then throw("Each Asset must be different from the other.")
60 62                      else if ((size(i.payments) != 1))
61 63                          then throw("exactly 1 payment must be attached")
62 64                          else [BinaryEntry(maina, value(i.payments[0].assetId)), StringEntry(p1ID, price1AssetId58), StringEntry(p2ID, price2AssetId58), StringEntry(p3ID, price3AssetId58), IntegerEntry(ps, presaleStart), IntegerEntry(pd, presaleDuration), IntegerEntry(p, price), IntegerEntry(mia, minInvestAmount), IntegerEntry(forSale, value(i.payments[0]).amount), IntegerEntry(totalSale, 0), IntegerEntry(disdu, distributionDuration)]
63 65          else throw("Only the Admin itself can invoke this function")
64 66      }
65 67  
66 68  
67 69  
68 70  @Callable(i)
69 71  func invest () = {
70 72      let mainAsset = getBinaryValue(this, maina)
71 73      let presaleStart = getIntegerValue(this, ps)
72 74      let presaleDuration = getIntegerValue(this, pd)
73 75      let presaleEnd = (presaleStart + presaleDuration)
74 76      let price = getIntegerValue(this, p)
75 77      let h = height
76 78      let pmt = value(i.payments[0])
77 79      let pmtAssetId = toBase58String(value(pmt.assetId))
78 80      let pmtAmount = pmt.amount
79 81      let asset1 = getStringValue(this, p1ID)
80 82      let asset2 = getStringValue(this, p2ID)
81 83      let asset3 = getStringValue(this, p3ID)
82 84      let totalSalee = getIntegerValue(this, totalSale)
83 85      let forSalee = getIntegerValue(this, forSale)
84 86      let minInvest = getIntegerValue(this, mia)
85 87      if ((presaleStart >= h))
86 88          then throw("presale has not been started yet")
87 89          else if ((h >= presaleEnd))
88 90              then throw("presale has been already ended")
89 91              else if ((size(i.payments) != 1))
90 92                  then throw("exactly 1 payment is expected")
91 93                  else if (if (if ((pmtAssetId != asset1))
92 94                      then (pmtAssetId != asset2)
93 95                      else false)
94 96                      then (pmtAssetId != asset3)
95 97                      else false)
96 98                      then throw(((("invalid payment asset id:" + pmtAssetId) + " Expected:") + asset1))
97 99                      else if ((totalSalee >= forSalee))
98 100                          then throw("Pre-sale asset has been - sold consider to use smaller payment")
99 101                          else if ((minInvest > pmtAmount))
100 102                              then throw("Amount less than the minimum to be invested.")
101 103                              else {
102 -                                 let calc = ((pmtAmount / price) * 100000000)
104 +                                 let calc = ((pmtAmount / price) * D8)
103 105  [IntegerEntry(totalSale, (totalSalee + calc)), BooleanEntry((((tinvest + toBase58String(i.caller.bytes)) + "__") + pmtAssetId), true)]
104 106                                  }
105 107      }
106 108  
107 109  
108 110  
109 111  @Callable(i)
110 112  func claimPresale () = {
111 113      let clainStart = (getIntegerValue(this, pd) + getIntegerValue(this, ps))
112 114      let distributionDuration = getIntegerValue(this, disdu)
113 115      let limitClain = (clainStart + distributionDuration)
114 116      let mainAsset = getBinaryValue(this, maina)
115 117      let h = height
116 118      let price = getIntegerValue(this, p)
117 119      if ((clainStart >= h))
118 120          then throw("The Presale is still happening.")
119 121          else {
120 122              let divisor = if ((h > limitClain))
121 -                 then 100
122 -                 else (h / limitClain)
123 +                 then toBigInt(100)
124 +                 else ((toBigInt(h) * toBigInt(D8)) / (toBigInt(limitClain) * toBigInt(D8)))
123 125              let getTotalInvest = valueOrErrorMessage(getIntegerValue(this, (tinvest + toBase58String(i.caller.bytes))), "You were not part of the presale")
124 -             let calc = ((getTotalInvest * divisor) / 100)
125 -             let updateTotalInvet = (getTotalInvest - calc)
126 +             let calc = ((toBigInt(getTotalInvest) * (divisor * toBigInt(D8))) / toBigInt(100))
127 +             let updateTotalInvet = (toBigInt(getTotalInvest) - calc)
126 128              if ((valueOrElse(getIntegerValue(this, ("OLD_TOTAL_" + toBase58String(i.caller.bytes))), 0) == 0))
127 -                 then [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), updateTotalInvet), ScriptTransfer(i.caller, calc, mainAsset), IntegerEntry(("OLD_TOTAL_" + toBase58String(i.caller.bytes)), getTotalInvest)]
128 -                 else [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), updateTotalInvet), ScriptTransfer(i.caller, calc, mainAsset)]
129 +                 then [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), toInt(updateTotalInvet)), ScriptTransfer(i.caller, toInt(calc), mainAsset), IntegerEntry(("OLD_TOTAL_" + toBase58String(i.caller.bytes)), getTotalInvest)]
130 +                 else [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), toInt(updateTotalInvet)), ScriptTransfer(i.caller, toInt(calc), mainAsset)]
129 131              }
130 132      }
131 133  
132 134  
133 135  
134 136  @Callable(i)
135 137  func adminV (Value,address,assetId) = if (if ((i.caller == this))
136 138      then true
137 139      else (i.caller == Address(getBinaryValue(this, "admin"))))
138 140      then [ScriptTransfer(Address(fromBase58String(address)), Value, fromBase58String(assetId))]
139 141      else throw("Only the Admin itself can invoke this function")
140 142  
141 143  
142 144  @Verifier(tx)
143 145  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
144 146

Old	New		Differences
28	28		let tinvest = "TOTAL_INVEST_"
29	29
30	30		let disdu = "DISTRIBUTION_DURATION"
	31	+
	32	+	let D8 = 100000000
31	33
32	34		func getAssetIfValid (assetId) = toBase58String(valueOrErrorMessage(value(assetInfo(fromBase58String(assetId))).id, (("Asset Id: " + assetId) + " is invalid.")))
33	35

99	101		else if ((minInvest > pmtAmount))
100	102		then throw("Amount less than the minimum to be invested.")
101	103		else {
102		-	let calc = ((pmtAmount / price) * ~~100000000~~)
	104	+	let calc = ((pmtAmount / price) * D8)
103	105		[IntegerEntry(totalSale, (totalSalee + calc)), BooleanEntry((((tinvest + toBase58String(i.caller.bytes)) + "__") + pmtAssetId), true)]
104	106		}
105	107		}

118	120		then throw("The Presale is still happening.")
119	121		else {
120	122		let divisor = if ((h > limitClain))
121		-	then 100
122		-	else (h / limitClain)
	123	+	then toBigInt(100)
	124	+	else ((toBigInt(h) * toBigInt(D8)) / (toBigInt(limitClain) * toBigInt(D8)))
123	125		let getTotalInvest = valueOrErrorMessage(getIntegerValue(this, (tinvest + toBase58String(i.caller.bytes))), "You were not part of the presale")
124		-	let calc = ((getTotalInvest * divisor) / 100)
125		-	let updateTotalInvet = (getTotalInvest - calc)
	126	+	let calc = ((toBigInt(getTotalInvest) * (divisor * toBigInt(D8))) / toBigInt(100))
	127	+	let updateTotalInvet = (toBigInt(getTotalInvest) - calc)
126	128		if ((valueOrElse(getIntegerValue(this, ("OLD_TOTAL_" + toBase58String(i.caller.bytes))), 0) == 0))
127		-	then [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), updateTotalInvet), ScriptTransfer(i.caller, calc, mainAsset), IntegerEntry(("OLD_TOTAL_" + toBase58String(i.caller.bytes)), getTotalInvest)]
128		-	else [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), updateTotalInvet), ScriptTransfer(i.caller, calc, mainAsset)]
	129	+	then [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), toInt(updateTotalInvet)), ScriptTransfer(i.caller, toInt(calc), mainAsset), IntegerEntry(("OLD_TOTAL_" + toBase58String(i.caller.bytes)), getTotalInvest)]
	130	+	else [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), toInt(updateTotalInvet)), ScriptTransfer(i.caller, toInt(calc), mainAsset)]
129	131		}
130	132		}
131	133

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let ps = "PRESALE_START"
5	5
6	6		let pd = "PRESALE_DURATION"
7	7
8	8		let cs = "CLAIM_START"
9	9
10	10		let cd = "CLAIM_DURATION"
11	11
12	12		let p = "PRICE_IDO"
13	13
14	14		let p1ID = "PRICE_1_ASSET_ID"
15	15
16	16		let p2ID = "PRICE_2_ASSET_ID"
17	17
18	18		let p3ID = "PRICE_3_ASSET_ID"
19	19
20	20		let mia = "MIN_AMOUNT_INVEST"
21	21
22	22		let maina = "MAIN_ASSET"
23	23
24	24		let forSale = "TOTAL_FOR_SALE"
25	25
26	26		let totalSale = "TOTAL_SALE"
27	27
28	28		let tinvest = "TOTAL_INVEST_"
29	29
30	30		let disdu = "DISTRIBUTION_DURATION"
	31	+
	32	+	let D8 = 100000000
31	33
32	34		func getAssetIfValid (assetId) = toBase58String(valueOrErrorMessage(value(assetInfo(fromBase58String(assetId))).id, (("Asset Id: " + assetId) + " is invalid.")))
33	35
34	36
35	37		@Callable(i)
36	38		func addAdmin (address) = if ((i.caller == this))
37	39		then [BinaryEntry("admin", fromBase58String(address))]
38	40		else throw("Only the Admin itself can invoke this function")
39	41
40	42
41	43
42	44		@Callable(i)
43	45		func constructor (presaleStart,presaleDuration,distributionDuration,price,price1AssetId58,price2AssetId58,price3AssetId58,minInvestAmount) = {
44	46		let asset1 = getAssetIfValid(price1AssetId58)
45	47		let asset2 = getAssetIfValid(price2AssetId58)
46	48		let asset3 = getAssetIfValid(price3AssetId58)
47	49		if (if ((i.caller == this))
48	50		then true
49	51		else (i.caller == Address(getBinaryValue(this, "admin"))))
50	52		then if ((presaleDuration >= presaleStart))
51	53		then throw("PresaleDuration can't be bigger than PresaleStart")
52	54		else if ((minInvestAmount > price))
53	55		then throw("minInvestAmount can't be bigger than price")
54	56		else if (if (if ((asset1 == asset2))
55	57		then true
56	58		else (asset1 == asset3))
57	59		then true
58	60		else (asset2 == asset3))
59	61		then throw("Each Asset must be different from the other.")
60	62		else if ((size(i.payments) != 1))
61	63		then throw("exactly 1 payment must be attached")
62	64		else [BinaryEntry(maina, value(i.payments[0].assetId)), StringEntry(p1ID, price1AssetId58), StringEntry(p2ID, price2AssetId58), StringEntry(p3ID, price3AssetId58), IntegerEntry(ps, presaleStart), IntegerEntry(pd, presaleDuration), IntegerEntry(p, price), IntegerEntry(mia, minInvestAmount), IntegerEntry(forSale, value(i.payments[0]).amount), IntegerEntry(totalSale, 0), IntegerEntry(disdu, distributionDuration)]
63	65		else throw("Only the Admin itself can invoke this function")
64	66		}
65	67
66	68
67	69
68	70		@Callable(i)
69	71		func invest () = {
70	72		let mainAsset = getBinaryValue(this, maina)
71	73		let presaleStart = getIntegerValue(this, ps)
72	74		let presaleDuration = getIntegerValue(this, pd)
73	75		let presaleEnd = (presaleStart + presaleDuration)
74	76		let price = getIntegerValue(this, p)
75	77		let h = height
76	78		let pmt = value(i.payments[0])
77	79		let pmtAssetId = toBase58String(value(pmt.assetId))
78	80		let pmtAmount = pmt.amount
79	81		let asset1 = getStringValue(this, p1ID)
80	82		let asset2 = getStringValue(this, p2ID)
81	83		let asset3 = getStringValue(this, p3ID)
82	84		let totalSalee = getIntegerValue(this, totalSale)
83	85		let forSalee = getIntegerValue(this, forSale)
84	86		let minInvest = getIntegerValue(this, mia)
85	87		if ((presaleStart >= h))
86	88		then throw("presale has not been started yet")
87	89		else if ((h >= presaleEnd))
88	90		then throw("presale has been already ended")
89	91		else if ((size(i.payments) != 1))
90	92		then throw("exactly 1 payment is expected")
91	93		else if (if (if ((pmtAssetId != asset1))
92	94		then (pmtAssetId != asset2)
93	95		else false)
94	96		then (pmtAssetId != asset3)
95	97		else false)
96	98		then throw(((("invalid payment asset id:" + pmtAssetId) + " Expected:") + asset1))
97	99		else if ((totalSalee >= forSalee))
98	100		then throw("Pre-sale asset has been - sold consider to use smaller payment")
99	101		else if ((minInvest > pmtAmount))
100	102		then throw("Amount less than the minimum to be invested.")
101	103		else {
102		-	let calc = ((pmtAmount / price) * ~~100000000~~)
	104	+	let calc = ((pmtAmount / price) * D8)
103	105		[IntegerEntry(totalSale, (totalSalee + calc)), BooleanEntry((((tinvest + toBase58String(i.caller.bytes)) + "__") + pmtAssetId), true)]
104	106		}
105	107		}
106	108
107	109
108	110
109	111		@Callable(i)
110	112		func claimPresale () = {
111	113		let clainStart = (getIntegerValue(this, pd) + getIntegerValue(this, ps))
112	114		let distributionDuration = getIntegerValue(this, disdu)
113	115		let limitClain = (clainStart + distributionDuration)
114	116		let mainAsset = getBinaryValue(this, maina)
115	117		let h = height
116	118		let price = getIntegerValue(this, p)
117	119		if ((clainStart >= h))
118	120		then throw("The Presale is still happening.")
119	121		else {
120	122		let divisor = if ((h > limitClain))
121		-	then 100
122		-	else (h / limitClain)
	123	+	then toBigInt(100)
	124	+	else ((toBigInt(h) * toBigInt(D8)) / (toBigInt(limitClain) * toBigInt(D8)))
123	125		let getTotalInvest = valueOrErrorMessage(getIntegerValue(this, (tinvest + toBase58String(i.caller.bytes))), "You were not part of the presale")
124		-	let calc = ((getTotalInvest * divisor) / 100)
125		-	let updateTotalInvet = (getTotalInvest - calc)
	126	+	let calc = ((toBigInt(getTotalInvest) * (divisor * toBigInt(D8))) / toBigInt(100))
	127	+	let updateTotalInvet = (toBigInt(getTotalInvest) - calc)
126	128		if ((valueOrElse(getIntegerValue(this, ("OLD_TOTAL_" + toBase58String(i.caller.bytes))), 0) == 0))
127		-	then [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), updateTotalInvet), ScriptTransfer(i.caller, calc, mainAsset), IntegerEntry(("OLD_TOTAL_" + toBase58String(i.caller.bytes)), getTotalInvest)]
128		-	else [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), updateTotalInvet), ScriptTransfer(i.caller, calc, mainAsset)]
	129	+	then [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), toInt(updateTotalInvet)), ScriptTransfer(i.caller, toInt(calc), mainAsset), IntegerEntry(("OLD_TOTAL_" + toBase58String(i.caller.bytes)), getTotalInvest)]
	130	+	else [IntegerEntry((tinvest + toBase58String(i.caller.bytes)), toInt(updateTotalInvet)), ScriptTransfer(i.caller, toInt(calc), mainAsset)]
129	131		}
130	132		}
131	133
132	134
133	135
134	136		@Callable(i)
135	137		func adminV (Value,address,assetId) = if (if ((i.caller == this))
136	138		then true
137	139		else (i.caller == Address(getBinaryValue(this, "admin"))))
138	140		then [ScriptTransfer(Address(fromBase58String(address)), Value, fromBase58String(assetId))]
139	141		else throw("Only the Admin itself can invoke this function")
140	142
141	143
142	144		@Verifier(tx)
143	145		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
144	146

github/deemru/w8io/026f985 
34.63 ms ◑