w8 · tx · D2b···fzv

tx · D2biWyQf9VrsL32KB9iTKx9sCPWYcA114RHun7hZkfzv

3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS:  -0.01000000 Waves

2023.03.24 21:16 [2504445] smart account 3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "D2biWyQf9VrsL32KB9iTKx9sCPWYcA114RHun7hZkfzv",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1679681830563,
    "version": 2,
    "chainId": 84,
    "sender": "3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS",
    "senderPublicKey": "HP8sssVq1866F7CaPQJwgFrt6fsqhQjKwM84cL1wjD2a",
    "proofs": [
        "2xyr1HW72UH6VcCrdwEQxuZdoi8u7iUfRyY2KdAtG6XRPDrj12JKPSaPN8Hxt1w87rx46b3ju9qkwTm4wXQdrobD"
    ],
    "script": "base64:BgIeCAISBwoFCAEIAQESAwoBCBIDCgEIEgcKBQgIAQEBJgALU0ZfUE9TX1RZUEUCAlNGAAtXWF9QT1NfVFlQRQICV1gABlNDQUxFOACAwtcvAApGRUVfU0NBTEU2AMCEPQAUa1NGUG9vbEFBc3NldEJhbGFuY2UCD0FfYXNzZXRfYmFsYW5jZQAUa1NGUG9vbEJBc3NldEJhbGFuY2UCD0JfYXNzZXRfYmFsYW5jZQAPa1NGUG9vbEFBc3NldElkAgpBX2Fzc2V0X2lkAA9rU0ZQb29sQkFzc2V0SWQCCkJfYXNzZXRfaWQADmtTRlBvb2xTaGFyZUlkAg5zaGFyZV9hc3NldF9pZAAOa1NGUG9vbFZlcnNpb24CB3ZlcnNpb24AEGtTRkZhcm1pbmdTdGFrZWQCFF9zaGFyZV90b2tlbnNfbG9ja2VkAA1rVXNlclBvc2l0aW9uAg5fdXNlcl9wb3NpdGlvbgARa1VzZXJQb3NpdGlvblR5cGUCE191c2VyX3Bvc2l0aW9uX3R5cGUAEGtVc2VyUG9zaXRpb25OdW0CFV91c2VyX3Bvc2l0aW9uX251bWJlcgAOa1RvdGFsUG9zaXRpb24CD190b3RhbF9wb3NpdGlvbgAVa0F4bHlJbkZlZVdpdGhvdXRMb2FuAhZfYXhseV9mZWVfd2l0aG91dF9sb2FuABJrQXhseUluRmVlV2l0aExvYW4CE19heGx5X2ZlZV93aXRoX2xvYW4AC2tBeGx5Q2FwRmVlAg1fYXhseV9mZWVfY2FwAAprUmVxdWVzdElkAgtfcmVxdWVzdF9pZAAMa1JlcXVlc3RJdGVyAg1yZXF1ZXN0c19pdGVyAAVrUG9vbAIFcG9vbF8ACWtNb25leUJveAIOYXhseV9tb25leV9ib3gADmtTRkZhcm1pbmdBZGRyAhNzd29wZmlfZmFybWluZ19hZGRyAAxrTGVuZFNlcnZpY2UCEWxlbmRfc2VydmljZV9hZGRyAAhtb25leUJveAkBB0FkZHJlc3MBCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQlrTW9uZXlCb3gCGE5vIGF4bHkgbW9uZXlCb3ggYWRkcmVzcwEKaXNTZWxmQ2FsbAEBaQMJAAACCAUBaQZjYWxsZXIFBHRoaXMFBHVuaXQJAAIBAitPbmx5IGNvbnRyYWN0IGl0c2VsZiBjYW4gY2FsbCB0aGlzIGZ1bmN0aW9uAQ5hY2NvdW50QmFsYW5jZQEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJpZAUHJG1hdGNoMAkA8AcCBQR0aGlzBQJpZAMJAAECBQckbWF0Y2gwAgRVbml0BAV3YXZlcwUHJG1hdGNoMAgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAAIBAgtNYXRjaCBlcnJvcgENZ2V0U0ZQb29sRGF0YQEIcG9vbEFkZHIJAJcKBQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ9rU0ZQb29sQUFzc2V0SWQCGUNhbid0IGdldCBwb29sIEEgYXNzZXQgaWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQhwb29sQWRkcgUPa1NGUG9vbEJBc3NldElkAhlDYW4ndCBnZXQgcG9vbCBCIGFzc2V0IGlkCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUIcG9vbEFkZHIFFGtTRlBvb2xBQXNzZXRCYWxhbmNlAh5DYW4ndCBnZXQgcG9vbCBBIGFzc2V0IGJhbGFuY2UJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQhwb29sQWRkcgUUa1NGUG9vbEJBc3NldEJhbGFuY2UCHkNhbid0IGdldCBwb29sIEIgYXNzZXQgYmFsYW5jZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ5rU0ZQb29sU2hhcmVJZAIYQ2FuJ3QgZ2V0IHNoYXJlIGFzc2V0IGlkAQ1nZXRXWFBvb2xEYXRhAQhwb29sQWRkcgkAlwoFCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFD2tTRlBvb2xBQXNzZXRJZAIZQ2FuJ3QgZ2V0IHBvb2wgQSBhc3NldCBpZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ9rU0ZQb29sQkFzc2V0SWQCGUNhbid0IGdldCBwb29sIEIgYXNzZXQgaWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQhwb29sQWRkcgUUa1NGUG9vbEFBc3NldEJhbGFuY2UCHkNhbid0IGdldCBwb29sIEEgYXNzZXQgYmFsYW5jZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFCHBvb2xBZGRyBRRrU0ZQb29sQkFzc2V0QmFsYW5jZQIeQ2FuJ3QgZ2V0IHBvb2wgQiBhc3NldCBiYWxhbmNlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFDmtTRlBvb2xTaGFyZUlkAhhDYW4ndCBnZXQgc2hhcmUgYXNzZXQgaWQBFGdldEF4bHlUb3RhbFBvc2l0aW9uAQRwb29sCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUOa1RvdGFsUG9zaXRpb24AAAEYZ2V0TmV3VXNlclBvc2l0aW9uTnVtYmVyAgRwb29sBHVzZXIJAGQCCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFEGtVc2VyUG9zaXRpb25OdW0AAAABAQxnZXRBeGx5SW5GZWUCBHBvb2wId2l0aExvYW4DBQh3aXRoTG9hbgkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICBQRwb29sBRJrQXhseUluRmVlV2l0aExvYW4JARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUEcG9vbAUVa0F4bHlJbkZlZVdpdGhvdXRMb2FuARBnZXRTRkZhcm1pbmdBZGRyAAkBB0FkZHJlc3MBCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQ5rU0ZGYXJtaW5nQWRkcgIdQ2FuJ3QgZ2V0IHN3b3BmaSBmYXJtaW5nIGFkZHIBDmdldExlbmRTcnZBZGRyAAkBB0FkZHJlc3MBCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQxrTGVuZFNlcnZpY2UCG0Nhbid0IGdldCBsZW5kIHNlcnZpY2UgYWRkcgEMYXNzZXRJZFRvU3RyAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAmlkBQckbWF0Y2gwCQDYBAEFAmlkAwkAAQIFByRtYXRjaDACBFVuaXQEBXdhdmVzBQckbWF0Y2gwAgVXQVZFUwkAAgECC01hdGNoIGVycm9yAQ5hc3NldElkRnJvbVN0cgEHYXNzZXRJZAMJAAACBQdhc3NldElkAgVXQVZFUwUEdW5pdAkA2QQBBQdhc3NldElkAQ9yZXBsYW5pc2hTd29wRmkMBHVzZXIEcG9vbAh3aXRoTG9hbgRwbXRBCXBtdEFzc2V0QQRwbXRCCXBtdEFzc2V0QgRiYWxBBGJhbEIHc2hhcmVJZBN2aXJ0dWFsU3dhcFRva2VuUGF5E3ZpcnR1YWxTd2FwVG9rZW5HZXQEEnNoYXJlQmFsYW5jZUJlZm9yZQkBDmFjY291bnRCYWxhbmNlAQkA2QQBBQdzaGFyZUlkAwkAAAIAAQABCQACAQkArAICCQCsAgIFB3NoYXJlSWQCA3x8IAkApAMBBRJzaGFyZUJhbGFuY2VCZWZvcmUECHBvb2xBZGRyCQEHQWRkcmVzcwEJANkEAQUEcG9vbAQGcmF0aW9BCQBrAwUGU0NBTEU4BQRwbXRBBQRiYWxBBAZyYXRpb0IJAGsDBQZTQ0FMRTgFBHBtdEIFBGJhbEIECyR0MDQ2MTk0OTEyAwkAZgIFBnJhdGlvQgUGcmF0aW9BBANwbXQJAG4EBQRiYWxCBQZyYXRpb0EFBlNDQUxFOAUHQ0VJTElORwkAlgoEBQRwbXRBBQNwbXQJAGUCBQRwbXRCBQNwbXQFCXBtdEFzc2V0QgQDcG10CQBuBAUEYmFsQQUGcmF0aW9CBQZTQ0FMRTgFB0NFSUxJTkcJAJYKBAUDcG10BQRwbXRCCQBlAgUEcG10QQUDcG10BQlwbXRBc3NldEEECnBtdEFtb3VudEEIBQskdDA0NjE5NDkxMgJfMQQKcG10QW1vdW50QggFCyR0MDQ2MTk0OTEyAl8yBAZjaGFuZ2UIBQskdDA0NjE5NDkxMgJfMwQNY2hhbmdlQXNzZXRJZAgFCyR0MDQ2MTk0OTEyAl80BAtwb29sVmVyc2lvbgkBEUBleHRyTmF0aXZlKDEwNTMpAgUIcG9vbEFkZHICB3ZlcnNpb24EBGludjEDAwkAZgIFCnBtdEFtb3VudEEAAAkAZgIFCnBtdEFtb3VudEIAAAcECHBheW1lbnRzCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQEOYXNzZXRJZEZyb21TdHIBBQlwbXRBc3NldEEFCnBtdEFtb3VudEEJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQ5hc3NldElkRnJvbVN0cgEFCXBtdEFzc2V0QgUKcG10QW1vdW50QgUDbmlsAwkAAAIFC3Bvb2xWZXJzaW9uAgUxLjAuMAkA/AcEBQhwb29sQWRkcgIMY2FsbEZ1bmN0aW9uCQDMCAICFnJlcGxlbmlzaFdpdGhUd29Ub2tlbnMJAMwIAgkAzAgCAgVmYWxzZQkAzAgCAgEwBQNuaWwFA25pbAUIcGF5bWVudHMDCQAAAgULcG9vbFZlcnNpb24CBTIuMC4wCQD8BwQFCHBvb2xBZGRyAhhyZXBsZW5pc2hXaXRoVHdvVG9rZW5zVjIJAMwIAgcJAMwIAgAABQNuaWwFCHBheW1lbnRzCQACAQIPV3JvbmcgcG9vbCB0eXBlAAADCQAAAgUEaW52MQUEaW52MQQEaW52MgMJAGYCBQZjaGFuZ2UAAAQIcGF5bWVudHMJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQ5hc3NldElkRnJvbVN0cgEFDWNoYW5nZUFzc2V0SWQFBmNoYW5nZQUDbmlsAwkAAAIFC3Bvb2xWZXJzaW9uAgUxLjAuMAQEdmFycwkAzAgCAgEwCQDMCAICBWZhbHNlCQDMCAICATAFA25pbAkA/AcEBQhwb29sQWRkcgIMY2FsbEZ1bmN0aW9uCQDMCAICFXJlcGxlbmlzaFdpdGhPbmVUb2tlbgkAzAgCBQR2YXJzBQNuaWwFCHBheW1lbnRzAwkAAAIFC3Bvb2xWZXJzaW9uAgUyLjAuMAQEdmFycwkAzAgCBRN2aXJ0dWFsU3dhcFRva2VuUGF5CQDMCAIFE3ZpcnR1YWxTd2FwVG9rZW5HZXQJAMwIAgcJAMwIAgAABQNuaWwJAPwHBAUIcG9vbEFkZHICF3JlcGxlbmlzaFdpdGhPbmVUb2tlblYyCQDMCAIHCQDMCAIAAAUDbmlsBQhwYXltZW50cwkAAgECD1dyb25nIHBvb2wgdHlwZQAAAwkAAAIFBGludjIFBGludjIEEXNoYXJlQmFsYW5jZUFmdGVyCQEOYWNjb3VudEJhbGFuY2UBCQDZBAEFB3NoYXJlSWQECnRvdGFsU2hhcmUJAGUCBRFzaGFyZUJhbGFuY2VBZnRlcgUSc2hhcmVCYWxhbmNlQmVmb3JlBAlheGx5SW5GZWUJAGsDBQp0b3RhbFNoYXJlCQBlAgUKRkVFX1NDQUxFNgkBDGdldEF4bHlJbkZlZQIFBHBvb2wFCHdpdGhMb2FuBQpGRUVfU0NBTEU2BBF1c2VyU2hhcmVGb3JTdGFrZQkAZQIFCnRvdGFsU2hhcmUFCWF4bHlJbkZlZQMJAGcCAAAFEXVzZXJTaGFyZUZvclN0YWtlCQACAQIoYW1vdW50IG9mIHN0YWtlZCBzaGFyZXRva2VucyBtdXN0IGJlID4gMAQEaW52MwkA/AcECQEQZ2V0U0ZGYXJtaW5nQWRkcgACD2xvY2tTaGFyZVRva2VucwkAzAgCBQRwb29sCQDMCAIAAAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFB3NoYXJlSWQFEXVzZXJTaGFyZUZvclN0YWtlBQNuaWwDCQAAAgUEaW52MwUEaW52MwQLdG90YWxBbW91bnQJARRnZXRBeGx5VG90YWxQb3NpdGlvbgEFBHBvb2wECW5ld1Bvc051bQkBGGdldE5ld1VzZXJQb3NpdGlvbk51bWJlcgIFBHBvb2wFBHVzZXIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUOa1RvdGFsUG9zaXRpb24JAGQCBQt0b3RhbEFtb3VudAURdXNlclNoYXJlRm9yU3Rha2UJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyAgFfCQCkAwEFCW5ld1Bvc051bQUNa1VzZXJQb3NpdGlvbgURdXNlclNoYXJlRm9yU3Rha2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXICAV8JAKQDAQUJbmV3UG9zTnVtBRFrVXNlclBvc2l0aW9uVHlwZQULU0ZfUE9TX1RZUEUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFEGtVc2VyUG9zaXRpb25OdW0FCW5ld1Bvc051bQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQhtb25leUJveAUJYXhseUluRmVlCQDZBAEFB3NoYXJlSWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgELcmVwbGFuaXNoV1gMBHVzZXIEcG9vbAh3aXRoTG9hbgRwbXRBCXBtdEFzc2V0QQRwbXRCCXBtdEFzc2V0QgRiYWxBBGJhbEIHc2hhcmVJZBN2aXJ0dWFsU3dhcFRva2VuUGF5E3ZpcnR1YWxTd2FwVG9rZW5HZXQFA25pbAQBaQEJcmVwbGFuaXNoBQRwb29sDGJvcnJvd0Ftb3VudA1ib3Jyb3dBc3NldElkE3ZpcnR1YWxTd2FwVG9rZW5QYXkTdmlydHVhbFN3YXBUb2tlbkdldAQEdHlwZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgUFa1Bvb2wFBHBvb2wCElBvb2wgaXMgbm90IGluaXRlZAQLJHQwNzY1ODc5MDkDCQAAAgUEdHlwZQULU0ZfUE9TX1RZUEUJAQ1nZXRTRlBvb2xEYXRhAQkBB0FkZHJlc3MBCQDZBAEFBHBvb2wDCQAAAgUEdHlwZQULV1hfUE9TX1RZUEUJAQ1nZXRXWFBvb2xEYXRhAQkBB0FkZHJlc3MBCQDZBAEFBHBvb2wJAAIBAg9Xcm9uZyBwb29sIHR5cGUEA0FJZAgFCyR0MDc2NTg3OTA5Al8xBANCSWQIBQskdDA3NjU4NzkwOQJfMgQEYmFsQQgFCyR0MDc2NTg3OTA5Al8zBARiYWxCCAULJHQwNzY1ODc5MDkCXzQEB3NoYXJlSWQIBQskdDA3NjU4NzkwOQJfNQQLJHQwNzkxMzg1NTADCQAAAgkAkAMBCAUBaQhwYXltZW50cwACAwkBAiE9AgkBDGFzc2V0SWRUb1N0cgEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUDQUlkCQACAQIVV3JvbmcgcGF5bWVudCBhc3NldCBBAwkBAiE9AgkBDGFzc2V0SWRUb1N0cgEICQCRAwIIBQFpCHBheW1lbnRzAAEHYXNzZXRJZAUDQklkCQACAQIVV3JvbmcgcGF5bWVudCBhc3NldCBCCQCWCgQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BQNBSWQICQCRAwIIBQFpCHBheW1lbnRzAAEGYW1vdW50BQNCSWQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABAwkAAAIJAQxhc3NldElkVG9TdHIBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQFA0FJZAkAlgoECAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAUDQUlkAAAFA0JJZAMJAAACCQEMYXNzZXRJZFRvU3RyAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQNCSWQJAJYKBAAABQNBSWQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BQNCSWQJAAIBAg1Xcm9uZyBwYXltZW50CQACAQIcT25lIG9yIHR3byBwYXltZW50cyBleHBlY3RlZAQEcG10QQgFCyR0MDc5MTM4NTUwAl8xBAlwbXRBc3NldEEIBQskdDA3OTEzODU1MAJfMgQEcG10QggFCyR0MDc5MTM4NTUwAl8zBAlwbXRBc3NldEIIBQskdDA3OTEzODU1MAJfNAMJAGYCBQxib3Jyb3dBbW91bnQAAAQHcmVxdWVzdAkAuQkCCQDMCAIFBHR5cGUJAMwIAgkApQgBCAUBaQZjYWxsZXIJAMwIAgUEcG9vbAkAzAgCCQCkAwEFBHBtdEEJAMwIAgUJcG10QXNzZXRBCQDMCAIJAKQDAQUEcG10QgkAzAgCBQlwbXRBc3NldEIJAMwIAgkApAMBBQRiYWxBCQDMCAIJAKQDAQUEYmFsQgkAzAgCBQdzaGFyZUlkCQDMCAIJAKQDAQUTdmlydHVhbFN3YXBUb2tlblBheQkAzAgCCQCkAwEFE3ZpcnR1YWxTd2FwVG9rZW5HZXQFA25pbAIBLAQMbmV3UmVxdWVzdElkCgABQAkA/AcEBQR0aGlzAhBjcmVhdGVOZXdSZXF1ZXN0CQDMCAIFB3JlcXVlc3QFA25pbAUDbmlsAwkAAQIFAUACA0ludAUBQAUEdW5pdAMJAAACBQxuZXdSZXF1ZXN0SWQFDG5ld1JlcXVlc3RJZAQEYXJncwkAzAgCCQClCAEIBQFpBmNhbGxlcgkAzAgCBQdzaGFyZUlkCQDMCAIFDWJvcnJvd0Fzc2V0SWQJAMwIAgUMYm9ycm93QW1vdW50CQDMCAIJAKUIAQUEdGhpcwkAzAgCAhFyZXBsYW5pc2hGcm9tTGFuZAkAzAgCCQCkAwEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgUMbmV3UmVxdWVzdElkAhhDYW4ndCBjcmVhdGUgbmV3IHJlcXVlc3QFA25pbAQDaW52CQD9BwQJAQ5nZXRMZW5kU3J2QWRkcgACDWZsYXNoUG9zaXRpb24FBGFyZ3MFA25pbAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAwkAAAIFBHR5cGUFC1NGX1BPU19UWVBFCQEPcmVwbGFuaXNoU3dvcEZpDAkApQgBCAUBaQZjYWxsZXIFBHBvb2wHBQRwbXRBBQlwbXRBc3NldEEFBHBtdEIFCXBtdEFzc2V0QgUEYmFsQQUEYmFsQgUHc2hhcmVJZAUTdmlydHVhbFN3YXBUb2tlblBheQUTdmlydHVhbFN3YXBUb2tlbkdldAkAAgECB0NhbnQgd3gBaQERcmVwbGFuaXNoRnJvbUxhbmQBCXJlcXVlc3RJZAQHcmVxdWVzdAkAtQkCCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwkArAICBQlyZXF1ZXN0SWQFCmtSZXF1ZXN0SWQJAKwCAgITTm8gcmVxdWVzdCB3aXRoIGlkIAUJcmVxdWVzdElkAgEsAwkAAAIJAJEDAgUHcmVxdWVzdAAABQtTRl9QT1NfVFlQRQkBD3JlcGxhbmlzaFN3b3BGaQwJAJEDAgUHcmVxdWVzdAABCQCRAwIFB3JlcXVlc3QAAgYJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdyZXF1ZXN0AAMJAJEDAgUHcmVxdWVzdAAECQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVxdWVzdAAFCQCRAwIFB3JlcXVlc3QABgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3JlcXVlc3QABwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3JlcXVlc3QACAkAkQMCBQdyZXF1ZXN0AAkJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdyZXF1ZXN0AAoJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQdyZXF1ZXN0AAsJAAIBAgdDYW50IHd4AWkBEGNyZWF0ZU5ld1JlcXVlc3QBBnBhcmFtcwkBC3ZhbHVlT3JFbHNlAgkBCmlzU2VsZkNhbGwBBQFpBAxuZXdSZXF1ZXN0SWQJAGQCCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMFDGtSZXF1ZXN0SXRlcgAAAAEJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKQDAQUMbmV3UmVxdWVzdElkBQprUmVxdWVzdElkBQZwYXJhbXMFA25pbAUMbmV3UmVxdWVzdElkAWkBC2luaXROZXdQb29sBQR0eXBlCHBvb2xBZGRyC2luRmVlTm9Mb2FuCWluRmVlTG9hbgZjYXBGZWUDAwkBAiE9AgUEdHlwZQULU0ZfUE9TX1RZUEUJAQIhPQIFBHR5cGUFC1dYX1BPU19UWVBFBwkAAgECCldyb25nIHR5cGUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUIcG9vbEFkZHIFFWtBeGx5SW5GZWVXaXRob3V0TG9hbgULaW5GZWVOb0xvYW4JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUIcG9vbEFkZHIFEmtBeGx5SW5GZWVXaXRoTG9hbgUJaW5GZWVMb2FuCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCHBvb2xBZGRyBQtrQXhseUNhcEZlZQUGY2FwRmVlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUFa1Bvb2wFCHBvb2xBZGRyBQR0eXBlBQNuaWwBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V53uEfpQ==",
    "height": 2504445,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: JDJUwqzx3X8AZzceH5WkHVYC7py7GgEWMUHWASuwdeaa
