tx · 43WEka1CrkCccKrAkVzm6Zj3AzHQhpHa67ZS9E9pUjsJ

3MzKSdTH2jFbypLsoNfrH7QgkzSbx3EYwCA:  -0.03400000 Waves

2022.09.14 17:32 [2228897] smart account 3MzKSdTH2jFbypLsoNfrH7QgkzSbx3EYwCA > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "43WEka1CrkCccKrAkVzm6Zj3AzHQhpHa67ZS9E9pUjsJ",
    "fee": 3400000,
    "feeAssetId": null,
    "timestamp": 1663165938119,
    "version": 2,
    "chainId": 84,
    "sender": "3MzKSdTH2jFbypLsoNfrH7QgkzSbx3EYwCA",
    "senderPublicKey": "35yd3qw1gxKDxKwGAykHN9fANbXNWwseaUwbWDj24o3x",
    "proofs": [
        "3VzFCynnb3F9Z9EiDeCb7S6q5qq4dYVfGjpXPAaoTn1xmEcWA9Y1d4M7VJS3JKkiDq26AKHExnNdhtKqPJptGRVe"
    ],
    "script": "base64:BgKcAQgCEgMKAQgSAwoBCBIAEgQKAgEEEgcKBQEBAQEEEgQKAgEEEgQKAgEIEgQKAgEIEgMKAQESABIECgIIARIECgIIARIECgIBARIDCgEBEgYKBAEBCAESBAoCCAgSBAoCCAgSBAoCCAESABIDCgEIEgUKAwEBARIECgIIARIECgIBARIECgIICBILCgkIAQECAQIIBAQSBgoECAgBCFMABnNjYWxlOACAwtcvAAxzY2FsZThCaWdJbnQJALYCAQCAwtcvAAdzY2FsZTE4CQC2AgEAgICQu7rWrfANAAp6ZXJvQmlnSW50CQC2AgEAAAAJb25lQmlnSW50CQC2AgEAAQAKc2xpcHBhZ2U0RAkAtgIBCQBlAgUGc2NhbGU4CQBpAgkAaAIFBnNjYWxlOAABBQZzY2FsZTgABUFtdWx0AgMxMDAABURjb252AgExAANTRVACAl9fAAVFTVBUWQIAAApQb29sQWN0aXZlAAEAClBvb2xQdXREaXMAAgAOUG9vbE1hdGNoZXJEaXMAAwAMUG9vbFNodXRkb3duAAQADmlkeFBvb2xBZGRyZXNzAAEACWlkeFBvb2xTdAACAAlpZHhMUEFzSWQAAwAJaWR4QW1Bc0lkAAQACWlkeFByQXNJZAAFAAtpZHhBbXRBc0RjbQAGAA1pZHhQcmljZUFzRGNtAAcAC2lkeElBbXRBc0lkAAgADWlkeElQcmljZUFzSWQACQAPaWR4RmFjdFN0YWtDbnRyAAEAEGlkeEZhY3RTbGlwcENudHIABwARaWR4RmFjdEd3eFJld0NudHIACgAFZGVsYXkCCSVzX19kZWxheQECdDECB29yaWdWYWwNb3JpZ1NjYWxlTXVsdAkAvAIDCQC2AgEFB29yaWdWYWwFB3NjYWxlMTgJALYCAQUNb3JpZ1NjYWxlTXVsdAECZjECA3ZhbA9yZXN1bHRTY2FsZU11bHQJAKADAQkAvAIDBQN2YWwJALYCAQUPcmVzdWx0U2NhbGVNdWx0BQdzY2FsZTE4AQJ0cwMDYW10CHJlc1NjYWxlCGN1clNjYWxlCQBrAwUDYW10BQhyZXNTY2FsZQUIY3VyU2NhbGUBA2FicwEDdmFsAwkAvwICBQp6ZXJvQmlnSW50BQN2YWwJAL4CAQUDdmFsBQN2YWwBAmZjAAITJXNfX2ZhY3RvcnlDb250cmFjdAEDbXBrAAIUJXNfX21hbmFnZXJQdWJsaWNLZXkBBHBtcGsAAhslc19fcGVuZGluZ01hbmFnZXJQdWJsaWNLZXkBAnBsAAIRJXMlc19fcHJpY2VfX2xhc3QBAnBoAgFoAXQJALkJAgkAzAgCAhglcyVzJWQlZF9fcHJpY2VfX2hpc3RvcnkJAMwIAgkApAMBBQFoCQDMCAIJAKQDAQUBdAUDbmlsBQNTRVABA3BhdQICdWEEdHhJZAkArAICCQCsAgIJAKwCAgILJXMlcyVzX19QX18FAnVhAgJfXwUEdHhJZAEDZ2F1AgJ1YQR0eElkCQCsAgIJAKwCAgkArAICAgslcyVzJXNfX0dfXwUCdWECAl9fBQR0eElkAQJhYQACDyVzX19hbW91bnRBc3NldAECcGEAAg4lc19fcHJpY2VBc3NldAEDYW1wAAIHJXNfX2FtcAEDYWRhAAINJXNfX2FkZG9uQWRkcgEFbGdvdGMBBmNhbGxlcgkAuQkCCQDMCAICFyVzJXNfX2xhc3RHZXRPbmVUa25DYWxsCQDMCAIFBmNhbGxlcgUDbmlsBQNTRVABBWxzb3RjAQZjYWxsZXIJALkJAgkAzAgCAhclcyVzX19sYXN0UHV0T25lVGtuQ2FsbAkAzAgCBQZjYWxsZXIFA25pbAUDU0VQAQRmY2ZnAAIRJXNfX2ZhY3RvcnlDb25maWcBBG10cGsAAhglcyVzX19tYXRjaGVyX19wdWJsaWNLZXkBAnBjAgZpQW10QXMFaVByQXMJAKwCAgkArAICCQCsAgIJAKwCAgIIJWQlZCVzX18FBmlBbXRBcwICX18FBWlQckFzAghfX2NvbmZpZwEDbWJhAQViQVN0cgkArAICAiglcyVzJXNfX21hcHBpbmdzX19iYXNlQXNzZXQyaW50ZXJuYWxJZF9fBQViQVN0cgEDYXBzAAIMJXNfX3NodXRkb3duARxrZXlBbGxvd2VkTHBTdGFibGVTY3JpcHRIYXNoAAIdJXNfX2FsbG93ZWRMcFN0YWJsZVNjcmlwdEhhc2gBA3RvZQMDb3JWBnNlbmRyVgZtYXRjaFYJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgIRRmFpbGVkOiBvcmRWYWxpZD0JAKUDAQUDb3JWAgsgc25kclZhbGlkPQkApQMBBQZzZW5kclYCDCBtdGNoclZhbGlkPQkApQMBBQZtYXRjaFYBA3N0cgEDdmFsBAckbWF0Y2gwBQN2YWwDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAZ2YWxTdHIFByRtYXRjaDAFBnZhbFN0cgkAAgECE2ZhaWwgY2FzdCB0byBTdHJpbmcBBHN0cmYCBGFkZHIDa2V5CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEYWRkcgUDa2V5CQC5CQIJAMwIAgIKbWFuZGF0b3J5IAkAzAgCCQClCAEFBGFkZHIJAMwIAgIBLgkAzAgCBQNrZXkJAMwIAgIMIG5vdCBkZWZpbmVkBQNuaWwCAAEEaW50ZgIEYWRkcgNrZXkJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAmggCBQRhZGRyBQNrZXkJALkJAgkAzAgCAgptYW5kYXRvcnkgCQDMCAIJAKUIAQUEYWRkcgkAzAgCAgEuCQDMCAIFA2tleQkAzAgCAgwgbm90IGRlZmluZWQFA25pbAIAAANmY2EJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAQRzdHJmAgUEdGhpcwkBAmZjAAABQQkBBHN0cmYCBQR0aGlzCQEDYW1wAAEDaWdzAAkBC3ZhbHVlT3JFbHNlAgkAmwgCBQNmY2EJAQNhcHMABwECbXAACQDZBAEJAQRzdHJmAgUDZmNhCQEEbXRwawABA2dwYwAEBWFtdEFzCQEEc3RyZgIFBHRoaXMJAQJhYQAEB3ByaWNlQXMJAQRzdHJmAgUEdGhpcwkBAnBhAAQIaVByaWNlQXMJAQRpbnRmAgUDZmNhCQEDbWJhAQUHcHJpY2VBcwQGaUFtdEFzCQEEaW50ZgIFA2ZjYQkBA21iYQEFBWFtdEFzCQC1CQIJAQRzdHJmAgUDZmNhCQECcGMCCQCkAwEFBmlBbXRBcwkApAMBBQhpUHJpY2VBcwUDU0VQAQNnZmMACQC1CQIJAQRzdHJmAgUDZmNhCQEEZmNmZwAFA1NFUAANZmFjdG9yeUNvbmZpZwkBA2dmYwAAD3N0YWtpbmdDb250cmFjdAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUNZmFjdG9yeUNvbmZpZwUPaWR4RmFjdFN0YWtDbnRyAiBJbnZhbGlkIHN0YWtpbmcgY29udHJhY3QgYWRkcmVzcwAPc2xpcGFnZUNvbnRyYWN0CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQ1mYWN0b3J5Q29uZmlnBRBpZHhGYWN0U2xpcHBDbnRyAiBJbnZhbGlkIHNsaXBhZ2UgY29udHJhY3QgYWRkcmVzcwALZ3d4Q29udHJhY3QJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFDWZhY3RvcnlDb25maWcFEWlkeEZhY3RHd3hSZXdDbnRyAhxJbnZhbGlkIGd3eCBjb250cmFjdCBhZGRyZXNzARFkYXRhUHV0QWN0aW9uSW5mbwoNaW5BbXRBc3NldEFtdA9pblByaWNlQXNzZXRBbXQIb3V0THBBbXQFcHJpY2UKc2xpcEJ5VXNlcgxzbGlwcGFnZVJlYWwIdHhIZWlnaHQLdHhUaW1lc3RhbXAMc2xpcGFnZUFtQW10DHNsaXBhZ2VQckFtdAkAuQkCCQDMCAICFCVkJWQlZCVkJWQlZCVkJWQlZCVkCQDMCAIJAKQDAQUNaW5BbXRBc3NldEFtdAkAzAgCCQCkAwEFD2luUHJpY2VBc3NldEFtdAkAzAgCCQCkAwEFCG91dExwQW10CQDMCAIJAKQDAQUFcHJpY2UJAMwIAgkApAMBBQpzbGlwQnlVc2VyCQDMCAIJAKQDAQUMc2xpcHBhZ2VSZWFsCQDMCAIJAKQDAQUIdHhIZWlnaHQJAMwIAgkApAMBBQt0eFRpbWVzdGFtcAkAzAgCCQCkAwEFDHNsaXBhZ2VBbUFtdAkAzAgCCQCkAwEFDHNsaXBhZ2VQckFtdAUDbmlsBQNTRVABEWRhdGFHZXRBY3Rpb25JbmZvBg5vdXRBbXRBc3NldEFtdBBvdXRQcmljZUFzc2V0QW10B2luTHBBbXQFcHJpY2UIdHhIZWlnaHQLdHhUaW1lc3RhbXAJALkJAgkAzAgCAgwlZCVkJWQlZCVkJWQJAMwIAgkApAMBBQ5vdXRBbXRBc3NldEFtdAkAzAgCCQCkAwEFEG91dFByaWNlQXNzZXRBbXQJAMwIAgkApAMBBQdpbkxwQW10CQDMCAIJAKQDAQUFcHJpY2UJAMwIAgkApAMBBQh0eEhlaWdodAkAzAgCCQCkAwEFC3R4VGltZXN0YW1wBQNuaWwFA1NFUAENZ2V0QWNjQmFsYW5jZQEHYXNzZXRJZAMJAAACBQdhc3NldElkAgVXQVZFUwgJAO8HAQUEdGhpcwlhdmFpbGFibGUJAPAHAgUEdGhpcwkA2QQBBQdhc3NldElkAQRjcGJpAghwckFtdFgxOAhhbUFtdFgxOAkAvAIDBQhwckFtdFgxOAUHc2NhbGUxOAUIYW1BbXRYMTgBA3ZhZAMCQTECQTIIc2xpcHBhZ2UEBGRpZmYJALwCAwkAuAICBQJBMQUCQTIFDHNjYWxlOEJpZ0ludAUCQTIEBHBhc3MJAL8CAgkAuAICBQhzbGlwcGFnZQkBA2FicwEFBGRpZmYFCnplcm9CaWdJbnQDCQEBIQEFBHBhc3MJAAIBCQCsAgICCkJpZyBzbHBnOiAJAKYDAQUEZGlmZgkAlAoCBQRwYXNzCQCZAwEJAMwIAgUCQTEJAMwIAgUCQTIFA25pbAECdmQDAkQxAkQwBHNscGcEBGRpZmYJALwCAwUCRDAFDHNjYWxlOEJpZ0ludAUCRDEEBGZhaWwJAL8CAgUEc2xwZwUEZGlmZgMDBQRmYWlsBgkAvwICBQJEMAUCRDEJAAIBCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCmAwEFAkQwAgEgCQCmAwEFAkQxAgEgCQCmAwEFBGRpZmYCASAJAKYDAQUEc2xwZwUEZmFpbAEDcGNwBAphbUFzc2V0RGNtCnByQXNzZXREY20FYW1BbXQFcHJBbXQEC2FtdEFzQW10WDE4CQECdDECBQVhbUFtdAUKYW1Bc3NldERjbQQKcHJBc0FtdFgxOAkBAnQxAgUFcHJBbXQFCnByQXNzZXREY20JAQRjcGJpAgUKcHJBc0FtdFgxOAULYW10QXNBbXRYMTgBCmNhbGNQcmljZXMDBWFtQW10BXByQW10BWxwQW10BANjZmcJAQNncGMABAhhbXRBc0RjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwULaWR4QW10QXNEY20EB3ByQXNEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFDWlkeFByaWNlQXNEY20ECHByaWNlWDE4CQEDcGNwBAUIYW10QXNEY20FB3ByQXNEY20FBWFtQW10BQVwckFtdAQIYW1BbXRYMTgJAQJ0MQIFBWFtQW10BQhhbXRBc0RjbQQIcHJBbXRYMTgJAQJ0MQIFBXByQW10BQdwckFzRGNtBAhscEFtdFgxOAkBAnQxAgUFbHBBbXQFBnNjYWxlOAQNbHBQckluQW1Bc1gxOAkBBGNwYmkCBQhhbUFtdFgxOAUIbHBBbXRYMTgEDWxwUHJJblByQXNYMTgJAQRjcGJpAgUIcHJBbXRYMTgFCGxwQW10WDE4CQDMCAIFCHByaWNlWDE4CQDMCAIFDWxwUHJJbkFtQXNYMTgJAMwIAgUNbHBQckluUHJBc1gxOAUDbmlsAQ9jYWxjdWxhdGVQcmljZXMDBWFtQW10BXByQW10BWxwQW10BAFwCQEKY2FsY1ByaWNlcwMFBWFtQW10BQVwckFtdAUFbHBBbXQJAMwIAgkBAmYxAgkAkQMCBQFwAAAFBnNjYWxlOAkAzAgCCQECZjECCQCRAwIFAXAAAQUGc2NhbGU4CQDMCAIJAQJmMQIJAJEDAgUBcAACBQZzY2FsZTgFA25pbAEDZWdvBAZ0eElkNTgKcG10QXNzZXRJZAhwbXRMcEFtdAt1c2VyQWRkcmVzcwQDY2ZnCQEDZ3BjAAQEbHBJZAkAkQMCBQNjZmcFCWlkeExQQXNJZAQEYW1JZAkAkQMCBQNjZmcFCWlkeEFtQXNJZAQEcHJJZAkAkQMCBQNjZmcFCWlkeFByQXNJZAQFYW1EY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFC2lkeEFtdEFzRGNtBAVwckRjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwUNaWR4UHJpY2VBc0RjbQQDc3RzCQCRAwIFA2NmZwUJaWR4UG9vbFN0BAdscEVtaXNzCAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUEbHBJZAILV3JvbmcgTFAgaWQIcXVhbnRpdHkDCQECIT0CBQRscElkBQpwbXRBc3NldElkCQACAQIPV3JvbmcgcG10IGFzc2V0BAlhbUJhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUEYW1JZAQMYW1CYWxhbmNlWDE4CQECdDECBQlhbUJhbGFuY2UFBWFtRGNtBAlwckJhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUEcHJJZAQMcHJCYWxhbmNlWDE4CQECdDECBQlwckJhbGFuY2UFBXByRGNtBAtjdXJQcmljZVgxOAkBBGNwYmkCBQxwckJhbGFuY2VYMTgFDGFtQmFsYW5jZVgxOAQIY3VyUHJpY2UJAQJmMQIFC2N1clByaWNlWDE4BQZzY2FsZTgEC3BtdExwQW10WDE4CQECdDECBQhwbXRMcEFtdAUGc2NhbGU4BApscEVtaXNzWDE4CQECdDECBQdscEVtaXNzBQZzY2FsZTgEC291dEFtQW10WDE4CQC8AgMFDGFtQmFsYW5jZVgxOAULcG10THBBbXRYMTgFCmxwRW1pc3NYMTgEC291dFByQW10WDE4CQC8AgMFDHByQmFsYW5jZVgxOAULcG10THBBbXRYMTgFCmxwRW1pc3NYMTgECG91dEFtQW10CQECZjECBQtvdXRBbUFtdFgxOAUFYW1EY20ECG91dFByQW10CQECZjECBQtvdXRQckFtdFgxOAUFcHJEY20EBXN0YXRlAwkAAAIFBnR4SWQ1OAIABQNuaWwJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwULdXNlckFkZHJlc3MFCG91dEFtQW10AwkAAAIFBGFtSWQCBVdBVkVTBQR1bml0CQDZBAEFBGFtSWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwULdXNlckFkZHJlc3MFCG91dFByQW10AwkAAAIFBHBySWQCBVdBVkVTBQR1bml0CQDZBAEFBHBySWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBA2dhdQIJAKUIAQULdXNlckFkZHJlc3MFBnR4SWQ1OAkBEWRhdGFHZXRBY3Rpb25JbmZvBgUIb3V0QW1BbXQFCG91dFByQW10BQhwbXRMcEFtdAUIY3VyUHJpY2UFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJwbAAFCGN1clByaWNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECcGgCBQZoZWlnaHQIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQhjdXJQcmljZQUDbmlsCQCcCgoFCG91dEFtQW10BQhvdXRQckFtdAUEYW1JZAUEcHJJZAUJYW1CYWxhbmNlBQlwckJhbGFuY2UFB2xwRW1pc3MFC2N1clByaWNlWDE4BQNzdHMFBXN0YXRlAQNlcG8NBnR4SWQ1OAhzbGlwcGFnZQdpbkFtQW10BmluQW1JZAdpblByQW10BmluUHJJZAt1c2VyQWRkcmVzcwZpc0V2YWwGZW1pdExwCmlzT25lQXNzZXQQdmFsaWRhdGVTbGlwcGFnZQZwbXRBbXQFcG10SWQEA2NmZwkBA2dwYwAEBGxwSWQJANkEAQkAkQMCBQNjZmcFCWlkeExQQXNJZAQHYW1JZFN0cgkAkQMCBQNjZmcFCWlkeEFtQXNJZAQHcHJJZFN0cgkAkQMCBQNjZmcFCWlkeFByQXNJZAQJaW5BbUlkU3RyCQCRAwIFA2NmZwULaWR4SUFtdEFzSWQECWluUHJJZFN0cgkAkQMCBQNjZmcFDWlkeElQcmljZUFzSWQEBmFtdERjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwULaWR4QW10QXNEY20ECHByaWNlRGNtCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDY2ZnBQ1pZHhQcmljZUFzRGNtBANzdHMJAJEDAgUDY2ZnBQlpZHhQb29sU3QEBGxwRW0ICQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQUEbHBJZAIIV3IgbHAgYXMIcXVhbnRpdHkECWFtQmFsYW5jZQMFBmlzRXZhbAkBDWdldEFjY0JhbGFuY2UBBQdhbUlkU3RyAwMFCmlzT25lQXNzZXQJAAACBQVwbXRJZAUHYW1JZFN0cgcJAGUCCQENZ2V0QWNjQmFsYW5jZQEFB2FtSWRTdHIFBnBtdEFtdAMFCmlzT25lQXNzZXQJAQ1nZXRBY2NCYWxhbmNlAQUHYW1JZFN0cgkAZQIJAQ1nZXRBY2NCYWxhbmNlAQUHYW1JZFN0cgUHaW5BbUFtdAQJcHJCYWxhbmNlAwUGaXNFdmFsCQENZ2V0QWNjQmFsYW5jZQEFB3BySWRTdHIDAwUKaXNPbmVBc3NldAkAAAIFBXBtdElkBQdwcklkU3RyBwkAZQIJAQ1nZXRBY2NCYWxhbmNlAQUHcHJJZFN0cgUGcG10QW10AwUKaXNPbmVBc3NldAkBDWdldEFjY0JhbGFuY2UBBQdwcklkU3RyCQBlAgkBDWdldEFjY0JhbGFuY2UBBQdwcklkU3RyBQdpblByQW10BA9pbkFtQXNzZXRBbXRYMTgJAQJ0MQIFB2luQW1BbXQFBmFtdERjbQQPaW5QckFzc2V0QW10WDE4CQECdDECBQdpblByQW10BQhwcmljZURjbQQMdXNlclByaWNlWDE4CQEEY3BiaQIFD2luUHJBc3NldEFtdFgxOAUPaW5BbUFzc2V0QW10WDE4BAxhbUJhbGFuY2VYMTgJAQJ0MQIFCWFtQmFsYW5jZQUGYW10RGNtBAxwckJhbGFuY2VYMTgJAQJ0MQIFCXByQmFsYW5jZQUIcHJpY2VEY20EAXIDCQAAAgUEbHBFbQAABAtjdXJQcmljZVgxOAUKemVyb0JpZ0ludAQLc2xpcHBhZ2VYMTgFCnplcm9CaWdJbnQECGxwQW10WDE4CQB2BgkAuQICBQ9pbkFtQXNzZXRBbXRYMTgFD2luUHJBc3NldEFtdFgxOAAACQC2AgEABQABAAAFBERPV04JAJcKBQkBAmYxAgUIbHBBbXRYMTgFBnNjYWxlOAkBAmYxAgUPaW5BbUFzc2V0QW10WDE4BQZhbXREY20JAQJmMQIFD2luUHJBc3NldEFtdFgxOAUIcHJpY2VEY20JAQRjcGJpAgkAtwICBQxwckJhbGFuY2VYMTgFD2luUHJBc3NldEFtdFgxOAkAtwICBQxhbUJhbGFuY2VYMTgFD2luQW1Bc3NldEFtdFgxOAULc2xpcHBhZ2VYMTgEC2N1clByaWNlWDE4CQEEY3BiaQIFDHByQmFsYW5jZVgxOAUMYW1CYWxhbmNlWDE4BA9zbGlwcGFnZVJlYWxYMTgJALwCAwkBA2FicwEJALgCAgULY3VyUHJpY2VYMTgFDHVzZXJQcmljZVgxOAUHc2NhbGUxOAULY3VyUHJpY2VYMTgEC3NsaXBwYWdlWDE4CQECdDECBQhzbGlwcGFnZQUGc2NhbGU4AwMDBRB2YWxpZGF0ZVNsaXBwYWdlCQECIT0CBQtjdXJQcmljZVgxOAUKemVyb0JpZ0ludAcJAL8CAgUPc2xpcHBhZ2VSZWFsWDE4BQtzbGlwcGFnZVgxOAcJAAIBCQCsAgIJAKwCAgkArAICAg9QcmljZSBzbGlwcGFnZSAJAKYDAQUPc2xpcHBhZ2VSZWFsWDE4AgMgPiAJAKYDAQULc2xpcHBhZ2VYMTgEDWxwRW1pc3Npb25YMTgJAQJ0MQIFBGxwRW0FBnNjYWxlOAQKcHJWaWFBbVgxOAkAvAIDBQ9pbkFtQXNzZXRBbXRYMTgFC2N1clByaWNlWDE4BQdzY2FsZTE4BAphbVZpYVByWDE4CQC8AgMFD2luUHJBc3NldEFtdFgxOAUHc2NhbGUxOAULY3VyUHJpY2VYMTgEDGV4cGVjdGVkQW10cwMJAL8CAgUKcHJWaWFBbVgxOAUPaW5QckFzc2V0QW10WDE4CQCUCgIFCmFtVmlhUHJYMTgFD2luUHJBc3NldEFtdFgxOAkAlAoCBQ9pbkFtQXNzZXRBbXRYMTgFCnByVmlhQW1YMTgEEWV4cEFtdEFzc2V0QW10WDE4CAUMZXhwZWN0ZWRBbXRzAl8xBBNleHBQcmljZUFzc2V0QW10WDE4CAUMZXhwZWN0ZWRBbXRzAl8yBAhscEFtdFgxOAkAvAIDBQ1scEVtaXNzaW9uWDE4BRNleHBQcmljZUFzc2V0QW10WDE4BQxwckJhbGFuY2VYMTgJAJcKBQkBAmYxAgUIbHBBbXRYMTgFBnNjYWxlOAkBAmYxAgURZXhwQW10QXNzZXRBbXRYMTgFBmFtdERjbQkBAmYxAgUTZXhwUHJpY2VBc3NldEFtdFgxOAUIcHJpY2VEY20FC2N1clByaWNlWDE4BQtzbGlwcGFnZVgxOAQJY2FsY0xwQW10CAUBcgJfMQQOY2FsY0FtQXNzZXRQbXQIBQFyAl8yBA5jYWxjUHJBc3NldFBtdAgFAXICXzMECGN1clByaWNlCQECZjECCAUBcgJfNAUGc2NhbGU4BAxzbGlwcGFnZUNhbGMJAQJmMQIIBQFyAl81BQZzY2FsZTgDCQBnAgAABQljYWxjTHBBbXQJAAIBAgdMUCA8PSAwBAllbWl0THBBbXQDCQEBIQEFBmVtaXRMcAAABQljYWxjTHBBbXQEBmFtRGlmZgkAZQIFB2luQW1BbXQFDmNhbGNBbUFzc2V0UG10BAZwckRpZmYJAGUCBQdpblByQW10BQ5jYWxjUHJBc3NldFBtdAQNJHQwMTYwODMxNjQyOAMDBQppc09uZUFzc2V0CQAAAgUFcG10SWQFB2FtSWRTdHIHCQCUCgIFBnBtdEFtdAAAAwMFCmlzT25lQXNzZXQJAAACBQVwbXRJZAUHcHJJZFN0cgcJAJQKAgAABQZwbXRBbXQJAJQKAgUOY2FsY0FtQXNzZXRQbXQFDmNhbGNQckFzc2V0UG10BAp3cml0ZUFtQW10CAUNJHQwMTYwODMxNjQyOAJfMQQKd3JpdGVQckFtdAgFDSR0MDE2MDgzMTY0MjgCXzIEC2NvbW1vblN0YXRlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQECcGwABQhjdXJQcmljZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAnBoAgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUIY3VyUHJpY2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkBA3BhdQIFC3VzZXJBZGRyZXNzBQZ0eElkNTgJARFkYXRhUHV0QWN0aW9uSW5mbwoFCndyaXRlQW1BbXQFCndyaXRlUHJBbXQFCWVtaXRMcEFtdAUIY3VyUHJpY2UFCHNsaXBwYWdlBQxzbGlwcGFnZUNhbGMFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFBmFtRGlmZgUGcHJEaWZmBQNuaWwJAJ8KDQUJY2FsY0xwQW10BQllbWl0THBBbXQFCGN1clByaWNlBQlhbUJhbGFuY2UFCXByQmFsYW5jZQUEbHBFbQUEbHBJZAUDc3RzBQtjb21tb25TdGF0ZQUGYW1EaWZmBQZwckRpZmYFBmluQW1JZAUGaW5QcklkAQNtb2EBBW9yZGVyBANjZmcJAQNncGMABAdhbXRBc0lkCQCRAwIFA2NmZwUJaWR4QW1Bc0lkBAZwckFzSWQJAJEDAgUDY2ZnBQlpZHhQckFzSWQEA3N0cwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwUJaWR4UG9vbFN0BAhhbXRBc0RjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA2NmZwULaWR4QW10QXNEY20EB3ByQXNEY20JAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNjZmcFDWlkeFByaWNlQXNEY20ED2FjY0FtdEFzQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQdhbXRBc0lkBA5hY2NQckFzQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQZwckFzSWQEC2N1clByaWNlWDE4AwkAAAIIBQVvcmRlcglvcmRlclR5cGUFA0J1eQkBA3BjcAQFCGFtdEFzRGNtBQdwckFzRGNtCQBkAgUPYWNjQW10QXNCYWxhbmNlCAUFb3JkZXIGYW1vdW50BQ5hY2NQckFzQmFsYW5jZQkBA3BjcAQFCGFtdEFzRGNtBQdwckFzRGNtCQBlAgUPYWNjQW10QXNCYWxhbmNlCAUFb3JkZXIGYW1vdW50BQ5hY2NQckFzQmFsYW5jZQQIY3VyUHJpY2UJAQJmMQIFC2N1clByaWNlWDE4BQZzY2FsZTgDAwMJAQNpZ3MABgkAAAIFA3N0cwUOUG9vbE1hdGNoZXJEaXMGCQAAAgUDc3RzBQxQb29sU2h1dGRvd24JAAIBAg1BZG1pbiBibG9ja2VkBApvckFtdEFzc2V0CAgFBW9yZGVyCWFzc2V0UGFpcgthbW91bnRBc3NldAQKb3JBbXRBc1N0cgMJAAACBQpvckFtdEFzc2V0BQR1bml0AgVXQVZFUwkA2AQBCQEFdmFsdWUBBQpvckFtdEFzc2V0BAlvclByQXNzZXQICAUFb3JkZXIJYXNzZXRQYWlyCnByaWNlQXNzZXQECW9yUHJBc1N0cgMJAAACBQlvclByQXNzZXQFBHVuaXQCBVdBVkVTCQDYBAEJAQV2YWx1ZQEFCW9yUHJBc3NldAMDCQECIT0CBQpvckFtdEFzU3RyBQdhbXRBc0lkBgkBAiE9AgUJb3JQckFzU3RyBQZwckFzSWQJAAIBAglXciBhc3NldHMECm9yZGVyUHJpY2UIBQVvcmRlcgVwcmljZQQIcHJpY2VEY20JAGsDBQZzY2FsZTgFB3ByQXNEY20FCGFtdEFzRGNtBA5jYXN0T3JkZXJQcmljZQkBAnRzAwUKb3JkZXJQcmljZQUGc2NhbGU4BQhwcmljZURjbQQRaXNPcmRlclByaWNlVmFsaWQDCQAAAggFBW9yZGVyCW9yZGVyVHlwZQUDQnV5CQBnAgUIY3VyUHJpY2UFDmNhc3RPcmRlclByaWNlCQBnAgUOY2FzdE9yZGVyUHJpY2UFCGN1clByaWNlBgECY2cBAWkDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAgoxIHBtbnQgZXhwBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQKcG10QXNzZXRJZAkBBXZhbHVlAQgFA3BtdAdhc3NldElkBAZwbXRBbXQIBQNwbXQGYW1vdW50BAFyCQEDZWdvBAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQDYBAEFCnBtdEFzc2V0SWQFBnBtdEFtdAgFAWkGY2FsbGVyBAhvdXRBbUFtdAgFAXICXzEECG91dFByQW10CAUBcgJfMgQDc3RzCQENcGFyc2VJbnRWYWx1ZQEIBQFyAl85BAVzdGF0ZQgFAXIDXzEwAwMJAQNpZ3MABgkAAAIFA3N0cwUMUG9vbFNodXRkb3duCQACAQkArAICAg9BZG1pbiBibG9ja2VkOiAJAKQDAQUDc3RzCQCXCgUFCG91dEFtQW10BQhvdXRQckFtdAUGcG10QW10BQpwbXRBc3NldElkBQVzdGF0ZQECY3AKBmNhbGxlcgR0eElkB2FtQXNQbXQHcHJBc1BtdAhzbGlwcGFnZQZlbWl0THAKaXNPbmVBc3NldBB2YWxpZGF0ZVNsaXBwYWdlBnBtdEFtdAVwbXRJZAQBcgkBA2Vwbw0FBHR4SWQFCHNsaXBwYWdlCAkBBXZhbHVlAQUHYW1Bc1BtdAZhbW91bnQICQEFdmFsdWUBBQdhbUFzUG10B2Fzc2V0SWQICQEFdmFsdWUBBQdwckFzUG10BmFtb3VudAgJAQV2YWx1ZQEFB3ByQXNQbXQHYXNzZXRJZAUGY2FsbGVyBwUGZW1pdExwBQppc09uZUFzc2V0BRB2YWxpZGF0ZVNsaXBwYWdlBQZwbXRBbXQFBXBtdElkBANzdHMJAQ1wYXJzZUludFZhbHVlAQgFAXICXzgDAwMJAQNpZ3MABgkAAAIFA3N0cwUKUG9vbFB1dERpcwYJAAACBQNzdHMFDFBvb2xTaHV0ZG93bgkAAgEJAKwCAgIIQmxvY2tlZDoJAKQDAQUDc3RzBQFyARNlc3RpbWF0ZVB1dE9uZVRrblYyBAZwbXRBbXQKcG10QXNzZXRJZAt1c2VyQWRkcmVzcwR0eElkBApwb29sQ29uZmlnCQEDZ3BjAAQEYW1JZAkAkQMCBQpwb29sQ29uZmlnBQlpZHhBbUFzSWQEBHBySWQJAJEDAgUKcG9vbENvbmZpZwUJaWR4UHJBc0lkBAlhbUJhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUEYW1JZAQJcHJCYWxhbmNlCQENZ2V0QWNjQmFsYW5jZQEFBHBySWQEDSR0MDIwNzUxMjEyMDADCQAAAgUEdHhJZAIACQCUCgIFCWFtQmFsYW5jZQUJcHJCYWxhbmNlAwkAAAIFCnBtdEFzc2V0SWQFBGFtSWQDCQBmAgUGcG10QW10BQlhbUJhbGFuY2UJAAIBAhZpbnZhbGlkIHBheW1lbnQgYW1vdW50CQCUCgIJAGUCBQlhbUJhbGFuY2UFBnBtdEFtdAUJcHJCYWxhbmNlAwkAAAIFCnBtdEFzc2V0SWQFBHBySWQDCQBmAgUGcG10QW10BQlwckJhbGFuY2UJAAIBAhZpbnZhbGlkIHBheW1lbnQgYW1vdW50CQCUCgIFCWFtQmFsYW5jZQkAZQIFCXByQmFsYW5jZQUGcG10QW10CQACAQIQd3JvbmcgcG10QXNzZXRJZAQMYW1CYWxhbmNlTm93CAUNJHQwMjA3NTEyMTIwMAJfMQQMcHJCYWxhbmNlTm93CAUNJHQwMjA3NTEyMTIwMAJfMgQNJHQwMjEyMDQyMTMzOAMJAAACBQpwbXRBc3NldElkBQRhbUlkCQCUCgIFDGFtQmFsYW5jZU5vdwUMcHJCYWxhbmNlTm93CQCUCgIFDHByQmFsYW5jZU5vdwUMYW1CYWxhbmNlTm93BBBhbUJhbGFuY2VGb3JDYWxjCAUNJHQwMjEyMDQyMTMzOAJfMQQQcHJCYWxhbmNlRm9yQ2FsYwgFDSR0MDIxMjA0MjEzMzgCXzIECnhQcmVjaXNpb24AAQQGcmVzdWx0CgABQAkA/AcEBQtnd3hDb250cmFjdAIMY2FsY1B1dFhPbmx5CQDMCAIJAKQDAQUGcG10QW10CQDMCAIJAKQDAQUQYW1CYWxhbmNlRm9yQ2FsYwkAzAgCCQCkAwEFEHByQmFsYW5jZUZvckNhbGMJAMwIAgIACQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgkApAMBBQp4UHJlY2lzaW9uCQDMCAIFBURjb252BQNuaWwFA25pbAMJAAECBQFAAgooSW50LCBJbnQpBQFACQACAQkArAICCQADAQkA/AcEBQtnd3hDb250cmFjdAIMY2FsY1B1dFhPbmx5CQDMCAIJAKQDAQUGcG10QW10CQDMCAIJAKQDAQUQYW1CYWxhbmNlRm9yQ2FsYwkAzAgCCQCkAwEFEHByQmFsYW5jZUZvckNhbGMJAMwIAgIACQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgkApAMBBQp4UHJlY2lzaW9uCQDMCAIFBURjb252BQNuaWwFA25pbAIfIGNvdWxkbid0IGJlIGNhc3QgdG8gKEludCwgSW50KQQNJHQwMjE4MDcyMTkwMwMJAAACBQpwbXRBc3NldElkBQRhbUlkBQZyZXN1bHQJAJQKAggFBnJlc3VsdAJfMggFBnJlc3VsdAJfMQQLYW1Bc3NldFBhcnQIBQ0kdDAyMTgwNzIxOTAzAl8xBAtwckFzc2V0UGFydAgFDSR0MDIxODA3MjE5MDMCXzIEBmVzdFB1dAkBAmNwCgULdXNlckFkZHJlc3MFBHR4SWQJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFBGFtSWQFC2FtQXNzZXRQYXJ0CQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQRwcklkBQtwckFzc2V0UGFydAAABgYHBQZwbXRBbXQFCnBtdEFzc2V0SWQEB2VzdGltTFAIBQZlc3RQdXQCXzIECWxwQXNzZXRJZAgFBmVzdFB1dAJfNwQFc3RhdGUIBQZlc3RQdXQCXzkEBmFtRGlmZggFBmVzdFB1dANfMTAEBnByRGlmZggFBmVzdFB1dANfMTEFBmVzdFB1dAEBbQAEByRtYXRjaDAJAKIIAQkBA21wawADCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQDZBAEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAUEdW5pdAkAAgECC01hdGNoIGVycm9yAQJwbQAEByRtYXRjaDAJAKIIAQkBBHBtcGsAAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkA2QQBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQFBHVuaXQJAAIBAgtNYXRjaCBlcnJvcgACcGQJAAIBAhFQZXJtaXNzaW9uIGRlbmllZAECbW0BAWkEByRtYXRjaDAJAQFtAAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJwawUHJG1hdGNoMAMJAAACCAUBaQ9jYWxsZXJQdWJsaWNLZXkFAnBrBgUCcGQDCQABAgUHJG1hdGNoMAIEVW5pdAMJAAACCAUBaQZjYWxsZXIFBHRoaXMGBQJwZAkAAgECC01hdGNoIGVycm9yGgFpAQtjb25zdHJ1Y3RvcgECZmMEAWMJAQJtbQEFAWkDCQAAAgUBYwUBYwkAzAgCCQELU3RyaW5nRW50cnkCCQECZmMABQJmYwUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCnNldE1hbmFnZXIBF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5BAFjCQECbW0BBQFpAwkAAAIFAWMFAWMEAmNtCQDZBAEFF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5AwkAAAIFAmNtBQJjbQkAzAgCCQELU3RyaW5nRW50cnkCCQEEcG1wawAFF3BlbmRpbmdNYW5hZ2VyUHVibGljS2V5BQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEOY29uZmlybU1hbmFnZXIABAFwCQECcG0ABANocG0DCQEJaXNEZWZpbmVkAQUBcAYJAAIBAhJObyBwZW5kaW5nIG1hbmFnZXIDCQAAAgUDaHBtBQNocG0EA2NwbQMJAAACCAUBaQ9jYWxsZXJQdWJsaWNLZXkJAQV2YWx1ZQEFAXAGCQACAQIbWW91IGFyZSBub3QgcGVuZGluZyBtYW5hZ2VyAwkAAAIFA2NwbQUDY3BtCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQNtcGsACQDYBAEJAQV2YWx1ZQEFAXAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBBHBtcGsABQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEDcHV0AgRzbGlwCWF1dG9TdGFrZQQHZmFjdENmZwkBA2dmYwAEC3N0YWtpbmdDbnRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQdmYWN0Q2ZnBQ9pZHhGYWN0U3Rha0NudHICCldyIHN0IGFkZHIECHNsaXBDbnRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQdmYWN0Q2ZnBRBpZHhGYWN0U2xpcHBDbnRyAgpXciBzbCBhZGRyAwkAZgIAAAUEc2xpcAkAAgECDldyb25nIHNsaXBwYWdlAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwACCQACAQIMMiBwbW50cyBleHBkBAFlCQECY3AKCQClCAEIBQFpBmNhbGxlcgkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQEPQXR0YWNoZWRQYXltZW50AggJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAkAkQMCCAUBaQhwYXltZW50cwABBQRzbGlwBgcGAAACAAQJZW1pdExwQW10CAUBZQJfMgQJbHBBc3NldElkCAUBZQJfNwQFc3RhdGUIBQFlAl85BAZhbURpZmYIBQFlA18xMAQGcHJEaWZmCAUBZQNfMTEEBGFtSWQIBQFlA18xMgQEcHJJZAgFAWUDXzEzBAFyCQD8BwQFA2ZjYQIEZW1pdAkAzAgCBQllbWl0THBBbXQFA25pbAUDbmlsAwkAAAIFAXIFAXIEAmVsBAckbWF0Y2gwBQFyAwkAAQIFByRtYXRjaDACB0FkZHJlc3MEBmxlZ2FjeQUHJG1hdGNoMAkA/AcEBQZsZWdhY3kCBGVtaXQJAMwIAgUJZW1pdExwQW10BQNuaWwFA25pbAUEdW5pdAMJAAACBQJlbAUCZWwEAnNhAwkAZgIFBmFtRGlmZgAACQD8BwQFCHNsaXBDbnRyAgNwdXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUEYW1JZAUGYW1EaWZmBQNuaWwFA25pbAMJAAACBQJzYQUCc2EEAnNwAwkAZgIFBnByRGlmZgAACQD8BwQFCHNsaXBDbnRyAgNwdXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUEcHJJZAUGcHJEaWZmBQNuaWwFA25pbAMJAAACBQJzcAUCc3AECGxwVHJuc2ZyAwUJYXV0b1N0YWtlBAJzcwkA/AcEBQtzdGFraW5nQ250cgIFc3Rha2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUJbHBBc3NldElkBQllbWl0THBBbXQFA25pbAMJAAACBQJzcwUCc3MFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFCWVtaXRMcEFtdAUJbHBBc3NldElkBQNuaWwJAM4IAgUFc3RhdGUFCGxwVHJuc2ZyCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBCXB1dE9uZVRrbgULYW1Bc3NldFBhcnQLcHJBc3NldFBhcnQFb3V0THAIc2xpcHBhZ2UJYXV0b1N0YWtlBANjZmcJAQNnZmMABAtzdGFraW5nQ250cgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUDY2ZnBQ9pZHhGYWN0U3Rha0NudHICCldyIHN0IGFkZHIECHNsaXBDbnRyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQNjZmcFEGlkeEZhY3RTbGlwcENudHICCldyIHNsIGFkZHIEB2d3eENudHIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQCRAwIFA2NmZwURaWR4RmFjdEd3eFJld0NudHICC1dyIGd3eCBhZGRyBAdwb29sQ2ZnCQEDZ3BjAAQEYW1JZAkAkQMCBQdwb29sQ2ZnBQlpZHhBbUFzSWQEBHBySWQJAJEDAgUHcG9vbENmZwUJaWR4UHJBc0lkBAVhbURjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3Bvb2xDZmcFC2lkeEFtdEFzRGNtBAVwckRjbQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFB3Bvb2xDZmcFDWlkeFByaWNlQXNEY20EBWFkZG9uCQELdmFsdWVPckVsc2UCCQCdCAIFBHRoaXMJAQNhZGEAAgAEC3VzZXJBZGRyZXNzAwkAAAIFBWFkZG9uCQClCAEIBQFpBmNhbGxlcggFAWkMb3JpZ2luQ2FsbGVyCAUBaQZjYWxsZXIEDWFkZG9uQ29udHJhY3QJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkApggBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkBA2FkYQACCW5vIGFkZG9ucwIaYWRkb24gYWRkcmVzcyBpbiBub3QgdmFsaWQEBWNoZWNrCQD9BwQFDWFkZG9uQ29udHJhY3QCEmVuc3VyZUNhblB1dE9uZVRrbgkAzAgCCQClCAEFC3VzZXJBZGRyZXNzBQNuaWwFA25pbAMJAAACBQVjaGVjawUFY2hlY2sDAwMDCQBnAgAABQhzbGlwcGFnZQYJAGcCAAAFC2FtQXNzZXRQYXJ0BgkAZwIAAAULcHJBc3NldFBhcnQGCQBnAgAABQVvdXRMcAkAAgECDFdyb25nIHBhcmFtcwMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECCzEgcG1udCBleHBkBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQKcG10QXNzZXRJZAkA2AQBCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQEBnBtdEFtdAgFA3BtdAZhbW91bnQDCQBmAgCAreIEBQZwbXRBbXQJAAIBAg1Xcm9uZyBwbXQgYW10BAlhbUJhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUEYW1JZAQJcHJCYWxhbmNlCQENZ2V0QWNjQmFsYW5jZQEFBHBySWQEDSR0MDI3Mjc2Mjc4NTIDCQAAAgUKcG10QXNzZXRJZAUEYW1JZAMDCQBmAgUGcG10QW10BQlhbUJhbGFuY2UGCQBmAgULYW1Bc3NldFBhcnQFBnBtdEFtdAkAAgECFmludmFsaWQgcGF5bWVudCBhbW91bnQJAJgKBgkAZQIFCWFtQmFsYW5jZQUGcG10QW10BQlwckJhbGFuY2UJAGUCBQZwbXRBbXQFC2FtQXNzZXRQYXJ0BQtwckFzc2V0UGFydAAAAAADCQAAAgUKcG10QXNzZXRJZAUEcHJJZAMDCQBmAgUGcG10QW10BQlwckJhbGFuY2UGCQBmAgULcHJBc3NldFBhcnQFBnBtdEFtdAkAAgECFmludmFsaWQgcGF5bWVudCBhbW91bnQJAJgKBgUJYW1CYWxhbmNlCQBlAgUJcHJCYWxhbmNlBQZwbXRBbXQAAAAACQBlAgUGcG10QW10BQtwckFzc2V0UGFydAULYW1Bc3NldFBhcnQJAAIBAhB3cm9uZyBwbXRBc3NldElkBAxhbUJhbGFuY2VOb3cIBQ0kdDAyNzI3NjI3ODUyAl8xBAxwckJhbGFuY2VOb3cIBQ0kdDAyNzI3NjI3ODUyAl8yBAx2aXJ0U3dhcEluQW0IBQ0kdDAyNzI3NjI3ODUyAl8zBA12aXJ0U3dhcE91dFByCAUNJHQwMjcyNzYyNzg1MgJfNAQMdmlydFN3YXBJblByCAUNJHQwMjcyNzYyNzg1MgJfNQQNdmlydFN3YXBPdXRBbQgFDSR0MDI3Mjc2Mjc4NTICXzYEAkQwCQD8BwQFB2d3eENudHICBWNhbGNECQDMCAIJAKQDAQUMYW1CYWxhbmNlTm93CQDMCAIJAKQDAQUMcHJCYWxhbmNlTm93CQDMCAIFAUEJAMwIAgUFQW11bHQJAMwIAgUFRGNvbnYFA25pbAUDbmlsBAJEMQkA/AcEBQdnd3hDbnRyAgVjYWxjRAkAzAgCCQCmAwEJALYCAQkAZQIJAGQCBQxhbUJhbGFuY2VOb3cFDHZpcnRTd2FwSW5BbQUNdmlydFN3YXBPdXRBbQkAzAgCCQCmAwEJALYCAQkAZQIJAGQCBQxwckJhbGFuY2VOb3cFDHZpcnRTd2FwSW5QcgUNdmlydFN3YXBPdXRQcgkAzAgCBQFBCQDMCAIFBUFtdWx0CQDMCAIFBURjb252BQNuaWwFA25pbAQGRDB2c0QxCQECdmQDCQCnAwEJAQNzdHIBBQJEMQkApwMBCQEDc3RyAQUCRDAFCnNsaXBwYWdlNEQDCQAAAgUGRDB2c0QxBQZEMHZzRDEEBmVzdFB1dAkBAmNwCgkApQgBCAUBaQZjYWxsZXIJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUEYW1JZAULYW1Bc3NldFBhcnQJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFBHBySWQFC3ByQXNzZXRQYXJ0BQhzbGlwcGFnZQYGBgUGcG10QW10BQpwbXRBc3NldElkBAdlc3RpbUxQCAUGZXN0UHV0Al8yBAlscEFzc2V0SWQIBQZlc3RQdXQCXzcEBXN0YXRlCAUGZXN0UHV0Al85BAZhbURpZmYIBQZlc3RQdXQDXzEwBAZwckRpZmYIBQZlc3RQdXQDXzExBAlscENhbGNSZXMJAQN2YWQDCQC2AgEFB2VzdGltTFAJALYCAQUFb3V0THAJALYCAQUIc2xpcHBhZ2UECWVtaXRMcEFtdAkAoAMBCAUJbHBDYWxjUmVzAl8yBAFlCQD8BwQFA2ZjYQIEZW1pdAkAzAgCBQllbWl0THBBbXQFA25pbAUDbmlsAwkAAAIFAWUFAWUEAmVsBAckbWF0Y2gwBQFlAwkAAQIFByRtYXRjaDACB0FkZHJlc3MEBmxlZ2FjeQUHJG1hdGNoMAkA/AcEBQZsZWdhY3kCBGVtaXQJAMwIAgUJZW1pdExwQW10BQNuaWwFA25pbAUEdW5pdAMJAAACBQJlbAUCZWwEAnNhAwkAZgIFBmFtRGlmZgAACQD8BwQFCHNsaXBDbnRyAgNwdXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQRhbUlkBQZhbURpZmYFA25pbAUDbmlsAwkAAAIFAnNhBQJzYQQCc3ADCQBmAgUGcHJEaWZmAAAJAPwHBAUIc2xpcENudHICA3B1dAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQDZBAEFBHBySWQFBnByRGlmZgUDbmlsBQNuaWwDCQAAAgUCc3AFAnNwBAhscFRybnNmcgMFCWF1dG9TdGFrZQQCc3MJAPwHBAULc3Rha2luZ0NudHICBXN0YWtlBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCWxwQXNzZXRJZAUJZW1pdExwQW10BQNuaWwDCQAAAgUCc3MFAnNzBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQllbWl0THBBbXQFCWxwQXNzZXRJZAUDbmlsCQDOCAIFBXN0YXRlBQhscFRybnNmcgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpAQtwdXRPbmVUa25WMgIMbWluT3V0QW1vdW50CWF1dG9TdGFrZQMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECCzEgcG1udCBleHBkBApwb29sQ29uZmlnCQEDZ3BjAAQEYW1JZAkAkQMCBQpwb29sQ29uZmlnBQlpZHhBbUFzSWQEBHBySWQJAJEDAgUKcG9vbENvbmZpZwUJaWR4UHJBc0lkBAphbURlY2ltYWxzCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKcG9vbENvbmZpZwULaWR4QW10QXNEY20ECnByRGVjaW1hbHMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQpwb29sQ29uZmlnBQ1pZHhQcmljZUFzRGNtBAt1c2VyQWRkcmVzcwMJAAACCAUBaQZjYWxsZXIFBHRoaXMIBQFpDG9yaWdpbkNhbGxlcggFAWkGY2FsbGVyBANwbXQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQKcG10QXNzZXRJZAkA2AQBCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQEBnBtdEFtdAgFA3BtdAZhbW91bnQDCQBmAgCAreIEBQZwbXRBbXQJAAIBAg1Xcm9uZyBwbXQgYW10BAFyCQETZXN0aW1hdGVQdXRPbmVUa25WMgQFBnBtdEFtdAUKcG10QXNzZXRJZAkApQgBBQt1c2VyQWRkcmVzcwkA2AQBCAUBaQ10cmFuc2FjdGlvbklkBAdlc3RpbUxQCAUBcgJfMgQJbHBBc3NldElkCAUBcgJfNwQFc3RhdGUIBQFyAl85BAZhbURpZmYIBQFyA18xMAQGcHJEaWZmCAUBcgNfMTEECWVtaXRMcEFtdAMDCQBmAgUMbWluT3V0QW1vdW50AAAJAGYCBQxtaW5PdXRBbW91bnQFB2VzdGltTFAHCQACAQkAuQkCCQDMCAICH2Ftb3VudCB0byByZWNlaXZlIGlzIGxlc3MgdGhhbiAJAMwIAgkApAMBBQxtaW5PdXRBbW91bnQFA25pbAIABQdlc3RpbUxQBAFlCQD8BwQFA2ZjYQIEZW1pdAkAzAgCBQllbWl0THBBbXQFA25pbAUDbmlsAwkAAAIFAWUFAWUEAmVsBAckbWF0Y2gwBQFlAwkAAQIFByRtYXRjaDACB0FkZHJlc3MEBmxlZ2FjeQUHJG1hdGNoMAkA/AcEBQZsZWdhY3kCBGVtaXQJAMwIAgUJZW1pdExwQW10BQNuaWwFA25pbAUEdW5pdAMJAAACBQJlbAUCZWwEAnNhAwkAZgIFBmFtRGlmZgAACQD8BwQFD3NsaXBhZ2VDb250cmFjdAIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUEYW1JZAUGYW1EaWZmBQNuaWwFA25pbAMJAAACBQJzYQUCc2EEAnNwAwkAZgIFBnByRGlmZgAACQD8BwQFD3NsaXBhZ2VDb250cmFjdAIDcHV0BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJANkEAQUEcHJJZAUGcHJEaWZmBQNuaWwFA25pbAMJAAACBQJzcAUCc3AECGxwVHJuc2ZyAwUJYXV0b1N0YWtlBAJzcwkA/AcEBQ9zdGFraW5nQ29udHJhY3QCBXN0YWtlBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCWxwQXNzZXRJZAUJZW1pdExwQW10BQNuaWwDCQAAAgUCc3MFAnNzBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQllbWl0THBBbXQFCWxwQXNzZXRJZAUDbmlsCQCUCgIJAM4IAgUFc3RhdGUFCGxwVHJuc2ZyBQllbWl0THBBbXQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQETcHV0T25lVGtuVjJSRUFET05MWQINcGF5bWVudEFtb3VudA5wYXltZW50QXNzZXRJZAQBcgkBE2VzdGltYXRlUHV0T25lVGtuVjIEBQ1wYXltZW50QW1vdW50BQ5wYXltZW50QXNzZXRJZAIAAgAEB2VzdGltTFAIBQFyAl8yBAlscEFzc2V0SWQIBQFyAl83BAVzdGF0ZQgFAXICXzkEBmFtRGlmZggFAXIDXzEwBAZwckRpZmYIBQFyA18xMQkAlAoCBQNuaWwFB2VzdGltTFABaQEccHV0T25lVGtuVjJXaXRoQm9udXNSRUFET05MWQINcGF5bWVudEFtb3VudA5wYXltZW50QXNzZXRJZAQKcG9vbENvbmZpZwkBA2dwYwAEBGFtSWQJAJEDAgUKcG9vbENvbmZpZwUJaWR4QW1Bc0lkBARwcklkCQCRAwIFCnBvb2xDb25maWcFCWlkeFByQXNJZAQJYW1CYWxhbmNlCQENZ2V0QWNjQmFsYW5jZQEFBGFtSWQECXByQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQRwcklkBAFyCQETZXN0aW1hdGVQdXRPbmVUa25WMgQFDXBheW1lbnRBbW91bnQFDnBheW1lbnRBc3NldElkAgACAAQHZXN0aW1MUAgFAXICXzIECGN1clByaWNlCAUBcgJfMwQPbHBBc3NldEVtaXNzaW9uCAUBcgJfNgQJbHBBc3NldElkCAUBcgJfNwQNJHQwMzI1MTUzMjgyNAMJAAACBQ5wYXltZW50QXNzZXRJZAUEYW1JZAQQcHJpY2VBc3NldEFtb3VudAkAawMFDXBheW1lbnRBbW91bnQFCGN1clByaWNlBQZzY2FsZTgJAJQKAgUNcGF5bWVudEFtb3VudAUQcHJpY2VBc3NldEFtb3VudAQRYW1vdW50QXNzZXRBbW91bnQJAGsDBQ1wYXltZW50QW1vdW50BQZzY2FsZTgFCGN1clByaWNlCQCUCgIFEWFtb3VudEFzc2V0QW1vdW50BQ1wYXltZW50QW1vdW50BBFhbW91bnRBc3NldEFtb3VudAgFDSR0MDMyNTE1MzI4MjQCXzEEEHByaWNlQXNzZXRBbW91bnQIBQ0kdDAzMjUxNTMyODI0Al8yBAlscEFtdEJvdGgJAGsDBQ9scEFzc2V0RW1pc3Npb24FEHByaWNlQXNzZXRBbW91bnQFCXByQmFsYW5jZQQPbHBBc3NldFByaWNlT25lAwkAAAIFDnBheW1lbnRBc3NldElkBQRhbUlkCQBpAgURYW1vdW50QXNzZXRBbW91bnQFB2VzdGltTFAJAGkCBRBwcmljZUFzc2V0QW1vdW50BQdlc3RpbUxQBBBscEFzc2V0UHJpY2VCb3RoCQBpAgkAZAIFEHByaWNlQXNzZXRBbW91bnQFEWFtb3VudEFzc2V0QW1vdW50BQlscEFtdEJvdGgEBWJvbnVzCQBpAgkAZQIFD2xwQXNzZXRQcmljZU9uZQUQbHBBc3NldFByaWNlQm90aAUPbHBBc3NldFByaWNlT25lCQCUCgIFA25pbAUFYm9udXMBaQEKcHV0Rm9yRnJlZQEHbWF4U2xwZwMJAGYCAAAFB21heFNscGcJAAIBAgpXcm9uZyBzbHBnAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwACCQACAQIMMiBwbW50cyBleHBkBAZlc3RQdXQJAQJjcAoJAKUIAQgFAWkGY2FsbGVyCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQJAQ9BdHRhY2hlZFBheW1lbnQCCAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQICQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50CQCRAwIIBQFpCHBheW1lbnRzAAEFB21heFNscGcHBwYAAAIACAUGZXN0UHV0Al85AWkBA2dldAAEAXIJAQJjZwEFAWkECW91dEFtdEFtdAgFAXICXzEECG91dFByQW10CAUBcgJfMgQGcG10QW10CAUBcgJfMwQKcG10QXNzZXRJZAgFAXICXzQEBXN0YXRlCAUBcgJfNQQBYgkA/AcEBQNmY2ECBGJ1cm4JAMwIAgUGcG10QW10BQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIFCnBtdEFzc2V0SWQFBnBtdEFtdAUDbmlsAwkAAAIFAWIFAWIFBXN0YXRlCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBC2dldE9uZVRrblYyAgpvdXRBc3NldElkDG1pbk91dEFtb3VudAMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECCzEgcG1udCBleHBkBApwb29sQ29uZmlnCQEDZ3BjAAQEbHBJZAkAkQMCBQpwb29sQ29uZmlnBQlpZHhMUEFzSWQEBGFtSWQJAJEDAgUKcG9vbENvbmZpZwUJaWR4QW1Bc0lkBARwcklkCQCRAwIFCnBvb2xDb25maWcFCWlkeFByQXNJZAQKYW1EZWNpbWFscwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCnBvb2xDb25maWcFC2lkeEFtdEFzRGNtBApwckRlY2ltYWxzCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUKcG9vbENvbmZpZwUNaWR4UHJpY2VBc0RjbQQKcG9vbFN0YXR1cwkAkQMCBQpwb29sQ29uZmlnBQlpZHhQb29sU3QEC3VzZXJBZGRyZXNzAwkAAAIIBQFpBmNhbGxlcgUEdGhpcwgFAWkMb3JpZ2luQ2FsbGVyCAUBaQZjYWxsZXIEA3BtdAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABApwbXRBc3NldElkCQEFdmFsdWUBCAUDcG10B2Fzc2V0SWQEBnBtdEFtdAgFA3BtdAZhbW91bnQDCQBmAgCAlOvcAwUGcG10QW10CQACAQINTWluIHBtdCAxMCBMUAQGdHhJZDU4CQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQDCQECIT0CBQRscElkCQDYBAEFCnBtdEFzc2V0SWQJAAIBAghXcm9uZyBMUAQJYW1CYWxhbmNlCQENZ2V0QWNjQmFsYW5jZQEFBGFtSWQECXByQmFsYW5jZQkBDWdldEFjY0JhbGFuY2UBBQRwcklkBAh0b3RhbEdldAoAAUAJAPwHBAUEdGhpcwITZ2V0T25lVGtuVjJSRUFET05MWQkAzAgCBQpvdXRBc3NldElkCQDMCAIFBnBtdEFtdAUDbmlsBQNuaWwDCQABAgUBQAIDSW50BQFACQACAQkArAICCQADAQkA/AcEBQR0aGlzAhNnZXRPbmVUa25WMlJFQURPTkxZCQDMCAIFCm91dEFzc2V0SWQJAMwIAgUGcG10QW10BQNuaWwFA25pbAIYIGNvdWxkbid0IGJlIGNhc3QgdG8gSW50BAt0b3RhbEFtb3VudAMDCQBmAgUMbWluT3V0QW1vdW50AAAJAGYCBQxtaW5PdXRBbW91bnQFCHRvdGFsR2V0BwkAAgEJALkJAgkAzAgCAh9hbW91bnQgdG8gcmVjZWl2ZSBpcyBsZXNzIHRoYW4gCQDMCAIJAKQDAQUMbWluT3V0QW1vdW50BQNuaWwCAAUIdG90YWxHZXQEDSR0MDM1NzQ5MzU4MzYDCQAAAgUKb3V0QXNzZXRJZAUEYW1JZAkAlAoCBQt0b3RhbEFtb3VudAAACQCUCgIAAAULdG90YWxBbW91bnQEBW91dEFtCAUNJHQwMzU3NDkzNTgzNgJfMQQFb3V0UHIIBQ0kdDAzNTc0OTM1ODM2Al8yBAhjdXJQclgxOAkBBGNwYmkCCQECdDECBQlwckJhbGFuY2UFCnByRGVjaW1hbHMJAQJ0MQIFCWFtQmFsYW5jZQUKYW1EZWNpbWFscwQFY3VyUHIJAQJmMQIFCGN1clByWDE4BQZzY2FsZTgEBXN0YXRlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFC3VzZXJBZGRyZXNzBQt0b3RhbEFtb3VudAMJAAACBQpvdXRBc3NldElkAgVXQVZFUwUEdW5pdAkA2QQBBQpvdXRBc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQNnYXUCCQClCAEFC3VzZXJBZGRyZXNzBQZ0eElkNTgJARFkYXRhR2V0QWN0aW9uSW5mbwYFBW91dEFtBQVvdXRQcgUGcG10QW10BQVjdXJQcgUGaGVpZ2h0CAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBAnBsAAUFY3VyUHIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQJwaAIFBmhlaWdodAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFBWN1clByBQNuaWwDCQAAAgUFc3RhdGUFBXN0YXRlBARidXJuCQD8BwQFA2ZjYQIEYnVybgkAzAgCBQZwbXRBbXQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUKcG10QXNzZXRJZAUGcG10QW10BQNuaWwDCQAAAgUEYnVybgUEYnVybgkAlAoCBQVzdGF0ZQULdG90YWxBbW91bnQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQETZ2V0T25lVGtuVjJSRUFET05MWQIKb3V0QXNzZXRJZA1scEFzc2V0QW1vdW50BApwb29sQ29uZmlnCQEDZ3BjAAQEbHBJZAkAkQMCBQpwb29sQ29uZmlnBQlpZHhMUEFzSWQEBGFtSWQJAJEDAgUKcG9vbENvbmZpZwUJaWR4QW1Bc0lkBARwcklkCQCRAwIFCnBvb2xDb25maWcFCWlkeFByQXNJZAQBcgkBA2VnbwQCAAUEbHBJZAUNbHBBc3NldEFtb3VudAUEdGhpcwQKZXN0aW1BbUFtdAgFAXICXzEECmVzdGltUHJBbXQIBQFyAl8yBAlhbUJhbGFuY2UJAQ1nZXRBY2NCYWxhbmNlAQUEYW1JZAQJcHJCYWxhbmNlCQENZ2V0QWNjQmFsYW5jZQEFBHBySWQEDGFtQmFsYW5jZU5vdwkAZQIFCWFtQmFsYW5jZQUKZXN0aW1BbUFtdAQMcHJCYWxhbmNlTm93CQBlAgUJcHJCYWxhbmNlBQplc3RpbVByQW10BA0kdDAzNjkzMDM3MjAxAwkAAAIFCm91dEFzc2V0SWQFBGFtSWQJAJUKAwUMcHJCYWxhbmNlTm93BQxhbUJhbGFuY2VOb3cFCmVzdGltUHJBbXQDCQAAAgUKb3V0QXNzZXRJZAUEcHJJZAkAlQoDBQxhbUJhbGFuY2VOb3cFDHByQmFsYW5jZU5vdwUKZXN0aW1BbUFtdAkAAgECEHdyb25nIG91dEFzc2V0SWQEFGFtb3VudEJhbGFuY2VGb3JTd2FwCAUNJHQwMzY5MzAzNzIwMQJfMQQTcHJpY2VCYWxhbmNlRm9yU3dhcAgFDSR0MDM2OTMwMzcyMDECXzIEDGFtb3VudFRvU3dhcAgFDSR0MDM2OTMwMzcyMDECXzMECnlQcmVjaXNpb24AAQQKZXhjaFJlc3VsdAoAAUAJAPwHBAULZ3d4Q29udHJhY3QCDGNhbGNTd2FwWFRvWQkAzAgCCQCkAwEFDGFtb3VudFRvU3dhcAkAzAgCCQCkAwEFFGFtb3VudEJhbGFuY2VGb3JTd2FwCQDMCAIJAKQDAQUTcHJpY2VCYWxhbmNlRm9yU3dhcAkAzAgCAgAJAMwIAgUBQQkAzAgCBQVBbXVsdAkAzAgCCQCkAwEFCnlQcmVjaXNpb24JAMwIAgUFRGNvbnYFA25pbAUDbmlsAwkAAQIFAUACA0ludAUBQAkAAgEJAKwCAgkAAwEJAPwHBAULZ3d4Q29udHJhY3QCDGNhbGNTd2FwWFRvWQkAzAgCCQCkAwEFDGFtb3VudFRvU3dhcAkAzAgCCQCkAwEFFGFtb3VudEJhbGFuY2VGb3JTd2FwCQDMCAIJAKQDAQUTcHJpY2VCYWxhbmNlRm9yU3dhcAkAzAgCAgAJAMwIAgUBQQkAzAgCBQVBbXVsdAkAzAgCCQCkAwEFCnlQcmVjaXNpb24JAMwIAgUFRGNvbnYFA25pbAUDbmlsAhggY291bGRuJ3QgYmUgY2FzdCB0byBJbnQECHRvdGFsR2V0CQBkAgUKZXhjaFJlc3VsdAMJAAACBQpvdXRBc3NldElkBQRhbUlkBQplc3RpbUFtQW10BQplc3RpbVByQW10CQCUCgIFA25pbAUIdG90YWxHZXQBaQEJZ2V0Tm9MZXNzAhJub0xlc3NUaGVuQW10QXNzZXQUbm9MZXNzVGhlblByaWNlQXNzZXQEAXIJAQJjZwEFAWkECG91dEFtQW10CAUBcgJfMQQIb3V0UHJBbXQIBQFyAl8yBAZwbXRBbXQIBQFyAl8zBApwbXRBc3NldElkCAUBcgJfNAQFc3RhdGUIBQFyAl81AwkAZgIFEm5vTGVzc1RoZW5BbXRBc3NldAUIb3V0QW1BbXQJAAIBCQCsAgIJAKwCAgkArAICAglGYWlsZWQ6ICAJAKQDAQUIb3V0QW1BbXQCAyA8IAkApAMBBRJub0xlc3NUaGVuQW10QXNzZXQDCQBmAgUUbm9MZXNzVGhlblByaWNlQXNzZXQFCG91dFByQW10CQACAQkArAICCQCsAgIJAKwCAgIIRmFpbGVkOiAJAKQDAQUIb3V0UHJBbXQCAyA8IAkApAMBBRRub0xlc3NUaGVuUHJpY2VBc3NldAQUYnVybkxQQXNzZXRPbkZhY3RvcnkJAPwHBAUDZmNhAgRidXJuCQDMCAIFBnBtdEFtdAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQpwbXRBc3NldElkBQZwbXRBbXQFA25pbAMJAAACBRRidXJuTFBBc3NldE9uRmFjdG9yeQUUYnVybkxQQXNzZXRPbkZhY3RvcnkFBXN0YXRlCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBDXVuc3Rha2VBbmRHZXQBBmFtb3VudAQNY2hlY2tQYXltZW50cwMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAAkAAgECDU5vIHBtbnRzIGV4cGQGAwkAAAIFDWNoZWNrUGF5bWVudHMFDWNoZWNrUGF5bWVudHMEA2NmZwkBA2dwYwAECmZhY3RvcnlDZmcJAQNnZmMABAlscEFzc2V0SWQJANkEAQkAkQMCBQNjZmcFCWlkeExQQXNJZAQHc3Rha2luZwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCmCAEJAJEDAgUKZmFjdG9yeUNmZwUPaWR4RmFjdFN0YWtDbnRyAgpXciBzdCBhZGRyBAp1bnN0YWtlSW52CQD8BwQFB3N0YWtpbmcCB3Vuc3Rha2UJAMwIAgkA2AQBBQlscEFzc2V0SWQJAMwIAgUGYW1vdW50BQNuaWwFA25pbAMJAAACBQp1bnN0YWtlSW52BQp1bnN0YWtlSW52BAFyCQEDZWdvBAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQDYBAEFCWxwQXNzZXRJZAUGYW1vdW50CAUBaQZjYWxsZXIEA3N0cwkBDXBhcnNlSW50VmFsdWUBCAUBcgJfOQQFc3RhdGUIBQFyA18xMAQBdgMDCQEDaWdzAAYJAAACBQNzdHMFDFBvb2xTaHV0ZG93bgkAAgEJAKwCAgIJQmxvY2tlZDogCQCkAwEFA3N0cwYDCQAAAgUBdgUBdgQFYnVybkEJAPwHBAUDZmNhAgRidXJuCQDMCAIFBmFtb3VudAUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCBQlscEFzc2V0SWQFBmFtb3VudAUDbmlsAwkAAAIFBWJ1cm5BBQVidXJuQQUFc3RhdGUJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQETdW5zdGFrZUFuZEdldE9uZVRrbgQGYW1vdW50CW91dEFtb3VudApvdXRBc3NldElkCHNsaXBwYWdlBA1jaGVja1BheW1lbnRzAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwAACQACAQINTm8gcG1udHMgZXhwZAYDCQAAAgUNY2hlY2tQYXltZW50cwUNY2hlY2tQYXltZW50cwQDY2ZnCQEDZ3BjAAQKZmFjdG9yeUNmZwkBA2dmYwAECWxwQXNzZXRJZAkA2QQBCQCRAwIFA2NmZwUJaWR4TFBBc0lkBAdzdGFraW5nCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKYIAQkAkQMCBQpmYWN0b3J5Q2ZnBQ9pZHhGYWN0U3Rha0NudHICCldyIHN0IGFkZHIECnVuc3Rha2VJbnYJAPwHBAUHc3Rha2luZwIHdW5zdGFrZQkAzAgCCQDYBAEFCWxwQXNzZXRJZAkAzAgCBQZhbW91bnQFA25pbAUDbmlsAwkAAAIFCnVuc3Rha2VJbnYFCnVuc3Rha2VJbnYED291dEFtb3VudFJlc3VsdAoAAUAJAPwHBAUEdGhpcwILZ2V0T25lVGtuVjIJAMwIAgUJb3V0QW1vdW50CQDMCAIFCm91dEFzc2V0SWQJAMwIAgUIc2xpcHBhZ2UFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgUJbHBBc3NldElkBQZhbW91bnQFA25pbAMJAAECBQFAAgNJbnQFAUAFBHVuaXQDCQAAAgUPb3V0QW1vdW50UmVzdWx0BQ9vdXRBbW91bnRSZXN1bHQJAJQKAgUDbmlsBQ9vdXRBbW91bnRSZXN1bHQJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQEIYWN0aXZhdGUCCGFtdEFzU3RyB3ByQXNTdHIDCQECIT0CCQClCAEIBQFpBmNhbGxlcgkApQgBBQNmY2EJAAIBAgZkZW5pZWQJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQECYWEABQhhbXRBc1N0cgkAzAgCCQELU3RyaW5nRW50cnkCCQECcGEABQdwckFzU3RyBQNuaWwCB3N1Y2Nlc3MBaQEEc2V0UwIBawF2AwkBAiE9AgkApQgBCAUBaQZjYWxsZXIJAQRzdHJmAgUEdGhpcwkBA2FkYQAFAnBkCQDMCAIJAQtTdHJpbmdFbnRyeQIFAWsFAXYFA25pbAFpAQRzZXRJAgFrAXYDCQECIT0CCQClCAEIBQFpBmNhbGxlcgkBBHN0cmYCBQR0aGlzCQEDYWRhAAUCcGQJAMwIAgkBDEludGVnZXJFbnRyeQIFAWsFAXYFA25pbAFpARxnZXRQb29sQ29uZmlnV3JhcHBlclJFQURPTkxZAAkAlAoCBQNuaWwJAQNncGMAAWkBHGdldEFjY0JhbGFuY2VXcmFwcGVyUkVBRE9OTFkBB2Fzc2V0SWQJAJQKAgUDbmlsCQENZ2V0QWNjQmFsYW5jZQEFB2Fzc2V0SWQBaQEZY2FsY1ByaWNlc1dyYXBwZXJSRUFET05MWQMFYW1BbXQFcHJBbXQFbHBBbXQEAnByCQEKY2FsY1ByaWNlcwMFBWFtQW10BQVwckFtdAUFbHBBbXQJAJQKAgUDbmlsCQDMCAIJAKYDAQkAkQMCBQJwcgAACQDMCAIJAKYDAQkAkQMCBQJwcgABCQDMCAIJAKYDAQkAkQMCBQJwcgACBQNuaWwBaQEWZnJvbVgxOFdyYXBwZXJSRUFET05MWQIDdmFsDHJlc1NjYWxlTXVsdAkAlAoCBQNuaWwJAQJmMQIJAKcDAQUDdmFsBQxyZXNTY2FsZU11bHQBaQEUdG9YMThXcmFwcGVyUkVBRE9OTFkCB29yaWdWYWwNb3JpZ1NjYWxlTXVsdAkAlAoCBQNuaWwJAKYDAQkBAnQxAgUHb3JpZ1ZhbAUNb3JpZ1NjYWxlTXVsdAFpAR5jYWxjUHJpY2VCaWdJbnRXcmFwcGVyUkVBRE9OTFkCCHByQW10WDE4CGFtQW10WDE4CQCUCgIFA25pbAkApgMBCQEEY3BiaQIJAKcDAQUIcHJBbXRYMTgJAKcDAQUIYW1BbXRYMTgBaQEjZXN0aW1hdGVQdXRPcGVyYXRpb25XcmFwcGVyUkVBRE9OTFkJBnR4SWQ1OAhzbGlwcGFnZQdpbkFtQW10BmluQW1JZAdpblByQW10BmluUHJJZAd1c3JBZGRyBmlzRXZhbAZlbWl0THAJAJQKAgUDbmlsCQEDZXBvDQUGdHhJZDU4BQhzbGlwcGFnZQUHaW5BbUFtdAUGaW5BbUlkBQdpblByQW10BQZpblBySWQFB3VzckFkZHIFBmlzRXZhbAUGZW1pdExwBgcAAAIAAWkBI2VzdGltYXRlR2V0T3BlcmF0aW9uV3JhcHBlclJFQURPTkxZBAZ0eElkNTgHcG10QXNJZAhwbXRMcEFtdAd1c3JBZGRyBAFyCQEDZWdvBAUGdHhJZDU4BQdwbXRBc0lkBQhwbXRMcEFtdAkBEUBleHRyTmF0aXZlKDEwNjIpAQUHdXNyQWRkcgkAlAoCBQNuaWwJAJwKCggFAXICXzEIBQFyAl8yCAUBcgJfMwgFAXICXzQIBQFyAl81CAUBcgJfNggFAXICXzcJAKYDAQgFAXICXzgIBQFyAl85CAUBcgNfMTABAnR4AQZ2ZXJpZnkABA90YXJnZXRQdWJsaWNLZXkEByRtYXRjaDAJAQFtAAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAJwawUHJG1hdGNoMAUCcGsDCQABAgUHJG1hdGNoMAIEVW5pdAgFAnR4D3NlbmRlclB1YmxpY0tleQkAAgECC01hdGNoIGVycm9yBAckbWF0Y2gwBQJ0eAMJAAECBQckbWF0Y2gwAgVPcmRlcgQFb3JkZXIFByRtYXRjaDAECm1hdGNoZXJQdWIJAQJtcAAECm9yZGVyVmFsaWQJAQNtb2EBBQVvcmRlcgQLc2VuZGVyVmFsaWQJAPQDAwgFBW9yZGVyCWJvZHlCeXRlcwkAkQMCCAUFb3JkZXIGcHJvb2ZzAAAIBQVvcmRlcg9zZW5kZXJQdWJsaWNLZXkEDG1hdGNoZXJWYWxpZAkA9AMDCAUFb3JkZXIJYm9keUJ5dGVzCQCRAwIIBQVvcmRlcgZwcm9vZnMAAQUKbWF0Y2hlclB1YgMDAwUKb3JkZXJWYWxpZAULc2VuZGVyVmFsaWQHBQxtYXRjaGVyVmFsaWQHBgkBA3RvZQMFCm9yZGVyVmFsaWQFC3NlbmRlclZhbGlkBQxtYXRjaGVyVmFsaWQDCQABAgUHJG1hdGNoMAIUU2V0U2NyaXB0VHJhbnNhY3Rpb24EAXMFByRtYXRjaDAEB25ld0hhc2gJAPYDAQkBBXZhbHVlAQgFAXMGc2NyaXB0BAthbGxvd2VkSGFzaAkA2wQBCQEFdmFsdWUBCQCdCAIFA2ZjYQkBHGtleUFsbG93ZWRMcFN0YWJsZVNjcmlwdEhhc2gABAtjdXJyZW50SGFzaAkA8QcBBQR0aGlzAwMJAAACBQthbGxvd2VkSGFzaAUHbmV3SGFzaAkBAiE9AgULY3VycmVudEhhc2gFB25ld0hhc2gHBgkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUPdGFyZ2V0UHVibGljS2V5CQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAABQ90YXJnZXRQdWJsaWNLZXmGlzLF",
    "height": 2228897,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DQqrz3F1MFERcBBP4qE4pmMMFWgBioPqLwMQbdK5fEyE
