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
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 -     if ((1 == 1))
110 -         then throw(((shareId + "|| ") + toString(shareBalanceBefore)))
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))
113 +         then {
114 +             let pmt = fraction(balB, ratioA, SCALE8, CEILING)
115 +             $Tuple4(pmtA, pmt, (pmtB - pmt), pmtAssetB)
116 +             }
111 117          else {
112 -             let poolAddr = Address(fromBase58String(pool))
113 -             let ratioA = fraction(SCALE8, pmtA, balA)
114 -             let ratioB = fraction(SCALE8, pmtB, balB)
115 -             let $t046194912 = if ((ratioB > ratioA))
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))
116 141                  then {
117 -                     let pmt = fraction(balB, ratioA, SCALE8, CEILING)
118 -                     $Tuple4(pmtA, pmt, (pmtB - pmt), pmtAssetB)
119 -                     }
120 -                 else {
121 -                     let pmt = fraction(balA, ratioB, SCALE8, CEILING)
122 -                     $Tuple4(pmt, pmtB, (pmtA - pmt), pmtAssetA)
123 -                     }
124 -             let pmtAmountA = $t046194912._1
125 -             let pmtAmountB = $t046194912._2
126 -             let change = $t046194912._3
127 -             let changeAssetId = $t046194912._4
128 -             let poolVersion = getStringValue(poolAddr, "version")
129 -             let inv1 = if (if ((pmtAmountA > 0))
130 -                 then (pmtAmountB > 0)
131 -                 else false)
132 -                 then {
133 -                     let payments = [AttachedPayment(assetIdFromStr(pmtAssetA), pmtAmountA), AttachedPayment(assetIdFromStr(pmtAssetB), pmtAmountB)]
142 +                     let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
134 143                      if ((poolVersion == "1.0.0"))
135 -                         then invoke(poolAddr, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], payments)
144 +                         then {
145 +                             let vars = ["0", "false", "0"]
146 +                             invoke(poolAddr, "callFunction", ["replenishWithOneToken", vars], payments)
147 +                             }
136 148                          else if ((poolVersion == "2.0.0"))
137 -                             then invoke(poolAddr, "replenishWithTwoTokensV2", [false, 0], payments)
149 +                             then {
150 +                                 let vars = [virtualSwapTokenPay, virtualSwapTokenGet, false, 0]
151 +                                 invoke(poolAddr, "replenishWithOneTokenV2", [false, 0], payments)
152 +                                 }
138 153                              else throw("Wrong pool type")
139 154                      }
140 155                  else 0
141 -             if ((inv1 == inv1))
156 +             if ((inv2 == inv2))
142 157                  then {
143 -                     let inv2 = if ((change > 0))
144 -                         then {
145 -                             let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
146 -                             if ((poolVersion == "1.0.0"))
147 -                                 then {
148 -                                     let vars = ["0", "false", "0"]
149 -                                     invoke(poolAddr, "callFunction", ["replenishWithOneToken", vars], payments)
150 -                                     }
151 -                                 else if ((poolVersion == "2.0.0"))
152 -                                     then {
153 -                                         let vars = [virtualSwapTokenPay, virtualSwapTokenGet, false, 0]
154 -                                         invoke(poolAddr, "replenishWithOneTokenV2", [false, 0], payments)
155 -                                         }
156 -                                     else throw("Wrong pool type")
157 -                             }
158 -                         else 0
159 -                     if ((inv2 == inv2))
160 -                         then {
161 -                             let shareBalanceAfter = accountBalance(fromBase58String(shareId))
158 +                     let shareBalanceAfter = accountBalance(fromBase58String(shareId))
159 +                     if ((1 == 1))
160 +                         then throw(((shareId + "|| ") + toString(shareBalanceAfter)))
161 +                         else {
162 162                              let totalShare = (shareBalanceAfter - shareBalanceBefore)
163 163                              let axlyInFee = fraction(totalShare, (FEE_SCALE6 - getAxlyInFee(pool, withLoan)), FEE_SCALE6)
164 164                              let userShareForStake = (totalShare - axlyInFee)
175 175                                          else throw("Strict value is not equal to itself.")
176 176                                      }
177 177                              }
178 -                         else throw("Strict value is not equal to itself.")
179 178                      }
180 179                  else throw("Strict value is not equal to itself.")
181 180              }
181 +         else throw("Strict value is not equal to itself.")
182 182      }
183 183  
184 184  
188 188  @Callable(i)
189 189  func replanish (pool,borrowAmount,borrowAssetId,virtualSwapTokenPay,virtualSwapTokenGet) = {
190 190      let type = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
191 -     let $t076587909 = if ((type == SF_POS_TYPE))
191 +     let $t076577908 = if ((type == SF_POS_TYPE))
192 192          then getSFPoolData(Address(fromBase58String(pool)))
193 193          else if ((type == WX_POS_TYPE))
194 194              then getWXPoolData(Address(fromBase58String(pool)))
195 195              else throw("Wrong pool type")
196 -     let AId = $t076587909._1
197 -     let BId = $t076587909._2
198 -     let balA = $t076587909._3
199 -     let balB = $t076587909._4
200 -     let shareId = $t076587909._5
201 -     let $t079138550 = if ((size(i.payments) == 2))
196 +     let AId = $t076577908._1
197 +     let BId = $t076577908._2
198 +     let balA = $t076577908._3
199 +     let balB = $t076577908._4
200 +     let shareId = $t076577908._5
201 +     let $t079128549 = if ((size(i.payments) == 2))
202 202          then if ((assetIdToStr(i.payments[0].assetId) != AId))
203 203              then throw("Wrong payment asset A")
204 204              else if ((assetIdToStr(i.payments[1].assetId) != BId))
211 211                      then $Tuple4(0, AId, i.payments[0].amount, BId)
212 212                      else throw("Wrong payment")
213 213              else throw("One or two payments expected")
214 -     let pmtA = $t079138550._1
215 -     let pmtAssetA = $t079138550._2
216 -     let pmtB = $t079138550._3
217 -     let pmtAssetB = $t079138550._4
214 +     let pmtA = $t079128549._1
215 +     let pmtAssetA = $t079128549._2
216 +     let pmtB = $t079128549._3
217 +     let pmtAssetB = $t079128549._4
218 218      if ((borrowAmount > 0))
219 219          then {
220 220              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 -     if ((1 == 1))
110 -         then throw(((shareId + "|| ") + toString(shareBalanceBefore)))
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))
113 +         then {
114 +             let pmt = fraction(balB, ratioA, SCALE8, CEILING)
115 +             $Tuple4(pmtA, pmt, (pmtB - pmt), pmtAssetB)
116 +             }
111 117          else {
112 -             let poolAddr = Address(fromBase58String(pool))
113 -             let ratioA = fraction(SCALE8, pmtA, balA)
114 -             let ratioB = fraction(SCALE8, pmtB, balB)
115 -             let $t046194912 = if ((ratioB > ratioA))
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))
116 141                  then {
117 -                     let pmt = fraction(balB, ratioA, SCALE8, CEILING)
118 -                     $Tuple4(pmtA, pmt, (pmtB - pmt), pmtAssetB)
119 -                     }
120 -                 else {
121 -                     let pmt = fraction(balA, ratioB, SCALE8, CEILING)
122 -                     $Tuple4(pmt, pmtB, (pmtA - pmt), pmtAssetA)
123 -                     }
124 -             let pmtAmountA = $t046194912._1
125 -             let pmtAmountB = $t046194912._2
126 -             let change = $t046194912._3
127 -             let changeAssetId = $t046194912._4
128 -             let poolVersion = getStringValue(poolAddr, "version")
129 -             let inv1 = if (if ((pmtAmountA > 0))
130 -                 then (pmtAmountB > 0)
131 -                 else false)
132 -                 then {
133 -                     let payments = [AttachedPayment(assetIdFromStr(pmtAssetA), pmtAmountA), AttachedPayment(assetIdFromStr(pmtAssetB), pmtAmountB)]
142 +                     let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
134 143                      if ((poolVersion == "1.0.0"))
135 -                         then invoke(poolAddr, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], payments)
144 +                         then {
145 +                             let vars = ["0", "false", "0"]
146 +                             invoke(poolAddr, "callFunction", ["replenishWithOneToken", vars], payments)
147 +                             }
136 148                          else if ((poolVersion == "2.0.0"))
137 -                             then invoke(poolAddr, "replenishWithTwoTokensV2", [false, 0], payments)
149 +                             then {
150 +                                 let vars = [virtualSwapTokenPay, virtualSwapTokenGet, false, 0]
151 +                                 invoke(poolAddr, "replenishWithOneTokenV2", [false, 0], payments)
152 +                                 }
138 153                              else throw("Wrong pool type")
139 154                      }
140 155                  else 0
141 -             if ((inv1 == inv1))
156 +             if ((inv2 == inv2))
142 157                  then {
143 -                     let inv2 = if ((change > 0))
144 -                         then {
145 -                             let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
146 -                             if ((poolVersion == "1.0.0"))
147 -                                 then {
148 -                                     let vars = ["0", "false", "0"]
149 -                                     invoke(poolAddr, "callFunction", ["replenishWithOneToken", vars], payments)
150 -                                     }
151 -                                 else if ((poolVersion == "2.0.0"))
152 -                                     then {
153 -                                         let vars = [virtualSwapTokenPay, virtualSwapTokenGet, false, 0]
154 -                                         invoke(poolAddr, "replenishWithOneTokenV2", [false, 0], payments)
155 -                                         }
156 -                                     else throw("Wrong pool type")
157 -                             }
158 -                         else 0
159 -                     if ((inv2 == inv2))
160 -                         then {
161 -                             let shareBalanceAfter = accountBalance(fromBase58String(shareId))
158 +                     let shareBalanceAfter = accountBalance(fromBase58String(shareId))
159 +                     if ((1 == 1))
160 +                         then throw(((shareId + "|| ") + toString(shareBalanceAfter)))
161 +                         else {
162 162                              let totalShare = (shareBalanceAfter - shareBalanceBefore)
163 163                              let axlyInFee = fraction(totalShare, (FEE_SCALE6 - getAxlyInFee(pool, withLoan)), FEE_SCALE6)
164 164                              let userShareForStake = (totalShare - axlyInFee)
165 165                              if ((0 >= userShareForStake))
166 166                                  then throw("amount of staked sharetokens must be > 0")
167 167                                  else {
168 168                                      let inv3 = invoke(getSFFarmingAddr(), "lockShareTokens", [pool, 0], [AttachedPayment(fromBase58String(shareId), userShareForStake)])
169 169                                      if ((inv3 == inv3))
170 170                                          then {
171 171                                              let totalAmount = getAxlyTotalPosition(pool)
172 172                                              let newPosNum = getNewUserPositionNumber(pool, user)
173 173  [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))]
174 174                                              }
175 175                                          else throw("Strict value is not equal to itself.")
176 176                                      }
177 177                              }
178 -                         else throw("Strict value is not equal to itself.")
179 178                      }
180 179                  else throw("Strict value is not equal to itself.")
181 180              }
181 +         else throw("Strict value is not equal to itself.")
182 182      }
183 183  
184 184  
185 185  func replanishWX (user,pool,withLoan,pmtA,pmtAssetA,pmtB,pmtAssetB,balA,balB,shareId,virtualSwapTokenPay,virtualSwapTokenGet) = nil
186 186  
187 187  
188 188  @Callable(i)
189 189  func replanish (pool,borrowAmount,borrowAssetId,virtualSwapTokenPay,virtualSwapTokenGet) = {
190 190      let type = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
191 -     let $t076587909 = if ((type == SF_POS_TYPE))
191 +     let $t076577908 = if ((type == SF_POS_TYPE))
192 192          then getSFPoolData(Address(fromBase58String(pool)))
193 193          else if ((type == WX_POS_TYPE))
194 194              then getWXPoolData(Address(fromBase58String(pool)))
195 195              else throw("Wrong pool type")
196 -     let AId = $t076587909._1
197 -     let BId = $t076587909._2
198 -     let balA = $t076587909._3
199 -     let balB = $t076587909._4
200 -     let shareId = $t076587909._5
201 -     let $t079138550 = if ((size(i.payments) == 2))
196 +     let AId = $t076577908._1
197 +     let BId = $t076577908._2
198 +     let balA = $t076577908._3
199 +     let balB = $t076577908._4
200 +     let shareId = $t076577908._5
201 +     let $t079128549 = if ((size(i.payments) == 2))
202 202          then if ((assetIdToStr(i.payments[0].assetId) != AId))
203 203              then throw("Wrong payment asset A")
204 204              else if ((assetIdToStr(i.payments[1].assetId) != BId))
205 205                  then throw("Wrong payment asset B")
206 206                  else $Tuple4(i.payments[0].amount, AId, i.payments[1].amount, BId)
207 207          else if ((size(i.payments) == 1))
208 208              then if ((assetIdToStr(i.payments[0].assetId) == AId))
209 209                  then $Tuple4(i.payments[0].amount, AId, 0, BId)
210 210                  else if ((assetIdToStr(i.payments[0].assetId) == BId))
211 211                      then $Tuple4(0, AId, i.payments[0].amount, BId)
212 212                      else throw("Wrong payment")
213 213              else throw("One or two payments expected")
214 -     let pmtA = $t079138550._1
215 -     let pmtAssetA = $t079138550._2
216 -     let pmtB = $t079138550._3
217 -     let pmtAssetB = $t079138550._4
214 +     let pmtA = $t079128549._1
215 +     let pmtAssetA = $t079128549._2
216 +     let pmtB = $t079128549._3
217 +     let pmtAssetB = $t079128549._4
218 218      if ((borrowAmount > 0))
219 219          then {
220 220              let request = makeString([type, toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, toString(virtualSwapTokenPay), toString(virtualSwapTokenGet)], ",")
221 221              let newRequestId = {
222 222                  let @ = invoke(this, "createNewRequest", [request], nil)
223 223                  if ($isInstanceOf(@, "Int"))
224 224                      then @
225 225                      else unit
226 226                  }
227 227              if ((newRequestId == newRequestId))
228 228                  then {
229 229                      let args = [toString(i.caller), shareId, borrowAssetId, borrowAmount, toString(this), "replanishFromLand", toString(valueOrErrorMessage(newRequestId, "Can't create new request"))]
230 230                      let inv = reentrantInvoke(getLendSrvAddr(), "flashPosition", args, nil)
231 231                      nil
232 232                      }
233 233                  else throw("Strict value is not equal to itself.")
234 234              }
235 235          else if ((type == SF_POS_TYPE))
236 236              then replanishSwopFi(toString(i.caller), pool, false, pmtA, pmtAssetA, pmtB, pmtAssetB, balA, balB, shareId, virtualSwapTokenPay, virtualSwapTokenGet)
237 237              else throw("Cant wx")
238 238      }
239 239  
240 240  
241 241  
242 242  @Callable(i)
243 243  func replanishFromLand (requestId) = {
244 244      let request = split(valueOrErrorMessage(getString(this, (requestId + kRequestId)), ("No request with id " + requestId)), ",")
245 245      if ((request[0] == SF_POS_TYPE))
246 246          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]))
247 247          else throw("Cant wx")
248 248      }
249 249  
250 250  
251 251  
252 252  @Callable(i)
253 253  func createNewRequest (params) = valueOrElse(isSelfCall(i), {
254 254      let newRequestId = (valueOrElse(getInteger(this, kRequestIter), 0) + 1)
255 255      $Tuple2([StringEntry((toString(newRequestId) + kRequestId), params)], newRequestId)
256 256      })
257 257  
258 258  
259 259  
260 260  @Callable(i)
261 261  func initNewPool (type,poolAddr,inFeeNoLoan,inFeeLoan,capFee) = if (if ((type != SF_POS_TYPE))
262 262      then (type != WX_POS_TYPE)
263 263      else false)
264 264      then throw("Wrong type")
265 265      else [IntegerEntry((poolAddr + kAxlyInFeeWithoutLoan), inFeeNoLoan), IntegerEntry((poolAddr + kAxlyInFeeWithLoan), inFeeLoan), IntegerEntry((poolAddr + kAxlyCapFee), capFee), StringEntry((kPool + poolAddr), type)]
266 266  
267 267  
268 268  @Verifier(tx)
269 269  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
270 270

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		-	if ((1 == 1))
110		-	then throw(((shareId + "\|\| ") + toString(shareBalanceBefore)))
	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))
	113	+	then {
	114	+	let pmt = fraction(balB, ratioA, SCALE8, CEILING)
	115	+	$Tuple4(pmtA, pmt, (pmtB - pmt), pmtAssetB)
	116	+	}
