w8 · tx · 5W6···L4V

tx · 5W6WDJEqTG3cmyyFyAqruNvqRYXxRbJ1ptt2gTja8L4V

3MsgzbtRg8NEkbTcHBywtwTdCe9BRxMQo5T:  -0.01300000 Waves

2024.12.23 10:19 [3426860] smart account 3MsgzbtRg8NEkbTcHBywtwTdCe9BRxMQo5T > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5W6WDJEqTG3cmyyFyAqruNvqRYXxRbJ1ptt2gTja8L4V",
    "fee": 1300000,
    "feeAssetId": null,
    "timestamp": 1734938392445,
    "version": 2,
    "chainId": 84,
    "sender": "3MsgzbtRg8NEkbTcHBywtwTdCe9BRxMQo5T",
    "senderPublicKey": "iTiQR3Kvxn7i8PFgEbZn36n5iFLxFwkTA6M3wi846Vx",
    "proofs": [
        "3RNGQwYkBDNX3U4xrtGC4a2mjsrSFPCTMNf8vM5Jby25qZwg8mnbkDXCZv6gcqmhTz1iJudQcLVnARoEYLwYewy3"
    ],
    "script": "base64:BwJxCAISAwoBCBIECgIICBIECgIIARIECgIIBBIECgIIAhIDCgEIEgUKAwIBBBIECgICARIFCgMCAQISBQoDAhIREgQKAgIBEgQKAggYEgQKAggYEgMKAQISAwoBARIHCgUCCAEIARIGCgQCCAgEEgMKAQgjAANTRVACAl9fAAt3YXZlc1N0cmluZwIFV0FWRVMAEGNvbnRyYWN0RmlsZW5hbWUCFG1lbWVfaW1fZmFjdG9yeS5yaWRlAAtrUHJpY2VBc3NldAIMcHJpY2VfX2Fzc2V0AAlrU2h1dGRvd24CDnNodXRkb3duX19mbGFnAAhzaHV0ZG93bgkBC3ZhbHVlT3JFbHNlAgkAoAgBBQlrU2h1dGRvd24HAQd3cmFwRXJyAQFzCQCsAgIJAKwCAgUQY29udHJhY3RGaWxlbmFtZQICOiAFAXMBCHRocm93RXJyAQFzCQACAQkBB3dyYXBFcnIBBQFzAA9BRE1JTl9MSVNUX1NJWkUACgAGUVVPUlVNAAMAEVRYSURfQllURVNfTEVOR1RIACABGGtleUFsbG93ZWRUeElkVm90ZVByZWZpeAEEdHhJZAkAuQkCCQDMCAICBiVzJXMlcwkAzAgCAglhbGxvd1R4SWQJAMwIAgUEdHhJZAUDbmlsBQNTRVABEGtleUZ1bGxBZG1pblZvdGUCBnByZWZpeAxhZG1pbkFkZHJlc3MJALkJAgkAzAgCBQZwcmVmaXgJAMwIAgUMYWRtaW5BZGRyZXNzBQNuaWwFA1NFUAETa2V5QWRtaW5BZGRyZXNzTGlzdAAJALkJAgkAzAgCAgIlcwkAzAgCAhBhZG1pbkFkZHJlc3NMaXN0BQNuaWwFA1NFUAEOa2V5QWxsb3dlZFR4SWQACQC5CQIJAMwIAgICJXMJAMwIAgIEdHhJZAUDbmlsBQNTRVABDGdldEFkbWluVm90ZQIGcHJlZml4BWFkbWluBAd2b3RlS2V5CQEQa2V5RnVsbEFkbWluVm90ZQIFBnByZWZpeAUFYWRtaW4JAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdm90ZUtleQAAAQ1nZXRBZG1pbnNMaXN0AAQHJG1hdGNoMAkAnQgCBQR0aGlzCQETa2V5QWRtaW5BZGRyZXNzTGlzdAADCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQC1CQIFAXMFA1NFUAUDbmlsAAlhZG1pbkxpc3QJAQ1nZXRBZG1pbnNMaXN0AAENaXNJbkFkbWluTGlzdAEHYWRkcmVzcwkBD2NvbnRhaW5zRWxlbWVudAIFCWFkbWluTGlzdAUHYWRkcmVzcwESZ2VuVm90ZXNLZXlzSGVscGVyAgFhDGFkbWluQWRkcmVzcwQLJHQwMTUwMjE1MjYFAWEEBnJlc3VsdAgFCyR0MDE1MDIxNTI2Al8xBAZwcmVmaXgIBQskdDAxNTAyMTUyNgJfMgkAlAoCCQDNCAIFBnJlc3VsdAkBEGtleUZ1bGxBZG1pblZvdGUCBQZwcmVmaXgFDGFkbWluQWRkcmVzcwUGcHJlZml4AQxnZW5Wb3Rlc0tleXMBCWtleVByZWZpeAQLJHQwMTYzNzE3MTYKAAIkbAUJYWRtaW5MaXN0CgACJHMJAJADAQUCJGwKAAUkYWNjMAkAlAoCBQNuaWwFCWtleVByZWZpeAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQESZ2VuVm90ZXNLZXlzSGVscGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKBAZyZXN1bHQIBQskdDAxNjM3MTcxNgJfMQQGcHJlZml4CAULJHQwMTYzNzE3MTYCXzIFBnJlc3VsdAEQY291bnRWb3Rlc0hlbHBlcgIGcmVzdWx0B3ZvdGVLZXkJAGQCBQZyZXN1bHQJAQt2YWx1ZU9yRWxzZQIJAJ8IAQUHdm90ZUtleQAAAQpjb3VudFZvdGVzAQZwcmVmaXgEBXZvdGVzCQEMZ2VuVm90ZXNLZXlzAQUGcHJlZml4CgACJGwFBXZvdGVzCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARBjb3VudFZvdGVzSGVscGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKARBjbGVhclZvdGVzSGVscGVyAgZyZXN1bHQDa2V5CQDNCAIFBnJlc3VsdAkBC0RlbGV0ZUVudHJ5AQUDa2V5ARNnZXRDbGVhclZvdGVFbnRyaWVzAQZwcmVmaXgEBXZvdGVzCQEMZ2VuVm90ZXNLZXlzAQUGcHJlZml4CgACJGwFBXZvdGVzCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJARBjbGVhclZvdGVzSGVscGVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKAQx2b3RlSU5URVJOQUwEE2NhbGxlckFkZHJlc3NTdHJpbmcJa2V5UHJlZml4CG1pblZvdGVzCnZvdGVSZXN1bHQEB3ZvdGVLZXkJARBrZXlGdWxsQWRtaW5Wb3RlAgUJa2V5UHJlZml4BRNjYWxsZXJBZGRyZXNzU3RyaW5nBBBhZG1pbkN1cnJlbnRWb3RlCQEMZ2V0QWRtaW5Wb3RlAgUJa2V5UHJlZml4BRNjYWxsZXJBZGRyZXNzU3RyaW5nBANlcnIDCQEBIQEJAQ1pc0luQWRtaW5MaXN0AQUTY2FsbGVyQWRkcmVzc1N0cmluZwkBCHRocm93RXJyAQkArAICCQCsAgICCUFkZHJlc3M6IAUTY2FsbGVyQWRkcmVzc1N0cmluZwISIG5vdCBpbiBBZG1pbiBsaXN0AwkAAAIFEGFkbWluQ3VycmVudFZvdGUAAQkBCHRocm93RXJyAQkArAICBQd2b3RlS2V5AhIgeW91IGFscmVhZHkgdm90ZWQFBHVuaXQDCQAAAgUDZXJyBQNlcnIEBXZvdGVzCQEKY291bnRWb3RlcwEFCWtleVByZWZpeAMJAGcCCQBkAgUFdm90ZXMAAQUIbWluVm90ZXMEEGNsZWFyVm90ZUVudHJpZXMJARNnZXRDbGVhclZvdGVFbnRyaWVzAQUJa2V5UHJlZml4CQDOCAIFEGNsZWFyVm90ZUVudHJpZXMFCnZvdGVSZXN1bHQJAMwIAgkBDEludGVnZXJFbnRyeQIFB3ZvdGVLZXkAAQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQ92YWxpZGF0ZUFkZHJlc3MBB2FkZHJlc3MJAQlpc0RlZmluZWQBCQCmCAEFB2FkZHJlc3MAEmtDYWxjdWxhdG9yQWRkcmVzcwITY2FsY3VsYXRvcl9fYWRkcmVzcwAXY2FsY3VsYXRvckFkZHJlc3NPcHRpb24EByRtYXRjaDAJAJ0IAgUEdGhpcwUSa0NhbGN1bGF0b3JBZGRyZXNzAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkApggBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgARY2FsY3VsYXRvckFkZHJlc3MJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgUXY2FsY3VsYXRvckFkZHJlc3NPcHRpb24JAQd3cmFwRXJyAQIaaW52YWxpZCBjYWxjdWxhdG9yIGFkZHJlc3MBC211c3RBZGRyZXNzAgFpB2FkZHJlc3MDCQAAAggFAWkGY2FsbGVyBQdhZGRyZXNzBgkBCHRocm93RXJyAQIRcGVybWlzc2lvbiBkZW5pZWQBCG11c3RUaGlzAQFpCQELbXVzdEFkZHJlc3MCBQFpBQR0aGlzAQ5tdXN0Q2FsY3VsYXRvcgEBaQkBC211c3RBZGRyZXNzAgUBaQURY2FsY3VsYXRvckFkZHJlc3MBDHBhcnNlQXNzZXRJZAEFaW5wdXQDCQAAAgUFaW5wdXQFC3dhdmVzU3RyaW5nBQR1bml0CQDZBAEFBWlucHV0AQ9hc3NldElkVG9TdHJpbmcBBWlucHV0AwkAAAIFBWlucHV0BQR1bml0BQt3YXZlc1N0cmluZwkA2AQBCQEFdmFsdWUBBQVpbnB1dBIBaQEEaW5pdAEUY2FsY3VsYXRvckFkZHJlc3NTdHIEC2NoZWNrQ2FsbGVyCQEIbXVzdFRoaXMBBQFpAwkAAAIFC2NoZWNrQ2FsbGVyBQtjaGVja0NhbGxlcgkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIFEmtDYWxjdWxhdG9yQWRkcmVzcwUUY2FsY3VsYXRvckFkZHJlc3NTdHIJAMwIAgkBC1N0cmluZ0VudHJ5AgULa1ByaWNlQXNzZXQFC3dhdmVzU3RyaW5nBQNuaWwFBHVuaXQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQELc3RyaW5nRW50cnkCA2tleQN2YWwDAwkBASEBBQhzaHV0ZG93bgkBDm11c3RDYWxjdWxhdG9yAQUBaQcJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCBQNrZXkFA3ZhbAUDbmlsBQNrZXkJAQh0aHJvd0VycgECC25vdCBhbGxvd2VkAWkBDGludGVnZXJFbnRyeQIDa2V5A3ZhbAMDCQEBIQEFCHNodXRkb3duCQEObXVzdENhbGN1bGF0b3IBBQFpBwkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQNrZXkFA3ZhbAUDbmlsBQNrZXkJAQh0aHJvd0VycgECC25vdCBhbGxvd2VkAWkBDGJvb2xlYW5FbnRyeQIDa2V5A3ZhbAMDCQEBIQEFCHNodXRkb3duCQEObXVzdENhbGN1bGF0b3IBBQFpBwkAlAoCCQDMCAIJAQxCb29sZWFuRW50cnkCBQNrZXkFA3ZhbAUDbmlsBQNrZXkJAQh0aHJvd0VycgECC25vdCBhbGxvd2VkAWkBC2JpbmFyeUVudHJ5AgNrZXkDdmFsAwMJAQEhAQUIc2h1dGRvd24JAQ5tdXN0Q2FsY3VsYXRvcgEFAWkHCQCUCgIJAMwIAgkBC0JpbmFyeUVudHJ5AgUDa2V5BQN2YWwFA25pbAUDa2V5CQEIdGhyb3dFcnIBAgtub3QgYWxsb3dlZAFpAQtkZWxldGVFbnRyeQEDa2V5AwMJAQEhAQUIc2h1dGRvd24JAQ5tdXN0Q2FsY3VsYXRvcgEFAWkHCQCUCgIJAMwIAgkBC0RlbGV0ZUVudHJ5AQUDa2V5BQNuaWwFA2tleQkBCHRocm93RXJyAQILbm90IGFsbG93ZWQBaQEHcmVpc3N1ZQMHYXNzZXRJZAZhbW91bnQKcmVpc3N1YWJsZQMDCQEBIQEFCHNodXRkb3duCQEObXVzdENhbGN1bGF0b3IBBQFpBwkAlAoCCQDMCAIJAQdSZWlzc3VlAwUHYXNzZXRJZAUGYW1vdW50BQpyZWlzc3VhYmxlBQNuaWwFBmFtb3VudAkBCHRocm93RXJyAQILbm90IGFsbG93ZWQBaQEEYnVybgIHYXNzZXRJZAZhbW91bnQDAwkBASEBBQhzaHV0ZG93bgkBDm11c3RDYWxjdWxhdG9yAQUBaQcJAJQKAgkAzAgCCQEEQnVybgIFB2Fzc2V0SWQFBmFtb3VudAUDbmlsBQZhbW91bnQJAQh0aHJvd0VycgECC25vdCBhbGxvd2VkAWkBDXRyYW5zZmVyQXNzZXQDDnJlY2lwaWVudEJ5dGVzBmFtb3VudAdhc3NldElkAwMJAQEhAQUIc2h1dGRvd24JAQ5tdXN0Q2FsY3VsYXRvcgEFAWkHCQCUCgIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBB0FkZHJlc3MBBQ5yZWNpcGllbnRCeXRlcwUGYW1vdW50BQdhc3NldElkBQNuaWwFBmFtb3VudAkBCHRocm93RXJyAQILbm90IGFsbG93ZWQBaQEOdHJhbnNmZXJBc3NldHMDDnJlY2lwaWVudEJ5dGVzCmFzc2V0c0xpc3QLYW1vdW50c0xpc3QDAwkBASEBBQhzaHV0ZG93bgkBDm11c3RDYWxjdWxhdG9yAQUBaQcKAQ5hZGROZXdUcmFuc2ZlcgIDYWNjC25leHRBc3NldElkBAskdDA1OTc5NjAwMwUDYWNjBAl0cmFuc2ZlcnMIBQskdDA1OTc5NjAwMwJfMQQBaggFCyR0MDU5Nzk2MDAzAl8yBAtuZXdUcmFuc2ZlcgkBDlNjcmlwdFRyYW5zZmVyAwkBB0FkZHJlc3MBBQ5yZWNpcGllbnRCeXRlcwkAkQMCBQthbW91bnRzTGlzdAUBagkAkQMCBQphc3NldHNMaXN0BQFqBBB1cGRhdGVkVHJhbnNmZXJzCQDNCAIFCXRyYW5zZmVycwULbmV3VHJhbnNmZXIJAJQKAgUQdXBkYXRlZFRyYW5zZmVycwkAZAIFAWoAAQQLJHQwNjI0MDYzMjEKAAIkbAUKYXNzZXRzTGlzdAoAAiRzCQCQAwEFAiRsCgAFJGFjYzAJAJQKAgUDbmlsAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBDmFkZE5ld1RyYW5zZmVyAgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhRMaXN0IHNpemUgZXhjZWVkcyAxMAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgACQAKBA9hc3NldHNUcmFuc2ZlcnMIBQskdDA2MjQwNjMyMQJfMQQKX2xhc3RJbmRleAgFCyR0MDYyNDA2MzIxAl8yCQCUCgIFD2Fzc2V0c1RyYW5zZmVycwUEdW5pdAkBCHRocm93RXJyAQILbm90IGFsbG93ZWQBaQENdHJhbnNmZXJXYXZlcwIOcmVjaXBpZW50Qnl0ZXMGYW1vdW50AwMJAQEhAQUIc2h1dGRvd24JAQ5tdXN0Q2FsY3VsYXRvcgEFAWkHCQCUCgIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBB0FkZHJlc3MBBQ5yZWNpcGllbnRCeXRlcwUGYW1vdW50BQR1bml0BQNuaWwFBmFtb3VudAkBCHRocm93RXJyAQILbm90IGFsbG93ZWQBaQEEY2FsbAIIZnVuY3Rpb24EYXJncwQNY2xlYW5QYXltZW50cwMJAAACCAUBaQ9jYWxsZXJQdWJsaWNLZXkBIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABQNuaWwIBQFpCHBheW1lbnRzBAZyZXN1bHQJAP0HBAURY2FsY3VsYXRvckFkZHJlc3MFCGZ1bmN0aW9uCQDMCAIIBQFpD2NhbGxlclB1YmxpY0tleQkAzAgCBQRhcmdzBQNuaWwFDWNsZWFuUGF5bWVudHMJAJQKAgUDbmlsBQZyZXN1bHQBaQEOaW5pdFBvb2xJbnZva2UCEXBvb2xBZGRyZXNzU3RyaW5nBGFyZ3MDAwkBASEBBQhzaHV0ZG93bgkBDm11c3RDYWxjdWxhdG9yAQUBaQcEDWNvbnZlcnRlZEFyZ3MJAMwIAgkAkQMCBQRhcmdzAAAJAMwIAgkAkQMCBQRhcmdzAAEJAMwIAgkAkQMCBQRhcmdzAAIJAMwIAgkAkQMCBQRhcmdzAAMJAMwIAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFBGFyZ3MABAUDbmlsCQCUCgIFA25pbAkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBRFwb29sQWRkcmVzc1N0cmluZwIEaW5pdAUNY29udmVydGVkQXJncwgFAWkIcGF5bWVudHMJAQh0aHJvd0VycgECC25vdCBhbGxvd2VkAWkBGXdpdGhkcmF3TGlxdWlkaXR5RnJvbVBvb2wBC3Bvb2xBZGRyZXNzAwMJAQEhAQUIc2h1dGRvd24JAQ5tdXN0Q2FsY3VsYXRvcgEFAWkHCQCUCgIFA25pbAkA/AcECQEHQWRkcmVzcwEFC3Bvb2xBZGRyZXNzAhl3aXRoZHJhd0xpcXVpZGl0eUF0VGFyZ2V0BQNuaWwFA25pbAkBCHRocm93RXJyAQILbm90IGFsbG93ZWQBaQESbm90aWZ5U3RhdHVzVXBkYXRlAQZzdGF0dXMKARVrUG9vbEluZGV4RnJvbUFkZHJlc3MBB2FkZHJlc3MJALkJAgkAzAgCAgRwb29sCQDMCAIJAKUIAQUHYWRkcmVzcwUDbmlsBQNTRVAKAQtrUG9vbFN0YXR1cwEFaW5kZXgJALkJAgkAzAgCAgRwb29sCQDMCAICBnN0YXR1cwkAzAgCCQCkAwEFBWluZGV4BQNuaWwFA1NFUAQLcG9vbEFkZHJlc3MIBQFpBmNhbGxlcgQJcG9vbEluZGV4CQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQEVa1Bvb2xJbmRleEZyb21BZGRyZXNzAQULcG9vbEFkZHJlc3MJAMwIAgkBDEludGVnZXJFbnRyeQIJAQtrUG9vbFN0YXR1cwEFCXBvb2xJbmRleAUGc3RhdHVzBQNuaWwBaQEMY3JlYXRlV3hQb29sBQl1c2VyUG9vbHMIYXNzZXQxSWQMYXNzZXQxQW1vdW50CGFzc2V0MklkDGFzc2V0MkFtb3VudAMDCQEBIQEFCHNodXRkb3duCQEObXVzdENhbGN1bGF0b3IBBQFpBwkAlAoCBQNuaWwJAPwHBAkBB0FkZHJlc3MBBQl1c2VyUG9vbHMCBmNyZWF0ZQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQEMcGFyc2VBc3NldElkAQUIYXNzZXQxSWQFDGFzc2V0MUFtb3VudAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDHBhcnNlQXNzZXRJZAEFCGFzc2V0MklkBQxhc3NldDJBbW91bnQFA25pbAkBCHRocm93RXJyAQILbm90IGFsbG93ZWQBaQENcmVnaXN0ZXJBc3NldAQKYXNzZXRTdG9yZQdhc3NldElkBGxvZ28IdmVyaWZpZWQDAwkBASEBBQhzaHV0ZG93bgkBDm11c3RDYWxjdWxhdG9yAQUBaQcJAJQKAgUDbmlsCQD8BwQJAQdBZGRyZXNzAQUKYXNzZXRTdG9yZQIOY3JlYXRlT3JVcGRhdGUJAMwIAgUHYXNzZXRJZAkAzAgCBQRsb2dvCQDMCAIFCHZlcmlmaWVkBQNuaWwFA25pbAkBCHRocm93RXJyAQILbm90IGFsbG93ZWQBaQELdm90ZUZvclR4SWQBBHR4SWQEE2NhbGxlckFkZHJlc3NTdHJpbmcJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQJa2V5UHJlZml4CQEYa2V5QWxsb3dlZFR4SWRWb3RlUHJlZml4AQUEdHhJZAQGcmVzdWx0CQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ5rZXlBbGxvd2VkVHhJZAAFBHR4SWQFA25pbAQRYWxsb3dlZFR4SWRPcHRpb24JAJ0IAgUEdGhpcwkBDmtleUFsbG93ZWRUeElkAAQDZXJyCQDMCAIDCQAAAgkAyAEBCQDZBAEFBHR4SWQFEVRYSURfQllURVNfTEVOR1RIBgkBCHRocm93RXJyAQkArAICBQR0eElkAhIgaXMgbm90IHZhbGlkIHR4SWQJAMwIAgMDCQAAAgURYWxsb3dlZFR4SWRPcHRpb24FBHVuaXQGCQECIT0CCQEFdmFsdWUBBRFhbGxvd2VkVHhJZE9wdGlvbgUEdHhJZAYJAQh0aHJvd0VycgEJAKwCAgUEdHhJZAITIGlzIGFscmVhZHkgYWxsb3dlZAUDbmlsAwkAAAIFA2VycgUDZXJyCQEMdm90ZUlOVEVSTkFMBAUTY2FsbGVyQWRkcmVzc1N0cmluZwUJa2V5UHJlZml4BQZRVU9SVU0FBnJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgECdHgBBnZlcmlmeQAECGJ5QWRtaW5zCQAAAgkA2AQBCAUCdHgCaWQJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBDmtleUFsbG93ZWRUeElkAAIABAdieU93bmVyAwkAZwIJAJADAQUJYWRtaW5MaXN0BQZRVU9SVU0HCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5AwUIYnlBZG1pbnMGBQdieU93bmVyslsyfQ==",
    "height": 3426860,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 87yZfKeZoEqKcFwSsUh9ekLx25bX4ap94NoKX812fydN
