tx · BBfsqXChmaALfz18pQ658VAcW6EbDY9dAQZQ1oKqVR13

3MwyBKGZcdChEK9Z55HwLn3A2EgwEJJpqC1:  -0.01000000 Waves

2024.01.09 12:21 [2923759] smart account 3MwyBKGZcdChEK9Z55HwLn3A2EgwEJJpqC1 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BBfsqXChmaALfz18pQ658VAcW6EbDY9dAQZQ1oKqVR13",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1704792178770,
    "version": 2,
    "chainId": 84,
    "sender": "3MwyBKGZcdChEK9Z55HwLn3A2EgwEJJpqC1",
    "senderPublicKey": "7c3qLtcJ7EaPS2JDjXv8MBbd4kpyc6R27wcn5GgvZhur",
    "proofs": [
        "UbQWj281VL1mWxHmMuLUFXLMHDrbov2BCZt5XaatiGJmXywCymqLhsmgzPXF1DiG7FPYChUZTA3sSHqwvtaWjgH"
    ],
    "script": "base64:BgIKCAISBgoECAEBARIADGNvbnRyYWN0RmlsZQIQdmVzdGluZ19uZW8ucmlkZQADU0VQAgJfXwAISURTX0xJU1QJAMwIAgAACQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUJAMwIAgAGCQDMCAIABwkAzAgCAAgJAMwIAgAJCQDMCAIACgkAzAgCAAsJAMwIAgAMCQDMCAIADQkAzAgCAA4JAMwIAgAPCQDMCAIAEAkAzAgCABEJAMwIAgASCQDMCAIAEwkAzAgCABQJAMwIAgAVCQDMCAIAFgkAzAgCABcJAMwIAgAYCQDMCAIAGQkAzAgCABoJAMwIAgAbCQDMCAIAHAkAzAgCAB0FA25pbAARTUFYX1ZFU1RJTkdfQ09VTlQJAJADAQUISURTX0xJU1QBCHRocm93RXJyAQNtc2cJAAIBCQCsAgIJAKwCAgUMY29udHJhY3RGaWxlAgI6IAUDbXNnAAprZXlBc3NldElkCQC5CQIJAMwIAgICJXMJAMwIAgIHYXNzZXRJZAUDbmlsBQNTRVAADWFzc2V0SWRTdHJpbmcJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwUKa2V5QXNzZXRJZAIFV0FWRVMADGFzc2V0SWRCeXRlcwMJAAACBQ1hc3NldElkU3RyaW5nAgVXQVZFUwUEdW5pdAkA2QQBBQ1hc3NldElkU3RyaW5nARRpc1ZhbGlkQWRkcmVzc1N0cmluZwENYWRkcmVzc1N0cmluZwQHJG1hdGNoMAkApggBBQ1hZGRyZXNzU3RyaW5nAwkAAQIFByRtYXRjaDACB0FkZHJlc3MEAWEFByRtYXRjaDAGBwEOa2V5VXNlclZlc3RpbmcCC3VzZXJBZGRyZXNzAmlkBAZjaGVja3MJAMwIAgMJARRpc1ZhbGlkQWRkcmVzc1N0cmluZwEFC3VzZXJBZGRyZXNzBgkBCHRocm93RXJyAQkAuQkCCQDMCAICFWFkZHJlc3MgaXMgbm90IHZhbGlkOgkAzAgCBQt1c2VyQWRkcmVzcwUDbmlsAgEgCQDMCAIDAwkAZwIFAmlkAAAJAGYCBRFNQVhfVkVTVElOR19DT1VOVAUCaWQHBgkBCHRocm93RXJyAQkAuQkCCQDMCAICFmlkIHNob3VsZCBiZSBsZXNzIHRoYW4JAMwIAgkApAMBBRFNQVhfVkVTVElOR19DT1VOVAkAzAgCAgRnb3Q6CQDMCAIJAKQDAQUCaWQFA25pbAIBIAUDbmlsAwkAAAIFBmNoZWNrcwUGY2hlY2tzCQC5CQIJAMwIAgIEJXMlZAkAzAgCBQt1c2VyQWRkcmVzcwkAzAgCCQCkAwEFAmlkBQNuaWwFA1NFUAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgERZm9ybWF0VXNlclZlc3RpbmcDDXZlc3RpbmdBbW91bnQKc3RhcnRCbG9jawpsb2NrTGVuZ3RoBAZjaGVja3MJAMwIAgMJAGcCBQ12ZXN0aW5nQW1vdW50AAAGCQEIdGhyb3dFcnIBAiF2ZXN0aW5nIGFtb3VudCBjYW5ub3QgYmUgbmVnYXRpdmUJAMwIAgMJAGcCBQpzdGFydEJsb2NrAAAGCQEIdGhyb3dFcnIBAh5zdGFydCBibG9jayBjYW5ub3QgYmUgbmVnYXRpdmUJAMwIAgMJAGcCBQpsb2NrTGVuZ3RoAAAGCQEIdGhyb3dFcnIBAh5sb2NrIGxlbmd0aCBjYW5ub3QgYmUgbmVnYXRpdmUFA25pbAMJAAACBQZjaGVja3MFBmNoZWNrcwkAuQkCCQDMCAICBiVkJWQlZAkAzAgCCQCkAwEFDXZlc3RpbmdBbW91bnQJAMwIAgkApAMBBQpzdGFydEJsb2NrCQDMCAIJAKQDAQUKbG9ja0xlbmd0aAUDbmlsBQNTRVAJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BEHBhcnNlVXNlclZlc3RpbmcCC3VzZXJBZGRyZXNzAmlkBAckbWF0Y2gwCQCdCAIFBHRoaXMJAQ5rZXlVc2VyVmVzdGluZwIFC3VzZXJBZGRyZXNzBQJpZAMJAAECBQckbWF0Y2gwAgZTdHJpbmcECXJhd1N0cmluZwUHJG1hdGNoMAQLc3BsaXRTdHJpbmcJALUJAgUJcmF3U3RyaW5nBQNTRVAEDXZlc3RpbmdBbW91bnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQtzcGxpdFN0cmluZwABBApzdGFydEJsb2NrCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgULc3BsaXRTdHJpbmcAAgQKbG9ja0xlbmd0aAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFC3NwbGl0U3RyaW5nAAMJAJUKAwUNdmVzdGluZ0Ftb3VudAUKc3RhcnRCbG9jawUKbG9ja0xlbmd0aAkAlQoDAAAAAAAAARJjYWxjVW5sb2NrZWRBbW91bnQDBmFtb3VudApzdGFydEJsb2NrCmxvY2tMZW5ndGgEDWVsYXBzZWRCbG9ja3MJAGUCBQZoZWlnaHQFCnN0YXJ0QmxvY2sEDnVubG9ja2VkQW1vdW50AwMJAQIhPQIFCmxvY2tMZW5ndGgAAAkAZgIFDWVsYXBzZWRCbG9ja3MAAAcJAJcDAQkAzAgCCQBrAwUGYW1vdW50BQ1lbGFwc2VkQmxvY2tzBQpsb2NrTGVuZ3RoCQDMCAIFBmFtb3VudAUDbmlsAAAJAJQKAgUOdW5sb2NrZWRBbW91bnQJAGUCBQZhbW91bnQFDnVubG9ja2VkQW1vdW50ARVnZXRVc2VyVW5sb2NrZWRBbW91bnQCC3VzZXJBZGRyZXNzAmlkBAskdDAyNDM3MjUxNgkBEHBhcnNlVXNlclZlc3RpbmcCBQt1c2VyQWRkcmVzcwUCaWQEDXZlc3RpbmdBbW91bnQIBQskdDAyNDM3MjUxNgJfMQQKc3RhcnRCbG9jawgFCyR0MDI0MzcyNTE2Al8yBApsb2NrTGVuZ3RoCAULJHQwMjQzNzI1MTYCXzMECyR0MDI1MTkyNjE2CQESY2FsY1VubG9ja2VkQW1vdW50AwUNdmVzdGluZ0Ftb3VudAUKc3RhcnRCbG9jawUKbG9ja0xlbmd0aAQOdW5sb2NrZWRBbW91bnQIBQskdDAyNTE5MjYxNgJfMQQPcmVtYWluaW5nQW1vdW50CAULJHQwMjUxOTI2MTYCXzIJAJQKAgUOdW5sb2NrZWRBbW91bnQFD3JlbWFpbmluZ0Ftb3VudAETZ2V0VXNlckNsYWltQWN0aW9ucwILdXNlckFkZHJlc3MCaWQECyR0MDI3MTkyNzk4CQEQcGFyc2VVc2VyVmVzdGluZwIFC3VzZXJBZGRyZXNzBQJpZAQNdmVzdGluZ0Ftb3VudAgFCyR0MDI3MTkyNzk4Al8xBApzdGFydEJsb2NrCAULJHQwMjcxOTI3OTgCXzIECmxvY2tMZW5ndGgIBQskdDAyNzE5Mjc5OAJfMwQLJHQwMjgwMTI4NzkJARVnZXRVc2VyVW5sb2NrZWRBbW91bnQCBQt1c2VyQWRkcmVzcwUCaWQEDnVubG9ja2VkQW1vdW50CAULJHQwMjgwMTI4NzkCXzEED3JlbWFpbmluZ0Ftb3VudAgFCyR0MDI4MDEyODc5Al8yBA9yZW1haW5pbmdCbG9ja3MJAJYDAQkAzAgCCQBlAgkAZAIFCnN0YXJ0QmxvY2sFCmxvY2tMZW5ndGgFBmhlaWdodAkAzAgCAAAFA25pbAMJAQIhPQIFDnVubG9ja2VkQW1vdW50AAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQULdXNlckFkZHJlc3MFDnVubG9ja2VkQW1vdW50BQxhc3NldElkQnl0ZXMJAMwIAgkBC1N0cmluZ0VudHJ5AgkBDmtleVVzZXJWZXN0aW5nAgULdXNlckFkZHJlc3MFAmlkCQERZm9ybWF0VXNlclZlc3RpbmcDBQ9yZW1haW5pbmdBbW91bnQFBmhlaWdodAUPcmVtYWluaW5nQmxvY2tzBQNuaWwFA25pbAEUZ2V0TmV3VmVzdGluZ0FjdGlvbnMFC3VzZXJBZGRyZXNzAmlkDXZlc3RpbmdBbW91bnQKc3RhcnRCbG9jawpsb2NrTGVuZ3RoCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ5rZXlVc2VyVmVzdGluZwIFC3VzZXJBZGRyZXNzBQJpZAkBEWZvcm1hdFVzZXJWZXN0aW5nAwUNdmVzdGluZ0Ftb3VudAUKc3RhcnRCbG9jawUKbG9ja0xlbmd0aAUDbmlsARZnZXRBbGxVc2VyQ2xhaW1BY3Rpb25zAQt1c2VyQWRkcmVzcwoBDWFjdGlvbnNIZWxwZXICCmFsbEFjdGlvbnMBYQkAzggCBQphbGxBY3Rpb25zCQETZ2V0VXNlckNsYWltQWN0aW9ucwIFC3VzZXJBZGRyZXNzBQFhCgACJGwFCElEU19MSVNUCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ1hY3Rpb25zSGVscGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAzMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgEOZ2V0QXZhaWxhYmxlSWQBC3VzZXJBZGRyZXNzBQNuaWwBAWkBA2ZvbwQLdXNlckFkZHJlc3MNdmVzdGluZ0Ftb3VudApzdGFydEJsb2NrCmxvY2tMZW5ndGgJARRnZXROZXdWZXN0aW5nQWN0aW9ucwUFC3VzZXJBZGRyZXNzAAAFDXZlc3RpbmdBbW91bnQFCnN0YXJ0QmxvY2sFCmxvY2tMZW5ndGgAT6Hn8A==",
    "height": 2923759,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7C2T8247Dv37CKQXWqSoG8i2PCrVkH2VSCPVxSe9PqRq
