tx · 9yYuJjaHDGRdNSF9vGggsKNccvrufm2ggqKfNo7vQxH2

3M7yT1x25Nz9fzgyXSA4qzNN4onm1ypooM6:  -0.01400000 Waves

2025.10.15 20:45 [474090] smart account 3M7yT1x25Nz9fzgyXSA4qzNN4onm1ypooM6 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9yYuJjaHDGRdNSF9vGggsKNccvrufm2ggqKfNo7vQxH2",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1760550321445,
    "version": 2,
    "chainId": 82,
    "sender": "3M7yT1x25Nz9fzgyXSA4qzNN4onm1ypooM6",
    "senderPublicKey": "27g8YyTjsyMKztuXyouVM1eEaYKjNibrtX7H5z4uXpRA",
    "proofs": [
        "55T9Vj11sQRdmkeYyHW137hJShmS4botCWXKf2PGo1fs713Dm1LTFv2FS6wfvjejhKq1MhoKiU1s1Vs6PCd3rSLt"
    ],
    "script": "base64:BgJNCAISBAoCGAESAwoBCBIDCgEIEgMKAQgSAwoBCBIHCgUICAgICBIDCgEIEgMKAQgSCQoHCAgIAQgICBIDCgEIEgMKAQgSAwoBARIAEgAPAAdWRVJTSU9OAgUxLjAuMAAFTElNSVQAAgAIa19BRE1JTlMCC0FETUlOU19QQktTAAprX01BTkFHRVJTAg1NQU5BR0VSU19QQktTAAdrX0xJTUlUAgxWT1RFU19RVU9SVU0ADmtfU0NSSVBUX1RZUEVTAgxTQ1JJUFRfVFlQRVMAC2tfSVRFUkFUSU9OAglJVEVSQVRJT04BDF92YWxpZGF0ZVBiawEDcGJrBAdhZGRyZXNzCQCnCAEJANkEAQUDcGJrAwkAAAIFB2FkZHJlc3MFB2FkZHJlc3MECmFkZHJlc3NTdHIJAKUIAQUHYWRkcmVzcwMJAAACBQphZGRyZXNzU3RyBQphZGRyZXNzU3RyBgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEQX3ZhbGlkYXRlQWRkcmVzcwEHYWRkcmVzcwQEYWRkcgkBEUBleHRyTmF0aXZlKDEwNjIpAQUHYWRkcmVzcwMJAAACBQRhZGRyBQRhZGRyBgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgELX3ZhbGlkYXRlVHMBAnRzBAZjdXJyVHMEByRtYXRjaDAJAO0HAQUGaGVpZ2h0AwkAAQIFByRtYXRjaDACCUJsb2NrSW5mbwQFYmxvY2sFByRtYXRjaDAIBQVibG9jawl0aW1lc3RhbXAJAAIBAhBDYW4ndCBmaW5kIGJsb2NrCQBmAgUCdHMFBmN1cnJUcwEJX2dldExpbWl0AAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCfCAEFB2tfTElNSVQCGFF1b3J1bSBsaW1pdCBub3QgZGVmaW5lZAEIX2lzQWRtaW4BA3BiawQJYWRtaW5zU3RyCQELdmFsdWVPckVsc2UCCQCiCAEFCGtfQURNSU5TAgAEBmFkbWlucwkAtQkCBQlhZG1pbnNTdHICASwJAQIhPQIJAM8IAgUGYWRtaW5zBQNwYmsFBHVuaXQBCl9pc01hbmFnZXIBA3BiawQLbWFuYWdlcnNTdHIJAQt2YWx1ZU9yRWxzZQIJAKIIAQUKa19NQU5BR0VSUwIABAhtYW5hZ2VycwkAtQkCBQttYW5hZ2Vyc1N0cgIBLAkBAiE9AgkAzwgCBQhtYW5hZ2VycwUDcGJrBQR1bml0ARBfaXNWYWxpZE9wZXJhdG9yAQNwYmsEC21hbmFnZXJzU3RyCQELdmFsdWVPckVsc2UCCQCiCAEFCmtfTUFOQUdFUlMCAAQIbWFuYWdlcnMJALUJAgULbWFuYWdlcnNTdHICASwEB2lzQWRtaW4JAQhfaXNBZG1pbgEFA3BiawQJaXNNYW5hZ2VyCQEKX2lzTWFuYWdlcgEFA3BiawMFB2lzQWRtaW4GBQlpc01hbmFnZXIBCnNhdmVUeERhdGECBnRhc2tJZARkYXRhBAdpbmRpY2VzCQDMCAIAAQkAzAgCAAIJAMwIAgADCQDMCAIABAkAzAgCAAUJAMwIAgAGCQDMCAIABwkAzAgCAAgJAMwIAgAJCQDMCAIACgUDbmlsBAhkYXRhU2l6ZQkAsQIBBQRkYXRhBAppc05vdEVtcHR5AwkBAiE9AgUIZGF0YVNpemUAAAYJAAIBAh1zYXZlVHhEYXRhOiBFbXB0eSBkYXRhIHBhc3NlZAMJAAACBQppc05vdEVtcHR5BQppc05vdEVtcHR5BAljaHVua1NpemUAsOoBBAtjaHVua3NDb3VudAMJAAACCQBqAgUIZGF0YVNpemUFCWNodW5rU2l6ZQAACQBpAgUIZGF0YVNpemUFCWNodW5rU2l6ZQkAZAIJAGkCBQhkYXRhU2l6ZQUJY2h1bmtTaXplAAEKAQptYWtlQ2h1bmtzAgVhY2N1bQVpbmRleAQFY2h1bmsJAK8CAggFBWFjY3VtAl8xBQljaHVua1NpemUDCQAAAgkAsQIBBQVjaHVuawAABQVhY2N1bQQIbmV4dERhdGEJALACAggFBWFjY3VtAl8xBQljaHVua1NpemUJAJQKAgUIbmV4dERhdGEJAM0IAggFBWFjY3VtAl8yCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgUGdGFza0lkAglfX3R4ZGF0YV8JAKQDAQUFaW5kZXgFBWNodW5rBAdlbnRyaWVzCgACJGwFB2luZGljZXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwCQCUCgIFBGRhdGEJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQZ0YXNrSWQCD19fdHhkYXRhX2NodW5rcwkApAMBBQtjaHVua3NDb3VudAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQptYWtlQ2h1bmtzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKCAUHZW50cmllcwJfMgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLg4BaQEEaW5pdAILYWRtaW5zX3Bia3MFbGltaXQDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAg5TZWxmIGNhbGwgb25seQQLc2l6ZV9hZG1pbnMDCQECIT0CCQCQAwEFC2FkbWluc19wYmtzAAAGCQACAQInQXQgbGVhc3Qgb25lIGFkbWluIHBiayBzaG91bGQgYmUgcGFzc2VkAwkAAAIFC3NpemVfYWRtaW5zBQtzaXplX2FkbWlucwQMY2hlY2tfYWRtaW5zAwkBASEBCQEJaXNEZWZpbmVkAQkAoggBBQhrX0FETUlOUwYJAAIBAg5BbHJlYWR5IGluaXRlZAMJAAACBQxjaGVja19hZG1pbnMFDGNoZWNrX2FkbWlucwQJemVyb0xpbWl0AwkAZgIFBWxpbWl0AAAGCQACAQITTGltaXQgc2hvdWxkIGJlID4gMAMJAAACBQl6ZXJvTGltaXQFCXplcm9MaW1pdAQIbGltaXRfb2sDCQBmAgkAkAMBBQthZG1pbnNfcGJrcwUFbGltaXQGCQACAQkArAICCQCsAgIJAKwCAgI5TGltaXQgcXVvcnVtIHNob3VsZCBiZSA8PSBzaXplIG9mIGxpc3Qgb2YgYWRtaW5zLCBsaW1pdDogCQCkAwEFBWxpbWl0AhAsIGN1cnJlbnQgc2l6ZTogCQCkAwEJAJADAQULYWRtaW5zX3Bia3MDCQAAAgUIbGltaXRfb2sFCGxpbWl0X29rCgEIdmFsaWRhdGUCBWFjY3VtBG5leHQJAQxfdmFsaWRhdGVQYmsBBQRuZXh0BAh2YWxpZFJlcwoAAiRsBQthZG1pbnNfcGJrcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzACAAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEIdmFsaWRhdGUCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAAJAAoDCQAAAgUIdmFsaWRSZXMFCHZhbGlkUmVzBAlhZG1pbnNTdHIJALkJAgULYWRtaW5zX3Bia3MCASwJAMwIAgkBC1N0cmluZ0VudHJ5AgUIa19BRE1JTlMFCWFkbWluc1N0cgkAzAgCCQEMSW50ZWdlckVudHJ5AgUHa19MSU1JVAUFbGltaXQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQhhZGRBZG1pbgEDcGJrBAljYWxsZXJQYmsJANgEAQgFAWkPY2FsbGVyUHVibGljS2V5BAdpc0FkbWluAwkBCF9pc0FkbWluAQUJY2FsbGVyUGJrBgkAAgECGU9ubHkgYWRtaW5zIGNhbiBhZGQgYWRtaW4DCQAAAgUHaXNBZG1pbgUHaXNBZG1pbgQHaXNWYWxpZAMJAQxfdmFsaWRhdGVQYmsBBQNwYmsGCQACAQIRSW52YWxpZCBhZG1pbiBwYmsDCQAAAgUHaXNWYWxpZAUHaXNWYWxpZAQMbmV3QWRtaW5zU3RyCQCsAgIJAKwCAgkBEUBleHRyTmF0aXZlKDEwNTgpAQUIa19BRE1JTlMCASwFA3BiawkAzAgCCQELU3RyaW5nRW50cnkCBQhrX0FETUlOUwUMbmV3QWRtaW5zU3RyBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQELcmVtb3ZlQWRtaW4BA3BiawQJY2FsbGVyUGJrCQDYBAEIBQFpD2NhbGxlclB1YmxpY0tleQQHaXNBZG1pbgMJAQhfaXNBZG1pbgEFCWNhbGxlclBiawYJAAIBAhlPbmx5IGFkbWlucyBjYW4gYWRkIGFkbWluAwkAAAIFB2lzQWRtaW4FB2lzQWRtaW4EB2lzVmFsaWQDCQEMX3ZhbGlkYXRlUGJrAQUDcGJrBgkAAgECEUludmFsaWQgYWRtaW4gcGJrAwkAAAIFB2lzVmFsaWQFB2lzVmFsaWQEDG9sZEFkbWluc1N0cgkBEUBleHRyTmF0aXZlKDEwNTgpAQUIa19BRE1JTlMECW9sZEFkbWlucwkAtQkCBQxvbGRBZG1pbnNTdHICASwECmNoZWNrQ291bnQDCQBnAgABCQCQAwEFCW9sZEFkbWlucwkAAgECL0Nhbm5vdCByZW1vdmUsIGF0IGxlYXN0IG9uZSBhZG1pbiBzaG91bGQgcmVtYWluBgMJAAACBQpjaGVja0NvdW50BQpjaGVja0NvdW50BAVpbmRleAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDPCAIFCW9sZEFkbWlucwUDcGJrAhhUaGlzIHBiayBpcyBub3QgYW4gYWRtaW4ECW5ld0FkbWlucwkA0QgCBQlvbGRBZG1pbnMFBWluZGV4BAxuZXdBZG1pbnNTdHIJALkJAgUJbmV3QWRtaW5zAgEsCQDMCAIJAQtTdHJpbmdFbnRyeQIFCGtfQURNSU5TBQxuZXdBZG1pbnNTdHIFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ1hZGRTY3JpcHRUeXBlAQpzY3JpcHRUeXBlBAljYWxsZXJQYmsJANgEAQgFAWkPY2FsbGVyUHVibGljS2V5AwkBASEBCQEIX2lzQWRtaW4BBQljYWxsZXJQYmsJAAIBAgtOb3QgYWxsb3dlZAQKY2hlY2tFbXB0eQMJAAACCQCxAgEFCnNjcmlwdFR5cGUAAAkAAgECHFNjcmlwdCB0eXBlIGNhbiBub3QgYmUgZW1wdHkGAwkAAAIFCmNoZWNrRW1wdHkFCmNoZWNrRW1wdHkEDnNjcmlwdFR5cGVzU3RyCQELdmFsdWVPckVsc2UCCQCiCAEFDmtfU0NSSVBUX1RZUEVTAgAEC3NjcmlwdFR5cGVzCQC8CQIFDnNjcmlwdFR5cGVzU3RyAgEsBAtjaGVja0V4aXN0cwMJAQIhPQIJAM8IAgULc2NyaXB0VHlwZXMFCnNjcmlwdFR5cGUFBHVuaXQJAAIBCQCsAgIJAKwCAgINU2NyaXB0IHR5cGUgPAUKc2NyaXB0VHlwZQIPPiBhbHJlYWR5IGFkZGVkBgMJAAACBQtjaGVja0V4aXN0cwULY2hlY2tFeGlzdHMEDm5ld1NjcmlwdFR5cGVzAwkBAiE9AgUOc2NyaXB0VHlwZXNTdHICAAkAzQgCBQtzY3JpcHRUeXBlcwUKc2NyaXB0VHlwZQkAzAgCBQpzY3JpcHRUeXBlBQNuaWwEEW5ld1NjcmlwdFR5cGVzU3RyCQC5CQIFDm5ld1NjcmlwdFR5cGVzAgEsCQDMCAIJAQtTdHJpbmdFbnRyeQIFDmtfU0NSSVBUX1RZUEVTBRFuZXdTY3JpcHRUeXBlc1N0cgUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBEHJlbW92ZVNjcmlwdFR5cGUBCnNjcmlwdFR5cGUECWNhbGxlclBiawkA2AQBCAUBaQ9jYWxsZXJQdWJsaWNLZXkDCQEBIQEJAQhfaXNBZG1pbgEFCWNhbGxlclBiawkAAgECC05vdCBhbGxvd2VkBA5zY3JpcHRUeXBlc1N0cgkBC3ZhbHVlT3JFbHNlAgkAoggBBQ5rX1NDUklQVF9UWVBFUwIABAtzY3JpcHRUeXBlcwkAvAkCBQ5zY3JpcHRUeXBlc1N0cgIBLAQFaW5kZXgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAzwgCBQtzY3JpcHRUeXBlcwUKc2NyaXB0VHlwZQkArAICCQCsAgICDVNjcmlwdCB0eXBlIDwFCnNjcmlwdFR5cGUCED4gaXMgbm90IHByZXNlbnQEDm5ld1NjcmlwdFR5cGVzCQDRCAIFC3NjcmlwdFR5cGVzBQVpbmRleAQRbmV3U2NyaXB0VHlwZXNTdHIJALkJAgUObmV3U2NyaXB0VHlwZXMCASwJAMwIAgkBC1N0cmluZ0VudHJ5AgUOa19TQ1JJUFRfVFlQRVMFEW5ld1NjcmlwdFR5cGVzU3RyBQNuaWwBaQEJYWRkU2NyaXB0BQpzY3JpcHRUeXBlDnN0b3JhZ2VBZGRyZXNzCnNjcmlwdEhhc2gEZGVzYwxpbml0aWF0b3JBZHIECWNhbGxlclBiawkA2AQBCAUBaQ9jYWxsZXJQdWJsaWNLZXkDCQEBIQEJARBfaXNWYWxpZE9wZXJhdG9yAQUJY2FsbGVyUGJrCQACAQILTm90IGFsbG93ZWQEEXN0b3JhZ2VTY3JpcHRIYXNoCQDYBAEJAQV2YWx1ZQEJAPEHAQkBEUBleHRyTmF0aXZlKDEwNjIpAQUOc3RvcmFnZUFkZHJlc3MEDnNjcmlwdFR5cGVzU3RyCQERQGV4dHJOYXRpdmUoMTA1OCkBBQ5rX1NDUklQVF9UWVBFUwQRX2NoZWNrU2NyaXB0VHlwZXMDCQAAAgkAswkCBQ5zY3JpcHRUeXBlc1N0cgUKc2NyaXB0VHlwZQUEdW5pdAkAAgEJAKwCAgI1aW52YWxpZCBzY3JpcHQgdHlwZSBvciBpdCBpcyBub3QgcHJlc2VudCBpbiBzdG9yYWdlOiAFCnNjcmlwdFR5cGUGAwkAAAIFEV9jaGVja1NjcmlwdFR5cGVzBRFfY2hlY2tTY3JpcHRUeXBlcwQQX3NjcmlwdFR5cGVDaGVjawMJAQIhPQIFEXN0b3JhZ2VTY3JpcHRIYXNoBQpzY3JpcHRIYXNoCQACAQI0U3RvcmVkIGFuZCBwYXNzZWQgYXMgYXJndW1lbnQgc2NyaXB0SGFzaGVzIG5vdCBtYXRjaAYDCQAAAgUQX3NjcmlwdFR5cGVDaGVjawUQX3NjcmlwdFR5cGVDaGVjawQKX2Rlc2NDaGVjawMJAAACCQCxAgEFBGRlc2MAAAkAAgECGkRlc2NyaXB0aW9uIGNhbid0IGJlIGVtcHR5BgMJAAACBQpfZGVzY0NoZWNrBQpfZGVzY0NoZWNrBA9faW5pdGlhdG9yQ2hlY2sDCQECIT0CCQClCAEJAKcIAQgFAWkPY2FsbGVyUHVibGljS2V5BQxpbml0aWF0b3JBZHIJAAIBAiZJbml0aWF0b3IgYWRkcmVzcyBkb2Vzbid0IG1hdGNoIGNhbGxlcgYDCQAAAgUPX2luaXRpYXRvckNoZWNrBQ9faW5pdGlhdG9yQ2hlY2sECWl0ZXJhdGlvbgkBC3ZhbHVlT3JFbHNlAgkAnwgBCQCsAgIJAKwCAgULa19JVEVSQVRJT04CAV8FCnNjcmlwdFR5cGUAAAQIc2NyaXB0SWQJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAgdzY3JpcHRfBQpzY3JpcHRUeXBlAgFfCQCkAwEFCWl0ZXJhdGlvbgIBXwUKc2NyaXB0SGFzaAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFCHNjcmlwdElkAgxfX3NjcmlwdFR5cGUFCnNjcmlwdFR5cGUJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQhzY3JpcHRJZAIQX19zdG9yYWdlQWRkcmVzcwUOc3RvcmFnZUFkZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQhzY3JpcHRJZAIMX19zY3JpcHRIYXNoBRFzdG9yYWdlU2NyaXB0SGFzaAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFCHNjcmlwdElkAgZfX2Rlc2MFBGRlc2MJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQhzY3JpcHRJZAILX19pbml0aWF0b3IFDGluaXRpYXRvckFkcgUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBDHJlbW92ZVNjcmlwdAEIc2NyaXB0SWQECWNhbGxlclBiawkA2AQBCAUBaQ9jYWxsZXJQdWJsaWNLZXkDCQEBIQEJARBfaXNWYWxpZE9wZXJhdG9yAQUJY2FsbGVyUGJrCQACAQILTm90IGFsbG93ZWQEDGluaXRpYXRvckFkcgkBEUBleHRyTmF0aXZlKDEwNTgpAQkArAICBQhzY3JpcHRJZAILX19pbml0aWF0b3IDCQECIT0CBQxpbml0aWF0b3JBZHIJAKUIAQkApwgBCAUBaQ9jYWxsZXJQdWJsaWNLZXkJAAIBAhdPbmx5IGNyZWF0b3IgY2FuIHJlbW92ZQkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIFCHNjcmlwdElkAgxfX3NjcmlwdFR5cGUJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICBQhzY3JpcHRJZAIQX19zdG9yYWdlQWRkcmVzcwkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIFCHNjcmlwdElkAgxfX3NjcmlwdEhhc2gJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICBQhzY3JpcHRJZAIGX19kZXNjCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgUIc2NyaXB0SWQCC19faW5pdGlhdG9yCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgUIc2NyaXB0SWQCD19fY29uZmlybWF0aW9ucwkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIFCHNjcmlwdElkAgpfX2FwcHJvdmVkBQNuaWwBaQEVYWRkQ29uZmlybWF0aW9uU2NyaXB0AQhzY3JpcHRJZAQJY2FsbGVyUGJrCQDYBAEIBQFpD2NhbGxlclB1YmxpY0tleQQFbGltaXQJAQlfZ2V0TGltaXQAAwkBASEBCQEIX2lzQWRtaW4BBQljYWxsZXJQYmsJAAIBAhdPbmx5IGFkbWlucyBjYW4gY29uZmlybQQLX3NjcmlwdEhhc2gJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQCsAgIFCHNjcmlwdElkAgxfX3NjcmlwdEhhc2gCD0l2YWxpZCBzY3JpcHRJZAMJAAACBQtfc2NyaXB0SGFzaAULX3NjcmlwdEhhc2gECnNjcmlwdFR5cGUJARFAZXh0ck5hdGl2ZSgxMDU4KQEJAKwCAgUIc2NyaXB0SWQCDF9fc2NyaXB0VHlwZQQNc2NyaXB0SWRJdGVtcwkAtQkCBQhzY3JpcHRJZAIBXwQJaXRlcmF0aW9uCQCRAwIFDXNjcmlwdElkSXRlbXMAAgQQY29uZmlybWF0aW9uc1N0cgkBC3ZhbHVlT3JFbHNlAgkAoggBCQCsAgIFCHNjcmlwdElkAg9fX2NvbmZpcm1hdGlvbnMCAAQNY29uZmlybWF0aW9ucwkAtQkCBRBjb25maXJtYXRpb25zU3RyAgEsAwkBAiE9AgkAzwgCBQ1jb25maXJtYXRpb25zBQljYWxsZXJQYmsFBHVuaXQJAAIBAiFZb3UgYWxyZWFkeSBjb25maXJtZWQgdGhpcyBzY3JpcHQEB25ld0xpc3QDCQECIT0CBRBjb25maXJtYXRpb25zU3RyAgAJAM0IAgUNY29uZmlybWF0aW9ucwUJY2FsbGVyUGJrCQDMCAIFCWNhbGxlclBiawUDbmlsBApuZXdMaXN0U3RyCQC5CQIFB25ld0xpc3QCASwECGFwcHJvdmVkCQBnAgkAkAMBBQduZXdMaXN0BQVsaW1pdAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFCHNjcmlwdElkAg9fX2NvbmZpcm1hdGlvbnMFCm5ld0xpc3RTdHIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgULa19JVEVSQVRJT04FCnNjcmlwdFR5cGUJAQ1wYXJzZUludFZhbHVlAQUJaXRlcmF0aW9uCQDMCAIJAQxCb29sZWFuRW50cnkCCQCsAgIJAKwCAgkArAICBQpzY3JpcHRUeXBlAgFfBQtfc2NyaXB0SGFzaAIKX19hcHByb3ZlZAUIYXBwcm92ZWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQdhZGRUYXNrBwRuYW1lBGRhcHAEdHhpZAlleGVjdXRlVHMEZGVzYwxpbml0aWF0b3JBZHIGdHhkYXRhBAljYWxsZXJQYmsJANgEAQgFAWkPY2FsbGVyUHVibGljS2V5AwkBASEBCQEQX2lzVmFsaWRPcGVyYXRvcgEFCWNhbGxlclBiawkAAgECC05vdCBhbGxvd2VkBApfbmFtZUNoZWNrAwkAAAIJALECAQUEbmFtZQAACQACAQITTmFtZSBjYW4ndCBiZSBlbXB0eQYDCQAAAgUKX25hbWVDaGVjawUKX25hbWVDaGVjawQKX2RhcHBDaGVjawMJAQEhAQkBEF92YWxpZGF0ZUFkZHJlc3MBBQRkYXBwCQACAQIOSW5jb3JyZWN0IGRhcHAGAwkAAAIFCl9kYXBwQ2hlY2sFCl9kYXBwQ2hlY2sECl90eGlkQ2hlY2sDCQAAAgkAsQIBBQR0eGlkAAAJAAIBAhN0eGlkIGNhbid0IGJlIGVtcHR5BgMJAAACBQpfdHhpZENoZWNrBQpfdHhpZENoZWNrBA9fdGltZXN0YW1wQ2hlY2sDCQEBIQEJAQtfdmFsaWRhdGVUcwEFCWV4ZWN1dGVUcwkAAgECE3R4aWQgY2FuJ3QgYmUgZW1wdHkGAwkAAAIFD190aW1lc3RhbXBDaGVjawUPX3RpbWVzdGFtcENoZWNrBApfZGVzY0NoZWNrAwkAAAIJALECAQUEZGVzYwAACQACAQIaRGVzY3JpcHRpb24gY2FuJ3QgYmUgZW1wdHkGAwkAAAIFCl9kZXNjQ2hlY2sFCl9kZXNjQ2hlY2sED19pbml0aWF0b3JDaGVjawMJAQIhPQIJAKUIAQkApwgBCAUBaQ9jYWxsZXJQdWJsaWNLZXkFDGluaXRpYXRvckFkcgkAAgECJkluaXRpYXRvciBhZGRyZXNzIGRvZXNuJ3QgbWF0Y2ggY2FsbGVyBgMJAAACBQ9faW5pdGlhdG9yQ2hlY2sFD19pbml0aWF0b3JDaGVjawQMX3R4ZGF0YUNoZWNrAwkAAAIJALECAQUGdHhkYXRhAAAJAAIBAhZUeCBkYXRhIGNhbid0IGJlIGVtcHR5BgMJAAACBQxfdHhkYXRhQ2hlY2sFDF90eGRhdGFDaGVjawQGdGFza0lkCQCsAgIJAKwCAgkArAICAgN0eF8FBGRhcHACAV8FBHR4aWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQZ0YXNrSWQCBl9fbmFtZQUEbmFtZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBnRhc2tJZAIGX19kYXBwBQRkYXBwCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUGdGFza0lkAgZfX3R4SWQFBHR4aWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQZ0YXNrSWQCBl9fZGVzYwUEZGVzYwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBnRhc2tJZAIIX190eGRhdGEFBnR4ZGF0YQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBnRhc2tJZAILX19pbml0aWF0b3IFDGluaXRpYXRvckFkcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQZ0YXNrSWQCBF9fdHMFCWV4ZWN1dGVUcwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCnJlbW92ZVRhc2sBBnRhc2tJZAQJY2FsbGVyUGJrCQDYBAEIBQFpD2NhbGxlclB1YmxpY0tleQMJAQEhAQkBEF9pc1ZhbGlkT3BlcmF0b3IBBQljYWxsZXJQYmsJAAIBAgtOb3QgYWxsb3dlZAQMaW5pdGlhdG9yQWRyCQERQGV4dHJOYXRpdmUoMTA1OCkBCQCsAgIFBnRhc2tJZAILX19pbml0aWF0b3IDCQECIT0CBQxpbml0aWF0b3JBZHIJAKUIAQkApwgBCAUBaQ9jYWxsZXJQdWJsaWNLZXkJAAIBAhdPbmx5IGNyZWF0b3IgY2FuIHJlbW92ZQkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIFBnRhc2tJZAIGX19uYW1lCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgUGdGFza0lkAgZfX2RhcHAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICBQZ0YXNrSWQCBl9fdHhJZAkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIFBnRhc2tJZAIGX19kZXNjCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgUGdGFza0lkAghfX3R4ZGF0YQkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIFBnRhc2tJZAILX19pbml0aWF0b3IJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICBQZ0YXNrSWQCBF9fdHMJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICBQZ0YXNrSWQCD19fY29uZmlybWF0aW9ucwkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIFBnRhc2tJZAIKX19hcHByb3ZlZAUDbmlsAWkBD2FkZENvbmZpcm1hdGlvbgEGdGFza0lkBAljYWxsZXJQYmsJANgEAQgFAWkPY2FsbGVyUHVibGljS2V5BAVsaW1pdAkBCV9nZXRMaW1pdAADCQEBIQEJAQhfaXNBZG1pbgEFCWNhbGxlclBiawkAAgECF09ubHkgYWRtaW5zIGNhbiBjb25maXJtBAR0eElkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkArAICBQZ0YXNrSWQCBl9fdHhJZAILSXZhbGlkIHRhc2sDCQAAAgUEdHhJZAUEdHhJZAQEZGFwcAkBEUBleHRyTmF0aXZlKDEwNTgpAQkArAICBQZ0YXNrSWQCBl9fZGFwcAQQY29uZmlybWF0aW9uc1N0cgkBC3ZhbHVlT3JFbHNlAgkAoggBCQCsAgIFBnRhc2tJZAIPX19jb25maXJtYXRpb25zAgAEDWNvbmZpcm1hdGlvbnMJALUJAgUQY29uZmlybWF0aW9uc1N0cgIBLAMJAQIhPQIJAM8IAgUNY29uZmlybWF0aW9ucwUJY2FsbGVyUGJrBQR1bml0CQACAQIfWW91IGFscmVhZHkgY29uZmlybWVkIHRoaXMgdGFzawQHbmV3TGlzdAMJAQIhPQIFEGNvbmZpcm1hdGlvbnNTdHICAAkAzQgCBQ1jb25maXJtYXRpb25zBQljYWxsZXJQYmsJAMwIAgUJY2FsbGVyUGJrBQNuaWwECm5ld0xpc3RTdHIJALkJAgUHbmV3TGlzdAIBLAQIYXBwcm92ZWQJAGcCCQCQAwEFB25ld0xpc3QFBWxpbWl0CQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUGdGFza0lkAg9fX2NvbmZpcm1hdGlvbnMFCm5ld0xpc3RTdHIJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgkArAICCQCsAgIFBGRhcHACAV8FBHR4SWQCCl9fYXBwcm92ZWQFCGFwcHJvdmVkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEIc2V0TGltaXQBBWxpbWl0BAljYWxsZXJQYmsJANgEAQgFAWkPY2FsbGVyUHVibGljS2V5AwkBASEBCQEIX2lzQWRtaW4BBQljYWxsZXJQYmsJAAIBAh5Pbmx5IHdoaXRlbGlzdGVkIGNhbiBzZXQgbGltaXQECXplcm9MaW1pdAMJAGYCBQVsaW1pdAAABgkAAgECE0xpbWl0IHNob3VsZCBiZSA+IDADCQAAAgUJemVyb0xpbWl0BQl6ZXJvTGltaXQEBmFkbWlucwkBEUBleHRyTmF0aXZlKDEwNTgpAQUIa19BRE1JTlMDCQBmAgUFbGltaXQJALECAQUGYWRtaW5zCQACAQkArAICCQCsAgIJAKwCAgI5TGltaXQgcXVvcnVtIHNob3VsZCBiZSA8PSBzaXplIG9mIGxpc3Qgb2YgYWRtaW5zLCBsaW1pdDogCQCkAwEFBWxpbWl0AhAsIGN1cnJlbnQgc2l6ZTogCQCkAwEJALECAQUGYWRtaW5zCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQdrX0xJTUlUBQVsaW1pdAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBBHRlc3QABAF4BAckbWF0Y2gwCQDtBwEFBmhlaWdodAMJAAECBQckbWF0Y2gwAglCbG9ja0luZm8EBWJsb2NrBQckbWF0Y2gwCQACAQkApAMBCAUFYmxvY2sJdGltZXN0YW1wCQACAQIQQ2FuJ3QgZmluZCBibG9jawMJAAACBQF4BQF4BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEKY2xlYXJfdGVzdAAEB2luZGljZXMJAMwIAgABCQDMCAIAAgkAzAgCAAMJAMwIAgAECQDMCAIABQkAzAgCAAYJAMwIAgAHCQDMCAIACAkAzAgCAAkJAMwIAgAKBQNuaWwKAQxyZW1vdmVDaHVua3MCBWFjY3VtBWluZGV4CQDNCAIFBWFjY3VtCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgIIdGVzdHRhc2sCCV9fdHhkYXRhXwkApAMBBQVpbmRleAQHZW50cmllcwoAAiRsBQdpbmRpY2VzCgACJHMJAJADAQUCJGwKAAUkYWNjMAkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgICCHRlc3R0YXNrAg9fX3R4ZGF0YV9jaHVua3MFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEMcmVtb3ZlQ2h1bmtzAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKBQdlbnRyaWVzADNn7mw=",
    "height": 474090,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: none
