tx · B8Aa9WGWVmR9VfdbXrSgGJnv3UAEVneGt8U8QL64uvph

3P8eeDzUnoDNbQjW617pAe76cEUDQsP1m1V:  -0.02000000 Waves

2024.04.18 19:59 [4134453] smart account 3P8eeDzUnoDNbQjW617pAe76cEUDQsP1m1V > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "B8Aa9WGWVmR9VfdbXrSgGJnv3UAEVneGt8U8QL64uvph",
    "fee": 2000000,
    "feeAssetId": null,
    "timestamp": 1713459622220,
    "version": 2,
    "chainId": 87,
    "sender": "3P8eeDzUnoDNbQjW617pAe76cEUDQsP1m1V",
    "senderPublicKey": "Hkj3ckU9a63dXcAMBHssA9LjpfnkrpkzdoF2TvqWXst3",
    "proofs": [
        "4NcybYsYLidbAYrzyBk8M2N6NAwbFGZepJ7Y1DjsjJStKv65tYFuNJ118jxrALFZkCeVP5wYYvQ7ybtD8cjgWW5F"
    ],
    "script": "base64:BgIcCAISBAoCCAESAwoBCBIDCgEIEgMKAQgSAwoBCAcABWhvdXJzABgAB21pbnV0ZXMAPAENdHJ5R2V0SW50ZWdlcgEDa2V5BAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAEMdHJ5R2V0U3RyaW5nAQNrZXkEByRtYXRjaDAJAJ0IAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYgUHJG1hdGNoMAUBYgIAAQ5nZXRBc3NldFN0cmluZwEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFiBQckbWF0Y2gwCQDYBAEFAWICBVdBVkVTAQ1nZXRBc3NldEJ5dGVzAQphc3NldElkU3RyAwkAAAIFCmFzc2V0SWRTdHICBVdBVkVTBQR1bml0CQDZBAEFCmFzc2V0SWRTdHIBEXBheUJvb3N0aW5nUmVzdWx0AQpib29zdGluZ0lkBApsYXN0SGVpZ2h0CQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAglib29zdGluZ18FCmJvb3N0aW5nSWQCC19sYXN0SGVpZ2h0BAxmaW5pc2hIZWlnaHQJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAINX2ZpbmlzaEhlaWdodAMDCQECIT0CBQpsYXN0SGVpZ2h0AAAJAGYCBQxmaW5pc2hIZWlnaHQFCmxhc3RIZWlnaHQHBAtibG9ja1Jld2FyZAkAaQIJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAIMX3RvdGFsQW1vdW50CQBoAgkAaAIJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAIFX2RheXMFBWhvdXJzBQdtaW51dGVzBAV0b1BheQkAawMJAGUCCQCXAwEJAMwIAgUMZmluaXNoSGVpZ2h0CQDMCAIFBmhlaWdodAUDbmlsBQpsYXN0SGVpZ2h0BQtibG9ja1Jld2FyZAABCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIJYm9vc3RpbmdfBQpib29zdGluZ0lkAgtfbGFzdEhlaWdodAUGaGVpZ2h0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQx0cnlHZXRTdHJpbmcBCQCsAgIJAKwCAgIJYm9vc3RpbmdfBQpib29zdGluZ0lkAgdfcG9vbElkBQV0b1BheQkBDWdldEFzc2V0Qnl0ZXMBCQEMdHJ5R2V0U3RyaW5nAQkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAIIX2Fzc2V0SWQFA25pbAUDbmlsBQFpAQthZGRCb29zdGluZwIGcG9vbElkBGRheXMECmZ1bGxBbW91bnQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AwkAZgIAAQUEZGF5cwkAAgECKmFtb3VudCBvZiBkYXlzIGhhcyB0byBiZSBiZXR3ZWVuIDEgYW5kIDM2NQMJAGYCBQRkYXlzAO0CCQACAQIqYW1vdW50IG9mIGRheXMgaGFzIHRvIGJlIGJldHdlZW4gMSBhbmQgMzY1AwkAZgIAoAsJAGkCBQpmdWxsQW1vdW50BQRkYXlzCQACAQkArAICCQCsAgICJmJvb3N0aW5nIGFtb3VudCB0b28gc21hbGwsIG1pbmltdW0gaXMgCQCkAwEJAGgCAKALBQRkYXlzAiYgb2YgdGhlIHNtYWxsZXN0IHVuaXQgb2YgcGF5bWVudCBhc3NldAMJAAACCQCmCAEFBnBvb2xJZAUEdW5pdAkAAgECFmluY29ycmVjdCBwb29sIGFkZHJlc3MEB2Fzc2V0SWQJAQ5nZXRBc3NldFN0cmluZwEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAQNcG9vbEJvb3N0aW5ncwkAtQkCCQEMdHJ5R2V0U3RyaW5nAQkArAICCQCsAgICBXBvb2xfBQZwb29sSWQCCl9ib29zdGluZ3MCASwECmJvb3N0aW5nSWQJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAIFX2RheXMFBGRheXMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAglib29zdGluZ18FCmJvb3N0aW5nSWQCDF90b3RhbEFtb3VudAUKZnVsbEFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAIMX2RhaWx5QW1vdW50CQBpAgUKZnVsbEFtb3VudAUEZGF5cwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAIMX3N0YXJ0SGVpZ2h0BQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAglib29zdGluZ18FCmJvb3N0aW5nSWQCDV9maW5pc2hIZWlnaHQJAGQCBQZoZWlnaHQJAGgCCQBoAgUEZGF5cwUFaG91cnMFB21pbnV0ZXMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAglib29zdGluZ18FCmJvb3N0aW5nSWQCEF9maW5pc2hUaW1lc3RhbXAJAGQCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAaAIJAGgCCQBoAgkAaAIFBGRheXMFBWhvdXJzBQdtaW51dGVzADwA6AcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAglib29zdGluZ18FCmJvb3N0aW5nSWQCC19sYXN0SGVpZ2h0BQZoZWlnaHQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAIIX2Fzc2V0SWQFB2Fzc2V0SWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAIGX293bmVyCQClCAEIBQFpBmNhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgIJYm9vc3RpbmdfBQpib29zdGluZ0lkAgdfcG9vbElkBQZwb29sSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgICBXBvb2xfBQZwb29sSWQCCl9ib29zdGluZ3MJAQx0cnlHZXRTdHJpbmcBCQCsAgIJAKwCAgkArAICCQCsAgICBXBvb2xfBQZwb29sSWQCCl9ib29zdGluZ3MFCmJvb3N0aW5nSWQCASwFA25pbAFpARdwb2xpc2hGaW5pc2hlZEJvb3N0aW5ncwEGcG9vbElkCgERY2hlY2tOZXh0Qm9vc3RpbmcCBWFjY3VtCmJvb3N0aW5nSWQDCQAAAgUKYm9vc3RpbmdJZAIABQVhY2N1bQQMZmluaXNoSGVpZ2h0CQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAglib29zdGluZ18FCmJvb3N0aW5nSWQCDV9maW5pc2hIZWlnaHQDAwkAZgIFBmhlaWdodAUMZmluaXNoSGVpZ2h0CQAAAgkAzwgCBQVhY2N1bQUKYm9vc3RpbmdJZAUEdW5pdAcJAM4IAgUFYWNjdW0JAMwIAgUKYm9vc3RpbmdJZAUDbmlsBQVhY2N1bQQQY3VycmVudEJvb3N0aW5ncwkAvQkCCQEMdHJ5R2V0U3RyaW5nAQkArAICCQCsAgICBXBvb2xfBQZwb29sSWQCCl9ib29zdGluZ3MCASwEDG5ld0Jvb3N0aW5ncwkAuwkCCgACJGwFEGN1cnJlbnRCb29zdGluZ3MKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBEWNoZWNrTmV4dEJvb3N0aW5nAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZAgEsCQDMCAIDCQAAAgUMbmV3Qm9vc3RpbmdzAgAJAQtEZWxldGVFbnRyeQEJAKwCAgkArAICAgVwb29sXwUGcG9vbElkAgpfYm9vc3RpbmdzCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgIFcG9vbF8FBnBvb2xJZAIKX2Jvb3N0aW5ncwUMbmV3Qm9vc3RpbmdzBQNuaWwBaQELcGF5Qm9vc3RpbmcBCmJvb3N0aW5nSWQJARFwYXlCb29zdGluZ1Jlc3VsdAEFCmJvb3N0aW5nSWQBaQEQcGF5UG9vbEJvb3N0aW5ncwEGcG9vbElkCgEBZgIFYWNjdW0KYm9vc3RpbmdJZAkBEXBheUJvb3N0aW5nUmVzdWx0AQUKYm9vc3RpbmdJZAQJYm9vc3RpbmdzCQC9CQIJAQx0cnlHZXRTdHJpbmcBCQCsAgIJAKwCAgIFcG9vbF8FBnBvb2xJZAIKX2Jvb3N0aW5ncwIBLAQIcGF5bWVudHMKAAIkbAUJYm9vc3RpbmdzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQFmAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAyNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZAwkAAAIFCHBheW1lbnRzBQhwYXltZW50cwQDaW52CQD8BwQFBHRoaXMCF3BvbGlzaEZpbmlzaGVkQm9vc3RpbmdzCQDMCAIFBnBvb2xJZAUDbmlsBQNuaWwDCQAAAgUDaW52BQNpbnYFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQxwYXlCb29zdGluZ3MBB3Bvb2xJZHMKAQFmAgVhY2N1bQZwb29sSWQEAmluCQD8BwQFBHRoaXMCEHBheVBvb2xCb29zdGluZ3MJAMwIAgUGcG9vbElkBQNuaWwFA25pbAMJAAACBQJpbgUCaW4AAAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQHaW52b2tlcwoAAiRsCQC9CQIFB3Bvb2xJZHMCASwKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBAWYCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDI1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkDCQAAAgUHaW52b2tlcwUHaW52b2tlcwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuADFTdO8=",
    "height": 4134453,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4RnAu3PyDznDa5hPyFHtHwWNYyjRT19CqqLWcAaZHdc6
