w8 · tx · A3y···JDA

tx · A3yxCaHfqzoeiHbpCUaEYTUczcuCH37XL3VjM2iK8JDA

3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5:  -0.01900000 Waves

2023.09.24 17:56 [2769640] smart account 3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "A3yxCaHfqzoeiHbpCUaEYTUczcuCH37XL3VjM2iK8JDA",
    "fee": 1900000,
    "feeAssetId": null,
    "timestamp": 1695567491012,
    "version": 2,
    "chainId": 84,
    "sender": "3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5",
    "senderPublicKey": "2LmNyaN5YAXdg9C5vsXcTLU66hsW2KUNPsN7KcHBYhUo",
    "proofs": [
        "3awK2qSg17ATYSZ3yqF9vxp83ZyDdhHnyBJraEjYQEYHD2XordioPKTkGjJ68iqAvDFR3VtMgqAy6wP8yb55GZ5A"
    ],
    "script": "base64:BgIbCAISAwoBCBIDCgEIEgMKAQgSAwoBCBIDCgEICAAHVmVyc2lvbgIFMS4wLjAADmRBcHBTaW5jZVN0YXJ0AMD394yqMQALbGlzdGluZ19mZWUAgJzJmwUACWtleTFvd25lcgkApwgBASAvzCPQT5h3KYI4s+Qe/JTLJXp/XTmuUdmGhLVoxaamewAJa2V5Mm93bmVyCQCnCAEBIC/MI9BPmHcpgjiz5B78lMslen9dOa5R2YaEtWjFpqZ7AAhUcmVhc3VyeQkApwgBASDOSN9zenNneSigwGfLTeDgcQdu/kD5ankaF9zuobgkAQAKWFROQXNzZXRJRAEgCGWEtw/wimoa8+Jo6C4IkCTD0ydYA80s9i5eC9/aFaQBCWNvdW50ZGF5cwAEB1RTX0RpZmYJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUOZEFwcFNpbmNlU3RhcnQECWRheW51bWJlcgkAawMAAQUHVFNfRGlmZgCAuJkpBQlkYXludW1iZXIFAWkBDFJlZ2lzdGVyUGFpcgEMRW50ZXJBc3NldElEBARwbXQxCQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAEBHBtdDIJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAQQEcG10MwkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwACBApjdXJyZW50S2V5CQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEBVdBVkVTCQEBIQEJAQlpc0RlZmluZWQBCAUEcG10Mgdhc3NldElkBAlmZXRjaHBhaXIJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBA1hc3NldGluZm9wbXQyCQDZBAEFDEVudGVyQXNzZXRJRAQEaW5mbwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUMRW50ZXJBc3NldElECQCsAgIJAKwCAgIGQXNzZXQgBQxFbnRlckFzc2V0SUQCDiBkb2Vzbid0IGV4aXN0BARuYW1lCAUEaW5mbwRuYW1lBAhkZWNpbWFscwgFBGluZm8IZGVjaW1hbHMECkxQZGVjaW1hbHMJAGsDCQBkAgUIZGVjaW1hbHMABgABAAIECkZpcnN0TFBRdHkJAGgCAAEJAGwGAAoAAAUKTFBkZWNpbWFscwAAAAAFB0NFSUxJTkcEEG11bHRpcGx5X2Ftb3VudHMJAGsDCAUEcG10MQZhbW91bnQIBQRwbXQyBmFtb3VudAUKRmlyc3RMUFF0eQQHZ2V0U3FydAkBBHNxcnQEBRBtdWx0aXBseV9hbW91bnRzBQpMUGRlY2ltYWxzBQpMUGRlY2ltYWxzBQdDRUlMSU5HBAdMUGlzc3VlCQDCCAUJAKwCAgkArAICAgNMUC0JAK8CAgUEbmFtZQAIAgQtWFROCQCsAgIJAKwCAgkArAICCQCsAgICA0xQLQUEbmFtZQIELVhUTgIuIGlzIGEgTGlxdWlkaXR5IFByb3ZpZGVyIFRva2VuIElzc3VlZCBBZ2FpbnN0IAUMRW50ZXJBc3NldElEBQdnZXRTcXJ0BQpMUGRlY2ltYWxzBgQETFBpZAkAuAgBBQdMUGlzc3VlAwkAAAIFCWZldGNocGFpcgUMRW50ZXJBc3NldElECQACAQIbUGFpciBBbHJlYWR5IEV4aXN0IGluIExpc3QuAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwADCQACAQkArAICCQCsAgICflR3byBhdHRhY2hlZCBhc3NldHMgZXhwZWN0ZWQgYXMgcGF5bWVudC4gS2luZGx5IEF0dGFjaCBwYXltZW50MSA9IFhUTiBUb2tlbiAmIHBheW1lbnQyID0gVG9rZW4geW91IHdhbnQgdG8gTGlzdCAmIHBheW1lbnQzID0gWwkApAMBBQtsaXN0aW5nX2ZlZQINLzEwXjhdIFdhdmVzLgMJAQIhPQIIBQRwbXQxB2Fzc2V0SWQFClhUTkFzc2V0SUQJAAIBAj9JbmNvcnJlY3QgYXNzZXQgYXR0YWNoZWQgYXMgcGF5bWVudFsxXSwgcGxlYXNlIGF0dGFjaCBYVE4gb25seS4DCQBmAgCgjQYIBQRwbXQxBmFtb3VudAkAAgECT0F0dGFjaGVkIHBheW1lbnRbMV0gYW1vdW50IGlzIGxlc3MgdGhhbiAwLjEgWFROLCBwbGVhc2UgYXR0YWNoIDAuMSBYVE4gTWluaW11bS4DCQECIT0CCAUEcG10Mgdhc3NldElkBQ1hc3NldGluZm9wbXQyCQACAQI8SW5wdXQgU3RyaW5nICYgQXR0YWNoZWQgQXNzZXRJRCBpbiBwYXltZW50MiBpcyBub3QgbWF0Y2hpbmcuAwkBAiE9AggFBHBtdDMGYW1vdW50BQtsaXN0aW5nX2ZlZQkAAgEJAKwCAgkArAICAixBdHRhY2hlZCBwYXltZW50WzNdIGFtb3VudCBoYXMgdG8gYmUgZXhhY3QgWwkApAMBBQtsaXN0aW5nX2ZlZQINLzEwXjhdIFdBVkVTLgMJAAACBQVXQVZFUwYJAAIBAl1Zb3UgQXR0YWNoZWQgV0FWRVMgQXNzZXQgSUQgZm9yIExpc3RpbmcsIHBsZWFzZSBhdHRhY2ggVG9rZW5zIFlvdSB3YW50IHRvIGxpc3QgaW4gcGF5bWVudFsyXS4JAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBQxFbnRlckFzc2V0SUQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIMTGlzdGluZ19GZWVfBQxFbnRlckFzc2V0SUQIBQRwbXQzBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElECAUEcG10MQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAgFBHBtdDIGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICE1RvdGFsX29mX1BhaXJfVHhuc18FDEVudGVyQXNzZXRJRAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAhlUb3RhbF9Td2FwX0ZlZV9Db2xsZWN0ZWRfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICGVRvdGFsX1N3YXBfRmVlX0NvbGxlY3RlZF8FDEVudGVyQXNzZXRJRAAACQDMCAIFB0xQaXNzdWUJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQdnZXRTcXJ0BQRMUGlkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCWtleTFvd25lcgkAawMFC2xpc3RpbmdfZmVlAAEAAgUEdW5pdAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQlrZXkyb3duZXIJAGsDBQtsaXN0aW5nX2ZlZQABAAIFBHVuaXQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICAgNMUF8FDEVudGVyQXNzZXRJRAkA2AQBBQRMUGlkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEBQdnZXRTcXJ0BQNuaWwBaQEXU3dhcEFzc2V0VG9YVE5QYWlyRW50cnkBDEVudGVyQXNzZXRJRAQNY2FsbGVyYWRkcmVzcwkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBANwbXQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABCQCRAwIIBQFpCHBheW1lbnRzAAAJAAIBAjVXaGl0ZWxpc3RlZCBUb2tlbiBpcyByZXF1aXJlZCBhcyBBdHRhY2hlZCBwYXltZW50WzFdLgQZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAkAnQgCBQR0aGlzCQCsAgICCFBhaXJfVVZfBQxFbnRlckFzc2V0SUQED0NoZWNrWFROQmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBBFDaGVja0Fzc2V0QmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBA9uZXdiYWxhbmNlb2ZYVE4JAGsDBQ9DaGVja1hUTkJhbGFuY2UFEUNoZWNrQXNzZXRCYWxhbmNlCQBkAgURQ2hlY2tBc3NldEJhbGFuY2UIBQNwbXQGYW1vdW50BBRxdWFudGl0eW9mcHJpY2Vhc3NldAkAZQIFD0NoZWNrWFROQmFsYW5jZQUPbmV3YmFsYW5jZW9mWFROBAdTd2FwRmVlAAUECkN1cnJlbnRkYXkJAQljb3VudGRheXMABBBTd2FwRmVldG9yZWNlaXZlCQBpAgkAaAIFFHF1YW50aXR5b2ZwcmljZWFzc2V0BQdTd2FwRmVlAOgHBBR1c2VyYmFsYW5jZXRvcmVjZWl2ZQkAZQIJAGUCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUQU3dhcEZlZXRvcmVjZWl2ZQUQU3dhcEZlZXRvcmVjZWl2ZQQYU3VtdXBvZkFzc2V0VG9YVE5Td2FwRmVlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICGVRvdGFsX1N3YXBfRmVlX0NvbGxlY3RlZF8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBtOZXdTdW11cG9mQXNzZXRUb1hUTlN3YXBGZWUJAGQCCQBkAgUYU3VtdXBvZkFzc2V0VG9YVE5Td2FwRmVlBRBTd2FwRmVldG9yZWNlaXZlBRBTd2FwRmVldG9yZWNlaXZlBBFTdW11cEFzc2V0QmFsYW5jZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEFk5ld1N1bXVwb2ZBc3NldEJhbGFuY2UJAGQCBRFDaGVja0Fzc2V0QmFsYW5jZQgFA3BtdAZhbW91bnQED1N1bXVwWFROQmFsYW5jZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEFE5ld1N1bXVwb2ZYVE5CYWxhbmNlCQBkAgkAZQIFD0NoZWNrWFROQmFsYW5jZQUUcXVhbnRpdHlvZnByaWNlYXNzZXQFEFN3YXBGZWV0b3JlY2VpdmUEBFRPUFQEByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgITVG90YWxfb2ZfUGFpcl9UeG5zXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABAZOZXdUUFQJAGQCBQRUT1BUAAEDCQAAAgUMRW50ZXJBc3NldElECQDYBAEFClhUTkFzc2V0SUQJAAIBAoUBSW5wdXQgY2FuIE5ldmVyIGJlIGEgWFROIEFzc2V0SUQuIEVudGVyIFdoaXRlbGlzdGVkIEFzc2V0SUQgaW4gaW5wdXQgJiBBdHRhY2ggV2hpdGVsaXN0ZWQgQXNzZXQgYXMgYW4gYXR0YWNobWVudCBUb2tlbiBpbiBwYXltZW50WzFdLgMJAQIhPQIFGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QFDEVudGVyQXNzZXRJRAkAAgECK1BhaXIgaXMgbm90IGF2YWlsYWJsZSBpbiBXaGl0ZWxpc3RlZCBBc3NldC4DCQAAAggFA3BtdAdhc3NldElkBQpYVE5Bc3NldElECQACAQJSWW91IGNhbid0IEF0dGFjaCBYVE4gYXMgYW4gQXR0YWNoZWQgUGF5bWVudC4gT25seSBXaGl0ZWxpc3RlZCBUb2tlbnMgYXJlIGFjY2VwdGVkLgMJAQIhPQIIBQNwbXQHYXNzZXRJZAkA2QQBBQxFbnRlckFzc2V0SUQJAAIBCQCsAgICMEluY29ycmVjdCBhc3NldCBhdHRhY2hlZCwgcGxlYXNlIGF0dGFjaCBvciBzZW5kIAUMRW50ZXJBc3NldElEAwkAAAIFD0NoZWNrWFROQmFsYW5jZQAACQACAQJlU3dhcCBQYWlyIE5lZWQgdG8gQWRkIExpcXVpZGl0eSBmaXJzdCBpbnRvIFBvb2wuIE9ubHkgQWZ0ZXIgdGhhdCBQYWlyIHdpbGwgYmUgYWN0aXZhdGVkIGZvciBTd2FwcGluZy4DCQAAAgURQ2hlY2tBc3NldEJhbGFuY2UAAAkAAgECZVN3YXAgUGFpciBOZWVkIHRvIEFkZCBMaXF1aWRpdHkgZmlyc3QgaW50byBQb29sLiBPbmx5IEFmdGVyIHRoYXQgUGFpciB3aWxsIGJlIGFjdGl2YXRlZCBmb3IgU3dhcHBpbmcuAwkAZgIAoI0GBRRxdWFudGl0eW9mcHJpY2Vhc3NldAkAAgEJAKwCAgkArAICAjRZb3VyIEF0dGFjaGVkIEFzc2V0IEFtb3VudCBpcyB2ZXJ5IGxvdy4gQXR0YWNoIE1vcmUgBQxFbnRlckFzc2V0SUQCOiBUb2tlbnMgdG8gQ2xhaW0gdGhlIG1pbmltdW0gQW1vdW50IG9mIDAuMSBkb2xsYXIgYXRsZWFzdC4DCQBmAgUUcXVhbnRpdHlvZnByaWNlYXNzZXQFD0NoZWNrWFROQmFsYW5jZQkAAgEJAKwCAgkArAICAh1Qb29sIE9ubHkgaGFzIGEgTGlxdWlkaXR5IG9mIAkApAMBCQBpAgUPQ2hlY2tYVE5CYWxhbmNlCQBsBgAKAAAABgAAAAAFB0NFSUxJTkcCHiBYVE4uIEFkZCBMaXF1aWRpdHkgaW50byBQb29sLgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQFG05ld1N1bXVwb2ZBc3NldFRvWFROU3dhcEZlZQkAzAgCCQEMSW50ZWdlckVudHJ5AgILQ3VycmVudF9EYXkFCkN1cnJlbnRkYXkJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgITVG90YWxfb2ZfUGFpcl9UeG5zXwUMRW50ZXJBc3NldElEBQZOZXdUUFQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAUWTmV3U3VtdXBvZkFzc2V0QmFsYW5jZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBRROZXdTdW11cG9mWFROQmFsYW5jZQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFFHVzZXJiYWxhbmNldG9yZWNlaXZlBQpYVE5Bc3NldElECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCWtleTFvd25lcgkAawMFEFN3YXBGZWV0b3JlY2VpdmUAAQACBQpYVE5Bc3NldElECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCWtleTJvd25lcgkAawMFEFN3YXBGZWV0b3JlY2VpdmUAAQACBQpYVE5Bc3NldElEBQNuaWwBaQEXU3dhcFhUTlRvQXNzZXRQYWlyRW50cnkBDEVudGVyQXNzZXRJRAQNY2FsbGVyYWRkcmVzcwkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBANwbXQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABCQCRAwIIBQFpCHBheW1lbnRzAAAJAAIBCQCsAgIJAKwCAgIFT25seSAJANgEAQUKWFROQXNzZXRJRAIxIFhUTiBUb2tlbiBpcyByZXF1aXJlZCBhcyBhbiBBdHRhY2hlZCBwYXltZW50WzFdLgQPQ2hlY2tYVE5CYWxhbmNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQEEUNoZWNrQXNzZXRCYWxhbmNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQEEW5ld2JhbGFuY2VvZkFzc2V0CQBrAwUPQ2hlY2tYVE5CYWxhbmNlBRFDaGVja0Fzc2V0QmFsYW5jZQkAZAIFD0NoZWNrWFROQmFsYW5jZQgFA3BtdAZhbW91bnQEFHF1YW50aXR5b2ZwcmljZWFzc2V0CQBlAgURQ2hlY2tBc3NldEJhbGFuY2UFEW5ld2JhbGFuY2VvZkFzc2V0BBljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90CQCdCAIFBHRoaXMJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAQHU3dhcEZlZQAFBApDdXJyZW50ZGF5CQEJY291bnRkYXlzAAQQU3dhcEZlZXRvcmVjZWl2ZQkAaQIJAGgCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUHU3dhcEZlZQDoBwQUdXNlcmJhbGFuY2V0b3JlY2VpdmUJAGUCCQBlAgUUcXVhbnRpdHlvZnByaWNlYXNzZXQFEFN3YXBGZWV0b3JlY2VpdmUFEFN3YXBGZWV0b3JlY2VpdmUEGFN1bXVwb2ZYVE5Ub0Fzc2V0U3dhcEZlZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgICGVRvdGFsX1N3YXBfRmVlX0NvbGxlY3RlZF8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQbTmV3U3VtdXBvZlhUTlRvQXNzZXRTd2FwRmVlCQBkAgkAZAIFGFN1bXVwb2ZYVE5Ub0Fzc2V0U3dhcEZlZQUQU3dhcEZlZXRvcmVjZWl2ZQUQU3dhcEZlZXRvcmVjZWl2ZQQRU3VtdXBBc3NldEJhbGFuY2UEByRtYXRjaDAJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBZOZXdTdW11cG9mQXNzZXRCYWxhbmNlCQBkAgkAZQIFEUNoZWNrQXNzZXRCYWxhbmNlBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUQU3dhcEZlZXRvcmVjZWl2ZQQPU3VtdXBYVE5CYWxhbmNlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQUTmV3U3VtdXBvZlhUTkJhbGFuY2UJAGQCBQ9DaGVja1hUTkJhbGFuY2UIBQNwbXQGYW1vdW50BARUT1BUBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICE1RvdGFsX29mX1BhaXJfVHhuc18FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQGTmV3VFBUCQBkAgUEVE9QVAABAwkBAiE9AgUZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAUMRW50ZXJBc3NldElECQACAQIrUGFpciBpcyBub3QgYXZhaWxhYmxlIGluIFdoaXRlbGlzdGVkIEFzc2V0LgMJAAACBQxFbnRlckFzc2V0SUQJANgEAQUKWFROQXNzZXRJRAkAAgECd0lucHV0IGNhbiBOZXZlciBiZSBhIFhUTiBBc3NldElELiBFbnRlciBXaGl0ZWxpc3RlZCBBc3NldElEIGluIGlucHV0ICYgQXR0YWNoIFhUTiBhcyBhbiBhdHRhY2htZW50IFRva2VuIGluIHBheW1lbnRbMV0uAwkBAiE9AggFA3BtdAdhc3NldElkBQpYVE5Bc3NldElECQACAQkArAICCQCsAgICD1lvdSBjYW4gQXR0YWNoIAkA2AQBBQpYVE5Bc3NldElEAmkgYXMgYW4gQXR0YWNoZWQgUGF5bWVudFsxXSB0byBTd2FwIFhUTiBUbyBSZXF1aXJlZCBUb2tlbi4gQW55IG90aGVyIGFzc2V0IGVsc2UgdGhhbiBYVE4gd2lsbCBiZSByZWplY3RlZC4DCQBmAgCgjQYIBQNwbXQGYW1vdW50CQACAQJZWW91ciBBdHRhY2hlZCBYVE4gQW1vdW50IGlzIHZlcnkgbG93LiBBdHRhY2ggQXRsZWFzdCAwLjEgWFROIHRvIENsYWltIHRoZSBtaW5pbXVtIFRva2Vucy4DCQAAAgUPQ2hlY2tYVE5CYWxhbmNlAAAJAAIBAmVTd2FwIFBhaXIgTmVlZCB0byBBZGQgTGlxdWlkaXR5IGZpcnN0IGludG8gUG9vbC4gT25seSBBZnRlciB0aGF0IFBhaXIgd2lsbCBiZSBhY3RpdmF0ZWQgZm9yIFN3YXBwaW5nLgMJAAACBRFDaGVja0Fzc2V0QmFsYW5jZQAACQACAQJlU3dhcCBQYWlyIE5lZWQgdG8gQWRkIExpcXVpZGl0eSBmaXJzdCBpbnRvIFBvb2wuIE9ubHkgQWZ0ZXIgdGhhdCBQYWlyIHdpbGwgYmUgYWN0aXZhdGVkIGZvciBTd2FwcGluZy4DCQBmAgUUcXVhbnRpdHlvZnByaWNlYXNzZXQFEUNoZWNrQXNzZXRCYWxhbmNlCQACAQkArAICCQCsAgICHVBvb2wgT25seSBoYXMgYSBMaXF1aWRpdHkgb2YgCQCkAwEFEUNoZWNrQXNzZXRCYWxhbmNlAiEgVG9rZW5zLiBBZGQgTGlxdWlkaXR5IGludG8gUG9vbC4JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEBRtOZXdTdW11cG9mWFROVG9Bc3NldFN3YXBGZWUJAMwIAgkBDEludGVnZXJFbnRyeQICC0N1cnJlbnRfRGF5BQpDdXJyZW50ZGF5CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICE1RvdGFsX29mX1BhaXJfVHhuc18FDEVudGVyQXNzZXRJRAUGTmV3VFBUCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQFFk5ld1N1bXVwb2ZBc3NldEJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAUUTmV3U3VtdXBvZlhUTkJhbGFuY2UJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBRR1c2VyYmFsYW5jZXRvcmVjZWl2ZQkA2QQBBQxFbnRlckFzc2V0SUQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUJa2V5MW93bmVyCQBrAwUQU3dhcEZlZXRvcmVjZWl2ZQABAAIJANkEAQUMRW50ZXJBc3NldElECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCWtleTJvd25lcgkAawMFEFN3YXBGZWV0b3JlY2VpdmUAAQACCQDZBAEFDEVudGVyQXNzZXRJRAUDbmlsAWkBDEFkZExpcXVpZGl0eQEMRW50ZXJBc3NldElEBA1jYWxsZXJhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEBHBtdDEJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQEcG10MgkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwABBBljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90CQCdCAIFBHRoaXMJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAQOUmVpc3N1ZWFzc2V0SWQJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgIDTFBfBQxFbnRlckFzc2V0SUQCLExQIFRva2VuIGlzIE1pc3Npbmcgb3IgTWF5IGJlIG5vdCBHZW5lcmF0ZWQuBA9DaGVja1hUTkJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAQRQ2hlY2tBc3NldEJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAQMZGVjaW1hbHNpbmZvCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQxFbnRlckFzc2V0SUQJAKwCAgkArAICAgZBc3NldCAFDEVudGVyQXNzZXRJRAIOIGRvZXNuJ3QgZXhpc3QECGRlY2ltYWxzCAUMZGVjaW1hbHNpbmZvCGRlY2ltYWxzBApMUGRlY2ltYWxzCQBrAwkAZAIFCGRlY2ltYWxzAAYAAQACBApGaXJzdExQUXR5CQBoAgABCQBsBgAKAAAFCkxQZGVjaW1hbHMAAAAABQdDRUlMSU5HBBBtdWx0aXBseV9hbW91bnRzCQBrAwgFBHBtdDEGYW1vdW50CAUEcG10MgZhbW91bnQFCkZpcnN0TFBRdHkEB2dldFNxcnQJAQRzcXJ0BAUQbXVsdGlwbHlfYW1vdW50cwUKTFBkZWNpbWFscwUKTFBkZWNpbWFscwUHQ0VJTElORwQQWFROSG9sZGluZ0luUGFpcgQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEE05ld1hUTkhvbGRpbmdJblBhaXIJAGQCBRBYVE5Ib2xkaW5nSW5QYWlyCAUEcG10MgZhbW91bnQEEkFzc2V0SG9sZGluZ0luUGFpcgQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEFU5ld0Fzc2V0SG9sZGluZ0luUGFpcgkAZAIFEkFzc2V0SG9sZGluZ0luUGFpcggFBHBtdDEGYW1vdW50BA1MUFRva2VuSXNzdWVkBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBBOZXdMUFRva2VuSXNzdWVkCQBkAgUNTFBUb2tlbklzc3VlZAUHZ2V0U3FydAMJAQIhPQIFGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QFDEVudGVyQXNzZXRJRAkAAgECK1BhaXIgaXMgbm90IGF2YWlsYWJsZSBpbiBXaGl0ZWxpc3RlZCBBc3NldC4DCQAAAgUMRW50ZXJBc3NldElECQDYBAEFClhUTkFzc2V0SUQJAAIBApABSW5wdXQgY2FuIE5ldmVyIGJlIGEgWFROIEFzc2V0SUQuIEVudGVyIFdoaXRlbGlzdGVkIEFzc2V0SUQgaW4gaW5wdXQgYXMgd2VsbCBhcyBpbiBwYXltZW50WzFdICYgQXR0YWNoIFhUTiBhcyBhbiBhdHRhY2htZW50IFRva2VuIGluIHBheW1lbnRbMl0uAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwACCQACAQKLAVR3byBhdHRhY2hlZCBhc3NldHMgYXJlIGV4cGVjdGVkIGluIHBheW1lbnQuIEtpbmRseSBBdHRhY2ggcGF5bWVudDEgPSBUb2tlbiB5b3Ugd2FudCB0byBhZGQgZm9yIExpcXVpZGl0eSAmIHBheW1lbnQyID0gQW1vdW50IG9mIFhUTiBUb2tlbi4DCQAAAggFBHBtdDEHYXNzZXRJZAUKWFROQXNzZXRJRAkAAgECdllvdSBBdHRhY2hlZCBYVE4gYXNzZXQgaW4gcGF5bWVudFsxXSwgcGxlYXNlIGF0dGFjaCBvbmx5IHdoaXRlbGlzdGVkIFRva2VuIGluIHBheW1lbnRbMV0gYWxvbmcgd2l0aCBYVE4gaW4gcGF5bWVudFsyXS4DCQECIT0CCAUEcG10MQdhc3NldElkCQDZBAEFDEVudGVyQXNzZXRJRAkAAgECa0luY29ycmVjdCBhc3NldCBhdHRhY2hlZCBmb3IgTGlxdWlkaXR5IGluIHBheW1lbnRbMV0sIHBsZWFzZSBhdHRhY2ggU3RyaW5nIEFzc2V0IG9yIFdoaXRlbGlzdGVkIFRva2VuIG9ubHkuAwkBAiE9AggFBHBtdDIHYXNzZXRJZAUKWFROQXNzZXRJRAkAAgECaVdyb25nIEFzc2V0IEF0dGFjaGVkIGluIHBheW1lbnRzWzJdLCBQbGVhc2UgYXR0YWNoIHBheW1lbnRbMV0gPSBMaXF1aWRpdHkgVG9rZW4gJiBwYXltZW50WzJdID0gWFROIFRva2VuLgMJAGYCAKCNBggFBHBtdDIGYW1vdW50CQACAQJVcGxlYXNlIGF0dGFjaCBhdGxlYXN0IDAuMSBYVE4gaW4gcGF5bWVudFsyXSAmIEVxdWl2YWxlbnQgd29ydGggb2YgVG9rZW4gaW4gcGF5bWVudFsxXQMJAGYCAAEFB2dldFNxcnQJAAIBAktMUCBUb2tlbiBPdXRjb21lIGlzIGdvaW5nIGJlbG93IDEgaW4gRnJhY3Rpb25hbC4gUGxlYXNlIEF0dGFjaCBtb3JlIGFtb3VudC4JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAUTTmV3WFROSG9sZGluZ0luUGFpcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBRVOZXdBc3NldEhvbGRpbmdJblBhaXIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQFEE5ld0xQVG9rZW5Jc3N1ZWQJAMwIAgkBB1JlaXNzdWUDBQ5SZWlzc3VlYXNzZXRJZAUHZ2V0U3FydAYJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQdnZXRTcXJ0BQ5SZWlzc3VlYXNzZXRJZAUDbmlsAWkBD1JlbW92ZUxpcXVpZGl0eQEMRW50ZXJBc3NldElEBA1jYWxsZXJhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEA3BtdAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAJEDAggFAWkIcGF5bWVudHMAAAkAAgECOk5vIHBheW1lbnQgYXR0YWNoZWQsIFBsZWFzZSBBdHRhY2ggTFAgVG9rZW4gYXMgcGF5bWVudFsxXS4EGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBBJSZWlzc3VlYWJsZWFzc2V0SWQJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgIDTFBfBQxFbnRlckFzc2V0SUQCJUxQIFRva2VuIGlzIE1pc3Npbmcgb3Igbm90IEdlbmVyYXRlZC4EDGRlY2ltYWxzaW5mbwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUMRW50ZXJBc3NldElECQCsAgIJAKwCAgIGQXNzZXQgBQxFbnRlckFzc2V0SUQCDiBkb2Vzbid0IGV4aXN0BAhkZWNpbWFscwgFDGRlY2ltYWxzaW5mbwhkZWNpbWFscwQSYm90aGFzc2V0c2RlY2ltYWxzCQBkAgAGBQhkZWNpbWFscwQNc2hhcmVkZWNpbWFscwkAaQIFEmJvdGhhc3NldHNkZWNpbWFscwACBBJDaGVja1RvdGFsTFBBbW91bnQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQEEFVzZXJMUFBlcmNlbnRhZ2UJAGwGCQBrAwgFA3BtdAZhbW91bnQJAGwGAAoAAAAIAAAAAAUHQ0VJTElORwUSQ2hlY2tUb3RhbExQQW1vdW50AAYAAQAAAAYFB0NFSUxJTkcED0NoZWNrWFROQmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBBFDaGVja0Fzc2V0QmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBA5Vc2VyTFBXb3J0aFhUTgkAawMFD0NoZWNrWFROQmFsYW5jZQUQVXNlckxQUGVyY2VudGFnZQkAbAYACgAAAAgAAAAABQdDRUlMSU5HBBBVc2VyTFBXb3J0aEFzc2V0CQBrAwURQ2hlY2tBc3NldEJhbGFuY2UFEFVzZXJMUFBlcmNlbnRhZ2UJAGwGAAoAAAAIAAAAAAUHQ0VJTElORwQQWFROSG9sZGluZ0luUGFpcgQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEE05ld1hUTkhvbGRpbmdJblBhaXIJAGUCBRBYVE5Ib2xkaW5nSW5QYWlyBQ5Vc2VyTFBXb3J0aFhUTgQSQXNzZXRIb2xkaW5nSW5QYWlyBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQVTmV3QXNzZXRIb2xkaW5nSW5QYWlyCQBlAgUSQXNzZXRIb2xkaW5nSW5QYWlyBRBVc2VyTFBXb3J0aEFzc2V0BA1MUFRva2VuSXNzdWVkBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBBOZXdMUFRva2VuSXNzdWVkCQBlAgUNTFBUb2tlbklzc3VlZAgFA3BtdAZhbW91bnQDCQECIT0CBRljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90BQxFbnRlckFzc2V0SUQJAAIBAiNQYWlyIGlzIG5vdCBhdmFpbGFibGUgaW4gV2hpdGVsaXN0LgMJAAACCQDZBAEFDEVudGVyQXNzZXRJRAUKWFROQXNzZXRJRAkAAgECakRvbid0IGNob29zZSBYVE4gQXNzZXRJRCBhcyBJbnB1dCwgT25seSBXaGl0ZWxpc3RlZCBBc3NldCBhcyBJbnB1dCBTdHJpbmcgJiBBdHRhY2ggTFAgVG9rZW5zIGFzIHBheW1lbnRbMV0DCQECIT0CCAUDcG10B2Fzc2V0SWQFElJlaXNzdWVhYmxlYXNzZXRJZAkAAgECR1dyb25nIEFzc2V0IGlzIGF0dGFjaGVkIGluIHBheW1lbnRbMV0gb3IgTFAgVG9rZW4gTm90IEZvdW5kIG9yIE1pc3NpbmcuAwkAZgIAAQUQVXNlckxQUGVyY2VudGFnZQkAAgECLllvdXIgTFAgVG9rZW4gYW1vdW50ICUgaXMgdmVyeSBsb3cgdG8gY29udmVydC4DCQBmAgABBQ5Vc2VyTFBXb3J0aFhUTgkAAgECUVlvdXIgTFAgVG9rZW4gY29udmVyc2lvbiBhbW91bnQgaXMgdmVyeSBsb3cgdG8gY29udmVydCBvciBsZXNzIHRoYW4gMC4wMDAwMDEgWFROLgMJAGYCAAEFEFVzZXJMUFdvcnRoQXNzZXQJAAIBAlxZb3VyIExQIFRva2VuIGNvbnZlcnNpb24gYW1vdW50IGlzIHZlcnkgbG93IHRvIGNvbnZlcnQgb3IgbGVzcyB0aGFuIGZyYWN0aW9uIHZhbHVlIG9mIFRva2VuLgkAzAgCCQEMSW50ZWdlckVudHJ5AgIWV2l0aGRyYXdfTFBfUGVyY2VudGFnZQUQVXNlckxQUGVyY2VudGFnZQkAzAgCCQEEQnVybgIFElJlaXNzdWVhYmxlYXNzZXRJZAgFA3BtdAZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQFEE5ld0xQVG9rZW5Jc3N1ZWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAUTTmV3WFROSG9sZGluZ0luUGFpcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBRVOZXdBc3NldEhvbGRpbmdJblBhaXIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQ5Vc2VyTFBXb3J0aFhUTgUKWFROQXNzZXRJRAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFEFVzZXJMUFdvcnRoQXNzZXQJANkEAQUMRW50ZXJBc3NldElEBQNuaWwBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5CyV+zQ==",
    "height": 2769640,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: AdDM7Bgzn83FEvQzV8RFyrxLXiMvMAjEz3ALAzX43Een
Next: GTvNtkdhFhoMg1MgXEyptAGAvMfsgsu2LvMJBMyWh2S5

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, 3), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), XTNAssetID), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), 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, 2), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), 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, 3), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID)), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), 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, 2), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), 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, 3), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), XTNAssetID), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), 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, 2), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), 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, 3), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID)), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), 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, 2), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), 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, 3), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, ~~3), XTNAssetID), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3~~), 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, 2), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), 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, 3), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, ~~3), fromBase58String(EnterAssetID)), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3~~), 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, 2), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), 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, 3), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, ~~3), XTNAssetID), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3~~), 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, 2), XTNAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), 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, 3), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, ~~3), fromBase58String(EnterAssetID)), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3~~), 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, 2), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 2), 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 
50.68 ms ◑