w8 · tx

2022.08.30 20:44 [3273001] smart account 3P5VC7EqCZ3BsTuz3QrZFpxZ9VEm5N6WHTb > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "dpyg3p368f9UHSbi2TTS7iAnoaETQxkJpc6PUZ9LMTC",
    "fee": 2900000,
    "feeAssetId": null,
    "timestamp": 1661879818970,
    "version": 1,
    "sender": "3P5VC7EqCZ3BsTuz3QrZFpxZ9VEm5N6WHTb",
    "senderPublicKey": "ADu1XuzisH2u8YwfLFVkHDbzwtKpT376inMjiSxYeq83",
    "proofs": [
        "2GnxzEBKNgDe5XwMzkT1HeZgboKoUTJRC312dvXwLEPPjxUU2P4Epq9hs4iFzVt58BnnEscXNN2ASoDsdMkPsgeL"
    ],
    "script": "base64:BgJ/CAISAwoBCBIDCgEIEgASBAoCAQQSBwoFAQEBAQQSAwoBARIAEgcKBQEBAQgBEgQKAgEBEgMKAQESBAoCCAgSBAoCCAgSBAoCCAESABIDCgEIEgUKAwEBARIECgIIARIECgIBARIECgIICBILCgkIAQECAQIIBAQSBgoECAgBCE4ABnNjYWxlOACAwtcvAAxzY2FsZThCaWdJbnQJALYCAQCAwtcvAAdzY2FsZTE4CQC2AgEAgICQu7rWrfANAAp6ZXJvQmlnSW50CQC2AgEAAAAJb25lQmlnSW50CQC2AgEAAQAKc2xpcHBhZ2U0RAkAtgIBCQBlAgUGc2NhbGU4CQBpAgkAaAIFBnNjYWxlOAABBQZzY2FsZTgABUFtdWx0AgMxMDAABURjb252AgExAANTRVACAl9fAAVFTVBUWQIAAApQb29sQWN0aXZlAAEAClBvb2xQdXREaXMAAgAOUG9vbE1hdGNoZXJEaXMAAwAMUG9vbFNodXRkb3duAAQADmlkeFBvb2xBZGRyZXNzAAEACWlkeFBvb2xTdAACAAlpZHhMUEFzSWQAAwAJaWR4QW1Bc0lkAAQACWlkeFByQXNJZAAFAAtpZHhBbXRBc0RjbQAGAA1pZHhQcmljZUFzRGNtAAcAC2lkeElBbXRBc0lkAAgADWlkeElQcmljZUFzSWQACQAPaWR4RmFjdFN0YWtDbnRyAAEAEGlkeEZhY3RTbGlwcENudHIABwARaWR4RmFjdEd3eFJld0NudHIACgAFZGVsYXkCCSVzX19kZWxheQECdDECB29yaWdWYWwNb3JpZ1NjYWxlTXVsdAkAvAIDCQC2AgEFB29yaWdWYWwFB3NjYWxlMTgJALYCAQUNb3JpZ1NjYWxlTXVsdAECZjECA3ZhbA9yZXN1bHRTY2FsZU11bHQJAKADAQkAvAIDBQN2YWwJALYCAQUPcmVzdWx0U2NhbGVNdWx0BQdzY2FsZTE4AQJ0cwMDYW10CHJlc1NjYWxlCGN1clNjYWxlCQBrAwUDYW10BQhyZXNTY2FsZQUIY3VyU2NhbGUBA2FicwEDdmFsAwkAvwICBQp6ZXJvQmlnSW50BQN2YWwJAL4CAQUDdmFsBQN2YWwBAmZjAAITJXNfX2ZhY3RvcnlDb250cmFjdAEDbXBrAAIUJXNfX21hbmFnZXJQdWJsaWNLZXkBBHBtcGsAAhslc19fcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkBAnBsAAIRJXMlc19fcHJpY2VfX2xhc3QBAnBoAgFoAXQJALkJAgkAzAgCAhglcyVzJWQlZF9fcHJpY2VfX2hpc3RvcnkJAMwIAgkApAMBBQFoCQDMCAIJAKQDAQUBdAUDbmlsBQNTRVABA3BhdQICdWEEdHhJZAkArAICCQCsAgIJAKwCAgILJXMlcyVzX19QX18FAnVhAgJfXwUEdHhJZAEDZ2F1AgJ1YQR0eElkCQCsAgIJAKwCAgkArAICAgslcyVzJXNfX0dfXwUCdWECAl9fBQR0eElkAQJhYQACDyVzX19hbW91bnRBc3NldAECcGEAAg4lc19fcHJpY2VBc3NldAEDYW1wAAIHJXNfX2FtcAEDYWRhAAINJXNfX2FkZG9uQWRkcgEFbGdvdGMBBmNhbGxlcgkAuQkCCQDMCAICFyVzJXNfX2xhc3RHZXRPbmVUa25DYWxsCQDMCAIFBmNhbGxlcgUDbmlsBQNTRVABBWxzb3RjAQZjYWxsZXIJALkJAgkAzAgCAhclcyVzX19sYXN0UHV0T25lVGtuQ2FsbAkAzAgCBQZjYWxsZXIFA25pbAUDU0VQAQRmY2ZnAAIRJXNfX2ZhY3RvcnlDb25maWcBBG10cGsAAhglcyVzX19tYXRjaGVyX19wdWJsaWNLZXkBAnBjAgZpQW10QXMFaVByQXMJAKwCAgkArAICCQCsAgIJAKwCAgIIJWQlZCVzX18FBmlBbXRBcwICX18FBWlQckFzAghfX2NvbmZpZwEDbWJhAQViQVN0cgkArAICAiglcyVzJXNfX21hcHBpbmdzX19iYXNlQXNzZXQyaW50ZXJuYWxJZF9fBQViQVN0cgEDYXBzAAIMJXNfX3NodXRkb3duARxrZXlBbGxvd2VkTHBTdGFibGVTY3JpcHRIYXNoAAIdJXNfX2FsbG93ZWRMcFN0YWJsZVNjcmlwdEhhc2gBA3RvZQMDb3JWBnNlbmRyVgZtYXRjaFYJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIRRmFpbGVkOiBvcmRWYWxpZD0JAKUDAQUDb3JWAgsgc25kclZhbGlkPQkApQMBBQZzZW5kclYCDCBtdGNoclZhbGlkPQkApQMBBQZtYXRjaFYBA3N0cgEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAZ2YWxTdHIFByRtYXRjaDAFBnZhbFN0cgkAAgECE2ZhaWwgY2FzdCB0byBTdHJpbmcBBHN0cmYCBGFkZHIDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEYWRkcgUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFBGFkZHIJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIMIG5vdCBkZWZpbmVkBQNuaWwCAAEEaW50ZgIEYWRkcgNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQRhZGRyBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUEYWRkcgkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAgwgbm90IGRlZmluZWQFA25pbAIAAANmY2EJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQRzdHJmAgUEdGhpcwkBAmZjAAABQQkBBHN0cmYCBQR0aGlzCQEDYW1wAAEDaWdzAAkBC3ZhbHVlT3JFbHNlAgkAmwgCBQNmY2EJAQNhcHMABwECbXAACQDZBAEJAQRzdHJmAgUDZmNhCQEEbXRwawABA2dwYwAEBWFtdEFzCQEEc3RyZgIFBHRoaXMJAQJhYQAEB3ByaWNlQXMJAQRzdHJmAgUEdGhpcwkBAnBhAAQIaVByaWNlQXMJAQRpbnRmAgUDZmNhCQEDbWJhAQUHcHJpY2VBcwQGaUFtdEFzCQEEaW50ZgIFA2ZjYQkBA21iYQEFBWFtdEFzCQC1CQIJAQRzdHJmAgUDZmNhCQECcGMCCQCkAwEFBmlBbXRBcwkApAMBBQhpUHJpY2VBcwUDU0VQAQNnZmMACQC1CQIJAQRzdHJmAgUDZmNhCQEEZmNmZwAFA1NFUAERZGF0YVB1dEFjdGlvbkluZm8KDWluQW10QXNzZXRBbXQPaW5QcmljZUFzc2V0QW10CG91dExwQW10BXByaWNlCnNsaXBCeVVzZXIMc2xpcHBhZ2VSZWFsCHR4SGVpZ2h0C3R4VGltZXN0YW1wDHNsaXBhZ2VBbUFtdAxzbGlwYWdlUHJBbXQJALkJAgkAzAgCAhQlZCVkJWQlZCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFDWluQW10QXNzZXRBbXQJAMwIAgkApAMBBQ9pblByaWNlQXNzZXRBbXQJAMwIAgkApAMBBQhvdXRMcEFtdAkAzAgCCQCkAwEFBXByaWNlCQDMCAIJAKQDAQUKc2xpcEJ5VXNlcgkAzAgCCQCkAwEFDHNsaXBwYWdlUmVhbAkAzAgCCQCkAwEFCHR4SGVpZ2h0CQDMCAIJAKQDAQULdHhUaW1lc3RhbXAJAMwIAgkApAMBBQxzbGlwYWdlQW1BbXQJAMwIAgkApAMBBQxzbGlwYWdlUHJBbXQFA25pbAUDU0VQARFkYXRhR2V0QWN0aW9uSW5mbwYOb3V0QW10QXNzZXRBbXQQb3V0UHJpY2VBc3NldEFtdAdpbkxwQW10BXByaWNlCHR4SGVpZ2h0C3R4VGltZXN0YW1wCQC5CQIJAMwIAgIMJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUOb3V0QW10QXNzZXRBbXQJAMwIAgkApAMBBRBvdXRQcmljZUFzc2V0QW10CQDMCAIJAKQDAQUHaW5McEFtdAkAzAgCCQCkAwEFBXByaWNlCQDMCAIJAKQDAQUIdHhIZWlnaHQJAMwIAgkApAMBBQt0eFRpbWVzdGFtcAUDbmlsBQNTRVABDWdldEFjY0JhbGFuY2UBB2Fzc2V0SWQDCQAAAgUHYXNzZXRJZAIFV0FWRVMICQDvBwEFBHRoaXMJYXZhaWxhYmxlCQDwBwIFBHRoaXMJANkEAQUHYXNzZXRJZAEEY3BiaQIIcHJBbXRYMTgIYW1BbXRYMTgJALwCAwUIcHJBbXRYMTgFB3NjYWxlMTgFCGFtQW10WDE4AQN2YWQDAkExAkEyCHNsaXBwYWdlBARkaWZmCQC8AgMJALgCAgUCQTEFAkEyBQxzY2FsZThCaWdJbnQFAkEyBARwYXNzCQC/AgIJALgCAgUIc2xpcHBhZ2UJAQNhYnMBBQRkaWZmBQp6ZXJvQmlnSW50AwkBASEBBQRwYXNzCQACAQkArAICAgpCaWcgc2xwZzogCQCmAwEFBGRpZmYJAJQKAgUEcGFzcwkAmQMBCQDMCAIFAkExCQDMCAIFAkEyBQNuaWwBAnZkAwJEMQJEMARzbHBnBARkaWZmCQC8AgMFAkQwBQxzY2FsZThCaWdJbnQFAkQxBARmYWlsCQC/AgIFBHNscGcFBGRpZmYDAwUEZmFpbAYJAL8CAgUCRDAFAkQxCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkApgMBBQJEMAIBIAkApgMBBQJEMQIBIAkApgMBBQRkaWZmAgEgCQCmAwEFBHNscGcFBGZhaWwBA3BjcAQKYW1Bc3NldERjbQpwckFzc2V0RGNtBWFtQW10BXByQW10BAthbXRBc0FtdFgxOAkBAnQxAgUFYW1BbXQFCmFtQXNzZXREY20ECnByQXNBbXRYMTgJAQJ0MQIFBXByQW10BQpwckFzc2V0RGNtCQEEY3BiaQIFCnByQXNBbXRYMTgFC2FtdEFzQW10WDE4AQpjYWxjUHJpY2VzAwVhbUFtdAVwckFtdAVscEFtdAQDY2ZnCQEDZ3BjAAQIYW10QXNEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFC2lkeEFtdEFzRGNtBAdwckFzRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQ1pZHhQcmljZUFzRGNtBAhwcmljZVgxOAkBA3BjcAQFCGFtdEFzRGNtBQdwckFzRGNtBQVhbUFtdAUFcHJBbXQECGFtQW10WDE4CQECdDECBQVhbUFtdAUIYW10QXNEY20ECHByQW10WDE4CQECdDECBQVwckFtdAUHcHJBc0RjbQQIbHBBbXRYMTgJAQJ0MQIFBWxwQW10BQZzY2FsZTgEDWxwUHJJbkFtQXNYMTgJAQRjcGJpAgUIYW1BbXRYMTgFCGxwQW10WDE4BA1scFBySW5QckFzWDE4CQEEY3BiaQIFCHByQW10WDE4BQhscEFtdFgxOAkAzAgCBQhwcmljZVgxOAkAzAgCBQ1scFBySW5BbUFzWDE4CQDMCAIFDWxwUHJJblByQXNYMTgFA25pbAEPY2FsY3VsYXRlUHJpY2VzAwVhbUFtdAVwckFtdAVscEFtdAQBcAkBCmNhbGNQcmljZXMDBQVhbUFtdAUFcHJBbXQFBWxwQW10CQDMCAIJAQJmMQIJAJEDAgUBcAAABQZzY2FsZTgJAMwIAgkBAmYxAgkAkQMCBQFwAAEFBnNjYWxlOAkAzAgCCQECZjECCQCRAwIFAXAAAgUGc2NhbGU4BQNuaWwBA2VnbwQGdHhJZDU4CnBtdEFzc2V0SWQIcG10THBBbXQLdXNlckFkZHJlc3MEA2NmZwkBA2dwYwAEBGxwSWQJAJEDAgUDY2ZnBQlpZHhMUEFzSWQEBGFtSWQJAJEDAgUDY2ZnBQlpZHhBbUFzSWQEBHBySWQJAJEDAgUDY2ZnBQlpZHhQckFzSWQEBWFtRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQtpZHhBbXRBc0RjbQQFcHJEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFDWlkeFByaWNlQXNEY20EA3N0cwkAkQMCBQNjZmcFCWlkeFBvb2xTdAQHbHBFbWlzcwgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBCQDZBAEFBGxwSWQCC1dyb25nIExQIGlkCHF1YW50aXR5AwkBAiE9AgUEbHBJZAUKcG10QXNzZXRJZAkAAgECD1dyb25nIHBtdCBhc3NldAQJYW1CYWxhbmNlCQENZ2V0QWNjQmFsYW5jZQEFBGFtSWQEDGFtQmFsYW5jZVgxOAkBAnQxAgUJYW1CYWxhbmNlBQVhbURjbQQJcHJCYWxhbmNlCQENZ2V0QWNjQmFsYW5jZQEFBHBySWQEDHByQmFsYW5jZVgxOAkBAnQxAgUJcHJCYWxhbmNlBQVwckRjbQQLY3VyUHJpY2VYMTgJAQRjcGJpAgUMcHJCYWxhbmNlWDE4BQxhbUJhbGFuY2VYMTgECGN1clByaWNlCQECZjECBQtjdXJQcmljZVgxOAUGc2NhbGU4BAtwbXRMcEFtdFgxOAkBAnQxAgUIcG10THBBbXQFBnNjYWxlOAQKbHBFbWlzc1gxOAkBAnQxAgUHbHBFbWlzcwUGc2NhbGU4BAtvdXRBbUFtdFgxOAkAvAIDBQxhbUJhbGFuY2VYMTgFC3BtdExwQW10WDE4BQpscEVtaXNzWDE4BAtvdXRQckFtdFgxOAkAvAIDBQxwckJhbGFuY2VYMTgFC3BtdExwQW10WDE4BQpscEVtaXNzWDE4BAhvdXRBbUFtdAkBAmYxAgULb3V0QW1BbXRYMTgFBWFtRGNtBAhvdXRQckFtdAkBAmYxAgULb3V0UHJBbXRYMTgFBXByRGNtBAVzdGF0ZQMJAAACBQZ0eElkNTgCAAUDbmlsCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3VzZXJBZGRyZXNzBQhvdXRBbUFtdAMJAAACBQRhbUlkAgVXQVZFUwUEdW5pdAkA2QQBBQRhbUlkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3VzZXJBZGRyZXNzBQhvdXRQckFtdAMJAAACBQRwcklkAgVXQVZFUwUEdW5pdAkA2QQBBQRwcklkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQNnYXUCCQClCAEFC3VzZXJBZGRyZXNzBQZ0eElkNTgJARFkYXRhR2V0QWN0aW9uSW5mbwYFCG91dEFtQW10BQhvdXRQckFtdAUIcG10THBBbXQFCGN1clByaWNlBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECcGwABQhjdXJQcmljZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAnBoAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUIY3VyUHJpY2UFA25pbAkAnAoKBQhvdXRBbUFtdAUIb3V0UHJBbXQFBGFtSWQFBHBySWQFCWFtQmFsYW5jZQUJcHJCYWxhbmNlBQdscEVtaXNzBQtjdXJQcmljZVgxOAUDc3RzBQVzdGF0ZQEDZXBvDAZ0eElkNTgIc2xpcHBhZ2UHaW5BbUFtdAZpbkFtSWQHaW5QckFtdAZpblBySWQLdXNlckFkZHJlc3MGaXNFdmFsBmVtaXRMcAppc09uZUFzc2V0BnBtdEFtdAVwbXRJZAQDY2ZnCQEDZ3BjAAQEbHBJZAkA2QQBCQCRAwIFA2NmZwUJaWR4TFBBc0lkBAdhbUlkU3RyCQCRAwIFA2NmZwUJaWR4QW1Bc0lkBAdwcklkU3RyCQCRAwIFA2NmZwUJaWR4UHJBc0lkBAlpbkFtSWRTdHIJAJEDAgUDY2ZnBQtpZHhJQW10QXNJZAQJaW5QcklkU3RyCQCRAwIFA2NmZwUNaWR4SVByaWNlQXNJZAQGYW10RGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQtpZHhBbXRBc0RjbQQIcHJpY2VEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFDWlkeFByaWNlQXNEY20EA3N0cwkAkQMCBQNjZmcFCWlkeFBvb2xTdAQEbHBFbQgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQRscElkAghXciBscCBhcwhxdWFudGl0eQQJYW1CYWxhbmNlAwUGaXNFdmFsCQENZ2V0QWNjQmFsYW5jZQEFB2FtSWRTdHIDAwUKaXNPbmVBc3NldAkAAAIFBXBtdElkBQdhbUlkU3RyBwkAZQIJAQ1nZXRBY2NCYWxhbmNlAQUHYW1JZFN0cgUGcG10QW10AwUKaXNPbmVBc3NldAkBDWdldEFjY0JhbGFuY2UBBQdhbUlkU3RyCQBlAgkBDWdldEFjY0JhbGFuY2UBBQdhbUlkU3RyBQdpbkFtQW10BAlwckJhbGFuY2UDBQZpc0V2YWwJAQ1nZXRBY2NCYWxhbmNlAQUHcHJJZFN0cgMDBQppc09uZUFzc2V0CQAAAgUFcG10SWQFB3BySWRTdHIHCQBlAgkBDWdldEFjY0JhbGFuY2UBBQdwcklkU3RyBQZwbXRBbXQDBQppc09uZUFzc2V0CQENZ2V0QWNjQmFsYW5jZQEFB3BySWRTdHIJAGUCCQENZ2V0QWNjQmFsYW5jZQEFB3BySWRTdHIFB2luUHJBbXQED2luQW1Bc3NldEFtdFgxOAkBAnQxAgUHaW5BbUFtdAUGYW10RGNtBA9pblByQXNzZXRBbXRYMTgJAQJ0MQIFB2luUHJBbXQFCHByaWNlRGNtBAx1c2VyUHJpY2VYMTgJAQRjcGJpAgUPaW5QckFzc2V0QW10WDE4BQ9pbkFtQXNzZXRBbXRYMTgEDGFtQmFsYW5jZVgxOAkBAnQxAgUJYW1CYWxhbmNlBQZhbXREY20EDHByQmFsYW5jZVgxOAkBAnQxAgUJcHJCYWxhbmNlBQhwcmljZURjbQQBcgMJAAACBQRscEVtAAAEC2N1clByaWNlWDE4BQp6ZXJvQmlnSW50BAtzbGlwcGFnZVgxOAUKemVyb0JpZ0ludAQIbHBBbXRYMTgJAHYGCQC5AgIFD2luQW1Bc3NldEFtdFgxOAUPaW5QckFzc2V0QW10WDE4AAAJALYCAQAFAAEAAAUERE9XTgkAlwoFCQECZjECBQhscEFtdFgxOAUGc2NhbGU4CQECZjECBQ9pbkFtQXNzZXRBbXRYMTgFBmFtdERjbQkBAmYxAgUPaW5QckFzc2V0QW10WDE4BQhwcmljZURjbQkBBGNwYmkCCQC3AgIFDHByQmFsYW5jZVgxOAUPaW5QckFzc2V0QW10WDE4CQC3AgIFDGFtQmFsYW5jZVgxOAUPaW5BbUFzc2V0QW10WDE4BQtzbGlwcGFnZVgxOAQLY3VyUHJpY2VYMTgJAQRjcGJpAgUMcHJCYWxhbmNlWDE4BQxhbUJhbGFuY2VYMTgED3NsaXBwYWdlUmVhbFgxOAkAvAIDCQEDYWJzAQkAuAICBQtjdXJQcmljZVgxOAUMdXNlclByaWNlWDE4BQdzY2FsZTE4BQtjdXJQcmljZVgxOAQLc2xpcHBhZ2VYMTgJAQJ0MQIFCHNsaXBwYWdlBQZzY2FsZTgDAwkBAiE9AgULY3VyUHJpY2VYMTgFCnplcm9CaWdJbnQJAL8CAgUPc2xpcHBhZ2VSZWFsWDE4BQtzbGlwcGFnZVgxOAcJAAIBCQCsAgIJAKwCAgkArAICAg9QcmljZSBzbGlwcGFnZSAJAKYDAQUPc2xpcHBhZ2VSZWFsWDE4AgMgPiAJAKYDAQULc2xpcHBhZ2VYMTgEDWxwRW1pc3Npb25YMTgJAQJ0MQIFBGxwRW0FBnNjYWxlOAQKcHJWaWFBbVgxOAkAvAIDBQ9pbkFtQXNzZXRBbXRYMTgFC2N1clByaWNlWDE4BQdzY2FsZTE4BAphbVZpYVByWDE4CQC8AgMFD2luUHJBc3NldEFtdFgxOAUHc2NhbGUxOAULY3VyUHJpY2VYMTgEDGV4cGVjdGVkQW10cwMJAL8CAgUKcHJWaWFBbVgxOAUPaW5QckFzc2V0QW10WDE4CQCUCgIFCmFtVmlhUHJYMTgFD2luUHJBc3NldEFtdFgxOAkAlAoCBQ9pbkFtQXNzZXRBbXRYMTgFCnByVmlhQW1YMTgEEWV4cEFtdEFzc2V0QW10WDE4CAUMZXhwZWN0ZWRBbXRzAl8xBBNleHBQcmljZUFzc2V0QW10WDE4CAUMZXhwZWN0ZWRBbXRzAl8yBAhscEFtdFgxOAkAvAIDBQ1scEVtaXNzaW9uWDE4BRNleHBQcmljZUFzc2V0QW10WDE4BQxwckJhbGFuY2VYMTgJAJcKBQkBAmYxAgUIbHBBbXRYMTgFBnNjYWxlOAkBAmYxAgURZXhwQW10QXNzZXRBbXRYMTgFBmFtdERjbQkBAmYxAgUTZXhwUHJpY2VBc3NldEFtdFgxOAUIcHJpY2VEY20FC2N1clByaWNlWDE4BQtzbGlwcGFnZVgxOAQJY2FsY0xwQW10CAUBcgJfMQQOY2FsY0FtQXNzZXRQbXQIBQFyAl8yBA5jYWxjUHJBc3NldFBtdAgFAXICXzMECGN1clByaWNlCQECZjECCAUBcgJfNAUGc2NhbGU4BAxzbGlwcGFnZUNhbGMJAQJmMQIIBQFyAl81BQZzY2FsZTgDCQBnAgAABQljYWxjTHBBbXQJAAIBAgdMUCA8PSAwBAllbWl0THBBbXQDCQEBIQEFBmVtaXRMcAAABQljYWxjTHBBbXQEBmFtRGlmZgkAZQIFB2luQW1BbXQFDmNhbGNBbUFzc2V0UG10BAZwckRpZmYJAGUCBQdpblByQW10BQ5jYWxjUHJBc3NldFBtdAQNJHQwMTU2MDExNTk0NgMDBQppc09uZUFzc2V0CQAAAgUFcG10SWQFB2FtSWRTdHIHCQCUCgIFBnBtdEFtdAAAAwMFCmlzT25lQXNzZXQJAAACBQVwbXRJZAUHcHJJZFN0cgcJAJQKAgAABQZwbXRBbXQJAJQKAgUOY2FsY0FtQXNzZXRQbXQFDmNhbGNQckFzc2V0UG10BAp3cml0ZUFtQW10CAUNJHQwMTU2MDExNTk0NgJfMQQKd3JpdGVQckFtdAgFDSR0MDE1NjAxMTU5NDYCXzIEC2NvbW1vblN0YXRlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECcGwABQhjdXJQcmljZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAnBoAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUIY3VyUHJpY2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkBA3BhdQIFC3VzZXJBZGRyZXNzBQZ0eElkNTgJARFkYXRhUHV0QWN0aW9uSW5mbwoFCndyaXRlQW1BbXQFCndyaXRlUHJBbXQFCWVtaXRMcEFtdAUIY3VyUHJpY2UFCHNsaXBwYWdlBQxzbGlwcGFnZUNhbGMFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFBmFtRGlmZgUGcHJEaWZmBQNuaWwJAJ8KDQUJY2FsY0xwQW10BQllbWl0THBBbXQFCGN1clByaWNlBQlhbUJhbGFuY2UFCXByQmFsYW5jZQUEbHBFbQUEbHBJZAUDc3RzBQtjb21tb25TdGF0ZQUGYW1EaWZmBQZwckRpZmYFBmluQW1JZAUGaW5QcklkAQNtb2EBBW9yZGVyBANjZmcJAQNncGMABAdhbXRBc0lkCQCRAwIFA2NmZwUJaWR4QW1Bc0lkBAZwckFzSWQJAJEDAgUDY2ZnBQlpZHhQckFzSWQEA3N0cwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwUJaWR4UG9vbFN0BAhhbXRBc0RjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwULaWR4QW10QXNEY20EB3ByQXNEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFDWlkeFByaWNlQXNEY20ED2FjY0FtdEFzQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQdhbXRBc0lkBA5hY2NQckFzQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQZwckFzSWQEC2N1clByaWNlWDE4AwkAAAIIBQVvcmRlcglvcmRlclR5cGUFA0J1eQkBA3BjcAQFCGFtdEFzRGNtBQdwckFzRGNtCQBkAgUPYWNjQW10QXNCYWxhbmNlCAUFb3JkZXIGYW1vdW50BQ5hY2NQckFzQmFsYW5jZQkBA3BjcAQFCGFtdEFzRGNtBQdwckFzRGNtCQBlAgUPYWNjQW10QXNCYWxhbmNlCAUFb3JkZXIGYW1vdW50BQ5hY2NQckFzQmFsYW5jZQQIY3VyUHJpY2UJAQJmMQIFC2N1clByaWNlWDE4BQZzY2FsZTgDAwMJAQNpZ3MABgkAAAIFA3N0cwUOUG9vbE1hdGNoZXJEaXMGCQAAAgUDc3RzBQxQb29sU2h1dGRvd24JAAIBAg1BZG1pbiBibG9ja2VkBApvckFtdEFzc2V0CAgFBW9yZGVyCWFzc2V0UGFpcgthbW91bnRBc3NldAQKb3JBbXRBc1N0cgMJAAACBQpvckFtdEFzc2V0BQR1bml0AgVXQVZFUwkA2AQBCQEFdmFsdWUBBQpvckFtdEFzc2V0BAlvclByQXNzZXQICAUFb3JkZXIJYXNzZXRQYWlyCnByaWNlQXNzZXQECW9yUHJBc1N0cgMJAAACBQlvclByQXNzZXQFBHVuaXQCBVdBVkVTCQDYBAEJAQV2YWx1ZQEFCW9yUHJBc3NldAMDCQECIT0CBQpvckFtdEFzU3RyBQdhbXRBc0lkBgkBAiE9AgUJb3JQckFzU3RyBQZwckFzSWQJAAIBAglXciBhc3NldHMECm9yZGVyUHJpY2UIBQVvcmRlcgVwcmljZQQIcHJpY2VEY20JAGsDBQZzY2FsZTgFB3ByQXNEY20FCGFtdEFzRGNtBA5jYXN0T3JkZXJQcmljZQkBAnRzAwUKb3JkZXJQcmljZQUGc2NhbGU4BQhwcmljZURjbQQRaXNPcmRlclByaWNlVmFsaWQDCQAAAggFBW9yZGVyCW9yZGVyVHlwZQUDQnV5CQBnAgUIY3VyUHJpY2UFDmNhc3RPcmRlclByaWNlCQBnAgUOY2FzdE9yZGVyUHJpY2UFCGN1clByaWNlBgECY2cBAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAgoxIHBtbnQgZXhwBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQKcG10QXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAZwbXRBbXQIBQNwbXQGYW1vdW50BAFyCQEDZWdvBAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQDYBAEFCnBtdEFzc2V0SWQFBnBtdEFtdAgFAWkGY2FsbGVyBAhvdXRBbUFtdAgFAXICXzEECG91dFByQW10CAUBcgJfMgQDc3RzCQENcGFyc2VJbnRWYWx1ZQEIBQFyAl85BAVzdGF0ZQgFAXIDXzEwAwMJAQNpZ3MABgkAAAIFA3N0cwUMUG9vbFNodXRkb3duCQACAQkArAICAg9BZG1pbiBibG9ja2VkOiAJAKQDAQUDc3RzCQCXCgUFCG91dEFtQW10BQhvdXRQckFtdAUGcG10QW10BQpwbXRBc3NldElkBQVzdGF0ZQECY3AJBmNhbGxlcgR0eElkB2FtQXNQbXQHcHJBc1BtdAhzbGlwcGFnZQZlbWl0THAKaXNPbmVBc3NldAZwbXRBbXQFcG10SWQEAXIJAQNlcG8MBQR0eElkBQhzbGlwcGFnZQgJAQV2YWx1ZQEFB2FtQXNQbXQGYW1vdW50CAkBBXZhbHVlAQUHYW1Bc1BtdAdhc3NldElkCAkBBXZhbHVlAQUHcHJBc1BtdAZhbW91bnQICQEFdmFsdWUBBQdwckFzUG10B2Fzc2V0SWQFBmNhbGxlcgcFBmVtaXRMcAUKaXNPbmVBc3NldAUGcG10QW10BQVwbXRJZAQDc3RzCQENcGFyc2VJbnRWYWx1ZQEIBQFyAl84AwMDCQEDaWdzAAYJAAACBQNzdHMFClBvb2xQdXREaXMGCQAAAgUDc3RzBQxQb29sU2h1dGRvd24JAAIBCQCsAgICCEJsb2NrZWQ6CQCkAwEFA3N0cwUBcgEBbQAEByRtYXRjaDAJAKIIAQkBA21wawADCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQDZBAEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAQJwbQAEByRtYXRjaDAJAKIIAQkBBHBtcGsAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkA2QQBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgACcGQJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAECbW0BAWkEByRtYXRjaDAJAQFtAAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJwawUHJG1hdGNoMAMJAAACCAUBaQ9jYWxsZXJQdWJsaWNLZXkFAnBrBgUCcGQDCQABAgUHJG1hdGNoMAIEVW5pdAMJAAACCAUBaQZjYWxsZXIFBHRoaXMGBQJwZAkAAgECC01hdGNoIGVycm9yFQFpAQtjb25zdHJ1Y3RvcgECZmMEAWMJAQJtbQEFAWkDCQAAAgUBYwUBYwkAzAgCCQELU3RyaW5nRW50cnkCCQECZmMABQJmYwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCnNldE1hbmFnZXIBF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5BAFjCQECbW0BBQFpAwkAAAIFAWMFAWMEAmNtCQDZBAEFF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5AwkAAAIFAmNtBQJjbQkAzAgCCQELU3RyaW5nRW50cnkCCQEEcG1wawAFF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEOY29uZmlybU1hbmFnZXIABAFwCQECcG0ABANocG0DCQEJaXNEZWZpbmVkAQUBcAYJAAIBAhJObyBwZW5kaW5nIG1hbmFnZXIDCQAAAgUDaHBtBQNocG0EA2NwbQMJAAACCAUBaQ9jYWxsZXJQdWJsaWNLZXkJAQV2YWx1ZQEFAXAGCQACAQIbWW91IGFyZSBub3QgcGVuZGluZyBtYW5hZ2VyAwkAAAIFA2NwbQUDY3BtCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQNtcGsACQDYBAEJAQV2YWx1ZQEFAXAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBBHBtcGsABQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEDcHV0AgRzbGlwCWF1dG9TdGFrZQQHZmFjdENmZwkBA2dmYwAEC3N0YWtpbmdDbnRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQdmYWN0Q2ZnBQ9pZHhGYWN0U3Rha0NudHICCldyIHN0IGFkZHIECHNsaXBDbnRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQdmYWN0Q2ZnBRBpZHhGYWN0U2xpcHBDbnRyAgpXciBzbCBhZGRyAwkAZgIAAAUEc2xpcAkAAgECDldyb25nIHNsaXBwYWdlAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwACCQACAQIMMiBwbW50cyBleHBkBAFlCQECY3AJCQClCAEIBQFpBmNhbGxlcgkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQEPQXR0YWNoZWRQYXltZW50AggJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAkAkQMCCAUBaQhwYXltZW50cwABBQRzbGlwBgcAAAIABAllbWl0THBBbXQIBQFlAl8yBAlscEFzc2V0SWQIBQFlAl83BAVzdGF0ZQgFAWUCXzkEBmFtRGlmZggFAWUDXzEwBAZwckRpZmYIBQFlA18xMQQEYW1JZAgFAWUDXzEyBARwcklkCAUBZQNfMTMEAXIJAPwHBAUDZmNhAgRlbWl0CQDMCAIFCWVtaXRMcEFtdAUDbmlsBQNuaWwDCQAAAgUBcgUBcgQCZWwEByRtYXRjaDAFAXIDCQABAgUHJG1hdGNoMAIHQWRkcmVzcwQGbGVnYWN5BQckbWF0Y2gwCQD8BwQFBmxlZ2FjeQIEZW1pdAkAzAgCBQllbWl0THBBbXQFA25pbAUDbmlsBQR1bml0AwkAAAIFAmVsBQJlbAQCc2EDCQBmAgUGYW1EaWZmAAAJAPwHBAUIc2xpcENudHICA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQRhbUlkBQZhbURpZmYFA25pbAUDbmlsAwkAAAIFAnNhBQJzYQQCc3ADCQBmAgUGcHJEaWZmAAAJAPwHBAUIc2xpcENudHICA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQRwcklkBQZwckRpZmYFA25pbAUDbmlsAwkAAAIFAnNwBQJzcAQIbHBUcm5zZnIDBQlhdXRvU3Rha2UEAnNzCQD8BwQFC3N0YWtpbmdDbnRyAgVzdGFrZQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQlscEFzc2V0SWQFCWVtaXRMcEFtdAUDbmlsAwkAAAIFAnNzBQJzcwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUJZW1pdExwQW10BQlscEFzc2V0SWQFA25pbAkAzggCBQVzdGF0ZQUIbHBUcm5zZnIJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEJcHV0T25lVGtuBQthbUFzc2V0UGFydAtwckFzc2V0UGFydAVvdXRMcAhzbGlwcGFnZQlhdXRvU3Rha2UEA2NmZwkBA2dmYwAEC3N0YWtpbmdDbnRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQNjZmcFD2lkeEZhY3RTdGFrQ250cgIKV3Igc3QgYWRkcgQIc2xpcENudHIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFA2NmZwUQaWR4RmFjdFNsaXBwQ250cgIKV3Igc2wgYWRkcgQHZ3d4Q250cgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUDY2ZnBRFpZHhGYWN0R3d4UmV3Q250cgILV3IgZ3d4IGFkZHIEB3Bvb2xDZmcJAQNncGMABARhbUlkCQCRAwIFB3Bvb2xDZmcFCWlkeEFtQXNJZAQEcHJJZAkAkQMCBQdwb29sQ2ZnBQlpZHhQckFzSWQEBWFtRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcG9vbENmZwULaWR4QW10QXNEY20EBXByRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcG9vbENmZwUNaWR4UHJpY2VBc0RjbQQFYWRkb24JAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBA2FkYQACAAQLdXNlckFkZHJlc3MDCQAAAgUFYWRkb24JAKUIAQgFAWkGY2FsbGVyCAUBaQxvcmlnaW5DYWxsZXIIBQFpBmNhbGxlcgQNYWRkb25Db250cmFjdAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQEDYWRhAAIJbm8gYWRkb25zAhphZGRvbiBhZGRyZXNzIGluIG5vdCB2YWxpZAQFY2hlY2sJAP0HBAUNYWRkb25Db250cmFjdAISZW5zdXJlQ2FuUHV0T25lVGtuCQDMCAIJAKUIAQULdXNlckFkZHJlc3MFA25pbAUDbmlsAwkAAAIFBWNoZWNrBQVjaGVjawMDAwMJAGcCAAAFCHNsaXBwYWdlBgkAZwIAAAULYW1Bc3NldFBhcnQGCQBnAgAABQtwckFzc2V0UGFydAYJAGcCAAAFBW91dExwCQACAQIMV3JvbmcgcGFyYW1zAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQILMSBwbW50IGV4cGQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABApwbXRBc3NldElkCQDYBAEJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAQGcG10QW10CAUDcG10BmFtb3VudAMJAGYCAICt4gQFBnBtdEFtdAkAAgECDVdyb25nIHBtdCBhbXQECWFtQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQRhbUlkBAlwckJhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUEcHJJZAQNJHQwMjQ4NTkyNTQzNQMJAAACBQpwbXRBc3NldElkBQRhbUlkAwMJAGYCBQZwbXRBbXQFCWFtQmFsYW5jZQYJAGYCBQthbUFzc2V0UGFydAUGcG10QW10CQACAQIWaW52YWxpZCBwYXltZW50IGFtb3VudAkAmAoGCQBlAgUJYW1CYWxhbmNlBQZwbXRBbXQFCXByQmFsYW5jZQkAZQIFBnBtdEFtdAULYW1Bc3NldFBhcnQFC3ByQXNzZXRQYXJ0AAAAAAMJAAACBQpwbXRBc3NldElkBQRwcklkAwMJAGYCBQZwbXRBbXQFCXByQmFsYW5jZQYJAGYCBQtwckFzc2V0UGFydAUGcG10QW10CQACAQIWaW52YWxpZCBwYXltZW50IGFtb3VudAkAmAoGBQlhbUJhbGFuY2UJAGUCBQlwckJhbGFuY2UFBnBtdEFtdAAAAAAJAGUCBQZwbXRBbXQFC3ByQXNzZXRQYXJ0BQthbUFzc2V0UGFydAkAAgECEHdyb25nIHBtdEFzc2V0SWQEDGFtQmFsYW5jZU5vdwgFDSR0MDI0ODU5MjU0MzUCXzEEDHByQmFsYW5jZU5vdwgFDSR0MDI0ODU5MjU0MzUCXzIEDHZpcnRTd2FwSW5BbQgFDSR0MDI0ODU5MjU0MzUCXzMEDXZpcnRTd2FwT3V0UHIIBQ0kdDAyNDg1OTI1NDM1Al80BAx2aXJ0U3dhcEluUHIIBQ0kdDAyNDg1OTI1NDM1Al81BA12aXJ0U3dhcE91dEFtCAUNJHQwMjQ4NTkyNTQzNQJfNgQCRDAJAPwHBAUHZ3d4Q250cgIFY2FsY0QJAMwIAgkApAMBBQxhbUJhbGFuY2VOb3cJAMwIAgkApAMBBQxwckJhbGFuY2VOb3cJAMwIAgUBQQkAzAgCBQVBbXVsdAkAzAgCBQVEY29udgUDbmlsBQNuaWwEAkQxCQD8BwQFB2d3eENudHICBWNhbGNECQDMCAIJAKYDAQkAtgIBCQBlAgkAZAIFDGFtQmFsYW5jZU5vdwUMdmlydFN3YXBJbkFtBQ12aXJ0U3dhcE91dEFtCQDMCAIJAKYDAQkAtgIBCQBlAgkAZAIFDHByQmFsYW5jZU5vdwUMdmlydFN3YXBJblByBQ12aXJ0U3dhcE91dFByCQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgUFRGNvbnYFA25pbAUDbmlsBAZEMHZzRDEJAQJ2ZAMJAKcDAQkBA3N0cgEFAkQxCQCnAwEJAQNzdHIBBQJEMAUKc2xpcHBhZ2U0RAMJAAACBQZEMHZzRDEFBkQwdnNEMQQGZXN0UHV0CQECY3AJCQClCAEIBQFpBmNhbGxlcgkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQRhbUlkBQthbUFzc2V0UGFydAkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUEcHJJZAULcHJBc3NldFBhcnQFCHNsaXBwYWdlBgYFBnBtdEFtdAUKcG10QXNzZXRJZAQHZXN0aW1MUAgFBmVzdFB1dAJfMgQJbHBBc3NldElkCAUGZXN0UHV0Al83BAVzdGF0ZQgFBmVzdFB1dAJfOQQGYW1EaWZmCAUGZXN0UHV0A18xMAQGcHJEaWZmCAUGZXN0UHV0A18xMQQJbHBDYWxjUmVzCQEDdmFkAwkAtgIBBQdlc3RpbUxQCQC2AgEFBW91dExwCQC2AgEFCHNsaXBwYWdlBAllbWl0THBBbXQJAKADAQgFCWxwQ2FsY1JlcwJfMgQBZQkA/AcEBQNmY2ECBGVtaXQJAMwIAgUJZW1pdExwQW10BQNuaWwFA25pbAMJAAACBQFlBQFlBAJlbAQHJG1hdGNoMAUBZQMJAAECBQckbWF0Y2gwAgdBZGRyZXNzBAZsZWdhY3kFByRtYXRjaDAJAPwHBAUGbGVnYWN5AgRlbWl0CQDMCAIFCWVtaXRMcEFtdAUDbmlsBQNuaWwFBHVuaXQDCQAAAgUCZWwFAmVsBAJzYQMJAGYCBQZhbURpZmYAAAkA/AcEBQhzbGlwQ250cgIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUEYW1JZAUGYW1EaWZmBQNuaWwFA25pbAMJAAACBQJzYQUCc2EEAnNwAwkAZgIFBnByRGlmZgAACQD8BwQFCHNsaXBDbnRyAgNwdXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQRwcklkBQZwckRpZmYFA25pbAUDbmlsAwkAAAIFAnNwBQJzcAQIbHBUcm5zZnIDBQlhdXRvU3Rha2UEAnNzCQD8BwQFC3N0YWtpbmdDbnRyAgVzdGFrZQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQlscEFzc2V0SWQFCWVtaXRMcEFtdAUDbmlsAwkAAAIFAnNzBQJzcwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUJZW1pdExwQW10BQlscEFzc2V0SWQFA25pbAkAzggCBQVzdGF0ZQUIbHBUcm5zZnIJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEKcHV0Rm9yRnJlZQEHbWF4U2xwZwMJAGYCAAAFB21heFNscGcJAAIBAgpXcm9uZyBzbHBnAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwACCQACAQIMMiBwbW50cyBleHBkBAZlc3RQdXQJAQJjcAkJAKUIAQgFAWkGY2FsbGVyCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQJAQ9BdHRhY2hlZFBheW1lbnQCCAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQICQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50CQCRAwIIBQFpCHBheW1lbnRzAAEFB21heFNscGcHBwAAAgAIBQZlc3RQdXQCXzkBaQEDZ2V0AAQBcgkBAmNnAQUBaQQJb3V0QW10QW10CAUBcgJfMQQIb3V0UHJBbXQIBQFyAl8yBAZwbXRBbXQIBQFyAl8zBApwbXRBc3NldElkCAUBcgJfNAQFc3RhdGUIBQFyAl81BAFiCQD8BwQFA2ZjYQIEYnVybgkAzAgCBQZwbXRBbXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUKcG10QXNzZXRJZAUGcG10QW10BQNuaWwDCQAAAgUBYgUBYgUFc3RhdGUJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEJZ2V0T25lVGtuBQpleGNoUmVzdWx0B25vdFVzZWQJb3V0QW1vdW50Cm91dEFzc2V0SWQIc2xpcHBhZ2UDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAgsxIHBtbnQgZXhwZAQDY2ZnCQEDZ3BjAAQEbHBJZAkAkQMCBQNjZmcFCWlkeExQQXNJZAQEYW1JZAkAkQMCBQNjZmcFCWlkeEFtQXNJZAQEcHJJZAkAkQMCBQNjZmcFCWlkeFByQXNJZAQFYW1EY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFC2lkeEFtdEFzRGNtBAVwckRjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwUNaWR4UHJpY2VBc0RjbQQDc3RzCQCRAwIFA2NmZwUJaWR4UG9vbFN0BAdmYWN0Q2ZnCQEDZ2ZjAAQHZ3d4Q250cgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUHZmFjdENmZwURaWR4RmFjdEd3eFJld0NudHICCldyIHNsIGFkZHIEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABAVhZGRvbgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQEDYWRhAAIABAt1c2VyQWRkcmVzcwMJAAACBQVhZGRvbgkApQgBCAUBaQZjYWxsZXIIBQFpDG9yaWdpbkNhbGxlcggFAWkGY2FsbGVyBAZ0eElkNTgJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAQKcG10QXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAZwbXRBbXQIBQNwbXQGYW1vdW50BA1hZGRvbkNvbnRyYWN0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJAQNhZGEAAglubyBhZGRvbnMCGmFkZG9uIGFkZHJlc3MgaW4gbm90IHZhbGlkBAVjaGVjawkA/QcEBQ1hZGRvbkNvbnRyYWN0AhJlbnN1cmVDYW5HZXRPbmVUa24JAMwIAgkApQgBBQt1c2VyQWRkcmVzcwUDbmlsBQNuaWwDCQAAAgUFY2hlY2sFBWNoZWNrAwkAZgIAgJTr3AMFBnBtdEFtdAkAAgECDU1pbiBwbXQgMTAgTFADAwMJAGYCAAAFCHNsaXBwYWdlBgkAZgIAAAUKZXhjaFJlc3VsdAYJAGYCAAAFCW91dEFtb3VudAkAAgECDFdyb25nIHBhcmFtcwMJAQIhPQIFBGxwSWQJANgEAQUKcG10QXNzZXRJZAkAAgECCFdyb25nIExQBAFyCQEDZWdvBAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQDYBAEFCnBtdEFzc2V0SWQFBnBtdEFtdAgFAWkGY2FsbGVyBAplc3RpbUFtQW10CAUBcgJfMQQKZXN0aW1QckFtdAgFAXICXzIECWFtQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQRhbUlkBAlwckJhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUEcHJJZAQNJHQwMzA0NjYzMDkyMwMJAAACBQpvdXRBc3NldElkBQRhbUlkCQCZCgcJAGUCBQlhbUJhbGFuY2UFCmVzdGltQW1BbXQJAGUCBQlwckJhbGFuY2UFCmVzdGltUHJBbXQFCmV4Y2hSZXN1bHQFCmVzdGltUHJBbXQAAAAACQBkAgUKZXN0aW1BbUFtdAUKZXhjaFJlc3VsdAMJAAACBQpvdXRBc3NldElkBQRwcklkCQCZCgcJAGUCBQlhbUJhbGFuY2UFCmVzdGltQW1BbXQJAGUCBQlwckJhbGFuY2UFCmVzdGltUHJBbXQAAAAABQpleGNoUmVzdWx0BQplc3RpbUFtQW10CQBkAgUKZXN0aW1QckFtdAUKZXhjaFJlc3VsdAkAAgECEHdyb25nIG91dEFzc2V0SWQEDGFtQmFsYW5jZU5vdwgFDSR0MDMwNDY2MzA5MjMCXzEEDHByQmFsYW5jZU5vdwgFDSR0MDMwNDY2MzA5MjMCXzIEDHZpcnRTd2FwSW5BbQgFDSR0MDMwNDY2MzA5MjMCXzMEDXZpcnRTd2FwT3V0UHIIBQ0kdDAzMDQ2NjMwOTIzAl80BAx2aXJ0U3dhcEluUHIIBQ0kdDAzMDQ2NjMwOTIzAl81BA12aXJ0U3dhcE91dEFtCAUNJHQwMzA0NjYzMDkyMwJfNgQIdG90YWxHZXQIBQ0kdDAzMDQ2NjMwOTIzAl83AwMJAGYCAAAFDHZpcnRTd2FwSW5BbQYJAGYCAAAFDHZpcnRTd2FwSW5QcgkAAgECCldyb25nIGNhbGMEAkQwCQD8BwQFB2d3eENudHICBWNhbGNECQDMCAIJAKQDAQUMYW1CYWxhbmNlTm93CQDMCAIJAKQDAQUMcHJCYWxhbmNlTm93CQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgUFRGNvbnYFA25pbAUDbmlsBAJEMQkA/AcEBQdnd3hDbnRyAgVjYWxjRAkAzAgCCQCkAwEJAGQCCQBlAgUMYW1CYWxhbmNlTm93BQx2aXJ0U3dhcEluQW0FDXZpcnRTd2FwT3V0QW0JAMwIAgkApAMBCQBlAgkAZAIFDHByQmFsYW5jZU5vdwUNdmlydFN3YXBPdXRQcgUMdmlydFN3YXBJblByCQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgUFRGNvbnYFA25pbAUDbmlsBAZEMHZzRDEJAQJ2ZAMJAKcDAQkBA3N0cgEFAkQxCQCnAwEJAQNzdHIBBQJEMAUKc2xpcHBhZ2U0RAMJAAACBQZEMHZzRDEFBkQwdnNEMQQIZmluYWxSZXMJAQN2YWQDCQC2AgEFCHRvdGFsR2V0CQC2AgEFCW91dEFtb3VudAkAtgIBBQhzbGlwcGFnZQMJAAACBQhmaW5hbFJlcwUIZmluYWxSZXMEDSR0MDMxNjI4MzE3MzIDCQAAAgUKb3V0QXNzZXRJZAUEYW1JZAkAlAoCCQCgAwEIBQhmaW5hbFJlcwJfMgAACQCUCgIAAAkAoAMBCAUIZmluYWxSZXMCXzIEBW91dEFtCAUNJHQwMzE2MjgzMTczMgJfMQQFb3V0UHIIBQ0kdDAzMTYyODMxNzMyAl8yBAhjdXJQclgxOAkBBGNwYmkCCQECdDECBQlwckJhbGFuY2UFBXByRGNtCQECdDECBQlhbUJhbGFuY2UFBWFtRGNtBAVjdXJQcgkBAmYxAgUIY3VyUHJYMTgFBnNjYWxlOAQFc3RhdGUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwULdXNlckFkZHJlc3MJAGQCBQVvdXRBbQUFb3V0UHIDCQAAAgUKb3V0QXNzZXRJZAIFV0FWRVMFBHVuaXQJANkEAQUKb3V0QXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQEDZ2F1AgkApQgBBQt1c2VyQWRkcmVzcwUGdHhJZDU4CQERZGF0YUdldEFjdGlvbkluZm8GBQVvdXRBbQUFb3V0UHIFBnBtdEFtdAUFY3VyUHIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJwbAAFBWN1clByCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECcGgCBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQVjdXJQcgUDbmlsAwkAAAIFBXN0YXRlBQVzdGF0ZQQEYnVybgkA/AcEBQNmY2ECBGJ1cm4JAMwIAgUGcG10QW10BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCnBtdEFzc2V0SWQFBnBtdEFtdAUDbmlsAwkAAAIFBGJ1cm4FBGJ1cm4FBXN0YXRlCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCWdldE5vTGVzcwISbm9MZXNzVGhlbkFtdEFzc2V0FG5vTGVzc1RoZW5QcmljZUFzc2V0BAFyCQECY2cBBQFpBAhvdXRBbUFtdAgFAXICXzEECG91dFByQW10CAUBcgJfMgQGcG10QW10CAUBcgJfMwQKcG10QXNzZXRJZAgFAXICXzQEBXN0YXRlCAUBcgJfNQMJAGYCBRJub0xlc3NUaGVuQW10QXNzZXQFCG91dEFtQW10CQACAQkArAICCQCsAgIJAKwCAgIJRmFpbGVkOiAgCQCkAwEFCG91dEFtQW10AgMgPCAJAKQDAQUSbm9MZXNzVGhlbkFtdEFzc2V0AwkAZgIFFG5vTGVzc1RoZW5QcmljZUFzc2V0BQhvdXRQckFtdAkAAgEJAKwCAgkArAICCQCsAgICCEZhaWxlZDogCQCkAwEFCG91dFByQW10AgMgPCAJAKQDAQUUbm9MZXNzVGhlblByaWNlQXNzZXQEFGJ1cm5MUEFzc2V0T25GYWN0b3J5CQD8BwQFA2ZjYQIEYnVybgkAzAgCBQZwbXRBbXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUKcG10QXNzZXRJZAUGcG10QW10BQNuaWwDCQAAAgUUYnVybkxQQXNzZXRPbkZhY3RvcnkFFGJ1cm5MUEFzc2V0T25GYWN0b3J5BQVzdGF0ZQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQ11bnN0YWtlQW5kR2V0AQZhbW91bnQEDWNoZWNrUGF5bWVudHMDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAg1ObyBwbW50cyBleHBkBgMJAAACBQ1jaGVja1BheW1lbnRzBQ1jaGVja1BheW1lbnRzBANjZmcJAQNncGMABApmYWN0b3J5Q2ZnCQEDZ2ZjAAQJbHBBc3NldElkCQDZBAEJAJEDAgUDY2ZnBQlpZHhMUEFzSWQEB3N0YWtpbmcJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFCmZhY3RvcnlDZmcFD2lkeEZhY3RTdGFrQ250cgIKV3Igc3QgYWRkcgQKdW5zdGFrZUludgkA/AcEBQdzdGFraW5nAgd1bnN0YWtlCQDMCAIJANgEAQUJbHBBc3NldElkCQDMCAIFBmFtb3VudAUDbmlsBQNuaWwDCQAAAgUKdW5zdGFrZUludgUKdW5zdGFrZUludgQBcgkBA2VnbwQJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAkA2AQBBQlscEFzc2V0SWQFBmFtb3VudAgFAWkGY2FsbGVyBANzdHMJAQ1wYXJzZUludFZhbHVlAQgFAXICXzkEBXN0YXRlCAUBcgNfMTAEAXYDAwkBA2lncwAGCQAAAgUDc3RzBQxQb29sU2h1dGRvd24JAAIBCQCsAgICCUJsb2NrZWQ6IAkApAMBBQNzdHMGAwkAAAIFAXYFAXYEBWJ1cm5BCQD8BwQFA2ZjYQIEYnVybgkAzAgCBQZhbW91bnQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUJbHBBc3NldElkBQZhbW91bnQFA25pbAMJAAACBQVidXJuQQUFYnVybkEFBXN0YXRlCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCGFjdGl2YXRlAghhbXRBc1N0cgdwckFzU3RyAwkBAiE9AgkApQgBCAUBaQZjYWxsZXIJAKUIAQUDZmNhCQACAQIGZGVuaWVkCQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmFhAAUIYW10QXNTdHIJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAnBhAAUHcHJBc1N0cgUDbmlsAgdzdWNjZXNzAWkBBHNldFMCAWsBdgMJAQIhPQIJAKUIAQgFAWkGY2FsbGVyCQEEc3RyZgIFBHRoaXMJAQNhZGEABQJwZAkAzAgCCQELU3RyaW5nRW50cnkCBQFrBQF2BQNuaWwBaQEEc2V0SQIBawF2AwkBAiE9AgkApQgBCAUBaQZjYWxsZXIJAQRzdHJmAgUEdGhpcwkBA2FkYQAFAnBkCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQFrBQF2BQNuaWwBaQEcZ2V0UG9vbENvbmZpZ1dyYXBwZXJSRUFET05MWQAJAJQKAgUDbmlsCQEDZ3BjAAFpARxnZXRBY2NCYWxhbmNlV3JhcHBlclJFQURPTkxZAQdhc3NldElkCQCUCgIFA25pbAkBDWdldEFjY0JhbGFuY2UBBQdhc3NldElkAWkBGWNhbGNQcmljZXNXcmFwcGVyUkVBRE9OTFkDBWFtQW10BXByQW10BWxwQW10BAJwcgkBCmNhbGNQcmljZXMDBQVhbUFtdAUFcHJBbXQFBWxwQW10CQCUCgIFA25pbAkAzAgCCQCmAwEJAJEDAgUCcHIAAAkAzAgCCQCmAwEJAJEDAgUCcHIAAQkAzAgCCQCmAwEJAJEDAgUCcHIAAgUDbmlsAWkBFmZyb21YMThXcmFwcGVyUkVBRE9OTFkCA3ZhbAxyZXNTY2FsZU11bHQJAJQKAgUDbmlsCQECZjECCQCnAwEFA3ZhbAUMcmVzU2NhbGVNdWx0AWkBFHRvWDE4V3JhcHBlclJFQURPTkxZAgdvcmlnVmFsDW9yaWdTY2FsZU11bHQJAJQKAgUDbmlsCQCmAwEJAQJ0MQIFB29yaWdWYWwFDW9yaWdTY2FsZU11bHQBaQEeY2FsY1ByaWNlQmlnSW50V3JhcHBlclJFQURPTkxZAghwckFtdFgxOAhhbUFtdFgxOAkAlAoCBQNuaWwJAKYDAQkBBGNwYmkCCQCnAwEFCHByQW10WDE4CQCnAwEFCGFtQW10WDE4AWkBI2VzdGltYXRlUHV0T3BlcmF0aW9uV3JhcHBlclJFQURPTkxZCQZ0eElkNTgIc2xpcHBhZ2UHaW5BbUFtdAZpbkFtSWQHaW5QckFtdAZpblBySWQHdXNyQWRkcgZpc0V2YWwGZW1pdExwCQCUCgIFA25pbAkBA2VwbwwFBnR4SWQ1OAUIc2xpcHBhZ2UFB2luQW1BbXQFBmluQW1JZAUHaW5QckFtdAUGaW5QcklkBQd1c3JBZGRyBQZpc0V2YWwFBmVtaXRMcAcAAAIAAWkBI2VzdGltYXRlR2V0T3BlcmF0aW9uV3JhcHBlclJFQURPTkxZBAZ0eElkNTgHcG10QXNJZAhwbXRMcEFtdAd1c3JBZGRyBAFyCQEDZWdvBAUGdHhJZDU4BQdwbXRBc0lkBQhwbXRMcEFtdAkBEUBleHRyTmF0aXZlKDEwNjIpAQUHdXNyQWRkcgkAlAoCBQNuaWwJAJwKCggFAXICXzEIBQFyAl8yCAUBcgJfMwgFAXICXzQIBQFyAl81CAUBcgJfNggFAXICXzcJAKYDAQgFAXICXzgIBQFyAl85CAUBcgNfMTABAnR4AQZ2ZXJpZnkABA90YXJnZXRQdWJsaWNLZXkEByRtYXRjaDAJAQFtAAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJwawUHJG1hdGNoMAUCcGsDCQABAgUHJG1hdGNoMAIEVW5pdAgFAnR4D3NlbmRlclB1YmxpY0tleQkAAgECC01hdGNoIGVycm9yBAckbWF0Y2gwBQJ0eAMJAAECBQckbWF0Y2gwAgVPcmRlcgQFb3JkZXIFByRtYXRjaDAECm1hdGNoZXJQdWIJAQJtcAAECm9yZGVyVmFsaWQJAQNtb2EBBQVvcmRlcgQLc2VuZGVyVmFsaWQJAPQDAwgFBW9yZGVyCWJvZHlCeXRlcwkAkQMCCAUFb3JkZXIGcHJvb2ZzAAAIBQVvcmRlcg9zZW5kZXJQdWJsaWNLZXkEDG1hdGNoZXJWYWxpZAkA9AMDCAUFb3JkZXIJYm9keUJ5dGVzCQCRAwIIBQVvcmRlcgZwcm9vZnMAAQUKbWF0Y2hlclB1YgMDAwUKb3JkZXJWYWxpZAULc2VuZGVyVmFsaWQHBQxtYXRjaGVyVmFsaWQHBgkBA3RvZQMFCm9yZGVyVmFsaWQFC3NlbmRlclZhbGlkBQxtYXRjaGVyVmFsaWQDCQABAgUHJG1hdGNoMAIUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAXMFByRtYXRjaDAEB25ld0hhc2gJAPYDAQkBBXZhbHVlAQgFAXMGc2NyaXB0BAthbGxvd2VkSGFzaAkA2wQBCQEFdmFsdWUBCQCdCAIFA2ZjYQkBHGtleUFsbG93ZWRMcFN0YWJsZVNjcmlwdEhhc2gABAtjdXJyZW50SGFzaAkA8QcBBQR0aGlzAwMJAAACBQthbGxvd2VkSGFzaAUHbmV3SGFzaAkBAiE9AgULY3VycmVudEhhc2gFB25ld0hhc2gHBgkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUPdGFyZ2V0UHVibGljS2V5CQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAABQ90YXJnZXRQdWJsaWNLZXm8emkr",
    "chainId": 87,
    "height": 3273001,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 5XY2u19BQqd87FkWPMXmmiDmT6Pf8d5u5GQs3UUq17fk