Next: 3FE8GNfALMnkRNvManK7bfR7TRCJ5p4HqUwPT98Xpm4V

Diff: 
Old
New
Differences
5
5
 
6
6
 
let SEP = "__"
7
7
 
8
-
let IDS_LIST = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99]
8
+
let IDS_LIST = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29]
9
9
 
10
10
 
let MAX_VESTING_COUNT = size(IDS_LIST)
11
11
 
35
35
 
        then (MAX_VESTING_COUNT > id)
36
36
 
        else false)
37
37
 
        then true
38
-
        else throwErr(makeString(["id is invalid:", toString(id)], " "))]
38
+
        else throwErr(makeString(["id should be less than", toString(MAX_VESTING_COUNT), "got:", toString(id)], " "))]
39
39
 
    if ((checks == checks))
40
40
 
        then makeString(["%s%d", userAddress, toString(id)], SEP)
41
41
 
        else throw("Strict value is not equal to itself.")
80
80
 
81
81
 
82
82
 
func getUserUnlockedAmount (userAddress,id) = {
83
-
    let $t026912770 = parseUserVesting(userAddress, id)
84
-
    let vestingAmount = $t026912770._1
85
-
    let startBlock = $t026912770._2
86
-
    let lockLength = $t026912770._3
87
-
    let $t027732870 = calcUnlockedAmount(vestingAmount, startBlock, lockLength)
88
-
    let unlockedAmount = $t027732870._1
89
-
    let remainingAmount = $t027732870._2
83
+
    let $t024372516 = parseUserVesting(userAddress, id)
84
+
    let vestingAmount = $t024372516._1
85
+
    let startBlock = $t024372516._2
86
+
    let lockLength = $t024372516._3
87
+
    let $t025192616 = calcUnlockedAmount(vestingAmount, startBlock, lockLength)
88
+
    let unlockedAmount = $t025192616._1
89
+
    let remainingAmount = $t025192616._2
90
90
 
    $Tuple2(unlockedAmount, remainingAmount)
91
91
 
    }
