w8 · tx · 39T···6oU

tx · 39TFbC5mtxkszWZnZGrJZdY5VTSohx4Hbh2QmrWm16oU

3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS:  -0.28000000 Waves

2023.04.19 20:28 [2541735] smart account 3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "39TFbC5mtxkszWZnZGrJZdY5VTSohx4Hbh2QmrWm16oU",
    "fee": 28000000,
    "feeAssetId": null,
    "timestamp": 1681925359249,
    "version": 2,
    "chainId": 84,
    "sender": "3MvRWw2FPEimFCTGtK7qY9uAJbM7XJ4ZfJS",
    "senderPublicKey": "HP8sssVq1866F7CaPQJwgFrt6fsqhQjKwM84cL1wjD2a",
    "proofs": [
        "4wVCznkrtq5bpgHqv97ierf3gssEoczXrrzZ4C7ueUrjHQ3KD5FdGxzGvrBgW5DePgKpGbYCmsfstJtKcHUUunoH"
    ],
    "script": "base64:BgJaCAISBQoDCAEIEgMKAQgSBQoDCAEIEgMKAQgSBAoCCAESAwoBCBIOCgwICAgBBBEYGBEBARgSCgoICAgIAQQIARgSDgoMCAgIAQQYGBgYGAEYEgcKBQgIAQEBRAAHU0ZfUE9PTAICU0YAB1dYX1BPT0wCAldYAAdDQVBfRkVFAgNjYXAACExPQU5fRkVFAgRsb2FuAAtOT19MT0FOX0ZFRQIGbm9Mb2FuAAZTQ0FMRTgAgMLXLwAHU0NBTEUxMACAyK+gJQAKRkVFX1NDQUxFNgDAhD0AFGtTRlBvb2xBQXNzZXRCYWxhbmNlAg9BX2Fzc2V0X2JhbGFuY2UAFGtTRlBvb2xCQXNzZXRCYWxhbmNlAg9CX2Fzc2V0X2JhbGFuY2UAD2tTRlBvb2xBQXNzZXRJZAIKQV9hc3NldF9pZAAPa1NGUG9vbEJBc3NldElkAgpCX2Fzc2V0X2lkAA5rU0ZQb29sU2hhcmVJZAIOc2hhcmVfYXNzZXRfaWQACmtTRlBvb2xGZWUCCmNvbW1pc3Npb24ADWtVc2VyUG9zaXRpb24CDl91c2VyX3Bvc2l0aW9uABFrVXNlckJvcnJvd0Ftb3VudAIcX3VzZXJfcG9zaXRpb25fYm9ycm93X2Ftb3VudAASa1VzZXJCb3Jyb3dBc3NldElkAh5fdXNlcl9wb3NpdGlvbl9ib3Jyb3dfYXNzZXRfaWQAEGtVc2VyUG9zaXRpb25OdW0CFV91c2VyX3Bvc2l0aW9uX251bWJlcgAVa1VzZXJQb3NpdGlvbkludGVyZXN0AhdfdXNlcl9wb3NpdGlvbl9pbnRlcmVzdAAKa1Bvb2xUb3RhbAILX3Bvb2xfdG90YWwADWtQb29sSW50ZXJlc3QCDl9wb29sX2ludGVyZXN0ABVrQXhseUluRmVlV2l0aG91dExvYW4CFl9heGx5X2ZlZV93aXRob3V0X2xvYW4AEmtBeGx5SW5GZWVXaXRoTG9hbgITX2F4bHlfZmVlX3dpdGhfbG9hbgALa0F4bHlDYXBGZWUCDV9heGx5X2ZlZV9jYXAACmtSZXF1ZXN0SWQCC19yZXF1ZXN0X2lkAAxrUmVxdWVzdEl0ZXICDXJlcXVlc3RzX2l0ZXIABWtQb29sAgVwb29sXwAOa1Bvb2xDYXBDaGFuZ2UCEF9wb29sX2NhcF9jaGFuZ2UACWtNb25leUJveAIOYXhseV9tb25leV9ib3gADmtTRkZhcm1pbmdBZGRyAhNzd29wZmlfZmFybWluZ19hZGRyAAxrTGVuZFNlcnZpY2UCEWxlbmRfc2VydmljZV9hZGRyAAxrUHJpY2VPcmFjbGUCDHByaWNlX29yYWNsZQALa0V4Q29udHJhY3QCEWV4Y2hhbmdlX2NvbnRyYWN0AA9rV3hTd2FwQ29udHJhY3QCEHd4X3N3YXBfY29udHJhY3QACG1vbmV5Qm94CQEHQWRkcmVzcwEJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMFCWtNb25leUJveAIYTm8gYXhseSBtb25leUJveCBhZGRyZXNzAApleENvbnRyYWN0CQEHQWRkcmVzcwEJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMFC2tFeENvbnRyYWN0AhxObyBleGNoYW5nZSBjb250cmFjdCBhZGRyZXNzAA9wcmljZU9yYWNsZUFkZHIJAQdBZGRyZXNzAQkA2QQBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwUMa1ByaWNlT3JhY2xlAhdObyBwcmljZSBvcmFjbGUgYWRkcmVzcwAOd3hTd2FwQ29udHJhY3QJAQdBZGRyZXNzAQkA2QQBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwUPa1d4U3dhcENvbnRyYWN0AhJObyB3eCBzd2FwIGFkZHJlc3MABlNXT1BJRAEgNAETVo5gRuJ+W6m4AUeC57EAJhKbduROS6KgfJxt7oEABFdYSUQBIMZSHoFO6m7jPMCXsA5fLPJq6e2dsobRmkJ4qGB9PhuxAQppc1NlbGZDYWxsAQFpAwkAAAIIBQFpBmNhbGxlcgUEdGhpcwUEdW5pdAkAAgECK09ubHkgY29udHJhY3QgaXRzZWxmIGNhbiBjYWxsIHRoaXMgZnVuY3Rpb24BDmFjY291bnRCYWxhbmNlAQdhc3NldElkBAckbWF0Y2gwBQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAmlkBQckbWF0Y2gwCQDwBwIFBHRoaXMFAmlkAwkAAQIFByRtYXRjaDACBFVuaXQEBXdhdmVzBQckbWF0Y2gwCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQkAAgECC01hdGNoIGVycm9yAQ1nZXRTRlBvb2xEYXRhAQhwb29sQWRkcgkAlwoFCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFD2tTRlBvb2xBQXNzZXRJZAIZQ2FuJ3QgZ2V0IHBvb2wgQSBhc3NldCBpZAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCHBvb2xBZGRyBQ9rU0ZQb29sQkFzc2V0SWQCGUNhbid0IGdldCBwb29sIEIgYXNzZXQgaWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQhwb29sQWRkcgUUa1NGUG9vbEFBc3NldEJhbGFuY2UCHkNhbid0IGdldCBwb29sIEEgYXNzZXQgYmFsYW5jZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFCHBvb2xBZGRyBRRrU0ZQb29sQkFzc2V0QmFsYW5jZQIeQ2FuJ3QgZ2V0IHBvb2wgQiBhc3NldCBiYWxhbmNlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHIFDmtTRlBvb2xTaGFyZUlkAhhDYW4ndCBnZXQgc2hhcmUgYXNzZXQgaWQBDWdldFdYUG9vbERhdGEBCHBvb2xBZGRyBANjZmcKAAFACQD8BwQFCHBvb2xBZGRyAhxnZXRQb29sQ29uZmlnV3JhcHBlclJFQURPTkxZBQNuaWwFA25pbAMJAAECBQFAAglMaXN0W0FueV0FAUAJAAIBCQCsAgIJAAMBBQFAAh4gY291bGRuJ3QgYmUgY2FzdCB0byBMaXN0W0FueV0DCQAAAgUDY2ZnBQNjZmcJAJcKBQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCgABQAkAkQMCBQNjZmcABAMJAAECBQFAAgZTdHJpbmcFAUAFBHVuaXQCGUNhbid0IGdldCBwb29sIEEgYXNzZXQgaWQJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgoAAUAJAJEDAgUDY2ZnAAUDCQABAgUBQAIGU3RyaW5nBQFABQR1bml0AhlDYW4ndCBnZXQgcG9vbCBCIGFzc2V0IGlkAAAAAAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCgABQAkAkQMCBQNjZmcAAwMJAAECBQFAAgZTdHJpbmcFAUAFBHVuaXQCGkNhbid0IGdldCBwb29sIExQIGFzc2V0IGlkCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQtnZXRQb29sRGF0YQIIcG9vbEFkZHIEdHlwZQMJAAACBQR0eXBlBQdTRl9QT09MCQENZ2V0U0ZQb29sRGF0YQEFCHBvb2xBZGRyAwkAAAIFBHR5cGUFB1dYX1BPT0wJAQ1nZXRXWFBvb2xEYXRhAQUIcG9vbEFkZHIJAAIBAg9Xcm9uZyBwb29sIHR5cGUBEWdldFBvb2xUb3RhbFNoYXJlAQRwb29sCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUKa1Bvb2xUb3RhbAAAARhnZXROZXdVc2VyUG9zaXRpb25OdW1iZXICBHBvb2wEdXNlcgkAZAIJAQt2YWx1ZU9yRWxzZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgUQa1VzZXJQb3NpdGlvbk51bQAAAAEBCmdldEF4bHlGZWUCBHBvb2wHZmVlVHlwZQMJAAACBQdmZWVUeXBlAgNjYXAJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUEcG9vbAULa0F4bHlDYXBGZWUDCQAAAgUHZmVlVHlwZQIEbG9hbgkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICBQRwb29sBRJrQXhseUluRmVlV2l0aExvYW4DCQAAAgUHZmVlVHlwZQIGbm9Mb2FuCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIFBHBvb2wFFWtBeGx5SW5GZWVXaXRob3V0TG9hbgkAAgECDldyb25nIGZlZSB0eXBlARBnZXRTRkZhcm1pbmdBZGRyAAkBB0FkZHJlc3MBCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzBQ5rU0ZGYXJtaW5nQWRkcgIdQ2FuJ3QgZ2V0IHN3b3BmaSBmYXJtaW5nIGFkZHIBEGdldFdYRmFybWluZ0FkZHIBCHBvb2xBZGRyBAlmQ29udHJhY3QJAQdBZGRyZXNzAQkA2QQBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUIcG9vbEFkZHICEyVzX19mYWN0b3J5Q29udHJhY3QCIkNhbid0IGdldCBXWCBmYWN0b3J5IGNvbnRyYWN0IGFkZHIECmZhY3Ryb3lDZmcJALUJAgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFCWZDb250cmFjdAIRJXNfX2ZhY3RvcnlDb25maWcCGENhbid0IGdldCBXWCBmYWN0b3J5IGNmZwICX18JAQdBZGRyZXNzAQkA2QQBCQCRAwIFCmZhY3Ryb3lDZmcAAQEOZ2V0TGVuZFNydkFkZHIACQEHQWRkcmVzcwEJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMFDGtMZW5kU2VydmljZQIbQ2FuJ3QgZ2V0IGxlbmQgc2VydmljZSBhZGRyAQxhc3NldElkVG9TdHIBB2Fzc2V0SWQEByRtYXRjaDAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCaWQFByRtYXRjaDAJANgEAQUCaWQDCQABAgUHJG1hdGNoMAIEVW5pdAQFd2F2ZXMFByRtYXRjaDACBVdBVkVTCQACAQILTWF0Y2ggZXJyb3IBDmFzc2V0SWRGcm9tU3RyAQdhc3NldElkAwkAAAIFB2Fzc2V0SWQCBVdBVkVTBQR1bml0CQDZBAEFB2Fzc2V0SWQBEGdldEFzc2V0RGVjaW1hbHMBB2Fzc2V0SWQDCQAAAgUHYXNzZXRJZAIFV0FWRVMACAQHJG1hdGNoMAkA7AcBCQDZBAEFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIFQXNzZXQEBWFzc2V0BQckbWF0Y2gwCAUFYXNzZXQIZGVjaW1hbHMJAAIBAhBDYW4ndCBmaW5kIGFzc2V0AQ9yZXBsZW5pc2hTd29wRmkJBHBvb2wHZmVlVHlwZQRwbXRBCXBtdEFzc2V0QQRwbXRCCXBtdEFzc2V0QgRiYWxBBGJhbEIHc2hhcmVJZAQSc2hhcmVCYWxhbmNlQmVmb3JlCQEOYWNjb3VudEJhbGFuY2UBCQDZBAEFB3NoYXJlSWQDCQAAAgUSc2hhcmVCYWxhbmNlQmVmb3JlBRJzaGFyZUJhbGFuY2VCZWZvcmUECHBvb2xBZGRyCQEHQWRkcmVzcwEJANkEAQUEcG9vbAQGcmF0aW9BCQBrAwUGU0NBTEU4BQRwbXRBBQRiYWxBBAZyYXRpb0IJAGsDBQZTQ0FMRTgFBHBtdEIFBGJhbEIECyR0MDYzOTc2Njg5AwkAZgIFBnJhdGlvQgUGcmF0aW9BBANwbXQJAG4EBQRiYWxCBQZyYXRpb0EFBlNDQUxFOAUHQ0VJTElORwkAlgoEBQRwbXRBBQNwbXQJAGUCBQRwbXRCBQNwbXQFCXBtdEFzc2V0QgQDcG10CQBuBAUEYmFsQQUGcmF0aW9CBQZTQ0FMRTgFB0NFSUxJTkcJAJYKBAUDcG10BQRwbXRCCQBlAgUEcG10QQUDcG10BQlwbXRBc3NldEEECnBtdEFtb3VudEEIBQskdDA2Mzk3NjY4OQJfMQQKcG10QW1vdW50QggFCyR0MDYzOTc2Njg5Al8yBAZjaGFuZ2UIBQskdDA2Mzk3NjY4OQJfMwQNY2hhbmdlQXNzZXRJZAgFCyR0MDYzOTc2Njg5Al80BARpbnYxAwMJAGYCBQpwbXRBbW91bnRBAAAJAGYCBQpwbXRBbW91bnRCAAAHBAhwYXltZW50cwkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDmFzc2V0SWRGcm9tU3RyAQUJcG10QXNzZXRBBQpwbXRBbW91bnRBCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQEOYXNzZXRJZEZyb21TdHIBBQlwbXRBc3NldEIFCnBtdEFtb3VudEIFA25pbAkA/AcEBQhwb29sQWRkcgIMY2FsbEZ1bmN0aW9uCQDMCAICFnJlcGxlbmlzaFdpdGhUd29Ub2tlbnMJAMwIAgkAzAgCAgVmYWxzZQkAzAgCAgEwBQNuaWwFA25pbAUIcGF5bWVudHMAAAMJAAACBQRpbnYxBQRpbnYxBARpbnYyAwkAZgIFBmNoYW5nZQAABAhwYXltZW50cwkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDmFzc2V0SWRGcm9tU3RyAQUNY2hhbmdlQXNzZXRJZAUGY2hhbmdlBQNuaWwEBHZhcnMJAMwIAgIBMAkAzAgCAgVmYWxzZQkAzAgCAgEwBQNuaWwJAPwHBAUIcG9vbEFkZHICDGNhbGxGdW5jdGlvbgkAzAgCAhVyZXBsZW5pc2hXaXRoT25lVG9rZW4JAMwIAgUEdmFycwUDbmlsBQhwYXltZW50cwAAAwkAAAIFBGludjIFBGludjIEEXNoYXJlQmFsYW5jZUFmdGVyCQEOYWNjb3VudEJhbGFuY2UBCQDZBAEFB3NoYXJlSWQEC3RvdGFsU3Rha2VkCQBlAgURc2hhcmVCYWxhbmNlQWZ0ZXIFEnNoYXJlQmFsYW5jZUJlZm9yZQQNYXhseUZlZUFtb3VudAkAawMFC3RvdGFsU3Rha2VkCQEKZ2V0QXhseUZlZQIFBHBvb2wFB2ZlZVR5cGUFCkZFRV9TQ0FMRTYEEXVzZXJTaGFyZUZvclN0YWtlCQBlAgULdG90YWxTdGFrZWQFDWF4bHlGZWVBbW91bnQDCQBnAgAABRF1c2VyU2hhcmVGb3JTdGFrZQkAAgECKGFtb3VudCBvZiBzdGFrZWQgc2hhcmV0b2tlbnMgbXVzdCBiZSA+IDAEBGludjMJAPwHBAkBEGdldFNGRmFybWluZ0FkZHIAAg9sb2NrU2hhcmVUb2tlbnMJAMwIAgUEcG9vbAkAzAgCAAAFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQdzaGFyZUlkBRF1c2VyU2hhcmVGb3JTdGFrZQUDbmlsAwkAAAIFBGludjMFBGludjMJAJQKAgURdXNlclNoYXJlRm9yU3Rha2UFDWF4bHlGZWVBbW91bnQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BC3JlcGxlbmlzaFdYBwRwb29sB2ZlZVR5cGUEcG10QQlwbXRBc3NldEEEcG10QglwbXRBc3NldEIHc2hhcmVJZAQIcG9vbEFkZHIJAQdBZGRyZXNzAQkA2QQBBQRwb29sBAskdDA4MTQwODk4OQMDCQBmAgUEcG10QQAACQBmAgUEcG10QgAABwQKZXZhbFB1dEluQQkAtQkCCgABQAkA/AcEBQhwb29sQWRkcgIgZXZhbHVhdGVQdXRCeUFtb3VudEFzc2V0UkVBRE9OTFkJAMwIAgUEcG10QQUDbmlsBQNuaWwDCQABAgUBQAIGU3RyaW5nBQFACQACAQkArAICCQADAQUBQAIbIGNvdWxkbid0IGJlIGNhc3QgdG8gU3RyaW5nAgJfXwMJAAACBQpldmFsUHV0SW5BBQpldmFsUHV0SW5BBApldmFsUHV0SW5CCQC1CQIKAAFACQD8BwQFCHBvb2xBZGRyAh9ldmFsdWF0ZVB1dEJ5UHJpY2VBc3NldFJFQURPTkxZCQDMCAIFBHBtdEIFA25pbAUDbmlsAwkAAQIFAUACBlN0cmluZwUBQAkAAgEJAKwCAgkAAwEFAUACGyBjb3VsZG4ndCBiZSBjYXN0IHRvIFN0cmluZwICX18DCQAAAgUKZXZhbFB1dEluQgUKZXZhbFB1dEluQgQFbHBJbkEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpldmFsUHV0SW5BAAEEBWxwSW5CCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKZXZhbFB1dEluQgABAwkAZgIFBWxwSW5CBQVscEluQQQGcG10SW5CCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKZXZhbFB1dEluQQAICQCWCgQFBHBtdEEFBnBtdEluQgkAZQIFBHBtdEIFBnBtdEluQgUJcG10QXNzZXRCBAZwbXRJbkEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpldmFsUHV0SW5CAAcJAJYKBAUGcG10SW5BBQRwbXRCCQBlAgUEcG10QQUGcG10SW5BBQlwbXRBc3NldEEJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4DCQBmAgUEcG10QQAACQCWCgQFBHBtdEEFBHBtdEIFBHBtdEEFCXBtdEFzc2V0QQMJAGYCBQRwbXRCAAAJAJYKBAUEcG10QQUEcG10QgUEcG10QgUJcG10QXNzZXRCCQACAQIQcG10cyBtdXN0IGJlID4gMAQKcG10QW1vdW50QQgFCyR0MDgxNDA4OTg5Al8xBApwbXRBbW91bnRCCAULJHQwODE0MDg5ODkCXzIEBmNoYW5nZQgFCyR0MDgxNDA4OTg5Al8zBA1jaGFuZ2VBc3NldElkCAULJHQwODE0MDg5ODkCXzQEEnNoYXJlQmFsYW5jZUJlZm9yZQkBDmFjY291bnRCYWxhbmNlAQkA2QQBBQdzaGFyZUlkAwkAAAIFEnNoYXJlQmFsYW5jZUJlZm9yZQUSc2hhcmVCYWxhbmNlQmVmb3JlBARpbnYxAwMJAGYCBQpwbXRBbW91bnRBAAAJAGYCBQpwbXRBbW91bnRCAAAHBAhwYXltZW50cwkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDmFzc2V0SWRGcm9tU3RyAQUJcG10QXNzZXRBBQpwbXRBbW91bnRBCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQEOYXNzZXRJZEZyb21TdHIBBQlwbXRBc3NldEIFCnBtdEFtb3VudEIFA25pbAkA/AcEBQhwb29sQWRkcgIDcHV0CQDMCAIAwIQ9CQDMCAIHBQNuaWwFCHBheW1lbnRzAAADCQAAAgUEaW52MQUEaW52MQQEaW52MgMJAGYCBQZjaGFuZ2UAAAQIcGF5bWVudHMJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQ5hc3NldElkRnJvbVN0cgEFDWNoYW5nZUFzc2V0SWQFBmNoYW5nZQUDbmlsCQD8BwQFCHBvb2xBZGRyAglwdXRPbmVUa24JAMwIAgAACQDMCAIHBQNuaWwFCHBheW1lbnRzAAADCQAAAgUEaW52MgUEaW52MgQRc2hhcmVCYWxhbmNlQWZ0ZXIJAQ5hY2NvdW50QmFsYW5jZQEJANkEAQUHc2hhcmVJZAQLdG90YWxTdGFrZWQJAGUCBRFzaGFyZUJhbGFuY2VBZnRlcgUSc2hhcmVCYWxhbmNlQmVmb3JlBA1heGx5RmVlQW1vdW50CQBrAwULdG90YWxTdGFrZWQJAQpnZXRBeGx5RmVlAgUEcG9vbAUHZmVlVHlwZQUKRkVFX1NDQUxFNgQRdXNlclNoYXJlRm9yU3Rha2UJAGUCBQt0b3RhbFN0YWtlZAUNYXhseUZlZUFtb3VudAMJAGcCAAAFEXVzZXJTaGFyZUZvclN0YWtlCQACAQIoYW1vdW50IG9mIHN0YWtlZCBzaGFyZXRva2VucyBtdXN0IGJlID4gMAQEaW52MwkA/AcECQEQZ2V0V1hGYXJtaW5nQWRkcgEFCHBvb2xBZGRyAgVzdGFrZQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFB3NoYXJlSWQFEXVzZXJTaGFyZUZvclN0YWtlBQNuaWwDCQAAAgUEaW52MwUEaW52MwkAlAoCBRF1c2VyU2hhcmVGb3JTdGFrZQUNYXhseUZlZUFtb3VudAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEPcmVwbGVuaXNoQnlUeXBlCgR0eXBlBHBvb2wHZmVlVHlwZQRwbXRBA0FJZARwbXRCA0JJZARiYWxBBGJhbEIHc2hhcmVJZAMJAAACBQR0eXBlBQdTRl9QT09MCQEPcmVwbGVuaXNoU3dvcEZpCQUEcG9vbAUITE9BTl9GRUUFBHBtdEEFA0FJZAUEcG10QgUDQklkBQRiYWxBBQRiYWxCBQdzaGFyZUlkAwkAAAIFBHR5cGUFB1dYX1BPT0wJAQtyZXBsZW5pc2hXWAcFBHBvb2wFCExPQU5fRkVFBQRwbXRBBQNBSWQFBHBtdEIFA0JJZAUHc2hhcmVJZAkAAgECD1dyb25nIHBvb2wgdHlwZQEQcmVwbGVuaXNoRW50cmllcwcEcG9vbAR1c2VyDHN0YWtlZEFtb3VudA1heGx5RmVlQW1vdW50BnBvc051bQdzaGFyZUlkBHR5cGUEC3RvdGFsQW1vdW50CQERZ2V0UG9vbFRvdGFsU2hhcmUBBQRwb29sBA9jdXJQb29sSW50ZXJlc3QJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUEcG9vbAUNa1Bvb2xJbnRlcmVzdAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICBQRwb29sBQprUG9vbFRvdGFsCQBkAgULdG90YWxBbW91bnQFDHN0YWtlZEFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXICAV8JAKQDAQUGcG9zTnVtBQ1rVXNlclBvc2l0aW9uBQxzdGFrZWRBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyAgFfCQCkAwEFBnBvc051bQUVa1VzZXJQb3NpdGlvbkludGVyZXN0BQ9jdXJQb29sSW50ZXJlc3QJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXIFEGtVc2VyUG9zaXRpb25OdW0FBnBvc051bQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQhtb25leUJveAUNYXhseUZlZUFtb3VudAkA2QQBBQdzaGFyZUlkBQNuaWwBC2NsYWltRmFybWVkAgR0eXBlBHBvb2wDCQAAAgUEdHlwZQUHU0ZfUE9PTAQJYmFsQmVmb3JlCQEOYWNjb3VudEJhbGFuY2UBBQZTV09QSUQDCQAAAgUJYmFsQmVmb3JlBQliYWxCZWZvcmUEA2ludgkA/AcECQEQZ2V0U0ZGYXJtaW5nQWRkcgACBWNsYWltCQDMCAIFBHBvb2wFA25pbAUDbmlsAwkAAAIFA2ludgUDaW52BAhiYWxBZnRlcgkBDmFjY291bnRCYWxhbmNlAQUGU1dPUElECQCUCgIJAGUCBQhiYWxBZnRlcgUJYmFsQmVmb3JlBQZTV09QSUQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4DCQAAAgUEdHlwZQUHV1hfUE9PTAQJYmFsQmVmb3JlCQEOYWNjb3VudEJhbGFuY2UBBQRXWElEAwkAAAIFCWJhbEJlZm9yZQUJYmFsQmVmb3JlBANpbnYJAPwHBAkBEGdldFdYRmFybWluZ0FkZHIBCQEHQWRkcmVzcwEJANkEAQUEcG9vbAIHY2xhaW1XWAkAzAgCBQRwb29sBQNuaWwFA25pbAMJAAACBQNpbnYFA2ludgQIYmFsQWZ0ZXIJAQ5hY2NvdW50QmFsYW5jZQEFBFdYSUQJAJQKAgkAZQIFCGJhbEFmdGVyBQliYWxCZWZvcmUFBFdYSUQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAg9Xcm9uZyBwb29sIHR5cGUBDmV4Y2hhbmdlS2VlcGVyCgd0b1Rva2VuCXBtdEFtb3VudAhwbXRBc3NldAlhbW91bnRzSW4JYWRkcmVzc2VzD2Fzc2V0c1RvUmVjZWl2ZQtlc3RSZWNlaXZlZBFzbGlwcGFnZVRvbGVyYW5jZQttaW5SZWNlaXZlZAdvcHRpb25zBBJ0b2tlbkJhbGFuY2VCZWZvcmUJAQ5hY2NvdW50QmFsYW5jZQEJAQ5hc3NldElkRnJvbVN0cgEFB3RvVG9rZW4DCQAAAgUSdG9rZW5CYWxhbmNlQmVmb3JlBRJ0b2tlbkJhbGFuY2VCZWZvcmUEA2ludgkA/AcEBQpleENvbnRyYWN0AgRzd2FwCQDMCAIFCWFtb3VudHNJbgkAzAgCBQlhZGRyZXNzZXMJAMwIAgUPYXNzZXRzVG9SZWNlaXZlCQDMCAIFC2VzdFJlY2VpdmVkCQDMCAIFEXNsaXBwYWdlVG9sZXJhbmNlCQDMCAIFC21pblJlY2VpdmVkCQDMCAIFB29wdGlvbnMFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUIcG10QXNzZXQFCXBtdEFtb3VudAUDbmlsAwkAAAIFA2ludgUDaW52CQBlAgkBDmFjY291bnRCYWxhbmNlAQkBDmFzc2V0SWRGcm9tU3RyAQUHdG9Ub2tlbgUSdG9rZW5CYWxhbmNlQmVmb3JlCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQ5leGNoYW5nZVBhenpsZQYHdG9Ub2tlbglwbXRBbW91bnQIcG10QXNzZXQJcm91dGVzU3RyDG1pblRvUmVjZWl2ZQdvcHRpb25zBBJ0b2tlbkJhbGFuY2VCZWZvcmUJAQ5hY2NvdW50QmFsYW5jZQEJAQ5hc3NldElkRnJvbVN0cgEFB3RvVG9rZW4DCQAAAgUSdG9rZW5CYWxhbmNlQmVmb3JlBRJ0b2tlbkJhbGFuY2VCZWZvcmUEA2ludgkA/AcEBQpleENvbnRyYWN0AgpwdXp6bGVTd2FwCQDMCAIFCXJvdXRlc1N0cgkAzAgCBQxtaW5Ub1JlY2VpdmUJAMwIAgUHb3B0aW9ucwUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQhwbXRBc3NldAUJcG10QW1vdW50BQNuaWwDCQAAAgUDaW52BQNpbnYJAGUCCQEOYWNjb3VudEJhbGFuY2UBCQEOYXNzZXRJZEZyb21TdHIBBQd0b1Rva2VuBRJ0b2tlbkJhbGFuY2VCZWZvcmUJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BDmV4Y2hhbmdlU3dvcEZpCgd0b1Rva2VuCXBtdEFtb3VudAhwbXRBc3NldApleGNoYW5nZXJzDmV4Y2hhbmdlcnNUeXBlBWFyZ3MxBWFyZ3MyEXJvdXRpbmdBc3NldHNLZXlzEm1pbkFtb3VudFRvUmVjZWl2ZQdvcHRpb25zBBJ0b2tlbkJhbGFuY2VCZWZvcmUJAQ5hY2NvdW50QmFsYW5jZQEJAQ5hc3NldElkRnJvbVN0cgEFB3RvVG9rZW4DCQAAAgUSdG9rZW5CYWxhbmNlQmVmb3JlBRJ0b2tlbkJhbGFuY2VCZWZvcmUEA2ludgkA/AcEBQpleENvbnRyYWN0Agpzd29wZmlTd2FwCQDMCAIFCmV4Y2hhbmdlcnMJAMwIAgUOZXhjaGFuZ2Vyc1R5cGUJAMwIAgUFYXJnczEJAMwIAgUFYXJnczIJAMwIAgURcm91dGluZ0Fzc2V0c0tleXMJAMwIAgUSbWluQW1vdW50VG9SZWNlaXZlCQDMCAIFB29wdGlvbnMFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUIcG10QXNzZXQFCXBtdEFtb3VudAUDbmlsAwkAAAIFA2ludgUDaW52CQBlAgkBDmFjY291bnRCYWxhbmNlAQkBDmFzc2V0SWRGcm9tU3RyAQUHdG9Ub2tlbgUSdG9rZW5CYWxhbmNlQmVmb3JlCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQpjYXBpdGFsaXplBARwb29sBXBUeXBlB3Rva2VuSWQLdG9rZW5BbW91bnQECHBvb2xBZGRyCQEHQWRkcmVzcwEJANkEAQUEcG9vbAQNJHQwMTM4MjQxMzkwMwkBC2dldFBvb2xEYXRhAgUIcG9vbEFkZHIFBXBUeXBlBANBSWQIBQ0kdDAxMzgyNDEzOTAzAl8xBANCSWQIBQ0kdDAxMzgyNDEzOTAzAl8yBARiYWxBCAUNJHQwMTM4MjQxMzkwMwJfMwQEYmFsQggFDSR0MDEzODI0MTM5MDMCXzQEB3NoYXJlSWQIBQ0kdDAxMzgyNDEzOTAzAl81BA0kdDAxMzkwNjEzOTg2AwkAAAIFB3Rva2VuSWQFA0FJZAkAlAoCBQt0b2tlbkFtb3VudAAACQCUCgIAAAULdG9rZW5BbW91bnQEBHBtdEEIBQ0kdDAxMzkwNjEzOTg2Al8xBARwbXRCCAUNJHQwMTM5MDYxMzk4NgJfMgQNJHQwMTM5ODkxNDA5OQkBD3JlcGxlbmlzaEJ5VHlwZQoFBXBUeXBlBQRwb29sBQdDQVBfRkVFBQRwbXRBBQNBSWQFBHBtdEIFA0JJZAUEYmFsQQUEYmFsQgUHc2hhcmVJZAQMc3Rha2VkQW1vdW50CAUNJHQwMTM5ODkxNDA5OQJfMQQHYXhseUZlZQgFDSR0MDEzOTg5MTQwOTkCXzIED2N1clBvb2xJbnRlcmVzdAkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzCQCsAgIFBHBvb2wFDWtQb29sSW50ZXJlc3QAAAQQdG90YWxTaGFyZUFtb3VudAkBEWdldFBvb2xUb3RhbFNoYXJlAQUEcG9vbAQLbmV3SW50ZXJlc3QJAGQCBQ9jdXJQb29sSW50ZXJlc3QJAGsDBQxzdGFrZWRBbW91bnQFB1NDQUxFMTAFEHRvdGFsU2hhcmVBbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUEcG9vbAUNa1Bvb2xJbnRlcmVzdAULbmV3SW50ZXJlc3QJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUIbW9uZXlCb3gFB2F4bHlGZWUJANkEAQUHc2hhcmVJZAUDbmlsARJleGNoYW5nZURpcmVjdGx5U0YHBHBvb2wIYXNzZXRJZEEIYXNzZXRJZEIEYmFsQQRiYWxCEGFtb3VudFRva2VuVG9HZXQPYXNzZXRUb2tlblRvR2V0BAhwb29sQWRkcgkBB0FkZHJlc3MBCQDZBAEFBHBvb2wECWZlZVNjYWxlNgDAhD0EA2ZlZQkBEUBleHRyTmF0aXZlKDEwNTApAgUIcG9vbEFkZHIFCmtTRlBvb2xGZWUEDGFtbnRHZXROb0ZlZQkAawMFEGFtb3VudFRva2VuVG9HZXQFCWZlZVNjYWxlNgkAZQIFCWZlZVNjYWxlNgUDZmVlBA0kdDAxNDc5MjE1MDgwAwkAAAIFD2Fzc2V0VG9rZW5Ub0dldAUIYXNzZXRJZEEEC2Ftb3VudFRvUGF5CQBrAwUEYmFsQQUMYW1udEdldE5vRmVlCQBlAgUEYmFsQgUMYW1udEdldE5vRmVlCQCUCgIFC2Ftb3VudFRvUGF5BQhhc3NldElkQgQLYW1vdW50VG9QYXkJAGsDBQRiYWxCBQxhbW50R2V0Tm9GZWUJAGUCBQRiYWxBBQxhbW50R2V0Tm9GZWUJAJQKAgULYW1vdW50VG9QYXkFCGFzc2V0SWRBBAthbW91bnRUb1BheQgFDSR0MDE0NzkyMTUwODACXzEECmFzc2V0VG9QYXkIBQ0kdDAxNDc5MjE1MDgwAl8yCQD8BwQFCHBvb2xBZGRyAgxjYWxsRnVuY3Rpb24JAMwIAgIIZXhjaGFuZ2UJAMwIAgkAzAgCAgExBQNuaWwFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDmFzc2V0SWRGcm9tU3RyAQUKYXNzZXRUb1BheQULYW1vdW50VG9QYXkFA25pbAESZXhjaGFuZ2VEaXJlY3RseVdYBwRwb29sCGFzc2V0SWRBCGFzc2V0SWRCBGJhbEEEYmFsQhBhbW91bnRUb2tlblRvR2V0D2Fzc2V0VG9rZW5Ub0dldAQIcG9vbEFkZHIJAQdBZGRyZXNzAQkA2QQBBQRwb29sBAVwckZlZQkBEUBleHRyTmF0aXZlKDEwNTApAgUOd3hTd2FwQ29udHJhY3QCDyVzX19wcm90b2NvbEZlZQQEcEZlZQkBEUBleHRyTmF0aXZlKDEwNTApAgUOd3hTd2FwQ29udHJhY3QCCyVzX19wb29sRmVlBAhmZWVTY2FsZQkAtgIBAIDC1y8EDSR0MDE1NTU5MTU4NjcDCQAAAgUPYXNzZXRUb2tlblRvR2V0BQhhc3NldElkQQQLYW1vdW50VG9QYXkJAGsDBQRiYWxBBRBhbW91bnRUb2tlblRvR2V0CQBlAgUEYmFsQgUQYW1vdW50VG9rZW5Ub0dldAkAlAoCBQthbW91bnRUb1BheQUIYXNzZXRJZEIEC2Ftb3VudFRvUGF5CQBrAwUEYmFsQgUQYW1vdW50VG9rZW5Ub0dldAkAZQIFBGJhbEEFEGFtb3VudFRva2VuVG9HZXQJAJQKAgULYW1vdW50VG9QYXkFCGFzc2V0SWRBBAthbW91bnRUb1BheQgFDSR0MDE1NTU5MTU4NjcCXzEECmFzc2V0VG9QYXkIBQ0kdDAxNTU1OTE1ODY3Al8yBBJhbW91bnRUb1BheVdpdGhGZWUJAKADAQkAvAIDCQC2AgEFC2Ftb3VudFRvUGF5BQhmZWVTY2FsZQkAuAICBQhmZWVTY2FsZQkAtgIBCQBkAgUFcHJGZWUFBHBGZWUJAPwHBAUOd3hTd2FwQ29udHJhY3QCBHN3YXAJAMwIAgABCQDMCAIFD2Fzc2V0VG9rZW5Ub0dldAkAzAgCCQClCAEFBHRoaXMFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDmFzc2V0SWRGcm9tU3RyAQUKYXNzZXRUb1BheQUSYW1vdW50VG9QYXlXaXRoRmVlBQNuaWwBEGV4Y2hhbmdlRGlyZWN0bHkIBHR5cGUEcG9vbAhhc3NldElkQQhhc3NldElkQgRiYWxBBGJhbEIQYW1vdW50VG9rZW5Ub0dldA9hc3NldFRva2VuVG9HZXQDCQAAAgUEdHlwZQUHU0ZfUE9PTAkBEmV4Y2hhbmdlRGlyZWN0bHlTRgcFBHBvb2wFCGFzc2V0SWRBBQhhc3NldElkQgUEYmFsQQUEYmFsQgUQYW1vdW50VG9rZW5Ub0dldAUPYXNzZXRUb2tlblRvR2V0CQESZXhjaGFuZ2VEaXJlY3RseVdYBwUEcG9vbAUIYXNzZXRJZEEFCGFzc2V0SWRCBQRiYWxBBQRiYWxCBRBhbW91bnRUb2tlblRvR2V0BQ9hc3NldFRva2VuVG9HZXQBEndpdGhkcmF3QW1vdW50Q2FsYwQEcG9vbA91c2VyQ2FuV2l0aGRyYXcEZGVidAtib3Jyb3dBc3NldAQIcG9vbEFkZHIJAQdBZGRyZXNzAQkA2QQBBQRwb29sBAVwVHlwZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgUFa1Bvb2wFBHBvb2wCDFVua25vd24gcG9vbAQNJHQwMTY3MzIxNjc5OQkBC2dldFBvb2xEYXRhAgUIcG9vbEFkZHIFBXBUeXBlBAhhc3NldElkQQgFDSR0MDE2NzMyMTY3OTkCXzEECGFzc2V0SWRCCAUNJHQwMTY3MzIxNjc5OQJfMgQEYmFsQQgFDSR0MDE2NzMyMTY3OTkCXzMEBGJhbEIIBQ0kdDAxNjczMjE2Nzk5Al80BAtjQmFsQUJlZm9yZQkBDmFjY291bnRCYWxhbmNlAQkBDmFzc2V0SWRGcm9tU3RyAQUIYXNzZXRJZEEDCQAAAgULY0JhbEFCZWZvcmUFC2NCYWxBQmVmb3JlBAtjQmFsQkJlZm9yZQkBDmFjY291bnRCYWxhbmNlAQkBDmFzc2V0SWRGcm9tU3RyAQUIYXNzZXRJZEIDCQAAAgULY0JhbEJCZWZvcmUFC2NCYWxCQmVmb3JlBANpbnYDCQAAAgUFcFR5cGUFB1NGX1BPT0wJAPwHBAUIcG9vbEFkZHICDGNhbGxGdW5jdGlvbgkAzAgCAgh3aXRoZHJhdwkAzAgCCQDMCAIJAKQDAQUPdXNlckNhbldpdGhkcmF3BQNuaWwFA25pbAUDbmlsAwkAAAIFBXBUeXBlBQdXWF9QT09MCQD8BwQFCHBvb2xBZGRyAg11bnN0YWtlQW5kR2V0CQDMCAIFD3VzZXJDYW5XaXRoZHJhdwUDbmlsBQNuaWwJAAIBAhNXcm9uZyBwb3NpdGlvbiB0eXBlAwkAAAIFA2ludgUDaW52BApjQmFsQUFmdGVyCQEOYWNjb3VudEJhbGFuY2UBCQEOYXNzZXRJZEZyb21TdHIBBQhhc3NldElkQQQKY0JhbEJBZnRlcgkBDmFjY291bnRCYWxhbmNlAQkBDmFzc2V0SWRGcm9tU3RyAQUIYXNzZXRJZEIEDSR0MDE3MzExMTc0MDAJAJQKAgkAZQIFCmNCYWxBQWZ0ZXIFC2NCYWxBQmVmb3JlCQBlAgUKY0JhbEJBZnRlcgULY0JhbEJCZWZvcmUEDXRva2Vuc0Ftb3VudEEIBQ0kdDAxNzMxMTE3NDAwAl8xBA10b2tlbnNBbW91bnRCCAUNJHQwMTczMTExNzQwMAJfMgQNJHQwMTc0MDMxODA5OQMJAGYCBQRkZWJ0AAAEDWFtb3VudFRvR2V0RXgDAwkAAAIFC2JvcnJvd0Fzc2V0BQhhc3NldElkQQkAZgIFBGRlYnQFDXRva2Vuc0Ftb3VudEEHCQBlAgUEZGVidAUNdG9rZW5zQW1vdW50QQMDCQAAAgULYm9ycm93QXNzZXQFCGFzc2V0SWRCCQBmAgUEZGVidAUNdG9rZW5zQW1vdW50QgcJAGUCBQRkZWJ0BQ10b2tlbnNBbW91bnRCAAAEBWV4SW52AwkAZgIFDWFtb3VudFRvR2V0RXgAAAkBEGV4Y2hhbmdlRGlyZWN0bHkIBQVwVHlwZQUEcG9vbAUIYXNzZXRJZEEFCGFzc2V0SWRCBQRiYWxBBQRiYWxCBQ1hbW91bnRUb0dldEV4BQtib3Jyb3dBc3NldAAAAwkAAAIFBWV4SW52BQVleEludgQPY0JhbEFBZnRlclJlcGF5CQEOYWNjb3VudEJhbGFuY2UBCQEOYXNzZXRJZEZyb21TdHIBBQhhc3NldElkQQQPY0JhbEJBZnRlclJlcGF5CQEOYWNjb3VudEJhbGFuY2UBCQEOYXNzZXRJZEZyb21TdHIBBQhhc3NldElkQgkAlAoCCQBlAgUPY0JhbEFBZnRlclJlcGF5BQtjQmFsQUJlZm9yZQkAZQIFD2NCYWxCQWZ0ZXJSZXBheQULY0JhbEJCZWZvcmUJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAJQKAgUNdG9rZW5zQW1vdW50QQUNdG9rZW5zQW1vdW50QgQNdG9Vc2VyQW1vdW50QQgFDSR0MDE3NDAzMTgwOTkCXzEEDXRvVXNlckFtb3VudEIIBQ0kdDAxNzQwMzE4MDk5Al8yCQCWCgQFDXRvVXNlckFtb3VudEEFCGFzc2V0SWRBBQ10b1VzZXJBbW91bnRCBQhhc3NldElkQgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEMcGFyc2VSZXF1ZXN0AQlyZXF1ZXN0SWQEB3JlcXVlc3QJALUJAgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgUJcmVxdWVzdElkBQprUmVxdWVzdElkCQCsAgICE05vIHJlcXVlc3Qgd2l0aCBpZCAFCXJlcXVlc3RJZAIBLAQEdXNlcgkAkQMCBQdyZXF1ZXN0AAAEBHBvb2wJAJEDAgUHcmVxdWVzdAABBARwbXRBCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVxdWVzdAACBANBSWQJAJEDAgUHcmVxdWVzdAADBARwbXRCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVxdWVzdAAEBANCSWQJAJEDAgUHcmVxdWVzdAAFBARiYWxBCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVxdWVzdAAGBARiYWxCCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVxdWVzdAAHBAdzaGFyZUlkCQCRAwIFB3JlcXVlc3QACAQHYndBc3NldAkAkQMCBQdyZXF1ZXN0AAkECGJ3QW1vdW50CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcmVxdWVzdAAKCQCdCgsFBHVzZXIFBHBvb2wFBHBtdEEFA0FJZAUEcG10QgUDQklkBQRiYWxBBQRiYWxCBQdzaGFyZUlkBQdid0Fzc2V0BQhid0Ftb3VudAoBaQERcmVwbGVuaXNoUkVBRE9OTFkDBHBvb2wIbGV2ZXJhZ2UNYm9ycm93QXNzZXRJZAMDCQBmAgBkBQhsZXZlcmFnZQYJAGYCBQhsZXZlcmFnZQCsAgkAAgECH0xldmVyYWdlIGNhbid0IGJlIDwxMDAgYW5kID4zMDAEBXBUeXBlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwkArAICBQVrUG9vbAUEcG9vbAISUG9vbCBpcyBub3QgaW5pdGVkBA0kdDAxOTA1MzE5MTQzCQELZ2V0UG9vbERhdGECCQEHQWRkcmVzcwEJANkEAQUEcG9vbAUFcFR5cGUEA0FJZAgFDSR0MDE5MDUzMTkxNDMCXzEEA0JJZAgFDSR0MDE5MDUzMTkxNDMCXzIEBGJhbEEIBQ0kdDAxOTA1MzE5MTQzAl8zBARiYWxCCAUNJHQwMTkwNTMxOTE0MwJfNAQHc2hhcmVJZAgFDSR0MDE5MDUzMTkxNDMCXzUEDSR0MDE5MTQ2MTk3ODMDCQAAAgkAkAMBCAUBaQhwYXltZW50cwACAwkBAiE9AgkBDGFzc2V0SWRUb1N0cgEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUDQUlkCQACAQIVV3JvbmcgcGF5bWVudCBhc3NldCBBAwkBAiE9AgkBDGFzc2V0SWRUb1N0cgEICQCRAwIIBQFpCHBheW1lbnRzAAEHYXNzZXRJZAUDQklkCQACAQIVV3JvbmcgcGF5bWVudCBhc3NldCBCCQCWCgQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BQNBSWQICQCRAwIIBQFpCHBheW1lbnRzAAEGYW1vdW50BQNCSWQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABAwkAAAIJAQxhc3NldElkVG9TdHIBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQFA0FJZAkAlgoECAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAUDQUlkAAAFA0JJZAMJAAACCQEMYXNzZXRJZFRvU3RyAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQNCSWQJAJYKBAAABQNBSWQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BQNCSWQJAAIBAg1Xcm9uZyBwYXltZW50CQACAQIcT25lIG9yIHR3byBwYXltZW50cyBleHBlY3RlZAQEcG10QQgFDSR0MDE5MTQ2MTk3ODMCXzEECXBtdEFzc2V0QQgFDSR0MDE5MTQ2MTk3ODMCXzIEBHBtdEIIBQ0kdDAxOTE0NjE5NzgzAl8zBAlwbXRBc3NldEIIBQ0kdDAxOTE0NjE5NzgzAl80BA0kdDAxOTc4NjIxMjk3AwkAZgIFCGxldmVyYWdlAGQEB2RQcmljZUEICgABQAkA/AcEBQ9wcmljZU9yYWNsZUFkZHICCWdldFRXQVA2MAkAzAgCBQlwbXRBc3NldEEJAMwIAgcFA25pbAUDbmlsAwkAAQIFAUACCihJbnQsIEludCkFAUAJAAIBCQCsAgIJAAMBBQFAAh8gY291bGRuJ3QgYmUgY2FzdCB0byAoSW50LCBJbnQpAl8xBAdkUHJpY2VCCAoAAUAJAPwHBAUPcHJpY2VPcmFjbGVBZGRyAglnZXRUV0FQNjAJAMwIAgUJcG10QXNzZXRCCQDMCAIHBQNuaWwFA25pbAMJAAECBQFAAgooSW50LCBJbnQpBQFACQACAQkArAICCQADAQUBQAIfIGNvdWxkbid0IGJlIGNhc3QgdG8gKEludCwgSW50KQJfMQQMcGF5ZEluRG9sbGFyCQBkAgkAawMFB2RQcmljZUEFBHBtdEEJAGwGAAoAAAkBEGdldEFzc2V0RGVjaW1hbHMBBQlwbXRBc3NldEEAAAAABQRET1dOCQBrAwUHZFByaWNlQgUEcG10QgkAbAYACgAACQEQZ2V0QXNzZXREZWNpbWFscwEFCXBtdEFzc2V0QgAAAAAFBERPV04EDGJvcnJvd0Ftb3VudAkAawMFDHBheWRJbkRvbGxhcgkAZQIFCGxldmVyYWdlAGQAZAQHcmVxdWVzdAkAuQkCCQDMCAIJAKUIAQgFAWkGY2FsbGVyCQDMCAIFBHBvb2wJAMwIAgkApAMBBQRwbXRBCQDMCAIFCXBtdEFzc2V0QQkAzAgCCQCkAwEFBHBtdEIJAMwIAgUJcG10QXNzZXRCCQDMCAIJAKQDAQUEYmFsQQkAzAgCCQCkAwEFBGJhbEIJAMwIAgUHc2hhcmVJZAkAzAgCBQ1ib3Jyb3dBc3NldElkCQDMCAIJAKQDAQUMYm9ycm93QW1vdW50CQDMCAIJAKQDAQABBQNuaWwCASwEDG5ld1JlcXVlc3RJZAoAAUAJAPwHBAUEdGhpcwIQY3JlYXRlTmV3UmVxdWVzdAkAzAgCBQdyZXF1ZXN0BQNuaWwFA25pbAMJAAECBQFAAgNJbnQFAUAJAAIBCQCsAgIJAAMBBQFAAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQDCQAAAgUMbmV3UmVxdWVzdElkBQxuZXdSZXF1ZXN0SWQEBGFyZ3MJAMwIAgkArAICCQCsAgIJAKUIAQgFAWkGY2FsbGVyAgFfCQCkAwEAAQkAzAgCBQdzaGFyZUlkCQDMCAIFDWJvcnJvd0Fzc2V0SWQJAMwIAgUMYm9ycm93QW1vdW50CQDMCAIJAKUIAQUEdGhpcwkAzAgCAhlyZXBsZW5pc2hGcm9tTGFuZFJlYWRPbmx5CQDMCAIJAKQDAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCBQxuZXdSZXF1ZXN0SWQCGENhbid0IGNyZWF0ZSBuZXcgcmVxdWVzdAUDbmlsBANpbnYJAP0HBAkBDmdldExlbmRTcnZBZGRyAAINZmxhc2hQb3NpdGlvbgUEYXJncwUDbmlsAwkAAAIFA2ludgUDaW52AwkAAAIFDWJvcnJvd0Fzc2V0SWQFCXBtdEFzc2V0QQkAlgoECQBkAgUEcG10QQUMYm9ycm93QW1vdW50BQRwbXRCBQhMT0FOX0ZFRQUMYm9ycm93QW1vdW50CQCWCgQFBHBtdEEJAGQCBQRwbXRCBQxib3Jyb3dBbW91bnQFCExPQU5fRkVFBQxib3Jyb3dBbW91bnQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAJYKBAUEcG10QQUEcG10QgULTk9fTE9BTl9GRUUAAAQIcGF5bWVudEEIBQ0kdDAxOTc4NjIxMjk3Al8xBAhwYXltZW50QggFDSR0MDE5Nzg2MjEyOTcCXzIEB2ZlZVR5cGUIBQ0kdDAxOTc4NjIxMjk3Al8zBAxib3Jyb3dBbW91bnQIBQ0kdDAxOTc4NjIxMjk3Al80BA0kdDAyMTMwMDIxNDEyCQEPcmVwbGVuaXNoQnlUeXBlCgUFcFR5cGUFBHBvb2wFC05PX0xPQU5fRkVFBQRwbXRBBQNBSWQFBHBtdEIFA0JJZAUEYmFsQQUEYmFsQgUHc2hhcmVJZAQKdXNlclN0YWtlZAgFDSR0MDIxMzAwMjE0MTICXzEEB2F4bHlGZWUIBQ0kdDAyMTMwMDIxNDEyAl8yBA0kdDAyMTQxNjIxNTQxCQESd2l0aGRyYXdBbW91bnRDYWxjBAUEcG9vbAUKdXNlclN0YWtlZAUMYm9ycm93QW1vdW50BQ1ib3Jyb3dBc3NldElkAwkAAAIFDSR0MDIxNDE2MjE1NDEFDSR0MDIxNDE2MjE1NDEECGFzc2V0SWRCCAUNJHQwMjE0MTYyMTU0MQJfNAQNdG9Vc2VyQW1vdW50QggFDSR0MDIxNDE2MjE1NDECXzMECGFzc2V0SWRBCAUNJHQwMjE0MTYyMTU0MQJfMgQNdG9Vc2VyQW1vdW50QQgFDSR0MDIxNDE2MjE1NDECXzEJAJQKAgUDbmlsCQDMCAIFCnVzZXJTdGFrZWQJAMwIAgUNdG9Vc2VyQW1vdW50QQkAzAgCBQ10b1VzZXJBbW91bnRCBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEZcmVwbGVuaXNoRnJvbUxhbmRSZWFkT25seQEJcmVxdWVzdElkBA0kdDAyMTY2NTIxNzY5CQEMcGFyc2VSZXF1ZXN0AQUJcmVxdWVzdElkBAR1c2VyCAUNJHQwMjE2NjUyMTc2OQJfMQQEcG9vbAgFDSR0MDIxNjY1MjE3NjkCXzIEBHBtdEEIBQ0kdDAyMTY2NTIxNzY5Al8zBANBSWQIBQ0kdDAyMTY2NTIxNzY5Al80BARwbXRCCAUNJHQwMjE2NjUyMTc2OQJfNQQDQklkCAUNJHQwMjE2NjUyMTc2OQJfNgQEYmFsQQgFDSR0MDIxNjY1MjE3NjkCXzcEBGJhbEIIBQ0kdDAyMTY2NTIxNzY5Al84BAdzaGFyZUlkCAUNJHQwMjE2NjUyMTc2OQJfOQQHYndBc3NldAgFDSR0MDIxNjY1MjE3NjkDXzEwBAhid0Ftb3VudAgFDSR0MDIxNjY1MjE3NjkDXzExAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQISV3JvbmcgcGF5bWVudCBzaXplAwMJAQIhPQIJAQxhc3NldElkVG9TdHIBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQFB2J3QXNzZXQGCQECIT0CCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAUIYndBbW91bnQJAAIBAg1Xcm9uZyBwYXltZW50BA0kdDAyMTk1OTIyMDgzAwkAAAIFA0FJZAUHYndBc3NldAkAlAoCCQBkAgUEcG10QQgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQFBHBtdEIJAJQKAgUEcG10QQkAZAIFBHBtdEIICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAdwbXRBbGxBCAUNJHQwMjE5NTkyMjA4MwJfMQQHcG10QWxsQggFDSR0MDIxOTU5MjIwODMCXzIEBXBUeXBlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwkArAICBQVrUG9vbAUEcG9vbAIMVW5rbm93biBwb29sBA0kdDAyMjE2NTIyMjc0CQEPcmVwbGVuaXNoQnlUeXBlCgUFcFR5cGUFBHBvb2wFCExPQU5fRkVFBQRwbXRBBQNBSWQFBHBtdEIFA0JJZAUEYmFsQQUEYmFsQgUHc2hhcmVJZAQKdXNlclN0YWtlZAgFDSR0MDIyMTY1MjIyNzQCXzEEB2F4bHlGZWUIBQ0kdDAyMjE2NTIyMjc0Al8yBQNuaWwBaQEJcmVwbGVuaXNoAwRwb29sCGxldmVyYWdlDWJvcnJvd0Fzc2V0SWQDAwkAZgIAZAUIbGV2ZXJhZ2UGCQBmAgUIbGV2ZXJhZ2UArAIJAAIBAh9MZXZlcmFnZSBjYW4ndCBiZSA8MTAwIGFuZCA+MzAwBAVwVHlwZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgUFa1Bvb2wFBHBvb2wCElBvb2wgaXMgbm90IGluaXRlZAQNJHQwMjI1ODgyMjY3OAkBC2dldFBvb2xEYXRhAgkBB0FkZHJlc3MBCQDZBAEFBHBvb2wFBXBUeXBlBANBSWQIBQ0kdDAyMjU4ODIyNjc4Al8xBANCSWQIBQ0kdDAyMjU4ODIyNjc4Al8yBARiYWxBCAUNJHQwMjI1ODgyMjY3OAJfMwQEYmFsQggFDSR0MDIyNTg4MjI2NzgCXzQEB3NoYXJlSWQIBQ0kdDAyMjU4ODIyNjc4Al81BA0kdDAyMjY4MTIzMzE4AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAgMJAQIhPQIJAQxhc3NldElkVG9TdHIBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQFA0FJZAkAAgECFVdyb25nIHBheW1lbnQgYXNzZXQgQQMJAQIhPQIJAQxhc3NldElkVG9TdHIBCAkAkQMCCAUBaQhwYXltZW50cwABB2Fzc2V0SWQFA0JJZAkAAgECFVdyb25nIHBheW1lbnQgYXNzZXQgQgkAlgoECAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAUDQUlkCAkAkQMCCAUBaQhwYXltZW50cwABBmFtb3VudAUDQklkAwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQMJAAACCQEMYXNzZXRJZFRvU3RyAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQNBSWQJAJYKBAgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQFA0FJZAAABQNCSWQDCQAAAgkBDGFzc2V0SWRUb1N0cgEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUDQklkCQCWCgQAAAUDQUlkCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAUDQklkCQACAQINV3JvbmcgcGF5bWVudAkAAgECHE9uZSBvciB0d28gcGF5bWVudHMgZXhwZWN0ZWQEBHBtdEEIBQ0kdDAyMjY4MTIzMzE4Al8xBAlwbXRBc3NldEEIBQ0kdDAyMjY4MTIzMzE4Al8yBARwbXRCCAUNJHQwMjI2ODEyMzMxOAJfMwQJcG10QXNzZXRCCAUNJHQwMjI2ODEyMzMxOAJfNAQJbmV3UG9zTnVtCQEYZ2V0TmV3VXNlclBvc2l0aW9uTnVtYmVyAgUEcG9vbAkApQgBCAUBaQZjYWxsZXIDCQBmAgUIbGV2ZXJhZ2UAZAQHZFByaWNlQQgKAAFACQD8BwQFD3ByaWNlT3JhY2xlQWRkcgIJZ2V0VFdBUDYwCQDMCAIFCXBtdEFzc2V0QQkAzAgCBwUDbmlsBQNuaWwDCQABAgUBQAIKKEludCwgSW50KQUBQAkAAgEJAKwCAgkAAwEFAUACHyBjb3VsZG4ndCBiZSBjYXN0IHRvIChJbnQsIEludCkCXzEEB2RQcmljZUIICgABQAkA/AcEBQ9wcmljZU9yYWNsZUFkZHICCWdldFRXQVA2MAkAzAgCBQlwbXRBc3NldEIJAMwIAgcFA25pbAUDbmlsAwkAAQIFAUACCihJbnQsIEludCkFAUAJAAIBCQCsAgIJAAMBBQFAAh8gY291bGRuJ3QgYmUgY2FzdCB0byAoSW50LCBJbnQpAl8xBAxwYXlkSW5Eb2xsYXIJAGQCCQBrAwUHZFByaWNlQQUEcG10QQkAbAYACgAACQEQZ2V0QXNzZXREZWNpbWFscwEFCXBtdEFzc2V0QQAAAAAFBERPV04JAGsDBQdkUHJpY2VCBQRwbXRCCQBsBgAKAAAJARBnZXRBc3NldERlY2ltYWxzAQUJcG10QXNzZXRCAAAAAAUERE9XTgQMYm9ycm93QW1vdW50CQBrAwUMcGF5ZEluRG9sbGFyCQBlAgUIbGV2ZXJhZ2UAZABkBAdyZXF1ZXN0CQC5CQIJAMwIAgkApQgBCAUBaQZjYWxsZXIJAMwIAgUEcG9vbAkAzAgCCQCkAwEFBHBtdEEJAMwIAgUJcG10QXNzZXRBCQDMCAIJAKQDAQUEcG10QgkAzAgCBQlwbXRBc3NldEIJAMwIAgkApAMBBQRiYWxBCQDMCAIJAKQDAQUEYmFsQgkAzAgCBQdzaGFyZUlkCQDMCAIFDWJvcnJvd0Fzc2V0SWQJAMwIAgkApAMBBQxib3Jyb3dBbW91bnQFA25pbAIBLAQMbmV3UmVxdWVzdElkCgABQAkA/AcEBQR0aGlzAhBjcmVhdGVOZXdSZXF1ZXN0CQDMCAIFB3JlcXVlc3QFA25pbAUDbmlsAwkAAQIFAUACA0ludAUBQAkAAgEJAKwCAgkAAwEFAUACGCBjb3VsZG4ndCBiZSBjYXN0IHRvIEludAMJAAACBQxuZXdSZXF1ZXN0SWQFDG5ld1JlcXVlc3RJZAQEYXJncwkAzAgCCQCsAgIJAKwCAgkApQgBCAUBaQZjYWxsZXICAV8JAKQDAQUJbmV3UG9zTnVtCQDMCAIFB3NoYXJlSWQJAMwIAgUNYm9ycm93QXNzZXRJZAkAzAgCBQxib3Jyb3dBbW91bnQJAMwIAgkApQgBBQR0aGlzCQDMCAICEXJlcGxlbmlzaEZyb21MYW5kCQDMCAIJAKQDAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCBQxuZXdSZXF1ZXN0SWQCGENhbid0IGNyZWF0ZSBuZXcgcmVxdWVzdAUDbmlsBANpbnYJAP0HBAkBDmdldExlbmRTcnZBZGRyAAINZmxhc2hQb3NpdGlvbgUEYXJncwUDbmlsAwkAAAIFA2ludgUDaW52BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4EDSR0MDI0NjE1MjQ3MjcJAQ9yZXBsZW5pc2hCeVR5cGUKBQVwVHlwZQUEcG9vbAULTk9fTE9BTl9GRUUFBHBtdEEFA0FJZAUEcG10QgUDQklkBQRiYWxBBQRiYWxCBQdzaGFyZUlkBAp1c2VyU3Rha2VkCAUNJHQwMjQ2MTUyNDcyNwJfMQQHYXhseUZlZQgFDSR0MDI0NjE1MjQ3MjcCXzIJARByZXBsZW5pc2hFbnRyaWVzBwUEcG9vbAkApQgBCAUBaQZjYWxsZXIFCnVzZXJTdGFrZWQFB2F4bHlGZWUFCW5ld1Bvc051bQUHc2hhcmVJZAUFcFR5cGUBaQERcmVwbGVuaXNoRnJvbUxhbmQBCXJlcXVlc3RJZAQNJHQwMjQ4ODkyNDk5MwkBDHBhcnNlUmVxdWVzdAEFCXJlcXVlc3RJZAQEdXNlcggFDSR0MDI0ODg5MjQ5OTMCXzEEBHBvb2wIBQ0kdDAyNDg4OTI0OTkzAl8yBARwbXRBCAUNJHQwMjQ4ODkyNDk5MwJfMwQDQUlkCAUNJHQwMjQ4ODkyNDk5MwJfNAQEcG10QggFDSR0MDI0ODg5MjQ5OTMCXzUEA0JJZAgFDSR0MDI0ODg5MjQ5OTMCXzYEBGJhbEEIBQ0kdDAyNDg4OTI0OTkzAl83BARiYWxCCAUNJHQwMjQ4ODkyNDk5MwJfOAQHc2hhcmVJZAgFDSR0MDI0ODg5MjQ5OTMCXzkEB2J3QXNzZXQIBQ0kdDAyNDg4OTI0OTkzA18xMAQIYndBbW91bnQIBQ0kdDAyNDg4OTI0OTkzA18xMQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECEldyb25nIHBheW1lbnQgc2l6ZQMDCQECIT0CCQEMYXNzZXRJZFRvU3RyAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQdid0Fzc2V0BgkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQFCGJ3QW1vdW50CQACAQINV3JvbmcgcGF5bWVudAQNJHQwMjUxODMyNTMwNwMJAAACBQNBSWQFB2J3QXNzZXQJAJQKAgkAZAIFBHBtdEEICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BQRwbXRCCQCUCgIFBHBtdEEJAGQCBQRwbXRCCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQHcG10QWxsQQgFDSR0MDI1MTgzMjUzMDcCXzEEB3BtdEFsbEIIBQ0kdDAyNTE4MzI1MzA3Al8yBAVwVHlwZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgUFa1Bvb2wFBHBvb2wCDFVua25vd24gcG9vbAQNJHQwMjUzODkyNTQ5OAkBD3JlcGxlbmlzaEJ5VHlwZQoFBXBUeXBlBQRwb29sBQhMT0FOX0ZFRQUEcG10QQUDQUlkBQRwbXRCBQNCSWQFBGJhbEEFBGJhbEIFB3NoYXJlSWQECnVzZXJTdGFrZWQIBQ0kdDAyNTM4OTI1NDk4Al8xBAdheGx5RmVlCAUNJHQwMjUzODkyNTQ5OAJfMgQGcG9zTnVtCQEYZ2V0TmV3VXNlclBvc2l0aW9uTnVtYmVyAgUEcG9vbAkApQgBCAUBaQZjYWxsZXIEDWJvcnJvd0VudHJpZXMJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyAgFfCQCkAwEFBnBvc051bQURa1VzZXJCb3Jyb3dBbW91bnQFCGJ3QW1vdW50CQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyAgFfCQCkAwEFBnBvc051bQUSa1VzZXJCb3Jyb3dBc3NldElkBQdid0Fzc2V0BQNuaWwEB2VudHJpZXMJARByZXBsZW5pc2hFbnRyaWVzBwUEcG9vbAUEdXNlcgUKdXNlclN0YWtlZAUHYXhseUZlZQUGcG9zTnVtBQdzaGFyZUlkBQVwVHlwZQkAlAoCCQDNCAIJAM4IAgUHZW50cmllcwUNYm9ycm93RW50cmllcwkBC0RlbGV0ZUVudHJ5AQkArAICBQlyZXF1ZXN0SWQFCmtSZXF1ZXN0SWQFCnVzZXJTdGFrZWQBaQEId2l0aGRyYXcCBHBvb2wFcG9zSWQEBHVzZXIJAKUIAQgFAWkGY2FsbGVyBAdwQW1vdW50CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXICAV8JAKQDAQUFcG9zSWQFDWtVc2VyUG9zaXRpb24CEFVua25vd24gcG9zaXRpb24EDHVzZXJJbnRlcmVzdAkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXICAV8JAKQDAQUFcG9zSWQFFWtVc2VyUG9zaXRpb25JbnRlcmVzdAQLcG9vbEludGVyc3QJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgUEcG9vbAUNa1Bvb2xJbnRlcmVzdAQOcG9vbFRvdGFsU2hhcmUJARFnZXRQb29sVG90YWxTaGFyZQEFBHBvb2wED3VzZXJDYW5XaXRoZHJhdwkAZAIFB3BBbW91bnQJAGsDBQdwQW1vdW50CQBlAgULcG9vbEludGVyc3QFDHVzZXJJbnRlcmVzdAUHU0NBTEUxMAQIdXNlckFkZHIJAQdBZGRyZXNzAQkA2QQBBQR1c2VyBAxib3Jyb3dBbW91bnQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyAgFfCQCkAwEFBXBvc0lkBRFrVXNlckJvcnJvd0Ftb3VudAQLYm9ycm93QXNzZXQJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMJAKwCAgkArAICCQCsAgIJAKwCAgkArAICBQRwb29sAgFfBQR1c2VyAgFfCQCkAwEFBXBvc0lkBRJrVXNlckJvcnJvd0Fzc2V0SWQEBGRlYnQDCQBmAgUMYm9ycm93QW1vdW50AAAKAAFACQD8BwQJAQ5nZXRMZW5kU3J2QWRkcgACDGdldEFzc2V0RGVidAkAzAgCBwkAzAgCCQCsAgIJAKwCAgkArAICCQCsAgIFBHBvb2wCAV8FBHVzZXICAV8JAKQDAQUFcG9zSWQJAMwIAgULYm9ycm93QXNzZXQFA25pbAUDbmlsAwkAAQIFAUACA0ludAUBQAkAAgEJAKwCAgkAAwEFAUACGCBjb3VsZG4ndCBiZSBjYXN0IHRvIEludAAABA0kdDAyNjk0MDI3MDYwCQESd2l0aGRyYXdBbW91bnRDYWxjBAUEcG9vbAUPdXNlckNhbldpdGhkcmF3BQRkZWJ0BQtib3Jyb3dBc3NldAMJAAACBQ0kdDAyNjk0MDI3MDYwBQ0kdDAyNjk0MDI3MDYwBAhhc3NldElkQggFDSR0MDI2OTQwMjcwNjACXzQEDXRvVXNlckFtb3VudEIIBQ0kdDAyNjk0MDI3MDYwAl8zBAhhc3NldElkQQgFDSR0MDI2OTQwMjcwNjACXzIEDXRvVXNlckFtb3VudEEIBQ0kdDAyNjk0MDI3MDYwAl8xBAtjbG9zZURidEludgMJAGYCBQRkZWJ0AAAJAPwHBAkBDmdldExlbmRTcnZBZGRyAAIIcmVwYXlGb3IJAMwIAgkArAICCQCsAgIFBHVzZXICAV8JAKQDAQUFcG9zSWQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkBDmFzc2V0SWRGcm9tU3RyAQULYm9ycm93QXNzZXQFBGRlYnQFA25pbAAAAwkAAAIFC2Nsb3NlRGJ0SW52BQtjbG9zZURidEludgkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgIBXwkApAMBBQVwb3NJZAUNa1VzZXJQb3NpdGlvbgkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgUEcG9vbAIBXwUEdXNlcgIBXwkApAMBBQVwb3NJZAUVa1VzZXJQb3NpdGlvbkludGVyZXN0CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFCmtQb29sVG90YWwJAGUCBQ5wb29sVG90YWxTaGFyZQUPdXNlckNhbldpdGhkcmF3CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCHVzZXJBZGRyBQ10b1VzZXJBbW91bnRBCQEOYXNzZXRJZEZyb21TdHIBBQhhc3NldElkQQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQh1c2VyQWRkcgUNdG9Vc2VyQW1vdW50QgkBDmFzc2V0SWRGcm9tU3RyAQUIYXNzZXRJZEIFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARBjcmVhdGVOZXdSZXF1ZXN0AQZwYXJhbXMJAQt2YWx1ZU9yRWxzZQIJAQppc1NlbGZDYWxsAQUBaQQMbmV3UmVxdWVzdElkCQBkAgkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQxrUmVxdWVzdEl0ZXIAAAABCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCkAwEFDG5ld1JlcXVlc3RJZAUKa1JlcXVlc3RJZAUGcGFyYW1zCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQxrUmVxdWVzdEl0ZXIFDG5ld1JlcXVlc3RJZAUDbmlsBQxuZXdSZXF1ZXN0SWQBaQESY2FwaXRhbGl6ZUV4S2VlcGVyDARwb29sBHR5cGUJdG9rZW5Ub0lkEGFtb3VudFRvRXhjaGFuZ2UFY2xhaW0JYW1vdW50c0luCWFkZHJlc3Nlcw9hc3NldHNUb1JlY2VpdmULZXN0UmVjZWl2ZWQRc2xpcHBhZ2VUb2xlcmFuY2ULbWluUmVjZWl2ZWQHb3B0aW9ucwQNJHQwMjgzNTcyODU1MQMFBWNsYWltCQELY2xhaW1GYXJtZWQCBQR0eXBlBQRwb29sBAxjbGFpbWVkQXNzZXQDCQAAAgUEdHlwZQUHU0ZfUE9PTAUGU1dPUElEBQRXWElECQCUCgIFEGFtb3VudFRvRXhjaGFuZ2UFDGNsYWltZWRBc3NldAQNY2xhaW1lZEFtb3VudAgFDSR0MDI4MzU3Mjg1NTECXzEEDGNsYWltZWRBc3NldAgFDSR0MDI4MzU3Mjg1NTECXzIED2V4Y2hhbmdlZEFtb3VudAkBDmV4Y2hhbmdlS2VlcGVyCgUJdG9rZW5Ub0lkBRBhbW91bnRUb0V4Y2hhbmdlBQxjbGFpbWVkQXNzZXQFCWFtb3VudHNJbgUJYWRkcmVzc2VzBQ9hc3NldHNUb1JlY2VpdmUFC2VzdFJlY2VpdmVkBRFzbGlwcGFnZVRvbGVyYW5jZQULbWluUmVjZWl2ZWQFB29wdGlvbnMEBmNoYW5nZQkAZQIFDWNsYWltZWRBbW91bnQFEGFtb3VudFRvRXhjaGFuZ2UEC2NoYW5nZUVudHJ5AwkAZgIFBmNoYW5nZQAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFDmtQb29sQ2FwQ2hhbmdlCQBkAgUGY2hhbmdlCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUOa1Bvb2xDYXBDaGFuZ2UAAAUDbmlsBQNuaWwJAM4IAgkBCmNhcGl0YWxpemUEBQRwb29sBQR0eXBlBQl0b2tlblRvSWQFD2V4Y2hhbmdlZEFtb3VudAULY2hhbmdlRW50cnkBaQESY2FwaXRhbGl6ZUV4UGF6emxlCARwb29sBHR5cGUJdG9rZW5Ub0lkEGFtb3VudFRvRXhjaGFuZ2UFY2xhaW0Jcm91dGVzU3RyDG1pblRvUmVjZWl2ZQdvcHRpb25zBA0kdDAyOTIwNzI5NDAxAwUFY2xhaW0JAQtjbGFpbUZhcm1lZAIFBHR5cGUFBHBvb2wEDGNsYWltZWRBc3NldAMJAAACBQR0eXBlBQdTRl9QT09MBQZTV09QSUQFBFdYSUQJAJQKAgUQYW1vdW50VG9FeGNoYW5nZQUMY2xhaW1lZEFzc2V0BA1jbGFpbWVkQW1vdW50CAUNJHQwMjkyMDcyOTQwMQJfMQQMY2xhaW1lZEFzc2V0CAUNJHQwMjkyMDcyOTQwMQJfMgQPZXhjaGFuZ2VkQW1vdW50CQEOZXhjaGFuZ2VQYXp6bGUGBQl0b2tlblRvSWQFEGFtb3VudFRvRXhjaGFuZ2UFDGNsYWltZWRBc3NldAUJcm91dGVzU3RyBQxtaW5Ub1JlY2VpdmUFB29wdGlvbnMEBmNoYW5nZQkAZQIFDWNsYWltZWRBbW91bnQFEGFtb3VudFRvRXhjaGFuZ2UEC2NoYW5nZUVudHJ5AwkAZgIFBmNoYW5nZQAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFDmtQb29sQ2FwQ2hhbmdlCQBkAgUGY2hhbmdlCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUOa1Bvb2xDYXBDaGFuZ2UAAAUDbmlsBQNuaWwJAM4IAgkBCmNhcGl0YWxpemUEBQRwb29sBQR0eXBlBQl0b2tlblRvSWQFD2V4Y2hhbmdlZEFtb3VudAULY2hhbmdlRW50cnkBaQESY2FwaXRhbGl6ZUV4U3dvcEZpDARwb29sBHR5cGUJdG9rZW5Ub0lkEGFtb3VudFRvRXhjaGFuZ2UFY2xhaW0KZXhjaGFuZ2Vycw5leGNoYW5nZXJzVHlwZQVhcmdzMQVhcmdzMhFyb3V0aW5nQXNzZXRzS2V5cxJtaW5BbW91bnRUb1JlY2VpdmUHb3B0aW9ucwQNJHQwMzAxMjQzMDMxOAMFBWNsYWltCQELY2xhaW1GYXJtZWQCBQR0eXBlBQRwb29sBAxjbGFpbWVkQXNzZXQDCQAAAgUEdHlwZQUHU0ZfUE9PTAUGU1dPUElEBQRXWElECQCUCgIFEGFtb3VudFRvRXhjaGFuZ2UFDGNsYWltZWRBc3NldAQNY2xhaW1lZEFtb3VudAgFDSR0MDMwMTI0MzAzMTgCXzEEDGNsYWltZWRBc3NldAgFDSR0MDMwMTI0MzAzMTgCXzIED2V4Y2hhbmdlZEFtb3VudAkBDmV4Y2hhbmdlU3dvcEZpCgUJdG9rZW5Ub0lkBRBhbW91bnRUb0V4Y2hhbmdlBQxjbGFpbWVkQXNzZXQFCmV4Y2hhbmdlcnMFDmV4Y2hhbmdlcnNUeXBlBQVhcmdzMQUFYXJnczIFEXJvdXRpbmdBc3NldHNLZXlzBRJtaW5BbW91bnRUb1JlY2VpdmUFB29wdGlvbnMEBmNoYW5nZQkAZQIFDWNsYWltZWRBbW91bnQFEGFtb3VudFRvRXhjaGFuZ2UEC2NoYW5nZUVudHJ5AwkAZgIFBmNoYW5nZQAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFBHBvb2wFDmtQb29sQ2FwQ2hhbmdlCQBkAgUGY2hhbmdlCQELdmFsdWVPckVsc2UCCQCaCAIFBHRoaXMJAKwCAgUEcG9vbAUOa1Bvb2xDYXBDaGFuZ2UAAAUDbmlsBQNuaWwJAM4IAgkBCmNhcGl0YWxpemUEBQRwb29sBQR0eXBlBQl0b2tlblRvSWQFD2V4Y2hhbmdlZEFtb3VudAULY2hhbmdlRW50cnkBaQELaW5pdE5ld1Bvb2wFBHR5cGUIcG9vbEFkZHILaW5GZWVOb0xvYW4JaW5GZWVMb2FuBmNhcEZlZQMDCQECIT0CBQR0eXBlBQdTRl9QT09MCQECIT0CBQR0eXBlBQdXWF9QT09MBwkAAgECCldyb25nIHR5cGUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUIcG9vbEFkZHIFFWtBeGx5SW5GZWVXaXRob3V0TG9hbgULaW5GZWVOb0xvYW4JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgUIcG9vbEFkZHIFEmtBeGx5SW5GZWVXaXRoTG9hbgUJaW5GZWVMb2FuCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCHBvb2xBZGRyBQtrQXhseUNhcEZlZQUGY2FwRmVlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIFCHBvb2xBZGRyBQ1rUG9vbEludGVyZXN0AAAJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQVrUG9vbAUIcG9vbEFkZHIFBHR5cGUFA25pbAECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXmkTWIo",
    "height": 2541735,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4xywBKP5PNVxYfCzvzWiAYkzdUtQmzuKRVtWZoWcHg3V
