w8 · tx · 98a···e9f

tx · 98aDwqZ1HchCAccKDav7rgPxPUH8txnBAVZ3we7nbe9f

3MzKSdTH2jFbypLsoNfrH7QgkzSbx3EYwCA:  -0.02900000 Waves

2022.08.29 17:15 [2205845] smart account 3MzKSdTH2jFbypLsoNfrH7QgkzSbx3EYwCA > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "98aDwqZ1HchCAccKDav7rgPxPUH8txnBAVZ3we7nbe9f",
    "fee": 2900000,
    "feeAssetId": null,
    "timestamp": 1661782502740,
    "version": 2,
    "chainId": 84,
    "sender": "3MzKSdTH2jFbypLsoNfrH7QgkzSbx3EYwCA",
    "senderPublicKey": "35yd3qw1gxKDxKwGAykHN9fANbXNWwseaUwbWDj24o3x",
    "proofs": [
        "5rce7JBieKJdBRRyNKEgG2LNcW7LZE8zTEGjiq7xLRfz4ja4JtvDkdnA3kvm786xGeTHByeybibp9PBtSVv7VG3X"
    ],
    "script": "base64:BgJ/CAISAwoBCBIDCgEIEgASBAoCAQQSBwoFAQEBAQQSAwoBARIAEgcKBQEBAQgBEgQKAgEBEgMKAQESBAoCCAgSBAoCCAgSBAoCCAESABIDCgEIEgUKAwEBARIECgIIARIECgIBARIECgIICBILCgkIAQECAQIIBAQSBgoECAgBCFEABnNjYWxlOACAwtcvAAxzY2FsZThCaWdJbnQJALYCAQCAwtcvAAdzY2FsZTE4CQC2AgEAgICQu7rWrfANAAh0aG91c2FuZADoBwAKemVyb0JpZ0ludAkAtgIBAAAACW9uZUJpZ0ludAkAtgIBAAEACnNsaXBwYWdlNEQJALYCAQkAZQIFBnNjYWxlOAkAaQIJAGgCBQZzY2FsZTgAAQUGc2NhbGU4AAVBbXVsdAIDMTAwAAVEY29udgIBMQADU0VQAgJfXwAFRU1QVFkCAAAKUG9vbEFjdGl2ZQABAApQb29sUHV0RGlzAAIADlBvb2xNYXRjaGVyRGlzAAMADFBvb2xTaHV0ZG93bgAEAA5pZHhQb29sQWRkcmVzcwABAAlpZHhQb29sU3QAAgAJaWR4TFBBc0lkAAMACWlkeEFtQXNJZAAEAAlpZHhQckFzSWQABQALaWR4QW10QXNEY20ABgANaWR4UHJpY2VBc0RjbQAHAAtpZHhJQW10QXNJZAAIAA1pZHhJUHJpY2VBc0lkAAkAD2lkeEZhY3RTdGFrQ250cgABABBpZHhGYWN0U2xpcHBDbnRyAAcAEWlkeEZhY3RHd3hSZXdDbnRyAAoAEmZlZVBlcm1pbGxlRGVmYXVsdAAAAQJ0MQIHb3JpZ1ZhbA1vcmlnU2NhbGVNdWx0CQC8AgMJALYCAQUHb3JpZ1ZhbAUHc2NhbGUxOAkAtgIBBQ1vcmlnU2NhbGVNdWx0AQJmMQIDdmFsD3Jlc3VsdFNjYWxlTXVsdAkAoAMBCQC8AgMFA3ZhbAkAtgIBBQ9yZXN1bHRTY2FsZU11bHQFB3NjYWxlMTgBAnRzAwNhbXQIcmVzU2NhbGUIY3VyU2NhbGUJAGsDBQNhbXQFCHJlc1NjYWxlBQhjdXJTY2FsZQEDYWJzAQN2YWwDCQC/AgIFCnplcm9CaWdJbnQFA3ZhbAkAvgIBBQN2YWwFA3ZhbAECZmMAAhMlc19fZmFjdG9yeUNvbnRyYWN0AQNtcGsAAhQlc19fbWFuYWdlclB1YmxpY0tleQEEcG1wawACGyVzX19wZW5kaW5nTWFuYWdlclB1YmxpY0tleQECcGwAAhElcyVzX19wcmljZV9fbGFzdAECcGgCAWgBdAkAuQkCCQDMCAICGCVzJXMlZCVkX19wcmljZV9faGlzdG9yeQkAzAgCCQCkAwEFAWgJAMwIAgkApAMBBQF0BQNuaWwFA1NFUAEDcGF1AgJ1YQR0eElkCQCsAgIJAKwCAgkArAICAgslcyVzJXNfX1BfXwUCdWECAl9fBQR0eElkAQNnYXUCAnVhBHR4SWQJAKwCAgkArAICCQCsAgICCyVzJXMlc19fR19fBQJ1YQICX18FBHR4SWQBAmFhAAIPJXNfX2Ftb3VudEFzc2V0AQJwYQACDiVzX19wcmljZUFzc2V0AQNhbXAAAgclc19fYW1wAQNhZGEAAg0lc19fYWRkb25BZGRyAA5rZXlGZWVQZXJtaWxsZQIPJXNfX2ZlZVBlcm1pbGxlAAtmZWVQZXJtaWxsZQkBC3ZhbHVlT3JFbHNlAgkAmggCBQR0aGlzBQ5rZXlGZWVQZXJtaWxsZQUSZmVlUGVybWlsbGVEZWZhdWx0AQRmY2ZnAAIRJXNfX2ZhY3RvcnlDb25maWcBBG10cGsAAhglcyVzX19tYXRjaGVyX19wdWJsaWNLZXkBAnBjAgZpQW10QXMFaVByQXMJAKwCAgkArAICCQCsAgIJAKwCAgIIJWQlZCVzX18FBmlBbXRBcwICX18FBWlQckFzAghfX2NvbmZpZwEDbWJhAQViQVN0cgkArAICAiglcyVzJXNfX21hcHBpbmdzX19iYXNlQXNzZXQyaW50ZXJuYWxJZF9fBQViQVN0cgEDYXBzAAIMJXNfX3NodXRkb3duARxrZXlBbGxvd2VkTHBTdGFibGVTY3JpcHRIYXNoAAIdJXNfX2FsbG93ZWRMcFN0YWJsZVNjcmlwdEhhc2gBA3RvZQMDb3JWBnNlbmRyVgZtYXRjaFYJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIRRmFpbGVkOiBvcmRWYWxpZD0JAKUDAQUDb3JWAgsgc25kclZhbGlkPQkApQMBBQZzZW5kclYCDCBtdGNoclZhbGlkPQkApQMBBQZtYXRjaFYBA3N0cgEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAZ2YWxTdHIFByRtYXRjaDAFBnZhbFN0cgkAAgECE2ZhaWwgY2FzdCB0byBTdHJpbmcBBHN0cmYCBGFkZHIDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEYWRkcgUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFBGFkZHIJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIMIG5vdCBkZWZpbmVkBQNuaWwCAAEEaW50ZgIEYWRkcgNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQRhZGRyBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUEYWRkcgkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAgwgbm90IGRlZmluZWQFA25pbAIAAANmY2EJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQRzdHJmAgUEdGhpcwkBAmZjAAABQQkBBHN0cmYCBQR0aGlzCQEDYW1wAAEDaWdzAAkBC3ZhbHVlT3JFbHNlAgkAmwgCBQNmY2EJAQNhcHMABwECbXAACQDZBAEJAQRzdHJmAgUDZmNhCQEEbXRwawAADm1hdGNoZXJBZGRyZXNzCQCnCAEJAQJtcAABA2dwYwAEBWFtdEFzCQEEc3RyZgIFBHRoaXMJAQJhYQAEB3ByaWNlQXMJAQRzdHJmAgUEdGhpcwkBAnBhAAQIaVByaWNlQXMJAQRpbnRmAgUDZmNhCQEDbWJhAQUHcHJpY2VBcwQGaUFtdEFzCQEEaW50ZgIFA2ZjYQkBA21iYQEFBWFtdEFzCQC1CQIJAQRzdHJmAgUDZmNhCQECcGMCCQCkAwEFBmlBbXRBcwkApAMBBQhpUHJpY2VBcwUDU0VQAQNnZmMACQC1CQIJAQRzdHJmAgUDZmNhCQEEZmNmZwAFA1NFUAERZGF0YVB1dEFjdGlvbkluZm8KDWluQW10QXNzZXRBbXQPaW5QcmljZUFzc2V0QW10CG91dExwQW10BXByaWNlCnNsaXBCeVVzZXIMc2xpcHBhZ2VSZWFsCHR4SGVpZ2h0C3R4VGltZXN0YW1wDHNsaXBhZ2VBbUFtdAxzbGlwYWdlUHJBbXQJALkJAgkAzAgCAhQlZCVkJWQlZCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFDWluQW10QXNzZXRBbXQJAMwIAgkApAMBBQ9pblByaWNlQXNzZXRBbXQJAMwIAgkApAMBBQhvdXRMcEFtdAkAzAgCCQCkAwEFBXByaWNlCQDMCAIJAKQDAQUKc2xpcEJ5VXNlcgkAzAgCCQCkAwEFDHNsaXBwYWdlUmVhbAkAzAgCCQCkAwEFCHR4SGVpZ2h0CQDMCAIJAKQDAQULdHhUaW1lc3RhbXAJAMwIAgkApAMBBQxzbGlwYWdlQW1BbXQJAMwIAgkApAMBBQxzbGlwYWdlUHJBbXQFA25pbAUDU0VQARFkYXRhR2V0QWN0aW9uSW5mbwYOb3V0QW10QXNzZXRBbXQQb3V0UHJpY2VBc3NldEFtdAdpbkxwQW10BXByaWNlCHR4SGVpZ2h0C3R4VGltZXN0YW1wCQC5CQIJAMwIAgIMJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUOb3V0QW10QXNzZXRBbXQJAMwIAgkApAMBBRBvdXRQcmljZUFzc2V0QW10CQDMCAIJAKQDAQUHaW5McEFtdAkAzAgCCQCkAwEFBXByaWNlCQDMCAIJAKQDAQUIdHhIZWlnaHQJAMwIAgkApAMBBQt0eFRpbWVzdGFtcAUDbmlsBQNTRVABDWdldEFjY0JhbGFuY2UBB2Fzc2V0SWQDCQAAAgUHYXNzZXRJZAIFV0FWRVMICQDvBwEFBHRoaXMJYXZhaWxhYmxlCQDwBwIFBHRoaXMJANkEAQUHYXNzZXRJZAEEY3BiaQIIcHJBbXRYMTgIYW1BbXRYMTgJALwCAwUIcHJBbXRYMTgFB3NjYWxlMTgFCGFtQW10WDE4AQN2YWQDAkExAkEyCHNsaXBwYWdlBARkaWZmCQC8AgMJALgCAgUCQTEFAkEyBQxzY2FsZThCaWdJbnQFAkEyBARwYXNzCQC/AgIJALgCAgUIc2xpcHBhZ2UJAQNhYnMBBQRkaWZmBQp6ZXJvQmlnSW50AwkBASEBBQRwYXNzCQACAQkArAICAgpCaWcgc2xwZzogCQCmAwEFBGRpZmYJAJQKAgUEcGFzcwkAmQMBCQDMCAIFAkExCQDMCAIFAkEyBQNuaWwBAnZkAwJEMQJEMARzbHBnBARkaWZmCQC8AgMFAkQwBQxzY2FsZThCaWdJbnQFAkQxBARmYWlsCQC/AgIFBHNscGcFBGRpZmYDAwUEZmFpbAYJAL8CAgUCRDAFAkQxCQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkApgMBBQJEMAIBIAkApgMBBQJEMQIBIAkApgMBBQRkaWZmAgEgCQCmAwEFBHNscGcFBGZhaWwBA3BjcAQKYW1Bc3NldERjbQpwckFzc2V0RGNtBWFtQW10BXByQW10BAthbXRBc0FtdFgxOAkBAnQxAgUFYW1BbXQFCmFtQXNzZXREY20ECnByQXNBbXRYMTgJAQJ0MQIFBXByQW10BQpwckFzc2V0RGNtCQEEY3BiaQIFCnByQXNBbXRYMTgFC2FtdEFzQW10WDE4AQpjYWxjUHJpY2VzAwVhbUFtdAVwckFtdAVscEFtdAQDY2ZnCQEDZ3BjAAQIYW10QXNEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFC2lkeEFtdEFzRGNtBAdwckFzRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQ1pZHhQcmljZUFzRGNtBAhwcmljZVgxOAkBA3BjcAQFCGFtdEFzRGNtBQdwckFzRGNtBQVhbUFtdAUFcHJBbXQECGFtQW10WDE4CQECdDECBQVhbUFtdAUIYW10QXNEY20ECHByQW10WDE4CQECdDECBQVwckFtdAUHcHJBc0RjbQQIbHBBbXRYMTgJAQJ0MQIFBWxwQW10BQZzY2FsZTgEDWxwUHJJbkFtQXNYMTgJAQRjcGJpAgUIYW1BbXRYMTgFCGxwQW10WDE4BA1scFBySW5QckFzWDE4CQEEY3BiaQIFCHByQW10WDE4BQhscEFtdFgxOAkAzAgCBQhwcmljZVgxOAkAzAgCBQ1scFBySW5BbUFzWDE4CQDMCAIFDWxwUHJJblByQXNYMTgFA25pbAEPY2FsY3VsYXRlUHJpY2VzAwVhbUFtdAVwckFtdAVscEFtdAQBcAkBCmNhbGNQcmljZXMDBQVhbUFtdAUFcHJBbXQFBWxwQW10CQDMCAIJAQJmMQIJAJEDAgUBcAAABQZzY2FsZTgJAMwIAgkBAmYxAgkAkQMCBQFwAAEFBnNjYWxlOAkAzAgCCQECZjECCQCRAwIFAXAAAgUGc2NhbGU4BQNuaWwBA2VnbwQGdHhJZDU4CnBtdEFzc2V0SWQIcG10THBBbXQLdXNlckFkZHJlc3MEA2NmZwkBA2dwYwAEBGxwSWQJAJEDAgUDY2ZnBQlpZHhMUEFzSWQEBGFtSWQJAJEDAgUDY2ZnBQlpZHhBbUFzSWQEBHBySWQJAJEDAgUDY2ZnBQlpZHhQckFzSWQEBWFtRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQtpZHhBbXRBc0RjbQQFcHJEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFDWlkeFByaWNlQXNEY20EA3N0cwkAkQMCBQNjZmcFCWlkeFBvb2xTdAQHbHBFbWlzcwgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBCQDZBAEFBGxwSWQCC1dyb25nIExQIGlkCHF1YW50aXR5AwkBAiE9AgUEbHBJZAUKcG10QXNzZXRJZAkAAgECD1dyb25nIHBtdCBhc3NldAQJYW1CYWxhbmNlCQENZ2V0QWNjQmFsYW5jZQEFBGFtSWQEDGFtQmFsYW5jZVgxOAkBAnQxAgUJYW1CYWxhbmNlBQVhbURjbQQJcHJCYWxhbmNlCQENZ2V0QWNjQmFsYW5jZQEFBHBySWQEDHByQmFsYW5jZVgxOAkBAnQxAgUJcHJCYWxhbmNlBQVwckRjbQQLY3VyUHJpY2VYMTgJAQRjcGJpAgUMcHJCYWxhbmNlWDE4BQxhbUJhbGFuY2VYMTgECGN1clByaWNlCQECZjECBQtjdXJQcmljZVgxOAUGc2NhbGU4BAtwbXRMcEFtdFgxOAkBAnQxAgUIcG10THBBbXQFBnNjYWxlOAQKbHBFbWlzc1gxOAkBAnQxAgUHbHBFbWlzcwUGc2NhbGU4BAtvdXRBbUFtdFgxOAkAvAIDBQxhbUJhbGFuY2VYMTgFC3BtdExwQW10WDE4BQpscEVtaXNzWDE4BAtvdXRQckFtdFgxOAkAvAIDBQxwckJhbGFuY2VYMTgFC3BtdExwQW10WDE4BQpscEVtaXNzWDE4BAhvdXRBbUFtdAkBAmYxAgULb3V0QW1BbXRYMTgFBWFtRGNtBAhvdXRQckFtdAkBAmYxAgULb3V0UHJBbXRYMTgFBXByRGNtBAVzdGF0ZQMJAAACBQZ0eElkNTgCAAUDbmlsCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3VzZXJBZGRyZXNzBQhvdXRBbUFtdAMJAAACBQRhbUlkAgVXQVZFUwUEdW5pdAkA2QQBBQRhbUlkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3VzZXJBZGRyZXNzBQhvdXRQckFtdAMJAAACBQRwcklkAgVXQVZFUwUEdW5pdAkA2QQBBQRwcklkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQNnYXUCCQClCAEFC3VzZXJBZGRyZXNzBQZ0eElkNTgJARFkYXRhR2V0QWN0aW9uSW5mbwYFCG91dEFtQW10BQhvdXRQckFtdAUIcG10THBBbXQFCGN1clByaWNlBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECcGwABQhjdXJQcmljZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAnBoAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUIY3VyUHJpY2UFA25pbAkAnAoKBQhvdXRBbUFtdAUIb3V0UHJBbXQFBGFtSWQFBHBySWQFCWFtQmFsYW5jZQUJcHJCYWxhbmNlBQdscEVtaXNzBQtjdXJQcmljZVgxOAUDc3RzBQVzdGF0ZQEDZXBvDAZ0eElkNTgIc2xpcHBhZ2UHaW5BbUFtdAZpbkFtSWQHaW5QckFtdAZpblBySWQLdXNlckFkZHJlc3MGaXNFdmFsBmVtaXRMcAppc09uZUFzc2V0BnBtdEFtdAVwbXRJZAQDY2ZnCQEDZ3BjAAQEbHBJZAkA2QQBCQCRAwIFA2NmZwUJaWR4TFBBc0lkBAdhbUlkU3RyCQCRAwIFA2NmZwUJaWR4QW1Bc0lkBAdwcklkU3RyCQCRAwIFA2NmZwUJaWR4UHJBc0lkBAlpbkFtSWRTdHIJAJEDAgUDY2ZnBQtpZHhJQW10QXNJZAQJaW5QcklkU3RyCQCRAwIFA2NmZwUNaWR4SVByaWNlQXNJZAQGYW10RGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQtpZHhBbXRBc0RjbQQIcHJpY2VEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFDWlkeFByaWNlQXNEY20EA3N0cwkAkQMCBQNjZmcFCWlkeFBvb2xTdAQEbHBFbQgJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBBQRscElkAghXciBscCBhcwhxdWFudGl0eQQJYW1CYWxhbmNlAwUGaXNFdmFsCQENZ2V0QWNjQmFsYW5jZQEFB2FtSWRTdHIDAwUKaXNPbmVBc3NldAkAAAIFBXBtdElkBQdhbUlkU3RyBwkAZQIJAQ1nZXRBY2NCYWxhbmNlAQUHYW1JZFN0cgUGcG10QW10AwUKaXNPbmVBc3NldAkBDWdldEFjY0JhbGFuY2UBBQdhbUlkU3RyCQBlAgkBDWdldEFjY0JhbGFuY2UBBQdhbUlkU3RyBQdpbkFtQW10BAlwckJhbGFuY2UDBQZpc0V2YWwJAQ1nZXRBY2NCYWxhbmNlAQUHcHJJZFN0cgMDBQppc09uZUFzc2V0CQAAAgUFcG10SWQFB3BySWRTdHIHCQBlAgkBDWdldEFjY0JhbGFuY2UBBQdwcklkU3RyBQZwbXRBbXQDBQppc09uZUFzc2V0CQENZ2V0QWNjQmFsYW5jZQEFB3BySWRTdHIJAGUCCQENZ2V0QWNjQmFsYW5jZQEFB3BySWRTdHIFB2luUHJBbXQED2luQW1Bc3NldEFtdFgxOAkBAnQxAgUHaW5BbUFtdAUGYW10RGNtBA9pblByQXNzZXRBbXRYMTgJAQJ0MQIFB2luUHJBbXQFCHByaWNlRGNtBAx1c2VyUHJpY2VYMTgJAQRjcGJpAgUPaW5QckFzc2V0QW10WDE4BQ9pbkFtQXNzZXRBbXRYMTgEDGFtQmFsYW5jZVgxOAkBAnQxAgUJYW1CYWxhbmNlBQZhbXREY20EDHByQmFsYW5jZVgxOAkBAnQxAgUJcHJCYWxhbmNlBQhwcmljZURjbQQBcgMJAAACBQRscEVtAAAEC2N1clByaWNlWDE4BQp6ZXJvQmlnSW50BAtzbGlwcGFnZVgxOAUKemVyb0JpZ0ludAQIbHBBbXRYMTgJAHYGCQC5AgIFD2luQW1Bc3NldEFtdFgxOAUPaW5QckFzc2V0QW10WDE4AAAJALYCAQAFAAEAAAUERE9XTgkAlwoFCQECZjECBQhscEFtdFgxOAUGc2NhbGU4CQECZjECBQ9pbkFtQXNzZXRBbXRYMTgFBmFtdERjbQkBAmYxAgUPaW5QckFzc2V0QW10WDE4BQhwcmljZURjbQkBBGNwYmkCCQC3AgIFDHByQmFsYW5jZVgxOAUPaW5QckFzc2V0QW10WDE4CQC3AgIFDGFtQmFsYW5jZVgxOAUPaW5BbUFzc2V0QW10WDE4BQtzbGlwcGFnZVgxOAQLY3VyUHJpY2VYMTgJAQRjcGJpAgUMcHJCYWxhbmNlWDE4BQxhbUJhbGFuY2VYMTgED3NsaXBwYWdlUmVhbFgxOAkAvAIDCQEDYWJzAQkAuAICBQtjdXJQcmljZVgxOAUMdXNlclByaWNlWDE4BQdzY2FsZTE4BQtjdXJQcmljZVgxOAQLc2xpcHBhZ2VYMTgJAQJ0MQIFCHNsaXBwYWdlBQZzY2FsZTgDAwkBAiE9AgULY3VyUHJpY2VYMTgFCnplcm9CaWdJbnQJAL8CAgUPc2xpcHBhZ2VSZWFsWDE4BQtzbGlwcGFnZVgxOAcJAAIBCQCsAgIJAKwCAgkArAICAg9QcmljZSBzbGlwcGFnZSAJAKYDAQUPc2xpcHBhZ2VSZWFsWDE4AgMgPiAJAKYDAQULc2xpcHBhZ2VYMTgEDWxwRW1pc3Npb25YMTgJAQJ0MQIFBGxwRW0FBnNjYWxlOAQKcHJWaWFBbVgxOAkAvAIDBQ9pbkFtQXNzZXRBbXRYMTgFC2N1clByaWNlWDE4BQdzY2FsZTE4BAphbVZpYVByWDE4CQC8AgMFD2luUHJBc3NldEFtdFgxOAUHc2NhbGUxOAULY3VyUHJpY2VYMTgEDGV4cGVjdGVkQW10cwMJAL8CAgUKcHJWaWFBbVgxOAUPaW5QckFzc2V0QW10WDE4CQCUCgIFCmFtVmlhUHJYMTgFD2luUHJBc3NldEFtdFgxOAkAlAoCBQ9pbkFtQXNzZXRBbXRYMTgFCnByVmlhQW1YMTgEEWV4cEFtdEFzc2V0QW10WDE4CAUMZXhwZWN0ZWRBbXRzAl8xBBNleHBQcmljZUFzc2V0QW10WDE4CAUMZXhwZWN0ZWRBbXRzAl8yBAhscEFtdFgxOAkAvAIDBQ1scEVtaXNzaW9uWDE4BRNleHBQcmljZUFzc2V0QW10WDE4BQxwckJhbGFuY2VYMTgJAJcKBQkBAmYxAgUIbHBBbXRYMTgFBnNjYWxlOAkBAmYxAgURZXhwQW10QXNzZXRBbXRYMTgFBmFtdERjbQkBAmYxAgUTZXhwUHJpY2VBc3NldEFtdFgxOAUIcHJpY2VEY20FC2N1clByaWNlWDE4BQtzbGlwcGFnZVgxOAQJY2FsY0xwQW10CAUBcgJfMQQOY2FsY0FtQXNzZXRQbXQIBQFyAl8yBA5jYWxjUHJBc3NldFBtdAgFAXICXzMECGN1clByaWNlCQECZjECCAUBcgJfNAUGc2NhbGU4BAxzbGlwcGFnZUNhbGMJAQJmMQIIBQFyAl81BQZzY2FsZTgDCQBnAgAABQljYWxjTHBBbXQJAAIBAgdMUCA8PSAwBAllbWl0THBBbXQDCQEBIQEFBmVtaXRMcAAABQljYWxjTHBBbXQEBmFtRGlmZgkAZQIFB2luQW1BbXQFDmNhbGNBbUFzc2V0UG10BAZwckRpZmYJAGUCBQdpblByQW10BQ5jYWxjUHJBc3NldFBtdAQNJHQwMTU1ODcxNTkzMgMDBQppc09uZUFzc2V0CQAAAgUFcG10SWQFB2FtSWRTdHIHCQCUCgIFBnBtdEFtdAAAAwMFCmlzT25lQXNzZXQJAAACBQVwbXRJZAUHcHJJZFN0cgcJAJQKAgAABQZwbXRBbXQJAJQKAgUOY2FsY0FtQXNzZXRQbXQFDmNhbGNQckFzc2V0UG10BAp3cml0ZUFtQW10CAUNJHQwMTU1ODcxNTkzMgJfMQQKd3JpdGVQckFtdAgFDSR0MDE1NTg3MTU5MzICXzIEC2NvbW1vblN0YXRlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECcGwABQhjdXJQcmljZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAnBoAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUIY3VyUHJpY2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkBA3BhdQIFC3VzZXJBZGRyZXNzBQZ0eElkNTgJARFkYXRhUHV0QWN0aW9uSW5mbwoFCndyaXRlQW1BbXQFCndyaXRlUHJBbXQFCWVtaXRMcEFtdAUIY3VyUHJpY2UFCHNsaXBwYWdlBQxzbGlwcGFnZUNhbGMFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFBmFtRGlmZgUGcHJEaWZmBQNuaWwJAJ8KDQUJY2FsY0xwQW10BQllbWl0THBBbXQFCGN1clByaWNlBQlhbUJhbGFuY2UFCXByQmFsYW5jZQUEbHBFbQUEbHBJZAUDc3RzBQtjb21tb25TdGF0ZQUGYW1EaWZmBQZwckRpZmYFBmluQW1JZAUGaW5QcklkAQNtb2EBBW9yZGVyBANjZmcJAQNncGMABAdhbXRBc0lkCQCRAwIFA2NmZwUJaWR4QW1Bc0lkBAZwckFzSWQJAJEDAgUDY2ZnBQlpZHhQckFzSWQEA3N0cwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwUJaWR4UG9vbFN0BAhhbXRBc0RjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwULaWR4QW10QXNEY20EB3ByQXNEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFDWlkeFByaWNlQXNEY20ED2FjY0FtdEFzQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQdhbXRBc0lkBA5hY2NQckFzQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQZwckFzSWQEC2N1clByaWNlWDE4AwkAAAIIBQVvcmRlcglvcmRlclR5cGUFA0J1eQkBA3BjcAQFCGFtdEFzRGNtBQdwckFzRGNtCQBkAgUPYWNjQW10QXNCYWxhbmNlCAUFb3JkZXIGYW1vdW50BQ5hY2NQckFzQmFsYW5jZQkBA3BjcAQFCGFtdEFzRGNtBQdwckFzRGNtCQBlAgUPYWNjQW10QXNCYWxhbmNlCAUFb3JkZXIGYW1vdW50BQ5hY2NQckFzQmFsYW5jZQQIY3VyUHJpY2UJAQJmMQIFC2N1clByaWNlWDE4BQZzY2FsZTgDAwMJAQNpZ3MABgkAAAIFA3N0cwUOUG9vbE1hdGNoZXJEaXMGCQAAAgUDc3RzBQxQb29sU2h1dGRvd24JAAIBAg1BZG1pbiBibG9ja2VkBApvckFtdEFzc2V0CAgFBW9yZGVyCWFzc2V0UGFpcgthbW91bnRBc3NldAQKb3JBbXRBc1N0cgMJAAACBQpvckFtdEFzc2V0BQR1bml0AgVXQVZFUwkA2AQBCQEFdmFsdWUBBQpvckFtdEFzc2V0BAlvclByQXNzZXQICAUFb3JkZXIJYXNzZXRQYWlyCnByaWNlQXNzZXQECW9yUHJBc1N0cgMJAAACBQlvclByQXNzZXQFBHVuaXQCBVdBVkVTCQDYBAEJAQV2YWx1ZQEFCW9yUHJBc3NldAMDCQECIT0CBQpvckFtdEFzU3RyBQdhbXRBc0lkBgkBAiE9AgUJb3JQckFzU3RyBQZwckFzSWQJAAIBAglXciBhc3NldHMECm9yZGVyUHJpY2UIBQVvcmRlcgVwcmljZQQIcHJpY2VEY20JAGsDBQZzY2FsZTgFB3ByQXNEY20FCGFtdEFzRGNtBA5jYXN0T3JkZXJQcmljZQkBAnRzAwUKb3JkZXJQcmljZQUGc2NhbGU4BQhwcmljZURjbQQRaXNPcmRlclByaWNlVmFsaWQDCQAAAggFBW9yZGVyCW9yZGVyVHlwZQUDQnV5CQBnAgUIY3VyUHJpY2UFDmNhc3RPcmRlclByaWNlCQBnAgUOY2FzdE9yZGVyUHJpY2UFCGN1clByaWNlBgECY2cBAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAgoxIHBtbnQgZXhwBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQKcG10QXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAZwbXRBbXQIBQNwbXQGYW1vdW50BAFyCQEDZWdvBAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQDYBAEFCnBtdEFzc2V0SWQFBnBtdEFtdAgFAWkGY2FsbGVyBAhvdXRBbUFtdAgFAXICXzEECG91dFByQW10CAUBcgJfMgQDc3RzCQENcGFyc2VJbnRWYWx1ZQEIBQFyAl85BAVzdGF0ZQgFAXIDXzEwAwMJAQNpZ3MABgkAAAIFA3N0cwUMUG9vbFNodXRkb3duCQACAQkArAICAg9BZG1pbiBibG9ja2VkOiAJAKQDAQUDc3RzCQCXCgUFCG91dEFtQW10BQhvdXRQckFtdAUGcG10QW10BQpwbXRBc3NldElkBQVzdGF0ZQECY3AJBmNhbGxlcgR0eElkB2FtQXNQbXQHcHJBc1BtdAhzbGlwcGFnZQZlbWl0THAKaXNPbmVBc3NldAZwbXRBbXQFcG10SWQEAXIJAQNlcG8MBQR0eElkBQhzbGlwcGFnZQgJAQV2YWx1ZQEFB2FtQXNQbXQGYW1vdW50CAkBBXZhbHVlAQUHYW1Bc1BtdAdhc3NldElkCAkBBXZhbHVlAQUHcHJBc1BtdAZhbW91bnQICQEFdmFsdWUBBQdwckFzUG10B2Fzc2V0SWQFBmNhbGxlcgcFBmVtaXRMcAUKaXNPbmVBc3NldAUGcG10QW10BQVwbXRJZAQDc3RzCQENcGFyc2VJbnRWYWx1ZQEIBQFyAl84AwMDCQEDaWdzAAYJAAACBQNzdHMFClBvb2xQdXREaXMGCQAAAgUDc3RzBQxQb29sU2h1dGRvd24JAAIBCQCsAgICCEJsb2NrZWQ6CQCkAwEFA3N0cwUBcgEHdGFrZUZlZQEGYW1vdW50BANmZWUJAGsDBQZhbW91bnQFC2ZlZVBlcm1pbGxlBQh0aG91c2FuZAkAlAoCCQBlAgUGYW1vdW50BQNmZWUFA2ZlZQEBbQAEByRtYXRjaDAJAKIIAQkBA21wawADCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQDZBAEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAQJwbQAEByRtYXRjaDAJAKIIAQkBBHBtcGsAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkA2QQBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgACcGQJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAECbW0BAWkEByRtYXRjaDAJAQFtAAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJwawUHJG1hdGNoMAMJAAACCAUBaQ9jYWxsZXJQdWJsaWNLZXkFAnBrBgUCcGQDCQABAgUHJG1hdGNoMAIEVW5pdAMJAAACCAUBaQZjYWxsZXIFBHRoaXMGBQJwZAkAAgECC01hdGNoIGVycm9yFQFpAQtjb25zdHJ1Y3RvcgECZmMEAWMJAQJtbQEFAWkDCQAAAgUBYwUBYwkAzAgCCQELU3RyaW5nRW50cnkCCQECZmMABQJmYwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCnNldE1hbmFnZXIBF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5BAFjCQECbW0BBQFpAwkAAAIFAWMFAWMEAmNtCQDZBAEFF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5AwkAAAIFAmNtBQJjbQkAzAgCCQELU3RyaW5nRW50cnkCCQEEcG1wawAFF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEOY29uZmlybU1hbmFnZXIABAFwCQECcG0ABANocG0DCQEJaXNEZWZpbmVkAQUBcAYJAAIBAhJObyBwZW5kaW5nIG1hbmFnZXIDCQAAAgUDaHBtBQNocG0EA2NwbQMJAAACCAUBaQ9jYWxsZXJQdWJsaWNLZXkJAQV2YWx1ZQEFAXAGCQACAQIbWW91IGFyZSBub3QgcGVuZGluZyBtYW5hZ2VyAwkAAAIFA2NwbQUDY3BtCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQNtcGsACQDYBAEJAQV2YWx1ZQEFAXAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBBHBtcGsABQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEDcHV0AgRzbGlwCWF1dG9TdGFrZQQHZmFjdENmZwkBA2dmYwAEC3N0YWtpbmdDbnRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQdmYWN0Q2ZnBQ9pZHhGYWN0U3Rha0NudHICCldyIHN0IGFkZHIECHNsaXBDbnRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQdmYWN0Q2ZnBRBpZHhGYWN0U2xpcHBDbnRyAgpXciBzbCBhZGRyAwkAZgIAAAUEc2xpcAkAAgECDldyb25nIHNsaXBwYWdlAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwACCQACAQIMMiBwbW50cyBleHBkBAFlCQECY3AJCQClCAEIBQFpBmNhbGxlcgkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQEPQXR0YWNoZWRQYXltZW50AggJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAkAkQMCCAUBaQhwYXltZW50cwABBQRzbGlwBgcAAAIABAllbWl0THBBbXQIBQFlAl8yBAlscEFzc2V0SWQIBQFlAl83BAVzdGF0ZQgFAWUCXzkEBmFtRGlmZggFAWUDXzEwBAZwckRpZmYIBQFlA18xMQQEYW1JZAgFAWUDXzEyBARwcklkCAUBZQNfMTMEAXIJAPwHBAUDZmNhAgRlbWl0CQDMCAIFCWVtaXRMcEFtdAUDbmlsBQNuaWwDCQAAAgUBcgUBcgQCZWwEByRtYXRjaDAFAXIDCQABAgUHJG1hdGNoMAIHQWRkcmVzcwQGbGVnYWN5BQckbWF0Y2gwCQD8BwQFBmxlZ2FjeQIEZW1pdAkAzAgCBQllbWl0THBBbXQFA25pbAUDbmlsBQR1bml0AwkAAAIFAmVsBQJlbAQCc2EDCQBmAgUGYW1EaWZmAAAJAPwHBAUIc2xpcENudHICA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQRhbUlkBQZhbURpZmYFA25pbAUDbmlsAwkAAAIFAnNhBQJzYQQCc3ADCQBmAgUGcHJEaWZmAAAJAPwHBAUIc2xpcENudHICA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQRwcklkBQZwckRpZmYFA25pbAUDbmlsAwkAAAIFAnNwBQJzcAQIbHBUcm5zZnIDBQlhdXRvU3Rha2UEAnNzCQD8BwQFC3N0YWtpbmdDbnRyAgVzdGFrZQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQlscEFzc2V0SWQFCWVtaXRMcEFtdAUDbmlsAwkAAAIFAnNzBQJzcwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUJZW1pdExwQW10BQlscEFzc2V0SWQFA25pbAkAzggCBQVzdGF0ZQUIbHBUcm5zZnIJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEJcHV0T25lVGtuBQthbUFzc2V0UGFydAtwckFzc2V0UGFydAVvdXRMcAhzbGlwcGFnZQlhdXRvU3Rha2UEA2NmZwkBA2dmYwAEC3N0YWtpbmdDbnRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQNjZmcFD2lkeEZhY3RTdGFrQ250cgIKV3Igc3QgYWRkcgQIc2xpcENudHIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFA2NmZwUQaWR4RmFjdFNsaXBwQ250cgIKV3Igc2wgYWRkcgQHZ3d4Q250cgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUDY2ZnBRFpZHhGYWN0R3d4UmV3Q250cgILV3IgZ3d4IGFkZHIEB3Bvb2xDZmcJAQNncGMABARhbUlkCQCRAwIFB3Bvb2xDZmcFCWlkeEFtQXNJZAQEcHJJZAkAkQMCBQdwb29sQ2ZnBQlpZHhQckFzSWQEBWFtRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcG9vbENmZwULaWR4QW10QXNEY20EBXByRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUHcG9vbENmZwUNaWR4UHJpY2VBc0RjbQQFYWRkb24JAQt2YWx1ZU9yRWxzZQIJAJ0IAgUEdGhpcwkBA2FkYQACAAQLdXNlckFkZHJlc3MDCQAAAgUFYWRkb24JAKUIAQgFAWkGY2FsbGVyCAUBaQxvcmlnaW5DYWxsZXIIBQFpBmNhbGxlcgMDAwMJAGcCAAAFCHNsaXBwYWdlBgkAZwIAAAULYW1Bc3NldFBhcnQGCQBnAgAABQtwckFzc2V0UGFydAYJAGcCAAAFBW91dExwCQACAQIMV3JvbmcgcGFyYW1zAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQILMSBwbW50IGV4cGQEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABApwbXRBc3NldElkCQDYBAEJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAQQcGF5bWVudEFtb3VudFJhdwgFA3BtdAZhbW91bnQEDSR0MDI0NTQ5MjQ2MDEJAQd0YWtlRmVlAQUQcGF5bWVudEFtb3VudFJhdwQGcG10QW10CAUNJHQwMjQ1NDkyNDYwMQJfMQQJZmVlQW1vdW50CAUNJHQwMjQ1NDkyNDYwMQJfMgMJAGYCAICt4gQFEHBheW1lbnRBbW91bnRSYXcJAAIBAg1Xcm9uZyBwbXQgYW10BAlhbUJhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUEYW1JZAQJcHJCYWxhbmNlCQENZ2V0QWNjQmFsYW5jZQEFBHBySWQEDSR0MDI0NzYxMjUzMzcDCQAAAgUKcG10QXNzZXRJZAUEYW1JZAMDCQBmAgUGcG10QW10BQlhbUJhbGFuY2UGCQBmAgULYW1Bc3NldFBhcnQFBnBtdEFtdAkAAgECFmludmFsaWQgcGF5bWVudCBhbW91bnQJAJgKBgkAZQIFCWFtQmFsYW5jZQUGcG10QW10BQlwckJhbGFuY2UJAGUCBQZwbXRBbXQFC2FtQXNzZXRQYXJ0BQtwckFzc2V0UGFydAAAAAADCQAAAgUKcG10QXNzZXRJZAUEcHJJZAMDCQBmAgUGcG10QW10BQlwckJhbGFuY2UGCQBmAgULcHJBc3NldFBhcnQFBnBtdEFtdAkAAgECFmludmFsaWQgcGF5bWVudCBhbW91bnQJAJgKBgUJYW1CYWxhbmNlCQBlAgUJcHJCYWxhbmNlBQZwbXRBbXQAAAAACQBlAgUGcG10QW10BQtwckFzc2V0UGFydAULYW1Bc3NldFBhcnQJAAIBAhB3cm9uZyBwbXRBc3NldElkBAxhbUJhbGFuY2VOb3cIBQ0kdDAyNDc2MTI1MzM3Al8xBAxwckJhbGFuY2VOb3cIBQ0kdDAyNDc2MTI1MzM3Al8yBAx2aXJ0U3dhcEluQW0IBQ0kdDAyNDc2MTI1MzM3Al8zBA12aXJ0U3dhcE91dFByCAUNJHQwMjQ3NjEyNTMzNwJfNAQMdmlydFN3YXBJblByCAUNJHQwMjQ3NjEyNTMzNwJfNQQNdmlydFN3YXBPdXRBbQgFDSR0MDI0NzYxMjUzMzcCXzYEAkQwCQD8BwQFB2d3eENudHICBWNhbGNECQDMCAIJAKQDAQUMYW1CYWxhbmNlTm93CQDMCAIJAKQDAQUMcHJCYWxhbmNlTm93CQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgUFRGNvbnYFA25pbAUDbmlsBAJEMQkA/AcEBQdnd3hDbnRyAgVjYWxjRAkAzAgCCQCmAwEJALYCAQkAZQIJAGQCBQxhbUJhbGFuY2VOb3cFDHZpcnRTd2FwSW5BbQUNdmlydFN3YXBPdXRBbQkAzAgCCQCmAwEJALYCAQkAZQIJAGQCBQxwckJhbGFuY2VOb3cFDHZpcnRTd2FwSW5QcgUNdmlydFN3YXBPdXRQcgkAzAgCBQFBCQDMCAIFBUFtdWx0CQDMCAIFBURjb252BQNuaWwFA25pbAQGRDB2c0QxCQECdmQDCQCnAwEJAQNzdHIBBQJEMQkApwMBCQEDc3RyAQUCRDAFCnNsaXBwYWdlNEQDCQAAAgUGRDB2c0QxBQZEMHZzRDEEBmVzdFB1dAkBAmNwCQkApQgBCAUBaQZjYWxsZXIJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUEYW1JZAULYW1Bc3NldFBhcnQJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFBHBySWQFC3ByQXNzZXRQYXJ0BQhzbGlwcGFnZQYGBQZwbXRBbXQFCnBtdEFzc2V0SWQEB2VzdGltTFAIBQZlc3RQdXQCXzIECWxwQXNzZXRJZAgFBmVzdFB1dAJfNwQFc3RhdGUIBQZlc3RQdXQCXzkEBmFtRGlmZggFBmVzdFB1dANfMTAEBnByRGlmZggFBmVzdFB1dANfMTEECWxwQ2FsY1JlcwkBA3ZhZAMJALYCAQUHZXN0aW1MUAkAtgIBBQVvdXRMcAkAtgIBBQhzbGlwcGFnZQQJZW1pdExwQW10CQCgAwEIBQlscENhbGNSZXMCXzIEAWUJAPwHBAUDZmNhAgRlbWl0CQDMCAIFCWVtaXRMcEFtdAUDbmlsBQNuaWwDCQAAAgUBZQUBZQQCZWwEByRtYXRjaDAFAWUDCQABAgUHJG1hdGNoMAIHQWRkcmVzcwQGbGVnYWN5BQckbWF0Y2gwCQD8BwQFBmxlZ2FjeQIEZW1pdAkAzAgCBQllbWl0THBBbXQFA25pbAUDbmlsBQR1bml0AwkAAAIFAmVsBQJlbAQCc2EDCQBmAgUGYW1EaWZmAAAJAPwHBAUIc2xpcENudHICA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFBGFtSWQFBmFtRGlmZgUDbmlsBQNuaWwDCQAAAgUCc2EFAnNhBAJzcAMJAGYCBQZwckRpZmYAAAkA/AcEBQhzbGlwQ250cgIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUEcHJJZAUGcHJEaWZmBQNuaWwFA25pbAMJAAACBQJzcAUCc3AECGxwVHJuc2ZyAwUJYXV0b1N0YWtlBAJzcwkA/AcEBQtzdGFraW5nQ250cgIFc3Rha2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUJbHBBc3NldElkBQllbWl0THBBbXQFA25pbAMJAAACBQJzcwUCc3MFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFCWVtaXRMcEFtdAUJbHBBc3NldElkBQNuaWwEEHNlbmRGZWVUb01hdGNoZXIDCQBmAgUJZmVlQW1vdW50AAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUObWF0Y2hlckFkZHJlc3MFCWZlZUFtb3VudAkA2QQBBQpwbXRBc3NldElkBQNuaWwFA25pbAkAzggCCQDOCAIFBXN0YXRlBQhscFRybnNmcgUQc2VuZEZlZVRvTWF0Y2hlcgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQpwdXRGb3JGcmVlAQdtYXhTbHBnAwkAZgIAAAUHbWF4U2xwZwkAAgECCldyb25nIHNscGcDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAIJAAIBAgwyIHBtbnRzIGV4cGQEBmVzdFB1dAkBAmNwCQkApQgBCAUBaQZjYWxsZXIJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAkBD0F0dGFjaGVkUGF5bWVudAIICQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAgJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQJAJEDAggFAWkIcGF5bWVudHMAAQUHbWF4U2xwZwcHAAACAAgFBmVzdFB1dAJfOQFpAQNnZXQABAFyCQECY2cBBQFpBAlvdXRBbXRBbXQIBQFyAl8xBAhvdXRQckFtdAgFAXICXzIEBnBtdEFtdAgFAXICXzMECnBtdEFzc2V0SWQIBQFyAl80BAVzdGF0ZQgFAXICXzUEAWIJAPwHBAUDZmNhAgRidXJuCQDMCAIFBnBtdEFtdAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQpwbXRBc3NldElkBQZwbXRBbXQFA25pbAMJAAACBQFiBQFiBQVzdGF0ZQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQlnZXRPbmVUa24FCmV4Y2hSZXN1bHQHbm90VXNlZAlvdXRBbW91bnQKb3V0QXNzZXRJZAhzbGlwcGFnZQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECCzEgcG1udCBleHBkBANjZmcJAQNncGMABARscElkCQCRAwIFA2NmZwUJaWR4TFBBc0lkBARhbUlkCQCRAwIFA2NmZwUJaWR4QW1Bc0lkBARwcklkCQCRAwIFA2NmZwUJaWR4UHJBc0lkBAVhbURjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwULaWR4QW10QXNEY20EBXByRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQ1pZHhQcmljZUFzRGNtBANzdHMJAJEDAgUDY2ZnBQlpZHhQb29sU3QEB2ZhY3RDZmcJAQNnZmMABAdnd3hDbnRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQdmYWN0Q2ZnBRFpZHhGYWN0R3d4UmV3Q250cgIKV3Igc2wgYWRkcgQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAEBWFkZG9uCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJAQNhZGEAAgAEC3VzZXJBZGRyZXNzAwkAAAIFBWFkZG9uCQClCAEIBQFpBmNhbGxlcggFAWkMb3JpZ2luQ2FsbGVyCAUBaQZjYWxsZXIEBnR4SWQ1OAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkBApwbXRBc3NldElkCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQEBnBtdEFtdAgFA3BtdAZhbW91bnQDCQBmAgCAlOvcAwUGcG10QW10CQACAQINTWluIHBtdCAxMCBMUAMDAwkAZgIAAAUIc2xpcHBhZ2UGCQBmAgAABQpleGNoUmVzdWx0BgkAZgIAAAUJb3V0QW1vdW50CQACAQIMV3JvbmcgcGFyYW1zAwkBAiE9AgUEbHBJZAkA2AQBBQpwbXRBc3NldElkCQACAQIIV3JvbmcgTFAEAXIJAQNlZ28ECQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQJANgEAQUKcG10QXNzZXRJZAUGcG10QW10CAUBaQZjYWxsZXIECmVzdGltQW1BbXQIBQFyAl8xBAplc3RpbVByQW10CAUBcgJfMgQJYW1CYWxhbmNlCQENZ2V0QWNjQmFsYW5jZQEFBGFtSWQECXByQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQRwcklkBA0kdDAzMDI3NTMwNzM1AwkAAAIFCm91dEFzc2V0SWQFBGFtSWQJAJkKBwkAZQIFCWFtQmFsYW5jZQUKZXN0aW1BbUFtdAkAZQIFCXByQmFsYW5jZQUKZXN0aW1QckFtdAUKZXhjaFJlc3VsdAUKZXN0aW1QckFtdAAAAAAJAGQCBQplc3RpbUFtQW10BQpleGNoUmVzdWx0AwkAAAIFCm91dEFzc2V0SWQFBHBySWQJAJkKBwkAZQIFCWFtQmFsYW5jZQUKZXN0aW1BbUFtdAkAZQIFCXByQmFsYW5jZQUKZXN0aW1QckFtdAAAAAAFCmV4Y2hSZXN1bHQFCmVzdGltQW1BbXQJAGQCBQplc3RpbVByQW10BQpleGNoUmVzdWx0CQACAQIQd3Jvbmcgb3V0QXNzZXRJZAQMYW1CYWxhbmNlTm93CAUNJHQwMzAyNzUzMDczNQJfMQQMcHJCYWxhbmNlTm93CAUNJHQwMzAyNzUzMDczNQJfMgQMdmlydFN3YXBJbkFtCAUNJHQwMzAyNzUzMDczNQJfMwQNdmlydFN3YXBPdXRQcggFDSR0MDMwMjc1MzA3MzUCXzQEDHZpcnRTd2FwSW5QcggFDSR0MDMwMjc1MzA3MzUCXzUEDXZpcnRTd2FwT3V0QW0IBQ0kdDAzMDI3NTMwNzM1Al82BAt0b3RhbEdldFJhdwgFDSR0MDMwMjc1MzA3MzUCXzcDAwkAZgIAAAUMdmlydFN3YXBJbkFtBgkAZgIAAAUMdmlydFN3YXBJblByCQACAQIKV3JvbmcgY2FsYwQCRDAJAPwHBAUHZ3d4Q250cgIFY2FsY0QJAMwIAgkApAMBBQxhbUJhbGFuY2VOb3cJAMwIAgkApAMBBQxwckJhbGFuY2VOb3cJAMwIAgUBQQkAzAgCBQVBbXVsdAkAzAgCBQVEY29udgUDbmlsBQNuaWwEAkQxCQD8BwQFB2d3eENudHICBWNhbGNECQDMCAIJAKQDAQkAZAIJAGUCBQxhbUJhbGFuY2VOb3cFDHZpcnRTd2FwSW5BbQUNdmlydFN3YXBPdXRBbQkAzAgCCQCkAwEJAGUCCQBkAgUMcHJCYWxhbmNlTm93BQ12aXJ0U3dhcE91dFByBQx2aXJ0U3dhcEluUHIJAMwIAgUBQQkAzAgCBQVBbXVsdAkAzAgCBQVEY29udgUDbmlsBQNuaWwEBkQwdnNEMQkBAnZkAwkApwMBCQEDc3RyAQUCRDEJAKcDAQkBA3N0cgEFAkQwBQpzbGlwcGFnZTREAwkAAAIFBkQwdnNEMQUGRDB2c0QxBAh0b3RhbEdldAgJAQd0YWtlRmVlAQULdG90YWxHZXRSYXcCXzEECGZpbmFsUmVzCQEDdmFkAwkAtgIBBQh0b3RhbEdldAkAtgIBBQlvdXRBbW91bnQJALYCAQUIc2xpcHBhZ2UDCQAAAgUIZmluYWxSZXMFCGZpbmFsUmVzBA0kdDAzMTQ4MjMxNTg2AwkAAAIFCm91dEFzc2V0SWQFBGFtSWQJAJQKAgkAoAMBCAUIZmluYWxSZXMCXzIAAAkAlAoCAAAJAKADAQgFCGZpbmFsUmVzAl8yBAVvdXRBbQgFDSR0MDMxNDgyMzE1ODYCXzEEBW91dFByCAUNJHQwMzE0ODIzMTU4NgJfMgQLdG90YWxBbW91bnQJAGQCBQVvdXRBbQUFb3V0UHIECWZlZUFtb3VudAkAZQIFC3RvdGFsR2V0UmF3BQh0b3RhbEdldAQRb3V0QXNzZXRJZE9yV2F2ZXMDCQAAAgUKb3V0QXNzZXRJZAIFV0FWRVMFBHVuaXQJANkEAQUKb3V0QXNzZXRJZAQQc2VuZEZlZVRvTWF0Y2hlcgMJAGYCBQlmZWVBbW91bnQAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQ5tYXRjaGVyQWRkcmVzcwUJZmVlQW1vdW50BRFvdXRBc3NldElkT3JXYXZlcwUDbmlsBQNuaWwECGN1clByWDE4CQEEY3BiaQIJAQJ0MQIFCXByQmFsYW5jZQUFcHJEY20JAQJ0MQIFCWFtQmFsYW5jZQUFYW1EY20EBWN1clByCQECZjECBQhjdXJQclgxOAUGc2NhbGU4BAVzdGF0ZQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQt1c2VyQWRkcmVzcwULdG90YWxBbW91bnQFEW91dEFzc2V0SWRPcldhdmVzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQNnYXUCCQClCAEFC3VzZXJBZGRyZXNzBQZ0eElkNTgJARFkYXRhR2V0QWN0aW9uSW5mbwYFBW91dEFtBQVvdXRQcgUGcG10QW10BQVjdXJQcgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAnBsAAUFY3VyUHIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJwaAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFBWN1clByBQNuaWwDCQAAAgUFc3RhdGUFBXN0YXRlBARidXJuCQD8BwQFA2ZjYQIEYnVybgkAzAgCBQZwbXRBbXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUKcG10QXNzZXRJZAUGcG10QW10BQNuaWwDCQAAAgUEYnVybgUEYnVybgkAzggCBQVzdGF0ZQUQc2VuZEZlZVRvTWF0Y2hlcgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQlnZXROb0xlc3MCEm5vTGVzc1RoZW5BbXRBc3NldBRub0xlc3NUaGVuUHJpY2VBc3NldAQBcgkBAmNnAQUBaQQIb3V0QW1BbXQIBQFyAl8xBAhvdXRQckFtdAgFAXICXzIEBnBtdEFtdAgFAXICXzMECnBtdEFzc2V0SWQIBQFyAl80BAVzdGF0ZQgFAXICXzUDCQBmAgUSbm9MZXNzVGhlbkFtdEFzc2V0BQhvdXRBbUFtdAkAAgEJAKwCAgkArAICCQCsAgICCUZhaWxlZDogIAkApAMBBQhvdXRBbUFtdAIDIDwgCQCkAwEFEm5vTGVzc1RoZW5BbXRBc3NldAMJAGYCBRRub0xlc3NUaGVuUHJpY2VBc3NldAUIb3V0UHJBbXQJAAIBCQCsAgIJAKwCAgkArAICAghGYWlsZWQ6IAkApAMBBQhvdXRQckFtdAIDIDwgCQCkAwEFFG5vTGVzc1RoZW5QcmljZUFzc2V0BBRidXJuTFBBc3NldE9uRmFjdG9yeQkA/AcEBQNmY2ECBGJ1cm4JAMwIAgUGcG10QW10BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCnBtdEFzc2V0SWQFBnBtdEFtdAUDbmlsAwkAAAIFFGJ1cm5MUEFzc2V0T25GYWN0b3J5BRRidXJuTFBBc3NldE9uRmFjdG9yeQUFc3RhdGUJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQENdW5zdGFrZUFuZEdldAEGYW1vdW50BA1jaGVja1BheW1lbnRzAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQINTm8gcG1udHMgZXhwZAYDCQAAAgUNY2hlY2tQYXltZW50cwUNY2hlY2tQYXltZW50cwQDY2ZnCQEDZ3BjAAQKZmFjdG9yeUNmZwkBA2dmYwAECWxwQXNzZXRJZAkA2QQBCQCRAwIFA2NmZwUJaWR4TFBBc0lkBAdzdGFraW5nCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQpmYWN0b3J5Q2ZnBQ9pZHhGYWN0U3Rha0NudHICCldyIHN0IGFkZHIECnVuc3Rha2VJbnYJAPwHBAUHc3Rha2luZwIHdW5zdGFrZQkAzAgCCQDYBAEFCWxwQXNzZXRJZAkAzAgCBQZhbW91bnQFA25pbAUDbmlsAwkAAAIFCnVuc3Rha2VJbnYFCnVuc3Rha2VJbnYEAXIJAQNlZ28ECQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQJANgEAQUJbHBBc3NldElkBQZhbW91bnQIBQFpBmNhbGxlcgQDc3RzCQENcGFyc2VJbnRWYWx1ZQEIBQFyAl85BAVzdGF0ZQgFAXIDXzEwBAF2AwMJAQNpZ3MABgkAAAIFA3N0cwUMUG9vbFNodXRkb3duCQACAQkArAICAglCbG9ja2VkOiAJAKQDAQUDc3RzBgMJAAACBQF2BQF2BAVidXJuQQkA/AcEBQNmY2ECBGJ1cm4JAMwIAgUGYW1vdW50BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCWxwQXNzZXRJZAUGYW1vdW50BQNuaWwDCQAAAgUFYnVybkEFBWJ1cm5BBQVzdGF0ZQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQhhY3RpdmF0ZQIIYW10QXNTdHIHcHJBc1N0cgMJAQIhPQIJAKUIAQgFAWkGY2FsbGVyCQClCAEFA2ZjYQkAAgECBmRlbmllZAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJhYQAFCGFtdEFzU3RyCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJwYQAFB3ByQXNTdHIFA25pbAIHc3VjY2VzcwFpAQRzZXRTAgFrAXYDCQECIT0CCQClCAEIBQFpBmNhbGxlcgkBBHN0cmYCBQR0aGlzCQEDYWRhAAUCcGQJAMwIAgkBC1N0cmluZ0VudHJ5AgUBawUBdgUDbmlsAWkBBHNldEkCAWsBdgMJAQIhPQIJAKUIAQgFAWkGY2FsbGVyCQEEc3RyZgIFBHRoaXMJAQNhZGEABQJwZAkAzAgCCQEMSW50ZWdlckVudHJ5AgUBawUBdgUDbmlsAWkBHGdldFBvb2xDb25maWdXcmFwcGVyUkVBRE9OTFkACQCUCgIFA25pbAkBA2dwYwABaQEcZ2V0QWNjQmFsYW5jZVdyYXBwZXJSRUFET05MWQEHYXNzZXRJZAkAlAoCBQNuaWwJAQ1nZXRBY2NCYWxhbmNlAQUHYXNzZXRJZAFpARljYWxjUHJpY2VzV3JhcHBlclJFQURPTkxZAwVhbUFtdAVwckFtdAVscEFtdAQCcHIJAQpjYWxjUHJpY2VzAwUFYW1BbXQFBXByQW10BQVscEFtdAkAlAoCBQNuaWwJAMwIAgkApgMBCQCRAwIFAnByAAAJAMwIAgkApgMBCQCRAwIFAnByAAEJAMwIAgkApgMBCQCRAwIFAnByAAIFA25pbAFpARZmcm9tWDE4V3JhcHBlclJFQURPTkxZAgN2YWwMcmVzU2NhbGVNdWx0CQCUCgIFA25pbAkBAmYxAgkApwMBBQN2YWwFDHJlc1NjYWxlTXVsdAFpARR0b1gxOFdyYXBwZXJSRUFET05MWQIHb3JpZ1ZhbA1vcmlnU2NhbGVNdWx0CQCUCgIFA25pbAkApgMBCQECdDECBQdvcmlnVmFsBQ1vcmlnU2NhbGVNdWx0AWkBHmNhbGNQcmljZUJpZ0ludFdyYXBwZXJSRUFET05MWQIIcHJBbXRYMTgIYW1BbXRYMTgJAJQKAgUDbmlsCQCmAwEJAQRjcGJpAgkApwMBBQhwckFtdFgxOAkApwMBBQhhbUFtdFgxOAFpASNlc3RpbWF0ZVB1dE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQkGdHhJZDU4CHNsaXBwYWdlB2luQW1BbXQGaW5BbUlkB2luUHJBbXQGaW5QcklkB3VzckFkZHIGaXNFdmFsBmVtaXRMcAkAlAoCBQNuaWwJAQNlcG8MBQZ0eElkNTgFCHNsaXBwYWdlBQdpbkFtQW10BQZpbkFtSWQFB2luUHJBbXQFBmluUHJJZAUHdXNyQWRkcgUGaXNFdmFsBQZlbWl0THAHAAACAAFpASNlc3RpbWF0ZUdldE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQQGdHhJZDU4B3BtdEFzSWQIcG10THBBbXQHdXNyQWRkcgQBcgkBA2VnbwQFBnR4SWQ1OAUHcG10QXNJZAUIcG10THBBbXQJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB3VzckFkZHIJAJQKAgUDbmlsCQCcCgoIBQFyAl8xCAUBcgJfMggFAXICXzMIBQFyAl80CAUBcgJfNQgFAXICXzYIBQFyAl83CQCmAwEIBQFyAl84CAUBcgJfOQgFAXIDXzEwAQJ0eAEGdmVyaWZ5AAQPdGFyZ2V0UHVibGljS2V5BAckbWF0Y2gwCQEBbQADCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCcGsFByRtYXRjaDAFAnBrAwkAAQIFByRtYXRjaDACBFVuaXQIBQJ0eA9zZW5kZXJQdWJsaWNLZXkJAAIBAgtNYXRjaCBlcnJvcgQHJG1hdGNoMAUCdHgDCQABAgUHJG1hdGNoMAIFT3JkZXIEBW9yZGVyBQckbWF0Y2gwBAptYXRjaGVyUHViCQECbXAABApvcmRlclZhbGlkCQEDbW9hAQUFb3JkZXIEC3NlbmRlclZhbGlkCQD0AwMIBQVvcmRlcglib2R5Qnl0ZXMJAJEDAggFBW9yZGVyBnByb29mcwAACAUFb3JkZXIPc2VuZGVyUHVibGljS2V5BAxtYXRjaGVyVmFsaWQJAPQDAwgFBW9yZGVyCWJvZHlCeXRlcwkAkQMCCAUFb3JkZXIGcHJvb2ZzAAEFCm1hdGNoZXJQdWIDAwMFCm9yZGVyVmFsaWQFC3NlbmRlclZhbGlkBwUMbWF0Y2hlclZhbGlkBwYJAQN0b2UDBQpvcmRlclZhbGlkBQtzZW5kZXJWYWxpZAUMbWF0Y2hlclZhbGlkAwkAAQIFByRtYXRjaDACFFNldFNjcmlwdFRyYW5zYWN0aW9uBAFzBQckbWF0Y2gwBAduZXdIYXNoCQD2AwEJAQV2YWx1ZQEIBQFzBnNjcmlwdAQLYWxsb3dlZEhhc2gJANsEAQkBBXZhbHVlAQkAnQgCBQNmY2EJARxrZXlBbGxvd2VkTHBTdGFibGVTY3JpcHRIYXNoAAQLY3VycmVudEhhc2gJAPEHAQUEdGhpcwMDCQAAAgULYWxsb3dlZEhhc2gFB25ld0hhc2gJAQIhPQIFC2N1cnJlbnRIYXNoBQduZXdIYXNoBwYJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFD3RhcmdldFB1YmxpY0tleQkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUPdGFyZ2V0UHVibGljS2V5Ex09sw==",
    "height": 2205845,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DNJeRDrtfw4VNKw6gQ22etswyhAQroAaZVgeCxQRHHNV
