tx · ah6cWxRnUs7YfH9kkmxx1r3rc9MA22Vc3wLwPgsX2Mr

3MsNhK6uve98J6DeqbuwGFBRh9GoHPGUFgp:  -0.02300000 Waves

2023.01.19 15:22 [2411807] smart account 3MsNhK6uve98J6DeqbuwGFBRh9GoHPGUFgp > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "ah6cWxRnUs7YfH9kkmxx1r3rc9MA22Vc3wLwPgsX2Mr",
    "fee": 2300000,
    "feeAssetId": null,
    "timestamp": 1674130944361,
    "version": 1,
    "sender": "3MsNhK6uve98J6DeqbuwGFBRh9GoHPGUFgp",
    "senderPublicKey": "86RHVxKovtU7yKnepY8wKsd8niDxGAsiwuA1XA1DNqrS",
    "proofs": [
        "29FP6ACnuiDYHf9GCERRoFyumm1t5P6HsgiHJYQLpXJz3jRM1vSzVAMzy4VGFZqgjVPazDwr8uCNopYjV2bqBi6K"
    ],
    "script": "base64:BgKPIggCEgMKAQgSAwoBCBIECgIICBIJCgcBERERGAgYEgcKBRERERgIEgcKBQEBAQgIEgASAwoBCBIECgIIARIECgIIARIECgIIARIDCgEIEgYKBAgBCAESBQoDARgYEgMKARgSAwoBCBIAIgZTQ0FMRTgiBU1VTFQ4IgdTQ0FMRTE4IgZNVUxUMTgiA1NFUCIOUE9PTFdFSUdIVE1VTFQiCnplcm9CaWdJbnQiDmlkeFBvb2xBZGRyZXNzIg1pZHhQb29sU3RhdHVzIhBpZHhQb29sTFBBc3NldElkIg1pZHhBbXRBc3NldElkIg9pZHhQcmljZUFzc2V0SWQiDmlkeEFtdEFzc2V0RGNtIhBpZHhQcmljZUFzc2V0RGNtIg5pZHhJQW10QXNzZXRJZCIQaWR4SVByaWNlQXNzZXRJZCINaWR4TFBBc3NldERjbSIPZ2V0U3RyaW5nT3JGYWlsIgNrZXkiGGdldFN0cmluZ0J5QWRkcmVzc09yRmFpbCIHYWRkcmVzcyIMZ2V0SW50T3JaZXJvIgxnZXRJbnRPckZhaWwiCWFzQW55TGlzdCIDdmFsIgckbWF0Y2gwIgp2YWxBbnlMeXN0IgVhc0ludCIGdmFsSW50Ighhc1N0cmluZyIGdmFsU3RyIhFrZXlGYWN0b3J5QWRkcmVzcyITa2V5TWFuYWdlclB1YmxpY0tleSIaa2V5UGVuZGluZ01hbmFnZXJQdWJsaWNLZXkiGElkeEZhY3RvcnlDZmdTdGFraW5nRGFwcCIZSWR4RmFjdG9yeUNmZ0Jvb3N0aW5nRGFwcCIUSWR4RmFjdG9yeUNmZ0lkb0RhcHAiFUlkeEZhY3RvcnlDZmdUZWFtRGFwcCIZSWR4RmFjdG9yeUNmZ0VtaXNzaW9uRGFwcCIVSWR4RmFjdG9yeUNmZ1Jlc3REYXBwIhlJZHhGYWN0b3J5Q2ZnU2xpcHBhZ2VEYXBwIhpJZHhGYWN0b3J5Q2ZnR3d4UmV3YXJkRGFwcCINa2V5RmFjdG9yeUNmZyIaa2V5RmFjdG9yeUxwMkFzc2V0c01hcHBpbmciCmxwQXNzZXRTdHIiEGtleUZhY3RvcnlMcExpc3QiJmtleUZhY3RvcnlMcEFzc2V0VG9Qb29sQ29udHJhY3RBZGRyZXNzIhRrZXlGYWN0b3J5UG9vbFdlaWdodCIPY29udHJhY3RBZGRyZXNzIhhyZWFkRmFjdG9yeUFkZHJlc3NPckZhaWwiCnJlYWRMcExpc3QiFHJlYWRGYWN0b3J5Q2ZnT3JGYWlsIgdmYWN0b3J5IhhnZXRCb29zdGluZ0FkZHJlc3NPckZhaWwiBGZDZmciGGdldEVtaXNzaW9uQWRkcmVzc09yRmFpbCIXZ2V0U3Rha2luZ0FkZHJlc3NPckZhaWwiGWdldEd3eFJld2FyZEFkZHJlc3NPckZhaWwiC2tleUJvb3N0Q2ZnIh9rZXlCb29zdGluZ0xvY2tQYXJhbVRvdGFsQW1vdW50IihrZXlCb29zdGluZ1N0YXRzTG9ja3NEdXJhdGlvblN1bUluQmxvY2tzIhprZXlCb29zdGluZ1N0YXRzTG9ja3NDb3VudCIaa2V5Qm9vc3RpbmdTdGF0c1VzZXJzQ291bnQiEmtleVVzZXIyTnVtTWFwcGluZyILdXNlckFkZHJlc3MiEmtleU51bTJVc2VyTWFwcGluZyIDbnVtIhZrZXlMb2NrUGFyYW1Vc2VyQW1vdW50Igd1c2VyTnVtIhZrZXlMb2NrUGFyYW1TdGFydEJsb2NrIhRrZXlMb2NrUGFyYW1EdXJhdGlvbiINa2V5TG9ja1BhcmFtSyINa2V5TG9ja1BhcmFtQiIVa2V5TG9ja1BhcmFtQnlQZXJpb2RLIgZwZXJpb2QiFWtleUxvY2tQYXJhbUJ5UGVyaW9kQiIga2V5VXNlckJvb3N0RW1pc3Npb25MYXN0SU5URUdSQUwiF2tleVVzZXJNYXhCb29zdElOVEVHUkFMIhhrZXlUb3RhbE1heEJvb3N0SU5URUdSQUwiIWtleVVzZXJCb29zdEF2YWxhaWJsZVRvQ2xhaW1Ub3RhbCITa2V5VXNlckJvb3N0Q2xhaW1lZCIRa2V5VG90YWxDYWNoZWRHd3giD2tleVN0YWtlZEJ5VXNlciIOdXNlckFkZHJlc3NTdHIiDGxwQXNzZXRJZFN0ciIOa2V5U3Rha2VkVG90YWwiEGtleUNsYWltZWRCeVVzZXIiGWtleUNsYWltZWRCeVVzZXJNaW5SZXdhcmQiG2tleUNsYWltZWRCeVVzZXJCb29zdFJld2FyZCIKcmVhZFN0YWtlZCILc3Rha2luZ0RhcHAiHmtleUVtaXNzaW9uUmF0ZVBlckJsb2NrQ3VycmVudCIha2V5RW1pc3Npb25SYXRlUGVyQmxvY2tNYXhDdXJyZW50IhVrZXlFbWlzc2lvblN0YXJ0QmxvY2siG2tleUVtaXNzaW9uRHVyYXRpb25JbkJsb2NrcyITa2V5RW1pc3Npb25FbmRCbG9jayIMa2V5QWRkb25BZGRyIgtmYWN0b3J5RGFwcCIKZmFjdG9yeUNmZyIMZW1pc3Npb25EYXBwIg1nd3hSZXdhcmREYXBwIgxib29zdGluZ0RhcHAiDGdldFBvb2xJbkZlZSILcG9vbEFkZHJlc3MiAUAiDWdldFBvb2xPdXRGZWUiGWludGVybmFsQ3VycmVudFJld2FyZFJhdGUiCWxwQXNzZXRJZCIOcG9vbEFkZHJlc3NTdHIiDnBvb2xXZWlnaHRNdWx0Igpwb29sV2VpZ2h0IhJ3eEVtaXNzaW9uUGVyQmxvY2siFXd4RW1pc3Npb25QZXJCbG9ja01heCINYm9vc3RNYXhDb2VmZiIWcG9vbFd4RW1pc3Npb25QZXJCbG9jayIZcG9vbFd4RW1pc3Npb25QZXJCbG9ja01heCIJbWF4RmFjdG9yIg10b3RhbExwU3Rha2VkIhpjYWxjR3d4QW1vdW50U3RhcnRSRUFET05MWSIKbG9ja0Ftb3VudCIMbG9ja0R1cmF0aW9uIg9tYXhMb2NrRHVyYXRpb24iB2NvZWZmWDgiDmdXeEFtb3VudFN0YXJ0IgZnZXRLZXkiBGFkZHIiBHR5cGUiFm1hbmFnZXJQdWJsaWNLZXlPclVuaXQiAXMiHXBlbmRpbmdNYW5hZ2VyUHVibGljS2V5T3JVbml0IgttdXN0TWFuYWdlciIBaSICcGQiAnBrIg5mYWN0b3J5QWRkcmVzcyILY2hlY2tDYWxsZXIiCnJld2FyZERhdGEiDmxwU3Rha2VkQnlVc2VyIg11c2VyQ2xhaW1JbmZvIg1taW5SZXdhcmRQYXJ0Ig9ib29zdFJld2FyZFBhcnQiBWRlYnVnIg1ib29zdGluZ1Bvd2VyIgtjdXJyZW50SXRlciIRZGVsdGFXeEFtb3VudEJ1bGsiG2RlbHRhTG9ja1BlcmlvZEluQmxvY2tzQnVsayIRZGVsdGFMcEFtb3VudEJ1bGsiEGxwQXNzZXRJZE9wdEJ1bGsiDnVzZXJBZGRyZXNzT3B0IgZyZXNBY2MiDWRlbHRhV3hBbW91bnQiF2RlbHRhTG9ja1BlcmlvZEluQmxvY2tzIg1kZWx0YUxwQW1vdW50IgxscEFzc2V0SWRPcHQiBGluZm8iA3JlcyIDaW52IghtYXRoRGFwcCIIRU1QVFlTVFIiF21heExvY2tEdXJhdGlvbkluQmxvY2tzIgp1c2VyTnVtU3RyIgp1c2VyQW1vdW50Iglsb2NrU3RhcnQiB2xvY2tFbmQiEXJlbWFpbmluZ0R1cmF0aW9uIg11c2VyQW1vdW50TmV3Ig9sb2NrRHVyYXRpb25OZXciEXVzZXJDdXJyZ1d4QW1vdW50IhFnV3hBbW91bnRTdGFydE5ldyITZ1d4UGFyYW1zUmVzdWx0TGlzdCINZ1d4QW1vdW50RGlmZiIBayIBYiIYdG90YWxNYXhCb29zdEludGVncmFsS0VZIhJ1c2VyTWF4Qm9vc3RJbnROZXciEHRvdGFsTWF4Qm9vc3RJbnQiDnRvdGFsQ2FjaGVkR3d4IgVNVUxUMyIUd3hFbWlzc2lvblBlckJsb2NrWDMiD3N0YWtlZEJ5VXNlcktFWSIOc3Rha2VkVG90YWxLRVkiDHN0YWtlZEJ5VXNlciILc3Rha2VkVG90YWwiD3N0YWtlZEJ5VXNlck5ldyIOc3Rha2VkVG90YWxOZXciGHBvb2xXeEVtaXNzaW9uUGVyQmxvY2tYMyIJd3hQZXJMcFgzIhB1c2VyV3hQZXJCbG9ja1gzIhdib29zdEVtaXNzaW9uUGVyQmxvY2tYMyIWdG1wVXNlckJvb3N0UGVyQmxvY2tYMyITdXNlckJvb3N0UGVyQmxvY2tYMyIKYm9vc3RDb2VmZiIHT05FTVVMVCIDT05FIhJlbWlzc2lvblN0YXJ0QmxvY2siDHBhc3NlZEJsb2NrcyIOdGVhbUVtRHVyYXRpb24iCXRlYW1FbU1heCIGdGVhbUVtIg90b3RhbFd4UmVsZWFzZWQiDXRvdGFsV3hMb2NrZWQiGGxvY2tzRHVyYXRpb25TdW1JbkJsb2NrcyIKbG9ja3NDb3VudCIHbHBBc3NldCIGc3RhdHVzIgN0cGwiA2NmZyIKYW10QXNzZXRJZCIMcHJpY2VBc3NldElkIgtpQW10QXNzZXRJZCINaVByaWNlQXNzZXRJZCILYW10QXNzZXREY20iDXByaWNlQXNzZXREY20iDXBvb2xMUEJhbGFuY2UiEmFjY0FtdEFzc2V0QmFsYW5jZSIUYWNjUHJpY2VBc3NldEJhbGFuY2UiCnByaWNlc0xpc3QiCGN1clByaWNlIg9scEFtdEFzc2V0U2hhcmUiEWxwUHJpY2VBc3NldFNoYXJlIgVpbkZlZSIGb3V0RmVlIh5wb29sT25lVG9rZW5PcGVyYXRpb25zRGlzYWJsZWQiHXBvb2xPbmVUb2tlbk9wZXJhdGlvbnNFbmFibGVkIgxpbkFtQXNzZXRBbXQiDGFtQXNzZXRJZFN0ciIJYW1Bc3NldElkIgxwckFzc2V0SWRTdHIiCXByQXNzZXRJZCIKcG9vbFN0YXR1cyIOYW10QXNzZXRBbXRYMTgiEHByaWNlQXNzZXRBbXRYMTgiC2N1clByaWNlWDE4Ig9pbkFtQXNzZXRBbXRYMTgiD2luUHJBc3NldEFtdFgxOCIMaW5QckFzc2V0QW10Ig0kdDAyMzM2NDIzNzE3IgljYWxjTHBBbXQiDGN1clByaWNlQ2FsYyIJYW1CYWxhbmNlIglwckJhbGFuY2UiCmxwRW1pc3Npb24iDGFtQmFsYW5jZVJhdyIMcHJCYWxhbmNlUmF3Ig9hbUJhbGFuY2VSYXdYMTgiD3ByQmFsYW5jZVJhd1gxOCINJHQwMjYyOTAyNjY0MyIQcGF5bWVudExwQXNzZXRJZCIMcGF5bWVudExwQW10Ig0kdDAyNzMzODI3NzU1IghvdXRBbUFtdCIIb3V0UHJBbXQiD2d3eFVzZXJJbmZvTElTVCIJZ3d4QW1vdW50Ig11bnN0YWtlQW1vdW50IgpvdXRBc3NldElkIgxtaW5PdXRBbW91bnQiBGtleXMiF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5IhVjaGVja01hbmFnZXJQdWJsaWNLZXkiAnBtIgVoYXNQTSIHY2hlY2tQTSICdHgiBnZlcmlmeSIPdGFyZ2V0UHVibGljS2V5XQABYQAIAAFiAIDC1y8AAWMAEgABZAkAtgIBAICAkLu61q3wDQABZQICX18AAWYFAWIAAWcJALYCAQAAAAFoAAEAAWkAAgABagADAAFrAAQAAWwABQABbQAGAAFuAAcAAW8ACAABcAAJAAFxAAoBAXIBAXMJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBBQFzCQCsAgIJAKwCAgIPbWFuZGF0b3J5IHRoaXMuBQFzAg8gaXMgbm90IGRlZmluZWQBAXQCAXUBcwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFAXUFAXMJAKwCAgkArAICCQCsAgIJAKwCAgIKbWFuZGF0b3J5IAkApQgBBQF1AgEuBQFzAg8gaXMgbm90IGRlZmluZWQBAXYCAXUBcwkBC3ZhbHVlT3JFbHNlAgkAmggCBQF1BQFzAAABAXcCAXUBcwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFAXUFAXMJAKwCAgkArAICAg9tYW5kYXRvcnkgdGhpcy4FAXMCDyBpcyBub3QgZGVmaW5lZAEBeAEBeQQBegUBeQMJAAECBQF6AglMaXN0W0FueV0EAUEFAXoFAUEJAAIBAhtmYWlsIHRvIGNhc3QgaW50byBMaXN0W0FueV0BAUIBAXkEAXoFAXkDCQABAgUBegIDSW50BAFDBQF6BQFDCQACAQIVZmFpbCB0byBjYXN0IGludG8gSW50AQFEAQF5BAF6BQF5AwkAAQIFAXoCBlN0cmluZwQBRQUBegUBRQkAAgECGGZhaWwgdG8gY2FzdCBpbnRvIFN0cmluZwEBRgACHCVzJXNfX2NvbmZpZ19fZmFjdG9yeUFkZHJlc3MBAUcAAhQlc19fbWFuYWdlclB1YmxpY0tleQEBSAACGyVzX19wZW5kaW5nTWFuYWdlclB1YmxpY0tleQABSQABAAFKAAIAAUsAAwABTAAEAAFNAAUAAU4ABgABTwAHAAFQAAgBAVEAAhElc19fZmFjdG9yeUNvbmZpZwEBUgEBUwkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQFTCQDMCAICHm1hcHBpbmdzX19scEFzc2V0MlBvb2xDb250cmFjdAUDbmlsBQFlAQFUAAIQJXNfX2xwVG9rZW5zTGlzdAEBVQEBUwkAuQkCCQDMCAICBiVzJXMlcwkAzAgCBQFTCQDMCAICHm1hcHBpbmdzX19scEFzc2V0MlBvb2xDb250cmFjdAUDbmlsBQFlAQFWAQFXCQC5CQIJAMwIAgIEJXMlcwkAzAgCAgpwb29sV2VpZ2h0CQDMCAIFAVcFA25pbAUBZQEBWAAJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQFyAQkBAUYAAQFZAAkAtQkCCQELdmFsdWVPckVsc2UCCQCdCAIJAQFYAAkBAVQAAgAFAWUBAVoBAmFhCQC1CQIJAQF0AgUCYWEJAQFRAAUBZQECYWIBAmFjCQERQGV4dHJOYXRpdmUoMTA2MikBCQCRAwIFAmFjBQFKAQJhZAECYWMJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUCYWMFAU0BAmFlAQJhYwkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQJhYwUBSQECYWYBAmFjCQERQGV4dHJOYXRpdmUoMTA2MikBCQCRAwIFAmFjBQFQAQJhZwACCiVzX19jb25maWcBAmFoAAIeJXMlc19fc3RhdHNfX2FjdGl2ZVRvdGFsTG9ja2VkAQJhaQACJSVzJXNfX3N0YXRzX19sb2Nrc0R1cmF0aW9uU3VtSW5CbG9ja3MBAmFqAAIXJXMlc19fc3RhdHNfX2xvY2tzQ291bnQBAmFrAAIdJXMlc19fc3RhdHNfX2FjdGl2ZVVzZXJzQ291bnQBAmFsAQJhbQkAuQkCCQDMCAICGSVzJXMlc19fbWFwcGluZ19fdXNlcjJudW0JAMwIAgUCYW0FA25pbAUBZQECYW4BAmFvCQC5CQIJAMwIAgIZJXMlcyVzX19tYXBwaW5nX19udW0ydXNlcgkAzAgCBQJhbwUDbmlsBQFlAQJhcAECYXEJALkJAgkAzAgCAhYlcyVkJXNfX3BhcmFtQnlVc2VyTnVtCQDMCAIFAmFxCQDMCAICBmFtb3VudAUDbmlsBQFlAQJhcgECYXEJALkJAgkAzAgCAhYlcyVkJXNfX3BhcmFtQnlVc2VyTnVtCQDMCAIFAmFxCQDMCAICBXN0YXJ0BQNuaWwFAWUBAmFzAQJhcQkAuQkCCQDMCAICFiVzJWQlc19fcGFyYW1CeVVzZXJOdW0JAMwIAgUCYXEJAMwIAgIIZHVyYXRpb24FA25pbAUBZQECYXQBAmFxCQC5CQIJAMwIAgIWJXMlZCVzX19wYXJhbUJ5VXNlck51bQkAzAgCBQJhcQkAzAgCAgFrBQNuaWwFAWUBAmF1AQJhcQkAuQkCCQDMCAICFiVzJWQlc19fcGFyYW1CeVVzZXJOdW0JAMwIAgUCYXEJAMwIAgIBYgUDbmlsBQFlAQJhdgICYXECYXcJALkJAgkAzAgCAhclcyVkJXMlZF9fcGFyYW1CeVBlcmlvZAkAzAgCBQJhcQkAzAgCAgFrCQDMCAIFAmF3BQNuaWwFAWUBAmF4AgJhcQJhdwkAuQkCCQDMCAICFyVzJWQlcyVkX19wYXJhbUJ5UGVyaW9kCQDMCAIFAmFxCQDMCAICAWIJAMwIAgUCYXcFA25pbAUBZQECYXkBAmFxCQC5CQIJAMwIAgIeJXMlZF9fdXNlckJvb3N0RW1pc3Npb25MYXN0SW50CQDMCAIFAmFxBQNuaWwFAWUBAmF6AQJhcQkAuQkCCQDMCAICESVzJWRfX21heEJvb3N0SW50CQDMCAIFAmFxBQNuaWwFAWUBAmFBAAIYJXMlc19fbWF4Qm9vc3RJbnRfX3RvdGFsAQJhQgECYXEJALkJAgkAzAgCAiQlcyVkX191c2VyQm9vc3RBdmFsaWFibGVUb0NsYWltVG90YWwJAMwIAgUCYXEFA25pbAUBZQECYUMBAmFxCQC5CQIJAMwIAgIWJXMlZF9fdXNlckJvb3N0Q2xhaW1lZAkAzAgCBQJhcQUDbmlsBQFlAQJhRAACFiVzJXNfX2d3eENhY2hlZF9fdG90YWwBAmFFAgJhRgJhRwkAuQkCCQDMCAICDiVzJXMlc19fc3Rha2VkCQDMCAIFAmFGCQDMCAIFAmFHBQNuaWwFAWUBAmFIAQJhRwkArAICAhclcyVzJXNfX3N0YWtlZF9fdG90YWxfXwUCYUcBAmFJAgJhRwJhRgkAuQkCCQDMCAICDyVzJXMlc19fY2xhaW1lZAkAzAgCBQJhRgkAzAgCBQJhRwUDbmlsBQFlAQJhSgICYUcCYUYJALkJAgkAzAgCAhglcyVzJXNfX2NsYWltZWRNaW5SZXdhcmQJAMwIAgUCYUYJAMwIAgUCYUcFA25pbAUBZQECYUsCAmFHAmFGCQC5CQIJAMwIAgIaJXMlcyVzX19jbGFpbWVkQm9vc3RSZXdhcmQJAMwIAgUCYUYJAMwIAgUCYUcFA25pbAUBZQECYUwCAmFNAXMJAQt2YWx1ZU9yRWxzZQIJAJoIAgUCYU0FAXMAAAECYU4AAhslcyVzX19yYXRlUGVyQmxvY2tfX2N1cnJlbnQBAmFPAAIeJXMlc19fcmF0ZVBlckJsb2NrTWF4X19jdXJyZW50AQJhUAACGiVzJXNfX2VtaXNzaW9uX19zdGFydEJsb2NrAQJhUQACGCVzJXNfX2VtaXNzaW9uX19kdXJhdGlvbgECYVIAAhglcyVzX19lbWlzc2lvbl9fZW5kQmxvY2sBAmFTAAINJXNfX2FkZG9uQWRkcgACYVQJAQFYAAACYVUJAQFaAQUCYVQAAmFWCQECYWQBBQJhVQACYU0JAQJhZQEFAmFVAAJhVwkBAmFmAQUCYVUAAmFYCQECYWIBBQJhVQECYVkBAmFaCgACYmEJAPwHBAUCYVQCEGdldEluRmVlUkVBRE9OTFkJAMwIAgkApQgBBQJhWgUDbmlsBQNuaWwDCQABAgUCYmECA0ludAUCYmEJAAIBCQCsAgIJAAMBBQJiYQIYIGNvdWxkbid0IGJlIGNhc3QgdG8gSW50AQJiYgECYVoKAAJiYQkA/AcEBQJhVAIRZ2V0T3V0RmVlUkVBRE9OTFkJAMwIAgkApQgBBQJhWgUDbmlsBQNuaWwDCQABAgUCYmECA0ludAUCYmEJAAIBCQCsAgIJAAMBBQJiYQIYIGNvdWxkbid0IGJlIGNhc3QgdG8gSW50AQJiYwECYmQEAmJlCQEBdAIFAmFUCQEBVQEFAmJkBAJiZgUBYgQCYmcJARFAZXh0ck5hdGl2ZSgxMDUwKQIFAmFUCQEBVgEFAmJlBAJiaAkBAXcCBQJhVgkBAmFOAAQCYmkJAQF3AgUCYVYJAQJhTwAEAmJqAAMEAmJrCQBpAgkAawMFAmJoBQJiZwUCYmYFAmJqBAJibAkAawMFAmJpBQJiZwUCYmYEAmJtCQBoAgUCYmoFAWIEAmJuCQEBdgIFAmFNCQECYUgBBQJiZAkAzAgCBQJiawkAzAgCBQJibQkAzAgCBQJibgUDbmlsAQJibwMCYnACYnECYnIEAmJzCQBrAwUCYnEFAWIFAmJyBAJidAkAawMFAmJwBQJicwUBYgkAzAgCBQJidAUDbmlsAQJidQMCYnYBcwJidwMJAAACBQJidwIGc3RyaW5nCQERQGV4dHJOYXRpdmUoMTA1MykCBQJidgUBcwMJAAACBQJidwIHaW50ZWdlcgkApAMBCQERQGV4dHJOYXRpdmUoMTA1MCkCBQJidgUBcwMJAAACBQJidwIHYm9vbGVhbgkApQMBCQERQGV4dHJOYXRpdmUoMTA1MSkCBQJidgUBcwkAAgECLXVua25vd24gdHlwZS4gZXhwZWN0ZWQgc3RyaW5nL2ludGVnZXIvYm9vbGVhbgECYngABAF6CQCiCAEJAQFHAAMJAAECBQF6AgZTdHJpbmcEAmJ5BQF6CQDZBAEFAmJ5AwkAAQIFAXoCBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgECYnoABAF6CQCiCAEJAQFIAAMJAAECBQF6AgZTdHJpbmcEAmJ5BQF6CQDZBAEFAmJ5AwkAAQIFAXoCBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgECYkEBAmJCBAJiQwkAAgECEVBlcm1pc3Npb24gZGVuaWVkBAF6CQECYngAAwkAAQIFAXoCCkJ5dGVWZWN0b3IEAmJEBQF6AwkAAAIIBQJiQg9jYWxsZXJQdWJsaWNLZXkFAmJEBgUCYkMDCQABAgUBegIEVW5pdAMJAAACCAUCYkIGY2FsbGVyBQR0aGlzBgUCYkMJAAIBAgtNYXRjaCBlcnJvchECYkIBC2NvbnN0cnVjdG9yAQJiRQQCYkYJAQJiQQEFAmJCAwkAAAIFAmJGBQJiRgkAzAgCCQELU3RyaW5nRW50cnkCCQEBRgAFAmJFBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CYkIBGWN1cnJlbnRSZXdhcmRSYXRlUkVBRE9OTFkBAmJkBAJiRwkBAmJjAQUCYmQEAmJoCQCRAwIFAmJHAAAEAmJtCQCRAwIFAmJHAAEEAmJuCQCRAwIFAmJHAAIJAJQKAgUDbmlsCQC5CQIJAMwIAgIGJWQlZCVkCQDMCAIJAKQDAQUCYmgJAMwIAgkApAMBBQJibQkAzAgCCQCkAwEFAmJuBQNuaWwFAWUCYkIBHWN1cnJlbnRVc2VyUmV3YXJkUmF0ZVJFQURPTkxZAgJiZAJhbQQCYkcJAQJiYwEFAmJkBAJiaAkAkQMCBQJiRwAABAJibQkAkQMCBQJiRwABBAJibgkAkQMCBQJiRwACBAJiSAkBAXYCBQJhTQkBAmFFAgUCYW0FAmJkBAJiSQkAtQkCCQEBRAEJAPwHBAUCYU0CD2NsYWltV3hSRUFET05MWQkAzAgCBQJiZAkAzAgCBQJhbQUDbmlsBQNuaWwFAWUEAmJKCQETdmFsdWVPckVycm9yTWVzc2FnZQIJALYJAQkAkQMCBQJiSQAFAhxjb3VsZG4ndCBwYXJzZSBtaW5SZXdhcmRQYXJ0BAJiSwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQC2CQEJAJEDAgUCYkkABgIeY291bGRuJ3QgcGFyc2UgYm9vc3RSZXdhcmRQYXJ0BAJiTAkAkQMCBQJiSQAHBAJiTQMJAAACBQJiSwAACQBoAgABBQFiCQBrAwkAZAIFAmJKBQJiSwUBYgUCYkoJAJQKAgUDbmlsCQC5CQIJAMwIAgIMJWQlZCVkJWQlZCVzCQDMCAIJAKQDAQUCYmgJAMwIAgkApAMBBQJibQkAzAgCCQCkAwEFAmJuCQDMCAIJAKQDAQUCYkgJAMwIAgkApAMBBQJiTQkAzAgCBQJiTAUDbmlsBQFlAmJCAR1jYWxjQm9vc3RCdWxrSW50ZXJuYWxSRUFET05MWQcCYk4CYk8CYlACYlECYlICYlMCYlQDCQAAAgUCYk4JAJADAQUCYk8JAJQKAgUDbmlsBQJiVAQCYlUJAJEDAgUCYk8FAmJOBAJiVgkAkQMCBQJiUAUCYk4EAmJXCQCRAwIFAmJRBQJiTgQCYlgJAJEDAgUCYlIFAmJOBAJiWQoAAmJhCQD8BwQFBHRoaXMCEWNhbGNCb29zdFJFQURPTkxZCQDMCAIFAmJVCQDMCAIFAmJWCQDMCAIFAmJXCQDMCAIFAmJYCQDMCAIFAmJTBQNuaWwFA25pbAMJAAECBQJiYQIGU3RyaW5nBQJiYQkAAgEJAKwCAgkAAwEFAmJhAhsgY291bGRuJ3QgYmUgY2FzdCB0byBTdHJpbmcEAmJaCQDNCAIFAmJUBQJiWQQCY2EKAAJiYQkA/AcEBQR0aGlzAh1jYWxjQm9vc3RCdWxrSW50ZXJuYWxSRUFET05MWQkAzAgCCQBkAgUCYk4AAQkAzAgCBQJiTwkAzAgCBQJiUAkAzAgCBQJiUQkAzAgCBQJiUgkAzAgCBQJiUwkAzAgCBQJiWgUDbmlsBQNuaWwDCQABAgUCYmECCUxpc3RbQW55XQUCYmEJAAIBCQCsAgIJAAMBBQJiYQIeIGNvdWxkbid0IGJlIGNhc3QgdG8gTGlzdFtBbnldAwkAAAIFAmNhBQJjYQkAlAoCBQNuaWwFAmNhCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmJCARVjYWxjQm9vc3RCdWxrUkVBRE9OTFkFAmJVAmJWAmJXAmJYAmJTBAJiWgkA/AcEBQR0aGlzAh1jYWxjQm9vc3RCdWxrSW50ZXJuYWxSRUFET05MWQkAzAgCAAAJAMwIAgUCYlUJAMwIAgUCYlYJAMwIAgUCYlcJAMwIAgUCYlgJAMwIAgUCYlMJAMwIAgUDbmlsBQNuaWwFA25pbAkAlAoCBQNuaWwFAmJaAmJCARFjYWxjQm9vc3RSRUFET05MWQUCYlUCYlYCYlcCYlgCYlMEAmNiBQJhVwQCY2MCBWVtcHR5BAJjZAkBDXBhcnNlSW50VmFsdWUBCQCRAwIJALUJAgkBAXQCBQJhWAkBAmFnAAUBZQAEBAJhRwMJAAACBQJiWAIABQJjYwUCYlgEAmFGAwkAAAIFAmJTAgAFAmNjBQJiUwQCY2UJAQt2YWx1ZU9yRWxzZQIJAJ0IAgUCYVgJAQJhbAEFAmJTBQJjYwQCY2YJAQt2YWx1ZU9yRWxzZQIJAJoIAgUCYVgJAQJhcAEFAmNlAAAEAmNnCQELdmFsdWVPckVsc2UCCQCaCAIFAmFYCQECYXIBBQJjZQUGaGVpZ2h0BAJicQkBC3ZhbHVlT3JFbHNlAgkAmggCBQJhWAkBAmFzAQUCY2UAAAQCY2gJAGQCBQJjZwUCYnEEAmNpCQCWAwEJAMwIAgkAZQIFAmNoBQZoZWlnaHQJAMwIAgAABQNuaWwEAmNqCQBkAgUCY2YFAmJVBAJjawkAlwMBCQDMCAIJAGQCBQJjaQUCYlYJAMwIAgUCY2QFA25pbAQCY2wJAQFCAQkAkQMCCQEBeAEJAPwHBAUCYVgCE2d3eFVzZXJJbmZvUkVBRE9OTFkJAMwIAgUCYUYFA25pbAUDbmlsAAAEAmNtCQCRAwIJAQJibwMFAmNqBQJjawUCY2QAAAQCY24JAQF4AQkA/AcEBQJjYgIVY2FsY0d3eFBhcmFtc1JFQURPTkxZCQDMCAIFAmNtCQDMCAIFBmhlaWdodAkAzAgCBQJjawUDbmlsBQNuaWwEAmNvCQBlAgUCY20FAmNsBAJjcAkBAUIBCQCRAwIFAmNuAAAEAmNxCQEBQgEJAJEDAgUCY24AAQQCYXcJAKQDAQkBAUIBCQCRAwIFAmNuAAIEAmNyCQECYUEABAJjcwkAaQIJAGgCBQJjbQUCY2sAAgQCY3QJAQF2AgUCYVgFAmNyBAJjdQoAAmJhCQD8BwQFAmFYAhlnZXRUb3RhbENhY2hlZEd3eFJFQURPTkxZBQNuaWwFA25pbAMJAAECBQJiYQIDSW50BQJiYQkAAgEJAKwCAgkAAwEFAmJhAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQEAmN2AOgHBAJjdwkAaAIJAQF3AgUCYVYJAQJhTgAFAmN2BAJjeAkBAmFFAgUCYUYFAmFHBAJjeQkBAmFIAQUCYUcEAmN6CQECYUwCBQJhTQUCY3gEAmNBCQECYUwCBQJhTQUCY3kEAmNCCQBkAgUCY3oFAmJXBAJjQwkAZAIFAmNBBQJiVwQCYmcDCQECIT0CBQJhRwUCY2MEAmJlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUCYVQJAQFSAQUCYUcJAKwCAgIVdW5zdXBwb3J0ZWQgbHAgYXNzZXQgBQJhRwkBEUBleHRyTmF0aXZlKDEwNTApAgUCYVQJAQFWAQUCYmUAAAQCY0QJAGsDBQJjdwUCYmcJAGgCBQFmAAMEAmNFAwkBAiE9AgUCY0MAAAkAawMFAmNEBQFiBQJjQwAABAJjRgkAawMFAmNFBQJjQgUBYgQCY0cJAGgCBQJjRAACBAJjSAkAawMFAmNtBQJjRwkAZAIFAmN1BQJjbwQCY0kJAJcDAQkAzAgCBQJjSAkAzAgCCQBoAgUCY0YAAgUDbmlsBAJjSgMJAAACBQJjRgAACQBoAgABBQFiCQBrAwkAZAIFAmNJBQJjRgUBYgUCY0YJAJQKAgUDbmlsCQC5CQIJAMwIAgIGJWQlZCVzCQDMCAIJAKQDAQUCY20JAMwIAgkApAMBBQJjSgkAzAgCAgFkBQNuaWwFAWUCYkIBF3d4RW1pc3Npb25TdGF0c1JFQURPTkxZAAQCY0sJAKQDAQUBYgQCY0wCATEEAmJoCQEBdwIFAmFWCQECYU4ABAJjTQkBAXcCBQJhVgkBAmFQAAQCY04DCQBmAgUCY00FBmhlaWdodAAACQBlAgUGaGVpZ2h0BQJjTQQCY08JAGgCAKALAO0CBAJjUAkAaAIAwIjsXwUBYgQCY1EDCQBmAgUCY04FAmNPBQJjUAkAawMFAmNQBQJjTgUCY08EAmNSCQBkAgkAaAIFAmJoBQJjTgUCY1EEAmNTCQEBdgIFAmFYCQECYWgABAJjVAkBAXYCBQJhWAkBAmFpAAQCY1UJAQF2AgUCYVgJAQJhagAJAJQKAgUDbmlsCQC5CQIJAMwIAgIIJWQlZCVkJWQJAMwIAgkApAMBBQJjUgkAzAgCCQCkAwEFAmNTCQDMCAIJAKQDAQUCY1QJAMwIAgkApAMBBQJjVQUDbmlsBQFlAmJCARFwb29sU3RhdHNSRUFET05MWQECY1YEAmFaCQERQGV4dHJOYXRpdmUoMTA2MikBCQEBdAIFAmFUCQEBVQEFAmNWBAJjVwoAAmJhCQD8BwQFAmFUAhVnZXRQb29sU3RhdHVzUkVBRE9OTFkJAMwIAgkApQgBBQJhWgUDbmlsBQNuaWwDCQABAgUCYmECA0ludAUCYmEJAAIBCQCsAgIJAAMBBQJiYQIYIGNvdWxkbid0IGJlIGNhc3QgdG8gSW50BAJjWAIUJWQlZCVkJWQlZCVkJWQlZCVkJXMDCQAAAgUCY1cABAkAlAoCBQNuaWwJALkJAgkAzAgCBQJjWAkAzAgCCQCkAwEAAAkAzAgCCQCkAwEAAAkAzAgCCQCkAwEAAAkAzAgCCQCkAwEAAAkAzAgCCQCkAwEAAAkAzAgCCQCkAwEAAAkAzAgCCQCkAwEAAAkAzAgCCQCkAwEAAAkAzAgCCQCkAwEAAAkAzAgCCQClAwEHBQNuaWwFAWUEAmNZCQEBeAEJAPwHBAUCYVoCHGdldFBvb2xDb25maWdXcmFwcGVyUkVBRE9OTFkFA25pbAUDbmlsBAJiZAkA2QQBCQEBRAEJAJEDAgUCY1kFAWoEAmNaCQEBRAEJAJEDAgUCY1kFAWsEAmRhCQEBRAEJAJEDAgUCY1kFAWwEAmRiCQEBRAEJAJEDAgUCY1kFAW8EAmRjCQEBRAEJAJEDAgUCY1kFAXAEAmRkCQENcGFyc2VJbnRWYWx1ZQEJAQFEAQkAkQMCBQJjWQUBbQQCZGUJAQ1wYXJzZUludFZhbHVlAQkBAUQBCQCRAwIFAmNZBQFuBAJkZggJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQJiZAkArAICCQCsAgICBkFzc2V0IAkA2AQBBQJiZAIOIGRvZXNuJ3QgZXhpc3QIcXVhbnRpdHkEAmRnCQEBQgEJAPwHBAUCYVoCHGdldEFjY0JhbGFuY2VXcmFwcGVyUkVBRE9OTFkJAMwIAgUCY1oFA25pbAUDbmlsBAJkaAkBAUIBCQD8BwQFAmFaAhxnZXRBY2NCYWxhbmNlV3JhcHBlclJFQURPTkxZCQDMCAIFAmRhBQNuaWwFA25pbAQCZGkDCQAAAgUCZGYAAAkAzAgCCQCmAwEFAWcJAMwIAgkApgMBBQFnCQDMCAIJAKYDAQUBZwUDbmlsCQEBeAEJAPwHBAUCYVoCGWNhbGNQcmljZXNXcmFwcGVyUkVBRE9OTFkJAMwIAgUCZGcJAMwIAgUCZGgJAMwIAgUCZGYFA25pbAUDbmlsBAJkagAABAJkawkBAUIBCQD8BwQFAmFaAhZmcm9tWDE4V3JhcHBlclJFQURPTkxZCQDMCAIJAJEDAgUCZGkAAQkAzAgCBQFiBQNuaWwFA25pbAQCZGwJAQFCAQkA/AcEBQJhWgIWZnJvbVgxOFdyYXBwZXJSRUFET05MWQkAzAgCCQCRAwIFAmRpAAIJAMwIAgUBYgUDbmlsBQNuaWwEAmJnCQERQGV4dHJOYXRpdmUoMTA1MCkCBQJhVAkBAVYBCQClCAEFAmFaBAJkbQkBAmFZAQUCYVoEAmRuCQECYmIBBQJhWgQCZG8KAAJiYQkA/AcEBQJhVAIoaXNQb29sT25lVG9rZW5PcGVyYXRpb25zRGlzYWJsZWRSRUFET05MWQkAzAgCCQClCAEFAmFaBQNuaWwFA25pbAMJAAECBQJiYQIHQm9vbGVhbgUCYmEJAAIBCQCsAgIJAAMBBQJiYQIcIGNvdWxkbid0IGJlIGNhc3QgdG8gQm9vbGVhbgQCZHAJAQEhAQUCZG8JAJQKAgUDbmlsCQC5CQIJAMwIAgUCY1gJAMwIAgkApAMBBQJkZwkAzAgCCQCkAwEFAmRoCQDMCAIJAKQDAQUCZGYJAMwIAgkApAMBBQJkagkAzAgCCQCkAwEFAmRrCQDMCAIJAKQDAQUCZGwJAMwIAgkApAMBBQJiZwkAzAgCCQCkAwEFAmRtCQDMCAIJAKQDAQUCZG4JAMwIAgkApQMBBQJkcAUDbmlsBQFlAmJCASRwb29sRXZhbHVhdGVQdXRCeUFtb3VudEFzc2V0UkVBRE9OTFkCAmNWAmRxBAJhWgkBEUBleHRyTmF0aXZlKDEwNjIpAQkBAXQCBQJhVAkBAVUBBQJjVgQCY1kJAQF4AQkA/AcEBQJhWgIcZ2V0UG9vbENvbmZpZ1dyYXBwZXJSRUFET05MWQUDbmlsBQNuaWwEAmJkCQDZBAEJAQFEAQkAkQMCBQJjWQUBagQCZHIJAQFEAQkAkQMCBQJjWQUBawQCZHMJANkEAQUCZHIEAmR0CQEBRAEJAJEDAgUCY1kFAWwEAmR1CQDZBAEFAmR0BAJkZAkBDXBhcnNlSW50VmFsdWUBCQEBRAEJAJEDAgUCY1kFAW0EAmRlCQENcGFyc2VJbnRWYWx1ZQEJAQFEAQkAkQMCBQJjWQUBbgQCZHYJAQFEAQkAkQMCBQJjWQUBaQQCZGYICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUCYmQJAKwCAgkArAICAgZBc3NldCAJANgEAQUCYmQCDiBkb2Vzbid0IGV4aXN0CHF1YW50aXR5BAJkZwkBAUIBCQD8BwQFAmFaAhxnZXRBY2NCYWxhbmNlV3JhcHBlclJFQURPTkxZCQDMCAIFAmRyBQNuaWwFA25pbAQCZGgJAQFCAQkA/AcEBQJhWgIcZ2V0QWNjQmFsYW5jZVdyYXBwZXJSRUFET05MWQkAzAgCBQJkdAUDbmlsBQNuaWwEAmR3CQCnAwEJAQFEAQkA/AcEBQJhWgIUdG9YMThXcmFwcGVyUkVBRE9OTFkJAMwIAgUCZGcJAMwIAgUCZGQFA25pbAUDbmlsBAJkeAkApwMBCQEBRAEJAPwHBAUCYVoCFHRvWDE4V3JhcHBlclJFQURPTkxZCQDMCAIFAmRoCQDMCAIFAmRlBQNuaWwFA25pbAQCZHkDCQAAAgUCZGYAAAUBZwkApwMBCQEBRAEJAPwHBAUCYVoCHmNhbGNQcmljZUJpZ0ludFdyYXBwZXJSRUFET05MWQkAzAgCCQCmAwEFAmR4CQDMCAIJAKYDAQUCZHcFA25pbAUDbmlsBAJkagkBAUIBCQD8BwQFAmFaAhZmcm9tWDE4V3JhcHBlclJFQURPTkxZCQDMCAIJAKYDAQUCZHkJAMwIAgUBYgUDbmlsBQNuaWwEAmR6CQCnAwEJAQFEAQkA/AcEBQJhWgIUdG9YMThXcmFwcGVyUkVBRE9OTFkJAMwIAgUCZHEJAMwIAgUCZGQFA25pbAUDbmlsBAJkQQkAvAIDBQJkegUCZHkFAWQEAmRCCQEBQgEJAPwHBAUCYVoCFmZyb21YMThXcmFwcGVyUkVBRE9OTFkJAMwIAgkApgMBBQJkQQkAzAgCBQJkZQUDbmlsBQNuaWwEAmJaCQD8BwQFAmFaAiNlc3RpbWF0ZVB1dE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQkAzAgCAgAJAMwIAgCgwh4JAMwIAgUCZHEJAMwIAgUCZHMJAMwIAgUCZEIJAMwIAgUCZHUJAMwIAgIACQDMCAIGCQDMCAIHBQNuaWwFA25pbAQCZEMEAXoFAmJaAwMDCQABAggFAXoCXzECA0ludAMJAAECCAUBegJfMwIDSW50AwkAAQIIBQF6Al80AgNJbnQDCQABAggFAXoCXzUCA0ludAkAAQIIBQF6Al82AgNJbnQHBwcHCQAAAgkAxgoBBQF6AA0HBAJkRAgFAXoCXzEEAmRFCAUBegJfMwQCZEYIBQF6Al80BAJkRwgFAXoCXzUEAmRICAUBegJfNgkAlwoFBQJkRAUCZEUFAmRGBQJkRwUCZEgJAAIBAhNDb3VsZG4ndCBjYXN0IHR5cGVzBAJkRAgFAmRDAl8xBAJkRQgFAmRDAl8yBAJkRggFAmRDAl8zBAJkRwgFAmRDAl80BAJkSAgFAmRDAl81CQCUCgIFA25pbAkAuQkCCQDMCAICECVkJWQlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQJkRAkAzAgCCQCkAwEFAmRqCQDMCAIJAKQDAQUCZEYJAMwIAgkApAMBBQJkRwkAzAgCCQCkAwEFAmRICQDMCAIFAmR2CQDMCAIJAKQDAQUCZHEJAMwIAgkApAMBBQJkQgUDbmlsBQFlAmJCASNwb29sRXZhbHVhdGVQdXRCeVByaWNlQXNzZXRSRUFET05MWQICY1YCZEIEAmFaCQERQGV4dHJOYXRpdmUoMTA2MikBCQEBdAIFAmFUCQEBVQEFAmNWBAJjWQkBAXgBCQD8BwQFAmFaAhxnZXRQb29sQ29uZmlnV3JhcHBlclJFQURPTkxZBQNuaWwFA25pbAQCYmQJANkEAQkBAUQBCQCRAwIFAmNZBQFqBAJkcgkBAUQBCQCRAwIFAmNZBQFrBAJkcwkA2QQBBQJkcgQCZHQJAQFEAQkAkQMCBQJjWQUBbAQCZHUJANkEAQUCZHQEAmRkCQENcGFyc2VJbnRWYWx1ZQEJAQFEAQkAkQMCBQJjWQUBbQQCZGUJAQ1wYXJzZUludFZhbHVlAQkBAUQBCQCRAwIFAmNZBQFuBAJkdgkBAUQBCQCRAwIFAmNZBQFpBAJkZggJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQJiZAkArAICCQCsAgICBkFzc2V0IAkA2AQBBQJiZAIOIGRvZXNuJ3QgZXhpc3QIcXVhbnRpdHkEAmRJCQEBQgEJAPwHBAUCYVoCHGdldEFjY0JhbGFuY2VXcmFwcGVyUkVBRE9OTFkJAMwIAgUCZHIFA25pbAUDbmlsBAJkSgkBAUIBCQD8BwQFAmFaAhxnZXRBY2NCYWxhbmNlV3JhcHBlclJFQURPTkxZCQDMCAIFAmR0BQNuaWwFA25pbAQCZEsJAKcDAQkBAUQBCQD8BwQFAmFaAhR0b1gxOFdyYXBwZXJSRUFET05MWQkAzAgCBQJkSQkAzAgCBQJkZAUDbmlsBQNuaWwEAmRMCQCnAwEJAQFEAQkA/AcEBQJhWgIUdG9YMThXcmFwcGVyUkVBRE9OTFkJAMwIAgUCZEoJAMwIAgUCZGUFA25pbAUDbmlsBAJkeQMJAAACBQJkZgAABQFnCQCnAwEJAQFEAQkA/AcEBQJhWgIeY2FsY1ByaWNlQmlnSW50V3JhcHBlclJFQURPTkxZCQDMCAIJAKYDAQUCZEwJAMwIAgkApgMBBQJkSwUDbmlsBQNuaWwEAmRqCQEBQgEJAPwHBAUCYVoCFmZyb21YMThXcmFwcGVyUkVBRE9OTFkJAMwIAgkApgMBBQJkeQkAzAgCBQFiBQNuaWwFA25pbAQCZEEJAKcDAQkBAUQBCQD8BwQFAmFaAhR0b1gxOFdyYXBwZXJSRUFET05MWQkAzAgCBQJkQgkAzAgCBQJkZQUDbmlsBQNuaWwEAmR6CQC8AgMFAmRBBQFkBQJkeQQCZHEJAQFCAQkA/AcEBQJhWgIWZnJvbVgxOFdyYXBwZXJSRUFET05MWQkAzAgCCQCmAwEFAmR6CQDMCAIFAmRkBQNuaWwFA25pbAQCYloJAPwHBAUCYVoCI2VzdGltYXRlUHV0T3BlcmF0aW9uV3JhcHBlclJFQURPTkxZCQDMCAICAAkAzAgCAKDCHgkAzAgCBQJkcQkAzAgCBQJkcwkAzAgCBQJkQgkAzAgCBQJkdQkAzAgCAgAJAMwIAgYJAMwIAgcFA25pbAUDbmlsBAJkTQQBegUCYloDAwMJAAECCAUBegJfMQIDSW50AwkAAQIIBQF6Al8zAgNJbnQDCQABAggFAXoCXzQCA0ludAMJAAECCAUBegJfNQIDSW50CQABAggFAXoCXzYCA0ludAcHBwcJAAACCQDGCgEFAXoADQcEAmRECAUBegJfMQQCZEUIBQF6Al8zBAJkRggFAXoCXzQEAmRHCAUBegJfNQQCZEgIBQF6Al82CQCXCgUFAmREBQJkRQUCZEYFAmRHBQJkSAkAAgECE0NvdWxkbid0IGNhc3QgdHlwZXMEAmRECAUCZE0CXzEEAmRFCAUCZE0CXzIEAmRGCAUCZE0CXzMEAmRHCAUCZE0CXzQEAmRICAUCZE0CXzUJAJQKAgUDbmlsCQC5CQIJAMwIAgIQJWQlZCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFAmRECQDMCAIJAKQDAQUCZGoJAMwIAgkApAMBBQJkRgkAzAgCCQCkAwEFAmRHCQDMCAIJAKQDAQUCZEgJAMwIAgUCZHYJAMwIAgkApAMBBQJkcQkAzAgCCQCkAwEFAmRCBQNuaWwFAWUCYkIBF3Bvb2xFdmFsdWF0ZUdldFJFQURPTkxZAgJkTgJkTwQCYVoJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQF0AgUCYVQJAQFVAQUCZE4EAmJaCQD8BwQFAmFaAiNlc3RpbWF0ZUdldE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQkAzAgCAgAJAMwIAgUCZE4JAMwIAgUCZE8JAMwIAgkApQgBBQJhWgUDbmlsBQNuaWwEAmRQBAF6BQJiWgMDAwkAAQIIBQF6Al8xAgNJbnQDCQABAggFAXoCXzICA0ludAMJAAECCAUBegJfNQIDSW50AwkAAQIIBQF6Al82AgNJbnQDCQABAggFAXoCXzcCA0ludAMJAAECCAUBegJfOAIGU3RyaW5nCQABAggFAXoCXzkCBlN0cmluZwcHBwcHBwkAAAIJAMYKAQUBegAKBwQCZFEIBQF6Al8xBAJkUggFAXoCXzIEAmRGCAUBegJfNQQCZEcIBQF6Al82BAJkSAgFAXoCXzcEAmRqCAUBegJfOAQCZHYIBQF6Al85CQCZCgcFAmRRBQJkUgUCZEYFAmRHBQJkSAUCZGoFAmR2CQACAQITQ291bGRuJ3QgY2FzdCB0eXBlcwQCZFEIBQJkUAJfMQQCZFIIBQJkUAJfMgQCZEYIBQJkUAJfMwQCZEcIBQJkUAJfNAQCZEgIBQJkUAJfNQQCZGoIBQJkUAJfNgQCZHYIBQJkUAJfNwkAlAoCBQNuaWwJALkJAgkAzAgCAg4lZCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFAmRRCQDMCAIJAKQDAQUCZFIJAMwIAgkApAMBBQJkRgkAzAgCCQCkAwEFAmRHCQDMCAIJAKQDAQUCZEgJAMwIAgUCZGoJAMwIAgUCZHYFA25pbAUBZQJiQgETZ3d4VXNlckluZm9SRUFET05MWQECYW0EAmRTCQEBeAEJAPwHBAUCYVgCE2d3eFVzZXJJbmZvUkVBRE9OTFkJAMwIAgUCYW0FA25pbAUDbmlsBAJkVAkBAUIBCQCRAwIFAmRTAAAJAJQKAgUDbmlsCQC5CQIJAMwIAgICJWQJAMwIAgkApAMBBQJkVAUDbmlsBQFlAmJCARV1bnN0YWtlQW5kR2V0T25lVGtuVjIEAmFaAmRVAmRWAmRXBAJjYQkA/AcECQERQGV4dHJOYXRpdmUoMTA2MikBBQJhWgIVdW5zdGFrZUFuZEdldE9uZVRrblYyCQDMCAIFAmRVCQDMCAIFAmRWCQDMCAIFAmRXBQNuaWwFA25pbAMJAAACBQJjYQUCY2EJAJQKAgUDbmlsBQR1bml0CQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAmJCARNnZXRLZXlzQnVsa0ludGVybmFsAwJiTgJkWAJiVAMJAAACBQJiTgkAkAMBBQJkWAkAlAoCBQNuaWwFAmJUBAJjcAkAtQkCCQCRAwIFAmRYBQJiTgICKysEAmJ2CQERQGV4dHJOYXRpdmUoMTA2MikBCQCRAwIFAmNwAAAEAXMJAJEDAgUCY3AAAQQCYncJAJEDAgUCY3AAAgQBeQkBAmJ1AwUCYnYFAXMFAmJ3BAJiWgkAzQgCBQJiVAUBeQQCY2EJAPwHBAUEdGhpcwITZ2V0S2V5c0J1bGtJbnRlcm5hbAkAzAgCCQBkAgUCYk4AAQkAzAgCBQJkWAkAzAgCBQJiWgUDbmlsBQNuaWwDCQAAAgUCY2EFAmNhCQCUCgIFA25pbAUCY2EJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4CYkIBC2dldEtleXNCdWxrAQJkWAQCYloJAPwHBAUEdGhpcwITZ2V0S2V5c0J1bGtJbnRlcm5hbAkAzAgCAAAJAMwIAgUCZFgJAMwIAgUDbmlsBQNuaWwFA25pbAkAlAoCBQNuaWwFAmJaAmJCAQpzZXRNYW5hZ2VyAQJkWQQCYkYJAQJiQQEFAmJCAwkAAAIFAmJGBQJiRgQCZFoJANkEAQUCZFkDCQAAAgUCZFoFAmRaCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQFIAAUCZFkFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgJiQgEOY29uZmlybU1hbmFnZXIABAJlYQkBAmJ6AAQCZWIDCQEJaXNEZWZpbmVkAQUCZWEGCQACAQISTm8gcGVuZGluZyBtYW5hZ2VyAwkAAAIFAmViBQJlYgQCZWMDCQAAAggFAmJCD2NhbGxlclB1YmxpY0tleQkBBXZhbHVlAQUCZWEGCQACAQIbWW91IGFyZSBub3QgcGVuZGluZyBtYW5hZ2VyAwkAAAIFAmVjBQJlYwkAzAgCCQELU3RyaW5nRW50cnkCCQEBRwAJANgEAQkBBXZhbHVlAQUCZWEJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBAUgABQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BAmVkAQJlZQAEAmVmBAF6CQECYngAAwkAAQIFAXoCCkJ5dGVWZWN0b3IEAmJEBQF6BQJiRAMJAAECBQF6AgRVbml0CAUCZWQPc2VuZGVyUHVibGljS2V5CQACAQILTWF0Y2ggZXJyb3IJAPQDAwgFAmVkCWJvZHlCeXRlcwkAkQMCCAUCZWQGcHJvb2ZzAAAFAmVm12kILA==",
    "chainId": 84,
    "height": 2411807,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3xggsFJYXxtRZNuXRdoQ8NPjCVR1XTjGx1PE253ThQaq