Next: ACwGVJnLKt4ND9CCZSDJizvVhNzb9uMGt5G7wzuSSksu

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

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

121	121
122	122
123	123		func aps () = "%s__shutdown"
	124	+
	125	+
	126	+	func keyAllowedLpStableScriptHash () = "%s__allowedLpStableScriptHash"
124	127
125	128
126	129		func toe (orV,sendrV,matchV) = throw(((((("Failed: ordValid=" + toString(orV)) + " sndrValid=") + toString(sendrV)) + " mtchrValid=") + toString(matchV)))

334	337		else calcLpAmt
335	338		let amDiff = (inAmAmt - calcAmAssetPmt)
336	339		let prDiff = (inPrAmt - calcPrAssetPmt)
337		-	let $~~t01553115876~~ = if (if (isOneAsset)
	340	+	let $t01560115946 = if (if (isOneAsset)
338	341		then (pmtId == amIdStr)
339	342		else false)
340	343		then $Tuple2(pmtAmt, 0)

343	346		else false)
344	347		then $Tuple2(0, pmtAmt)
345	348		else $Tuple2(calcAmAssetPmt, calcPrAssetPmt)
346		-	let writeAmAmt = $~~t01553115876~~._1
347		-	let writePrAmt = $~~t01553115876~~._2
	349	+	let writeAmAmt = $t01560115946._1
	350	+	let writePrAmt = $t01560115946._2
