w8 · tx · EAd···CR7

tx · EAdvzzmBtUyshwxbECnqyAVPPqin7LdNatUhPRF2rCR7

3N4r7DNT8t9WqaQWr8or1Hakm4AJfVDk6mS:  -0.01000000 Waves

2023.11.10 16:04 [2837283] smart account 3N4r7DNT8t9WqaQWr8or1Hakm4AJfVDk6mS > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "EAdvzzmBtUyshwxbECnqyAVPPqin7LdNatUhPRF2rCR7",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1699621503414,
    "version": 2,
    "chainId": 84,
    "sender": "3N4r7DNT8t9WqaQWr8or1Hakm4AJfVDk6mS",
    "senderPublicKey": "CMMtdSwXAf6tvNvyJDrdC5VGmRkcXU5CqmsapxKNPhLu",
    "proofs": [
        "5TigyWVP7re3gPHv3jPx5xQzRchfg7RpcLz3ia4ZdhCjgLrgHh81S1fpStC1tcDVqKqUw5jqtL5yu3sr3rUScdSf"
    ],
    "script": "base64:BgI5CAISBgoECAgBARIDCgEIEgASABIECgIICBIDCgEIEgMKAQgSAwoBARIDCgEBEgASAwoBARIDCgEIGQADU0VQAgJfXwAHZmVlUmFuawCQTgAJd3hBc3NldElkASB6bQLDKkAdN6wf+7trwy200VZFDNDd29aFKJLgHB2a4wAKc2J0QXNzZXRJZAEg7b51XE58aMp9lj9uI5FGnnl/9BHmO+37TVRB3Im5ctkADXdhdmVzRXhjaGFuZ2UBGgFU/Dsuc5FpNxWwmLp+YyVh+q94Okzod8AfABVjbGFpbVd4UmV3YXJkQ29udHJhY3QBGgFU/Dsuc5FpNxWwmLp+YyVh+q94Okzod8AfABBpc0NvbnN0cnVjdGVkS2V5Ag5pc19jb25zdHJ1Y3RlZAAPYWRtaW5BZGRyZXNzS2V5Ag1hZG1pbl9hZGRyZXNzAA5zYld4QXNzZXRJZEtleQIOc2Jfd3hfYXNzZXRfaWQACmxwUG9vbHNLZXkCCGxwX3Bvb2xzABdhZGRpdGlvbmFsUmV3YXJkUG9vbEtleQIWYWRkaXRpb25hbF9yZXdhcmRfcG9vbAAaYWRkaXRpb25hbFJld2FyZFBvb2xGZWVLZXkCGmFkZGl0aW9uYWxfcmV3YXJkX3Bvb2xfZmVlAA9zYnRTdGFrZVBvb2xLZXkCDnNidF9zdGFrZV9wb29sABJzYnRTdGFrZVBvb2xGZWVLZXkCEnNidF9zdGFrZV9wb29sX2ZlZQAbc2J0U3Rha2VQb29sVG90YWxDbGFpbWVkS2V5AhxzYnRfc3Rha2VfcG9vbF90b3RhbF9jbGFpbWVkABB0b3RhbFdYTG9ja2VkS2V5Ag90b3RhbF93eF9sb2NrZWQAGWluaXRpYWxTQlRUb2tlbnNBbW91bnRLZXkCGWluaXRpYWxfU0JUX3Rva2Vuc19hbW91bnQAJmJhc2VTQlRUb2tlbkFtb3VudEZvck9uZVJld2FyZFRva2VuS2V5AipiYXNlX1NCVF90b2tlbl9hbW91bnRfZm9yX29uZV9yZXdhcmRfdG9rZW4BCWFzUGF5bWVudAEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAg9BdHRhY2hlZFBheW1lbnQEAXAFByRtYXRjaDAFAXAJAAIBAiFmYWlsIHRvIGNhc3QgaW50byBBdHRhY2hlZFBheW1lbnQBDGFzQnl0ZVZlY3RvcgEBdgQHJG1hdGNoMAUBdgMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFwBQckbWF0Y2gwBQFwCQACAQIcZmFpbCB0byBjYXN0IGludG8gQnl0ZVZlY3RvcgEFYXNJbnQBA3ZhbAQHJG1hdGNoMAUDdmFsAwkAAQIFByRtYXRjaDACA0ludAQGdmFsSW50BQckbWF0Y2gwBQZ2YWxJbnQJAAIBAhVmYWlsIHRvIGNhc3QgaW50byBJbnQBD2FzQWRkcmVzc1N0cmluZwEHYWRkcmVzcwQHJG1hdGNoMAkApggBBQdhZGRyZXNzAwkAAQIFByRtYXRjaDACB0FkZHJlc3MEAWEFByRtYXRjaDAJAKUIAQUBYQkAAgECIGZhaWwgdG8gY2FzdCBpbnRvIEFkZHJlc3MgU3RyaW5nAR9jYWxjdWxhdGVDdXJyZW50UmV3YXJkU0JUQW1vdW50ARByZXdhcmRUb2tlbkNvdW50BCNiYXNlU0JUVG9rZW5BbW91bnRGb3JPbmVSZXdhcmRUb2tlbgkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwUmYmFzZVNCVFRva2VuQW1vdW50Rm9yT25lUmV3YXJkVG9rZW5LZXkEFmluaXRpYWxTQlRUb2tlbnNBbW91bnQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMFGWluaXRpYWxTQlRUb2tlbnNBbW91bnRLZXkEF2N1cnJlbnRTQlRUb2tlbnNCYWxhbmNlCQDwBwIFBHRoaXMFCnNidEFzc2V0SWQDCQAAAgUXY3VycmVudFNCVFRva2Vuc0JhbGFuY2UAAAAABCZjdXJyZW50U0JUVG9rZW5BbW91bnRGb3JPbmVSZXdhcmRUb2tlbgkAawMFI2Jhc2VTQlRUb2tlbkFtb3VudEZvck9uZVJld2FyZFRva2VuBRdjdXJyZW50U0JUVG9rZW5zQmFsYW5jZQUWaW5pdGlhbFNCVFRva2Vuc0Ftb3VudAQJYW1vdW50U0JUCQBoAgUQcmV3YXJkVG9rZW5Db3VudAUmY3VycmVudFNCVFRva2VuQW1vdW50Rm9yT25lUmV3YXJkVG9rZW4DCQBmAgUJYW1vdW50U0JUBRdjdXJyZW50U0JUVG9rZW5zQmFsYW5jZQUXY3VycmVudFNCVFRva2Vuc0JhbGFuY2UFCWFtb3VudFNCVAEQaXNBdXRob3JpemVkUG9vbAEEcG9vbAQLY2hlY2tlZFBvb2wJAQ9hc0FkZHJlc3NTdHJpbmcBBQRwb29sBAdscFBvb2xzCQERQGV4dHJOYXRpdmUoMTA1OCkBBQpscFBvb2xzS2V5CQEIY29udGFpbnMCBQdscFBvb2xzBQtjaGVja2VkUG9vbAELZ2V0UG9vbERhdGEBBHBvb2wDCQEBIQEJARBpc0F1dGhvcml6ZWRQb29sAQUEcG9vbAkAAgECE05vdCBhdXRob3JpemVkIHBvb2wEC3Bvb2xMcFRva2VuCQERQGV4dHJOYXRpdmUoMTA1MykCCQERQGV4dHJOYXRpdmUoMTA2MikBBQRwb29sAgV0b2tlbgQYd2F2ZXNFeGNoYW5nZVBvb2xBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA2MikBCQERQGV4dHJOYXRpdmUoMTA1OCkBBQRwb29sCQCUCgIFC3Bvb2xMcFRva2VuBRh3YXZlc0V4Y2hhbmdlUG9vbEFkZHJlc3MMAWkBC2NvbnN0cnVjdG9yBAxhZG1pbkFkZHJlc3MMc2J0U3Rha2VQb29sFmluaXRpYWxTQlRUb2tlbnNBbW91bnQac2J0VG9rZW5zRm9yT25lUmV3YXJkVG9rZW4DCQEJaXNEZWZpbmVkAQkAoAgBBRBpc0NvbnN0cnVjdGVkS2V5CQACAQIiQ29uc3RydWN0b3IgY2FuIGJlIGNhbGxlZCBvbmUgdGltZQQEc2JXeAkAwwgHAgh0ZXN0U2JXWAIAAAAACAYFBHVuaXQAAAQHYXNzZXRJZAkAuAgBBQRzYld4CQDMCAIFBHNiV3gJAMwIAgkBC1N0cmluZ0VudHJ5AgUOc2JXeEFzc2V0SWRLZXkJANgEAQUHYXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCBQ9hZG1pbkFkZHJlc3NLZXkJAQ9hc0FkZHJlc3NTdHJpbmcBBQxhZG1pbkFkZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgUPc2J0U3Rha2VQb29sS2V5CQEPYXNBZGRyZXNzU3RyaW5nAQUMc2J0U3Rha2VQb29sCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRJzYnRTdGFrZVBvb2xGZWVLZXkA+AoJAMwIAgkBDEludGVnZXJFbnRyeQIFG3NidFN0YWtlUG9vbFRvdGFsQ2xhaW1lZEtleQAACQDMCAIJAQtTdHJpbmdFbnRyeQIFCmxwUG9vbHNLZXkCAAkAzAgCCQELU3RyaW5nRW50cnkCBRdhZGRpdGlvbmFsUmV3YXJkUG9vbEtleQIACQDMCAIJAQxJbnRlZ2VyRW50cnkCBRphZGRpdGlvbmFsUmV3YXJkUG9vbEZlZUtleQDYBAkAzAgCCQEMQm9vbGVhbkVudHJ5AgUQaXNDb25zdHJ1Y3RlZEtleQYJAMwIAgkBDEludGVnZXJFbnRyeQIFEHRvdGFsV1hMb2NrZWRLZXkAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgUZaW5pdGlhbFNCVFRva2Vuc0Ftb3VudEtleQUWaW5pdGlhbFNCVFRva2Vuc0Ftb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUmYmFzZVNCVFRva2VuQW1vdW50Rm9yT25lUmV3YXJkVG9rZW5LZXkFGnNidFRva2Vuc0Zvck9uZVJld2FyZFRva2VuBQNuaWwBaQEUY2hhbmdlU0JUUG9vbEFkZHJlc3MBB2FkZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgUPc2J0U3Rha2VQb29sS2V5BQdhZGRyZXNzBQNuaWwBaQEIbWludFNiV3gAAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIUT25lIFBheW1lbnQgZXhwZWN0ZWQEB3BheW1lbnQJAQlhc1BheW1lbnQBCQCRAwIIBQFpCHBheW1lbnRzAAAEBmFtb3VudAgFB3BheW1lbnQGYW1vdW50AwMJAQIhPQIIBQdwYXltZW50B2Fzc2V0SWQFCXd4QXNzZXRJZAYJAGcCAAAFBmFtb3VudAkAAgECGFdyb25nIEFzc2V0IGlkIG9yIGFtb3VudAQNdG90YWxXWExvY2tlZAkBEUBleHRyTmF0aXZlKDEwNTUpAQUQdG90YWxXWExvY2tlZEtleQQLc2JXeEFzc2V0SWQJARFAZXh0ck5hdGl2ZSgxMDU4KQEFDnNiV3hBc3NldElkS2V5BBF3YXZlc0V4Y2hhbmdlSW5mbwkA/AcECQEHQWRkcmVzcwEFDXdhdmVzRXhjaGFuZ2UCF3VzZXJNYXhEdXJhdGlvblJFQURPTkxZBQNuaWwFA25pbAMJAAACBRF3YXZlc0V4Y2hhbmdlSW5mbwURd2F2ZXNFeGNoYW5nZUluZm8EByRtYXRjaDAFEXdhdmVzRXhjaGFuZ2VJbmZvAwkAAQIFByRtYXRjaDACDShTdHJpbmcsIEludCkEBXR1cGxlBQckbWF0Y2gwBAxmdW5jdGlvbk5hbWUIBQV0dXBsZQJfMQQPbWF4TG9ja0R1cmF0aW9uCAUFdHVwbGUCXzIEBnJlc3VsdAkA/AcECQEHQWRkcmVzcwEFDXdhdmVzRXhjaGFuZ2UFDGZ1bmN0aW9uTmFtZQkAzAgCBQ9tYXhMb2NrRHVyYXRpb24FA25pbAkAzAgCBQdwYXltZW50BQNuaWwDCQAAAgUGcmVzdWx0BQZyZXN1bHQEBHNiV3gJANkEAQULc2JXeEFzc2V0SWQJAMwIAgkBB1JlaXNzdWUDBQRzYld4BQZhbW91bnQGCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQgIBQFpBmNhbGxlcgVieXRlcwUGYW1vdW50BQRzYld4CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRB0b3RhbFdYTG9ja2VkS2V5CQBkAgUNdG90YWxXWExvY2tlZAUGYW1vdW50BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAhhGQVRBTDogSW5jb25zaXN0ZW50IGRhdGEJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEVY2xhaW1XeFN0YWtpbmdSZXdhcmRzAAQTY3VycmVudFd4T25Db250cmFjdAkA8AcCBQR0aGlzBQl3eEFzc2V0SWQDCQAAAgUTY3VycmVudFd4T25Db250cmFjdAUTY3VycmVudFd4T25Db250cmFjdAQLY2xhaW1SZXN1bHQJAPwHBAkBB0FkZHJlc3MBBRVjbGFpbVd4UmV3YXJkQ29udHJhY3QCC2NsYWltUmV3YXJkBQNuaWwFA25pbAMJAAACBQtjbGFpbVJlc3VsdAULY2xhaW1SZXN1bHQED25ld1d4T25Db250cmFjdAkA8AcCBQR0aGlzBQl3eEFzc2V0SWQEB2NsYWltZWQJAGUCBQ9uZXdXeE9uQ29udHJhY3QFE2N1cnJlbnRXeE9uQ29udHJhY3QDCQAAAgUHY2xhaW1lZAAACQACAQIQTm90aGluZyB0byBjbGFpbQQYc2J0U3Rha2VQb29sVG90YWxDbGFpbWVkCQERQGV4dHJOYXRpdmUoMTA1NSkBBRtzYnRTdGFrZVBvb2xUb3RhbENsYWltZWRLZXkJAMwIAgkBDEludGVnZXJFbnRyeQIFG3NidFN0YWtlUG9vbFRvdGFsQ2xhaW1lZEtleQkAZAIFGHNidFN0YWtlUG9vbFRvdGFsQ2xhaW1lZAUHY2xhaW1lZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBCQERQGV4dHJOYXRpdmUoMTA1OCkBBQ9zYnRTdGFrZVBvb2xLZXkFB2NsYWltZWQFCXd4QXNzZXRJZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBB2FkZFBvb2wCB2FkZHJlc3MYd2F2ZXNFeGNoYW5nZVBvb2xBZGRyZXNzAwkBAiE9AgkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzCQERQGV4dHJOYXRpdmUoMTA1OCkBBQ9hZG1pbkFkZHJlc3NLZXkJAAIBAiFPbmx5IEFkbWluIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24EB2xwUG9vbHMJARFAZXh0ck5hdGl2ZSgxMDU4KQEFCmxwUG9vbHNLZXkDCQEQaXNBdXRob3JpemVkUG9vbAEFB2FkZHJlc3MJAAIBAhJQb29sIGFscmVhZHkgYWRkZWQECG5ld1Bvb2xzAwkAAAIJALECAQUHbHBQb29scwAABQdhZGRyZXNzCQCsAgIJAKwCAgUHbHBQb29scwUDU0VQBQdhZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIFCmxwUG9vbHNLZXkFCG5ld1Bvb2xzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQ9hc0FkZHJlc3NTdHJpbmcBBQdhZGRyZXNzCQEPYXNBZGRyZXNzU3RyaW5nAQUYd2F2ZXNFeGNoYW5nZVBvb2xBZGRyZXNzBQNuaWwBaQEKcmVtb3ZlUG9vbAEHYWRkcmVzcwMJAQIhPQIJANgEAQgIBQFpBmNhbGxlcgVieXRlcwkBEUBleHRyTmF0aXZlKDEwNTgpAQUPYWRtaW5BZGRyZXNzS2V5CQACAQIhT25seSBBZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uBAdscFBvb2xzCQERQGV4dHJOYXRpdmUoMTA1OCkBBQpscFBvb2xzS2V5AwkBASEBCQEQaXNBdXRob3JpemVkUG9vbAEFB2FkZHJlc3MJAAIBAg5Qb29sIG5vdCBmb3VuZAQKcG9vbHNBcnJheQkAvAkCBQdscFBvb2xzBQNTRVAECXBvb2xJbmRleAkBBWFzSW50AQkAzwgCBQpwb29sc0FycmF5BQdhZGRyZXNzBAhuZXdQb29scwkAugkCCQDRCAIFCnBvb2xzQXJyYXkFCXBvb2xJbmRleAUDU0VQCQDOCAIJAMwIAgkBC1N0cmluZ0VudHJ5AgUKbHBQb29sc0tleQUIbmV3UG9vbHMJAMwIAgkBC0RlbGV0ZUVudHJ5AQUHYWRkcmVzcwUDbmlsAwkAAAIJARFAZXh0ck5hdGl2ZSgxMDU4KQEFF2FkZGl0aW9uYWxSZXdhcmRQb29sS2V5BQdhZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIFF2FkZGl0aW9uYWxSZXdhcmRQb29sS2V5AgAFA25pbAUDbmlsAWkBGHNldEFkZGl0aW9uYWxSZXdhcmRzUG9vbAEHYWRkcmVzcwMJAQIhPQIJANgEAQgIBQFpBmNhbGxlcgVieXRlcwkBEUBleHRyTmF0aXZlKDEwNTgpAQUPYWRtaW5BZGRyZXNzS2V5CQACAQIhT25seSBBZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAwkBASEBCQEQaXNBdXRob3JpemVkUG9vbAEFB2FkZHJlc3MJAAIBAjtPbmx5IGF1dGhvcml6ZWQgcG9vbCBjYW4gYmUgYWRkZWQgYXMgYWRkaXRpb25hbCByZXdhcmQgcG9vbAkAzAgCCQELU3RyaW5nRW50cnkCBRdhZGRpdGlvbmFsUmV3YXJkUG9vbEtleQUHYWRkcmVzcwUDbmlsAWkBG3NldEFkZGl0aW9uYWxSZXdhcmRzUG9vbEZlZQEDZmVlAwkBAiE9AgkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzCQERQGV4dHJOYXRpdmUoMTA1OCkBBQ9hZG1pbkFkZHJlc3NLZXkJAAIBAiFPbmx5IEFkbWluIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24DCQBmAgUDZmVlANAPCQACAQIcRmVlIGNhbid0IGJlIGJpZ2dlciB0aGFuIDIwJQMJAGYCAAAFA2ZlZQkAAgECFUZlZSBjYW4ndCBiZSBuZWdhdGl2ZQkAzAgCCQEMSW50ZWdlckVudHJ5AgUaYWRkaXRpb25hbFJld2FyZFBvb2xGZWVLZXkFA2ZlZQUDbmlsAWkBDXNldFNidFBvb2xGZWUBA2ZlZQMJAQIhPQIJANgEAQgIBQFpBmNhbGxlcgVieXRlcwkBEUBleHRyTmF0aXZlKDEwNTgpAQUPYWRtaW5BZGRyZXNzS2V5CQACAQIhT25seSBBZG1pbiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAwkAZgIFA2ZlZQDQDwkAAgECHEZlZSBjYW4ndCBiZSBiaWdnZXIgdGhhbiAyMCUDCQBmAgAABQNmZWUJAAIBAhVGZWUgY2FuJ3QgYmUgbmVnYXRpdmUJAMwIAgkBDEludGVnZXJFbnRyeQIFEnNidFN0YWtlUG9vbEZlZUtleQUDZmVlBQNuaWwBaQEMc3Rha2VQb29sTHBzAAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECFE9uZSBQYXltZW50IGV4cGVjdGVkBAhwb29sRGF0YQkBC2dldFBvb2xEYXRhAQkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBAtwb29sTHBUb2tlbggFCHBvb2xEYXRhAl8xBBh3YXZlc0V4Y2hhbmdlUG9vbEFkZHJlc3MIBQhwb29sRGF0YQJfMgQHcGF5bWVudAkBCWFzUGF5bWVudAEJAJEDAggFAWkIcGF5bWVudHMAAAMDCQECIT0CCAUHcGF5bWVudAdhc3NldElkCQDZBAEFC3Bvb2xMcFRva2VuBgkAZwIAAAgFB3BheW1lbnQGYW1vdW50CQACAQIbV3JvbmcgTFAgQXNzZXQgaWQgb3IgYW1vdW50BAZyZXN1bHQJAPwHBAUYd2F2ZXNFeGNoYW5nZVBvb2xBZGRyZXNzAgVzdGFrZQUDbmlsCQDMCAIFB3BheW1lbnQFA25pbAMJAAACBQZyZXN1bHQFBnJlc3VsdAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBD3dpdGhkcmF3UG9vbExwcwEGYW1vdW50BAhwb29sRGF0YQkBC2dldFBvb2xEYXRhAQkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBAtwb29sTHBUb2tlbggFCHBvb2xEYXRhAl8xBBh3YXZlc0V4Y2hhbmdlUG9vbEFkZHJlc3MIBQhwb29sRGF0YQJfMgQGcmVzdWx0CQD8BwQFGHdhdmVzRXhjaGFuZ2VQb29sQWRkcmVzcwIHdW5zdGFrZQkAzAgCBQtwb29sTHBUb2tlbgkAzAgCBQZhbW91bnQFA25pbAUDbmlsAwkAAAIFBnJlc3VsdAUGcmVzdWx0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQgIBQFpBmNhbGxlcgVieXRlcwUGYW1vdW50CQDZBAEFC3Bvb2xMcFRva2VuBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEQY2xhaW1Qb29sUmV3YXJkcwEEcG9vbAQLcG9vbEFkZHJlc3MJARFAZXh0ck5hdGl2ZSgxMDYyKQEFBHBvb2wECHBvb2xEYXRhCQELZ2V0UG9vbERhdGEBBQRwb29sBAtwb29sTHBUb2tlbggFCHBvb2xEYXRhAl8xBBh3YXZlc0V4Y2hhbmdlUG9vbEFkZHJlc3MIBQhwb29sRGF0YQJfMgQTY3VycmVudFdYT25Db250cmFjdAkA8AcCBQR0aGlzBQl3eEFzc2V0SWQDCQAAAgUTY3VycmVudFdYT25Db250cmFjdAUTY3VycmVudFdYT25Db250cmFjdAQLY2xhaW1SZXN1bHQJAPwHBAUYd2F2ZXNFeGNoYW5nZVBvb2xBZGRyZXNzAgdjbGFpbVdYCQDMCAIFC3Bvb2xMcFRva2VuBQNuaWwFA25pbAMJAAACBQtjbGFpbVJlc3VsdAULY2xhaW1SZXN1bHQED25ld1dYT25Db250cmFjdAkA8AcCBQR0aGlzBQl3eEFzc2V0SWQEB2NsYWltZWQJAGUCBQ9uZXdXWE9uQ29udHJhY3QFE2N1cnJlbnRXWE9uQ29udHJhY3QDCQAAAgUHY2xhaW1lZAAACQACAQIQTm90aGluZyB0byBjbGFpbQQPc2J0UmV3YXJkQW1vdW50CQEfY2FsY3VsYXRlQ3VycmVudFJld2FyZFNCVEFtb3VudAEFB2NsYWltZWQEEHNidFJld2FyZEFjdGlvbnMDCQAAAgUPc2J0UmV3YXJkQW1vdW50AAAFA25pbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQtwb29sQWRkcmVzcwUPc2J0UmV3YXJkQW1vdW50BQpzYnRBc3NldElkBQNuaWwEDHNidFN0YWtlUG9vbAkBEUBleHRyTmF0aXZlKDEwNjIpAQkBEUBleHRyTmF0aXZlKDEwNTgpAQUPc2J0U3Rha2VQb29sS2V5BA9zYnRTdGFrZVBvb2xGZWUJARFAZXh0ck5hdGl2ZSgxMDU1KQEFEnNidFN0YWtlUG9vbEZlZUtleQQYc2J0U3Rha2VQb29sVG90YWxDbGFpbWVkCQERQGV4dHJOYXRpdmUoMTA1NSkBBRtzYnRTdGFrZVBvb2xUb3RhbENsYWltZWRLZXkEEnNidFN0YWtlUG9vbEFtb3VudAkAbgQFB2NsYWltZWQFD3NidFN0YWtlUG9vbEZlZQUHZmVlUmFuawUGSEFMRlVQBBNzYnRTdGFrZVBvb2xBY3Rpb25zAwkAAAIFEnNidFN0YWtlUG9vbEFtb3VudAAABQNuaWwJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUMc2J0U3Rha2VQb29sBRJzYnRTdGFrZVBvb2xBbW91bnQFCXd4QXNzZXRJZAUDbmlsBBRhZGRpdGlvbmFsUmV3YXJkUG9vbAkBEUBleHRyTmF0aXZlKDEwNTgpAQUXYWRkaXRpb25hbFJld2FyZFBvb2xLZXkEGGFkZGl0aW9uYWxSZXdhcmRQb29sRnJlZQkBEUBleHRyTmF0aXZlKDEwNTUpAQUaYWRkaXRpb25hbFJld2FyZFBvb2xGZWVLZXkEGmFkZGl0aW9uYWxSZXdhcmRQb29sQW1vdW50AwkAAAIJALECAQUUYWRkaXRpb25hbFJld2FyZFBvb2wAAAAAAwkBAiE9AgUUYWRkaXRpb25hbFJld2FyZFBvb2wFBHBvb2wJAG4EBQdjbGFpbWVkBRhhZGRpdGlvbmFsUmV3YXJkUG9vbEZyZWUFB2ZlZVJhbmsFBkhBTEZVUAAABBxhZGRpdGlvbmFsUmV3YXJkc1Bvb2xBY3Rpb25zAwkAAAIFGmFkZGl0aW9uYWxSZXdhcmRQb29sQW1vdW50AAAFA25pbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBRRhZGRpdGlvbmFsUmV3YXJkUG9vbAUaYWRkaXRpb25hbFJld2FyZFBvb2xBbW91bnQFCXd4QXNzZXRJZAUDbmlsBAtwb29sQ2xhaW1lZAkAZQIJAGUCBQdjbGFpbWVkBRJzYnRTdGFrZVBvb2xBbW91bnQFGmFkZGl0aW9uYWxSZXdhcmRQb29sQW1vdW50CQDOCAIJAM4IAgkAzggCBRBzYnRSZXdhcmRBY3Rpb25zBRNzYnRTdGFrZVBvb2xBY3Rpb25zBRxhZGRpdGlvbmFsUmV3YXJkc1Bvb2xBY3Rpb25zCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRtzYnRTdGFrZVBvb2xUb3RhbENsYWltZWRLZXkJAGQCBRhzYnRTdGFrZVBvb2xUb3RhbENsYWltZWQFEnNidFN0YWtlUG9vbEFtb3VudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQtwb29sQWRkcmVzcwULcG9vbENsYWltZWQFCXd4QXNzZXRJZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAFSMhzc=",
    "height": 2837283,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: CmtxmCYWtcJeupfrW2k3w5DFiMHnF2u77qdv9DoTLM5a
