w8 · tx · GTv···2S5

tx · GTvNtkdhFhoMg1MgXEyptAGAvMfsgsu2LvMJBMyWh2S5

3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5:  -0.01900000 Waves

2023.09.24 18:03 [2769646] smart account 3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "GTvNtkdhFhoMg1MgXEyptAGAvMfsgsu2LvMJBMyWh2S5",
    "fee": 1900000,
    "feeAssetId": null,
    "timestamp": 1695567877371,
    "version": 2,
    "chainId": 84,
    "sender": "3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5",
    "senderPublicKey": "2LmNyaN5YAXdg9C5vsXcTLU66hsW2KUNPsN7KcHBYhUo",
    "proofs": [
        "5f6Sy1xdFH4wMXR4S7f35gDtwHSo2zE2g1YGhgxUhim7f8SzzPTs1SJRvjxqNnqmXEBfQPvFWfQNrsz7gPuxrayT"
    ],
    "script": "base64:BgIbCAISAwoBCBIDCgEIEgMKAQgSAwoBCBIDCgEICAAHVmVyc2lvbgIFMS4wLjAADmRBcHBTaW5jZVN0YXJ0AMD394yqMQALbGlzdGluZ19mZWUAgJzJmwUACWtleTFvd25lcgkApwgBASAvzCPQT5h3KYI4s+Qe/JTLJXp/XTmuUdmGhLVoxaamewAJa2V5Mm93bmVyCQCnCAEBIC/MI9BPmHcpgjiz5B78lMslen9dOa5R2YaEtWjFpqZ7AAhUcmVhc3VyeQkApwgBASDOSN9zenNneSigwGfLTeDgcQdu/kD5ankaF9zuobgkAQAKWFROQXNzZXRJRAEgCGWEtw/wimoa8+Jo6C4IkCTD0ydYA80s9i5eC9/aFaQBCWNvdW50ZGF5cwAEB1RTX0RpZmYJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUOZEFwcFNpbmNlU3RhcnQECWRheW51bWJlcgkAawMAAQUHVFNfRGlmZgCAuJkpBQlkYXludW1iZXIFAWkBDFJlZ2lzdGVyUGFpcgEMRW50ZXJBc3NldElEBARwbXQxCQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAEBHBtdDIJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAQQEcG10MwkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwACBApjdXJyZW50S2V5CQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEBVdBVkVTCQEBIQEJAQlpc0RlZmluZWQBCAUEcG10Mgdhc3NldElkBAlmZXRjaHBhaXIJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBA1hc3NldGluZm9wbXQyCQDZBAEFDEVudGVyQXNzZXRJRAQEaW5mbwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUMRW50ZXJBc3NldElECQCsAgIJAKwCAgIGQXNzZXQgBQxFbnRlckFzc2V0SUQCDiBkb2Vzbid0IGV4aXN0BARuYW1lCAUEaW5mbwRuYW1lBAhkZWNpbWFscwgFBGluZm8IZGVjaW1hbHMECkxQZGVjaW1hbHMJAGsDCQBkAgUIZGVjaW1hbHMABgABAAIECkZpcnN0TFBRdHkJAGgCAAEJAGwGAAoAAAUKTFBkZWNpbWFscwAAAAAFB0NFSUxJTkcEEG11bHRpcGx5X2Ftb3VudHMJAGsDCAUEcG10MQZhbW91bnQIBQRwbXQyBmFtb3VudAUKRmlyc3RMUFF0eQQHZ2V0U3FydAkBBHNxcnQEBRBtdWx0aXBseV9hbW91bnRzBQpMUGRlY2ltYWxzBQpMUGRlY2ltYWxzBQdDRUlMSU5HBAdMUGlzc3VlCQDCCAUJAKwCAgkArAICAgNMUC0JAK8CAgUEbmFtZQAIAgQtWFROCQCsAgIJAKwCAgkArAICCQCsAgICA0xQLQUEbmFtZQIELVhUTgIuIGlzIGEgTGlxdWlkaXR5IFByb3ZpZGVyIFRva2VuIElzc3VlZCBBZ2FpbnN0IAUMRW50ZXJBc3NldElEBQdnZXRTcXJ0BQpMUGRlY2ltYWxzBgQETFBpZAkAuAgBBQdMUGlzc3VlAwkAAAIFCWZldGNocGFpcgUMRW50ZXJBc3NldElECQACAQIbUGFpciBBbHJlYWR5IEV4aXN0IGluIExpc3QuAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwADCQACAQkArAICCQCsAgICflR3byBhdHRhY2hlZCBhc3NldHMgZXhwZWN0ZWQgYXMgcGF5bWVudC4gS2luZGx5IEF0dGFjaCBwYXltZW50MSA9IFhUTiBUb2tlbiAmIHBheW1lbnQyID0gVG9rZW4geW91IHdhbnQgdG8gTGlzdCAmIHBheW1lbnQzID0gWwkApAMBBQtsaXN0aW5nX2ZlZQINLzEwXjhdIFdhdmVzLgMJAQIhPQIIBQRwbXQxB2Fzc2V0SWQFClhUTkFzc2V0SUQJAAIBAj9JbmNvcnJlY3QgYXNzZXQgYXR0YWNoZWQgYXMgcGF5bWVudFsxXSwgcGxlYXNlIGF0dGFjaCBYVE4gb25seS4DCQBmAgCgjQYIBQRwbXQxBmFtb3VudAkAAgECT0F0dGFjaGVkIHBheW1lbnRbMV0gYW1vdW50IGlzIGxlc3MgdGhhbiAwLjEgWFROLCBwbGVhc2UgYXR0YWNoIDAuMSBYVE4gTWluaW11bS4DCQECIT0CCAUEcG10Mgdhc3NldElkBQ1hc3NldGluZm9wbXQyCQACAQI8SW5wdXQgU3RyaW5nICYgQXR0YWNoZWQgQXNzZXRJRCBpbiBwYXltZW50MiBpcyBub3QgbWF0Y2hpbmcuAwkBAiE9AggFBHBtdDMGYW1vdW50BQtsaXN0aW5nX2ZlZQkAAgEJAKwCAgkArAICAixBdHRhY2hlZCBwYXltZW50WzNdIGFtb3VudCBoYXMgdG8gYmUgZXhhY3QgWwkApAMBBQtsaXN0aW5nX2ZlZQINLzEwXjhdIFdBVkVTLgMJAAACBQVXQVZFUwYJAAIBAl1Zb3UgQXR0YWNoZWQgV0FWRVMgQXNzZXQgSUQgZm9yIExpc3RpbmcsIHBsZWFzZSBhdHRhY2ggVG9rZW5zIFlvdSB3YW50IHRvIGxpc3QgaW4gcGF5bWVudFsyXS4JAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBQxFbnRlckFzc2V0SUQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIMTGlzdGluZ19GZWVfBQxFbnRlckFzc2V0SUQIBQRwbXQzBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElECAUEcG10MQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAgFBHBtdDIGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICE1RvdGFsX29mX1BhaXJfVHhuc18FDEVudGVyQXNzZXRJRAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAhlUb3RhbF9Td2FwX0ZlZV9Db2xsZWN0ZWRfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICGVRvdGFsX1N3YXBfRmVlX0NvbGxlY3RlZF8FDEVudGVyQXNzZXRJRAAACQDMCAIFB0xQaXNzdWUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQdnZXRTcXJ0BQRMUGlkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCWtleTFvd25lcgkAawMFC2xpc3RpbmdfZmVlAAEAAgUEdW5pdAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQlrZXkyb3duZXIJAGsDBQtsaXN0aW5nX2ZlZQABAAIFBHVuaXQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICAgNMUF8FDEVudGVyQXNzZXRJRAkA2AQBBQRMUGlkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEBQdnZXRTcXJ0BQNuaWwBaQEXU3dhcEFzc2V0VG9YVE5QYWlyRW50cnkBDEVudGVyQXNzZXRJRAQNY2FsbGVyYWRkcmVzcwkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBANwbXQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABCQCRAwIIBQFpCHBheW1lbnRzAAAJAAIBAjVXaGl0ZWxpc3RlZCBUb2tlbiBpcyByZXF1aXJlZCBhcyBBdHRhY2hlZCBwYXltZW50WzFdLgQZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAkAnQgCBQR0aGlzCQCsAgICCFBhaXJfVVZfBQxFbnRlckFzc2V0SUQED0NoZWNrWFROQmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBBFDaGVja0Fzc2V0QmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBA9uZXdiYWxhbmNlb2ZYVE4JAGsDBQ9DaGVja1hUTkJhbGFuY2UFEUNoZWNrQXNzZXRCYWxhbmNlCQBkAgURQ2hlY2tBc3NldEJhbGFuY2UIBQNwbXQGYW1vdW50BBRxdWFudGl0eW9mcHJpY2Vhc3NldAkAZQIFD0NoZWNrWFROQmFsYW5jZQUPbmV3YmFsYW5jZW9mWFROBAdTd2FwRmVlAAUECkN1cnJlbnRkYXkJAQljb3VudGRheXMABBBTd2FwRmVldG9yZWNlaXZlCQBpAgkAaAIFFHF1YW50aXR5b2ZwcmljZWFzc2V0BQdTd2FwRmVlAOgHBBR1c2VyYmFsYW5jZXRvcmVjZWl2ZQkAZQIJAGUCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUQU3dhcEZlZXRvcmVjZWl2ZQUQU3dhcEZlZXRvcmVjZWl2ZQQYU3VtdXBvZkFzc2V0VG9YVE5Td2FwRmVlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICGVRvdGFsX1N3YXBfRmVlX0NvbGxlY3RlZF8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBtOZXdTdW11cG9mQXNzZXRUb1hUTlN3YXBGZWUJAGQCCQBkAgUYU3VtdXBvZkFzc2V0VG9YVE5Td2FwRmVlBRBTd2FwRmVldG9yZWNlaXZlBRBTd2FwRmVldG9yZWNlaXZlBBFTdW11cEFzc2V0QmFsYW5jZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEFk5ld1N1bXVwb2ZBc3NldEJhbGFuY2UJAGQCBRFDaGVja0Fzc2V0QmFsYW5jZQgFA3BtdAZhbW91bnQED1N1bXVwWFROQmFsYW5jZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEFE5ld1N1bXVwb2ZYVE5CYWxhbmNlCQBkAgkAZQIFD0NoZWNrWFROQmFsYW5jZQUUcXVhbnRpdHlvZnByaWNlYXNzZXQFEFN3YXBGZWV0b3JlY2VpdmUEBFRPUFQEByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgITVG90YWxfb2ZfUGFpcl9UeG5zXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABAZOZXdUUFQJAGQCBQRUT1BUAAEDCQAAAgUMRW50ZXJBc3NldElECQDYBAEFClhUTkFzc2V0SUQJAAIBAoUBSW5wdXQgY2FuIE5ldmVyIGJlIGEgWFROIEFzc2V0SUQuIEVudGVyIFdoaXRlbGlzdGVkIEFzc2V0SUQgaW4gaW5wdXQgJiBBdHRhY2ggV2hpdGVsaXN0ZWQgQXNzZXQgYXMgYW4gYXR0YWNobWVudCBUb2tlbiBpbiBwYXltZW50WzFdLgMJAQIhPQIFGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QFDEVudGVyQXNzZXRJRAkAAgECK1BhaXIgaXMgbm90IGF2YWlsYWJsZSBpbiBXaGl0ZWxpc3RlZCBBc3NldC4DCQAAAggFA3BtdAdhc3NldElkBQpYVE5Bc3NldElECQACAQJSWW91IGNhbid0IEF0dGFjaCBYVE4gYXMgYW4gQXR0YWNoZWQgUGF5bWVudC4gT25seSBXaGl0ZWxpc3RlZCBUb2tlbnMgYXJlIGFjY2VwdGVkLgMJAQIhPQIIBQNwbXQHYXNzZXRJZAkA2QQBBQxFbnRlckFzc2V0SUQJAAIBCQCsAgICMEluY29ycmVjdCBhc3NldCBhdHRhY2hlZCwgcGxlYXNlIGF0dGFjaCBvciBzZW5kIAUMRW50ZXJBc3NldElEAwkAAAIFD0NoZWNrWFROQmFsYW5jZQAACQACAQJlU3dhcCBQYWlyIE5lZWQgdG8gQWRkIExpcXVpZGl0eSBmaXJzdCBpbnRvIFBvb2wuIE9ubHkgQWZ0ZXIgdGhhdCBQYWlyIHdpbGwgYmUgYWN0aXZhdGVkIGZvciBTd2FwcGluZy4DCQAAAgURQ2hlY2tBc3NldEJhbGFuY2UAAAkAAgECZVN3YXAgUGFpciBOZWVkIHRvIEFkZCBMaXF1aWRpdHkgZmlyc3QgaW50byBQb29sLiBPbmx5IEFmdGVyIHRoYXQgUGFpciB3aWxsIGJlIGFjdGl2YXRlZCBmb3IgU3dhcHBpbmcuAwkAZgIAoI0GBRRxdWFudGl0eW9mcHJpY2Vhc3NldAkAAgEJAKwCAgkArAICAjRZb3VyIEF0dGFjaGVkIEFzc2V0IEFtb3VudCBpcyB2ZXJ5IGxvdy4gQXR0YWNoIE1vcmUgBQxFbnRlckFzc2V0SUQCOiBUb2tlbnMgdG8gQ2xhaW0gdGhlIG1pbmltdW0gQW1vdW50IG9mIDAuMSBkb2xsYXIgYXRsZWFzdC4DCQBmAgUUcXVhbnRpdHlvZnByaWNlYXNzZXQFD0NoZWNrWFROQmFsYW5jZQkAAgEJAKwCAgkArAICAh1Qb29sIE9ubHkgaGFzIGEgTGlxdWlkaXR5IG9mIAkApAMBCQBpAgUPQ2hlY2tYVE5CYWxhbmNlCQBsBgAKAAAABgAAAAAFB0NFSUxJTkcCHiBYVE4uIEFkZCBMaXF1aWRpdHkgaW50byBQb29sLgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQFG05ld1N1bXVwb2ZBc3NldFRvWFROU3dhcEZlZQkAzAgCCQEMSW50ZWdlckVudHJ5AgILQ3VycmVudF9EYXkFCkN1cnJlbnRkYXkJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgITVG90YWxfb2ZfUGFpcl9UeG5zXwUMRW50ZXJBc3NldElEBQZOZXdUUFQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAUWTmV3U3VtdXBvZkFzc2V0QmFsYW5jZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBRROZXdTdW11cG9mWFROQmFsYW5jZQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFFHVzZXJiYWxhbmNldG9yZWNlaXZlBQpYVE5Bc3NldElECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCWtleTFvd25lcgkAawMFEFN3YXBGZWV0b3JlY2VpdmUAAQADBQpYVE5Bc3NldElECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCWtleTJvd25lcgkAawMFEFN3YXBGZWV0b3JlY2VpdmUAAQADBQpYVE5Bc3NldElECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCFRyZWFzdXJ5CQBrAwUQU3dhcEZlZXRvcmVjZWl2ZQABAAMFClhUTkFzc2V0SUQFA25pbAFpARdTd2FwWFROVG9Bc3NldFBhaXJFbnRyeQEMRW50ZXJBc3NldElEBA1jYWxsZXJhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEA3BtdAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAJEDAggFAWkIcGF5bWVudHMAAAkAAgEJAKwCAgkArAICAgVPbmx5IAkA2AQBBQpYVE5Bc3NldElEAjEgWFROIFRva2VuIGlzIHJlcXVpcmVkIGFzIGFuIEF0dGFjaGVkIHBheW1lbnRbMV0uBA9DaGVja1hUTkJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAQRQ2hlY2tBc3NldEJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAQRbmV3YmFsYW5jZW9mQXNzZXQJAGsDBQ9DaGVja1hUTkJhbGFuY2UFEUNoZWNrQXNzZXRCYWxhbmNlCQBkAgUPQ2hlY2tYVE5CYWxhbmNlCAUDcG10BmFtb3VudAQUcXVhbnRpdHlvZnByaWNlYXNzZXQJAGUCBRFDaGVja0Fzc2V0QmFsYW5jZQURbmV3YmFsYW5jZW9mQXNzZXQEGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBAdTd2FwRmVlAAUECkN1cnJlbnRkYXkJAQljb3VudGRheXMABBBTd2FwRmVldG9yZWNlaXZlCQBpAgkAaAIFFHF1YW50aXR5b2ZwcmljZWFzc2V0BQdTd2FwRmVlAOgHBBR1c2VyYmFsYW5jZXRvcmVjZWl2ZQkAZQIJAGUCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUQU3dhcEZlZXRvcmVjZWl2ZQUQU3dhcEZlZXRvcmVjZWl2ZQQYU3VtdXBvZlhUTlRvQXNzZXRTd2FwRmVlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBtOZXdTdW11cG9mWFROVG9Bc3NldFN3YXBGZWUJAGQCCQBkAgUYU3VtdXBvZlhUTlRvQXNzZXRTd2FwRmVlBRBTd2FwRmVldG9yZWNlaXZlBRBTd2FwRmVldG9yZWNlaXZlBBFTdW11cEFzc2V0QmFsYW5jZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEFk5ld1N1bXVwb2ZBc3NldEJhbGFuY2UJAGQCCQBlAgURQ2hlY2tBc3NldEJhbGFuY2UFFHF1YW50aXR5b2ZwcmljZWFzc2V0BRBTd2FwRmVldG9yZWNlaXZlBA9TdW11cFhUTkJhbGFuY2UEByRtYXRjaDAJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBROZXdTdW11cG9mWFROQmFsYW5jZQkAZAIFD0NoZWNrWFROQmFsYW5jZQgFA3BtdAZhbW91bnQEBFRPUFQEByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgITVG90YWxfb2ZfUGFpcl9UeG5zXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABAZOZXdUUFQJAGQCBQRUT1BUAAEDCQECIT0CBRljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90BQxFbnRlckFzc2V0SUQJAAIBAitQYWlyIGlzIG5vdCBhdmFpbGFibGUgaW4gV2hpdGVsaXN0ZWQgQXNzZXQuAwkAAAIFDEVudGVyQXNzZXRJRAkA2AQBBQpYVE5Bc3NldElECQACAQJ3SW5wdXQgY2FuIE5ldmVyIGJlIGEgWFROIEFzc2V0SUQuIEVudGVyIFdoaXRlbGlzdGVkIEFzc2V0SUQgaW4gaW5wdXQgJiBBdHRhY2ggWFROIGFzIGFuIGF0dGFjaG1lbnQgVG9rZW4gaW4gcGF5bWVudFsxXS4DCQECIT0CCAUDcG10B2Fzc2V0SWQFClhUTkFzc2V0SUQJAAIBCQCsAgIJAKwCAgIPWW91IGNhbiBBdHRhY2ggCQDYBAEFClhUTkFzc2V0SUQCaSBhcyBhbiBBdHRhY2hlZCBQYXltZW50WzFdIHRvIFN3YXAgWFROIFRvIFJlcXVpcmVkIFRva2VuLiBBbnkgb3RoZXIgYXNzZXQgZWxzZSB0aGFuIFhUTiB3aWxsIGJlIHJlamVjdGVkLgMJAGYCAKCNBggFA3BtdAZhbW91bnQJAAIBAllZb3VyIEF0dGFjaGVkIFhUTiBBbW91bnQgaXMgdmVyeSBsb3cuIEF0dGFjaCBBdGxlYXN0IDAuMSBYVE4gdG8gQ2xhaW0gdGhlIG1pbmltdW0gVG9rZW5zLgMJAAACBQ9DaGVja1hUTkJhbGFuY2UAAAkAAgECZVN3YXAgUGFpciBOZWVkIHRvIEFkZCBMaXF1aWRpdHkgZmlyc3QgaW50byBQb29sLiBPbmx5IEFmdGVyIHRoYXQgUGFpciB3aWxsIGJlIGFjdGl2YXRlZCBmb3IgU3dhcHBpbmcuAwkAAAIFEUNoZWNrQXNzZXRCYWxhbmNlAAAJAAIBAmVTd2FwIFBhaXIgTmVlZCB0byBBZGQgTGlxdWlkaXR5IGZpcnN0IGludG8gUG9vbC4gT25seSBBZnRlciB0aGF0IFBhaXIgd2lsbCBiZSBhY3RpdmF0ZWQgZm9yIFN3YXBwaW5nLgMJAGYCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAURQ2hlY2tBc3NldEJhbGFuY2UJAAIBCQCsAgIJAKwCAgIdUG9vbCBPbmx5IGhhcyBhIExpcXVpZGl0eSBvZiAJAKQDAQURQ2hlY2tBc3NldEJhbGFuY2UCISBUb2tlbnMuIEFkZCBMaXF1aWRpdHkgaW50byBQb29sLgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAhlUb3RhbF9Td2FwX0ZlZV9Db2xsZWN0ZWRfBQxFbnRlckFzc2V0SUQFG05ld1N1bXVwb2ZYVE5Ub0Fzc2V0U3dhcEZlZQkAzAgCCQEMSW50ZWdlckVudHJ5AgILQ3VycmVudF9EYXkFCkN1cnJlbnRkYXkJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgITVG90YWxfb2ZfUGFpcl9UeG5zXwUMRW50ZXJBc3NldElEBQZOZXdUUFQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAUWTmV3U3VtdXBvZkFzc2V0QmFsYW5jZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBRROZXdTdW11cG9mWFROQmFsYW5jZQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFFHVzZXJiYWxhbmNldG9yZWNlaXZlCQDZBAEFDEVudGVyQXNzZXRJRAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQlrZXkxb3duZXIJAGsDBRBTd2FwRmVldG9yZWNlaXZlAAEAAwkA2QQBBQxFbnRlckFzc2V0SUQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUJa2V5Mm93bmVyCQBrAwUQU3dhcEZlZXRvcmVjZWl2ZQABAAMJANkEAQUMRW50ZXJBc3NldElECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCFRyZWFzdXJ5CQBrAwUQU3dhcEZlZXRvcmVjZWl2ZQABAAMJANkEAQUMRW50ZXJBc3NldElEBQNuaWwBaQEMQWRkTGlxdWlkaXR5AQxFbnRlckFzc2V0SUQEDWNhbGxlcmFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQEcG10MQkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABARwbXQyCQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAEEGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBA5SZWlzc3VlYXNzZXRJZAkA2QQBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwkArAICAgNMUF8FDEVudGVyQXNzZXRJRAIsTFAgVG9rZW4gaXMgTWlzc2luZyBvciBNYXkgYmUgbm90IEdlbmVyYXRlZC4ED0NoZWNrWFROQmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBBFDaGVja0Fzc2V0QmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBAxkZWNpbWFsc2luZm8JARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBCQDZBAEFDEVudGVyQXNzZXRJRAkArAICCQCsAgICBkFzc2V0IAUMRW50ZXJBc3NldElEAg4gZG9lc24ndCBleGlzdAQIZGVjaW1hbHMIBQxkZWNpbWFsc2luZm8IZGVjaW1hbHMECkxQZGVjaW1hbHMJAGsDCQBkAgUIZGVjaW1hbHMABgABAAIECkZpcnN0TFBRdHkJAGgCAAEJAGwGAAoAAAUKTFBkZWNpbWFscwAAAAAFB0NFSUxJTkcEEG11bHRpcGx5X2Ftb3VudHMJAGsDCAUEcG10MQZhbW91bnQIBQRwbXQyBmFtb3VudAUKRmlyc3RMUFF0eQQHZ2V0U3FydAkBBHNxcnQEBRBtdWx0aXBseV9hbW91bnRzBQpMUGRlY2ltYWxzBQpMUGRlY2ltYWxzBQdDRUlMSU5HBBBYVE5Ib2xkaW5nSW5QYWlyBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQTTmV3WFROSG9sZGluZ0luUGFpcgkAZAIFEFhUTkhvbGRpbmdJblBhaXIIBQRwbXQyBmFtb3VudAQSQXNzZXRIb2xkaW5nSW5QYWlyBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQVTmV3QXNzZXRIb2xkaW5nSW5QYWlyCQBkAgUSQXNzZXRIb2xkaW5nSW5QYWlyCAUEcG10MQZhbW91bnQEDUxQVG9rZW5Jc3N1ZWQEByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEEE5ld0xQVG9rZW5Jc3N1ZWQJAGQCBQ1MUFRva2VuSXNzdWVkBQdnZXRTcXJ0AwkBAiE9AgUZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAUMRW50ZXJBc3NldElECQACAQIrUGFpciBpcyBub3QgYXZhaWxhYmxlIGluIFdoaXRlbGlzdGVkIEFzc2V0LgMJAAACBQxFbnRlckFzc2V0SUQJANgEAQUKWFROQXNzZXRJRAkAAgECkAFJbnB1dCBjYW4gTmV2ZXIgYmUgYSBYVE4gQXNzZXRJRC4gRW50ZXIgV2hpdGVsaXN0ZWQgQXNzZXRJRCBpbiBpbnB1dCBhcyB3ZWxsIGFzIGluIHBheW1lbnRbMV0gJiBBdHRhY2ggWFROIGFzIGFuIGF0dGFjaG1lbnQgVG9rZW4gaW4gcGF5bWVudFsyXS4DCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAIJAAIBAosBVHdvIGF0dGFjaGVkIGFzc2V0cyBhcmUgZXhwZWN0ZWQgaW4gcGF5bWVudC4gS2luZGx5IEF0dGFjaCBwYXltZW50MSA9IFRva2VuIHlvdSB3YW50IHRvIGFkZCBmb3IgTGlxdWlkaXR5ICYgcGF5bWVudDIgPSBBbW91bnQgb2YgWFROIFRva2VuLgMJAAACCAUEcG10MQdhc3NldElkBQpYVE5Bc3NldElECQACAQJ2WW91IEF0dGFjaGVkIFhUTiBhc3NldCBpbiBwYXltZW50WzFdLCBwbGVhc2UgYXR0YWNoIG9ubHkgd2hpdGVsaXN0ZWQgVG9rZW4gaW4gcGF5bWVudFsxXSBhbG9uZyB3aXRoIFhUTiBpbiBwYXltZW50WzJdLgMJAQIhPQIIBQRwbXQxB2Fzc2V0SWQJANkEAQUMRW50ZXJBc3NldElECQACAQJrSW5jb3JyZWN0IGFzc2V0IGF0dGFjaGVkIGZvciBMaXF1aWRpdHkgaW4gcGF5bWVudFsxXSwgcGxlYXNlIGF0dGFjaCBTdHJpbmcgQXNzZXQgb3IgV2hpdGVsaXN0ZWQgVG9rZW4gb25seS4DCQECIT0CCAUEcG10Mgdhc3NldElkBQpYVE5Bc3NldElECQACAQJpV3JvbmcgQXNzZXQgQXR0YWNoZWQgaW4gcGF5bWVudHNbMl0sIFBsZWFzZSBhdHRhY2ggcGF5bWVudFsxXSA9IExpcXVpZGl0eSBUb2tlbiAmIHBheW1lbnRbMl0gPSBYVE4gVG9rZW4uAwkAZgIAoI0GCAUEcG10MgZhbW91bnQJAAIBAlVwbGVhc2UgYXR0YWNoIGF0bGVhc3QgMC4xIFhUTiBpbiBwYXltZW50WzJdICYgRXF1aXZhbGVudCB3b3J0aCBvZiBUb2tlbiBpbiBwYXltZW50WzFdAwkAZgIAAQUHZ2V0U3FydAkAAgECS0xQIFRva2VuIE91dGNvbWUgaXMgZ29pbmcgYmVsb3cgMSBpbiBGcmFjdGlvbmFsLiBQbGVhc2UgQXR0YWNoIG1vcmUgYW1vdW50LgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBRNOZXdYVE5Ib2xkaW5nSW5QYWlyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQFFU5ld0Fzc2V0SG9sZGluZ0luUGFpcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAglUb3RhbF9MUF8FDEVudGVyQXNzZXRJRAUQTmV3TFBUb2tlbklzc3VlZAkAzAgCCQEHUmVpc3N1ZQMFDlJlaXNzdWVhc3NldElkBQdnZXRTcXJ0BgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFB2dldFNxcnQFDlJlaXNzdWVhc3NldElkBQNuaWwBaQEPUmVtb3ZlTGlxdWlkaXR5AQxFbnRlckFzc2V0SUQEDWNhbGxlcmFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQDcG10AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAkQMCCAUBaQhwYXltZW50cwAACQACAQI6Tm8gcGF5bWVudCBhdHRhY2hlZCwgUGxlYXNlIEF0dGFjaCBMUCBUb2tlbiBhcyBwYXltZW50WzFdLgQZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAkAnQgCBQR0aGlzCQCsAgICCFBhaXJfVVZfBQxFbnRlckFzc2V0SUQEElJlaXNzdWVhYmxlYXNzZXRJZAkA2QQBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwkArAICAgNMUF8FDEVudGVyQXNzZXRJRAIlTFAgVG9rZW4gaXMgTWlzc2luZyBvciBub3QgR2VuZXJhdGVkLgQMZGVjaW1hbHNpbmZvCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQxFbnRlckFzc2V0SUQJAKwCAgkArAICAgZBc3NldCAFDEVudGVyQXNzZXRJRAIOIGRvZXNuJ3QgZXhpc3QECGRlY2ltYWxzCAUMZGVjaW1hbHNpbmZvCGRlY2ltYWxzBBJib3RoYXNzZXRzZGVjaW1hbHMJAGQCAAYFCGRlY2ltYWxzBA1zaGFyZWRlY2ltYWxzCQBpAgUSYm90aGFzc2V0c2RlY2ltYWxzAAIEEkNoZWNrVG90YWxMUEFtb3VudAkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICAglUb3RhbF9MUF8FDEVudGVyQXNzZXRJRAQQVXNlckxQUGVyY2VudGFnZQkAbAYJAGsDCAUDcG10BmFtb3VudAkAbAYACgAAAAgAAAAABQdDRUlMSU5HBRJDaGVja1RvdGFsTFBBbW91bnQABgABAAAABgUHQ0VJTElORwQPQ2hlY2tYVE5CYWxhbmNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQEEUNoZWNrQXNzZXRCYWxhbmNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQEDlVzZXJMUFdvcnRoWFROCQBrAwUPQ2hlY2tYVE5CYWxhbmNlBRBVc2VyTFBQZXJjZW50YWdlCQBsBgAKAAAACAAAAAAFB0NFSUxJTkcEEFVzZXJMUFdvcnRoQXNzZXQJAGsDBRFDaGVja0Fzc2V0QmFsYW5jZQUQVXNlckxQUGVyY2VudGFnZQkAbAYACgAAAAgAAAAABQdDRUlMSU5HBBBYVE5Ib2xkaW5nSW5QYWlyBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQTTmV3WFROSG9sZGluZ0luUGFpcgkAZQIFEFhUTkhvbGRpbmdJblBhaXIFDlVzZXJMUFdvcnRoWFROBBJBc3NldEhvbGRpbmdJblBhaXIEByRtYXRjaDAJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBVOZXdBc3NldEhvbGRpbmdJblBhaXIJAGUCBRJBc3NldEhvbGRpbmdJblBhaXIFEFVzZXJMUFdvcnRoQXNzZXQEDUxQVG9rZW5Jc3N1ZWQEByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEEE5ld0xQVG9rZW5Jc3N1ZWQJAGUCBQ1MUFRva2VuSXNzdWVkCAUDcG10BmFtb3VudAMJAQIhPQIFGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QFDEVudGVyQXNzZXRJRAkAAgECI1BhaXIgaXMgbm90IGF2YWlsYWJsZSBpbiBXaGl0ZWxpc3QuAwkAAAIJANkEAQUMRW50ZXJBc3NldElEBQpYVE5Bc3NldElECQACAQJqRG9uJ3QgY2hvb3NlIFhUTiBBc3NldElEIGFzIElucHV0LCBPbmx5IFdoaXRlbGlzdGVkIEFzc2V0IGFzIElucHV0IFN0cmluZyAmIEF0dGFjaCBMUCBUb2tlbnMgYXMgcGF5bWVudFsxXQMJAQIhPQIIBQNwbXQHYXNzZXRJZAUSUmVpc3N1ZWFibGVhc3NldElkCQACAQJHV3JvbmcgQXNzZXQgaXMgYXR0YWNoZWQgaW4gcGF5bWVudFsxXSBvciBMUCBUb2tlbiBOb3QgRm91bmQgb3IgTWlzc2luZy4DCQBmAgABBRBVc2VyTFBQZXJjZW50YWdlCQACAQIuWW91ciBMUCBUb2tlbiBhbW91bnQgJSBpcyB2ZXJ5IGxvdyB0byBjb252ZXJ0LgMJAGYCAAEFDlVzZXJMUFdvcnRoWFROCQACAQJRWW91ciBMUCBUb2tlbiBjb252ZXJzaW9uIGFtb3VudCBpcyB2ZXJ5IGxvdyB0byBjb252ZXJ0IG9yIGxlc3MgdGhhbiAwLjAwMDAwMSBYVE4uAwkAZgIAAQUQVXNlckxQV29ydGhBc3NldAkAAgECXFlvdXIgTFAgVG9rZW4gY29udmVyc2lvbiBhbW91bnQgaXMgdmVyeSBsb3cgdG8gY29udmVydCBvciBsZXNzIHRoYW4gZnJhY3Rpb24gdmFsdWUgb2YgVG9rZW4uCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhZXaXRoZHJhd19MUF9QZXJjZW50YWdlBRBVc2VyTFBQZXJjZW50YWdlCQDMCAIJAQRCdXJuAgUSUmVpc3N1ZWFibGVhc3NldElkCAUDcG10BmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAglUb3RhbF9MUF8FDEVudGVyQXNzZXRJRAUQTmV3TFBUb2tlbklzc3VlZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBRNOZXdYVE5Ib2xkaW5nSW5QYWlyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQFFU5ld0Fzc2V0SG9sZGluZ0luUGFpcgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFDlVzZXJMUFdvcnRoWFROBQpYVE5Bc3NldElECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUQVXNlckxQV29ydGhBc3NldAkA2QQBBQxFbnRlckFzc2V0SUQFA25pbAECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXnPGnma",
    "height": 2769646,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: A3yxCaHfqzoeiHbpCUaEYTUczcuCH37XL3VjM2iK8JDA
