w8 · tx · EYS···Qwx

tx · EYSe4yqpqsKyjx66dkvo7jievyXE2wKAyLtZp4B3AQwx

3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS:  -0.01000000 Waves

2023.03.24 21:18 [2504447] smart account 3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "EYSe4yqpqsKyjx66dkvo7jievyXE2wKAyLtZp4B3AQwx",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1679681968286,
    "version": 2,
    "chainId": 84,
    "sender": "3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS",
    "senderPublicKey": "HP8sssVq1866F7CaPQJwgFrt6fsqhQjKwM84cL1wjD2a",
    "proofs": [
        "4277oxh3PpgGdAg5oUZvBe8tJFJYUNQb96KBsJHPfq8n8peni3ZNY9mmKvAkL2SiPXSDmy8KwVGwn9JaNV3H5E4X"
    ],
    "script": "base64:BgIeCAISBwoFCAEIAQESAwoBCBIDCgEIEgcKBQgIAQEBJgALU0ZfUE9TX1RZUEUCAlNGAAtXWF9QT1NfVFlQRQICV1gABlNDQUxFOACAwtcvAApGRUVfU0NBTEU2AMCEPQAUa1NGUG9vbEFBc3NldEJhbGFuY2UCD0FfYXNzZXRfYmFsYW5jZQAUa1NGUG9vbEJBc3NldEJhbGFuY2UCD0JfYXNzZXRfYmFsYW5jZQAPa1NGUG9vbEFBc3NldElkAgpBX2Fzc2V0X2lkAA9rU0ZQb29sQkFzc2V0SWQCCkJfYXNzZXRfaWQADmtTRlBvb2xTaGFyZUlkAg5zaGFyZV9hc3NldF9pZAAOa1NGUG9vbFZlcnNpb24CB3ZlcnNpb24AEGtTRkZhcm1pbmdTdGFrZWQCFF9zaGFyZV90b2tlbnNfbG9ja2VkAA1rVXNlclBvc2l0aW9uAg5fdXNlcl9wb3NpdGlvbgARa1VzZXJQb3NpdGlvblR5cGUCE191c2VyX3Bvc2l0aW9uX3R5cGUAEGtVc2VyUG9zaXRpb25OdW0CFV91c2VyX3Bvc2l0aW9uX251bWJlcgAOa1RvdGFsUG9zaXRpb24CD190b3RhbF9wb3NpdGlvbgAVa0F4bHlJbkZlZVdpdGhvdXRMb2FuAhZfYXhseV9mZWVfd2l0aG91dF9sb2FuABJrQXhseUluRmVlV2l0aExvYW4CE19heGx5X2ZlZV93aXRoX2xvYW4AC2tBeGx5Q2FwRmVlAg1fYXhseV9mZWVfY2FwAAprUmVxdWVzdElkAgtfcmVxdWVzdF9pZAAMa1JlcXVlc3RJdGVyAg1yZXF1ZXN0c19pdGVyAAVrUG9vbAIFcG9vbF8ACWtNb25leUJveAIOYXhseV9tb25leV9ib3gADmtTRkZhcm1pbmdBZGRyAhNzd29wZmlfZmFybWluZ19hZGRyAAxrTGVuZFNlcnZpY2UCEWxlbmRfc2VydmljZV9hZGRyAAhtb25leUJveAkBB0FkZHJlc3MBCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQlrTW9uZXlCb3gCGE5vIGF4bHkgbW9uZXlCb3ggYWRkcmVzcwEKaXNTZWxmQ2FsbAEBaQMJAAACCAUBaQZjYWxsZXIFBHRoaXMFBHVuaXQJAAIBAitPbmx5IGNvbnRyYWN0IGl0c2VsZiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQ5hY2NvdW50QmFsYW5jZQEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJpZAUHJG1hdGNoMAkA8AcCBQR0aGlzBQJpZAMJAAECBQckbWF0Y2gwAgRVbml0BAV3YXZlcwUHJG1hdGNoMAgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAAIBAgtNYXRjaCBlcnJvcgENZ2V0U0ZQb29sRGF0YQEIcG9vbEFkZHIJAJcKBQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ9rU0ZQb29sQUFzc2V0SWQCGUNhbid0IGdldCBwb29sIEEgYXNzZXQgaWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQhwb29sQWRkcgUPa1NGUG9vbEJBc3NldElkAhlDYW4ndCBnZXQgcG9vbCBCIGFzc2V0IGlkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUIcG9vbEFkZHIFFGtTRlBvb2xBQXNzZXRCYWxhbmNlAh5DYW4ndCBnZXQgcG9vbCBBIGFzc2V0IGJhbGFuY2UJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQhwb29sQWRkcgUUa1NGUG9vbEJBc3NldEJhbGFuY2UCHkNhbid0IGdldCBwb29sIEIgYXNzZXQgYmFsYW5jZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ5rU0ZQb29sU2hhcmVJZAIYQ2FuJ3QgZ2V0IHNoYXJlIGFzc2V0IGlkAQ1nZXRXWFBvb2xEYXRhAQhwb29sQWRkcgkAlwoFCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFD2tTRlBvb2xBQXNzZXRJZAIZQ2FuJ3QgZ2V0IHBvb2wgQSBhc3NldCBpZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ9rU0ZQb29sQkFzc2V0SWQCGUNhbid0IGdldCBwb29sIEIgYXNzZXQgaWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQhwb29sQWRkcgUUa1NGUG9vbEFBc3NldEJhbGFuY2UCHkNhbid0IGdldCBwb29sIEEgYXNzZXQgYmFsYW5jZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFCHBvb2xBZGRyBRRrU0ZQb29sQkFzc2V0QmFsYW5jZQIeQ2FuJ3QgZ2V0IHBvb2wgQiBhc3NldCBiYWxhbmNlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFDmtTRlBvb2xTaGFyZUlkAhhDYW4ndCBnZXQgc2hhcmUgYXNzZXQgaWQBFGdldEF4bHlUb3RhbFBvc2l0aW9uAQRwb29sCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUOa1RvdGFsUG9zaXRpb24AAAEYZ2V0TmV3VXNlclBvc2l0aW9uTnVtYmVyAgRwb29sBHVzZXIJAGQCCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFEGtVc2VyUG9zaXRpb25OdW0AAAABAQxnZXRBeGx5SW5GZWUCBHBvb2wId2l0aExvYW4DBQh3aXRoTG9hbgkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICBQRwb29sBRJrQXhseUluRmVlV2l0aExvYW4JARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUEcG9vbAUVa0F4bHlJbkZlZVdpdGhvdXRMb2FuARBnZXRTRkZhcm1pbmdBZGRyAAkBB0FkZHJlc3MBCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQ5rU0ZGYXJtaW5nQWRkcgIdQ2FuJ3QgZ2V0IHN3b3BmaSBmYXJtaW5nIGFkZHIBDmdldExlbmRTcnZBZGRyAAkBB0FkZHJlc3MBCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQxrTGVuZFNlcnZpY2UCG0Nhbid0IGdldCBsZW5kIHNlcnZpY2UgYWRkcgEMYXNzZXRJZFRvU3RyAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAmlkBQckbWF0Y2gwCQDYBAEFAmlkAwkAAQIFByRtYXRjaDACBFVuaXQEBXdhdmVzBQckbWF0Y2gwAgVXQVZFUwkAAgECC01hdGNoIGVycm9yAQ5hc3NldElkRnJvbVN0cgEHYXNzZXRJZAMJAAACBQdhc3NldElkAgVXQVZFUwUEdW5pdAkA2QQBBQdhc3NldElkAQ9yZXBsYW5pc2hTd29wRmkMBHVzZXIEcG9vbAh3aXRoTG9hbgRwbXRBCXBtdEFzc2V0QQRwbXRCCXBtdEFzc2V0QgRiYWxBBGJhbEIHc2hhcmVJZBN2aXJ0dWFsU3dhcFRva2VuUGF5E3ZpcnR1YWxTd2FwVG9rZW5HZXQEEnNoYXJlQmFsYW5jZUJlZm9yZQkBDmFjY291bnRCYWxhbmNlAQkA2QQBBQdzaGFyZUlkBAhwb29sQWRkcgkBB0FkZHJlc3MBCQDZBAEFBHBvb2wEBnJhdGlvQQkAawMFBlNDQUxFOAUEcG10QQUEYmFsQQQGcmF0aW9CCQBrAwUGU0NBTEU4BQRwbXRCBQRiYWxCBAskdDA0NTQ0NDgzNwMJAGYCBQZyYXRpb0IFBnJhdGlvQQQDcG10CQBuBAUEYmFsQgUGcmF0aW9BBQZTQ0FMRTgFB0NFSUxJTkcJAJYKBAUEcG10QQUDcG10CQBlAgUEcG10QgUDcG10BQlwbXRBc3NldEIEA3BtdAkAbgQFBGJhbEEFBnJhdGlvQgUGU0NBTEU4BQdDRUlMSU5HCQCWCgQFA3BtdAUEcG10QgkAZQIFBHBtdEEFA3BtdAUJcG10QXNzZXRBBApwbXRBbW91bnRBCAULJHQwNDU0NDQ4MzcCXzEECnBtdEFtb3VudEIIBQskdDA0NTQ0NDgzNwJfMgQGY2hhbmdlCAULJHQwNDU0NDQ4MzcCXzMEDWNoYW5nZUFzc2V0SWQIBQskdDA0NTQ0NDgzNwJfNAQLcG9vbFZlcnNpb24JARFAZXh0ck5hdGl2ZSgxMDUzKQIFCHBvb2xBZGRyAgd2ZXJzaW9uBARpbnYxAwMJAGYCBQpwbXRBbW91bnRBAAAJAGYCBQpwbXRBbW91bnRCAAAHBAhwYXltZW50cwkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDmFzc2V0SWRGcm9tU3RyAQUJcG10QXNzZXRBBQpwbXRBbW91bnRBCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQEOYXNzZXRJZEZyb21TdHIBBQlwbXRBc3NldEIFCnBtdEFtb3VudEIFA25pbAMJAAACBQtwb29sVmVyc2lvbgIFMS4wLjAJAPwHBAUIcG9vbEFkZHICDGNhbGxGdW5jdGlvbgkAzAgCAhZyZXBsZW5pc2hXaXRoVHdvVG9rZW5zCQDMCAIJAMwIAgIFZmFsc2UJAMwIAgIBMAUDbmlsBQNuaWwFCHBheW1lbnRzAwkAAAIFC3Bvb2xWZXJzaW9uAgUyLjAuMAkA/AcEBQhwb29sQWRkcgIYcmVwbGVuaXNoV2l0aFR3b1Rva2Vuc1YyCQDMCAIHCQDMCAIAAAUDbmlsBQhwYXltZW50cwkAAgECD1dyb25nIHBvb2wgdHlwZQAAAwkAAAIFBGludjEFBGludjEEBGludjIDCQBmAgUGY2hhbmdlAAAECHBheW1lbnRzCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQEOYXNzZXRJZEZyb21TdHIBBQ1jaGFuZ2VBc3NldElkBQZjaGFuZ2UFA25pbAMJAAACBQtwb29sVmVyc2lvbgIFMS4wLjAEBHZhcnMJAMwIAgIBMAkAzAgCAgVmYWxzZQkAzAgCAgEwBQNuaWwJAPwHBAUIcG9vbEFkZHICDGNhbGxGdW5jdGlvbgkAzAgCAhVyZXBsZW5pc2hXaXRoT25lVG9rZW4JAMwIAgUEdmFycwUDbmlsBQhwYXltZW50cwMJAAACBQtwb29sVmVyc2lvbgIFMi4wLjAEBHZhcnMJAMwIAgUTdmlydHVhbFN3YXBUb2tlblBheQkAzAgCBRN2aXJ0dWFsU3dhcFRva2VuR2V0CQDMCAIHCQDMCAIAAAUDbmlsCQD8BwQFCHBvb2xBZGRyAhdyZXBsZW5pc2hXaXRoT25lVG9rZW5WMgkAzAgCBwkAzAgCAAAFA25pbAUIcGF5bWVudHMJAAIBAg9Xcm9uZyBwb29sIHR5cGUAAAMJAAACBQRpbnYyBQRpbnYyBBFzaGFyZUJhbGFuY2VBZnRlcgkBDmFjY291bnRCYWxhbmNlAQkA2QQBBQdzaGFyZUlkAwkAAAIAAQABCQACAQkArAICCQCsAgIFB3NoYXJlSWQCA3x8IAkApAMBBRFzaGFyZUJhbGFuY2VBZnRlcgQKdG90YWxTaGFyZQkAZQIFEXNoYXJlQmFsYW5jZUFmdGVyBRJzaGFyZUJhbGFuY2VCZWZvcmUECWF4bHlJbkZlZQkAawMFCnRvdGFsU2hhcmUJAGUCBQpGRUVfU0NBTEU2CQEMZ2V0QXhseUluRmVlAgUEcG9vbAUId2l0aExvYW4FCkZFRV9TQ0FMRTYEEXVzZXJTaGFyZUZvclN0YWtlCQBlAgUKdG90YWxTaGFyZQUJYXhseUluRmVlAwkAZwIAAAURdXNlclNoYXJlRm9yU3Rha2UJAAIBAihhbW91bnQgb2Ygc3Rha2VkIHNoYXJldG9rZW5zIG11c3QgYmUgPiAwBARpbnYzCQD8BwQJARBnZXRTRkZhcm1pbmdBZGRyAAIPbG9ja1NoYXJlVG9rZW5zCQDMCAIFBHBvb2wJAMwIAgAABQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUHc2hhcmVJZAURdXNlclNoYXJlRm9yU3Rha2UFA25pbAMJAAACBQRpbnYzBQRpbnYzBAt0b3RhbEFtb3VudAkBFGdldEF4bHlUb3RhbFBvc2l0aW9uAQUEcG9vbAQJbmV3UG9zTnVtCQEYZ2V0TmV3VXNlclBvc2l0aW9uTnVtYmVyAgUEcG9vbAUEdXNlcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBQ5rVG90YWxQb3NpdGlvbgkAZAIFC3RvdGFsQW1vdW50BRF1c2VyU2hhcmVGb3JTdGFrZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXICAV8JAKQDAQUJbmV3UG9zTnVtBQ1rVXNlclBvc2l0aW9uBRF1c2VyU2hhcmVGb3JTdGFrZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgIBXwkApAMBBQluZXdQb3NOdW0FEWtVc2VyUG9zaXRpb25UeXBlBQtTRl9QT1NfVFlQRQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUQa1VzZXJQb3NpdGlvbk51bQUJbmV3UG9zTnVtCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCG1vbmV5Qm94BQlheGx5SW5GZWUJANkEAQUHc2hhcmVJZAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQtyZXBsYW5pc2hXWAwEdXNlcgRwb29sCHdpdGhMb2FuBHBtdEEJcG10QXNzZXRBBHBtdEIJcG10QXNzZXRCBGJhbEEEYmFsQgdzaGFyZUlkE3ZpcnR1YWxTd2FwVG9rZW5QYXkTdmlydHVhbFN3YXBUb2tlbkdldAUDbmlsBAFpAQlyZXBsYW5pc2gFBHBvb2wMYm9ycm93QW1vdW50DWJvcnJvd0Fzc2V0SWQTdmlydHVhbFN3YXBUb2tlblBheRN2aXJ0dWFsU3dhcFRva2VuR2V0BAR0eXBlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwkArAICBQVrUG9vbAUEcG9vbAISUG9vbCBpcyBub3QgaW5pdGVkBAskdDA3NjU3NzkwOAMJAAACBQR0eXBlBQtTRl9QT1NfVFlQRQkBDWdldFNGUG9vbERhdGEBCQEHQWRkcmVzcwEJANkEAQUEcG9vbAMJAAACBQR0eXBlBQtXWF9QT1NfVFlQRQkBDWdldFdYUG9vbERhdGEBCQEHQWRkcmVzcwEJANkEAQUEcG9vbAkAAgECD1dyb25nIHBvb2wgdHlwZQQDQUlkCAULJHQwNzY1Nzc5MDgCXzEEA0JJZAgFCyR0MDc2NTc3OTA4Al8yBARiYWxBCAULJHQwNzY1Nzc5MDgCXzMEBGJhbEIIBQskdDA3NjU3NzkwOAJfNAQHc2hhcmVJZAgFCyR0MDc2NTc3OTA4Al81BAskdDA3OTEyODU0OQMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAIDCQECIT0CCQEMYXNzZXRJZFRvU3RyAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQNBSWQJAAIBAhVXcm9uZyBwYXltZW50IGFzc2V0IEEDCQECIT0CCQEMYXNzZXRJZFRvU3RyAQgJAJEDAggFAWkIcGF5bWVudHMAAQdhc3NldElkBQNCSWQJAAIBAhVXcm9uZyBwYXltZW50IGFzc2V0IEIJAJYKBAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQFA0FJZAgJAJEDAggFAWkIcGF5bWVudHMAAQZhbW91bnQFA0JJZAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEDCQAAAgkBDGFzc2V0SWRUb1N0cgEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUDQUlkCQCWCgQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BQNBSWQAAAUDQklkAwkAAAIJAQxhc3NldElkVG9TdHIBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQFA0JJZAkAlgoEAAAFA0FJZAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQFA0JJZAkAAgECDVdyb25nIHBheW1lbnQJAAIBAhxPbmUgb3IgdHdvIHBheW1lbnRzIGV4cGVjdGVkBARwbXRBCAULJHQwNzkxMjg1NDkCXzEECXBtdEFzc2V0QQgFCyR0MDc5MTI4NTQ5Al8yBARwbXRCCAULJHQwNzkxMjg1NDkCXzMECXBtdEFzc2V0QggFCyR0MDc5MTI4NTQ5Al80AwkAZgIFDGJvcnJvd0Ftb3VudAAABAdyZXF1ZXN0CQC5CQIJAMwIAgUEdHlwZQkAzAgCCQClCAEIBQFpBmNhbGxlcgkAzAgCBQRwb29sCQDMCAIJAKQDAQUEcG10QQkAzAgCBQlwbXRBc3NldEEJAMwIAgkApAMBBQRwbXRCCQDMCAIFCXBtdEFzc2V0QgkAzAgCCQCkAwEFBGJhbEEJAMwIAgkApAMBBQRiYWxCCQDMCAIFB3NoYXJlSWQJAMwIAgkApAMBBRN2aXJ0dWFsU3dhcFRva2VuUGF5CQDMCAIJAKQDAQUTdmlydHVhbFN3YXBUb2tlbkdldAUDbmlsAgEsBAxuZXdSZXF1ZXN0SWQKAAFACQD8BwQFBHRoaXMCEGNyZWF0ZU5ld1JlcXVlc3QJAMwIAgUHcmVxdWVzdAUDbmlsBQNuaWwDCQABAgUBQAIDSW50BQFABQR1bml0AwkAAAIFDG5ld1JlcXVlc3RJZAUMbmV3UmVxdWVzdElkBARhcmdzCQDMCAIJAKUIAQgFAWkGY2FsbGVyCQDMCAIFB3NoYXJlSWQJAMwIAgUNYm9ycm93QXNzZXRJZAkAzAgCBQxib3Jyb3dBbW91bnQJAMwIAgkApQgBBQR0aGlzCQDMCAICEXJlcGxhbmlzaEZyb21MYW5kCQDMCAIJAKQDAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCBQxuZXdSZXF1ZXN0SWQCGENhbid0IGNyZWF0ZSBuZXcgcmVxdWVzdAUDbmlsBANpbnYJAP0HBAkBDmdldExlbmRTcnZBZGRyAAINZmxhc2hQb3NpdGlvbgUEYXJncwUDbmlsBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4DCQAAAgUEdHlwZQULU0ZfUE9TX1RZUEUJAQ9yZXBsYW5pc2hTd29wRmkMCQClCAEIBQFpBmNhbGxlcgUEcG9vbAcFBHBtdEEFCXBtdEFzc2V0QQUEcG10QgUJcG10QXNzZXRCBQRiYWxBBQRiYWxCBQdzaGFyZUlkBRN2aXJ0dWFsU3dhcFRva2VuUGF5BRN2aXJ0dWFsU3dhcFRva2VuR2V0CQACAQIHQ2FudCB3eAFpARFyZXBsYW5pc2hGcm9tTGFuZAEJcmVxdWVzdElkBAdyZXF1ZXN0CQC1CQIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzCQCsAgIFCXJlcXVlc3RJZAUKa1JlcXVlc3RJZAkArAICAhNObyByZXF1ZXN0IHdpdGggaWQgBQlyZXF1ZXN0SWQCASwDCQAAAgkAkQMCBQdyZXF1ZXN0AAAFC1NGX1BPU19UWVBFCQEPcmVwbGFuaXNoU3dvcEZpDAkAkQMCBQdyZXF1ZXN0AAEJAJEDAgUHcmVxdWVzdAACBgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3JlcXVlc3QAAwkAkQMCBQdyZXF1ZXN0AAQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdyZXF1ZXN0AAUJAJEDAgUHcmVxdWVzdAAGCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVxdWVzdAAHCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVxdWVzdAAICQCRAwIFB3JlcXVlc3QACQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3JlcXVlc3QACgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3JlcXVlc3QACwkAAgECB0NhbnQgd3gBaQEQY3JlYXRlTmV3UmVxdWVzdAEGcGFyYW1zCQELdmFsdWVPckVsc2UCCQEKaXNTZWxmQ2FsbAEFAWkEDG5ld1JlcXVlc3RJZAkAZAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwUMa1JlcXVlc3RJdGVyAAAAAQkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkApAMBBQxuZXdSZXF1ZXN0SWQFCmtSZXF1ZXN0SWQFBnBhcmFtcwUDbmlsBQxuZXdSZXF1ZXN0SWQBaQELaW5pdE5ld1Bvb2wFBHR5cGUIcG9vbEFkZHILaW5GZWVOb0xvYW4JaW5GZWVMb2FuBmNhcEZlZQMDCQECIT0CBQR0eXBlBQtTRl9QT1NfVFlQRQkBAiE9AgUEdHlwZQULV1hfUE9TX1RZUEUHCQACAQIKV3JvbmcgdHlwZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQhwb29sQWRkcgUVa0F4bHlJbkZlZVdpdGhvdXRMb2FuBQtpbkZlZU5vTG9hbgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQhwb29sQWRkcgUSa0F4bHlJbkZlZVdpdGhMb2FuBQlpbkZlZUxvYW4JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUIcG9vbEFkZHIFC2tBeGx5Q2FwRmVlBQZjYXBGZWUJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQVrUG9vbAUIcG9vbEFkZHIFBHR5cGUFA25pbAECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXlqlV5S",
    "height": 2504447,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: D2biWyQf9VrsL32KB9iTKx9sCPWYcA114RHun7hZkfzv
