tx · BshTvsEFXNT1nYoma6JjZ8xDevXsB2JNvUkLcZLhBZJL

3MqkzvvqQgA7sJnaNefBU6KthtYQ6hB6ptY:  -0.01000000 Waves

2021.10.04 13:50 [1731377] smart account 3MqkzvvqQgA7sJnaNefBU6KthtYQ6hB6ptY > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BshTvsEFXNT1nYoma6JjZ8xDevXsB2JNvUkLcZLhBZJL",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1633344634671,
    "version": 1,
    "sender": "3MqkzvvqQgA7sJnaNefBU6KthtYQ6hB6ptY",
    "senderPublicKey": "CgdJuifq5GdexVWQhKsstVu825jHrY9NrnV9jetuwEM3",
    "proofs": [
        "Jzfs3j9xitjip5Q2CQY4XcDHS8cfVGmmA7qFfEDy2aGX6JS7F9Ny5BsqPqi46MMt18oiWTknBvEbPapGhhTnCLB"
    ],
    "script": "base64:AAIFAAAAAAAAAAsIAhIFCgMBAQgSAAAAABYAAAAAA1NFUAIAAAACX18AAAAAFUlkeENmZ0NsYWltU3RhcnRCbG9jawAAAAAAAAAAAQAAAAAYSWR4Q2ZnQ2xhaW1WZXN0aW5nUGVyaW9kAAAAAAAAAAACAAAAABJJZHhDZmdDbGFpbUFzc2V0SWQAAAAAAAAAAAMAAAAAFElkeENmZ0NsYWltQXNzZXRNdWx0AAAAAAAAAAAEAAAAABVJZHhDZmdDbGFpbUFzc2V0T3duZXIAAAAAAAAAAAUAAAAAG0lkeENmZ0NsYWltQXNzZXRUb3RhbEFtb3VudAAAAAAAAAAABgAAAAAbSWR4VG90YWxzVG90YWxDbGFpbWVkQW1vdW50AAAAAAAAAAABAAAAABhJZHhUb3RhbHNSZW1haW5pbmdBbW91bnQAAAAAAAAAAAIAAAAAGklkeFRvdGFsc0xhc3RDbGFpbWVkSGVpZ2h0AAAAAAAAAAADAQAAAA9nZXRTdHJpbmdPckZhaWwAAAABAAAAA2tleQkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEIgAAAAEFAAAAA2tleQkAASwAAAACCQABLAAAAAICAAAAD21hbmRhdG9yeSB0aGlzLgUAAAADa2V5AgAAAA8gaXMgbm90IGRlZmluZWQBAAAAEmZvcm1hdENvbmZpZ1N0cmluZwAAAAYAAAAPY2xhaW1TdGFydEJsb2NrAAAADXZlc3RpbmdQZXJpb2QAAAANYXNzZXRJZEJhc2U1OAAAAAlhc3NldE11bHQAAAAKYXNzZXRPd25lcgAAAA1hc3NldFRvdGFsQW10CQAEuQAAAAIJAARMAAAAAgIAAAANJWQlZCVzJWQlcyVkJQkABEwAAAACBQAAAA9jbGFpbVN0YXJ0QmxvY2sJAARMAAAAAgUAAAANdmVzdGluZ1BlcmlvZAkABEwAAAACBQAAAA1hc3NldElkQmFzZTU4CQAETAAAAAIFAAAACWFzc2V0TXVsdAkABEwAAAACBQAAAAphc3NldE93bmVyCQAETAAAAAIFAAAADWFzc2V0VG90YWxBbXQFAAAAA25pbAUAAAADU0VQAQAAAAxmb3JtYXRDb25maWcAAAAGAAAAD2NsYWltU3RhcnRCbG9jawAAAA12ZXN0aW5nUGVyaW9kAAAADWFzc2V0SWRCYXNlNTgAAAAJYXNzZXRNdWx0AAAAD2NsYWltQXNzZXRPd25lcgAAABVjbGFpbUFzc2V0VG90YWxBbW91bnQJAQAAABJmb3JtYXRDb25maWdTdHJpbmcAAAAGCQABpAAAAAEFAAAAD2NsYWltU3RhcnRCbG9jawkAAaQAAAABBQAAAA12ZXN0aW5nUGVyaW9kBQAAAA1hc3NldElkQmFzZTU4CQABpAAAAAEFAAAACWFzc2V0TXVsdAUAAAAPY2xhaW1Bc3NldE93bmVyCQABpAAAAAEFAAAAFWNsYWltQXNzZXRUb3RhbEFtb3VudAEAAAASZm9ybWF0VG90YWxzU3RyaW5nAAAAAwAAABJ0b3RhbENsYWltZWRBbW91bnQAAAAXcmVtYWluaW5nQW1vdW50Rm9yQ2xhaW0AAAARbGFzdENsYWltZWRIZWlnaHQJAAS5AAAAAgkABEwAAAACAgAAAAYlZCVkJWQJAARMAAAAAgUAAAASdG90YWxDbGFpbWVkQW1vdW50CQAETAAAAAIFAAAAF3JlbWFpbmluZ0Ftb3VudEZvckNsYWltCQAETAAAAAIFAAAAEWxhc3RDbGFpbWVkSGVpZ2h0BQAAAANuaWwFAAAAA1NFUAEAAAATZm9ybWF0SGlzdG9yeVJlY29yZAAAAAQAAAASY2xhaW1lZEFzc2V0QW1vdW50AAAADmNsYWltaW5nQmxvY2tzAAAAFGZpcnN0Q2FsdWxhdGlvbkJsb2NrAAAAE2xhc3RDYWx1bGF0aW9uQmxvY2sJAAS5AAAAAgkABEwAAAACAgAAAAwlZCVkJWQlZCVkJWQJAARMAAAAAgkAAaQAAAABBQAAAAZoZWlnaHQJAARMAAAAAgkAAaQAAAABCAUAAAAJbGFzdEJsb2NrAAAACXRpbWVzdGFtcAkABEwAAAACCQABpAAAAAEFAAAAEmNsYWltZWRBc3NldEFtb3VudAkABEwAAAACCQABpAAAAAEFAAAADmNsYWltaW5nQmxvY2tzCQAETAAAAAIJAAGkAAAAAQUAAAAUZmlyc3RDYWx1bGF0aW9uQmxvY2sJAARMAAAAAgkAAaQAAAABBQAAABNsYXN0Q2FsdWxhdGlvbkJsb2NrBQAAAANuaWwFAAAAA1NFUAEAAAAJa2V5Q29uZmlnAAAAAAIAAAAKJXNfX2NvbmZpZwEAAAAJa2V5VG90YWxzAAAAAAIAAAAKJXNfX3RvdGFscwEAAAAZa2V5T3BlcmF0aW9uSGlzdG9yeVJlY29yZAAAAAMAAAAEdHlwZQAAAAt1c2VyQWRkcmVzcwAAAAZ0eElkNTgJAAS5AAAAAgkABEwAAAACAgAAABElcyVzJXMlc19faGlzdG9yeQkABEwAAAACBQAAAAR0eXBlCQAETAAAAAIFAAAAC3VzZXJBZGRyZXNzCQAETAAAAAIFAAAABnR4SWQ1OAUAAAADbmlsBQAAAANTRVABAAAAD3JlYWRDb25maWdBcnJheQAAAAAJAAS1AAAAAgkBAAAAD2dldFN0cmluZ09yRmFpbAAAAAEJAQAAAAlrZXlDb25maWcAAAAABQAAAANTRVABAAAAD3JlYWRUb3RhbHNBcnJheQAAAAAJAAS1AAAAAgkBAAAAD2dldFN0cmluZ09yRmFpbAAAAAEJAQAAAAlrZXlUb3RhbHMAAAAABQAAAANTRVABAAAAC1RvdGFsc0VudHJ5AAAABAAAAANrZXkAAAAJb3JpZ0FycmF5AAAACmNsYWltZWRBbXQAAAAUbmV3TGFzdENsYWltZWRIZWlnaHQEAAAAEnRvdGFsQ2xhaW1lZEFtb3VudAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAACW9yaWdBcnJheQUAAAAbSWR4VG90YWxzVG90YWxDbGFpbWVkQW1vdW50BAAAAA9yZW1haW5pbmdBbW91bnQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAlvcmlnQXJyYXkFAAAAGElkeFRvdGFsc1JlbWFpbmluZ0Ftb3VudAQAAAARbGFzdENsYWltZWRIZWlnaHQJAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAlvcmlnQXJyYXkFAAAAGklkeFRvdGFsc0xhc3RDbGFpbWVkSGVpZ2h0BAAAABVuZXdUb3RhbENsYWltZWRBbW91bnQJAABkAAAAAgUAAAASdG90YWxDbGFpbWVkQW1vdW50BQAAAApjbGFpbWVkQW10BAAAABJuZXdSZW1haW5pbmdBbW91bnQJAABlAAAAAgUAAAAPcmVtYWluaW5nQW1vdW50BQAAAApjbGFpbWVkQW10AwkAAGYAAAACAAAAAAAAAAAABQAAABJuZXdSZW1haW5pbmdBbW91bnQJAAACAAAAAQIAAAAMaW52YWxpZCBtYXRoCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAANrZXkJAQAAABJmb3JtYXRUb3RhbHNTdHJpbmcAAAADCQABpAAAAAEFAAAAFW5ld1RvdGFsQ2xhaW1lZEFtb3VudAkAAaQAAAABBQAAABJuZXdSZW1haW5pbmdBbW91bnQJAAGkAAAAAQUAAAAUbmV3TGFzdENsYWltZWRIZWlnaHQBAAAAGkNsYWltT3BlcmF0aW9uSGlzdG9yeUVudHJ5AAAABgAAAAt1c2VyQWRkcmVzcwAAABJjbGFpbWVkQXNzZXRBbW91bnQAAAAOY2xhaW1pbmdCbG9ja3MAAAAVZmlyc3RDYWxjdWxhdGlvbkJsb2NrAAAAFGxhc3RDYWxjdWxhdGlvbkJsb2NrAAAABHR4SWQJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAABlrZXlPcGVyYXRpb25IaXN0b3J5UmVjb3JkAAAAAwIAAAAFY2xhaW0FAAAAC3VzZXJBZGRyZXNzCQACWAAAAAEFAAAABHR4SWQJAQAAABNmb3JtYXRIaXN0b3J5UmVjb3JkAAAABAUAAAASY2xhaW1lZEFzc2V0QW1vdW50BQAAAA5jbGFpbWluZ0Jsb2NrcwUAAAAVZmlyc3RDYWxjdWxhdGlvbkJsb2NrBQAAABRsYXN0Q2FsY3VsYXRpb25CbG9jawAAAAIAAAABaQEAAAALY29uc3RydWN0b3IAAAADAAAAD2NsYWltU3RhcnRCbG9jawAAABN2ZXN0aW5nUGVyaW9kQmxvY2tzAAAAEmJlbmVmaWNpYXJ5QWRkcmVzcwQAAAAKdmVzdGluZ0VuZAkAAGQAAAACBQAAAA9jbGFpbVN0YXJ0QmxvY2sFAAAAE3Zlc3RpbmdQZXJpb2RCbG9ja3MDCQEAAAAJaXNEZWZpbmVkAAAAAQkABCIAAAABCQEAAAAJa2V5Q29uZmlnAAAAAAkAAAIAAAABAgAAABNhbHJlYWR5IGluaXRpYWxpemVkAwkBAAAAAiE9AAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAQkAAAIAAAABAgAAACJleGFjdGx5IDEgcGF5bWVudCBtdXN0IGJlIGF0dGFjaGVkAwkBAAAAAiE9AAAAAgIAAAAjM1A2cHNSaUR2RVNwNUpGb2p2eXdmdW1mNktFbVExUllnYm4JAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyCQAAAgAAAAECAAAADm5vdCBhdXRob3JpemVkBAAAABhiZW5lZmljaWFyeUFkZHJlc3NQYXJzZWQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABCYAAAABBQAAABJiZW5lZmljaWFyeUFkZHJlc3MCAAAAIEludmFsaWQgYmVuZWZpY2lhckFkZHJlc3MgcGFzc2VkBAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAADGNsYWltQXNzZXRJZAkBAAAABXZhbHVlAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkBAAAAA5jbGFpbUFzc2V0SW5mbwkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAD7AAAAAEFAAAADGNsYWltQXNzZXRJZAIAAAAbZmFpbCB0byBsb2FkIGlkbyBhc3NldCBpbmZvBAAAAA5jbGFpbUFzc2V0SWQ1OAkAAlgAAAABBQAAAAxjbGFpbUFzc2V0SWQEAAAADmNsYWltQXNzZXRNdWx0CQAAbAAAAAYAAAAAAAAAAAoAAAAAAAAAAAAIBQAAAA5jbGFpbUFzc2V0SW5mbwAAAAhkZWNpbWFscwAAAAAAAAAAAAAAAAAAAAAAAAUAAAAERE9XTgQAAAAQY2xhaW1Bc3NldEFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAACWtleUNvbmZpZwAAAAAJAQAAAAxmb3JtYXRDb25maWcAAAAGBQAAAA9jbGFpbVN0YXJ0QmxvY2sFAAAAE3Zlc3RpbmdQZXJpb2RCbG9ja3MFAAAADmNsYWltQXNzZXRJZDU4BQAAAA5jbGFpbUFzc2V0TXVsdAkABCUAAAABBQAAABhiZW5lZmljaWFyeUFkZHJlc3NQYXJzZWQFAAAAEGNsYWltQXNzZXRBbW91bnQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAACWtleVRvdGFscwAAAAAJAQAAABJmb3JtYXRUb3RhbHNTdHJpbmcAAAADAgAAAAEwCQABpAAAAAEFAAAAEGNsYWltQXNzZXRBbW91bnQCAAAAATAFAAAAA25pbAAAAAFpAQAAAAVjbGFpbQAAAAAEAAAACGNmZ0FycmF5CQEAAAAPcmVhZENvbmZpZ0FycmF5AAAAAAQAAAATY2ZnQ2xhaW1TdGFydEhlaWdodAkBAAAADXBhcnNlSW50VmFsdWUAAAABCQABkQAAAAIFAAAACGNmZ0FycmF5BQAAABVJZHhDZmdDbGFpbVN0YXJ0QmxvY2sEAAAAEGNmZ0NsYWltRHVyYXRpb24JAQAAAA1wYXJzZUludFZhbHVlAAAAAQkAAZEAAAACBQAAAAhjZmdBcnJheQUAAAAYSWR4Q2ZnQ2xhaW1WZXN0aW5nUGVyaW9kBAAAAAtjZmdDbGFpbUVuZAkAAGQAAAACBQAAABNjZmdDbGFpbVN0YXJ0SGVpZ2h0BQAAABBjZmdDbGFpbUR1cmF0aW9uBAAAABFjZmdDbGFpbUFzc2V0SWQ1OAkAAZEAAAACBQAAAAhjZmdBcnJheQUAAAASSWR4Q2ZnQ2xhaW1Bc3NldElkBAAAABJjZmdDbGFpbUFzc2V0T3duZXIJAAGRAAAAAgUAAAAIY2ZnQXJyYXkFAAAAFUlkeENmZ0NsYWltQXNzZXRPd25lcgQAAAAYY2ZnQ2xhaW1Bc3NldFRvdGFsQW1vdW50CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAIY2ZnQXJyYXkFAAAAG0lkeENmZ0NsYWltQXNzZXRUb3RhbEFtb3VudAQAAAALdXNlckFkZHJlc3MIBQAAAAFpAAAABmNhbGxlcgQAAAANdXNlckFkZHJlc3M1OAkABCUAAAABBQAAAAt1c2VyQWRkcmVzcwQAAAAPb3JpZ1RvdGFsc0FycmF5CQEAAAAPcmVhZFRvdGFsc0FycmF5AAAAAAQAAAASdG90YWxDbGFpbWVkQW1vdW50CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAPb3JpZ1RvdGFsc0FycmF5BQAAABtJZHhUb3RhbHNUb3RhbENsYWltZWRBbW91bnQEAAAAFHRvdGFsUmVtYWluaW5nQW1vdW50CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAPb3JpZ1RvdGFsc0FycmF5BQAAABhJZHhUb3RhbHNSZW1haW5pbmdBbW91bnQEAAAAEWxhc3RDbGFpbWVkSGVpZ2h0CQEAAAANcGFyc2VJbnRWYWx1ZQAAAAEJAAGRAAAAAgUAAAAPb3JpZ1RvdGFsc0FycmF5BQAAABpJZHhUb3RhbHNMYXN0Q2xhaW1lZEhlaWdodAMJAQAAAAIhPQAAAAIFAAAADXVzZXJBZGRyZXNzNTgFAAAAEmNmZ0NsYWltQXNzZXRPd25lcgkAAAIAAAABAgAAABJwZXJtaXNzaW9ucyBkZW5pZWQDCQAAZgAAAAIFAAAAE2NmZ0NsYWltU3RhcnRIZWlnaHQFAAAABmhlaWdodAkAAAIAAAABCQABLAAAAAICAAAAGFdhaXQgY2xhaW0gc3RhcnQgYmxvY2s6IAkAAaQAAAABBQAAABNjZmdDbGFpbVN0YXJ0SGVpZ2h0BAAAABNsYXN0Q2FsdWxhdGlvbkJsb2NrAwkAAGYAAAACBQAAAAZoZWlnaHQFAAAAC2NmZ0NsYWltRW5kBQAAAAtjZmdDbGFpbUVuZAUAAAAGaGVpZ2h0BAAAABRmaXJzdENhbHVsYXRpb25CbG9jawMJAAAAAAAAAgUAAAARbGFzdENsYWltZWRIZWlnaHQAAAAAAAAAAAAFAAAAE2NmZ0NsYWltU3RhcnRIZWlnaHQFAAAAEWxhc3RDbGFpbWVkSGVpZ2h0BAAAAA5jbGFpbWluZ0Jsb2NrcwkAAGUAAAACBQAAABNsYXN0Q2FsdWxhdGlvbkJsb2NrBQAAABRmaXJzdENhbHVsYXRpb25CbG9jawQAAAATY2xhaW1pbmdBc3NldEFtb3VudAkAAGsAAAADBQAAABhjZmdDbGFpbUFzc2V0VG90YWxBbW91bnQFAAAADmNsYWltaW5nQmxvY2tzBQAAABBjZmdDbGFpbUR1cmF0aW9uCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAC3VzZXJBZGRyZXNzBQAAABNjbGFpbWluZ0Fzc2V0QW1vdW50CQACWQAAAAEFAAAAEWNmZ0NsYWltQXNzZXRJZDU4CQAETAAAAAIJAQAAAAtUb3RhbHNFbnRyeQAAAAQJAQAAAAlrZXlUb3RhbHMAAAAACQEAAAAPcmVhZFRvdGFsc0FycmF5AAAAAAUAAAATY2xhaW1pbmdBc3NldEFtb3VudAUAAAATbGFzdENhbHVsYXRpb25CbG9jawkABEwAAAACCQEAAAAaQ2xhaW1PcGVyYXRpb25IaXN0b3J5RW50cnkAAAAGBQAAAA11c2VyQWRkcmVzczU4BQAAABNjbGFpbWluZ0Fzc2V0QW1vdW50BQAAAA5jbGFpbWluZ0Jsb2NrcwUAAAAUZmlyc3RDYWx1bGF0aW9uQmxvY2sFAAAAE2xhc3RDYWx1bGF0aW9uQmxvY2sIBQAAAAFpAAAADXRyYW5zYWN0aW9uSWQFAAAAA25pbAAAAADjpPVi",
    "chainId": 84,
    "height": 1731377,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: none
