tx · 8xpemsRMX3ySaHNG8ZS5Pvo3mLi4hCsvLV1TjbG6YiFz

3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS:  -0.01000000 Waves

2023.03.24 21:26 [2504456] smart account 3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "8xpemsRMX3ySaHNG8ZS5Pvo3mLi4hCsvLV1TjbG6YiFz",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1679682398961,
    "version": 2,
    "chainId": 84,
    "sender": "3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS",
    "senderPublicKey": "HP8sssVq1866F7CaPQJwgFrt6fsqhQjKwM84cL1wjD2a",
    "proofs": [
        "5a8ZQ7u6nkLhdoipNAzMHt3n6z9MFWM1mUZsg1fJU8q5WQPvQuk6LdwhsoMf39AhCNLdZFXeZF2wF5gee6rCe3T1"
    ],
    "script": "base64:BgIeCAISBwoFCAEIAQESAwoBCBIDCgEIEgcKBQgIAQEBJgALU0ZfUE9TX1RZUEUCAlNGAAtXWF9QT1NfVFlQRQICV1gABlNDQUxFOACAwtcvAApGRUVfU0NBTEU2AMCEPQAUa1NGUG9vbEFBc3NldEJhbGFuY2UCD0FfYXNzZXRfYmFsYW5jZQAUa1NGUG9vbEJBc3NldEJhbGFuY2UCD0JfYXNzZXRfYmFsYW5jZQAPa1NGUG9vbEFBc3NldElkAgpBX2Fzc2V0X2lkAA9rU0ZQb29sQkFzc2V0SWQCCkJfYXNzZXRfaWQADmtTRlBvb2xTaGFyZUlkAg5zaGFyZV9hc3NldF9pZAAOa1NGUG9vbFZlcnNpb24CB3ZlcnNpb24AEGtTRkZhcm1pbmdTdGFrZWQCFF9zaGFyZV90b2tlbnNfbG9ja2VkAA1rVXNlclBvc2l0aW9uAg5fdXNlcl9wb3NpdGlvbgARa1VzZXJQb3NpdGlvblR5cGUCE191c2VyX3Bvc2l0aW9uX3R5cGUAEGtVc2VyUG9zaXRpb25OdW0CFV91c2VyX3Bvc2l0aW9uX251bWJlcgAOa1RvdGFsUG9zaXRpb24CD190b3RhbF9wb3NpdGlvbgAVa0F4bHlJbkZlZVdpdGhvdXRMb2FuAhZfYXhseV9mZWVfd2l0aG91dF9sb2FuABJrQXhseUluRmVlV2l0aExvYW4CE19heGx5X2ZlZV93aXRoX2xvYW4AC2tBeGx5Q2FwRmVlAg1fYXhseV9mZWVfY2FwAAprUmVxdWVzdElkAgtfcmVxdWVzdF9pZAAMa1JlcXVlc3RJdGVyAg1yZXF1ZXN0c19pdGVyAAVrUG9vbAIFcG9vbF8ACWtNb25leUJveAIOYXhseV9tb25leV9ib3gADmtTRkZhcm1pbmdBZGRyAhNzd29wZmlfZmFybWluZ19hZGRyAAxrTGVuZFNlcnZpY2UCEWxlbmRfc2VydmljZV9hZGRyAAhtb25leUJveAkBB0FkZHJlc3MBCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQlrTW9uZXlCb3gCGE5vIGF4bHkgbW9uZXlCb3ggYWRkcmVzcwEKaXNTZWxmQ2FsbAEBaQMJAAACCAUBaQZjYWxsZXIFBHRoaXMFBHVuaXQJAAIBAitPbmx5IGNvbnRyYWN0IGl0c2VsZiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQ5hY2NvdW50QmFsYW5jZQEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJpZAUHJG1hdGNoMAkA8AcCBQR0aGlzBQJpZAMJAAECBQckbWF0Y2gwAgRVbml0BAV3YXZlcwUHJG1hdGNoMAgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAAIBAgtNYXRjaCBlcnJvcgENZ2V0U0ZQb29sRGF0YQEIcG9vbEFkZHIJAJcKBQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ9rU0ZQb29sQUFzc2V0SWQCGUNhbid0IGdldCBwb29sIEEgYXNzZXQgaWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQhwb29sQWRkcgUPa1NGUG9vbEJBc3NldElkAhlDYW4ndCBnZXQgcG9vbCBCIGFzc2V0IGlkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUIcG9vbEFkZHIFFGtTRlBvb2xBQXNzZXRCYWxhbmNlAh5DYW4ndCBnZXQgcG9vbCBBIGFzc2V0IGJhbGFuY2UJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQhwb29sQWRkcgUUa1NGUG9vbEJBc3NldEJhbGFuY2UCHkNhbid0IGdldCBwb29sIEIgYXNzZXQgYmFsYW5jZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ5rU0ZQb29sU2hhcmVJZAIYQ2FuJ3QgZ2V0IHNoYXJlIGFzc2V0IGlkAQ1nZXRXWFBvb2xEYXRhAQhwb29sQWRkcgkAlwoFCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFD2tTRlBvb2xBQXNzZXRJZAIZQ2FuJ3QgZ2V0IHBvb2wgQSBhc3NldCBpZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ9rU0ZQb29sQkFzc2V0SWQCGUNhbid0IGdldCBwb29sIEIgYXNzZXQgaWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQhwb29sQWRkcgUUa1NGUG9vbEFBc3NldEJhbGFuY2UCHkNhbid0IGdldCBwb29sIEEgYXNzZXQgYmFsYW5jZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFCHBvb2xBZGRyBRRrU0ZQb29sQkFzc2V0QmFsYW5jZQIeQ2FuJ3QgZ2V0IHBvb2wgQiBhc3NldCBiYWxhbmNlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFDmtTRlBvb2xTaGFyZUlkAhhDYW4ndCBnZXQgc2hhcmUgYXNzZXQgaWQBFGdldEF4bHlUb3RhbFBvc2l0aW9uAQRwb29sCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUOa1RvdGFsUG9zaXRpb24AAAEYZ2V0TmV3VXNlclBvc2l0aW9uTnVtYmVyAgRwb29sBHVzZXIJAGQCCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFEGtVc2VyUG9zaXRpb25OdW0AAAABAQxnZXRBeGx5SW5GZWUCBHBvb2wId2l0aExvYW4DBQh3aXRoTG9hbgkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICBQRwb29sBRJrQXhseUluRmVlV2l0aExvYW4JARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUEcG9vbAUVa0F4bHlJbkZlZVdpdGhvdXRMb2FuARBnZXRTRkZhcm1pbmdBZGRyAAkBB0FkZHJlc3MBCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQ5rU0ZGYXJtaW5nQWRkcgIdQ2FuJ3QgZ2V0IHN3b3BmaSBmYXJtaW5nIGFkZHIBDmdldExlbmRTcnZBZGRyAAkBB0FkZHJlc3MBCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQxrTGVuZFNlcnZpY2UCG0Nhbid0IGdldCBsZW5kIHNlcnZpY2UgYWRkcgEMYXNzZXRJZFRvU3RyAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAmlkBQckbWF0Y2gwCQDYBAEFAmlkAwkAAQIFByRtYXRjaDACBFVuaXQEBXdhdmVzBQckbWF0Y2gwAgVXQVZFUwkAAgECC01hdGNoIGVycm9yAQ5hc3NldElkRnJvbVN0cgEHYXNzZXRJZAMJAAACBQdhc3NldElkAgVXQVZFUwUEdW5pdAkA2QQBBQdhc3NldElkAQ9yZXBsYW5pc2hTd29wRmkMBHVzZXIEcG9vbAh3aXRoTG9hbgRwbXRBCXBtdEFzc2V0QQRwbXRCCXBtdEFzc2V0QgRiYWxBBGJhbEIHc2hhcmVJZBN2aXJ0dWFsU3dhcFRva2VuUGF5E3ZpcnR1YWxTd2FwVG9rZW5HZXQEEnNoYXJlQmFsYW5jZUJlZm9yZQkBDmFjY291bnRCYWxhbmNlAQkA2QQBBQdzaGFyZUlkAwkAAAIFEnNoYXJlQmFsYW5jZUJlZm9yZQUSc2hhcmVCYWxhbmNlQmVmb3JlBAhwb29sQWRkcgkBB0FkZHJlc3MBCQDZBAEFBHBvb2wEBnJhdGlvQQkAawMFBlNDQUxFOAUEcG10QQUEYmFsQQQGcmF0aW9CCQBrAwUGU0NBTEU4BQRwbXRCBQRiYWxCBAskdDA0NTQ3NDg0MAMJAGYCBQZyYXRpb0IFBnJhdGlvQQQDcG10CQBuBAUEYmFsQgUGcmF0aW9BBQZTQ0FMRTgFB0NFSUxJTkcJAJYKBAUEcG10QQUDcG10CQBlAgUEcG10QgUDcG10BQlwbXRBc3NldEIEA3BtdAkAbgQFBGJhbEEFBnJhdGlvQgUGU0NBTEU4BQdDRUlMSU5HCQCWCgQFA3BtdAUEcG10QgkAZQIFBHBtdEEFA3BtdAUJcG10QXNzZXRBBApwbXRBbW91bnRBCAULJHQwNDU0NzQ4NDACXzEECnBtdEFtb3VudEIIBQskdDA0NTQ3NDg0MAJfMgQGY2hhbmdlCAULJHQwNDU0NzQ4NDACXzMEDWNoYW5nZUFzc2V0SWQIBQskdDA0NTQ3NDg0MAJfNAQLcG9vbFZlcnNpb24JARFAZXh0ck5hdGl2ZSgxMDUzKQIFCHBvb2xBZGRyAgd2ZXJzaW9uBARpbnYxAwMJAGYCBQpwbXRBbW91bnRBAAAJAGYCBQpwbXRBbW91bnRCAAAHBAhwYXltZW50cwkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDmFzc2V0SWRGcm9tU3RyAQUJcG10QXNzZXRBBQpwbXRBbW91bnRBCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQEOYXNzZXRJZEZyb21TdHIBBQlwbXRBc3NldEIFCnBtdEFtb3VudEIFA25pbAMJAAACBQtwb29sVmVyc2lvbgIFMS4wLjAJAPwHBAUIcG9vbEFkZHICDGNhbGxGdW5jdGlvbgkAzAgCAhZyZXBsZW5pc2hXaXRoVHdvVG9rZW5zCQDMCAIJAMwIAgIFZmFsc2UJAMwIAgIBMAUDbmlsBQNuaWwFCHBheW1lbnRzAwkAAAIFC3Bvb2xWZXJzaW9uAgUyLjAuMAkA/AcEBQhwb29sQWRkcgIYcmVwbGVuaXNoV2l0aFR3b1Rva2Vuc1YyCQDMCAIHCQDMCAIAAAUDbmlsBQhwYXltZW50cwkAAgECD1dyb25nIHBvb2wgdHlwZQAAAwkAAAIFBGludjEFBGludjEEBGludjIDCQBmAgUGY2hhbmdlAAAECHBheW1lbnRzCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQEOYXNzZXRJZEZyb21TdHIBBQ1jaGFuZ2VBc3NldElkBQZjaGFuZ2UFA25pbAMJAAACBQtwb29sVmVyc2lvbgIFMS4wLjAEBHZhcnMJAMwIAgIBMAkAzAgCAgVmYWxzZQkAzAgCAgEwBQNuaWwJAPwHBAUIcG9vbEFkZHICDGNhbGxGdW5jdGlvbgkAzAgCAhVyZXBsZW5pc2hXaXRoT25lVG9rZW4JAMwIAgUEdmFycwUDbmlsBQhwYXltZW50cwMJAAACBQtwb29sVmVyc2lvbgIFMi4wLjAEBHZhcnMJAMwIAgUTdmlydHVhbFN3YXBUb2tlblBheQkAzAgCBRN2aXJ0dWFsU3dhcFRva2VuR2V0CQDMCAIHCQDMCAIAAAUDbmlsCQD8BwQFCHBvb2xBZGRyAhdyZXBsZW5pc2hXaXRoT25lVG9rZW5WMgkAzAgCBwkAzAgCAAAFA25pbAUIcGF5bWVudHMJAAIBAg9Xcm9uZyBwb29sIHR5cGUAAAMJAAACBQRpbnYyBQRpbnYyBBFzaGFyZUJhbGFuY2VBZnRlcgkBDmFjY291bnRCYWxhbmNlAQkA2QQBBQdzaGFyZUlkAwkAAAIAAQABCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCkAwEFEXNoYXJlQmFsYW5jZUFmdGVyAgQgfHwgCQCkAwEFEnNoYXJlQmFsYW5jZUJlZm9yZQIEIHx8IAkApAMBCQBlAgURc2hhcmVCYWxhbmNlQWZ0ZXIFEnNoYXJlQmFsYW5jZUJlZm9yZQQKdG90YWxTaGFyZQkAZQIFEXNoYXJlQmFsYW5jZUFmdGVyBRJzaGFyZUJhbGFuY2VCZWZvcmUECWF4bHlJbkZlZQkAawMFCnRvdGFsU2hhcmUJAQxnZXRBeGx5SW5GZWUCBQRwb29sBQh3aXRoTG9hbgUKRkVFX1NDQUxFNgMJAAACAAEAAQkAAgEJAKQDAQkBDGdldEF4bHlJbkZlZQIFBHBvb2wFCHdpdGhMb2FuBBF1c2VyU2hhcmVGb3JTdGFrZQkAZQIFCnRvdGFsU2hhcmUFCWF4bHlJbkZlZQMJAAACAAEAAQkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkApAMBBQp0b3RhbFNoYXJlAgQgfHwgCQCkAwEFCWF4bHlJbkZlZQIEIHx8IAkApAMBBRF1c2VyU2hhcmVGb3JTdGFrZQMJAGcCAAAFEXVzZXJTaGFyZUZvclN0YWtlCQACAQIoYW1vdW50IG9mIHN0YWtlZCBzaGFyZXRva2VucyBtdXN0IGJlID4gMAQEaW52MwkA/AcECQEQZ2V0U0ZGYXJtaW5nQWRkcgACD2xvY2tTaGFyZVRva2VucwkAzAgCBQRwb29sCQDMCAIAAAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFB3NoYXJlSWQFEXVzZXJTaGFyZUZvclN0YWtlBQNuaWwDCQAAAgUEaW52MwUEaW52MwQLdG90YWxBbW91bnQJARRnZXRBeGx5VG90YWxQb3NpdGlvbgEFBHBvb2wECW5ld1Bvc051bQkBGGdldE5ld1VzZXJQb3NpdGlvbk51bWJlcgIFBHBvb2wFBHVzZXIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUOa1RvdGFsUG9zaXRpb24JAGQCBQt0b3RhbEFtb3VudAURdXNlclNoYXJlRm9yU3Rha2UJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyAgFfCQCkAwEFCW5ld1Bvc051bQUNa1VzZXJQb3NpdGlvbgURdXNlclNoYXJlRm9yU3Rha2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXICAV8JAKQDAQUJbmV3UG9zTnVtBRFrVXNlclBvc2l0aW9uVHlwZQULU0ZfUE9TX1RZUEUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFEGtVc2VyUG9zaXRpb25OdW0FCW5ld1Bvc051bQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQhtb25leUJveAUJYXhseUluRmVlCQDZBAEFB3NoYXJlSWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgELcmVwbGFuaXNoV1gMBHVzZXIEcG9vbAh3aXRoTG9hbgRwbXRBCXBtdEFzc2V0QQRwbXRCCXBtdEFzc2V0QgRiYWxBBGJhbEIHc2hhcmVJZBN2aXJ0dWFsU3dhcFRva2VuUGF5E3ZpcnR1YWxTd2FwVG9rZW5HZXQFA25pbAQBaQEJcmVwbGFuaXNoBQRwb29sDGJvcnJvd0Ftb3VudA1ib3Jyb3dBc3NldElkE3ZpcnR1YWxTd2FwVG9rZW5QYXkTdmlydHVhbFN3YXBUb2tlbkdldAQEdHlwZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgUFa1Bvb2wFBHBvb2wCElBvb2wgaXMgbm90IGluaXRlZAQLJHQwNzkyNzgxNzgDCQAAAgUEdHlwZQULU0ZfUE9TX1RZUEUJAQ1nZXRTRlBvb2xEYXRhAQkBB0FkZHJlc3MBCQDZBAEFBHBvb2wDCQAAAgUEdHlwZQULV1hfUE9TX1RZUEUJAQ1nZXRXWFBvb2xEYXRhAQkBB0FkZHJlc3MBCQDZBAEFBHBvb2wJAAIBAg9Xcm9uZyBwb29sIHR5cGUEA0FJZAgFCyR0MDc5Mjc4MTc4Al8xBANCSWQIBQskdDA3OTI3ODE3OAJfMgQEYmFsQQgFCyR0MDc5Mjc4MTc4Al8zBARiYWxCCAULJHQwNzkyNzgxNzgCXzQEB3NoYXJlSWQIBQskdDA3OTI3ODE3OAJfNQQLJHQwODE4Mjg4MTkDCQAAAgkAkAMBCAUBaQhwYXltZW50cwACAwkBAiE9AgkBDGFzc2V0SWRUb1N0cgEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUDQUlkCQACAQIVV3JvbmcgcGF5bWVudCBhc3NldCBBAwkBAiE9AgkBDGFzc2V0SWRUb1N0cgEICQCRAwIIBQFpCHBheW1lbnRzAAEHYXNzZXRJZAUDQklkCQACAQIVV3JvbmcgcGF5bWVudCBhc3NldCBCCQCWCgQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BQNBSWQICQCRAwIIBQFpCHBheW1lbnRzAAEGYW1vdW50BQNCSWQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABAwkAAAIJAQxhc3NldElkVG9TdHIBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQFA0FJZAkAlgoECAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAUDQUlkAAAFA0JJZAMJAAACCQEMYXNzZXRJZFRvU3RyAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQNCSWQJAJYKBAAABQNBSWQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BQNCSWQJAAIBAg1Xcm9uZyBwYXltZW50CQACAQIcT25lIG9yIHR3byBwYXltZW50cyBleHBlY3RlZAQEcG10QQgFCyR0MDgxODI4ODE5Al8xBAlwbXRBc3NldEEIBQskdDA4MTgyODgxOQJfMgQEcG10QggFCyR0MDgxODI4ODE5Al8zBAlwbXRBc3NldEIIBQskdDA4MTgyODgxOQJfNAMJAGYCBQxib3Jyb3dBbW91bnQAAAQHcmVxdWVzdAkAuQkCCQDMCAIFBHR5cGUJAMwIAgkApQgBCAUBaQZjYWxsZXIJAMwIAgUEcG9vbAkAzAgCCQCkAwEFBHBtdEEJAMwIAgUJcG10QXNzZXRBCQDMCAIJAKQDAQUEcG10QgkAzAgCBQlwbXRBc3NldEIJAMwIAgkApAMBBQRiYWxBCQDMCAIJAKQDAQUEYmFsQgkAzAgCBQdzaGFyZUlkCQDMCAIJAKQDAQUTdmlydHVhbFN3YXBUb2tlblBheQkAzAgCCQCkAwEFE3ZpcnR1YWxTd2FwVG9rZW5HZXQFA25pbAIBLAQMbmV3UmVxdWVzdElkCgABQAkA/AcEBQR0aGlzAhBjcmVhdGVOZXdSZXF1ZXN0CQDMCAIFB3JlcXVlc3QFA25pbAUDbmlsAwkAAQIFAUACA0ludAUBQAUEdW5pdAMJAAACBQxuZXdSZXF1ZXN0SWQFDG5ld1JlcXVlc3RJZAQEYXJncwkAzAgCCQClCAEIBQFpBmNhbGxlcgkAzAgCBQdzaGFyZUlkCQDMCAIFDWJvcnJvd0Fzc2V0SWQJAMwIAgUMYm9ycm93QW1vdW50CQDMCAIJAKUIAQUEdGhpcwkAzAgCAhFyZXBsYW5pc2hGcm9tTGFuZAkAzAgCCQCkAwEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgUMbmV3UmVxdWVzdElkAhhDYW4ndCBjcmVhdGUgbmV3IHJlcXVlc3QFA25pbAQDaW52CQD9BwQJAQ5nZXRMZW5kU3J2QWRkcgACDWZsYXNoUG9zaXRpb24FBGFyZ3MFA25pbAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAwkAAAIFBHR5cGUFC1NGX1BPU19UWVBFCQEPcmVwbGFuaXNoU3dvcEZpDAkApQgBCAUBaQZjYWxsZXIFBHBvb2wHBQRwbXRBBQlwbXRBc3NldEEFBHBtdEIFCXBtdEFzc2V0QgUEYmFsQQUEYmFsQgUHc2hhcmVJZAUTdmlydHVhbFN3YXBUb2tlblBheQUTdmlydHVhbFN3YXBUb2tlbkdldAkAAgECB0NhbnQgd3gBaQERcmVwbGFuaXNoRnJvbUxhbmQBCXJlcXVlc3RJZAQHcmVxdWVzdAkAtQkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwkArAICBQlyZXF1ZXN0SWQFCmtSZXF1ZXN0SWQJAKwCAgITTm8gcmVxdWVzdCB3aXRoIGlkIAUJcmVxdWVzdElkAgEsAwkAAAIJAJEDAgUHcmVxdWVzdAAABQtTRl9QT1NfVFlQRQkBD3JlcGxhbmlzaFN3b3BGaQwJAJEDAgUHcmVxdWVzdAABCQCRAwIFB3JlcXVlc3QAAgYJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdyZXF1ZXN0AAMJAJEDAgUHcmVxdWVzdAAECQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVxdWVzdAAFCQCRAwIFB3JlcXVlc3QABgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3JlcXVlc3QABwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3JlcXVlc3QACAkAkQMCBQdyZXF1ZXN0AAkJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdyZXF1ZXN0AAoJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdyZXF1ZXN0AAsJAAIBAgdDYW50IHd4AWkBEGNyZWF0ZU5ld1JlcXVlc3QBBnBhcmFtcwkBC3ZhbHVlT3JFbHNlAgkBCmlzU2VsZkNhbGwBBQFpBAxuZXdSZXF1ZXN0SWQJAGQCCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFDGtSZXF1ZXN0SXRlcgAAAAEJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKQDAQUMbmV3UmVxdWVzdElkBQprUmVxdWVzdElkBQZwYXJhbXMFA25pbAUMbmV3UmVxdWVzdElkAWkBC2luaXROZXdQb29sBQR0eXBlCHBvb2xBZGRyC2luRmVlTm9Mb2FuCWluRmVlTG9hbgZjYXBGZWUDAwkBAiE9AgUEdHlwZQULU0ZfUE9TX1RZUEUJAQIhPQIFBHR5cGUFC1dYX1BPU19UWVBFBwkAAgECCldyb25nIHR5cGUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUIcG9vbEFkZHIFFWtBeGx5SW5GZWVXaXRob3V0TG9hbgULaW5GZWVOb0xvYW4JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUIcG9vbEFkZHIFEmtBeGx5SW5GZWVXaXRoTG9hbgUJaW5GZWVMb2FuCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCHBvb2xBZGRyBQtrQXhseUNhcEZlZQUGY2FwRmVlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUFa1Bvb2wFCHBvb2xBZGRyBQR0eXBlBQNuaWwBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5wp1o1w==",
    "height": 2504456,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: FJwMz31g3JYuRqQicSvUZ3QxaeGsxvsaQ9JxWkGVVqnf