Next: DWZo2Q6b1kpMmBzws9B58NLdZgWTN5dSywjgr8VHeC2j

Diff: 
Old New Differences
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 -     if ((1 == 1))
122 -         then throw(((aa + "|| ") + toString(ad)))
121 +     let H = Address(fromBase58String(K))
122 +     let ae = fraction(c, U, Y)
123 +     let af = fraction(c, W, Z)
124 +     let ag = if ((af > ae))
125 +         then {
126 +             let ah = fraction(Z, ae, c, CEILING)
127 +             $Tuple4(U, ah, (W - ah), X)
128 +             }
123 129          else {
124 -             let H = Address(fromBase58String(K))
125 -             let ae = fraction(c, U, Y)
126 -             let af = fraction(c, W, Z)
127 -             let ag = if ((af > ae))
130 +             let ah = fraction(Y, af, c, CEILING)
131 +             $Tuple4(ah, W, (U - ah), V)
132 +             }
133 +     let ai = ag._1
134 +     let aj = ag._2
135 +     let ak = ag._3
136 +     let al = ag._4
137 +     let am = getStringValue(H, "version")
138 +     let an = if (if ((ai > 0))
139 +         then (aj > 0)
140 +         else false)
141 +         then {
142 +             let ao = [AttachedPayment(S(V), ai), AttachedPayment(S(X), aj)]
143 +             if ((am == "1.0.0"))
144 +                 then invoke(H, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], ao)
145 +                 else if ((am == "2.0.0"))
146 +                     then invoke(H, "replenishWithTwoTokensV2", [false, 0], ao)
147 +                     else throw("Wrong pool type")
148 +             }
149 +         else 0
150 +     if ((an == an))
151 +         then {
152 +             let ap = if ((ak > 0))
128 153                  then {
129 -                     let ah = fraction(Z, ae, c, CEILING)
130 -                     $Tuple4(U, ah, (W - ah), X)
131 -                     }
132 -                 else {
133 -                     let ah = fraction(Y, af, c, CEILING)
134 -                     $Tuple4(ah, W, (U - ah), V)
135 -                     }
136 -             let ai = ag._1
137 -             let aj = ag._2
138 -             let ak = ag._3
139 -             let al = ag._4
140 -             let am = getStringValue(H, "version")
141 -             let an = if (if ((ai > 0))
142 -                 then (aj > 0)
143 -                 else false)
144 -                 then {
145 -                     let ao = [AttachedPayment(S(V), ai), AttachedPayment(S(X), aj)]
154 +                     let ao = [AttachedPayment(S(al), ak)]
146 155                      if ((am == "1.0.0"))
147 -                         then invoke(H, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], ao)
156 +                         then {
157 +                             let aq = ["0", "false", "0"]
158 +                             invoke(H, "callFunction", ["replenishWithOneToken", aq], ao)
159 +                             }
148 160                          else if ((am == "2.0.0"))
149 -                             then invoke(H, "replenishWithTwoTokensV2", [false, 0], ao)
161 +                             then {
162 +                                 let aq = [ab, ac, false, 0]
163 +                                 invoke(H, "replenishWithOneTokenV2", [false, 0], ao)
164 +                                 }
150 165                              else throw("Wrong pool type")
151 166                      }
152 167                  else 0
153 -             if ((an == an))
168 +             if ((ap == ap))
154 169                  then {
155 -                     let ap = if ((ak > 0))
156 -                         then {
157 -                             let ao = [AttachedPayment(S(al), ak)]
158 -                             if ((am == "1.0.0"))
159 -                                 then {
160 -                                     let aq = ["0", "false", "0"]
161 -                                     invoke(H, "callFunction", ["replenishWithOneToken", aq], ao)
162 -                                     }
163 -                                 else if ((am == "2.0.0"))
164 -                                     then {
165 -                                         let aq = [ab, ac, false, 0]
166 -                                         invoke(H, "replenishWithOneTokenV2", [false, 0], ao)
167 -                                         }
168 -                                     else throw("Wrong pool type")
169 -                             }
170 -                         else 0
171 -                     if ((ap == ap))
172 -                         then {
173 -                             let ar = B(fromBase58String(aa))
170 +                     let ar = B(fromBase58String(aa))
171 +                     if ((1 == 1))
172 +                         then throw(((aa + "|| ") + toString(ar)))
173 +                         else {
174 174                              let as = (ar - ad)
175 175                              let at = fraction(as, (d - N(K, O)), d)
176 176                              let au = (as - at)
187 187                                          else throw("Strict value is not equal to itself.")
188 188                                      }
189 189                              }
190 -                         else throw("Strict value is not equal to itself.")
191 190                      }
192 191                  else throw("Strict value is not equal to itself.")
193 192              }
193 +         else throw("Strict value is not equal to itself.")
194 194      }
195 195  
196 196  
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 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 -     if ((1 == 1))
122 -         then throw(((aa + "|| ") + toString(ad)))
121 +     let H = Address(fromBase58String(K))
122 +     let ae = fraction(c, U, Y)
123 +     let af = fraction(c, W, Z)
124 +     let ag = if ((af > ae))
125 +         then {
126 +             let ah = fraction(Z, ae, c, CEILING)
127 +             $Tuple4(U, ah, (W - ah), X)
128 +             }
123 129          else {
124 -             let H = Address(fromBase58String(K))
125 -             let ae = fraction(c, U, Y)
126 -             let af = fraction(c, W, Z)
127 -             let ag = if ((af > ae))
130 +             let ah = fraction(Y, af, c, CEILING)
131 +             $Tuple4(ah, W, (U - ah), V)
132 +             }
133 +     let ai = ag._1
134 +     let aj = ag._2
135 +     let ak = ag._3
136 +     let al = ag._4
137 +     let am = getStringValue(H, "version")
138 +     let an = if (if ((ai > 0))
139 +         then (aj > 0)
140 +         else false)
141 +         then {
142 +             let ao = [AttachedPayment(S(V), ai), AttachedPayment(S(X), aj)]
143 +             if ((am == "1.0.0"))
144 +                 then invoke(H, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], ao)
145 +                 else if ((am == "2.0.0"))
146 +                     then invoke(H, "replenishWithTwoTokensV2", [false, 0], ao)
147 +                     else throw("Wrong pool type")
148 +             }
149 +         else 0
150 +     if ((an == an))
151 +         then {
152 +             let ap = if ((ak > 0))
128 153                  then {
129 -                     let ah = fraction(Z, ae, c, CEILING)
130 -                     $Tuple4(U, ah, (W - ah), X)
131 -                     }
132 -                 else {
133 -                     let ah = fraction(Y, af, c, CEILING)
134 -                     $Tuple4(ah, W, (U - ah), V)
135 -                     }
136 -             let ai = ag._1
137 -             let aj = ag._2
138 -             let ak = ag._3
139 -             let al = ag._4
140 -             let am = getStringValue(H, "version")
141 -             let an = if (if ((ai > 0))
142 -                 then (aj > 0)
143 -                 else false)
144 -                 then {
145 -                     let ao = [AttachedPayment(S(V), ai), AttachedPayment(S(X), aj)]
154 +                     let ao = [AttachedPayment(S(al), ak)]
146 155                      if ((am == "1.0.0"))
147 -                         then invoke(H, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], ao)
156 +                         then {
157 +                             let aq = ["0", "false", "0"]
158 +                             invoke(H, "callFunction", ["replenishWithOneToken", aq], ao)
159 +                             }
148 160                          else if ((am == "2.0.0"))
149 -                             then invoke(H, "replenishWithTwoTokensV2", [false, 0], ao)
161 +                             then {
162 +                                 let aq = [ab, ac, false, 0]
163 +                                 invoke(H, "replenishWithOneTokenV2", [false, 0], ao)
164 +                                 }
150 165                              else throw("Wrong pool type")
151 166                      }
152 167                  else 0
153 -             if ((an == an))
168 +             if ((ap == ap))
154 169                  then {
155 -                     let ap = if ((ak > 0))
156 -                         then {
157 -                             let ao = [AttachedPayment(S(al), ak)]
158 -                             if ((am == "1.0.0"))
159 -                                 then {
160 -                                     let aq = ["0", "false", "0"]
161 -                                     invoke(H, "callFunction", ["replenishWithOneToken", aq], ao)
162 -                                     }
163 -                                 else if ((am == "2.0.0"))
164 -                                     then {
165 -                                         let aq = [ab, ac, false, 0]
166 -                                         invoke(H, "replenishWithOneTokenV2", [false, 0], ao)
167 -                                         }
168 -                                     else throw("Wrong pool type")
169 -                             }
170 -                         else 0
171 -                     if ((ap == ap))
172 -                         then {
173 -                             let ar = B(fromBase58String(aa))
170 +                     let ar = B(fromBase58String(aa))
171 +                     if ((1 == 1))
172 +                         then throw(((aa + "|| ") + toString(ar)))
173 +                         else {
174 174                              let as = (ar - ad)
175 175                              let at = fraction(as, (d - N(K, O)), d)
176 176                              let au = (as - at)
177 177                              if ((0 >= au))
178 178                                  then throw("amount of staked sharetokens must be > 0")
179 179                                  else {
180 180                                      let av = invoke(P(), "lockShareTokens", [K, 0], [AttachedPayment(fromBase58String(aa), au)])
181 181                                      if ((av == av))
182 182                                          then {
183 183                                              let aw = J(K)
184 184                                              let ax = L(K, M)
185 185  [IntegerEntry((K + o), (aw + au)), IntegerEntry((((((K + "_") + M) + "_") + toString(ax)) + l), au), StringEntry((((((K + "_") + M) + "_") + toString(ax)) + m), a), IntegerEntry((((K + "_") + M) + n), ax), ScriptTransfer(y, at, fromBase58String(aa))]
186 186                                              }
187 187                                          else throw("Strict value is not equal to itself.")
188 188                                      }
189 189                              }
190 -                         else throw("Strict value is not equal to itself.")
191 190                      }
192 191                  else throw("Strict value is not equal to itself.")
193 192              }
193 +         else throw("Strict value is not equal to itself.")
194 194      }
195 195  
196 196  
197 197  func ay (M,K,O,U,V,W,X,Y,Z,aa,ab,ac) = nil
198 198  
199 199  
200 200  @Callable(A)
201 201  func replanish (K,az,aA,ab,ac) = {
202 202      let aB = valueOrErrorMessage(getString(this, (u + K)), "Pool is not inited")
203 203      let aC = if ((aB == a))
204 204          then G(Address(fromBase58String(K)))
205 205          else if ((aB == b))
206 206              then I(Address(fromBase58String(K)))
207 207              else throw("Wrong pool type")
208 208      let aD = aC._1
209 209      let aE = aC._2
210 210      let Y = aC._3
211 211      let Z = aC._4
212 212      let aa = aC._5
213 213      let aF = if ((size(A.payments) == 2))
214 214          then if ((R(A.payments[0].assetId) != aD))
215 215              then throw("Wrong payment asset A")
216 216              else if ((R(A.payments[1].assetId) != aE))
217 217                  then throw("Wrong payment asset B")
218 218                  else $Tuple4(A.payments[0].amount, aD, A.payments[1].amount, aE)
219 219          else if ((size(A.payments) == 1))
220 220              then if ((R(A.payments[0].assetId) == aD))
221 221                  then $Tuple4(A.payments[0].amount, aD, 0, aE)
222 222                  else if ((R(A.payments[0].assetId) == aE))
223 223                      then $Tuple4(0, aD, A.payments[0].amount, aE)
224 224                      else throw("Wrong payment")
225 225              else throw("One or two payments expected")
226 226      let U = aF._1
227 227      let V = aF._2
228 228      let W = aF._3
229 229      let X = aF._4
230 230      if ((az > 0))
231 231          then {
232 232              let aG = makeString([aB, toString(A.caller), K, toString(U), V, toString(W), X, toString(Y), toString(Z), aa, toString(ab), toString(ac)], ",")
233 233              let aH = {
234 234                  let aI = invoke(this, "createNewRequest", [aG], nil)
235 235                  if ($isInstanceOf(aI, "Int"))
236 236                      then aI
237 237                      else unit
238 238                  }
239 239              if ((aH == aH))
240 240                  then {
241 241                      let aJ = [toString(A.caller), aa, aA, az, toString(this), "replanishFromLand", toString(valueOrErrorMessage(aH, "Can't create new request"))]
242 242                      let aK = reentrantInvoke(Q(), "flashPosition", aJ, nil)
243 243                      nil
244 244                      }
245 245                  else throw("Strict value is not equal to itself.")
246 246              }
247 247          else if ((aB == a))
248 248              then T(toString(A.caller), K, false, U, V, W, X, Y, Z, aa, ab, ac)
249 249              else throw("Cant wx")
250 250      }
251 251  
252 252  
253 253  
254 254  @Callable(A)
255 255  func replanishFromLand (aL) = {
256 256      let aG = split(valueOrErrorMessage(getString(this, (aL + s)), ("No request with id " + aL)), ",")
257 257      if ((aG[0] == a))
258 258          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]))
259 259          else throw("Cant wx")
260 260      }
261 261  
262 262  
263 263  
264 264  @Callable(A)
265 265  func createNewRequest (aM) = valueOrElse(z(A), {
266 266      let aH = (valueOrElse(getInteger(this, t), 0) + 1)
267 267      $Tuple2([StringEntry((toString(aH) + s), aM)], aH)
268 268      })
269 269  
270 270  
271 271  
272 272  @Callable(A)
273 273  func initNewPool (aB,H,aN,aO,aP) = if (if ((aB != a))
274 274      then (aB != b)
275 275      else false)
276 276      then throw("Wrong type")
277 277      else [IntegerEntry((H + p), aN), IntegerEntry((H + q), aO), IntegerEntry((H + r), aP), StringEntry((u + H), aB)]
278 278  
279 279  
280 280  @Verifier(aQ)
281 281  func aR () = sigVerify(aQ.bodyBytes, aQ.proofs[0], aQ.senderPublicKey)
282 282