92
92
 
93
93
 
94
94
 
func getUserClaimActions (userAddress,id) = {
95
-
    let $t029733052 = parseUserVesting(userAddress, id)
96
-
    let vestingAmount = $t029733052._1
97
-
    let startBlock = $t029733052._2
98
-
    let lockLength = $t029733052._3
99
-
    let $t030553133 = getUserUnlockedAmount(userAddress, id)
100
-
    let unlockedAmount = $t030553133._1
101
-
    let remainingAmount = $t030553133._2
95
+
    let $t027192798 = parseUserVesting(userAddress, id)
96
+
    let vestingAmount = $t027192798._1
97
+
    let startBlock = $t027192798._2
98
+
    let lockLength = $t027192798._3
99
+
    let $t028012879 = getUserUnlockedAmount(userAddress, id)
100
+
    let unlockedAmount = $t028012879._1
101
+
    let remainingAmount = $t028012879._2
102
102
 
    let remainingBlocks = max([((startBlock + lockLength) - height), 0])
103
103
 
    if ((unlockedAmount != 0))
104
104
 
        then [ScriptTransfer(addressFromStringValue(userAddress), unlockedAmount, assetIdBytes), StringEntry(keyUserVesting(userAddress, id), formatUserVesting(remainingAmount, height, remainingBlocks))]
110
110
 
111
111
 
112
112
 
func getAllUserClaimActions (userAddress) = {
113
-
    func actionsHelper (accum,a) =     {
114
-
        let $t038383869 = accum
115
-
        let allActions = $t038383869._1
116
-
        let index = $t038383869._2
117
-
        $Tuple2((allActions ++ getUserClaimActions(userAddress, index)), (index + 1))
118
-
        }
113
+
    func actionsHelper (allActions,a) =     (allActions ++ getUserClaimActions(userAddress, a))
119
114
 
120
-
    let $t039674028 = {
121
-
        let $l = [0]
122
-
        let $s = size($l)
123
-
        let $acc0 = $Tuple2(nil, 0)
124
-
        func $f0_1 ($a,$i) =         if (($i >= $s))
125
-
            then $a
126
-
            else actionsHelper($a, $l[$i])
115
+
    let $l = IDS_LIST
116
+
    let $s = size($l)
117
+
    let $acc0 = nil
118
+
    func $f0_1 ($a,$i) =     if (($i >= $s))
119
+
        then $a
120
+
        else actionsHelper($a, $l[$i])
127
121
 
128
-
        func $f0_2 ($a,$i) =         if (($i >= $s))
129
-
            then $a
130
-
            else throw("List size exceeds 100")
122
+
    func $f0_2 ($a,$i) =     if (($i >= $s))
123
+
        then $a
124
+
        else throw("List size exceeds 30")
131
125
 
132
-
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
133
-
        }
134
-
    let allActions = $t039674028._1
135
-
    let _a = $t039674028._2
136
-
    allActions
126
+
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30)
137
127
 
    }