Next: 3VhvBibdaQ7p13BL2tV2mV6ByTiGTGTBeCoawoVXCzUG

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 
267270     }
268271 
269272 
270-func epo (txId58,slippage,inAmAmt,inAmId,inPrAmt,inPrId,userAddress,isEval,emitLp,isOneAsset,pmtAmt,pmtId) = {
273+func epo (txId58,slippage,inAmAmt,inAmId,inPrAmt,inPrId,userAddress,isEval,emitLp,isOneAsset,validateSlippage,pmtAmt,pmtId) = {
271274     let cfg = gpc()
272275     let lpId = fromBase58String(cfg[idxLPAsId])
273276     let amIdStr = cfg[idxAmAsId]
312315             let curPriceX18 = cpbi(prBalanceX18, amBalanceX18)
313316             let slippageRealX18 = fraction(abs((curPriceX18 - userPriceX18)), scale18, curPriceX18)
314317             let slippageX18 = t1(slippage, scale8)
315-            if (if ((curPriceX18 != zeroBigInt))
318+            if (if (if (validateSlippage)
319+                then (curPriceX18 != zeroBigInt)
320+                else false)
316321                 then (slippageRealX18 > slippageX18)
317322                 else false)
318323                 then throw(((("Price slippage " + toString(slippageRealX18)) + " > ") + toString(slippageX18)))
342347                 else calcLpAmt
343348             let amDiff = (inAmAmt - calcAmAssetPmt)
344349             let prDiff = (inPrAmt - calcPrAssetPmt)
345-            let $t01568216027 = if (if (isOneAsset)
350+            let $t01608316428 = if (if (isOneAsset)
346351                 then (pmtId == amIdStr)
347352                 else false)
348353                 then $Tuple2(pmtAmt, 0)
351356                     else false)
352357                     then $Tuple2(0, pmtAmt)
353358                     else $Tuple2(calcAmAssetPmt, calcPrAssetPmt)
354-            let writeAmAmt = $t01568216027._1
355-            let writePrAmt = $t01568216027._2
359+            let writeAmAmt = $t01608316428._1
360+            let writePrAmt = $t01608316428._2
356361             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))]
357362             $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEm, lpId, sts, commonState, amDiff, prDiff, inAmId, inPrId)
358363             }
423428         }
424429 
425430 
426-func cp (caller,txId,amAsPmt,prAsPmt,slippage,emitLp,isOneAsset,pmtAmt,pmtId) = {
427-    let r = epo(txId, slippage, value(amAsPmt).amount, value(amAsPmt).assetId, value(prAsPmt).amount, value(prAsPmt).assetId, caller, false, emitLp, isOneAsset, pmtAmt, pmtId)
431+func cp (caller,txId,amAsPmt,prAsPmt,slippage,emitLp,isOneAsset,validateSlippage,pmtAmt,pmtId) = {
432+    let r = epo(txId, slippage, value(amAsPmt).amount, value(amAsPmt).assetId, value(prAsPmt).amount, value(prAsPmt).assetId, caller, false, emitLp, isOneAsset, validateSlippage, pmtAmt, pmtId)
428433     let sts = parseIntValue(r._8)
429434     if (if (if (igs())
430435         then true
436441     }
437442 
438443 
439-func takeFee (amount) = {
440-    let fee = fraction(amount, feePermille, thousand)
441-    $Tuple2((amount - fee), fee)
444+func estimatePutOneTknV2 (pmtAmt,pmtAssetId,userAddress,txId) = {
445+    let poolConfig = gpc()
446+    let amId = poolConfig[idxAmAsId]
447+    let prId = poolConfig[idxPrAsId]
448+    let amBalance = getAccBalance(amId)
449+    let prBalance = getAccBalance(prId)
450+    let $t02075121200 = if ((txId == ""))
451+        then $Tuple2(amBalance, prBalance)
452+        else if ((pmtAssetId == amId))
453+            then if ((pmtAmt > amBalance))
454+                then throw("invalid payment amount")
455+                else $Tuple2((amBalance - pmtAmt), prBalance)
456+            else if ((pmtAssetId == prId))
457+                then if ((pmtAmt > prBalance))
458+                    then throw("invalid payment amount")
459+                    else $Tuple2(amBalance, (prBalance - pmtAmt))
460+                else throw("wrong pmtAssetId")
461+    let amBalanceNow = $t02075121200._1
462+    let prBalanceNow = $t02075121200._2
463+    let $t02120421338 = if ((pmtAssetId == amId))
464+        then $Tuple2(amBalanceNow, prBalanceNow)
465+        else $Tuple2(prBalanceNow, amBalanceNow)
466+    let amBalanceForCalc = $t02120421338._1
467+    let prBalanceForCalc = $t02120421338._2
468+    let xPrecision = 1
469+    let result = {
470+        let @ = invoke(gwxContract, "calcPutXOnly", [toString(pmtAmt), toString(amBalanceForCalc), toString(prBalanceForCalc), "", A, Amult, toString(xPrecision), Dconv], nil)
471+        if ($isInstanceOf(@, "(Int, Int)"))
472+            then @
473+            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)"))
474+        }
475+    let $t02180721903 = if ((pmtAssetId == amId))
476+        then result
477+        else $Tuple2(result._2, result._1)
478+    let amAssetPart = $t02180721903._1
479+    let prAssetPart = $t02180721903._2
480+    let estPut = cp(userAddress, txId, AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), 0, true, true, false, pmtAmt, pmtAssetId)
481+    let estimLP = estPut._2
482+    let lpAssetId = estPut._7
483+    let state = estPut._9
484+    let amDiff = estPut._10
485+    let prDiff = estPut._11
486+    estPut
442487     }
443488 
444489 
533578         else if ((size(i.payments) != 2))
534579             then throw("2 pmnts expd")
535580             else {
536-                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, "")
581+                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, true, 0, "")
537582                 let emitLpAmt = e._2
538583                 let lpAssetId = e._7
539584                 let state = e._9
599644     let userAddress = if ((addon == toString(i.caller)))
600645         then i.originCaller
601646         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")
647+    let addonContract = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(ada()), "no addons")), "addon address in not valid")
648+    let check = reentrantInvoke(addonContract, "ensureCanPutOneTkn", [toString(userAddress)], nil)
649+    if ((check == check))
650+        then if (if (if (if ((0 >= slippage))
651+            then true
652+            else (0 >= amAssetPart))
653+            then true
654+            else (0 >= prAssetPart))
655+            then true
656+            else (0 >= outLp))
657+            then throw("Wrong params")
658+            else if ((size(i.payments) != 1))
659+                then throw("1 pmnt expd")
660+                else {
661+                    let pmt = value(i.payments[0])
662+                    let pmtAssetId = toBase58String(value(pmt.assetId))
663+                    let pmtAmt = pmt.amount
664+                    if ((10000000 > pmtAmt))
665+                        then throw("Wrong pmt amt")
666+                        else {
667+                            let amBalance = getAccBalance(amId)
668+                            let prBalance = getAccBalance(prId)
669+                            let $t02727627852 = if ((pmtAssetId == amId))
670+                                then if (if ((pmtAmt > amBalance))
671+                                    then true
672+                                    else (amAssetPart > pmtAmt))
673+                                    then throw("invalid payment amount")
674+                                    else $Tuple6((amBalance - pmtAmt), prBalance, (pmtAmt - amAssetPart), prAssetPart, 0, 0)
675+                                else if ((pmtAssetId == prId))
676+                                    then if (if ((pmtAmt > prBalance))
677+                                        then true
678+                                        else (prAssetPart > pmtAmt))
679+                                        then throw("invalid payment amount")
680+                                        else $Tuple6(amBalance, (prBalance - pmtAmt), 0, 0, (pmtAmt - prAssetPart), amAssetPart)
681+                                    else throw("wrong pmtAssetId")
682+                            let amBalanceNow = $t02727627852._1
683+                            let prBalanceNow = $t02727627852._2
684+                            let virtSwapInAm = $t02727627852._3
685+                            let virtSwapOutPr = $t02727627852._4
686+                            let virtSwapInPr = $t02727627852._5
687+                            let virtSwapOutAm = $t02727627852._6
688+                            let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
689+                            let D1 = invoke(gwxCntr, "calcD", [toString(toBigInt(((amBalanceNow + virtSwapInAm) - virtSwapOutAm))), toString(toBigInt(((prBalanceNow + virtSwapInPr) - virtSwapOutPr))), A, Amult, Dconv], nil)
690+                            let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
691+                            if ((D0vsD1 == D0vsD1))
692+                                then {
693+                                    let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), slippage, true, true, true, pmtAmt, pmtAssetId)
694+                                    let estimLP = estPut._2
695+                                    let lpAssetId = estPut._7
696+                                    let state = estPut._9
697+                                    let amDiff = estPut._10
698+                                    let prDiff = estPut._11
699+                                    let lpCalcRes = vad(toBigInt(estimLP), toBigInt(outLp), toBigInt(slippage))
700+                                    let emitLpAmt = toInt(lpCalcRes._2)
701+                                    let e = invoke(fca, "emit", [emitLpAmt], nil)
702+                                    if ((e == e))
703+                                        then {
704+                                            let el =                                             match e {
705+                                                case legacy: Address => 
706+                                                    invoke(legacy, "emit", [emitLpAmt], nil)
707+                                                case _ => 
708+                                                    unit
709+                                            }
710+                                            if ((el == el))
711+                                                then {
712+                                                    let sa = if ((amDiff > 0))
713+                                                        then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
714+                                                        else nil
715+                                                    if ((sa == sa))
716+                                                        then {
717+                                                            let sp = if ((prDiff > 0))
718+                                                                then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
719+                                                                else nil
720+                                                            if ((sp == sp))
721+                                                                then {
722+                                                                    let lpTrnsfr = if (autoStake)
723+                                                                        then {
724+                                                                            let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
725+                                                                            if ((ss == ss))
726+                                                                                then nil
727+                                                                                else throw("Strict value is not equal to itself.")
728+                                                                            }
729+                                                                        else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
730+                                                                    (state ++ lpTrnsfr)
731+                                                                    }
732+                                                                else throw("Strict value is not equal to itself.")
733+                                                            }
734+                                                        else throw("Strict value is not equal to itself.")
735+                                                    }
736+                                                else throw("Strict value is not equal to itself.")
737+                                            }
738+                                        else throw("Strict value is not equal to itself.")
739+                                    }
740+                                else throw("Strict value is not equal to itself.")
741+                            }
742+                    }
743+        else throw("Strict value is not equal to itself.")
744+    }
745+
746+
747+
748+@Callable(i)
749+func putOneTknV2 (minOutAmount,autoStake) = if ((size(i.payments) != 1))
750+    then throw("1 pmnt expd")
751+    else {
752+        let poolConfig = gpc()
753+        let amId = poolConfig[idxAmAsId]
754+        let prId = poolConfig[idxPrAsId]
755+        let amDecimals = parseIntValue(poolConfig[idxAmtAsDcm])
756+        let prDecimals = parseIntValue(poolConfig[idxPriceAsDcm])
757+        let userAddress = if ((i.caller == this))
758+            then i.originCaller
759+            else i.caller
760+        let pmt = value(i.payments[0])
761+        let pmtAssetId = toBase58String(value(pmt.assetId))
762+        let pmtAmt = pmt.amount
763+        if ((10000000 > pmtAmt))
764+            then throw("Wrong pmt amt")
612765             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))
766+                let r = estimatePutOneTknV2(pmtAmt, pmtAssetId, toString(userAddress), toBase58String(i.transactionId))
767+                let estimLP = r._2
768+                let lpAssetId = r._7
769+                let state = r._9
770+                let amDiff = r._10
771+                let prDiff = r._11
772+                let emitLpAmt = if (if ((minOutAmount > 0))
773+                    then (minOutAmount > estimLP)
774+                    else false)
775+                    then throw(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
776+                    else estimLP
777+                let e = invoke(fca, "emit", [emitLpAmt], nil)
778+                if ((e == e))
779+                    then {
780+                        let el =                         match e {
781+                            case legacy: Address => 
782+                                invoke(legacy, "emit", [emitLpAmt], nil)
783+                            case _ => 
784+                                unit
785+                        }
786+                        if ((el == el))
647787                             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))
788+                                let sa = if ((amDiff > 0))
789+                                    then invoke(slipageContract, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
790+                                    else nil
791+                                if ((sa == sa))
658792                                     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))
793+                                        let sp = if ((prDiff > 0))
794+                                            then invoke(slipageContract, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
795+                                            else nil
796+                                        if ((sp == sp))
666797                                             then {
667-                                                let sa = if ((amDiff > 0))
668-                                                    then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
669-                                                    else nil
670-                                                if ((sa == sa))
798+                                                let lpTrnsfr = if (autoStake)
671799                                                     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-                                                                }
800+                                                        let ss = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
801+                                                        if ((ss == ss))
802+                                                            then nil
690803                                                             else throw("Strict value is not equal to itself.")
691804                                                         }
692-                                                    else throw("Strict value is not equal to itself.")
805+                                                    else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
806+                                                $Tuple2((state ++ lpTrnsfr), emitLpAmt)
693807                                                 }
694808                                             else throw("Strict value is not equal to itself.")
695809                                         }
697811                                 }
698812                             else throw("Strict value is not equal to itself.")
699813                         }
814+                    else throw("Strict value is not equal to itself.")
700815                 }
816+        }
817+
818+
819+
820+@Callable(i)
821+func putOneTknV2READONLY (paymentAmount,paymentAssetId) = {
822+    let r = estimatePutOneTknV2(paymentAmount, paymentAssetId, "", "")
823+    let estimLP = r._2
824+    let lpAssetId = r._7
825+    let state = r._9
826+    let amDiff = r._10
827+    let prDiff = r._11
828+    $Tuple2(nil, estimLP)
829+    }
830+
831+
832+
833+@Callable(i)
834+func putOneTknV2WithBonusREADONLY (paymentAmount,paymentAssetId) = {
835+    let poolConfig = gpc()
836+    let amId = poolConfig[idxAmAsId]
837+    let prId = poolConfig[idxPrAsId]
838+    let amBalance = getAccBalance(amId)
839+    let prBalance = getAccBalance(prId)
840+    let r = estimatePutOneTknV2(paymentAmount, paymentAssetId, "", "")
841+    let estimLP = r._2
842+    let curPrice = r._3
843+    let lpAssetEmission = r._6
844+    let lpAssetId = r._7
845+    let $t03251532824 = if ((paymentAssetId == amId))
846+        then {
847+            let priceAssetAmount = fraction(paymentAmount, curPrice, scale8)
848+            $Tuple2(paymentAmount, priceAssetAmount)
849+            }
850+        else {
851+            let amountAssetAmount = fraction(paymentAmount, scale8, curPrice)
852+            $Tuple2(amountAssetAmount, paymentAmount)
853+            }
854+    let amountAssetAmount = $t03251532824._1
855+    let priceAssetAmount = $t03251532824._2
856+    let lpAmtBoth = fraction(lpAssetEmission, priceAssetAmount, prBalance)
857+    let lpAssetPriceOne = if ((paymentAssetId == amId))
858+        then (amountAssetAmount / estimLP)
859+        else (priceAssetAmount / estimLP)
860+    let lpAssetPriceBoth = ((priceAssetAmount + amountAssetAmount) / lpAmtBoth)
861+    let bonus = ((lpAssetPriceOne - lpAssetPriceBoth) / lpAssetPriceOne)
862+    $Tuple2(nil, bonus)
701863     }
702864 
703865 
708870     else if ((size(i.payments) != 2))
709871         then throw("2 pmnts expd")
710872         else {
711-            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, "")
873+            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, true, 0, "")
712874             estPut._9
713875             }
714876 
731893 
732894 
733895 @Callable(i)
734-func getOneTkn (exchResult,notUsed,outAmount,outAssetId,slippage) = if ((size(i.payments) != 1))
896+func getOneTknV2 (outAssetId,minOutAmount) = if ((size(i.payments) != 1))
735897     then throw("1 pmnt expd")
736898     else {
737-        let cfg = gpc()
738-        let lpId = cfg[idxLPAsId]
739-        let amId = cfg[idxAmAsId]
740-        let prId = cfg[idxPrAsId]
741-        let amDcm = parseIntValue(cfg[idxAmtAsDcm])
742-        let prDcm = parseIntValue(cfg[idxPriceAsDcm])
743-        let sts = cfg[idxPoolSt]
744-        let factCfg = gfc()
745-        let gwxCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactGwxRewCntr]), "Wr sl addr")
746-        let pmt = value(i.payments[0])
747-        let addon = valueOrElse(getString(this, ada()), "")
748-        let userAddress = if ((addon == toString(i.caller)))
899+        let poolConfig = gpc()
900+        let lpId = poolConfig[idxLPAsId]
901+        let amId = poolConfig[idxAmAsId]
902+        let prId = poolConfig[idxPrAsId]
903+        let amDecimals = parseIntValue(poolConfig[idxAmtAsDcm])
904+        let prDecimals = parseIntValue(poolConfig[idxPriceAsDcm])
905+        let poolStatus = poolConfig[idxPoolSt]
906+        let userAddress = if ((i.caller == this))
749907             then i.originCaller
750908             else i.caller
751-        let txId58 = toBase58String(i.transactionId)
909+        let pmt = value(i.payments[0])
752910         let pmtAssetId = value(pmt.assetId)
753911         let pmtAmt = pmt.amount
754912         if ((1000000000 > pmtAmt))
755913             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)))
914+            else {
915+                let txId58 = toBase58String(i.transactionId)
916+                if ((lpId != toBase58String(pmtAssetId)))
763917                     then throw("Wrong LP")
764918                     else {
765-                        let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
766-                        let estimAmAmt = r._1
767-                        let estimPrAmt = r._2
768919                         let amBalance = getAccBalance(amId)
769920                         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-                                        }
921+                        let totalGet = {
922+                            let @ = invoke(this, "getOneTknV2READONLY", [outAssetId, pmtAmt], nil)
923+                            if ($isInstanceOf(@, "Int"))
924+                                then @
925+                                else throw(($getType(invoke(this, "getOneTknV2READONLY", [outAssetId, pmtAmt], nil)) + " couldn't be cast to Int"))
926+                            }
927+                        let totalAmount = if (if ((minOutAmount > 0))
928+                            then (minOutAmount > totalGet)
929+                            else false)
930+                            then throw(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
931+                            else totalGet
932+                        let $t03574935836 = if ((outAssetId == amId))
933+                            then $Tuple2(totalAmount, 0)
934+                            else $Tuple2(0, totalAmount)
935+                        let outAm = $t03574935836._1
936+                        let outPr = $t03574935836._2
937+                        let curPrX18 = cpbi(t1(prBalance, prDecimals), t1(amBalance, amDecimals))
938+                        let curPr = f1(curPrX18, scale8)
939+                        let state = [ScriptTransfer(userAddress, totalAmount, if ((outAssetId == "WAVES"))
940+                            then unit
941+                            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)]
942+                        if ((state == state))
943+                            then {
944+                                let burn = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
945+                                if ((burn == burn))
946+                                    then $Tuple2(state, totalAmount)
823947                                     else throw("Strict value is not equal to itself.")
824948                                 }
949+                            else throw("Strict value is not equal to itself.")
825950                         }
951+                }
826952         }
953+
954+
955+
956+@Callable(i)
957+func getOneTknV2READONLY (outAssetId,lpAssetAmount) = {
958+    let poolConfig = gpc()
959+    let lpId = poolConfig[idxLPAsId]
960+    let amId = poolConfig[idxAmAsId]
961+    let prId = poolConfig[idxPrAsId]
962+    let r = ego("", lpId, lpAssetAmount, this)
963+    let estimAmAmt = r._1
964+    let estimPrAmt = r._2
965+    let amBalance = getAccBalance(amId)
966+    let prBalance = getAccBalance(prId)
967+    let amBalanceNow = (amBalance - estimAmAmt)
968+    let prBalanceNow = (prBalance - estimPrAmt)
969+    let $t03693037201 = if ((outAssetId == amId))
970+        then $Tuple3(prBalanceNow, amBalanceNow, estimPrAmt)
971+        else if ((outAssetId == prId))
972+            then $Tuple3(amBalanceNow, prBalanceNow, estimAmAmt)
973+            else throw("wrong outAssetId")
974+    let amountBalanceForSwap = $t03693037201._1
975+    let priceBalanceForSwap = $t03693037201._2
976+    let amountToSwap = $t03693037201._3
977+    let yPrecision = 1
978+    let exchResult = {
979+        let @ = invoke(gwxContract, "calcSwapXToY", [toString(amountToSwap), toString(amountBalanceForSwap), toString(priceBalanceForSwap), "", A, Amult, toString(yPrecision), Dconv], nil)
980+        if ($isInstanceOf(@, "Int"))
981+            then @
982+            else throw(($getType(invoke(gwxContract, "calcSwapXToY", [toString(amountToSwap), toString(amountBalanceForSwap), toString(priceBalanceForSwap), "", A, Amult, toString(yPrecision), Dconv], nil)) + " couldn't be cast to Int"))
983+        }
984+    let totalGet = (exchResult + (if ((outAssetId == amId))
985+        then estimAmAmt
986+        else estimPrAmt))
987+    $Tuple2(nil, totalGet)
988+    }
827989 
828990 
829991 
8881050 
8891051 
8901052 @Callable(i)
1053+func unstakeAndGetOneTkn (amount,outAmount,outAssetId,slippage) = {
1054+    let checkPayments = if ((size(i.payments) != 0))
1055+        then throw("No pmnts expd")
1056+        else true
1057+    if ((checkPayments == checkPayments))
1058+        then {
1059+            let cfg = gpc()
1060+            let factoryCfg = gfc()
1061+            let lpAssetId = fromBase58String(cfg[idxLPAsId])
1062+            let staking = valueOrErrorMessage(addressFromString(factoryCfg[idxFactStakCntr]), "Wr st addr")
1063+            let unstakeInv = invoke(staking, "unstake", [toBase58String(lpAssetId), amount], nil)
1064+            if ((unstakeInv == unstakeInv))
1065+                then {
1066+                    let outAmountResult = {
1067+                        let @ = invoke(this, "getOneTknV2", [outAmount, outAssetId, slippage], [AttachedPayment(lpAssetId, amount)])
1068+                        if ($isInstanceOf(@, "Int"))
1069+                            then @
1070+                            else unit
1071+                        }
1072+                    if ((outAmountResult == outAmountResult))
1073+                        then $Tuple2(nil, outAmountResult)
1074+                        else throw("Strict value is not equal to itself.")
1075+                    }
1076+                else throw("Strict value is not equal to itself.")
1077+            }
1078+        else throw("Strict value is not equal to itself.")
1079+    }
1080+
1081+
1082+
1083+@Callable(i)
8911084 func activate (amtAsStr,prAsStr) = if ((toString(i.caller) != toString(fca)))
8921085     then throw("denied")
8931086     else $Tuple2([StringEntry(aa(), amtAsStr), StringEntry(pa(), prAsStr)], "success")
9421135 
9431136 
9441137 @Callable(i)
945-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, ""))
1138+func estimatePutOperationWrapperREADONLY (txId58,slippage,inAmAmt,inAmId,inPrAmt,inPrId,usrAddr,isEval,emitLp) = $Tuple2(nil, epo(txId58, slippage, inAmAmt, inAmId, inPrAmt, inPrId, usrAddr, isEval, emitLp, true, false, 0, ""))
9461139 
9471140 
9481141 

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 
270-func epo (txId58,slippage,inAmAmt,inAmId,inPrAmt,inPrId,userAddress,isEval,emitLp,isOneAsset,pmtAmt,pmtId) = {
273+func epo (txId58,slippage,inAmAmt,inAmId,inPrAmt,inPrId,userAddress,isEval,emitLp,isOneAsset,validateSlippage,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)
315-            if (if ((curPriceX18 != zeroBigInt))
318+            if (if (if (validateSlippage)
319+                then (curPriceX18 != zeroBigInt)
320+                else false)
316321                 then (slippageRealX18 > slippageX18)
317322                 else false)
318323                 then throw(((("Price slippage " + toString(slippageRealX18)) + " > ") + toString(slippageX18)))
319324                 else {
320325                     let lpEmissionX18 = t1(lpEm, scale8)
321326                     let prViaAmX18 = fraction(inAmAssetAmtX18, curPriceX18, scale18)
322327                     let amViaPrX18 = fraction(inPrAssetAmtX18, scale18, curPriceX18)
323328                     let expectedAmts = if ((prViaAmX18 > inPrAssetAmtX18))
324329                         then $Tuple2(amViaPrX18, inPrAssetAmtX18)
325330                         else $Tuple2(inAmAssetAmtX18, prViaAmX18)
326331                     let expAmtAssetAmtX18 = expectedAmts._1
327332                     let expPriceAssetAmtX18 = expectedAmts._2
328333                     let lpAmtX18 = fraction(lpEmissionX18, expPriceAssetAmtX18, prBalanceX18)
329334                     $Tuple5(f1(lpAmtX18, scale8), f1(expAmtAssetAmtX18, amtDcm), f1(expPriceAssetAmtX18, priceDcm), curPriceX18, slippageX18)
330335                     }
331336             }
332337     let calcLpAmt = r._1
333338     let calcAmAssetPmt = r._2
334339     let calcPrAssetPmt = r._3
335340     let curPrice = f1(r._4, scale8)
336341     let slippageCalc = f1(r._5, scale8)
337342     if ((0 >= calcLpAmt))
338343         then throw("LP <= 0")
339344         else {
340345             let emitLpAmt = if (!(emitLp))
341346                 then 0
342347                 else calcLpAmt
343348             let amDiff = (inAmAmt - calcAmAssetPmt)
344349             let prDiff = (inPrAmt - calcPrAssetPmt)
345-            let $t01568216027 = if (if (isOneAsset)
350+            let $t01608316428 = if (if (isOneAsset)
346351                 then (pmtId == amIdStr)
347352                 else false)
348353                 then $Tuple2(pmtAmt, 0)
349354                 else if (if (isOneAsset)
350355                     then (pmtId == prIdStr)
351356                     else false)
352357                     then $Tuple2(0, pmtAmt)
353358                     else $Tuple2(calcAmAssetPmt, calcPrAssetPmt)
354-            let writeAmAmt = $t01568216027._1
355-            let writePrAmt = $t01568216027._2
359+            let writeAmAmt = $t01608316428._1
360+            let writePrAmt = $t01608316428._2
356361             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))]
357362             $Tuple13(calcLpAmt, emitLpAmt, curPrice, amBalance, prBalance, lpEm, lpId, sts, commonState, amDiff, prDiff, inAmId, inPrId)
358363             }
359364     }
360365 
361366 
362367 func moa (order) = {
363368     let cfg = gpc()
364369     let amtAsId = cfg[idxAmAsId]
365370     let prAsId = cfg[idxPrAsId]
366371     let sts = parseIntValue(cfg[idxPoolSt])
367372     let amtAsDcm = parseIntValue(cfg[idxAmtAsDcm])
368373     let prAsDcm = parseIntValue(cfg[idxPriceAsDcm])
369374     let accAmtAsBalance = getAccBalance(amtAsId)
370375     let accPrAsBalance = getAccBalance(prAsId)
371376     let curPriceX18 = if ((order.orderType == Buy))
372377         then pcp(amtAsDcm, prAsDcm, (accAmtAsBalance + order.amount), accPrAsBalance)
373378         else pcp(amtAsDcm, prAsDcm, (accAmtAsBalance - order.amount), accPrAsBalance)
374379     let curPrice = f1(curPriceX18, scale8)
375380     if (if (if (igs())
376381         then true
377382         else (sts == PoolMatcherDis))
378383         then true
379384         else (sts == PoolShutdown))
380385         then throw("Admin blocked")
381386         else {
382387             let orAmtAsset = order.assetPair.amountAsset
383388             let orAmtAsStr = if ((orAmtAsset == unit))
384389                 then "WAVES"
385390                 else toBase58String(value(orAmtAsset))
386391             let orPrAsset = order.assetPair.priceAsset
387392             let orPrAsStr = if ((orPrAsset == unit))
388393                 then "WAVES"
389394                 else toBase58String(value(orPrAsset))
390395             if (if ((orAmtAsStr != amtAsId))
391396                 then true
392397                 else (orPrAsStr != prAsId))
393398                 then throw("Wr assets")
394399                 else {
395400                     let orderPrice = order.price
396401                     let priceDcm = fraction(scale8, prAsDcm, amtAsDcm)
397402                     let castOrderPrice = ts(orderPrice, scale8, priceDcm)
398403                     let isOrderPriceValid = if ((order.orderType == Buy))
399404                         then (curPrice >= castOrderPrice)
400405                         else (castOrderPrice >= curPrice)
401406                     true
402407                     }
403408             }
404409     }
405410 
406411 
407412 func cg (i) = if ((size(i.payments) != 1))
408413     then throw("1 pmnt exp")
409414     else {
410415         let pmt = value(i.payments[0])
411416         let pmtAssetId = value(pmt.assetId)
412417         let pmtAmt = pmt.amount
413418         let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
414419         let outAmAmt = r._1
415420         let outPrAmt = r._2
416421         let sts = parseIntValue(r._9)
417422         let state = r._10
418423         if (if (igs())
419424             then true
420425             else (sts == PoolShutdown))
421426             then throw(("Admin blocked: " + toString(sts)))
422427             else $Tuple5(outAmAmt, outPrAmt, pmtAmt, pmtAssetId, state)
423428         }
424429 
425430 
426-func cp (caller,txId,amAsPmt,prAsPmt,slippage,emitLp,isOneAsset,pmtAmt,pmtId) = {
427-    let r = epo(txId, slippage, value(amAsPmt).amount, value(amAsPmt).assetId, value(prAsPmt).amount, value(prAsPmt).assetId, caller, false, emitLp, isOneAsset, pmtAmt, pmtId)
431+func cp (caller,txId,amAsPmt,prAsPmt,slippage,emitLp,isOneAsset,validateSlippage,pmtAmt,pmtId) = {
432+    let r = epo(txId, slippage, value(amAsPmt).amount, value(amAsPmt).assetId, value(prAsPmt).amount, value(prAsPmt).assetId, caller, false, emitLp, isOneAsset, validateSlippage, pmtAmt, pmtId)
428433     let sts = parseIntValue(r._8)
429434     if (if (if (igs())
430435         then true
431436         else (sts == PoolPutDis))
432437         then true
433438         else (sts == PoolShutdown))
434439         then throw(("Blocked:" + toString(sts)))
435440         else r
436441     }
437442 
438443 
439-func takeFee (amount) = {
440-    let fee = fraction(amount, feePermille, thousand)
441-    $Tuple2((amount - fee), fee)
444+func estimatePutOneTknV2 (pmtAmt,pmtAssetId,userAddress,txId) = {
445+    let poolConfig = gpc()
446+    let amId = poolConfig[idxAmAsId]
447+    let prId = poolConfig[idxPrAsId]
448+    let amBalance = getAccBalance(amId)
449+    let prBalance = getAccBalance(prId)
450+    let $t02075121200 = if ((txId == ""))
451+        then $Tuple2(amBalance, prBalance)
452+        else if ((pmtAssetId == amId))
453+            then if ((pmtAmt > amBalance))
454+                then throw("invalid payment amount")
455+                else $Tuple2((amBalance - pmtAmt), prBalance)
456+            else if ((pmtAssetId == prId))
457+                then if ((pmtAmt > prBalance))
458+                    then throw("invalid payment amount")
459+                    else $Tuple2(amBalance, (prBalance - pmtAmt))
460+                else throw("wrong pmtAssetId")
461+    let amBalanceNow = $t02075121200._1
462+    let prBalanceNow = $t02075121200._2
463+    let $t02120421338 = if ((pmtAssetId == amId))
464+        then $Tuple2(amBalanceNow, prBalanceNow)
465+        else $Tuple2(prBalanceNow, amBalanceNow)
466+    let amBalanceForCalc = $t02120421338._1
467+    let prBalanceForCalc = $t02120421338._2
468+    let xPrecision = 1
469+    let result = {
470+        let @ = invoke(gwxContract, "calcPutXOnly", [toString(pmtAmt), toString(amBalanceForCalc), toString(prBalanceForCalc), "", A, Amult, toString(xPrecision), Dconv], nil)
471+        if ($isInstanceOf(@, "(Int, Int)"))
472+            then @
473+            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)"))
474+        }
475+    let $t02180721903 = if ((pmtAssetId == amId))
476+        then result
477+        else $Tuple2(result._2, result._1)
478+    let amAssetPart = $t02180721903._1
479+    let prAssetPart = $t02180721903._2
480+    let estPut = cp(userAddress, txId, AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), 0, true, true, false, pmtAmt, pmtAssetId)
481+    let estimLP = estPut._2
482+    let lpAssetId = estPut._7
483+    let state = estPut._9
484+    let amDiff = estPut._10
485+    let prDiff = estPut._11
486+    estPut
442487     }
443488 
444489 
445490 func m () = match getString(mpk()) {
446491     case s: String => 
447492         fromBase58String(s)
448493     case _: Unit => 
449494         unit
450495     case _ => 
451496         throw("Match error")
452497 }
453498 
454499 
455500 func pm () = match getString(pmpk()) {
456501     case s: String => 
457502         fromBase58String(s)
458503     case _: Unit => 
459504         unit
460505     case _ => 
461506         throw("Match error")
462507 }
463508 
464509 
465510 let pd = throw("Permission denied")
466511 
467512 func mm (i) = match m() {
468513     case pk: ByteVector => 
469514         if ((i.callerPublicKey == pk))
470515             then true
471516             else pd
472517     case _: Unit => 
473518         if ((i.caller == this))
474519             then true
475520             else pd
476521     case _ => 
477522         throw("Match error")
478523 }
479524 
480525 
481526 @Callable(i)
482527 func constructor (fc) = {
483528     let c = mm(i)
484529     if ((c == c))
485530         then [StringEntry(fc(), fc)]
486531         else throw("Strict value is not equal to itself.")
487532     }
488533 
489534 
490535 
491536 @Callable(i)
492537 func setManager (pendingManagerPublicKey) = {
493538     let c = mm(i)
494539     if ((c == c))
495540         then {
496541             let cm = fromBase58String(pendingManagerPublicKey)
497542             if ((cm == cm))
498543                 then [StringEntry(pmpk(), pendingManagerPublicKey)]
499544                 else throw("Strict value is not equal to itself.")
500545             }
501546         else throw("Strict value is not equal to itself.")
502547     }
503548 
504549 
505550 
506551 @Callable(i)
507552 func confirmManager () = {
508553     let p = pm()
509554     let hpm = if (isDefined(p))
510555         then true
511556         else throw("No pending manager")
512557     if ((hpm == hpm))
513558         then {
514559             let cpm = if ((i.callerPublicKey == value(p)))
515560                 then true
516561                 else throw("You are not pending manager")
517562             if ((cpm == cpm))
518563                 then [StringEntry(mpk(), toBase58String(value(p))), DeleteEntry(pmpk())]
519564                 else throw("Strict value is not equal to itself.")
520565             }
521566         else throw("Strict value is not equal to itself.")
522567     }
523568 
524569 
525570 
526571 @Callable(i)
527572 func put (slip,autoStake) = {
528573     let factCfg = gfc()
529574     let stakingCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactStakCntr]), "Wr st addr")
530575     let slipCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactSlippCntr]), "Wr sl addr")
531576     if ((0 > slip))
532577         then throw("Wrong slippage")
533578         else if ((size(i.payments) != 2))
534579             then throw("2 pmnts expd")
535580             else {
536-                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, "")
581+                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, true, 0, "")
537582                 let emitLpAmt = e._2
538583                 let lpAssetId = e._7
539584                 let state = e._9
540585                 let amDiff = e._10
541586                 let prDiff = e._11
542587                 let amId = e._12
543588                 let prId = e._13
544589                 let r = invoke(fca, "emit", [emitLpAmt], nil)
545590                 if ((r == r))
546591                     then {
547592                         let el =                         match r {
548593                             case legacy: Address => 
549594                                 invoke(legacy, "emit", [emitLpAmt], nil)
550595                             case _ => 
551596                                 unit
552597                         }
553598                         if ((el == el))
554599                             then {
555600                                 let sa = if ((amDiff > 0))
556601                                     then invoke(slipCntr, "put", nil, [AttachedPayment(amId, amDiff)])
557602                                     else nil
558603                                 if ((sa == sa))
559604                                     then {
560605                                         let sp = if ((prDiff > 0))
561606                                             then invoke(slipCntr, "put", nil, [AttachedPayment(prId, prDiff)])
562607                                             else nil
563608                                         if ((sp == sp))
564609                                             then {
565610                                                 let lpTrnsfr = if (autoStake)
566611                                                     then {
567612                                                         let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
568613                                                         if ((ss == ss))
569614                                                             then nil
570615                                                             else throw("Strict value is not equal to itself.")
571616                                                         }
572617                                                     else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
573618                                                 (state ++ lpTrnsfr)
574619                                                 }
575620                                             else throw("Strict value is not equal to itself.")
576621                                         }
577622                                     else throw("Strict value is not equal to itself.")
578623                                 }
579624                             else throw("Strict value is not equal to itself.")
580625                         }
581626                     else throw("Strict value is not equal to itself.")
582627                 }
583628     }
584629 
585630 
586631 
587632 @Callable(i)
588633 func putOneTkn (amAssetPart,prAssetPart,outLp,slippage,autoStake) = {
589634     let cfg = gfc()
590635     let stakingCntr = valueOrErrorMessage(addressFromString(cfg[idxFactStakCntr]), "Wr st addr")
591636     let slipCntr = valueOrErrorMessage(addressFromString(cfg[idxFactSlippCntr]), "Wr sl addr")
592637     let gwxCntr = valueOrErrorMessage(addressFromString(cfg[idxFactGwxRewCntr]), "Wr gwx addr")
593638     let poolCfg = gpc()
594639     let amId = poolCfg[idxAmAsId]
595640     let prId = poolCfg[idxPrAsId]
596641     let amDcm = parseIntValue(poolCfg[idxAmtAsDcm])
597642     let prDcm = parseIntValue(poolCfg[idxPriceAsDcm])
598643     let addon = valueOrElse(getString(this, ada()), "")
599644     let userAddress = if ((addon == toString(i.caller)))
600645         then i.originCaller
601646         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")
647+    let addonContract = valueOrErrorMessage(addressFromString(valueOrErrorMessage(getString(ada()), "no addons")), "addon address in not valid")
648+    let check = reentrantInvoke(addonContract, "ensureCanPutOneTkn", [toString(userAddress)], nil)
649+    if ((check == check))
650+        then if (if (if (if ((0 >= slippage))
651+            then true
652+            else (0 >= amAssetPart))
653+            then true
654+            else (0 >= prAssetPart))
655+            then true
656+            else (0 >= outLp))
657+            then throw("Wrong params")
658+            else if ((size(i.payments) != 1))
659+                then throw("1 pmnt expd")
660+                else {
661+                    let pmt = value(i.payments[0])
662+                    let pmtAssetId = toBase58String(value(pmt.assetId))
663+                    let pmtAmt = pmt.amount
664+                    if ((10000000 > pmtAmt))
665+                        then throw("Wrong pmt amt")
666+                        else {
667+                            let amBalance = getAccBalance(amId)
668+                            let prBalance = getAccBalance(prId)
669+                            let $t02727627852 = if ((pmtAssetId == amId))
670+                                then if (if ((pmtAmt > amBalance))
671+                                    then true
672+                                    else (amAssetPart > pmtAmt))
673+                                    then throw("invalid payment amount")
674+                                    else $Tuple6((amBalance - pmtAmt), prBalance, (pmtAmt - amAssetPart), prAssetPart, 0, 0)
675+                                else if ((pmtAssetId == prId))
676+                                    then if (if ((pmtAmt > prBalance))
677+                                        then true
678+                                        else (prAssetPart > pmtAmt))
679+                                        then throw("invalid payment amount")
680+                                        else $Tuple6(amBalance, (prBalance - pmtAmt), 0, 0, (pmtAmt - prAssetPart), amAssetPart)
681+                                    else throw("wrong pmtAssetId")
682+                            let amBalanceNow = $t02727627852._1
683+                            let prBalanceNow = $t02727627852._2
684+                            let virtSwapInAm = $t02727627852._3
685+                            let virtSwapOutPr = $t02727627852._4
686+                            let virtSwapInPr = $t02727627852._5
687+                            let virtSwapOutAm = $t02727627852._6
688+                            let D0 = invoke(gwxCntr, "calcD", [toString(amBalanceNow), toString(prBalanceNow), A, Amult, Dconv], nil)
689+                            let D1 = invoke(gwxCntr, "calcD", [toString(toBigInt(((amBalanceNow + virtSwapInAm) - virtSwapOutAm))), toString(toBigInt(((prBalanceNow + virtSwapInPr) - virtSwapOutPr))), A, Amult, Dconv], nil)
690+                            let D0vsD1 = vd(parseBigIntValue(str(D1)), parseBigIntValue(str(D0)), slippage4D)
691+                            if ((D0vsD1 == D0vsD1))
692+                                then {
693+                                    let estPut = cp(toString(i.caller), toBase58String(i.transactionId), AttachedPayment(fromBase58String(amId), amAssetPart), AttachedPayment(fromBase58String(prId), prAssetPart), slippage, true, true, true, pmtAmt, pmtAssetId)
694+                                    let estimLP = estPut._2
695+                                    let lpAssetId = estPut._7
696+                                    let state = estPut._9
697+                                    let amDiff = estPut._10
698+                                    let prDiff = estPut._11
699+                                    let lpCalcRes = vad(toBigInt(estimLP), toBigInt(outLp), toBigInt(slippage))
700+                                    let emitLpAmt = toInt(lpCalcRes._2)
701+                                    let e = invoke(fca, "emit", [emitLpAmt], nil)
702+                                    if ((e == e))
703+                                        then {
704+                                            let el =                                             match e {
705+                                                case legacy: Address => 
706+                                                    invoke(legacy, "emit", [emitLpAmt], nil)
707+                                                case _ => 
708+                                                    unit
709+                                            }
710+                                            if ((el == el))
711+                                                then {
712+                                                    let sa = if ((amDiff > 0))
713+                                                        then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
714+                                                        else nil
715+                                                    if ((sa == sa))
716+                                                        then {
717+                                                            let sp = if ((prDiff > 0))
718+                                                                then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
719+                                                                else nil
720+                                                            if ((sp == sp))
721+                                                                then {
722+                                                                    let lpTrnsfr = if (autoStake)
723+                                                                        then {
724+                                                                            let ss = invoke(stakingCntr, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
725+                                                                            if ((ss == ss))
726+                                                                                then nil
727+                                                                                else throw("Strict value is not equal to itself.")
728+                                                                            }
729+                                                                        else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
730+                                                                    (state ++ lpTrnsfr)
731+                                                                    }
732+                                                                else throw("Strict value is not equal to itself.")
733+                                                            }
734+                                                        else throw("Strict value is not equal to itself.")
735+                                                    }
736+                                                else throw("Strict value is not equal to itself.")
737+                                            }
738+                                        else throw("Strict value is not equal to itself.")
739+                                    }
740+                                else throw("Strict value is not equal to itself.")
741+                            }
742+                    }
743+        else throw("Strict value is not equal to itself.")
744+    }
745+
746+
747+
748+@Callable(i)
749+func putOneTknV2 (minOutAmount,autoStake) = if ((size(i.payments) != 1))
750+    then throw("1 pmnt expd")
751+    else {
752+        let poolConfig = gpc()
753+        let amId = poolConfig[idxAmAsId]
754+        let prId = poolConfig[idxPrAsId]
755+        let amDecimals = parseIntValue(poolConfig[idxAmtAsDcm])
756+        let prDecimals = parseIntValue(poolConfig[idxPriceAsDcm])
757+        let userAddress = if ((i.caller == this))
758+            then i.originCaller
759+            else i.caller
760+        let pmt = value(i.payments[0])
761+        let pmtAssetId = toBase58String(value(pmt.assetId))
762+        let pmtAmt = pmt.amount
763+        if ((10000000 > pmtAmt))
764+            then throw("Wrong pmt amt")
612765             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))
766+                let r = estimatePutOneTknV2(pmtAmt, pmtAssetId, toString(userAddress), toBase58String(i.transactionId))
767+                let estimLP = r._2
768+                let lpAssetId = r._7
769+                let state = r._9
770+                let amDiff = r._10
771+                let prDiff = r._11
772+                let emitLpAmt = if (if ((minOutAmount > 0))
773+                    then (minOutAmount > estimLP)
774+                    else false)
775+                    then throw(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
776+                    else estimLP
777+                let e = invoke(fca, "emit", [emitLpAmt], nil)
778+                if ((e == e))
779+                    then {
780+                        let el =                         match e {
781+                            case legacy: Address => 
782+                                invoke(legacy, "emit", [emitLpAmt], nil)
783+                            case _ => 
784+                                unit
785+                        }
786+                        if ((el == el))
647787                             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))
788+                                let sa = if ((amDiff > 0))
789+                                    then invoke(slipageContract, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
790+                                    else nil
791+                                if ((sa == sa))
658792                                     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))
793+                                        let sp = if ((prDiff > 0))
794+                                            then invoke(slipageContract, "put", nil, [AttachedPayment(fromBase58String(prId), prDiff)])
795+                                            else nil
796+                                        if ((sp == sp))
666797                                             then {
667-                                                let sa = if ((amDiff > 0))
668-                                                    then invoke(slipCntr, "put", nil, [AttachedPayment(fromBase58String(amId), amDiff)])
669-                                                    else nil
670-                                                if ((sa == sa))
798+                                                let lpTrnsfr = if (autoStake)
671799                                                     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-                                                                }
800+                                                        let ss = invoke(stakingContract, "stake", nil, [AttachedPayment(lpAssetId, emitLpAmt)])
801+                                                        if ((ss == ss))
802+                                                            then nil
690803                                                             else throw("Strict value is not equal to itself.")
691804                                                         }
692-                                                    else throw("Strict value is not equal to itself.")
805+                                                    else [ScriptTransfer(i.caller, emitLpAmt, lpAssetId)]
806+                                                $Tuple2((state ++ lpTrnsfr), emitLpAmt)
693807                                                 }
694808                                             else throw("Strict value is not equal to itself.")
695809                                         }
696810                                     else throw("Strict value is not equal to itself.")
697811                                 }
698812                             else throw("Strict value is not equal to itself.")
699813                         }
814+                    else throw("Strict value is not equal to itself.")
700815                 }
816+        }
817+
818+
819+
820+@Callable(i)
821+func putOneTknV2READONLY (paymentAmount,paymentAssetId) = {
822+    let r = estimatePutOneTknV2(paymentAmount, paymentAssetId, "", "")
823+    let estimLP = r._2
824+    let lpAssetId = r._7
825+    let state = r._9
826+    let amDiff = r._10
827+    let prDiff = r._11
828+    $Tuple2(nil, estimLP)
829+    }
830+
831+
832+
833+@Callable(i)
834+func putOneTknV2WithBonusREADONLY (paymentAmount,paymentAssetId) = {
835+    let poolConfig = gpc()
836+    let amId = poolConfig[idxAmAsId]
837+    let prId = poolConfig[idxPrAsId]
838+    let amBalance = getAccBalance(amId)
839+    let prBalance = getAccBalance(prId)
840+    let r = estimatePutOneTknV2(paymentAmount, paymentAssetId, "", "")
841+    let estimLP = r._2
842+    let curPrice = r._3
843+    let lpAssetEmission = r._6
844+    let lpAssetId = r._7
845+    let $t03251532824 = if ((paymentAssetId == amId))
846+        then {
847+            let priceAssetAmount = fraction(paymentAmount, curPrice, scale8)
848+            $Tuple2(paymentAmount, priceAssetAmount)
849+            }
850+        else {
851+            let amountAssetAmount = fraction(paymentAmount, scale8, curPrice)
852+            $Tuple2(amountAssetAmount, paymentAmount)
853+            }
854+    let amountAssetAmount = $t03251532824._1
855+    let priceAssetAmount = $t03251532824._2
856+    let lpAmtBoth = fraction(lpAssetEmission, priceAssetAmount, prBalance)
857+    let lpAssetPriceOne = if ((paymentAssetId == amId))
858+        then (amountAssetAmount / estimLP)
859+        else (priceAssetAmount / estimLP)
860+    let lpAssetPriceBoth = ((priceAssetAmount + amountAssetAmount) / lpAmtBoth)
861+    let bonus = ((lpAssetPriceOne - lpAssetPriceBoth) / lpAssetPriceOne)
862+    $Tuple2(nil, bonus)
701863     }
702864 
703865 
704866 
705867 @Callable(i)
706868 func putForFree (maxSlpg) = if ((0 > maxSlpg))
707869     then throw("Wrong slpg")
708870     else if ((size(i.payments) != 2))
709871         then throw("2 pmnts expd")
710872         else {
711-            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, "")
873+            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, true, 0, "")
712874             estPut._9
713875             }
714876 
715877 
716878 
717879 @Callable(i)
718880 func get () = {
719881     let r = cg(i)
720882     let outAmtAmt = r._1
721883     let outPrAmt = r._2
722884     let pmtAmt = r._3
723885     let pmtAssetId = r._4
724886     let state = r._5
725887     let b = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
726888     if ((b == b))
727889         then state
728890         else throw("Strict value is not equal to itself.")
729891     }
730892 
731893 
732894 
733895 @Callable(i)
734-func getOneTkn (exchResult,notUsed,outAmount,outAssetId,slippage) = if ((size(i.payments) != 1))
896+func getOneTknV2 (outAssetId,minOutAmount) = if ((size(i.payments) != 1))
735897     then throw("1 pmnt expd")
736898     else {
737-        let cfg = gpc()
738-        let lpId = cfg[idxLPAsId]
739-        let amId = cfg[idxAmAsId]
740-        let prId = cfg[idxPrAsId]
741-        let amDcm = parseIntValue(cfg[idxAmtAsDcm])
742-        let prDcm = parseIntValue(cfg[idxPriceAsDcm])
743-        let sts = cfg[idxPoolSt]
744-        let factCfg = gfc()
745-        let gwxCntr = valueOrErrorMessage(addressFromString(factCfg[idxFactGwxRewCntr]), "Wr sl addr")
746-        let pmt = value(i.payments[0])
747-        let addon = valueOrElse(getString(this, ada()), "")
748-        let userAddress = if ((addon == toString(i.caller)))
899+        let poolConfig = gpc()
900+        let lpId = poolConfig[idxLPAsId]
901+        let amId = poolConfig[idxAmAsId]
902+        let prId = poolConfig[idxPrAsId]
903+        let amDecimals = parseIntValue(poolConfig[idxAmtAsDcm])
904+        let prDecimals = parseIntValue(poolConfig[idxPriceAsDcm])
905+        let poolStatus = poolConfig[idxPoolSt]
906+        let userAddress = if ((i.caller == this))
749907             then i.originCaller
750908             else i.caller
751-        let txId58 = toBase58String(i.transactionId)
909+        let pmt = value(i.payments[0])
752910         let pmtAssetId = value(pmt.assetId)
753911         let pmtAmt = pmt.amount
754912         if ((1000000000 > pmtAmt))
755913             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)))
914+            else {
915+                let txId58 = toBase58String(i.transactionId)
916+                if ((lpId != toBase58String(pmtAssetId)))
763917                     then throw("Wrong LP")
764918                     else {
765-                        let r = ego(toBase58String(i.transactionId), toBase58String(pmtAssetId), pmtAmt, i.caller)
766-                        let estimAmAmt = r._1
767-                        let estimPrAmt = r._2
768919                         let amBalance = getAccBalance(amId)
769920                         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-                                        }
921+                        let totalGet = {
922+                            let @ = invoke(this, "getOneTknV2READONLY", [outAssetId, pmtAmt], nil)
923+                            if ($isInstanceOf(@, "Int"))
924+                                then @
925+                                else throw(($getType(invoke(this, "getOneTknV2READONLY", [outAssetId, pmtAmt], nil)) + " couldn't be cast to Int"))
926+                            }
927+                        let totalAmount = if (if ((minOutAmount > 0))
928+                            then (minOutAmount > totalGet)
929+                            else false)
930+                            then throw(makeString(["amount to receive is less than ", toString(minOutAmount)], ""))
931+                            else totalGet
932+                        let $t03574935836 = if ((outAssetId == amId))
933+                            then $Tuple2(totalAmount, 0)
934+                            else $Tuple2(0, totalAmount)
935+                        let outAm = $t03574935836._1
936+                        let outPr = $t03574935836._2
937+                        let curPrX18 = cpbi(t1(prBalance, prDecimals), t1(amBalance, amDecimals))
938+                        let curPr = f1(curPrX18, scale8)
939+                        let state = [ScriptTransfer(userAddress, totalAmount, if ((outAssetId == "WAVES"))
940+                            then unit
941+                            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)]
942+                        if ((state == state))
943+                            then {
944+                                let burn = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
945+                                if ((burn == burn))
946+                                    then $Tuple2(state, totalAmount)
823947                                     else throw("Strict value is not equal to itself.")
824948                                 }
949+                            else throw("Strict value is not equal to itself.")
825950                         }
951+                }
826952         }
953+
954+
955+
956+@Callable(i)
957+func getOneTknV2READONLY (outAssetId,lpAssetAmount) = {
958+    let poolConfig = gpc()
959+    let lpId = poolConfig[idxLPAsId]
960+    let amId = poolConfig[idxAmAsId]
961+    let prId = poolConfig[idxPrAsId]
962+    let r = ego("", lpId, lpAssetAmount, this)
963+    let estimAmAmt = r._1
964+    let estimPrAmt = r._2
965+    let amBalance = getAccBalance(amId)
966+    let prBalance = getAccBalance(prId)
967+    let amBalanceNow = (amBalance - estimAmAmt)
968+    let prBalanceNow = (prBalance - estimPrAmt)
969+    let $t03693037201 = if ((outAssetId == amId))
970+        then $Tuple3(prBalanceNow, amBalanceNow, estimPrAmt)
971+        else if ((outAssetId == prId))
972+            then $Tuple3(amBalanceNow, prBalanceNow, estimAmAmt)
973+            else throw("wrong outAssetId")
974+    let amountBalanceForSwap = $t03693037201._1
975+    let priceBalanceForSwap = $t03693037201._2
976+    let amountToSwap = $t03693037201._3
977+    let yPrecision = 1
978+    let exchResult = {
979+        let @ = invoke(gwxContract, "calcSwapXToY", [toString(amountToSwap), toString(amountBalanceForSwap), toString(priceBalanceForSwap), "", A, Amult, toString(yPrecision), Dconv], nil)
980+        if ($isInstanceOf(@, "Int"))
981+            then @
982+            else throw(($getType(invoke(gwxContract, "calcSwapXToY", [toString(amountToSwap), toString(amountBalanceForSwap), toString(priceBalanceForSwap), "", A, Amult, toString(yPrecision), Dconv], nil)) + " couldn't be cast to Int"))
983+        }
984+    let totalGet = (exchResult + (if ((outAssetId == amId))
985+        then estimAmAmt
986+        else estimPrAmt))
987+    $Tuple2(nil, totalGet)
988+    }
827989 
828990 
829991 
830992 @Callable(i)
831993 func getNoLess (noLessThenAmtAsset,noLessThenPriceAsset) = {
832994     let r = cg(i)
833995     let outAmAmt = r._1
834996     let outPrAmt = r._2
835997     let pmtAmt = r._3
836998     let pmtAssetId = r._4
837999     let state = r._5
8381000     if ((noLessThenAmtAsset > outAmAmt))
8391001         then throw(((("Failed:  " + toString(outAmAmt)) + " < ") + toString(noLessThenAmtAsset)))
8401002         else if ((noLessThenPriceAsset > outPrAmt))
8411003             then throw(((("Failed: " + toString(outPrAmt)) + " < ") + toString(noLessThenPriceAsset)))
8421004             else {
8431005                 let burnLPAssetOnFactory = invoke(fca, "burn", [pmtAmt], [AttachedPayment(pmtAssetId, pmtAmt)])
8441006                 if ((burnLPAssetOnFactory == burnLPAssetOnFactory))
8451007                     then state
8461008                     else throw("Strict value is not equal to itself.")
8471009                 }
8481010     }
8491011 
8501012 
8511013 
8521014 @Callable(i)
8531015 func unstakeAndGet (amount) = {
8541016     let checkPayments = if ((size(i.payments) != 0))
8551017         then throw("No pmnts expd")
8561018         else true
8571019     if ((checkPayments == checkPayments))
8581020         then {
8591021             let cfg = gpc()
8601022             let factoryCfg = gfc()
8611023             let lpAssetId = fromBase58String(cfg[idxLPAsId])
8621024             let staking = valueOrErrorMessage(addressFromString(factoryCfg[idxFactStakCntr]), "Wr st addr")
8631025             let unstakeInv = invoke(staking, "unstake", [toBase58String(lpAssetId), amount], nil)
8641026             if ((unstakeInv == unstakeInv))
8651027                 then {
8661028                     let r = ego(toBase58String(i.transactionId), toBase58String(lpAssetId), amount, i.caller)
8671029                     let sts = parseIntValue(r._9)
8681030                     let state = r._10
8691031                     let v = if (if (igs())
8701032                         then true
8711033                         else (sts == PoolShutdown))
8721034                         then throw(("Blocked: " + toString(sts)))
8731035                         else true
8741036                     if ((v == v))
8751037                         then {
8761038                             let burnA = invoke(fca, "burn", [amount], [AttachedPayment(lpAssetId, amount)])
8771039                             if ((burnA == burnA))
8781040                                 then state
8791041                                 else throw("Strict value is not equal to itself.")
8801042                             }
8811043                         else throw("Strict value is not equal to itself.")
8821044                     }
8831045                 else throw("Strict value is not equal to itself.")
8841046             }
8851047         else throw("Strict value is not equal to itself.")
8861048     }
8871049 
8881050 
8891051 
8901052 @Callable(i)
1053+func unstakeAndGetOneTkn (amount,outAmount,outAssetId,slippage) = {
1054+    let checkPayments = if ((size(i.payments) != 0))
1055+        then throw("No pmnts expd")
1056+        else true
1057+    if ((checkPayments == checkPayments))
1058+        then {
1059+            let cfg = gpc()
1060+            let factoryCfg = gfc()
1061+            let lpAssetId = fromBase58String(cfg[idxLPAsId])
1062+            let staking = valueOrErrorMessage(addressFromString(factoryCfg[idxFactStakCntr]), "Wr st addr")
1063+            let unstakeInv = invoke(staking, "unstake", [toBase58String(lpAssetId), amount], nil)
1064+            if ((unstakeInv == unstakeInv))
1065+                then {
1066+                    let outAmountResult = {
1067+                        let @ = invoke(this, "getOneTknV2", [outAmount, outAssetId, slippage], [AttachedPayment(lpAssetId, amount)])
1068+                        if ($isInstanceOf(@, "Int"))
1069+                            then @
1070+                            else unit
1071+                        }
1072+                    if ((outAmountResult == outAmountResult))
1073+                        then $Tuple2(nil, outAmountResult)
1074+                        else throw("Strict value is not equal to itself.")
1075+                    }
1076+                else throw("Strict value is not equal to itself.")
1077+            }
1078+        else throw("Strict value is not equal to itself.")
1079+    }
1080+
1081+
1082+
1083+@Callable(i)
8911084 func activate (amtAsStr,prAsStr) = if ((toString(i.caller) != toString(fca)))
8921085     then throw("denied")
8931086     else $Tuple2([StringEntry(aa(), amtAsStr), StringEntry(pa(), prAsStr)], "success")
8941087 
8951088 
8961089 
8971090 @Callable(i)
8981091 func setS (k,v) = if ((toString(i.caller) != strf(this, ada())))
8991092     then pd
9001093     else [StringEntry(k, v)]
9011094 
9021095 
9031096 
9041097 @Callable(i)
9051098 func setI (k,v) = if ((toString(i.caller) != strf(this, ada())))
9061099     then pd
9071100     else [IntegerEntry(k, v)]
9081101 
9091102 
9101103 
9111104 @Callable(i)
9121105 func getPoolConfigWrapperREADONLY () = $Tuple2(nil, gpc())
9131106 
9141107 
9151108 
9161109 @Callable(i)
9171110 func getAccBalanceWrapperREADONLY (assetId) = $Tuple2(nil, getAccBalance(assetId))
9181111 
9191112 
9201113 
9211114 @Callable(i)
9221115 func calcPricesWrapperREADONLY (amAmt,prAmt,lpAmt) = {
9231116     let pr = calcPrices(amAmt, prAmt, lpAmt)
9241117     $Tuple2(nil, [toString(pr[0]), toString(pr[1]), toString(pr[2])])
9251118     }
9261119 
9271120 
9281121 
9291122 @Callable(i)
9301123 func fromX18WrapperREADONLY (val,resScaleMult) = $Tuple2(nil, f1(parseBigIntValue(val), resScaleMult))
9311124 
9321125 
9331126 
9341127 @Callable(i)
9351128 func toX18WrapperREADONLY (origVal,origScaleMult) = $Tuple2(nil, toString(t1(origVal, origScaleMult)))
9361129 
9371130 
9381131 
9391132 @Callable(i)
9401133 func calcPriceBigIntWrapperREADONLY (prAmtX18,amAmtX18) = $Tuple2(nil, toString(cpbi(parseBigIntValue(prAmtX18), parseBigIntValue(amAmtX18))))
9411134 
9421135 
9431136 
9441137 @Callable(i)
945-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, ""))
1138+func estimatePutOperationWrapperREADONLY (txId58,slippage,inAmAmt,inAmId,inPrAmt,inPrId,usrAddr,isEval,emitLp) = $Tuple2(nil, epo(txId58, slippage, inAmAmt, inAmId, inPrAmt, inPrId, usrAddr, isEval, emitLp, true, false, 0, ""))
9461139 
9471140 
9481141 
9491142 @Callable(i)
9501143 func estimateGetOperationWrapperREADONLY (txId58,pmtAsId,pmtLpAmt,usrAddr) = {
9511144     let r = ego(txId58, pmtAsId, pmtLpAmt, addressFromStringValue(usrAddr))
9521145     $Tuple2(nil, $Tuple10(r._1, r._2, r._3, r._4, r._5, r._6, r._7, toString(r._8), r._9, r._10))
9531146     }
9541147 
9551148 
9561149 @Verifier(tx)
9571150 func verify () = {
9581151     let targetPublicKey =     match m() {
9591152         case pk: ByteVector => 
9601153             pk
9611154         case _: Unit => 
9621155             tx.senderPublicKey
9631156         case _ => 
9641157             throw("Match error")
9651158     }
9661159     match tx {
9671160         case order: Order => 
9681161             let matcherPub = mp()
9691162             let orderValid = moa(order)
9701163             let senderValid = sigVerify(order.bodyBytes, order.proofs[0], order.senderPublicKey)
9711164             let matcherValid = sigVerify(order.bodyBytes, order.proofs[1], matcherPub)
9721165             if (if (if (orderValid)
9731166                 then senderValid
9741167                 else false)
9751168                 then matcherValid
9761169                 else false)
9771170                 then true
9781171                 else toe(orderValid, senderValid, matcherValid)
9791172         case s: SetScriptTransaction => 
9801173             let newHash = blake2b256(value(s.script))
9811174             let allowedHash = fromBase64String(value(getString(fca, keyAllowedLpStableScriptHash())))
9821175             let currentHash = scriptHash(this)
9831176             if (if ((allowedHash == newHash))
9841177                 then (currentHash != newHash)
9851178                 else false)
9861179                 then true
9871180                 else sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
9881181         case _ => 
9891182             sigVerify(tx.bodyBytes, tx.proofs[0], targetPublicKey)
9901183     }
9911184     }
9921185 
github/deemru/w8io/c3f4982 
111.12 ms ◑