Old	New		Differences
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		-	if ((1 == 1))
122		-	then throw(((aa + "\|\| ") + toString(ad)))
	121	+	let H = Address(fromBase58String(K))
	122	+	let ae = fraction(c, U, Y)
	123	+	let af = fraction(c, W, Z)
	124	+	let ag = if ((af > ae))
	125	+	then {
	126	+	let ah = fraction(Z, ae, c, CEILING)
	127	+	$Tuple4(U, ah, (W - ah), X)
	128	+	}
123	129		else {
124		-	let H = Address(fromBase58String(K))
125		-	let ae = fraction(c, U, Y)
126		-	let af = fraction(c, W, Z)
127		-	let ag = if ((af > ae))
	130	+	let ah = fraction(Y, af, c, CEILING)
	131	+	$Tuple4(ah, W, (U - ah), V)
	132	+	}
	133	+	let ai = ag._1
	134	+	let aj = ag._2
	135	+	let ak = ag._3
	136	+	let al = ag._4
	137	+	let am = getStringValue(H, "version")
	138	+	let an = if (if ((ai > 0))
	139	+	then (aj > 0)
	140	+	else false)
	141	+	then {
	142	+	let ao = [AttachedPayment(S(V), ai), AttachedPayment(S(X), aj)]
	143	+	if ((am == "1.0.0"))
	144	+	then invoke(H, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], ao)
	145	+	else if ((am == "2.0.0"))
	146	+	then invoke(H, "replenishWithTwoTokensV2", [false, 0], ao)
	147	+	else throw("Wrong pool type")
	148	+	}
	149	+	else 0
	150	+	if ((an == an))
	151	+	then {
	152	+	let ap = if ((ak > 0))
128	153		then {
129		-	let ah = fraction(Z, ae, c, CEILING)
130		-	$Tuple4(U, ah, (W - ah), X)
131		-	}
132		-	else {
133		-	let ah = fraction(Y, af, c, CEILING)
134		-	$Tuple4(ah, W, (U - ah), V)
135		-	}
136		-	let ai = ag._1
137		-	let aj = ag._2
138		-	let ak = ag._3
139		-	let al = ag._4
140		-	let am = getStringValue(H, "version")
141		-	let an = if (if ((ai > 0))
142		-	then (aj > 0)
143		-	else false)
144		-	then {
145		-	let ao = [AttachedPayment(S(V), ai), AttachedPayment(S(X), aj)]
	154	+	let ao = [AttachedPayment(S(al), ak)]
146	155		if ((am == "1.0.0"))
147		-	then invoke(H, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], ao)
	156	+	then {
	157	+	let aq = ["0", "false", "0"]
	158	+	invoke(H, "callFunction", ["replenishWithOneToken", aq], ao)
	159	+	}
148	160		else if ((am == "2.0.0"))
149		-	then invoke(H, "replenishWithTwoTokensV2", [false, 0], ao)
	161	+	then {
	162	+	let aq = [ab, ac, false, 0]
	163	+	invoke(H, "replenishWithOneTokenV2", [false, 0], ao)
	164	+	}
150	165		else throw("Wrong pool type")
151	166		}
152	167		else 0
153		-	if ((an == an))
	168	+	if ((ap == ap))