128
+
129
+
130
+
func getAvailableId (userAddress) = nil
138
131
 
139
132
 
140
133
 
@Callable(i)
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let contractFile = "vesting_neo.ride"
5
5
 
6
6
 
let SEP = "__"
7
7
 
8
-
let IDS_LIST = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99]
8
+
let IDS_LIST = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29]
9
9
 
10
10
 
let MAX_VESTING_COUNT = size(IDS_LIST)
11
11
 
12
12
 
func throwErr (msg) = throw(((contractFile + ": ") + msg))
13
13
 
14
14
 
15
15
 
let keyAssetId = makeString(["%s", "assetId"], SEP)
16
16
 
17
17
 
let assetIdString = valueOrElse(getString(this, keyAssetId), "WAVES")
18
18
 
19
19
 
let assetIdBytes = if ((assetIdString == "WAVES"))
20
20
 
    then unit
21
21
 
    else fromBase58String(assetIdString)
22
22
 
23
23
 
func isValidAddressString (addressString) = match addressFromString(addressString) {
24
24
 
    case a: Address => 
25
25
 
        true
26
26
 
    case _ => 
27
27
 
        false
28
28
 
}
29
29
 
30
30
 
31
31
 
func keyUserVesting (userAddress,id) = {
32
32
 
    let checks = [if (isValidAddressString(userAddress))
33
33
 
        then true
34
34
 
        else throwErr(makeString(["address is not valid:", userAddress], " ")), if (if ((id >= 0))
35
35
 
        then (MAX_VESTING_COUNT > id)
36
36
 
        else false)
37
37
 
        then true
38
-
        else throwErr(makeString(["id is invalid:", toString(id)], " "))]
38
+
        else throwErr(makeString(["id should be less than", toString(MAX_VESTING_COUNT), "got:", toString(id)], " "))]