111	117		else {
112		-	let poolAddr = Address(fromBase58String(pool))
113		-	let ratioA = fraction(SCALE8, pmtA, balA)
114		-	let ratioB = fraction(SCALE8, pmtB, balB)
115		-	let $t046194912 = if ((ratioB > ratioA))
	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))
116	141		then {
117		-	let pmt = fraction(balB, ratioA, SCALE8, CEILING)
118		-	$Tuple4(pmtA, pmt, (pmtB - pmt), pmtAssetB)
119		-	}
120		-	else {
121		-	let pmt = fraction(balA, ratioB, SCALE8, CEILING)
122		-	$Tuple4(pmt, pmtB, (pmtA - pmt), pmtAssetA)
123		-	}
124		-	let pmtAmountA = $t046194912._1
125		-	let pmtAmountB = $t046194912._2
126		-	let change = $t046194912._3
127		-	let changeAssetId = $t046194912._4
128		-	let poolVersion = getStringValue(poolAddr, "version")
129		-	let inv1 = if (if ((pmtAmountA > 0))
130		-	then (pmtAmountB > 0)
131		-	else false)
132		-	then {
133		-	let payments = [AttachedPayment(assetIdFromStr(pmtAssetA), pmtAmountA), AttachedPayment(assetIdFromStr(pmtAssetB), pmtAmountB)]
	142	+	let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
134	143		if ((poolVersion == "1.0.0"))
135		-	then invoke(poolAddr, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], payments)
	144	+	then {
	145	+	let vars = ["0", "false", "0"]
	146	+	invoke(poolAddr, "callFunction", ["replenishWithOneToken", vars], payments)
	147	+	}
