w8 · tx · 2ic···jR3

tx · 2icez2g867thjogz3SFHVGVtZqNGm74UWCEj7rDwojR3

3MyeMZm2BLBkcgK2VBeTU8h1n562iB3zA2Z:  -0.02900000 Waves

2022.09.13 00:26 [2226437] smart account 3MyeMZm2BLBkcgK2VBeTU8h1n562iB3zA2Z > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2icez2g867thjogz3SFHVGVtZqNGm74UWCEj7rDwojR3",
    "fee": 2900000,
    "feeAssetId": null,
    "timestamp": 1663017988210,
    "version": 2,
    "chainId": 84,
    "sender": "3MyeMZm2BLBkcgK2VBeTU8h1n562iB3zA2Z",
    "senderPublicKey": "5bHbDgAVwbyzkor8HrHKU8zcg5RfwKy3rNihVqk8YUvP",
    "proofs": [
        "2rYD6DqE3HknfQo4CMLzbjTRZCc8nYYVRM1gJcL8wok8XWj2sRBuXByt5J3PEHVTorK9ectQcQPPUNcGkGrquo3b"
    ],
    "script": "base64:BgJ/CAISAwoBCBIDCgEIEgASBAoCAQQSBwoFAQEBAQQSAwoBARIAEgcKBQEBAQgBEgQKAgEBEgMKAQESBAoCCAgSBAoCCAgSBAoCCAESABIDCgEIEgUKAwEBARIECgIIARIECgIBARIECgIICBILCgkIAQECAQIIBAQSBgoECAgBCE8AD2RlZmF1bHREZWNpbWFscwDAhD0ABnNjYWxlOACAwtcvAAxzY2FsZThCaWdJbnQJALYCAQCAwtcvAAdzY2FsZTE4CQC2AgEAgICQu7rWrfANAAp6ZXJvQmlnSW50CQC2AgEAAAAJb25lQmlnSW50CQC2AgEAAQAKc2xpcHBhZ2U0RAkAtgIBCQBlAgUGc2NhbGU4CQBpAgkAaAIFBnNjYWxlOAABBQZzY2FsZTgABUFtdWx0AgMxMDAABURjb252AgExAANTRVACAl9fAAVFTVBUWQIAAApQb29sQWN0aXZlAAEAClBvb2xQdXREaXMAAgAOUG9vbE1hdGNoZXJEaXMAAwAMUG9vbFNodXRkb3duAAQADmlkeFBvb2xBZGRyZXNzAAEACWlkeFBvb2xTdAACAAlpZHhMUEFzSWQAAwAJaWR4QW1Bc0lkAAQACWlkeFByQXNJZAAFAAtpZHhBbXRBc0RjbQAGAA1pZHhQcmljZUFzRGNtAAcAC2lkeElBbXRBc0lkAAgADWlkeElQcmljZUFzSWQACQAPaWR4RmFjdFN0YWtDbnRyAAEAEGlkeEZhY3RTbGlwcENudHIABwARaWR4RmFjdEd3eFJld0NudHIACgAFZGVsYXkCCSVzX19kZWxheQECdDECB29yaWdWYWwNb3JpZ1NjYWxlTXVsdAkAvAIDCQC2AgEFB29yaWdWYWwFB3NjYWxlMTgJALYCAQUNb3JpZ1NjYWxlTXVsdAECZjECA3ZhbA9yZXN1bHRTY2FsZU11bHQJAKADAQkAvAIDBQN2YWwJALYCAQUPcmVzdWx0U2NhbGVNdWx0BQdzY2FsZTE4AQJ0cwMDYW10CHJlc1NjYWxlCGN1clNjYWxlCQBrAwUDYW10BQhyZXNTY2FsZQUIY3VyU2NhbGUBA2FicwEDdmFsAwkAvwICBQp6ZXJvQmlnSW50BQN2YWwJAL4CAQUDdmFsBQN2YWwBAmZjAAITJXNfX2ZhY3RvcnlDb250cmFjdAEDbXBrAAIUJXNfX21hbmFnZXJQdWJsaWNLZXkBBHBtcGsAAhslc19fcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkBAnBsAAIRJXMlc19fcHJpY2VfX2xhc3QBAnBoAgFoAXQJALkJAgkAzAgCAhglcyVzJWQlZF9fcHJpY2VfX2hpc3RvcnkJAMwIAgkApAMBBQFoCQDMCAIJAKQDAQUBdAUDbmlsBQNTRVABA3BhdQICdWEEdHhJZAkArAICCQCsAgIJAKwCAgILJXMlcyVzX19QX18FAnVhAgJfXwUEdHhJZAEDZ2F1AgJ1YQR0eElkCQCsAgIJAKwCAgkArAICAgslcyVzJXNfX0dfXwUCdWECAl9fBQR0eElkAQJhYQACDyVzX19hbW91bnRBc3NldAECcGEAAg4lc19fcHJpY2VBc3NldAEDYW1wAAIHJXNfX2FtcAEDYWRhAAINJXNfX2FkZG9uQWRkcgEFbGdvdGMBBmNhbGxlcgkAuQkCCQDMCAICFyVzJXNfX2xhc3RHZXRPbmVUa25DYWxsCQDMCAIFBmNhbGxlcgUDbmlsBQNTRVABBWxzb3RjAQZjYWxsZXIJALkJAgkAzAgCAhclcyVzX19sYXN0UHV0T25lVGtuQ2FsbAkAzAgCBQZjYWxsZXIFA25pbAUDU0VQAQRmY2ZnAAIRJXNfX2ZhY3RvcnlDb25maWcBBG10cGsAAhglcyVzX19tYXRjaGVyX19wdWJsaWNLZXkBAnBjAgZpQW10QXMFaVByQXMJAKwCAgkArAICCQCsAgIJAKwCAgIIJWQlZCVzX18FBmlBbXRBcwICX18FBWlQckFzAghfX2NvbmZpZwEDbWJhAQViQVN0cgkArAICAiglcyVzJXNfX21hcHBpbmdzX19iYXNlQXNzZXQyaW50ZXJuYWxJZF9fBQViQVN0cgEDYXBzAAIMJXNfX3NodXRkb3duARxrZXlBbGxvd2VkTHBTdGFibGVTY3JpcHRIYXNoAAIdJXNfX2FsbG93ZWRMcFN0YWJsZVNjcmlwdEhhc2gBA3RvZQMDb3JWBnNlbmRyVgZtYXRjaFYJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIRRmFpbGVkOiBvcmRWYWxpZD0JAKUDAQUDb3JWAgsgc25kclZhbGlkPQkApQMBBQZzZW5kclYCDCBtdGNoclZhbGlkPQkApQMBBQZtYXRjaFYBA3N0cgEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAZ2YWxTdHIFByRtYXRjaDAFBnZhbFN0cgkAAgECE2ZhaWwgY2FzdCB0byBTdHJpbmcBBHN0cmYCBGFkZHIDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEYWRkcgUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFBGFkZHIJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIMIG5vdCBkZWZpbmVkBQNuaWwCAAEEaW50ZgIEYWRkcgNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQRhZGRyBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUEYWRkcgkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAgwgbm90IGRlZmluZWQFA25pbAIAAANmY2EJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQRzdHJmAgUEdGhpcwkBAmZjAAABQQkBBHN0cmYCBQR0aGlzCQEDYW1wAAEDaWdzAAkBC3ZhbHVlT3JFbHNlAgkAmwgCBQNmY2EJAQNhcHMABwECbXAACQDZBAEJAQRzdHJmAgUDZmNhCQEEbXRwawABA2dwYwAEBWFtdEFzCQEEc3RyZgIFBHRoaXMJAQJhYQAEB3ByaWNlQXMJAQRzdHJmAgUEdGhpcwkBAnBhAAQIaVByaWNlQXMJAQRpbnRmAgUDZmNhCQEDbWJhAQUHcHJpY2VBcwQGaUFtdEFzCQEEaW50ZgIFA2ZjYQkBA21iYQEFBWFtdEFzCQC1CQIJAQRzdHJmAgUDZmNhCQECcGMCCQCkAwEFBmlBbXRBcwkApAMBBQhpUHJpY2VBcwUDU0VQAQNnZmMACQC1CQIJAQRzdHJmAgUDZmNhCQEEZmNmZwAFA1NFUAERZGF0YVB1dEFjdGlvbkluZm8KDWluQW10QXNzZXRBbXQPaW5QcmljZUFzc2V0QW10CG91dExwQW10BXByaWNlCnNsaXBCeVVzZXIMc2xpcHBhZ2VSZWFsCHR4SGVpZ2h0C3R4VGltZXN0YW1wDHNsaXBhZ2VBbUFtdAxzbGlwYWdlUHJBbXQJALkJAgkAzAgCAhQlZCVkJWQlZCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFDWluQW10QXNzZXRBbXQJAMwIAgkApAMBBQ9pblByaWNlQXNzZXRBbXQJAMwIAgkApAMBBQhvdXRMcEFtdAkAzAgCCQCkAwEFBXByaWNlCQDMCAIJAKQDAQUKc2xpcEJ5VXNlcgkAzAgCCQCkAwEFDHNsaXBwYWdlUmVhbAkAzAgCCQCkAwEFCHR4SGVpZ2h0CQDMCAIJAKQDAQULdHhUaW1lc3RhbXAJAMwIAgkApAMBBQxzbGlwYWdlQW1BbXQJAMwIAgkApAMBBQxzbGlwYWdlUHJBbXQFA25pbAUDU0VQARFkYXRhR2V0QWN0aW9uSW5mbwYOb3V0QW10QXNzZXRBbXQQb3V0UHJpY2VBc3NldEFtdAdpbkxwQW10BXByaWNlCHR4SGVpZ2h0C3R4VGltZXN0YW1wCQC5CQIJAMwIAgIMJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUOb3V0QW10QXNzZXRBbXQJAMwIAgkApAMBBRBvdXRQcmljZUFzc2V0QW10CQDMCAIJAKQDAQUHaW5McEFtdAkAzAgCCQCkAwEFBXByaWNlCQDMCAIJAKQDAQUIdHhIZWlnaHQJAMwIAgkApAMBBQt0eFRpbWVzdGFtcAUDbmlsBQNTRVABDWdldEFjY0JhbGFuY2UBB2Fzc2V0SWQDCQAAAgUHYXNzZXRJZAIFV0FWRVMICQDvBwEFBHRoaXMJYXZhaWxhYmxlCQDwBwIFBHRoaXMJANkEAQUHYXNzZXRJZAEEY3BiaQIIcHJBbXRYMTgIYW1BbXRYMTgJALwCAwUIcHJBbXRYMTgFB3NjYWxlMTgFCGFtQW10WDE4AQN2YWQDAkExAkEyCHNsaXBwYWdlBARkaWZmCQC8AgMJALgCAgUCQTEFAkEyBQxzY2FsZThCaWdJbnQFAkEyBARwYXNzCQC/AgIJALgCAgUIc2xpcHBhZ2UJAQNhYnMBBQRkaWZmBQp6ZXJvQmlnSW50AwkBASEBBQRwYXNzCQACAQkArAICAgpCaWcgc2xwZzogCQCmAwEFBGRpZmYJAJQKAgUEcGFzcwkAmQMBCQDMCAIFAkExCQDMCAIFAkEyBQNuaWwBAnZkAwJEMQJEMARzbHBnBARkaWZmCQC8AgMFAkQwBQxzY2FsZThCaWdJbnQFAkQxBARmYWlsCQC/AgIFBHNscGcFBGRpZmYDAwUEZmFpbAYJAL8CAgUCRDAFAkQxCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkApgMBBQJEMAIBIAkApgMBBQJEMQIBIAkApgMBBQRkaWZmAgEgCQCmAwEFBHNscGcFBGZhaWwBA3BjcAQKYW1Bc3NldERjbQpwckFzc2V0RGNtBWFtQW10BXByQW10BAthbXRBc0FtdFgxOAkBAnQxAgUFYW1BbXQFCmFtQXNzZXREY20ECnByQXNBbXRYMTgJAQJ0MQIFBXByQW10BQpwckFzc2V0RGNtCQEEY3BiaQIFCnByQXNBbXRYMTgFC2FtdEFzQW10WDE4AQpjYWxjUHJpY2VzAwVhbUFtdAVwckFtdAVscEFtdAQDY2ZnCQEDZ3BjAAQIYW10QXNEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFC2lkeEFtdEFzRGNtBAdwckFzRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQ1pZHhQcmljZUFzRGNtBAhwcmljZVgxOAkBA3BjcAQFCGFtdEFzRGNtBQdwckFzRGNtBQVhbUFtdAUFcHJBbXQECGFtQW10WDE4CQECdDECBQVhbUFtdAUIYW10QXNEY20ECHByQW10WDE4CQECdDECBQVwckFtdAUHcHJBc0RjbQQIbHBBbXRYMTgJAQJ0MQIFBWxwQW10BQZzY2FsZTgEDWxwUHJJbkFtQXNYMTgJAQRjcGJpAgUIYW1BbXRYMTgFCGxwQW10WDE4BA1scFBySW5QckFzWDE4CQEEY3BiaQIFCHByQW10WDE4BQhscEFtdFgxOAkAzAgCBQhwcmljZVgxOAkAzAgCBQ1scFBySW5BbUFzWDE4CQDMCAIFDWxwUHJJblByQXNYMTgFA25pbAEPY2FsY3VsYXRlUHJpY2VzAwVhbUFtdAVwckFtdAVscEFtdAQBcAkBCmNhbGNQcmljZXMDBQVhbUFtdAUFcHJBbXQFBWxwQW10CQDMCAIJAQJmMQIJAJEDAgUBcAAABQZzY2FsZTgJAMwIAgkBAmYxAgkAkQMCBQFwAAEFBnNjYWxlOAkAzAgCCQECZjECCQCRAwIFAXAAAgUGc2NhbGU4BQNuaWwBA2VnbwQGdHhJZDU4CnBtdEFzc2V0SWQIcG10THBBbXQLdXNlckFkZHJlc3MEA2NmZwkBA2dwYwAEBGxwSWQJAJEDAgUDY2ZnBQlpZHhMUEFzSWQEBGFtSWQJAJEDAgUDY2ZnBQlpZHhBbUFzSWQEBHBySWQJAJEDAgUDY2ZnBQlpZHhQckFzSWQEBWFtRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQtpZHhBbXRBc0RjbQQFcHJEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFDWlkeFByaWNlQXNEY20EA3N0cwkAkQMCBQNjZmcFCWlkeFBvb2xTdAQHbHBFbWlzcwgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBCQDZBAEFBGxwSWQCC1dyb25nIExQIGlkCHF1YW50aXR5AwkBAiE9AgUEbHBJZAUKcG10QXNzZXRJZAkAAgECD1dyb25nIHBtdCBhc3NldAQJYW1CYWxhbmNlCQENZ2V0QWNjQmFsYW5jZQEFBGFtSWQECXByQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQRwcklkBBxhbW91bnRCYWxhbmNlRGVmYXVsdERlY2ltYWxzCQBrAwUJYW1CYWxhbmNlBQ9kZWZhdWx0RGVjaW1hbHMFBWFtRGNtBBtwcmljZUJhbGFuY2VEZWZhdWx0RGVjaW1hbHMJAGsDBQlwckJhbGFuY2UFD2RlZmF1bHREZWNpbWFscwUFcHJEY20EDGFtQmFsYW5jZVgxOAkBAnQxAgUcYW1vdW50QmFsYW5jZURlZmF1bHREZWNpbWFscwUPZGVmYXVsdERlY2ltYWxzBAxwckJhbGFuY2VYMTgJAQJ0MQIFG3ByaWNlQmFsYW5jZURlZmF1bHREZWNpbWFscwUPZGVmYXVsdERlY2ltYWxzBAtjdXJQcmljZVgxOAkBBGNwYmkCBQxwckJhbGFuY2VYMTgFDGFtQmFsYW5jZVgxOAQIY3VyUHJpY2UJAQJmMQIFC2N1clByaWNlWDE4BQZzY2FsZTgEC3BtdExwQW10WDE4CQECdDECBQhwbXRMcEFtdAUGc2NhbGU4BApscEVtaXNzWDE4CQECdDECBQdscEVtaXNzBQZzY2FsZTgEC291dEFtQW10WDE4CQC8AgMFDGFtQmFsYW5jZVgxOAULcG10THBBbXRYMTgFCmxwRW1pc3NYMTgEC291dFByQW10WDE4CQC8AgMFDHByQmFsYW5jZVgxOAULcG10THBBbXRYMTgFCmxwRW1pc3NYMTgEHm91dEFtb3VudEFtb3VudERlZmF1bHREZWNpbWFscwkBAmYxAgULb3V0QW1BbXRYMTgFD2RlZmF1bHREZWNpbWFscwQdb3V0UHJpY2VBbW91bnREZWZhdWx0RGVjaW1hbHMJAQJmMQIFC291dFByQW10WDE4BQ9kZWZhdWx0RGVjaW1hbHMECG91dEFtQW10CQBrAwUeb3V0QW1vdW50QW1vdW50RGVmYXVsdERlY2ltYWxzBQVhbURjbQUPZGVmYXVsdERlY2ltYWxzBAhvdXRQckFtdAkAawMFHW91dFByaWNlQW1vdW50RGVmYXVsdERlY2ltYWxzBQVwckRjbQUPZGVmYXVsdERlY2ltYWxzBAVzdGF0ZQMJAAACBQZ0eElkNTgCAAUDbmlsCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3VzZXJBZGRyZXNzBQhvdXRBbUFtdAMJAAACBQRhbUlkAgVXQVZFUwUEdW5pdAkA2QQBBQRhbUlkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3VzZXJBZGRyZXNzBQhvdXRQckFtdAMJAAACBQRwcklkAgVXQVZFUwUEdW5pdAkA2QQBBQRwcklkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQNnYXUCCQClCAEFC3VzZXJBZGRyZXNzBQZ0eElkNTgJARFkYXRhR2V0QWN0aW9uSW5mbwYFCG91dEFtQW10BQhvdXRQckFtdAUIcG10THBBbXQFCGN1clByaWNlBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECcGwABQhjdXJQcmljZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAnBoAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUIY3VyUHJpY2UFA25pbAkAnAoKBQhvdXRBbUFtdAUIb3V0UHJBbXQFBGFtSWQFBHBySWQFCWFtQmFsYW5jZQUJcHJCYWxhbmNlBQdscEVtaXNzBQtjdXJQcmljZVgxOAUDc3RzBQVzdGF0ZQEDZXBvDAZ0eElkNTgIc2xpcHBhZ2UHaW5BbUFtdAZpbkFtSWQHaW5QckFtdAZpblBySWQLdXNlckFkZHJlc3MGaXNFdmFsBmVtaXRMcAppc09uZUFzc2V0BnBtdEFtdAVwbXRJZAQDY2ZnCQEDZ3BjAAQEbHBJZAkA2QQBCQCRAwIFA2NmZwUJaWR4TFBBc0lkBAdhbUlkU3RyCQCRAwIFA2NmZwUJaWR4QW1Bc0lkBAdwcklkU3RyCQCRAwIFA2NmZwUJaWR4UHJBc0lkBAlpbkFtSWRTdHIJAJEDAgUDY2ZnBQtpZHhJQW10QXNJZAQJaW5QcklkU3RyCQCRAwIFA2NmZwUNaWR4SVByaWNlQXNJZAQGYW10RGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQtpZHhBbXRBc0RjbQQIcHJpY2VEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFDWlkeFByaWNlQXNEY20EA3N0cwkAkQMCBQNjZmcFCWlkeFBvb2xTdAQEbHBFbQgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQRscElkAghXciBscCBhcwhxdWFudGl0eQQJYW1CYWxhbmNlAwUGaXNFdmFsCQENZ2V0QWNjQmFsYW5jZQEFB2FtSWRTdHIDAwUKaXNPbmVBc3NldAkAAAIFBXBtdElkBQdhbUlkU3RyBwkAZQIJAQ1nZXRBY2NCYWxhbmNlAQUHYW1JZFN0cgUGcG10QW10AwUKaXNPbmVBc3NldAkBDWdldEFjY0JhbGFuY2UBBQdhbUlkU3RyCQBlAgkBDWdldEFjY0JhbGFuY2UBBQdhbUlkU3RyBQdpbkFtQW10BAlwckJhbGFuY2UDBQZpc0V2YWwJAQ1nZXRBY2NCYWxhbmNlAQUHcHJJZFN0cgMDBQppc09uZUFzc2V0CQAAAgUFcG10SWQFB3BySWRTdHIHCQBlAgkBDWdldEFjY0JhbGFuY2UBBQdwcklkU3RyBQZwbXRBbXQDBQppc09uZUFzc2V0CQENZ2V0QWNjQmFsYW5jZQEFB3BySWRTdHIJAGUCCQENZ2V0QWNjQmFsYW5jZQEFB3BySWRTdHIFB2luUHJBbXQEHGFtb3VudEJhbGFuY2VEZWZhdWx0RGVjaW1hbHMJAGsDBQlhbUJhbGFuY2UFD2RlZmF1bHREZWNpbWFscwUGYW10RGNtBBtwcmljZUJhbGFuY2VEZWZhdWx0RGVjaW1hbHMJAGsDBQlwckJhbGFuY2UFD2RlZmF1bHREZWNpbWFscwUIcHJpY2VEY20EImluQW1vdW50QXNzZXRBbW91bnREZWZhdWx0RGVjaW1hbHMJAGsDBQdpbkFtQW10BQ9kZWZhdWx0RGVjaW1hbHMFBmFtdERjbQQhaW5QcmljZUFzc2V0QW1vdW50RGVmYXVsdERlY2ltYWxzCQBrAwUHaW5QckFtdAUPZGVmYXVsdERlY2ltYWxzBQhwcmljZURjbQQPaW5BbUFzc2V0QW10WDE4CQECdDECBSJpbkFtb3VudEFzc2V0QW1vdW50RGVmYXVsdERlY2ltYWxzBQ9kZWZhdWx0RGVjaW1hbHMED2luUHJBc3NldEFtdFgxOAkBAnQxAgUhaW5QcmljZUFzc2V0QW1vdW50RGVmYXVsdERlY2ltYWxzBQ9kZWZhdWx0RGVjaW1hbHMEDHVzZXJQcmljZVgxOAkBBGNwYmkCBQ9pblByQXNzZXRBbXRYMTgFD2luQW1Bc3NldEFtdFgxOAQMYW1CYWxhbmNlWDE4CQECdDECBRxhbW91bnRCYWxhbmNlRGVmYXVsdERlY2ltYWxzBQ9kZWZhdWx0RGVjaW1hbHMEDHByQmFsYW5jZVgxOAkBAnQxAgUbcHJpY2VCYWxhbmNlRGVmYXVsdERlY2ltYWxzBQ9kZWZhdWx0RGVjaW1hbHMEAXIDCQAAAgUEbHBFbQAABAtjdXJQcmljZVgxOAUKemVyb0JpZ0ludAQLc2xpcHBhZ2VYMTgFCnplcm9CaWdJbnQECGxwQW10WDE4CQB2BgkAuQICBQ9pbkFtQXNzZXRBbXRYMTgFD2luUHJBc3NldEFtdFgxOAAACQC2AgEABQABAAAFBERPV04JAJcKBQkBAmYxAgUIbHBBbXRYMTgFBnNjYWxlOAkBAmYxAgUPaW5BbUFzc2V0QW10WDE4BQ9kZWZhdWx0RGVjaW1hbHMJAQJmMQIFD2luUHJBc3NldEFtdFgxOAUPZGVmYXVsdERlY2ltYWxzCQEEY3BiaQIJALcCAgUMcHJCYWxhbmNlWDE4BQ9pblByQXNzZXRBbXRYMTgJALcCAgUMYW1CYWxhbmNlWDE4BQ9pbkFtQXNzZXRBbXRYMTgFC3NsaXBwYWdlWDE4BAtjdXJQcmljZVgxOAkBBGNwYmkCBQxwckJhbGFuY2VYMTgFDGFtQmFsYW5jZVgxOAQPc2xpcHBhZ2VSZWFsWDE4CQC8AgMJAQNhYnMBCQC4AgIFC2N1clByaWNlWDE4BQx1c2VyUHJpY2VYMTgFB3NjYWxlMTgFC2N1clByaWNlWDE4BAtzbGlwcGFnZVgxOAkBAnQxAgUIc2xpcHBhZ2UFBnNjYWxlOAMDCQECIT0CBQtjdXJQcmljZVgxOAUKemVyb0JpZ0ludAkAvwICBQ9zbGlwcGFnZVJlYWxYMTgFC3NsaXBwYWdlWDE4BwkAAgEJAKwCAgkArAICCQCsAgICD1ByaWNlIHNsaXBwYWdlIAkApgMBBQ9zbGlwcGFnZVJlYWxYMTgCAyA+IAkApgMBBQtzbGlwcGFnZVgxOAQNbHBFbWlzc2lvblgxOAkBAnQxAgUEbHBFbQUGc2NhbGU4BApwclZpYUFtWDE4CQC8AgMFD2luQW1Bc3NldEFtdFgxOAULY3VyUHJpY2VYMTgFB3NjYWxlMTgECmFtVmlhUHJYMTgJALwCAwUPaW5QckFzc2V0QW10WDE4BQdzY2FsZTE4BQtjdXJQcmljZVgxOAQMZXhwZWN0ZWRBbXRzAwkAvwICBQpwclZpYUFtWDE4BQ9pblByQXNzZXRBbXRYMTgJAJQKAgUKYW1WaWFQclgxOAUPaW5QckFzc2V0QW10WDE4CQCUCgIFD2luQW1Bc3NldEFtdFgxOAUKcHJWaWFBbVgxOAQRZXhwQW10QXNzZXRBbXRYMTgIBQxleHBlY3RlZEFtdHMCXzEEE2V4cFByaWNlQXNzZXRBbXRYMTgIBQxleHBlY3RlZEFtdHMCXzIECGxwQW10WDE4CQC8AgMFDWxwRW1pc3Npb25YMTgFE2V4cFByaWNlQXNzZXRBbXRYMTgFDHByQmFsYW5jZVgxOAkAlwoFCQECZjECBQhscEFtdFgxOAUGc2NhbGU4CQECZjECBRFleHBBbXRBc3NldEFtdFgxOAUPZGVmYXVsdERlY2ltYWxzCQECZjECBRNleHBQcmljZUFzc2V0QW10WDE4BQ9kZWZhdWx0RGVjaW1hbHMFC2N1clByaWNlWDE4BQtzbGlwcGFnZVgxOAQJY2FsY0xwQW10CAUBcgJfMQQOY2FsY0FtQXNzZXRQbXQJAGsDCAUBcgJfMgUGYW10RGNtBQ9kZWZhdWx0RGVjaW1hbHMEDmNhbGNQckFzc2V0UG10CQBrAwgFAXICXzMFCHByaWNlRGNtBQ9kZWZhdWx0RGVjaW1hbHMECGN1clByaWNlCQECZjECCAUBcgJfNAUGc2NhbGU4BAxzbGlwcGFnZUNhbGMJAQJmMQIIBQFyAl81BQZzY2FsZTgDCQBnAgAABQljYWxjTHBBbXQJAAIBAgdMUCA8PSAwBAllbWl0THBBbXQDCQEBIQEFBmVtaXRMcAAABQljYWxjTHBBbXQEBmFtRGlmZgkAZQIFB2luQW1BbXQFDmNhbGNBbUFzc2V0UG10BAZwckRpZmYJAGUCBQdpblByQW10BQ5jYWxjUHJBc3NldFBtdAQNJHQwMTY2NDcxNjk5MgMDBQppc09uZUFzc2V0CQAAAgUFcG10SWQFB2FtSWRTdHIHCQCUCgIFBnBtdEFtdAAAAwMFCmlzT25lQXNzZXQJAAACBQVwbXRJZAUHcHJJZFN0cgcJAJQKAgAABQZwbXRBbXQJAJQKAgUOY2FsY0FtQXNzZXRQbXQFDmNhbGNQckFzc2V0UG10BAp3cml0ZUFtQW10CAUNJHQwMTY2NDcxNjk5MgJfMQQKd3JpdGVQckFtdAgFDSR0MDE2NjQ3MTY5OTICXzIEC2NvbW1vblN0YXRlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECcGwABQhjdXJQcmljZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAnBoAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUIY3VyUHJpY2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkBA3BhdQIFC3VzZXJBZGRyZXNzBQZ0eElkNTgJARFkYXRhUHV0QWN0aW9uSW5mbwoFCndyaXRlQW1BbXQFCndyaXRlUHJBbXQFCWVtaXRMcEFtdAUIY3VyUHJpY2UFCHNsaXBwYWdlBQxzbGlwcGFnZUNhbGMFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFBmFtRGlmZgUGcHJEaWZmBQNuaWwJAJ8KDQUJY2FsY0xwQW10BQllbWl0THBBbXQFCGN1clByaWNlBQlhbUJhbGFuY2UFCXByQmFsYW5jZQUEbHBFbQUEbHBJZAUDc3RzBQtjb21tb25TdGF0ZQUGYW1EaWZmBQZwckRpZmYFBmluQW1JZAUGaW5QcklkAQNtb2EBBW9yZGVyBANjZmcJAQNncGMABAdhbXRBc0lkCQCRAwIFA2NmZwUJaWR4QW1Bc0lkBAZwckFzSWQJAJEDAgUDY2ZnBQlpZHhQckFzSWQEA3N0cwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwUJaWR4UG9vbFN0BAhhbXRBc0RjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwULaWR4QW10QXNEY20EB3ByQXNEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFDWlkeFByaWNlQXNEY20ED2FjY0FtdEFzQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQdhbXRBc0lkBA5hY2NQckFzQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQZwckFzSWQEC2N1clByaWNlWDE4AwkAAAIIBQVvcmRlcglvcmRlclR5cGUFA0J1eQkBA3BjcAQFCGFtdEFzRGNtBQdwckFzRGNtCQBkAgUPYWNjQW10QXNCYWxhbmNlCAUFb3JkZXIGYW1vdW50BQ5hY2NQckFzQmFsYW5jZQkBA3BjcAQFCGFtdEFzRGNtBQdwckFzRGNtCQBlAgUPYWNjQW10QXNCYWxhbmNlCAUFb3JkZXIGYW1vdW50BQ5hY2NQckFzQmFsYW5jZQQIY3VyUHJpY2UJAQJmMQIFC2N1clByaWNlWDE4BQZzY2FsZTgDAwMJAQNpZ3MABgkAAAIFA3N0cwUOUG9vbE1hdGNoZXJEaXMGCQAAAgUDc3RzBQxQb29sU2h1dGRvd24JAAIBAg1BZG1pbiBibG9ja2VkBApvckFtdEFzc2V0CAgFBW9yZGVyCWFzc2V0UGFpcgthbW91bnRBc3NldAQKb3JBbXRBc1N0cgMJAAACBQpvckFtdEFzc2V0BQR1bml0AgVXQVZFUwkA2AQBCQEFdmFsdWUBBQpvckFtdEFzc2V0BAlvclByQXNzZXQICAUFb3JkZXIJYXNzZXRQYWlyCnByaWNlQXNzZXQECW9yUHJBc1N0cgMJAAACBQlvclByQXNzZXQFBHVuaXQCBVdBVkVTCQDYBAEJAQV2YWx1ZQEFCW9yUHJBc3NldAMDCQECIT0CBQpvckFtdEFzU3RyBQdhbXRBc0lkBgkBAiE9AgUJb3JQckFzU3RyBQZwckFzSWQJAAIBAglXciBhc3NldHMECm9yZGVyUHJpY2UIBQVvcmRlcgVwcmljZQQIcHJpY2VEY20JAGsDBQZzY2FsZTgFB3ByQXNEY20FCGFtdEFzRGNtBA5jYXN0T3JkZXJQcmljZQkBAnRzAwUKb3JkZXJQcmljZQUGc2NhbGU4BQhwcmljZURjbQQRaXNPcmRlclByaWNlVmFsaWQDCQAAAggFBW9yZGVyCW9yZGVyVHlwZQUDQnV5CQBnAgUIY3VyUHJpY2UFDmNhc3RPcmRlclByaWNlCQBnAgUOY2FzdE9yZGVyUHJpY2UFCGN1clByaWNlBgECY2cBAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAgoxIHBtbnQgZXhwBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQKcG10QXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAZwbXRBbXQIBQNwbXQGYW1vdW50BAFyCQEDZWdvBAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQDYBAEFCnBtdEFzc2V0SWQFBnBtdEFtdAgFAWkGY2FsbGVyBAhvdXRBbUFtdAgFAXICXzEECG91dFByQW10CAUBcgJfMgQDc3RzCQENcGFyc2VJbnRWYWx1ZQEIBQFyAl85BAVzdGF0ZQgFAXIDXzEwAwMJAQNpZ3MABgkAAAIFA3N0cwUMUG9vbFNodXRkb3duCQACAQkArAICAg9BZG1pbiBibG9ja2VkOiAJAKQDAQUDc3RzCQCXCgUFCG91dEFtQW10BQhvdXRQckFtdAUGcG10QW10BQpwbXRBc3NldElkBQVzdGF0ZQECY3AJBmNhbGxlcgR0eElkB2FtQXNQbXQHcHJBc1BtdAhzbGlwcGFnZQZlbWl0THAKaXNPbmVBc3NldAZwbXRBbXQFcG10SWQEAXIJAQNlcG8MBQR0eElkBQhzbGlwcGFnZQgJAQV2YWx1ZQEFB2FtQXNQbXQGYW1vdW50CAkBBXZhbHVlAQUHYW1Bc1BtdAdhc3NldElkCAkBBXZhbHVlAQUHcHJBc1BtdAZhbW91bnQICQEFdmFsdWUBBQdwckFzUG10B2Fzc2V0SWQFBmNhbGxlcgcFBmVtaXRMcAUKaXNPbmVBc3NldAUGcG10QW10BQVwbXRJZAQDc3RzCQENcGFyc2VJbnRWYWx1ZQEIBQFyAl84AwMDCQEDaWdzAAYJAAACBQNzdHMFClBvb2xQdXREaXMGCQAAAgUDc3RzBQxQb29sU2h1dGRvd24JAAIBCQCsAgICCEJsb2NrZWQ6CQCkAwEFA3N0cwUBcgEBbQAEByRtYXRjaDAJAKIIAQkBA21wawADCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQDZBAEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAQJwbQAEByRtYXRjaDAJAKIIAQkBBHBtcGsAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkA2QQBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgACcGQJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAECbW0BAWkEByRtYXRjaDAJAQFtAAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJwawUHJG1hdGNoMAMJAAACCAUBaQ9jYWxsZXJQdWJsaWNLZXkFAnBrBgUCcGQDCQABAgUHJG1hdGNoMAIEVW5pdAMJAAACCAUBaQZjYWxsZXIFBHRoaXMGBQJwZAkAAgECC01hdGNoIGVycm9yFQFpAQtjb25zdHJ1Y3RvcgECZmMEAWMJAQJtbQEFAWkDCQAAAgUBYwUBYwkAzAgCCQELU3RyaW5nRW50cnkCCQECZmMABQJmYwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCnNldE1hbmFnZXIBF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5BAFjCQECbW0BBQFpAwkAAAIFAWMFAWMEAmNtCQDZBAEFF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5AwkAAAIFAmNtBQJjbQkAzAgCCQELU3RyaW5nRW50cnkCCQEEcG1wawAFF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEOY29uZmlybU1hbmFnZXIABAFwCQECcG0ABANocG0DCQEJaXNEZWZpbmVkAQUBcAYJAAIBAhJObyBwZW5kaW5nIG1hbmFnZXIDCQAAAgUDaHBtBQNocG0EA2NwbQMJAAACCAUBaQ9jYWxsZXJQdWJsaWNLZXkJAQV2YWx1ZQEFAXAGCQACAQIbWW91IGFyZSBub3QgcGVuZGluZyBtYW5hZ2VyAwkAAAIFA2NwbQUDY3BtCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQNtcGsACQDYBAEJAQV2YWx1ZQEFAXAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBBHBtcGsABQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEDcHV0AgRzbGlwCWF1dG9TdGFrZQQHZmFjdENmZwkBA2dmYwAEC3N0YWtpbmdDbnRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQdmYWN0Q2ZnBQ9pZHhGYWN0U3Rha0NudHICCldyIHN0IGFkZHIECHNsaXBDbnRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQdmYWN0Q2ZnBRBpZHhGYWN0U2xpcHBDbnRyAgpXciBzbCBhZGRyAwkAZgIAAAUEc2xpcAkAAgECDldyb25nIHNsaXBwYWdlAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwACCQACAQIMMiBwbW50cyBleHBkBAFlCQECY3AJCQClCAEIBQFpBmNhbGxlcgkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQEPQXR0YWNoZWRQYXltZW50AggJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAkAkQMCCAUBaQhwYXltZW50cwABBQRzbGlwBgcAAAIABAllbWl0THBBbXQIBQFlAl8yBAlscEFzc2V0SWQIBQFlAl83BAVzdGF0ZQgFAWUCXzkEBmFtRGlmZggFAWUDXzEwBAZwckRpZmYIBQFlA18xMQQEYW1JZAgFAWUDXzEyBARwcklkCAUBZQNfMTMEAXIJAPwHBAUDZmNhAgRlbWl0CQDMCAIFCWVtaXRMcEFtdAUDbmlsBQNuaWwDCQAAAgUBcgUBcgQCZWwEByRtYXRjaDAFAXIDCQABAgUHJG1hdGNoMAIHQWRkcmVzcwQGbGVnYWN5BQckbWF0Y2gwCQD8BwQFBmxlZ2FjeQIEZW1pdAkAzAgCBQllbWl0THBBbXQFA25pbAUDbmlsBQR1bml0AwkAAAIFAmVsBQJlbAQCc2EDCQBmAgUGYW1EaWZmAAAJAPwHBAUIc2xpcENudHICA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQRhbUlkBQZhbURpZmYFA25pbAUDbmlsAwkAAAIFAnNhBQJzYQQCc3ADCQBmAgUGcHJEaWZmAAAJAPwHBAUIc2xpcENudHICA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQRwcklkBQZwckRpZmYFA25pbAUDbmlsAwkAAAIFAnNwBQJzcAQIbHBUcm5zZnIDBQlhdXRvU3Rha2UEAnNzCQD8BwQFC3N0YWtpbmdDbnRyAgVzdGFrZQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQlscEFzc2V0SWQFCWVtaXRMcEFtdAUDbmlsAwkAAAIFAnNzBQJzcwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUJZW1pdExwQW10BQlscEFzc2V0SWQFA25pbAkAzggCBQVzdGF0ZQUIbHBUcm5zZnIJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEJcHV0T25lVGtuBQthbUFzc2V0UGFydAtwckFzc2V0UGFydAVvdXRMcAhzbGlwcGFnZQlhdXRvU3Rha2UEA2NmZwkBA2dmYwAEC3N0YWtpbmdDbnRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQNjZmcFD2lkeEZhY3RTdGFrQ250cgIKV3Igc3QgYWRkcgQIc2xpcENudHIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFA2NmZwUQaWR4RmFjdFNsaXBwQ250cgIKV3Igc2wgYWRkcgQHZ3d4Q250cgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUDY2ZnBRFpZHhGYWN0R3d4UmV3Q250cgILV3IgZ3d4IGFkZHIEB3Bvb2xDZmcJAQNncGMABARhbUlkCQCRAwIFB3Bvb2xDZmcFCWlkeEFtQXNJZAQEcHJJZAkAkQMCBQdwb29sQ2ZnBQlpZHhQckFzSWQEBWFtRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcG9vbENmZwULaWR4QW10QXNEY20EBXByRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcG9vbENmZwUNaWR4UHJpY2VBc0RjbQQFYWRkb24JAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBA2FkYQACAAQLdXNlckFkZHJlc3MDCQAAAgUFYWRkb24JAKUIAQgFAWkGY2FsbGVyCAUBaQxvcmlnaW5DYWxsZXIIBQFpBmNhbGxlcgMDAwMJAGcCAAAFCHNsaXBwYWdlBgkAZwIAAAULYW1Bc3NldFBhcnQGCQBnAgAABQtwckFzc2V0UGFydAYJAGcCAAAFBW91dExwCQACAQIMV3JvbmcgcGFyYW1zAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQILMSBwbW50IGV4cGQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABApwbXRBc3NldElkCQDYBAEJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAQLcG10RGVjaW1hbHMICQEFdmFsdWUBCQDsBwEJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAhkZWNpbWFscwQGcG10QW10CAUDcG10BmFtb3VudAQVcG10QW10RGVmYXVsdERlY2ltYWxzCQBpAgkAaAIFBnBtdEFtdAUPZGVmYXVsdERlY2ltYWxzCQBsBgAKAAAFC3BtdERlY2ltYWxzAAAAAAUERE9XTgMJAGYCAICt4gQFFXBtdEFtdERlZmF1bHREZWNpbWFscwkAAgECDVdyb25nIHBtdCBhbXQECWFtQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQRhbUlkBAlwckJhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUEcHJJZAQYYW1CYWxhbmNlRGVmYXVsdERlY2ltYWxzCQBpAgkAaAIFCWFtQmFsYW5jZQUPZGVmYXVsdERlY2ltYWxzBQVhbURjbQQYcHJCYWxhbmNlRGVmYXVsdERlY2ltYWxzCQBpAgkAaAIFCXByQmFsYW5jZQUPZGVmYXVsdERlY2ltYWxzBQVwckRjbQQNJHQwMjU5NzkyNjc2NQMJAAACBQpwbXRBc3NldElkBQRhbUlkAwMJAGYCBRVwbXRBbXREZWZhdWx0RGVjaW1hbHMFGGFtQmFsYW5jZURlZmF1bHREZWNpbWFscwYJAGYCBQthbUFzc2V0UGFydAUVcG10QW10RGVmYXVsdERlY2ltYWxzCQACAQIWaW52YWxpZCBwYXltZW50IGFtb3VudAkAmAoGCQBlAgUYYW1CYWxhbmNlRGVmYXVsdERlY2ltYWxzBRVwbXRBbXREZWZhdWx0RGVjaW1hbHMFGHByQmFsYW5jZURlZmF1bHREZWNpbWFscwkAZQIFFXBtdEFtdERlZmF1bHREZWNpbWFscwULYW1Bc3NldFBhcnQFC3ByQXNzZXRQYXJ0AAAAAAMJAAACBQpwbXRBc3NldElkBQRwcklkAwMJAGYCBRVwbXRBbXREZWZhdWx0RGVjaW1hbHMFGHByQmFsYW5jZURlZmF1bHREZWNpbWFscwYJAGYCBQtwckFzc2V0UGFydAUVcG10QW10RGVmYXVsdERlY2ltYWxzCQACAQIWaW52YWxpZCBwYXltZW50IGFtb3VudAkAmAoGBRhhbUJhbGFuY2VEZWZhdWx0RGVjaW1hbHMJAGUCBRhwckJhbGFuY2VEZWZhdWx0RGVjaW1hbHMFFXBtdEFtdERlZmF1bHREZWNpbWFscwAAAAAJAGUCBRVwbXRBbXREZWZhdWx0RGVjaW1hbHMFC3ByQXNzZXRQYXJ0BQthbUFzc2V0UGFydAkAAgECEHdyb25nIHBtdEFzc2V0SWQEDGFtQmFsYW5jZU5vdwgFDSR0MDI1OTc5MjY3NjUCXzEEDHByQmFsYW5jZU5vdwgFDSR0MDI1OTc5MjY3NjUCXzIEDHZpcnRTd2FwSW5BbQgFDSR0MDI1OTc5MjY3NjUCXzMEDXZpcnRTd2FwT3V0UHIIBQ0kdDAyNTk3OTI2NzY1Al80BAx2aXJ0U3dhcEluUHIIBQ0kdDAyNTk3OTI2NzY1Al81BA12aXJ0U3dhcE91dEFtCAUNJHQwMjU5NzkyNjc2NQJfNgQCRDAJAPwHBAUHZ3d4Q250cgIFY2FsY0QJAMwIAgkApAMBBQxhbUJhbGFuY2VOb3cJAMwIAgkApAMBBQxwckJhbGFuY2VOb3cJAMwIAgUBQQkAzAgCBQVBbXVsdAkAzAgCBQVEY29udgUDbmlsBQNuaWwEAkQxCQD8BwQFB2d3eENudHICBWNhbGNECQDMCAIJAKYDAQkAtgIBCQBlAgkAZAIFDGFtQmFsYW5jZU5vdwUMdmlydFN3YXBJbkFtBQ12aXJ0U3dhcE91dEFtCQDMCAIJAKYDAQkAtgIBCQBlAgkAZAIFDHByQmFsYW5jZU5vdwUMdmlydFN3YXBJblByBQ12aXJ0U3dhcE91dFByCQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgUFRGNvbnYFA25pbAUDbmlsBAZEMHZzRDEJAQJ2ZAMJAKcDAQkBA3N0cgEFAkQxCQCnAwEJAQNzdHIBBQJEMAUKc2xpcHBhZ2U0RAMJAAACBQZEMHZzRDEFBkQwdnNEMQQGZXN0UHV0CQECY3AJCQClCAEIBQFpBmNhbGxlcgkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQRhbUlkBQthbUFzc2V0UGFydAkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUEcHJJZAULcHJBc3NldFBhcnQFCHNsaXBwYWdlBgYFBnBtdEFtdAUKcG10QXNzZXRJZAQHZXN0aW1MUAgFBmVzdFB1dAJfMgQJbHBBc3NldElkCAUGZXN0UHV0Al83BAVzdGF0ZQgFBmVzdFB1dAJfOQQGYW1EaWZmCAUGZXN0UHV0A18xMAQGcHJEaWZmCAUGZXN0UHV0A18xMQQJbHBDYWxjUmVzCQEDdmFkAwkAtgIBBQdlc3RpbUxQCQC2AgEFBW91dExwCQC2AgEFCHNsaXBwYWdlBAllbWl0THBBbXQJAKADAQgFCWxwQ2FsY1JlcwJfMgQBZQkA/AcEBQNmY2ECBGVtaXQJAMwIAgUJZW1pdExwQW10BQNuaWwFA25pbAMJAAACBQFlBQFlBAJlbAQHJG1hdGNoMAUBZQMJAAECBQckbWF0Y2gwAgdBZGRyZXNzBAZsZWdhY3kFByRtYXRjaDAJAPwHBAUGbGVnYWN5AgRlbWl0CQDMCAIFCWVtaXRMcEFtdAUDbmlsBQNuaWwFBHVuaXQDCQAAAgUCZWwFAmVsBAJzYQMJAGYCBQZhbURpZmYAAAkA/AcEBQhzbGlwQ250cgIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUEYW1JZAUGYW1EaWZmBQNuaWwFA25pbAMJAAACBQJzYQUCc2EEAnNwAwkAZgIFBnByRGlmZgAACQD8BwQFCHNsaXBDbnRyAgNwdXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQRwcklkBQZwckRpZmYFA25pbAUDbmlsAwkAAAIFAnNwBQJzcAQIbHBUcm5zZnIDBQlhdXRvU3Rha2UEAnNzCQD8BwQFC3N0YWtpbmdDbnRyAgVzdGFrZQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQlscEFzc2V0SWQFCWVtaXRMcEFtdAUDbmlsAwkAAAIFAnNzBQJzcwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUJZW1pdExwQW10BQlscEFzc2V0SWQFA25pbAkAzggCBQVzdGF0ZQUIbHBUcm5zZnIJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEKcHV0Rm9yRnJlZQEHbWF4U2xwZwMJAGYCAAAFB21heFNscGcJAAIBAgpXcm9uZyBzbHBnAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwACCQACAQIMMiBwbW50cyBleHBkBAZlc3RQdXQJAQJjcAkJAKUIAQgFAWkGY2FsbGVyCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQJAQ9BdHRhY2hlZFBheW1lbnQCCAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQICQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50CQCRAwIIBQFpCHBheW1lbnRzAAEFB21heFNscGcHBwAAAgAIBQZlc3RQdXQCXzkBaQEDZ2V0AAQBcgkBAmNnAQUBaQQJb3V0QW10QW10CAUBcgJfMQQIb3V0UHJBbXQIBQFyAl8yBAZwbXRBbXQIBQFyAl8zBApwbXRBc3NldElkCAUBcgJfNAQFc3RhdGUIBQFyAl81BAFiCQD8BwQFA2ZjYQIEYnVybgkAzAgCBQZwbXRBbXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUKcG10QXNzZXRJZAUGcG10QW10BQNuaWwDCQAAAgUBYgUBYgUFc3RhdGUJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEJZ2V0T25lVGtuBQpleGNoUmVzdWx0B25vdFVzZWQJb3V0QW1vdW50Cm91dEFzc2V0SWQIc2xpcHBhZ2UDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAgsxIHBtbnQgZXhwZAQDY2ZnCQEDZ3BjAAQEbHBJZAkAkQMCBQNjZmcFCWlkeExQQXNJZAQEYW1JZAkAkQMCBQNjZmcFCWlkeEFtQXNJZAQEcHJJZAkAkQMCBQNjZmcFCWlkeFByQXNJZAQFYW1EY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFC2lkeEFtdEFzRGNtBAVwckRjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwUNaWR4UHJpY2VBc0RjbQQDc3RzCQCRAwIFA2NmZwUJaWR4UG9vbFN0BAdmYWN0Q2ZnCQEDZ2ZjAAQHZ3d4Q250cgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUHZmFjdENmZwURaWR4RmFjdEd3eFJld0NudHICCldyIHNsIGFkZHIEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABAVhZGRvbgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQEDYWRhAAIABAt1c2VyQWRkcmVzcwMJAAACBQVhZGRvbgkApQgBCAUBaQZjYWxsZXIIBQFpDG9yaWdpbkNhbGxlcggFAWkGY2FsbGVyBAZ0eElkNTgJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAQKcG10QXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAZwbXRBbXQIBQNwbXQGYW1vdW50AwkAZgIAgJTr3AMFBnBtdEFtdAkAAgECDU1pbiBwbXQgMTAgTFADAwMJAGYCAAAFCHNsaXBwYWdlBgkAZgIAAAUKZXhjaFJlc3VsdAYJAGYCAAAFCW91dEFtb3VudAkAAgECDFdyb25nIHBhcmFtcwMJAQIhPQIFBGxwSWQJANgEAQUKcG10QXNzZXRJZAkAAgECCFdyb25nIExQBAFyCQEDZWdvBAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQDYBAEFCnBtdEFzc2V0SWQFBnBtdEFtdAgFAWkGY2FsbGVyBAplc3RpbUFtQW10CAUBcgJfMQQKZXN0aW1QckFtdAgFAXICXzIECWFtQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQRhbUlkBAlwckJhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUEcHJJZAQNJHQwMzE1NDQzMjAwMQMJAAACBQpvdXRBc3NldElkBQRhbUlkCQCZCgcJAGUCBQlhbUJhbGFuY2UFCmVzdGltQW1BbXQJAGUCBQlwckJhbGFuY2UFCmVzdGltUHJBbXQFCmV4Y2hSZXN1bHQFCmVzdGltUHJBbXQAAAAACQBkAgUKZXN0aW1BbUFtdAUKZXhjaFJlc3VsdAMJAAACBQpvdXRBc3NldElkBQRwcklkCQCZCgcJAGUCBQlhbUJhbGFuY2UFCmVzdGltQW1BbXQJAGUCBQlwckJhbGFuY2UFCmVzdGltUHJBbXQAAAAABQpleGNoUmVzdWx0BQplc3RpbUFtQW10CQBkAgUKZXN0aW1QckFtdAUKZXhjaFJlc3VsdAkAAgECEHdyb25nIG91dEFzc2V0SWQEDGFtQmFsYW5jZU5vdwgFDSR0MDMxNTQ0MzIwMDECXzEEDHByQmFsYW5jZU5vdwgFDSR0MDMxNTQ0MzIwMDECXzIEDHZpcnRTd2FwSW5BbQgFDSR0MDMxNTQ0MzIwMDECXzMEDXZpcnRTd2FwT3V0UHIIBQ0kdDAzMTU0NDMyMDAxAl80BAx2aXJ0U3dhcEluUHIIBQ0kdDAzMTU0NDMyMDAxAl81BA12aXJ0U3dhcE91dEFtCAUNJHQwMzE1NDQzMjAwMQJfNgQIdG90YWxHZXQIBQ0kdDAzMTU0NDMyMDAxAl83AwMJAGYCAAAFDHZpcnRTd2FwSW5BbQYJAGYCAAAFDHZpcnRTd2FwSW5QcgkAAgECCldyb25nIGNhbGMEAkQwCQD8BwQFB2d3eENudHICBWNhbGNECQDMCAIJAKQDAQUMYW1CYWxhbmNlTm93CQDMCAIJAKQDAQUMcHJCYWxhbmNlTm93CQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgUFRGNvbnYFA25pbAUDbmlsBAJEMQkA/AcEBQdnd3hDbnRyAgVjYWxjRAkAzAgCCQCkAwEJAGQCCQBlAgUMYW1CYWxhbmNlTm93BQx2aXJ0U3dhcEluQW0FDXZpcnRTd2FwT3V0QW0JAMwIAgkApAMBCQBlAgkAZAIFDHByQmFsYW5jZU5vdwUNdmlydFN3YXBPdXRQcgUMdmlydFN3YXBJblByCQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgUFRGNvbnYFA25pbAUDbmlsBAZEMHZzRDEJAQJ2ZAMJAKcDAQkBA3N0cgEFAkQxCQCnAwEJAQNzdHIBBQJEMAUKc2xpcHBhZ2U0RAMJAAACBQZEMHZzRDEFBkQwdnNEMQQIZmluYWxSZXMJAQN2YWQDCQC2AgEFCHRvdGFsR2V0CQC2AgEFCW91dEFtb3VudAkAtgIBBQhzbGlwcGFnZQMJAAACBQhmaW5hbFJlcwUIZmluYWxSZXMEDSR0MDMyNzA2MzI4MTADCQAAAgUKb3V0QXNzZXRJZAUEYW1JZAkAlAoCCQCgAwEIBQhmaW5hbFJlcwJfMgAACQCUCgIAAAkAoAMBCAUIZmluYWxSZXMCXzIEBW91dEFtCAUNJHQwMzI3MDYzMjgxMAJfMQQFb3V0UHIIBQ0kdDAzMjcwNjMyODEwAl8yBAhjdXJQclgxOAkBBGNwYmkCCQECdDECBQlwckJhbGFuY2UFBXByRGNtCQECdDECBQlhbUJhbGFuY2UFBWFtRGNtBAVjdXJQcgkBAmYxAgUIY3VyUHJYMTgFBnNjYWxlOAQFc3RhdGUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwULdXNlckFkZHJlc3MJAGQCBQVvdXRBbQUFb3V0UHIDCQAAAgUKb3V0QXNzZXRJZAIFV0FWRVMFBHVuaXQJANkEAQUKb3V0QXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQEDZ2F1AgkApQgBBQt1c2VyQWRkcmVzcwUGdHhJZDU4CQERZGF0YUdldEFjdGlvbkluZm8GBQVvdXRBbQUFb3V0UHIFBnBtdEFtdAUFY3VyUHIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJwbAAFBWN1clByCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECcGgCBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQVjdXJQcgUDbmlsAwkAAAIFBXN0YXRlBQVzdGF0ZQQEYnVybgkA/AcEBQNmY2ECBGJ1cm4JAMwIAgUGcG10QW10BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCnBtdEFzc2V0SWQFBnBtdEFtdAUDbmlsAwkAAAIFBGJ1cm4FBGJ1cm4FBXN0YXRlCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCWdldE5vTGVzcwISbm9MZXNzVGhlbkFtdEFzc2V0FG5vTGVzc1RoZW5QcmljZUFzc2V0BAFyCQECY2cBBQFpBAhvdXRBbUFtdAgFAXICXzEECG91dFByQW10CAUBcgJfMgQGcG10QW10CAUBcgJfMwQKcG10QXNzZXRJZAgFAXICXzQEBXN0YXRlCAUBcgJfNQMJAGYCBRJub0xlc3NUaGVuQW10QXNzZXQFCG91dEFtQW10CQACAQkArAICCQCsAgIJAKwCAgIJRmFpbGVkOiAgCQCkAwEFCG91dEFtQW10AgMgPCAJAKQDAQUSbm9MZXNzVGhlbkFtdEFzc2V0AwkAZgIFFG5vTGVzc1RoZW5QcmljZUFzc2V0BQhvdXRQckFtdAkAAgEJAKwCAgkArAICCQCsAgICCEZhaWxlZDogCQCkAwEFCG91dFByQW10AgMgPCAJAKQDAQUUbm9MZXNzVGhlblByaWNlQXNzZXQEFGJ1cm5MUEFzc2V0T25GYWN0b3J5CQD8BwQFA2ZjYQIEYnVybgkAzAgCBQZwbXRBbXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUKcG10QXNzZXRJZAUGcG10QW10BQNuaWwDCQAAAgUUYnVybkxQQXNzZXRPbkZhY3RvcnkFFGJ1cm5MUEFzc2V0T25GYWN0b3J5BQVzdGF0ZQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ11bnN0YWtlQW5kR2V0AQZhbW91bnQEDWNoZWNrUGF5bWVudHMDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAg1ObyBwbW50cyBleHBkBgMJAAACBQ1jaGVja1BheW1lbnRzBQ1jaGVja1BheW1lbnRzBANjZmcJAQNncGMABApmYWN0b3J5Q2ZnCQEDZ2ZjAAQJbHBBc3NldElkCQDZBAEJAJEDAgUDY2ZnBQlpZHhMUEFzSWQEB3N0YWtpbmcJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFCmZhY3RvcnlDZmcFD2lkeEZhY3RTdGFrQ250cgIKV3Igc3QgYWRkcgQKdW5zdGFrZUludgkA/AcEBQdzdGFraW5nAgd1bnN0YWtlCQDMCAIJANgEAQUJbHBBc3NldElkCQDMCAIFBmFtb3VudAUDbmlsBQNuaWwDCQAAAgUKdW5zdGFrZUludgUKdW5zdGFrZUludgQBcgkBA2VnbwQJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAkA2AQBBQlscEFzc2V0SWQFBmFtb3VudAgFAWkGY2FsbGVyBANzdHMJAQ1wYXJzZUludFZhbHVlAQgFAXICXzkEBXN0YXRlCAUBcgNfMTAEAXYDAwkBA2lncwAGCQAAAgUDc3RzBQxQb29sU2h1dGRvd24JAAIBCQCsAgICCUJsb2NrZWQ6IAkApAMBBQNzdHMGAwkAAAIFAXYFAXYEBWJ1cm5BCQD8BwQFA2ZjYQIEYnVybgkAzAgCBQZhbW91bnQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUJbHBBc3NldElkBQZhbW91bnQFA25pbAMJAAACBQVidXJuQQUFYnVybkEFBXN0YXRlCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCGFjdGl2YXRlAghhbXRBc1N0cgdwckFzU3RyAwkBAiE9AgkApQgBCAUBaQZjYWxsZXIJAKUIAQUDZmNhCQACAQIGZGVuaWVkCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmFhAAUIYW10QXNTdHIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAnBhAAUHcHJBc1N0cgUDbmlsAgdzdWNjZXNzAWkBBHNldFMCAWsBdgMJAQIhPQIJAKUIAQgFAWkGY2FsbGVyCQEEc3RyZgIFBHRoaXMJAQNhZGEABQJwZAkAzAgCCQELU3RyaW5nRW50cnkCBQFrBQF2BQNuaWwBaQEEc2V0SQIBawF2AwkBAiE9AgkApQgBCAUBaQZjYWxsZXIJAQRzdHJmAgUEdGhpcwkBA2FkYQAFAnBkCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQFrBQF2BQNuaWwBaQEcZ2V0UG9vbENvbmZpZ1dyYXBwZXJSRUFET05MWQAJAJQKAgUDbmlsCQEDZ3BjAAFpARxnZXRBY2NCYWxhbmNlV3JhcHBlclJFQURPTkxZAQdhc3NldElkCQCUCgIFA25pbAkBDWdldEFjY0JhbGFuY2UBBQdhc3NldElkAWkBGWNhbGNQcmljZXNXcmFwcGVyUkVBRE9OTFkDBWFtQW10BXByQW10BWxwQW10BAJwcgkBCmNhbGNQcmljZXMDBQVhbUFtdAUFcHJBbXQFBWxwQW10CQCUCgIFA25pbAkAzAgCCQCmAwEJAJEDAgUCcHIAAAkAzAgCCQCmAwEJAJEDAgUCcHIAAQkAzAgCCQCmAwEJAJEDAgUCcHIAAgUDbmlsAWkBFmZyb21YMThXcmFwcGVyUkVBRE9OTFkCA3ZhbAxyZXNTY2FsZU11bHQJAJQKAgUDbmlsCQECZjECCQCnAwEFA3ZhbAUMcmVzU2NhbGVNdWx0AWkBFHRvWDE4V3JhcHBlclJFQURPTkxZAgdvcmlnVmFsDW9yaWdTY2FsZU11bHQJAJQKAgUDbmlsCQCmAwEJAQJ0MQIFB29yaWdWYWwFDW9yaWdTY2FsZU11bHQBaQEeY2FsY1ByaWNlQmlnSW50V3JhcHBlclJFQURPTkxZAghwckFtdFgxOAhhbUFtdFgxOAkAlAoCBQNuaWwJAKYDAQkBBGNwYmkCCQCnAwEFCHByQW10WDE4CQCnAwEFCGFtQW10WDE4AWkBI2VzdGltYXRlUHV0T3BlcmF0aW9uV3JhcHBlclJFQURPTkxZCQZ0eElkNTgIc2xpcHBhZ2UHaW5BbUFtdAZpbkFtSWQHaW5QckFtdAZpblBySWQHdXNyQWRkcgZpc0V2YWwGZW1pdExwCQCUCgIFA25pbAkBA2VwbwwFBnR4SWQ1OAUIc2xpcHBhZ2UFB2luQW1BbXQFBmluQW1JZAUHaW5QckFtdAUGaW5QcklkBQd1c3JBZGRyBQZpc0V2YWwFBmVtaXRMcAcAAAIAAWkBI2VzdGltYXRlR2V0T3BlcmF0aW9uV3JhcHBlclJFQURPTkxZBAZ0eElkNTgHcG10QXNJZAhwbXRMcEFtdAd1c3JBZGRyBAFyCQEDZWdvBAUGdHhJZDU4BQdwbXRBc0lkBQhwbXRMcEFtdAkBEUBleHRyTmF0aXZlKDEwNjIpAQUHdXNyQWRkcgkAlAoCBQNuaWwJAJwKCggFAXICXzEIBQFyAl8yCAUBcgJfMwgFAXICXzQIBQFyAl81CAUBcgJfNggFAXICXzcJAKYDAQgFAXICXzgIBQFyAl85CAUBcgNfMTABAnR4AQZ2ZXJpZnkABA90YXJnZXRQdWJsaWNLZXkEByRtYXRjaDAJAQFtAAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJwawUHJG1hdGNoMAUCcGsDCQABAgUHJG1hdGNoMAIEVW5pdAgFAnR4D3NlbmRlclB1YmxpY0tleQkAAgECC01hdGNoIGVycm9yBAckbWF0Y2gwBQJ0eAMJAAECBQckbWF0Y2gwAgVPcmRlcgQFb3JkZXIFByRtYXRjaDAECm1hdGNoZXJQdWIJAQJtcAAECm9yZGVyVmFsaWQJAQNtb2EBBQVvcmRlcgQLc2VuZGVyVmFsaWQJAPQDAwgFBW9yZGVyCWJvZHlCeXRlcwkAkQMCCAUFb3JkZXIGcHJvb2ZzAAAIBQVvcmRlcg9zZW5kZXJQdWJsaWNLZXkEDG1hdGNoZXJWYWxpZAkA9AMDCAUFb3JkZXIJYm9keUJ5dGVzCQCRAwIIBQVvcmRlcgZwcm9vZnMAAQUKbWF0Y2hlclB1YgMDAwUKb3JkZXJWYWxpZAULc2VuZGVyVmFsaWQHBQxtYXRjaGVyVmFsaWQHBgkBA3RvZQMFCm9yZGVyVmFsaWQFC3NlbmRlclZhbGlkBQxtYXRjaGVyVmFsaWQDCQABAgUHJG1hdGNoMAIUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAXMFByRtYXRjaDAEB25ld0hhc2gJAPYDAQkBBXZhbHVlAQgFAXMGc2NyaXB0BAthbGxvd2VkSGFzaAkA2wQBCQEFdmFsdWUBCQCdCAIFA2ZjYQkBHGtleUFsbG93ZWRMcFN0YWJsZVNjcmlwdEhhc2gABAtjdXJyZW50SGFzaAkA8QcBBQR0aGlzAwMJAAACBQthbGxvd2VkSGFzaAUHbmV3SGFzaAkBAiE9AgULY3VycmVudEhhc2gFB25ld0hhc2gHBgkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUPdGFyZ2V0UHVibGljS2V5CQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAABQ90YXJnZXRQdWJsaWNLZXkMoqDA",
    "height": 2226437,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DuTvqn8retCMWKnhW1NZtvcwqtYzGj5DhP5984wfEtrU
