w8 · tx · 8Tx···ppK

tx · 8TxLWrWRvX18P347dc4dKx3hi3pCtj1KP9ciiwtqSppK

3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS:  -0.01100000 Waves

2023.03.24 20:34 [2504405] smart account 3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "8TxLWrWRvX18P347dc4dKx3hi3pCtj1KP9ciiwtqSppK",
    "fee": 1100000,
    "feeAssetId": null,
    "timestamp": 1679679272028,
    "version": 2,
    "chainId": 84,
    "sender": "3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS",
    "senderPublicKey": "HP8sssVq1866F7CaPQJwgFrt6fsqhQjKwM84cL1wjD2a",
    "proofs": [
        "4TQDEoHCz4hmzByV6nDPsnND23eCrUq6DsKwax4r2xrnuWnfdiUS9qqwtBPfTQsVaJS9xHCxFsVm4fpLLKEGxtUT"
    ],
    "script": "base64:BgIeCAISBwoFCAEIAQESAwoBCBIDCgEIEgcKBQgIAQEBJgALU0ZfUE9TX1RZUEUCAlNGAAtXWF9QT1NfVFlQRQICV1gABlNDQUxFOACAwtcvAApGRUVfU0NBTEU2AMCEPQAUa1NGUG9vbEFBc3NldEJhbGFuY2UCD0FfYXNzZXRfYmFsYW5jZQAUa1NGUG9vbEJBc3NldEJhbGFuY2UCD0JfYXNzZXRfYmFsYW5jZQAPa1NGUG9vbEFBc3NldElkAgpBX2Fzc2V0X2lkAA9rU0ZQb29sQkFzc2V0SWQCCkJfYXNzZXRfaWQADmtTRlBvb2xTaGFyZUlkAg5zaGFyZV9hc3NldF9pZAAOa1NGUG9vbFZlcnNpb24CB3ZlcnNpb24AEGtTRkZhcm1pbmdTdGFrZWQCFF9zaGFyZV90b2tlbnNfbG9ja2VkAA1rVXNlclBvc2l0aW9uAg5fdXNlcl9wb3NpdGlvbgARa1VzZXJQb3NpdGlvblR5cGUCE191c2VyX3Bvc2l0aW9uX3R5cGUAEGtVc2VyUG9zaXRpb25OdW0CFV91c2VyX3Bvc2l0aW9uX251bWJlcgAOa1RvdGFsUG9zaXRpb24CD190b3RhbF9wb3NpdGlvbgAVa0F4bHlJbkZlZVdpdGhvdXRMb2FuAhZfYXhseV9mZWVfd2l0aG91dF9sb2FuABJrQXhseUluRmVlV2l0aExvYW4CE19heGx5X2ZlZV93aXRoX2xvYW4AC2tBeGx5Q2FwRmVlAg1fYXhseV9mZWVfY2FwAAprUmVxdWVzdElkAgtfcmVxdWVzdF9pZAAMa1JlcXVlc3RJdGVyAg1yZXF1ZXN0c19pdGVyAAVrUG9vbAIFcG9vbF8ACWtNb25leUJveAIOYXhseV9tb25leV9ib3gADmtTRkZhcm1pbmdBZGRyAhNzd29wZmlfZmFybWluZ19hZGRyAAxrTGVuZFNlcnZpY2UCEWxlbmRfc2VydmljZV9hZGRyAAhtb25leUJveAkBB0FkZHJlc3MBCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQlrTW9uZXlCb3gCGE5vIGF4bHkgbW9uZXlCb3ggYWRkcmVzcwEKaXNTZWxmQ2FsbAEBaQMJAAACCAUBaQZjYWxsZXIFBHRoaXMFBHVuaXQJAAIBAitPbmx5IGNvbnRyYWN0IGl0c2VsZiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQ5hY2NvdW50QmFsYW5jZQEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJpZAUHJG1hdGNoMAkA8AcCBQR0aGlzBQJpZAMJAAECBQckbWF0Y2gwAgRVbml0BAV3YXZlcwUHJG1hdGNoMAgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAAIBAgtNYXRjaCBlcnJvcgENZ2V0U0ZQb29sRGF0YQEIcG9vbEFkZHIJAJcKBQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ9rU0ZQb29sQUFzc2V0SWQCGUNhbid0IGdldCBwb29sIEEgYXNzZXQgaWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQhwb29sQWRkcgUPa1NGUG9vbEJBc3NldElkAhlDYW4ndCBnZXQgcG9vbCBCIGFzc2V0IGlkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUIcG9vbEFkZHIFFGtTRlBvb2xBQXNzZXRCYWxhbmNlAh5DYW4ndCBnZXQgcG9vbCBBIGFzc2V0IGJhbGFuY2UJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQhwb29sQWRkcgUUa1NGUG9vbEJBc3NldEJhbGFuY2UCHkNhbid0IGdldCBwb29sIEIgYXNzZXQgYmFsYW5jZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ5rU0ZQb29sU2hhcmVJZAIYQ2FuJ3QgZ2V0IHNoYXJlIGFzc2V0IGlkAQ1nZXRXWFBvb2xEYXRhAQhwb29sQWRkcgkAlwoFCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFD2tTRlBvb2xBQXNzZXRJZAIZQ2FuJ3QgZ2V0IHBvb2wgQSBhc3NldCBpZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ9rU0ZQb29sQkFzc2V0SWQCGUNhbid0IGdldCBwb29sIEIgYXNzZXQgaWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQhwb29sQWRkcgUUa1NGUG9vbEFBc3NldEJhbGFuY2UCHkNhbid0IGdldCBwb29sIEEgYXNzZXQgYmFsYW5jZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFCHBvb2xBZGRyBRRrU0ZQb29sQkFzc2V0QmFsYW5jZQIeQ2FuJ3QgZ2V0IHBvb2wgQiBhc3NldCBiYWxhbmNlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFDmtTRlBvb2xTaGFyZUlkAhhDYW4ndCBnZXQgc2hhcmUgYXNzZXQgaWQBFGdldEF4bHlUb3RhbFBvc2l0aW9uAQRwb29sCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUOa1RvdGFsUG9zaXRpb24AAAEYZ2V0TmV3VXNlclBvc2l0aW9uTnVtYmVyAgRwb29sBHVzZXIJAGQCCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFEGtVc2VyUG9zaXRpb25OdW0AAAABAQxnZXRBeGx5SW5GZWUCBHBvb2wId2l0aExvYW4DBQh3aXRoTG9hbgkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICBQRwb29sBRJrQXhseUluRmVlV2l0aExvYW4JARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUEcG9vbAUVa0F4bHlJbkZlZVdpdGhvdXRMb2FuARBnZXRTRkZhcm1pbmdBZGRyAAkBB0FkZHJlc3MBCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQ5rU0ZGYXJtaW5nQWRkcgIdQ2FuJ3QgZ2V0IHN3b3BmaSBmYXJtaW5nIGFkZHIBDmdldExlbmRTcnZBZGRyAAkBB0FkZHJlc3MBCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQxrTGVuZFNlcnZpY2UCG0Nhbid0IGdldCBsZW5kIHNlcnZpY2UgYWRkcgEMYXNzZXRJZFRvU3RyAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAmlkBQckbWF0Y2gwCQDYBAEFAmlkAwkAAQIFByRtYXRjaDACBFVuaXQEBXdhdmVzBQckbWF0Y2gwAgVXQVZFUwkAAgECC01hdGNoIGVycm9yAQ5hc3NldElkRnJvbVN0cgEHYXNzZXRJZAMJAAACBQdhc3NldElkAgVXQVZFUwUEdW5pdAkA2QQBBQdhc3NldElkAQ9yZXBsYW5pc2hTd29wRmkMBHVzZXIEcG9vbAh3aXRoTG9hbgRwbXRBCXBtdEFzc2V0QQRwbXRCCXBtdEFzc2V0QgRiYWxBBGJhbEIHc2hhcmVJZBN2aXJ0dWFsU3dhcFRva2VuUGF5E3ZpcnR1YWxTd2FwVG9rZW5HZXQEEnNoYXJlQmFsYW5jZUJlZm9yZQkBDmFjY291bnRCYWxhbmNlAQkA2QQBBQdzaGFyZUlkBAhwb29sQWRkcgkBB0FkZHJlc3MBCQDZBAEFBHBvb2wEBnJhdGlvQQkAawMFBlNDQUxFOAUEcG10QQUEYmFsQQQGcmF0aW9CCQBrAwUGU0NBTEU4BQRwbXRCBQRiYWxCBAskdDA0NTQ0NDgzNwMJAGYCBQZyYXRpb0IFBnJhdGlvQQQDcG10CQBuBAUEYmFsQgUGcmF0aW9BBQZTQ0FMRTgFB0NFSUxJTkcJAJYKBAUEcG10QQUDcG10CQBlAgUEcG10QgUDcG10BQlwbXRBc3NldEIEA3BtdAkAbgQFBGJhbEEFBnJhdGlvQgUGU0NBTEU4BQdDRUlMSU5HCQCWCgQFA3BtdAUEcG10QgkAZQIFBHBtdEEFA3BtdAUJcG10QXNzZXRBBApwbXRBbW91bnRBCAULJHQwNDU0NDQ4MzcCXzEECnBtdEFtb3VudEIIBQskdDA0NTQ0NDgzNwJfMgQGY2hhbmdlCAULJHQwNDU0NDQ4MzcCXzMEDWNoYW5nZUFzc2V0SWQIBQskdDA0NTQ0NDgzNwJfNAQEaW52MQMDCQBmAgUKcG10QW1vdW50QQAACQBmAgUKcG10QW1vdW50QgAABwQIcGF5bWVudHMJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQ5hc3NldElkRnJvbVN0cgEFCXBtdEFzc2V0QQUKcG10QW1vdW50QQkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDmFzc2V0SWRGcm9tU3RyAQUJcG10QXNzZXRCBQpwbXRBbW91bnRCBQNuaWwJAPwHBAUIcG9vbEFkZHICGHJlcGxlbmlzaFdpdGhUd29Ub2tlbnNWMgkAzAgCBwkAzAgCAAAFA25pbAUIcGF5bWVudHMAAAMJAAACBQRpbnYxBQRpbnYxBARpbnYyAwkAZgIFBmNoYW5nZQAABAhwYXltZW50cwkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDmFzc2V0SWRGcm9tU3RyAQUNY2hhbmdlQXNzZXRJZAUGY2hhbmdlBQNuaWwEBHZhcnMJAMwIAgUTdmlydHVhbFN3YXBUb2tlblBheQkAzAgCBRN2aXJ0dWFsU3dhcFRva2VuR2V0CQDMCAIHCQDMCAIAAAUDbmlsCQD8BwQFCHBvb2xBZGRyAhdyZXBsZW5pc2hXaXRoT25lVG9rZW5WMgUEdmFycwUIcGF5bWVudHMAAAMJAAACBQRpbnYyBQRpbnYyBBFzaGFyZUJhbGFuY2VBZnRlcgkBDmFjY291bnRCYWxhbmNlAQkA2QQBBQdzaGFyZUlkBAp0b3RhbFNoYXJlCQBlAgURc2hhcmVCYWxhbmNlQWZ0ZXIFEnNoYXJlQmFsYW5jZUJlZm9yZQQJYXhseUluRmVlCQBrAwUKdG90YWxTaGFyZQkAZQIFCkZFRV9TQ0FMRTYJAQxnZXRBeGx5SW5GZWUCBQRwb29sBQh3aXRoTG9hbgUKRkVFX1NDQUxFNgQRdXNlclNoYXJlRm9yU3Rha2UJAGUCBQp0b3RhbFNoYXJlBQlheGx5SW5GZWUDCQBnAgAABRF1c2VyU2hhcmVGb3JTdGFrZQkAAgECKGFtb3VudCBvZiBzdGFrZWQgc2hhcmV0b2tlbnMgbXVzdCBiZSA+IDAEBGludjMJAPwHBAkBEGdldFNGRmFybWluZ0FkZHIAAg9sb2NrU2hhcmVUb2tlbnMJAMwIAgUEcG9vbAkAzAgCAAAFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQdzaGFyZUlkBRF1c2VyU2hhcmVGb3JTdGFrZQUDbmlsAwkAAAIFBGludjMFBGludjMEC3RvdGFsQW1vdW50CQEUZ2V0QXhseVRvdGFsUG9zaXRpb24BBQRwb29sBAluZXdQb3NOdW0JARhnZXROZXdVc2VyUG9zaXRpb25OdW1iZXICBQRwb29sBQR1c2VyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFDmtUb3RhbFBvc2l0aW9uCQBkAgULdG90YWxBbW91bnQFEXVzZXJTaGFyZUZvclN0YWtlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgIBXwkApAMBBQluZXdQb3NOdW0FDWtVc2VyUG9zaXRpb24FEXVzZXJTaGFyZUZvclN0YWtlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyAgFfCQCkAwEFCW5ld1Bvc051bQURa1VzZXJQb3NpdGlvblR5cGUFC1NGX1BPU19UWVBFCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyBRBrVXNlclBvc2l0aW9uTnVtBQluZXdQb3NOdW0JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUIbW9uZXlCb3gFCWF4bHlJbkZlZQkA2QQBBQdzaGFyZUlkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BC3JlcGxhbmlzaFdYDAR1c2VyBHBvb2wId2l0aExvYW4EcG10QQlwbXRBc3NldEEEcG10QglwbXRBc3NldEIEYmFsQQRiYWxCB3NoYXJlSWQTdmlydHVhbFN3YXBUb2tlblBheRN2aXJ0dWFsU3dhcFRva2VuR2V0BBJzaGFyZUJhbGFuY2VCZWZvcmUJAQ5hY2NvdW50QmFsYW5jZQEJANkEAQUHc2hhcmVJZAQIcG9vbEFkZHIJAQdBZGRyZXNzAQkA2QQBBQRwb29sBAZyYXRpb0EJAGsDBQZTQ0FMRTgFBHBtdEEFBGJhbEEEBnJhdGlvQgkAawMFBlNDQUxFOAUEcG10QgUEYmFsQgQLJHQwNzAyMzczMTYDCQBmAgUGcmF0aW9CBQZyYXRpb0EEA3BtdAkAbgQFBGJhbEIFBnJhdGlvQQUGU0NBTEU4BQdDRUlMSU5HCQCWCgQFBHBtdEEFA3BtdAkAZQIFBHBtdEIFA3BtdAUJcG10QXNzZXRCBANwbXQJAG4EBQRiYWxBBQZyYXRpb0IFBlNDQUxFOAUHQ0VJTElORwkAlgoEBQNwbXQFBHBtdEIJAGUCBQRwbXRBBQNwbXQFCXBtdEFzc2V0QQQKcG10QW1vdW50QQgFCyR0MDcwMjM3MzE2Al8xBApwbXRBbW91bnRCCAULJHQwNzAyMzczMTYCXzIEBmNoYW5nZQgFCyR0MDcwMjM3MzE2Al8zBA1jaGFuZ2VBc3NldElkCAULJHQwNzAyMzczMTYCXzQEBGludjEDAwkAZgIFCnBtdEFtb3VudEEAAAkAZgIFCnBtdEFtb3VudEIAAAcECHBheW1lbnRzCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQEOYXNzZXRJZEZyb21TdHIBBQlwbXRBc3NldEEFCnBtdEFtb3VudEEJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQ5hc3NldElkRnJvbVN0cgEFCXBtdEFzc2V0QgUKcG10QW1vdW50QgUDbmlsCQD8BwQFCHBvb2xBZGRyAhhyZXBsZW5pc2hXaXRoVHdvVG9rZW5zVjIJAMwIAgcJAMwIAgAABQNuaWwFCHBheW1lbnRzAAADCQAAAgUEaW52MQUEaW52MQQEaW52MgMJAGYCBQZjaGFuZ2UAAAQIcGF5bWVudHMJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQ5hc3NldElkRnJvbVN0cgEFDWNoYW5nZUFzc2V0SWQFBmNoYW5nZQUDbmlsBAR2YXJzCQDMCAIFE3ZpcnR1YWxTd2FwVG9rZW5QYXkJAMwIAgUTdmlydHVhbFN3YXBUb2tlbkdldAkAzAgCBwkAzAgCAAAFA25pbAkA/AcEBQhwb29sQWRkcgIXcmVwbGVuaXNoV2l0aE9uZVRva2VuVjIFBHZhcnMFCHBheW1lbnRzAAADCQAAAgUEaW52MgUEaW52MgQRc2hhcmVCYWxhbmNlQWZ0ZXIJAQ5hY2NvdW50QmFsYW5jZQEJANkEAQUHc2hhcmVJZAQKdG90YWxTaGFyZQkAZQIFEXNoYXJlQmFsYW5jZUFmdGVyBRJzaGFyZUJhbGFuY2VCZWZvcmUECWF4bHlJbkZlZQkAawMFCnRvdGFsU2hhcmUJAGUCBQpGRUVfU0NBTEU2CQEMZ2V0QXhseUluRmVlAgUEcG9vbAUId2l0aExvYW4FCkZFRV9TQ0FMRTYEEXVzZXJTaGFyZUZvclN0YWtlCQBlAgUKdG90YWxTaGFyZQUJYXhseUluRmVlAwkAZwIAAAURdXNlclNoYXJlRm9yU3Rha2UJAAIBAihhbW91bnQgb2Ygc3Rha2VkIHNoYXJldG9rZW5zIG11c3QgYmUgPiAwBARpbnYzCQD8BwQJARBnZXRTRkZhcm1pbmdBZGRyAAIPbG9ja1NoYXJlVG9rZW5zCQDMCAIFBHBvb2wJAMwIAgAABQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUHc2hhcmVJZAURdXNlclNoYXJlRm9yU3Rha2UFA25pbAMJAAACBQRpbnYzBQRpbnYzBAt0b3RhbEFtb3VudAkBFGdldEF4bHlUb3RhbFBvc2l0aW9uAQUEcG9vbAQJbmV3UG9zTnVtCQEYZ2V0TmV3VXNlclBvc2l0aW9uTnVtYmVyAgUEcG9vbAUEdXNlcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBQ5rVG90YWxQb3NpdGlvbgkAZAIFC3RvdGFsQW1vdW50BRF1c2VyU2hhcmVGb3JTdGFrZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXICAV8JAKQDAQUJbmV3UG9zTnVtBQ1rVXNlclBvc2l0aW9uBRF1c2VyU2hhcmVGb3JTdGFrZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgIBXwkApAMBBQluZXdQb3NOdW0FEWtVc2VyUG9zaXRpb25UeXBlBQtTRl9QT1NfVFlQRQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUQa1VzZXJQb3NpdGlvbk51bQUJbmV3UG9zTnVtCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCG1vbmV5Qm94BQlheGx5SW5GZWUJANkEAQUHc2hhcmVJZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBAFpAQlyZXBsYW5pc2gFBHBvb2wMYm9ycm93QW1vdW50DWJvcnJvd0Fzc2V0SWQTdmlydHVhbFN3YXBUb2tlblBheRN2aXJ0dWFsU3dhcFRva2VuR2V0BAR0eXBlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwkArAICBQVrUG9vbAUEcG9vbAISUG9vbCBpcyBub3QgaW5pdGVkBAskdDA5MjAyOTQ1MwMJAAACBQR0eXBlBQtTRl9QT1NfVFlQRQkBDWdldFNGUG9vbERhdGEBCQEHQWRkcmVzcwEJANkEAQUEcG9vbAMJAAACBQR0eXBlBQtXWF9QT1NfVFlQRQkBDWdldFdYUG9vbERhdGEBCQEHQWRkcmVzcwEJANkEAQUEcG9vbAkAAgECD1dyb25nIHBvb2wgdHlwZQQDQUlkCAULJHQwOTIwMjk0NTMCXzEEA0JJZAgFCyR0MDkyMDI5NDUzAl8yBARiYWxBCAULJHQwOTIwMjk0NTMCXzMEBGJhbEIIBQskdDA5MjAyOTQ1MwJfNAQHc2hhcmVJZAgFCyR0MDkyMDI5NDUzAl81BAwkdDA5NDU3MTAwOTQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwACAwkBAiE9AgkBDGFzc2V0SWRUb1N0cgEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUDQUlkCQACAQIVV3JvbmcgcGF5bWVudCBhc3NldCBBAwkBAiE9AgkBDGFzc2V0SWRUb1N0cgEICQCRAwIIBQFpCHBheW1lbnRzAAEHYXNzZXRJZAUDQklkCQACAQIVV3JvbmcgcGF5bWVudCBhc3NldCBCCQCWCgQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BQNBSWQICQCRAwIIBQFpCHBheW1lbnRzAAEGYW1vdW50BQNCSWQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABAwkAAAIJAQxhc3NldElkVG9TdHIBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQFA0FJZAkAlgoECAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAUDQUlkAAAFA0JJZAMJAAACCQEMYXNzZXRJZFRvU3RyAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQNCSWQJAJYKBAAABQNBSWQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BQNCSWQJAAIBAg1Xcm9uZyBwYXltZW50CQACAQIcT25lIG9yIHR3byBwYXltZW50cyBleHBlY3RlZAQEcG10QQgFDCR0MDk0NTcxMDA5NAJfMQQJcG10QXNzZXRBCAUMJHQwOTQ1NzEwMDk0Al8yBARwbXRCCAUMJHQwOTQ1NzEwMDk0Al8zBAlwbXRBc3NldEIIBQwkdDA5NDU3MTAwOTQCXzQDCQBmAgUMYm9ycm93QW1vdW50AAAEB3JlcXVlc3QJALkJAgkAzAgCBQR0eXBlCQDMCAIJAKUIAQgFAWkGY2FsbGVyCQDMCAIFBHBvb2wJAMwIAgkApAMBBQRwbXRBCQDMCAIFCXBtdEFzc2V0QQkAzAgCCQCkAwEFBHBtdEIJAMwIAgUJcG10QXNzZXRCCQDMCAIJAKQDAQUEYmFsQQkAzAgCCQCkAwEFBGJhbEIJAMwIAgUHc2hhcmVJZAkAzAgCCQCkAwEFE3ZpcnR1YWxTd2FwVG9rZW5QYXkJAMwIAgkApAMBBRN2aXJ0dWFsU3dhcFRva2VuR2V0BQNuaWwCASwEDG5ld1JlcXVlc3RJZAoAAUAJAPwHBAUEdGhpcwIQY3JlYXRlTmV3UmVxdWVzdAkAzAgCBQdyZXF1ZXN0BQNuaWwFA25pbAMJAAECBQFAAgNJbnQFAUAFBHVuaXQDCQAAAgUMbmV3UmVxdWVzdElkBQxuZXdSZXF1ZXN0SWQEBGFyZ3MJAMwIAgkApQgBCAUBaQZjYWxsZXIJAMwIAgUHc2hhcmVJZAkAzAgCBQ1ib3Jyb3dBc3NldElkCQDMCAIFDGJvcnJvd0Ftb3VudAkAzAgCCQClCAEFBHRoaXMJAMwIAgIRcmVwbGFuaXNoRnJvbUxhbmQJAMwIAgkApAMBCQETdmFsdWVPckVycm9yTWVzc2FnZQIFDG5ld1JlcXVlc3RJZAIYQ2FuJ3QgY3JlYXRlIG5ldyByZXF1ZXN0BQNuaWwEA2ludgkA/QcECQEOZ2V0TGVuZFNydkFkZHIAAg1mbGFzaFBvc2l0aW9uBQRhcmdzBQNuaWwFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgMJAAACBQR0eXBlBQtTRl9QT1NfVFlQRQkBD3JlcGxhbmlzaFN3b3BGaQwJAKUIAQgFAWkGY2FsbGVyBQRwb29sBwUEcG10QQUJcG10QXNzZXRBBQRwbXRCBQlwbXRBc3NldEIFBGJhbEEFBGJhbEIFB3NoYXJlSWQFE3ZpcnR1YWxTd2FwVG9rZW5QYXkFE3ZpcnR1YWxTd2FwVG9rZW5HZXQJAAIBAgdDYW50IHd4AWkBEXJlcGxhbmlzaEZyb21MYW5kAQlyZXF1ZXN0SWQEB3JlcXVlc3QJALUJAgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgUJcmVxdWVzdElkBQprUmVxdWVzdElkCQCsAgICE05vIHJlcXVlc3Qgd2l0aCBpZCAFCXJlcXVlc3RJZAIBLAMJAAACCQCRAwIFB3JlcXVlc3QAAAULU0ZfUE9TX1RZUEUJAQ9yZXBsYW5pc2hTd29wRmkMCQCRAwIFB3JlcXVlc3QAAQkAkQMCBQdyZXF1ZXN0AAIGCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVxdWVzdAADCQCRAwIFB3JlcXVlc3QABAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3JlcXVlc3QABQkAkQMCBQdyZXF1ZXN0AAYJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdyZXF1ZXN0AAcJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdyZXF1ZXN0AAgJAJEDAgUHcmVxdWVzdAAJCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVxdWVzdAAKCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVxdWVzdAALCQACAQIHQ2FudCB3eAFpARBjcmVhdGVOZXdSZXF1ZXN0AQZwYXJhbXMJAQt2YWx1ZU9yRWxzZQIJAQppc1NlbGZDYWxsAQUBaQQMbmV3UmVxdWVzdElkCQBkAgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQxrUmVxdWVzdEl0ZXIAAAABCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCkAwEFDG5ld1JlcXVlc3RJZAUKa1JlcXVlc3RJZAUGcGFyYW1zBQNuaWwFDG5ld1JlcXVlc3RJZAFpAQtpbml0TmV3UG9vbAUEdHlwZQhwb29sQWRkcgtpbkZlZU5vTG9hbglpbkZlZUxvYW4GY2FwRmVlAwMJAQIhPQIFBHR5cGUFC1NGX1BPU19UWVBFCQECIT0CBQR0eXBlBQtXWF9QT1NfVFlQRQcJAAIBAgpXcm9uZyB0eXBlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCHBvb2xBZGRyBRVrQXhseUluRmVlV2l0aG91dExvYW4FC2luRmVlTm9Mb2FuCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCHBvb2xBZGRyBRJrQXhseUluRmVlV2l0aExvYW4FC2luRmVlTm9Mb2FuCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCHBvb2xBZGRyBQtrQXhseUNhcEZlZQUGY2FwRmVlCQDMCAIJAQtTdHJpbmdFbnRyeQIFBWtQb29sBQR0eXBlBQNuaWwBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5W9xiMQ==",
    "height": 2504405,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Ary5AQ2rFWpkDw3FAZPVhYBtFtkhA2wfkovPMfvzi8Yz