Next: FTvRXtCTH7rGVzHFzn6yRe6RmW6ZUZ7NVwS6R74QXTep

Diff: 
Old
New
Differences
76
76
 
        then accum
77
77
 
        else {
78
78
 
            let finishHeight = tryGetInteger((("boosting_" + boostingId) + "_finishHeight"))
79
-
            if ((height > finishHeight))
80
-
                then ((accum + boostingId) + ",")
79
+
            if (if ((height > finishHeight))
80
+
                then (indexOf(accum, boostingId) == unit)
81
+
                else false)
82
+
                then (accum ++ [boostingId])
81
83
 
                else accum
82
84
 
            }
83
85
 
84
86
 
    let currentBoostings = split_51C(tryGetString((("pool_" + poolId) + "_boostings")), ",")
85
-
    let newBoostings = {
87
+
    let newBoostings = makeString_11C({
86
88
 
        let $l = currentBoostings
87
89
 
        let $s = size($l)
88
-
        let $acc0 = ""
90
+
        let $acc0 = nil
89
91
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
90
92
 
            then $a
91
93
 
            else checkNextBoosting($a, $l[$i])
95
97
 
            else throw("List size exceeds 25")
96
98
 
97
99
 
        $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($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)
98
-
        }
100
+
        }, ",")