Next: 6KqX2kiRxgB5B8wYiHZZKnDhiTtQpxAfY6YBNnHbAwdU

Diff: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 - let defaultDecimals = 100000000
4 + let defaultDecimals = 1000000
5 5  
6 6  let scale8 = 100000000
7 7  
347 347                  else calcLpAmt
348 348              let amDiff = (inAmAmt - calcAmAssetPmt)
349 349              let prDiff = (inPrAmt - calcPrAssetPmt)
350 -             let $t01664916994 = if (if (isOneAsset)
350 +             let $t01664716992 = if (if (isOneAsset)
351 351                  then (pmtId == amIdStr)
352 352                  else false)
353 353                  then $Tuple2(pmtAmt, 0)
356 356                      else false)
357 357                      then $Tuple2(0, pmtAmt)
358 358                      else $Tuple2(calcAmAssetPmt, calcPrAssetPmt)
359 -             let writeAmAmt = $t01664916994._1
360 -             let writePrAmt = $t01664916994._2
359 +             let writeAmAmt = $t01664716992._1
360 +             let writePrAmt = $t01664716992._2
361 361              let commonState = [IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice), StringEntry(pau(userAddress, txId58), dataPutActionInfo(writeAmAmt, writePrAmt, emitLpAmt, curPrice, slippage, slippageCalc, height, lastBlock.timestamp, amDiff, prDiff))]
362 362              $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEm, lpId, sts, commonState, amDiff, prDiff, inAmId, inPrId)
363 363              }
621 621                          let prBalance = getAccBalance(prId)
622 622                          let amBalanceDefaultDecimals = ((amBalance * defaultDecimals) / amDcm)
623 623                          let prBalanceDefaultDecimals = ((prBalance * defaultDecimals) / prDcm)
624 -                         let $t02598126767 = if ((pmtAssetId == amId))
624 +                         let $t02597926765 = if ((pmtAssetId == amId))
625 625                              then if (if ((pmtAmtDefaultDecimals > amBalanceDefaultDecimals))
626 626                                  then true
627 627                                  else (amAssetPart > pmtAmtDefaultDecimals))
634 634                                      then throw("invalid payment amount")
635 635                                      else $Tuple6(amBalanceDefaultDecimals, (prBalanceDefaultDecimals - pmtAmtDefaultDecimals), 0, 0, (pmtAmtDefaultDecimals - prAssetPart), amAssetPart)
636 636                                  else throw("wrong pmtAssetId")
637 -                         let amBalanceNow = $t02598126767._1
638 -                         let prBalanceNow = $t02598126767._2
639 -                         let virtSwapInAm = $t02598126767._3
640 -                         let virtSwapOutPr = $t02598126767._4
641 -                         let virtSwapInPr = $t02598126767._5
642 -                         let virtSwapOutAm = $t02598126767._6
637 +                         let amBalanceNow = $t02597926765._1
638 +                         let prBalanceNow = $t02597926765._2
639 +                         let virtSwapInAm = $t02597926765._3
640 +                         let virtSwapOutPr = $t02597926765._4
641 +                         let virtSwapInPr = $t02597926765._5
642 +                         let virtSwapOutAm = $t02597926765._6
643 643                          let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
644 644                          let D1 = invoke(gwxCntr, "calcD", [toString(toBigInt(((amBalanceNow + virtSwapInAm) - virtSwapOutAm))), toString(toBigInt(((prBalanceNow + virtSwapInPr) - virtSwapOutPr))), A, Amult, Dconv], nil)
645 645                          let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
764 764                          let estimPrAmt = r._2
765 765                          let amBalance = getAccBalance(amId)
766 766                          let prBalance = getAccBalance(prId)
767 -                         let $t03154632003 = if ((outAssetId == amId))
767 +                         let $t03154432001 = if ((outAssetId == amId))
768 768                              then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), exchResult, estimPrAmt, 0, 0, (estimAmAmt + exchResult))
769 769                              else if ((outAssetId == prId))
770 770                                  then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), 0, 0, exchResult, estimAmAmt, (estimPrAmt + exchResult))
771 771                                  else throw("wrong outAssetId")
772 -                         let amBalanceNow = $t03154632003._1
773 -                         let prBalanceNow = $t03154632003._2
774 -                         let virtSwapInAm = $t03154632003._3
775 -                         let virtSwapOutPr = $t03154632003._4
776 -                         let virtSwapInPr = $t03154632003._5
777 -                         let virtSwapOutAm = $t03154632003._6
778 -                         let totalGet = $t03154632003._7
772 +                         let amBalanceNow = $t03154432001._1
773 +                         let prBalanceNow = $t03154432001._2
774 +                         let virtSwapInAm = $t03154432001._3
775 +                         let virtSwapOutPr = $t03154432001._4
776 +                         let virtSwapInPr = $t03154432001._5
777 +                         let virtSwapOutAm = $t03154432001._6
778 +                         let totalGet = $t03154432001._7
779 779                          if (if ((0 > virtSwapInAm))
780 780                              then true
781 781                              else (0 > virtSwapInPr))
789 789                                          let finalRes = vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
790 790                                          if ((finalRes == finalRes))
791 791                                              then {
792 -                                                 let $t03270832812 = if ((outAssetId == amId))
792 +                                                 let $t03270632810 = if ((outAssetId == amId))
793 793                                                      then $Tuple2(toInt(finalRes._2), 0)
794 794                                                      else $Tuple2(0, toInt(finalRes._2))
795 -                                                 let outAm = $t03270832812._1
796 -                                                 let outPr = $t03270832812._2
795 +                                                 let outAm = $t03270632810._1
796 +                                                 let outPr = $t03270632810._2
797 797                                                  let curPrX18 = cpbi(t1(prBalance, prDcm), t1(amBalance, amDcm))
798 798                                                  let curPr = f1(curPrX18, scale8)
799 799                                                  let state = [ScriptTransfer(userAddress, (outAm + outPr), if ((outAssetId == "WAVES"))
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 - let defaultDecimals = 100000000
4 + let defaultDecimals = 1000000
5 5  
6 6  let scale8 = 100000000
7 7  
8 8  let scale8BigInt = toBigInt(100000000)
9 9  
10 10  let scale18 = toBigInt(1000000000000000000)
11 11  
12 12  let zeroBigInt = toBigInt(0)
13 13  
14 14  let oneBigInt = toBigInt(1)
15 15  
16 16  let slippage4D = toBigInt((scale8 - ((scale8 * 1) / scale8)))
17 17  
18 18  let Amult = "100"
19 19  
20 20  let Dconv = "1"
21 21  
22 22  let SEP = "__"
23 23  
24 24  let EMPTY = ""
25 25  
26 26  let PoolActive = 1
27 27  
28 28  let PoolPutDis = 2
29 29  
30 30  let PoolMatcherDis = 3
31 31  
32 32  let PoolShutdown = 4
33 33  
34 34  let idxPoolAddress = 1
35 35  
36 36  let idxPoolSt = 2
37 37  
38 38  let idxLPAsId = 3
39 39  
40 40  let idxAmAsId = 4
41 41  
42 42  let idxPrAsId = 5
43 43  
44 44  let idxAmtAsDcm = 6
45 45  
46 46  let idxPriceAsDcm = 7
47 47  
48 48  let idxIAmtAsId = 8
49 49  
50 50  let idxIPriceAsId = 9
51 51  
52 52  let idxFactStakCntr = 1
53 53  
54 54  let idxFactSlippCntr = 7
55 55  
56 56  let idxFactGwxRewCntr = 10
57 57  
58 58  let delay = "%s__delay"
59 59  
60 60  func t1 (origVal,origScaleMult) = fraction(toBigInt(origVal), scale18, toBigInt(origScaleMult))
61 61  
62 62  
63 63  func f1 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), scale18))
64 64  
65 65  
66 66  func ts (amt,resScale,curScale) = fraction(amt, resScale, curScale)
67 67  
68 68  
69 69  func abs (val) = if ((zeroBigInt > val))
70 70      then -(val)
71 71      else val
72 72  
73 73  
74 74  func fc () = "%s__factoryContract"
75 75  
76 76  
77 77  func mpk () = "%s__managerPublicKey"
78 78  
79 79  
80 80  func pmpk () = "%s__pendingManagerPublicKey"
81 81  
82 82  
83 83  func pl () = "%s%s__price__last"
84 84  
85 85  
86 86  func ph (h,t) = makeString(["%s%s%d%d__price__history", toString(h), toString(t)], SEP)
87 87  
88 88  
89 89  func pau (ua,txId) = ((("%s%s%s__P__" + ua) + "__") + txId)
90 90  
91 91  
92 92  func gau (ua,txId) = ((("%s%s%s__G__" + ua) + "__") + txId)
93 93  
94 94  
95 95  func aa () = "%s__amountAsset"
96 96  
97 97  
98 98  func pa () = "%s__priceAsset"
99 99  
100 100  
101 101  func amp () = "%s__amp"
102 102  
103 103  
104 104  func ada () = "%s__addonAddr"
105 105  
106 106  
107 107  func lgotc (caller) = makeString(["%s%s__lastGetOneTknCall", caller], SEP)
108 108  
109 109  
110 110  func lsotc (caller) = makeString(["%s%s__lastPutOneTknCall", caller], SEP)
111 111  
112 112  
113 113  func fcfg () = "%s__factoryConfig"
114 114  
115 115  
116 116  func mtpk () = "%s%s__matcher__publicKey"
117 117  
118 118  
119 119  func pc (iAmtAs,iPrAs) = (((("%d%d%s__" + iAmtAs) + "__") + iPrAs) + "__config")
120 120  
121 121  
122 122  func mba (bAStr) = ("%s%s%s__mappings__baseAsset2internalId__" + bAStr)
123 123  
124 124  
125 125  func aps () = "%s__shutdown"
126 126  
127 127  
128 128  func keyAllowedLpStableScriptHash () = "%s__allowedLpStableScriptHash"
129 129  
130 130  
131 131  func toe (orV,sendrV,matchV) = throw(((((("Failed: ordValid=" + toString(orV)) + " sndrValid=") + toString(sendrV)) + " mtchrValid=") + toString(matchV)))
132 132  
133 133  
134 134  func str (val) = match val {
135 135      case valStr: String => 
136 136          valStr
137 137      case _ => 
138 138          throw("fail cast to String")
139 139  }
140 140  
141 141  
142 142  func strf (addr,key) = valueOrErrorMessage(getString(addr, key), makeString(["mandatory ", toString(addr), ".", key, " not defined"], ""))
143 143  
144 144  
145 145  func intf (addr,key) = valueOrErrorMessage(getInteger(addr, key), makeString(["mandatory ", toString(addr), ".", key, " not defined"], ""))
146 146  
147 147  
148 148  let fca = addressFromStringValue(strf(this, fc()))
149 149  
150 150  let A = strf(this, amp())
151 151  
152 152  func igs () = valueOrElse(getBoolean(fca, aps()), false)
153 153  
154 154  
155 155  func mp () = fromBase58String(strf(fca, mtpk()))
156 156  
157 157  
158 158  func gpc () = {
159 159      let amtAs = strf(this, aa())
160 160      let priceAs = strf(this, pa())
161 161      let iPriceAs = intf(fca, mba(priceAs))
162 162      let iAmtAs = intf(fca, mba(amtAs))
163 163      split(strf(fca, pc(toString(iAmtAs), toString(iPriceAs))), SEP)
164 164      }
165 165  
166 166  
167 167  func gfc () = split(strf(fca, fcfg()), SEP)
168 168  
169 169  
170 170  func dataPutActionInfo (inAmtAssetAmt,inPriceAssetAmt,outLpAmt,price,slipByUser,slippageReal,txHeight,txTimestamp,slipageAmAmt,slipagePrAmt) = makeString(["%d%d%d%d%d%d%d%d%d%d", toString(inAmtAssetAmt), toString(inPriceAssetAmt), toString(outLpAmt), toString(price), toString(slipByUser), toString(slippageReal), toString(txHeight), toString(txTimestamp), toString(slipageAmAmt), toString(slipagePrAmt)], SEP)
171 171  
172 172  
173 173  func dataGetActionInfo (outAmtAssetAmt,outPriceAssetAmt,inLpAmt,price,txHeight,txTimestamp) = makeString(["%d%d%d%d%d%d", toString(outAmtAssetAmt), toString(outPriceAssetAmt), toString(inLpAmt), toString(price), toString(txHeight), toString(txTimestamp)], SEP)
174 174  
175 175  
176 176  func getAccBalance (assetId) = if ((assetId == "WAVES"))
177 177      then wavesBalance(this).available
178 178      else assetBalance(this, fromBase58String(assetId))
179 179  
180 180  
181 181  func cpbi (prAmtX18,amAmtX18) = fraction(prAmtX18, scale18, amAmtX18)
182 182  
183 183  
184 184  func vad (A1,A2,slippage) = {
185 185      let diff = fraction((A1 - A2), scale8BigInt, A2)
186 186      let pass = ((slippage - abs(diff)) > zeroBigInt)
187 187      if (!(pass))
188 188          then throw(("Big slpg: " + toString(diff)))
189 189          else $Tuple2(pass, min([A1, A2]))
190 190      }
191 191  
192 192  
193 193  func vd (D1,D0,slpg) = {
194 194      let diff = fraction(D0, scale8BigInt, D1)
195 195      let fail = (slpg > diff)
196 196      if (if (fail)
197 197          then true
198 198          else (D0 > D1))
199 199          then throw(((((((toString(D0) + " ") + toString(D1)) + " ") + toString(diff)) + " ") + toString(slpg)))
200 200          else fail
201 201      }
202 202  
203 203  
204 204  func pcp (amAssetDcm,prAssetDcm,amAmt,prAmt) = {
205 205      let amtAsAmtX18 = t1(amAmt, amAssetDcm)
206 206      let prAsAmtX18 = t1(prAmt, prAssetDcm)
207 207      cpbi(prAsAmtX18, amtAsAmtX18)
208 208      }
209 209  
210 210  
211 211  func calcPrices (amAmt,prAmt,lpAmt) = {
212 212      let cfg = gpc()
213 213      let amtAsDcm = parseIntValue(cfg[idxAmtAsDcm])
214 214      let prAsDcm = parseIntValue(cfg[idxPriceAsDcm])
215 215      let priceX18 = pcp(amtAsDcm, prAsDcm, amAmt, prAmt)
216 216      let amAmtX18 = t1(amAmt, amtAsDcm)
217 217      let prAmtX18 = t1(prAmt, prAsDcm)
218 218      let lpAmtX18 = t1(lpAmt, scale8)
219 219      let lpPrInAmAsX18 = cpbi(amAmtX18, lpAmtX18)
220 220      let lpPrInPrAsX18 = cpbi(prAmtX18, lpAmtX18)
221 221  [priceX18, lpPrInAmAsX18, lpPrInPrAsX18]
222 222      }
223 223  
224 224  
225 225  func calculatePrices (amAmt,prAmt,lpAmt) = {
226 226      let p = calcPrices(amAmt, prAmt, lpAmt)
227 227  [f1(p[0], scale8), f1(p[1], scale8), f1(p[2], scale8)]
228 228      }
229 229  
230 230  
231 231  func ego (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
232 232      let cfg = gpc()
233 233      let lpId = cfg[idxLPAsId]
234 234      let amId = cfg[idxAmAsId]
235 235      let prId = cfg[idxPrAsId]
236 236      let amDcm = parseIntValue(cfg[idxAmtAsDcm])
237 237      let prDcm = parseIntValue(cfg[idxPriceAsDcm])
238 238      let sts = cfg[idxPoolSt]
239 239      let lpEmiss = valueOrErrorMessage(assetInfo(fromBase58String(lpId)), "Wrong LP id").quantity
240 240      if ((lpId != pmtAssetId))
241 241          then throw("Wrong pmt asset")
242 242          else {
243 243              let amBalance = getAccBalance(amId)
244 244              let prBalance = getAccBalance(prId)
245 245              let amountBalanceDefaultDecimals = fraction(amBalance, defaultDecimals, amDcm)
246 246              let priceBalanceDefaultDecimals = fraction(prBalance, defaultDecimals, prDcm)
247 247              let amBalanceX18 = t1(amountBalanceDefaultDecimals, defaultDecimals)
248 248              let prBalanceX18 = t1(priceBalanceDefaultDecimals, defaultDecimals)
249 249              let curPriceX18 = cpbi(prBalanceX18, amBalanceX18)
250 250              let curPrice = f1(curPriceX18, scale8)
251 251              let pmtLpAmtX18 = t1(pmtLpAmt, scale8)
252 252              let lpEmissX18 = t1(lpEmiss, scale8)
253 253              let outAmAmtX18 = fraction(amBalanceX18, pmtLpAmtX18, lpEmissX18)
254 254              let outPrAmtX18 = fraction(prBalanceX18, pmtLpAmtX18, lpEmissX18)
255 255              let outAmountAmountDefaultDecimals = f1(outAmAmtX18, defaultDecimals)
256 256              let outPriceAmountDefaultDecimals = f1(outPrAmtX18, defaultDecimals)
257 257              let outAmAmt = fraction(outAmountAmountDefaultDecimals, amDcm, defaultDecimals)
258 258              let outPrAmt = fraction(outPriceAmountDefaultDecimals, prDcm, defaultDecimals)
259 259              let state = if ((txId58 == ""))
260 260                  then nil
261 261                  else [ScriptTransfer(userAddress, outAmAmt, if ((amId == "WAVES"))
262 262                      then unit
263 263                      else fromBase58String(amId)), ScriptTransfer(userAddress, outPrAmt, if ((prId == "WAVES"))
264 264                      then unit
265 265                      else fromBase58String(prId)), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAmAmt, outPrAmt, pmtLpAmt, curPrice, height, lastBlock.timestamp)), IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice)]
266 266              $Tuple10(outAmAmt, outPrAmt, amId, prId, amBalance, prBalance, lpEmiss, curPriceX18, sts, state)
267 267              }
268 268      }
269 269  
270 270  
271 271  func epo (txId58,slippage,inAmAmt,inAmId,inPrAmt,inPrId,userAddress,isEval,emitLp,isOneAsset,pmtAmt,pmtId) = {
272 272      let cfg = gpc()
273 273      let lpId = fromBase58String(cfg[idxLPAsId])
274 274      let amIdStr = cfg[idxAmAsId]
275 275      let prIdStr = cfg[idxPrAsId]
276 276      let inAmIdStr = cfg[idxIAmtAsId]
277 277      let inPrIdStr = cfg[idxIPriceAsId]
278 278      let amtDcm = parseIntValue(cfg[idxAmtAsDcm])
279 279      let priceDcm = parseIntValue(cfg[idxPriceAsDcm])
280 280      let sts = cfg[idxPoolSt]
281 281      let lpEm = valueOrErrorMessage(assetInfo(lpId), "Wr lp as").quantity
282 282      let amBalance = if (isEval)
283 283          then getAccBalance(amIdStr)
284 284          else if (if (isOneAsset)
285 285              then (pmtId == amIdStr)
286 286              else false)
287 287              then (getAccBalance(amIdStr) - pmtAmt)
288 288              else if (isOneAsset)
289 289                  then getAccBalance(amIdStr)
290 290                  else (getAccBalance(amIdStr) - inAmAmt)
291 291      let prBalance = if (isEval)
292 292          then getAccBalance(prIdStr)
293 293          else if (if (isOneAsset)
294 294              then (pmtId == prIdStr)
295 295              else false)
296 296              then (getAccBalance(prIdStr) - pmtAmt)
297 297              else if (isOneAsset)
298 298                  then getAccBalance(prIdStr)
299 299                  else (getAccBalance(prIdStr) - inPrAmt)
300 300      let amountBalanceDefaultDecimals = fraction(amBalance, defaultDecimals, amtDcm)
301 301      let priceBalanceDefaultDecimals = fraction(prBalance, defaultDecimals, priceDcm)
302 302      let inAmountAssetAmountDefaultDecimals = fraction(inAmAmt, defaultDecimals, amtDcm)
303 303      let inPriceAssetAmountDefaultDecimals = fraction(inPrAmt, defaultDecimals, priceDcm)
304 304      let inAmAssetAmtX18 = t1(inAmountAssetAmountDefaultDecimals, defaultDecimals)
305 305      let inPrAssetAmtX18 = t1(inPriceAssetAmountDefaultDecimals, defaultDecimals)
306 306      let userPriceX18 = cpbi(inPrAssetAmtX18, inAmAssetAmtX18)
307 307      let amBalanceX18 = t1(amountBalanceDefaultDecimals, defaultDecimals)
308 308      let prBalanceX18 = t1(priceBalanceDefaultDecimals, defaultDecimals)
309 309      let r = if ((lpEm == 0))
310 310          then {
311 311              let curPriceX18 = zeroBigInt
312 312              let slippageX18 = zeroBigInt
313 313              let lpAmtX18 = pow((inAmAssetAmtX18 * inPrAssetAmtX18), 0, toBigInt(5), 1, 0, DOWN)
314 314              $Tuple5(f1(lpAmtX18, scale8), f1(inAmAssetAmtX18, defaultDecimals), f1(inPrAssetAmtX18, defaultDecimals), cpbi((prBalanceX18 + inPrAssetAmtX18), (amBalanceX18 + inAmAssetAmtX18)), slippageX18)
315 315              }
316 316          else {
317 317              let curPriceX18 = cpbi(prBalanceX18, amBalanceX18)
318 318              let slippageRealX18 = fraction(abs((curPriceX18 - userPriceX18)), scale18, curPriceX18)
319 319              let slippageX18 = t1(slippage, scale8)
320 320              if (if ((curPriceX18 != zeroBigInt))
321 321                  then (slippageRealX18 > slippageX18)
322 322                  else false)
323 323                  then throw(((("Price slippage " + toString(slippageRealX18)) + " > ") + toString(slippageX18)))
324 324                  else {
325 325                      let lpEmissionX18 = t1(lpEm, scale8)
326 326                      let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
327 327                      let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
328 328                      let expectedAmts = if ((prViaAmX18 > inPrAssetAmtX18))
329 329                          then $Tuple2(amViaPrX18, inPrAssetAmtX18)
330 330                          else $Tuple2(inAmAssetAmtX18, prViaAmX18)
331 331                      let expAmtAssetAmtX18 = expectedAmts._1
332 332                      let expPriceAssetAmtX18 = expectedAmts._2
333 333                      let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18)
334 334                      $Tuple5(f1(lpAmtX18, scale8), f1(expAmtAssetAmtX18, defaultDecimals), f1(expPriceAssetAmtX18, defaultDecimals), curPriceX18, slippageX18)
335 335                      }
336 336              }
337 337      let calcLpAmt = r._1
338 338      let calcAmAssetPmt = fraction(r._2, amtDcm, defaultDecimals)
339 339      let calcPrAssetPmt = fraction(r._3, priceDcm, defaultDecimals)
340 340      let curPrice = f1(r._4, scale8)
341 341      let slippageCalc = f1(r._5, scale8)
342 342      if ((0 >= calcLpAmt))
343 343          then throw("LP <= 0")
344 344          else {
345 345              let emitLpAmt = if (!(emitLp))
346 346                  then 0
347 347                  else calcLpAmt
348 348              let amDiff = (inAmAmt - calcAmAssetPmt)
349 349              let prDiff = (inPrAmt - calcPrAssetPmt)
350 -             let $t01664916994 = if (if (isOneAsset)
350 +             let $t01664716992 = if (if (isOneAsset)
351 351                  then (pmtId == amIdStr)
352 352                  else false)
353 353                  then $Tuple2(pmtAmt, 0)
354 354                  else if (if (isOneAsset)
355 355                      then (pmtId == prIdStr)
356 356                      else false)
357 357                      then $Tuple2(0, pmtAmt)
358 358                      else $Tuple2(calcAmAssetPmt, calcPrAssetPmt)
359 -             let writeAmAmt = $t01664916994._1
360 -             let writePrAmt = $t01664916994._2
359 +             let writeAmAmt = $t01664716992._1
360 +             let writePrAmt = $t01664716992._2
361 361              let commonState = [IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice), StringEntry(pau(userAddress, txId58), dataPutActionInfo(writeAmAmt, writePrAmt, emitLpAmt, curPrice, slippage, slippageCalc, height, lastBlock.timestamp, amDiff, prDiff))]
362 362              $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEm, lpId, sts, commonState, amDiff, prDiff, inAmId, inPrId)
363 363              }
364 364      }
365 365  
366 366  
367 367  func moa (order) = {
368 368      let cfg = gpc()
369 369      let amtAsId = cfg[idxAmAsId]
370 370      let prAsId = cfg[idxPrAsId]
371 371      let sts = parseIntValue(cfg[idxPoolSt])
372 372      let amtAsDcm = parseIntValue(cfg[idxAmtAsDcm])
373 373      let prAsDcm = parseIntValue(cfg[idxPriceAsDcm])
374 374      let accAmtAsBalance = getAccBalance(amtAsId)
375 375      let accPrAsBalance = getAccBalance(prAsId)
376 376      let curPriceX18 = if ((order.orderType == Buy))
377 377          then pcp(amtAsDcm, prAsDcm, (accAmtAsBalance + order.amount), accPrAsBalance)
378 378          else pcp(amtAsDcm, prAsDcm, (accAmtAsBalance - order.amount), accPrAsBalance)
379 379      let curPrice = f1(curPriceX18, scale8)
380 380      if (if (if (igs())
381 381          then true
382 382          else (sts == PoolMatcherDis))
383 383          then true
384 384          else (sts == PoolShutdown))
385 385          then throw("Admin blocked")
386 386          else {
387 387              let orAmtAsset = order.assetPair.amountAsset
388 388              let orAmtAsStr = if ((orAmtAsset == unit))
389 389                  then "WAVES"
390 390                  else toBase58String(value(orAmtAsset))
391 391              let orPrAsset = order.assetPair.priceAsset
392 392              let orPrAsStr = if ((orPrAsset == unit))
393 393                  then "WAVES"
394 394                  else toBase58String(value(orPrAsset))
395 395              if (if ((orAmtAsStr != amtAsId))
396 396                  then true
397 397                  else (orPrAsStr != prAsId))
398 398                  then throw("Wr assets")
399 399                  else {
400 400                      let orderPrice = order.price
401 401                      let priceDcm = fraction(scale8, prAsDcm, amtAsDcm)
402 402                      let castOrderPrice = ts(orderPrice, scale8, priceDcm)
403 403                      let isOrderPriceValid = if ((order.orderType == Buy))
404 404                          then (curPrice >= castOrderPrice)
405 405                          else (castOrderPrice >= curPrice)
406 406                      true
407 407                      }
408 408              }
409 409      }
410 410  
411 411  
412 412  func cg (i) = if ((size(i.payments) != 1))
413 413      then throw("1 pmnt exp")
414 414      else {
415 415          let pmt = value(i.payments[0])
416 416          let pmtAssetId = value(pmt.assetId)
417 417          let pmtAmt = pmt.amount
418 418          let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
419 419          let outAmAmt = r._1
420 420          let outPrAmt = r._2
421 421          let sts = parseIntValue(r._9)
422 422          let state = r._10
423 423          if (if (igs())
424 424              then true
425 425              else (sts == PoolShutdown))
426 426              then throw(("Admin blocked: " + toString(sts)))
427 427              else $Tuple5(outAmAmt, outPrAmt, pmtAmt, pmtAssetId, state)
428 428          }
429 429  
430 430  
431 431  func cp (caller,txId,amAsPmt,prAsPmt,slippage,emitLp,isOneAsset,pmtAmt,pmtId) = {
432 432      let r = epo(txId, slippage, value(amAsPmt).amount, value(amAsPmt).assetId, value(prAsPmt).amount, value(prAsPmt).assetId, caller, false, emitLp, isOneAsset, pmtAmt, pmtId)
433 433      let sts = parseIntValue(r._8)
434 434      if (if (if (igs())
435 435          then true
436 436          else (sts == PoolPutDis))
437 437          then true
438 438          else (sts == PoolShutdown))
439 439          then throw(("Blocked:" + toString(sts)))
440 440          else r
441 441      }
442 442  
443 443  
444 444  func m () = match getString(mpk()) {
445 445      case s: String => 
446 446          fromBase58String(s)
447 447      case _: Unit => 
448 448          unit
449 449      case _ => 
450 450          throw("Match error")
451 451  }
452 452  
453 453  
454 454  func pm () = match getString(pmpk()) {
455 455      case s: String => 
456 456          fromBase58String(s)
457 457      case _: Unit => 
458 458          unit
459 459      case _ => 
460 460          throw("Match error")
461 461  }
462 462  
463 463  
464 464  let pd = throw("Permission denied")
465 465  
466 466  func mm (i) = match m() {
467 467      case pk: ByteVector => 
468 468          if ((i.callerPublicKey == pk))
469 469              then true
470 470              else pd
471 471      case _: Unit => 
472 472          if ((i.caller == this))
473 473              then true
474 474              else pd
475 475      case _ => 
476 476          throw("Match error")
477 477  }
478 478  
479 479  
480 480  @Callable(i)
481 481  func constructor (fc) = {
482 482      let c = mm(i)
483 483      if ((c == c))
484 484          then [StringEntry(fc(), fc)]
485 485          else throw("Strict value is not equal to itself.")
486 486      }
487 487  
488 488  
489 489  
490 490  @Callable(i)
491 491  func setManager (pendingManagerPublicKey) = {
492 492      let c = mm(i)
493 493      if ((c == c))
494 494          then {
495 495              let cm = fromBase58String(pendingManagerPublicKey)
496 496              if ((cm == cm))
497 497                  then [StringEntry(pmpk(), pendingManagerPublicKey)]
498 498                  else throw("Strict value is not equal to itself.")
499 499              }
500 500          else throw("Strict value is not equal to itself.")
501 501      }
502 502  
503 503  
504 504  
505 505  @Callable(i)
506 506  func confirmManager () = {
507 507      let p = pm()
508 508      let hpm = if (isDefined(p))
509 509          then true
510 510          else throw("No pending manager")
511 511      if ((hpm == hpm))
512 512          then {
513 513              let cpm = if ((i.callerPublicKey == value(p)))
514 514                  then true
515 515                  else throw("You are not pending manager")
516 516              if ((cpm == cpm))
517 517                  then [StringEntry(mpk(), toBase58String(value(p))), DeleteEntry(pmpk())]
518 518                  else throw("Strict value is not equal to itself.")
519 519              }
520 520          else throw("Strict value is not equal to itself.")
521 521      }
522 522  
523 523  
524 524  
525 525  @Callable(i)
526 526  func put (slip,autoStake) = {
527 527      let factCfg = gfc()
528 528      let stakingCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactStakCntr]), "Wr st addr")
529 529      let slipCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactSlippCntr]), "Wr sl addr")
530 530      if ((0 > slip))
531 531          then throw("Wrong slippage")
532 532          else if ((size(i.payments) != 2))
533 533              then throw("2 pmnts expd")
534 534              else {
535 535                  let e = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(value(i.payments[0]).assetId, value(i.payments[0]).amount), i.payments[1], slip, true, false, 0, "")
536 536                  let emitLpAmt = e._2
537 537                  let lpAssetId = e._7
538 538                  let state = e._9
539 539                  let amDiff = e._10
540 540                  let prDiff = e._11
541 541                  let amId = e._12
542 542                  let prId = e._13
543 543                  let r = invoke(fca, "emit", [emitLpAmt], nil)
544 544                  if ((r == r))
545 545                      then {
546 546                          let el =                         match r {
547 547                              case legacy: Address => 
548 548                                  invoke(legacy, "emit", [emitLpAmt], nil)
549 549                              case _ => 
550 550                                  unit
551 551                          }
552 552                          if ((el == el))
553 553                              then {
554 554                                  let sa = if ((amDiff > 0))
555 555                                      then invoke(slipCntr, "put", nil, [AttachedPayment(amId, amDiff)])
556 556                                      else nil
557 557                                  if ((sa == sa))
558 558                                      then {
559 559                                          let sp = if ((prDiff > 0))
560 560                                              then invoke(slipCntr, "put", nil, [AttachedPayment(prId, prDiff)])
561 561                                              else nil
562 562                                          if ((sp == sp))
563 563                                              then {
564 564                                                  let lpTrnsfr = if (autoStake)
565 565                                                      then {
566 566                                                          let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
567 567                                                          if ((ss == ss))
568 568                                                              then nil
569 569                                                              else throw("Strict value is not equal to itself.")
570 570                                                          }
571 571                                                      else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
572 572                                                  (state ++ lpTrnsfr)
573 573                                                  }
574 574                                              else throw("Strict value is not equal to itself.")
575 575                                          }
576 576                                      else throw("Strict value is not equal to itself.")
577 577                                  }
578 578                              else throw("Strict value is not equal to itself.")
579 579                          }
580 580                      else throw("Strict value is not equal to itself.")
581 581                  }
582 582      }
583 583  
584 584  
585 585  
586 586  @Callable(i)
587 587  func putOneTkn (amAssetPart,prAssetPart,outLp,slippage,autoStake) = {
588 588      let cfg = gfc()
589 589      let stakingCntr = valueOrErrorMessage(addressFromString(cfg[idxFactStakCntr]), "Wr st addr")
590 590      let slipCntr = valueOrErrorMessage(addressFromString(cfg[idxFactSlippCntr]), "Wr sl addr")
591 591      let gwxCntr = valueOrErrorMessage(addressFromString(cfg[idxFactGwxRewCntr]), "Wr gwx addr")
592 592      let poolCfg = gpc()
593 593      let amId = poolCfg[idxAmAsId]
594 594      let prId = poolCfg[idxPrAsId]
595 595      let amDcm = parseIntValue(poolCfg[idxAmtAsDcm])
596 596      let prDcm = parseIntValue(poolCfg[idxPriceAsDcm])
597 597      let addon = valueOrElse(getString(this, ada()), "")
598 598      let userAddress = if ((addon == toString(i.caller)))
599 599          then i.originCaller
600 600          else i.caller
601 601      if (if (if (if ((0 >= slippage))
602 602          then true
603 603          else (0 >= amAssetPart))
604 604          then true
605 605          else (0 >= prAssetPart))
606 606          then true
607 607          else (0 >= outLp))
608 608          then throw("Wrong params")
609 609          else if ((size(i.payments) != 1))
610 610              then throw("1 pmnt expd")
611 611              else {
612 612                  let pmt = value(i.payments[0])
613 613                  let pmtAssetId = toBase58String(value(pmt.assetId))
614 614                  let pmtDecimals = value(assetInfo(value(i.payments[0].assetId))).decimals
615 615                  let pmtAmt = pmt.amount
616 616                  let pmtAmtDefaultDecimals = ((pmtAmt * defaultDecimals) / pow(10, 0, pmtDecimals, 0, 0, DOWN))
617 617                  if ((10000000 > pmtAmtDefaultDecimals))
618 618                      then throw("Wrong pmt amt")
619 619                      else {
620 620                          let amBalance = getAccBalance(amId)
621 621                          let prBalance = getAccBalance(prId)
622 622                          let amBalanceDefaultDecimals = ((amBalance * defaultDecimals) / amDcm)
623 623                          let prBalanceDefaultDecimals = ((prBalance * defaultDecimals) / prDcm)
624 -                         let $t02598126767 = if ((pmtAssetId == amId))
624 +                         let $t02597926765 = if ((pmtAssetId == amId))
625 625                              then if (if ((pmtAmtDefaultDecimals > amBalanceDefaultDecimals))
626 626                                  then true
627 627                                  else (amAssetPart > pmtAmtDefaultDecimals))
628 628                                  then throw("invalid payment amount")
629 629                                  else $Tuple6((amBalanceDefaultDecimals - pmtAmtDefaultDecimals), prBalanceDefaultDecimals, (pmtAmtDefaultDecimals - amAssetPart), prAssetPart, 0, 0)
630 630                              else if ((pmtAssetId == prId))
631 631                                  then if (if ((pmtAmtDefaultDecimals > prBalanceDefaultDecimals))
632 632                                      then true
633 633                                      else (prAssetPart > pmtAmtDefaultDecimals))
634 634                                      then throw("invalid payment amount")
635 635                                      else $Tuple6(amBalanceDefaultDecimals, (prBalanceDefaultDecimals - pmtAmtDefaultDecimals), 0, 0, (pmtAmtDefaultDecimals - prAssetPart), amAssetPart)
636 636                                  else throw("wrong pmtAssetId")
637 -                         let amBalanceNow = $t02598126767._1
638 -                         let prBalanceNow = $t02598126767._2
639 -                         let virtSwapInAm = $t02598126767._3
640 -                         let virtSwapOutPr = $t02598126767._4
641 -                         let virtSwapInPr = $t02598126767._5
642 -                         let virtSwapOutAm = $t02598126767._6
637 +                         let amBalanceNow = $t02597926765._1
638 +                         let prBalanceNow = $t02597926765._2
639 +                         let virtSwapInAm = $t02597926765._3
640 +                         let virtSwapOutPr = $t02597926765._4
641 +                         let virtSwapInPr = $t02597926765._5
642 +                         let virtSwapOutAm = $t02597926765._6
643 643                          let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
644 644                          let D1 = invoke(gwxCntr, "calcD", [toString(toBigInt(((amBalanceNow + virtSwapInAm) - virtSwapOutAm))), toString(toBigInt(((prBalanceNow + virtSwapInPr) - virtSwapOutPr))), A, Amult, Dconv], nil)
645 645                          let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
646 646                          if ((D0vsD1 == D0vsD1))
647 647                              then {
648 648                                  let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), slippage, true, true, pmtAmt, pmtAssetId)
649 649                                  let estimLP = estPut._2
650 650                                  let lpAssetId = estPut._7
651 651                                  let state = estPut._9
652 652                                  let amDiff = estPut._10
653 653                                  let prDiff = estPut._11
654 654                                  let lpCalcRes = vad(toBigInt(estimLP), toBigInt(outLp), toBigInt(slippage))
655 655                                  let emitLpAmt = toInt(lpCalcRes._2)
656 656                                  let e = invoke(fca, "emit", [emitLpAmt], nil)
657 657                                  if ((e == e))
658 658                                      then {
659 659                                          let el =                                         match e {
660 660                                              case legacy: Address => 
661 661                                                  invoke(legacy, "emit", [emitLpAmt], nil)
662 662                                              case _ => 
663 663                                                  unit
664 664                                          }
665 665                                          if ((el == el))
666 666                                              then {
667 667                                                  let sa = if ((amDiff > 0))
668 668                                                      then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
669 669                                                      else nil
670 670                                                  if ((sa == sa))
671 671                                                      then {
672 672                                                          let sp = if ((prDiff > 0))
673 673                                                              then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
674 674                                                              else nil
675 675                                                          if ((sp == sp))
676 676                                                              then {
677 677                                                                  let lpTrnsfr = if (autoStake)
678 678                                                                      then {
679 679                                                                          let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
680 680                                                                          if ((ss == ss))
681 681                                                                              then nil
682 682                                                                              else throw("Strict value is not equal to itself.")
683 683                                                                          }
684 684                                                                      else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
685 685                                                                  (state ++ lpTrnsfr)
686 686                                                                  }
687 687                                                              else throw("Strict value is not equal to itself.")
688 688                                                          }
689 689                                                      else throw("Strict value is not equal to itself.")
690 690                                                  }
691 691                                              else throw("Strict value is not equal to itself.")
692 692                                          }
693 693                                      else throw("Strict value is not equal to itself.")
694 694                                  }
695 695                              else throw("Strict value is not equal to itself.")
696 696                          }
697 697                  }
698 698      }
699 699  
700 700  
701 701  
702 702  @Callable(i)
703 703  func putForFree (maxSlpg) = if ((0 > maxSlpg))
704 704      then throw("Wrong slpg")
705 705      else if ((size(i.payments) != 2))
706 706          then throw("2 pmnts expd")
707 707          else {
708 708              let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(value(i.payments[0]).assetId, value(i.payments[0]).amount), i.payments[1], maxSlpg, false, false, 0, "")
709 709              estPut._9
710 710              }
711 711  
712 712  
713 713  
714 714  @Callable(i)
715 715  func get () = {
716 716      let r = cg(i)
717 717      let outAmtAmt = r._1
718 718      let outPrAmt = r._2
719 719      let pmtAmt = r._3
720 720      let pmtAssetId = r._4
721 721      let state = r._5
722 722      let b = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
723 723      if ((b == b))
724 724          then state
725 725          else throw("Strict value is not equal to itself.")
726 726      }
727 727  
728 728  
729 729  
730 730  @Callable(i)
731 731  func getOneTkn (exchResult,notUsed,outAmount,outAssetId,slippage) = if ((size(i.payments) != 1))
732 732      then throw("1 pmnt expd")
733 733      else {
734 734          let cfg = gpc()
735 735          let lpId = cfg[idxLPAsId]
736 736          let amId = cfg[idxAmAsId]
737 737          let prId = cfg[idxPrAsId]
738 738          let amDcm = parseIntValue(cfg[idxAmtAsDcm])
739 739          let prDcm = parseIntValue(cfg[idxPriceAsDcm])
740 740          let sts = cfg[idxPoolSt]
741 741          let factCfg = gfc()
742 742          let gwxCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactGwxRewCntr]), "Wr sl addr")
743 743          let pmt = value(i.payments[0])
744 744          let addon = valueOrElse(getString(this, ada()), "")
745 745          let userAddress = if ((addon == toString(i.caller)))
746 746              then i.originCaller
747 747              else i.caller
748 748          let txId58 = toBase58String(i.transactionId)
749 749          let pmtAssetId = value(pmt.assetId)
750 750          let pmtAmt = pmt.amount
751 751          if ((1000000000 > pmtAmt))
752 752              then throw("Min pmt 10 LP")
753 753              else if (if (if ((0 > slippage))
754 754                  then true
755 755                  else (0 > exchResult))
756 756                  then true
757 757                  else (0 > outAmount))
758 758                  then throw("Wrong params")
759 759                  else if ((lpId != toBase58String(pmtAssetId)))
760 760                      then throw("Wrong LP")
761 761                      else {
762 762                          let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
763 763                          let estimAmAmt = r._1
764 764                          let estimPrAmt = r._2
765 765                          let amBalance = getAccBalance(amId)
766 766                          let prBalance = getAccBalance(prId)
767 -                         let $t03154632003 = if ((outAssetId == amId))
767 +                         let $t03154432001 = if ((outAssetId == amId))
768 768                              then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), exchResult, estimPrAmt, 0, 0, (estimAmAmt + exchResult))
769 769                              else if ((outAssetId == prId))
770 770                                  then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), 0, 0, exchResult, estimAmAmt, (estimPrAmt + exchResult))
771 771                                  else throw("wrong outAssetId")
772 -                         let amBalanceNow = $t03154632003._1
773 -                         let prBalanceNow = $t03154632003._2
774 -                         let virtSwapInAm = $t03154632003._3
775 -                         let virtSwapOutPr = $t03154632003._4
776 -                         let virtSwapInPr = $t03154632003._5
777 -                         let virtSwapOutAm = $t03154632003._6
778 -                         let totalGet = $t03154632003._7
772 +                         let amBalanceNow = $t03154432001._1
773 +                         let prBalanceNow = $t03154432001._2
774 +                         let virtSwapInAm = $t03154432001._3
775 +                         let virtSwapOutPr = $t03154432001._4
776 +                         let virtSwapInPr = $t03154432001._5
777 +                         let virtSwapOutAm = $t03154432001._6
778 +                         let totalGet = $t03154432001._7
779 779                          if (if ((0 > virtSwapInAm))
780 780                              then true
781 781                              else (0 > virtSwapInPr))
782 782                              then throw("Wrong calc")
783 783                              else {
784 784                                  let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
785 785                                  let D1 = invoke(gwxCntr, "calcD", [toString(((amBalanceNow - virtSwapInAm) + virtSwapOutAm)), toString(((prBalanceNow + virtSwapOutPr) - virtSwapInPr)), A, Amult, Dconv], nil)
786 786                                  let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
787 787                                  if ((D0vsD1 == D0vsD1))
788 788                                      then {
789 789                                          let finalRes = vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
790 790                                          if ((finalRes == finalRes))
791 791                                              then {
792 -                                                 let $t03270832812 = if ((outAssetId == amId))
792 +                                                 let $t03270632810 = if ((outAssetId == amId))
793 793                                                      then $Tuple2(toInt(finalRes._2), 0)
794 794                                                      else $Tuple2(0, toInt(finalRes._2))
795 -                                                 let outAm = $t03270832812._1
796 -                                                 let outPr = $t03270832812._2
795 +                                                 let outAm = $t03270632810._1
796 +                                                 let outPr = $t03270632810._2
797 797                                                  let curPrX18 = cpbi(t1(prBalance, prDcm), t1(amBalance, amDcm))
798 798                                                  let curPr = f1(curPrX18, scale8)
799 799                                                  let state = [ScriptTransfer(userAddress, (outAm + outPr), if ((outAssetId == "WAVES"))
800 800                                                      then unit
801 801                                                      else fromBase58String(outAssetId)), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAm, outPr, pmtAmt, curPr, height, lastBlock.timestamp)), IntegerEntry(pl(), curPr), IntegerEntry(ph(height, lastBlock.timestamp), curPr)]
802 802                                                  if ((state == state))
803 803                                                      then {
804 804                                                          let burn = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
805 805                                                          if ((burn == burn))
806 806                                                              then state
807 807                                                              else throw("Strict value is not equal to itself.")
808 808                                                          }
809 809                                                      else throw("Strict value is not equal to itself.")
810 810                                                  }
811 811                                              else throw("Strict value is not equal to itself.")
812 812                                          }
813 813                                      else throw("Strict value is not equal to itself.")
814 814                                  }
815 815                          }
816 816          }
817 817  
818 818  
819 819  
820 820  @Callable(i)
821 821  func getNoLess (noLessThenAmtAsset,noLessThenPriceAsset) = {
822 822      let r = cg(i)
823 823      let outAmAmt = r._1
824 824      let outPrAmt = r._2
825 825      let pmtAmt = r._3
826 826      let pmtAssetId = r._4
827 827      let state = r._5
828 828      if ((noLessThenAmtAsset > outAmAmt))
829 829          then throw(((("Failed:  " + toString(outAmAmt)) + " < ") + toString(noLessThenAmtAsset)))
830 830          else if ((noLessThenPriceAsset > outPrAmt))
831 831              then throw(((("Failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset)))
832 832              else {
833 833                  let burnLPAssetOnFactory = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
834 834                  if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
835 835                      then state
836 836                      else throw("Strict value is not equal to itself.")
837 837                  }
838 838      }
839 839  
840 840  
841 841  
842 842  @Callable(i)
843 843  func unstakeAndGet (amount) = {
844 844      let checkPayments = if ((size(i.payments) != 0))
845 845          then throw("No pmnts expd")
846 846          else true
847 847      if ((checkPayments == checkPayments))
848 848          then {
849 849              let cfg = gpc()
850 850              let factoryCfg = gfc()
851 851              let lpAssetId = fromBase58String(cfg[idxLPAsId])
852 852              let staking = valueOrErrorMessage(addressFromString(factoryCfg[idxFactStakCntr]), "Wr st addr")
853 853              let unstakeInv = invoke(staking, "unstake", [toBase58String(lpAssetId), amount], nil)
854 854              if ((unstakeInv == unstakeInv))
855 855                  then {
856 856                      let r = ego(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller)
857 857                      let sts = parseIntValue(r._9)
858 858                      let state = r._10
859 859                      let v = if (if (igs())
860 860                          then true
861 861                          else (sts == PoolShutdown))
862 862                          then throw(("Blocked: " + toString(sts)))
863 863                          else true
864 864                      if ((v == v))
865 865                          then {
866 866                              let burnA = invoke(fca, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
867 867                              if ((burnA == burnA))
868 868                                  then state
869 869                                  else throw("Strict value is not equal to itself.")
870 870                              }
871 871                          else throw("Strict value is not equal to itself.")
872 872                      }
873 873                  else throw("Strict value is not equal to itself.")
874 874              }
875 875          else throw("Strict value is not equal to itself.")
876 876      }
877 877  
878 878  
879 879  
880 880  @Callable(i)
881 881  func activate (amtAsStr,prAsStr) = if ((toString(i.caller) != toString(fca)))
882 882      then throw("denied")
883 883      else $Tuple2([StringEntry(aa(), amtAsStr), StringEntry(pa(), prAsStr)], "success")
884 884  
885 885  
886 886  
887 887  @Callable(i)
888 888  func setS (k,v) = if ((toString(i.caller) != strf(this, ada())))
889 889      then pd
890 890      else [StringEntry(k, v)]
891 891  
892 892  
893 893  
894 894  @Callable(i)
895 895  func setI (k,v) = if ((toString(i.caller) != strf(this, ada())))
896 896      then pd
897 897      else [IntegerEntry(k, v)]
898 898  
899 899  
900 900  
901 901  @Callable(i)
902 902  func getPoolConfigWrapperREADONLY () = $Tuple2(nil, gpc())
903 903  
904 904  
905 905  
906 906  @Callable(i)
907 907  func getAccBalanceWrapperREADONLY (assetId) = $Tuple2(nil, getAccBalance(assetId))
908 908  
909 909  
910 910  
911 911  @Callable(i)
912 912  func calcPricesWrapperREADONLY (amAmt,prAmt,lpAmt) = {
913 913      let pr = calcPrices(amAmt, prAmt, lpAmt)
914 914      $Tuple2(nil, [toString(pr[0]), toString(pr[1]), toString(pr[2])])
915 915      }
916 916  
917 917  
918 918  
919 919  @Callable(i)
920 920  func fromX18WrapperREADONLY (val,resScaleMult) = $Tuple2(nil, f1(parseBigIntValue(val), resScaleMult))
921 921  
922 922  
923 923  
924 924  @Callable(i)
925 925  func toX18WrapperREADONLY (origVal,origScaleMult) = $Tuple2(nil, toString(t1(origVal, origScaleMult)))
926 926  
927 927  
928 928  
929 929  @Callable(i)
930 930  func calcPriceBigIntWrapperREADONLY (prAmtX18,amAmtX18) = $Tuple2(nil, toString(cpbi(parseBigIntValue(prAmtX18), parseBigIntValue(amAmtX18))))
931 931  
932 932  
933 933  
934 934  @Callable(i)
935 935  func estimatePutOperationWrapperREADONLY (txId58,slippage,inAmAmt,inAmId,inPrAmt,inPrId,usrAddr,isEval,emitLp) = $Tuple2(nil, epo(txId58, slippage, inAmAmt, inAmId, inPrAmt, inPrId, usrAddr, isEval, emitLp, false, 0, ""))
936 936  
937 937  
938 938  
939 939  @Callable(i)
940 940  func estimateGetOperationWrapperREADONLY (txId58,pmtAsId,pmtLpAmt,usrAddr) = {
941 941      let r = ego(txId58, pmtAsId, pmtLpAmt, addressFromStringValue(usrAddr))
942 942      $Tuple2(nil, $Tuple10(r._1, r._2, r._3, r._4, r._5, r._6, r._7, toString(r._8), r._9, r._10))
943 943      }
944 944  
945 945  
946 946  @Verifier(tx)
947 947  func verify () = {
948 948      let targetPublicKey =     match m() {
949 949          case pk: ByteVector => 
950 950              pk
951 951          case _: Unit => 
952 952              tx.senderPublicKey
953 953          case _ => 
954 954              throw("Match error")
955 955      }
956 956      match tx {
957 957          case order: Order => 
958 958              let matcherPub = mp()
959 959              let orderValid = moa(order)
960 960              let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
961 961              let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub)
962 962              if (if (if (orderValid)
963 963                  then senderValid
964 964                  else false)
965 965                  then matcherValid
966 966                  else false)
967 967                  then true
968 968                  else toe(orderValid, senderValid, matcherValid)
969 969          case s: SetScriptTransaction => 
970 970              let newHash = blake2b256(value(s.script))
971 971              let allowedHash = fromBase64String(value(getString(fca, keyAllowedLpStableScriptHash())))
972 972              let currentHash = scriptHash(this)
973 973              if (if ((allowedHash == newHash))
974 974                  then (currentHash != newHash)
975 975                  else false)
976 976                  then true
977 977                  else sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
978 978          case _ => 
979 979              sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
980 980      }
981 981      }
982 982

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let defaultDecimals = ~~100000000~~
	4	+	let defaultDecimals = 1000000
5	5
6	6		let scale8 = 100000000
7	7

347	347		else calcLpAmt
348	348		let amDiff = (inAmAmt - calcAmAssetPmt)
349	349		let prDiff = (inPrAmt - calcPrAssetPmt)
350		-	let $~~t01664916994~~ = if (if (isOneAsset)
	350	+	let $t01664716992 = if (if (isOneAsset)
351	351		then (pmtId == amIdStr)
352	352		else false)
353	353		then $Tuple2(pmtAmt, 0)

356	356		else false)
357	357		then $Tuple2(0, pmtAmt)
358	358		else $Tuple2(calcAmAssetPmt, calcPrAssetPmt)
359		-	let writeAmAmt = $~~t01664916994~~._1
360		-	let writePrAmt = $~~t01664916994~~._2
	359	+	let writeAmAmt = $t01664716992._1
	360	+	let writePrAmt = $t01664716992._2
361	361		let commonState = [IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice), StringEntry(pau(userAddress, txId58), dataPutActionInfo(writeAmAmt, writePrAmt, emitLpAmt, curPrice, slippage, slippageCalc, height, lastBlock.timestamp, amDiff, prDiff))]
362	362		$Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEm, lpId, sts, commonState, amDiff, prDiff, inAmId, inPrId)
363	363		}

621	621		let prBalance = getAccBalance(prId)
622	622		let amBalanceDefaultDecimals = ((amBalance * defaultDecimals) / amDcm)
623	623		let prBalanceDefaultDecimals = ((prBalance * defaultDecimals) / prDcm)
624		-	let $~~t02598126767~~ = if ((pmtAssetId == amId))
	624	+	let $t02597926765 = if ((pmtAssetId == amId))
625	625		then if (if ((pmtAmtDefaultDecimals > amBalanceDefaultDecimals))
626	626		then true
627	627		else (amAssetPart > pmtAmtDefaultDecimals))

634	634		then throw("invalid payment amount")
635	635		else $Tuple6(amBalanceDefaultDecimals, (prBalanceDefaultDecimals - pmtAmtDefaultDecimals), 0, 0, (pmtAmtDefaultDecimals - prAssetPart), amAssetPart)
636	636		else throw("wrong pmtAssetId")
637		-	let amBalanceNow = $~~t02598126767~~._1
638		-	let prBalanceNow = $~~t02598126767~~._2
639		-	let virtSwapInAm = $~~t02598126767~~._3
640		-	let virtSwapOutPr = $~~t02598126767~~._4
641		-	let virtSwapInPr = $~~t02598126767~~._5
642		-	let virtSwapOutAm = $~~t02598126767~~._6
	637	+	let amBalanceNow = $t02597926765._1
	638	+	let prBalanceNow = $t02597926765._2
	639	+	let virtSwapInAm = $t02597926765._3
	640	+	let virtSwapOutPr = $t02597926765._4
	641	+	let virtSwapInPr = $t02597926765._5
	642	+	let virtSwapOutAm = $t02597926765._6
643	643		let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
644	644		let D1 = invoke(gwxCntr, "calcD", [toString(toBigInt(((amBalanceNow + virtSwapInAm) - virtSwapOutAm))), toString(toBigInt(((prBalanceNow + virtSwapInPr) - virtSwapOutPr))), A, Amult, Dconv], nil)
645	645		let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)