Next: 4vcWPfZf8LmCebKnN2dG9FLRDv3GaWs2gEXE2W2QrYzT

Diff: 
Old
New
Differences
106
106
 
107
107
 
func replanishSwopFi (user,pool,withLoan,pmtA,pmtAssetA,pmtB,pmtAssetB,balA,balB,shareId,virtualSwapTokenPay,virtualSwapTokenGet) = {
108
108
 
    let shareBalanceBefore = accountBalance(fromBase58String(shareId))
109
-
    let poolAddr = Address(fromBase58String(pool))
110
-
    let ratioA = fraction(SCALE8, pmtA, balA)
111
-
    let ratioB = fraction(SCALE8, pmtB, balB)
112
-
    let $t045444837 = if ((ratioB > ratioA))
109
+
    if ((shareBalanceBefore == shareBalanceBefore))
113
110
 
        then {
114
-
            let pmt = fraction(balB, ratioA, SCALE8, CEILING)
115
-
            $Tuple4(pmtA, pmt, (pmtB - pmt), pmtAssetB)
116
-
            }
117
-
        else {
118
-
            let pmt = fraction(balA, ratioB, SCALE8, CEILING)
119
-
            $Tuple4(pmt, pmtB, (pmtA - pmt), pmtAssetA)
120
-
            }
121
-
    let pmtAmountA = $t045444837._1
122
-
    let pmtAmountB = $t045444837._2
123
-
    let change = $t045444837._3
124
-
    let changeAssetId = $t045444837._4
125
-
    let poolVersion = getStringValue(poolAddr, "version")
126
-
    let inv1 = if (if ((pmtAmountA > 0))
127
-
        then (pmtAmountB > 0)
128
-
        else false)
129
-
        then {
130
-
            let payments = [AttachedPayment(assetIdFromStr(pmtAssetA), pmtAmountA), AttachedPayment(assetIdFromStr(pmtAssetB), pmtAmountB)]
131
-
            if ((poolVersion == "1.0.0"))
132
-
                then invoke(poolAddr, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], payments)
133
-
                else if ((poolVersion == "2.0.0"))
134
-
                    then invoke(poolAddr, "replenishWithTwoTokensV2", [false, 0], payments)
135
-
                    else throw("Wrong pool type")
136
-
            }