348	351		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))]
349	352		$Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEm, lpId, sts, commonState, amDiff, prDiff, inAmId, inPrId)
350	353		}

602	605		let pmt = value(i.payments[0])
603	606		let pmtAssetId = toBase58String(value(pmt.assetId))
604	607		let pmtAmt = pmt.amount
605		-	if (if (if ((amAssetPart > pmtAmt))
606		-	then true
607		-	else (prAssetPart > pmtAmt))
608		-	then true
609		-	else (10000000 > pmtAmt))
	608	+	if ((10000000 > pmtAmt))
610	609		then throw("Wrong pmt amt")
611	610		else {
612	611		let amBalance = getAccBalance(amId)
613	612		let prBalance = getAccBalance(prId)
614		-	let $t02483225212 = if ((pmtAssetId == amId))
615		-	then $Tuple6((amBalance - pmtAmt), prBalance, (pmtAmt - amAssetPart), prAssetPart, 0, 0)
	613	+	let $t02485925435 = if ((pmtAssetId == amId))
	614	+	then if (if ((pmtAmt > amBalance))
	615	+	then true
	616	+	else (amAssetPart > pmtAmt))
	617	+	then throw("invalid payment amount")
	618	+	else $Tuple6((amBalance - pmtAmt), prBalance, (pmtAmt - amAssetPart), prAssetPart, 0, 0)
616	619		else if ((pmtAssetId == prId))
617		-	then $Tuple6(amBalance, (prBalance - pmtAmt), 0, 0, (pmtAmt - prAssetPart), amAssetPart)
	620	+	then if (if ((pmtAmt > prBalance))
	621	+	then true
	622	+	else (prAssetPart > pmtAmt))
	623	+	then throw("invalid payment amount")
	624	+	else $Tuple6(amBalance, (prBalance - pmtAmt), 0, 0, (pmtAmt - prAssetPart), amAssetPart)
618	625		else throw("wrong pmtAssetId")
619		-	let amBalanceNow = $~~t02483225212~~._1
620		-	let prBalanceNow = $~~t02483225212~~._2
621		-	let virtSwapInAm = $~~t02483225212~~._3
622		-	let virtSwapOutPr = $~~t02483225212~~._4
623		-	let virtSwapInPr = $~~t02483225212~~._5
624		-	let virtSwapOutAm = $~~t02483225212~~._6
	626	+	let amBalanceNow = $t02485925435._1
	627	+	let prBalanceNow = $t02485925435._2
	628	+	let virtSwapInAm = $t02485925435._3
	629	+	let virtSwapOutPr = $t02485925435._4
	630	+	let virtSwapInPr = $t02485925435._5
	631	+	let virtSwapOutAm = $t02485925435._6
625	632		let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
626	633		let D1 = invoke(gwxCntr, "calcD", [toString(toBigInt(((amBalanceNow + virtSwapInAm) - virtSwapOutAm))), toString(toBigInt(((prBalanceNow + virtSwapInPr) - virtSwapOutPr))), A, Amult, Dconv], nil)
627	634		let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)