Next: none

Diff: 
Old New Differences
125 125  
126 126  
127 127  @Callable(R)
128 - func changeSBTPoolAddress (B) = [StringEntry(getStringValue(m), B)]
128 + func changeSBTPoolAddress (B) = [StringEntry(m, B)]
129 129  
130 130  
131 131  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = "__"
5 5  
6 6  let b = 10000
7 7  
8 8  let c = base58'9Eu9de5GPPgLzY16bevCaxF4rFr4jA9wqyTfqcjksU82'
9 9  
10 10  let d = base58'H144sePa8bNCDFTzZNkUnk6QMz387T2ruKPMQ5DJ3DyS'
11 11  
12 12  let e = base58'3NCukxG6cc7pqKoEwTZsr1CRrHMHfvGM7ok'
13 13  
14 14  let f = base58'3NCukxG6cc7pqKoEwTZsr1CRrHMHfvGM7ok'
15 15  
16 16  let g = "is_constructed"
17 17  
18 18  let h = "admin_address"
19 19  
20 20  let i = "sb_wx_asset_id"
21 21  
22 22  let j = "lp_pools"
23 23  
24 24  let k = "additional_reward_pool"
25 25  
26 26  let l = "additional_reward_pool_fee"
27 27  
28 28  let m = "sbt_stake_pool"
29 29  
30 30  let n = "sbt_stake_pool_fee"
31 31  
32 32  let o = "sbt_stake_pool_total_claimed"
33 33  
34 34  let p = "total_wx_locked"
35 35  
36 36  let q = "initial_SBT_tokens_amount"
37 37  
38 38  let r = "base_SBT_token_amount_for_one_reward_token"
39 39  
40 40  func s (t) = {
41 41      let u = t
42 42      if ($isInstanceOf(u, "AttachedPayment"))
43 43          then {
44 44              let v = u
45 45              v
46 46              }
47 47          else throw("fail to cast into AttachedPayment")
48 48      }
49 49  
50 50  
51 51  func w (t) = {
52 52      let u = t
53 53      if ($isInstanceOf(u, "ByteVector"))
54 54          then {
55 55              let v = u
56 56              v
57 57              }
58 58          else throw("fail to cast into ByteVector")
59 59      }
60 60  
61 61  
62 62  func x (y) = {
63 63      let u = y
64 64      if ($isInstanceOf(u, "Int"))
65 65          then {
66 66              let z = u
67 67              z
68 68              }
69 69          else throw("fail to cast into Int")
70 70      }
71 71  
72 72  
73 73  func A (B) = {
74 74      let u = addressFromString(B)
75 75      if ($isInstanceOf(u, "Address"))
76 76          then {
77 77              let C = u
78 78              toString(C)
79 79              }
80 80          else throw("fail to cast into Address String")
81 81      }
82 82  
83 83  
84 84  func D (E) = {
85 85      let F = getIntegerValue(this, r)
86 86      let G = getIntegerValue(this, q)
87 87      let H = assetBalance(this, d)
88 88      if ((H == 0))
89 89          then 0
90 90          else {
91 91              let I = fraction(F, H, G)
92 92              let J = (E * I)
93 93              if ((J > H))
94 94                  then H
95 95                  else J
96 96              }
97 97      }
98 98  
99 99  
100 100  func K (L) = {
101 101      let M = A(L)
102 102      let N = getStringValue(j)
103 103      contains(N, M)
104 104      }
105 105  
106 106  
107 107  func O (L) = if (!(K(L)))
108 108      then throw("Not authorized pool")
109 109      else {
110 110          let P = getStringValue(addressFromStringValue(L), "token")
111 111          let Q = addressFromStringValue(getStringValue(L))
112 112          $Tuple2(P, Q)
113 113          }
114 114  
115 115  
116 116  @Callable(R)
117 117  func constructor (S,T,G,U) = if (isDefined(getBoolean(g)))
118 118      then throw("Constructor can be called one time")
119 119      else {
120 120          let V = Issue("testSbWX", "", 0, 8, true, unit, 0)
121 121          let W = calculateAssetId(V)
122 122  [V, StringEntry(i, toBase58String(W)), StringEntry(h, A(S)), StringEntry(m, A(T)), IntegerEntry(n, 1400), IntegerEntry(o, 0), StringEntry(j, ""), StringEntry(k, ""), IntegerEntry(l, 600), BooleanEntry(g, true), IntegerEntry(p, 0), IntegerEntry(q, G), IntegerEntry(r, U)]
123 123          }
124 124  
125 125  
126 126  
127 127  @Callable(R)
128 - func changeSBTPoolAddress (B) = [StringEntry(getStringValue(m), B)]
128 + func changeSBTPoolAddress (B) = [StringEntry(m, B)]
129 129  
130 130  
131 131  
132 132  @Callable(R)
133 133  func mintSbWx () = if ((size(R.payments) != 1))
134 134      then throw("One Payment expected")
135 135      else {
136 136          let X = s(R.payments[0])
137 137          let Y = X.amount
138 138          if (if ((X.assetId != c))
139 139              then true
140 140              else (0 >= Y))
141 141              then throw("Wrong Asset id or amount")
142 142              else {
143 143                  let Z = getIntegerValue(p)
144 144                  let aa = getStringValue(i)
145 145                  let ab = invoke(Address(e), "userMaxDurationREADONLY", nil, nil)
146 146                  if ((ab == ab))
147 147                      then {
148 148                          let u = ab
149 149                          if ($isInstanceOf(u, "(String, Int)"))
150 150                              then {
151 151                                  let ac = u
152 152                                  let ad = ac._1
153 153                                  let ae = ac._2
154 154                                  let af = invoke(Address(e), ad, [ae], [X])
155 155                                  if ((af == af))
156 156                                      then {
157 157                                          let V = fromBase58String(aa)
158 158  [Reissue(V, Y, true), ScriptTransfer(Address(R.caller.bytes), Y, V), IntegerEntry(p, (Z + Y))]
159 159                                          }
160 160                                      else throw("Strict value is not equal to itself.")
161 161                                  }
162 162                              else throw("FATAL: Inconsistent data")
163 163                          }
164 164                      else throw("Strict value is not equal to itself.")
165 165                  }
166 166          }
167 167  
168 168  
169 169  
170 170  @Callable(R)
171 171  func claimWxStakingRewards () = {
172 172      let ag = assetBalance(this, c)
173 173      if ((ag == ag))
174 174          then {
175 175              let ah = invoke(Address(f), "claimReward", nil, nil)
176 176              if ((ah == ah))
177 177                  then {
178 178                      let ai = assetBalance(this, c)
179 179                      let aj = (ai - ag)
180 180                      if ((aj == 0))
181 181                          then throw("Nothing to claim")
182 182                          else {
183 183                              let ak = getIntegerValue(o)
184 184  [IntegerEntry(o, (ak + aj)), ScriptTransfer(addressFromStringValue(getStringValue(m)), aj, c)]
185 185                              }
186 186                      }
187 187                  else throw("Strict value is not equal to itself.")
188 188              }
189 189          else throw("Strict value is not equal to itself.")
190 190      }
191 191  
192 192  
193 193  
194 194  @Callable(R)
195 195  func addPool (B,Q) = if ((toBase58String(R.caller.bytes) != getStringValue(h)))
196 196      then throw("Only Admin can call this function")
197 197      else {
198 198          let N = getStringValue(j)
199 199          if (K(B))
200 200              then throw("Pool already added")
201 201              else {
202 202                  let al = if ((size(N) == 0))
203 203                      then B
204 204                      else ((N + a) + B)
205 205  [StringEntry(j, al), StringEntry(A(B), A(Q))]
206 206                  }
207 207          }
208 208  
209 209  
210 210  
211 211  @Callable(R)
212 212  func removePool (B) = if ((toBase58String(R.caller.bytes) != getStringValue(h)))
213 213      then throw("Only Admin can call this function")
214 214      else {
215 215          let N = getStringValue(j)
216 216          if (!(K(B)))
217 217              then throw("Pool not found")
218 218              else {
219 219                  let am = split_4C(N, a)
220 220                  let an = x(indexOf(am, B))
221 221                  let al = makeString_2C(removeByIndex(am, an), a)
222 222                  ([StringEntry(j, al), DeleteEntry(B)] ++ (if ((getStringValue(k) == B))
223 223                      then [StringEntry(k, "")]
224 224                      else nil))
225 225                  }
226 226          }
227 227  
228 228  
229 229  
230 230  @Callable(R)
231 231  func setAdditionalRewardsPool (B) = if ((toBase58String(R.caller.bytes) != getStringValue(h)))
232 232      then throw("Only Admin can call this function")
233 233      else if (!(K(B)))
234 234          then throw("Only authorized pool can be added as additional reward pool")
235 235          else [StringEntry(k, B)]
236 236  
237 237  
238 238  
239 239  @Callable(R)
240 240  func setAdditionalRewardsPoolFee (ao) = if ((toBase58String(R.caller.bytes) != getStringValue(h)))
241 241      then throw("Only Admin can call this function")
242 242      else if ((ao > 2000))
243 243          then throw("Fee can't be bigger than 20%")
244 244          else if ((0 > ao))
245 245              then throw("Fee can't be negative")
246 246              else [IntegerEntry(l, ao)]
247 247  
248 248  
249 249  
250 250  @Callable(R)
251 251  func setSbtPoolFee (ao) = if ((toBase58String(R.caller.bytes) != getStringValue(h)))
252 252      then throw("Only Admin can call this function")
253 253      else if ((ao > 2000))
254 254          then throw("Fee can't be bigger than 20%")
255 255          else if ((0 > ao))
256 256              then throw("Fee can't be negative")
257 257              else [IntegerEntry(n, ao)]
258 258  
259 259  
260 260  
261 261  @Callable(R)
262 262  func stakePoolLps () = if ((size(R.payments) != 1))
263 263      then throw("One Payment expected")
264 264      else {
265 265          let ap = O(toBase58String(R.caller.bytes))
266 266          let P = ap._1
267 267          let Q = ap._2
268 268          let X = s(R.payments[0])
269 269          if (if ((X.assetId != fromBase58String(P)))
270 270              then true
271 271              else (0 >= X.amount))
272 272              then throw("Wrong LP Asset id or amount")
273 273              else {
274 274                  let af = invoke(Q, "stake", nil, [X])
275 275                  if ((af == af))
276 276                      then nil
277 277                      else throw("Strict value is not equal to itself.")
278 278                  }
279 279          }
280 280  
281 281  
282 282  
283 283  @Callable(R)
284 284  func withdrawPoolLps (Y) = {
285 285      let ap = O(toBase58String(R.caller.bytes))
286 286      let P = ap._1
287 287      let Q = ap._2
288 288      let af = invoke(Q, "unstake", [P, Y], nil)
289 289      if ((af == af))
290 290          then [ScriptTransfer(Address(R.caller.bytes), Y, fromBase58String(P))]
291 291          else throw("Strict value is not equal to itself.")
292 292      }
293 293  
294 294  
295 295  
296 296  @Callable(R)
297 297  func claimPoolRewards (L) = {
298 298      let aq = addressFromStringValue(L)
299 299      let ap = O(L)
300 300      let P = ap._1
301 301      let Q = ap._2
302 302      let ar = assetBalance(this, c)
303 303      if ((ar == ar))
304 304          then {
305 305              let ah = invoke(Q, "claimWX", [P], nil)
306 306              if ((ah == ah))
307 307                  then {
308 308                      let as = assetBalance(this, c)
309 309                      let aj = (as - ar)
310 310                      if ((aj == 0))
311 311                          then throw("Nothing to claim")
312 312                          else {
313 313                              let at = D(aj)
314 314                              let au = if ((at == 0))
315 315                                  then nil
316 316                                  else [ScriptTransfer(aq, at, d)]
317 317                              let T = addressFromStringValue(getStringValue(m))
318 318                              let av = getIntegerValue(n)
319 319                              let ak = getIntegerValue(o)
320 320                              let aw = fraction(aj, av, b, HALFUP)
321 321                              let ax = if ((aw == 0))
322 322                                  then nil
323 323                                  else [ScriptTransfer(T, aw, c)]
324 324                              let ay = getStringValue(k)
325 325                              let az = getIntegerValue(l)
326 326                              let aA = if ((size(ay) == 0))
327 327                                  then 0
328 328                                  else if ((ay != L))
329 329                                      then fraction(aj, az, b, HALFUP)
330 330                                      else 0
331 331                              let aB = if ((aA == 0))
332 332                                  then nil
333 333                                  else [ScriptTransfer(addressFromStringValue(ay), aA, c)]
334 334                              let aC = ((aj - aw) - aA)
335 335                              (((au ++ ax) ++ aB) ++ [IntegerEntry(o, (ak + aw)), ScriptTransfer(aq, aC, c)])
336 336                              }
337 337                      }
338 338                  else throw("Strict value is not equal to itself.")
339 339              }
340 340          else throw("Strict value is not equal to itself.")
341 341      }
342 342  
343 343