Next: 3TtxvoLvKwh4DMLmb5TWXLMXZVNATxU8Fvx32hJHeLhd

Diff: 
Old New Differences
47 47  
48 48  let w = "swopfi_farming_addr"
49 49  
50 - let x = "lendServiceAddr"
50 + let x = "lend_service_addr"
51 51  
52 52  let y = Address(fromBase58String(valueOrErrorMessage(getString(this, v), "No axly moneyBox address")))
53 53  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = "SF"
5 5  
6 6  let b = "WX"
7 7  
8 8  let c = 100000000
9 9  
10 10  let d = 1000000
11 11  
12 12  let e = "A_asset_balance"
13 13  
14 14  let f = "B_asset_balance"
15 15  
16 16  let g = "A_asset_id"
17 17  
18 18  let h = "B_asset_id"
19 19  
20 20  let i = "share_asset_id"
21 21  
22 22  let j = "version"
23 23  
24 24  let k = "_share_tokens_locked"
25 25  
26 26  let l = "_user_position"
27 27  
28 28  let m = "_user_position_type"
29 29  
30 30  let n = "_user_position_number"
31 31  
32 32  let o = "_total_position"
33 33  
34 34  let p = "_axly_fee_without_loan"
35 35  
36 36  let q = "_axly_fee_with_loan"
37 37  
38 38  let r = "_axly_fee_cap"
39 39  
40 40  let s = "_request_id"
41 41  
42 42  let t = "requests_iter"
43 43  
44 44  let u = "pool_"
45 45  
46 46  let v = "axly_money_box"
47 47  
48 48  let w = "swopfi_farming_addr"
49 49  
50 - let x = "lendServiceAddr"
50 + let x = "lend_service_addr"
51 51  
52 52  let y = Address(fromBase58String(valueOrErrorMessage(getString(this, v), "No axly moneyBox address")))
53 53  
54 54  func z (A) = if ((A.caller == this))
55 55      then unit
56 56      else throw("Only contract itself can call this function")
57 57  
58 58  
59 59  func B (C) = {
60 60      let D = C
61 61      if ($isInstanceOf(D, "ByteVector"))
62 62          then {
63 63              let E = D
64 64              assetBalance(this, E)
65 65              }
66 66          else if ($isInstanceOf(D, "Unit"))
67 67              then {
68 68                  let F = D
69 69                  wavesBalance(this).available
70 70                  }
71 71              else throw("Match error")
72 72      }
73 73  
74 74  
75 75  func G (H) = $Tuple5(valueOrErrorMessage(getString(H, g), "Can't get pool A asset id"), valueOrErrorMessage(getString(H, h), "Can't get pool B asset id"), valueOrErrorMessage(getInteger(H, e), "Can't get pool A asset balance"), valueOrErrorMessage(getInteger(H, f), "Can't get pool B asset balance"), valueOrErrorMessage(getString(H, i), "Can't get share asset id"))
76 76  
77 77  
78 78  func I (H) = $Tuple5(valueOrErrorMessage(getString(H, g), "Can't get pool A asset id"), valueOrErrorMessage(getString(H, h), "Can't get pool B asset id"), valueOrErrorMessage(getInteger(H, e), "Can't get pool A asset balance"), valueOrErrorMessage(getInteger(H, f), "Can't get pool B asset balance"), valueOrErrorMessage(getString(H, i), "Can't get share asset id"))
79 79  
80 80  
81 81  func J (K) = valueOrElse(getInteger(this, (K + o)), 0)
82 82  
83 83  
84 84  func L (K,M) = (valueOrElse(getInteger(this, (((K + "_") + M) + n)), 0) + 1)
85 85  
86 86  
87 87  func N (K,O) = if (O)
88 88      then getIntegerValue(this, (K + q))
89 89      else getIntegerValue(this, (K + p))
90 90  
91 91  
92 92  func P () = Address(fromBase58String(valueOrErrorMessage(getString(this, w), "Can't get swopfi farming addr")))
93 93  
94 94  
95 95  func Q () = Address(fromBase58String(valueOrErrorMessage(getString(this, x), "Can't get lend service addr")))
96 96  
97 97  
98 98  func R (C) = {
99 99      let D = C
100 100      if ($isInstanceOf(D, "ByteVector"))
101 101          then {
102 102              let E = D
103 103              toBase58String(E)
104 104              }
105 105          else if ($isInstanceOf(D, "Unit"))
106 106              then {
107 107                  let F = D
108 108                  "WAVES"
109 109                  }
110 110              else throw("Match error")
111 111      }
112 112  
113 113  
114 114  func S (C) = if ((C == "WAVES"))
115 115      then unit
116 116      else fromBase58String(C)
117 117  
118 118  
119 119  func T (M,K,O,U,V,W,X,Y,Z,aa,ab,ac) = {
120 120      let ad = B(fromBase58String(aa))
121 121      let H = Address(fromBase58String(K))
122 122      let ae = fraction(c, U, Y)
123 123      let af = fraction(c, W, Z)
124 124      let ag = if ((af > ae))
125 125          then {
126 126              let ah = fraction(Z, ae, c, CEILING)
127 127              $Tuple4(U, ah, (W - ah), X)
128 128              }
129 129          else {
130 130              let ah = fraction(Y, af, c, CEILING)
131 131              $Tuple4(ah, W, (U - ah), V)
132 132              }
133 133      let ai = ag._1
134 134      let aj = ag._2
135 135      let ak = ag._3
136 136      let al = ag._4
137 137      let am = if (if ((ai > 0))
138 138          then (aj > 0)
139 139          else false)
140 140          then {
141 141              let an = [AttachedPayment(S(V), ai), AttachedPayment(S(X), aj)]
142 142              invoke(H, "replenishWithTwoTokensV2", [false, 0], an)
143 143              }
144 144          else 0
145 145      if ((am == am))
146 146          then {
147 147              let ao = if ((ak > 0))
148 148                  then {
149 149                      let an = [AttachedPayment(S(al), ak)]
150 150                      let ap = [ab, ac, false, 0]
151 151                      invoke(H, "replenishWithOneTokenV2", ap, an)
152 152                      }
153 153                  else 0
154 154              if ((ao == ao))
155 155                  then {
156 156                      let aq = B(fromBase58String(aa))
157 157                      let ar = (aq - ad)
158 158                      let as = fraction(ar, (d - N(K, O)), d)
159 159                      let at = (ar - as)
160 160                      if ((0 >= at))
161 161                          then throw("amount of staked sharetokens must be > 0")
162 162                          else {
163 163                              let au = invoke(P(), "lockShareTokens", [K, 0], [AttachedPayment(fromBase58String(aa), at)])
164 164                              if ((au == au))
165 165                                  then {
166 166                                      let av = J(K)
167 167                                      let aw = L(K, M)
168 168  [IntegerEntry((K + o), (av + at)), IntegerEntry((((((K + "_") + M) + "_") + toString(aw)) + l), at), StringEntry((((((K + "_") + M) + "_") + toString(aw)) + m), a), IntegerEntry((((K + "_") + M) + n), aw), ScriptTransfer(y, as, fromBase58String(aa))]
169 169                                      }
170 170                                  else throw("Strict value is not equal to itself.")
171 171                              }
172 172                      }
173 173                  else throw("Strict value is not equal to itself.")
174 174              }
175 175          else throw("Strict value is not equal to itself.")
176 176      }
177 177  
178 178  
179 179  func ax (M,K,O,U,V,W,X,Y,Z,aa,ab,ac) = {
180 180      let ad = B(fromBase58String(aa))
181 181      let H = Address(fromBase58String(K))
182 182      let ae = fraction(c, U, Y)
183 183      let af = fraction(c, W, Z)
184 184      let ay = if ((af > ae))
185 185          then {
186 186              let ah = fraction(Z, ae, c, CEILING)
187 187              $Tuple4(U, ah, (W - ah), X)
188 188              }
189 189          else {
190 190              let ah = fraction(Y, af, c, CEILING)
191 191              $Tuple4(ah, W, (U - ah), V)
192 192              }
193 193      let ai = ay._1
194 194      let aj = ay._2
195 195      let ak = ay._3
196 196      let al = ay._4
197 197      let am = if (if ((ai > 0))
198 198          then (aj > 0)
199 199          else false)
200 200          then {
201 201              let an = [AttachedPayment(S(V), ai), AttachedPayment(S(X), aj)]
202 202              invoke(H, "replenishWithTwoTokensV2", [false, 0], an)
203 203              }
204 204          else 0
205 205      if ((am == am))
206 206          then {
207 207              let ao = if ((ak > 0))
208 208                  then {
209 209                      let an = [AttachedPayment(S(al), ak)]
210 210                      let ap = [ab, ac, false, 0]
211 211                      invoke(H, "replenishWithOneTokenV2", ap, an)
212 212                      }
213 213                  else 0
214 214              if ((ao == ao))
215 215                  then {
216 216                      let aq = B(fromBase58String(aa))
217 217                      let ar = (aq - ad)
218 218                      let as = fraction(ar, (d - N(K, O)), d)
219 219                      let at = (ar - as)
220 220                      if ((0 >= at))
221 221                          then throw("amount of staked sharetokens must be > 0")
222 222                          else {
223 223                              let au = invoke(P(), "lockShareTokens", [K, 0], [AttachedPayment(fromBase58String(aa), at)])
224 224                              if ((au == au))
225 225                                  then {
226 226                                      let av = J(K)
227 227                                      let aw = L(K, M)
228 228  [IntegerEntry((K + o), (av + at)), IntegerEntry((((((K + "_") + M) + "_") + toString(aw)) + l), at), StringEntry((((((K + "_") + M) + "_") + toString(aw)) + m), a), IntegerEntry((((K + "_") + M) + n), aw), ScriptTransfer(y, as, fromBase58String(aa))]
229 229                                      }
230 230                                  else throw("Strict value is not equal to itself.")
231 231                              }
232 232                      }
233 233                  else throw("Strict value is not equal to itself.")
234 234              }
235 235          else throw("Strict value is not equal to itself.")
236 236      }
237 237  
238 238  
239 239  @Callable(A)
240 240  func replanish (K,az,aA,ab,ac) = {
241 241      let aB = valueOrErrorMessage(getString(this, (u + K)), "Pool is not inited")
242 242      let aC = if ((aB == a))
243 243          then G(Address(fromBase58String(K)))
244 244          else if ((aB == b))
245 245              then I(Address(fromBase58String(K)))
246 246              else throw("Wrong pool type")
247 247      let aD = aC._1
248 248      let aE = aC._2
249 249      let Y = aC._3
250 250      let Z = aC._4
251 251      let aa = aC._5
252 252      let aF = if ((size(A.payments) == 2))
253 253          then if ((R(A.payments[0].assetId) != aD))
254 254              then throw("Wrong payment asset A")
255 255              else if ((R(A.payments[1].assetId) != aE))
256 256                  then throw("Wrong payment asset B")
257 257                  else $Tuple4(A.payments[0].amount, aD, A.payments[1].amount, aE)
258 258          else if ((size(A.payments) == 1))
259 259              then if ((R(A.payments[0].assetId) == aD))
260 260                  then $Tuple4(A.payments[0].amount, aD, 0, aE)
261 261                  else if ((R(A.payments[0].assetId) == aE))
262 262                      then $Tuple4(0, aD, A.payments[0].amount, aE)
263 263                      else throw("Wrong payment")
264 264              else throw("One or two payments expected")
265 265      let U = aF._1
266 266      let V = aF._2
267 267      let W = aF._3
268 268      let X = aF._4
269 269      if ((az > 0))
270 270          then {
271 271              let aG = makeString([aB, toString(A.caller), K, toString(U), V, toString(W), X, toString(Y), toString(Z), aa, toString(ab), toString(ac)], ",")
272 272              let aH = {
273 273                  let aI = invoke(this, "createNewRequest", [aG], nil)
274 274                  if ($isInstanceOf(aI, "Int"))
275 275                      then aI
276 276                      else unit
277 277                  }
278 278              if ((aH == aH))
279 279                  then {
280 280                      let aJ = [toString(A.caller), aa, aA, az, toString(this), "replanishFromLand", toString(valueOrErrorMessage(aH, "Can't create new request"))]
281 281                      let aK = reentrantInvoke(Q(), "flashPosition", aJ, nil)
282 282                      nil
283 283                      }
284 284                  else throw("Strict value is not equal to itself.")
285 285              }
286 286          else if ((aB == a))
287 287              then T(toString(A.caller), K, false, U, V, W, X, Y, Z, aa, ab, ac)
288 288              else throw("Cant wx")
289 289      }
290 290  
291 291  
292 292  
293 293  @Callable(A)
294 294  func replanishFromLand (aL) = {
295 295      let aG = split(valueOrErrorMessage(getString(this, (aL + s)), ("No request with id " + aL)), ",")
296 296      if ((aG[0] == a))
297 297          then T(aG[1], aG[2], true, parseIntValue(aG[3]), aG[4], parseIntValue(aG[5]), aG[6], parseIntValue(aG[7]), parseIntValue(aG[8]), aG[9], parseIntValue(aG[10]), parseIntValue(aG[11]))
298 298          else throw("Cant wx")
299 299      }
300 300  
301 301  
302 302  
303 303  @Callable(A)
304 304  func createNewRequest (aM) = valueOrElse(z(A), {
305 305      let aH = (valueOrElse(getInteger(this, t), 0) + 1)
306 306      $Tuple2([StringEntry((toString(aH) + s), aM)], aH)
307 307      })
308 308  
309 309  
310 310  
311 311  @Callable(A)
312 312  func initNewPool (aB,H,aN,aO,aP) = if (if ((aB != a))
313 313      then (aB != b)
314 314      else false)
315 315      then throw("Wrong type")
316 316      else [IntegerEntry((H + p), aN), IntegerEntry((H + q), aN), IntegerEntry((H + r), aP), StringEntry(u, aB)]
317 317  
318 318  
319 319  @Verifier(aQ)
320 320  func aR () = sigVerify(aQ.bodyBytes, aQ.proofs[0], aQ.senderPublicKey)
321 321