750	757		let estimPrAmt = r._2
751	758		let amBalance = getAccBalance(amId)
752	759		let prBalance = getAccBalance(prId)
753		-	let $~~t03024330700~~ = if ((outAssetId == amId))
	760	+	let $t03046630923 = if ((outAssetId == amId))
754	761		then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), exchResult, estimPrAmt, 0, 0, (estimAmAmt + exchResult))
755	762		else if ((outAssetId == prId))
756	763		then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), 0, 0, exchResult, estimAmAmt, (estimPrAmt + exchResult))
757	764		else throw("wrong outAssetId")
758		-	let amBalanceNow = $~~t03024330700~~._1
759		-	let prBalanceNow = $~~t03024330700~~._2
760		-	let virtSwapInAm = $~~t03024330700~~._3
761		-	let virtSwapOutPr = $~~t03024330700~~._4
762		-	let virtSwapInPr = $~~t03024330700~~._5
763		-	let virtSwapOutAm = $~~t03024330700~~._6
764		-	let totalGet = $~~t03024330700~~._7
	765	+	let amBalanceNow = $t03046630923._1
	766	+	let prBalanceNow = $t03046630923._2
	767	+	let virtSwapInAm = $t03046630923._3
	768	+	let virtSwapOutPr = $t03046630923._4
	769	+	let virtSwapInPr = $t03046630923._5
	770	+	let virtSwapOutAm = $t03046630923._6
	771	+	let totalGet = $t03046630923._7