Old	New		Differences
125	125
126	126
127	127		@Callable(R)
128		-	func changeSBTPoolAddress (B) = [StringEntry(~~getStringValue(~~m), B)]
	128	+	func changeSBTPoolAddress (B) = [StringEntry(m, B)]
129	129
130	130
131	131

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let a = "__"
5	5
6	6		let b = 10000
7	7
8	8		let c = base58'9Eu9de5GPPgLzY16bevCaxF4rFr4jA9wqyTfqcjksU82'
9	9
10	10		let d = base58'H144sePa8bNCDFTzZNkUnk6QMz387T2ruKPMQ5DJ3DyS'
11	11
12	12		let e = base58'3NCukxG6cc7pqKoEwTZsr1CRrHMHfvGM7ok'
13	13
14	14		let f = base58'3NCukxG6cc7pqKoEwTZsr1CRrHMHfvGM7ok'
15	15
16	16		let g = "is_constructed"
17	17
18	18		let h = "admin_address"
19	19
20	20		let i = "sb_wx_asset_id"
21	21
22	22		let j = "lp_pools"
23	23
24	24		let k = "additional_reward_pool"
25	25
26	26		let l = "additional_reward_pool_fee"
27	27
28	28		let m = "sbt_stake_pool"
29	29
30	30		let n = "sbt_stake_pool_fee"
31	31
32	32		let o = "sbt_stake_pool_total_claimed"
33	33
34	34		let p = "total_wx_locked"
35	35
36	36		let q = "initial_SBT_tokens_amount"
37	37
38	38		let r = "base_SBT_token_amount_for_one_reward_token"
39	39
40	40		func s (t) = {
41	41		let u = t
42	42		if ($isInstanceOf(u, "AttachedPayment"))
43	43		then {
44	44		let v = u
45	45		v
46	46		}
47	47		else throw("fail to cast into AttachedPayment")
48	48		}
49	49
50	50
51	51		func w (t) = {
52	52		let u = t
53	53		if ($isInstanceOf(u, "ByteVector"))
54	54		then {
55	55		let v = u
56	56		v
57	57		}
58	58		else throw("fail to cast into ByteVector")
59	59		}
60	60
61	61
62	62		func x (y) = {
63	63		let u = y
64	64		if ($isInstanceOf(u, "Int"))
65	65		then {
66	66		let z = u
67	67		z
68	68		}
69	69		else throw("fail to cast into Int")
70	70		}
71	71
72	72
73	73		func A (B) = {
74	74		let u = addressFromString(B)
75	75		if ($isInstanceOf(u, "Address"))
76	76		then {
77	77		let C = u
78	78		toString(C)
79	79		}
80	80		else throw("fail to cast into Address String")
81	81		}
82	82
83	83
84	84		func D (E) = {
85	85		let F = getIntegerValue(this, r)
86	86		let G = getIntegerValue(this, q)
87	87		let H = assetBalance(this, d)
88	88		if ((H == 0))
89	89		then 0
90	90		else {
91	91		let I = fraction(F, H, G)
92	92		let J = (E * I)
93	93		if ((J > H))
94	94		then H
95	95		else J
96	96		}
97	97		}
98	98
99	99
100	100		func K (L) = {
101	101		let M = A(L)
102	102		let N = getStringValue(j)
103	103		contains(N, M)
104	104		}
105	105
106	106
107	107		func O (L) = if (!(K(L)))
108	108		then throw("Not authorized pool")
109	109		else {
110	110		let P = getStringValue(addressFromStringValue(L), "token")
111	111		let Q = addressFromStringValue(getStringValue(L))
112	112		$Tuple2(P, Q)
113	113		}
114	114
115	115
116	116		@Callable(R)
117	117		func constructor (S,T,G,U) = if (isDefined(getBoolean(g)))
118	118		then throw("Constructor can be called one time")
119	119		else {
120	120		let V = Issue("testSbWX", "", 0, 8, true, unit, 0)
121	121		let W = calculateAssetId(V)
122	122		[V, StringEntry(i, toBase58String(W)), StringEntry(h, A(S)), StringEntry(m, A(T)), IntegerEntry(n, 1400), IntegerEntry(o, 0), StringEntry(j, ""), StringEntry(k, ""), IntegerEntry(l, 600), BooleanEntry(g, true), IntegerEntry(p, 0), IntegerEntry(q, G), IntegerEntry(r, U)]
123	123		}
124	124
125	125
126	126
127	127		@Callable(R)
128		-	func changeSBTPoolAddress (B) = [StringEntry(~~getStringValue(~~m), B)]
	128	+	func changeSBTPoolAddress (B) = [StringEntry(m, B)]