Next: 7h3EJoYjUKWyNgMMNEdhmMtSrf82AhaC8DWqP4dUQSVr

Diff: 
Old New Differences
118 118                                  then throw((("Your Attached Asset Amount is very low. Attach More " + EnterAssetID) + " Tokens to Claim the minimum Amount of 0.1 dollar atleast."))
119 119                                  else if ((quantityofpriceasset > CheckXTNBalance))
120 120                                      then throw((("Pool Only has a Liquidity of " + toString((CheckXTNBalance / pow(10, 0, 6, 0, 0, CEILING)))) + " XTN. Add Liquidity into Pool."))
121 -                                     else [IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofAssetToXTNSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, XTNAssetID), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 2), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), XTNAssetID)]
121 +                                     else [IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofAssetToXTNSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, XTNAssetID), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 3), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), XTNAssetID), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), XTNAssetID)]
122 122      }
123 123  
124 124  
180 180                              then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
181 181                              else if ((quantityofpriceasset > CheckAssetBalance))
182 182                                  then throw((("Pool Only has a Liquidity of " + toString(CheckAssetBalance)) + " Tokens. Add Liquidity into Pool."))
183 -                                 else [IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), NewSumupofXTNToAssetSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, fromBase58String(EnterAssetID)), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 2), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), fromBase58String(EnterAssetID))]
183 +                                 else [IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), NewSumupofXTNToAssetSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, fromBase58String(EnterAssetID)), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID)), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID))]
184 184      }
185 185  
186 186  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let Version = "1.0.0"
5 5  
6 6  let dAppSinceStart = 1694928600000
7 7  
8 8  let listing_fee = 1400000000
9 9  
10 10  let key1owner = addressFromPublicKey(base58'4Dahqn4MYNrieo9AX8qLWNCseBQNc9skQY81h4DFoote')
11 11  
12 12  let key2owner = addressFromPublicKey(base58'4Dahqn4MYNrieo9AX8qLWNCseBQNc9skQY81h4DFoote')
13 13  
14 14  let Treasury = addressFromPublicKey(base58'EtFSDsn89XfmXQvuQXPQMbLDbaAZ1YWYZHksptpQH4gp')
15 15  
16 16  let XTNAssetID = base58'Zn3cLHW7aAVPm5aACcTjvg7e7iEy2cKDtbowok5qa9H'
17 17  
18 18  func countdays () = {
19 19      let TS_Diff = (lastBlock.timestamp - dAppSinceStart)
20 20      let daynumber = fraction(1, TS_Diff, 86400000)
21 21      daynumber
22 22      }
23 23  
24 24  
25 25  @Callable(i)
26 26  func RegisterPair (EnterAssetID) = {
27 27      let pmt1 = value(i.payments[0])
28 28      let pmt2 = value(i.payments[1])
29 29      let pmt3 = value(i.payments[2])
30 30      let currentKey = toBase58String(i.caller.bytes)
31 31      let WAVES = !(isDefined(pmt2.assetId))
32 32      let fetchpair = getString(this, ("Pair_UV_" + EnterAssetID))
33 33      let assetinfopmt2 = fromBase58String(EnterAssetID)
34 34      let info = valueOrErrorMessage(assetInfo(fromBase58String(EnterAssetID)), (("Asset " + EnterAssetID) + " doesn't exist"))
35 35      let name = info.name
36 36      let decimals = info.decimals
37 37      let LPdecimals = fraction((decimals + 6), 1, 2)
38 38      let FirstLPQty = (1 * pow(10, 0, LPdecimals, 0, 0, CEILING))
39 39      let multiply_amounts = fraction(pmt1.amount, pmt2.amount, FirstLPQty)
40 40      let getSqrt = sqrt(multiply_amounts, LPdecimals, LPdecimals, CEILING)
41 41      let LPissue = Issue((("LP-" + take(name, 8)) + "-XTN"), (((("LP-" + name) + "-XTN") + " is a Liquidity Provider Token Issued Against ") + EnterAssetID), getSqrt, LPdecimals, true)
42 42      let LPid = calculateAssetId(LPissue)
43 43      if ((fetchpair == EnterAssetID))
44 44          then throw("Pair Already Exist in List.")
45 45          else if ((size(i.payments) != 3))
46 46              then throw((("Two attached assets expected as payment. Kindly Attach payment1 = XTN Token & payment2 = Token you want to List & payment3 = [" + toString(listing_fee)) + "/10^8] Waves."))
47 47              else if ((pmt1.assetId != XTNAssetID))
48 48                  then throw("Incorrect asset attached as payment[1], please attach XTN only.")
49 49                  else if ((100000 > pmt1.amount))
50 50                      then throw("Attached payment[1] amount is less than 0.1 XTN, please attach 0.1 XTN Minimum.")
51 51                      else if ((pmt2.assetId != assetinfopmt2))
52 52                          then throw("Input String & Attached AssetID in payment2 is not matching.")
53 53                          else if ((pmt3.amount != listing_fee))
54 54                              then throw((("Attached payment[3] amount has to be exact [" + toString(listing_fee)) + "/10^8] WAVES."))
55 55                              else if ((WAVES == true))
56 56                                  then throw("You Attached WAVES Asset ID for Listing, please attach Tokens You want to list in payment[2].")
57 57                                  else [StringEntry(("Pair_UV_" + EnterAssetID), EnterAssetID), IntegerEntry(("Listing_Fee_" + EnterAssetID), pmt3.amount), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), pmt1.amount), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), pmt2.amount), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), 0), IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), 0), IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), 0), LPissue, ScriptTransfer(i.caller, getSqrt, LPid), ScriptTransfer(key1owner, fraction(listing_fee, 1, 2), unit), ScriptTransfer(key2owner, fraction(listing_fee, 1, 2), unit), StringEntry(("LP_" + EnterAssetID), toBase58String(LPid)), IntegerEntry(("Total_LP_" + EnterAssetID), getSqrt)]
58 58      }
59 59  
60 60  
61 61  
62 62  @Callable(i)
63 63  func SwapAssetToXTNPairEntry (EnterAssetID) = {
64 64      let calleraddress = toBase58String(i.caller.bytes)
65 65      let pmt = if ((size(i.payments) == 1))
66 66          then i.payments[0]
67 67          else throw("Whitelisted Token is required as Attached payment[1].")
68 68      let checkpairisavailableornot = getString(this, ("Pair_UV_" + EnterAssetID))
69 69      let CheckXTNBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)))
70 70      let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID))
71 71      let newbalanceofXTN = fraction(CheckXTNBalance, CheckAssetBalance, (CheckAssetBalance + pmt.amount))
72 72      let quantityofpriceasset = (CheckXTNBalance - newbalanceofXTN)
73 73      let SwapFee = 5
74 74      let Currentday = countdays()
75 75      let SwapFeetoreceive = ((quantityofpriceasset * SwapFee) / 1000)
76 76      let userbalancetoreceive = ((quantityofpriceasset - SwapFeetoreceive) - SwapFeetoreceive)
77 77      let SumupofAssetToXTNSwapFee =     match getInteger(this, ((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
78 78          case a: Int => 
79 79              a
80 80          case _ => 
81 81              0
82 82      }
83 83      let NewSumupofAssetToXTNSwapFee = ((SumupofAssetToXTNSwapFee + SwapFeetoreceive) + SwapFeetoreceive)
84 84      let SumupAssetBalance =     match getInteger(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID)) {
85 85          case a: Int => 
86 86              a
87 87          case _ => 
88 88              0
89 89      }
90 90      let NewSumupofAssetBalance = (CheckAssetBalance + pmt.amount)
91 91      let SumupXTNBalance =     match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
92 92          case a: Int => 
93 93              a
94 94          case _ => 
95 95              0
96 96      }
97 97      let NewSumupofXTNBalance = ((CheckXTNBalance - quantityofpriceasset) + SwapFeetoreceive)
98 98      let TOPT =     match getIntegerValue(this, ("Total_of_Pair_Txns_" + EnterAssetID)) {
99 99          case a: Int => 
100 100              a
101 101          case _ => 
102 102              0
103 103      }
104 104      let NewTPT = (TOPT + 1)
105 105      if ((EnterAssetID == toBase58String(XTNAssetID)))
106 106          then throw("Input can Never be a XTN AssetID. Enter Whitelisted AssetID in input & Attach Whitelisted Asset as an attachment Token in payment[1].")
107 107          else if ((checkpairisavailableornot != EnterAssetID))
108 108              then throw("Pair is not available in Whitelisted Asset.")
109 109              else if ((pmt.assetId == XTNAssetID))
110 110                  then throw("You can't Attach XTN as an Attached Payment. Only Whitelisted Tokens are accepted.")
111 111                  else if ((pmt.assetId != fromBase58String(EnterAssetID)))
112 112                      then throw(("Incorrect asset attached, please attach or send " + EnterAssetID))
113 113                      else if ((CheckXTNBalance == 0))
114 114                          then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
115 115                          else if ((CheckAssetBalance == 0))
116 116                              then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
117 117                              else if ((100000 > quantityofpriceasset))
118 118                                  then throw((("Your Attached Asset Amount is very low. Attach More " + EnterAssetID) + " Tokens to Claim the minimum Amount of 0.1 dollar atleast."))
119 119                                  else if ((quantityofpriceasset > CheckXTNBalance))
120 120                                      then throw((("Pool Only has a Liquidity of " + toString((CheckXTNBalance / pow(10, 0, 6, 0, 0, CEILING)))) + " XTN. Add Liquidity into Pool."))
121 -                                     else [IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofAssetToXTNSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, XTNAssetID), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 2), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), XTNAssetID)]
121 +                                     else [IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofAssetToXTNSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, XTNAssetID), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 3), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), XTNAssetID), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), XTNAssetID)]
122 122      }
123 123  
124 124  
125 125  
126 126  @Callable(i)
127 127  func SwapXTNToAssetPairEntry (EnterAssetID) = {
128 128      let calleraddress = toBase58String(i.caller.bytes)
129 129      let pmt = if ((size(i.payments) == 1))
130 130          then i.payments[0]
131 131          else throw((("Only " + toBase58String(XTNAssetID)) + " XTN Token is required as an Attached payment[1]."))
132 132      let CheckXTNBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)))
133 133      let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID))
134 134      let newbalanceofAsset = fraction(CheckXTNBalance, CheckAssetBalance, (CheckXTNBalance + pmt.amount))
135 135      let quantityofpriceasset = (CheckAssetBalance - newbalanceofAsset)
136 136      let checkpairisavailableornot = getString(this, ("Pair_UV_" + EnterAssetID))
137 137      let SwapFee = 5
138 138      let Currentday = countdays()
139 139      let SwapFeetoreceive = ((quantityofpriceasset * SwapFee) / 1000)
140 140      let userbalancetoreceive = ((quantityofpriceasset - SwapFeetoreceive) - SwapFeetoreceive)
141 141      let SumupofXTNToAssetSwapFee =     match getInteger(this, ("Total_Swap_Fee_Collected_" + EnterAssetID)) {
142 142          case a: Int => 
143 143              a
144 144          case _ => 
145 145              0
146 146      }
147 147      let NewSumupofXTNToAssetSwapFee = ((SumupofXTNToAssetSwapFee + SwapFeetoreceive) + SwapFeetoreceive)
148 148      let SumupAssetBalance =     match getInteger(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID)) {
149 149          case a: Int => 
150 150              a
151 151          case _ => 
152 152              0
153 153      }
154 154      let NewSumupofAssetBalance = ((CheckAssetBalance - quantityofpriceasset) + SwapFeetoreceive)
155 155      let SumupXTNBalance =     match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
156 156          case a: Int => 
157 157              a
158 158          case _ => 
159 159              0
160 160      }
161 161      let NewSumupofXTNBalance = (CheckXTNBalance + pmt.amount)
162 162      let TOPT =     match getIntegerValue(this, ("Total_of_Pair_Txns_" + EnterAssetID)) {
163 163          case a: Int => 
164 164              a
165 165          case _ => 
166 166              0
167 167      }
168 168      let NewTPT = (TOPT + 1)
169 169      if ((checkpairisavailableornot != EnterAssetID))
170 170          then throw("Pair is not available in Whitelisted Asset.")
171 171          else if ((EnterAssetID == toBase58String(XTNAssetID)))
172 172              then throw("Input can Never be a XTN AssetID. Enter Whitelisted AssetID in input & Attach XTN as an attachment Token in payment[1].")
173 173              else if ((pmt.assetId != XTNAssetID))
174 174                  then throw((("You can Attach " + toBase58String(XTNAssetID)) + " as an Attached Payment[1] to Swap XTN To Required Token. Any other asset else than XTN will be rejected."))
175 175                  else if ((100000 > pmt.amount))
176 176                      then throw("Your Attached XTN Amount is very low. Attach Atleast 0.1 XTN to Claim the minimum Tokens.")
177 177                      else if ((CheckXTNBalance == 0))
178 178                          then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
179 179                          else if ((CheckAssetBalance == 0))
180 180                              then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
181 181                              else if ((quantityofpriceasset > CheckAssetBalance))
182 182                                  then throw((("Pool Only has a Liquidity of " + toString(CheckAssetBalance)) + " Tokens. Add Liquidity into Pool."))
183 -                                 else [IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), NewSumupofXTNToAssetSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, fromBase58String(EnterAssetID)), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 2), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), fromBase58String(EnterAssetID))]
183 +                                 else [IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), NewSumupofXTNToAssetSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, fromBase58String(EnterAssetID)), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID)), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID))]
184 184      }
185 185  
186 186  
187 187  
188 188  @Callable(i)
189 189  func AddLiquidity (EnterAssetID) = {
190 190      let calleraddress = toBase58String(i.caller.bytes)
191 191      let pmt1 = value(i.payments[0])
192 192      let pmt2 = value(i.payments[1])
193 193      let checkpairisavailableornot = getString(this, ("Pair_UV_" + EnterAssetID))
194 194      let ReissueassetId = fromBase58String(valueOrErrorMessage(getString(this, ("LP_" + EnterAssetID)), "LP Token is Missing or May be not Generated."))
195 195      let CheckXTNBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)))
196 196      let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID))
197 197      let decimalsinfo = valueOrErrorMessage(assetInfo(fromBase58String(EnterAssetID)), (("Asset " + EnterAssetID) + " doesn't exist"))
198 198      let decimals = decimalsinfo.decimals
199 199      let LPdecimals = fraction((decimals + 6), 1, 2)
200 200      let FirstLPQty = (1 * pow(10, 0, LPdecimals, 0, 0, CEILING))
201 201      let multiply_amounts = fraction(pmt1.amount, pmt2.amount, FirstLPQty)
202 202      let getSqrt = sqrt(multiply_amounts, LPdecimals, LPdecimals, CEILING)
203 203      let XTNHoldingInPair =     match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
204 204          case a: Int => 
205 205              a
206 206          case _ => 
207 207              0
208 208      }
209 209      let NewXTNHoldingInPair = (XTNHoldingInPair + pmt2.amount)
210 210      let AssetHoldingInPair =     match getInteger(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID)) {
211 211          case a: Int => 
212 212              a
213 213          case _ => 
214 214              0
215 215      }
216 216      let NewAssetHoldingInPair = (AssetHoldingInPair + pmt1.amount)
217 217      let LPTokenIssued =     match getIntegerValue(this, ("Total_LP_" + EnterAssetID)) {
218 218          case a: Int => 
219 219              a
220 220          case _ => 
221 221              0
222 222      }
223 223      let NewLPTokenIssued = (LPTokenIssued + getSqrt)
224 224      if ((checkpairisavailableornot != EnterAssetID))
225 225          then throw("Pair is not available in Whitelisted Asset.")
226 226          else if ((EnterAssetID == toBase58String(XTNAssetID)))
227 227              then throw("Input can Never be a XTN AssetID. Enter Whitelisted AssetID in input as well as in payment[1] & Attach XTN as an attachment Token in payment[2].")
228 228              else if ((size(i.payments) != 2))
229 229                  then throw("Two attached assets are expected in payment. Kindly Attach payment1 = Token you want to add for Liquidity & payment2 = Amount of XTN Token.")
230 230                  else if ((pmt1.assetId == XTNAssetID))
231 231                      then throw("You Attached XTN asset in payment[1], please attach only whitelisted Token in payment[1] along with XTN in payment[2].")
232 232                      else if ((pmt1.assetId != fromBase58String(EnterAssetID)))
233 233                          then throw("Incorrect asset attached for Liquidity in payment[1], please attach String Asset or Whitelisted Token only.")
234 234                          else if ((pmt2.assetId != XTNAssetID))
235 235                              then throw("Wrong Asset Attached in payments[2], Please attach payment[1] = Liquidity Token & payment[2] = XTN Token.")
236 236                              else if ((100000 > pmt2.amount))
237 237                                  then throw("please attach atleast 0.1 XTN in payment[2] & Equivalent worth of Token in payment[1]")
238 238                                  else if ((1 > getSqrt))
239 239                                      then throw("LP Token Outcome is going below 1 in Fractional. Please Attach more amount.")
240 240                                      else [IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewXTNHoldingInPair), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewAssetHoldingInPair), IntegerEntry(("Total_LP_" + EnterAssetID), NewLPTokenIssued), Reissue(ReissueassetId, getSqrt, true), ScriptTransfer(i.caller, getSqrt, ReissueassetId)]
241 241      }
242 242  
243 243  
244 244  
245 245  @Callable(i)
246 246  func RemoveLiquidity (EnterAssetID) = {
247 247      let calleraddress = toBase58String(i.caller.bytes)
248 248      let pmt = if ((size(i.payments) == 1))
249 249          then i.payments[0]
250 250          else throw("No payment attached, Please Attach LP Token as payment[1].")
251 251      let checkpairisavailableornot = getString(this, ("Pair_UV_" + EnterAssetID))
252 252      let ReissueableassetId = fromBase58String(valueOrErrorMessage(getString(this, ("LP_" + EnterAssetID)), "LP Token is Missing or not Generated."))
253 253      let decimalsinfo = valueOrErrorMessage(assetInfo(fromBase58String(EnterAssetID)), (("Asset " + EnterAssetID) + " doesn't exist"))
254 254      let decimals = decimalsinfo.decimals
255 255      let bothassetsdecimals = (6 + decimals)
256 256      let sharedecimals = (bothassetsdecimals / 2)
257 257      let CheckTotalLPAmount = getIntegerValue(this, ("Total_LP_" + EnterAssetID))
258 258      let UserLPPercentage = pow(fraction(pmt.amount, pow(10, 0, 8, 0, 0, CEILING), CheckTotalLPAmount), 6, 1, 0, 6, CEILING)
259 259      let CheckXTNBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)))
260 260      let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID))
261 261      let UserLPWorthXTN = fraction(CheckXTNBalance, UserLPPercentage, pow(10, 0, 8, 0, 0, CEILING))
262 262      let UserLPWorthAsset = fraction(CheckAssetBalance, UserLPPercentage, pow(10, 0, 8, 0, 0, CEILING))
263 263      let XTNHoldingInPair =     match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
264 264          case a: Int => 
265 265              a
266 266          case _ => 
267 267              0
268 268      }
269 269      let NewXTNHoldingInPair = (XTNHoldingInPair - UserLPWorthXTN)
270 270      let AssetHoldingInPair =     match getInteger(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID)) {
271 271          case a: Int => 
272 272              a
273 273          case _ => 
274 274              0
275 275      }
276 276      let NewAssetHoldingInPair = (AssetHoldingInPair - UserLPWorthAsset)
277 277      let LPTokenIssued =     match getIntegerValue(this, ("Total_LP_" + EnterAssetID)) {
278 278          case a: Int => 
279 279              a
280 280          case _ => 
281 281              0
282 282      }
283 283      let NewLPTokenIssued = (LPTokenIssued - pmt.amount)
284 284      if ((checkpairisavailableornot != EnterAssetID))
285 285          then throw("Pair is not available in Whitelist.")
286 286          else if ((fromBase58String(EnterAssetID) == XTNAssetID))
287 287              then throw("Don't choose XTN AssetID as Input, Only Whitelisted Asset as Input String & Attach LP Tokens as payment[1]")
288 288              else if ((pmt.assetId != ReissueableassetId))
289 289                  then throw("Wrong Asset is attached in payment[1] or LP Token Not Found or Missing.")
290 290                  else if ((1 > UserLPPercentage))
291 291                      then throw("Your LP Token amount % is very low to convert.")
292 292                      else if ((1 > UserLPWorthXTN))
293 293                          then throw("Your LP Token conversion amount is very low to convert or less than 0.000001 XTN.")
294 294                          else if ((1 > UserLPWorthAsset))
295 295                              then throw("Your LP Token conversion amount is very low to convert or less than fraction value of Token.")
296 296                              else [IntegerEntry("Withdraw_LP_Percentage", UserLPPercentage), Burn(ReissueableassetId, pmt.amount), IntegerEntry(("Total_LP_" + EnterAssetID), NewLPTokenIssued), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewXTNHoldingInPair), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewAssetHoldingInPair), ScriptTransfer(i.caller, UserLPWorthXTN, XTNAssetID), ScriptTransfer(i.caller, UserLPWorthAsset, fromBase58String(EnterAssetID))]
297 297      }
298 298  
299 299  
300 300  @Verifier(tx)
301 301  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
302 302