Next: 2WczFfc61PGZL5P7As5wtFQX3TKmjE5u7KZyKeXHA3ET

Diff: 
Old
New
Differences
491
491
 
@Callable(i)
492
492
 
func poolStatsREADONLY (lpAsset) = {
493
493
 
    let poolAddress = addressFromStringValue(getStringByAddressOrFail(factoryDapp, keyFactoryLpAssetToPoolContractAddress(lpAsset)))
494
-
    let cfg = asAnyList(invoke(poolAddress, "getPoolConfigWrapperREADONLY", nil, nil))
495
-
    let lpAssetId = fromBase58String(asString(cfg[idxPoolLPAssetId]))
496
-
    let amtAssetId = asString(cfg[idxAmtAssetId])
497
-
    let priceAssetId = asString(cfg[idxPriceAssetId])
498
-
    let iAmtAssetId = asString(cfg[idxIAmtAssetId])
499
-
    let iPriceAssetId = asString(cfg[idxIPriceAssetId])
500
-
    let amtAssetDcm = parseIntValue(asString(cfg[idxAmtAssetDcm]))
501
-
    let priceAssetDcm = parseIntValue(asString(cfg[idxPriceAssetDcm]))
502
-
    let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
503
-
    let accAmtAssetBalance = asInt(invoke(poolAddress, "getAccBalanceWrapperREADONLY", [amtAssetId], nil))
504
-
    let accPriceAssetBalance = asInt(invoke(poolAddress, "getAccBalanceWrapperREADONLY", [priceAssetId], nil))
505
-
    let pricesList = if ((poolLPBalance == 0))
506
-
        then [toString(zeroBigInt), toString(zeroBigInt), toString(zeroBigInt)]
507
-
        else asAnyList(invoke(poolAddress, "calcPricesWrapperREADONLY", [accAmtAssetBalance, accPriceAssetBalance, poolLPBalance], nil))
508
-
    let curPrice = 0
509
-
    let lpAmtAssetShare = asInt(invoke(poolAddress, "fromX18WrapperREADONLY", [pricesList[1], MULT8], nil))
510
-
    let lpPriceAssetShare = asInt(invoke(poolAddress, "fromX18WrapperREADONLY", [pricesList[2], MULT8], nil))
511
-
    let poolWeight = getIntegerValue(factoryDapp, keyFactoryPoolWeight(toString(poolAddress)))
512
-
    let inFee = getPoolInFee(poolAddress)
513
-
    let outFee = getPoolOutFee(poolAddress)
514
-
    let poolOneTokenOperationsDisabled = {
515
-
        let @ = invoke(factoryDapp, "isPoolOneTokenOperationsDisabledREADONLY", [toString(poolAddress)], nil)
516
-
        if ($isInstanceOf(@, "Boolean"))
494
+
    let status = {
495
+
        let @ = invoke(factoryDapp, "getPoolStatusREADONLY", [toString(poolAddress)], nil)
496
+
        if ($isInstanceOf(@, "Int"))
517
497
 
            then @
518
-
            else throw(($getType(@) + " couldn't be cast to Boolean"))
498
+
            else throw(($getType(@) + " couldn't be cast to Int"))
519
499
 
        }
520
-
    let poolOneTokenOperationsEnabled = !(poolOneTokenOperationsDisabled)
521
-
    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d%d%d%s", toString(accAmtAssetBalance), toString(accPriceAssetBalance), toString(poolLPBalance), toString(curPrice), toString(lpAmtAssetShare), toString(lpPriceAssetShare), toString(poolWeight), toString(inFee), toString(outFee), toString(poolOneTokenOperationsEnabled)], SEP))
500
+
    let tpl = "%d%d%d%d%d%d%d%d%d%s"
501
+
    if ((status == 4))
502
+
        then $Tuple2(nil, makeString([tpl, toString(0), toString(0), toString(0), toString(0), toString(0), toString(0), toString(0), toString(0), toString(0), toString(false)], SEP))
503
+
        else {
504
+
            let cfg = asAnyList(invoke(poolAddress, "getPoolConfigWrapperREADONLY", nil, nil))
505
+
            let lpAssetId = fromBase58String(asString(cfg[idxPoolLPAssetId]))
506
+
            let amtAssetId = asString(cfg[idxAmtAssetId])
507
+
            let priceAssetId = asString(cfg[idxPriceAssetId])
508
+
            let iAmtAssetId = asString(cfg[idxIAmtAssetId])
509
+
            let iPriceAssetId = asString(cfg[idxIPriceAssetId])
510
+
            let amtAssetDcm = parseIntValue(asString(cfg[idxAmtAssetDcm]))
511
+
            let priceAssetDcm = parseIntValue(asString(cfg[idxPriceAssetDcm]))
512
+
            let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
513
+
            let accAmtAssetBalance = asInt(invoke(poolAddress, "getAccBalanceWrapperREADONLY", [amtAssetId], nil))
514
+
            let accPriceAssetBalance = asInt(invoke(poolAddress, "getAccBalanceWrapperREADONLY", [priceAssetId], nil))
515
+
            let pricesList = if ((poolLPBalance == 0))
516
+
                then [toString(zeroBigInt), toString(zeroBigInt), toString(zeroBigInt)]
517
+
                else asAnyList(invoke(poolAddress, "calcPricesWrapperREADONLY", [accAmtAssetBalance, accPriceAssetBalance, poolLPBalance], nil))
518
+
            let curPrice = 0
519
+
            let lpAmtAssetShare = asInt(invoke(poolAddress, "fromX18WrapperREADONLY", [pricesList[1], MULT8], nil))
520
+
            let lpPriceAssetShare = asInt(invoke(poolAddress, "fromX18WrapperREADONLY", [pricesList[2], MULT8], nil))
521
+
            let poolWeight = getIntegerValue(factoryDapp, keyFactoryPoolWeight(toString(poolAddress)))
522
+
            let inFee = getPoolInFee(poolAddress)
523
+
            let outFee = getPoolOutFee(poolAddress)
524
+
            let poolOneTokenOperationsDisabled = {
525
+
                let @ = invoke(factoryDapp, "isPoolOneTokenOperationsDisabledREADONLY", [toString(poolAddress)], nil)
526
+
                if ($isInstanceOf(@, "Boolean"))
527
+
                    then @
528
+
                    else throw(($getType(@) + " couldn't be cast to Boolean"))
529
+
                }
530
+
            let poolOneTokenOperationsEnabled = !(poolOneTokenOperationsDisabled)
531
+
            $Tuple2(nil, makeString([tpl, toString(accAmtAssetBalance), toString(accPriceAssetBalance), toString(poolLPBalance), toString(curPrice), toString(lpAmtAssetShare), toString(lpPriceAssetShare), toString(poolWeight), toString(inFee), toString(outFee), toString(poolOneTokenOperationsEnabled)], SEP))
532
+
            }
522
533
 
    }
523
534
 
524
535
 
548
559
 
    let inPrAssetAmtX18 = fraction(inAmAssetAmtX18, curPriceX18, MULT18)
549
560
 
    let inPrAssetAmt = asInt(invoke(poolAddress, "fromX18WrapperREADONLY", [toString(inPrAssetAmtX18), priceAssetDcm], nil))
550
561
 
    let res = invoke(poolAddress, "estimatePutOperationWrapperREADONLY", ["", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false], nil)
551
-
    let $t02283223185 =     match res {
562
+
    let $t02336423717 =     match res {
552
563
 
        case _ => 
553
564
 
            if (if (if ($isInstanceOf($match0._1, "Int"))
554
565
 
                then if ($isInstanceOf($match0._3, "Int"))
571
582
 
                    }
572
583
 
                else throw("Couldn't cast types")
573
584
 
    }
574
-
    let calcLpAmt = $t02283223185._1
575
-
    let curPriceCalc = $t02283223185._2
576
-
    let amBalance = $t02283223185._3
577
-
    let prBalance = $t02283223185._4
578
-
    let lpEmission = $t02283223185._5
585
+
    let calcLpAmt = $t02336423717._1
586
+
    let curPriceCalc = $t02336423717._2
587
+
    let amBalance = $t02336423717._3
588
+
    let prBalance = $t02336423717._4
589
+
    let lpEmission = $t02336423717._5
579
590
 
    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d%d", toString(calcLpAmt), toString(curPrice), toString(amBalance), toString(prBalance), toString(lpEmission), poolStatus, toString(inAmAssetAmt), toString(inPrAssetAmt)], SEP))
580
591
 
    }
581
592
 
606
617
 
    let inAmAssetAmtX18 = fraction(inPrAssetAmtX18, MULT18, curPriceX18)
607
618
 
    let inAmAssetAmt = asInt(invoke(poolAddress, "fromX18WrapperREADONLY", [toString(inAmAssetAmtX18), amtAssetDcm], nil))
608
619
 
    let res = invoke(poolAddress, "estimatePutOperationWrapperREADONLY", ["", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false], nil)
609
-
    let $t02575826111 =     match res {
620
+
    let $t02629026643 =     match res {
610
621
 
        case _ => 
611
622
 
            if (if (if ($isInstanceOf($match0._1, "Int"))
612
623
 
                then if ($isInstanceOf($match0._3, "Int"))
629
640
 
                    }
630
641
 
                else throw("Couldn't cast types")
631
642
 
    }
632
-
    let calcLpAmt = $t02575826111._1
633
-
    let curPriceCalc = $t02575826111._2
634
-
    let amBalance = $t02575826111._3
635
-
    let prBalance = $t02575826111._4
636
-
    let lpEmission = $t02575826111._5
643
+
    let calcLpAmt = $t02629026643._1
644
+
    let curPriceCalc = $t02629026643._2
645
+
    let amBalance = $t02629026643._3
646
+
    let prBalance = $t02629026643._4
647
+
    let lpEmission = $t02629026643._5
637
648
 
    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d%d", toString(calcLpAmt), toString(curPrice), toString(amBalance), toString(prBalance), toString(lpEmission), poolStatus, toString(inAmAssetAmt), toString(inPrAssetAmt)], SEP))
638
649
 
    }
639
650
 
643
654
 
func poolEvaluateGetREADONLY (paymentLpAssetId,paymentLpAmt) = {
644
655
 
    let poolAddress = addressFromStringValue(getStringByAddressOrFail(factoryDapp, keyFactoryLpAssetToPoolContractAddress(paymentLpAssetId)))
645
656
 
    let res = invoke(poolAddress, "estimateGetOperationWrapperREADONLY", ["", paymentLpAssetId, paymentLpAmt, toString(poolAddress)], nil)
646
-
    let $t02680627223 =     match res {
657
+
    let $t02733827755 =     match res {
647
658
 
        case _ => 
648
659
 
            if (if (if ($isInstanceOf($match0._1, "Int"))
649
660
 
                then if ($isInstanceOf($match0._2, "Int"))
672
683
 
                    }
673
684
 
                else throw("Couldn't cast types")
674
685
 
    }
675
-
    let outAmAmt = $t02680627223._1
676
-
    let outPrAmt = $t02680627223._2
677
-
    let amBalance = $t02680627223._3
678
-
    let prBalance = $t02680627223._4
679
-
    let lpEmission = $t02680627223._5
680
-
    let curPrice = $t02680627223._6
681
-
    let poolStatus = $t02680627223._7
686
+
    let outAmAmt = $t02733827755._1
687
+
    let outPrAmt = $t02733827755._2
688
+
    let amBalance = $t02733827755._3
689
+
    let prBalance = $t02733827755._4
690
+
    let lpEmission = $t02733827755._5
691
+
    let curPrice = $t02733827755._6
692
+
    let poolStatus = $t02733827755._7
682
693
 
    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d", toString(outAmAmt), toString(outPrAmt), toString(amBalance), toString(prBalance), toString(lpEmission), curPrice, poolStatus], SEP))
683
694
 
    }
684
695
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let SCALE8 = 8
5
5
 
6
6
 
let MULT8 = 100000000
7
7
 
8
8
 
let SCALE18 = 18
9
9
 
10
10
 
let MULT18 = toBigInt(1000000000000000000)
11
11
 
12
12
 
let SEP = "__"
13
13
 
14
14
 
let POOLWEIGHTMULT = MULT8
15
15
 
16
16
 
let zeroBigInt = toBigInt(0)
17
17
 
18
18
 
let idxPoolAddress = 1
19
19
 
20
20
 
let idxPoolStatus = 2
21
21
 
22
22
 
let idxPoolLPAssetId = 3
23
23
 
24
24
 
let idxAmtAssetId = 4
25
25
 
26
26
 
let idxPriceAssetId = 5
27
27
 
28
28
 
let idxAmtAssetDcm = 6
29
29
 
30
30
 
let idxPriceAssetDcm = 7
31
31
 
32
32
 
let idxIAmtAssetId = 8
33
33
 
34
34
 
let idxIPriceAssetId = 9
35
35
 
36
36
 
let idxLPAssetDcm = 10
37
37
 
38
38
 
func getStringOrFail (key) = valueOrErrorMessage(getString(key), (("mandatory this." + key) + " is not defined"))
39
39
 
40
40
 
41
41
 
func getStringByAddressOrFail (address,key) = valueOrErrorMessage(getString(address, key), (((("mandatory " + toString(address)) + ".") + key) + " is not defined"))
42
42
 
43
43
 
44
44
 
func getIntOrZero (address,key) = valueOrElse(getInteger(address, key), 0)
45
45
 
46
46
 
47
47
 
func getIntOrFail (address,key) = valueOrErrorMessage(getInteger(address, key), (("mandatory this." + key) + " is not defined"))
48
48
 
49
49
 
50
50
 
func asAnyList (val) = match val {
51
51
 
    case valAnyLyst: List[Any] => 
52
52
 
        valAnyLyst
53
53
 
    case _ => 
54
54
 
        throw("fail to cast into List[Any]")
55
55
 
}
56
56
 
57
57
 
58
58
 
func asInt (val) = match val {
59
59
 
    case valInt: Int => 
60
60
 
        valInt
61
61
 
    case _ => 
62
62
 
        throw("fail to cast into Int")
63
63
 
}
64
64
 
65
65
 
66
66
 
func asString (val) = match val {
67
67
 
    case valStr: String => 
68
68
 
        valStr
69
69
 
    case _ => 
70
70
 
        throw("fail to cast into String")
71
71
 
}
72
72
 
73
73
 
74
74
 
func keyFactoryAddress () = "%s%s__config__factoryAddress"
75
75
 
76
76
 
77
77
 
func keyManagerPublicKey () = "%s__managerPublicKey"
78
78
 
79
79
 
80
80
 
func keyPendingManagerPublicKey () = "%s__pendingManagerPublicKey"
81
81
 
82
82
 
83
83
 
let IdxFactoryCfgStakingDapp = 1
84
84
 
85
85
 
let IdxFactoryCfgBoostingDapp = 2
86
86
 
87
87
 
let IdxFactoryCfgIdoDapp = 3
88
88
 
89
89
 
let IdxFactoryCfgTeamDapp = 4
90
90
 
91
91
 
let IdxFactoryCfgEmissionDapp = 5
92
92
 
93
93
 
let IdxFactoryCfgRestDapp = 6
94
94
 
95
95
 
let IdxFactoryCfgSlippageDapp = 7
96
96
 
97
97
 
let IdxFactoryCfgGwxRewardDapp = 8
98
98
 
99
99
 
func keyFactoryCfg () = "%s__factoryConfig"
100
100
 
101
101
 
102
102
 
func keyFactoryLp2AssetsMapping (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
103
103
 
104
104
 
105
105
 
func keyFactoryLpList () = "%s__lpTokensList"
106
106
 
107
107
 
108
108
 
func keyFactoryLpAssetToPoolContractAddress (lpAssetStr) = makeString(["%s%s%s", lpAssetStr, "mappings__lpAsset2PoolContract"], SEP)
109
109
 
110
110
 
111
111
 
func keyFactoryPoolWeight (contractAddress) = makeString(["%s%s", "poolWeight", contractAddress], SEP)
112
112
 
113
113
 
114
114
 
func readFactoryAddressOrFail () = addressFromStringValue(getStringOrFail(keyFactoryAddress()))
115
115
 
116
116
 
117
117
 
func readLpList () = split(valueOrElse(getString(readFactoryAddressOrFail(), keyFactoryLpList()), ""), SEP)
118
118
 
119
119
 
120
120
 
func readFactoryCfgOrFail (factory) = split(getStringByAddressOrFail(factory, keyFactoryCfg()), SEP)
121
121
 
122
122
 
123
123
 
func getBoostingAddressOrFail (fCfg) = addressFromStringValue(fCfg[IdxFactoryCfgBoostingDapp])
124
124
 
125
125
 
126
126
 
func getEmissionAddressOrFail (fCfg) = addressFromStringValue(fCfg[IdxFactoryCfgEmissionDapp])
127
127
 
128
128
 
129
129
 
func getStakingAddressOrFail (fCfg) = addressFromStringValue(fCfg[IdxFactoryCfgStakingDapp])
130
130
 
131
131
 
132
132
 
func getGwxRewardAddressOrFail (fCfg) = addressFromStringValue(fCfg[IdxFactoryCfgGwxRewardDapp])
133
133
 
134
134
 
135
135
 
func keyBoostCfg () = "%s__config"
136
136
 
137
137
 
138
138
 
func keyBoostingLockParamTotalAmount () = "%s%s__stats__activeTotalLocked"
139
139
 
140
140
 
141
141
 
func keyBoostingStatsLocksDurationSumInBlocks () = "%s%s__stats__locksDurationSumInBlocks"
142
142
 
143
143
 
144
144
 
func keyBoostingStatsLocksCount () = "%s%s__stats__locksCount"
145
145
 
146
146
 
147
147
 
func keyBoostingStatsUsersCount () = "%s%s__stats__activeUsersCount"
148
148
 
149
149
 
150
150
 
func keyUser2NumMapping (userAddress) = makeString(["%s%s%s__mapping__user2num", userAddress], SEP)
151
151
 
152
152
 
153
153
 
func keyNum2UserMapping (num) = makeString(["%s%s%s__mapping__num2user", num], SEP)
154
154
 
155
155
 
156
156
 
func keyLockParamUserAmount (userNum) = makeString(["%s%d%s__paramByUserNum", userNum, "amount"], SEP)
157
157
 
158
158
 
159
159
 
func keyLockParamStartBlock (userNum) = makeString(["%s%d%s__paramByUserNum", userNum, "start"], SEP)
160
160
 
161
161
 
162
162
 
func keyLockParamDuration (userNum) = makeString(["%s%d%s__paramByUserNum", userNum, "duration"], SEP)
163
163
 
164
164
 
165
165
 
func keyLockParamK (userNum) = makeString(["%s%d%s__paramByUserNum", userNum, "k"], SEP)
166
166
 
167
167
 
168
168
 
func keyLockParamB (userNum) = makeString(["%s%d%s__paramByUserNum", userNum, "b"], SEP)
169
169
 
170
170
 
171
171
 
func keyLockParamByPeriodK (userNum,period) = makeString(["%s%d%s%d__paramByPeriod", userNum, "k", period], SEP)
172
172
 
173
173
 
174
174
 
func keyLockParamByPeriodB (userNum,period) = makeString(["%s%d%s%d__paramByPeriod", userNum, "b", period], SEP)
175
175
 
176
176
 
177
177
 
func keyUserBoostEmissionLastINTEGRAL (userNum) = makeString(["%s%d__userBoostEmissionLastInt", userNum], SEP)
178
178
 
179
179
 
180
180
 
func keyUserMaxBoostINTEGRAL (userNum) = makeString(["%s%d__maxBoostInt", userNum], SEP)
181
181
 
182
182
 
183
183
 
func keyTotalMaxBoostINTEGRAL () = "%s%s__maxBoostInt__total"
184
184
 
185
185
 
186
186
 
func keyUserBoostAvalaibleToClaimTotal (userNum) = makeString(["%s%d__userBoostAvaliableToClaimTotal", userNum], SEP)
187
187
 
188
188
 
189
189
 
func keyUserBoostClaimed (userNum) = makeString(["%s%d__userBoostClaimed", userNum], SEP)
190
190
 
191
191
 
192
192
 
func keyTotalCachedGwx () = "%s%s__gwxCached__total"
193
193
 
194
194
 
195
195
 
func keyStakedByUser (userAddressStr,lpAssetIdStr) = makeString(["%s%s%s__staked", userAddressStr, lpAssetIdStr], SEP)
196
196
 
197
197
 
198
198
 
func keyStakedTotal (lpAssetIdStr) = ("%s%s%s__staked__total__" + lpAssetIdStr)
199
199
 
200
200
 
201
201
 
func keyClaimedByUser (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimed", userAddressStr, lpAssetIdStr], SEP)
202
202
 
203
203
 
204
204
 
func keyClaimedByUserMinReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedMinReward", userAddressStr, lpAssetIdStr], SEP)
205
205
 
206
206
 
207
207
 
func keyClaimedByUserBoostReward (lpAssetIdStr,userAddressStr) = makeString(["%s%s%s__claimedBoostReward", userAddressStr, lpAssetIdStr], SEP)
208
208
 
209
209
 
210
210
 
func readStaked (stakingDapp,key) = valueOrElse(getInteger(stakingDapp, key), 0)
211
211
 
212
212
 
213
213
 
func keyEmissionRatePerBlockCurrent () = "%s%s__ratePerBlock__current"
214
214
 
215
215
 
216
216
 
func keyEmissionRatePerBlockMaxCurrent () = "%s%s__ratePerBlockMax__current"
217
217
 
218
218
 
219
219
 
func keyEmissionStartBlock () = "%s%s__emission__startBlock"
220
220
 
221
221
 
222
222
 
func keyEmissionDurationInBlocks () = "%s%s__emission__duration"
223
223
 
224
224
 
225
225
 
func keyEmissionEndBlock () = "%s%s__emission__endBlock"
226
226
 
227
227
 
228
228
 
func keyAddonAddr () = "%s__addonAddr"
229
229
 
230
230
 
231
231
 
let factoryDapp = readFactoryAddressOrFail()
232
232
 
233
233
 
let factoryCfg = readFactoryCfgOrFail(factoryDapp)
234
234
 
235
235
 
let emissionDapp = getEmissionAddressOrFail(factoryCfg)
236
236
 
237
237
 
let stakingDapp = getStakingAddressOrFail(factoryCfg)
238
238
 
239
239
 
let gwxRewardDapp = getGwxRewardAddressOrFail(factoryCfg)
240
240
 
241
241
 
let boostingDapp = getBoostingAddressOrFail(factoryCfg)
242
242
 
243
243
 
func getPoolInFee (poolAddress) = {
244
244
 
    let @ = invoke(factoryDapp, "getInFeeREADONLY", [toString(poolAddress)], nil)
245
245
 
    if ($isInstanceOf(@, "Int"))
246
246
 
        then @
247
247
 
        else throw(($getType(@) + " couldn't be cast to Int"))
248
248
 
    }
249
249
 
250
250
 
251
251
 
func getPoolOutFee (poolAddress) = {
252
252
 
    let @ = invoke(factoryDapp, "getOutFeeREADONLY", [toString(poolAddress)], nil)
253
253
 
    if ($isInstanceOf(@, "Int"))
254
254
 
        then @
255
255
 
        else throw(($getType(@) + " couldn't be cast to Int"))
256
256
 
    }
257
257
 
258
258
 
259
259
 
func internalCurrentRewardRate (lpAssetId) = {
260
260
 
    let poolAddressStr = getStringByAddressOrFail(factoryDapp, keyFactoryLpAssetToPoolContractAddress(lpAssetId))
261
261
 
    let poolWeightMult = MULT8
262
262
 
    let poolWeight = getIntegerValue(factoryDapp, keyFactoryPoolWeight(poolAddressStr))
263
263
 
    let wxEmissionPerBlock = getIntOrFail(emissionDapp, keyEmissionRatePerBlockCurrent())
264
264
 
    let wxEmissionPerBlockMax = getIntOrFail(emissionDapp, keyEmissionRatePerBlockMaxCurrent())
265
265
 
    let boostMaxCoeff = 3
266
266
 
    let poolWxEmissionPerBlock = (fraction(wxEmissionPerBlock, poolWeight, poolWeightMult) / boostMaxCoeff)
267
267
 
    let poolWxEmissionPerBlockMax = fraction(wxEmissionPerBlockMax, poolWeight, poolWeightMult)
268
268
 
    let maxFactor = (boostMaxCoeff * MULT8)
269
269
 
    let totalLpStaked = getIntOrZero(stakingDapp, keyStakedTotal(lpAssetId))
270
270
 
[poolWxEmissionPerBlock, maxFactor, totalLpStaked]
271
271
 
    }
272
272
 
273
273
 
274
274
 
func calcGwxAmountStartREADONLY (lockAmount,lockDuration,maxLockDuration) = {
275
275
 
    let coeffX8 = fraction(lockDuration, MULT8, maxLockDuration)
276
276
 
    let gWxAmountStart = fraction(lockAmount, coeffX8, MULT8)
277
277
 
[gWxAmountStart]
278
278
 
    }
279
279
 
280
280
 
281
281
 
func getKey (addr,key,type) = if ((type == "string"))
282
282
 
    then getStringValue(addr, key)
283
283
 
    else if ((type == "integer"))
284
284
 
        then toString(getIntegerValue(addr, key))
285
285
 
        else if ((type == "boolean"))
286
286
 
            then toString(getBooleanValue(addr, key))
287
287
 
            else throw("unknown type. expected string/integer/boolean")
288
288
 
289
289
 
290
290
 
func managerPublicKeyOrUnit () = match getString(keyManagerPublicKey()) {
291
291
 
    case s: String => 
292
292
 
        fromBase58String(s)
293
293
 
    case _: Unit => 
294
294
 
        unit
295
295
 
    case _ => 
296
296
 
        throw("Match error")
297
297
 
}
298
298
 
299
299
 
300
300
 
func pendingManagerPublicKeyOrUnit () = match getString(keyPendingManagerPublicKey()) {
301
301
 
    case s: String => 
302
302
 
        fromBase58String(s)
303
303
 
    case _: Unit => 
304
304
 
        unit
305
305
 
    case _ => 
306
306
 
        throw("Match error")
307
307
 
}
308
308
 
309
309
 
310
310
 
func mustManager (i) = {
311
311
 
    let pd = throw("Permission denied")
312
312
 
    match managerPublicKeyOrUnit() {
313
313
 
        case pk: ByteVector => 
314
314
 
            if ((i.callerPublicKey == pk))
315
315
 
                then true
316
316
 
                else pd
317
317
 
        case _: Unit => 
318
318
 
            if ((i.caller == this))
319
319
 
                then true
320
320
 
                else pd
321
321
 
        case _ => 
322
322
 
            throw("Match error")
323
323
 
    }
324
324
 
    }
325
325
 
326
326
 
327
327
 
@Callable(i)
328
328
 
func constructor (factoryAddress) = {
329
329
 
    let checkCaller = mustManager(i)
330
330
 
    if ((checkCaller == checkCaller))
331
331
 
        then [StringEntry(keyFactoryAddress(), factoryAddress)]
332
332
 
        else throw("Strict value is not equal to itself.")
333
333
 
    }
334
334
 
335
335
 
336
336
 
337
337
 
@Callable(i)
338
338
 
func currentRewardRateREADONLY (lpAssetId) = {
339
339
 
    let rewardData = internalCurrentRewardRate(lpAssetId)
340
340
 
    let wxEmissionPerBlock = rewardData[0]
341
341
 
    let maxFactor = rewardData[1]
342
342
 
    let totalLpStaked = rewardData[2]
343
343
 
    $Tuple2(nil, makeString(["%d%d%d", toString(wxEmissionPerBlock), toString(maxFactor), toString(totalLpStaked)], SEP))
344
344
 
    }
345
345
 
346
346
 
347
347
 
348
348
 
@Callable(i)
349
349
 
func currentUserRewardRateREADONLY (lpAssetId,userAddress) = {
350
350
 
    let rewardData = internalCurrentRewardRate(lpAssetId)
351
351
 
    let wxEmissionPerBlock = rewardData[0]
352
352
 
    let maxFactor = rewardData[1]
353
353
 
    let totalLpStaked = rewardData[2]
354
354
 
    let lpStakedByUser = getIntOrZero(stakingDapp, keyStakedByUser(userAddress, lpAssetId))
355
355
 
    let userClaimInfo = split(asString(invoke(stakingDapp, "claimWxREADONLY", [lpAssetId, userAddress], nil)), SEP)
356
356
 
    let minRewardPart = valueOrErrorMessage(parseInt(userClaimInfo[5]), "couldn't parse minRewardPart")
357
357
 
    let boostRewardPart = valueOrErrorMessage(parseInt(userClaimInfo[6]), "couldn't parse boostRewardPart")
358
358
 
    let debug = userClaimInfo[7]
359
359
 
    let boostingPower = if ((boostRewardPart == 0))
360
360
 
        then (1 * MULT8)
361
361
 
        else fraction((minRewardPart + boostRewardPart), MULT8, minRewardPart)
362
362
 
    $Tuple2(nil, makeString(["%d%d%d%d%d%s", toString(wxEmissionPerBlock), toString(maxFactor), toString(totalLpStaked), toString(lpStakedByUser), toString(boostingPower), debug], SEP))
363
363
 
    }
364
364
 
365
365
 
366
366
 
367
367
 
@Callable(i)
368
368
 
func calcBoostBulkInternalREADONLY (currentIter,deltaWxAmountBulk,deltaLockPeriodInBlocksBulk,deltaLpAmountBulk,lpAssetIdOptBulk,userAddressOpt,resAcc) = if ((currentIter == size(deltaWxAmountBulk)))
369
369
 
    then $Tuple2(nil, resAcc)
370
370
 
    else {
371
371
 
        let deltaWxAmount = deltaWxAmountBulk[currentIter]
372
372
 
        let deltaLockPeriodInBlocks = deltaLockPeriodInBlocksBulk[currentIter]
373
373
 
        let deltaLpAmount = deltaLpAmountBulk[currentIter]
374
374
 
        let lpAssetIdOpt = lpAssetIdOptBulk[currentIter]
375
375
 
        let info = {
376
376
 
            let @ = invoke(this, "calcBoostREADONLY", [deltaWxAmount, deltaLockPeriodInBlocks, deltaLpAmount, lpAssetIdOpt, userAddressOpt], nil)
377
377
 
            if ($isInstanceOf(@, "String"))
378
378
 
                then @
379
379
 
                else throw(($getType(@) + " couldn't be cast to String"))
380
380
 
            }
381
381
 
        let res = (resAcc :+ info)
382
382
 
        let inv = {
383
383
 
            let @ = invoke(this, "calcBoostBulkInternalREADONLY", [(currentIter + 1), deltaWxAmountBulk, deltaLockPeriodInBlocksBulk, deltaLpAmountBulk, lpAssetIdOptBulk, userAddressOpt, res], nil)
384
384
 
            if ($isInstanceOf(@, "List[Any]"))
385
385
 
                then @
386
386
 
                else throw(($getType(@) + " couldn't be cast to List[Any]"))
387
387
 
            }
388
388
 
        if ((inv == inv))
389
389
 
            then $Tuple2(nil, inv)
390
390
 
            else throw("Strict value is not equal to itself.")
391
391
 
        }
392
392
 
393
393
 
394
394
 
395
395
 
@Callable(i)
396
396
 
func calcBoostBulkREADONLY (deltaWxAmount,deltaLockPeriodInBlocks,deltaLpAmount,lpAssetIdOpt,userAddressOpt) = {
397
397
 
    let res = invoke(this, "calcBoostBulkInternalREADONLY", [0, deltaWxAmount, deltaLockPeriodInBlocks, deltaLpAmount, lpAssetIdOpt, userAddressOpt, nil], nil)
398
398
 
    $Tuple2(nil, res)
399
399
 
    }
400
400
 
401
401
 
402
402
 
403
403
 
@Callable(i)
404
404
 
func calcBoostREADONLY (deltaWxAmount,deltaLockPeriodInBlocks,deltaLpAmount,lpAssetIdOpt,userAddressOpt) = {
405
405
 
    let mathDapp = gwxRewardDapp
406
406
 
    let EMPTYSTR = "empty"
407
407
 
    let maxLockDurationInBlocks = parseIntValue(split(getStringByAddressOrFail(boostingDapp, keyBoostCfg()), SEP)[4])
408
408
 
    let lpAssetIdStr = if ((lpAssetIdOpt == ""))
409
409
 
        then EMPTYSTR
410
410
 
        else lpAssetIdOpt
411
411
 
    let userAddressStr = if ((userAddressOpt == ""))
412
412
 
        then EMPTYSTR
413
413
 
        else userAddressOpt
414
414
 
    let userNumStr = valueOrElse(getString(boostingDapp, keyUser2NumMapping(userAddressOpt)), EMPTYSTR)
415
415
 
    let userAmount = valueOrElse(getInteger(boostingDapp, keyLockParamUserAmount(userNumStr)), 0)
416
416
 
    let lockStart = valueOrElse(getInteger(boostingDapp, keyLockParamStartBlock(userNumStr)), height)
417
417
 
    let lockDuration = valueOrElse(getInteger(boostingDapp, keyLockParamDuration(userNumStr)), 0)
418
418
 
    let lockEnd = (lockStart + lockDuration)
419
419
 
    let remainingDuration = max([(lockEnd - height), 0])
420
420
 
    let userAmountNew = (userAmount + deltaWxAmount)
421
421
 
    let lockDurationNew = min([(remainingDuration + deltaLockPeriodInBlocks), maxLockDurationInBlocks])
422
422
 
    let userCurrgWxAmount = asInt(asAnyList(invoke(boostingDapp, "gwxUserInfoREADONLY", [userAddressStr], nil))[0])
423
423
 
    let gWxAmountStartNew = calcGwxAmountStartREADONLY(userAmountNew, lockDurationNew, maxLockDurationInBlocks)[0]
424
424
 
    let gWxParamsResultList = asAnyList(invoke(mathDapp, "calcGwxParamsREADONLY", [gWxAmountStartNew, height, lockDurationNew], nil))
425
425
 
    let gWxAmountDiff = (gWxAmountStartNew - userCurrgWxAmount)
426
426
 
    let k = asInt(gWxParamsResultList[0])
427
427
 
    let b = asInt(gWxParamsResultList[1])
428
428
 
    let period = toString(asInt(gWxParamsResultList[2]))
429
429
 
    let totalMaxBoostIntegralKEY = keyTotalMaxBoostINTEGRAL()
430
430
 
    let userMaxBoostIntNew = ((gWxAmountStartNew * lockDurationNew) / 2)
431
431
 
    let totalMaxBoostInt = getIntOrZero(boostingDapp, totalMaxBoostIntegralKEY)
432
432
 
    let totalCachedGwx = {
433
433
 
        let @ = invoke(boostingDapp, "getTotalCachedGwxREADONLY", nil, nil)
434
434
 
        if ($isInstanceOf(@, "Int"))
435
435
 
            then @
436
436
 
            else throw(($getType(@) + " couldn't be cast to Int"))
437
437
 
        }
438
438
 
    let MULT3 = 1000
439
439
 
    let wxEmissionPerBlockX3 = (getIntOrFail(emissionDapp, keyEmissionRatePerBlockCurrent()) * MULT3)
440
440
 
    let stakedByUserKEY = keyStakedByUser(userAddressStr, lpAssetIdStr)
441
441
 
    let stakedTotalKEY = keyStakedTotal(lpAssetIdStr)
442
442
 
    let stakedByUser = readStaked(stakingDapp, stakedByUserKEY)
443
443
 
    let stakedTotal = readStaked(stakingDapp, stakedTotalKEY)
444
444
 
    let stakedByUserNew = (stakedByUser + deltaLpAmount)
445
445
 
    let stakedTotalNew = (stakedTotal + deltaLpAmount)
446
446
 
    let poolWeight = if ((lpAssetIdStr != EMPTYSTR))
447
447
 
        then {
448
448
 
            let poolAddressStr = valueOrErrorMessage(getString(factoryDapp, keyFactoryLp2AssetsMapping(lpAssetIdStr)), ("unsupported lp asset " + lpAssetIdStr))
449
449
 
            getIntegerValue(factoryDapp, keyFactoryPoolWeight(poolAddressStr))
450
450
 
            }
451
451
 
        else 0
452
452
 
    let poolWxEmissionPerBlockX3 = fraction(wxEmissionPerBlockX3, poolWeight, (POOLWEIGHTMULT * 3))
453
453
 
    let wxPerLpX3 = if ((stakedTotalNew != 0))
454
454
 
        then fraction(poolWxEmissionPerBlockX3, MULT8, stakedTotalNew)
455
455
 
        else 0
456
456
 
    let userWxPerBlockX3 = fraction(wxPerLpX3, stakedByUserNew, MULT8)
457
457
 
    let boostEmissionPerBlockX3 = (poolWxEmissionPerBlockX3 * 2)
458
458
 
    let tmpUserBoostPerBlockX3 = fraction(gWxAmountStartNew, boostEmissionPerBlockX3, (totalCachedGwx + gWxAmountDiff))
459
459
 
    let userBoostPerBlockX3 = min([tmpUserBoostPerBlockX3, (userWxPerBlockX3 * 2)])
460
460
 
    let boostCoeff = if ((userWxPerBlockX3 == 0))
461
461
 
        then (1 * MULT8)
462
462
 
        else fraction((userBoostPerBlockX3 + userWxPerBlockX3), MULT8, userWxPerBlockX3)
463
463
 
    $Tuple2(nil, makeString(["%d%d%s", toString(gWxAmountStartNew), toString(boostCoeff), "d"], SEP))
464
464
 
    }
465
465
 
466
466
 
467
467
 
468
468
 
@Callable(i)
469
469
 
func wxEmissionStatsREADONLY () = {
470
470
 
    let ONEMULT = toString(MULT8)
471
471
 
    let ONE = "1"
472
472
 
    let wxEmissionPerBlock = getIntOrFail(emissionDapp, keyEmissionRatePerBlockCurrent())
473
473
 
    let emissionStartBlock = getIntOrFail(emissionDapp, keyEmissionStartBlock())
474
474
 
    let passedBlocks = if ((emissionStartBlock > height))
475
475
 
        then 0
476
476
 
        else (height - emissionStartBlock)
477
477
 
    let teamEmDuration = (1440 * 365)
478
478
 
    let teamEmMax = (201000000 * MULT8)
479
479
 
    let teamEm = if ((passedBlocks > teamEmDuration))
480
480
 
        then teamEmMax
481
481
 
        else fraction(teamEmMax, passedBlocks, teamEmDuration)
482
482
 
    let totalWxReleased = ((wxEmissionPerBlock * passedBlocks) + teamEm)
483
483
 
    let totalWxLocked = getIntOrZero(boostingDapp, keyBoostingLockParamTotalAmount())
484
484
 
    let locksDurationSumInBlocks = getIntOrZero(boostingDapp, keyBoostingStatsLocksDurationSumInBlocks())
485
485
 
    let locksCount = getIntOrZero(boostingDapp, keyBoostingStatsLocksCount())
486
486
 
    $Tuple2(nil, makeString(["%d%d%d%d", toString(totalWxReleased), toString(totalWxLocked), toString(locksDurationSumInBlocks), toString(locksCount)], SEP))
487
487
 
    }
488
488
 
489
489
 
490
490
 
491
491
 
@Callable(i)
492
492
 
func poolStatsREADONLY (lpAsset) = {
493
493
 
    let poolAddress = addressFromStringValue(getStringByAddressOrFail(factoryDapp, keyFactoryLpAssetToPoolContractAddress(lpAsset)))
494
-
    let cfg = asAnyList(invoke(poolAddress, "getPoolConfigWrapperREADONLY", nil, nil))
495
-
    let lpAssetId = fromBase58String(asString(cfg[idxPoolLPAssetId]))
496
-
    let amtAssetId = asString(cfg[idxAmtAssetId])
497
-
    let priceAssetId = asString(cfg[idxPriceAssetId])
498
-
    let iAmtAssetId = asString(cfg[idxIAmtAssetId])
499
-
    let iPriceAssetId = asString(cfg[idxIPriceAssetId])
500
-
    let amtAssetDcm = parseIntValue(asString(cfg[idxAmtAssetDcm]))
501
-
    let priceAssetDcm = parseIntValue(asString(cfg[idxPriceAssetDcm]))
502
-
    let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
503
-
    let accAmtAssetBalance = asInt(invoke(poolAddress, "getAccBalanceWrapperREADONLY", [amtAssetId], nil))
504
-
    let accPriceAssetBalance = asInt(invoke(poolAddress, "getAccBalanceWrapperREADONLY", [priceAssetId], nil))
505
-
    let pricesList = if ((poolLPBalance == 0))
506
-
        then [toString(zeroBigInt), toString(zeroBigInt), toString(zeroBigInt)]
507
-
        else asAnyList(invoke(poolAddress, "calcPricesWrapperREADONLY", [accAmtAssetBalance, accPriceAssetBalance, poolLPBalance], nil))
508
-
    let curPrice = 0
509
-
    let lpAmtAssetShare = asInt(invoke(poolAddress, "fromX18WrapperREADONLY", [pricesList[1], MULT8], nil))
510
-
    let lpPriceAssetShare = asInt(invoke(poolAddress, "fromX18WrapperREADONLY", [pricesList[2], MULT8], nil))
511
-
    let poolWeight = getIntegerValue(factoryDapp, keyFactoryPoolWeight(toString(poolAddress)))
512
-
    let inFee = getPoolInFee(poolAddress)
513
-
    let outFee = getPoolOutFee(poolAddress)
514
-
    let poolOneTokenOperationsDisabled = {
515
-
        let @ = invoke(factoryDapp, "isPoolOneTokenOperationsDisabledREADONLY", [toString(poolAddress)], nil)
516
-
        if ($isInstanceOf(@, "Boolean"))
494
+
    let status = {
495
+
        let @ = invoke(factoryDapp, "getPoolStatusREADONLY", [toString(poolAddress)], nil)
496
+
        if ($isInstanceOf(@, "Int"))
517
497
 
            then @
518
-
            else throw(($getType(@) + " couldn't be cast to Boolean"))
498
+
            else throw(($getType(@) + " couldn't be cast to Int"))
519
499
 
        }
520
-
    let poolOneTokenOperationsEnabled = !(poolOneTokenOperationsDisabled)
521
-
    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d%d%d%s", toString(accAmtAssetBalance), toString(accPriceAssetBalance), toString(poolLPBalance), toString(curPrice), toString(lpAmtAssetShare), toString(lpPriceAssetShare), toString(poolWeight), toString(inFee), toString(outFee), toString(poolOneTokenOperationsEnabled)], SEP))
500
+
    let tpl = "%d%d%d%d%d%d%d%d%d%s"
501
+
    if ((status == 4))
502
+
        then $Tuple2(nil, makeString([tpl, toString(0), toString(0), toString(0), toString(0), toString(0), toString(0), toString(0), toString(0), toString(0), toString(false)], SEP))
503
+
        else {
504
+
            let cfg = asAnyList(invoke(poolAddress, "getPoolConfigWrapperREADONLY", nil, nil))
505
+
            let lpAssetId = fromBase58String(asString(cfg[idxPoolLPAssetId]))
506
+
            let amtAssetId = asString(cfg[idxAmtAssetId])
507
+
            let priceAssetId = asString(cfg[idxPriceAssetId])
508
+
            let iAmtAssetId = asString(cfg[idxIAmtAssetId])
509
+
            let iPriceAssetId = asString(cfg[idxIPriceAssetId])
510
+
            let amtAssetDcm = parseIntValue(asString(cfg[idxAmtAssetDcm]))
511
+
            let priceAssetDcm = parseIntValue(asString(cfg[idxPriceAssetDcm]))
512
+
            let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
513
+
            let accAmtAssetBalance = asInt(invoke(poolAddress, "getAccBalanceWrapperREADONLY", [amtAssetId], nil))
514
+
            let accPriceAssetBalance = asInt(invoke(poolAddress, "getAccBalanceWrapperREADONLY", [priceAssetId], nil))
515
+
            let pricesList = if ((poolLPBalance == 0))
516
+
                then [toString(zeroBigInt), toString(zeroBigInt), toString(zeroBigInt)]
517
+
                else asAnyList(invoke(poolAddress, "calcPricesWrapperREADONLY", [accAmtAssetBalance, accPriceAssetBalance, poolLPBalance], nil))
518
+
            let curPrice = 0
519
+
            let lpAmtAssetShare = asInt(invoke(poolAddress, "fromX18WrapperREADONLY", [pricesList[1], MULT8], nil))
520
+
            let lpPriceAssetShare = asInt(invoke(poolAddress, "fromX18WrapperREADONLY", [pricesList[2], MULT8], nil))
521
+
            let poolWeight = getIntegerValue(factoryDapp, keyFactoryPoolWeight(toString(poolAddress)))
522
+
            let inFee = getPoolInFee(poolAddress)
523
+
            let outFee = getPoolOutFee(poolAddress)
524
+
            let poolOneTokenOperationsDisabled = {
525
+
                let @ = invoke(factoryDapp, "isPoolOneTokenOperationsDisabledREADONLY", [toString(poolAddress)], nil)
526
+
                if ($isInstanceOf(@, "Boolean"))
527
+
                    then @
528
+
                    else throw(($getType(@) + " couldn't be cast to Boolean"))
529
+
                }
530
+
            let poolOneTokenOperationsEnabled = !(poolOneTokenOperationsDisabled)
531
+
            $Tuple2(nil, makeString([tpl, toString(accAmtAssetBalance), toString(accPriceAssetBalance), toString(poolLPBalance), toString(curPrice), toString(lpAmtAssetShare), toString(lpPriceAssetShare), toString(poolWeight), toString(inFee), toString(outFee), toString(poolOneTokenOperationsEnabled)], SEP))
532
+
            }
522
533
 
    }
523
534
 
524
535
 
525
536
 
526
537
 
@Callable(i)
527
538
 
func poolEvaluatePutByAmountAssetREADONLY (lpAsset,inAmAssetAmt) = {
528
539
 
    let poolAddress = addressFromStringValue(getStringByAddressOrFail(factoryDapp, keyFactoryLpAssetToPoolContractAddress(lpAsset)))
529
540
 
    let cfg = asAnyList(invoke(poolAddress, "getPoolConfigWrapperREADONLY", nil, nil))
530
541
 
    let lpAssetId = fromBase58String(asString(cfg[idxPoolLPAssetId]))
531
542
 
    let amAssetIdStr = asString(cfg[idxAmtAssetId])
532
543
 
    let amAssetId = fromBase58String(amAssetIdStr)
533
544
 
    let prAssetIdStr = asString(cfg[idxPriceAssetId])
534
545
 
    let prAssetId = fromBase58String(prAssetIdStr)
535
546
 
    let amtAssetDcm = parseIntValue(asString(cfg[idxAmtAssetDcm]))
536
547
 
    let priceAssetDcm = parseIntValue(asString(cfg[idxPriceAssetDcm]))
537
548
 
    let poolStatus = asString(cfg[idxPoolStatus])
538
549
 
    let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
539
550
 
    let accAmtAssetBalance = asInt(invoke(poolAddress, "getAccBalanceWrapperREADONLY", [amAssetIdStr], nil))
540
551
 
    let accPriceAssetBalance = asInt(invoke(poolAddress, "getAccBalanceWrapperREADONLY", [prAssetIdStr], nil))
541
552
 
    let amtAssetAmtX18 = parseBigIntValue(asString(invoke(poolAddress, "toX18WrapperREADONLY", [accAmtAssetBalance, amtAssetDcm], nil)))
542
553
 
    let priceAssetAmtX18 = parseBigIntValue(asString(invoke(poolAddress, "toX18WrapperREADONLY", [accPriceAssetBalance, priceAssetDcm], nil)))
543
554
 
    let curPriceX18 = if ((poolLPBalance == 0))
544
555
 
        then zeroBigInt
545
556
 
        else parseBigIntValue(asString(invoke(poolAddress, "calcPriceBigIntWrapperREADONLY", [toString(priceAssetAmtX18), toString(amtAssetAmtX18)], nil)))
546
557
 
    let curPrice = asInt(invoke(poolAddress, "fromX18WrapperREADONLY", [toString(curPriceX18), MULT8], nil))
547
558
 
    let inAmAssetAmtX18 = parseBigIntValue(asString(invoke(poolAddress, "toX18WrapperREADONLY", [inAmAssetAmt, amtAssetDcm], nil)))
548
559
 
    let inPrAssetAmtX18 = fraction(inAmAssetAmtX18, curPriceX18, MULT18)
549
560
 
    let inPrAssetAmt = asInt(invoke(poolAddress, "fromX18WrapperREADONLY", [toString(inPrAssetAmtX18), priceAssetDcm], nil))
550
561
 
    let res = invoke(poolAddress, "estimatePutOperationWrapperREADONLY", ["", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false], nil)
551
-
    let $t02283223185 =     match res {
562
+
    let $t02336423717 =     match res {
552
563
 
        case _ => 
553
564
 
            if (if (if ($isInstanceOf($match0._1, "Int"))
554
565
 
                then if ($isInstanceOf($match0._3, "Int"))
555
566
 
                    then if ($isInstanceOf($match0._4, "Int"))
556
567
 
                        then if ($isInstanceOf($match0._5, "Int"))
557
568
 
                            then $isInstanceOf($match0._6, "Int")
558
569
 
                            else false
559
570
 
                        else false
560
571
 
                    else false
561
572
 
                else false)
562
573
 
                then (size($match0) == 13)
563
574
 
                else false)
564
575
 
                then {
565
576
 
                    let calcLpAmt = $match0._1
566
577
 
                    let curPriceCalc = $match0._3
567
578
 
                    let amBalance = $match0._4
568
579
 
                    let prBalance = $match0._5
569
580
 
                    let lpEmission = $match0._6
570
581
 
                    $Tuple5(calcLpAmt, curPriceCalc, amBalance, prBalance, lpEmission)
571
582
 
                    }
572
583
 
                else throw("Couldn't cast types")
573
584
 
    }
574
-
    let calcLpAmt = $t02283223185._1
575
-
    let curPriceCalc = $t02283223185._2
576
-
    let amBalance = $t02283223185._3
577
-
    let prBalance = $t02283223185._4
578
-
    let lpEmission = $t02283223185._5
585
+
    let calcLpAmt = $t02336423717._1
586
+
    let curPriceCalc = $t02336423717._2
587
+
    let amBalance = $t02336423717._3
588
+
    let prBalance = $t02336423717._4
589
+
    let lpEmission = $t02336423717._5
579
590
 
    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d%d", toString(calcLpAmt), toString(curPrice), toString(amBalance), toString(prBalance), toString(lpEmission), poolStatus, toString(inAmAssetAmt), toString(inPrAssetAmt)], SEP))
580
591
 
    }
581
592
 
582
593
 
583
594
 
584
595
 
@Callable(i)
585
596
 
func poolEvaluatePutByPriceAssetREADONLY (lpAsset,inPrAssetAmt) = {
586
597
 
    let poolAddress = addressFromStringValue(getStringByAddressOrFail(factoryDapp, keyFactoryLpAssetToPoolContractAddress(lpAsset)))
587
598
 
    let cfg = asAnyList(invoke(poolAddress, "getPoolConfigWrapperREADONLY", nil, nil))
588
599
 
    let lpAssetId = fromBase58String(asString(cfg[idxPoolLPAssetId]))
589
600
 
    let amAssetIdStr = asString(cfg[idxAmtAssetId])
590
601
 
    let amAssetId = fromBase58String(amAssetIdStr)
591
602
 
    let prAssetIdStr = asString(cfg[idxPriceAssetId])
592
603
 
    let prAssetId = fromBase58String(prAssetIdStr)
593
604
 
    let amtAssetDcm = parseIntValue(asString(cfg[idxAmtAssetDcm]))
594
605
 
    let priceAssetDcm = parseIntValue(asString(cfg[idxPriceAssetDcm]))
595
606
 
    let poolStatus = asString(cfg[idxPoolStatus])
596
607
 
    let poolLPBalance = valueOrErrorMessage(assetInfo(lpAssetId), (("Asset " + toBase58String(lpAssetId)) + " doesn't exist")).quantity
597
608
 
    let amBalanceRaw = asInt(invoke(poolAddress, "getAccBalanceWrapperREADONLY", [amAssetIdStr], nil))
598
609
 
    let prBalanceRaw = asInt(invoke(poolAddress, "getAccBalanceWrapperREADONLY", [prAssetIdStr], nil))
599
610
 
    let amBalanceRawX18 = parseBigIntValue(asString(invoke(poolAddress, "toX18WrapperREADONLY", [amBalanceRaw, amtAssetDcm], nil)))
600
611
 
    let prBalanceRawX18 = parseBigIntValue(asString(invoke(poolAddress, "toX18WrapperREADONLY", [prBalanceRaw, priceAssetDcm], nil)))
601
612
 
    let curPriceX18 = if ((poolLPBalance == 0))
602
613
 
        then zeroBigInt
603
614
 
        else parseBigIntValue(asString(invoke(poolAddress, "calcPriceBigIntWrapperREADONLY", [toString(prBalanceRawX18), toString(amBalanceRawX18)], nil)))
604
615
 
    let curPrice = asInt(invoke(poolAddress, "fromX18WrapperREADONLY", [toString(curPriceX18), MULT8], nil))
605
616
 
    let inPrAssetAmtX18 = parseBigIntValue(asString(invoke(poolAddress, "toX18WrapperREADONLY", [inPrAssetAmt, priceAssetDcm], nil)))
606
617
 
    let inAmAssetAmtX18 = fraction(inPrAssetAmtX18, MULT18, curPriceX18)
607
618
 
    let inAmAssetAmt = asInt(invoke(poolAddress, "fromX18WrapperREADONLY", [toString(inAmAssetAmtX18), amtAssetDcm], nil))
608
619
 
    let res = invoke(poolAddress, "estimatePutOperationWrapperREADONLY", ["", 500000, inAmAssetAmt, amAssetId, inPrAssetAmt, prAssetId, "", true, false], nil)
609
-
    let $t02575826111 =     match res {
620
+
    let $t02629026643 =     match res {
610
621
 
        case _ => 
611
622
 
            if (if (if ($isInstanceOf($match0._1, "Int"))
612
623
 
                then if ($isInstanceOf($match0._3, "Int"))
613
624
 
                    then if ($isInstanceOf($match0._4, "Int"))
614
625
 
                        then if ($isInstanceOf($match0._5, "Int"))
615
626
 
                            then $isInstanceOf($match0._6, "Int")
616
627
 
                            else false
617
628
 
                        else false
618
629
 
                    else false
619
630
 
                else false)
620
631
 
                then (size($match0) == 13)
621
632
 
                else false)
622
633
 
                then {
623
634
 
                    let calcLpAmt = $match0._1
624
635
 
                    let curPriceCalc = $match0._3
625
636
 
                    let amBalance = $match0._4
626
637
 
                    let prBalance = $match0._5
627
638
 
                    let lpEmission = $match0._6
628
639
 
                    $Tuple5(calcLpAmt, curPriceCalc, amBalance, prBalance, lpEmission)
629
640
 
                    }
630
641
 
                else throw("Couldn't cast types")
631
642
 
    }
632
-
    let calcLpAmt = $t02575826111._1
633
-
    let curPriceCalc = $t02575826111._2
634
-
    let amBalance = $t02575826111._3
635
-
    let prBalance = $t02575826111._4
636
-
    let lpEmission = $t02575826111._5
643
+
    let calcLpAmt = $t02629026643._1
644
+
    let curPriceCalc = $t02629026643._2
645
+
    let amBalance = $t02629026643._3
646
+
    let prBalance = $t02629026643._4
647
+
    let lpEmission = $t02629026643._5
637
648
 
    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d%d", toString(calcLpAmt), toString(curPrice), toString(amBalance), toString(prBalance), toString(lpEmission), poolStatus, toString(inAmAssetAmt), toString(inPrAssetAmt)], SEP))
638
649
 
    }
639
650
 
640
651
 
641
652
 
642
653
 
@Callable(i)
643
654
 
func poolEvaluateGetREADONLY (paymentLpAssetId,paymentLpAmt) = {
644
655
 
    let poolAddress = addressFromStringValue(getStringByAddressOrFail(factoryDapp, keyFactoryLpAssetToPoolContractAddress(paymentLpAssetId)))
645
656
 
    let res = invoke(poolAddress, "estimateGetOperationWrapperREADONLY", ["", paymentLpAssetId, paymentLpAmt, toString(poolAddress)], nil)
646
-
    let $t02680627223 =     match res {
657
+
    let $t02733827755 =     match res {
647
658
 
        case _ => 
648
659
 
            if (if (if ($isInstanceOf($match0._1, "Int"))
649
660
 
                then if ($isInstanceOf($match0._2, "Int"))
650
661
 
                    then if ($isInstanceOf($match0._5, "Int"))
651
662
 
                        then if ($isInstanceOf($match0._6, "Int"))
652
663
 
                            then if ($isInstanceOf($match0._7, "Int"))
653
664
 
                                then if ($isInstanceOf($match0._8, "String"))
654
665
 
                                    then $isInstanceOf($match0._9, "String")
655
666
 
                                    else false
656
667
 
                                else false
657
668
 
                            else false
658
669
 
                        else false
659
670
 
                    else false
660
671
 
                else false)
661
672
 
                then (size($match0) == 10)
662
673
 
                else false)
663
674
 
                then {
664
675
 
                    let outAmAmt = $match0._1
665
676
 
                    let outPrAmt = $match0._2
666
677
 
                    let amBalance = $match0._5
667
678
 
                    let prBalance = $match0._6
668
679
 
                    let lpEmission = $match0._7
669
680
 
                    let curPrice = $match0._8
670
681
 
                    let poolStatus = $match0._9
671
682
 
                    $Tuple7(outAmAmt, outPrAmt, amBalance, prBalance, lpEmission, curPrice, poolStatus)
672
683
 
                    }
673
684
 
                else throw("Couldn't cast types")
674
685
 
    }
675
-
    let outAmAmt = $t02680627223._1
676
-
    let outPrAmt = $t02680627223._2
677
-
    let amBalance = $t02680627223._3
678
-
    let prBalance = $t02680627223._4
679
-
    let lpEmission = $t02680627223._5
680
-
    let curPrice = $t02680627223._6
681
-
    let poolStatus = $t02680627223._7
686
+
    let outAmAmt = $t02733827755._1
687
+
    let outPrAmt = $t02733827755._2
688
+
    let amBalance = $t02733827755._3
689
+
    let prBalance = $t02733827755._4
690
+
    let lpEmission = $t02733827755._5
691
+
    let curPrice = $t02733827755._6
692
+
    let poolStatus = $t02733827755._7
682
693
 
    $Tuple2(nil, makeString(["%d%d%d%d%d%d%d", toString(outAmAmt), toString(outPrAmt), toString(amBalance), toString(prBalance), toString(lpEmission), curPrice, poolStatus], SEP))
683
694
 
    }
684
695
 
685
696
 
686
697
 
687
698
 
@Callable(i)
688
699
 
func gwxUserInfoREADONLY (userAddress) = {
689
700
 
    let gwxUserInfoLIST = asAnyList(invoke(boostingDapp, "gwxUserInfoREADONLY", [userAddress], nil))
690
701
 
    let gwxAmount = asInt(gwxUserInfoLIST[0])
691
702
 
    $Tuple2(nil, makeString(["%d", toString(gwxAmount)], SEP))
692
703
 
    }
693
704
 
694
705
 
695
706
 
696
707
 
@Callable(i)
697
708
 
func unstakeAndGetOneTknV2 (poolAddress,unstakeAmount,outAssetId,minOutAmount) = {
698
709
 
    let inv = invoke(addressFromStringValue(poolAddress), "unstakeAndGetOneTknV2", [unstakeAmount, outAssetId, minOutAmount], nil)
699
710
 
    if ((inv == inv))
700
711
 
        then $Tuple2(nil, unit)
701
712
 
        else throw("Strict value is not equal to itself.")
702
713
 
    }
703
714
 
704
715
 
705
716
 
706
717
 
@Callable(i)
707
718
 
func getKeysBulkInternal (currentIter,keys,resAcc) = if ((currentIter == size(keys)))
708
719
 
    then $Tuple2(nil, resAcc)
709
720
 
    else {
710
721
 
        let k = split(keys[currentIter], "++")
711
722
 
        let addr = addressFromStringValue(k[0])
712
723
 
        let key = k[1]
713
724
 
        let type = k[2]
714
725
 
        let val = getKey(addr, key, type)
715
726
 
        let res = (resAcc :+ val)
716
727
 
        let inv = invoke(this, "getKeysBulkInternal", [(currentIter + 1), keys, res], nil)
717
728
 
        if ((inv == inv))
718
729
 
            then $Tuple2(nil, inv)
719
730
 
            else throw("Strict value is not equal to itself.")
720
731
 
        }
721
732
 
722
733
 
723
734
 
724
735
 
@Callable(i)
725
736
 
func getKeysBulk (keys) = {
726
737
 
    let res = invoke(this, "getKeysBulkInternal", [0, keys, nil], nil)
727
738
 
    $Tuple2(nil, res)
728
739
 
    }
729
740
 
730
741
 
731
742
 
732
743
 
@Callable(i)
733
744
 
func setManager (pendingManagerPublicKey) = {
734
745
 
    let checkCaller = mustManager(i)
735
746
 
    if ((checkCaller == checkCaller))
736
747
 
        then {
737
748
 
            let checkManagerPublicKey = fromBase58String(pendingManagerPublicKey)
738
749
 
            if ((checkManagerPublicKey == checkManagerPublicKey))
739
750
 
                then [StringEntry(keyPendingManagerPublicKey(), pendingManagerPublicKey)]
740
751
 
                else throw("Strict value is not equal to itself.")
741
752
 
            }
742
753
 
        else throw("Strict value is not equal to itself.")
743
754
 
    }
744
755
 
745
756
 
746
757
 
747
758
 
@Callable(i)
748
759
 
func confirmManager () = {
749
760
 
    let pm = pendingManagerPublicKeyOrUnit()
750
761
 
    let hasPM = if (isDefined(pm))
751
762
 
        then true
752
763
 
        else throw("No pending manager")
753
764
 
    if ((hasPM == hasPM))
754
765
 
        then {
755
766
 
            let checkPM = if ((i.callerPublicKey == value(pm)))
756
767
 
                then true
757
768
 
                else throw("You are not pending manager")
758
769
 
            if ((checkPM == checkPM))
759
770
 
                then [StringEntry(keyManagerPublicKey(), toBase58String(value(pm))), DeleteEntry(keyPendingManagerPublicKey())]
760
771
 
                else throw("Strict value is not equal to itself.")
761
772
 
            }
762
773
 
        else throw("Strict value is not equal to itself.")
763
774
 
    }
764
775
 
765
776
 
766
777
 
@Verifier(tx)
767
778
 
func verify () = {
768
779
 
    let targetPublicKey =     match managerPublicKeyOrUnit() {
769
780
 
        case pk: ByteVector => 
770
781
 
            pk
771
782
 
        case _: Unit => 
772
783
 
            tx.senderPublicKey
773
784
 
        case _ => 
774
785
 
            throw("Match error")
775
786
 
    }
776
787
 
    sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
777
788
 
    }
778
789
 

github/deemru/w8io/873ac7e 
100.68 ms ◑