764	764		let estimPrAmt = r._2
765	765		let amBalance = getAccBalance(amId)
766	766		let prBalance = getAccBalance(prId)
767		-	let $~~t03154632003~~ = if ((outAssetId == amId))
	767	+	let $t03154432001 = if ((outAssetId == amId))
768	768		then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), exchResult, estimPrAmt, 0, 0, (estimAmAmt + exchResult))
769	769		else if ((outAssetId == prId))
770	770		then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), 0, 0, exchResult, estimAmAmt, (estimPrAmt + exchResult))
771	771		else throw("wrong outAssetId")
772		-	let amBalanceNow = $~~t03154632003~~._1
773		-	let prBalanceNow = $~~t03154632003~~._2
774		-	let virtSwapInAm = $~~t03154632003~~._3
775		-	let virtSwapOutPr = $~~t03154632003~~._4
776		-	let virtSwapInPr = $~~t03154632003~~._5
777		-	let virtSwapOutAm = $~~t03154632003~~._6
778		-	let totalGet = $~~t03154632003~~._7
	772	+	let amBalanceNow = $t03154432001._1
	773	+	let prBalanceNow = $t03154432001._2
	774	+	let virtSwapInAm = $t03154432001._3
	775	+	let virtSwapOutPr = $t03154432001._4
	776	+	let virtSwapInPr = $t03154432001._5
	777	+	let virtSwapOutAm = $t03154432001._6
	778	+	let totalGet = $t03154432001._7