136	148		else if ((poolVersion == "2.0.0"))
137		-	then invoke(poolAddr, "replenishWithTwoTokensV2", [false, 0], payments)
	149	+	then {
	150	+	let vars = [virtualSwapTokenPay, virtualSwapTokenGet, false, 0]
	151	+	invoke(poolAddr, "replenishWithOneTokenV2", [false, 0], payments)
	152	+	}
138	153		else throw("Wrong pool type")
139	154		}
140	155		else 0
141		-	if ((~~inv1~~ == ~~inv1~~))
	156	+	if ((inv2 == inv2))
142	157		then {
143		-	let inv2 = if ((change > 0))
144		-	then {
145		-	let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
146		-	if ((poolVersion == "1.0.0"))
147		-	then {
148		-	let vars = ["0", "false", "0"]
149		-	invoke(poolAddr, "callFunction", ["replenishWithOneToken", vars], payments)
150		-	}
151		-	else if ((poolVersion == "2.0.0"))
152		-	then {
153		-	let vars = [virtualSwapTokenPay, virtualSwapTokenGet, false, 0]
154		-	invoke(poolAddr, "replenishWithOneTokenV2", [false, 0], payments)
155		-	}
156		-	else throw("Wrong pool type")
157		-	}
158		-	else 0
159		-	if ((inv2 == inv2))
160		-	then {
161		-	let shareBalanceAfter = accountBalance(fromBase58String(shareId))
	158	+	let shareBalanceAfter = accountBalance(fromBase58String(shareId))
	159	+	if ((1 == 1))
	160	+	then throw(((shareId + "\|\| ") + toString(shareBalanceAfter)))
	161	+	else {
162	162		let totalShare = (shareBalanceAfter - shareBalanceBefore)
163	163		let axlyInFee = fraction(totalShare, (FEE_SCALE6 - getAxlyInFee(pool, withLoan)), FEE_SCALE6)
164	164		let userShareForStake = (totalShare - axlyInFee)

175	175		else throw("Strict value is not equal to itself.")
176	176		}
177	177		}
178		-	else throw("Strict value is not equal to itself.")
179	178		}
180	179		else throw("Strict value is not equal to itself.")
181	180		}
	181	+	else throw("Strict value is not equal to itself.")