Next: EYSe4yqpqsKyjx66dkvo7jievyXE2wKAyLtZp4B3AQwx

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

Old	New		Differences
118	118
119	119		func T (M,K,O,U,V,W,X,Y,Z,aa,ab,ac) = {
120	120		let ad = B(fromBase58String(aa))
121		-	let H = Address(fromBase58String(K))
122		-	let ae = fraction(c, U, Y)
123		-	let af = fraction(c, W, Z)
124		-	let ag = if ((af > ae))
125		-	then {
126		-	let ah = fraction(Z, ae, c, CEILING)
127		-	$Tuple4(U, ah, (W - ah), X)
128		-	}
	121	+	if ((1 == 1))
	122	+	then throw(((aa + "\|\| ") + toString(ad)))
129	123		else {
130		-	let ah = fraction(Y, af, c, CEILING)
131		-	$Tuple4(ah, W, (U - ah), V)
132		-	}
133		-	let ai = ag._1
134		-	let aj = ag._2
135		-	let ak = ag._3
136		-	let al = ag._4
137		-	let am = getStringValue(H, "version")
138		-	let an = if (if ((ai > 0))
139		-	then (aj > 0)
140		-	else false)
141		-	then {
142		-	let ao = [AttachedPayment(S(V), ai), AttachedPayment(S(X), aj)]
143		-	if ((am == "1.0.0"))
144		-	then invoke(H, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], ao)
145		-	else if ((am == "2.0.0"))
146		-	then invoke(H, "replenishWithTwoTokensV2", [false, 0], ao)
147		-	else throw("Wrong pool type")
148		-	}
149		-	else 0
150		-	if ((an == an))
151		-	then {
152		-	let ap = if ((ak > 0))
	124	+	let H = Address(fromBase58String(K))
	125	+	let ae = fraction(c, U, Y)
	126	+	let af = fraction(c, W, Z)
	127	+	let ag = if ((af > ae))
153	128		then {
154		-	let ao = [AttachedPayment(S(al), ak)]
	129	+	let ah = fraction(Z, ae, c, CEILING)
	130	+	$Tuple4(U, ah, (W - ah), X)
	131	+	}
	132	+	else {
	133	+	let ah = fraction(Y, af, c, CEILING)
	134	+	$Tuple4(ah, W, (U - ah), V)
	135	+	}
	136	+	let ai = ag._1
	137	+	let aj = ag._2
	138	+	let ak = ag._3
	139	+	let al = ag._4
	140	+	let am = getStringValue(H, "version")
	141	+	let an = if (if ((ai > 0))
	142	+	then (aj > 0)
	143	+	else false)
	144	+	then {
	145	+	let ao = [AttachedPayment(S(V), ai), AttachedPayment(S(X), aj)]
155	146		if ((am == "1.0.0"))
156		-	then {
157		-	let aq = ["0", "false", "0"]
158		-	invoke(H, "callFunction", ["replenishWithOneToken", aq], ao)
159		-	}
	147	+	then invoke(H, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], ao)
160	148		else if ((am == "2.0.0"))
161		-	then {
162		-	let aq = [ab, ac, false, 0]
163		-	invoke(H, "replenishWithOneTokenV2", [false, 0], ao)
164		-	}
	149	+	then invoke(H, "replenishWithTwoTokensV2", [false, 0], ao)
165	150		else throw("Wrong pool type")
166	151		}
167	152		else 0
168		-	if ((ap == ap))
	153	+	if ((an == an))