Next: none

Full: 

OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 5 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let SEP = "__"
5+
6+let IdxCfgClaimStartBlock = 1
7+
8+let IdxCfgClaimVestingPeriod = 2
9+
10+let IdxCfgClaimAssetId = 3
11+
12+let IdxCfgClaimAssetMult = 4
13+
14+let IdxCfgClaimAssetOwner = 5
15+
16+let IdxCfgClaimAssetTotalAmount = 6
17+
18+let IdxTotalsTotalClaimedAmount = 1
19+
20+let IdxTotalsRemainingAmount = 2
21+
22+let IdxTotalsLastClaimedHeight = 3
23+
24+func getStringOrFail (key) = valueOrErrorMessage(getString(key), (("mandatory this." + key) + " is not defined"))
25+
26+
27+func formatConfigString (claimStartBlock,vestingPeriod,assetIdBase58,assetMult,assetOwner,assetTotalAmt) = makeString(["%d%d%s%d%s%d%", claimStartBlock, vestingPeriod, assetIdBase58, assetMult, assetOwner, assetTotalAmt], SEP)
28+
29+
30+func formatConfig (claimStartBlock,vestingPeriod,assetIdBase58,assetMult,claimAssetOwner,claimAssetTotalAmount) = formatConfigString(toString(claimStartBlock), toString(vestingPeriod), assetIdBase58, toString(assetMult), claimAssetOwner, toString(claimAssetTotalAmount))
31+
32+
33+func formatTotalsString (totalClaimedAmount,remainingAmountForClaim,lastClaimedHeight) = makeString(["%d%d%d", totalClaimedAmount, remainingAmountForClaim, lastClaimedHeight], SEP)
34+
35+
36+func formatHistoryRecord (claimedAssetAmount,claimingBlocks,firstCalulationBlock,lastCalulationBlock) = makeString(["%d%d%d%d%d%d", toString(height), toString(lastBlock.timestamp), toString(claimedAssetAmount), toString(claimingBlocks), toString(firstCalulationBlock), toString(lastCalulationBlock)], SEP)
37+
38+
39+func keyConfig () = "%s__config"
40+
41+
42+func keyTotals () = "%s__totals"
43+
44+
45+func keyOperationHistoryRecord (type,userAddress,txId58) = makeString(["%s%s%s%s__history", type, userAddress, txId58], SEP)
46+
47+
48+func readConfigArray () = split(getStringOrFail(keyConfig()), SEP)
49+
50+
51+func readTotalsArray () = split(getStringOrFail(keyTotals()), SEP)
52+
53+
54+func TotalsEntry (key,origArray,claimedAmt,newLastClaimedHeight) = {
55+    let totalClaimedAmount = parseIntValue(origArray[IdxTotalsTotalClaimedAmount])
56+    let remainingAmount = parseIntValue(origArray[IdxTotalsRemainingAmount])
57+    let lastClaimedHeight = parseIntValue(origArray[IdxTotalsLastClaimedHeight])
58+    let newTotalClaimedAmount = (totalClaimedAmount + claimedAmt)
59+    let newRemainingAmount = (remainingAmount - claimedAmt)
60+    if ((0 > newRemainingAmount))
61+        then throw("invalid math")
62+        else StringEntry(key, formatTotalsString(toString(newTotalClaimedAmount), toString(newRemainingAmount), toString(newLastClaimedHeight)))
63+    }
64+
65+
66+func ClaimOperationHistoryEntry (userAddress,claimedAssetAmount,claimingBlocks,firstCalculationBlock,lastCalculationBlock,txId) = StringEntry(keyOperationHistoryRecord("claim", userAddress, toBase58String(txId)), formatHistoryRecord(claimedAssetAmount, claimingBlocks, firstCalculationBlock, lastCalculationBlock))
67+
68+
69+@Callable(i)
70+func constructor (claimStartBlock,vestingPeriodBlocks,beneficiaryAddress) = {
71+    let vestingEnd = (claimStartBlock + vestingPeriodBlocks)
72+    if (isDefined(getString(keyConfig())))
73+        then throw("already initialized")
74+        else if ((size(i.payments) != 1))
75+            then throw("exactly 1 payment must be attached")
76+            else if (("3P6psRiDvESp5JFojvywfumf6KEmQ1RYgbn" != toString(i.caller)))
77+                then throw("not authorized")
78+                else {
79+                    let beneficiaryAddressParsed = valueOrErrorMessage(addressFromString(beneficiaryAddress), "Invalid beneficiarAddress passed")
80+                    let pmt = value(i.payments[0])
81+                    let claimAssetId = value(pmt.assetId)
82+                    let claimAssetInfo = valueOrErrorMessage(assetInfo(claimAssetId), "fail to load ido asset info")
83+                    let claimAssetId58 = toBase58String(claimAssetId)
84+                    let claimAssetMult = pow(10, 0, claimAssetInfo.decimals, 0, 0, DOWN)
85+                    let claimAssetAmount = pmt.amount
86+[StringEntry(keyConfig(), formatConfig(claimStartBlock, vestingPeriodBlocks, claimAssetId58, claimAssetMult, toString(beneficiaryAddressParsed), claimAssetAmount)), StringEntry(keyTotals(), formatTotalsString("0", toString(claimAssetAmount), "0"))]
87+                    }
88+    }
89+
90+
91+
92+@Callable(i)
93+func claim () = {
94+    let cfgArray = readConfigArray()
95+    let cfgClaimStartHeight = parseIntValue(cfgArray[IdxCfgClaimStartBlock])
96+    let cfgClaimDuration = parseIntValue(cfgArray[IdxCfgClaimVestingPeriod])
97+    let cfgClaimEnd = (cfgClaimStartHeight + cfgClaimDuration)
98+    let cfgClaimAssetId58 = cfgArray[IdxCfgClaimAssetId]
99+    let cfgClaimAssetOwner = cfgArray[IdxCfgClaimAssetOwner]
100+    let cfgClaimAssetTotalAmount = parseIntValue(cfgArray[IdxCfgClaimAssetTotalAmount])
101+    let userAddress = i.caller
102+    let userAddress58 = toString(userAddress)
103+    let origTotalsArray = readTotalsArray()
104+    let totalClaimedAmount = parseIntValue(origTotalsArray[IdxTotalsTotalClaimedAmount])
105+    let totalRemainingAmount = parseIntValue(origTotalsArray[IdxTotalsRemainingAmount])
106+    let lastClaimedHeight = parseIntValue(origTotalsArray[IdxTotalsLastClaimedHeight])
107+    if ((userAddress58 != cfgClaimAssetOwner))
108+        then throw("permissions denied")
109+        else if ((cfgClaimStartHeight > height))
110+            then throw(("Wait claim start block: " + toString(cfgClaimStartHeight)))
111+            else {
112+                let lastCalulationBlock = if ((height > cfgClaimEnd))
113+                    then cfgClaimEnd
114+                    else height
115+                let firstCalulationBlock = if ((lastClaimedHeight == 0))
116+                    then cfgClaimStartHeight
117+                    else lastClaimedHeight
118+                let claimingBlocks = (lastCalulationBlock - firstCalulationBlock)
119+                let claimingAssetAmount = fraction(cfgClaimAssetTotalAmount, claimingBlocks, cfgClaimDuration)
120+[ScriptTransfer(userAddress, claimingAssetAmount, fromBase58String(cfgClaimAssetId58)), TotalsEntry(keyTotals(), readTotalsArray(), claimingAssetAmount, lastCalulationBlock), ClaimOperationHistoryEntry(userAddress58, claimingAssetAmount, claimingBlocks, firstCalulationBlock, lastCalulationBlock, i.transactionId)]
121+                }
122+    }
123+
124+
github/deemru/w8io/026f985 
16.47 ms ◑