765	772		if (if ((0 > virtSwapInAm))
766	773		then true
767	774		else (0 > virtSwapInPr))

775	782		let finalRes = vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
776	783		if ((finalRes == finalRes))
777	784		then {
778		-	let $~~t03140531509~~ = if ((outAssetId == amId))
	785	+	let $t03162831732 = if ((outAssetId == amId))
779	786		then $Tuple2(toInt(finalRes._2), 0)
780	787		else $Tuple2(0, toInt(finalRes._2))
781		-	let outAm = $~~t03140531509~~._1
782		-	let outPr = $~~t03140531509~~._2
	788	+	let outAm = $t03162831732._1
	789	+	let outPr = $t03162831732._2
783	790		let curPrX18 = cpbi(t1(prBalance, prDcm), t1(amBalance, amDcm))
784	791		let curPr = f1(curPrX18, scale8)
785	792		let state = [ScriptTransfer(userAddress, (outAm + outPr), if ((outAssetId == "WAVES"))

931	938
932	939
933	940		@Verifier(tx)
934		-	func verify () = match tx {
935		-	case order: Order =>
936		-	let mtchPub = mp()
937		-	let orV = moa(order)
938		-	let sndrV = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
939		-	let mtchV = sigVerify(order.bodyBytes, order.proofs[1], mtchPub)
940		-	if (if (if (orV)
941		-	then sndrV
942		-	else false)
943		-	then mtchV
944		-	else false)
945		-	then true
946		-	else toe(orV, sndrV, mtchV)
947		-	case _ =>
948		-	let targetPublicKey = match m() {
949		-	case pk: ByteVector =>
950		-	pk
951		-	case _: Unit =>
952		-	tx.senderPublicKey
953		-	case _ =>
954		-	throw("Match error")
955		-	}
956		-	sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
957		-	}
	941	+	func verify () = {
	942	+	let targetPublicKey = match m() {
	943	+	case pk: ByteVector =>
	944	+	pk
	945	+	case _: Unit =>
	946	+	tx.senderPublicKey
	947	+	case _ =>
	948	+	throw("Match error")
	949	+	}
	950	+	match tx {
	951	+	case order: Order =>
	952	+	let matcherPub = mp()
	953	+	let orderValid = moa(order)
	954	+	let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
	955	+	let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub)
	956	+	if (if (if (orderValid)
	957	+	then senderValid
	958	+	else false)
	959	+	then matcherValid
	960	+	else false)
	961	+	then true
	962	+	else toe(orderValid, senderValid, matcherValid)
	963	+	case s: SetScriptTransaction =>
	964	+	let newHash = blake2b256(value(s.script))
	965	+	let allowedHash = fromBase64String(value(getString(fca, keyAllowedLpStableScriptHash())))
	966	+	let currentHash = scriptHash(this)
	967	+	if (if ((allowedHash == newHash))
	968	+	then (currentHash != newHash)
	969	+	else false)
	970	+	then true
	971	+	else sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
	972	+	case _ =>
	973	+	sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
	974	+	}
	975	+	}
958	976

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

github/deemru/w8io/786bc32 
162.61 ms ◑