Old	New		Differences
118	118		then throw((("Your Attached Asset Amount is very low. Attach More " + EnterAssetID) + " Tokens to Claim the minimum Amount of 0.1 dollar atleast."))
119	119		else if ((quantityofpriceasset > CheckXTNBalance))
120	120		then throw((("Pool Only has a Liquidity of " + toString((CheckXTNBalance / pow(10, 0, 6, 0, 0, CEILING)))) + " XTN. Add Liquidity into Pool."))
121		-	else [IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofAssetToXTNSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, XTNAssetID), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 2), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), XTNAssetID)]
	121	+	else [IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofAssetToXTNSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, XTNAssetID), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 3), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), XTNAssetID), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), XTNAssetID)]
122	122		}
123	123
124	124

180	180		then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
181	181		else if ((quantityofpriceasset > CheckAssetBalance))
182	182		then throw((("Pool Only has a Liquidity of " + toString(CheckAssetBalance)) + " Tokens. Add Liquidity into Pool."))
183		-	else [IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), NewSumupofXTNToAssetSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, fromBase58String(EnterAssetID)), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 2), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), fromBase58String(EnterAssetID))]
	183	+	else [IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), NewSumupofXTNToAssetSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, fromBase58String(EnterAssetID)), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID)), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID))]