182	182		}
183	183
184	184

188	188		@Callable(i)
189	189		func replanish (pool,borrowAmount,borrowAssetId,virtualSwapTokenPay,virtualSwapTokenGet) = {
190	190		let type = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
191		-	let $~~t076587909~~ = if ((type == SF_POS_TYPE))
	191	+	let $t076577908 = if ((type == SF_POS_TYPE))
192	192		then getSFPoolData(Address(fromBase58String(pool)))
193	193		else if ((type == WX_POS_TYPE))
194	194		then getWXPoolData(Address(fromBase58String(pool)))
195	195		else throw("Wrong pool type")
196		-	let AId = $~~t076587909~~._1
197		-	let BId = $~~t076587909~~._2
198		-	let balA = $~~t076587909~~._3
199		-	let balB = $~~t076587909~~._4
200		-	let shareId = $~~t076587909~~._5
201		-	let $~~t079138550~~ = if ((size(i.payments) == 2))
	196	+	let AId = $t076577908._1
	197	+	let BId = $t076577908._2
	198	+	let balA = $t076577908._3
	199	+	let balB = $t076577908._4
	200	+	let shareId = $t076577908._5
	201	+	let $t079128549 = if ((size(i.payments) == 2))
202	202		then if ((assetIdToStr(i.payments[0].assetId) != AId))
203	203		then throw("Wrong payment asset A")
204	204		else if ((assetIdToStr(i.payments[1].assetId) != BId))

211	211		then $Tuple4(0, AId, i.payments[0].amount, BId)
212	212		else throw("Wrong payment")
213	213		else throw("One or two payments expected")
214		-	let pmtA = $~~t079138550~~._1
215		-	let pmtAssetA = $~~t079138550~~._2
216		-	let pmtB = $~~t079138550~~._3
217		-	let pmtAssetB = $~~t079138550~~._4
	214	+	let pmtA = $t079128549._1
	215	+	let pmtAssetA = $t079128549._2
	216	+	let pmtB = $t079128549._3
	217	+	let pmtAssetB = $t079128549._4
218	218		if ((borrowAmount > 0))
219	219		then {
220	220		let request = makeString([type, toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, toString(virtualSwapTokenPay), toString(virtualSwapTokenGet)], ",")

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		-	if ((1 == 1))
110		-	then throw(((shareId + "\|\| ") + toString(shareBalanceBefore)))
	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))
	113	+	then {
	114	+	let pmt = fraction(balB, ratioA, SCALE8, CEILING)
	115	+	$Tuple4(pmtA, pmt, (pmtB - pmt), pmtAssetB)
	116	+	}