Next: none

Diff: 
Old New Differences
338 338  func withdrawLiquidityFromPool (poolAddress) = if (if (!(shutdown))
339 339      then mustCalculator(i)
340 340      else false)
341 -     then $Tuple2(nil, reentrantInvoke(Address(poolAddress), "withdrawLiquidityAtTarget", nil, nil))
341 +     then $Tuple2(nil, invoke(Address(poolAddress), "withdrawLiquidityAtTarget", nil, nil))
342 342      else throwErr("not allowed")
343 343  
344 344  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 7 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let SEP = "__"
5 5  
6 6  let wavesString = "WAVES"
7 7  
8 8  let contractFilename = "meme_im_factory.ride"
9 9  
10 10  let kPriceAsset = "price__asset"
11 11  
12 12  let kShutdown = "shutdown__flag"
13 13  
14 14  let shutdown = valueOrElse(getBoolean(kShutdown), false)
15 15  
16 16  func wrapErr (s) = ((contractFilename + ": ") + s)
17 17  
18 18  
19 19  func throwErr (s) = throw(wrapErr(s))
20 20  
21 21  
22 22  let ADMIN_LIST_SIZE = 10
23 23  
24 24  let QUORUM = 3
25 25  
26 26  let TXID_BYTES_LENGTH = 32
27 27  
28 28  func keyAllowedTxIdVotePrefix (txId) = makeString(["%s%s%s", "allowTxId", txId], SEP)
29 29  
30 30  
31 31  func keyFullAdminVote (prefix,adminAddress) = makeString([prefix, adminAddress], SEP)
32 32  
33 33  
34 34  func keyAdminAddressList () = makeString(["%s", "adminAddressList"], SEP)
35 35  
36 36  
37 37  func keyAllowedTxId () = makeString(["%s", "txId"], SEP)
38 38  
39 39  
40 40  func getAdminVote (prefix,admin) = {
41 41      let voteKey = keyFullAdminVote(prefix, admin)
42 42      valueOrElse(getInteger(voteKey), 0)
43 43      }
44 44  
45 45  
46 46  func getAdminsList () = match getString(this, keyAdminAddressList()) {
47 47      case s: String => 
48 48          split(s, SEP)
49 49      case _ => 
50 50          nil
51 51  }
52 52  
53 53  
54 54  let adminList = getAdminsList()
55 55  
56 56  func isInAdminList (address) = containsElement(adminList, address)
57 57  
58 58  
59 59  func genVotesKeysHelper (a,adminAddress) = {
60 60      let $t015021526 = a
61 61      let result = $t015021526._1
62 62      let prefix = $t015021526._2
63 63      $Tuple2((result :+ keyFullAdminVote(prefix, adminAddress)), prefix)
64 64      }
65 65  
66 66  
67 67  func genVotesKeys (keyPrefix) = {
68 68      let $t016371716 = {
69 69          let $l = adminList
70 70          let $s = size($l)
71 71          let $acc0 = $Tuple2(nil, keyPrefix)
72 72          func $f0_1 ($a,$i) =         if (($i >= $s))
73 73              then $a
74 74              else genVotesKeysHelper($a, $l[$i])
75 75  
76 76          func $f0_2 ($a,$i) =         if (($i >= $s))
77 77              then $a
78 78              else throw("List size exceeds 10")
79 79  
80 80          $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)
81 81          }
82 82      let result = $t016371716._1
83 83      let prefix = $t016371716._2
84 84      result
85 85      }
86 86  
87 87  
88 88  func countVotesHelper (result,voteKey) = (result + valueOrElse(getInteger(voteKey), 0))
89 89  
90 90  
91 91  func countVotes (prefix) = {
92 92      let votes = genVotesKeys(prefix)
93 93      let $l = votes
94 94      let $s = size($l)
95 95      let $acc0 = 0
96 96      func $f0_1 ($a,$i) =     if (($i >= $s))
97 97          then $a
98 98          else countVotesHelper($a, $l[$i])
99 99  
100 100      func $f0_2 ($a,$i) =     if (($i >= $s))
101 101          then $a
102 102          else throw("List size exceeds 10")
103 103  
104 104      $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)
105 105      }
106 106  
107 107  
108 108  func clearVotesHelper (result,key) = (result :+ DeleteEntry(key))
109 109  
110 110  
111 111  func getClearVoteEntries (prefix) = {
112 112      let votes = genVotesKeys(prefix)
113 113      let $l = votes
114 114      let $s = size($l)
115 115      let $acc0 = nil
116 116      func $f0_1 ($a,$i) =     if (($i >= $s))
117 117          then $a
118 118          else clearVotesHelper($a, $l[$i])
119 119  
120 120      func $f0_2 ($a,$i) =     if (($i >= $s))
121 121          then $a
122 122          else throw("List size exceeds 10")
123 123  
124 124      $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)
125 125      }
126 126  
127 127  
128 128  func voteINTERNAL (callerAddressString,keyPrefix,minVotes,voteResult) = {
129 129      let voteKey = keyFullAdminVote(keyPrefix, callerAddressString)
130 130      let adminCurrentVote = getAdminVote(keyPrefix, callerAddressString)
131 131      let err = if (!(isInAdminList(callerAddressString)))
132 132          then throwErr((("Address: " + callerAddressString) + " not in Admin list"))
133 133          else if ((adminCurrentVote == 1))
134 134              then throwErr((voteKey + " you already voted"))
135 135              else unit
136 136      if ((err == err))
137 137          then {
138 138              let votes = countVotes(keyPrefix)
139 139              if (((votes + 1) >= minVotes))
140 140                  then {
141 141                      let clearVoteEntries = getClearVoteEntries(keyPrefix)
142 142                      (clearVoteEntries ++ voteResult)
143 143                      }
144 144                  else [IntegerEntry(voteKey, 1)]
145 145              }
146 146          else throw("Strict value is not equal to itself.")
147 147      }
148 148  
149 149  
150 150  func validateAddress (address) = isDefined(addressFromString(address))
151 151  
152 152  
153 153  let kCalculatorAddress = "calculator__address"
154 154  
155 155  let calculatorAddressOption = match getString(this, kCalculatorAddress) {
156 156      case s: String => 
157 157          addressFromString(s)
158 158      case _: Unit => 
159 159          unit
160 160      case _ => 
161 161          throw("Match error")
162 162  }
163 163  
164 164  let calculatorAddress = valueOrErrorMessage(calculatorAddressOption, wrapErr("invalid calculator address"))
165 165  
166 166  func mustAddress (i,address) = if ((i.caller == address))
167 167      then true
168 168      else throwErr("permission denied")
169 169  
170 170  
171 171  func mustThis (i) = mustAddress(i, this)
172 172  
173 173  
174 174  func mustCalculator (i) = mustAddress(i, calculatorAddress)
175 175  
176 176  
177 177  func parseAssetId (input) = if ((input == wavesString))
178 178      then unit
179 179      else fromBase58String(input)
180 180  
181 181  
182 182  func assetIdToString (input) = if ((input == unit))
183 183      then wavesString
184 184      else toBase58String(value(input))
185 185  
186 186  
187 187  @Callable(i)
188 188  func init (calculatorAddressStr) = {
189 189      let checkCaller = mustThis(i)
190 190      if ((checkCaller == checkCaller))
191 191          then $Tuple2([StringEntry(kCalculatorAddress, calculatorAddressStr), StringEntry(kPriceAsset, wavesString)], unit)
192 192          else throw("Strict value is not equal to itself.")
193 193      }
194 194  
195 195  
196 196  
197 197  @Callable(i)
198 198  func stringEntry (key,val) = if (if (!(shutdown))
199 199      then mustCalculator(i)
200 200      else false)
201 201      then $Tuple2([StringEntry(key, val)], key)
202 202      else throwErr("not allowed")
203 203  
204 204  
205 205  
206 206  @Callable(i)
207 207  func integerEntry (key,val) = if (if (!(shutdown))
208 208      then mustCalculator(i)
209 209      else false)
210 210      then $Tuple2([IntegerEntry(key, val)], key)
211 211      else throwErr("not allowed")
212 212  
213 213  
214 214  
215 215  @Callable(i)
216 216  func booleanEntry (key,val) = if (if (!(shutdown))
217 217      then mustCalculator(i)
218 218      else false)
219 219      then $Tuple2([BooleanEntry(key, val)], key)
220 220      else throwErr("not allowed")
221 221  
222 222  
223 223  
224 224  @Callable(i)
225 225  func binaryEntry (key,val) = if (if (!(shutdown))
226 226      then mustCalculator(i)
227 227      else false)
228 228      then $Tuple2([BinaryEntry(key, val)], key)
229 229      else throwErr("not allowed")
230 230  
231 231  
232 232  
233 233  @Callable(i)
234 234  func deleteEntry (key) = if (if (!(shutdown))
235 235      then mustCalculator(i)
236 236      else false)
237 237      then $Tuple2([DeleteEntry(key)], key)
238 238      else throwErr("not allowed")
239 239  
240 240  
241 241  
242 242  @Callable(i)
243 243  func reissue (assetId,amount,reissuable) = if (if (!(shutdown))
244 244      then mustCalculator(i)
245 245      else false)
246 246      then $Tuple2([Reissue(assetId, amount, reissuable)], amount)
247 247      else throwErr("not allowed")
248 248  
249 249  
250 250  
251 251  @Callable(i)
252 252  func burn (assetId,amount) = if (if (!(shutdown))
253 253      then mustCalculator(i)
254 254      else false)
255 255      then $Tuple2([Burn(assetId, amount)], amount)
256 256      else throwErr("not allowed")
257 257  
258 258  
259 259  
260 260  @Callable(i)
261 261  func transferAsset (recipientBytes,amount,assetId) = if (if (!(shutdown))
262 262      then mustCalculator(i)
263 263      else false)
264 264      then $Tuple2([ScriptTransfer(Address(recipientBytes), amount, assetId)], amount)
265 265      else throwErr("not allowed")
266 266  
267 267  
268 268  
269 269  @Callable(i)
270 270  func transferAssets (recipientBytes,assetsList,amountsList) = if (if (!(shutdown))
271 271      then mustCalculator(i)
272 272      else false)
273 273      then {
274 274          func addNewTransfer (acc,nextAssetId) =         {
275 275              let $t059796003 = acc
276 276              let transfers = $t059796003._1
277 277              let j = $t059796003._2
278 278              let newTransfer = ScriptTransfer(Address(recipientBytes), amountsList[j], assetsList[j])
279 279              let updatedTransfers = (transfers :+ newTransfer)
280 280              $Tuple2(updatedTransfers, (j + 1))
281 281              }
282 282  
283 283          let $t062406321 = {
284 284              let $l = assetsList
285 285              let $s = size($l)
286 286              let $acc0 = $Tuple2(nil, 0)
287 287              func $f0_1 ($a,$i) =             if (($i >= $s))
288 288                  then $a
289 289                  else addNewTransfer($a, $l[$i])
290 290  
291 291              func $f0_2 ($a,$i) =             if (($i >= $s))
292 292                  then $a
293 293                  else throw("List size exceeds 10")
294 294  
295 295              $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)
296 296              }
297 297          let assetsTransfers = $t062406321._1
298 298          let _lastIndex = $t062406321._2
299 299          $Tuple2(assetsTransfers, unit)
300 300          }
301 301      else throwErr("not allowed")
302 302  
303 303  
304 304  
305 305  @Callable(i)
306 306  func transferWaves (recipientBytes,amount) = if (if (!(shutdown))
307 307      then mustCalculator(i)
308 308      else false)
309 309      then $Tuple2([ScriptTransfer(Address(recipientBytes), amount, unit)], amount)
310 310      else throwErr("not allowed")
311 311  
312 312  
313 313  
314 314  @Callable(i)
315 315  func call (function,args) = {
316 316      let cleanPayments = if ((i.callerPublicKey == base58'11111111111111111111111111111111'))
317 317          then nil
318 318          else i.payments
319 319      let result = reentrantInvoke(calculatorAddress, function, [i.callerPublicKey, args], cleanPayments)
320 320      $Tuple2(nil, result)
321 321      }
322 322  
323 323  
324 324  
325 325  @Callable(i)
326 326  func initPoolInvoke (poolAddressString,args) = if (if (!(shutdown))
327 327      then mustCalculator(i)
328 328      else false)
329 329      then {
330 330          let convertedArgs = [args[0], args[1], args[2], args[3], parseIntValue(args[4])]
331 331          $Tuple2(nil, invoke(addressFromStringValue(poolAddressString), "init", convertedArgs, i.payments))
332 332          }
333 333      else throwErr("not allowed")
334 334  
335 335  
336 336  
337 337  @Callable(i)
338 338  func withdrawLiquidityFromPool (poolAddress) = if (if (!(shutdown))
339 339      then mustCalculator(i)
340 340      else false)
341 -     then $Tuple2(nil, reentrantInvoke(Address(poolAddress), "withdrawLiquidityAtTarget", nil, nil))
341 +     then $Tuple2(nil, invoke(Address(poolAddress), "withdrawLiquidityAtTarget", nil, nil))
342 342      else throwErr("not allowed")
343 343  
344 344  
345 345  
346 346  @Callable(i)
347 347  func notifyStatusUpdate (status) = {
348 348      func kPoolIndexFromAddress (address) =     makeString(["pool", toString(address)], SEP)
349 349  
350 350      func kPoolStatus (index) =     makeString(["pool", "status", toString(index)], SEP)
351 351  
352 352      let poolAddress = i.caller
353 353      let poolIndex = getIntegerValue(this, kPoolIndexFromAddress(poolAddress))
354 354  [IntegerEntry(kPoolStatus(poolIndex), status)]
355 355      }
356 356  
357 357  
358 358  
359 359  @Callable(i)
360 360  func createWxPool (userPools,asset1Id,asset1Amount,asset2Id,asset2Amount) = if (if (!(shutdown))
361 361      then mustCalculator(i)
362 362      else false)
363 363      then $Tuple2(nil, invoke(Address(userPools), "create", nil, [AttachedPayment(parseAssetId(asset1Id), asset1Amount), AttachedPayment(parseAssetId(asset2Id), asset2Amount)]))
364 364      else throwErr("not allowed")
365 365  
366 366  
367 367  
368 368  @Callable(i)
369 369  func registerAsset (assetStore,assetId,logo,verified) = if (if (!(shutdown))
370 370      then mustCalculator(i)
371 371      else false)
372 372      then $Tuple2(nil, invoke(Address(assetStore), "createOrUpdate", [assetId, logo, verified], nil))
373 373      else throwErr("not allowed")
374 374  
375 375  
376 376  
377 377  @Callable(i)
378 378  func voteForTxId (txId) = {
379 379      let callerAddressString = toBase58String(i.caller.bytes)
380 380      let keyPrefix = keyAllowedTxIdVotePrefix(txId)
381 381      let result = [StringEntry(keyAllowedTxId(), txId)]
382 382      let allowedTxIdOption = getString(this, keyAllowedTxId())
383 383      let err = [if ((size(fromBase58String(txId)) == TXID_BYTES_LENGTH))
384 384          then true
385 385          else throwErr((txId + " is not valid txId")), if (if ((allowedTxIdOption == unit))
386 386          then true
387 387          else (value(allowedTxIdOption) != txId))
388 388          then true
389 389          else throwErr((txId + " is already allowed"))]
390 390      if ((err == err))
391 391          then voteINTERNAL(callerAddressString, keyPrefix, QUORUM, result)
392 392          else throw("Strict value is not equal to itself.")
393 393      }
394 394  
395 395  
396 396  @Verifier(tx)
397 397  func verify () = {
398 398      let byAdmins = (toBase58String(tx.id) == valueOrElse(getString(this, keyAllowedTxId()), ""))
399 399      let byOwner = if ((size(adminList) >= QUORUM))
400 400          then false
401 401          else sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
402 402      if (byAdmins)
403 403          then true
404 404          else byOwner
405 405      }
406 406