Next: none

Full: 

OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 6 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let VERSION = "1.0.0"
5+
6+let LIMIT = 2
7+
8+let k_ADMINS = "ADMINS_PBKS"
9+
10+let k_MANAGERS = "MANAGERS_PBKS"
11+
12+let k_LIMIT = "VOTES_QUORUM"
13+
14+let k_SCRIPT_TYPES = "SCRIPT_TYPES"
15+
16+let k_ITERATION = "ITERATION"
17+
18+func _validatePbk (pbk) = {
19+    let address = addressFromPublicKey(fromBase58String(pbk))
20+    if ((address == address))
21+        then {
22+            let addressStr = toString(address)
23+            if ((addressStr == addressStr))
24+                then true
25+                else throw("Strict value is not equal to itself.")
26+            }
27+        else throw("Strict value is not equal to itself.")
28+    }
29+
30+
31+func _validateAddress (address) = {
32+    let addr = addressFromStringValue(address)
33+    if ((addr == addr))
34+        then true
35+        else throw("Strict value is not equal to itself.")
36+    }
37+
38+
39+func _validateTs (ts) = {
40+    let currTs =     match blockInfoByHeight(height) {
41+        case block: BlockInfo => 
42+            block.timestamp
43+        case _ => 
44+            throw("Can't find block")
45+    }
46+    (ts > currTs)
47+    }
48+
49+
50+func _getLimit () = valueOrErrorMessage(getInteger(k_LIMIT), "Quorum limit not defined")
51+
52+
53+func _isAdmin (pbk) = {
54+    let adminsStr = valueOrElse(getString(k_ADMINS), "")
55+    let admins = split(adminsStr, ",")
56+    (indexOf(admins, pbk) != unit)
57+    }
58+
59+
60+func _isManager (pbk) = {
61+    let managersStr = valueOrElse(getString(k_MANAGERS), "")
62+    let managers = split(managersStr, ",")
63+    (indexOf(managers, pbk) != unit)
64+    }
65+
66+
67+func _isValidOperator (pbk) = {
68+    let managersStr = valueOrElse(getString(k_MANAGERS), "")
69+    let managers = split(managersStr, ",")
70+    let isAdmin = _isAdmin(pbk)
71+    let isManager = _isManager(pbk)
72+    if (isAdmin)
73+        then true
74+        else isManager
75+    }
76+
77+
78+func saveTxData (taskId,data) = {
79+    let indices = [1, 2, 3, 4, 5, 6, 7, 8, 9, 10]
80+    let dataSize = size(data)
81+    let isNotEmpty = if ((dataSize != 0))
82+        then true
83+        else throw("saveTxData: Empty data passed")
84+    if ((isNotEmpty == isNotEmpty))
85+        then {
86+            let chunkSize = 30000
87+            let chunksCount = if (((dataSize % chunkSize) == 0))
88+                then (dataSize / chunkSize)
89+                else ((dataSize / chunkSize) + 1)
90+            func makeChunks (accum,index) =             {
91+                let chunk = take(accum._1, chunkSize)
92+                if ((size(chunk) == 0))
93+                    then accum
94+                    else {
95+                        let nextData = drop(accum._1, chunkSize)
96+                        $Tuple2(nextData, (accum._2 :+ StringEntry(((taskId + "__txdata_") + toString(index)), chunk)))
97+                        }
98+                }
99+
100+            let entries = {
101+                let $l = indices
102+                let $s = size($l)
103+                let $acc0 = $Tuple2(data, [StringEntry((taskId + "__txdata_chunks"), toString(chunksCount))])
104+                func $f0_1 ($a,$i) =                 if (($i >= $s))
105+                    then $a
106+                    else makeChunks($a, $l[$i])
107+
108+                func $f0_2 ($a,$i) =                 if (($i >= $s))
109+                    then $a
110+                    else throw("List size exceeds 10")
111+
112+                $f0_2($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)
113+                }
114+            entries._2
115+            }
116+        else throw("Strict value is not equal to itself.")
117+    }
118+
119+
120+@Callable(i)
121+func init (admins_pbks,limit) = if ((i.caller != this))
122+    then throw("Self call only")
123+    else {
124+        let size_admins = if ((size(admins_pbks) != 0))
125+            then true
126+            else throw("At least one admin pbk should be passed")
127+        if ((size_admins == size_admins))
128+            then {
129+                let check_admins = if (!(isDefined(getString(k_ADMINS))))
130+                    then true
131+                    else throw("Already inited")
132+                if ((check_admins == check_admins))
133+                    then {
134+                        let zeroLimit = if ((limit > 0))
135+                            then true
136+                            else throw("Limit should be > 0")
137+                        if ((zeroLimit == zeroLimit))
138+                            then {
139+                                let limit_ok = if ((size(admins_pbks) > limit))
140+                                    then true
141+                                    else throw(((("Limit quorum should be <= size of list of admins, limit: " + toString(limit)) + ", current size: ") + toString(size(admins_pbks))))
142+                                if ((limit_ok == limit_ok))
143+                                    then {
144+                                        func validate (accum,next) =                                         _validatePbk(next)
145+
146+                                        let validRes = {
147+                                            let $l = admins_pbks
148+                                            let $s = size($l)
149+                                            let $acc0 = ""
150+                                            func $f0_1 ($a,$i) =                                             if (($i >= $s))
151+                                                then $a
152+                                                else validate($a, $l[$i])
153+
154+                                            func $f0_2 ($a,$i) =                                             if (($i >= $s))
155+                                                then $a
156+                                                else throw("List size exceeds 10")
157+
158+                                            $f0_2($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)
159+                                            }
160+                                        if ((validRes == validRes))
161+                                            then {
162+                                                let adminsStr = makeString(admins_pbks, ",")
163+[StringEntry(k_ADMINS, adminsStr), IntegerEntry(k_LIMIT, limit)]
164+                                                }
165+                                            else throw("Strict value is not equal to itself.")
166+                                        }
167+                                    else throw("Strict value is not equal to itself.")
168+                                }
169+                            else throw("Strict value is not equal to itself.")
170+                        }
171+                    else throw("Strict value is not equal to itself.")
172+                }
173+            else throw("Strict value is not equal to itself.")
174+        }
175+
176+
177+
178+@Callable(i)
179+func addAdmin (pbk) = {
180+    let callerPbk = toBase58String(i.callerPublicKey)
181+    let isAdmin = if (_isAdmin(callerPbk))
182+        then true
183+        else throw("Only admins can add admin")
184+    if ((isAdmin == isAdmin))
185+        then {
186+            let isValid = if (_validatePbk(pbk))
187+                then true
188+                else throw("Invalid admin pbk")
189+            if ((isValid == isValid))
190+                then {
191+                    let newAdminsStr = ((getStringValue(k_ADMINS) + ",") + pbk)
192+[StringEntry(k_ADMINS, newAdminsStr)]
193+                    }
194+                else throw("Strict value is not equal to itself.")
195+            }
196+        else throw("Strict value is not equal to itself.")
197+    }
198+
199+
200+
201+@Callable(i)
202+func removeAdmin (pbk) = {
203+    let callerPbk = toBase58String(i.callerPublicKey)
204+    let isAdmin = if (_isAdmin(callerPbk))
205+        then true
206+        else throw("Only admins can add admin")
207+    if ((isAdmin == isAdmin))
208+        then {
209+            let isValid = if (_validatePbk(pbk))
210+                then true
211+                else throw("Invalid admin pbk")
212+            if ((isValid == isValid))
213+                then {
214+                    let oldAdminsStr = getStringValue(k_ADMINS)
215+                    let oldAdmins = split(oldAdminsStr, ",")
216+                    let checkCount = if ((1 >= size(oldAdmins)))
217+                        then throw("Cannot remove, at least one admin should remain")
218+                        else true
219+                    if ((checkCount == checkCount))
220+                        then {
221+                            let index = valueOrErrorMessage(indexOf(oldAdmins, pbk), "This pbk is not an admin")
222+                            let newAdmins = removeByIndex(oldAdmins, index)
223+                            let newAdminsStr = makeString(newAdmins, ",")
224+[StringEntry(k_ADMINS, newAdminsStr)]
225+                            }
226+                        else throw("Strict value is not equal to itself.")
227+                    }
228+                else throw("Strict value is not equal to itself.")
229+            }
230+        else throw("Strict value is not equal to itself.")
231+    }
232+
233+
234+
235+@Callable(i)
236+func addScriptType (scriptType) = {
237+    let callerPbk = toBase58String(i.callerPublicKey)
238+    if (!(_isAdmin(callerPbk)))
239+        then throw("Not allowed")
240+        else {
241+            let checkEmpty = if ((size(scriptType) == 0))
242+                then throw("Script type can not be empty")
243+                else true
244+            if ((checkEmpty == checkEmpty))
245+                then {
246+                    let scriptTypesStr = valueOrElse(getString(k_SCRIPT_TYPES), "")
247+                    let scriptTypes = split_4C(scriptTypesStr, ",")
248+                    let checkExists = if ((indexOf(scriptTypes, scriptType) != unit))
249+                        then throw((("Script type <" + scriptType) + "> already added"))
250+                        else true
251+                    if ((checkExists == checkExists))
252+                        then {
253+                            let newScriptTypes = if ((scriptTypesStr != ""))
254+                                then (scriptTypes :+ scriptType)
255+                                else [scriptType]
256+                            let newScriptTypesStr = makeString(newScriptTypes, ",")
257+[StringEntry(k_SCRIPT_TYPES, newScriptTypesStr)]
258+                            }
259+                        else throw("Strict value is not equal to itself.")
260+                    }
261+                else throw("Strict value is not equal to itself.")
262+            }
263+    }
264+
265+
266+
267+@Callable(i)
268+func removeScriptType (scriptType) = {
269+    let callerPbk = toBase58String(i.callerPublicKey)
270+    if (!(_isAdmin(callerPbk)))
271+        then throw("Not allowed")
272+        else {
273+            let scriptTypesStr = valueOrElse(getString(k_SCRIPT_TYPES), "")
274+            let scriptTypes = split_4C(scriptTypesStr, ",")
275+            let index = valueOrErrorMessage(indexOf(scriptTypes, scriptType), (("Script type <" + scriptType) + "> is not present"))
276+            let newScriptTypes = removeByIndex(scriptTypes, index)
277+            let newScriptTypesStr = makeString(newScriptTypes, ",")
278+[StringEntry(k_SCRIPT_TYPES, newScriptTypesStr)]
279+            }
280+    }
281+
282+
283+
284+@Callable(i)
285+func addScript (scriptType,storageAddress,scriptHash,desc,initiatorAdr) = {
286+    let callerPbk = toBase58String(i.callerPublicKey)
287+    if (!(_isValidOperator(callerPbk)))
288+        then throw("Not allowed")
289+        else {
290+            let storageScriptHash = toBase58String(value(scriptHash(addressFromStringValue(storageAddress))))
291+            let scriptTypesStr = getStringValue(k_SCRIPT_TYPES)
292+            let _checkScriptTypes = if ((indexOf(scriptTypesStr, scriptType) == unit))
293+                then throw(("invalid script type or it is not present in storage: " + scriptType))
294+                else true
295+            if ((_checkScriptTypes == _checkScriptTypes))
296+                then {
297+                    let _scriptTypeCheck = if ((storageScriptHash != scriptHash))
298+                        then throw("Stored and passed as argument scriptHashes not match")
299+                        else true
300+                    if ((_scriptTypeCheck == _scriptTypeCheck))
301+                        then {
302+                            let _descCheck = if ((size(desc) == 0))
303+                                then throw("Description can't be empty")
304+                                else true
305+                            if ((_descCheck == _descCheck))
306+                                then {
307+                                    let _initiatorCheck = if ((toString(addressFromPublicKey(i.callerPublicKey)) != initiatorAdr))
308+                                        then throw("Initiator address doesn't match caller")
309+                                        else true
310+                                    if ((_initiatorCheck == _initiatorCheck))
311+                                        then {
312+                                            let iteration = valueOrElse(getInteger(((k_ITERATION + "_") + scriptType)), 0)
313+                                            let scriptId = ((((("script_" + scriptType) + "_") + toString(iteration)) + "_") + scriptHash)
314+[StringEntry((scriptId + "__scriptType"), scriptType), StringEntry((scriptId + "__storageAddress"), storageAddress), StringEntry((scriptId + "__scriptHash"), storageScriptHash), StringEntry((scriptId + "__desc"), desc), StringEntry((scriptId + "__initiator"), initiatorAdr)]
315+                                            }
316+                                        else throw("Strict value is not equal to itself.")
317+                                    }
318+                                else throw("Strict value is not equal to itself.")
319+                            }
320+                        else throw("Strict value is not equal to itself.")
321+                    }
322+                else throw("Strict value is not equal to itself.")
323+            }
324+    }
325+
326+
327+
328+@Callable(i)
329+func removeScript (scriptId) = {
330+    let callerPbk = toBase58String(i.callerPublicKey)
331+    if (!(_isValidOperator(callerPbk)))
332+        then throw("Not allowed")
333+        else {
334+            let initiatorAdr = getStringValue((scriptId + "__initiator"))
335+            if ((initiatorAdr != toString(addressFromPublicKey(i.callerPublicKey))))
336+                then throw("Only creator can remove")
337+                else [DeleteEntry((scriptId + "__scriptType")), DeleteEntry((scriptId + "__storageAddress")), DeleteEntry((scriptId + "__scriptHash")), DeleteEntry((scriptId + "__desc")), DeleteEntry((scriptId + "__initiator")), DeleteEntry((scriptId + "__confirmations")), DeleteEntry((scriptId + "__approved"))]
338+            }
339+    }
340+
341+
342+
343+@Callable(i)
344+func addConfirmationScript (scriptId) = {
345+    let callerPbk = toBase58String(i.callerPublicKey)
346+    let limit = _getLimit()
347+    if (!(_isAdmin(callerPbk)))
348+        then throw("Only admins can confirm")
349+        else {
350+            let _scriptHash = valueOrErrorMessage(getString((scriptId + "__scriptHash")), "Ivalid scriptId")
351+            if ((_scriptHash == _scriptHash))
352+                then {
353+                    let scriptType = getStringValue((scriptId + "__scriptType"))
354+                    let scriptIdItems = split(scriptId, "_")
355+                    let iteration = scriptIdItems[2]
356+                    let confirmationsStr = valueOrElse(getString((scriptId + "__confirmations")), "")
357+                    let confirmations = split(confirmationsStr, ",")
358+                    if ((indexOf(confirmations, callerPbk) != unit))
359+                        then throw("You already confirmed this script")
360+                        else {
361+                            let newList = if ((confirmationsStr != ""))
362+                                then (confirmations :+ callerPbk)
363+                                else [callerPbk]
364+                            let newListStr = makeString(newList, ",")
365+                            let approved = (size(newList) >= limit)
366+[StringEntry((scriptId + "__confirmations"), newListStr), IntegerEntry((k_ITERATION + scriptType), parseIntValue(iteration)), BooleanEntry((((scriptType + "_") + _scriptHash) + "__approved"), approved)]
367+                            }
368+                    }
369+                else throw("Strict value is not equal to itself.")
370+            }
371+    }
372+
373+
374+
375+@Callable(i)
376+func addTask (name,dapp,txid,executeTs,desc,initiatorAdr,txdata) = {
377+    let callerPbk = toBase58String(i.callerPublicKey)
378+    if (!(_isValidOperator(callerPbk)))
379+        then throw("Not allowed")
380+        else {
381+            let _nameCheck = if ((size(name) == 0))
382+                then throw("Name can't be empty")
383+                else true
384+            if ((_nameCheck == _nameCheck))
385+                then {
386+                    let _dappCheck = if (!(_validateAddress(dapp)))
387+                        then throw("Incorrect dapp")
388+                        else true
389+                    if ((_dappCheck == _dappCheck))
390+                        then {
391+                            let _txidCheck = if ((size(txid) == 0))
392+                                then throw("txid can't be empty")
393+                                else true
394+                            if ((_txidCheck == _txidCheck))
395+                                then {
396+                                    let _timestampCheck = if (!(_validateTs(executeTs)))
397+                                        then throw("txid can't be empty")
398+                                        else true
399+                                    if ((_timestampCheck == _timestampCheck))
400+                                        then {
401+                                            let _descCheck = if ((size(desc) == 0))
402+                                                then throw("Description can't be empty")
403+                                                else true
404+                                            if ((_descCheck == _descCheck))
405+                                                then {
406+                                                    let _initiatorCheck = if ((toString(addressFromPublicKey(i.callerPublicKey)) != initiatorAdr))
407+                                                        then throw("Initiator address doesn't match caller")
408+                                                        else true
409+                                                    if ((_initiatorCheck == _initiatorCheck))
410+                                                        then {
411+                                                            let _txdataCheck = if ((size(txdata) == 0))
412+                                                                then throw("Tx data can't be empty")
413+                                                                else true
414+                                                            if ((_txdataCheck == _txdataCheck))
415+                                                                then {
416+                                                                    let taskId = ((("tx_" + dapp) + "_") + txid)
417+[StringEntry((taskId + "__name"), name), StringEntry((taskId + "__dapp"), dapp), StringEntry((taskId + "__txId"), txid), StringEntry((taskId + "__desc"), desc), StringEntry((taskId + "__txdata"), txdata), StringEntry((taskId + "__initiator"), initiatorAdr), IntegerEntry((taskId + "__ts"), executeTs)]
418+                                                                    }
419+                                                                else throw("Strict value is not equal to itself.")
420+                                                            }
421+                                                        else throw("Strict value is not equal to itself.")
422+                                                    }
423+                                                else throw("Strict value is not equal to itself.")
424+                                            }
425+                                        else throw("Strict value is not equal to itself.")
426+                                    }
427+                                else throw("Strict value is not equal to itself.")
428+                            }
429+                        else throw("Strict value is not equal to itself.")
430+                    }
431+                else throw("Strict value is not equal to itself.")
432+            }
433+    }
434+
435+
436+
437+@Callable(i)
438+func removeTask (taskId) = {
439+    let callerPbk = toBase58String(i.callerPublicKey)
440+    if (!(_isValidOperator(callerPbk)))
441+        then throw("Not allowed")
442+        else {
443+            let initiatorAdr = getStringValue((taskId + "__initiator"))
444+            if ((initiatorAdr != toString(addressFromPublicKey(i.callerPublicKey))))
445+                then throw("Only creator can remove")
446+                else [DeleteEntry((taskId + "__name")), DeleteEntry((taskId + "__dapp")), DeleteEntry((taskId + "__txId")), DeleteEntry((taskId + "__desc")), DeleteEntry((taskId + "__txdata")), DeleteEntry((taskId + "__initiator")), DeleteEntry((taskId + "__ts")), DeleteEntry((taskId + "__confirmations")), DeleteEntry((taskId + "__approved"))]
447+            }
448+    }
449+
450+
451+
452+@Callable(i)
453+func addConfirmation (taskId) = {
454+    let callerPbk = toBase58String(i.callerPublicKey)
455+    let limit = _getLimit()
456+    if (!(_isAdmin(callerPbk)))
457+        then throw("Only admins can confirm")
458+        else {
459+            let txId = valueOrErrorMessage(getString((taskId + "__txId")), "Ivalid task")
460+            if ((txId == txId))
461+                then {
462+                    let dapp = getStringValue((taskId + "__dapp"))
463+                    let confirmationsStr = valueOrElse(getString((taskId + "__confirmations")), "")
464+                    let confirmations = split(confirmationsStr, ",")
465+                    if ((indexOf(confirmations, callerPbk) != unit))
466+                        then throw("You already confirmed this task")
467+                        else {
468+                            let newList = if ((confirmationsStr != ""))
469+                                then (confirmations :+ callerPbk)
470+                                else [callerPbk]
471+                            let newListStr = makeString(newList, ",")
472+                            let approved = (size(newList) >= limit)
473+[StringEntry((taskId + "__confirmations"), newListStr), BooleanEntry((((dapp + "_") + txId) + "__approved"), approved)]
474+                            }
475+                    }
476+                else throw("Strict value is not equal to itself.")
477+            }
478+    }
479+
480+
481+
482+@Callable(i)
483+func setLimit (limit) = {
484+    let callerPbk = toBase58String(i.callerPublicKey)
485+    if (!(_isAdmin(callerPbk)))
486+        then throw("Only whitelisted can set limit")
487+        else {
488+            let zeroLimit = if ((limit > 0))
489+                then true
490+                else throw("Limit should be > 0")
491+            if ((zeroLimit == zeroLimit))
492+                then {
493+                    let admins = getStringValue(k_ADMINS)
494+                    if ((limit > size(admins)))
495+                        then throw(((("Limit quorum should be <= size of list of admins, limit: " + toString(limit)) + ", current size: ") + toString(size(admins))))
496+                        else [IntegerEntry(k_LIMIT, limit)]
497+                    }
498+                else throw("Strict value is not equal to itself.")
499+            }
500+    }
501+
502+
503+
504+@Callable(i)
505+func test () = {
506+    let x =     match blockInfoByHeight(height) {
507+        case block: BlockInfo => 
508+            throw(toString(block.timestamp))
509+        case _ => 
510+            throw("Can't find block")
511+    }
512+    if ((x == x))
513+        then nil
514+        else throw("Strict value is not equal to itself.")
515+    }
516+
517+
518+
519+@Callable(i)
520+func clear_test () = {
521+    let indices = [1, 2, 3, 4, 5, 6, 7, 8, 9, 10]
522+    func removeChunks (accum,index) =     (accum :+ DeleteEntry((("testtask" + "__txdata_") + toString(index))))
523+
524+    let entries = {
525+        let $l = indices
526+        let $s = size($l)
527+        let $acc0 = [DeleteEntry(("testtask" + "__txdata_chunks"))]
528+        func $f0_1 ($a,$i) =         if (($i >= $s))
529+            then $a
530+            else removeChunks($a, $l[$i])
531+
532+        func $f0_2 ($a,$i) =         if (($i >= $s))
533+            then $a
534+            else throw("List size exceeds 10")
535+
536+        $f0_2($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)
537+        }
538+    entries
539+    }
540+
541+
github/deemru/w8io
22.42 ms ◑