111	117		else {
112		-	let poolAddr = Address(fromBase58String(pool))
113		-	let ratioA = fraction(SCALE8, pmtA, balA)
114		-	let ratioB = fraction(SCALE8, pmtB, balB)
115		-	let $t046194912 = if ((ratioB > ratioA))
	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))
116	141		then {
117		-	let pmt = fraction(balB, ratioA, SCALE8, CEILING)
118		-	$Tuple4(pmtA, pmt, (pmtB - pmt), pmtAssetB)
119		-	}
120		-	else {
121		-	let pmt = fraction(balA, ratioB, SCALE8, CEILING)
122		-	$Tuple4(pmt, pmtB, (pmtA - pmt), pmtAssetA)
123		-	}
124		-	let pmtAmountA = $t046194912._1
125		-	let pmtAmountB = $t046194912._2
126		-	let change = $t046194912._3
127		-	let changeAssetId = $t046194912._4
128		-	let poolVersion = getStringValue(poolAddr, "version")
129		-	let inv1 = if (if ((pmtAmountA > 0))
130		-	then (pmtAmountB > 0)
131		-	else false)
132		-	then {
133		-	let payments = [AttachedPayment(assetIdFromStr(pmtAssetA), pmtAmountA), AttachedPayment(assetIdFromStr(pmtAssetB), pmtAmountB)]
	142	+	let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
134	143		if ((poolVersion == "1.0.0"))
135		-	then invoke(poolAddr, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], payments)
	144	+	then {
	145	+	let vars = ["0", "false", "0"]
	146	+	invoke(poolAddr, "callFunction", ["replenishWithOneToken", vars], payments)
	147	+	}