Next: AzvBKi1Rn5LX2nwRd14t6BCsXiXzBeT5W435XQM3bkaV

Diff: 
Old New Differences
336 336      }
337 337  
338 338  
339 + func replenishByType (type,pool,feeType,pmtA,AId,pmtB,BId,balA,balB,shareId) = if ((type == SF_POOL))
340 +     then replenishSwopFi(pool, LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
341 +     else if ((type == WX_POOL))
342 +         then replenishWX(pool, LOAN_FEE, pmtA, AId, pmtB, BId, shareId)
343 +         else throw("Wrong pool type")
344 + 
345 + 
339 346  func replenishEntries (pool,user,stakedAmount,axlyFeeAmount,posNum,shareId,type) = {
340 347      let totalAmount = getPoolTotalShare(pool)
341 348      let curPoolInterest = getIntegerValue(this, (pool + kPoolInterest))
415 422      }
416 423  
417 424  
418 - func capitalize (pool,type,tokenId,tokenAmount) = {
425 + func capitalize (pool,pType,tokenId,tokenAmount) = {
419 426      let poolAddr = Address(fromBase58String(pool))
420 -     let $t01319013268 = getPoolData(poolAddr, type)
421 -     let AId = $t01319013268._1
422 -     let BId = $t01319013268._2
423 -     let balA = $t01319013268._3
424 -     let balB = $t01319013268._4
425 -     let shareId = $t01319013268._5
426 -     let $t01327113351 = if ((tokenId == AId))
427 +     let $t01382413903 = getPoolData(poolAddr, pType)
428 +     let AId = $t01382413903._1
429 +     let BId = $t01382413903._2
430 +     let balA = $t01382413903._3
431 +     let balB = $t01382413903._4
432 +     let shareId = $t01382413903._5
433 +     let $t01390613986 = if ((tokenId == AId))
427 434          then $Tuple2(tokenAmount, 0)
428 435          else $Tuple2(0, tokenAmount)
429 -     let pmtA = $t01327113351._1
430 -     let pmtB = $t01327113351._2
431 -     let $t01335413715 = if ((type == SF_POOL))
432 -         then replenishSwopFi(pool, CAP_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
433 -         else replenishWX(pool, CAP_FEE, pmtA, AId, pmtB, BId, shareId)
434 -     let stakedAmount = $t01335413715._1
435 -     let axlyFee = $t01335413715._2
436 +     let pmtA = $t01390613986._1
437 +     let pmtB = $t01390613986._2
438 +     let $t01398914099 = replenishByType(pType, pool, CAP_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
439 +     let stakedAmount = $t01398914099._1
440 +     let axlyFee = $t01398914099._2
436 441      let curPoolInterest = valueOrElse(getInteger(this, (pool + kPoolInterest)), 0)
437 442      let totalShareAmount = getPoolTotalShare(pool)
438 443      let newInterest = (curPoolInterest + fraction(stakedAmount, SCALE10, totalShareAmount))
445 450      let feeScale6 = 1000000
446 451      let fee = getIntegerValue(poolAddr, kSFPoolFee)
447 452      let amntGetNoFee = fraction(amountTokenToGet, feeScale6, (feeScale6 - fee))
448 -     let $t01440814696 = if ((assetTokenToGet == assetIdA))
453 +     let $t01479215080 = if ((assetTokenToGet == assetIdA))
449 454          then {
450 455              let amountToPay = fraction(balA, amntGetNoFee, (balB - amntGetNoFee))
451 456              $Tuple2(amountToPay, assetIdB)
454 459              let amountToPay = fraction(balB, amntGetNoFee, (balA - amntGetNoFee))
455 460              $Tuple2(amountToPay, assetIdA)
456 461              }
457 -     let amountToPay = $t01440814696._1
458 -     let assetToPay = $t01440814696._2
462 +     let amountToPay = $t01479215080._1
463 +     let assetToPay = $t01479215080._2
459 464      invoke(poolAddr, "callFunction", ["exchange", ["1"]], [AttachedPayment(assetIdFromStr(assetToPay), amountToPay)])
460 465      }
461 466  
465 470      let prFee = getIntegerValue(wxSwapContract, "%s__protocolFee")
466 471      let pFee = getIntegerValue(wxSwapContract, "%s__poolFee")
467 472      let feeScale = toBigInt(100000000)
468 -     let $t01517515483 = if ((assetTokenToGet == assetIdA))
473 +     let $t01555915867 = if ((assetTokenToGet == assetIdA))
469 474          then {
470 475              let amountToPay = fraction(balA, amountTokenToGet, (balB - amountTokenToGet))
471 476              $Tuple2(amountToPay, assetIdB)
474 479              let amountToPay = fraction(balB, amountTokenToGet, (balA - amountTokenToGet))
475 480              $Tuple2(amountToPay, assetIdA)
476 481              }
477 -     let amountToPay = $t01517515483._1
478 -     let assetToPay = $t01517515483._2
482 +     let amountToPay = $t01555915867._1
483 +     let assetToPay = $t01555915867._2
479 484      let amountToPayWithFee = toInt(fraction(toBigInt(amountToPay), feeScale, (feeScale - toBigInt((prFee + pFee)))))
480 485      invoke(wxSwapContract, "swap", [1, assetTokenToGet, toString(this)], [AttachedPayment(assetIdFromStr(assetToPay), amountToPayWithFee)])
481 486      }
489 494  func withdrawAmountCalc (pool,userCanWithdraw,debt,borrowAsset) = {
490 495      let poolAddr = Address(fromBase58String(pool))
491 496      let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Unknown pool")
492 -     let $t01634816415 = getPoolData(poolAddr, pType)
493 -     let assetIdA = $t01634816415._1
494 -     let assetIdB = $t01634816415._2
495 -     let balA = $t01634816415._3
496 -     let balB = $t01634816415._4
497 +     let $t01673216799 = getPoolData(poolAddr, pType)
498 +     let assetIdA = $t01673216799._1
499 +     let assetIdB = $t01673216799._2
500 +     let balA = $t01673216799._3
501 +     let balB = $t01673216799._4
497 502      let cBalABefore = accountBalance(assetIdFromStr(assetIdA))
498 503      if ((cBalABefore == cBalABefore))
499 504          then {
509 514                          then {
510 515                              let cBalAAfter = accountBalance(assetIdFromStr(assetIdA))
511 516                              let cBalBAfter = accountBalance(assetIdFromStr(assetIdB))
512 -                             let $t01692717016 = $Tuple2((cBalAAfter - cBalABefore), (cBalBAfter - cBalBBefore))
513 -                             let tokensAmountA = $t01692717016._1
514 -                             let tokensAmountB = $t01692717016._2
515 -                             let $t01701917715 = if ((debt > 0))
517 +                             let $t01731117400 = $Tuple2((cBalAAfter - cBalABefore), (cBalBAfter - cBalBBefore))
518 +                             let tokensAmountA = $t01731117400._1
519 +                             let tokensAmountB = $t01731117400._2
520 +                             let $t01740318099 = if ((debt > 0))
516 521                                  then {
517 522                                      let amountToGetEx = if (if ((borrowAsset == assetIdA))
518 523                                          then (debt > tokensAmountA)
535 540                                          else throw("Strict value is not equal to itself.")
536 541                                      }
537 542                                  else $Tuple2(tokensAmountA, tokensAmountB)
538 -                             let toUserAmountA = $t01701917715._1
539 -                             let toUserAmountB = $t01701917715._2
543 +                             let toUserAmountA = $t01740318099._1
544 +                             let toUserAmountB = $t01740318099._2
540 545                              $Tuple4(toUserAmountA, assetIdA, toUserAmountB, assetIdB)
541 546                              }
542 547                          else throw("Strict value is not equal to itself.")
547 552      }
548 553  
549 554  
555 + func parseRequest (requestId) = {
556 +     let request = split(valueOrErrorMessage(getString(this, (requestId + kRequestId)), ("No request with id " + requestId)), ",")
557 +     let user = request[0]
558 +     let pool = request[1]
559 +     let pmtA = parseIntValue(request[2])
560 +     let AId = request[3]
561 +     let pmtB = parseIntValue(request[4])
562 +     let BId = request[5]
563 +     let balA = parseIntValue(request[6])
564 +     let balB = parseIntValue(request[7])
565 +     let shareId = request[8]
566 +     let bwAsset = request[9]
567 +     let bwAmount = parseIntValue(request[10])
568 +     $Tuple11(user, pool, pmtA, AId, pmtB, BId, balA, balB, shareId, bwAsset, bwAmount)
569 +     }
570 + 
571 + 
550 572  @Callable(i)
551 573  func replenishREADONLY (pool,leverage,borrowAssetId) = if (if ((100 > leverage))
552 574      then true
553 575      else (leverage > 300))
554 576      then throw("Leverage can't be <100 and >300")
555 577      else {
556 -         let type = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
557 -         let $t01807818167 = getPoolData(Address(fromBase58String(pool)), type)
558 -         let AId = $t01807818167._1
559 -         let BId = $t01807818167._2
560 -         let balA = $t01807818167._3
561 -         let balB = $t01807818167._4
562 -         let shareId = $t01807818167._5
563 -         let $t01817018807 = if ((size(i.payments) == 2))
578 +         let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
579 +         let $t01905319143 = getPoolData(Address(fromBase58String(pool)), pType)
580 +         let AId = $t01905319143._1
581 +         let BId = $t01905319143._2
582 +         let balA = $t01905319143._3
583 +         let balB = $t01905319143._4
584 +         let shareId = $t01905319143._5
585 +         let $t01914619783 = if ((size(i.payments) == 2))
564 586              then if ((assetIdToStr(i.payments[0].assetId) != AId))
565 587                  then throw("Wrong payment asset A")
566 588                  else if ((assetIdToStr(i.payments[1].assetId) != BId))
573 595                          then $Tuple4(0, AId, i.payments[0].amount, BId)
574 596                          else throw("Wrong payment")
575 597                  else throw("One or two payments expected")
576 -         let pmtA = $t01817018807._1
577 -         let pmtAssetA = $t01817018807._2
578 -         let pmtB = $t01817018807._3
579 -         let pmtAssetB = $t01817018807._4
580 -         let $t01881020335 = if ((leverage > 100))
598 +         let pmtA = $t01914619783._1
599 +         let pmtAssetA = $t01914619783._2
600 +         let pmtB = $t01914619783._3
601 +         let pmtAssetB = $t01914619783._4
602 +         let $t01978621297 = if ((leverage > 100))
581 603              then {
582 604                  let dPriceA = (                let @ = invoke(priceOracleAddr, "getTWAP60", [pmtAssetA, false], nil)
583 605                  if ($isInstanceOf(@, "(Int, Int)"))
589 611                      else throw(($getType(@) + " couldn't be cast to (Int, Int)")))._1
590 612                  let paydInDollar = (fraction(dPriceA, pmtA, pow(10, 0, getAssetDecimals(pmtAssetA), 0, 0, DOWN)) + fraction(dPriceB, pmtB, pow(10, 0, getAssetDecimals(pmtAssetB), 0, 0, DOWN)))
591 613                  let borrowAmount = fraction(paydInDollar, (leverage - 100), 100)
592 -                 let request = makeString([type, toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, borrowAssetId, toString(borrowAmount), toString(1)], ",")
614 +                 let request = makeString([toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, borrowAssetId, toString(borrowAmount), toString(1)], ",")
593 615                  let newRequestId = {
594 616                      let @ = invoke(this, "createNewRequest", [request], nil)
595 617                      if ($isInstanceOf(@, "Int"))
609 631                      else throw("Strict value is not equal to itself.")
610 632                  }
611 633              else $Tuple4(pmtA, pmtB, NO_LOAN_FEE, 0)
612 -         let paymentA = $t01881020335._1
613 -         let paymentB = $t01881020335._2
614 -         let feeType = $t01881020335._3
615 -         let borrowAmount = $t01881020335._4
616 -         let $t02033820732 = if ((type == SF_POOL))
617 -             then replenishSwopFi(pool, feeType, paymentA, pmtAssetA, paymentB, pmtAssetB, balA, balB, shareId)
618 -             else replenishWX(pool, feeType, pmtA, pmtAssetA, pmtB, pmtAssetB, shareId)
619 -         let userStaked = $t02033820732._1
620 -         let axlyFee = $t02033820732._2
621 -         let $t02073520860 = withdrawAmountCalc(pool, userStaked, borrowAmount, borrowAssetId)
622 -         if (($t02073520860 == $t02073520860))
634 +         let paymentA = $t01978621297._1
635 +         let paymentB = $t01978621297._2
636 +         let feeType = $t01978621297._3
637 +         let borrowAmount = $t01978621297._4
638 +         let $t02130021412 = replenishByType(pType, pool, NO_LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
639 +         let userStaked = $t02130021412._1
640 +         let axlyFee = $t02130021412._2
641 +         let $t02141621541 = withdrawAmountCalc(pool, userStaked, borrowAmount, borrowAssetId)
642 +         if (($t02141621541 == $t02141621541))
623 643              then {
624 -                 let assetIdB = $t02073520860._4
625 -                 let toUserAmountB = $t02073520860._3
626 -                 let assetIdA = $t02073520860._2
627 -                 let toUserAmountA = $t02073520860._1
644 +                 let assetIdB = $t02141621541._4
645 +                 let toUserAmountB = $t02141621541._3
646 +                 let assetIdA = $t02141621541._2
647 +                 let toUserAmountA = $t02141621541._1
628 648                  $Tuple2(nil, [userStaked, toUserAmountA, toUserAmountB])
629 649                  }
630 650              else throw("Strict value is not equal to itself.")
633 653  
634 654  
635 655  @Callable(i)
636 - func replenishFromLandReadOnly (requestId) = $Tuple2(nil, 11111)
656 + func replenishFromLandReadOnly (requestId) = {
657 +     let $t02166521769 = parseRequest(requestId)
658 +     let user = $t02166521769._1
659 +     let pool = $t02166521769._2
660 +     let pmtA = $t02166521769._3
661 +     let AId = $t02166521769._4
662 +     let pmtB = $t02166521769._5
663 +     let BId = $t02166521769._6
664 +     let balA = $t02166521769._7
665 +     let balB = $t02166521769._8
666 +     let shareId = $t02166521769._9
667 +     let bwAsset = $t02166521769._10
668 +     let bwAmount = $t02166521769._11
669 +     if ((size(i.payments) != 1))
670 +         then throw("Wrong payment size")
671 +         else if (if ((assetIdToStr(i.payments[0].assetId) != bwAsset))
672 +             then true
673 +             else (i.payments[0].amount != bwAmount))
674 +             then throw("Wrong payment")
675 +             else {
676 +                 let $t02195922083 = if ((AId == bwAsset))
677 +                     then $Tuple2((pmtA + i.payments[0].amount), pmtB)
678 +                     else $Tuple2(pmtA, (pmtB + i.payments[0].amount))
679 +                 let pmtAllA = $t02195922083._1
680 +                 let pmtAllB = $t02195922083._2
681 +                 let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Unknown pool")
682 +                 let $t02216522274 = replenishByType(pType, pool, LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
683 +                 let userStaked = $t02216522274._1
684 +                 let axlyFee = $t02216522274._2
685 +                 nil
686 +                 }
687 +     }
637 688  
638 689  
639 690  
643 694      else (leverage > 300))
644 695      then throw("Leverage can't be <100 and >300")
645 696      else {
646 -         let type = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
647 -         let $t02130221391 = getPoolData(Address(fromBase58String(pool)), type)
648 -         let AId = $t02130221391._1
649 -         let BId = $t02130221391._2
650 -         let balA = $t02130221391._3
651 -         let balB = $t02130221391._4
652 -         let shareId = $t02130221391._5
653 -         let $t02139422031 = if ((size(i.payments) == 2))
697 +         let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
698 +         let $t02258822678 = getPoolData(Address(fromBase58String(pool)), pType)
699 +         let AId = $t02258822678._1
700 +         let BId = $t02258822678._2
701 +         let balA = $t02258822678._3
702 +         let balB = $t02258822678._4
703 +         let shareId = $t02258822678._5
704 +         let $t02268123318 = if ((size(i.payments) == 2))
654 705              then if ((assetIdToStr(i.payments[0].assetId) != AId))
655 706                  then throw("Wrong payment asset A")
656 707                  else if ((assetIdToStr(i.payments[1].assetId) != BId))
663 714                          then $Tuple4(0, AId, i.payments[0].amount, BId)
664 715                          else throw("Wrong payment")
665 716                  else throw("One or two payments expected")
666 -         let pmtA = $t02139422031._1
667 -         let pmtAssetA = $t02139422031._2
668 -         let pmtB = $t02139422031._3
669 -         let pmtAssetB = $t02139422031._4
717 +         let pmtA = $t02268123318._1
718 +         let pmtAssetA = $t02268123318._2
719 +         let pmtB = $t02268123318._3
720 +         let pmtAssetB = $t02268123318._4
670 721          let newPosNum = getNewUserPositionNumber(pool, toString(i.caller))
671 722          if ((leverage > 100))
672 723              then {
680 731                      else throw(($getType(@) + " couldn't be cast to (Int, Int)")))._1
681 732                  let paydInDollar = (fraction(dPriceA, pmtA, pow(10, 0, getAssetDecimals(pmtAssetA), 0, 0, DOWN)) + fraction(dPriceB, pmtB, pow(10, 0, getAssetDecimals(pmtAssetB), 0, 0, DOWN)))
682 733                  let borrowAmount = fraction(paydInDollar, (leverage - 100), 100)
683 -                 let request = makeString([type, toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, borrowAssetId, toString(borrowAmount), toString(newPosNum)], ",")
734 +                 let request = makeString([toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, borrowAssetId, toString(borrowAmount)], ",")
684 735                  let newRequestId = {
685 736                      let @ = invoke(this, "createNewRequest", [request], nil)
686 737                      if ($isInstanceOf(@, "Int"))
698 749                      else throw("Strict value is not equal to itself.")
699 750                  }
700 751              else {
701 -                 let $t02337223763 = if ((type == SF_POOL))
702 -                     then replenishSwopFi(pool, NO_LOAN_FEE, pmtA, pmtAssetA, pmtB, pmtAssetB, balA, balB, shareId)
703 -                     else replenishWX(pool, NO_LOAN_FEE, pmtA, pmtAssetA, pmtB, pmtAssetB, shareId)
704 -                 let userStaked = $t02337223763._1
705 -                 let axlyFee = $t02337223763._2
706 -                 replenishEntries(pool, toString(i.caller), userStaked, axlyFee, newPosNum, shareId, type)
752 +                 let $t02461524727 = replenishByType(pType, pool, NO_LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
753 +                 let userStaked = $t02461524727._1
754 +                 let axlyFee = $t02461524727._2
755 +                 replenishEntries(pool, toString(i.caller), userStaked, axlyFee, newPosNum, shareId, pType)
707 756                  }
708 757          }
709 758  
711 760  
712 761  @Callable(i)
713 762  func replenishFromLand (requestId) = {
714 -     let request = split(valueOrErrorMessage(getString(this, (requestId + kRequestId)), ("No request with id " + requestId)), ",")
763 +     let $t02488924993 = parseRequest(requestId)
764 +     let user = $t02488924993._1
765 +     let pool = $t02488924993._2
766 +     let pmtA = $t02488924993._3
767 +     let AId = $t02488924993._4
768 +     let pmtB = $t02488924993._5
769 +     let BId = $t02488924993._6
770 +     let balA = $t02488924993._7
771 +     let balB = $t02488924993._8
772 +     let shareId = $t02488924993._9
773 +     let bwAsset = $t02488924993._10
774 +     let bwAmount = $t02488924993._11
715 775      if ((size(i.payments) != 1))
716 776          then throw("Wrong payment size")
717 -         else if (if ((assetIdToStr(i.payments[0].assetId) != request[10]))
777 +         else if (if ((assetIdToStr(i.payments[0].assetId) != bwAsset))
718 778              then true
719 -             else (i.payments[0].amount != parseIntValue(request[11])))
779 +             else (i.payments[0].amount != bwAmount))
720 780              then throw("Wrong payment")
721 781              else {
722 -                 let pmtA = if ((request[4] == assetIdToStr(i.payments[0].assetId)))
723 -                     then (parseIntValue(request[3]) + i.payments[0].amount)
724 -                     else parseIntValue(request[3])
725 -                 let pmtB = if ((request[6] == assetIdToStr(i.payments[0].assetId)))
726 -                     then (parseIntValue(request[5]) + i.payments[0].amount)
727 -                     else parseIntValue(request[3])
728 -                 let pool = request[2]
729 -                 let user = request[1]
730 -                 let shareId = request[9]
731 -                 let posNum = parseIntValue(request[12])
732 -                 let $t02472125236 = if ((request[0] == SF_POOL))
733 -                     then replenishSwopFi(pool, LOAN_FEE, pmtA, request[4], pmtB, request[6], parseIntValue(request[7]), parseIntValue(request[8]), shareId)
734 -                     else if ((request[0] == WX_POOL))
735 -                         then replenishWX(pool, LOAN_FEE, pmtA, request[4], pmtB, request[6], shareId)
736 -                         else throw("Wrong request type")
737 -                 let userStaked = $t02472125236._1
738 -                 let axlyFee = $t02472125236._2
739 -                 let borrowEntries = [IntegerEntry((((((request[2] + "_") + request[1]) + "_") + request[12]) + kUserBorrowAmount), i.payments[0].amount), StringEntry((((((request[2] + "_") + request[1]) + "_") + request[12]) + kUserBorrowAssetId), request[10])]
740 -                 let entries = replenishEntries(pool, user, userStaked, axlyFee, posNum, shareId, request[0])
782 +                 let $t02518325307 = if ((AId == bwAsset))
783 +                     then $Tuple2((pmtA + i.payments[0].amount), pmtB)
784 +                     else $Tuple2(pmtA, (pmtB + i.payments[0].amount))
785 +                 let pmtAllA = $t02518325307._1
786 +                 let pmtAllB = $t02518325307._2
787 +                 let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Unknown pool")
788 +                 let $t02538925498 = replenishByType(pType, pool, LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
789 +                 let userStaked = $t02538925498._1
790 +                 let axlyFee = $t02538925498._2
791 +                 let posNum = getNewUserPositionNumber(pool, toString(i.caller))
792 +                 let borrowEntries = [IntegerEntry((((((pool + "_") + user) + "_") + toString(posNum)) + kUserBorrowAmount), bwAmount), StringEntry((((((pool + "_") + user) + "_") + toString(posNum)) + kUserBorrowAssetId), bwAsset)]
793 +                 let entries = replenishEntries(pool, user, userStaked, axlyFee, posNum, shareId, pType)
741 794                  $Tuple2(((entries ++ borrowEntries) :+ DeleteEntry((requestId + kRequestId))), userStaked)
742 795                  }
743 796      }
763 816                  else throw(($getType(@) + " couldn't be cast to Int"))
764 817              }
765 818          else 0
766 -     let $t02664326763 = withdrawAmountCalc(pool, userCanWithdraw, debt, borrowAsset)
767 -     if (($t02664326763 == $t02664326763))
819 +     let $t02694027060 = withdrawAmountCalc(pool, userCanWithdraw, debt, borrowAsset)
820 +     if (($t02694027060 == $t02694027060))
768 821          then {
769 -             let assetIdB = $t02664326763._4
770 -             let toUserAmountB = $t02664326763._3
771 -             let assetIdA = $t02664326763._2
772 -             let toUserAmountA = $t02664326763._1
822 +             let assetIdB = $t02694027060._4
823 +             let toUserAmountB = $t02694027060._3
824 +             let assetIdA = $t02694027060._2
825 +             let toUserAmountA = $t02694027060._1
773 826              let closeDbtInv = if ((debt > 0))
774 827                  then invoke(getLendSrvAddr(), "repayFor", [((user + "_") + toString(posId))], [AttachedPayment(assetIdFromStr(borrowAsset), debt)])
775 828                  else 0
792 845  
793 846  @Callable(i)
794 847  func capitalizeExKeeper (pool,type,tokenToId,amountToExchange,claim,amountsIn,addresses,assetsToReceive,estReceived,slippageTolerance,minReceived,options) = {
795 -     let $t02806028254 = if (claim)
848 +     let $t02835728551 = if (claim)
796 849          then claimFarmed(type, pool)
797 850          else {
798 851              let claimedAsset = if ((type == SF_POOL))
800 853                  else WXID
801 854              $Tuple2(amountToExchange, claimedAsset)
802 855              }
803 -     let claimedAmount = $t02806028254._1
804 -     let claimedAsset = $t02806028254._2
856 +     let claimedAmount = $t02835728551._1
857 +     let claimedAsset = $t02835728551._2
805 858      let exchangedAmount = exchangeKeeper(tokenToId, amountToExchange, claimedAsset, amountsIn, addresses, assetsToReceive, estReceived, slippageTolerance, minReceived, options)
806 859      let change = (claimedAmount - amountToExchange)
807 860      let changeEntry = if ((change > 0))
814 867  
815 868  @Callable(i)
816 869  func capitalizeExPazzle (pool,type,tokenToId,amountToExchange,claim,routesStr,minToReceive,options) = {
817 -     let $t02891029104 = if (claim)
870 +     let $t02920729401 = if (claim)
818 871          then claimFarmed(type, pool)
819 872          else {
820 873              let claimedAsset = if ((type == SF_POOL))
822 875                  else WXID
823 876              $Tuple2(amountToExchange, claimedAsset)
824 877              }
825 -     let claimedAmount = $t02891029104._1
826 -     let claimedAsset = $t02891029104._2
878 +     let claimedAmount = $t02920729401._1
879 +     let claimedAsset = $t02920729401._2
827 880      let exchangedAmount = exchangePazzle(tokenToId, amountToExchange, claimedAsset, routesStr, minToReceive, options)
828 881      let change = (claimedAmount - amountToExchange)
829 882      let changeEntry = if ((change > 0))
836 889  
837 890  @Callable(i)
838 891  func capitalizeExSwopFi (pool,type,tokenToId,amountToExchange,claim,exchangers,exchangersType,args1,args2,routingAssetsKeys,minAmountToReceive,options) = {
839 -     let $t02982730021 = if (claim)
892 +     let $t03012430318 = if (claim)
840 893          then claimFarmed(type, pool)
841 894          else {
842 895              let claimedAsset = if ((type == SF_POOL))
844 897                  else WXID
845 898              $Tuple2(amountToExchange, claimedAsset)
846 899              }
847 -     let claimedAmount = $t02982730021._1
848 -     let claimedAsset = $t02982730021._2
900 +     let claimedAmount = $t03012430318._1
901 +     let claimedAsset = $t03012430318._2
849 902      let exchangedAmount = exchangeSwopFi(tokenToId, amountToExchange, claimedAsset, exchangers, exchangersType, args1, args2, routingAssetsKeys, minAmountToReceive, options)
850 903      let change = (claimedAmount - amountToExchange)
851 904      let changeEntry = if ((change > 0))
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let SF_POOL = "SF"
5 5  
6 6  let WX_POOL = "WX"
7 7  
8 8  let CAP_FEE = "cap"
9 9  
10 10  let LOAN_FEE = "loan"
11 11  
12 12  let NO_LOAN_FEE = "noLoan"
13 13  
14 14  let SCALE8 = 100000000
15 15  
16 16  let SCALE10 = 10000000000
17 17  
18 18  let FEE_SCALE6 = 1000000
19 19  
20 20  let kSFPoolAAssetBalance = "A_asset_balance"
21 21  
22 22  let kSFPoolBAssetBalance = "B_asset_balance"
23 23  
24 24  let kSFPoolAAssetId = "A_asset_id"
25 25  
26 26  let kSFPoolBAssetId = "B_asset_id"
27 27  
28 28  let kSFPoolShareId = "share_asset_id"
29 29  
30 30  let kSFPoolFee = "commission"
31 31  
32 32  let kUserPosition = "_user_position"
33 33  
34 34  let kUserBorrowAmount = "_user_position_borrow_amount"
35 35  
36 36  let kUserBorrowAssetId = "_user_position_borrow_asset_id"
37 37  
38 38  let kUserPositionNum = "_user_position_number"
39 39  
40 40  let kUserPositionInterest = "_user_position_interest"
41 41  
42 42  let kPoolTotal = "_pool_total"
43 43  
44 44  let kPoolInterest = "_pool_interest"
45 45  
46 46  let kAxlyInFeeWithoutLoan = "_axly_fee_without_loan"
47 47  
48 48  let kAxlyInFeeWithLoan = "_axly_fee_with_loan"
49 49  
50 50  let kAxlyCapFee = "_axly_fee_cap"
51 51  
52 52  let kRequestId = "_request_id"
53 53  
54 54  let kRequestIter = "requests_iter"
55 55  
56 56  let kPool = "pool_"
57 57  
58 58  let kPoolCapChange = "_pool_cap_change"
59 59  
60 60  let kMoneyBox = "axly_money_box"
61 61  
62 62  let kSFFarmingAddr = "swopfi_farming_addr"
63 63  
64 64  let kLendService = "lend_service_addr"
65 65  
66 66  let kPriceOracle = "price_oracle"
67 67  
68 68  let kExContract = "exchange_contract"
69 69  
70 70  let kWxSwapContract = "wx_swap_contract"
71 71  
72 72  let moneyBox = Address(fromBase58String(valueOrErrorMessage(getString(this, kMoneyBox), "No axly moneyBox address")))
73 73  
74 74  let exContract = Address(fromBase58String(valueOrErrorMessage(getString(this, kExContract), "No exchange contract address")))
75 75  
76 76  let priceOracleAddr = Address(fromBase58String(valueOrErrorMessage(getString(this, kPriceOracle), "No price oracle address")))
77 77  
78 78  let wxSwapContract = Address(fromBase58String(valueOrErrorMessage(getString(this, kWxSwapContract), "No wx swap address")))
79 79  
80 80  let SWOPID = base58'4W19ndijcc2CsQa9HGW2dfXKTVXhnneWWttxXrtjPmEp'
81 81  
82 82  let WXID = base58'EMAMLxDnv3xiz8RXg8Btj33jcEw3wLczL3JKYYmuubpc'
83 83  
84 84  func isSelfCall (i) = if ((i.caller == this))
85 85      then unit
86 86      else throw("Only contract itself can call this function")
87 87  
88 88  
89 89  func accountBalance (assetId) = match assetId {
90 90      case id: ByteVector => 
91 91          assetBalance(this, id)
92 92      case waves: Unit => 
93 93          wavesBalance(this).available
94 94      case _ => 
95 95          throw("Match error")
96 96  }
97 97  
98 98  
99 99  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"))
100 100  
101 101  
102 102  func getWXPoolData (poolAddr) = {
103 103      let cfg = {
104 104          let @ = invoke(poolAddr, "getPoolConfigWrapperREADONLY", nil, nil)
105 105          if ($isInstanceOf(@, "List[Any]"))
106 106              then @
107 107              else throw(($getType(@) + " couldn't be cast to List[Any]"))
108 108          }
109 109      if ((cfg == cfg))
110 110          then $Tuple5(valueOrErrorMessage({
111 111              let @ = cfg[4]
112 112              if ($isInstanceOf(@, "String"))
113 113                  then @
114 114                  else unit
115 115              }, "Can't get pool A asset id"), valueOrErrorMessage({
116 116              let @ = cfg[5]
117 117              if ($isInstanceOf(@, "String"))
118 118                  then @
119 119                  else unit
120 120              }, "Can't get pool B asset id"), 0, 0, valueOrErrorMessage({
121 121              let @ = cfg[3]
122 122              if ($isInstanceOf(@, "String"))
123 123                  then @
124 124                  else unit
125 125              }, "Can't get pool LP asset id"))
126 126          else throw("Strict value is not equal to itself.")
127 127      }
128 128  
129 129  
130 130  func getPoolData (poolAddr,type) = if ((type == SF_POOL))
131 131      then getSFPoolData(poolAddr)
132 132      else if ((type == WX_POOL))
133 133          then getWXPoolData(poolAddr)
134 134          else throw("Wrong pool type")
135 135  
136 136  
137 137  func getPoolTotalShare (pool) = valueOrElse(getInteger(this, (pool + kPoolTotal)), 0)
138 138  
139 139  
140 140  func getNewUserPositionNumber (pool,user) = (valueOrElse(getInteger(this, (((pool + "_") + user) + kUserPositionNum)), 0) + 1)
141 141  
142 142  
143 143  func getAxlyFee (pool,feeType) = if ((feeType == "cap"))
144 144      then getIntegerValue(this, (pool + kAxlyCapFee))
145 145      else if ((feeType == "loan"))
146 146          then getIntegerValue(this, (pool + kAxlyInFeeWithLoan))
147 147          else if ((feeType == "noLoan"))
148 148              then getIntegerValue(this, (pool + kAxlyInFeeWithoutLoan))
149 149              else throw("Wrong fee type")
150 150  
151 151  
152 152  func getSFFarmingAddr () = Address(fromBase58String(valueOrErrorMessage(getString(this, kSFFarmingAddr), "Can't get swopfi farming addr")))
153 153  
154 154  
155 155  func getWXFarmingAddr (poolAddr) = {
156 156      let fContract = Address(fromBase58String(valueOrErrorMessage(getString(poolAddr, "%s__factoryContract"), "Can't get WX factory contract addr")))
157 157      let factroyCfg = split(valueOrErrorMessage(getString(fContract, "%s__factoryConfig"), "Can't get WX factory cfg"), "__")
158 158      Address(fromBase58String(factroyCfg[1]))
159 159      }
160 160  
161 161  
162 162  func getLendSrvAddr () = Address(fromBase58String(valueOrErrorMessage(getString(this, kLendService), "Can't get lend service addr")))
163 163  
164 164  
165 165  func assetIdToStr (assetId) = match assetId {
166 166      case id: ByteVector => 
167 167          toBase58String(id)
168 168      case waves: Unit => 
169 169          "WAVES"
170 170      case _ => 
171 171          throw("Match error")
172 172  }
173 173  
174 174  
175 175  func assetIdFromStr (assetId) = if ((assetId == "WAVES"))
176 176      then unit
177 177      else fromBase58String(assetId)
178 178  
179 179  
180 180  func getAssetDecimals (assetId) = if ((assetId == "WAVES"))
181 181      then 8
182 182      else     match assetInfo(fromBase58String(assetId)) {
183 183          case asset: Asset => 
184 184              asset.decimals
185 185          case _ => 
186 186              throw("Can't find asset")
187 187      }
188 188  
189 189  
190 190  func replenishSwopFi (pool,feeType,pmtA,pmtAssetA,pmtB,pmtAssetB,balA,balB,shareId) = {
191 191      let shareBalanceBefore = accountBalance(fromBase58String(shareId))
192 192      if ((shareBalanceBefore == shareBalanceBefore))
193 193          then {
194 194              let poolAddr = Address(fromBase58String(pool))
195 195              let ratioA = fraction(SCALE8, pmtA, balA)
196 196              let ratioB = fraction(SCALE8, pmtB, balB)
197 197              let $t063976689 = if ((ratioB > ratioA))
198 198                  then {
199 199                      let pmt = fraction(balB, ratioA, SCALE8, CEILING)
200 200                      $Tuple4(pmtA, pmt, (pmtB - pmt), pmtAssetB)
201 201                      }
202 202                  else {
203 203                      let pmt = fraction(balA, ratioB, SCALE8, CEILING)
204 204                      $Tuple4(pmt, pmtB, (pmtA - pmt), pmtAssetA)
205 205                      }
206 206              let pmtAmountA = $t063976689._1
207 207              let pmtAmountB = $t063976689._2
208 208              let change = $t063976689._3
209 209              let changeAssetId = $t063976689._4
210 210              let inv1 = if (if ((pmtAmountA > 0))
211 211                  then (pmtAmountB > 0)
212 212                  else false)
213 213                  then {
214 214                      let payments = [AttachedPayment(assetIdFromStr(pmtAssetA), pmtAmountA), AttachedPayment(assetIdFromStr(pmtAssetB), pmtAmountB)]
215 215                      invoke(poolAddr, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], payments)
216 216                      }
217 217                  else 0
218 218              if ((inv1 == inv1))
219 219                  then {
220 220                      let inv2 = if ((change > 0))
221 221                          then {
222 222                              let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
223 223                              let vars = ["0", "false", "0"]
224 224                              invoke(poolAddr, "callFunction", ["replenishWithOneToken", vars], payments)
225 225                              }
226 226                          else 0
227 227                      if ((inv2 == inv2))
228 228                          then {
229 229                              let shareBalanceAfter = accountBalance(fromBase58String(shareId))
230 230                              let totalStaked = (shareBalanceAfter - shareBalanceBefore)
231 231                              let axlyFeeAmount = fraction(totalStaked, getAxlyFee(pool, feeType), FEE_SCALE6)
232 232                              let userShareForStake = (totalStaked - axlyFeeAmount)
233 233                              if ((0 >= userShareForStake))
234 234                                  then throw("amount of staked sharetokens must be > 0")
235 235                                  else {
236 236                                      let inv3 = invoke(getSFFarmingAddr(), "lockShareTokens", [pool, 0], [AttachedPayment(fromBase58String(shareId), userShareForStake)])
237 237                                      if ((inv3 == inv3))
238 238                                          then $Tuple2(userShareForStake, axlyFeeAmount)
239 239                                          else throw("Strict value is not equal to itself.")
240 240                                      }
241 241                              }
242 242                          else throw("Strict value is not equal to itself.")
243 243                      }
244 244                  else throw("Strict value is not equal to itself.")
245 245              }
246 246          else throw("Strict value is not equal to itself.")
247 247      }
248 248  
249 249  
250 250  func replenishWX (pool,feeType,pmtA,pmtAssetA,pmtB,pmtAssetB,shareId) = {
251 251      let poolAddr = Address(fromBase58String(pool))
252 252      let $t081408989 = if (if ((pmtA > 0))
253 253          then (pmtB > 0)
254 254          else false)
255 255          then {
256 256              let evalPutInA = split({
257 257                  let @ = invoke(poolAddr, "evaluatePutByAmountAssetREADONLY", [pmtA], nil)
258 258                  if ($isInstanceOf(@, "String"))
259 259                      then @
260 260                      else throw(($getType(@) + " couldn't be cast to String"))
261 261                  }, "__")
262 262              if ((evalPutInA == evalPutInA))
263 263                  then {
264 264                      let evalPutInB = split({
265 265                          let @ = invoke(poolAddr, "evaluatePutByPriceAssetREADONLY", [pmtB], nil)
266 266                          if ($isInstanceOf(@, "String"))
267 267                              then @
268 268                              else throw(($getType(@) + " couldn't be cast to String"))
269 269                          }, "__")
270 270                      if ((evalPutInB == evalPutInB))
271 271                          then {
272 272                              let lpInA = parseIntValue(evalPutInA[1])
273 273                              let lpInB = parseIntValue(evalPutInB[1])
274 274                              if ((lpInB > lpInA))
275 275                                  then {
276 276                                      let pmtInB = parseIntValue(evalPutInA[8])
277 277                                      $Tuple4(pmtA, pmtInB, (pmtB - pmtInB), pmtAssetB)
278 278                                      }
279 279                                  else {
280 280                                      let pmtInA = parseIntValue(evalPutInB[7])
281 281                                      $Tuple4(pmtInA, pmtB, (pmtA - pmtInA), pmtAssetA)
282 282                                      }
283 283                              }
284 284                          else throw("Strict value is not equal to itself.")
285 285                      }
286 286                  else throw("Strict value is not equal to itself.")
287 287              }
288 288          else if ((pmtA > 0))
289 289              then $Tuple4(pmtA, pmtB, pmtA, pmtAssetA)
290 290              else if ((pmtB > 0))
291 291                  then $Tuple4(pmtA, pmtB, pmtB, pmtAssetB)
292 292                  else throw("pmts must be > 0")
293 293      let pmtAmountA = $t081408989._1
294 294      let pmtAmountB = $t081408989._2
295 295      let change = $t081408989._3
296 296      let changeAssetId = $t081408989._4
297 297      let shareBalanceBefore = accountBalance(fromBase58String(shareId))
298 298      if ((shareBalanceBefore == shareBalanceBefore))
299 299          then {
300 300              let inv1 = if (if ((pmtAmountA > 0))
301 301                  then (pmtAmountB > 0)
302 302                  else false)
303 303                  then {
304 304                      let payments = [AttachedPayment(assetIdFromStr(pmtAssetA), pmtAmountA), AttachedPayment(assetIdFromStr(pmtAssetB), pmtAmountB)]
305 305                      invoke(poolAddr, "put", [1000000, false], payments)
306 306                      }
307 307                  else 0
308 308              if ((inv1 == inv1))
309 309                  then {
310 310                      let inv2 = if ((change > 0))
311 311                          then {
312 312                              let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
313 313                              invoke(poolAddr, "putOneTkn", [0, false], payments)
314 314                              }
315 315                          else 0
316 316                      if ((inv2 == inv2))
317 317                          then {
318 318                              let shareBalanceAfter = accountBalance(fromBase58String(shareId))
319 319                              let totalStaked = (shareBalanceAfter - shareBalanceBefore)
320 320                              let axlyFeeAmount = fraction(totalStaked, getAxlyFee(pool, feeType), FEE_SCALE6)
321 321                              let userShareForStake = (totalStaked - axlyFeeAmount)
322 322                              if ((0 >= userShareForStake))
323 323                                  then throw("amount of staked sharetokens must be > 0")
324 324                                  else {
325 325                                      let inv3 = invoke(getWXFarmingAddr(poolAddr), "stake", nil, [AttachedPayment(fromBase58String(shareId), userShareForStake)])
326 326                                      if ((inv3 == inv3))
327 327                                          then $Tuple2(userShareForStake, axlyFeeAmount)
328 328                                          else throw("Strict value is not equal to itself.")
329 329                                      }
330 330                              }
331 331                          else throw("Strict value is not equal to itself.")
332 332                      }
333 333                  else throw("Strict value is not equal to itself.")
334 334              }
335 335          else throw("Strict value is not equal to itself.")
336 336      }
337 337  
338 338  
339 + func replenishByType (type,pool,feeType,pmtA,AId,pmtB,BId,balA,balB,shareId) = if ((type == SF_POOL))
340 +     then replenishSwopFi(pool, LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
341 +     else if ((type == WX_POOL))
342 +         then replenishWX(pool, LOAN_FEE, pmtA, AId, pmtB, BId, shareId)
343 +         else throw("Wrong pool type")
344 + 
345 + 
339 346  func replenishEntries (pool,user,stakedAmount,axlyFeeAmount,posNum,shareId,type) = {
340 347      let totalAmount = getPoolTotalShare(pool)
341 348      let curPoolInterest = getIntegerValue(this, (pool + kPoolInterest))
342 349  [IntegerEntry((pool + kPoolTotal), (totalAmount + stakedAmount)), IntegerEntry((((((pool + "_") + user) + "_") + toString(posNum)) + kUserPosition), stakedAmount), IntegerEntry((((((pool + "_") + user) + "_") + toString(posNum)) + kUserPositionInterest), curPoolInterest), IntegerEntry((((pool + "_") + user) + kUserPositionNum), posNum), ScriptTransfer(moneyBox, axlyFeeAmount, fromBase58String(shareId))]
343 350      }
344 351  
345 352  
346 353  func claimFarmed (type,pool) = if ((type == SF_POOL))
347 354      then {
348 355          let balBefore = accountBalance(SWOPID)
349 356          if ((balBefore == balBefore))
350 357              then {
351 358                  let inv = invoke(getSFFarmingAddr(), "claim", [pool], nil)
352 359                  if ((inv == inv))
353 360                      then {
354 361                          let balAfter = accountBalance(SWOPID)
355 362                          $Tuple2((balAfter - balBefore), SWOPID)
356 363                          }
357 364                      else throw("Strict value is not equal to itself.")
358 365                  }
359 366              else throw("Strict value is not equal to itself.")
360 367          }
361 368      else if ((type == WX_POOL))
362 369          then {
363 370              let balBefore = accountBalance(WXID)
364 371              if ((balBefore == balBefore))
365 372                  then {
366 373                      let inv = invoke(getWXFarmingAddr(Address(fromBase58String(pool))), "claimWX", [pool], nil)
367 374                      if ((inv == inv))
368 375                          then {
369 376                              let balAfter = accountBalance(WXID)
370 377                              $Tuple2((balAfter - balBefore), WXID)
371 378                              }
372 379                          else throw("Strict value is not equal to itself.")
373 380                      }
374 381                  else throw("Strict value is not equal to itself.")
375 382              }
376 383          else throw("Wrong pool type")
377 384  
378 385  
379 386  func exchangeKeeper (toToken,pmtAmount,pmtAsset,amountsIn,addresses,assetsToReceive,estReceived,slippageTolerance,minReceived,options) = {
380 387      let tokenBalanceBefore = accountBalance(assetIdFromStr(toToken))
381 388      if ((tokenBalanceBefore == tokenBalanceBefore))
382 389          then {
383 390              let inv = invoke(exContract, "swap", [amountsIn, addresses, assetsToReceive, estReceived, slippageTolerance, minReceived, options], [AttachedPayment(pmtAsset, pmtAmount)])
384 391              if ((inv == inv))
385 392                  then (accountBalance(assetIdFromStr(toToken)) - tokenBalanceBefore)
386 393                  else throw("Strict value is not equal to itself.")
387 394              }
388 395          else throw("Strict value is not equal to itself.")
389 396      }
390 397  
391 398  
392 399  func exchangePazzle (toToken,pmtAmount,pmtAsset,routesStr,minToReceive,options) = {
393 400      let tokenBalanceBefore = accountBalance(assetIdFromStr(toToken))
394 401      if ((tokenBalanceBefore == tokenBalanceBefore))
395 402          then {
396 403              let inv = invoke(exContract, "puzzleSwap", [routesStr, minToReceive, options], [AttachedPayment(pmtAsset, pmtAmount)])
397 404              if ((inv == inv))
398 405                  then (accountBalance(assetIdFromStr(toToken)) - tokenBalanceBefore)
399 406                  else throw("Strict value is not equal to itself.")
400 407              }
401 408          else throw("Strict value is not equal to itself.")
402 409      }
403 410  
404 411  
405 412  func exchangeSwopFi (toToken,pmtAmount,pmtAsset,exchangers,exchangersType,args1,args2,routingAssetsKeys,minAmountToReceive,options) = {
406 413      let tokenBalanceBefore = accountBalance(assetIdFromStr(toToken))
407 414      if ((tokenBalanceBefore == tokenBalanceBefore))
408 415          then {
409 416              let inv = invoke(exContract, "swopfiSwap", [exchangers, exchangersType, args1, args2, routingAssetsKeys, minAmountToReceive, options], [AttachedPayment(pmtAsset, pmtAmount)])
410 417              if ((inv == inv))
411 418                  then (accountBalance(assetIdFromStr(toToken)) - tokenBalanceBefore)
412 419                  else throw("Strict value is not equal to itself.")
413 420              }
414 421          else throw("Strict value is not equal to itself.")
415 422      }
416 423  
417 424  
418 - func capitalize (pool,type,tokenId,tokenAmount) = {
425 + func capitalize (pool,pType,tokenId,tokenAmount) = {
419 426      let poolAddr = Address(fromBase58String(pool))
420 -     let $t01319013268 = getPoolData(poolAddr, type)
421 -     let AId = $t01319013268._1
422 -     let BId = $t01319013268._2
423 -     let balA = $t01319013268._3
424 -     let balB = $t01319013268._4
425 -     let shareId = $t01319013268._5
426 -     let $t01327113351 = if ((tokenId == AId))
427 +     let $t01382413903 = getPoolData(poolAddr, pType)
428 +     let AId = $t01382413903._1
429 +     let BId = $t01382413903._2
430 +     let balA = $t01382413903._3
431 +     let balB = $t01382413903._4
432 +     let shareId = $t01382413903._5
433 +     let $t01390613986 = if ((tokenId == AId))
427 434          then $Tuple2(tokenAmount, 0)
428 435          else $Tuple2(0, tokenAmount)
429 -     let pmtA = $t01327113351._1
430 -     let pmtB = $t01327113351._2
431 -     let $t01335413715 = if ((type == SF_POOL))
432 -         then replenishSwopFi(pool, CAP_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
433 -         else replenishWX(pool, CAP_FEE, pmtA, AId, pmtB, BId, shareId)
434 -     let stakedAmount = $t01335413715._1
435 -     let axlyFee = $t01335413715._2
436 +     let pmtA = $t01390613986._1
437 +     let pmtB = $t01390613986._2
438 +     let $t01398914099 = replenishByType(pType, pool, CAP_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
439 +     let stakedAmount = $t01398914099._1
440 +     let axlyFee = $t01398914099._2
436 441      let curPoolInterest = valueOrElse(getInteger(this, (pool + kPoolInterest)), 0)
437 442      let totalShareAmount = getPoolTotalShare(pool)
438 443      let newInterest = (curPoolInterest + fraction(stakedAmount, SCALE10, totalShareAmount))
439 444  [IntegerEntry((pool + kPoolInterest), newInterest), ScriptTransfer(moneyBox, axlyFee, fromBase58String(shareId))]
440 445      }
441 446  
442 447  
443 448  func exchangeDirectlySF (pool,assetIdA,assetIdB,balA,balB,amountTokenToGet,assetTokenToGet) = {
444 449      let poolAddr = Address(fromBase58String(pool))
445 450      let feeScale6 = 1000000
446 451      let fee = getIntegerValue(poolAddr, kSFPoolFee)
447 452      let amntGetNoFee = fraction(amountTokenToGet, feeScale6, (feeScale6 - fee))
448 -     let $t01440814696 = if ((assetTokenToGet == assetIdA))
453 +     let $t01479215080 = if ((assetTokenToGet == assetIdA))
449 454          then {
450 455              let amountToPay = fraction(balA, amntGetNoFee, (balB - amntGetNoFee))
451 456              $Tuple2(amountToPay, assetIdB)
452 457              }
453 458          else {
454 459              let amountToPay = fraction(balB, amntGetNoFee, (balA - amntGetNoFee))
455 460              $Tuple2(amountToPay, assetIdA)
456 461              }
457 -     let amountToPay = $t01440814696._1
458 -     let assetToPay = $t01440814696._2
462 +     let amountToPay = $t01479215080._1
463 +     let assetToPay = $t01479215080._2
459 464      invoke(poolAddr, "callFunction", ["exchange", ["1"]], [AttachedPayment(assetIdFromStr(assetToPay), amountToPay)])
460 465      }
461 466  
462 467  
463 468  func exchangeDirectlyWX (pool,assetIdA,assetIdB,balA,balB,amountTokenToGet,assetTokenToGet) = {
464 469      let poolAddr = Address(fromBase58String(pool))
465 470      let prFee = getIntegerValue(wxSwapContract, "%s__protocolFee")
466 471      let pFee = getIntegerValue(wxSwapContract, "%s__poolFee")
467 472      let feeScale = toBigInt(100000000)
468 -     let $t01517515483 = if ((assetTokenToGet == assetIdA))
473 +     let $t01555915867 = if ((assetTokenToGet == assetIdA))
469 474          then {
470 475              let amountToPay = fraction(balA, amountTokenToGet, (balB - amountTokenToGet))
471 476              $Tuple2(amountToPay, assetIdB)
472 477              }
473 478          else {
474 479              let amountToPay = fraction(balB, amountTokenToGet, (balA - amountTokenToGet))
475 480              $Tuple2(amountToPay, assetIdA)
476 481              }
477 -     let amountToPay = $t01517515483._1
478 -     let assetToPay = $t01517515483._2
482 +     let amountToPay = $t01555915867._1
483 +     let assetToPay = $t01555915867._2
479 484      let amountToPayWithFee = toInt(fraction(toBigInt(amountToPay), feeScale, (feeScale - toBigInt((prFee + pFee)))))
480 485      invoke(wxSwapContract, "swap", [1, assetTokenToGet, toString(this)], [AttachedPayment(assetIdFromStr(assetToPay), amountToPayWithFee)])
481 486      }
482 487  
483 488  
484 489  func exchangeDirectly (type,pool,assetIdA,assetIdB,balA,balB,amountTokenToGet,assetTokenToGet) = if ((type == SF_POOL))
485 490      then exchangeDirectlySF(pool, assetIdA, assetIdB, balA, balB, amountTokenToGet, assetTokenToGet)
486 491      else exchangeDirectlyWX(pool, assetIdA, assetIdB, balA, balB, amountTokenToGet, assetTokenToGet)
487 492  
488 493  
489 494  func withdrawAmountCalc (pool,userCanWithdraw,debt,borrowAsset) = {
490 495      let poolAddr = Address(fromBase58String(pool))
491 496      let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Unknown pool")
492 -     let $t01634816415 = getPoolData(poolAddr, pType)
493 -     let assetIdA = $t01634816415._1
494 -     let assetIdB = $t01634816415._2
495 -     let balA = $t01634816415._3
496 -     let balB = $t01634816415._4
497 +     let $t01673216799 = getPoolData(poolAddr, pType)
498 +     let assetIdA = $t01673216799._1
499 +     let assetIdB = $t01673216799._2
500 +     let balA = $t01673216799._3
501 +     let balB = $t01673216799._4
497 502      let cBalABefore = accountBalance(assetIdFromStr(assetIdA))
498 503      if ((cBalABefore == cBalABefore))
499 504          then {
500 505              let cBalBBefore = accountBalance(assetIdFromStr(assetIdB))
501 506              if ((cBalBBefore == cBalBBefore))
502 507                  then {
503 508                      let inv = if ((pType == SF_POOL))
504 509                          then invoke(poolAddr, "callFunction", ["withdraw", [toString(userCanWithdraw)]], nil)
505 510                          else if ((pType == WX_POOL))
506 511                              then invoke(poolAddr, "unstakeAndGet", [userCanWithdraw], nil)
507 512                              else throw("Wrong position type")
508 513                      if ((inv == inv))
509 514                          then {
510 515                              let cBalAAfter = accountBalance(assetIdFromStr(assetIdA))
511 516                              let cBalBAfter = accountBalance(assetIdFromStr(assetIdB))
512 -                             let $t01692717016 = $Tuple2((cBalAAfter - cBalABefore), (cBalBAfter - cBalBBefore))
513 -                             let tokensAmountA = $t01692717016._1
514 -                             let tokensAmountB = $t01692717016._2
515 -                             let $t01701917715 = if ((debt > 0))
517 +                             let $t01731117400 = $Tuple2((cBalAAfter - cBalABefore), (cBalBAfter - cBalBBefore))
518 +                             let tokensAmountA = $t01731117400._1
519 +                             let tokensAmountB = $t01731117400._2
520 +                             let $t01740318099 = if ((debt > 0))
516 521                                  then {
517 522                                      let amountToGetEx = if (if ((borrowAsset == assetIdA))
518 523                                          then (debt > tokensAmountA)
519 524                                          else false)
520 525                                          then (debt - tokensAmountA)
521 526                                          else if (if ((borrowAsset == assetIdB))
522 527                                              then (debt > tokensAmountB)
523 528                                              else false)
524 529                                              then (debt - tokensAmountB)
525 530                                              else 0
526 531                                      let exInv = if ((amountToGetEx > 0))
527 532                                          then exchangeDirectly(pType, pool, assetIdA, assetIdB, balA, balB, amountToGetEx, borrowAsset)
528 533                                          else 0
529 534                                      if ((exInv == exInv))
530 535                                          then {
531 536                                              let cBalAAfterRepay = accountBalance(assetIdFromStr(assetIdA))
532 537                                              let cBalBAfterRepay = accountBalance(assetIdFromStr(assetIdB))
533 538                                              $Tuple2((cBalAAfterRepay - cBalABefore), (cBalBAfterRepay - cBalBBefore))
534 539                                              }
535 540                                          else throw("Strict value is not equal to itself.")
536 541                                      }
537 542                                  else $Tuple2(tokensAmountA, tokensAmountB)
538 -                             let toUserAmountA = $t01701917715._1
539 -                             let toUserAmountB = $t01701917715._2
543 +                             let toUserAmountA = $t01740318099._1
544 +                             let toUserAmountB = $t01740318099._2
540 545                              $Tuple4(toUserAmountA, assetIdA, toUserAmountB, assetIdB)
541 546                              }
542 547                          else throw("Strict value is not equal to itself.")
543 548                      }
544 549                  else throw("Strict value is not equal to itself.")
545 550              }
546 551          else throw("Strict value is not equal to itself.")
547 552      }
548 553  
549 554  
555 + func parseRequest (requestId) = {
556 +     let request = split(valueOrErrorMessage(getString(this, (requestId + kRequestId)), ("No request with id " + requestId)), ",")
557 +     let user = request[0]
558 +     let pool = request[1]
559 +     let pmtA = parseIntValue(request[2])
560 +     let AId = request[3]
561 +     let pmtB = parseIntValue(request[4])
562 +     let BId = request[5]
563 +     let balA = parseIntValue(request[6])
564 +     let balB = parseIntValue(request[7])
565 +     let shareId = request[8]
566 +     let bwAsset = request[9]
567 +     let bwAmount = parseIntValue(request[10])
568 +     $Tuple11(user, pool, pmtA, AId, pmtB, BId, balA, balB, shareId, bwAsset, bwAmount)
569 +     }
570 + 
571 + 
550 572  @Callable(i)
551 573  func replenishREADONLY (pool,leverage,borrowAssetId) = if (if ((100 > leverage))
552 574      then true
553 575      else (leverage > 300))
554 576      then throw("Leverage can't be <100 and >300")
555 577      else {
556 -         let type = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
557 -         let $t01807818167 = getPoolData(Address(fromBase58String(pool)), type)
558 -         let AId = $t01807818167._1
559 -         let BId = $t01807818167._2
560 -         let balA = $t01807818167._3
561 -         let balB = $t01807818167._4
562 -         let shareId = $t01807818167._5
563 -         let $t01817018807 = if ((size(i.payments) == 2))
578 +         let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
579 +         let $t01905319143 = getPoolData(Address(fromBase58String(pool)), pType)
580 +         let AId = $t01905319143._1
581 +         let BId = $t01905319143._2
582 +         let balA = $t01905319143._3
583 +         let balB = $t01905319143._4
584 +         let shareId = $t01905319143._5
585 +         let $t01914619783 = if ((size(i.payments) == 2))
564 586              then if ((assetIdToStr(i.payments[0].assetId) != AId))
565 587                  then throw("Wrong payment asset A")
566 588                  else if ((assetIdToStr(i.payments[1].assetId) != BId))
567 589                      then throw("Wrong payment asset B")
568 590                      else $Tuple4(i.payments[0].amount, AId, i.payments[1].amount, BId)
569 591              else if ((size(i.payments) == 1))
570 592                  then if ((assetIdToStr(i.payments[0].assetId) == AId))
571 593                      then $Tuple4(i.payments[0].amount, AId, 0, BId)
572 594                      else if ((assetIdToStr(i.payments[0].assetId) == BId))
573 595                          then $Tuple4(0, AId, i.payments[0].amount, BId)
574 596                          else throw("Wrong payment")
575 597                  else throw("One or two payments expected")
576 -         let pmtA = $t01817018807._1
577 -         let pmtAssetA = $t01817018807._2
578 -         let pmtB = $t01817018807._3
579 -         let pmtAssetB = $t01817018807._4
580 -         let $t01881020335 = if ((leverage > 100))
598 +         let pmtA = $t01914619783._1
599 +         let pmtAssetA = $t01914619783._2
600 +         let pmtB = $t01914619783._3
601 +         let pmtAssetB = $t01914619783._4
602 +         let $t01978621297 = if ((leverage > 100))
581 603              then {
582 604                  let dPriceA = (                let @ = invoke(priceOracleAddr, "getTWAP60", [pmtAssetA, false], nil)
583 605                  if ($isInstanceOf(@, "(Int, Int)"))
584 606                      then @
585 607                      else throw(($getType(@) + " couldn't be cast to (Int, Int)")))._1
586 608                  let dPriceB = (                let @ = invoke(priceOracleAddr, "getTWAP60", [pmtAssetB, false], nil)
587 609                  if ($isInstanceOf(@, "(Int, Int)"))
588 610                      then @
589 611                      else throw(($getType(@) + " couldn't be cast to (Int, Int)")))._1
590 612                  let paydInDollar = (fraction(dPriceA, pmtA, pow(10, 0, getAssetDecimals(pmtAssetA), 0, 0, DOWN)) + fraction(dPriceB, pmtB, pow(10, 0, getAssetDecimals(pmtAssetB), 0, 0, DOWN)))
591 613                  let borrowAmount = fraction(paydInDollar, (leverage - 100), 100)
592 -                 let request = makeString([type, toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, borrowAssetId, toString(borrowAmount), toString(1)], ",")
614 +                 let request = makeString([toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, borrowAssetId, toString(borrowAmount), toString(1)], ",")
593 615                  let newRequestId = {
594 616                      let @ = invoke(this, "createNewRequest", [request], nil)
595 617                      if ($isInstanceOf(@, "Int"))
596 618                          then @
597 619                          else throw(($getType(@) + " couldn't be cast to Int"))
598 620                      }
599 621                  if ((newRequestId == newRequestId))
600 622                      then {
601 623                          let args = [((toString(i.caller) + "_") + toString(1)), shareId, borrowAssetId, borrowAmount, toString(this), "replenishFromLandReadOnly", toString(valueOrErrorMessage(newRequestId, "Can't create new request"))]
602 624                          let inv = reentrantInvoke(getLendSrvAddr(), "flashPosition", args, nil)
603 625                          if ((inv == inv))
604 626                              then if ((borrowAssetId == pmtAssetA))
605 627                                  then $Tuple4((pmtA + borrowAmount), pmtB, LOAN_FEE, borrowAmount)
606 628                                  else $Tuple4(pmtA, (pmtB + borrowAmount), LOAN_FEE, borrowAmount)
607 629                              else throw("Strict value is not equal to itself.")
608 630                          }
609 631                      else throw("Strict value is not equal to itself.")
610 632                  }
611 633              else $Tuple4(pmtA, pmtB, NO_LOAN_FEE, 0)
612 -         let paymentA = $t01881020335._1
613 -         let paymentB = $t01881020335._2
614 -         let feeType = $t01881020335._3
615 -         let borrowAmount = $t01881020335._4
616 -         let $t02033820732 = if ((type == SF_POOL))
617 -             then replenishSwopFi(pool, feeType, paymentA, pmtAssetA, paymentB, pmtAssetB, balA, balB, shareId)
618 -             else replenishWX(pool, feeType, pmtA, pmtAssetA, pmtB, pmtAssetB, shareId)
619 -         let userStaked = $t02033820732._1
620 -         let axlyFee = $t02033820732._2
621 -         let $t02073520860 = withdrawAmountCalc(pool, userStaked, borrowAmount, borrowAssetId)
622 -         if (($t02073520860 == $t02073520860))
634 +         let paymentA = $t01978621297._1
635 +         let paymentB = $t01978621297._2
636 +         let feeType = $t01978621297._3
637 +         let borrowAmount = $t01978621297._4
638 +         let $t02130021412 = replenishByType(pType, pool, NO_LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
639 +         let userStaked = $t02130021412._1
640 +         let axlyFee = $t02130021412._2
641 +         let $t02141621541 = withdrawAmountCalc(pool, userStaked, borrowAmount, borrowAssetId)
642 +         if (($t02141621541 == $t02141621541))
623 643              then {
624 -                 let assetIdB = $t02073520860._4
625 -                 let toUserAmountB = $t02073520860._3
626 -                 let assetIdA = $t02073520860._2
627 -                 let toUserAmountA = $t02073520860._1
644 +                 let assetIdB = $t02141621541._4
645 +                 let toUserAmountB = $t02141621541._3
646 +                 let assetIdA = $t02141621541._2
647 +                 let toUserAmountA = $t02141621541._1
628 648                  $Tuple2(nil, [userStaked, toUserAmountA, toUserAmountB])
629 649                  }
630 650              else throw("Strict value is not equal to itself.")
631 651          }
632 652  
633 653  
634 654  
635 655  @Callable(i)
636 - func replenishFromLandReadOnly (requestId) = $Tuple2(nil, 11111)
656 + func replenishFromLandReadOnly (requestId) = {
657 +     let $t02166521769 = parseRequest(requestId)
658 +     let user = $t02166521769._1
659 +     let pool = $t02166521769._2
660 +     let pmtA = $t02166521769._3
661 +     let AId = $t02166521769._4
662 +     let pmtB = $t02166521769._5
663 +     let BId = $t02166521769._6
664 +     let balA = $t02166521769._7
665 +     let balB = $t02166521769._8
666 +     let shareId = $t02166521769._9
667 +     let bwAsset = $t02166521769._10
668 +     let bwAmount = $t02166521769._11
669 +     if ((size(i.payments) != 1))
670 +         then throw("Wrong payment size")
671 +         else if (if ((assetIdToStr(i.payments[0].assetId) != bwAsset))
672 +             then true
673 +             else (i.payments[0].amount != bwAmount))
674 +             then throw("Wrong payment")
675 +             else {
676 +                 let $t02195922083 = if ((AId == bwAsset))
677 +                     then $Tuple2((pmtA + i.payments[0].amount), pmtB)
678 +                     else $Tuple2(pmtA, (pmtB + i.payments[0].amount))
679 +                 let pmtAllA = $t02195922083._1
680 +                 let pmtAllB = $t02195922083._2
681 +                 let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Unknown pool")
682 +                 let $t02216522274 = replenishByType(pType, pool, LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
683 +                 let userStaked = $t02216522274._1
684 +                 let axlyFee = $t02216522274._2
685 +                 nil
686 +                 }
687 +     }
637 688  
638 689  
639 690  
640 691  @Callable(i)
641 692  func replenish (pool,leverage,borrowAssetId) = if (if ((100 > leverage))
642 693      then true
643 694      else (leverage > 300))
644 695      then throw("Leverage can't be <100 and >300")
645 696      else {
646 -         let type = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
647 -         let $t02130221391 = getPoolData(Address(fromBase58String(pool)), type)
648 -         let AId = $t02130221391._1
649 -         let BId = $t02130221391._2
650 -         let balA = $t02130221391._3
651 -         let balB = $t02130221391._4
652 -         let shareId = $t02130221391._5
653 -         let $t02139422031 = if ((size(i.payments) == 2))
697 +         let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
698 +         let $t02258822678 = getPoolData(Address(fromBase58String(pool)), pType)
699 +         let AId = $t02258822678._1
700 +         let BId = $t02258822678._2
701 +         let balA = $t02258822678._3
702 +         let balB = $t02258822678._4
703 +         let shareId = $t02258822678._5
704 +         let $t02268123318 = if ((size(i.payments) == 2))
654 705              then if ((assetIdToStr(i.payments[0].assetId) != AId))
655 706                  then throw("Wrong payment asset A")
656 707                  else if ((assetIdToStr(i.payments[1].assetId) != BId))
657 708                      then throw("Wrong payment asset B")
658 709                      else $Tuple4(i.payments[0].amount, AId, i.payments[1].amount, BId)
659 710              else if ((size(i.payments) == 1))
660 711                  then if ((assetIdToStr(i.payments[0].assetId) == AId))
661 712                      then $Tuple4(i.payments[0].amount, AId, 0, BId)
662 713                      else if ((assetIdToStr(i.payments[0].assetId) == BId))
663 714                          then $Tuple4(0, AId, i.payments[0].amount, BId)
664 715                          else throw("Wrong payment")
665 716                  else throw("One or two payments expected")
666 -         let pmtA = $t02139422031._1
667 -         let pmtAssetA = $t02139422031._2
668 -         let pmtB = $t02139422031._3
669 -         let pmtAssetB = $t02139422031._4
717 +         let pmtA = $t02268123318._1
718 +         let pmtAssetA = $t02268123318._2
719 +         let pmtB = $t02268123318._3
720 +         let pmtAssetB = $t02268123318._4
670 721          let newPosNum = getNewUserPositionNumber(pool, toString(i.caller))
671 722          if ((leverage > 100))
672 723              then {
673 724                  let dPriceA = (                let @ = invoke(priceOracleAddr, "getTWAP60", [pmtAssetA, false], nil)
674 725                  if ($isInstanceOf(@, "(Int, Int)"))
675 726                      then @
676 727                      else throw(($getType(@) + " couldn't be cast to (Int, Int)")))._1
677 728                  let dPriceB = (                let @ = invoke(priceOracleAddr, "getTWAP60", [pmtAssetB, false], nil)
678 729                  if ($isInstanceOf(@, "(Int, Int)"))
679 730                      then @
680 731                      else throw(($getType(@) + " couldn't be cast to (Int, Int)")))._1
681 732                  let paydInDollar = (fraction(dPriceA, pmtA, pow(10, 0, getAssetDecimals(pmtAssetA), 0, 0, DOWN)) + fraction(dPriceB, pmtB, pow(10, 0, getAssetDecimals(pmtAssetB), 0, 0, DOWN)))
682 733                  let borrowAmount = fraction(paydInDollar, (leverage - 100), 100)
683 -                 let request = makeString([type, toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, borrowAssetId, toString(borrowAmount), toString(newPosNum)], ",")
734 +                 let request = makeString([toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, borrowAssetId, toString(borrowAmount)], ",")
684 735                  let newRequestId = {
685 736                      let @ = invoke(this, "createNewRequest", [request], nil)
686 737                      if ($isInstanceOf(@, "Int"))
687 738                          then @
688 739                          else throw(($getType(@) + " couldn't be cast to Int"))
689 740                      }
690 741                  if ((newRequestId == newRequestId))
691 742                      then {
692 743                          let args = [((toString(i.caller) + "_") + toString(newPosNum)), shareId, borrowAssetId, borrowAmount, toString(this), "replenishFromLand", toString(valueOrErrorMessage(newRequestId, "Can't create new request"))]
693 744                          let inv = reentrantInvoke(getLendSrvAddr(), "flashPosition", args, nil)
694 745                          if ((inv == inv))
695 746                              then nil
696 747                              else throw("Strict value is not equal to itself.")
697 748                          }
698 749                      else throw("Strict value is not equal to itself.")
699 750                  }
700 751              else {
701 -                 let $t02337223763 = if ((type == SF_POOL))
702 -                     then replenishSwopFi(pool, NO_LOAN_FEE, pmtA, pmtAssetA, pmtB, pmtAssetB, balA, balB, shareId)
703 -                     else replenishWX(pool, NO_LOAN_FEE, pmtA, pmtAssetA, pmtB, pmtAssetB, shareId)
704 -                 let userStaked = $t02337223763._1
705 -                 let axlyFee = $t02337223763._2
706 -                 replenishEntries(pool, toString(i.caller), userStaked, axlyFee, newPosNum, shareId, type)
752 +                 let $t02461524727 = replenishByType(pType, pool, NO_LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
753 +                 let userStaked = $t02461524727._1
754 +                 let axlyFee = $t02461524727._2
755 +                 replenishEntries(pool, toString(i.caller), userStaked, axlyFee, newPosNum, shareId, pType)
707 756                  }
708 757          }
709 758  
710 759  
711 760  
712 761  @Callable(i)
713 762  func replenishFromLand (requestId) = {
714 -     let request = split(valueOrErrorMessage(getString(this, (requestId + kRequestId)), ("No request with id " + requestId)), ",")
763 +     let $t02488924993 = parseRequest(requestId)
764 +     let user = $t02488924993._1
765 +     let pool = $t02488924993._2
766 +     let pmtA = $t02488924993._3
767 +     let AId = $t02488924993._4
768 +     let pmtB = $t02488924993._5
769 +     let BId = $t02488924993._6
770 +     let balA = $t02488924993._7
771 +     let balB = $t02488924993._8
772 +     let shareId = $t02488924993._9
773 +     let bwAsset = $t02488924993._10
774 +     let bwAmount = $t02488924993._11
715 775      if ((size(i.payments) != 1))
716 776          then throw("Wrong payment size")
717 -         else if (if ((assetIdToStr(i.payments[0].assetId) != request[10]))
777 +         else if (if ((assetIdToStr(i.payments[0].assetId) != bwAsset))
718 778              then true
719 -             else (i.payments[0].amount != parseIntValue(request[11])))
779 +             else (i.payments[0].amount != bwAmount))
720 780              then throw("Wrong payment")
721 781              else {
722 -                 let pmtA = if ((request[4] == assetIdToStr(i.payments[0].assetId)))
723 -                     then (parseIntValue(request[3]) + i.payments[0].amount)
724 -                     else parseIntValue(request[3])
725 -                 let pmtB = if ((request[6] == assetIdToStr(i.payments[0].assetId)))
726 -                     then (parseIntValue(request[5]) + i.payments[0].amount)
727 -                     else parseIntValue(request[3])
728 -                 let pool = request[2]
729 -                 let user = request[1]
730 -                 let shareId = request[9]
731 -                 let posNum = parseIntValue(request[12])
732 -                 let $t02472125236 = if ((request[0] == SF_POOL))
733 -                     then replenishSwopFi(pool, LOAN_FEE, pmtA, request[4], pmtB, request[6], parseIntValue(request[7]), parseIntValue(request[8]), shareId)
734 -                     else if ((request[0] == WX_POOL))
735 -                         then replenishWX(pool, LOAN_FEE, pmtA, request[4], pmtB, request[6], shareId)
736 -                         else throw("Wrong request type")
737 -                 let userStaked = $t02472125236._1
738 -                 let axlyFee = $t02472125236._2
739 -                 let borrowEntries = [IntegerEntry((((((request[2] + "_") + request[1]) + "_") + request[12]) + kUserBorrowAmount), i.payments[0].amount), StringEntry((((((request[2] + "_") + request[1]) + "_") + request[12]) + kUserBorrowAssetId), request[10])]
740 -                 let entries = replenishEntries(pool, user, userStaked, axlyFee, posNum, shareId, request[0])
782 +                 let $t02518325307 = if ((AId == bwAsset))
783 +                     then $Tuple2((pmtA + i.payments[0].amount), pmtB)
784 +                     else $Tuple2(pmtA, (pmtB + i.payments[0].amount))
785 +                 let pmtAllA = $t02518325307._1
786 +                 let pmtAllB = $t02518325307._2
787 +                 let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Unknown pool")
788 +                 let $t02538925498 = replenishByType(pType, pool, LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
789 +                 let userStaked = $t02538925498._1
790 +                 let axlyFee = $t02538925498._2
791 +                 let posNum = getNewUserPositionNumber(pool, toString(i.caller))
792 +                 let borrowEntries = [IntegerEntry((((((pool + "_") + user) + "_") + toString(posNum)) + kUserBorrowAmount), bwAmount), StringEntry((((((pool + "_") + user) + "_") + toString(posNum)) + kUserBorrowAssetId), bwAsset)]
793 +                 let entries = replenishEntries(pool, user, userStaked, axlyFee, posNum, shareId, pType)
741 794                  $Tuple2(((entries ++ borrowEntries) :+ DeleteEntry((requestId + kRequestId))), userStaked)
742 795                  }
743 796      }
744 797  
745 798  
746 799  
747 800  @Callable(i)
748 801  func withdraw (pool,posId) = {
749 802      let user = toString(i.caller)
750 803      let pAmount = valueOrErrorMessage(getInteger(this, (((((pool + "_") + user) + "_") + toString(posId)) + kUserPosition)), "Unknown position")
751 804      let userInterest = getIntegerValue(this, (((((pool + "_") + user) + "_") + toString(posId)) + kUserPositionInterest))
752 805      let poolInterst = getIntegerValue(this, (pool + kPoolInterest))
753 806      let poolTotalShare = getPoolTotalShare(pool)
754 807      let userCanWithdraw = (pAmount + fraction(pAmount, (poolInterst - userInterest), SCALE10))
755 808      let userAddr = Address(fromBase58String(user))
756 809      let borrowAmount = getIntegerValue(this, (((((pool + "_") + user) + "_") + toString(posId)) + kUserBorrowAmount))
757 810      let borrowAsset = getStringValue(this, (((((pool + "_") + user) + "_") + toString(posId)) + kUserBorrowAssetId))
758 811      let debt = if ((borrowAmount > 0))
759 812          then {
760 813              let @ = invoke(getLendSrvAddr(), "getAssetDebt", [false, ((((pool + "_") + user) + "_") + toString(posId)), borrowAsset], nil)
761 814              if ($isInstanceOf(@, "Int"))
762 815                  then @
763 816                  else throw(($getType(@) + " couldn't be cast to Int"))
764 817              }
765 818          else 0
766 -     let $t02664326763 = withdrawAmountCalc(pool, userCanWithdraw, debt, borrowAsset)
767 -     if (($t02664326763 == $t02664326763))
819 +     let $t02694027060 = withdrawAmountCalc(pool, userCanWithdraw, debt, borrowAsset)
820 +     if (($t02694027060 == $t02694027060))
768 821          then {
769 -             let assetIdB = $t02664326763._4
770 -             let toUserAmountB = $t02664326763._3
771 -             let assetIdA = $t02664326763._2
772 -             let toUserAmountA = $t02664326763._1
822 +             let assetIdB = $t02694027060._4
823 +             let toUserAmountB = $t02694027060._3
824 +             let assetIdA = $t02694027060._2
825 +             let toUserAmountA = $t02694027060._1
773 826              let closeDbtInv = if ((debt > 0))
774 827                  then invoke(getLendSrvAddr(), "repayFor", [((user + "_") + toString(posId))], [AttachedPayment(assetIdFromStr(borrowAsset), debt)])
775 828                  else 0
776 829              if ((closeDbtInv == closeDbtInv))
777 830                  then [DeleteEntry((((((pool + "_") + user) + "_") + toString(posId)) + kUserPosition)), DeleteEntry((((((pool + "_") + user) + "_") + toString(posId)) + kUserPositionInterest)), IntegerEntry((pool + kPoolTotal), (poolTotalShare - userCanWithdraw)), ScriptTransfer(userAddr, toUserAmountA, assetIdFromStr(assetIdA)), ScriptTransfer(userAddr, toUserAmountB, assetIdFromStr(assetIdB))]
778 831                  else throw("Strict value is not equal to itself.")
779 832              }
780 833          else throw("Strict value is not equal to itself.")
781 834      }
782 835  
783 836  
784 837  
785 838  @Callable(i)
786 839  func createNewRequest (params) = valueOrElse(isSelfCall(i), {
787 840      let newRequestId = (valueOrElse(getInteger(this, kRequestIter), 0) + 1)
788 841      $Tuple2([StringEntry((toString(newRequestId) + kRequestId), params), IntegerEntry(kRequestIter, newRequestId)], newRequestId)
789 842      })
790 843  
791 844  
792 845  
793 846  @Callable(i)
794 847  func capitalizeExKeeper (pool,type,tokenToId,amountToExchange,claim,amountsIn,addresses,assetsToReceive,estReceived,slippageTolerance,minReceived,options) = {
795 -     let $t02806028254 = if (claim)
848 +     let $t02835728551 = if (claim)
796 849          then claimFarmed(type, pool)
797 850          else {
798 851              let claimedAsset = if ((type == SF_POOL))
799 852                  then SWOPID
800 853                  else WXID
801 854              $Tuple2(amountToExchange, claimedAsset)
802 855              }
803 -     let claimedAmount = $t02806028254._1
804 -     let claimedAsset = $t02806028254._2
856 +     let claimedAmount = $t02835728551._1
857 +     let claimedAsset = $t02835728551._2
805 858      let exchangedAmount = exchangeKeeper(tokenToId, amountToExchange, claimedAsset, amountsIn, addresses, assetsToReceive, estReceived, slippageTolerance, minReceived, options)
806 859      let change = (claimedAmount - amountToExchange)
807 860      let changeEntry = if ((change > 0))
808 861          then [IntegerEntry((pool + kPoolCapChange), (change + valueOrElse(getInteger(this, (pool + kPoolCapChange)), 0)))]
809 862          else nil
810 863      (capitalize(pool, type, tokenToId, exchangedAmount) ++ changeEntry)
811 864      }
812 865  
813 866  
814 867  
815 868  @Callable(i)
816 869  func capitalizeExPazzle (pool,type,tokenToId,amountToExchange,claim,routesStr,minToReceive,options) = {
817 -     let $t02891029104 = if (claim)
870 +     let $t02920729401 = if (claim)
818 871          then claimFarmed(type, pool)
819 872          else {
820 873              let claimedAsset = if ((type == SF_POOL))
821 874                  then SWOPID
822 875                  else WXID
823 876              $Tuple2(amountToExchange, claimedAsset)
824 877              }
825 -     let claimedAmount = $t02891029104._1
826 -     let claimedAsset = $t02891029104._2
878 +     let claimedAmount = $t02920729401._1
879 +     let claimedAsset = $t02920729401._2
827 880      let exchangedAmount = exchangePazzle(tokenToId, amountToExchange, claimedAsset, routesStr, minToReceive, options)
828 881      let change = (claimedAmount - amountToExchange)
829 882      let changeEntry = if ((change > 0))
830 883          then [IntegerEntry((pool + kPoolCapChange), (change + valueOrElse(getInteger(this, (pool + kPoolCapChange)), 0)))]
831 884          else nil
832 885      (capitalize(pool, type, tokenToId, exchangedAmount) ++ changeEntry)
833 886      }
834 887  
835 888  
836 889  
837 890  @Callable(i)
838 891  func capitalizeExSwopFi (pool,type,tokenToId,amountToExchange,claim,exchangers,exchangersType,args1,args2,routingAssetsKeys,minAmountToReceive,options) = {
839 -     let $t02982730021 = if (claim)
892 +     let $t03012430318 = if (claim)
840 893          then claimFarmed(type, pool)
841 894          else {
842 895              let claimedAsset = if ((type == SF_POOL))
843 896                  then SWOPID
844 897                  else WXID
845 898              $Tuple2(amountToExchange, claimedAsset)
846 899              }
847 -     let claimedAmount = $t02982730021._1
848 -     let claimedAsset = $t02982730021._2
900 +     let claimedAmount = $t03012430318._1
901 +     let claimedAsset = $t03012430318._2
849 902      let exchangedAmount = exchangeSwopFi(tokenToId, amountToExchange, claimedAsset, exchangers, exchangersType, args1, args2, routingAssetsKeys, minAmountToReceive, options)
850 903      let change = (claimedAmount - amountToExchange)
851 904      let changeEntry = if ((change > 0))
852 905          then [IntegerEntry((pool + kPoolCapChange), (change + valueOrElse(getInteger(this, (pool + kPoolCapChange)), 0)))]
853 906          else nil
854 907      (capitalize(pool, type, tokenToId, exchangedAmount) ++ changeEntry)
855 908      }
856 909  
857 910  
858 911  
859 912  @Callable(i)
860 913  func initNewPool (type,poolAddr,inFeeNoLoan,inFeeLoan,capFee) = if (if ((type != SF_POOL))
861 914      then (type != WX_POOL)
862 915      else false)
863 916      then throw("Wrong type")
864 917      else [IntegerEntry((poolAddr + kAxlyInFeeWithoutLoan), inFeeNoLoan), IntegerEntry((poolAddr + kAxlyInFeeWithLoan), inFeeLoan), IntegerEntry((poolAddr + kAxlyCapFee), capFee), IntegerEntry((poolAddr + kPoolInterest), 0), StringEntry((kPool + poolAddr), type)]
865 918  
866 919  
867 920  @Verifier(tx)
868 921  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
869 922

Old	New		Differences
336	336		}
337	337
338	338
	339	+	func replenishByType (type,pool,feeType,pmtA,AId,pmtB,BId,balA,balB,shareId) = if ((type == SF_POOL))
	340	+	then replenishSwopFi(pool, LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
	341	+	else if ((type == WX_POOL))
	342	+	then replenishWX(pool, LOAN_FEE, pmtA, AId, pmtB, BId, shareId)
	343	+	else throw("Wrong pool type")
	344	+
	345	+
339	346		func replenishEntries (pool,user,stakedAmount,axlyFeeAmount,posNum,shareId,type) = {
340	347		let totalAmount = getPoolTotalShare(pool)
341	348		let curPoolInterest = getIntegerValue(this, (pool + kPoolInterest))

415	422		}
416	423
417	424
418		-	func capitalize (pool,~~type~~,tokenId,tokenAmount) = {
	425	+	func capitalize (pool,pType,tokenId,tokenAmount) = {
419	426		let poolAddr = Address(fromBase58String(pool))
420		-	let $~~t01319013268~~ = getPoolData(poolAddr, ~~type~~)
421		-	let AId = $~~t01319013268~~._1
422		-	let BId = $~~t01319013268~~._2
423		-	let balA = $~~t01319013268~~._3
424		-	let balB = $~~t01319013268~~._4
425		-	let shareId = $~~t01319013268~~._5
426		-	let $~~t01327113351~~ = if ((tokenId == AId))
	427	+	let $t01382413903 = getPoolData(poolAddr, pType)
	428	+	let AId = $t01382413903._1
	429	+	let BId = $t01382413903._2
	430	+	let balA = $t01382413903._3
	431	+	let balB = $t01382413903._4
	432	+	let shareId = $t01382413903._5
	433	+	let $t01390613986 = if ((tokenId == AId))
427	434		then $Tuple2(tokenAmount, 0)
428	435		else $Tuple2(0, tokenAmount)
429		-	let pmtA = $t01327113351._1
430		-	let pmtB = $t01327113351._2
431		-	let $t01335413715 = if ((type == SF_POOL))
432		-	then replenishSwopFi(pool, CAP_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
433		-	else replenishWX(pool, CAP_FEE, pmtA, AId, pmtB, BId, shareId)
434		-	let stakedAmount = $t01335413715._1
435		-	let axlyFee = $t01335413715._2
	436	+	let pmtA = $t01390613986._1
	437	+	let pmtB = $t01390613986._2
	438	+	let $t01398914099 = replenishByType(pType, pool, CAP_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
	439	+	let stakedAmount = $t01398914099._1
	440	+	let axlyFee = $t01398914099._2
436	441		let curPoolInterest = valueOrElse(getInteger(this, (pool + kPoolInterest)), 0)
437	442		let totalShareAmount = getPoolTotalShare(pool)
438	443		let newInterest = (curPoolInterest + fraction(stakedAmount, SCALE10, totalShareAmount))

445	450		let feeScale6 = 1000000
446	451		let fee = getIntegerValue(poolAddr, kSFPoolFee)
447	452		let amntGetNoFee = fraction(amountTokenToGet, feeScale6, (feeScale6 - fee))
448		-	let $~~t01440814696~~ = if ((assetTokenToGet == assetIdA))
	453	+	let $t01479215080 = if ((assetTokenToGet == assetIdA))
449	454		then {
450	455		let amountToPay = fraction(balA, amntGetNoFee, (balB - amntGetNoFee))
451	456		$Tuple2(amountToPay, assetIdB)

454	459		let amountToPay = fraction(balB, amntGetNoFee, (balA - amntGetNoFee))
455	460		$Tuple2(amountToPay, assetIdA)
456	461		}
457		-	let amountToPay = $~~t01440814696~~._1
458		-	let assetToPay = $~~t01440814696~~._2
	462	+	let amountToPay = $t01479215080._1
	463	+	let assetToPay = $t01479215080._2
459	464		invoke(poolAddr, "callFunction", ["exchange", ["1"]], [AttachedPayment(assetIdFromStr(assetToPay), amountToPay)])
460	465		}
461	466

465	470		let prFee = getIntegerValue(wxSwapContract, "%s__protocolFee")
466	471		let pFee = getIntegerValue(wxSwapContract, "%s__poolFee")
467	472		let feeScale = toBigInt(100000000)
468		-	let $~~t01517515483~~ = if ((assetTokenToGet == assetIdA))
	473	+	let $t01555915867 = if ((assetTokenToGet == assetIdA))
469	474		then {
470	475		let amountToPay = fraction(balA, amountTokenToGet, (balB - amountTokenToGet))
471	476		$Tuple2(amountToPay, assetIdB)

474	479		let amountToPay = fraction(balB, amountTokenToGet, (balA - amountTokenToGet))
475	480		$Tuple2(amountToPay, assetIdA)
476	481		}
477		-	let amountToPay = $~~t01517515483~~._1
478		-	let assetToPay = $~~t01517515483~~._2
	482	+	let amountToPay = $t01555915867._1
	483	+	let assetToPay = $t01555915867._2
479	484		let amountToPayWithFee = toInt(fraction(toBigInt(amountToPay), feeScale, (feeScale - toBigInt((prFee + pFee)))))
480	485		invoke(wxSwapContract, "swap", [1, assetTokenToGet, toString(this)], [AttachedPayment(assetIdFromStr(assetToPay), amountToPayWithFee)])
481	486		}

489	494		func withdrawAmountCalc (pool,userCanWithdraw,debt,borrowAsset) = {
490	495		let poolAddr = Address(fromBase58String(pool))
491	496		let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Unknown pool")
492		-	let $~~t01634816415~~ = getPoolData(poolAddr, pType)
493		-	let assetIdA = $~~t01634816415~~._1
494		-	let assetIdB = $~~t01634816415~~._2
495		-	let balA = $~~t01634816415~~._3
496		-	let balB = $~~t01634816415~~._4
	497	+	let $t01673216799 = getPoolData(poolAddr, pType)
	498	+	let assetIdA = $t01673216799._1
	499	+	let assetIdB = $t01673216799._2
	500	+	let balA = $t01673216799._3
	501	+	let balB = $t01673216799._4
497	502		let cBalABefore = accountBalance(assetIdFromStr(assetIdA))
498	503		if ((cBalABefore == cBalABefore))
499	504		then {

509	514		then {
510	515		let cBalAAfter = accountBalance(assetIdFromStr(assetIdA))
511	516		let cBalBAfter = accountBalance(assetIdFromStr(assetIdB))
512		-	let $~~t01692717016~~ = $Tuple2((cBalAAfter - cBalABefore), (cBalBAfter - cBalBBefore))
513		-	let tokensAmountA = $~~t01692717016~~._1
514		-	let tokensAmountB = $~~t01692717016~~._2
515		-	let $~~t01701917715~~ = if ((debt > 0))
	517	+	let $t01731117400 = $Tuple2((cBalAAfter - cBalABefore), (cBalBAfter - cBalBBefore))
	518	+	let tokensAmountA = $t01731117400._1
	519	+	let tokensAmountB = $t01731117400._2
	520	+	let $t01740318099 = if ((debt > 0))
516	521		then {
517	522		let amountToGetEx = if (if ((borrowAsset == assetIdA))
518	523		then (debt > tokensAmountA)

535	540		else throw("Strict value is not equal to itself.")
536	541		}
537	542		else $Tuple2(tokensAmountA, tokensAmountB)
538		-	let toUserAmountA = $~~t01701917715~~._1
539		-	let toUserAmountB = $~~t01701917715~~._2
	543	+	let toUserAmountA = $t01740318099._1
	544	+	let toUserAmountB = $t01740318099._2
540	545		$Tuple4(toUserAmountA, assetIdA, toUserAmountB, assetIdB)
541	546		}
542	547		else throw("Strict value is not equal to itself.")

547	552		}
548	553
549	554
	555	+	func parseRequest (requestId) = {
	556	+	let request = split(valueOrErrorMessage(getString(this, (requestId + kRequestId)), ("No request with id " + requestId)), ",")
	557	+	let user = request[0]
	558	+	let pool = request[1]
	559	+	let pmtA = parseIntValue(request[2])
	560	+	let AId = request[3]
	561	+	let pmtB = parseIntValue(request[4])
	562	+	let BId = request[5]
	563	+	let balA = parseIntValue(request[6])
	564	+	let balB = parseIntValue(request[7])
	565	+	let shareId = request[8]
	566	+	let bwAsset = request[9]
	567	+	let bwAmount = parseIntValue(request[10])
	568	+	$Tuple11(user, pool, pmtA, AId, pmtB, BId, balA, balB, shareId, bwAsset, bwAmount)
	569	+	}
	570	+
	571	+
550	572		@Callable(i)
551	573		func replenishREADONLY (pool,leverage,borrowAssetId) = if (if ((100 > leverage))
552	574		then true
553	575		else (leverage > 300))
554	576		then throw("Leverage can't be <100 and >300")
555	577		else {
556		-	let ~~type~~ = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
557		-	let $~~t01807818167~~ = getPoolData(Address(fromBase58String(pool)), ~~type~~)
558		-	let AId = $~~t01807818167~~._1
559		-	let BId = $~~t01807818167~~._2
560		-	let balA = $~~t01807818167~~._3
561		-	let balB = $~~t01807818167~~._4
562		-	let shareId = $~~t01807818167~~._5
563		-	let $~~t01817018807~~ = if ((size(i.payments) == 2))
	578	+	let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
	579	+	let $t01905319143 = getPoolData(Address(fromBase58String(pool)), pType)
	580	+	let AId = $t01905319143._1
	581	+	let BId = $t01905319143._2
	582	+	let balA = $t01905319143._3
	583	+	let balB = $t01905319143._4
	584	+	let shareId = $t01905319143._5
	585	+	let $t01914619783 = if ((size(i.payments) == 2))
564	586		then if ((assetIdToStr(i.payments[0].assetId) != AId))
565	587		then throw("Wrong payment asset A")
566	588		else if ((assetIdToStr(i.payments[1].assetId) != BId))

573	595		then $Tuple4(0, AId, i.payments[0].amount, BId)
574	596		else throw("Wrong payment")
575	597		else throw("One or two payments expected")
576		-	let pmtA = $~~t01817018807~~._1
577		-	let pmtAssetA = $~~t01817018807~~._2
578		-	let pmtB = $~~t01817018807~~._3
579		-	let pmtAssetB = $~~t01817018807~~._4
580		-	let $~~t01881020335~~ = if ((leverage > 100))
	598	+	let pmtA = $t01914619783._1
	599	+	let pmtAssetA = $t01914619783._2
	600	+	let pmtB = $t01914619783._3
	601	+	let pmtAssetB = $t01914619783._4
	602	+	let $t01978621297 = if ((leverage > 100))
581	603		then {
582	604		let dPriceA = ( let @ = invoke(priceOracleAddr, "getTWAP60", [pmtAssetA, false], nil)
583	605		if ($isInstanceOf(@, "(Int, Int)"))

589	611		else throw(($getType(@) + " couldn't be cast to (Int, Int)")))._1
590	612		let paydInDollar = (fraction(dPriceA, pmtA, pow(10, 0, getAssetDecimals(pmtAssetA), 0, 0, DOWN)) + fraction(dPriceB, pmtB, pow(10, 0, getAssetDecimals(pmtAssetB), 0, 0, DOWN)))
591	613		let borrowAmount = fraction(paydInDollar, (leverage - 100), 100)
592		-	let request = makeString([~~type,~~ toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, borrowAssetId, toString(borrowAmount), toString(1)], ",")
	614	+	let request = makeString([toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, borrowAssetId, toString(borrowAmount), toString(1)], ",")
593	615		let newRequestId = {
594	616		let @ = invoke(this, "createNewRequest", [request], nil)
595	617		if ($isInstanceOf(@, "Int"))

609	631		else throw("Strict value is not equal to itself.")
610	632		}
611	633		else $Tuple4(pmtA, pmtB, NO_LOAN_FEE, 0)
612		-	let paymentA = $t01881020335._1
613		-	let paymentB = $t01881020335._2
614		-	let feeType = $t01881020335._3
615		-	let borrowAmount = $t01881020335._4
616		-	let $t02033820732 = if ((type == SF_POOL))
617		-	then replenishSwopFi(pool, feeType, paymentA, pmtAssetA, paymentB, pmtAssetB, balA, balB, shareId)
618		-	else replenishWX(pool, feeType, pmtA, pmtAssetA, pmtB, pmtAssetB, shareId)
619		-	let userStaked = $t02033820732._1
620		-	let axlyFee = $t02033820732._2
621		-	let $t02073520860 = withdrawAmountCalc(pool, userStaked, borrowAmount, borrowAssetId)
622		-	if (($t02073520860 == $t02073520860))
	634	+	let paymentA = $t01978621297._1
	635	+	let paymentB = $t01978621297._2
	636	+	let feeType = $t01978621297._3
	637	+	let borrowAmount = $t01978621297._4
	638	+	let $t02130021412 = replenishByType(pType, pool, NO_LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
	639	+	let userStaked = $t02130021412._1
	640	+	let axlyFee = $t02130021412._2
	641	+	let $t02141621541 = withdrawAmountCalc(pool, userStaked, borrowAmount, borrowAssetId)
	642	+	if (($t02141621541 == $t02141621541))
623	643		then {
624		-	let assetIdB = $~~t02073520860~~._4
625		-	let toUserAmountB = $~~t02073520860~~._3
626		-	let assetIdA = $~~t02073520860~~._2
627		-	let toUserAmountA = $~~t02073520860~~._1
	644	+	let assetIdB = $t02141621541._4
	645	+	let toUserAmountB = $t02141621541._3
	646	+	let assetIdA = $t02141621541._2
	647	+	let toUserAmountA = $t02141621541._1
628	648		$Tuple2(nil, [userStaked, toUserAmountA, toUserAmountB])
629	649		}
630	650		else throw("Strict value is not equal to itself.")

633	653
634	654
635	655		@Callable(i)
636		-	func replenishFromLandReadOnly (requestId) = $Tuple2(nil, 11111)
	656	+	func replenishFromLandReadOnly (requestId) = {
	657	+	let $t02166521769 = parseRequest(requestId)
	658	+	let user = $t02166521769._1
	659	+	let pool = $t02166521769._2
	660	+	let pmtA = $t02166521769._3
	661	+	let AId = $t02166521769._4
	662	+	let pmtB = $t02166521769._5
	663	+	let BId = $t02166521769._6
	664	+	let balA = $t02166521769._7
	665	+	let balB = $t02166521769._8
	666	+	let shareId = $t02166521769._9
	667	+	let bwAsset = $t02166521769._10
	668	+	let bwAmount = $t02166521769._11
	669	+	if ((size(i.payments) != 1))
	670	+	then throw("Wrong payment size")
	671	+	else if (if ((assetIdToStr(i.payments[0].assetId) != bwAsset))
	672	+	then true
	673	+	else (i.payments[0].amount != bwAmount))
	674	+	then throw("Wrong payment")
	675	+	else {
	676	+	let $t02195922083 = if ((AId == bwAsset))
	677	+	then $Tuple2((pmtA + i.payments[0].amount), pmtB)
	678	+	else $Tuple2(pmtA, (pmtB + i.payments[0].amount))
	679	+	let pmtAllA = $t02195922083._1
	680	+	let pmtAllB = $t02195922083._2
	681	+	let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Unknown pool")
	682	+	let $t02216522274 = replenishByType(pType, pool, LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
	683	+	let userStaked = $t02216522274._1
	684	+	let axlyFee = $t02216522274._2
	685	+	nil
	686	+	}
	687	+	}
637	688
638	689
639	690

643	694		else (leverage > 300))
644	695		then throw("Leverage can't be <100 and >300")
645	696		else {
646		-	let ~~type~~ = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
647		-	let $~~t02130221391~~ = getPoolData(Address(fromBase58String(pool)), ~~type~~)
648		-	let AId = $~~t02130221391~~._1
649		-	let BId = $~~t02130221391~~._2
650		-	let balA = $~~t02130221391~~._3
651		-	let balB = $~~t02130221391~~._4
652		-	let shareId = $~~t02130221391~~._5
653		-	let $~~t02139422031~~ = if ((size(i.payments) == 2))
	697	+	let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Pool is not inited")
	698	+	let $t02258822678 = getPoolData(Address(fromBase58String(pool)), pType)
	699	+	let AId = $t02258822678._1
	700	+	let BId = $t02258822678._2
	701	+	let balA = $t02258822678._3
	702	+	let balB = $t02258822678._4
	703	+	let shareId = $t02258822678._5
	704	+	let $t02268123318 = if ((size(i.payments) == 2))
654	705		then if ((assetIdToStr(i.payments[0].assetId) != AId))
655	706		then throw("Wrong payment asset A")
656	707		else if ((assetIdToStr(i.payments[1].assetId) != BId))

663	714		then $Tuple4(0, AId, i.payments[0].amount, BId)
664	715		else throw("Wrong payment")
665	716		else throw("One or two payments expected")
666		-	let pmtA = $~~t02139422031~~._1
667		-	let pmtAssetA = $~~t02139422031~~._2
668		-	let pmtB = $~~t02139422031~~._3
669		-	let pmtAssetB = $~~t02139422031~~._4
	717	+	let pmtA = $t02268123318._1
	718	+	let pmtAssetA = $t02268123318._2
	719	+	let pmtB = $t02268123318._3
	720	+	let pmtAssetB = $t02268123318._4
670	721		let newPosNum = getNewUserPositionNumber(pool, toString(i.caller))
671	722		if ((leverage > 100))
672	723		then {

680	731		else throw(($getType(@) + " couldn't be cast to (Int, Int)")))._1
681	732		let paydInDollar = (fraction(dPriceA, pmtA, pow(10, 0, getAssetDecimals(pmtAssetA), 0, 0, DOWN)) + fraction(dPriceB, pmtB, pow(10, 0, getAssetDecimals(pmtAssetB), 0, 0, DOWN)))
682	733		let borrowAmount = fraction(paydInDollar, (leverage - 100), 100)
683		-	let request = makeString([~~type,~~ toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, borrowAssetId, toString(borrowAmount)~~, toString(newPosNum)~~], ",")
	734	+	let request = makeString([toString(i.caller), pool, toString(pmtA), pmtAssetA, toString(pmtB), pmtAssetB, toString(balA), toString(balB), shareId, borrowAssetId, toString(borrowAmount)], ",")
684	735		let newRequestId = {
685	736		let @ = invoke(this, "createNewRequest", [request], nil)
686	737		if ($isInstanceOf(@, "Int"))

698	749		else throw("Strict value is not equal to itself.")
699	750		}
700	751		else {
701		-	let $t02337223763 = if ((type == SF_POOL))
702		-	then replenishSwopFi(pool, NO_LOAN_FEE, pmtA, pmtAssetA, pmtB, pmtAssetB, balA, balB, shareId)
703		-	else replenishWX(pool, NO_LOAN_FEE, pmtA, pmtAssetA, pmtB, pmtAssetB, shareId)
704		-	let userStaked = $t02337223763._1
705		-	let axlyFee = $t02337223763._2
706		-	replenishEntries(pool, toString(i.caller), userStaked, axlyFee, newPosNum, shareId, type)
	752	+	let $t02461524727 = replenishByType(pType, pool, NO_LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
	753	+	let userStaked = $t02461524727._1
	754	+	let axlyFee = $t02461524727._2
	755	+	replenishEntries(pool, toString(i.caller), userStaked, axlyFee, newPosNum, shareId, pType)
707	756		}
708	757		}
709	758

711	760
712	761		@Callable(i)
713	762		func replenishFromLand (requestId) = {
714		-	let request = split(valueOrErrorMessage(getString(this, (requestId + kRequestId)), ("No request with id " + requestId)), ",")
	763	+	let $t02488924993 = parseRequest(requestId)
	764	+	let user = $t02488924993._1
	765	+	let pool = $t02488924993._2
	766	+	let pmtA = $t02488924993._3
	767	+	let AId = $t02488924993._4
	768	+	let pmtB = $t02488924993._5
	769	+	let BId = $t02488924993._6
	770	+	let balA = $t02488924993._7
	771	+	let balB = $t02488924993._8
	772	+	let shareId = $t02488924993._9
	773	+	let bwAsset = $t02488924993._10
	774	+	let bwAmount = $t02488924993._11
715	775		if ((size(i.payments) != 1))
716	776		then throw("Wrong payment size")
717		-	else if (if ((assetIdToStr(i.payments[0].assetId) != ~~request[10]~~))
	777	+	else if (if ((assetIdToStr(i.payments[0].assetId) != bwAsset))
718	778		then true
719		-	else (i.payments[0].amount != ~~parseIntValue(request[11]~~)))
	779	+	else (i.payments[0].amount != bwAmount))
720	780		then throw("Wrong payment")
721	781		else {
722		-	let pmtA = if ((request[4] == assetIdToStr(i.payments[0].assetId)))
723		-	then (parseIntValue(request[3]) + i.payments[0].amount)
724		-	else parseIntValue(request[3])
725		-	let pmtB = if ((request[6] == assetIdToStr(i.payments[0].assetId)))
726		-	then (parseIntValue(request[5]) + i.payments[0].amount)
727		-	else parseIntValue(request[3])
728		-	let pool = request[2]
729		-	let user = request[1]
730		-	let shareId = request[9]
731		-	let posNum = parseIntValue(request[12])
732		-	let $t02472125236 = if ((request[0] == SF_POOL))
733		-	then replenishSwopFi(pool, LOAN_FEE, pmtA, request[4], pmtB, request[6], parseIntValue(request[7]), parseIntValue(request[8]), shareId)
734		-	else if ((request[0] == WX_POOL))
735		-	then replenishWX(pool, LOAN_FEE, pmtA, request[4], pmtB, request[6], shareId)
736		-	else throw("Wrong request type")
737		-	let userStaked = $t02472125236._1
738		-	let axlyFee = $t02472125236._2
739		-	let borrowEntries = [IntegerEntry((((((request[2] + "_") + request[1]) + "_") + request[12]) + kUserBorrowAmount), i.payments[0].amount), StringEntry((((((request[2] + "_") + request[1]) + "_") + request[12]) + kUserBorrowAssetId), request[10])]
740		-	let entries = replenishEntries(pool, user, userStaked, axlyFee, posNum, shareId, request[0])
	782	+	let $t02518325307 = if ((AId == bwAsset))
	783	+	then $Tuple2((pmtA + i.payments[0].amount), pmtB)
	784	+	else $Tuple2(pmtA, (pmtB + i.payments[0].amount))
	785	+	let pmtAllA = $t02518325307._1
	786	+	let pmtAllB = $t02518325307._2
	787	+	let pType = valueOrErrorMessage(getString(this, (kPool + pool)), "Unknown pool")
	788	+	let $t02538925498 = replenishByType(pType, pool, LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
	789	+	let userStaked = $t02538925498._1
	790	+	let axlyFee = $t02538925498._2
	791	+	let posNum = getNewUserPositionNumber(pool, toString(i.caller))
	792	+	let borrowEntries = [IntegerEntry((((((pool + "_") + user) + "_") + toString(posNum)) + kUserBorrowAmount), bwAmount), StringEntry((((((pool + "_") + user) + "_") + toString(posNum)) + kUserBorrowAssetId), bwAsset)]
	793	+	let entries = replenishEntries(pool, user, userStaked, axlyFee, posNum, shareId, pType)
741	794		$Tuple2(((entries ++ borrowEntries) :+ DeleteEntry((requestId + kRequestId))), userStaked)
742	795		}
743	796		}

763	816		else throw(($getType(@) + " couldn't be cast to Int"))
764	817		}
765	818		else 0
766		-	let $~~t02664326763~~ = withdrawAmountCalc(pool, userCanWithdraw, debt, borrowAsset)
767		-	if (($~~t02664326763~~ == $~~t02664326763~~))
	819	+	let $t02694027060 = withdrawAmountCalc(pool, userCanWithdraw, debt, borrowAsset)
	820	+	if (($t02694027060 == $t02694027060))
768	821		then {
769		-	let assetIdB = $~~t02664326763~~._4
770		-	let toUserAmountB = $~~t02664326763~~._3
771		-	let assetIdA = $~~t02664326763~~._2
772		-	let toUserAmountA = $~~t02664326763~~._1
	822	+	let assetIdB = $t02694027060._4
	823	+	let toUserAmountB = $t02694027060._3
	824	+	let assetIdA = $t02694027060._2
	825	+	let toUserAmountA = $t02694027060._1
773	826		let closeDbtInv = if ((debt > 0))
774	827		then invoke(getLendSrvAddr(), "repayFor", [((user + "_") + toString(posId))], [AttachedPayment(assetIdFromStr(borrowAsset), debt)])
775	828		else 0

792	845
793	846		@Callable(i)
794	847		func capitalizeExKeeper (pool,type,tokenToId,amountToExchange,claim,amountsIn,addresses,assetsToReceive,estReceived,slippageTolerance,minReceived,options) = {
795		-	let $~~t02806028254~~ = if (claim)
	848	+	let $t02835728551 = if (claim)
796	849		then claimFarmed(type, pool)
797	850		else {
798	851		let claimedAsset = if ((type == SF_POOL))

800	853		else WXID
801	854		$Tuple2(amountToExchange, claimedAsset)
802	855		}
803		-	let claimedAmount = $~~t02806028254~~._1
804		-	let claimedAsset = $~~t02806028254~~._2
	856	+	let claimedAmount = $t02835728551._1
	857	+	let claimedAsset = $t02835728551._2
805	858		let exchangedAmount = exchangeKeeper(tokenToId, amountToExchange, claimedAsset, amountsIn, addresses, assetsToReceive, estReceived, slippageTolerance, minReceived, options)
806	859		let change = (claimedAmount - amountToExchange)
807	860		let changeEntry = if ((change > 0))

814	867
815	868		@Callable(i)
816	869		func capitalizeExPazzle (pool,type,tokenToId,amountToExchange,claim,routesStr,minToReceive,options) = {
817		-	let $~~t02891029104~~ = if (claim)
	870	+	let $t02920729401 = if (claim)
818	871		then claimFarmed(type, pool)
819	872		else {
820	873		let claimedAsset = if ((type == SF_POOL))

822	875		else WXID
823	876		$Tuple2(amountToExchange, claimedAsset)
824	877		}
825		-	let claimedAmount = $~~t02891029104~~._1
826		-	let claimedAsset = $~~t02891029104~~._2
	878	+	let claimedAmount = $t02920729401._1
	879	+	let claimedAsset = $t02920729401._2
827	880		let exchangedAmount = exchangePazzle(tokenToId, amountToExchange, claimedAsset, routesStr, minToReceive, options)
828	881		let change = (claimedAmount - amountToExchange)
829	882		let changeEntry = if ((change > 0))

836	889
837	890		@Callable(i)
838	891		func capitalizeExSwopFi (pool,type,tokenToId,amountToExchange,claim,exchangers,exchangersType,args1,args2,routingAssetsKeys,minAmountToReceive,options) = {
839		-	let $~~t02982730021~~ = if (claim)
	892	+	let $t03012430318 = if (claim)
840	893		then claimFarmed(type, pool)
841	894		else {
842	895		let claimedAsset = if ((type == SF_POOL))

844	897		else WXID
845	898		$Tuple2(amountToExchange, claimedAsset)
846	899		}
847		-	let claimedAmount = $~~t02982730021~~._1
848		-	let claimedAsset = $~~t02982730021~~._2
	900	+	let claimedAmount = $t03012430318._1
	901	+	let claimedAsset = $t03012430318._2
849	902		let exchangedAmount = exchangeSwopFi(tokenToId, amountToExchange, claimedAsset, exchangers, exchangersType, args1, args2, routingAssetsKeys, minAmountToReceive, options)
850	903		let change = (claimedAmount - amountToExchange)
851	904		let changeEntry = if ((change > 0))

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let SF_POOL = "SF"
5	5
6	6		let WX_POOL = "WX"
7	7
8	8		let CAP_FEE = "cap"
9	9
10	10		let LOAN_FEE = "loan"
11	11
12	12		let NO_LOAN_FEE = "noLoan"
13	13
14	14		let SCALE8 = 100000000
15	15
16	16		let SCALE10 = 10000000000
17	17
18	18		let FEE_SCALE6 = 1000000
19	19
20	20		let kSFPoolAAssetBalance = "A_asset_balance"
21	21
22	22		let kSFPoolBAssetBalance = "B_asset_balance"
23	23
24	24		let kSFPoolAAssetId = "A_asset_id"
25	25
26	26		let kSFPoolBAssetId = "B_asset_id"
27	27
28	28		let kSFPoolShareId = "share_asset_id"
29	29
30	30		let kSFPoolFee = "commission"
31	31
32	32		let kUserPosition = "_user_position"
33	33
34	34		let kUserBorrowAmount = "_user_position_borrow_amount"
35	35
36	36		let kUserBorrowAssetId = "_user_position_borrow_asset_id"
37	37
38	38		let kUserPositionNum = "_user_position_number"
39	39
40	40		let kUserPositionInterest = "_user_position_interest"
41	41
42	42		let kPoolTotal = "_pool_total"
43	43
44	44		let kPoolInterest = "_pool_interest"
45	45
46	46		let kAxlyInFeeWithoutLoan = "_axly_fee_without_loan"
47	47
48	48		let kAxlyInFeeWithLoan = "_axly_fee_with_loan"
49	49
50	50		let kAxlyCapFee = "_axly_fee_cap"
51	51
52	52		let kRequestId = "_request_id"
53	53
54	54		let kRequestIter = "requests_iter"
55	55
56	56		let kPool = "pool_"
57	57
58	58		let kPoolCapChange = "_pool_cap_change"
59	59
60	60		let kMoneyBox = "axly_money_box"
61	61
62	62		let kSFFarmingAddr = "swopfi_farming_addr"
63	63
64	64		let kLendService = "lend_service_addr"
65	65
66	66		let kPriceOracle = "price_oracle"
67	67
68	68		let kExContract = "exchange_contract"
69	69
70	70		let kWxSwapContract = "wx_swap_contract"
71	71
72	72		let moneyBox = Address(fromBase58String(valueOrErrorMessage(getString(this, kMoneyBox), "No axly moneyBox address")))
73	73
74	74		let exContract = Address(fromBase58String(valueOrErrorMessage(getString(this, kExContract), "No exchange contract address")))
75	75
76	76		let priceOracleAddr = Address(fromBase58String(valueOrErrorMessage(getString(this, kPriceOracle), "No price oracle address")))
77	77
78	78		let wxSwapContract = Address(fromBase58String(valueOrErrorMessage(getString(this, kWxSwapContract), "No wx swap address")))
79	79
80	80		let SWOPID = base58'4W19ndijcc2CsQa9HGW2dfXKTVXhnneWWttxXrtjPmEp'
81	81
82	82		let WXID = base58'EMAMLxDnv3xiz8RXg8Btj33jcEw3wLczL3JKYYmuubpc'
83	83
84	84		func isSelfCall (i) = if ((i.caller == this))
85	85		then unit
86	86		else throw("Only contract itself can call this function")
87	87
88	88
89	89		func accountBalance (assetId) = match assetId {
90	90		case id: ByteVector =>
91	91		assetBalance(this, id)
92	92		case waves: Unit =>
93	93		wavesBalance(this).available
94	94		case _ =>
95	95		throw("Match error")
96	96		}
97	97
98	98
99	99		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"))
100	100
101	101
102	102		func getWXPoolData (poolAddr) = {
103	103		let cfg = {
104	104		let @ = invoke(poolAddr, "getPoolConfigWrapperREADONLY", nil, nil)
105	105		if ($isInstanceOf(@, "List[Any]"))
106	106		then @
107	107		else throw(($getType(@) + " couldn't be cast to List[Any]"))
108	108		}
109	109		if ((cfg == cfg))
110	110		then $Tuple5(valueOrErrorMessage({
111	111		let @ = cfg[4]
112	112		if ($isInstanceOf(@, "String"))
113	113		then @
114	114		else unit
115	115		}, "Can't get pool A asset id"), valueOrErrorMessage({
116	116		let @ = cfg[5]
117	117		if ($isInstanceOf(@, "String"))
118	118		then @
119	119		else unit
120	120		}, "Can't get pool B asset id"), 0, 0, valueOrErrorMessage({
121	121		let @ = cfg[3]
122	122		if ($isInstanceOf(@, "String"))
123	123		then @
124	124		else unit
125	125		}, "Can't get pool LP asset id"))
126	126		else throw("Strict value is not equal to itself.")
127	127		}
128	128
129	129
130	130		func getPoolData (poolAddr,type) = if ((type == SF_POOL))
131	131		then getSFPoolData(poolAddr)
132	132		else if ((type == WX_POOL))
133	133		then getWXPoolData(poolAddr)
134	134		else throw("Wrong pool type")
135	135
136	136
137	137		func getPoolTotalShare (pool) = valueOrElse(getInteger(this, (pool + kPoolTotal)), 0)
138	138
139	139
140	140		func getNewUserPositionNumber (pool,user) = (valueOrElse(getInteger(this, (((pool + "_") + user) + kUserPositionNum)), 0) + 1)
141	141
142	142
143	143		func getAxlyFee (pool,feeType) = if ((feeType == "cap"))
144	144		then getIntegerValue(this, (pool + kAxlyCapFee))
145	145		else if ((feeType == "loan"))
146	146		then getIntegerValue(this, (pool + kAxlyInFeeWithLoan))
147	147		else if ((feeType == "noLoan"))
148	148		then getIntegerValue(this, (pool + kAxlyInFeeWithoutLoan))
149	149		else throw("Wrong fee type")
150	150
151	151
152	152		func getSFFarmingAddr () = Address(fromBase58String(valueOrErrorMessage(getString(this, kSFFarmingAddr), "Can't get swopfi farming addr")))
153	153
154	154
155	155		func getWXFarmingAddr (poolAddr) = {
156	156		let fContract = Address(fromBase58String(valueOrErrorMessage(getString(poolAddr, "%s__factoryContract"), "Can't get WX factory contract addr")))
157	157		let factroyCfg = split(valueOrErrorMessage(getString(fContract, "%s__factoryConfig"), "Can't get WX factory cfg"), "__")
158	158		Address(fromBase58String(factroyCfg[1]))
159	159		}
160	160
161	161
162	162		func getLendSrvAddr () = Address(fromBase58String(valueOrErrorMessage(getString(this, kLendService), "Can't get lend service addr")))
163	163
164	164
165	165		func assetIdToStr (assetId) = match assetId {
166	166		case id: ByteVector =>
167	167		toBase58String(id)
168	168		case waves: Unit =>
169	169		"WAVES"
170	170		case _ =>
171	171		throw("Match error")
172	172		}
173	173
174	174
175	175		func assetIdFromStr (assetId) = if ((assetId == "WAVES"))
176	176		then unit
177	177		else fromBase58String(assetId)
178	178
179	179
180	180		func getAssetDecimals (assetId) = if ((assetId == "WAVES"))
181	181		then 8
182	182		else match assetInfo(fromBase58String(assetId)) {
183	183		case asset: Asset =>
184	184		asset.decimals
185	185		case _ =>
186	186		throw("Can't find asset")
187	187		}
188	188
189	189
190	190		func replenishSwopFi (pool,feeType,pmtA,pmtAssetA,pmtB,pmtAssetB,balA,balB,shareId) = {
191	191		let shareBalanceBefore = accountBalance(fromBase58String(shareId))
192	192		if ((shareBalanceBefore == shareBalanceBefore))
193	193		then {
194	194		let poolAddr = Address(fromBase58String(pool))
195	195		let ratioA = fraction(SCALE8, pmtA, balA)
196	196		let ratioB = fraction(SCALE8, pmtB, balB)
197	197		let $t063976689 = if ((ratioB > ratioA))
198	198		then {
199	199		let pmt = fraction(balB, ratioA, SCALE8, CEILING)
200	200		$Tuple4(pmtA, pmt, (pmtB - pmt), pmtAssetB)
201	201		}
202	202		else {
203	203		let pmt = fraction(balA, ratioB, SCALE8, CEILING)
204	204		$Tuple4(pmt, pmtB, (pmtA - pmt), pmtAssetA)
205	205		}
206	206		let pmtAmountA = $t063976689._1
207	207		let pmtAmountB = $t063976689._2
208	208		let change = $t063976689._3
209	209		let changeAssetId = $t063976689._4
210	210		let inv1 = if (if ((pmtAmountA > 0))
211	211		then (pmtAmountB > 0)
212	212		else false)
213	213		then {
214	214		let payments = [AttachedPayment(assetIdFromStr(pmtAssetA), pmtAmountA), AttachedPayment(assetIdFromStr(pmtAssetB), pmtAmountB)]
215	215		invoke(poolAddr, "callFunction", ["replenishWithTwoTokens", ["false", "0"]], payments)
216	216		}
217	217		else 0
218	218		if ((inv1 == inv1))
219	219		then {
220	220		let inv2 = if ((change > 0))
221	221		then {
222	222		let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
223	223		let vars = ["0", "false", "0"]
224	224		invoke(poolAddr, "callFunction", ["replenishWithOneToken", vars], payments)
225	225		}
226	226		else 0
227	227		if ((inv2 == inv2))
228	228		then {
229	229		let shareBalanceAfter = accountBalance(fromBase58String(shareId))
230	230		let totalStaked = (shareBalanceAfter - shareBalanceBefore)
231	231		let axlyFeeAmount = fraction(totalStaked, getAxlyFee(pool, feeType), FEE_SCALE6)
232	232		let userShareForStake = (totalStaked - axlyFeeAmount)
233	233		if ((0 >= userShareForStake))
234	234		then throw("amount of staked sharetokens must be > 0")
235	235		else {
236	236		let inv3 = invoke(getSFFarmingAddr(), "lockShareTokens", [pool, 0], [AttachedPayment(fromBase58String(shareId), userShareForStake)])
237	237		if ((inv3 == inv3))
238	238		then $Tuple2(userShareForStake, axlyFeeAmount)
239	239		else throw("Strict value is not equal to itself.")
240	240		}
241	241		}
242	242		else throw("Strict value is not equal to itself.")
243	243		}
244	244		else throw("Strict value is not equal to itself.")
245	245		}
246	246		else throw("Strict value is not equal to itself.")
247	247		}
248	248
249	249
250	250		func replenishWX (pool,feeType,pmtA,pmtAssetA,pmtB,pmtAssetB,shareId) = {
251	251		let poolAddr = Address(fromBase58String(pool))
252	252		let $t081408989 = if (if ((pmtA > 0))
253	253		then (pmtB > 0)
254	254		else false)
255	255		then {
256	256		let evalPutInA = split({
257	257		let @ = invoke(poolAddr, "evaluatePutByAmountAssetREADONLY", [pmtA], nil)
258	258		if ($isInstanceOf(@, "String"))
259	259		then @
260	260		else throw(($getType(@) + " couldn't be cast to String"))
261	261		}, "__")
262	262		if ((evalPutInA == evalPutInA))
263	263		then {
264	264		let evalPutInB = split({
265	265		let @ = invoke(poolAddr, "evaluatePutByPriceAssetREADONLY", [pmtB], nil)
266	266		if ($isInstanceOf(@, "String"))
267	267		then @
268	268		else throw(($getType(@) + " couldn't be cast to String"))
269	269		}, "__")
270	270		if ((evalPutInB == evalPutInB))
271	271		then {
272	272		let lpInA = parseIntValue(evalPutInA[1])
273	273		let lpInB = parseIntValue(evalPutInB[1])
274	274		if ((lpInB > lpInA))
275	275		then {
276	276		let pmtInB = parseIntValue(evalPutInA[8])
277	277		$Tuple4(pmtA, pmtInB, (pmtB - pmtInB), pmtAssetB)
278	278		}
279	279		else {
280	280		let pmtInA = parseIntValue(evalPutInB[7])
281	281		$Tuple4(pmtInA, pmtB, (pmtA - pmtInA), pmtAssetA)
282	282		}
283	283		}
284	284		else throw("Strict value is not equal to itself.")
285	285		}
286	286		else throw("Strict value is not equal to itself.")
287	287		}
288	288		else if ((pmtA > 0))
289	289		then $Tuple4(pmtA, pmtB, pmtA, pmtAssetA)
290	290		else if ((pmtB > 0))
291	291		then $Tuple4(pmtA, pmtB, pmtB, pmtAssetB)
292	292		else throw("pmts must be > 0")
293	293		let pmtAmountA = $t081408989._1
294	294		let pmtAmountB = $t081408989._2
295	295		let change = $t081408989._3
296	296		let changeAssetId = $t081408989._4
297	297		let shareBalanceBefore = accountBalance(fromBase58String(shareId))
298	298		if ((shareBalanceBefore == shareBalanceBefore))
299	299		then {
300	300		let inv1 = if (if ((pmtAmountA > 0))
301	301		then (pmtAmountB > 0)
302	302		else false)
303	303		then {
304	304		let payments = [AttachedPayment(assetIdFromStr(pmtAssetA), pmtAmountA), AttachedPayment(assetIdFromStr(pmtAssetB), pmtAmountB)]
305	305		invoke(poolAddr, "put", [1000000, false], payments)
306	306		}
307	307		else 0
308	308		if ((inv1 == inv1))
309	309		then {
310	310		let inv2 = if ((change > 0))
311	311		then {
312	312		let payments = [AttachedPayment(assetIdFromStr(changeAssetId), change)]
313	313		invoke(poolAddr, "putOneTkn", [0, false], payments)
314	314		}
315	315		else 0
316	316		if ((inv2 == inv2))
317	317		then {
318	318		let shareBalanceAfter = accountBalance(fromBase58String(shareId))
319	319		let totalStaked = (shareBalanceAfter - shareBalanceBefore)
320	320		let axlyFeeAmount = fraction(totalStaked, getAxlyFee(pool, feeType), FEE_SCALE6)
321	321		let userShareForStake = (totalStaked - axlyFeeAmount)
322	322		if ((0 >= userShareForStake))
323	323		then throw("amount of staked sharetokens must be > 0")
324	324		else {
325	325		let inv3 = invoke(getWXFarmingAddr(poolAddr), "stake", nil, [AttachedPayment(fromBase58String(shareId), userShareForStake)])
326	326		if ((inv3 == inv3))
327	327		then $Tuple2(userShareForStake, axlyFeeAmount)
328	328		else throw("Strict value is not equal to itself.")
329	329		}
330	330		}
331	331		else throw("Strict value is not equal to itself.")
332	332		}
333	333		else throw("Strict value is not equal to itself.")
334	334		}
335	335		else throw("Strict value is not equal to itself.")
336	336		}
337	337
338	338
	339	+	func replenishByType (type,pool,feeType,pmtA,AId,pmtB,BId,balA,balB,shareId) = if ((type == SF_POOL))
	340	+	then replenishSwopFi(pool, LOAN_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
	341	+	else if ((type == WX_POOL))
	342	+	then replenishWX(pool, LOAN_FEE, pmtA, AId, pmtB, BId, shareId)
	343	+	else throw("Wrong pool type")
	344	+
	345	+
339	346		func replenishEntries (pool,user,stakedAmount,axlyFeeAmount,posNum,shareId,type) = {
340	347		let totalAmount = getPoolTotalShare(pool)
341	348		let curPoolInterest = getIntegerValue(this, (pool + kPoolInterest))
342	349		[IntegerEntry((pool + kPoolTotal), (totalAmount + stakedAmount)), IntegerEntry((((((pool + "_") + user) + "_") + toString(posNum)) + kUserPosition), stakedAmount), IntegerEntry((((((pool + "_") + user) + "_") + toString(posNum)) + kUserPositionInterest), curPoolInterest), IntegerEntry((((pool + "_") + user) + kUserPositionNum), posNum), ScriptTransfer(moneyBox, axlyFeeAmount, fromBase58String(shareId))]
343	350		}
344	351
345	352
346	353		func claimFarmed (type,pool) = if ((type == SF_POOL))
347	354		then {
348	355		let balBefore = accountBalance(SWOPID)
349	356		if ((balBefore == balBefore))
350	357		then {
351	358		let inv = invoke(getSFFarmingAddr(), "claim", [pool], nil)
352	359		if ((inv == inv))
353	360		then {
354	361		let balAfter = accountBalance(SWOPID)
355	362		$Tuple2((balAfter - balBefore), SWOPID)
356	363		}
357	364		else throw("Strict value is not equal to itself.")
358	365		}
359	366		else throw("Strict value is not equal to itself.")
360	367		}
361	368		else if ((type == WX_POOL))
362	369		then {
363	370		let balBefore = accountBalance(WXID)
364	371		if ((balBefore == balBefore))
365	372		then {
366	373		let inv = invoke(getWXFarmingAddr(Address(fromBase58String(pool))), "claimWX", [pool], nil)
367	374		if ((inv == inv))
368	375		then {
369	376		let balAfter = accountBalance(WXID)
370	377		$Tuple2((balAfter - balBefore), WXID)
371	378		}
372	379		else throw("Strict value is not equal to itself.")
373	380		}
374	381		else throw("Strict value is not equal to itself.")
375	382		}
376	383		else throw("Wrong pool type")
377	384
378	385
379	386		func exchangeKeeper (toToken,pmtAmount,pmtAsset,amountsIn,addresses,assetsToReceive,estReceived,slippageTolerance,minReceived,options) = {
380	387		let tokenBalanceBefore = accountBalance(assetIdFromStr(toToken))
381	388		if ((tokenBalanceBefore == tokenBalanceBefore))
382	389		then {
383	390		let inv = invoke(exContract, "swap", [amountsIn, addresses, assetsToReceive, estReceived, slippageTolerance, minReceived, options], [AttachedPayment(pmtAsset, pmtAmount)])
384	391		if ((inv == inv))
385	392		then (accountBalance(assetIdFromStr(toToken)) - tokenBalanceBefore)
386	393		else throw("Strict value is not equal to itself.")
387	394		}
388	395		else throw("Strict value is not equal to itself.")
389	396		}
390	397
391	398
392	399		func exchangePazzle (toToken,pmtAmount,pmtAsset,routesStr,minToReceive,options) = {
393	400		let tokenBalanceBefore = accountBalance(assetIdFromStr(toToken))
394	401		if ((tokenBalanceBefore == tokenBalanceBefore))
395	402		then {
396	403		let inv = invoke(exContract, "puzzleSwap", [routesStr, minToReceive, options], [AttachedPayment(pmtAsset, pmtAmount)])
397	404		if ((inv == inv))
398	405		then (accountBalance(assetIdFromStr(toToken)) - tokenBalanceBefore)
399	406		else throw("Strict value is not equal to itself.")
400	407		}
401	408		else throw("Strict value is not equal to itself.")
402	409		}
403	410
404	411
405	412		func exchangeSwopFi (toToken,pmtAmount,pmtAsset,exchangers,exchangersType,args1,args2,routingAssetsKeys,minAmountToReceive,options) = {
406	413		let tokenBalanceBefore = accountBalance(assetIdFromStr(toToken))
407	414		if ((tokenBalanceBefore == tokenBalanceBefore))
408	415		then {
409	416		let inv = invoke(exContract, "swopfiSwap", [exchangers, exchangersType, args1, args2, routingAssetsKeys, minAmountToReceive, options], [AttachedPayment(pmtAsset, pmtAmount)])
410	417		if ((inv == inv))
411	418		then (accountBalance(assetIdFromStr(toToken)) - tokenBalanceBefore)
412	419		else throw("Strict value is not equal to itself.")
413	420		}
414	421		else throw("Strict value is not equal to itself.")
415	422		}
416	423
417	424
418		-	func capitalize (pool,~~type~~,tokenId,tokenAmount) = {
	425	+	func capitalize (pool,pType,tokenId,tokenAmount) = {
419	426		let poolAddr = Address(fromBase58String(pool))
420		-	let $~~t01319013268~~ = getPoolData(poolAddr, ~~type~~)
421		-	let AId = $~~t01319013268~~._1
422		-	let BId = $~~t01319013268~~._2
423		-	let balA = $~~t01319013268~~._3
424		-	let balB = $~~t01319013268~~._4
425		-	let shareId = $~~t01319013268~~._5
426		-	let $~~t01327113351~~ = if ((tokenId == AId))
	427	+	let $t01382413903 = getPoolData(poolAddr, pType)
	428	+	let AId = $t01382413903._1
	429	+	let BId = $t01382413903._2
	430	+	let balA = $t01382413903._3
	431	+	let balB = $t01382413903._4
	432	+	let shareId = $t01382413903._5
	433	+	let $t01390613986 = if ((tokenId == AId))
427	434		then $Tuple2(tokenAmount, 0)
428	435		else $Tuple2(0, tokenAmount)
429		-	let pmtA = $t01327113351._1
430		-	let pmtB = $t01327113351._2
431		-	let $t01335413715 = if ((type == SF_POOL))
432		-	then replenishSwopFi(pool, CAP_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
433		-	else replenishWX(pool, CAP_FEE, pmtA, AId, pmtB, BId, shareId)
434		-	let stakedAmount = $t01335413715._1
435		-	let axlyFee = $t01335413715._2
	436	+	let pmtA = $t01390613986._1
	437	+	let pmtB = $t01390613986._2
	438	+	let $t01398914099 = replenishByType(pType, pool, CAP_FEE, pmtA, AId, pmtB, BId, balA, balB, shareId)
	439	+	let stakedAmount = $t01398914099._1
	440	+	let axlyFee = $t01398914099._2
436	441		let curPoolInterest = valueOrElse(getInteger(this, (pool + kPoolInterest)), 0)
437	442		let totalShareAmount = getPoolTotalShare(pool)
438	443		let newInterest = (curPoolInterest + fraction(stakedAmount, SCALE10, totalShareAmount))
439	444		[IntegerEntry((pool + kPoolInterest), newInterest), ScriptTransfer(moneyBox, axlyFee, fromBase58String(shareId))]
440	445		}
441	446
442	447
443	448		func exchangeDirectlySF (pool,assetIdA,assetIdB,balA,balB,amountTokenToGet,assetTokenToGet) = {
444	449		let poolAddr = Address(fromBase58String(pool))
445	450		let feeScale6 = 1000000
446	451		let fee = getIntegerValue(poolAddr, kSFPoolFee)
447	452		let amntGetNoFee = fraction(amountTokenToGet, feeScale6, (feeScale6 - fee))
448		-	let $~~t01440814696~~ = if ((assetTokenToGet == assetIdA))
	453	+	let $t01479215080 = if ((assetTokenToGet == assetIdA))
449	454		then {
450	455		let amountToPay = fraction(balA, amntGetNoFee, (balB - amntGetNoFee))
451	456		$Tuple2(amountToPay, assetIdB)
452	457		}
453	458		else {
454	459		let amountToPay = fraction(balB, amntGetNoFee, (balA - amntGetNoFee))
455	460		$Tuple2(amountToPay, assetIdA)
456	461		}
457		-	let amountToPay = $~~t01440814696~~._1
458		-	let assetToPay = $~~t01440814696~~._2
	462	+	let amountToPay = $t01479215080._1
	463	+	let assetToPay = $t01479215080._2
459	464		invoke(poolAddr, "callFunction", ["exchange", ["1"]], [AttachedPayment(assetIdFromStr(assetToPay), amountToPay)])
460	465		}
461	466
462	467
463	468		func exchangeDirectlyWX (pool,assetIdA,assetIdB,balA,balB,amountTokenToGet,assetTokenToGet) = {
464	469		let poolAddr = Address(fromBase58String(pool))
465	470		let prFee = getIntegerValue(wxSwapContract, "%s__protocolFee")
466	471		let pFee = getIntegerValue(wxSwapContract, "%s__poolFee")
467	472		let feeScale = toBigInt(100000000)
468		-	let $~~t01517515483~~ = if ((assetTokenToGet == assetIdA))
	473	+	let $t01555915867 = if ((assetTokenToGet == assetIdA))
469	474		then {
470	475		let amountToPay = fraction(balA, amountTokenToGet, (balB - amountTokenToGet))
471	476		$Tuple2(amountToPay, assetIdB)
472	477		}
473	478		else {
474	479		let amountToPay = fraction(balB, amountTokenToGet, (balA - amountTokenToGet))
475	480		$Tuple2(amountToPay, assetIdA)
476	481		}

github/deemru/w8io/026f985 
115.10 ms ◑