154	169		then {
155		-	let ap = if ((ak > 0))
156		-	then {
157		-	let ao = [AttachedPayment(S(al), ak)]
158		-	if ((am == "1.0.0"))
159		-	then {
160		-	let aq = ["0", "false", "0"]
161		-	invoke(H, "callFunction", ["replenishWithOneToken", aq], ao)
162		-	}
163		-	else if ((am == "2.0.0"))
164		-	then {
165		-	let aq = [ab, ac, false, 0]
166		-	invoke(H, "replenishWithOneTokenV2", [false, 0], ao)
167		-	}
168		-	else throw("Wrong pool type")
169		-	}
170		-	else 0
171		-	if ((ap == ap))
172		-	then {
173		-	let ar = B(fromBase58String(aa))
	170	+	let ar = B(fromBase58String(aa))
	171	+	if ((1 == 1))
	172	+	then throw(((aa + "\|\| ") + toString(ar)))
	173	+	else {
174	174		let as = (ar - ad)
175	175		let at = fraction(as, (d - N(K, O)), d)
176	176		let au = (as - at)

187	187		else throw("Strict value is not equal to itself.")
188	188		}
189	189		}
190		-	else throw("Strict value is not equal to itself.")
191	190		}
192	191		else throw("Strict value is not equal to itself.")
193	192		}
	193	+	else throw("Strict value is not equal to itself.")