184	184		}
185	185
186	186

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let Version = "1.0.0"
5	5
6	6		let dAppSinceStart = 1694928600000
7	7
8	8		let listing_fee = 1400000000
9	9
10	10		let key1owner = addressFromPublicKey(base58'4Dahqn4MYNrieo9AX8qLWNCseBQNc9skQY81h4DFoote')
11	11
12	12		let key2owner = addressFromPublicKey(base58'4Dahqn4MYNrieo9AX8qLWNCseBQNc9skQY81h4DFoote')
13	13
14	14		let Treasury = addressFromPublicKey(base58'EtFSDsn89XfmXQvuQXPQMbLDbaAZ1YWYZHksptpQH4gp')
15	15
16	16		let XTNAssetID = base58'Zn3cLHW7aAVPm5aACcTjvg7e7iEy2cKDtbowok5qa9H'
17	17
18	18		func countdays () = {
19	19		let TS_Diff = (lastBlock.timestamp - dAppSinceStart)
20	20		let daynumber = fraction(1, TS_Diff, 86400000)
21	21		daynumber
22	22		}
23	23
24	24
25	25		@Callable(i)
26	26		func RegisterPair (EnterAssetID) = {
27	27		let pmt1 = value(i.payments[0])
28	28		let pmt2 = value(i.payments[1])
29	29		let pmt3 = value(i.payments[2])
30	30		let currentKey = toBase58String(i.caller.bytes)
31	31		let WAVES = !(isDefined(pmt2.assetId))
32	32		let fetchpair = getString(this, ("Pair_UV_" + EnterAssetID))
33	33		let assetinfopmt2 = fromBase58String(EnterAssetID)
34	34		let info = valueOrErrorMessage(assetInfo(fromBase58String(EnterAssetID)), (("Asset " + EnterAssetID) + " doesn't exist"))
35	35		let name = info.name
36	36		let decimals = info.decimals
37	37		let LPdecimals = fraction((decimals + 6), 1, 2)
38	38		let FirstLPQty = (1 * pow(10, 0, LPdecimals, 0, 0, CEILING))
39	39		let multiply_amounts = fraction(pmt1.amount, pmt2.amount, FirstLPQty)
40	40		let getSqrt = sqrt(multiply_amounts, LPdecimals, LPdecimals, CEILING)
41	41		let LPissue = Issue((("LP-" + take(name, 8)) + "-XTN"), (((("LP-" + name) + "-XTN") + " is a Liquidity Provider Token Issued Against ") + EnterAssetID), getSqrt, LPdecimals, true)
42	42		let LPid = calculateAssetId(LPissue)
43	43		if ((fetchpair == EnterAssetID))
44	44		then throw("Pair Already Exist in List.")
45	45		else if ((size(i.payments) != 3))
46	46		then throw((("Two attached assets expected as payment. Kindly Attach payment1 = XTN Token & payment2 = Token you want to List & payment3 = [" + toString(listing_fee)) + "/10^8] Waves."))
47	47		else if ((pmt1.assetId != XTNAssetID))
48	48		then throw("Incorrect asset attached as payment[1], please attach XTN only.")
49	49		else if ((100000 > pmt1.amount))
50	50		then throw("Attached payment[1] amount is less than 0.1 XTN, please attach 0.1 XTN Minimum.")
51	51		else if ((pmt2.assetId != assetinfopmt2))
52	52		then throw("Input String & Attached AssetID in payment2 is not matching.")
53	53		else if ((pmt3.amount != listing_fee))
54	54		then throw((("Attached payment[3] amount has to be exact [" + toString(listing_fee)) + "/10^8] WAVES."))
55	55		else if ((WAVES == true))
56	56		then throw("You Attached WAVES Asset ID for Listing, please attach Tokens You want to list in payment[2].")
57	57		else [StringEntry(("Pair_UV_" + EnterAssetID), EnterAssetID), IntegerEntry(("Listing_Fee_" + EnterAssetID), pmt3.amount), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), pmt1.amount), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), pmt2.amount), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), 0), IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), 0), IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), 0), LPissue, ScriptTransfer(i.caller, getSqrt, LPid), ScriptTransfer(key1owner, fraction(listing_fee, 1, 2), unit), ScriptTransfer(key2owner, fraction(listing_fee, 1, 2), unit), StringEntry(("LP_" + EnterAssetID), toBase58String(LPid)), IntegerEntry(("Total_LP_" + EnterAssetID), getSqrt)]
58	58		}
59	59
60	60
61	61
62	62		@Callable(i)
63	63		func SwapAssetToXTNPairEntry (EnterAssetID) = {
64	64		let calleraddress = toBase58String(i.caller.bytes)
65	65		let pmt = if ((size(i.payments) == 1))
66	66		then i.payments[0]
67	67		else throw("Whitelisted Token is required as Attached payment[1].")
68	68		let checkpairisavailableornot = getString(this, ("Pair_UV_" + EnterAssetID))
69	69		let CheckXTNBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)))
70	70		let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID))
71	71		let newbalanceofXTN = fraction(CheckXTNBalance, CheckAssetBalance, (CheckAssetBalance + pmt.amount))
72	72		let quantityofpriceasset = (CheckXTNBalance - newbalanceofXTN)
73	73		let SwapFee = 5
74	74		let Currentday = countdays()
75	75		let SwapFeetoreceive = ((quantityofpriceasset * SwapFee) / 1000)
76	76		let userbalancetoreceive = ((quantityofpriceasset - SwapFeetoreceive) - SwapFeetoreceive)
77	77		let SumupofAssetToXTNSwapFee = match getInteger(this, ((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
78	78		case a: Int =>
79	79		a
80	80		case _ =>
81	81		0
82	82		}
83	83		let NewSumupofAssetToXTNSwapFee = ((SumupofAssetToXTNSwapFee + SwapFeetoreceive) + SwapFeetoreceive)
84	84		let SumupAssetBalance = match getInteger(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID)) {
85	85		case a: Int =>
86	86		a
87	87		case _ =>
88	88		0
89	89		}
90	90		let NewSumupofAssetBalance = (CheckAssetBalance + pmt.amount)
91	91		let SumupXTNBalance = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
92	92		case a: Int =>
93	93		a
94	94		case _ =>
95	95		0
96	96		}
97	97		let NewSumupofXTNBalance = ((CheckXTNBalance - quantityofpriceasset) + SwapFeetoreceive)
98	98		let TOPT = match getIntegerValue(this, ("Total_of_Pair_Txns_" + EnterAssetID)) {
99	99		case a: Int =>
100	100		a
101	101		case _ =>
102	102		0
103	103		}
104	104		let NewTPT = (TOPT + 1)
105	105		if ((EnterAssetID == toBase58String(XTNAssetID)))
106	106		then throw("Input can Never be a XTN AssetID. Enter Whitelisted AssetID in input & Attach Whitelisted Asset as an attachment Token in payment[1].")
107	107		else if ((checkpairisavailableornot != EnterAssetID))
108	108		then throw("Pair is not available in Whitelisted Asset.")
109	109		else if ((pmt.assetId == XTNAssetID))
110	110		then throw("You can't Attach XTN as an Attached Payment. Only Whitelisted Tokens are accepted.")
111	111		else if ((pmt.assetId != fromBase58String(EnterAssetID)))
112	112		then throw(("Incorrect asset attached, please attach or send " + EnterAssetID))
113	113		else if ((CheckXTNBalance == 0))
114	114		then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
115	115		else if ((CheckAssetBalance == 0))
116	116		then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
117	117		else if ((100000 > quantityofpriceasset))
118	118		then throw((("Your Attached Asset Amount is very low. Attach More " + EnterAssetID) + " Tokens to Claim the minimum Amount of 0.1 dollar atleast."))
119	119		else if ((quantityofpriceasset > CheckXTNBalance))
120	120		then throw((("Pool Only has a Liquidity of " + toString((CheckXTNBalance / pow(10, 0, 6, 0, 0, CEILING)))) + " XTN. Add Liquidity into Pool."))
121		-	else [IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofAssetToXTNSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, XTNAssetID), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 2), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), XTNAssetID)]
	121	+	else [IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofAssetToXTNSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, XTNAssetID), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 3), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), XTNAssetID), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), XTNAssetID)]