39
39
 
    if ((checks == checks))
40
40
 
        then makeString(["%s%d", userAddress, toString(id)], SEP)
41
41
 
        else throw("Strict value is not equal to itself.")
42
42
 
    }
43
43
 
44
44
 
45
45
 
func formatUserVesting (vestingAmount,startBlock,lockLength) = {
46
46
 
    let checks = [if ((vestingAmount >= 0))
47
47
 
        then true
48
48
 
        else throwErr("vesting amount cannot be negative"), if ((startBlock >= 0))
49
49
 
        then true
50
50
 
        else throwErr("start block cannot be negative"), if ((lockLength >= 0))
51
51
 
        then true
52
52
 
        else throwErr("lock length cannot be negative")]
53
53
 
    if ((checks == checks))
54
54
 
        then makeString(["%d%d%d", toString(vestingAmount), toString(startBlock), toString(lockLength)], SEP)
55
55
 
        else throw("Strict value is not equal to itself.")
56
56
 
    }
57
57
 
58
58
 
59
59
 
func parseUserVesting (userAddress,id) = match getString(this, keyUserVesting(userAddress, id)) {
60
60
 
    case rawString: String => 
61
61
 
        let splitString = split(rawString, SEP)
62
62
 
        let vestingAmount = parseIntValue(splitString[1])
63
63
 
        let startBlock = parseIntValue(splitString[2])
64
64
 
        let lockLength = parseIntValue(splitString[3])
65
65
 
        $Tuple3(vestingAmount, startBlock, lockLength)
66
66
 
    case _ => 
67
67
 
        $Tuple3(0, 0, 0)
68
68
 
}
69
69
 
70
70
 
71
71
 
func calcUnlockedAmount (amount,startBlock,lockLength) = {
72
72
 
    let elapsedBlocks = (height - startBlock)
73
73
 
    let unlockedAmount = if (if ((lockLength != 0))
74
74
 
        then (elapsedBlocks > 0)
75
75
 
        else false)
76
76
 
        then min([fraction(amount, elapsedBlocks, lockLength), amount])
77
77
 
        else 0
78
78
 
    $Tuple2(unlockedAmount, (amount - unlockedAmount))
79
79
 
    }
80
80
 
81
81
 
82
82
 