194	194		}
195	195
196	196

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	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		-	if ((1 == 1))
122		-	then throw(((aa + "\|\| ") + toString(ad)))
	121	+	let H = Address(fromBase58String(K))
	122	+	let ae = fraction(c, U, Y)
	123	+	let af = fraction(c, W, Z)
	124	+	let ag = if ((af > ae))
	125	+	then {
	126	+	let ah = fraction(Z, ae, c, CEILING)
	127	+	$Tuple4(U, ah, (W - ah), X)
	128	+	}
123	129		else {
124		-	let H = Address(fromBase58String(K))
125		-	let ae = fraction(c, U, Y)
126		-	let af = fraction(c, W, Z)
127		-	let ag = if ((af > ae))
	130	+	let ah = fraction(Y, af, c, CEILING)
	131	+	$Tuple4(ah, W, (U - ah), V)
	132	+	}
	133	+	let ai = ag._1
	134	+	let aj = ag._2
	135	+	let ak = ag._3
	136	+	let al = ag._4
	137	+	let am = getStringValue(H, "version")
	138	+	let an = if (if ((ai > 0))
	139	+	then (aj > 0)
	140	+	else false)
	141	+	then {
	142	+	let ao = [AttachedPayment(S(V), ai), AttachedPayment(S(X), aj)]
	143	+	if ((am == "1.0.0"))
	144	+	then invoke(H, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], ao)
	145	+	else if ((am == "2.0.0"))
	146	+	then invoke(H, "replenishWithTwoTokensV2", [false, 0], ao)
	147	+	else throw("Wrong pool type")
	148	+	}
	149	+	else 0
	150	+	if ((an == an))
	151	+	then {
	152	+	let ap = if ((ak > 0))
128	153		then {
129		-	let ah = fraction(Z, ae, c, CEILING)
130		-	$Tuple4(U, ah, (W - ah), X)
131		-	}
132		-	else {
133		-	let ah = fraction(Y, af, c, CEILING)
134		-	$Tuple4(ah, W, (U - ah), V)
135		-	}
136		-	let ai = ag._1
137		-	let aj = ag._2
138		-	let ak = ag._3
139		-	let al = ag._4
140		-	let am = getStringValue(H, "version")
141		-	let an = if (if ((ai > 0))
142		-	then (aj > 0)
143		-	else false)
144		-	then {
145		-	let ao = [AttachedPayment(S(V), ai), AttachedPayment(S(X), aj)]
	154	+	let ao = [AttachedPayment(S(al), ak)]
146	155		if ((am == "1.0.0"))
147		-	then invoke(H, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], ao)
	156	+	then {
	157	+	let aq = ["0", "false", "0"]
	158	+	invoke(H, "callFunction", ["replenishWithOneToken", aq], ao)
	159	+	}
148	160		else if ((am == "2.0.0"))
149		-	then invoke(H, "replenishWithTwoTokensV2", [false, 0], ao)
	161	+	then {
	162	+	let aq = [ab, ac, false, 0]
	163	+	invoke(H, "replenishWithOneTokenV2", [false, 0], ao)
	164	+	}
150	165		else throw("Wrong pool type")
151	166		}
152	167		else 0
153		-	if ((an == an))
	168	+	if ((ap == ap))