99
101
 
[if ((newBoostings == ""))
100
102
 
        then DeleteEntry((("pool_" + poolId) + "_boostings"))
101
103
 
        else StringEntry((("pool_" + poolId) + "_boostings"), newBoostings)]
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let hours = 24
5
5
 
6
6
 
let minutes = 60
7
7
 
8
8
 
func tryGetInteger (key) = match getInteger(this, key) {
9
9
 
    case b: Int => 
10
10
 
        b
11
11
 
    case _ => 
12
12
 
        0
13
13
 
}
14
14
 
15
15
 
16
16
 
func tryGetString (key) = match getString(this, key) {
17
17
 
    case b: String => 
18
18
 
        b
19
19
 
    case _ => 
20
20
 
        ""
21
21
 
}
22
22
 
23
23
 
24
24
 
func getAssetString (assetId) = match assetId {
25
25
 
    case b: ByteVector => 
26
26
 
        toBase58String(b)
27
27
 
    case _ => 
28
28
 
        "WAVES"
29
29
 
}
30
30
 
31
31
 
32
32
 
func getAssetBytes (assetIdStr) = if ((assetIdStr == "WAVES"))
33
33
 
    then unit
34
34
 
    else fromBase58String(assetIdStr)
35
35
 
36
36
 
37
37
 
