tx · 6F88CMmmrNteAsSwkECQd7zmXLmmB6dVTMC1XFDPdo4g

3MzKSdTH2jFbypLsoNfrH7QgkzSbx3EYwCA:  -0.03500000 Waves

2022.09.14 10:51 [2228484] smart account 3MzKSdTH2jFbypLsoNfrH7QgkzSbx3EYwCA > SELF 0.00000000 Waves

{ "type": 13, "id": "6F88CMmmrNteAsSwkECQd7zmXLmmB6dVTMC1XFDPdo4g", "fee": 3500000, "feeAssetId": null, "timestamp": 1663141871503, "version": 2, "chainId": 84, "sender": "3MzKSdTH2jFbypLsoNfrH7QgkzSbx3EYwCA", "senderPublicKey": "35yd3qw1gxKDxKwGAykHN9fANbXNWwseaUwbWDj24o3x", "proofs": [ "utBcSN3XaQt4z2Q2rSnNbcns7mrMuoTKjPJxBjKKL78KymcjCpoCq8dQAzAjzm7ArUpxXEP6zLj9Ga5mmQGUxu1" ], "script": "base64:BgKVAQgCEgMKAQgSAwoBCBIAEgQKAgEEEgcKBQEBAQEEEgUKAwEBBBIDCgEBEgASBwoFAQEBCAESBQoDAQgBEgQKAgEBEgMKAQESBgoEAQEIARIECgIICBIECgIICBIECgIIARIAEgMKAQgSBQoDAQEBEgQKAggBEgQKAgEBEgQKAggIEgsKCQgBAQIBAggEBBIGCgQICAEIUgAGc2NhbGU4AIDC1y8ADHNjYWxlOEJpZ0ludAkAtgIBAIDC1y8AB3NjYWxlMTgJALYCAQCAgJC7utat8A0ACnplcm9CaWdJbnQJALYCAQAAAAlvbmVCaWdJbnQJALYCAQABAApzbGlwcGFnZTRECQC2AgEJAGUCBQZzY2FsZTgJAGkCCQBoAgUGc2NhbGU4AAEFBnNjYWxlOAAFQW11bHQCAzEwMAAFRGNvbnYCATEAA1NFUAICX18ABUVNUFRZAgAAClBvb2xBY3RpdmUAAQAKUG9vbFB1dERpcwACAA5Qb29sTWF0Y2hlckRpcwADAAxQb29sU2h1dGRvd24ABAAOaWR4UG9vbEFkZHJlc3MAAQAJaWR4UG9vbFN0AAIACWlkeExQQXNJZAADAAlpZHhBbUFzSWQABAAJaWR4UHJBc0lkAAUAC2lkeEFtdEFzRGNtAAYADWlkeFByaWNlQXNEY20ABwALaWR4SUFtdEFzSWQACAANaWR4SVByaWNlQXNJZAAJAA9pZHhGYWN0U3Rha0NudHIAAQAQaWR4RmFjdFNsaXBwQ250cgAHABFpZHhGYWN0R3d4UmV3Q250cgAKAAVkZWxheQIJJXNfX2RlbGF5AQJ0MQIHb3JpZ1ZhbA1vcmlnU2NhbGVNdWx0CQC8AgMJALYCAQUHb3JpZ1ZhbAUHc2NhbGUxOAkAtgIBBQ1vcmlnU2NhbGVNdWx0AQJmMQIDdmFsD3Jlc3VsdFNjYWxlTXVsdAkAoAMBCQC8AgMFA3ZhbAkAtgIBBQ9yZXN1bHRTY2FsZU11bHQFB3NjYWxlMTgBAnRzAwNhbXQIcmVzU2NhbGUIY3VyU2NhbGUJAGsDBQNhbXQFCHJlc1NjYWxlBQhjdXJTY2FsZQEDYWJzAQN2YWwDCQC/AgIFCnplcm9CaWdJbnQFA3ZhbAkAvgIBBQN2YWwFA3ZhbAECZmMAAhMlc19fZmFjdG9yeUNvbnRyYWN0AQNtcGsAAhQlc19fbWFuYWdlclB1YmxpY0tleQEEcG1wawACGyVzX19wZW5kaW5nTWFuYWdlclB1YmxpY0tleQECcGwAAhElcyVzX19wcmljZV9fbGFzdAECcGgCAWgBdAkAuQkCCQDMCAICGCVzJXMlZCVkX19wcmljZV9faGlzdG9yeQkAzAgCCQCkAwEFAWgJAMwIAgkApAMBBQF0BQNuaWwFA1NFUAEDcGF1AgJ1YQR0eElkCQCsAgIJAKwCAgkArAICAgslcyVzJXNfX1BfXwUCdWECAl9fBQR0eElkAQNnYXUCAnVhBHR4SWQJAKwCAgkArAICCQCsAgICCyVzJXMlc19fR19fBQJ1YQICX18FBHR4SWQBAmFhAAIPJXNfX2Ftb3VudEFzc2V0AQJwYQACDiVzX19wcmljZUFzc2V0AQNhbXAAAgclc19fYW1wAQNhZGEAAg0lc19fYWRkb25BZGRyAQVsZ290YwEGY2FsbGVyCQC5CQIJAMwIAgIXJXMlc19fbGFzdEdldE9uZVRrbkNhbGwJAMwIAgUGY2FsbGVyBQNuaWwFA1NFUAEFbHNvdGMBBmNhbGxlcgkAuQkCCQDMCAICFyVzJXNfX2xhc3RQdXRPbmVUa25DYWxsCQDMCAIFBmNhbGxlcgUDbmlsBQNTRVABBGZjZmcAAhElc19fZmFjdG9yeUNvbmZpZwEEbXRwawACGCVzJXNfX21hdGNoZXJfX3B1YmxpY0tleQECcGMCBmlBbXRBcwVpUHJBcwkArAICCQCsAgIJAKwCAgkArAICAgglZCVkJXNfXwUGaUFtdEFzAgJfXwUFaVByQXMCCF9fY29uZmlnAQNtYmEBBWJBU3RyCQCsAgICKCVzJXMlc19fbWFwcGluZ3NfX2Jhc2VBc3NldDJpbnRlcm5hbElkX18FBWJBU3RyAQNhcHMAAgwlc19fc2h1dGRvd24BHGtleUFsbG93ZWRMcFN0YWJsZVNjcmlwdEhhc2gAAh0lc19fYWxsb3dlZExwU3RhYmxlU2NyaXB0SGFzaAEDdG9lAwNvclYGc2VuZHJWBm1hdGNoVgkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAhFGYWlsZWQ6IG9yZFZhbGlkPQkApQMBBQNvclYCCyBzbmRyVmFsaWQ9CQClAwEFBnNlbmRyVgIMIG10Y2hyVmFsaWQ9CQClAwEFBm1hdGNoVgEDc3RyAQN2YWwEByRtYXRjaDAFA3ZhbAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEBnZhbFN0cgUHJG1hdGNoMAUGdmFsU3RyCQACAQITZmFpbCBjYXN0IHRvIFN0cmluZwEEc3RyZgIEYWRkcgNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQRhZGRyBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUEYWRkcgkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAgwgbm90IGRlZmluZWQFA25pbAIAAQRpbnRmAgRhZGRyA2tleQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCaCAIFBGFkZHIFA2tleQkAuQkCCQDMCAICCm1hbmRhdG9yeSAJAMwIAgkApQgBBQRhZGRyCQDMCAICAS4JAMwIAgUDa2V5CQDMCAICDCBub3QgZGVmaW5lZAUDbmlsAgAAA2ZjYQkBEUBleHRyTmF0aXZlKDEwNjIpAQkBBHN0cmYCBQR0aGlzCQECZmMAAAFBCQEEc3RyZgIFBHRoaXMJAQNhbXAAAQNpZ3MACQELdmFsdWVPckVsc2UCCQCbCAIFA2ZjYQkBA2FwcwAHAQJtcAAJANkEAQkBBHN0cmYCBQNmY2EJAQRtdHBrAAEDZ3BjAAQFYW10QXMJAQRzdHJmAgUEdGhpcwkBAmFhAAQHcHJpY2VBcwkBBHN0cmYCBQR0aGlzCQECcGEABAhpUHJpY2VBcwkBBGludGYCBQNmY2EJAQNtYmEBBQdwcmljZUFzBAZpQW10QXMJAQRpbnRmAgUDZmNhCQEDbWJhAQUFYW10QXMJALUJAgkBBHN0cmYCBQNmY2EJAQJwYwIJAKQDAQUGaUFtdEFzCQCkAwEFCGlQcmljZUFzBQNTRVABA2dmYwAJALUJAgkBBHN0cmYCBQNmY2EJAQRmY2ZnAAUDU0VQAA1mYWN0b3J5Q29uZmlnCQEDZ2ZjAAAPc3Rha2luZ0NvbnRyYWN0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQ1mYWN0b3J5Q29uZmlnBQ9pZHhGYWN0U3Rha0NudHICIEludmFsaWQgc3Rha2luZyBjb250cmFjdCBhZGRyZXNzAA9zbGlwYWdlQ29udHJhY3QJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFDWZhY3RvcnlDb25maWcFEGlkeEZhY3RTbGlwcENudHICIEludmFsaWQgc2xpcGFnZSBjb250cmFjdCBhZGRyZXNzAAtnd3hDb250cmFjdAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUNZmFjdG9yeUNvbmZpZwURaWR4RmFjdEd3eFJld0NudHICHEludmFsaWQgZ3d4IGNvbnRyYWN0IGFkZHJlc3MBEWRhdGFQdXRBY3Rpb25JbmZvCg1pbkFtdEFzc2V0QW10D2luUHJpY2VBc3NldEFtdAhvdXRMcEFtdAVwcmljZQpzbGlwQnlVc2VyDHNsaXBwYWdlUmVhbAh0eEhlaWdodAt0eFRpbWVzdGFtcAxzbGlwYWdlQW1BbXQMc2xpcGFnZVByQW10CQC5CQIJAMwIAgIUJWQlZCVkJWQlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQ1pbkFtdEFzc2V0QW10CQDMCAIJAKQDAQUPaW5QcmljZUFzc2V0QW10CQDMCAIJAKQDAQUIb3V0THBBbXQJAMwIAgkApAMBBQVwcmljZQkAzAgCCQCkAwEFCnNsaXBCeVVzZXIJAMwIAgkApAMBBQxzbGlwcGFnZVJlYWwJAMwIAgkApAMBBQh0eEhlaWdodAkAzAgCCQCkAwEFC3R4VGltZXN0YW1wCQDMCAIJAKQDAQUMc2xpcGFnZUFtQW10CQDMCAIJAKQDAQUMc2xpcGFnZVByQW10BQNuaWwFA1NFUAERZGF0YUdldEFjdGlvbkluZm8GDm91dEFtdEFzc2V0QW10EG91dFByaWNlQXNzZXRBbXQHaW5McEFtdAVwcmljZQh0eEhlaWdodAt0eFRpbWVzdGFtcAkAuQkCCQDMCAICDCVkJWQlZCVkJWQlZAkAzAgCCQCkAwEFDm91dEFtdEFzc2V0QW10CQDMCAIJAKQDAQUQb3V0UHJpY2VBc3NldEFtdAkAzAgCCQCkAwEFB2luTHBBbXQJAMwIAgkApAMBBQVwcmljZQkAzAgCCQCkAwEFCHR4SGVpZ2h0CQDMCAIJAKQDAQULdHhUaW1lc3RhbXAFA25pbAUDU0VQAQ1nZXRBY2NCYWxhbmNlAQdhc3NldElkAwkAAAIFB2Fzc2V0SWQCBVdBVkVTCAkA7wcBBQR0aGlzCWF2YWlsYWJsZQkA8AcCBQR0aGlzCQDZBAEFB2Fzc2V0SWQBBGNwYmkCCHByQW10WDE4CGFtQW10WDE4CQC8AgMFCHByQW10WDE4BQdzY2FsZTE4BQhhbUFtdFgxOAEDdmFkAwJBMQJBMghzbGlwcGFnZQQEZGlmZgkAvAIDCQC4AgIFAkExBQJBMgUMc2NhbGU4QmlnSW50BQJBMgQEcGFzcwkAvwICCQC4AgIFCHNsaXBwYWdlCQEDYWJzAQUEZGlmZgUKemVyb0JpZ0ludAMJAQEhAQUEcGFzcwkAAgEJAKwCAgIKQmlnIHNscGc6IAkApgMBBQRkaWZmCQCUCgIFBHBhc3MJAJkDAQkAzAgCBQJBMQkAzAgCBQJBMgUDbmlsAQJ2ZAMCRDECRDAEc2xwZwQEZGlmZgkAvAIDBQJEMAUMc2NhbGU4QmlnSW50BQJEMQQEZmFpbAkAvwICBQRzbHBnBQRkaWZmAwMFBGZhaWwGCQC/AgIFAkQwBQJEMQkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKYDAQUCRDACASAJAKYDAQUCRDECASAJAKYDAQUEZGlmZgIBIAkApgMBBQRzbHBnBQRmYWlsAQNwY3AECmFtQXNzZXREY20KcHJBc3NldERjbQVhbUFtdAVwckFtdAQLYW10QXNBbXRYMTgJAQJ0MQIFBWFtQW10BQphbUFzc2V0RGNtBApwckFzQW10WDE4CQECdDECBQVwckFtdAUKcHJBc3NldERjbQkBBGNwYmkCBQpwckFzQW10WDE4BQthbXRBc0FtdFgxOAEKY2FsY1ByaWNlcwMFYW1BbXQFcHJBbXQFbHBBbXQEA2NmZwkBA2dwYwAECGFtdEFzRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQtpZHhBbXRBc0RjbQQHcHJBc0RjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwUNaWR4UHJpY2VBc0RjbQQIcHJpY2VYMTgJAQNwY3AEBQhhbXRBc0RjbQUHcHJBc0RjbQUFYW1BbXQFBXByQW10BAhhbUFtdFgxOAkBAnQxAgUFYW1BbXQFCGFtdEFzRGNtBAhwckFtdFgxOAkBAnQxAgUFcHJBbXQFB3ByQXNEY20ECGxwQW10WDE4CQECdDECBQVscEFtdAUGc2NhbGU4BA1scFBySW5BbUFzWDE4CQEEY3BiaQIFCGFtQW10WDE4BQhscEFtdFgxOAQNbHBQckluUHJBc1gxOAkBBGNwYmkCBQhwckFtdFgxOAUIbHBBbXRYMTgJAMwIAgUIcHJpY2VYMTgJAMwIAgUNbHBQckluQW1Bc1gxOAkAzAgCBQ1scFBySW5QckFzWDE4BQNuaWwBD2NhbGN1bGF0ZVByaWNlcwMFYW1BbXQFcHJBbXQFbHBBbXQEAXAJAQpjYWxjUHJpY2VzAwUFYW1BbXQFBXByQW10BQVscEFtdAkAzAgCCQECZjECCQCRAwIFAXAAAAUGc2NhbGU4CQDMCAIJAQJmMQIJAJEDAgUBcAABBQZzY2FsZTgJAMwIAgkBAmYxAgkAkQMCBQFwAAIFBnNjYWxlOAUDbmlsAQNlZ28EBnR4SWQ1OApwbXRBc3NldElkCHBtdExwQW10C3VzZXJBZGRyZXNzBANjZmcJAQNncGMABARscElkCQCRAwIFA2NmZwUJaWR4TFBBc0lkBARhbUlkCQCRAwIFA2NmZwUJaWR4QW1Bc0lkBARwcklkCQCRAwIFA2NmZwUJaWR4UHJBc0lkBAVhbURjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwULaWR4QW10QXNEY20EBXByRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQ1pZHhQcmljZUFzRGNtBANzdHMJAJEDAgUDY2ZnBQlpZHhQb29sU3QEB2xwRW1pc3MICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQRscElkAgtXcm9uZyBMUCBpZAhxdWFudGl0eQMJAQIhPQIFBGxwSWQFCnBtdEFzc2V0SWQJAAIBAg9Xcm9uZyBwbXQgYXNzZXQECWFtQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQRhbUlkBAxhbUJhbGFuY2VYMTgJAQJ0MQIFCWFtQmFsYW5jZQUFYW1EY20ECXByQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQRwcklkBAxwckJhbGFuY2VYMTgJAQJ0MQIFCXByQmFsYW5jZQUFcHJEY20EC2N1clByaWNlWDE4CQEEY3BiaQIFDHByQmFsYW5jZVgxOAUMYW1CYWxhbmNlWDE4BAhjdXJQcmljZQkBAmYxAgULY3VyUHJpY2VYMTgFBnNjYWxlOAQLcG10THBBbXRYMTgJAQJ0MQIFCHBtdExwQW10BQZzY2FsZTgECmxwRW1pc3NYMTgJAQJ0MQIFB2xwRW1pc3MFBnNjYWxlOAQLb3V0QW1BbXRYMTgJALwCAwUMYW1CYWxhbmNlWDE4BQtwbXRMcEFtdFgxOAUKbHBFbWlzc1gxOAQLb3V0UHJBbXRYMTgJALwCAwUMcHJCYWxhbmNlWDE4BQtwbXRMcEFtdFgxOAUKbHBFbWlzc1gxOAQIb3V0QW1BbXQJAQJmMQIFC291dEFtQW10WDE4BQVhbURjbQQIb3V0UHJBbXQJAQJmMQIFC291dFByQW10WDE4BQVwckRjbQQFc3RhdGUDCQAAAgUGdHhJZDU4AgAFA25pbAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQt1c2VyQWRkcmVzcwUIb3V0QW1BbXQDCQAAAgUEYW1JZAIFV0FWRVMFBHVuaXQJANkEAQUEYW1JZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQt1c2VyQWRkcmVzcwUIb3V0UHJBbXQDCQAAAgUEcHJJZAIFV0FWRVMFBHVuaXQJANkEAQUEcHJJZAkAzAgCCQELU3RyaW5nRW50cnkCCQEDZ2F1AgkApQgBBQt1c2VyQWRkcmVzcwUGdHhJZDU4CQERZGF0YUdldEFjdGlvbkluZm8GBQhvdXRBbUFtdAUIb3V0UHJBbXQFCHBtdExwQW10BQhjdXJQcmljZQUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAnBsAAUIY3VyUHJpY2UJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJwaAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFCGN1clByaWNlBQNuaWwJAJwKCgUIb3V0QW1BbXQFCG91dFByQW10BQRhbUlkBQRwcklkBQlhbUJhbGFuY2UFCXByQmFsYW5jZQUHbHBFbWlzcwULY3VyUHJpY2VYMTgFA3N0cwUFc3RhdGUBA2VwbwwGdHhJZDU4CHNsaXBwYWdlB2luQW1BbXQGaW5BbUlkB2luUHJBbXQGaW5QcklkC3VzZXJBZGRyZXNzBmlzRXZhbAZlbWl0THAKaXNPbmVBc3NldAZwbXRBbXQFcG10SWQEA2NmZwkBA2dwYwAEBGxwSWQJANkEAQkAkQMCBQNjZmcFCWlkeExQQXNJZAQHYW1JZFN0cgkAkQMCBQNjZmcFCWlkeEFtQXNJZAQHcHJJZFN0cgkAkQMCBQNjZmcFCWlkeFByQXNJZAQJaW5BbUlkU3RyCQCRAwIFA2NmZwULaWR4SUFtdEFzSWQECWluUHJJZFN0cgkAkQMCBQNjZmcFDWlkeElQcmljZUFzSWQEBmFtdERjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwULaWR4QW10QXNEY20ECHByaWNlRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQ1pZHhQcmljZUFzRGNtBANzdHMJAJEDAgUDY2ZnBQlpZHhQb29sU3QEBGxwRW0ICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUEbHBJZAIIV3IgbHAgYXMIcXVhbnRpdHkECWFtQmFsYW5jZQMFBmlzRXZhbAkBDWdldEFjY0JhbGFuY2UBBQdhbUlkU3RyAwMFCmlzT25lQXNzZXQJAAACBQVwbXRJZAUHYW1JZFN0cgcJAGUCCQENZ2V0QWNjQmFsYW5jZQEFB2FtSWRTdHIFBnBtdEFtdAMFCmlzT25lQXNzZXQJAQ1nZXRBY2NCYWxhbmNlAQUHYW1JZFN0cgkAZQIJAQ1nZXRBY2NCYWxhbmNlAQUHYW1JZFN0cgUHaW5BbUFtdAQJcHJCYWxhbmNlAwUGaXNFdmFsCQENZ2V0QWNjQmFsYW5jZQEFB3BySWRTdHIDAwUKaXNPbmVBc3NldAkAAAIFBXBtdElkBQdwcklkU3RyBwkAZQIJAQ1nZXRBY2NCYWxhbmNlAQUHcHJJZFN0cgUGcG10QW10AwUKaXNPbmVBc3NldAkBDWdldEFjY0JhbGFuY2UBBQdwcklkU3RyCQBlAgkBDWdldEFjY0JhbGFuY2UBBQdwcklkU3RyBQdpblByQW10BA9pbkFtQXNzZXRBbXRYMTgJAQJ0MQIFB2luQW1BbXQFBmFtdERjbQQPaW5QckFzc2V0QW10WDE4CQECdDECBQdpblByQW10BQhwcmljZURjbQQMdXNlclByaWNlWDE4CQEEY3BiaQIFD2luUHJBc3NldEFtdFgxOAUPaW5BbUFzc2V0QW10WDE4BAxhbUJhbGFuY2VYMTgJAQJ0MQIFCWFtQmFsYW5jZQUGYW10RGNtBAxwckJhbGFuY2VYMTgJAQJ0MQIFCXByQmFsYW5jZQUIcHJpY2VEY20EAXIDCQAAAgUEbHBFbQAABAtjdXJQcmljZVgxOAUKemVyb0JpZ0ludAQLc2xpcHBhZ2VYMTgFCnplcm9CaWdJbnQECGxwQW10WDE4CQB2BgkAuQICBQ9pbkFtQXNzZXRBbXRYMTgFD2luUHJBc3NldEFtdFgxOAAACQC2AgEABQABAAAFBERPV04JAJcKBQkBAmYxAgUIbHBBbXRYMTgFBnNjYWxlOAkBAmYxAgUPaW5BbUFzc2V0QW10WDE4BQZhbXREY20JAQJmMQIFD2luUHJBc3NldEFtdFgxOAUIcHJpY2VEY20JAQRjcGJpAgkAtwICBQxwckJhbGFuY2VYMTgFD2luUHJBc3NldEFtdFgxOAkAtwICBQxhbUJhbGFuY2VYMTgFD2luQW1Bc3NldEFtdFgxOAULc2xpcHBhZ2VYMTgEC2N1clByaWNlWDE4CQEEY3BiaQIFDHByQmFsYW5jZVgxOAUMYW1CYWxhbmNlWDE4BA9zbGlwcGFnZVJlYWxYMTgJALwCAwkBA2FicwEJALgCAgULY3VyUHJpY2VYMTgFDHVzZXJQcmljZVgxOAUHc2NhbGUxOAULY3VyUHJpY2VYMTgEC3NsaXBwYWdlWDE4CQECdDECBQhzbGlwcGFnZQUGc2NhbGU4AwMJAQIhPQIFC2N1clByaWNlWDE4BQp6ZXJvQmlnSW50CQC/AgIFD3NsaXBwYWdlUmVhbFgxOAULc2xpcHBhZ2VYMTgHCQACAQkArAICCQCsAgIJAKwCAgIPUHJpY2Ugc2xpcHBhZ2UgCQCmAwEFD3NsaXBwYWdlUmVhbFgxOAIDID4gCQCmAwEFC3NsaXBwYWdlWDE4BA1scEVtaXNzaW9uWDE4CQECdDECBQRscEVtBQZzY2FsZTgECnByVmlhQW1YMTgJALwCAwUPaW5BbUFzc2V0QW10WDE4BQtjdXJQcmljZVgxOAUHc2NhbGUxOAQKYW1WaWFQclgxOAkAvAIDBQ9pblByQXNzZXRBbXRYMTgFB3NjYWxlMTgFC2N1clByaWNlWDE4BAxleHBlY3RlZEFtdHMDCQC/AgIFCnByVmlhQW1YMTgFD2luUHJBc3NldEFtdFgxOAkAlAoCBQphbVZpYVByWDE4BQ9pblByQXNzZXRBbXRYMTgJAJQKAgUPaW5BbUFzc2V0QW10WDE4BQpwclZpYUFtWDE4BBFleHBBbXRBc3NldEFtdFgxOAgFDGV4cGVjdGVkQW10cwJfMQQTZXhwUHJpY2VBc3NldEFtdFgxOAgFDGV4cGVjdGVkQW10cwJfMgQIbHBBbXRYMTgJALwCAwUNbHBFbWlzc2lvblgxOAUTZXhwUHJpY2VBc3NldEFtdFgxOAUMcHJCYWxhbmNlWDE4CQCXCgUJAQJmMQIFCGxwQW10WDE4BQZzY2FsZTgJAQJmMQIFEWV4cEFtdEFzc2V0QW10WDE4BQZhbXREY20JAQJmMQIFE2V4cFByaWNlQXNzZXRBbXRYMTgFCHByaWNlRGNtBQtjdXJQcmljZVgxOAULc2xpcHBhZ2VYMTgECWNhbGNMcEFtdAgFAXICXzEEDmNhbGNBbUFzc2V0UG10CAUBcgJfMgQOY2FsY1ByQXNzZXRQbXQIBQFyAl8zBAhjdXJQcmljZQkBAmYxAggFAXICXzQFBnNjYWxlOAQMc2xpcHBhZ2VDYWxjCQECZjECCAUBcgJfNQUGc2NhbGU4AwkAZwIAAAUJY2FsY0xwQW10CQACAQIHTFAgPD0gMAQJZW1pdExwQW10AwkBASEBBQZlbWl0THAAAAUJY2FsY0xwQW10BAZhbURpZmYJAGUCBQdpbkFtQW10BQ5jYWxjQW1Bc3NldFBtdAQGcHJEaWZmCQBlAgUHaW5QckFtdAUOY2FsY1ByQXNzZXRQbXQEDSR0MDE2MDEwMTYzNTUDAwUKaXNPbmVBc3NldAkAAAIFBXBtdElkBQdhbUlkU3RyBwkAlAoCBQZwbXRBbXQAAAMDBQppc09uZUFzc2V0CQAAAgUFcG10SWQFB3BySWRTdHIHCQCUCgIAAAUGcG10QW10CQCUCgIFDmNhbGNBbUFzc2V0UG10BQ5jYWxjUHJBc3NldFBtdAQKd3JpdGVBbUFtdAgFDSR0MDE2MDEwMTYzNTUCXzEECndyaXRlUHJBbXQIBQ0kdDAxNjAxMDE2MzU1Al8yBAtjb21tb25TdGF0ZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAnBsAAUIY3VyUHJpY2UJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJwaAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFCGN1clByaWNlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQNwYXUCBQt1c2VyQWRkcmVzcwUGdHhJZDU4CQERZGF0YVB1dEFjdGlvbkluZm8KBQp3cml0ZUFtQW10BQp3cml0ZVByQW10BQllbWl0THBBbXQFCGN1clByaWNlBQhzbGlwcGFnZQUMc2xpcHBhZ2VDYWxjBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQZhbURpZmYFBnByRGlmZgUDbmlsCQCfCg0FCWNhbGNMcEFtdAUJZW1pdExwQW10BQhjdXJQcmljZQUJYW1CYWxhbmNlBQlwckJhbGFuY2UFBGxwRW0FBGxwSWQFA3N0cwULY29tbW9uU3RhdGUFBmFtRGlmZgUGcHJEaWZmBQZpbkFtSWQFBmluUHJJZAEDbW9hAQVvcmRlcgQDY2ZnCQEDZ3BjAAQHYW10QXNJZAkAkQMCBQNjZmcFCWlkeEFtQXNJZAQGcHJBc0lkCQCRAwIFA2NmZwUJaWR4UHJBc0lkBANzdHMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFCWlkeFBvb2xTdAQIYW10QXNEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFC2lkeEFtdEFzRGNtBAdwckFzRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQ1pZHhQcmljZUFzRGNtBA9hY2NBbXRBc0JhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUHYW10QXNJZAQOYWNjUHJBc0JhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUGcHJBc0lkBAtjdXJQcmljZVgxOAMJAAACCAUFb3JkZXIJb3JkZXJUeXBlBQNCdXkJAQNwY3AEBQhhbXRBc0RjbQUHcHJBc0RjbQkAZAIFD2FjY0FtdEFzQmFsYW5jZQgFBW9yZGVyBmFtb3VudAUOYWNjUHJBc0JhbGFuY2UJAQNwY3AEBQhhbXRBc0RjbQUHcHJBc0RjbQkAZQIFD2FjY0FtdEFzQmFsYW5jZQgFBW9yZGVyBmFtb3VudAUOYWNjUHJBc0JhbGFuY2UECGN1clByaWNlCQECZjECBQtjdXJQcmljZVgxOAUGc2NhbGU4AwMDCQEDaWdzAAYJAAACBQNzdHMFDlBvb2xNYXRjaGVyRGlzBgkAAAIFA3N0cwUMUG9vbFNodXRkb3duCQACAQINQWRtaW4gYmxvY2tlZAQKb3JBbXRBc3NldAgIBQVvcmRlcglhc3NldFBhaXILYW1vdW50QXNzZXQECm9yQW10QXNTdHIDCQAAAgUKb3JBbXRBc3NldAUEdW5pdAIFV0FWRVMJANgEAQkBBXZhbHVlAQUKb3JBbXRBc3NldAQJb3JQckFzc2V0CAgFBW9yZGVyCWFzc2V0UGFpcgpwcmljZUFzc2V0BAlvclByQXNTdHIDCQAAAgUJb3JQckFzc2V0BQR1bml0AgVXQVZFUwkA2AQBCQEFdmFsdWUBBQlvclByQXNzZXQDAwkBAiE9AgUKb3JBbXRBc1N0cgUHYW10QXNJZAYJAQIhPQIFCW9yUHJBc1N0cgUGcHJBc0lkCQACAQIJV3IgYXNzZXRzBApvcmRlclByaWNlCAUFb3JkZXIFcHJpY2UECHByaWNlRGNtCQBrAwUGc2NhbGU4BQdwckFzRGNtBQhhbXRBc0RjbQQOY2FzdE9yZGVyUHJpY2UJAQJ0cwMFCm9yZGVyUHJpY2UFBnNjYWxlOAUIcHJpY2VEY20EEWlzT3JkZXJQcmljZVZhbGlkAwkAAAIIBQVvcmRlcglvcmRlclR5cGUFA0J1eQkAZwIFCGN1clByaWNlBQ5jYXN0T3JkZXJQcmljZQkAZwIFDmNhc3RPcmRlclByaWNlBQhjdXJQcmljZQYBAmNnAQFpAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIKMSBwbW50IGV4cAQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAECnBtdEFzc2V0SWQJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAQGcG10QW10CAUDcG10BmFtb3VudAQBcgkBA2VnbwQJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAkA2AQBBQpwbXRBc3NldElkBQZwbXRBbXQIBQFpBmNhbGxlcgQIb3V0QW1BbXQIBQFyAl8xBAhvdXRQckFtdAgFAXICXzIEA3N0cwkBDXBhcnNlSW50VmFsdWUBCAUBcgJfOQQFc3RhdGUIBQFyA18xMAMDCQEDaWdzAAYJAAACBQNzdHMFDFBvb2xTaHV0ZG93bgkAAgEJAKwCAgIPQWRtaW4gYmxvY2tlZDogCQCkAwEFA3N0cwkAlwoFBQhvdXRBbUFtdAUIb3V0UHJBbXQFBnBtdEFtdAUKcG10QXNzZXRJZAUFc3RhdGUBAmNwCQZjYWxsZXIEdHhJZAdhbUFzUG10B3ByQXNQbXQIc2xpcHBhZ2UGZW1pdExwCmlzT25lQXNzZXQGcG10QW10BXBtdElkBAFyCQEDZXBvDAUEdHhJZAUIc2xpcHBhZ2UICQEFdmFsdWUBBQdhbUFzUG10BmFtb3VudAgJAQV2YWx1ZQEFB2FtQXNQbXQHYXNzZXRJZAgJAQV2YWx1ZQEFB3ByQXNQbXQGYW1vdW50CAkBBXZhbHVlAQUHcHJBc1BtdAdhc3NldElkBQZjYWxsZXIHBQZlbWl0THAFCmlzT25lQXNzZXQFBnBtdEFtdAUFcG10SWQEA3N0cwkBDXBhcnNlSW50VmFsdWUBCAUBcgJfOAMDAwkBA2lncwAGCQAAAgUDc3RzBQpQb29sUHV0RGlzBgkAAAIFA3N0cwUMUG9vbFNodXRkb3duCQACAQkArAICAghCbG9ja2VkOgkApAMBBQNzdHMFAXIBAW0ABAckbWF0Y2gwCQCiCAEJAQNtcGsAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkA2QQBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgECcG0ABAckbWF0Y2gwCQCiCAEJAQRwbXBrAAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJANkEAQUBcwMJAAECBQckbWF0Y2gwAgRVbml0BQR1bml0CQACAQILTWF0Y2ggZXJyb3IAAnBkCQACAQIRUGVybWlzc2lvbiBkZW5pZWQBAm1tAQFpBAckbWF0Y2gwCQEBbQADCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCcGsFByRtYXRjaDADCQAAAggFAWkPY2FsbGVyUHVibGljS2V5BQJwawYFAnBkAwkAAQIFByRtYXRjaDACBFVuaXQDCQAAAggFAWkGY2FsbGVyBQR0aGlzBgUCcGQJAAIBAgtNYXRjaCBlcnJvchgBaQELY29uc3RydWN0b3IBAmZjBAFjCQECbW0BBQFpAwkAAAIFAWMFAWMJAMwIAgkBC1N0cmluZ0VudHJ5AgkBAmZjAAUCZmMFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQpzZXRNYW5hZ2VyARdwZW5kaW5nTWFuYWdlclB1YmxpY0tleQQBYwkBAm1tAQUBaQMJAAACBQFjBQFjBAJjbQkA2QQBBRdwZW5kaW5nTWFuYWdlclB1YmxpY0tleQMJAAACBQJjbQUCY20JAMwIAgkBC1N0cmluZ0VudHJ5AgkBBHBtcGsABRdwZW5kaW5nTWFuYWdlclB1YmxpY0tleQUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBDmNvbmZpcm1NYW5hZ2VyAAQBcAkBAnBtAAQDaHBtAwkBCWlzRGVmaW5lZAEFAXAGCQACAQISTm8gcGVuZGluZyBtYW5hZ2VyAwkAAAIFA2hwbQUDaHBtBANjcG0DCQAAAggFAWkPY2FsbGVyUHVibGljS2V5CQEFdmFsdWUBBQFwBgkAAgECG1lvdSBhcmUgbm90IHBlbmRpbmcgbWFuYWdlcgMJAAACBQNjcG0FA2NwbQkAzAgCCQELU3RyaW5nRW50cnkCCQEDbXBrAAkA2AQBCQEFdmFsdWUBBQFwCQDMCAIJAQtEZWxldGVFbnRyeQEJAQRwbXBrAAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBA3B1dAIEc2xpcAlhdXRvU3Rha2UEB2ZhY3RDZmcJAQNnZmMABAtzdGFraW5nQ250cgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUHZmFjdENmZwUPaWR4RmFjdFN0YWtDbnRyAgpXciBzdCBhZGRyBAhzbGlwQ250cgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUHZmFjdENmZwUQaWR4RmFjdFNsaXBwQ250cgIKV3Igc2wgYWRkcgMJAGYCAAAFBHNsaXAJAAIBAg5Xcm9uZyBzbGlwcGFnZQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAgkAAgECDDIgcG1udHMgZXhwZAQBZQkBAmNwCQkApQgBCAUBaQZjYWxsZXIJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAkBD0F0dGFjaGVkUGF5bWVudAIICQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAgJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQJAJEDAggFAWkIcGF5bWVudHMAAQUEc2xpcAYHAAACAAQJZW1pdExwQW10CAUBZQJfMgQJbHBBc3NldElkCAUBZQJfNwQFc3RhdGUIBQFlAl85BAZhbURpZmYIBQFlA18xMAQGcHJEaWZmCAUBZQNfMTEEBGFtSWQIBQFlA18xMgQEcHJJZAgFAWUDXzEzBAFyCQD8BwQFA2ZjYQIEZW1pdAkAzAgCBQllbWl0THBBbXQFA25pbAUDbmlsAwkAAAIFAXIFAXIEAmVsBAckbWF0Y2gwBQFyAwkAAQIFByRtYXRjaDACB0FkZHJlc3MEBmxlZ2FjeQUHJG1hdGNoMAkA/AcEBQZsZWdhY3kCBGVtaXQJAMwIAgUJZW1pdExwQW10BQNuaWwFA25pbAUEdW5pdAMJAAACBQJlbAUCZWwEAnNhAwkAZgIFBmFtRGlmZgAACQD8BwQFCHNsaXBDbnRyAgNwdXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUEYW1JZAUGYW1EaWZmBQNuaWwFA25pbAMJAAACBQJzYQUCc2EEAnNwAwkAZgIFBnByRGlmZgAACQD8BwQFCHNsaXBDbnRyAgNwdXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUEcHJJZAUGcHJEaWZmBQNuaWwFA25pbAMJAAACBQJzcAUCc3AECGxwVHJuc2ZyAwUJYXV0b1N0YWtlBAJzcwkA/AcEBQtzdGFraW5nQ250cgIFc3Rha2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUJbHBBc3NldElkBQllbWl0THBBbXQFA25pbAMJAAACBQJzcwUCc3MFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFCWVtaXRMcEFtdAUJbHBBc3NldElkBQNuaWwJAM4IAgUFc3RhdGUFCGxwVHJuc2ZyCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCXB1dE9uZVRrbgULYW1Bc3NldFBhcnQLcHJBc3NldFBhcnQFb3V0THAIc2xpcHBhZ2UJYXV0b1N0YWtlBANjZmcJAQNnZmMABAtzdGFraW5nQ250cgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUDY2ZnBQ9pZHhGYWN0U3Rha0NudHICCldyIHN0IGFkZHIECHNsaXBDbnRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQNjZmcFEGlkeEZhY3RTbGlwcENudHICCldyIHNsIGFkZHIEB2d3eENudHIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFA2NmZwURaWR4RmFjdEd3eFJld0NudHICC1dyIGd3eCBhZGRyBAdwb29sQ2ZnCQEDZ3BjAAQEYW1JZAkAkQMCBQdwb29sQ2ZnBQlpZHhBbUFzSWQEBHBySWQJAJEDAgUHcG9vbENmZwUJaWR4UHJBc0lkBAVhbURjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3Bvb2xDZmcFC2lkeEFtdEFzRGNtBAVwckRjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3Bvb2xDZmcFDWlkeFByaWNlQXNEY20EBWFkZG9uCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJAQNhZGEAAgAEC3VzZXJBZGRyZXNzAwkAAAIFBWFkZG9uCQClCAEIBQFpBmNhbGxlcggFAWkMb3JpZ2luQ2FsbGVyCAUBaQZjYWxsZXIEDWFkZG9uQ29udHJhY3QJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBA2FkYQACCW5vIGFkZG9ucwIaYWRkb24gYWRkcmVzcyBpbiBub3QgdmFsaWQEBWNoZWNrCQD9BwQFDWFkZG9uQ29udHJhY3QCEmVuc3VyZUNhblB1dE9uZVRrbgkAzAgCCQClCAEFC3VzZXJBZGRyZXNzBQNuaWwFA25pbAMJAAACBQVjaGVjawUFY2hlY2sDAwMDCQBnAgAABQhzbGlwcGFnZQYJAGcCAAAFC2FtQXNzZXRQYXJ0BgkAZwIAAAULcHJBc3NldFBhcnQGCQBnAgAABQVvdXRMcAkAAgECDFdyb25nIHBhcmFtcwMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECCzEgcG1udCBleHBkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQKcG10QXNzZXRJZAkA2AQBCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQEBnBtdEFtdAgFA3BtdAZhbW91bnQDCQBmAgCAreIEBQZwbXRBbXQJAAIBAg1Xcm9uZyBwbXQgYW10BAlhbUJhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUEYW1JZAQJcHJCYWxhbmNlCQENZ2V0QWNjQmFsYW5jZQEFBHBySWQEDSR0MDI1MjY4MjU4NDQDCQAAAgUKcG10QXNzZXRJZAUEYW1JZAMDCQBmAgUGcG10QW10BQlhbUJhbGFuY2UGCQBmAgULYW1Bc3NldFBhcnQFBnBtdEFtdAkAAgECFmludmFsaWQgcGF5bWVudCBhbW91bnQJAJgKBgkAZQIFCWFtQmFsYW5jZQUGcG10QW10BQlwckJhbGFuY2UJAGUCBQZwbXRBbXQFC2FtQXNzZXRQYXJ0BQtwckFzc2V0UGFydAAAAAADCQAAAgUKcG10QXNzZXRJZAUEcHJJZAMDCQBmAgUGcG10QW10BQlwckJhbGFuY2UGCQBmAgULcHJBc3NldFBhcnQFBnBtdEFtdAkAAgECFmludmFsaWQgcGF5bWVudCBhbW91bnQJAJgKBgUJYW1CYWxhbmNlCQBlAgUJcHJCYWxhbmNlBQZwbXRBbXQAAAAACQBlAgUGcG10QW10BQtwckFzc2V0UGFydAULYW1Bc3NldFBhcnQJAAIBAhB3cm9uZyBwbXRBc3NldElkBAxhbUJhbGFuY2VOb3cIBQ0kdDAyNTI2ODI1ODQ0Al8xBAxwckJhbGFuY2VOb3cIBQ0kdDAyNTI2ODI1ODQ0Al8yBAx2aXJ0U3dhcEluQW0IBQ0kdDAyNTI2ODI1ODQ0Al8zBA12aXJ0U3dhcE91dFByCAUNJHQwMjUyNjgyNTg0NAJfNAQMdmlydFN3YXBJblByCAUNJHQwMjUyNjgyNTg0NAJfNQQNdmlydFN3YXBPdXRBbQgFDSR0MDI1MjY4MjU4NDQCXzYEAkQwCQD8BwQFB2d3eENudHICBWNhbGNECQDMCAIJAKQDAQUMYW1CYWxhbmNlTm93CQDMCAIJAKQDAQUMcHJCYWxhbmNlTm93CQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgUFRGNvbnYFA25pbAUDbmlsBAJEMQkA/AcEBQdnd3hDbnRyAgVjYWxjRAkAzAgCCQCmAwEJALYCAQkAZQIJAGQCBQxhbUJhbGFuY2VOb3cFDHZpcnRTd2FwSW5BbQUNdmlydFN3YXBPdXRBbQkAzAgCCQCmAwEJALYCAQkAZQIJAGQCBQxwckJhbGFuY2VOb3cFDHZpcnRTd2FwSW5QcgUNdmlydFN3YXBPdXRQcgkAzAgCBQFBCQDMCAIFBUFtdWx0CQDMCAIFBURjb252BQNuaWwFA25pbAQGRDB2c0QxCQECdmQDCQCnAwEJAQNzdHIBBQJEMQkApwMBCQEDc3RyAQUCRDAFCnNsaXBwYWdlNEQDCQAAAgUGRDB2c0QxBQZEMHZzRDEEBmVzdFB1dAkBAmNwCQkApQgBCAUBaQZjYWxsZXIJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUEYW1JZAULYW1Bc3NldFBhcnQJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFBHBySWQFC3ByQXNzZXRQYXJ0BQhzbGlwcGFnZQYGBQZwbXRBbXQFCnBtdEFzc2V0SWQEB2VzdGltTFAIBQZlc3RQdXQCXzIECWxwQXNzZXRJZAgFBmVzdFB1dAJfNwQFc3RhdGUIBQZlc3RQdXQCXzkEBmFtRGlmZggFBmVzdFB1dANfMTAEBnByRGlmZggFBmVzdFB1dANfMTEECWxwQ2FsY1JlcwkBA3ZhZAMJALYCAQUHZXN0aW1MUAkAtgIBBQVvdXRMcAkAtgIBBQhzbGlwcGFnZQQJZW1pdExwQW10CQCgAwEIBQlscENhbGNSZXMCXzIEAWUJAPwHBAUDZmNhAgRlbWl0CQDMCAIFCWVtaXRMcEFtdAUDbmlsBQNuaWwDCQAAAgUBZQUBZQQCZWwEByRtYXRjaDAFAWUDCQABAgUHJG1hdGNoMAIHQWRkcmVzcwQGbGVnYWN5BQckbWF0Y2gwCQD8BwQFBmxlZ2FjeQIEZW1pdAkAzAgCBQllbWl0THBBbXQFA25pbAUDbmlsBQR1bml0AwkAAAIFAmVsBQJlbAQCc2EDCQBmAgUGYW1EaWZmAAAJAPwHBAUIc2xpcENudHICA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFBGFtSWQFBmFtRGlmZgUDbmlsBQNuaWwDCQAAAgUCc2EFAnNhBAJzcAMJAGYCBQZwckRpZmYAAAkA/AcEBQhzbGlwQ250cgIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUEcHJJZAUGcHJEaWZmBQNuaWwFA25pbAMJAAACBQJzcAUCc3AECGxwVHJuc2ZyAwUJYXV0b1N0YWtlBAJzcwkA/AcEBQtzdGFraW5nQ250cgIFc3Rha2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUJbHBBc3NldElkBQllbWl0THBBbXQFA25pbAMJAAACBQJzcwUCc3MFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFCWVtaXRMcEFtdAUJbHBBc3NldElkBQNuaWwJAM4IAgUFc3RhdGUFCGxwVHJuc2ZyCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBC3B1dE9uZVRrblYyAwVvdXRMcAhzbGlwcGFnZQlhdXRvU3Rha2UDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAgsxIHBtbnQgZXhwZAQKcG9vbENvbmZpZwkBA2dwYwAEBGFtSWQJAJEDAgUKcG9vbENvbmZpZwUJaWR4QW1Bc0lkBARwcklkCQCRAwIFCnBvb2xDb25maWcFCWlkeFByQXNJZAQKYW1EZWNpbWFscwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCnBvb2xDb25maWcFC2lkeEFtdEFzRGNtBApwckRlY2ltYWxzCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKcG9vbENvbmZpZwUNaWR4UHJpY2VBc0RjbQQLdXNlckFkZHJlc3MDCQAAAggFAWkGY2FsbGVyBQR0aGlzCAUBaQxvcmlnaW5DYWxsZXIIBQFpBmNhbGxlcgQDcG10CQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAECnBtdEFzc2V0SWQJANgEAQkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAZwbXRBbXQIBQNwbXQGYW1vdW50AwkAZgIAgK3iBAUGcG10QW10CQACAQINV3JvbmcgcG10IGFtdAQJYW1CYWxhbmNlCQENZ2V0QWNjQmFsYW5jZQEFBGFtSWQECXByQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQRwcklkBA0kdDAyODYwODI4OTgyAwkAAAIFCnBtdEFzc2V0SWQFBGFtSWQDCQBmAgUGcG10QW10BQlhbUJhbGFuY2UJAAIBAhZpbnZhbGlkIHBheW1lbnQgYW1vdW50CQCUCgIJAGUCBQlhbUJhbGFuY2UFBnBtdEFtdAUJcHJCYWxhbmNlAwkAAAIFCnBtdEFzc2V0SWQFBHBySWQDCQBmAgUGcG10QW10BQlwckJhbGFuY2UJAAIBAhZpbnZhbGlkIHBheW1lbnQgYW1vdW50CQCUCgIFCWFtQmFsYW5jZQkAZQIFCXByQmFsYW5jZQUGcG10QW10CQACAQIQd3JvbmcgcG10QXNzZXRJZAQMYW1CYWxhbmNlTm93CAUNJHQwMjg2MDgyODk4MgJfMQQMcHJCYWxhbmNlTm93CAUNJHQwMjg2MDgyODk4MgJfMgQNJHQwMjg5ODYyOTEyMAMJAAACBQpwbXRBc3NldElkBQRhbUlkCQCUCgIFDGFtQmFsYW5jZU5vdwUMcHJCYWxhbmNlTm93CQCUCgIFDHByQmFsYW5jZU5vdwUMYW1CYWxhbmNlTm93BBBhbUJhbGFuY2VGb3JDYWxjCAUNJHQwMjg5ODYyOTEyMAJfMQQQcHJCYWxhbmNlRm9yQ2FsYwgFDSR0MDI4OTg2MjkxMjACXzIECnhQcmVjaXNpb24AAQQGcmVzdWx0CgABQAkA/AcEBQtnd3hDb250cmFjdAIMY2FsY1B1dFhPbmx5CQDMCAIJAKQDAQUGcG10QW10CQDMCAIJAKQDAQUQYW1CYWxhbmNlRm9yQ2FsYwkAzAgCCQCkAwEFEHByQmFsYW5jZUZvckNhbGMJAMwIAgIACQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgkApAMBBQp4UHJlY2lzaW9uCQDMCAIFBURjb252BQNuaWwFA25pbAMJAAECBQFAAgooSW50LCBJbnQpBQFACQACAQkArAICCQADAQkA/AcEBQtnd3hDb250cmFjdAIMY2FsY1B1dFhPbmx5CQDMCAIJAKQDAQUGcG10QW10CQDMCAIJAKQDAQUQYW1CYWxhbmNlRm9yQ2FsYwkAzAgCCQCkAwEFEHByQmFsYW5jZUZvckNhbGMJAMwIAgIACQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgkApAMBBQp4UHJlY2lzaW9uCQDMCAIFBURjb252BQNuaWwFA25pbAIfIGNvdWxkbid0IGJlIGNhc3QgdG8gKEludCwgSW50KQQNJHQwMjk1ODkyOTY4NQMJAAACBQpwbXRBc3NldElkBQRhbUlkBQZyZXN1bHQJAJQKAggFBnJlc3VsdAJfMggFBnJlc3VsdAJfMQQLYW1Bc3NldFBhcnQIBQ0kdDAyOTU4OTI5Njg1Al8xBAtwckFzc2V0UGFydAgFDSR0MDI5NTg5Mjk2ODUCXzIEBmVzdFB1dAkBAmNwCQkApQgBCAUBaQZjYWxsZXIJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUEYW1JZAULYW1Bc3NldFBhcnQJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFBHBySWQFC3ByQXNzZXRQYXJ0BQhzbGlwcGFnZQYGBQZwbXRBbXQFCnBtdEFzc2V0SWQEB2VzdGltTFAIBQZlc3RQdXQCXzIECWxwQXNzZXRJZAgFBmVzdFB1dAJfNwQFc3RhdGUIBQZlc3RQdXQCXzkEBmFtRGlmZggFBmVzdFB1dANfMTAEBnByRGlmZggFBmVzdFB1dANfMTEECWVtaXRMcEFtdAMJAGYCBQVvdXRMcAAABAlscENhbGNSZXMJAQN2YWQDCQC2AgEFB2VzdGltTFAJALYCAQUFb3V0THAJALYCAQUIc2xpcHBhZ2UJAKADAQgFCWxwQ2FsY1JlcwJfMgUHZXN0aW1MUAQBZQkA/AcEBQNmY2ECBGVtaXQJAMwIAgUJZW1pdExwQW10BQNuaWwFA25pbAMJAAACBQFlBQFlBAJlbAQHJG1hdGNoMAUBZQMJAAECBQckbWF0Y2gwAgdBZGRyZXNzBAZsZWdhY3kFByRtYXRjaDAJAPwHBAUGbGVnYWN5AgRlbWl0CQDMCAIFCWVtaXRMcEFtdAUDbmlsBQNuaWwFBHVuaXQDCQAAAgUCZWwFAmVsBAJzYQMJAGYCBQZhbURpZmYAAAkA/AcEBQ9zbGlwYWdlQ29udHJhY3QCA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFBGFtSWQFBmFtRGlmZgUDbmlsBQNuaWwDCQAAAgUCc2EFAnNhBAJzcAMJAGYCBQZwckRpZmYAAAkA/AcEBQ9zbGlwYWdlQ29udHJhY3QCA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFBHBySWQFBnByRGlmZgUDbmlsBQNuaWwDCQAAAgUCc3AFAnNwBAhscFRybnNmcgMFCWF1dG9TdGFrZQQCc3MJAPwHBAUPc3Rha2luZ0NvbnRyYWN0AgVzdGFrZQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQlscEFzc2V0SWQFCWVtaXRMcEFtdAUDbmlsAwkAAAIFAnNzBQJzcwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUJZW1pdExwQW10BQlscEFzc2V0SWQFA25pbAkAzggCBQVzdGF0ZQUIbHBUcm5zZnIJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEKcHV0Rm9yRnJlZQEHbWF4U2xwZwMJAGYCAAAFB21heFNscGcJAAIBAgpXcm9uZyBzbHBnAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwACCQACAQIMMiBwbW50cyBleHBkBAZlc3RQdXQJAQJjcAkJAKUIAQgFAWkGY2FsbGVyCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQJAQ9BdHRhY2hlZFBheW1lbnQCCAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQICQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50CQCRAwIIBQFpCHBheW1lbnRzAAEFB21heFNscGcHBwAAAgAIBQZlc3RQdXQCXzkBaQEDZ2V0AAQBcgkBAmNnAQUBaQQJb3V0QW10QW10CAUBcgJfMQQIb3V0UHJBbXQIBQFyAl8yBAZwbXRBbXQIBQFyAl8zBApwbXRBc3NldElkCAUBcgJfNAQFc3RhdGUIBQFyAl81BAFiCQD8BwQFA2ZjYQIEYnVybgkAzAgCBQZwbXRBbXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUKcG10QXNzZXRJZAUGcG10QW10BQNuaWwDCQAAAgUBYgUBYgUFc3RhdGUJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEJZ2V0T25lVGtuBQpleGNoUmVzdWx0B25vdFVzZWQJb3V0QW1vdW50Cm91dEFzc2V0SWQIc2xpcHBhZ2UDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAgsxIHBtbnQgZXhwZAQDY2ZnCQEDZ3BjAAQEbHBJZAkAkQMCBQNjZmcFCWlkeExQQXNJZAQEYW1JZAkAkQMCBQNjZmcFCWlkeEFtQXNJZAQEcHJJZAkAkQMCBQNjZmcFCWlkeFByQXNJZAQFYW1EY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFC2lkeEFtdEFzRGNtBAVwckRjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwUNaWR4UHJpY2VBc0RjbQQDc3RzCQCRAwIFA2NmZwUJaWR4UG9vbFN0BAdmYWN0Q2ZnCQEDZ2ZjAAQHZ3d4Q250cgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUHZmFjdENmZwURaWR4RmFjdEd3eFJld0NudHICCldyIHNsIGFkZHIEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABAVhZGRvbgkBC3ZhbHVlT3JFbHNlAgkAnQgCBQR0aGlzCQEDYWRhAAIABAt1c2VyQWRkcmVzcwMJAAACBQVhZGRvbgkApQgBCAUBaQZjYWxsZXIIBQFpDG9yaWdpbkNhbGxlcggFAWkGY2FsbGVyBAZ0eElkNTgJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAQKcG10QXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAZwbXRBbXQIBQNwbXQGYW1vdW50BA1hZGRvbkNvbnRyYWN0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJAQNhZGEAAglubyBhZGRvbnMCGmFkZG9uIGFkZHJlc3MgaW4gbm90IHZhbGlkBAVjaGVjawkA/QcEBQ1hZGRvbkNvbnRyYWN0AhJlbnN1cmVDYW5HZXRPbmVUa24JAMwIAgkApQgBBQt1c2VyQWRkcmVzcwUDbmlsBQNuaWwDCQAAAgUFY2hlY2sFBWNoZWNrAwkAZgIAgJTr3AMFBnBtdEFtdAkAAgECDU1pbiBwbXQgMTAgTFADAwMJAGYCAAAFCHNsaXBwYWdlBgkAZgIAAAUKZXhjaFJlc3VsdAYJAGYCAAAFCW91dEFtb3VudAkAAgECDFdyb25nIHBhcmFtcwMJAQIhPQIFBGxwSWQJANgEAQUKcG10QXNzZXRJZAkAAgECCFdyb25nIExQBAFyCQEDZWdvBAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQDYBAEFCnBtdEFzc2V0SWQFBnBtdEFtdAgFAWkGY2FsbGVyBAplc3RpbUFtQW10CAUBcgJfMQQKZXN0aW1QckFtdAgFAXICXzIECWFtQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQRhbUlkBAlwckJhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUEcHJJZAQNJHQwMzQwNDkzNDUwNgMJAAACBQpvdXRBc3NldElkBQRhbUlkCQCZCgcJAGUCBQlhbUJhbGFuY2UFCmVzdGltQW1BbXQJAGUCBQlwckJhbGFuY2UFCmVzdGltUHJBbXQFCmV4Y2hSZXN1bHQFCmVzdGltUHJBbXQAAAAACQBkAgUKZXN0aW1BbUFtdAUKZXhjaFJlc3VsdAMJAAACBQpvdXRBc3NldElkBQRwcklkCQCZCgcJAGUCBQlhbUJhbGFuY2UFCmVzdGltQW1BbXQJAGUCBQlwckJhbGFuY2UFCmVzdGltUHJBbXQAAAAABQpleGNoUmVzdWx0BQplc3RpbUFtQW10CQBkAgUKZXN0aW1QckFtdAUKZXhjaFJlc3VsdAkAAgECEHdyb25nIG91dEFzc2V0SWQEDGFtQmFsYW5jZU5vdwgFDSR0MDM0MDQ5MzQ1MDYCXzEEDHByQmFsYW5jZU5vdwgFDSR0MDM0MDQ5MzQ1MDYCXzIEDHZpcnRTd2FwSW5BbQgFDSR0MDM0MDQ5MzQ1MDYCXzMEDXZpcnRTd2FwT3V0UHIIBQ0kdDAzNDA0OTM0NTA2Al80BAx2aXJ0U3dhcEluUHIIBQ0kdDAzNDA0OTM0NTA2Al81BA12aXJ0U3dhcE91dEFtCAUNJHQwMzQwNDkzNDUwNgJfNgQIdG90YWxHZXQIBQ0kdDAzNDA0OTM0NTA2Al83AwMJAGYCAAAFDHZpcnRTd2FwSW5BbQYJAGYCAAAFDHZpcnRTd2FwSW5QcgkAAgECCldyb25nIGNhbGMEAkQwCQD8BwQFB2d3eENudHICBWNhbGNECQDMCAIJAKQDAQUMYW1CYWxhbmNlTm93CQDMCAIJAKQDAQUMcHJCYWxhbmNlTm93CQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgUFRGNvbnYFA25pbAUDbmlsBAJEMQkA/AcEBQdnd3hDbnRyAgVjYWxjRAkAzAgCCQCkAwEJAGQCCQBlAgUMYW1CYWxhbmNlTm93BQx2aXJ0U3dhcEluQW0FDXZpcnRTd2FwT3V0QW0JAMwIAgkApAMBCQBlAgkAZAIFDHByQmFsYW5jZU5vdwUNdmlydFN3YXBPdXRQcgUMdmlydFN3YXBJblByCQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgUFRGNvbnYFA25pbAUDbmlsBAZEMHZzRDEJAQJ2ZAMJAKcDAQkBA3N0cgEFAkQxCQCnAwEJAQNzdHIBBQJEMAUKc2xpcHBhZ2U0RAMJAAACBQZEMHZzRDEFBkQwdnNEMQQIZmluYWxSZXMJAQN2YWQDCQC2AgEFCHRvdGFsR2V0CQC2AgEFCW91dEFtb3VudAkAtgIBBQhzbGlwcGFnZQMJAAACBQhmaW5hbFJlcwUIZmluYWxSZXMEDSR0MDM1MjExMzUzMTUDCQAAAgUKb3V0QXNzZXRJZAUEYW1JZAkAlAoCCQCgAwEIBQhmaW5hbFJlcwJfMgAACQCUCgIAAAkAoAMBCAUIZmluYWxSZXMCXzIEBW91dEFtCAUNJHQwMzUyMTEzNTMxNQJfMQQFb3V0UHIIBQ0kdDAzNTIxMTM1MzE1Al8yBAhjdXJQclgxOAkBBGNwYmkCCQECdDECBQlwckJhbGFuY2UFBXByRGNtCQECdDECBQlhbUJhbGFuY2UFBWFtRGNtBAVjdXJQcgkBAmYxAgUIY3VyUHJYMTgFBnNjYWxlOAQFc3RhdGUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwULdXNlckFkZHJlc3MJAGQCBQVvdXRBbQUFb3V0UHIDCQAAAgUKb3V0QXNzZXRJZAIFV0FWRVMFBHVuaXQJANkEAQUKb3V0QXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQEDZ2F1AgkApQgBBQt1c2VyQWRkcmVzcwUGdHhJZDU4CQERZGF0YUdldEFjdGlvbkluZm8GBQVvdXRBbQUFb3V0UHIFBnBtdEFtdAUFY3VyUHIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJwbAAFBWN1clByCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECcGgCBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQVjdXJQcgUDbmlsAwkAAAIFBXN0YXRlBQVzdGF0ZQQEYnVybgkA/AcEBQNmY2ECBGJ1cm4JAMwIAgUGcG10QW10BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCnBtdEFzc2V0SWQFBnBtdEFtdAUDbmlsAwkAAAIFBGJ1cm4FBGJ1cm4FBXN0YXRlCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBC2dldE9uZVRrblYyAwlvdXRBbW91bnQKb3V0QXNzZXRJZAhzbGlwcGFnZQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECCzEgcG1udCBleHBkBApwb29sQ29uZmlnCQEDZ3BjAAQEbHBJZAkAkQMCBQpwb29sQ29uZmlnBQlpZHhMUEFzSWQEBGFtSWQJAJEDAgUKcG9vbENvbmZpZwUJaWR4QW1Bc0lkBARwcklkCQCRAwIFCnBvb2xDb25maWcFCWlkeFByQXNJZAQKYW1EZWNpbWFscwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCnBvb2xDb25maWcFC2lkeEFtdEFzRGNtBApwckRlY2ltYWxzCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKcG9vbENvbmZpZwUNaWR4UHJpY2VBc0RjbQQKcG9vbFN0YXR1cwkAkQMCBQpwb29sQ29uZmlnBQlpZHhQb29sU3QEC3VzZXJBZGRyZXNzAwkAAAIIBQFpBmNhbGxlcgUEdGhpcwgFAWkMb3JpZ2luQ2FsbGVyCAUBaQZjYWxsZXIEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABApwbXRBc3NldElkCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQEBnBtdEFtdAgFA3BtdAZhbW91bnQDCQBmAgCAlOvcAwUGcG10QW10CQACAQINTWluIHBtdCAxMCBMUAQGdHhJZDU4CQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQDCQBmAgAABQhzbGlwcGFnZQkAAgECDFdyb25nIHBhcmFtcwMJAQIhPQIFBGxwSWQJANgEAQUKcG10QXNzZXRJZAkAAgECCFdyb25nIExQBAFyCQEDZWdvBAUGdHhJZDU4CQDYBAEFCnBtdEFzc2V0SWQFBnBtdEFtdAgFAWkGY2FsbGVyBAplc3RpbUFtQW10CAUBcgJfMQQKZXN0aW1QckFtdAgFAXICXzIECWFtQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQRhbUlkBAlwckJhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUEcHJJZAQMYW1CYWxhbmNlTm93CQBlAgUJYW1CYWxhbmNlBQplc3RpbUFtQW10BAxwckJhbGFuY2VOb3cJAGUCBQlwckJhbGFuY2UFCmVzdGltUHJBbXQEDSR0MDM3MTQxMzc0MTIDCQAAAgUKb3V0QXNzZXRJZAUEYW1JZAkAlQoDBQxwckJhbGFuY2VOb3cFDGFtQmFsYW5jZU5vdwUKZXN0aW1QckFtdAMJAAACBQpvdXRBc3NldElkBQRwcklkCQCVCgMFDGFtQmFsYW5jZU5vdwUMcHJCYWxhbmNlTm93BQplc3RpbUFtQW10CQACAQIQd3Jvbmcgb3V0QXNzZXRJZAQUYW1vdW50QmFsYW5jZUZvclN3YXAIBQ0kdDAzNzE0MTM3NDEyAl8xBBNwcmljZUJhbGFuY2VGb3JTd2FwCAUNJHQwMzcxNDEzNzQxMgJfMgQMYW1vdW50VG9Td2FwCAUNJHQwMzcxNDEzNzQxMgJfMwQKeVByZWNpc2lvbgABBApleGNoUmVzdWx0CgABQAkA/AcEBQtnd3hDb250cmFjdAIMY2FsY1N3YXBYVG9ZCQDMCAIJAKQDAQUMYW1vdW50VG9Td2FwCQDMCAIJAKQDAQUUYW1vdW50QmFsYW5jZUZvclN3YXAJAMwIAgkApAMBBRNwcmljZUJhbGFuY2VGb3JTd2FwCQDMCAICAAkAzAgCBQFBCQDMCAIFBUFtdWx0CQDMCAIJAKQDAQUKeVByZWNpc2lvbgkAzAgCBQVEY29udgUDbmlsBQNuaWwDCQABAgUBQAIDSW50BQFACQACAQkArAICCQADAQkA/AcEBQtnd3hDb250cmFjdAIMY2FsY1N3YXBYVG9ZCQDMCAIJAKQDAQUMYW1vdW50VG9Td2FwCQDMCAIJAKQDAQUUYW1vdW50QmFsYW5jZUZvclN3YXAJAMwIAgkApAMBBRNwcmljZUJhbGFuY2VGb3JTd2FwCQDMCAICAAkAzAgCBQFBCQDMCAIFBUFtdWx0CQDMCAIJAKQDAQUKeVByZWNpc2lvbgkAzAgCBQVEY29udgUDbmlsBQNuaWwCGCBjb3VsZG4ndCBiZSBjYXN0IHRvIEludAQIdG90YWxHZXQDCQAAAgUKb3V0QXNzZXRJZAUEYW1JZAkAZAIFCmVzdGltQW1BbXQFCmV4Y2hSZXN1bHQJAGQCBQplc3RpbVByQW10BQpleGNoUmVzdWx0BAhmaW5hbFJlcwMJAGYCBQlvdXRBbW91bnQAAAkBA3ZhZAMJALYCAQUIdG90YWxHZXQJALYCAQUJb3V0QW1vdW50CQC2AgEFCHNsaXBwYWdlCQCUCgIGCQC2AgEFCHRvdGFsR2V0BA0kdDAzODE1ODM4MjYxAwkAAAIFCm91dEFzc2V0SWQFBGFtSWQJAJQKAgkAoAMBCAUIZmluYWxSZXMCXzIAAAkAlAoCAAAJAKADAQgFCGZpbmFsUmVzAl8yBAVvdXRBbQgFDSR0MDM4MTU4MzgyNjECXzEEBW91dFByCAUNJHQwMzgxNTgzODI2MQJfMgQLdG90YWxBbW91bnQJAGQCBQVvdXRBbQUFb3V0UHIECGN1clByWDE4CQEEY3BiaQIJAQJ0MQIFCXByQmFsYW5jZQUKcHJEZWNpbWFscwkBAnQxAgUJYW1CYWxhbmNlBQphbURlY2ltYWxzBAVjdXJQcgkBAmYxAgUIY3VyUHJYMTgFBnNjYWxlOAQFc3RhdGUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwULdXNlckFkZHJlc3MFC3RvdGFsQW1vdW50AwkAAAIFCm91dEFzc2V0SWQCBVdBVkVTBQR1bml0CQDZBAEFCm91dEFzc2V0SWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBA2dhdQIJAKUIAQULdXNlckFkZHJlc3MFBnR4SWQ1OAkBEWRhdGFHZXRBY3Rpb25JbmZvBgUFb3V0QW0FBW91dFByBQZwbXRBbXQFBWN1clByBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECcGwABQVjdXJQcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAnBoAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUFY3VyUHIFA25pbAMJAAACBQVzdGF0ZQUFc3RhdGUEBGJ1cm4JAPwHBAUDZmNhAgRidXJuCQDMCAIFBnBtdEFtdAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQpwbXRBc3NldElkBQZwbXRBbXQFA25pbAMJAAACBQRidXJuBQRidXJuCQCUCgIFBXN0YXRlBQt0b3RhbEFtb3VudAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQlnZXROb0xlc3MCEm5vTGVzc1RoZW5BbXRBc3NldBRub0xlc3NUaGVuUHJpY2VBc3NldAQBcgkBAmNnAQUBaQQIb3V0QW1BbXQIBQFyAl8xBAhvdXRQckFtdAgFAXICXzIEBnBtdEFtdAgFAXICXzMECnBtdEFzc2V0SWQIBQFyAl80BAVzdGF0ZQgFAXICXzUDCQBmAgUSbm9MZXNzVGhlbkFtdEFzc2V0BQhvdXRBbUFtdAkAAgEJAKwCAgkArAICCQCsAgICCUZhaWxlZDogIAkApAMBBQhvdXRBbUFtdAIDIDwgCQCkAwEFEm5vTGVzc1RoZW5BbXRBc3NldAMJAGYCBRRub0xlc3NUaGVuUHJpY2VBc3NldAUIb3V0UHJBbXQJAAIBCQCsAgIJAKwCAgkArAICAghGYWlsZWQ6IAkApAMBBQhvdXRQckFtdAIDIDwgCQCkAwEFFG5vTGVzc1RoZW5QcmljZUFzc2V0BBRidXJuTFBBc3NldE9uRmFjdG9yeQkA/AcEBQNmY2ECBGJ1cm4JAMwIAgUGcG10QW10BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCnBtdEFzc2V0SWQFBnBtdEFtdAUDbmlsAwkAAAIFFGJ1cm5MUEFzc2V0T25GYWN0b3J5BRRidXJuTFBBc3NldE9uRmFjdG9yeQUFc3RhdGUJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQENdW5zdGFrZUFuZEdldAEGYW1vdW50BA1jaGVja1BheW1lbnRzAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQINTm8gcG1udHMgZXhwZAYDCQAAAgUNY2hlY2tQYXltZW50cwUNY2hlY2tQYXltZW50cwQDY2ZnCQEDZ3BjAAQKZmFjdG9yeUNmZwkBA2dmYwAECWxwQXNzZXRJZAkA2QQBCQCRAwIFA2NmZwUJaWR4TFBBc0lkBAdzdGFraW5nCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQpmYWN0b3J5Q2ZnBQ9pZHhGYWN0U3Rha0NudHICCldyIHN0IGFkZHIECnVuc3Rha2VJbnYJAPwHBAUHc3Rha2luZwIHdW5zdGFrZQkAzAgCCQDYBAEFCWxwQXNzZXRJZAkAzAgCBQZhbW91bnQFA25pbAUDbmlsAwkAAAIFCnVuc3Rha2VJbnYFCnVuc3Rha2VJbnYEAXIJAQNlZ28ECQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQJANgEAQUJbHBBc3NldElkBQZhbW91bnQIBQFpBmNhbGxlcgQDc3RzCQENcGFyc2VJbnRWYWx1ZQEIBQFyAl85BAVzdGF0ZQgFAXIDXzEwBAF2AwMJAQNpZ3MABgkAAAIFA3N0cwUMUG9vbFNodXRkb3duCQACAQkArAICAglCbG9ja2VkOiAJAKQDAQUDc3RzBgMJAAACBQF2BQF2BAVidXJuQQkA/AcEBQNmY2ECBGJ1cm4JAMwIAgUGYW1vdW50BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCWxwQXNzZXRJZAUGYW1vdW50BQNuaWwDCQAAAgUFYnVybkEFBWJ1cm5BBQVzdGF0ZQkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARN1bnN0YWtlQW5kR2V0T25lVGtuBAZhbW91bnQJb3V0QW1vdW50Cm91dEFzc2V0SWQIc2xpcHBhZ2UEDWNoZWNrUGF5bWVudHMDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAAJAAIBAg1ObyBwbW50cyBleHBkBgMJAAACBQ1jaGVja1BheW1lbnRzBQ1jaGVja1BheW1lbnRzBANjZmcJAQNncGMABApmYWN0b3J5Q2ZnCQEDZ2ZjAAQJbHBBc3NldElkCQDZBAEJAJEDAgUDY2ZnBQlpZHhMUEFzSWQEB3N0YWtpbmcJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFCmZhY3RvcnlDZmcFD2lkeEZhY3RTdGFrQ250cgIKV3Igc3QgYWRkcgQKdW5zdGFrZUludgkA/AcEBQdzdGFraW5nAgd1bnN0YWtlCQDMCAIJANgEAQUJbHBBc3NldElkCQDMCAIFBmFtb3VudAUDbmlsBQNuaWwDCQAAAgUKdW5zdGFrZUludgUKdW5zdGFrZUludgQPb3V0QW1vdW50UmVzdWx0CgABQAkA/AcEBQR0aGlzAgtnZXRPbmVUa25WMgkAzAgCBQlvdXRBbW91bnQJAMwIAgUKb3V0QXNzZXRJZAkAzAgCBQhzbGlwcGFnZQUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQlscEFzc2V0SWQFBmFtb3VudAUDbmlsAwkAAQIFAUACA0ludAUBQAUEdW5pdAMJAAACBQ9vdXRBbW91bnRSZXN1bHQFD291dEFtb3VudFJlc3VsdAkAlAoCBQNuaWwFD291dEFtb3VudFJlc3VsdAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQhhY3RpdmF0ZQIIYW10QXNTdHIHcHJBc1N0cgMJAQIhPQIJAKUIAQgFAWkGY2FsbGVyCQClCAEFA2ZjYQkAAgECBmRlbmllZAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJhYQAFCGFtdEFzU3RyCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQJwYQAFB3ByQXNTdHIFA25pbAIHc3VjY2VzcwFpAQRzZXRTAgFrAXYDCQECIT0CCQClCAEIBQFpBmNhbGxlcgkBBHN0cmYCBQR0aGlzCQEDYWRhAAUCcGQJAMwIAgkBC1N0cmluZ0VudHJ5AgUBawUBdgUDbmlsAWkBBHNldEkCAWsBdgMJAQIhPQIJAKUIAQgFAWkGY2FsbGVyCQEEc3RyZgIFBHRoaXMJAQNhZGEABQJwZAkAzAgCCQEMSW50ZWdlckVudHJ5AgUBawUBdgUDbmlsAWkBHGdldFBvb2xDb25maWdXcmFwcGVyUkVBRE9OTFkACQCUCgIFA25pbAkBA2dwYwABaQEcZ2V0QWNjQmFsYW5jZVdyYXBwZXJSRUFET05MWQEHYXNzZXRJZAkAlAoCBQNuaWwJAQ1nZXRBY2NCYWxhbmNlAQUHYXNzZXRJZAFpARljYWxjUHJpY2VzV3JhcHBlclJFQURPTkxZAwVhbUFtdAVwckFtdAVscEFtdAQCcHIJAQpjYWxjUHJpY2VzAwUFYW1BbXQFBXByQW10BQVscEFtdAkAlAoCBQNuaWwJAMwIAgkApgMBCQCRAwIFAnByAAAJAMwIAgkApgMBCQCRAwIFAnByAAEJAMwIAgkApgMBCQCRAwIFAnByAAIFA25pbAFpARZmcm9tWDE4V3JhcHBlclJFQURPTkxZAgN2YWwMcmVzU2NhbGVNdWx0CQCUCgIFA25pbAkBAmYxAgkApwMBBQN2YWwFDHJlc1NjYWxlTXVsdAFpARR0b1gxOFdyYXBwZXJSRUFET05MWQIHb3JpZ1ZhbA1vcmlnU2NhbGVNdWx0CQCUCgIFA25pbAkApgMBCQECdDECBQdvcmlnVmFsBQ1vcmlnU2NhbGVNdWx0AWkBHmNhbGNQcmljZUJpZ0ludFdyYXBwZXJSRUFET05MWQIIcHJBbXRYMTgIYW1BbXRYMTgJAJQKAgUDbmlsCQCmAwEJAQRjcGJpAgkApwMBBQhwckFtdFgxOAkApwMBBQhhbUFtdFgxOAFpASNlc3RpbWF0ZVB1dE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQkGdHhJZDU4CHNsaXBwYWdlB2luQW1BbXQGaW5BbUlkB2luUHJBbXQGaW5QcklkB3VzckFkZHIGaXNFdmFsBmVtaXRMcAkAlAoCBQNuaWwJAQNlcG8MBQZ0eElkNTgFCHNsaXBwYWdlBQdpbkFtQW10BQZpbkFtSWQFB2luUHJBbXQFBmluUHJJZAUHdXNyQWRkcgUGaXNFdmFsBQZlbWl0THAHAAACAAFpASNlc3RpbWF0ZUdldE9wZXJhdGlvbldyYXBwZXJSRUFET05MWQQGdHhJZDU4B3BtdEFzSWQIcG10THBBbXQHdXNyQWRkcgQBcgkBA2VnbwQFBnR4SWQ1OAUHcG10QXNJZAUIcG10THBBbXQJARFAZXh0ck5hdGl2ZSgxMDYyKQEFB3VzckFkZHIJAJQKAgUDbmlsCQCcCgoIBQFyAl8xCAUBcgJfMggFAXICXzMIBQFyAl80CAUBcgJfNQgFAXICXzYIBQFyAl83CQCmAwEIBQFyAl84CAUBcgJfOQgFAXIDXzEwAQJ0eAEGdmVyaWZ5AAQPdGFyZ2V0UHVibGljS2V5BAckbWF0Y2gwCQEBbQADCQABAgUHJG1hdGNoMAIKQnl0ZVZlY3RvcgQCcGsFByRtYXRjaDAFAnBrAwkAAQIFByRtYXRjaDACBFVuaXQIBQJ0eA9zZW5kZXJQdWJsaWNLZXkJAAIBAgtNYXRjaCBlcnJvcgQHJG1hdGNoMAUCdHgDCQABAgUHJG1hdGNoMAIFT3JkZXIEBW9yZGVyBQckbWF0Y2gwBAptYXRjaGVyUHViCQECbXAABApvcmRlclZhbGlkCQEDbW9hAQUFb3JkZXIEC3NlbmRlclZhbGlkCQD0AwMIBQVvcmRlcglib2R5Qnl0ZXMJAJEDAggFBW9yZGVyBnByb29mcwAACAUFb3JkZXIPc2VuZGVyUHVibGljS2V5BAxtYXRjaGVyVmFsaWQJAPQDAwgFBW9yZGVyCWJvZHlCeXRlcwkAkQMCCAUFb3JkZXIGcHJvb2ZzAAEFCm1hdGNoZXJQdWIDAwMFCm9yZGVyVmFsaWQFC3NlbmRlclZhbGlkBwUMbWF0Y2hlclZhbGlkBwYJAQN0b2UDBQpvcmRlclZhbGlkBQtzZW5kZXJWYWxpZAUMbWF0Y2hlclZhbGlkAwkAAQIFByRtYXRjaDACFFNldFNjcmlwdFRyYW5zYWN0aW9uBAFzBQckbWF0Y2gwBAduZXdIYXNoCQD2AwEJAQV2YWx1ZQEIBQFzBnNjcmlwdAQLYWxsb3dlZEhhc2gJANsEAQkBBXZhbHVlAQkAnQgCBQNmY2EJARxrZXlBbGxvd2VkTHBTdGFibGVTY3JpcHRIYXNoAAQLY3VycmVudEhhc2gJAPEHAQUEdGhpcwMDCQAAAgULYWxsb3dlZEhhc2gFB25ld0hhc2gJAQIhPQIFC2N1cnJlbnRIYXNoBQduZXdIYXNoBwYJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFD3RhcmdldFB1YmxpY0tleQkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUPdGFyZ2V0UHVibGljS2V5yX2dfA==", "height": 2228484, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: Fn1jxHky1XfdwMH3GU1odLUc6tv36rDTjaiyxy6Svp2V Next: HPTgsRShEbRWtJ58XCMatJAsh6Rj5ggKzNfUN1ML5s7N Diff:
OldNewDifferences
66 let scale8BigInt = toBigInt(100000000)
77
88 let scale18 = toBigInt(1000000000000000000)
9-
10-let thousand = 1000
119
1210 let zeroBigInt = toBigInt(0)
1311
5553
5654 let idxFactGwxRewCntr = 10
5755
58-let feePermilleDefault = 0
56+let delay = "%s__delay"
5957
6058 func t1 (origVal,origScaleMult) = fraction(toBigInt(origVal), scale18, toBigInt(origScaleMult))
6159
104102 func ada () = "%s__addonAddr"
105103
106104
107-let keyFeePermille = "%s__feePermille"
105+func lgotc (caller) = makeString(["%s%s__lastGetOneTknCall", caller], SEP)
108106
109-let feePermille = valueOrElse(getInteger(this, keyFeePermille), feePermilleDefault)
107+
108+func lsotc (caller) = makeString(["%s%s__lastPutOneTknCall", caller], SEP)
109+
110110
111111 func fcfg () = "%s__factoryConfig"
112112
124124
125125
126126 func keyAllowedLpStableScriptHash () = "%s__allowedLpStableScriptHash"
127-
128-
129-func keyFeeCollectorAddress () = "%s__feeCollectorAddress"
130127
131128
132129 func toe (orV,sendrV,matchV) = throw(((((("Failed: ordValid=" + toString(orV)) + " sndrValid=") + toString(sendrV)) + " mtchrValid=") + toString(matchV)))
156153 func mp () = fromBase58String(strf(fca, mtpk()))
157154
158155
159-let feeCollectorAddress = addressFromStringValue(strf(fca, keyFeeCollectorAddress()))
160-
161156 func gpc () = {
162157 let amtAs = strf(this, aa())
163158 let priceAs = strf(this, pa())
169164
170165 func gfc () = split(strf(fca, fcfg()), SEP)
171166
167+
168+let factoryConfig = gfc()
169+
170+let stakingContract = valueOrErrorMessage(addressFromString(factoryConfig[idxFactStakCntr]), "Invalid staking contract address")
171+
172+let slipageContract = valueOrErrorMessage(addressFromString(factoryConfig[idxFactSlippCntr]), "Invalid slipage contract address")
173+
174+let gwxContract = valueOrErrorMessage(addressFromString(factoryConfig[idxFactGwxRewCntr]), "Invalid gwx contract address")
172175
173176 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)
174177
342345 else calcLpAmt
343346 let amDiff = (inAmAmt - calcAmAssetPmt)
344347 let prDiff = (inPrAmt - calcPrAssetPmt)
345- let $t01568216027 = if (if (isOneAsset)
348+ let $t01601016355 = if (if (isOneAsset)
346349 then (pmtId == amIdStr)
347350 else false)
348351 then $Tuple2(pmtAmt, 0)
351354 else false)
352355 then $Tuple2(0, pmtAmt)
353356 else $Tuple2(calcAmAssetPmt, calcPrAssetPmt)
354- let writeAmAmt = $t01568216027._1
355- let writePrAmt = $t01568216027._2
357+ let writeAmAmt = $t01601016355._1
358+ let writePrAmt = $t01601016355._2
356359 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))]
357360 $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEm, lpId, sts, commonState, amDiff, prDiff, inAmId, inPrId)
358361 }
433436 else (sts == PoolShutdown))
434437 then throw(("Blocked:" + toString(sts)))
435438 else r
436- }
437-
438-
439-func takeFee (amount) = {
440- let fee = fraction(amount, feePermille, thousand)
441- $Tuple2((amount - fee), fee)
442439 }
443440
444441
599596 let userAddress = if ((addon == toString(i.caller)))
600597 then i.originCaller
601598 else i.caller
602- if (if (if (if ((0 >= slippage))
603- then true
604- else (0 >= amAssetPart))
605- then true
606- else (0 >= prAssetPart))
607- then true
608- else (0 >= outLp))
609- then throw("Wrong params")
610- else if ((size(i.payments) != 1))
611- then throw("1 pmnt expd")
599+ let addonContract = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(ada()), "no addons")), "addon address in not valid")
600+ let check = reentrantInvoke(addonContract, "ensureCanPutOneTkn", [toString(userAddress)], nil)
601+ if ((check == check))
602+ then if (if (if (if ((0 >= slippage))
603+ then true
604+ else (0 >= amAssetPart))
605+ then true
606+ else (0 >= prAssetPart))
607+ then true
608+ else (0 >= outLp))
609+ then throw("Wrong params")
610+ else if ((size(i.payments) != 1))
611+ then throw("1 pmnt expd")
612+ else {
613+ let pmt = value(i.payments[0])
614+ let pmtAssetId = toBase58String(value(pmt.assetId))
615+ let pmtAmt = pmt.amount
616+ if ((10000000 > pmtAmt))
617+ then throw("Wrong pmt amt")
618+ else {
619+ let amBalance = getAccBalance(amId)
620+ let prBalance = getAccBalance(prId)
621+ let $t02526825844 = 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)
627+ else if ((pmtAssetId == prId))
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)
633+ else throw("wrong pmtAssetId")
634+ let amBalanceNow = $t02526825844._1
635+ let prBalanceNow = $t02526825844._2
636+ let virtSwapInAm = $t02526825844._3
637+ let virtSwapOutPr = $t02526825844._4
638+ let virtSwapInPr = $t02526825844._5
639+ let virtSwapOutAm = $t02526825844._6
640+ let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
641+ let D1 = invoke(gwxCntr, "calcD", [toString(toBigInt(((amBalanceNow + virtSwapInAm) - virtSwapOutAm))), toString(toBigInt(((prBalanceNow + virtSwapInPr) - virtSwapOutPr))), A, Amult, Dconv], nil)
642+ let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
643+ if ((D0vsD1 == D0vsD1))
644+ then {
645+ let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), slippage, true, true, pmtAmt, pmtAssetId)
646+ let estimLP = estPut._2
647+ let lpAssetId = estPut._7
648+ let state = estPut._9
649+ let amDiff = estPut._10
650+ let prDiff = estPut._11
651+ let lpCalcRes = vad(toBigInt(estimLP), toBigInt(outLp), toBigInt(slippage))
652+ let emitLpAmt = toInt(lpCalcRes._2)
653+ let e = invoke(fca, "emit", [emitLpAmt], nil)
654+ if ((e == e))
655+ then {
656+ let el = match e {
657+ case legacy: Address =>
658+ invoke(legacy, "emit", [emitLpAmt], nil)
659+ case _ =>
660+ unit
661+ }
662+ if ((el == el))
663+ then {
664+ let sa = if ((amDiff > 0))
665+ then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
666+ else nil
667+ if ((sa == sa))
668+ then {
669+ let sp = if ((prDiff > 0))
670+ then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
671+ else nil
672+ if ((sp == sp))
673+ then {
674+ let lpTrnsfr = if (autoStake)
675+ then {
676+ let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
677+ if ((ss == ss))
678+ then nil
679+ else throw("Strict value is not equal to itself.")
680+ }
681+ else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
682+ (state ++ lpTrnsfr)
683+ }
684+ else throw("Strict value is not equal to itself.")
685+ }
686+ else throw("Strict value is not equal to itself.")
687+ }
688+ else throw("Strict value is not equal to itself.")
689+ }
690+ else throw("Strict value is not equal to itself.")
691+ }
692+ else throw("Strict value is not equal to itself.")
693+ }
694+ }
695+ else throw("Strict value is not equal to itself.")
696+ }
697+
698+
699+
700+@Callable(i)
701+func putOneTknV2 (outLp,slippage,autoStake) = if ((size(i.payments) != 1))
702+ then throw("1 pmnt expd")
703+ else {
704+ let poolConfig = gpc()
705+ let amId = poolConfig[idxAmAsId]
706+ let prId = poolConfig[idxPrAsId]
707+ let amDecimals = parseIntValue(poolConfig[idxAmtAsDcm])
708+ let prDecimals = parseIntValue(poolConfig[idxPriceAsDcm])
709+ let userAddress = if ((i.caller == this))
710+ then i.originCaller
711+ else i.caller
712+ let pmt = value(i.payments[0])
713+ let pmtAssetId = toBase58String(value(pmt.assetId))
714+ let pmtAmt = pmt.amount
715+ if ((10000000 > pmtAmt))
716+ then throw("Wrong pmt amt")
612717 else {
613- let pmt = value(i.payments[0])
614- let pmtAssetId = toBase58String(value(pmt.assetId))
615- let paymentAmountRaw = pmt.amount
616- let $t02464424696 = takeFee(paymentAmountRaw)
617- let pmtAmt = $t02464424696._1
618- let feeAmount = $t02464424696._2
619- if ((10000000 > paymentAmountRaw))
620- then throw("Wrong pmt amt")
621- else {
622- let amBalance = getAccBalance(amId)
623- let prBalance = getAccBalance(prId)
624- let $t02485625472 = if ((pmtAssetId == amId))
625- then if (if ((paymentAmountRaw > amBalance))
626- then true
627- else (amAssetPart > pmtAmt))
628- then throw("invalid payment amount")
629- else $Tuple6((amBalance - paymentAmountRaw), prBalance, (pmtAmt - amAssetPart), prAssetPart, 0, 0)
630- else if ((pmtAssetId == prId))
631- then if (if ((paymentAmountRaw > prBalance))
632- then true
633- else (prAssetPart > pmtAmt))
634- then throw("invalid payment amount")
635- else $Tuple6(amBalance, (prBalance - paymentAmountRaw), 0, 0, (pmtAmt - prAssetPart), amAssetPart)
636- else throw("wrong pmtAssetId")
637- let amBalanceNow = $t02485625472._1
638- let prBalanceNow = $t02485625472._2
639- let virtSwapInAm = $t02485625472._3
640- let virtSwapOutPr = $t02485625472._4
641- let virtSwapInPr = $t02485625472._5
642- let virtSwapOutAm = $t02485625472._6
643- let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
644- let D1 = invoke(gwxCntr, "calcD", [toString(toBigInt(((amBalanceNow + virtSwapInAm) - virtSwapOutAm))), toString(toBigInt(((prBalanceNow + virtSwapInPr) - virtSwapOutPr))), A, Amult, Dconv], nil)
645- let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
646- if ((D0vsD1 == D0vsD1))
718+ let amBalance = getAccBalance(amId)
719+ let prBalance = getAccBalance(prId)
720+ let $t02860828982 = if ((pmtAssetId == amId))
721+ then if ((pmtAmt > amBalance))
722+ then throw("invalid payment amount")
723+ else $Tuple2((amBalance - pmtAmt), prBalance)
724+ else if ((pmtAssetId == prId))
725+ then if ((pmtAmt > prBalance))
726+ then throw("invalid payment amount")
727+ else $Tuple2(amBalance, (prBalance - pmtAmt))
728+ else throw("wrong pmtAssetId")
729+ let amBalanceNow = $t02860828982._1
730+ let prBalanceNow = $t02860828982._2
731+ let $t02898629120 = if ((pmtAssetId == amId))
732+ then $Tuple2(amBalanceNow, prBalanceNow)
733+ else $Tuple2(prBalanceNow, amBalanceNow)
734+ let amBalanceForCalc = $t02898629120._1
735+ let prBalanceForCalc = $t02898629120._2
736+ let xPrecision = 1
737+ let result = {
738+ let @ = invoke(gwxContract, "calcPutXOnly", [toString(pmtAmt), toString(amBalanceForCalc), toString(prBalanceForCalc), "", A, Amult, toString(xPrecision), Dconv], nil)
739+ if ($isInstanceOf(@, "(Int, Int)"))
740+ then @
741+ else throw(($getType(invoke(gwxContract, "calcPutXOnly", [toString(pmtAmt), toString(amBalanceForCalc), toString(prBalanceForCalc), "", A, Amult, toString(xPrecision), Dconv], nil)) + " couldn't be cast to (Int, Int)"))
742+ }
743+ let $t02958929685 = if ((pmtAssetId == amId))
744+ then result
745+ else $Tuple2(result._2, result._1)
746+ let amAssetPart = $t02958929685._1
747+ let prAssetPart = $t02958929685._2
748+ let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), slippage, true, true, pmtAmt, pmtAssetId)
749+ let estimLP = estPut._2
750+ let lpAssetId = estPut._7
751+ let state = estPut._9
752+ let amDiff = estPut._10
753+ let prDiff = estPut._11
754+ let emitLpAmt = if ((outLp > 0))
755+ then {
756+ let lpCalcRes = vad(toBigInt(estimLP), toBigInt(outLp), toBigInt(slippage))
757+ toInt(lpCalcRes._2)
758+ }
759+ else estimLP
760+ let e = invoke(fca, "emit", [emitLpAmt], nil)
761+ if ((e == e))
762+ then {
763+ let el = match e {
764+ case legacy: Address =>
765+ invoke(legacy, "emit", [emitLpAmt], nil)
766+ case _ =>
767+ unit
768+ }
769+ if ((el == el))
647770 then {
648- let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), slippage, true, true, pmtAmt, pmtAssetId)
649- let estimLP = estPut._2
650- let lpAssetId = estPut._7
651- let state = estPut._9
652- let amDiff = estPut._10
653- let prDiff = estPut._11
654- let lpCalcRes = vad(toBigInt(estimLP), toBigInt(outLp), toBigInt(slippage))
655- let emitLpAmt = toInt(lpCalcRes._2)
656- let e = invoke(fca, "emit", [emitLpAmt], nil)
657- if ((e == e))
771+ let sa = if ((amDiff > 0))
772+ then invoke(slipageContract, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
773+ else nil
774+ if ((sa == sa))
658775 then {
659- let el = match e {
660- case legacy: Address =>
661- invoke(legacy, "emit", [emitLpAmt], nil)
662- case _ =>
663- unit
664- }
665- if ((el == el))
776+ let sp = if ((prDiff > 0))
777+ then invoke(slipageContract, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
778+ else nil
779+ if ((sp == sp))
666780 then {
667- let sa = if ((amDiff > 0))
668- then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
669- else nil
670- if ((sa == sa))
781+ let lpTrnsfr = if (autoStake)
671782 then {
672- let sp = if ((prDiff > 0))
673- then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
674- else nil
675- if ((sp == sp))
676- then {
677- let lpTrnsfr = if (autoStake)
678- then {
679- let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
680- if ((ss == ss))
681- then nil
682- else throw("Strict value is not equal to itself.")
683- }
684- else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
685- let sendFeeToMatcher = if ((feeAmount > 0))
686- then [ScriptTransfer(feeCollectorAddress, feeAmount, fromBase58String(pmtAssetId))]
687- else nil
688- ((state ++ lpTrnsfr) ++ sendFeeToMatcher)
689- }
783+ let ss = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
784+ if ((ss == ss))
785+ then nil
690786 else throw("Strict value is not equal to itself.")
691787 }
692- else throw("Strict value is not equal to itself.")
788+ else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
789+ (state ++ lpTrnsfr)
693790 }
694791 else throw("Strict value is not equal to itself.")
695792 }
697794 }
698795 else throw("Strict value is not equal to itself.")
699796 }
797+ else throw("Strict value is not equal to itself.")
700798 }
701- }
799+ }
702800
703801
704802
751849 let txId58 = toBase58String(i.transactionId)
752850 let pmtAssetId = value(pmt.assetId)
753851 let pmtAmt = pmt.amount
852+ let addonContract = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(ada()), "no addons")), "addon address in not valid")
853+ let check = reentrantInvoke(addonContract, "ensureCanGetOneTkn", [toString(userAddress)], nil)
854+ if ((check == check))
855+ then if ((1000000000 > pmtAmt))
856+ then throw("Min pmt 10 LP")
857+ else if (if (if ((0 > slippage))
858+ then true
859+ else (0 > exchResult))
860+ then true
861+ else (0 > outAmount))
862+ then throw("Wrong params")
863+ else if ((lpId != toBase58String(pmtAssetId)))
864+ then throw("Wrong LP")
865+ else {
866+ let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
867+ let estimAmAmt = r._1
868+ let estimPrAmt = r._2
869+ let amBalance = getAccBalance(amId)
870+ let prBalance = getAccBalance(prId)
871+ let $t03404934506 = if ((outAssetId == amId))
872+ then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), exchResult, estimPrAmt, 0, 0, (estimAmAmt + exchResult))
873+ else if ((outAssetId == prId))
874+ then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), 0, 0, exchResult, estimAmAmt, (estimPrAmt + exchResult))
875+ else throw("wrong outAssetId")
876+ let amBalanceNow = $t03404934506._1
877+ let prBalanceNow = $t03404934506._2
878+ let virtSwapInAm = $t03404934506._3
879+ let virtSwapOutPr = $t03404934506._4
880+ let virtSwapInPr = $t03404934506._5
881+ let virtSwapOutAm = $t03404934506._6
882+ let totalGet = $t03404934506._7
883+ if (if ((0 > virtSwapInAm))
884+ then true
885+ else (0 > virtSwapInPr))
886+ then throw("Wrong calc")
887+ else {
888+ let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
889+ let D1 = invoke(gwxCntr, "calcD", [toString(((amBalanceNow - virtSwapInAm) + virtSwapOutAm)), toString(((prBalanceNow + virtSwapOutPr) - virtSwapInPr)), A, Amult, Dconv], nil)
890+ let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
891+ if ((D0vsD1 == D0vsD1))
892+ then {
893+ let finalRes = vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
894+ if ((finalRes == finalRes))
895+ then {
896+ let $t03521135315 = if ((outAssetId == amId))
897+ then $Tuple2(toInt(finalRes._2), 0)
898+ else $Tuple2(0, toInt(finalRes._2))
899+ let outAm = $t03521135315._1
900+ let outPr = $t03521135315._2
901+ let curPrX18 = cpbi(t1(prBalance, prDcm), t1(amBalance, amDcm))
902+ let curPr = f1(curPrX18, scale8)
903+ let state = [ScriptTransfer(userAddress, (outAm + outPr), if ((outAssetId == "WAVES"))
904+ then unit
905+ else fromBase58String(outAssetId)), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAm, outPr, pmtAmt, curPr, height, lastBlock.timestamp)), IntegerEntry(pl(), curPr), IntegerEntry(ph(height, lastBlock.timestamp), curPr)]
906+ if ((state == state))
907+ then {
908+ let burn = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
909+ if ((burn == burn))
910+ then state
911+ else throw("Strict value is not equal to itself.")
912+ }
913+ else throw("Strict value is not equal to itself.")
914+ }
915+ else throw("Strict value is not equal to itself.")
916+ }
917+ else throw("Strict value is not equal to itself.")
918+ }
919+ }
920+ else throw("Strict value is not equal to itself.")
921+ }
922+
923+
924+
925+@Callable(i)
926+func getOneTknV2 (outAmount,outAssetId,slippage) = if ((size(i.payments) != 1))
927+ then throw("1 pmnt expd")
928+ else {
929+ let poolConfig = gpc()
930+ let lpId = poolConfig[idxLPAsId]
931+ let amId = poolConfig[idxAmAsId]
932+ let prId = poolConfig[idxPrAsId]
933+ let amDecimals = parseIntValue(poolConfig[idxAmtAsDcm])
934+ let prDecimals = parseIntValue(poolConfig[idxPriceAsDcm])
935+ let poolStatus = poolConfig[idxPoolSt]
936+ let userAddress = if ((i.caller == this))
937+ then i.originCaller
938+ else i.caller
939+ let pmt = value(i.payments[0])
940+ let pmtAssetId = value(pmt.assetId)
941+ let pmtAmt = pmt.amount
754942 if ((1000000000 > pmtAmt))
755943 then throw("Min pmt 10 LP")
756- else if (if (if ((0 > slippage))
757- then true
758- else (0 > exchResult))
759- then true
760- else (0 > outAmount))
761- then throw("Wrong params")
762- else if ((lpId != toBase58String(pmtAssetId)))
763- then throw("Wrong LP")
764- else {
765- let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
766- let estimAmAmt = r._1
767- let estimPrAmt = r._2
768- let amBalance = getAccBalance(amId)
769- let prBalance = getAccBalance(prId)
770- let $t03041530875 = if ((outAssetId == amId))
771- then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), exchResult, estimPrAmt, 0, 0, (estimAmAmt + exchResult))
772- else if ((outAssetId == prId))
773- then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), 0, 0, exchResult, estimAmAmt, (estimPrAmt + exchResult))
774- else throw("wrong outAssetId")
775- let amBalanceNow = $t03041530875._1
776- let prBalanceNow = $t03041530875._2
777- let virtSwapInAm = $t03041530875._3
778- let virtSwapOutPr = $t03041530875._4
779- let virtSwapInPr = $t03041530875._5
780- let virtSwapOutAm = $t03041530875._6
781- let totalGetRaw = $t03041530875._7
782- if (if ((0 > virtSwapInAm))
783- then true
784- else (0 > virtSwapInPr))
785- then throw("Wrong calc")
786- else {
787- let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
788- let D1 = invoke(gwxCntr, "calcD", [toString(((amBalanceNow - virtSwapInAm) + virtSwapOutAm)), toString(((prBalanceNow + virtSwapOutPr) - virtSwapInPr)), A, Amult, Dconv], nil)
789- let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
790- if ((D0vsD1 == D0vsD1))
791- then {
792- let totalGet = takeFee(totalGetRaw)._1
793- let finalRes = vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
794- if ((finalRes == finalRes))
795- then {
796- let $t03162231726 = if ((outAssetId == amId))
797- then $Tuple2(toInt(finalRes._2), 0)
798- else $Tuple2(0, toInt(finalRes._2))
799- let outAm = $t03162231726._1
800- let outPr = $t03162231726._2
801- let totalAmount = (outAm + outPr)
802- let feeAmount = (totalGetRaw - totalGet)
803- let outAssetIdOrWaves = if ((outAssetId == "WAVES"))
804- then unit
805- else fromBase58String(outAssetId)
806- let sendFeeToMatcher = if ((feeAmount > 0))
807- then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetIdOrWaves)]
808- else nil
809- let curPrX18 = cpbi(t1(prBalance, prDcm), t1(amBalance, amDcm))
810- let curPr = f1(curPrX18, scale8)
811- 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)]
812- if ((state == state))
813- then {
814- let burn = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
815- if ((burn == burn))
816- then (state ++ sendFeeToMatcher)
817- else throw("Strict value is not equal to itself.")
818- }
819- else throw("Strict value is not equal to itself.")
820- }
821- else throw("Strict value is not equal to itself.")
822- }
823- else throw("Strict value is not equal to itself.")
944+ else {
945+ let txId58 = toBase58String(i.transactionId)
946+ if ((0 > slippage))
947+ then throw("Wrong params")
948+ else if ((lpId != toBase58String(pmtAssetId)))
949+ then throw("Wrong LP")
950+ else {
951+ let r = ego(txId58, toBase58String(pmtAssetId), pmtAmt, i.caller)
952+ let estimAmAmt = r._1
953+ let estimPrAmt = r._2
954+ let amBalance = getAccBalance(amId)
955+ let prBalance = getAccBalance(prId)
956+ let amBalanceNow = (amBalance - estimAmAmt)
957+ let prBalanceNow = (prBalance - estimPrAmt)
958+ let $t03714137412 = if ((outAssetId == amId))
959+ then $Tuple3(prBalanceNow, amBalanceNow, estimPrAmt)
960+ else if ((outAssetId == prId))
961+ then $Tuple3(amBalanceNow, prBalanceNow, estimAmAmt)
962+ else throw("wrong outAssetId")
963+ let amountBalanceForSwap = $t03714137412._1
964+ let priceBalanceForSwap = $t03714137412._2
965+ let amountToSwap = $t03714137412._3
966+ let yPrecision = 1
967+ let exchResult = {
968+ let @ = invoke(gwxContract, "calcSwapXToY", [toString(amountToSwap), toString(amountBalanceForSwap), toString(priceBalanceForSwap), "", A, Amult, toString(yPrecision), Dconv], nil)
969+ if ($isInstanceOf(@, "Int"))
970+ then @
971+ else throw(($getType(invoke(gwxContract, "calcSwapXToY", [toString(amountToSwap), toString(amountBalanceForSwap), toString(priceBalanceForSwap), "", A, Amult, toString(yPrecision), Dconv], nil)) + " couldn't be cast to Int"))
824972 }
825- }
973+ let totalGet = if ((outAssetId == amId))
974+ then (estimAmAmt + exchResult)
975+ else (estimPrAmt + exchResult)
976+ let finalRes = if ((outAmount > 0))
977+ then vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
978+ else $Tuple2(true, toBigInt(totalGet))
979+ let $t03815838261 = if ((outAssetId == amId))
980+ then $Tuple2(toInt(finalRes._2), 0)
981+ else $Tuple2(0, toInt(finalRes._2))
982+ let outAm = $t03815838261._1
983+ let outPr = $t03815838261._2
984+ let totalAmount = (outAm + outPr)
985+ let curPrX18 = cpbi(t1(prBalance, prDecimals), t1(amBalance, amDecimals))
986+ let curPr = f1(curPrX18, scale8)
987+ let state = [ScriptTransfer(userAddress, totalAmount, if ((outAssetId == "WAVES"))
988+ then unit
989+ else fromBase58String(outAssetId)), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAm, outPr, pmtAmt, curPr, height, lastBlock.timestamp)), IntegerEntry(pl(), curPr), IntegerEntry(ph(height, lastBlock.timestamp), curPr)]
990+ if ((state == state))
991+ then {
992+ let burn = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
993+ if ((burn == burn))
994+ then $Tuple2(state, totalAmount)
995+ else throw("Strict value is not equal to itself.")
996+ }
997+ else throw("Strict value is not equal to itself.")
998+ }
999+ }
8261000 }
8271001
8281002
8781052 then state
8791053 else throw("Strict value is not equal to itself.")
8801054 }
1055+ else throw("Strict value is not equal to itself.")
1056+ }
1057+ else throw("Strict value is not equal to itself.")
1058+ }
1059+ else throw("Strict value is not equal to itself.")
1060+ }
1061+
1062+
1063+
1064+@Callable(i)
1065+func unstakeAndGetOneTkn (amount,outAmount,outAssetId,slippage) = {
1066+ let checkPayments = if ((size(i.payments) != 0))
1067+ then throw("No pmnts expd")
1068+ else true
1069+ if ((checkPayments == checkPayments))
1070+ then {
1071+ let cfg = gpc()
1072+ let factoryCfg = gfc()
1073+ let lpAssetId = fromBase58String(cfg[idxLPAsId])
1074+ let staking = valueOrErrorMessage(addressFromString(factoryCfg[idxFactStakCntr]), "Wr st addr")
1075+ let unstakeInv = invoke(staking, "unstake", [toBase58String(lpAssetId), amount], nil)
1076+ if ((unstakeInv == unstakeInv))
1077+ then {
1078+ let outAmountResult = {
1079+ let @ = invoke(this, "getOneTknV2", [outAmount, outAssetId, slippage], [AttachedPayment(lpAssetId, amount)])
1080+ if ($isInstanceOf(@, "Int"))
1081+ then @
1082+ else unit
1083+ }
1084+ if ((outAmountResult == outAmountResult))
1085+ then $Tuple2(nil, outAmountResult)
8811086 else throw("Strict value is not equal to itself.")
8821087 }
8831088 else throw("Strict value is not equal to itself.")
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let scale8 = 100000000
55
66 let scale8BigInt = toBigInt(100000000)
77
88 let scale18 = toBigInt(1000000000000000000)
9-
10-let thousand = 1000
119
1210 let zeroBigInt = toBigInt(0)
1311
1412 let oneBigInt = toBigInt(1)
1513
1614 let slippage4D = toBigInt((scale8 - ((scale8 * 1) / scale8)))
1715
1816 let Amult = "100"
1917
2018 let Dconv = "1"
2119
2220 let SEP = "__"
2321
2422 let EMPTY = ""
2523
2624 let PoolActive = 1
2725
2826 let PoolPutDis = 2
2927
3028 let PoolMatcherDis = 3
3129
3230 let PoolShutdown = 4
3331
3432 let idxPoolAddress = 1
3533
3634 let idxPoolSt = 2
3735
3836 let idxLPAsId = 3
3937
4038 let idxAmAsId = 4
4139
4240 let idxPrAsId = 5
4341
4442 let idxAmtAsDcm = 6
4543
4644 let idxPriceAsDcm = 7
4745
4846 let idxIAmtAsId = 8
4947
5048 let idxIPriceAsId = 9
5149
5250 let idxFactStakCntr = 1
5351
5452 let idxFactSlippCntr = 7
5553
5654 let idxFactGwxRewCntr = 10
5755
58-let feePermilleDefault = 0
56+let delay = "%s__delay"
5957
6058 func t1 (origVal,origScaleMult) = fraction(toBigInt(origVal), scale18, toBigInt(origScaleMult))
6159
6260
6361 func f1 (val,resultScaleMult) = toInt(fraction(val, toBigInt(resultScaleMult), scale18))
6462
6563
6664 func ts (amt,resScale,curScale) = fraction(amt, resScale, curScale)
6765
6866
6967 func abs (val) = if ((zeroBigInt > val))
7068 then -(val)
7169 else val
7270
7371
7472 func fc () = "%s__factoryContract"
7573
7674
7775 func mpk () = "%s__managerPublicKey"
7876
7977
8078 func pmpk () = "%s__pendingManagerPublicKey"
8179
8280
8381 func pl () = "%s%s__price__last"
8482
8583
8684 func ph (h,t) = makeString(["%s%s%d%d__price__history", toString(h), toString(t)], SEP)
8785
8886
8987 func pau (ua,txId) = ((("%s%s%s__P__" + ua) + "__") + txId)
9088
9189
9290 func gau (ua,txId) = ((("%s%s%s__G__" + ua) + "__") + txId)
9391
9492
9593 func aa () = "%s__amountAsset"
9694
9795
9896 func pa () = "%s__priceAsset"
9997
10098
10199 func amp () = "%s__amp"
102100
103101
104102 func ada () = "%s__addonAddr"
105103
106104
107-let keyFeePermille = "%s__feePermille"
105+func lgotc (caller) = makeString(["%s%s__lastGetOneTknCall", caller], SEP)
108106
109-let feePermille = valueOrElse(getInteger(this, keyFeePermille), feePermilleDefault)
107+
108+func lsotc (caller) = makeString(["%s%s__lastPutOneTknCall", caller], SEP)
109+
110110
111111 func fcfg () = "%s__factoryConfig"
112112
113113
114114 func mtpk () = "%s%s__matcher__publicKey"
115115
116116
117117 func pc (iAmtAs,iPrAs) = (((("%d%d%s__" + iAmtAs) + "__") + iPrAs) + "__config")
118118
119119
120120 func mba (bAStr) = ("%s%s%s__mappings__baseAsset2internalId__" + bAStr)
121121
122122
123123 func aps () = "%s__shutdown"
124124
125125
126126 func keyAllowedLpStableScriptHash () = "%s__allowedLpStableScriptHash"
127-
128-
129-func keyFeeCollectorAddress () = "%s__feeCollectorAddress"
130127
131128
132129 func toe (orV,sendrV,matchV) = throw(((((("Failed: ordValid=" + toString(orV)) + " sndrValid=") + toString(sendrV)) + " mtchrValid=") + toString(matchV)))
133130
134131
135132 func str (val) = match val {
136133 case valStr: String =>
137134 valStr
138135 case _ =>
139136 throw("fail cast to String")
140137 }
141138
142139
143140 func strf (addr,key) = valueOrErrorMessage(getString(addr, key), makeString(["mandatory ", toString(addr), ".", key, " not defined"], ""))
144141
145142
146143 func intf (addr,key) = valueOrErrorMessage(getInteger(addr, key), makeString(["mandatory ", toString(addr), ".", key, " not defined"], ""))
147144
148145
149146 let fca = addressFromStringValue(strf(this, fc()))
150147
151148 let A = strf(this, amp())
152149
153150 func igs () = valueOrElse(getBoolean(fca, aps()), false)
154151
155152
156153 func mp () = fromBase58String(strf(fca, mtpk()))
157154
158155
159-let feeCollectorAddress = addressFromStringValue(strf(fca, keyFeeCollectorAddress()))
160-
161156 func gpc () = {
162157 let amtAs = strf(this, aa())
163158 let priceAs = strf(this, pa())
164159 let iPriceAs = intf(fca, mba(priceAs))
165160 let iAmtAs = intf(fca, mba(amtAs))
166161 split(strf(fca, pc(toString(iAmtAs), toString(iPriceAs))), SEP)
167162 }
168163
169164
170165 func gfc () = split(strf(fca, fcfg()), SEP)
171166
167+
168+let factoryConfig = gfc()
169+
170+let stakingContract = valueOrErrorMessage(addressFromString(factoryConfig[idxFactStakCntr]), "Invalid staking contract address")
171+
172+let slipageContract = valueOrErrorMessage(addressFromString(factoryConfig[idxFactSlippCntr]), "Invalid slipage contract address")
173+
174+let gwxContract = valueOrErrorMessage(addressFromString(factoryConfig[idxFactGwxRewCntr]), "Invalid gwx contract address")
172175
173176 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)
174177
175178
176179 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)
177180
178181
179182 func getAccBalance (assetId) = if ((assetId == "WAVES"))
180183 then wavesBalance(this).available
181184 else assetBalance(this, fromBase58String(assetId))
182185
183186
184187 func cpbi (prAmtX18,amAmtX18) = fraction(prAmtX18, scale18, amAmtX18)
185188
186189
187190 func vad (A1,A2,slippage) = {
188191 let diff = fraction((A1 - A2), scale8BigInt, A2)
189192 let pass = ((slippage - abs(diff)) > zeroBigInt)
190193 if (!(pass))
191194 then throw(("Big slpg: " + toString(diff)))
192195 else $Tuple2(pass, min([A1, A2]))
193196 }
194197
195198
196199 func vd (D1,D0,slpg) = {
197200 let diff = fraction(D0, scale8BigInt, D1)
198201 let fail = (slpg > diff)
199202 if (if (fail)
200203 then true
201204 else (D0 > D1))
202205 then throw(((((((toString(D0) + " ") + toString(D1)) + " ") + toString(diff)) + " ") + toString(slpg)))
203206 else fail
204207 }
205208
206209
207210 func pcp (amAssetDcm,prAssetDcm,amAmt,prAmt) = {
208211 let amtAsAmtX18 = t1(amAmt, amAssetDcm)
209212 let prAsAmtX18 = t1(prAmt, prAssetDcm)
210213 cpbi(prAsAmtX18, amtAsAmtX18)
211214 }
212215
213216
214217 func calcPrices (amAmt,prAmt,lpAmt) = {
215218 let cfg = gpc()
216219 let amtAsDcm = parseIntValue(cfg[idxAmtAsDcm])
217220 let prAsDcm = parseIntValue(cfg[idxPriceAsDcm])
218221 let priceX18 = pcp(amtAsDcm, prAsDcm, amAmt, prAmt)
219222 let amAmtX18 = t1(amAmt, amtAsDcm)
220223 let prAmtX18 = t1(prAmt, prAsDcm)
221224 let lpAmtX18 = t1(lpAmt, scale8)
222225 let lpPrInAmAsX18 = cpbi(amAmtX18, lpAmtX18)
223226 let lpPrInPrAsX18 = cpbi(prAmtX18, lpAmtX18)
224227 [priceX18, lpPrInAmAsX18, lpPrInPrAsX18]
225228 }
226229
227230
228231 func calculatePrices (amAmt,prAmt,lpAmt) = {
229232 let p = calcPrices(amAmt, prAmt, lpAmt)
230233 [f1(p[0], scale8), f1(p[1], scale8), f1(p[2], scale8)]
231234 }
232235
233236
234237 func ego (txId58,pmtAssetId,pmtLpAmt,userAddress) = {
235238 let cfg = gpc()
236239 let lpId = cfg[idxLPAsId]
237240 let amId = cfg[idxAmAsId]
238241 let prId = cfg[idxPrAsId]
239242 let amDcm = parseIntValue(cfg[idxAmtAsDcm])
240243 let prDcm = parseIntValue(cfg[idxPriceAsDcm])
241244 let sts = cfg[idxPoolSt]
242245 let lpEmiss = valueOrErrorMessage(assetInfo(fromBase58String(lpId)), "Wrong LP id").quantity
243246 if ((lpId != pmtAssetId))
244247 then throw("Wrong pmt asset")
245248 else {
246249 let amBalance = getAccBalance(amId)
247250 let amBalanceX18 = t1(amBalance, amDcm)
248251 let prBalance = getAccBalance(prId)
249252 let prBalanceX18 = t1(prBalance, prDcm)
250253 let curPriceX18 = cpbi(prBalanceX18, amBalanceX18)
251254 let curPrice = f1(curPriceX18, scale8)
252255 let pmtLpAmtX18 = t1(pmtLpAmt, scale8)
253256 let lpEmissX18 = t1(lpEmiss, scale8)
254257 let outAmAmtX18 = fraction(amBalanceX18, pmtLpAmtX18, lpEmissX18)
255258 let outPrAmtX18 = fraction(prBalanceX18, pmtLpAmtX18, lpEmissX18)
256259 let outAmAmt = f1(outAmAmtX18, amDcm)
257260 let outPrAmt = f1(outPrAmtX18, prDcm)
258261 let state = if ((txId58 == ""))
259262 then nil
260263 else [ScriptTransfer(userAddress, outAmAmt, if ((amId == "WAVES"))
261264 then unit
262265 else fromBase58String(amId)), ScriptTransfer(userAddress, outPrAmt, if ((prId == "WAVES"))
263266 then unit
264267 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)]
265268 $Tuple10(outAmAmt, outPrAmt, amId, prId, amBalance, prBalance, lpEmiss, curPriceX18, sts, state)
266269 }
267270 }
268271
269272
270273 func epo (txId58,slippage,inAmAmt,inAmId,inPrAmt,inPrId,userAddress,isEval,emitLp,isOneAsset,pmtAmt,pmtId) = {
271274 let cfg = gpc()
272275 let lpId = fromBase58String(cfg[idxLPAsId])
273276 let amIdStr = cfg[idxAmAsId]
274277 let prIdStr = cfg[idxPrAsId]
275278 let inAmIdStr = cfg[idxIAmtAsId]
276279 let inPrIdStr = cfg[idxIPriceAsId]
277280 let amtDcm = parseIntValue(cfg[idxAmtAsDcm])
278281 let priceDcm = parseIntValue(cfg[idxPriceAsDcm])
279282 let sts = cfg[idxPoolSt]
280283 let lpEm = valueOrErrorMessage(assetInfo(lpId), "Wr lp as").quantity
281284 let amBalance = if (isEval)
282285 then getAccBalance(amIdStr)
283286 else if (if (isOneAsset)
284287 then (pmtId == amIdStr)
285288 else false)
286289 then (getAccBalance(amIdStr) - pmtAmt)
287290 else if (isOneAsset)
288291 then getAccBalance(amIdStr)
289292 else (getAccBalance(amIdStr) - inAmAmt)
290293 let prBalance = if (isEval)
291294 then getAccBalance(prIdStr)
292295 else if (if (isOneAsset)
293296 then (pmtId == prIdStr)
294297 else false)
295298 then (getAccBalance(prIdStr) - pmtAmt)
296299 else if (isOneAsset)
297300 then getAccBalance(prIdStr)
298301 else (getAccBalance(prIdStr) - inPrAmt)
299302 let inAmAssetAmtX18 = t1(inAmAmt, amtDcm)
300303 let inPrAssetAmtX18 = t1(inPrAmt, priceDcm)
301304 let userPriceX18 = cpbi(inPrAssetAmtX18, inAmAssetAmtX18)
302305 let amBalanceX18 = t1(amBalance, amtDcm)
303306 let prBalanceX18 = t1(prBalance, priceDcm)
304307 let r = if ((lpEm == 0))
305308 then {
306309 let curPriceX18 = zeroBigInt
307310 let slippageX18 = zeroBigInt
308311 let lpAmtX18 = pow((inAmAssetAmtX18 * inPrAssetAmtX18), 0, toBigInt(5), 1, 0, DOWN)
309312 $Tuple5(f1(lpAmtX18, scale8), f1(inAmAssetAmtX18, amtDcm), f1(inPrAssetAmtX18, priceDcm), cpbi((prBalanceX18 + inPrAssetAmtX18), (amBalanceX18 + inAmAssetAmtX18)), slippageX18)
310313 }
311314 else {
312315 let curPriceX18 = cpbi(prBalanceX18, amBalanceX18)
313316 let slippageRealX18 = fraction(abs((curPriceX18 - userPriceX18)), scale18, curPriceX18)
314317 let slippageX18 = t1(slippage, scale8)
315318 if (if ((curPriceX18 != zeroBigInt))
316319 then (slippageRealX18 > slippageX18)
317320 else false)
318321 then throw(((("Price slippage " + toString(slippageRealX18)) + " > ") + toString(slippageX18)))
319322 else {
320323 let lpEmissionX18 = t1(lpEm, scale8)
321324 let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
322325 let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
323326 let expectedAmts = if ((prViaAmX18 > inPrAssetAmtX18))
324327 then $Tuple2(amViaPrX18, inPrAssetAmtX18)
325328 else $Tuple2(inAmAssetAmtX18, prViaAmX18)
326329 let expAmtAssetAmtX18 = expectedAmts._1
327330 let expPriceAssetAmtX18 = expectedAmts._2
328331 let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18)
329332 $Tuple5(f1(lpAmtX18, scale8), f1(expAmtAssetAmtX18, amtDcm), f1(expPriceAssetAmtX18, priceDcm), curPriceX18, slippageX18)
330333 }
331334 }
332335 let calcLpAmt = r._1
333336 let calcAmAssetPmt = r._2
334337 let calcPrAssetPmt = r._3
335338 let curPrice = f1(r._4, scale8)
336339 let slippageCalc = f1(r._5, scale8)
337340 if ((0 >= calcLpAmt))
338341 then throw("LP <= 0")
339342 else {
340343 let emitLpAmt = if (!(emitLp))
341344 then 0
342345 else calcLpAmt
343346 let amDiff = (inAmAmt - calcAmAssetPmt)
344347 let prDiff = (inPrAmt - calcPrAssetPmt)
345- let $t01568216027 = if (if (isOneAsset)
348+ let $t01601016355 = if (if (isOneAsset)
346349 then (pmtId == amIdStr)
347350 else false)
348351 then $Tuple2(pmtAmt, 0)
349352 else if (if (isOneAsset)
350353 then (pmtId == prIdStr)
351354 else false)
352355 then $Tuple2(0, pmtAmt)
353356 else $Tuple2(calcAmAssetPmt, calcPrAssetPmt)
354- let writeAmAmt = $t01568216027._1
355- let writePrAmt = $t01568216027._2
357+ let writeAmAmt = $t01601016355._1
358+ let writePrAmt = $t01601016355._2
356359 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))]
357360 $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEm, lpId, sts, commonState, amDiff, prDiff, inAmId, inPrId)
358361 }
359362 }
360363
361364
362365 func moa (order) = {
363366 let cfg = gpc()
364367 let amtAsId = cfg[idxAmAsId]
365368 let prAsId = cfg[idxPrAsId]
366369 let sts = parseIntValue(cfg[idxPoolSt])
367370 let amtAsDcm = parseIntValue(cfg[idxAmtAsDcm])
368371 let prAsDcm = parseIntValue(cfg[idxPriceAsDcm])
369372 let accAmtAsBalance = getAccBalance(amtAsId)
370373 let accPrAsBalance = getAccBalance(prAsId)
371374 let curPriceX18 = if ((order.orderType == Buy))
372375 then pcp(amtAsDcm, prAsDcm, (accAmtAsBalance + order.amount), accPrAsBalance)
373376 else pcp(amtAsDcm, prAsDcm, (accAmtAsBalance - order.amount), accPrAsBalance)
374377 let curPrice = f1(curPriceX18, scale8)
375378 if (if (if (igs())
376379 then true
377380 else (sts == PoolMatcherDis))
378381 then true
379382 else (sts == PoolShutdown))
380383 then throw("Admin blocked")
381384 else {
382385 let orAmtAsset = order.assetPair.amountAsset
383386 let orAmtAsStr = if ((orAmtAsset == unit))
384387 then "WAVES"
385388 else toBase58String(value(orAmtAsset))
386389 let orPrAsset = order.assetPair.priceAsset
387390 let orPrAsStr = if ((orPrAsset == unit))
388391 then "WAVES"
389392 else toBase58String(value(orPrAsset))
390393 if (if ((orAmtAsStr != amtAsId))
391394 then true
392395 else (orPrAsStr != prAsId))
393396 then throw("Wr assets")
394397 else {
395398 let orderPrice = order.price
396399 let priceDcm = fraction(scale8, prAsDcm, amtAsDcm)
397400 let castOrderPrice = ts(orderPrice, scale8, priceDcm)
398401 let isOrderPriceValid = if ((order.orderType == Buy))
399402 then (curPrice >= castOrderPrice)
400403 else (castOrderPrice >= curPrice)
401404 true
402405 }
403406 }
404407 }
405408
406409
407410 func cg (i) = if ((size(i.payments) != 1))
408411 then throw("1 pmnt exp")
409412 else {
410413 let pmt = value(i.payments[0])
411414 let pmtAssetId = value(pmt.assetId)
412415 let pmtAmt = pmt.amount
413416 let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
414417 let outAmAmt = r._1
415418 let outPrAmt = r._2
416419 let sts = parseIntValue(r._9)
417420 let state = r._10
418421 if (if (igs())
419422 then true
420423 else (sts == PoolShutdown))
421424 then throw(("Admin blocked: " + toString(sts)))
422425 else $Tuple5(outAmAmt, outPrAmt, pmtAmt, pmtAssetId, state)
423426 }
424427
425428
426429 func cp (caller,txId,amAsPmt,prAsPmt,slippage,emitLp,isOneAsset,pmtAmt,pmtId) = {
427430 let r = epo(txId, slippage, value(amAsPmt).amount, value(amAsPmt).assetId, value(prAsPmt).amount, value(prAsPmt).assetId, caller, false, emitLp, isOneAsset, pmtAmt, pmtId)
428431 let sts = parseIntValue(r._8)
429432 if (if (if (igs())
430433 then true
431434 else (sts == PoolPutDis))
432435 then true
433436 else (sts == PoolShutdown))
434437 then throw(("Blocked:" + toString(sts)))
435438 else r
436- }
437-
438-
439-func takeFee (amount) = {
440- let fee = fraction(amount, feePermille, thousand)
441- $Tuple2((amount - fee), fee)
442439 }
443440
444441
445442 func m () = match getString(mpk()) {
446443 case s: String =>
447444 fromBase58String(s)
448445 case _: Unit =>
449446 unit
450447 case _ =>
451448 throw("Match error")
452449 }
453450
454451
455452 func pm () = match getString(pmpk()) {
456453 case s: String =>
457454 fromBase58String(s)
458455 case _: Unit =>
459456 unit
460457 case _ =>
461458 throw("Match error")
462459 }
463460
464461
465462 let pd = throw("Permission denied")
466463
467464 func mm (i) = match m() {
468465 case pk: ByteVector =>
469466 if ((i.callerPublicKey == pk))
470467 then true
471468 else pd
472469 case _: Unit =>
473470 if ((i.caller == this))
474471 then true
475472 else pd
476473 case _ =>
477474 throw("Match error")
478475 }
479476
480477
481478 @Callable(i)
482479 func constructor (fc) = {
483480 let c = mm(i)
484481 if ((c == c))
485482 then [StringEntry(fc(), fc)]
486483 else throw("Strict value is not equal to itself.")
487484 }
488485
489486
490487
491488 @Callable(i)
492489 func setManager (pendingManagerPublicKey) = {
493490 let c = mm(i)
494491 if ((c == c))
495492 then {
496493 let cm = fromBase58String(pendingManagerPublicKey)
497494 if ((cm == cm))
498495 then [StringEntry(pmpk(), pendingManagerPublicKey)]
499496 else throw("Strict value is not equal to itself.")
500497 }
501498 else throw("Strict value is not equal to itself.")
502499 }
503500
504501
505502
506503 @Callable(i)
507504 func confirmManager () = {
508505 let p = pm()
509506 let hpm = if (isDefined(p))
510507 then true
511508 else throw("No pending manager")
512509 if ((hpm == hpm))
513510 then {
514511 let cpm = if ((i.callerPublicKey == value(p)))
515512 then true
516513 else throw("You are not pending manager")
517514 if ((cpm == cpm))
518515 then [StringEntry(mpk(), toBase58String(value(p))), DeleteEntry(pmpk())]
519516 else throw("Strict value is not equal to itself.")
520517 }
521518 else throw("Strict value is not equal to itself.")
522519 }
523520
524521
525522
526523 @Callable(i)
527524 func put (slip,autoStake) = {
528525 let factCfg = gfc()
529526 let stakingCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactStakCntr]), "Wr st addr")
530527 let slipCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactSlippCntr]), "Wr sl addr")
531528 if ((0 > slip))
532529 then throw("Wrong slippage")
533530 else if ((size(i.payments) != 2))
534531 then throw("2 pmnts expd")
535532 else {
536533 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, "")
537534 let emitLpAmt = e._2
538535 let lpAssetId = e._7
539536 let state = e._9
540537 let amDiff = e._10
541538 let prDiff = e._11
542539 let amId = e._12
543540 let prId = e._13
544541 let r = invoke(fca, "emit", [emitLpAmt], nil)
545542 if ((r == r))
546543 then {
547544 let el = match r {
548545 case legacy: Address =>
549546 invoke(legacy, "emit", [emitLpAmt], nil)
550547 case _ =>
551548 unit
552549 }
553550 if ((el == el))
554551 then {
555552 let sa = if ((amDiff > 0))
556553 then invoke(slipCntr, "put", nil, [AttachedPayment(amId, amDiff)])
557554 else nil
558555 if ((sa == sa))
559556 then {
560557 let sp = if ((prDiff > 0))
561558 then invoke(slipCntr, "put", nil, [AttachedPayment(prId, prDiff)])
562559 else nil
563560 if ((sp == sp))
564561 then {
565562 let lpTrnsfr = if (autoStake)
566563 then {
567564 let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
568565 if ((ss == ss))
569566 then nil
570567 else throw("Strict value is not equal to itself.")
571568 }
572569 else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
573570 (state ++ lpTrnsfr)
574571 }
575572 else throw("Strict value is not equal to itself.")
576573 }
577574 else throw("Strict value is not equal to itself.")
578575 }
579576 else throw("Strict value is not equal to itself.")
580577 }
581578 else throw("Strict value is not equal to itself.")
582579 }
583580 }
584581
585582
586583
587584 @Callable(i)
588585 func putOneTkn (amAssetPart,prAssetPart,outLp,slippage,autoStake) = {
589586 let cfg = gfc()
590587 let stakingCntr = valueOrErrorMessage(addressFromString(cfg[idxFactStakCntr]), "Wr st addr")
591588 let slipCntr = valueOrErrorMessage(addressFromString(cfg[idxFactSlippCntr]), "Wr sl addr")
592589 let gwxCntr = valueOrErrorMessage(addressFromString(cfg[idxFactGwxRewCntr]), "Wr gwx addr")
593590 let poolCfg = gpc()
594591 let amId = poolCfg[idxAmAsId]
595592 let prId = poolCfg[idxPrAsId]
596593 let amDcm = parseIntValue(poolCfg[idxAmtAsDcm])
597594 let prDcm = parseIntValue(poolCfg[idxPriceAsDcm])
598595 let addon = valueOrElse(getString(this, ada()), "")
599596 let userAddress = if ((addon == toString(i.caller)))
600597 then i.originCaller
601598 else i.caller
602- if (if (if (if ((0 >= slippage))
603- then true
604- else (0 >= amAssetPart))
605- then true
606- else (0 >= prAssetPart))
607- then true
608- else (0 >= outLp))
609- then throw("Wrong params")
610- else if ((size(i.payments) != 1))
611- then throw("1 pmnt expd")
599+ let addonContract = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(ada()), "no addons")), "addon address in not valid")
600+ let check = reentrantInvoke(addonContract, "ensureCanPutOneTkn", [toString(userAddress)], nil)
601+ if ((check == check))
602+ then if (if (if (if ((0 >= slippage))
603+ then true
604+ else (0 >= amAssetPart))
605+ then true
606+ else (0 >= prAssetPart))
607+ then true
608+ else (0 >= outLp))
609+ then throw("Wrong params")
610+ else if ((size(i.payments) != 1))
611+ then throw("1 pmnt expd")
612+ else {
613+ let pmt = value(i.payments[0])
614+ let pmtAssetId = toBase58String(value(pmt.assetId))
615+ let pmtAmt = pmt.amount
616+ if ((10000000 > pmtAmt))
617+ then throw("Wrong pmt amt")
618+ else {
619+ let amBalance = getAccBalance(amId)
620+ let prBalance = getAccBalance(prId)
621+ let $t02526825844 = 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)
627+ else if ((pmtAssetId == prId))
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)
633+ else throw("wrong pmtAssetId")
634+ let amBalanceNow = $t02526825844._1
635+ let prBalanceNow = $t02526825844._2
636+ let virtSwapInAm = $t02526825844._3
637+ let virtSwapOutPr = $t02526825844._4
638+ let virtSwapInPr = $t02526825844._5
639+ let virtSwapOutAm = $t02526825844._6
640+ let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
641+ let D1 = invoke(gwxCntr, "calcD", [toString(toBigInt(((amBalanceNow + virtSwapInAm) - virtSwapOutAm))), toString(toBigInt(((prBalanceNow + virtSwapInPr) - virtSwapOutPr))), A, Amult, Dconv], nil)
642+ let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
643+ if ((D0vsD1 == D0vsD1))
644+ then {
645+ let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), slippage, true, true, pmtAmt, pmtAssetId)
646+ let estimLP = estPut._2
647+ let lpAssetId = estPut._7
648+ let state = estPut._9
649+ let amDiff = estPut._10
650+ let prDiff = estPut._11
651+ let lpCalcRes = vad(toBigInt(estimLP), toBigInt(outLp), toBigInt(slippage))
652+ let emitLpAmt = toInt(lpCalcRes._2)
653+ let e = invoke(fca, "emit", [emitLpAmt], nil)
654+ if ((e == e))
655+ then {
656+ let el = match e {
657+ case legacy: Address =>
658+ invoke(legacy, "emit", [emitLpAmt], nil)
659+ case _ =>
660+ unit
661+ }
662+ if ((el == el))
663+ then {
664+ let sa = if ((amDiff > 0))
665+ then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
666+ else nil
667+ if ((sa == sa))
668+ then {
669+ let sp = if ((prDiff > 0))
670+ then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
671+ else nil
672+ if ((sp == sp))
673+ then {
674+ let lpTrnsfr = if (autoStake)
675+ then {
676+ let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
677+ if ((ss == ss))
678+ then nil
679+ else throw("Strict value is not equal to itself.")
680+ }
681+ else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
682+ (state ++ lpTrnsfr)
683+ }
684+ else throw("Strict value is not equal to itself.")
685+ }
686+ else throw("Strict value is not equal to itself.")
687+ }
688+ else throw("Strict value is not equal to itself.")
689+ }
690+ else throw("Strict value is not equal to itself.")
691+ }
692+ else throw("Strict value is not equal to itself.")
693+ }
694+ }
695+ else throw("Strict value is not equal to itself.")
696+ }
697+
698+
699+
700+@Callable(i)
701+func putOneTknV2 (outLp,slippage,autoStake) = if ((size(i.payments) != 1))
702+ then throw("1 pmnt expd")
703+ else {
704+ let poolConfig = gpc()
705+ let amId = poolConfig[idxAmAsId]
706+ let prId = poolConfig[idxPrAsId]
707+ let amDecimals = parseIntValue(poolConfig[idxAmtAsDcm])
708+ let prDecimals = parseIntValue(poolConfig[idxPriceAsDcm])
709+ let userAddress = if ((i.caller == this))
710+ then i.originCaller
711+ else i.caller
712+ let pmt = value(i.payments[0])
713+ let pmtAssetId = toBase58String(value(pmt.assetId))
714+ let pmtAmt = pmt.amount
715+ if ((10000000 > pmtAmt))
716+ then throw("Wrong pmt amt")
612717 else {
613- let pmt = value(i.payments[0])
614- let pmtAssetId = toBase58String(value(pmt.assetId))
615- let paymentAmountRaw = pmt.amount
616- let $t02464424696 = takeFee(paymentAmountRaw)
617- let pmtAmt = $t02464424696._1
618- let feeAmount = $t02464424696._2
619- if ((10000000 > paymentAmountRaw))
620- then throw("Wrong pmt amt")
621- else {
622- let amBalance = getAccBalance(amId)
623- let prBalance = getAccBalance(prId)
624- let $t02485625472 = if ((pmtAssetId == amId))
625- then if (if ((paymentAmountRaw > amBalance))
626- then true
627- else (amAssetPart > pmtAmt))
628- then throw("invalid payment amount")
629- else $Tuple6((amBalance - paymentAmountRaw), prBalance, (pmtAmt - amAssetPart), prAssetPart, 0, 0)
630- else if ((pmtAssetId == prId))
631- then if (if ((paymentAmountRaw > prBalance))
632- then true
633- else (prAssetPart > pmtAmt))
634- then throw("invalid payment amount")
635- else $Tuple6(amBalance, (prBalance - paymentAmountRaw), 0, 0, (pmtAmt - prAssetPart), amAssetPart)
636- else throw("wrong pmtAssetId")
637- let amBalanceNow = $t02485625472._1
638- let prBalanceNow = $t02485625472._2
639- let virtSwapInAm = $t02485625472._3
640- let virtSwapOutPr = $t02485625472._4
641- let virtSwapInPr = $t02485625472._5
642- let virtSwapOutAm = $t02485625472._6
643- let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
644- let D1 = invoke(gwxCntr, "calcD", [toString(toBigInt(((amBalanceNow + virtSwapInAm) - virtSwapOutAm))), toString(toBigInt(((prBalanceNow + virtSwapInPr) - virtSwapOutPr))), A, Amult, Dconv], nil)
645- let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
646- if ((D0vsD1 == D0vsD1))
718+ let amBalance = getAccBalance(amId)
719+ let prBalance = getAccBalance(prId)
720+ let $t02860828982 = if ((pmtAssetId == amId))
721+ then if ((pmtAmt > amBalance))
722+ then throw("invalid payment amount")
723+ else $Tuple2((amBalance - pmtAmt), prBalance)
724+ else if ((pmtAssetId == prId))
725+ then if ((pmtAmt > prBalance))
726+ then throw("invalid payment amount")
727+ else $Tuple2(amBalance, (prBalance - pmtAmt))
728+ else throw("wrong pmtAssetId")
729+ let amBalanceNow = $t02860828982._1
730+ let prBalanceNow = $t02860828982._2
731+ let $t02898629120 = if ((pmtAssetId == amId))
732+ then $Tuple2(amBalanceNow, prBalanceNow)
733+ else $Tuple2(prBalanceNow, amBalanceNow)
734+ let amBalanceForCalc = $t02898629120._1
735+ let prBalanceForCalc = $t02898629120._2
736+ let xPrecision = 1
737+ let result = {
738+ let @ = invoke(gwxContract, "calcPutXOnly", [toString(pmtAmt), toString(amBalanceForCalc), toString(prBalanceForCalc), "", A, Amult, toString(xPrecision), Dconv], nil)
739+ if ($isInstanceOf(@, "(Int, Int)"))
740+ then @
741+ else throw(($getType(invoke(gwxContract, "calcPutXOnly", [toString(pmtAmt), toString(amBalanceForCalc), toString(prBalanceForCalc), "", A, Amult, toString(xPrecision), Dconv], nil)) + " couldn't be cast to (Int, Int)"))
742+ }
743+ let $t02958929685 = if ((pmtAssetId == amId))
744+ then result
745+ else $Tuple2(result._2, result._1)
746+ let amAssetPart = $t02958929685._1
747+ let prAssetPart = $t02958929685._2
748+ let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), slippage, true, true, pmtAmt, pmtAssetId)
749+ let estimLP = estPut._2
750+ let lpAssetId = estPut._7
751+ let state = estPut._9
752+ let amDiff = estPut._10
753+ let prDiff = estPut._11
754+ let emitLpAmt = if ((outLp > 0))
755+ then {
756+ let lpCalcRes = vad(toBigInt(estimLP), toBigInt(outLp), toBigInt(slippage))
757+ toInt(lpCalcRes._2)
758+ }
759+ else estimLP
760+ let e = invoke(fca, "emit", [emitLpAmt], nil)
761+ if ((e == e))
762+ then {
763+ let el = match e {
764+ case legacy: Address =>
765+ invoke(legacy, "emit", [emitLpAmt], nil)
766+ case _ =>
767+ unit
768+ }
769+ if ((el == el))
647770 then {
648- let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), slippage, true, true, pmtAmt, pmtAssetId)
649- let estimLP = estPut._2
650- let lpAssetId = estPut._7
651- let state = estPut._9
652- let amDiff = estPut._10
653- let prDiff = estPut._11
654- let lpCalcRes = vad(toBigInt(estimLP), toBigInt(outLp), toBigInt(slippage))
655- let emitLpAmt = toInt(lpCalcRes._2)
656- let e = invoke(fca, "emit", [emitLpAmt], nil)
657- if ((e == e))
771+ let sa = if ((amDiff > 0))
772+ then invoke(slipageContract, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
773+ else nil
774+ if ((sa == sa))
658775 then {
659- let el = match e {
660- case legacy: Address =>
661- invoke(legacy, "emit", [emitLpAmt], nil)
662- case _ =>
663- unit
664- }
665- if ((el == el))
776+ let sp = if ((prDiff > 0))
777+ then invoke(slipageContract, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
778+ else nil
779+ if ((sp == sp))
666780 then {
667- let sa = if ((amDiff > 0))
668- then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
669- else nil
670- if ((sa == sa))
781+ let lpTrnsfr = if (autoStake)
671782 then {
672- let sp = if ((prDiff > 0))
673- then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
674- else nil
675- if ((sp == sp))
676- then {
677- let lpTrnsfr = if (autoStake)
678- then {
679- let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
680- if ((ss == ss))
681- then nil
682- else throw("Strict value is not equal to itself.")
683- }
684- else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
685- let sendFeeToMatcher = if ((feeAmount > 0))
686- then [ScriptTransfer(feeCollectorAddress, feeAmount, fromBase58String(pmtAssetId))]
687- else nil
688- ((state ++ lpTrnsfr) ++ sendFeeToMatcher)
689- }
783+ let ss = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
784+ if ((ss == ss))
785+ then nil
690786 else throw("Strict value is not equal to itself.")
691787 }
692- else throw("Strict value is not equal to itself.")
788+ else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
789+ (state ++ lpTrnsfr)
693790 }
694791 else throw("Strict value is not equal to itself.")
695792 }
696793 else throw("Strict value is not equal to itself.")
697794 }
698795 else throw("Strict value is not equal to itself.")
699796 }
797+ else throw("Strict value is not equal to itself.")
700798 }
701- }
799+ }
702800
703801
704802
705803 @Callable(i)
706804 func putForFree (maxSlpg) = if ((0 > maxSlpg))
707805 then throw("Wrong slpg")
708806 else if ((size(i.payments) != 2))
709807 then throw("2 pmnts expd")
710808 else {
711809 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, "")
712810 estPut._9
713811 }
714812
715813
716814
717815 @Callable(i)
718816 func get () = {
719817 let r = cg(i)
720818 let outAmtAmt = r._1
721819 let outPrAmt = r._2
722820 let pmtAmt = r._3
723821 let pmtAssetId = r._4
724822 let state = r._5
725823 let b = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
726824 if ((b == b))
727825 then state
728826 else throw("Strict value is not equal to itself.")
729827 }
730828
731829
732830
733831 @Callable(i)
734832 func getOneTkn (exchResult,notUsed,outAmount,outAssetId,slippage) = if ((size(i.payments) != 1))
735833 then throw("1 pmnt expd")
736834 else {
737835 let cfg = gpc()
738836 let lpId = cfg[idxLPAsId]
739837 let amId = cfg[idxAmAsId]
740838 let prId = cfg[idxPrAsId]
741839 let amDcm = parseIntValue(cfg[idxAmtAsDcm])
742840 let prDcm = parseIntValue(cfg[idxPriceAsDcm])
743841 let sts = cfg[idxPoolSt]
744842 let factCfg = gfc()
745843 let gwxCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactGwxRewCntr]), "Wr sl addr")
746844 let pmt = value(i.payments[0])
747845 let addon = valueOrElse(getString(this, ada()), "")
748846 let userAddress = if ((addon == toString(i.caller)))
749847 then i.originCaller
750848 else i.caller
751849 let txId58 = toBase58String(i.transactionId)
752850 let pmtAssetId = value(pmt.assetId)
753851 let pmtAmt = pmt.amount
852+ let addonContract = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(ada()), "no addons")), "addon address in not valid")
853+ let check = reentrantInvoke(addonContract, "ensureCanGetOneTkn", [toString(userAddress)], nil)
854+ if ((check == check))
855+ then if ((1000000000 > pmtAmt))
856+ then throw("Min pmt 10 LP")
857+ else if (if (if ((0 > slippage))
858+ then true
859+ else (0 > exchResult))
860+ then true
861+ else (0 > outAmount))
862+ then throw("Wrong params")
863+ else if ((lpId != toBase58String(pmtAssetId)))
864+ then throw("Wrong LP")
865+ else {
866+ let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
867+ let estimAmAmt = r._1
868+ let estimPrAmt = r._2
869+ let amBalance = getAccBalance(amId)
870+ let prBalance = getAccBalance(prId)
871+ let $t03404934506 = if ((outAssetId == amId))
872+ then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), exchResult, estimPrAmt, 0, 0, (estimAmAmt + exchResult))
873+ else if ((outAssetId == prId))
874+ then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), 0, 0, exchResult, estimAmAmt, (estimPrAmt + exchResult))
875+ else throw("wrong outAssetId")
876+ let amBalanceNow = $t03404934506._1
877+ let prBalanceNow = $t03404934506._2
878+ let virtSwapInAm = $t03404934506._3
879+ let virtSwapOutPr = $t03404934506._4
880+ let virtSwapInPr = $t03404934506._5
881+ let virtSwapOutAm = $t03404934506._6
882+ let totalGet = $t03404934506._7
883+ if (if ((0 > virtSwapInAm))
884+ then true
885+ else (0 > virtSwapInPr))
886+ then throw("Wrong calc")
887+ else {
888+ let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
889+ let D1 = invoke(gwxCntr, "calcD", [toString(((amBalanceNow - virtSwapInAm) + virtSwapOutAm)), toString(((prBalanceNow + virtSwapOutPr) - virtSwapInPr)), A, Amult, Dconv], nil)
890+ let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
891+ if ((D0vsD1 == D0vsD1))
892+ then {
893+ let finalRes = vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
894+ if ((finalRes == finalRes))
895+ then {
896+ let $t03521135315 = if ((outAssetId == amId))
897+ then $Tuple2(toInt(finalRes._2), 0)
898+ else $Tuple2(0, toInt(finalRes._2))
899+ let outAm = $t03521135315._1
900+ let outPr = $t03521135315._2
901+ let curPrX18 = cpbi(t1(prBalance, prDcm), t1(amBalance, amDcm))
902+ let curPr = f1(curPrX18, scale8)
903+ let state = [ScriptTransfer(userAddress, (outAm + outPr), if ((outAssetId == "WAVES"))
904+ then unit
905+ else fromBase58String(outAssetId)), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAm, outPr, pmtAmt, curPr, height, lastBlock.timestamp)), IntegerEntry(pl(), curPr), IntegerEntry(ph(height, lastBlock.timestamp), curPr)]
906+ if ((state == state))
907+ then {
908+ let burn = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
909+ if ((burn == burn))
910+ then state
911+ else throw("Strict value is not equal to itself.")
912+ }
913+ else throw("Strict value is not equal to itself.")
914+ }
915+ else throw("Strict value is not equal to itself.")
916+ }
917+ else throw("Strict value is not equal to itself.")
918+ }
919+ }
920+ else throw("Strict value is not equal to itself.")
921+ }
922+
923+
924+
925+@Callable(i)
926+func getOneTknV2 (outAmount,outAssetId,slippage) = if ((size(i.payments) != 1))
927+ then throw("1 pmnt expd")
928+ else {
929+ let poolConfig = gpc()
930+ let lpId = poolConfig[idxLPAsId]
931+ let amId = poolConfig[idxAmAsId]
932+ let prId = poolConfig[idxPrAsId]
933+ let amDecimals = parseIntValue(poolConfig[idxAmtAsDcm])
934+ let prDecimals = parseIntValue(poolConfig[idxPriceAsDcm])
935+ let poolStatus = poolConfig[idxPoolSt]
936+ let userAddress = if ((i.caller == this))
937+ then i.originCaller
938+ else i.caller
939+ let pmt = value(i.payments[0])
940+ let pmtAssetId = value(pmt.assetId)
941+ let pmtAmt = pmt.amount
754942 if ((1000000000 > pmtAmt))
755943 then throw("Min pmt 10 LP")
756- else if (if (if ((0 > slippage))
757- then true
758- else (0 > exchResult))
759- then true
760- else (0 > outAmount))
761- then throw("Wrong params")
762- else if ((lpId != toBase58String(pmtAssetId)))
763- then throw("Wrong LP")
764- else {
765- let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
766- let estimAmAmt = r._1
767- let estimPrAmt = r._2
768- let amBalance = getAccBalance(amId)
769- let prBalance = getAccBalance(prId)
770- let $t03041530875 = if ((outAssetId == amId))
771- then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), exchResult, estimPrAmt, 0, 0, (estimAmAmt + exchResult))
772- else if ((outAssetId == prId))
773- then $Tuple7((amBalance - estimAmAmt), (prBalance - estimPrAmt), 0, 0, exchResult, estimAmAmt, (estimPrAmt + exchResult))
774- else throw("wrong outAssetId")
775- let amBalanceNow = $t03041530875._1
776- let prBalanceNow = $t03041530875._2
777- let virtSwapInAm = $t03041530875._3
778- let virtSwapOutPr = $t03041530875._4
779- let virtSwapInPr = $t03041530875._5
780- let virtSwapOutAm = $t03041530875._6
781- let totalGetRaw = $t03041530875._7
782- if (if ((0 > virtSwapInAm))
783- then true
784- else (0 > virtSwapInPr))
785- then throw("Wrong calc")
786- else {
787- let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
788- let D1 = invoke(gwxCntr, "calcD", [toString(((amBalanceNow - virtSwapInAm) + virtSwapOutAm)), toString(((prBalanceNow + virtSwapOutPr) - virtSwapInPr)), A, Amult, Dconv], nil)
789- let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
790- if ((D0vsD1 == D0vsD1))
791- then {
792- let totalGet = takeFee(totalGetRaw)._1
793- let finalRes = vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
794- if ((finalRes == finalRes))
795- then {
796- let $t03162231726 = if ((outAssetId == amId))
797- then $Tuple2(toInt(finalRes._2), 0)
798- else $Tuple2(0, toInt(finalRes._2))
799- let outAm = $t03162231726._1
800- let outPr = $t03162231726._2
801- let totalAmount = (outAm + outPr)
802- let feeAmount = (totalGetRaw - totalGet)
803- let outAssetIdOrWaves = if ((outAssetId == "WAVES"))
804- then unit
805- else fromBase58String(outAssetId)
806- let sendFeeToMatcher = if ((feeAmount > 0))
807- then [ScriptTransfer(feeCollectorAddress, feeAmount, outAssetIdOrWaves)]
808- else nil
809- let curPrX18 = cpbi(t1(prBalance, prDcm), t1(amBalance, amDcm))
810- let curPr = f1(curPrX18, scale8)
811- 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)]
812- if ((state == state))
813- then {
814- let burn = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
815- if ((burn == burn))
816- then (state ++ sendFeeToMatcher)
817- else throw("Strict value is not equal to itself.")
818- }
819- else throw("Strict value is not equal to itself.")
820- }
821- else throw("Strict value is not equal to itself.")
822- }
823- else throw("Strict value is not equal to itself.")
944+ else {
945+ let txId58 = toBase58String(i.transactionId)
946+ if ((0 > slippage))
947+ then throw("Wrong params")
948+ else if ((lpId != toBase58String(pmtAssetId)))
949+ then throw("Wrong LP")
950+ else {
951+ let r = ego(txId58, toBase58String(pmtAssetId), pmtAmt, i.caller)
952+ let estimAmAmt = r._1
953+ let estimPrAmt = r._2
954+ let amBalance = getAccBalance(amId)
955+ let prBalance = getAccBalance(prId)
956+ let amBalanceNow = (amBalance - estimAmAmt)
957+ let prBalanceNow = (prBalance - estimPrAmt)
958+ let $t03714137412 = if ((outAssetId == amId))
959+ then $Tuple3(prBalanceNow, amBalanceNow, estimPrAmt)
960+ else if ((outAssetId == prId))
961+ then $Tuple3(amBalanceNow, prBalanceNow, estimAmAmt)
962+ else throw("wrong outAssetId")
963+ let amountBalanceForSwap = $t03714137412._1
964+ let priceBalanceForSwap = $t03714137412._2
965+ let amountToSwap = $t03714137412._3
966+ let yPrecision = 1
967+ let exchResult = {
968+ let @ = invoke(gwxContract, "calcSwapXToY", [toString(amountToSwap), toString(amountBalanceForSwap), toString(priceBalanceForSwap), "", A, Amult, toString(yPrecision), Dconv], nil)
969+ if ($isInstanceOf(@, "Int"))
970+ then @
971+ else throw(($getType(invoke(gwxContract, "calcSwapXToY", [toString(amountToSwap), toString(amountBalanceForSwap), toString(priceBalanceForSwap), "", A, Amult, toString(yPrecision), Dconv], nil)) + " couldn't be cast to Int"))
824972 }
825- }
973+ let totalGet = if ((outAssetId == amId))
974+ then (estimAmAmt + exchResult)
975+ else (estimPrAmt + exchResult)
976+ let finalRes = if ((outAmount > 0))
977+ then vad(toBigInt(totalGet), toBigInt(outAmount), toBigInt(slippage))
978+ else $Tuple2(true, toBigInt(totalGet))
979+ let $t03815838261 = if ((outAssetId == amId))
980+ then $Tuple2(toInt(finalRes._2), 0)
981+ else $Tuple2(0, toInt(finalRes._2))
982+ let outAm = $t03815838261._1
983+ let outPr = $t03815838261._2
984+ let totalAmount = (outAm + outPr)
985+ let curPrX18 = cpbi(t1(prBalance, prDecimals), t1(amBalance, amDecimals))
986+ let curPr = f1(curPrX18, scale8)
987+ let state = [ScriptTransfer(userAddress, totalAmount, if ((outAssetId == "WAVES"))
988+ then unit
989+ else fromBase58String(outAssetId)), StringEntry(gau(toString(userAddress), txId58), dataGetActionInfo(outAm, outPr, pmtAmt, curPr, height, lastBlock.timestamp)), IntegerEntry(pl(), curPr), IntegerEntry(ph(height, lastBlock.timestamp), curPr)]
990+ if ((state == state))
991+ then {
992+ let burn = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
993+ if ((burn == burn))
994+ then $Tuple2(state, totalAmount)
995+ else throw("Strict value is not equal to itself.")
996+ }
997+ else throw("Strict value is not equal to itself.")
998+ }
999+ }
8261000 }
8271001
8281002
8291003
8301004 @Callable(i)
8311005 func getNoLess (noLessThenAmtAsset,noLessThenPriceAsset) = {
8321006 let r = cg(i)
8331007 let outAmAmt = r._1
8341008 let outPrAmt = r._2
8351009 let pmtAmt = r._3
8361010 let pmtAssetId = r._4
8371011 let state = r._5
8381012 if ((noLessThenAmtAsset > outAmAmt))
8391013 then throw(((("Failed: " + toString(outAmAmt)) + " < ") + toString(noLessThenAmtAsset)))
8401014 else if ((noLessThenPriceAsset > outPrAmt))
8411015 then throw(((("Failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset)))
8421016 else {
8431017 let burnLPAssetOnFactory = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
8441018 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
8451019 then state
8461020 else throw("Strict value is not equal to itself.")
8471021 }
8481022 }
8491023
8501024
8511025
8521026 @Callable(i)
8531027 func unstakeAndGet (amount) = {
8541028 let checkPayments = if ((size(i.payments) != 0))
8551029 then throw("No pmnts expd")
8561030 else true
8571031 if ((checkPayments == checkPayments))
8581032 then {
8591033 let cfg = gpc()
8601034 let factoryCfg = gfc()
8611035 let lpAssetId = fromBase58String(cfg[idxLPAsId])
8621036 let staking = valueOrErrorMessage(addressFromString(factoryCfg[idxFactStakCntr]), "Wr st addr")
8631037 let unstakeInv = invoke(staking, "unstake", [toBase58String(lpAssetId), amount], nil)
8641038 if ((unstakeInv == unstakeInv))
8651039 then {
8661040 let r = ego(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller)
8671041 let sts = parseIntValue(r._9)
8681042 let state = r._10
8691043 let v = if (if (igs())
8701044 then true
8711045 else (sts == PoolShutdown))
8721046 then throw(("Blocked: " + toString(sts)))
8731047 else true
8741048 if ((v == v))
8751049 then {
8761050 let burnA = invoke(fca, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
8771051 if ((burnA == burnA))
8781052 then state
8791053 else throw("Strict value is not equal to itself.")
8801054 }
1055+ else throw("Strict value is not equal to itself.")
1056+ }
1057+ else throw("Strict value is not equal to itself.")
1058+ }
1059+ else throw("Strict value is not equal to itself.")
1060+ }
1061+
1062+
1063+
1064+@Callable(i)
1065+func unstakeAndGetOneTkn (amount,outAmount,outAssetId,slippage) = {
1066+ let checkPayments = if ((size(i.payments) != 0))
1067+ then throw("No pmnts expd")
1068+ else true
1069+ if ((checkPayments == checkPayments))
1070+ then {
1071+ let cfg = gpc()
1072+ let factoryCfg = gfc()
1073+ let lpAssetId = fromBase58String(cfg[idxLPAsId])
1074+ let staking = valueOrErrorMessage(addressFromString(factoryCfg[idxFactStakCntr]), "Wr st addr")
1075+ let unstakeInv = invoke(staking, "unstake", [toBase58String(lpAssetId), amount], nil)
1076+ if ((unstakeInv == unstakeInv))
1077+ then {
1078+ let outAmountResult = {
1079+ let @ = invoke(this, "getOneTknV2", [outAmount, outAssetId, slippage], [AttachedPayment(lpAssetId, amount)])
1080+ if ($isInstanceOf(@, "Int"))
1081+ then @
1082+ else unit
1083+ }
1084+ if ((outAmountResult == outAmountResult))
1085+ then $Tuple2(nil, outAmountResult)
8811086 else throw("Strict value is not equal to itself.")
8821087 }
8831088 else throw("Strict value is not equal to itself.")
8841089 }
8851090 else throw("Strict value is not equal to itself.")
8861091 }
8871092
8881093
8891094
8901095 @Callable(i)
8911096 func activate (amtAsStr,prAsStr) = if ((toString(i.caller) != toString(fca)))
8921097 then throw("denied")
8931098 else $Tuple2([StringEntry(aa(), amtAsStr), StringEntry(pa(), prAsStr)], "success")
8941099
8951100
8961101
8971102 @Callable(i)
8981103 func setS (k,v) = if ((toString(i.caller) != strf(this, ada())))
8991104 then pd
9001105 else [StringEntry(k, v)]
9011106
9021107
9031108
9041109 @Callable(i)
9051110 func setI (k,v) = if ((toString(i.caller) != strf(this, ada())))
9061111 then pd
9071112 else [IntegerEntry(k, v)]
9081113
9091114
9101115
9111116 @Callable(i)
9121117 func getPoolConfigWrapperREADONLY () = $Tuple2(nil, gpc())
9131118
9141119
9151120
9161121 @Callable(i)
9171122 func getAccBalanceWrapperREADONLY (assetId) = $Tuple2(nil, getAccBalance(assetId))
9181123
9191124
9201125
9211126 @Callable(i)
9221127 func calcPricesWrapperREADONLY (amAmt,prAmt,lpAmt) = {
9231128 let pr = calcPrices(amAmt, prAmt, lpAmt)
9241129 $Tuple2(nil, [toString(pr[0]), toString(pr[1]), toString(pr[2])])
9251130 }
9261131
9271132
9281133
9291134 @Callable(i)
9301135 func fromX18WrapperREADONLY (val,resScaleMult) = $Tuple2(nil, f1(parseBigIntValue(val), resScaleMult))
9311136
9321137
9331138
9341139 @Callable(i)
9351140 func toX18WrapperREADONLY (origVal,origScaleMult) = $Tuple2(nil, toString(t1(origVal, origScaleMult)))
9361141
9371142
9381143
9391144 @Callable(i)
9401145 func calcPriceBigIntWrapperREADONLY (prAmtX18,amAmtX18) = $Tuple2(nil, toString(cpbi(parseBigIntValue(prAmtX18), parseBigIntValue(amAmtX18))))
9411146
9421147
9431148
9441149 @Callable(i)
9451150 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, ""))
9461151
9471152
9481153
9491154 @Callable(i)
9501155 func estimateGetOperationWrapperREADONLY (txId58,pmtAsId,pmtLpAmt,usrAddr) = {
9511156 let r = ego(txId58, pmtAsId, pmtLpAmt, addressFromStringValue(usrAddr))
9521157 $Tuple2(nil, $Tuple10(r._1, r._2, r._3, r._4, r._5, r._6, r._7, toString(r._8), r._9, r._10))
9531158 }
9541159
9551160
9561161 @Verifier(tx)
9571162 func verify () = {
9581163 let targetPublicKey = match m() {
9591164 case pk: ByteVector =>
9601165 pk
9611166 case _: Unit =>
9621167 tx.senderPublicKey
9631168 case _ =>
9641169 throw("Match error")
9651170 }
9661171 match tx {
9671172 case order: Order =>
9681173 let matcherPub = mp()
9691174 let orderValid = moa(order)
9701175 let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
9711176 let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub)
9721177 if (if (if (orderValid)
9731178 then senderValid
9741179 else false)
9751180 then matcherValid
9761181 else false)
9771182 then true
9781183 else toe(orderValid, senderValid, matcherValid)
9791184 case s: SetScriptTransaction =>
9801185 let newHash = blake2b256(value(s.script))
9811186 let allowedHash = fromBase64String(value(getString(fca, keyAllowedLpStableScriptHash())))
9821187 let currentHash = scriptHash(this)
9831188 if (if ((allowedHash == newHash))
9841189 then (currentHash != newHash)
9851190 else false)
9861191 then true
9871192 else sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
9881193 case _ =>
9891194 sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
9901195 }
9911196 }
9921197

github/deemru/w8io/169f3d6 
113.99 ms