154	169		then {
155		-	let ap = if ((ak > 0))
156		-	then {
157		-	let ao = [AttachedPayment(S(al), ak)]
158		-	if ((am == "1.0.0"))
159		-	then {
160		-	let aq = ["0", "false", "0"]
161		-	invoke(H, "callFunction", ["replenishWithOneToken", aq], ao)
162		-	}
163		-	else if ((am == "2.0.0"))
164		-	then {
165		-	let aq = [ab, ac, false, 0]
166		-	invoke(H, "replenishWithOneTokenV2", [false, 0], ao)
167		-	}
168		-	else throw("Wrong pool type")
169		-	}
170		-	else 0
171		-	if ((ap == ap))
172		-	then {
173		-	let ar = B(fromBase58String(aa))
	170	+	let ar = B(fromBase58String(aa))
	171	+	if ((1 == 1))
	172	+	then throw(((aa + "\|\| ") + toString(ar)))
	173	+	else {
174	174		let as = (ar - ad)
175	175		let at = fraction(as, (d - N(K, O)), d)
176	176		let au = (as - at)
177	177		if ((0 >= au))
178	178		then throw("amount of staked sharetokens must be > 0")
179	179		else {
180	180		let av = invoke(P(), "lockShareTokens", [K, 0], [AttachedPayment(fromBase58String(aa), au)])
181	181		if ((av == av))
182	182		then {
183	183		let aw = J(K)
184	184		let ax = L(K, M)
185	185		[IntegerEntry((K + o), (aw + au)), IntegerEntry((((((K + "_") + M) + "_") + toString(ax)) + l), au), StringEntry((((((K + "_") + M) + "_") + toString(ax)) + m), a), IntegerEntry((((K + "_") + M) + n), ax), ScriptTransfer(y, at, fromBase58String(aa))]
186	186		}
187	187		else throw("Strict value is not equal to itself.")
188	188		}
189	189		}
190		-	else throw("Strict value is not equal to itself.")
191	190		}
192	191		else throw("Strict value is not equal to itself.")
193	192		}
	193	+	else throw("Strict value is not equal to itself.")
