w8 · tx · GKF···V5R

tx · GKFECfCpKP3NdGxAgoJuUGPeoLHA7w3JPshyyukBbV5R

3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez:  -0.00700000 Waves

2023.11.08 11:45 [2834158] smart account 3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "GKFECfCpKP3NdGxAgoJuUGPeoLHA7w3JPshyyukBbV5R",
    "fee": 700000,
    "feeAssetId": null,
    "timestamp": 1699433133966,
    "version": 2,
    "chainId": 84,
    "sender": "3MqEAEVk1NcbRAuEPAX7nyzUqMHbhvRofez",
    "senderPublicKey": "Brp6cacBXyKUcZr5Uc6VDKsnFcaEeQ8nQzrZQyobDsuf",
    "proofs": [
        "3ReWo1YNQ1PCKHqztwH2uBeGrEqYYBQcSNuDui2a3cEuVyzTcEh8vw4GwFRe4WSdFnpT85FPkKTz7T2W5hjEQNkp"
    ],
    "script": "base64:BgIbCAISBAoCCAESAwoBCBIAEgMKAQgSABIDCgEICQACbGkJAMwIAgIBMQkAzAgCAgEyCQDMCAICATMJAMwIAgIBNAkAzAgCAgE1CQDMCAICATYJAMwIAgIBNwkAzAgCAgE4CQDMCAICATkJAMwIAgICMTAJAMwIAgICMTEJAMwIAgICMTIJAMwIAgICMTMJAMwIAgICMTQJAMwIAgICMTUJAMwIAgICMTYJAMwIAgICMTcJAMwIAgICMTgJAMwIAgICMTkJAMwIAgICMjAJAMwIAgICMjEJAMwIAgICMjIJAMwIAgICMjMJAMwIAgICMjQJAMwIAgICMjUJAMwIAgICMjYJAMwIAgICMjcJAMwIAgICMjgJAMwIAgICMjkJAMwIAgICMzAJAMwIAgICMzEJAMwIAgICMzIJAMwIAgICMzMJAMwIAgICMzQJAMwIAgICMzUJAMwIAgICMzYJAMwIAgICMzcJAMwIAgICMzgJAMwIAgICMzkJAMwIAgICNDAJAMwIAgICNDEJAMwIAgICNDIJAMwIAgICNDMJAMwIAgICNDQJAMwIAgICNDUJAMwIAgICNDYJAMwIAgICNDcJAMwIAgICNDgJAMwIAgICNDkJAMwIAgICNTAJAMwIAgICNTEJAMwIAgICNTIJAMwIAgICNTMJAMwIAgICNTUJAMwIAgICNTYFA25pbAAFaG91cnMAAQAHbWludXRlcwAKAQ10cnlHZXRJbnRlZ2VyAQNrZXkEByRtYXRjaDAJAJoIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAAAQx0cnlHZXRTdHJpbmcBA2tleQQHJG1hdGNoMAkAnQgCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFiBQckbWF0Y2gwBQFiAgABDmdldEFzc2V0U3RyaW5nAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAWIFByRtYXRjaDAJANgEAQUBYgIFV0FWRVMBDWdldEFzc2V0Qnl0ZXMBCmFzc2V0SWRTdHIDCQAAAgUKYXNzZXRJZFN0cgIFV0FWRVMFBHVuaXQJANkEAQUKYXNzZXRJZFN0cgERcGF5Qm9vc3RpbmdSZXN1bHQBCmJvb3N0aW5nSWQECmxhc3RIZWlnaHQJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAILX2xhc3RIZWlnaHQEDGZpbmlzaEhlaWdodAkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIJYm9vc3RpbmdfBQpib29zdGluZ0lkAg1fZmluaXNoSGVpZ2h0BBFnZXRGaW5pc2hlZFBvb2xJZAkBDHRyeUdldFN0cmluZwEJAKwCAgkArAICAglib29zdGluZ18FCmJvb3N0aW5nSWQCB19wb29sSWQEEGdldFBvb2xCb29zdGluZ3MJALMCAgkBDHRyeUdldFN0cmluZwEJAKwCAgkArAICAgVwb29sXwURZ2V0RmluaXNoZWRQb29sSWQCCl9ib29zdGluZ3MAAQQJZmluZEluZGV4CQEFdmFsdWUBCQCzCQIFEGdldFBvb2xCb29zdGluZ3MFCmJvb3N0aW5nSWQDAwkBAiE9AgUKbGFzdEhlaWdodAAACQBmAgUMZmluaXNoSGVpZ2h0BQpsYXN0SGVpZ2h0BwQLYmxvY2tSZXdhcmQJAGkCCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAglib29zdGluZ18FCmJvb3N0aW5nSWQCDF90b3RhbEFtb3VudAkAaAIJAGgCCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAglib29zdGluZ18FCmJvb3N0aW5nSWQCBV9kYXlzBQVob3VycwUHbWludXRlcwQFdG9QYXkJAGsDCQBlAgkAlwMBCQDMCAIFDGZpbmlzaEhlaWdodAkAzAgCBQZoZWlnaHQFA25pbAUKbGFzdEhlaWdodAULYmxvY2tSZXdhcmQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAILX2xhc3RIZWlnaHQFBmhlaWdodAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBCQEMdHJ5R2V0U3RyaW5nAQkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAIHX3Bvb2xJZAUFdG9QYXkJAQ1nZXRBc3NldEJ5dGVzAQkBDHRyeUdldFN0cmluZwEJAKwCAgkArAICAglib29zdGluZ18FCmJvb3N0aW5nSWQCCF9hc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQICEWdldEZpbmlzaGVkUG9vbElkBRFnZXRGaW5pc2hlZFBvb2xJZAkAzAgCCQELU3RyaW5nRW50cnkCAhBnZXRQb29sQm9vc3RpbmdzBRBnZXRQb29sQm9vc3RpbmdzCQDMCAIJAQxJbnRlZ2VyRW50cnkCAglmaW5kSW5kZXgFCWZpbmRJbmRleAUDbmlsBQNuaWwBEGVuZGVkQm9vc3RpbmdJZHMBCmJvb3N0aW5nSWQECmxhc3RIZWlnaHQJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAILX2xhc3RIZWlnaHQEDGZpbmlzaEhlaWdodAkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIJYm9vc3RpbmdfBQpib29zdGluZ0lkAg1fZmluaXNoSGVpZ2h0AwkAZwIFCmxhc3RIZWlnaHQFDGZpbmlzaEhlaWdodAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgILbGlzdCBlbmRlZCAJAKQDAQUGaGVpZ2h0AgwgYm9vc3RpbmdJZHMJAKwCAgkArAICCQEMdHJ5R2V0U3RyaW5nAQkArAICCQCsAgICC2xpc3QgZW5kZWQgCQCkAwEFBmhlaWdodAIMIGJvb3N0aW5nSWRzBQpib29zdGluZ0lkAgEsBQNuaWwFA25pbAYBaQELYWRkQm9vc3RpbmcCBnBvb2xJZARkYXlzAwkAZgIAAQUEZGF5cwkAAgECKmFtb3VudCBvZiBkYXlzIGhhcyB0byBiZSBiZXR3ZWVuIDEgYW5kIDM2NQMJAGYCBQRkYXlzAO0CCQACAQIqYW1vdW50IG9mIGRheXMgaGFzIHRvIGJlIGJldHdlZW4gMSBhbmQgMzY1AwcJAAIBAiZ1bmRlciBtYWludGVuYW5jZSB1bnRpbCBmdXJ0aGVyIG5vdGljZQQKZnVsbEFtb3VudAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQDCQBmAgCgCwkAaQIFCmZ1bGxBbW91bnQFBGRheXMJAAIBCQCsAgIJAKwCAgImYm9vc3RpbmcgYW1vdW50IHRvbyBzbWFsbCwgbWluaW11bSBpcyAJAKQDAQkAaAIAoAsFBGRheXMCJiBvZiB0aGUgc21hbGxlc3QgdW5pdCBvZiBwYXltZW50IGFzc2V0BAdhc3NldElkCQEOZ2V0QXNzZXRTdHJpbmcBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQDCQAAAgUGaGVpZ2h0CQENdHJ5R2V0SW50ZWdlcgECBmhlaWdodAkAAgECDXdhaXQgMSBtaW51dGUEBWVudHJ5AwkAZgIJALECAQkBDHRyeUdldFN0cmluZwEJAKwCAgkArAICAgVwb29sXwUGcG9vbElkAgpfYm9vc3RpbmdzAAsJAAIBAhVtYXggNSBib29zdHMgcGVyIHBvb2wJAPwHBAUEdGhpcwIKZW50cnlFbmRlZAUDbmlsBQNuaWwDCQAAAgUFZW50cnkFBWVudHJ5BApib29zdGluZ0lkAwkAAAIJAK8CAgkBDHRyeUdldFN0cmluZwEJAKwCAgkArAICAgtsaXN0IGVuZGVkIAkApAMBBQZoZWlnaHQCDCBib29zdGluZ0lkcwABAgEwCQACAQIjd2FpdCB0aWxsIG90aGVyIGJvb3N0cyBhcmUgZmluaXNoZWQJAK8CAgkBDHRyeUdldFN0cmluZwEJAKwCAgkArAICAgtsaXN0IGVuZGVkIAkApAMBBQZoZWlnaHQCDCBib29zdGluZ0lkcwABAwkAAAIJAKYIAQUGcG9vbElkBQR1bml0CQACAQIWaW5jb3JyZWN0IHBvb2wgYWRkcmVzcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAIFX2RheXMFBGRheXMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAglib29zdGluZ18FCmJvb3N0aW5nSWQCDF90b3RhbEFtb3VudAUKZnVsbEFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAIMX2RhaWx5QW1vdW50CQBpAgUKZnVsbEFtb3VudAUEZGF5cwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAIMX3N0YXJ0SGVpZ2h0BQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAglib29zdGluZ18FCmJvb3N0aW5nSWQCDV9maW5pc2hIZWlnaHQJAGQCBQZoZWlnaHQJAGgCCQBoAgUEZGF5cwUFaG91cnMFB21pbnV0ZXMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAglib29zdGluZ18FCmJvb3N0aW5nSWQCEF9maW5pc2hUaW1lc3RhbXAJAGQCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAaAIJAGgCCQBoAgkAaAIFBGRheXMFBWhvdXJzBQdtaW51dGVzADwA6AcJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAglib29zdGluZ18FCmJvb3N0aW5nSWQCC19sYXN0SGVpZ2h0BQZoZWlnaHQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAIIX2Fzc2V0SWQFB2Fzc2V0SWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgICCWJvb3N0aW5nXwUKYm9vc3RpbmdJZAIGX293bmVyCQClCAEIBQFpBmNhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgIJYm9vc3RpbmdfBQpib29zdGluZ0lkAgdfcG9vbElkBQZwb29sSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgICBXBvb2xfBQZwb29sSWQCCl9ib29zdGluZ3MJAKwCAgkArAICCQEMdHJ5R2V0U3RyaW5nAQkArAICCQCsAgICBXBvb2xfBQZwb29sSWQCCl9ib29zdGluZ3MFCmJvb3N0aW5nSWQCASwFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQtwYXlCb29zdGluZwEKYm9vc3RpbmdJZAkBEXBheUJvb3N0aW5nUmVzdWx0AQUKYm9vc3RpbmdJZAFpAQxwYXlCb29zdGluZ3MACgEBZgIFYWNjdW0EbmV4dAQCaW4JAPwHBAUEdGhpcwILcGF5Qm9vc3RpbmcJAMwIAgUEbmV4dAUDbmlsBQNuaWwDCQAAAgUCaW4FAmluBQJpbgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQIcGF5bWVudHMKAAIkbAUCbGkKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBAWYCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDU2CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoACwAMAA0ADgAPABAAEQASABMAFAAVABYAFwAYABkAGgAbABwAHQAeAB8AIAAhACIAIwAkACUAJgAnACgAKQAqACsALAAtAC4ALwAwADEAMgAzADQANQA2ADcAOAMJAAACBQhwYXltZW50cwUIcGF5bWVudHMFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ5lbmRlZEJvb3N0aW5ncwEKYm9vc3RpbmdJZAkBEGVuZGVkQm9vc3RpbmdJZHMBBQpib29zdGluZ0lkAWkBCmVudHJ5RW5kZWQACgEBZgIFYWNjdW0EbmV4dAQCaW4JAPwHBAUEdGhpcwIOZW5kZWRCb29zdGluZ3MJAMwIAgUEbmV4dAUDbmlsBQNuaWwDCQAAAgUCaW4FAmluBQJpbgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgQDZW5kCgACJGwFAmxpCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQFmAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyA1NgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAAsADAANAA4ADwAQABEAEgATABQAFQAWABcAGAAZABoAGwAcAB0AHgAfACAAIQAiACMAJAAlACYAJwAoACkAKgArACwALQAuAC8AMAAxADIAMwA0ADUANgA3ADgDCQAAAgUDZW5kBQNlbmQJAMwIAgkBDEludGVnZXJFbnRyeQICBmhlaWdodAUGaGVpZ2h0BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEKZGVsZXRlRW50cgEGcG9vbElkCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkArAICAgVwb29sXwUGcG9vbElkAgpfYm9vc3RpbmdzBQNuaWwATsbbSA==",
    "height": 2834158,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: ABZJApoav1djP3Q64dvmHhpTDBBHf38dSLwmbhoBPpAx
Next: AG4uBoCjs4TNUi2No4zSUyZQKerKBRh1oJqUrV7fqZ8z

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

Old	New		Differences
167	167		}
168	168
169	169
	170	+
	171	+	@Callable(i)
	172	+	func deleteEntr (poolId) = [DeleteEntry((("pool_" + poolId) + "_boostings"))]
	173	+
	174	+

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

github/deemru/w8io/026f985 
36.73 ms ◑