func getUserUnlockedAmount (userAddress,id) = {
83
-
    let $t026912770 = parseUserVesting(userAddress, id)
84
-
    let vestingAmount = $t026912770._1
85
-
    let startBlock = $t026912770._2
86
-
    let lockLength = $t026912770._3
87
-
    let $t027732870 = calcUnlockedAmount(vestingAmount, startBlock, lockLength)
88
-
    let unlockedAmount = $t027732870._1
89
-
    let remainingAmount = $t027732870._2
83
+
    let $t024372516 = parseUserVesting(userAddress, id)
84
+
    let vestingAmount = $t024372516._1
85
+
    let startBlock = $t024372516._2
86
+
    let lockLength = $t024372516._3
87
+
    let $t025192616 = calcUnlockedAmount(vestingAmount, startBlock, lockLength)
88
+
    let unlockedAmount = $t025192616._1
89
+
    let remainingAmount = $t025192616._2
90
90
 
    $Tuple2(unlockedAmount, remainingAmount)
91
91
 
    }
92
92
 
93
93
 
94
94
 
func getUserClaimActions (userAddress,id) = {
95
-
    let $t029733052 = parseUserVesting(userAddress, id)
96
-
    let vestingAmount = $t029733052._1
97
-
    let startBlock = $t029733052._2
98
-
    let lockLength = $t029733052._3
99
-
    let $t030553133 = getUserUnlockedAmount(userAddress, id)
100
-
    let unlockedAmount = $t030553133._1
101
-
    let remainingAmount = $t030553133._2
95
+
    let $t027192798 = parseUserVesting(userAddress, id)
96
+
    let vestingAmount = $t027192798._1
97
+
    let startBlock = $t027192798._2
98
+
    let lockLength = $t027192798._3
99
+
    let $t028012879 = getUserUnlockedAmount(userAddress, id)
100
+
    let unlockedAmount = $t028012879._1
101
+
    let remainingAmount = $t028012879._2
102
102
 
    let remainingBlocks = max([((startBlock + lockLength) - height), 0])
103
103
 
    if ((unlockedAmount != 0))
104
104
 
        then [ScriptTransfer(addressFromStringValue(userAddress), unlockedAmount, assetIdBytes), StringEntry(keyUserVesting(userAddress, id), formatUserVesting(remainingAmount, height, remainingBlocks))]
105
105
 
        else nil
106
106
 
    }
107
107
 
108
108
 
109
109
 
func getNewVestingActions (userAddress,id,vestingAmount,startBlock,lockLength) = [StringEntry(keyUserVesting(userAddress, id), formatUserVesting(vestingAmount, startBlock, lockLength))]
110
110
 
111
111
 
112
112
 
func getAllUserClaimActions (userAddress) = {
113
-
    func actionsHelper (accum,a) =     {
114
-
        let $t038383869 = accum
115
-
        let allActions = $t038383869._1
116
-
        let index = $t038383869._2
117
-
        $Tuple2((allActions ++ getUserClaimActions(userAddress, index)), (index + 1))
118
-
        }
113
+
    func actionsHelper (allActions,a) =     (allActions ++ getUserClaimActions(userAddress, a))
119
114
 
120
-
    let $t039674028 = {
121
-
        let $l = [0]
122
-
        let $s = size($l)
123
-
        let $acc0 = $Tuple2(nil, 0)
124
-
        func $f0_1 ($a,$i) =         if (($i >= $s))
125
-
            then $a
126
-
            else actionsHelper($a, $l[$i])
115
+
    let $l = IDS_LIST
116
+
    let $s = size($l)
117
+
    let $acc0 = nil
118
+
    func $f0_1 ($a,$i) =     if (($i >= $s))
119
+
        then $a
120
+
        else actionsHelper($a, $l[$i])
127
121
 
128
-
        func $f0_2 ($a,$i) =         if (($i >= $s))
129
-
            then $a
130
-
            else throw("List size exceeds 100")
122
+
    func $f0_2 ($a,$i) =     if (($i >= $s))
123
+
        then $a
124
+
        else throw("List size exceeds 30")
131
125
 
132
-
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100)
133
-
        }
134
-
    let allActions = $t039674028._1
135
-
    let _a = $t039674028._2
136
-
    allActions
126
+
    $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30)
137
127
 
    }
128
+
129
+
130
+
func getAvailableId (userAddress) = nil
138
131
 
139
132
 
140
133
 
@Callable(i)
141
134
 
func foo (userAddress,vestingAmount,startBlock,lockLength) = getNewVestingActions(userAddress, 0, vestingAmount, startBlock, lockLength)
142
135
 
143
136
 

github/deemru/w8io/169f3d6 
68.13 ms ◑