122	122		}
123	123
124	124
125	125
126	126		@Callable(i)
127	127		func SwapXTNToAssetPairEntry (EnterAssetID) = {
128	128		let calleraddress = toBase58String(i.caller.bytes)
129	129		let pmt = if ((size(i.payments) == 1))
130	130		then i.payments[0]
131	131		else throw((("Only " + toBase58String(XTNAssetID)) + " XTN Token is required as an Attached payment[1]."))
132	132		let CheckXTNBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)))
133	133		let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID))
134	134		let newbalanceofAsset = fraction(CheckXTNBalance, CheckAssetBalance, (CheckXTNBalance + pmt.amount))
135	135		let quantityofpriceasset = (CheckAssetBalance - newbalanceofAsset)
136	136		let checkpairisavailableornot = getString(this, ("Pair_UV_" + EnterAssetID))
137	137		let SwapFee = 5
138	138		let Currentday = countdays()
139	139		let SwapFeetoreceive = ((quantityofpriceasset * SwapFee) / 1000)
140	140		let userbalancetoreceive = ((quantityofpriceasset - SwapFeetoreceive) - SwapFeetoreceive)
141	141		let SumupofXTNToAssetSwapFee = match getInteger(this, ("Total_Swap_Fee_Collected_" + EnterAssetID)) {
142	142		case a: Int =>
143	143		a
144	144		case _ =>
145	145		0
146	146		}
147	147		let NewSumupofXTNToAssetSwapFee = ((SumupofXTNToAssetSwapFee + SwapFeetoreceive) + SwapFeetoreceive)
148	148		let SumupAssetBalance = match getInteger(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID)) {
149	149		case a: Int =>
150	150		a
151	151		case _ =>
152	152		0
153	153		}
154	154		let NewSumupofAssetBalance = ((CheckAssetBalance - quantityofpriceasset) + SwapFeetoreceive)
155	155		let SumupXTNBalance = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
156	156		case a: Int =>
157	157		a
158	158		case _ =>
159	159		0
160	160		}
161	161		let NewSumupofXTNBalance = (CheckXTNBalance + pmt.amount)
162	162		let TOPT = match getIntegerValue(this, ("Total_of_Pair_Txns_" + EnterAssetID)) {
163	163		case a: Int =>
164	164		a
165	165		case _ =>
166	166		0
167	167		}
168	168		let NewTPT = (TOPT + 1)
169	169		if ((checkpairisavailableornot != EnterAssetID))
170	170		then throw("Pair is not available in Whitelisted Asset.")
171	171		else if ((EnterAssetID == toBase58String(XTNAssetID)))
172	172		then throw("Input can Never be a XTN AssetID. Enter Whitelisted AssetID in input & Attach XTN as an attachment Token in payment[1].")
173	173		else if ((pmt.assetId != XTNAssetID))
174	174		then throw((("You can Attach " + toBase58String(XTNAssetID)) + " as an Attached Payment[1] to Swap XTN To Required Token. Any other asset else than XTN will be rejected."))
175	175		else if ((100000 > pmt.amount))
176	176		then throw("Your Attached XTN Amount is very low. Attach Atleast 0.1 XTN to Claim the minimum Tokens.")
177	177		else if ((CheckXTNBalance == 0))
178	178		then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
179	179		else if ((CheckAssetBalance == 0))
180	180		then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
181	181		else if ((quantityofpriceasset > CheckAssetBalance))
182	182		then throw((("Pool Only has a Liquidity of " + toString(CheckAssetBalance)) + " Tokens. Add Liquidity into Pool."))
183		-	else [IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), NewSumupofXTNToAssetSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, fromBase58String(EnterAssetID)), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 2), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), fromBase58String(EnterAssetID))]
	183	+	else [IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), NewSumupofXTNToAssetSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, fromBase58String(EnterAssetID)), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID)), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID))]