func payBoostingResult (boostingId) = {
38
38
 
    let lastHeight = tryGetInteger((("boosting_" + boostingId) + "_lastHeight"))
39
39
 
    let finishHeight = tryGetInteger((("boosting_" + boostingId) + "_finishHeight"))
40
40
 
    if (if ((lastHeight != 0))
41
41
 
        then (finishHeight > lastHeight)
42
42
 
        else false)
43
43
 
        then {
44
44
 
            let blockReward = (tryGetInteger((("boosting_" + boostingId) + "_totalAmount")) / ((tryGetInteger((("boosting_" + boostingId) + "_days")) * hours) * minutes))
45
45
 
            let toPay = fraction((min([finishHeight, height]) - lastHeight), blockReward, 1)
46
46
 
[IntegerEntry((("boosting_" + boostingId) + "_lastHeight"), height), ScriptTransfer(addressFromStringValue(tryGetString((("boosting_" + boostingId) + "_poolId"))), toPay, getAssetBytes(tryGetString((("boosting_" + boostingId) + "_assetId"))))]
47
47
 
            }
48
48
 
        else nil
49
49
 
    }
50
50
 
51
51
 
52
52
 
@Callable(i)
53
53
 
func addBoosting (poolId,days) = {
54
54
 
    let fullAmount = i.payments[0].amount
55
55
 
    if ((1 > days))
56
56
 
        then throw("amount of days has to be between 1 and 365")
57
57
 
        else if ((days > 365))
58
58
 
            then throw("amount of days has to be between 1 and 365")
59
59
 
            else if ((1440 > (fullAmount / days)))
60
60
 
                then throw((("boosting amount too small, minimum is " + toString((1440 * days))) + " of the smallest unit of payment asset"))
61
61
 
                else if ((addressFromString(poolId) == unit))
62
62
 
                    then throw("incorrect pool address")
63
63
 
                    else {
64
64
 
                        let assetId = getAssetString(i.payments[0].assetId)
65
65
 
                        let poolBoostings = split(tryGetString((("pool_" + poolId) + "_boostings")), ",")
66
66
 
                        let boostingId = toBase58String(i.transactionId)
67
67
 
[IntegerEntry((("boosting_" + boostingId) + "_days"), days), IntegerEntry((("boosting_" + boostingId) + "_totalAmount"), fullAmount), IntegerEntry((("boosting_" + boostingId) + "_dailyAmount"), (fullAmount / days)), IntegerEntry((("boosting_" + boostingId) + "_startHeight"), height), IntegerEntry((("boosting_" + boostingId) + "_finishHeight"), (height + ((days * hours) * minutes))), IntegerEntry((("boosting_" + boostingId) + "_finishTimestamp"), (lastBlock.timestamp + ((((days * hours) * minutes) * 60) * 1000))), IntegerEntry((("boosting_" + boostingId) + "_lastHeight"), height), StringEntry((("boosting_" + boostingId) + "_assetId"), assetId), StringEntry((("boosting_" + boostingId) + "_owner"), toString(i.caller)), StringEntry((("boosting_" + boostingId) + "_poolId"), poolId), StringEntry((("pool_" + poolId) + "_boostings"), tryGetString((((("pool_" + poolId) + "_boostings") + boostingId) + ",")))]
68
68
 
                        }
69
69
 
    }
70
70
 
71
71
 
72
72
 
73
73
 
@Callable(i)
74
74
 