Old	New		Differences
338	338		func withdrawLiquidityFromPool (poolAddress) = if (if (!(shutdown))
339	339		then mustCalculator(i)
340	340		else false)
341		-	then $Tuple2(nil, ~~reentrantInvoke~~(Address(poolAddress), "withdrawLiquidityAtTarget", nil, nil))
	341	+	then $Tuple2(nil, invoke(Address(poolAddress), "withdrawLiquidityAtTarget", nil, nil))
342	342		else throwErr("not allowed")
343	343
344	344

Old	New		Differences
1	1		{-# STDLIB_VERSION 7 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let SEP = "__"
5	5
6	6		let wavesString = "WAVES"
7	7
8	8		let contractFilename = "meme_im_factory.ride"
9	9
10	10		let kPriceAsset = "price__asset"
11	11
12	12		let kShutdown = "shutdown__flag"
13	13
14	14		let shutdown = valueOrElse(getBoolean(kShutdown), false)
15	15
16	16		func wrapErr (s) = ((contractFilename + ": ") + s)
17	17
18	18
19	19		func throwErr (s) = throw(wrapErr(s))
20	20
21	21
22	22		let ADMIN_LIST_SIZE = 10
23	23
24	24		let QUORUM = 3
25	25
26	26		let TXID_BYTES_LENGTH = 32
27	27
28	28		func keyAllowedTxIdVotePrefix (txId) = makeString(["%s%s%s", "allowTxId", txId], SEP)
29	29
30	30
31	31		func keyFullAdminVote (prefix,adminAddress) = makeString([prefix, adminAddress], SEP)
32	32
33	33
34	34		func keyAdminAddressList () = makeString(["%s", "adminAddressList"], SEP)
35	35
36	36
37	37		func keyAllowedTxId () = makeString(["%s", "txId"], SEP)
38	38
39	39
40	40		func getAdminVote (prefix,admin) = {
41	41		let voteKey = keyFullAdminVote(prefix, admin)
42	42		valueOrElse(getInteger(voteKey), 0)
43	43		}
44	44
45	45
46	46		func getAdminsList () = match getString(this, keyAdminAddressList()) {
47	47		case s: String =>
48	48		split(s, SEP)
49	49		case _ =>
50	50		nil
51	51		}
52	52
53	53
54	54		let adminList = getAdminsList()
55	55
56	56		func isInAdminList (address) = containsElement(adminList, address)
57	57
58	58
59	59		func genVotesKeysHelper (a,adminAddress) = {
60	60		let $t015021526 = a
61	61		let result = $t015021526._1
62	62		let prefix = $t015021526._2
63	63		$Tuple2((result :+ keyFullAdminVote(prefix, adminAddress)), prefix)
64	64		}
65	65
66	66
67	67		func genVotesKeys (keyPrefix) = {
68	68		let $t016371716 = {
69	69		let $l = adminList
70	70		let $s = size($l)
71	71		let $acc0 = $Tuple2(nil, keyPrefix)
72	72		func $f0_1 ($a,$i) = if (($i >= $s))
73	73		then $a
74	74		else genVotesKeysHelper($a, $l[$i])
75	75
76	76		func $f0_2 ($a,$i) = if (($i >= $s))
77	77		then $a
78	78		else throw("List size exceeds 10")
79	79
80	80		$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)
81	81		}
82	82		let result = $t016371716._1
83	83		let prefix = $t016371716._2
84	84		result
85	85		}
86	86
87	87
88	88		func countVotesHelper (result,voteKey) = (result + valueOrElse(getInteger(voteKey), 0))
89	89
90	90
91	91		func countVotes (prefix) = {
92	92		let votes = genVotesKeys(prefix)
93	93		let $l = votes
94	94		let $s = size($l)
95	95		let $acc0 = 0
96	96		func $f0_1 ($a,$i) = if (($i >= $s))
97	97		then $a
98	98		else countVotesHelper($a, $l[$i])
99	99
100	100		func $f0_2 ($a,$i) = if (($i >= $s))
101	101		then $a
102	102		else throw("List size exceeds 10")
103	103
104	104		$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)
105	105		}
106	106
107	107
108	108		func clearVotesHelper (result,key) = (result :+ DeleteEntry(key))
109	109
110	110
111	111		func getClearVoteEntries (prefix) = {
112	112		let votes = genVotesKeys(prefix)
113	113		let $l = votes
114	114		let $s = size($l)
115	115		let $acc0 = nil
116	116		func $f0_1 ($a,$i) = if (($i >= $s))
117	117		then $a
118	118		else clearVotesHelper($a, $l[$i])
119	119
120	120		func $f0_2 ($a,$i) = if (($i >= $s))
121	121		then $a
122	122		else throw("List size exceeds 10")
123	123
124	124		$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)
125	125		}
126	126
127	127
128	128		func voteINTERNAL (callerAddressString,keyPrefix,minVotes,voteResult) = {
129	129		let voteKey = keyFullAdminVote(keyPrefix, callerAddressString)
130	130		let adminCurrentVote = getAdminVote(keyPrefix, callerAddressString)
131	131		let err = if (!(isInAdminList(callerAddressString)))
132	132		then throwErr((("Address: " + callerAddressString) + " not in Admin list"))
133	133		else if ((adminCurrentVote == 1))
134	134		then throwErr((voteKey + " you already voted"))
135	135		else unit
136	136		if ((err == err))
137	137		then {
138	138		let votes = countVotes(keyPrefix)
139	139		if (((votes + 1) >= minVotes))
140	140		then {
141	141		let clearVoteEntries = getClearVoteEntries(keyPrefix)
142	142		(clearVoteEntries ++ voteResult)
143	143		}
144	144		else [IntegerEntry(voteKey, 1)]
145	145		}
146	146		else throw("Strict value is not equal to itself.")
147	147		}
148	148
149	149
150	150		func validateAddress (address) = isDefined(addressFromString(address))
151	151
152	152
153	153		let kCalculatorAddress = "calculator__address"
154	154
155	155		let calculatorAddressOption = match getString(this, kCalculatorAddress) {
156	156		case s: String =>
157	157		addressFromString(s)
158	158		case _: Unit =>
159	159		unit
160	160		case _ =>
161	161		throw("Match error")
162	162		}
163	163
164	164		let calculatorAddress = valueOrErrorMessage(calculatorAddressOption, wrapErr("invalid calculator address"))
165	165
166	166		func mustAddress (i,address) = if ((i.caller == address))
167	167		then true
168	168		else throwErr("permission denied")
169	169
170	170
171	171		func mustThis (i) = mustAddress(i, this)
172	172
173	173
174	174		func mustCalculator (i) = mustAddress(i, calculatorAddress)
175	175
176	176
177	177		func parseAssetId (input) = if ((input == wavesString))
178	178		then unit
179	179		else fromBase58String(input)
180	180
181	181
182	182		func assetIdToString (input) = if ((input == unit))
183	183		then wavesString
184	184		else toBase58String(value(input))
185	185
186	186
187	187		@Callable(i)
188	188		func init (calculatorAddressStr) = {
189	189		let checkCaller = mustThis(i)
190	190		if ((checkCaller == checkCaller))
191	191		then $Tuple2([StringEntry(kCalculatorAddress, calculatorAddressStr), StringEntry(kPriceAsset, wavesString)], unit)
192	192		else throw("Strict value is not equal to itself.")
193	193		}
194	194
195	195
196	196
197	197		@Callable(i)
198	198		func stringEntry (key,val) = if (if (!(shutdown))
199	199		then mustCalculator(i)
200	200		else false)
201	201		then $Tuple2([StringEntry(key, val)], key)
202	202		else throwErr("not allowed")
203	203
204	204
205	205
206	206		@Callable(i)
207	207		func integerEntry (key,val) = if (if (!(shutdown))
208	208		then mustCalculator(i)
209	209		else false)
210	210		then $Tuple2([IntegerEntry(key, val)], key)
211	211		else throwErr("not allowed")
212	212
213	213
214	214
215	215		@Callable(i)
216	216		func booleanEntry (key,val) = if (if (!(shutdown))
217	217		then mustCalculator(i)
218	218		else false)
219	219		then $Tuple2([BooleanEntry(key, val)], key)
220	220		else throwErr("not allowed")
221	221
222	222
223	223
224	224		@Callable(i)
225	225		func binaryEntry (key,val) = if (if (!(shutdown))
226	226		then mustCalculator(i)
227	227		else false)
228	228		then $Tuple2([BinaryEntry(key, val)], key)
229	229		else throwErr("not allowed")
230	230
231	231
232	232
233	233		@Callable(i)
234	234		func deleteEntry (key) = if (if (!(shutdown))
235	235		then mustCalculator(i)
236	236		else false)
237	237		then $Tuple2([DeleteEntry(key)], key)
238	238		else throwErr("not allowed")
239	239
240	240
241	241
242	242		@Callable(i)
243	243		func reissue (assetId,amount,reissuable) = if (if (!(shutdown))
244	244		then mustCalculator(i)
245	245		else false)
246	246		then $Tuple2([Reissue(assetId, amount, reissuable)], amount)
247	247		else throwErr("not allowed")
248	248
249	249
250	250
251	251		@Callable(i)
252	252		func burn (assetId,amount) = if (if (!(shutdown))
253	253		then mustCalculator(i)
254	254		else false)
255	255		then $Tuple2([Burn(assetId, amount)], amount)
256	256		else throwErr("not allowed")
257	257
258	258
259	259
260	260		@Callable(i)
261	261		func transferAsset (recipientBytes,amount,assetId) = if (if (!(shutdown))
262	262		then mustCalculator(i)
263	263		else false)
264	264		then $Tuple2([ScriptTransfer(Address(recipientBytes), amount, assetId)], amount)
265	265		else throwErr("not allowed")
266	266
267	267
268	268
269	269		@Callable(i)
270	270		func transferAssets (recipientBytes,assetsList,amountsList) = if (if (!(shutdown))
271	271		then mustCalculator(i)
272	272		else false)
273	273		then {
274	274		func addNewTransfer (acc,nextAssetId) = {
275	275		let $t059796003 = acc
276	276		let transfers = $t059796003._1
277	277		let j = $t059796003._2
278	278		let newTransfer = ScriptTransfer(Address(recipientBytes), amountsList[j], assetsList[j])
279	279		let updatedTransfers = (transfers :+ newTransfer)
280	280		$Tuple2(updatedTransfers, (j + 1))
281	281		}
282	282
283	283		let $t062406321 = {
284	284		let $l = assetsList
285	285		let $s = size($l)
286	286		let $acc0 = $Tuple2(nil, 0)
287	287		func $f0_1 ($a,$i) = if (($i >= $s))
288	288		then $a
289	289		else addNewTransfer($a, $l[$i])
290	290
291	291		func $f0_2 ($a,$i) = if (($i >= $s))
292	292		then $a
293	293		else throw("List size exceeds 10")
294	294
295	295		$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)
296	296		}
297	297		let assetsTransfers = $t062406321._1
298	298		let _lastIndex = $t062406321._2
299	299		$Tuple2(assetsTransfers, unit)
300	300		}
301	301		else throwErr("not allowed")
302	302
303	303
304	304
305	305		@Callable(i)
306	306		func transferWaves (recipientBytes,amount) = if (if (!(shutdown))
307	307		then mustCalculator(i)
308	308		else false)
309	309		then $Tuple2([ScriptTransfer(Address(recipientBytes), amount, unit)], amount)
310	310		else throwErr("not allowed")
311	311
312	312
313	313
314	314		@Callable(i)
315	315		func call (function,args) = {
316	316		let cleanPayments = if ((i.callerPublicKey == base58'11111111111111111111111111111111'))
317	317		then nil
318	318		else i.payments
319	319		let result = reentrantInvoke(calculatorAddress, function, [i.callerPublicKey, args], cleanPayments)
320	320		$Tuple2(nil, result)
321	321		}
322	322
323	323
324	324
325	325		@Callable(i)
326	326		func initPoolInvoke (poolAddressString,args) = if (if (!(shutdown))
327	327		then mustCalculator(i)
328	328		else false)
329	329		then {
330	330		let convertedArgs = [args[0], args[1], args[2], args[3], parseIntValue(args[4])]
331	331		$Tuple2(nil, invoke(addressFromStringValue(poolAddressString), "init", convertedArgs, i.payments))
332	332		}
333	333		else throwErr("not allowed")
334	334
335	335
336	336
337	337		@Callable(i)
338	338		func withdrawLiquidityFromPool (poolAddress) = if (if (!(shutdown))
339	339		then mustCalculator(i)
340	340		else false)
341		-	then $Tuple2(nil, ~~reentrantInvoke~~(Address(poolAddress), "withdrawLiquidityAtTarget", nil, nil))
	341	+	then $Tuple2(nil, invoke(Address(poolAddress), "withdrawLiquidityAtTarget", nil, nil))