137
-
        else 0
138
-
    if ((inv1 == inv1))
139
-
        then {
140
-
            let inv2 = if ((change > 0))
111
+
            let poolAddr = Address(fromBase58String(pool))
112
+
            let ratioA = fraction(SCALE8, pmtA, balA)
113
+
            let ratioB = fraction(SCALE8, pmtB, balB)
114
+
            let $t045474840 = if ((ratioB > ratioA))
141
115
 
                then {
142
-
                    let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
116
+
                    let pmt = fraction(balB, ratioA, SCALE8, CEILING)
117
+
                    $Tuple4(pmtA, pmt, (pmtB - pmt), pmtAssetB)
118
+
                    }
119
+
                else {
120
+
                    let pmt = fraction(balA, ratioB, SCALE8, CEILING)
121
+
                    $Tuple4(pmt, pmtB, (pmtA - pmt), pmtAssetA)
122
+
                    }
123
+
            let pmtAmountA = $t045474840._1
124
+
            let pmtAmountB = $t045474840._2
125
+
            let change = $t045474840._3
126
+
            let changeAssetId = $t045474840._4
127
+
            let poolVersion = getStringValue(poolAddr, "version")
128
+
            let inv1 = if (if ((pmtAmountA > 0))
129
+
                then (pmtAmountB > 0)
130
+
                else false)
131
+
                then {
132
+
                    let payments = [AttachedPayment(assetIdFromStr(pmtAssetA), pmtAmountA), AttachedPayment(assetIdFromStr(pmtAssetB), pmtAmountB)]
143
133
 
                    if ((poolVersion == "1.0.0"))
144
-
                        then {
145
-
                            let vars = ["0", "false", "0"]
146
-
                            invoke(poolAddr, "callFunction", ["replenishWithOneToken", vars], payments)
147
-
                            }
134
+
                        then invoke(poolAddr, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], payments)
148
135
 
                        else if ((poolVersion == "2.0.0"))
149
-
                            then {
150
-
                                let vars = [virtualSwapTokenPay, virtualSwapTokenGet, false, 0]
151
-
                                invoke(poolAddr, "replenishWithOneTokenV2", [false, 0], payments)
152
-
                                }
136
+
                            then invoke(poolAddr, "replenishWithTwoTokensV2", [false, 0], payments)
153
137
 
                            else throw("Wrong pool type")
154
138
 
                    }