136	148		else if ((poolVersion == "2.0.0"))
137		-	then invoke(poolAddr, "replenishWithTwoTokensV2", [false, 0], payments)
	149	+	then {
	150	+	let vars = [virtualSwapTokenPay, virtualSwapTokenGet, false, 0]
	151	+	invoke(poolAddr, "replenishWithOneTokenV2", [false, 0], payments)
	152	+	}
138	153		else throw("Wrong pool type")
139	154		}
140	155		else 0
141		-	if ((~~inv1~~ == ~~inv1~~))
	156	+	if ((inv2 == inv2))
142	157		then {
143		-	let inv2 = if ((change > 0))
144		-	then {
145		-	let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
146		-	if ((poolVersion == "1.0.0"))
147		-	then {
148		-	let vars = ["0", "false", "0"]
149		-	invoke(poolAddr, "callFunction", ["replenishWithOneToken", vars], payments)
150		-	}
151		-	else if ((poolVersion == "2.0.0"))
152		-	then {
153		-	let vars = [virtualSwapTokenPay, virtualSwapTokenGet, false, 0]
154		-	invoke(poolAddr, "replenishWithOneTokenV2", [false, 0], payments)
155		-	}
156		-	else throw("Wrong pool type")
157		-	}
158		-	else 0
159		-	if ((inv2 == inv2))
160		-	then {
161		-	let shareBalanceAfter = accountBalance(fromBase58String(shareId))
	158	+	let shareBalanceAfter = accountBalance(fromBase58String(shareId))
	159	+	if ((1 == 1))
	160	+	then throw(((shareId + "\|\| ") + toString(shareBalanceAfter)))
	161	+	else {
162	162		let totalShare = (shareBalanceAfter - shareBalanceBefore)
163	163		let axlyInFee = fraction(totalShare, (FEE_SCALE6 - getAxlyInFee(pool, withLoan)), FEE_SCALE6)
164	164		let userShareForStake = (totalShare - axlyInFee)
165	165		if ((0 >= userShareForStake))
166	166		then throw("amount of staked sharetokens must be > 0")
167	167		else {
168	168		let inv3 = invoke(getSFFarmingAddr(), "lockShareTokens", [pool, 0], [AttachedPayment(fromBase58String(shareId), userShareForStake)])
169	169		if ((inv3 == inv3))
170	170		then {
171	171		let totalAmount = getAxlyTotalPosition(pool)
172	172		let newPosNum = getNewUserPositionNumber(pool, user)
173	173		[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))]
174	174		}
175	175		else throw("Strict value is not equal to itself.")
176	176		}
177	177		}
178		-	else throw("Strict value is not equal to itself.")
179	178		}
180	179		else throw("Strict value is not equal to itself.")
181	180		}
	181	+	else throw("Strict value is not equal to itself.")