779	779		if (if ((0 > virtSwapInAm))
780	780		then true
781	781		else (0 > virtSwapInPr))

789	789		let finalRes = vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
790	790		if ((finalRes == finalRes))
791	791		then {
792		-	let $~~t03270832812~~ = if ((outAssetId == amId))
	792	+	let $t03270632810 = if ((outAssetId == amId))
793	793		then $Tuple2(toInt(finalRes._2), 0)
794	794		else $Tuple2(0, toInt(finalRes._2))
795		-	let outAm = $~~t03270832812~~._1
796		-	let outPr = $~~t03270832812~~._2
	795	+	let outAm = $t03270632810._1
	796	+	let outPr = $t03270632810._2
797	797		let curPrX18 = cpbi(t1(prBalance, prDcm), t1(amBalance, amDcm))
798	798		let curPr = f1(curPrX18, scale8)
799	799		let state = [ScriptTransfer(userAddress, (outAm + outPr), if ((outAssetId == "WAVES"))

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let defaultDecimals = ~~100000000~~
	4	+	let defaultDecimals = 1000000
5	5
6	6		let scale8 = 100000000
7	7
8	8		let scale8BigInt = toBigInt(100000000)
9	9
10	10		let scale18 = toBigInt(1000000000000000000)
11	11
12	12		let zeroBigInt = toBigInt(0)
13	13
14	14		let oneBigInt = toBigInt(1)
15	15
16	16		let slippage4D = toBigInt((scale8 - ((scale8 * 1) / scale8)))
17	17
18	18		let Amult = "100"
19	19
20	20		let Dconv = "1"
21	21
22	22		let SEP = "__"
23	23
24	24		let EMPTY = ""
25	25
26	26		let PoolActive = 1
27	27
28	28		let PoolPutDis = 2
29	29
30	30		let PoolMatcherDis = 3
31	31
32	32		let PoolShutdown = 4
33	33
34	34		let idxPoolAddress = 1
35	35
36	36		let idxPoolSt = 2
37	37
38	38		let idxLPAsId = 3
39	39
40	40		let idxAmAsId = 4
41	41
42	42		let idxPrAsId = 5
43	43
44	44		let idxAmtAsDcm = 6
45	45
46	46		let idxPriceAsDcm = 7
47	47
48	48		let idxIAmtAsId = 8
49	49
50	50		let idxIPriceAsId = 9
51	51
52	52		let idxFactStakCntr = 1
53	53
54	54		let idxFactSlippCntr = 7
55	55
56	56		let idxFactGwxRewCntr = 10
57	57
58	58		let delay = "%s__delay"
59	59
60	60		func t1 (origVal,origScaleMult) = fraction(toBigInt(origVal), scale18, toBigInt(origScaleMult))
61	61
62	62
63	63		func f1 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), scale18))
64	64
65	65
66	66		func ts (amt,resScale,curScale) = fraction(amt, resScale, curScale)
67	67
68	68
69	69		func abs (val) = if ((zeroBigInt > val))
70	70		then -(val)
71	71		else val
72	72
73	73
74	74		func fc () = "%s__factoryContract"
75	75
76	76
77	77		func mpk () = "%s__managerPublicKey"
78	78
79	79
80	80		func pmpk () = "%s__pendingManagerPublicKey"
81	81
82	82
83	83		func pl () = "%s%s__price__last"
84	84
85	85
86	86		func ph (h,t) = makeString(["%s%s%d%d__price__history", toString(h), toString(t)], SEP)
87	87
88	88
89	89		func pau (ua,txId) = ((("%s%s%s__P__" + ua) + "__") + txId)
90	90
91	91
92	92		func gau (ua,txId) = ((("%s%s%s__G__" + ua) + "__") + txId)
93	93
94	94
95	95		func aa () = "%s__amountAsset"
96	96
97	97
98	98		func pa () = "%s__priceAsset"
99	99
100	100
101	101		func amp () = "%s__amp"
102	102
103	103
104	104		func ada () = "%s__addonAddr"
105	105
106	106
107	107		func lgotc (caller) = makeString(["%s%s__lastGetOneTknCall", caller], SEP)
108	108
109	109
110	110		func lsotc (caller) = makeString(["%s%s__lastPutOneTknCall", caller], SEP)
111	111
112	112
113	113		func fcfg () = "%s__factoryConfig"
114	114
115	115
116	116		func mtpk () = "%s%s__matcher__publicKey"
117	117
118	118
119	119		func pc (iAmtAs,iPrAs) = (((("%d%d%s__" + iAmtAs) + "__") + iPrAs) + "__config")
120	120
121	121
122	122		func mba (bAStr) = ("%s%s%s__mappings__baseAsset2internalId__" + bAStr)
123	123
124	124
125	125		func aps () = "%s__shutdown"
126	126
127	127
128	128		func keyAllowedLpStableScriptHash () = "%s__allowedLpStableScriptHash"
129	129
130	130
131	131		func toe (orV,sendrV,matchV) = throw(((((("Failed: ordValid=" + toString(orV)) + " sndrValid=") + toString(sendrV)) + " mtchrValid=") + toString(matchV)))
132	132
133	133
134	134		func str (val) = match val {
135	135		case valStr: String =>
136	136		valStr
137	137		case _ =>
138	138		throw("fail cast to String")
139	139		}
140	140
141	141
142	142		func strf (addr,key) = valueOrErrorMessage(getString(addr, key), makeString(["mandatory ", toString(addr), ".", key, " not defined"], ""))
143	143
144	144
145	145		func intf (addr,key) = valueOrErrorMessage(getInteger(addr, key), makeString(["mandatory ", toString(addr), ".", key, " not defined"], ""))
146	146
147	147
148	148		let fca = addressFromStringValue(strf(this, fc()))
149	149
150	150		let A = strf(this, amp())
151	151
152	152		func igs () = valueOrElse(getBoolean(fca, aps()), false)
153	153
154	154
155	155		func mp () = fromBase58String(strf(fca, mtpk()))
156	156
157	157
158	158		func gpc () = {
159	159		let amtAs = strf(this, aa())
160	160		let priceAs = strf(this, pa())
161	161		let iPriceAs = intf(fca, mba(priceAs))
162	162		let iAmtAs = intf(fca, mba(amtAs))
163	163		split(strf(fca, pc(toString(iAmtAs), toString(iPriceAs))), SEP)
164	164		}
165	165
166	166
167	167		func gfc () = split(strf(fca, fcfg()), SEP)
168	168
169	169
170	170		func dataPutActionInfo (inAmtAssetAmt,inPriceAssetAmt,outLpAmt,price,slipByUser,slippageReal,txHeight,txTimestamp,slipageAmAmt,slipagePrAmt) = makeString(["%d%d%d%d%d%d%d%d%d%d", toString(inAmtAssetAmt), toString(inPriceAssetAmt), toString(outLpAmt), toString(price), toString(slipByUser), toString(slippageReal), toString(txHeight), toString(txTimestamp), toString(slipageAmAmt), toString(slipagePrAmt)], SEP)
171	171
172	172
173	173		func dataGetActionInfo (outAmtAssetAmt,outPriceAssetAmt,inLpAmt,price,txHeight,txTimestamp) = makeString(["%d%d%d%d%d%d", toString(outAmtAssetAmt), toString(outPriceAssetAmt), toString(inLpAmt), toString(price), toString(txHeight), toString(txTimestamp)], SEP)
174	174
175	175
176	176		func getAccBalance (assetId) = if ((assetId == "WAVES"))
177	177		then wavesBalance(this).available
178	178		else assetBalance(this, fromBase58String(assetId))
179	179
180	180
181	181		func cpbi (prAmtX18,amAmtX18) = fraction(prAmtX18, scale18, amAmtX18)
182	182
183	183
184	184		func vad (A1,A2,slippage) = {
185	185		let diff = fraction((A1 - A2), scale8BigInt, A2)
186	186		let pass = ((slippage - abs(diff)) > zeroBigInt)
187	187		if (!(pass))
188	188		then throw(("Big slpg: " + toString(diff)))
189	189		else $Tuple2(pass, min([A1, A2]))
190	190		}
191	191
192	192
193	193		func vd (D1,D0,slpg) = {
194	194		let diff = fraction(D0, scale8BigInt, D1)
195	195		let fail = (slpg > diff)
196	196		if (if (fail)
197	197		then true
198	198		else (D0 > D1))
199	199		then throw(((((((toString(D0) + " ") + toString(D1)) + " ") + toString(diff)) + " ") + toString(slpg)))
200	200		else fail
201	201		}
202	202
203	203
204	204		func pcp (amAssetDcm,prAssetDcm,amAmt,prAmt) = {
205	205		let amtAsAmtX18 = t1(amAmt, amAssetDcm)
206	206		let prAsAmtX18 = t1(prAmt, prAssetDcm)
207	207		cpbi(prAsAmtX18, amtAsAmtX18)
208	208		}
209	209
210	210
211	211		func calcPrices (amAmt,prAmt,lpAmt) = {
212	212		let cfg = gpc()
213	213		let amtAsDcm = parseIntValue(cfg[idxAmtAsDcm])
214	214		let prAsDcm = parseIntValue(cfg[idxPriceAsDcm])
215	215		let priceX18 = pcp(amtAsDcm, prAsDcm, amAmt, prAmt)
216	216		let amAmtX18 = t1(amAmt, amtAsDcm)
217	217		let prAmtX18 = t1(prAmt, prAsDcm)
218	218		let lpAmtX18 = t1(lpAmt, scale8)
219	219		let lpPrInAmAsX18 = cpbi(amAmtX18, lpAmtX18)
220	220		let lpPrInPrAsX18 = cpbi(prAmtX18, lpAmtX18)
221	221		[priceX18, lpPrInAmAsX18, lpPrInPrAsX18]
222	222		}
223	223
224	224
225	225		func calculatePrices (amAmt,prAmt,lpAmt) = {
226	226		let p = calcPrices(amAmt, prAmt, lpAmt)
227	227		[f1(p[0], scale8), f1(p[1], scale8), f1(p[2], scale8)]
228	228		}
229	229
230	230
231	231		func ego (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
232	232		let cfg = gpc()
233	233		let lpId = cfg[idxLPAsId]
234	234		let amId = cfg[idxAmAsId]
235	235		let prId = cfg[idxPrAsId]
236	236		let amDcm = parseIntValue(cfg[idxAmtAsDcm])
237	237		let prDcm = parseIntValue(cfg[idxPriceAsDcm])
238	238		let sts = cfg[idxPoolSt]
239	239		let lpEmiss = valueOrErrorMessage(assetInfo(fromBase58String(lpId)), "Wrong LP id").quantity
240	240		if ((lpId != pmtAssetId))
241	241		then throw("Wrong pmt asset")
242	242		else {
243	243		let amBalance = getAccBalance(amId)
244	244		let prBalance = getAccBalance(prId)
245	245		let amountBalanceDefaultDecimals = fraction(amBalance, defaultDecimals, amDcm)
246	246		let priceBalanceDefaultDecimals = fraction(prBalance, defaultDecimals, prDcm)
247	247		let amBalanceX18 = t1(amountBalanceDefaultDecimals, defaultDecimals)
248	248		let prBalanceX18 = t1(priceBalanceDefaultDecimals, defaultDecimals)
249	249		let curPriceX18 = cpbi(prBalanceX18, amBalanceX18)
250	250		let curPrice = f1(curPriceX18, scale8)
251	251		let pmtLpAmtX18 = t1(pmtLpAmt, scale8)
252	252		let lpEmissX18 = t1(lpEmiss, scale8)
253	253		let outAmAmtX18 = fraction(amBalanceX18, pmtLpAmtX18, lpEmissX18)
254	254		let outPrAmtX18 = fraction(prBalanceX18, pmtLpAmtX18, lpEmissX18)
255	255		let outAmountAmountDefaultDecimals = f1(outAmAmtX18, defaultDecimals)
256	256		let outPriceAmountDefaultDecimals = f1(outPrAmtX18, defaultDecimals)
257	257		let outAmAmt = fraction(outAmountAmountDefaultDecimals, amDcm, defaultDecimals)
258	258		let outPrAmt = fraction(outPriceAmountDefaultDecimals, prDcm, defaultDecimals)
259	259		let state = if ((txId58 == ""))
260	260		then nil
261	261		else [ScriptTransfer(userAddress, outAmAmt, if ((amId == "WAVES"))
262	262		then unit
263	263		else fromBase58String(amId)), ScriptTransfer(userAddress, outPrAmt, if ((prId == "WAVES"))
264	264		then unit
265	265		else fromBase58String(prId)), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAmAmt, outPrAmt, pmtLpAmt, curPrice, height, lastBlock.timestamp)), IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice)]
266	266		$Tuple10(outAmAmt, outPrAmt, amId, prId, amBalance, prBalance, lpEmiss, curPriceX18, sts, state)
267	267		}
268	268		}
269	269
270	270
271	271		func epo (txId58,slippage,inAmAmt,inAmId,inPrAmt,inPrId,userAddress,isEval,emitLp,isOneAsset,pmtAmt,pmtId) = {
272	272		let cfg = gpc()
273	273		let lpId = fromBase58String(cfg[idxLPAsId])
274	274		let amIdStr = cfg[idxAmAsId]
275	275		let prIdStr = cfg[idxPrAsId]
276	276		let inAmIdStr = cfg[idxIAmtAsId]
277	277		let inPrIdStr = cfg[idxIPriceAsId]
278	278		let amtDcm = parseIntValue(cfg[idxAmtAsDcm])
279	279		let priceDcm = parseIntValue(cfg[idxPriceAsDcm])
280	280		let sts = cfg[idxPoolSt]
281	281		let lpEm = valueOrErrorMessage(assetInfo(lpId), "Wr lp as").quantity
282	282		let amBalance = if (isEval)
283	283		then getAccBalance(amIdStr)
284	284		else if (if (isOneAsset)
285	285		then (pmtId == amIdStr)
286	286		else false)
287	287		then (getAccBalance(amIdStr) - pmtAmt)
288	288		else if (isOneAsset)
289	289		then getAccBalance(amIdStr)
290	290		else (getAccBalance(amIdStr) - inAmAmt)
291	291		let prBalance = if (isEval)
292	292		then getAccBalance(prIdStr)
293	293		else if (if (isOneAsset)
294	294		then (pmtId == prIdStr)
295	295		else false)
296	296		then (getAccBalance(prIdStr) - pmtAmt)
297	297		else if (isOneAsset)
298	298		then getAccBalance(prIdStr)
299	299		else (getAccBalance(prIdStr) - inPrAmt)
300	300		let amountBalanceDefaultDecimals = fraction(amBalance, defaultDecimals, amtDcm)
301	301		let priceBalanceDefaultDecimals = fraction(prBalance, defaultDecimals, priceDcm)
302	302		let inAmountAssetAmountDefaultDecimals = fraction(inAmAmt, defaultDecimals, amtDcm)
303	303		let inPriceAssetAmountDefaultDecimals = fraction(inPrAmt, defaultDecimals, priceDcm)
304	304		let inAmAssetAmtX18 = t1(inAmountAssetAmountDefaultDecimals, defaultDecimals)
305	305		let inPrAssetAmtX18 = t1(inPriceAssetAmountDefaultDecimals, defaultDecimals)
306	306		let userPriceX18 = cpbi(inPrAssetAmtX18, inAmAssetAmtX18)
307	307		let amBalanceX18 = t1(amountBalanceDefaultDecimals, defaultDecimals)
308	308		let prBalanceX18 = t1(priceBalanceDefaultDecimals, defaultDecimals)
309	309		let r = if ((lpEm == 0))
310	310		then {
311	311		let curPriceX18 = zeroBigInt
312	312		let slippageX18 = zeroBigInt
313	313		let lpAmtX18 = pow((inAmAssetAmtX18 * inPrAssetAmtX18), 0, toBigInt(5), 1, 0, DOWN)
314	314		$Tuple5(f1(lpAmtX18, scale8), f1(inAmAssetAmtX18, defaultDecimals), f1(inPrAssetAmtX18, defaultDecimals), cpbi((prBalanceX18 + inPrAssetAmtX18), (amBalanceX18 + inAmAssetAmtX18)), slippageX18)
315	315		}
316	316		else {
317	317		let curPriceX18 = cpbi(prBalanceX18, amBalanceX18)
318	318		let slippageRealX18 = fraction(abs((curPriceX18 - userPriceX18)), scale18, curPriceX18)
319	319		let slippageX18 = t1(slippage, scale8)
320	320		if (if ((curPriceX18 != zeroBigInt))
321	321		then (slippageRealX18 > slippageX18)
322	322		else false)
323	323		then throw(((("Price slippage " + toString(slippageRealX18)) + " > ") + toString(slippageX18)))
324	324		else {
325	325		let lpEmissionX18 = t1(lpEm, scale8)
326	326		let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
327	327		let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
328	328		let expectedAmts = if ((prViaAmX18 > inPrAssetAmtX18))
329	329		then $Tuple2(amViaPrX18, inPrAssetAmtX18)
330	330		else $Tuple2(inAmAssetAmtX18, prViaAmX18)
331	331		let expAmtAssetAmtX18 = expectedAmts._1
332	332		let expPriceAssetAmtX18 = expectedAmts._2
333	333		let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18)
334	334		$Tuple5(f1(lpAmtX18, scale8), f1(expAmtAssetAmtX18, defaultDecimals), f1(expPriceAssetAmtX18, defaultDecimals), curPriceX18, slippageX18)
335	335		}
336	336		}
337	337		let calcLpAmt = r._1
338	338		let calcAmAssetPmt = fraction(r._2, amtDcm, defaultDecimals)
339	339		let calcPrAssetPmt = fraction(r._3, priceDcm, defaultDecimals)
340	340		let curPrice = f1(r._4, scale8)
341	341		let slippageCalc = f1(r._5, scale8)
342	342		if ((0 >= calcLpAmt))
343	343		then throw("LP <= 0")
344	344		else {
345	345		let emitLpAmt = if (!(emitLp))
346	346		then 0
347	347		else calcLpAmt
348	348		let amDiff = (inAmAmt - calcAmAssetPmt)
349	349		let prDiff = (inPrAmt - calcPrAssetPmt)
350		-	let $~~t01664916994~~ = if (if (isOneAsset)
	350	+	let $t01664716992 = if (if (isOneAsset)
351	351		then (pmtId == amIdStr)
352	352		else false)
353	353		then $Tuple2(pmtAmt, 0)
354	354		else if (if (isOneAsset)
355	355		then (pmtId == prIdStr)
356	356		else false)
357	357		then $Tuple2(0, pmtAmt)
358	358		else $Tuple2(calcAmAssetPmt, calcPrAssetPmt)
359		-	let writeAmAmt = $~~t01664916994~~._1
360		-	let writePrAmt = $~~t01664916994~~._2
	359	+	let writeAmAmt = $t01664716992._1
	360	+	let writePrAmt = $t01664716992._2
361	361		let commonState = [IntegerEntry(pl(), curPrice), IntegerEntry(ph(height, lastBlock.timestamp), curPrice), StringEntry(pau(userAddress, txId58), dataPutActionInfo(writeAmAmt, writePrAmt, emitLpAmt, curPrice, slippage, slippageCalc, height, lastBlock.timestamp, amDiff, prDiff))]
362	362		$Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEm, lpId, sts, commonState, amDiff, prDiff, inAmId, inPrId)
363	363		}
364	364		}
365	365
366	366
367	367		func moa (order) = {
368	368		let cfg = gpc()
369	369		let amtAsId = cfg[idxAmAsId]
370	370		let prAsId = cfg[idxPrAsId]
371	371		let sts = parseIntValue(cfg[idxPoolSt])
372	372		let amtAsDcm = parseIntValue(cfg[idxAmtAsDcm])
373	373		let prAsDcm = parseIntValue(cfg[idxPriceAsDcm])
374	374		let accAmtAsBalance = getAccBalance(amtAsId)
375	375		let accPrAsBalance = getAccBalance(prAsId)
376	376		let curPriceX18 = if ((order.orderType == Buy))
377	377		then pcp(amtAsDcm, prAsDcm, (accAmtAsBalance + order.amount), accPrAsBalance)
378	378		else pcp(amtAsDcm, prAsDcm, (accAmtAsBalance - order.amount), accPrAsBalance)
379	379		let curPrice = f1(curPriceX18, scale8)
380	380		if (if (if (igs())
381	381		then true
382	382		else (sts == PoolMatcherDis))
383	383		then true
384	384		else (sts == PoolShutdown))
385	385		then throw("Admin blocked")
386	386		else {
387	387		let orAmtAsset = order.assetPair.amountAsset
388	388		let orAmtAsStr = if ((orAmtAsset == unit))
389	389		then "WAVES"
390	390		else toBase58String(value(orAmtAsset))
391	391		let orPrAsset = order.assetPair.priceAsset
392	392		let orPrAsStr = if ((orPrAsset == unit))
393	393		then "WAVES"
394	394		else toBase58String(value(orPrAsset))
395	395		if (if ((orAmtAsStr != amtAsId))
396	396		then true
397	397		else (orPrAsStr != prAsId))
398	398		then throw("Wr assets")
399	399		else {
400	400		let orderPrice = order.price
401	401		let priceDcm = fraction(scale8, prAsDcm, amtAsDcm)
402	402		let castOrderPrice = ts(orderPrice, scale8, priceDcm)
403	403		let isOrderPriceValid = if ((order.orderType == Buy))
404	404		then (curPrice >= castOrderPrice)
405	405		else (castOrderPrice >= curPrice)
406	406		true
407	407		}
408	408		}
409	409		}
410	410
411	411
412	412		func cg (i) = if ((size(i.payments) != 1))
413	413		then throw("1 pmnt exp")
414	414		else {
415	415		let pmt = value(i.payments[0])
416	416		let pmtAssetId = value(pmt.assetId)
417	417		let pmtAmt = pmt.amount
418	418		let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
419	419		let outAmAmt = r._1
420	420		let outPrAmt = r._2
421	421		let sts = parseIntValue(r._9)
422	422		let state = r._10
423	423		if (if (igs())
424	424		then true
425	425		else (sts == PoolShutdown))
426	426		then throw(("Admin blocked: " + toString(sts)))
427	427		else $Tuple5(outAmAmt, outPrAmt, pmtAmt, pmtAssetId, state)
428	428		}
429	429
430	430
431	431		func cp (caller,txId,amAsPmt,prAsPmt,slippage,emitLp,isOneAsset,pmtAmt,pmtId) = {
432	432		let r = epo(txId, slippage, value(amAsPmt).amount, value(amAsPmt).assetId, value(prAsPmt).amount, value(prAsPmt).assetId, caller, false, emitLp, isOneAsset, pmtAmt, pmtId)
433	433		let sts = parseIntValue(r._8)
434	434		if (if (if (igs())
435	435		then true
436	436		else (sts == PoolPutDis))
437	437		then true
438	438		else (sts == PoolShutdown))
439	439		then throw(("Blocked:" + toString(sts)))
440	440		else r
441	441		}
442	442
443	443
444	444		func m () = match getString(mpk()) {
445	445		case s: String =>
446	446		fromBase58String(s)
447	447		case _: Unit =>
448	448		unit
449	449		case _ =>
450	450		throw("Match error")
451	451		}
452	452
453	453
454	454		func pm () = match getString(pmpk()) {
455	455		case s: String =>
456	456		fromBase58String(s)
457	457		case _: Unit =>
458	458		unit
459	459		case _ =>
460	460		throw("Match error")
461	461		}
462	462
463	463
464	464		let pd = throw("Permission denied")
465	465
466	466		func mm (i) = match m() {
467	467		case pk: ByteVector =>
468	468		if ((i.callerPublicKey == pk))
469	469		then true
470	470		else pd
471	471		case _: Unit =>
472	472		if ((i.caller == this))
473	473		then true
474	474		else pd
475	475		case _ =>
476	476		throw("Match error")
477	477		}
478	478
479	479
480	480		@Callable(i)
481	481		func constructor (fc) = {
482	482		let c = mm(i)
483	483		if ((c == c))
484	484		then [StringEntry(fc(), fc)]
485	485		else throw("Strict value is not equal to itself.")
486	486		}
487	487
488	488
489	489
490	490		@Callable(i)
491	491		func setManager (pendingManagerPublicKey) = {
492	492		let c = mm(i)
493	493		if ((c == c))
494	494		then {
495	495		let cm = fromBase58String(pendingManagerPublicKey)
496	496		if ((cm == cm))

github/deemru/w8io/169f3d6 
91.95 ms ◑