184	184		}
185	185
186	186
187	187
188	188		@Callable(i)
189	189		func AddLiquidity (EnterAssetID) = {
190	190		let calleraddress = toBase58String(i.caller.bytes)
191	191		let pmt1 = value(i.payments[0])
192	192		let pmt2 = value(i.payments[1])
193	193		let checkpairisavailableornot = getString(this, ("Pair_UV_" + EnterAssetID))
194	194		let ReissueassetId = fromBase58String(valueOrErrorMessage(getString(this, ("LP_" + EnterAssetID)), "LP Token is Missing or May be not Generated."))
195	195		let CheckXTNBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)))
196	196		let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID))
197	197		let decimalsinfo = valueOrErrorMessage(assetInfo(fromBase58String(EnterAssetID)), (("Asset " + EnterAssetID) + " doesn't exist"))
198	198		let decimals = decimalsinfo.decimals
199	199		let LPdecimals = fraction((decimals + 6), 1, 2)
200	200		let FirstLPQty = (1 * pow(10, 0, LPdecimals, 0, 0, CEILING))
201	201		let multiply_amounts = fraction(pmt1.amount, pmt2.amount, FirstLPQty)
202	202		let getSqrt = sqrt(multiply_amounts, LPdecimals, LPdecimals, CEILING)
203	203		let XTNHoldingInPair = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
204	204		case a: Int =>
205	205		a
206	206		case _ =>
207	207		0
208	208		}
209	209		let NewXTNHoldingInPair = (XTNHoldingInPair + pmt2.amount)
210	210		let AssetHoldingInPair = match getInteger(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID)) {
211	211		case a: Int =>
212	212		a
213	213		case _ =>
214	214		0
215	215		}
216	216		let NewAssetHoldingInPair = (AssetHoldingInPair + pmt1.amount)
217	217		let LPTokenIssued = match getIntegerValue(this, ("Total_LP_" + EnterAssetID)) {
218	218		case a: Int =>
219	219		a
220	220		case _ =>
221	221		0
222	222		}
223	223		let NewLPTokenIssued = (LPTokenIssued + getSqrt)
224	224		if ((checkpairisavailableornot != EnterAssetID))
225	225		then throw("Pair is not available in Whitelisted Asset.")
226	226		else if ((EnterAssetID == toBase58String(XTNAssetID)))
227	227		then throw("Input can Never be a XTN AssetID. Enter Whitelisted AssetID in input as well as in payment[1] & Attach XTN as an attachment Token in payment[2].")
228	228		else if ((size(i.payments) != 2))
229	229		then throw("Two attached assets are expected in payment. Kindly Attach payment1 = Token you want to add for Liquidity & payment2 = Amount of XTN Token.")
230	230		else if ((pmt1.assetId == XTNAssetID))
231	231		then throw("You Attached XTN asset in payment[1], please attach only whitelisted Token in payment[1] along with XTN in payment[2].")
232	232		else if ((pmt1.assetId != fromBase58String(EnterAssetID)))
233	233		then throw("Incorrect asset attached for Liquidity in payment[1], please attach String Asset or Whitelisted Token only.")
234	234		else if ((pmt2.assetId != XTNAssetID))
235	235		then throw("Wrong Asset Attached in payments[2], Please attach payment[1] = Liquidity Token & payment[2] = XTN Token.")
236	236		else if ((100000 > pmt2.amount))
237	237		then throw("please attach atleast 0.1 XTN in payment[2] & Equivalent worth of Token in payment[1]")
238	238		else if ((1 > getSqrt))
239	239		then throw("LP Token Outcome is going below 1 in Fractional. Please Attach more amount.")
240	240		else [IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewXTNHoldingInPair), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewAssetHoldingInPair), IntegerEntry(("Total_LP_" + EnterAssetID), NewLPTokenIssued), Reissue(ReissueassetId, getSqrt, true), ScriptTransfer(i.caller, getSqrt, ReissueassetId)]
241	241		}
242	242
243	243
244	244
245	245		@Callable(i)
246	246		func RemoveLiquidity (EnterAssetID) = {
247	247		let calleraddress = toBase58String(i.caller.bytes)
248	248		let pmt = if ((size(i.payments) == 1))
249	249		then i.payments[0]
250	250		else throw("No payment attached, Please Attach LP Token as payment[1].")
251	251		let checkpairisavailableornot = getString(this, ("Pair_UV_" + EnterAssetID))
252	252		let ReissueableassetId = fromBase58String(valueOrErrorMessage(getString(this, ("LP_" + EnterAssetID)), "LP Token is Missing or not Generated."))
253	253		let decimalsinfo = valueOrErrorMessage(assetInfo(fromBase58String(EnterAssetID)), (("Asset " + EnterAssetID) + " doesn't exist"))
254	254		let decimals = decimalsinfo.decimals
255	255		let bothassetsdecimals = (6 + decimals)
256	256		let sharedecimals = (bothassetsdecimals / 2)
257	257		let CheckTotalLPAmount = getIntegerValue(this, ("Total_LP_" + EnterAssetID))
258	258		let UserLPPercentage = pow(fraction(pmt.amount, pow(10, 0, 8, 0, 0, CEILING), CheckTotalLPAmount), 6, 1, 0, 6, CEILING)
259	259		let CheckXTNBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)))
260	260		let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID))
261	261		let UserLPWorthXTN = fraction(CheckXTNBalance, UserLPPercentage, pow(10, 0, 8, 0, 0, CEILING))
262	262		let UserLPWorthAsset = fraction(CheckAssetBalance, UserLPPercentage, pow(10, 0, 8, 0, 0, CEILING))
263	263		let XTNHoldingInPair = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
264	264		case a: Int =>
265	265		a
266	266		case _ =>
267	267		0
268	268		}
269	269		let NewXTNHoldingInPair = (XTNHoldingInPair - UserLPWorthXTN)
270	270		let AssetHoldingInPair = match getInteger(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID)) {
271	271		case a: Int =>
272	272		a
273	273		case _ =>
274	274		0
275	275		}
276	276		let NewAssetHoldingInPair = (AssetHoldingInPair - UserLPWorthAsset)
277	277		let LPTokenIssued = match getIntegerValue(this, ("Total_LP_" + EnterAssetID)) {
278	278		case a: Int =>
279	279		a
280	280		case _ =>
281	281		0
282	282		}
283	283		let NewLPTokenIssued = (LPTokenIssued - pmt.amount)
284	284		if ((checkpairisavailableornot != EnterAssetID))
285	285		then throw("Pair is not available in Whitelist.")
286	286		else if ((fromBase58String(EnterAssetID) == XTNAssetID))
287	287		then throw("Don't choose XTN AssetID as Input, Only Whitelisted Asset as Input String & Attach LP Tokens as payment[1]")
288	288		else if ((pmt.assetId != ReissueableassetId))
289	289		then throw("Wrong Asset is attached in payment[1] or LP Token Not Found or Missing.")
290	290		else if ((1 > UserLPPercentage))
291	291		then throw("Your LP Token amount % is very low to convert.")
292	292		else if ((1 > UserLPWorthXTN))
293	293		then throw("Your LP Token conversion amount is very low to convert or less than 0.000001 XTN.")
294	294		else if ((1 > UserLPWorthAsset))
295	295		then throw("Your LP Token conversion amount is very low to convert or less than fraction value of Token.")
296	296		else [IntegerEntry("Withdraw_LP_Percentage", UserLPPercentage), Burn(ReissueableassetId, pmt.amount), IntegerEntry(("Total_LP_" + EnterAssetID), NewLPTokenIssued), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewXTNHoldingInPair), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewAssetHoldingInPair), ScriptTransfer(i.caller, UserLPWorthXTN, XTNAssetID), ScriptTransfer(i.caller, UserLPWorthAsset, fromBase58String(EnterAssetID))]
297	297		}
298	298
299	299
300	300		@Verifier(tx)
301	301		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
302	302

github/deemru/w8io/169f3d6 
80.98 ms ◑