194	194		}
195	195
196	196
197	197		func ay (M,K,O,U,V,W,X,Y,Z,aa,ab,ac) = nil
198	198
199	199
200	200		@Callable(A)
201	201		func replanish (K,az,aA,ab,ac) = {
202	202		let aB = valueOrErrorMessage(getString(this, (u + K)), "Pool is not inited")
203	203		let aC = if ((aB == a))
204	204		then G(Address(fromBase58String(K)))
205	205		else if ((aB == b))
206	206		then I(Address(fromBase58String(K)))
207	207		else throw("Wrong pool type")
208	208		let aD = aC._1
209	209		let aE = aC._2
210	210		let Y = aC._3
211	211		let Z = aC._4
212	212		let aa = aC._5
213	213		let aF = if ((size(A.payments) == 2))
214	214		then if ((R(A.payments[0].assetId) != aD))
215	215		then throw("Wrong payment asset A")
216	216		else if ((R(A.payments[1].assetId) != aE))
217	217		then throw("Wrong payment asset B")
218	218		else $Tuple4(A.payments[0].amount, aD, A.payments[1].amount, aE)
219	219		else if ((size(A.payments) == 1))
220	220		then if ((R(A.payments[0].assetId) == aD))
221	221		then $Tuple4(A.payments[0].amount, aD, 0, aE)
222	222		else if ((R(A.payments[0].assetId) == aE))
223	223		then $Tuple4(0, aD, A.payments[0].amount, aE)
224	224		else throw("Wrong payment")
225	225		else throw("One or two payments expected")
226	226		let U = aF._1
227	227		let V = aF._2
228	228		let W = aF._3
229	229		let X = aF._4
230	230		if ((az > 0))
231	231		then {
232	232		let aG = makeString([aB, toString(A.caller), K, toString(U), V, toString(W), X, toString(Y), toString(Z), aa, toString(ab), toString(ac)], ",")
233	233		let aH = {
234	234		let aI = invoke(this, "createNewRequest", [aG], nil)
235	235		if ($isInstanceOf(aI, "Int"))
236	236		then aI
237	237		else unit
238	238		}
239	239		if ((aH == aH))
240	240		then {
241	241		let aJ = [toString(A.caller), aa, aA, az, toString(this), "replanishFromLand", toString(valueOrErrorMessage(aH, "Can't create new request"))]
242	242		let aK = reentrantInvoke(Q(), "flashPosition", aJ, nil)
243	243		nil
244	244		}
245	245		else throw("Strict value is not equal to itself.")
246	246		}
247	247		else if ((aB == a))
248	248		then T(toString(A.caller), K, false, U, V, W, X, Y, Z, aa, ab, ac)
249	249		else throw("Cant wx")
250	250		}
251	251
252	252
253	253
254	254		@Callable(A)
255	255		func replanishFromLand (aL) = {
256	256		let aG = split(valueOrErrorMessage(getString(this, (aL + s)), ("No request with id " + aL)), ",")
257	257		if ((aG[0] == a))
258	258		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]))
259	259		else throw("Cant wx")
260	260		}
261	261
262	262
263	263
264	264		@Callable(A)
265	265		func createNewRequest (aM) = valueOrElse(z(A), {
266	266		let aH = (valueOrElse(getInteger(this, t), 0) + 1)
267	267		$Tuple2([StringEntry((toString(aH) + s), aM)], aH)
268	268		})
269	269
270	270
271	271
272	272		@Callable(A)
273	273		func initNewPool (aB,H,aN,aO,aP) = if (if ((aB != a))
274	274		then (aB != b)
275	275		else false)
276	276		then throw("Wrong type")
277	277		else [IntegerEntry((H + p), aN), IntegerEntry((H + q), aO), IntegerEntry((H + r), aP), StringEntry((u + H), aB)]
278	278
279	279
280	280		@Verifier(aQ)
281	281		func aR () = sigVerify(aQ.bodyBytes, aQ.proofs[0], aQ.senderPublicKey)
282	282

github/deemru/w8io/03bedc9 
82.56 ms ◑