Old	New		Differences
47	47
48	48		let w = "swopfi_farming_addr"
49	49
50		-	let x = "~~lendServiceAddr~~"
	50	+	let x = "lend_service_addr"
51	51
52	52		let y = Address(fromBase58String(valueOrErrorMessage(getString(this, v), "No axly moneyBox address")))
53	53

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let a = "SF"
5	5
6	6		let b = "WX"
7	7
8	8		let c = 100000000
9	9
10	10		let d = 1000000
11	11
12	12		let e = "A_asset_balance"
13	13
14	14		let f = "B_asset_balance"
15	15
16	16		let g = "A_asset_id"
17	17
18	18		let h = "B_asset_id"
19	19
20	20		let i = "share_asset_id"
21	21
22	22		let j = "version"
23	23
24	24		let k = "_share_tokens_locked"
25	25
26	26		let l = "_user_position"
27	27
28	28		let m = "_user_position_type"
29	29
30	30		let n = "_user_position_number"
31	31
32	32		let o = "_total_position"
33	33
34	34		let p = "_axly_fee_without_loan"
35	35
36	36		let q = "_axly_fee_with_loan"
37	37
38	38		let r = "_axly_fee_cap"
39	39
40	40		let s = "_request_id"
41	41
42	42		let t = "requests_iter"
43	43
44	44		let u = "pool_"
45	45
46	46		let v = "axly_money_box"
47	47
48	48		let w = "swopfi_farming_addr"
49	49
50		-	let x = "~~lendServiceAddr~~"
	50	+	let x = "lend_service_addr"