func polishFinishedBoostings (poolId) = {
75
75
 
    func checkNextBoosting (accum,boostingId) =     if ((boostingId == ""))
76
76
 
        then accum
77
77
 
        else {
78
78
 
            let finishHeight = tryGetInteger((("boosting_" + boostingId) + "_finishHeight"))
79
-
            if ((height > finishHeight))
80
-
                then ((accum + boostingId) + ",")
79
+
            if (if ((height > finishHeight))
80
+
                then (indexOf(accum, boostingId) == unit)
81
+
                else false)
82
+
                then (accum ++ [boostingId])
81
83
 
                else accum
82
84
 
            }
83
85
 
84
86
 
    let currentBoostings = split_51C(tryGetString((("pool_" + poolId) + "_boostings")), ",")
85
-
    let newBoostings = {
87
+
    let newBoostings = makeString_11C({
86
88
 
        let $l = currentBoostings
87
89
 
        let $s = size($l)
88
-
        let $acc0 = ""
90
+
        let $acc0 = nil
89
91
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
90
92
 
            then $a
91
93
 
            else checkNextBoosting($a, $l[$i])
92
94
 
93
95
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
94
96
 
            then $a
95
97
 
            else throw("List size exceeds 25")
96
98
 
97
99
 
        $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($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)
98
-
        }
100
+
        }, ",")
99
101
 
[if ((newBoostings == ""))
100
102
 
        then DeleteEntry((("pool_" + poolId) + "_boostings"))
101
103
 
        else StringEntry((("pool_" + poolId) + "_boostings"), newBoostings)]
102
104
 
    }
103
105
 
104
106
 
105
107
 
106
108
 
@Callable(i)
107
109
 
func payBoosting (boostingId) = payBoostingResult(boostingId)
108
110
 
109
111
 
110
112
 
111
113
 
@Callable(i)
112
114
 
func payPoolBoostings (poolId) = {
113
115
 
    func f (accum,boostingId) =     payBoostingResult(boostingId)
114
116
 
115
117
 
    let boostings = split_51C(tryGetString((("pool_" + poolId) + "_boostings")), ",")
116
118
 
    let payments = {
117
119
 
        let $l = boostings
118
120
 
        let $s = size($l)
119
121
 
        let $acc0 = 0
120
122
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
121
123
 
            then $a
122
124
 
            else f($a, $l[$i])
123
125
 
124
126
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
125
127
 
            then $a
126
128
 
            else throw("List size exceeds 25")
127
129
 
128
130
 
        $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($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)
129
131
 
        }
130
132
 
    if ((payments == payments))
131
133
 
        then {
132
134
 
            let inv = invoke(this, "polishFinishedBoostings", [poolId], nil)
133
135
 
            if ((inv == inv))
134
136
 
                then nil
135
137
 
                else throw("Strict value is not equal to itself.")
136
138
 
            }
137
139
 
        else throw("Strict value is not equal to itself.")
138
140
 
    }
139
141
 
140
142
 
141
143
 
142
144
 
@Callable(i)
143
145
 
func payBoostings (poolIds) = {
144
146
 
    func f (accum,poolId) =     {
145
147
 
        let in = invoke(this, "payPoolBoostings", [poolId], nil)
146
148
 
        if ((in == in))
147
149
 
            then 0
148
150
 
            else throw("Strict value is not equal to itself.")
149
151
 
        }
150
152
 
151
153
 
    let invokes = {
152
154
 
        let $l = split_51C(poolIds, ",")
153
155
 
        let $s = size($l)
154
156
 
        let $acc0 = 0
155
157
 
        func $f0_1 ($a,$i) =         if (($i >= $s))
156
158
 
            then $a
157
159
 
            else f($a, $l[$i])
158
160
 
159
161
 
        func $f0_2 ($a,$i) =         if (($i >= $s))
160
162
 
            then $a
161
163
 
            else throw("List size exceeds 25")
162
164
 
163
165
 
        $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($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)
164
166
 
        }
165
167
 
    if ((invokes == invokes))
166
168
 
        then nil
167
169
 
        else throw("Strict value is not equal to itself.")
168
170
 
    }
169
171
 
170
172
 

github/deemru/w8io/6500d08 
33.56 ms ◑