342	342		else throwErr("not allowed")
343	343
344	344
345	345
346	346		@Callable(i)
347	347		func notifyStatusUpdate (status) = {
348	348		func kPoolIndexFromAddress (address) = makeString(["pool", toString(address)], SEP)
349	349
350	350		func kPoolStatus (index) = makeString(["pool", "status", toString(index)], SEP)
351	351
352	352		let poolAddress = i.caller
353	353		let poolIndex = getIntegerValue(this, kPoolIndexFromAddress(poolAddress))
354	354		[IntegerEntry(kPoolStatus(poolIndex), status)]
355	355		}
356	356
357	357
358	358
359	359		@Callable(i)
360	360		func createWxPool (userPools,asset1Id,asset1Amount,asset2Id,asset2Amount) = if (if (!(shutdown))
361	361		then mustCalculator(i)
362	362		else false)
363	363		then $Tuple2(nil, invoke(Address(userPools), "create", nil, [AttachedPayment(parseAssetId(asset1Id), asset1Amount), AttachedPayment(parseAssetId(asset2Id), asset2Amount)]))
364	364		else throwErr("not allowed")
365	365
366	366
367	367
368	368		@Callable(i)
369	369		func registerAsset (assetStore,assetId,logo,verified) = if (if (!(shutdown))
370	370		then mustCalculator(i)
371	371		else false)
372	372		then $Tuple2(nil, invoke(Address(assetStore), "createOrUpdate", [assetId, logo, verified], nil))
373	373		else throwErr("not allowed")
374	374
375	375
376	376
377	377		@Callable(i)
378	378		func voteForTxId (txId) = {
379	379		let callerAddressString = toBase58String(i.caller.bytes)
380	380		let keyPrefix = keyAllowedTxIdVotePrefix(txId)
381	381		let result = [StringEntry(keyAllowedTxId(), txId)]
382	382		let allowedTxIdOption = getString(this, keyAllowedTxId())
383	383		let err = [if ((size(fromBase58String(txId)) == TXID_BYTES_LENGTH))
384	384		then true
385	385		else throwErr((txId + " is not valid txId")), if (if ((allowedTxIdOption == unit))
386	386		then true
387	387		else (value(allowedTxIdOption) != txId))
388	388		then true
389	389		else throwErr((txId + " is already allowed"))]
390	390		if ((err == err))
391	391		then voteINTERNAL(callerAddressString, keyPrefix, QUORUM, result)
392	392		else throw("Strict value is not equal to itself.")
393	393		}
394	394
395	395
396	396		@Verifier(tx)
397	397		func verify () = {
398	398		let byAdmins = (toBase58String(tx.id) == valueOrElse(getString(this, keyAllowedTxId()), ""))
399	399		let byOwner = if ((size(adminList) >= QUORUM))
400	400		then false
401	401		else sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
402	402		if (byAdmins)
403	403		then true
404	404		else byOwner
405	405		}
406	406

github/deemru/w8io/169f3d6 
61.84 ms ◑