155
139
 
                else 0
156
-
            if ((inv2 == inv2))
140
+
            if ((inv1 == inv1))
157
141
 
                then {
158
-
                    let shareBalanceAfter = accountBalance(fromBase58String(shareId))
159
-
                    if ((1 == 1))
160
-
                        then throw(((((toString(shareBalanceAfter) + " || ") + toString(shareBalanceBefore)) + " || ") + toString((shareBalanceAfter - shareBalanceBefore))))
161
-
                        else {
162
-
                            let totalShare = (shareBalanceAfter - shareBalanceBefore)
163
-
                            let axlyInFee = fraction(totalShare, getAxlyInFee(pool, withLoan), FEE_SCALE6)
142
+
                    let inv2 = if ((change > 0))
143
+
                        then {
144
+
                            let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
145
+
                            if ((poolVersion == "1.0.0"))
146
+
                                then {
147
+
                                    let vars = ["0", "false", "0"]
148
+
                                    invoke(poolAddr, "callFunction", ["replenishWithOneToken", vars], payments)
149
+
                                    }
150
+
                                else if ((poolVersion == "2.0.0"))
151
+
                                    then {
152
+
                                        let vars = [virtualSwapTokenPay, virtualSwapTokenGet, false, 0]
153
+
                                        invoke(poolAddr, "replenishWithOneTokenV2", [false, 0], payments)
154
+
                                        }
155
+
                                    else throw("Wrong pool type")
156
+
                            }
157
+
                        else 0
158
+
                    if ((inv2 == inv2))
159
+
                        then {
160
+
                            let shareBalanceAfter = accountBalance(fromBase58String(shareId))
164
161
 
                            if ((1 == 1))
165
-
                                then throw(toString(getAxlyInFee(pool, withLoan)))
162
+
                                then throw(((((toString(shareBalanceAfter) + " || ") + toString(shareBalanceBefore)) + " || ") + toString((shareBalanceAfter - shareBalanceBefore))))
166
163
 
                                else {
167
-
                                    let userShareForStake = (totalShare - axlyInFee)
164
+
                                    let totalShare = (shareBalanceAfter - shareBalanceBefore)
165
+
                                    let axlyInFee = fraction(totalShare, getAxlyInFee(pool, withLoan), FEE_SCALE6)
168
166
 
                                    if ((1 == 1))
169
-
                                        then throw(((((toString(totalShare) + " || ") + toString(axlyInFee)) + " || ") + toString(userShareForStake)))
170
-
                                        else if ((0 >= userShareForStake))
171
-
                                            then throw("amount of staked sharetokens must be > 0")
172
-
                                            else {
173
-
                                                let inv3 = invoke(getSFFarmingAddr(), "lockShareTokens", [pool, 0], [AttachedPayment(fromBase58String(shareId), userShareForStake)])
174
-
                                                if ((inv3 == inv3))
175
-
                                                    then {
176
-
                                                        let totalAmount = getAxlyTotalPosition(pool)
177
-
                                                        let newPosNum = getNewUserPositionNumber(pool, user)
167
+
                                        then throw(toString(getAxlyInFee(pool, withLoan)))
168
+
                                        else {
169
+
                                            let userShareForStake = (totalShare - axlyInFee)
170
+
                                            if ((1 == 1))
171
+
                                                then throw(((((toString(totalShare) + " || ") + toString(axlyInFee)) + " || ") + toString(userShareForStake)))
172
+
                                                else if ((0 >= userShareForStake))
173
+
                                                    then throw("amount of staked sharetokens must be > 0")
174
+
                                                    else {
175
+
                                                        let inv3 = invoke(getSFFarmingAddr(), "lockShareTokens", [pool, 0], [AttachedPayment(fromBase58String(shareId), userShareForStake)])
176
+
                                                        if ((inv3 == inv3))
177
+
                                                            then {
178
+
                                                                let totalAmount = getAxlyTotalPosition(pool)
179
+
                                                                let newPosNum = getNewUserPositionNumber(pool, user)
178
180
 
[IntegerEntry((pool + kTotalPosition), (totalAmount + userShareForStake)), IntegerEntry((((((pool + "_") + user) + "_") + toString(newPosNum)) + kUserPosition), userShareForStake), StringEntry((((((pool + "_") + user) + "_") + toString(newPosNum)) + kUserPositionType), SF_POS_TYPE), IntegerEntry((((pool + "_") + user) + kUserPositionNum), newPosNum), ScriptTransfer(moneyBox, axlyInFee, fromBase58String(shareId))]
181
+
                                                                }
182
+
                                                            else throw("Strict value is not equal to itself.")
179
183
 
                                                        }
180
-
                                                    else throw("Strict value is not equal to itself.")
181
-
                                                }
184
+
                                            }
182
185
 
                                    }
183
186
 
                            }
187
+
                        else throw("Strict value is not equal to itself.")
184
188
 
                    }
185
189
 
                else throw("Strict value is not equal to itself.")
186
190
 
            }
194
198
 
@Callable(i)
195
199
 
func replanish (pool,borrowAmount,borrowAssetId,virtualSwapTokenPay,virtualSwapTokenGet) = {
196
200
 
    let type = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
197
-
    let $t079248175 = if ((type == SF_POS_TYPE))
201
+
    let $t079278178 = if ((type == SF_POS_TYPE))
198
202
 
        then getSFPoolData(Address(fromBase58String(pool)))
199
203
 
        else if ((type == WX_POS_TYPE))
200
204
 
            then getWXPoolData(Address(fromBase58String(pool)))
201
205
 
            else throw("Wrong pool type")
202
-
    let AId = $t079248175._1
203
-
    let BId = $t079248175._2
204
-
    let balA = $t079248175._3
205
-
    let balB = $t079248175._4
206
-
    let shareId = $t079248175._5
207
-
    let $t081798816 = if ((size(i.payments) == 2))
206
+
    let AId = $t079278178._1
207
+
    let BId = $t079278178._2
208
+
    let balA = $t079278178._3
209
+
    let balB = $t079278178._4
210
+
    let shareId = $t079278178._5
211
+
    let $t081828819 = if ((size(i.payments) == 2))
208
212
 
        then if ((assetIdToStr(i.payments[0].assetId) != AId))
209
213
 
            then throw("Wrong payment asset A")
210
214
 
            else if ((assetIdToStr(i.payments[1].assetId) != BId))
217
221
 
                    then $Tuple4(0, AId, i.payments[0].amount, BId)
218
222
 
                    else throw("Wrong payment")
219
223
 
            else throw("One or two payments expected")
220
-
    let pmtA = $t081798816._1
221
-
    let pmtAssetA = $t081798816._2
222
-
    let pmtB = $t081798816._3
223
-
    let pmtAssetB = $t081798816._4
224
+
    let pmtA = $t081828819._1
225
+
    let pmtAssetA = $t081828819._2
226
+
    let pmtB = $t081828819._3
227
+
    let pmtAssetB = $t081828819._4
224
228
 
    if ((borrowAmount > 0))
225
229
 
        then {
226
230
 
            let request = makeString([type, toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, toString(virtualSwapTokenPay), toString(virtualSwapTokenGet)], ",")
Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let SF_POS_TYPE = "SF"
5
5
 
6
6
 
let WX_POS_TYPE = "WX"
7
7
 
8
8
 
let SCALE8 = 100000000
9
9
 
10
10
 
let FEE_SCALE6 = 1000000
11
11
 
12
12
 
let kSFPoolAAssetBalance = "A_asset_balance"
13
13
 
14
14
 
let kSFPoolBAssetBalance = "B_asset_balance"
15
15
 
16
16
 
let kSFPoolAAssetId = "A_asset_id"
17
17
 
18
18
 
let kSFPoolBAssetId = "B_asset_id"
19
19
 
20
20
 
let kSFPoolShareId = "share_asset_id"
21
21
 
22
22
 
let kSFPoolVersion = "version"
23
23
 
24
24
 
let kSFFarmingStaked = "_share_tokens_locked"
25
25
 
26
26
 
let kUserPosition = "_user_position"
27
27
 
28
28
 
let kUserPositionType = "_user_position_type"
29
29
 
30
30
 
let kUserPositionNum = "_user_position_number"
31
31
 
32
32
 
let kTotalPosition = "_total_position"
33
33
 
34
34
 
let kAxlyInFeeWithoutLoan = "_axly_fee_without_loan"
35
35
 
36
36
 
let kAxlyInFeeWithLoan = "_axly_fee_with_loan"
37
37
 
38
38
 
let kAxlyCapFee = "_axly_fee_cap"
39
39
 
40
40
 
let kRequestId = "_request_id"
41
41
 
42
42
 
let kRequestIter = "requests_iter"
43
43
 
44
44
 
let kPool = "pool_"
45
45
 
46
46
 
let kMoneyBox = "axly_money_box"
47
47
 
48
48
 
let kSFFarmingAddr = "swopfi_farming_addr"
49
49
 
50
50
 
let kLendService = "lend_service_addr"
51
51
 
52
52
 
let moneyBox = Address(fromBase58String(valueOrErrorMessage(getString(this, kMoneyBox), "No axly moneyBox address")))
53
53
 
54
54
 
func isSelfCall (i) = if ((i.caller == this))
55
55
 
    then unit
56
56
 
    else throw("Only contract itself can call this function")
57
57
 
58
58
 
59
59
 
func accountBalance (assetId) = match assetId {
60
60
 
    case id: ByteVector => 
61
61
 
        assetBalance(this, id)
62
62
 
    case waves: Unit => 
63
63
 
        wavesBalance(this).available
64
64
 
    case _ => 
65
65
 
        throw("Match error")
66
66
 
}
67
67
 
68
68
 
69
69
 
func getSFPoolData (poolAddr) = $Tuple5(valueOrErrorMessage(getString(poolAddr, kSFPoolAAssetId), "Can't get pool A asset id"), valueOrErrorMessage(getString(poolAddr, kSFPoolBAssetId), "Can't get pool B asset id"), valueOrErrorMessage(getInteger(poolAddr, kSFPoolAAssetBalance), "Can't get pool A asset balance"), valueOrErrorMessage(getInteger(poolAddr, kSFPoolBAssetBalance), "Can't get pool B asset balance"), valueOrErrorMessage(getString(poolAddr, kSFPoolShareId), "Can't get share asset id"))
70
70
 
71
71
 
72
72
 
func getWXPoolData (poolAddr) = $Tuple5(valueOrErrorMessage(getString(poolAddr, kSFPoolAAssetId), "Can't get pool A asset id"), valueOrErrorMessage(getString(poolAddr, kSFPoolBAssetId), "Can't get pool B asset id"), valueOrErrorMessage(getInteger(poolAddr, kSFPoolAAssetBalance), "Can't get pool A asset balance"), valueOrErrorMessage(getInteger(poolAddr, kSFPoolBAssetBalance), "Can't get pool B asset balance"), valueOrErrorMessage(getString(poolAddr, kSFPoolShareId), "Can't get share asset id"))
73
73
 
74
74
 
75
75
 
func getAxlyTotalPosition (pool) = valueOrElse(getInteger(this, (pool + kTotalPosition)), 0)
76
76
 
77
77
 
78
78
 
func getNewUserPositionNumber (pool,user) = (valueOrElse(getInteger(this, (((pool + "_") + user) + kUserPositionNum)), 0) + 1)
79
79
 
80
80
 
81
81
 
func getAxlyInFee (pool,withLoan) = if (withLoan)
82
82
 
    then getIntegerValue(this, (pool + kAxlyInFeeWithLoan))
83
83
 
    else getIntegerValue(this, (pool + kAxlyInFeeWithoutLoan))
84
84
 
85
85
 
86
86
 
func getSFFarmingAddr () = Address(fromBase58String(valueOrErrorMessage(getString(this, kSFFarmingAddr), "Can't get swopfi farming addr")))
87
87
 
88
88
 
89
89
 
func getLendSrvAddr () = Address(fromBase58String(valueOrErrorMessage(getString(this, kLendService), "Can't get lend service addr")))
90
90
 
91
91
 
92
92
 
func assetIdToStr (assetId) = match assetId {
93
93
 
    case id: ByteVector => 
94
94
 
        toBase58String(id)
95
95
 
    case waves: Unit => 
96
96
 
        "WAVES"
97
97
 
    case _ => 
98
98
 
        throw("Match error")
99
99
 
}
100
100
 
101
101
 
102
102
 
func assetIdFromStr (assetId) = if ((assetId == "WAVES"))
103
103
 
    then unit
104
104
 
    else fromBase58String(assetId)
105
105
 
106
106
 
107
107
 
func replanishSwopFi (user,pool,withLoan,pmtA,pmtAssetA,pmtB,pmtAssetB,balA,balB,shareId,virtualSwapTokenPay,virtualSwapTokenGet) = {
108
108
 
    let shareBalanceBefore = accountBalance(fromBase58String(shareId))
109
-
    let poolAddr = Address(fromBase58String(pool))
110
-
    let ratioA = fraction(SCALE8, pmtA, balA)
111
-
    let ratioB = fraction(SCALE8, pmtB, balB)
112
-
    let $t045444837 = if ((ratioB > ratioA))
109
+
    if ((shareBalanceBefore == shareBalanceBefore))
113
110
 
        then {
114
-
            let pmt = fraction(balB, ratioA, SCALE8, CEILING)
115
-
            $Tuple4(pmtA, pmt, (pmtB - pmt), pmtAssetB)
116
-
            }
117
-
        else {
118
-
            let pmt = fraction(balA, ratioB, SCALE8, CEILING)
119
-
            $Tuple4(pmt, pmtB, (pmtA - pmt), pmtAssetA)
120
-
            }
121
-
    let pmtAmountA = $t045444837._1
122
-
    let pmtAmountB = $t045444837._2
123
-
    let change = $t045444837._3
124
-
    let changeAssetId = $t045444837._4
125
-
    let poolVersion = getStringValue(poolAddr, "version")
126
-
    let inv1 = if (if ((pmtAmountA > 0))
127
-
        then (pmtAmountB > 0)
128
-
        else false)
129
-
        then {
130
-
            let payments = [AttachedPayment(assetIdFromStr(pmtAssetA), pmtAmountA), AttachedPayment(assetIdFromStr(pmtAssetB), pmtAmountB)]
131
-
            if ((poolVersion == "1.0.0"))
132
-
                then invoke(poolAddr, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], payments)
133
-
                else if ((poolVersion == "2.0.0"))
134
-
                    then invoke(poolAddr, "replenishWithTwoTokensV2", [false, 0], payments)
135
-
                    else throw("Wrong pool type")
136
-
            }
137
-
        else 0
138
-
    if ((inv1 == inv1))
139
-
        then {
140
-
            let inv2 = if ((change > 0))
111
+
            let poolAddr = Address(fromBase58String(pool))
112
+
            let ratioA = fraction(SCALE8, pmtA, balA)
113
+
            let ratioB = fraction(SCALE8, pmtB, balB)
114
+
            let $t045474840 = if ((ratioB > ratioA))
141
115
 
                then {
142
-
                    let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
116
+
                    let pmt = fraction(balB, ratioA, SCALE8, CEILING)
117
+
                    $Tuple4(pmtA, pmt, (pmtB - pmt), pmtAssetB)
118
+
                    }
119
+
                else {
120
+
                    let pmt = fraction(balA, ratioB, SCALE8, CEILING)
121
+
                    $Tuple4(pmt, pmtB, (pmtA - pmt), pmtAssetA)
122
+
                    }
123
+
            let pmtAmountA = $t045474840._1
124
+
            let pmtAmountB = $t045474840._2
125
+
            let change = $t045474840._3
126
+
            let changeAssetId = $t045474840._4
127
+
            let poolVersion = getStringValue(poolAddr, "version")
128
+
            let inv1 = if (if ((pmtAmountA > 0))
129
+
                then (pmtAmountB > 0)
130
+
                else false)
131
+
                then {
132
+
                    let payments = [AttachedPayment(assetIdFromStr(pmtAssetA), pmtAmountA), AttachedPayment(assetIdFromStr(pmtAssetB), pmtAmountB)]
143
133
 
                    if ((poolVersion == "1.0.0"))
144
-
                        then {
145
-
                            let vars = ["0", "false", "0"]
146
-
                            invoke(poolAddr, "callFunction", ["replenishWithOneToken", vars], payments)
147
-
                            }
134
+
                        then invoke(poolAddr, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], payments)
148
135
 
                        else if ((poolVersion == "2.0.0"))
149
-
                            then {
150
-
                                let vars = [virtualSwapTokenPay, virtualSwapTokenGet, false, 0]
151
-
                                invoke(poolAddr, "replenishWithOneTokenV2", [false, 0], payments)
152
-
                                }
136
+
                            then invoke(poolAddr, "replenishWithTwoTokensV2", [false, 0], payments)
153
137
 
                            else throw("Wrong pool type")
154
138
 
                    }
155
139
 
                else 0
156
-
            if ((inv2 == inv2))
140
+
            if ((inv1 == inv1))
157
141
 
                then {
158
-
                    let shareBalanceAfter = accountBalance(fromBase58String(shareId))
159
-
                    if ((1 == 1))
160
-
                        then throw(((((toString(shareBalanceAfter) + " || ") + toString(shareBalanceBefore)) + " || ") + toString((shareBalanceAfter - shareBalanceBefore))))
161
-
                        else {
162
-
                            let totalShare = (shareBalanceAfter - shareBalanceBefore)
163
-
                            let axlyInFee = fraction(totalShare, getAxlyInFee(pool, withLoan), FEE_SCALE6)
142
+
                    let inv2 = if ((change > 0))
143
+
                        then {
144
+
                            let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
145
+
                            if ((poolVersion == "1.0.0"))
146
+
                                then {
147
+
                                    let vars = ["0", "false", "0"]
148
+
                                    invoke(poolAddr, "callFunction", ["replenishWithOneToken", vars], payments)
149
+
                                    }
150
+
                                else if ((poolVersion == "2.0.0"))
151
+
                                    then {
152
+
                                        let vars = [virtualSwapTokenPay, virtualSwapTokenGet, false, 0]
153
+
                                        invoke(poolAddr, "replenishWithOneTokenV2", [false, 0], payments)
154
+
                                        }
155
+
                                    else throw("Wrong pool type")
156
+
                            }
157
+
                        else 0
158
+
                    if ((inv2 == inv2))
159
+
                        then {
160
+
                            let shareBalanceAfter = accountBalance(fromBase58String(shareId))
164
161
 
                            if ((1 == 1))
165
-
                                then throw(toString(getAxlyInFee(pool, withLoan)))
162
+
                                then throw(((((toString(shareBalanceAfter) + " || ") + toString(shareBalanceBefore)) + " || ") + toString((shareBalanceAfter - shareBalanceBefore))))
166
163
 
                                else {
167
-
                                    let userShareForStake = (totalShare - axlyInFee)
164
+
                                    let totalShare = (shareBalanceAfter - shareBalanceBefore)
165
+
                                    let axlyInFee = fraction(totalShare, getAxlyInFee(pool, withLoan), FEE_SCALE6)
168
166
 
                                    if ((1 == 1))
169
-
                                        then throw(((((toString(totalShare) + " || ") + toString(axlyInFee)) + " || ") + toString(userShareForStake)))
170
-
                                        else if ((0 >= userShareForStake))
171
-
                                            then throw("amount of staked sharetokens must be > 0")
172
-
                                            else {
173
-
                                                let inv3 = invoke(getSFFarmingAddr(), "lockShareTokens", [pool, 0], [AttachedPayment(fromBase58String(shareId), userShareForStake)])
174
-
                                                if ((inv3 == inv3))
175
-
                                                    then {
176
-
                                                        let totalAmount = getAxlyTotalPosition(pool)
177
-
                                                        let newPosNum = getNewUserPositionNumber(pool, user)
167
+
                                        then throw(toString(getAxlyInFee(pool, withLoan)))
168
+
                                        else {
169
+
                                            let userShareForStake = (totalShare - axlyInFee)
170
+
                                            if ((1 == 1))
171
+
                                                then throw(((((toString(totalShare) + " || ") + toString(axlyInFee)) + " || ") + toString(userShareForStake)))
172
+
                                                else if ((0 >= userShareForStake))
173
+
                                                    then throw("amount of staked sharetokens must be > 0")
174
+
                                                    else {
175
+
                                                        let inv3 = invoke(getSFFarmingAddr(), "lockShareTokens", [pool, 0], [AttachedPayment(fromBase58String(shareId), userShareForStake)])
176
+
                                                        if ((inv3 == inv3))
177
+
                                                            then {
178
+
                                                                let totalAmount = getAxlyTotalPosition(pool)
179
+
                                                                let newPosNum = getNewUserPositionNumber(pool, user)
178
180
 
[IntegerEntry((pool + kTotalPosition), (totalAmount + userShareForStake)), IntegerEntry((((((pool + "_") + user) + "_") + toString(newPosNum)) + kUserPosition), userShareForStake), StringEntry((((((pool + "_") + user) + "_") + toString(newPosNum)) + kUserPositionType), SF_POS_TYPE), IntegerEntry((((pool + "_") + user) + kUserPositionNum), newPosNum), ScriptTransfer(moneyBox, axlyInFee, fromBase58String(shareId))]
181
+
                                                                }
182
+
                                                            else throw("Strict value is not equal to itself.")
179
183
 
                                                        }
180
-
                                                    else throw("Strict value is not equal to itself.")
181
-
                                                }
184
+
                                            }
182
185
 
                                    }
183
186
 
                            }
187
+
                        else throw("Strict value is not equal to itself.")
184
188
 
                    }
185
189
 
                else throw("Strict value is not equal to itself.")
186
190
 
            }
187
191
 
        else throw("Strict value is not equal to itself.")
188
192
 
    }
189
193
 
190
194
 
191
195
 
func replanishWX (user,pool,withLoan,pmtA,pmtAssetA,pmtB,pmtAssetB,balA,balB,shareId,virtualSwapTokenPay,virtualSwapTokenGet) = nil
192
196
 
193
197
 
194
198
 
@Callable(i)
195
199
 
func replanish (pool,borrowAmount,borrowAssetId,virtualSwapTokenPay,virtualSwapTokenGet) = {
196
200
 
    let type = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
197
-
    let $t079248175 = if ((type == SF_POS_TYPE))
201
+
    let $t079278178 = if ((type == SF_POS_TYPE))
198
202
 
        then getSFPoolData(Address(fromBase58String(pool)))
199
203
 
        else if ((type == WX_POS_TYPE))
200
204
 
            then getWXPoolData(Address(fromBase58String(pool)))
201
205
 
            else throw("Wrong pool type")
202
-
    let AId = $t079248175._1
203
-
    let BId = $t079248175._2
204
-
    let balA = $t079248175._3
205
-
    let balB = $t079248175._4
206
-
    let shareId = $t079248175._5
207
-
    let $t081798816 = if ((size(i.payments) == 2))
206
+
    let AId = $t079278178._1
207
+
    let BId = $t079278178._2
208
+
    let balA = $t079278178._3
209
+
    let balB = $t079278178._4
210
+
    let shareId = $t079278178._5
211
+
    let $t081828819 = if ((size(i.payments) == 2))
208
212
 
        then if ((assetIdToStr(i.payments[0].assetId) != AId))
209
213
 
            then throw("Wrong payment asset A")
210
214
 
            else if ((assetIdToStr(i.payments[1].assetId) != BId))
211
215
 
                then throw("Wrong payment asset B")
212
216
 
                else $Tuple4(i.payments[0].amount, AId, i.payments[1].amount, BId)
213
217
 
        else if ((size(i.payments) == 1))
214
218
 
            then if ((assetIdToStr(i.payments[0].assetId) == AId))
215
219
 
                then $Tuple4(i.payments[0].amount, AId, 0, BId)
216
220
 
                else if ((assetIdToStr(i.payments[0].assetId) == BId))
217
221
 
                    then $Tuple4(0, AId, i.payments[0].amount, BId)
218
222
 
                    else throw("Wrong payment")
219
223
 
            else throw("One or two payments expected")
220
-
    let pmtA = $t081798816._1
221
-
    let pmtAssetA = $t081798816._2
222
-
    let pmtB = $t081798816._3
223
-
    let pmtAssetB = $t081798816._4
224
+
    let pmtA = $t081828819._1
225
+
    let pmtAssetA = $t081828819._2
226
+
    let pmtB = $t081828819._3
227
+
    let pmtAssetB = $t081828819._4
224
228
 
    if ((borrowAmount > 0))
225
229
 
        then {
226
230
 
            let request = makeString([type, toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, toString(virtualSwapTokenPay), toString(virtualSwapTokenGet)], ",")
227
231
 
            let newRequestId = {
228
232
 
                let @ = invoke(this, "createNewRequest", [request], nil)
229
233
 
                if ($isInstanceOf(@, "Int"))
230
234
 
                    then @
231
235
 
                    else unit
232
236
 
                }
233
237
 
            if ((newRequestId == newRequestId))
234
238
 
                then {
235
239
 
                    let args = [toString(i.caller), shareId, borrowAssetId, borrowAmount, toString(this), "replanishFromLand", toString(valueOrErrorMessage(newRequestId, "Can't create new request"))]
236
240
 
                    let inv = reentrantInvoke(getLendSrvAddr(), "flashPosition", args, nil)
237
241
 
                    nil
238
242
 
                    }
239
243
 
                else throw("Strict value is not equal to itself.")
240
244
 
            }
241
245
 
        else if ((type == SF_POS_TYPE))
242
246
 
            then replanishSwopFi(toString(i.caller), pool, false, pmtA, pmtAssetA, pmtB, pmtAssetB, balA, balB, shareId, virtualSwapTokenPay, virtualSwapTokenGet)
243
247
 
            else throw("Cant wx")
244
248
 
    }
245
249
 
246
250
 
247
251
 
248
252
 
@Callable(i)
249
253
 
func replanishFromLand (requestId) = {
250
254
 
    let request = split(valueOrErrorMessage(getString(this, (requestId + kRequestId)), ("No request with id " + requestId)), ",")
251
255
 
    if ((request[0] == SF_POS_TYPE))
252
256
 
        then replanishSwopFi(request[1], request[2], true, parseIntValue(request[3]), request[4], parseIntValue(request[5]), request[6], parseIntValue(request[7]), parseIntValue(request[8]), request[9], parseIntValue(request[10]), parseIntValue(request[11]))
253
257
 
        else throw("Cant wx")
254
258
 
    }
255
259
 
256
260
 
257
261
 
258
262
 
@Callable(i)
259
263
 
func createNewRequest (params) = valueOrElse(isSelfCall(i), {
260
264
 
    let newRequestId = (valueOrElse(getInteger(this, kRequestIter), 0) + 1)
261
265
 
    $Tuple2([StringEntry((toString(newRequestId) + kRequestId), params)], newRequestId)
262
266
 
    })
263
267
 
264
268
 
265
269
 
266
270
 
@Callable(i)
267
271
 
func initNewPool (type,poolAddr,inFeeNoLoan,inFeeLoan,capFee) = if (if ((type != SF_POS_TYPE))
268
272
 
    then (type != WX_POS_TYPE)
269
273
 
    else false)
270
274
 
    then throw("Wrong type")
271
275
 
    else [IntegerEntry((poolAddr + kAxlyInFeeWithoutLoan), inFeeNoLoan), IntegerEntry((poolAddr + kAxlyInFeeWithLoan), inFeeLoan), IntegerEntry((poolAddr + kAxlyCapFee), capFee), StringEntry((kPool + poolAddr), type)]
272
276
 
273
277
 
274
278
 
@Verifier(tx)
275
279
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
276
280
 

github/deemru/w8io/873ac7e 
50.77 ms ◑