182	182		}
183	183
184	184
185	185		func replanishWX (user,pool,withLoan,pmtA,pmtAssetA,pmtB,pmtAssetB,balA,balB,shareId,virtualSwapTokenPay,virtualSwapTokenGet) = nil
186	186
187	187
188	188		@Callable(i)
189	189		func replanish (pool,borrowAmount,borrowAssetId,virtualSwapTokenPay,virtualSwapTokenGet) = {
190	190		let type = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
191		-	let $~~t076587909~~ = if ((type == SF_POS_TYPE))
	191	+	let $t076577908 = if ((type == SF_POS_TYPE))
192	192		then getSFPoolData(Address(fromBase58String(pool)))
193	193		else if ((type == WX_POS_TYPE))
194	194		then getWXPoolData(Address(fromBase58String(pool)))
195	195		else throw("Wrong pool type")
196		-	let AId = $~~t076587909~~._1
197		-	let BId = $~~t076587909~~._2
198		-	let balA = $~~t076587909~~._3
199		-	let balB = $~~t076587909~~._4
200		-	let shareId = $~~t076587909~~._5
201		-	let $~~t079138550~~ = if ((size(i.payments) == 2))
	196	+	let AId = $t076577908._1
	197	+	let BId = $t076577908._2
	198	+	let balA = $t076577908._3
	199	+	let balB = $t076577908._4
	200	+	let shareId = $t076577908._5
	201	+	let $t079128549 = if ((size(i.payments) == 2))
202	202		then if ((assetIdToStr(i.payments[0].assetId) != AId))
203	203		then throw("Wrong payment asset A")
204	204		else if ((assetIdToStr(i.payments[1].assetId) != BId))
205	205		then throw("Wrong payment asset B")
206	206		else $Tuple4(i.payments[0].amount, AId, i.payments[1].amount, BId)
207	207		else if ((size(i.payments) == 1))
208	208		then if ((assetIdToStr(i.payments[0].assetId) == AId))
209	209		then $Tuple4(i.payments[0].amount, AId, 0, BId)
210	210		else if ((assetIdToStr(i.payments[0].assetId) == BId))
211	211		then $Tuple4(0, AId, i.payments[0].amount, BId)
212	212		else throw("Wrong payment")
213	213		else throw("One or two payments expected")
214		-	let pmtA = $~~t079138550~~._1
215		-	let pmtAssetA = $~~t079138550~~._2
216		-	let pmtB = $~~t079138550~~._3
217		-	let pmtAssetB = $~~t079138550~~._4
	214	+	let pmtA = $t079128549._1
	215	+	let pmtAssetA = $t079128549._2
	216	+	let pmtB = $t079128549._3
	217	+	let pmtAssetB = $t079128549._4
218	218		if ((borrowAmount > 0))
219	219		then {
220	220		let request = makeString([type, toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, toString(virtualSwapTokenPay), toString(virtualSwapTokenGet)], ",")
221	221		let newRequestId = {
222	222		let @ = invoke(this, "createNewRequest", [request], nil)
223	223		if ($isInstanceOf(@, "Int"))
224	224		then @
225	225		else unit
226	226		}
227	227		if ((newRequestId == newRequestId))
228	228		then {
229	229		let args = [toString(i.caller), shareId, borrowAssetId, borrowAmount, toString(this), "replanishFromLand", toString(valueOrErrorMessage(newRequestId, "Can't create new request"))]
230	230		let inv = reentrantInvoke(getLendSrvAddr(), "flashPosition", args, nil)
231	231		nil
232	232		}
233	233		else throw("Strict value is not equal to itself.")
234	234		}
235	235		else if ((type == SF_POS_TYPE))
236	236		then replanishSwopFi(toString(i.caller), pool, false, pmtA, pmtAssetA, pmtB, pmtAssetB, balA, balB, shareId, virtualSwapTokenPay, virtualSwapTokenGet)
237	237		else throw("Cant wx")
238	238		}
239	239
240	240
241	241
242	242		@Callable(i)
243	243		func replanishFromLand (requestId) = {
244	244		let request = split(valueOrErrorMessage(getString(this, (requestId + kRequestId)), ("No request with id " + requestId)), ",")
245	245		if ((request[0] == SF_POS_TYPE))
246	246		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]))
247	247		else throw("Cant wx")
248	248		}
249	249
250	250
251	251
252	252		@Callable(i)
253	253		func createNewRequest (params) = valueOrElse(isSelfCall(i), {
254	254		let newRequestId = (valueOrElse(getInteger(this, kRequestIter), 0) + 1)
255	255		$Tuple2([StringEntry((toString(newRequestId) + kRequestId), params)], newRequestId)
256	256		})
257	257
258	258
259	259
260	260		@Callable(i)
261	261		func initNewPool (type,poolAddr,inFeeNoLoan,inFeeLoan,capFee) = if (if ((type != SF_POS_TYPE))
262	262		then (type != WX_POS_TYPE)
263	263		else false)
264	264		then throw("Wrong type")
265	265		else [IntegerEntry((poolAddr + kAxlyInFeeWithoutLoan), inFeeNoLoan), IntegerEntry((poolAddr + kAxlyInFeeWithLoan), inFeeLoan), IntegerEntry((poolAddr + kAxlyCapFee), capFee), StringEntry((kPool + poolAddr), type)]
266	266
267	267
268	268		@Verifier(tx)
269	269		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
270	270

github/deemru/w8io/169f3d6 
47.85 ms ◑