Next: tPf4ksgoCwRFPeNbEni32JhpqRVWJhpTG8KG5W8MtJu

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

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)))

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

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

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

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

779	786		let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
780	787		if ((D0vsD1 == D0vsD1))
781	788		then {
	789	+	let totalGet = takeFee(totalGetRaw)._1
782	790		let finalRes = vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
783	791		if ((finalRes == finalRes))
784	792		then {
785		-	let $~~t03121831322~~ = if ((outAssetId == amId))
	793	+	let $t03148231586 = if ((outAssetId == amId))
786	794		then $Tuple2(toInt(finalRes._2), 0)
787	795		else $Tuple2(0, toInt(finalRes._2))
788		-	let outAm = $t03121831322._1
789		-	let outPr = $t03121831322._2
790		-	let totalAmountRaw = (outAm + outPr)
791		-	let $t03136231417 = takeFee(totalAmountRaw)
792		-	let totalAmount = $t03136231417._1
793		-	let feeAmount = $t03136231417._2
	796	+	let outAm = $t03148231586._1
	797	+	let outPr = $t03148231586._2
	798	+	let totalAmount = (outAm + outPr)
	799	+	let feeAmount = (totalGetRaw - totalGet)
794	800		let outAssetIdOrWaves = if ((outAssetId == "WAVES"))
795	801		then unit
796	802		else fromBase58String(outAssetId)

945	951
946	952
947	953		@Verifier(tx)
948		-	func verify () = match tx {
949		-	case order: Order =>
950		-	let mtchPub = mp()
951		-	let orV = moa(order)
952		-	let sndrV = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
953		-	let mtchV = sigVerify(order.bodyBytes, order.proofs[1], mtchPub)
954		-	if (if (if (orV)
955		-	then sndrV
956		-	else false)
957		-	then mtchV
958		-	else false)
959		-	then true
960		-	else toe(orV, sndrV, mtchV)
961		-	case _ =>
962		-	let targetPublicKey = match m() {
963		-	case pk: ByteVector =>
964		-	pk
965		-	case _: Unit =>
966		-	tx.senderPublicKey
967		-	case _ =>
968		-	throw("Match error")
969		-	}
970		-	sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
971		-	}
	954	+	func verify () = {
	955	+	let targetPublicKey = match m() {
	956	+	case pk: ByteVector =>
	957	+	pk
	958	+	case _: Unit =>
	959	+	tx.senderPublicKey
	960	+	case _ =>
	961	+	throw("Match error")
	962	+	}
	963	+	match tx {
	964	+	case order: Order =>
	965	+	let matcherPub = mp()
	966	+	let orderValid = moa(order)
	967	+	let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
	968	+	let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub)
	969	+	if (if (if (orderValid)
	970	+	then senderValid
	971	+	else false)
	972	+	then matcherValid
	973	+	else false)
	974	+	then true
	975	+	else toe(orderValid, senderValid, matcherValid)
	976	+	case s: SetScriptTransaction =>
	977	+	let newHash = blake2b256(value(s.script))
	978	+	let allowedHash = fromBase64String(value(getString(fca, keyAllowedLpStableScriptHash())))
	979	+	let currentHash = scriptHash(this)
	980	+	if (if ((allowedHash == newHash))
	981	+	then (currentHash != newHash)
	982	+	else false)
	983	+	then true
	984	+	else sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
	985	+	case _ =>
	986	+	sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
	987	+	}
	988	+	}
972	989

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

github/deemru/w8io/c3f4982 
99.21 ms ◑