169	154		then {
170		-	let ar = B(fromBase58String(aa))
171		-	let as = (ar - ad)
172		-	let at = fraction(as, (d - N(K, O)), d)
173		-	let au = (as - at)
174		-	if ((0 >= au))
175		-	then throw("amount of staked sharetokens must be > 0")
176		-	else {
177		-	let av = invoke(P(), "lockShareTokens", [K, 0], [AttachedPayment(fromBase58String(aa), au)])
178		-	if ((av == av))
	155	+	let ap = if ((ak > 0))
	156	+	then {
	157	+	let ao = [AttachedPayment(S(al), ak)]
	158	+	if ((am == "1.0.0"))
179	159		then {
180		-	let aw = J(K)
181		-	let ax = L(K, M)
	160	+	let aq = ["0", "false", "0"]
	161	+	invoke(H, "callFunction", ["replenishWithOneToken", aq], ao)
	162	+	}
	163	+	else if ((am == "2.0.0"))
	164	+	then {
	165	+	let aq = [ab, ac, false, 0]
	166	+	invoke(H, "replenishWithOneTokenV2", [false, 0], ao)
	167	+	}
	168	+	else throw("Wrong pool type")
	169	+	}
	170	+	else 0
	171	+	if ((ap == ap))
	172	+	then {
	173	+	let ar = B(fromBase58String(aa))
	174	+	let as = (ar - ad)
	175	+	let at = fraction(as, (d - N(K, O)), d)
	176	+	let au = (as - at)
	177	+	if ((0 >= au))
	178	+	then throw("amount of staked sharetokens must be > 0")
	179	+	else {
	180	+	let av = invoke(P(), "lockShareTokens", [K, 0], [AttachedPayment(fromBase58String(aa), au)])
	181	+	if ((av == av))
	182	+	then {
	183	+	let aw = J(K)
	184	+	let ax = L(K, M)
182	185		[IntegerEntry((K + o), (aw + au)), IntegerEntry((((((K + "_") + M) + "_") + toString(ax)) + l), au), StringEntry((((((K + "_") + M) + "_") + toString(ax)) + m), a), IntegerEntry((((K + "_") + M) + n), ax), ScriptTransfer(y, at, fromBase58String(aa))]
	186	+	}
	187	+	else throw("Strict value is not equal to itself.")
183	188		}
184		-	else throw("Strict value is not equal to itself.")
185	189		}
	190	+	else throw("Strict value is not equal to itself.")
186	191		}
187	192		else throw("Strict value is not equal to itself.")
188	193		}
189		-	else throw("Strict value is not equal to itself.")
190	194		}
191	195
192	196

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

github/deemru/w8io/169f3d6 
41.01 ms ◑