129	129
130	130
131	131
132	132		@Callable(R)
133	133		func mintSbWx () = if ((size(R.payments) != 1))
134	134		then throw("One Payment expected")
135	135		else {
136	136		let X = s(R.payments[0])
137	137		let Y = X.amount
138	138		if (if ((X.assetId != c))
139	139		then true
140	140		else (0 >= Y))
141	141		then throw("Wrong Asset id or amount")
142	142		else {
143	143		let Z = getIntegerValue(p)
144	144		let aa = getStringValue(i)
145	145		let ab = invoke(Address(e), "userMaxDurationREADONLY", nil, nil)
146	146		if ((ab == ab))
147	147		then {
148	148		let u = ab
149	149		if ($isInstanceOf(u, "(String, Int)"))
150	150		then {
151	151		let ac = u
152	152		let ad = ac._1
153	153		let ae = ac._2
154	154		let af = invoke(Address(e), ad, [ae], [X])
155	155		if ((af == af))
156	156		then {
157	157		let V = fromBase58String(aa)
158	158		[Reissue(V, Y, true), ScriptTransfer(Address(R.caller.bytes), Y, V), IntegerEntry(p, (Z + Y))]
159	159		}
160	160		else throw("Strict value is not equal to itself.")
161	161		}
162	162		else throw("FATAL: Inconsistent data")
163	163		}
164	164		else throw("Strict value is not equal to itself.")
165	165		}
166	166		}
167	167
168	168
169	169
170	170		@Callable(R)
171	171		func claimWxStakingRewards () = {
172	172		let ag = assetBalance(this, c)
173	173		if ((ag == ag))
174	174		then {
175	175		let ah = invoke(Address(f), "claimReward", nil, nil)
176	176		if ((ah == ah))
177	177		then {
178	178		let ai = assetBalance(this, c)
179	179		let aj = (ai - ag)
180	180		if ((aj == 0))
181	181		then throw("Nothing to claim")
182	182		else {
183	183		let ak = getIntegerValue(o)
184	184		[IntegerEntry(o, (ak + aj)), ScriptTransfer(addressFromStringValue(getStringValue(m)), aj, c)]
185	185		}
186	186		}
187	187		else throw("Strict value is not equal to itself.")
188	188		}
189	189		else throw("Strict value is not equal to itself.")
190	190		}
191	191
192	192
193	193
194	194		@Callable(R)
195	195		func addPool (B,Q) = if ((toBase58String(R.caller.bytes) != getStringValue(h)))
196	196		then throw("Only Admin can call this function")
197	197		else {
198	198		let N = getStringValue(j)
199	199		if (K(B))
200	200		then throw("Pool already added")
201	201		else {
202	202		let al = if ((size(N) == 0))
203	203		then B
204	204		else ((N + a) + B)
205	205		[StringEntry(j, al), StringEntry(A(B), A(Q))]
206	206		}
207	207		}
208	208
209	209
210	210
211	211		@Callable(R)
212	212		func removePool (B) = if ((toBase58String(R.caller.bytes) != getStringValue(h)))
213	213		then throw("Only Admin can call this function")
214	214		else {
215	215		let N = getStringValue(j)
216	216		if (!(K(B)))
217	217		then throw("Pool not found")
218	218		else {
219	219		let am = split_4C(N, a)
220	220		let an = x(indexOf(am, B))
221	221		let al = makeString_2C(removeByIndex(am, an), a)
222	222		([StringEntry(j, al), DeleteEntry(B)] ++ (if ((getStringValue(k) == B))
223	223		then [StringEntry(k, "")]
224	224		else nil))
225	225		}
226	226		}
227	227
228	228
229	229
230	230		@Callable(R)
231	231		func setAdditionalRewardsPool (B) = if ((toBase58String(R.caller.bytes) != getStringValue(h)))
232	232		then throw("Only Admin can call this function")
233	233		else if (!(K(B)))
234	234		then throw("Only authorized pool can be added as additional reward pool")
235	235		else [StringEntry(k, B)]
236	236
237	237
238	238
239	239		@Callable(R)
240	240		func setAdditionalRewardsPoolFee (ao) = if ((toBase58String(R.caller.bytes) != getStringValue(h)))
241	241		then throw("Only Admin can call this function")
242	242		else if ((ao > 2000))
243	243		then throw("Fee can't be bigger than 20%")
244	244		else if ((0 > ao))
245	245		then throw("Fee can't be negative")
246	246		else [IntegerEntry(l, ao)]
247	247
248	248
249	249
250	250		@Callable(R)
251	251		func setSbtPoolFee (ao) = if ((toBase58String(R.caller.bytes) != getStringValue(h)))
252	252		then throw("Only Admin can call this function")
253	253		else if ((ao > 2000))
254	254		then throw("Fee can't be bigger than 20%")
255	255		else if ((0 > ao))
256	256		then throw("Fee can't be negative")
257	257		else [IntegerEntry(n, ao)]
258	258
259	259
260	260
261	261		@Callable(R)
262	262		func stakePoolLps () = if ((size(R.payments) != 1))
263	263		then throw("One Payment expected")
264	264		else {
265	265		let ap = O(toBase58String(R.caller.bytes))
266	266		let P = ap._1
267	267		let Q = ap._2
268	268		let X = s(R.payments[0])
269	269		if (if ((X.assetId != fromBase58String(P)))
270	270		then true
271	271		else (0 >= X.amount))
272	272		then throw("Wrong LP Asset id or amount")
273	273		else {
274	274		let af = invoke(Q, "stake", nil, [X])
275	275		if ((af == af))
276	276		then nil
277	277		else throw("Strict value is not equal to itself.")
278	278		}
279	279		}
280	280
281	281
282	282
283	283		@Callable(R)
284	284		func withdrawPoolLps (Y) = {
285	285		let ap = O(toBase58String(R.caller.bytes))
286	286		let P = ap._1
287	287		let Q = ap._2
288	288		let af = invoke(Q, "unstake", [P, Y], nil)
289	289		if ((af == af))
290	290		then [ScriptTransfer(Address(R.caller.bytes), Y, fromBase58String(P))]
291	291		else throw("Strict value is not equal to itself.")
292	292		}
293	293
294	294
295	295
296	296		@Callable(R)
297	297		func claimPoolRewards (L) = {
298	298		let aq = addressFromStringValue(L)
299	299		let ap = O(L)
300	300		let P = ap._1
301	301		let Q = ap._2
302	302		let ar = assetBalance(this, c)
303	303		if ((ar == ar))
304	304		then {
305	305		let ah = invoke(Q, "claimWX", [P], nil)
306	306		if ((ah == ah))
307	307		then {
308	308		let as = assetBalance(this, c)
309	309		let aj = (as - ar)
310	310		if ((aj == 0))
311	311		then throw("Nothing to claim")
312	312		else {
313	313		let at = D(aj)
314	314		let au = if ((at == 0))
315	315		then nil
316	316		else [ScriptTransfer(aq, at, d)]
317	317		let T = addressFromStringValue(getStringValue(m))
318	318		let av = getIntegerValue(n)
319	319		let ak = getIntegerValue(o)
320	320		let aw = fraction(aj, av, b, HALFUP)
321	321		let ax = if ((aw == 0))
322	322		then nil
323	323		else [ScriptTransfer(T, aw, c)]
324	324		let ay = getStringValue(k)
325	325		let az = getIntegerValue(l)
326	326		let aA = if ((size(ay) == 0))
327	327		then 0
328	328		else if ((ay != L))
329	329		then fraction(aj, az, b, HALFUP)
330	330		else 0
331	331		let aB = if ((aA == 0))
332	332		then nil
333	333		else [ScriptTransfer(addressFromStringValue(ay), aA, c)]
334	334		let aC = ((aj - aw) - aA)
335	335		(((au ++ ax) ++ aB) ++ [IntegerEntry(o, (ak + aw)), ScriptTransfer(aq, aC, c)])
336	336		}
337	337		}
338	338		else throw("Strict value is not equal to itself.")
339	339		}
340	340		else throw("Strict value is not equal to itself.")
341	341		}
342	342
343	343

github/deemru/w8io/169f3d6 
59.03 ms ◑