51	51
52	52		let y = Address(fromBase58String(valueOrErrorMessage(getString(this, v), "No axly moneyBox address")))
53	53
54	54		func z (A) = if ((A.caller == this))
55	55		then unit
56	56		else throw("Only contract itself can call this function")
57	57
58	58
59	59		func B (C) = {
60	60		let D = C
61	61		if ($isInstanceOf(D, "ByteVector"))
62	62		then {
63	63		let E = D
64	64		assetBalance(this, E)
65	65		}
66	66		else if ($isInstanceOf(D, "Unit"))
67	67		then {
68	68		let F = D
69	69		wavesBalance(this).available
70	70		}
71	71		else throw("Match error")
72	72		}
73	73
74	74
75	75		func G (H) = $Tuple5(valueOrErrorMessage(getString(H, g), "Can't get pool A asset id"), valueOrErrorMessage(getString(H, h), "Can't get pool B asset id"), valueOrErrorMessage(getInteger(H, e), "Can't get pool A asset balance"), valueOrErrorMessage(getInteger(H, f), "Can't get pool B asset balance"), valueOrErrorMessage(getString(H, i), "Can't get share asset id"))
76	76
77	77
78	78		func I (H) = $Tuple5(valueOrErrorMessage(getString(H, g), "Can't get pool A asset id"), valueOrErrorMessage(getString(H, h), "Can't get pool B asset id"), valueOrErrorMessage(getInteger(H, e), "Can't get pool A asset balance"), valueOrErrorMessage(getInteger(H, f), "Can't get pool B asset balance"), valueOrErrorMessage(getString(H, i), "Can't get share asset id"))
79	79
80	80
81	81		func J (K) = valueOrElse(getInteger(this, (K + o)), 0)
82	82
83	83
84	84		func L (K,M) = (valueOrElse(getInteger(this, (((K + "_") + M) + n)), 0) + 1)
85	85
86	86
87	87		func N (K,O) = if (O)
88	88		then getIntegerValue(this, (K + q))
89	89		else getIntegerValue(this, (K + p))
90	90
91	91
92	92		func P () = Address(fromBase58String(valueOrErrorMessage(getString(this, w), "Can't get swopfi farming addr")))
93	93
94	94
95	95		func Q () = Address(fromBase58String(valueOrErrorMessage(getString(this, x), "Can't get lend service addr")))
96	96
97	97
98	98		func R (C) = {
99	99		let D = C
100	100		if ($isInstanceOf(D, "ByteVector"))
101	101		then {
102	102		let E = D
103	103		toBase58String(E)
104	104		}
105	105		else if ($isInstanceOf(D, "Unit"))
106	106		then {
107	107		let F = D
108	108		"WAVES"
109	109		}
110	110		else throw("Match error")
111	111		}
112	112
113	113
114	114		func S (C) = if ((C == "WAVES"))
115	115		then unit
116	116		else fromBase58String(C)
117	117
118	118
119	119		func T (M,K,O,U,V,W,X,Y,Z,aa,ab,ac) = {
120	120		let ad = B(fromBase58String(aa))
121	121		let H = Address(fromBase58String(K))
122	122		let ae = fraction(c, U, Y)
123	123		let af = fraction(c, W, Z)
124	124		let ag = if ((af > ae))
125	125		then {
126	126		let ah = fraction(Z, ae, c, CEILING)
127	127		$Tuple4(U, ah, (W - ah), X)
128	128		}
129	129		else {
130	130		let ah = fraction(Y, af, c, CEILING)
131	131		$Tuple4(ah, W, (U - ah), V)
132	132		}
133	133		let ai = ag._1
134	134		let aj = ag._2
135	135		let ak = ag._3
136	136		let al = ag._4
137	137		let am = if (if ((ai > 0))
138	138		then (aj > 0)
139	139		else false)
140	140		then {
141	141		let an = [AttachedPayment(S(V), ai), AttachedPayment(S(X), aj)]
142	142		invoke(H, "replenishWithTwoTokensV2", [false, 0], an)
143	143		}
144	144		else 0
145	145		if ((am == am))
146	146		then {
147	147		let ao = if ((ak > 0))
148	148		then {
149	149		let an = [AttachedPayment(S(al), ak)]
150	150		let ap = [ab, ac, false, 0]
151	151		invoke(H, "replenishWithOneTokenV2", ap, an)
152	152		}
153	153		else 0
154	154		if ((ao == ao))
155	155		then {
156	156		let aq = B(fromBase58String(aa))
157	157		let ar = (aq - ad)
158	158		let as = fraction(ar, (d - N(K, O)), d)
159	159		let at = (ar - as)
160	160		if ((0 >= at))
161	161		then throw("amount of staked sharetokens must be > 0")
162	162		else {
163	163		let au = invoke(P(), "lockShareTokens", [K, 0], [AttachedPayment(fromBase58String(aa), at)])
164	164		if ((au == au))
165	165		then {
166	166		let av = J(K)
167	167		let aw = L(K, M)
168	168		[IntegerEntry((K + o), (av + at)), IntegerEntry((((((K + "_") + M) + "_") + toString(aw)) + l), at), StringEntry((((((K + "_") + M) + "_") + toString(aw)) + m), a), IntegerEntry((((K + "_") + M) + n), aw), ScriptTransfer(y, as, fromBase58String(aa))]
169	169		}
170	170		else throw("Strict value is not equal to itself.")
171	171		}
172	172		}
173	173		else throw("Strict value is not equal to itself.")
174	174		}
175	175		else throw("Strict value is not equal to itself.")
176	176		}
177	177
178	178
179	179		func ax (M,K,O,U,V,W,X,Y,Z,aa,ab,ac) = {
180	180		let ad = B(fromBase58String(aa))
181	181		let H = Address(fromBase58String(K))
182	182		let ae = fraction(c, U, Y)
183	183		let af = fraction(c, W, Z)
184	184		let ay = if ((af > ae))
185	185		then {
186	186		let ah = fraction(Z, ae, c, CEILING)
187	187		$Tuple4(U, ah, (W - ah), X)
188	188		}
189	189		else {
190	190		let ah = fraction(Y, af, c, CEILING)
191	191		$Tuple4(ah, W, (U - ah), V)
192	192		}
193	193		let ai = ay._1
194	194		let aj = ay._2
195	195		let ak = ay._3
196	196		let al = ay._4
197	197		let am = if (if ((ai > 0))
198	198		then (aj > 0)
199	199		else false)
200	200		then {
201	201		let an = [AttachedPayment(S(V), ai), AttachedPayment(S(X), aj)]
202	202		invoke(H, "replenishWithTwoTokensV2", [false, 0], an)
203	203		}
204	204		else 0
205	205		if ((am == am))
206	206		then {
207	207		let ao = if ((ak > 0))
208	208		then {
209	209		let an = [AttachedPayment(S(al), ak)]
210	210		let ap = [ab, ac, false, 0]
211	211		invoke(H, "replenishWithOneTokenV2", ap, an)
212	212		}
213	213		else 0
214	214		if ((ao == ao))
215	215		then {
216	216		let aq = B(fromBase58String(aa))
217	217		let ar = (aq - ad)
218	218		let as = fraction(ar, (d - N(K, O)), d)
219	219		let at = (ar - as)
220	220		if ((0 >= at))
221	221		then throw("amount of staked sharetokens must be > 0")
222	222		else {
223	223		let au = invoke(P(), "lockShareTokens", [K, 0], [AttachedPayment(fromBase58String(aa), at)])
224	224		if ((au == au))
225	225		then {
226	226		let av = J(K)
227	227		let aw = L(K, M)
228	228		[IntegerEntry((K + o), (av + at)), IntegerEntry((((((K + "_") + M) + "_") + toString(aw)) + l), at), StringEntry((((((K + "_") + M) + "_") + toString(aw)) + m), a), IntegerEntry((((K + "_") + M) + n), aw), ScriptTransfer(y, as, fromBase58String(aa))]
229	229		}
230	230		else throw("Strict value is not equal to itself.")
231	231		}
232	232		}
233	233		else throw("Strict value is not equal to itself.")
234	234		}
235	235		else throw("Strict value is not equal to itself.")
236	236		}
237	237
238	238
239	239		@Callable(A)
240	240		func replanish (K,az,aA,ab,ac) = {
241	241		let aB = valueOrErrorMessage(getString(this, (u + K)), "Pool is not inited")
242	242		let aC = if ((aB == a))
243	243		then G(Address(fromBase58String(K)))
244	244		else if ((aB == b))
245	245		then I(Address(fromBase58String(K)))
246	246		else throw("Wrong pool type")
247	247		let aD = aC._1
248	248		let aE = aC._2
249	249		let Y = aC._3
250	250		let Z = aC._4
251	251		let aa = aC._5
252	252		let aF = if ((size(A.payments) == 2))
253	253		then if ((R(A.payments[0].assetId) != aD))
254	254		then throw("Wrong payment asset A")
255	255		else if ((R(A.payments[1].assetId) != aE))
256	256		then throw("Wrong payment asset B")
257	257		else $Tuple4(A.payments[0].amount, aD, A.payments[1].amount, aE)
258	258		else if ((size(A.payments) == 1))
259	259		then if ((R(A.payments[0].assetId) == aD))
260	260		then $Tuple4(A.payments[0].amount, aD, 0, aE)
261	261		else if ((R(A.payments[0].assetId) == aE))
262	262		then $Tuple4(0, aD, A.payments[0].amount, aE)
263	263		else throw("Wrong payment")
264	264		else throw("One or two payments expected")
265	265		let U = aF._1
266	266		let V = aF._2
267	267		let W = aF._3
268	268		let X = aF._4
269	269		if ((az > 0))
270	270		then {
271	271		let aG = makeString([aB, toString(A.caller), K, toString(U), V, toString(W), X, toString(Y), toString(Z), aa, toString(ab), toString(ac)], ",")
272	272		let aH = {
273	273		let aI = invoke(this, "createNewRequest", [aG], nil)
274	274		if ($isInstanceOf(aI, "Int"))
275	275		then aI
276	276		else unit
277	277		}
278	278		if ((aH == aH))
279	279		then {
280	280		let aJ = [toString(A.caller), aa, aA, az, toString(this), "replanishFromLand", toString(valueOrErrorMessage(aH, "Can't create new request"))]
281	281		let aK = reentrantInvoke(Q(), "flashPosition", aJ, nil)
282	282		nil
283	283		}
284	284		else throw("Strict value is not equal to itself.")
285	285		}
286	286		else if ((aB == a))
287	287		then T(toString(A.caller), K, false, U, V, W, X, Y, Z, aa, ab, ac)
288	288		else throw("Cant wx")
289	289		}
290	290
291	291
292	292
293	293		@Callable(A)
294	294		func replanishFromLand (aL) = {
295	295		let aG = split(valueOrErrorMessage(getString(this, (aL + s)), ("No request with id " + aL)), ",")
296	296		if ((aG[0] == a))
297	297		then T(aG[1], aG[2], true, parseIntValue(aG[3]), aG[4], parseIntValue(aG[5]), aG[6], parseIntValue(aG[7]), parseIntValue(aG[8]), aG[9], parseIntValue(aG[10]), parseIntValue(aG[11]))
298	298		else throw("Cant wx")
299	299		}
300	300
301	301
302	302
303	303		@Callable(A)
304	304		func createNewRequest (aM) = valueOrElse(z(A), {
305	305		let aH = (valueOrElse(getInteger(this, t), 0) + 1)
306	306		$Tuple2([StringEntry((toString(aH) + s), aM)], aH)
307	307		})
308	308
309	309
310	310
311	311		@Callable(A)
312	312		func initNewPool (aB,H,aN,aO,aP) = if (if ((aB != a))
313	313		then (aB != b)
314	314		else false)
315	315		then throw("Wrong type")
316	316		else [IntegerEntry((H + p), aN), IntegerEntry((H + q), aN), IntegerEntry((H + r), aP), StringEntry(u, aB)]
317	317
318	318
319	319		@Verifier(aQ)
320	320		func aR () = sigVerify(aQ.bodyBytes, aQ.proofs[0], aQ.senderPublicKey)
321	321

github/deemru/w8io/169f3d6 
52.95 ms ◑