w8 · tx · 4qS···ApV

tx · 4qS9PbyX73M1EGJFAZxKU2eeNcehNrw8wcjCzKFLdApV

3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5:  -0.01700000 Waves

2023.09.19 17:32 [2762388] smart account 3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "4qS9PbyX73M1EGJFAZxKU2eeNcehNrw8wcjCzKFLdApV",
    "fee": 1700000,
    "feeAssetId": null,
    "timestamp": 1695133948327,
    "version": 2,
    "chainId": 84,
    "sender": "3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5",
    "senderPublicKey": "2LmNyaN5YAXdg9C5vsXcTLU66hsW2KUNPsN7KcHBYhUo",
    "proofs": [
        "4H3GMdPVjjmSMiWhvH566qwUDfLmEGKt5NYkHCt8wN943bVhyiGg9edbuWumvBAu589KMCXF7j9Q4Tac8EYQRb9R"
    ],
    "script": "base64:BgIgCAISAwoBCBIDCgEIEgMKAQgSAwoBCBIDCgEIEgMKAQgEAA5kQXBwU2luY2VTdGFydACAkYzCqjEAClhUTkFzc2V0SUQBIERHMcoh3/bynCbIVv74Z6l9nvez8AyJBUgJkDUU6U3/ABFDb2xsZWN0RmVlQWRkcmVzcwkApwgBASBSg9mgi9eQkjsz5eBARHIbc7Hg/F4fmB0sxZ6ySMfiIAEJY291bnRkYXlzAAQHVFNfRGlmZgkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQ5kQXBwU2luY2VTdGFydAQJZGF5bnVtYmVyCQBrAwABBQdUU19EaWZmAIC4mSkFCWRheW51bWJlcgYBaQEMUmVnaXN0ZXJQYWlyAQxFbnRlckFzc2V0SUQEBHBtdDEJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQEcG10MgkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwABBApjdXJyZW50S2V5CQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEBVdBVkVTCQEBIQEJAQlpc0RlZmluZWQBCAUEcG10Mgdhc3NldElkBAlmZXRjaHBhaXIJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBA1hc3NldGluZm9wbXQyCQDZBAEFDEVudGVyQXNzZXRJRAQEaW5mbwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUMRW50ZXJBc3NldElECQCsAgIJAKwCAgIGQXNzZXQgBQxFbnRlckFzc2V0SUQCDiBkb2Vzbid0IGV4aXN0BARuYW1lCAUEaW5mbwRuYW1lBAhkZWNpbWFscwgFBGluZm8IZGVjaW1hbHMECkxQZGVjaW1hbHMJAGsDCQBkAgUIZGVjaW1hbHMABgABAAIECkZpcnN0TFBRdHkJAGgCAAEJAGwGAAoAAAUKTFBkZWNpbWFscwAAAAAFB0NFSUxJTkcEEG11bHRpcGx5X2Ftb3VudHMJAGsDCAUEcG10MQZhbW91bnQIBQRwbXQyBmFtb3VudAUKRmlyc3RMUFF0eQQHZ2V0U3FydAkBBHNxcnQEBRBtdWx0aXBseV9hbW91bnRzBQpMUGRlY2ltYWxzBQpMUGRlY2ltYWxzBQdDRUlMSU5HBAdMUGlzc3VlCQDCCAUJAKwCAgkArAICAgNMUC0JAK8CAgUEbmFtZQAIAgQtWFROCQCsAgIJAKwCAgkArAICCQCsAgICA0xQLQUEbmFtZQIELVhUTgIuIGlzIGEgTGlxdWlkaXR5IFByb3ZpZGVyIFRva2VuIElzc3VlZCBBZ2FpbnN0IAUMRW50ZXJBc3NldElEBQdnZXRTcXJ0BQpMUGRlY2ltYWxzBgQETFBpZAkAuAgBBQdMUGlzc3VlAwkAAAIFCWZldGNocGFpcgUMRW50ZXJBc3NldElECQACAQIbUGFpciBBbHJlYWR5IEV4aXN0IGluIExpc3QuAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwACCQACAQJyVHdvIGF0dGFjaGVkIGFzc2V0cyBleHBlY3RlZCBhcyBwYXltZW50LiBLaW5kbHkgQXR0YWNoIHBheW1lbnQxID0gV0FWRVMgVG9rZW4gJiBwYXltZW50MiA9IFRva2VuIHlvdSB3YW50IHRvIExpc3QuAwkBAiE9AggFBHBtdDEHYXNzZXRJZAUKWFROQXNzZXRJRAkAAgECQEluY29ycmVjdCBhc3NldCBhdHRhY2hlZCBmb3IgQ29sbGF0ZXJhbCwgcGxlYXNlIGF0dGFjaCBYVE4gb25seS4DCQECIT0CCAUEcG10MQZhbW91bnQAgK3iBAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgISWW91IGF0dGFjaGVkIG9ubHkgCQCkAwEJAGsDCAUEcG10MQZhbW91bnQAAQCAwtcvAgEuCQCkAwEJAGsDCAUEcG10MQZhbW91bnQAAQCAreIEAjkgV0FWRVMgZm9yIExpc3RpbmcgaW4gcGF5bWVudFsxXSwgcGxlYXNlIGF0dGFjaCAxMCBXQVZFUy4DCQECIT0CCAUEcG10Mgdhc3NldElkBQ1hc3NldGluZm9wbXQyCQACAQI8SW5wdXQgU3RyaW5nICYgQXR0YWNoZWQgQXNzZXRJRCBpbiBwYXltZW50MiBpcyBub3QgbWF0Y2hpbmcuAwkAAAIFBVdBVkVTBgkAAgECXVlvdSBBdHRhY2hlZCBXQVZFUyBBc3NldCBJRCBmb3IgTGlzdGluZywgcGxlYXNlIGF0dGFjaCBUb2tlbnMgWW91IHdhbnQgdG8gbGlzdCBpbiBwYXltZW50WzJdLgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgICCFBhaXJfVVZfBQxFbnRlckFzc2V0SUQFDEVudGVyQXNzZXRJRAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAgxMaXN0aW5nX0ZlZV8FDEVudGVyQXNzZXRJRAgFBHBtdDEGYW1vdW50CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFEUNvbGxlY3RGZWVBZGRyZXNzCAUEcG10MQZhbW91bnQFBHVuaXQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAgFBHBtdDEGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQIBQRwbXQyBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAhNUb3RhbF9vZl9QYWlyX1R4bnNfBQxFbnRlckFzc2V0SUQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAhlUb3RhbF9Td2FwX0ZlZV9Db2xsZWN0ZWRfBQxFbnRlckFzc2V0SUQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCkAwEJAQljb3VudGRheXMAAgtfRGF5X1ZvbHVtZQAACQDMCAIFB0xQaXNzdWUJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICAgNMUF8FDEVudGVyQXNzZXRJRAkA2AQBBQRMUGlkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEBQdnZXRTcXJ0BQNuaWwBaQEMSXNzdWVMUFRva2VuAQxFbnRlckFzc2V0SUQEC2FkbWlucmlnaHRzCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwIPTFBfQWRtaW5fUmlnaHRzAlBMUCBBZG1pbiBSaWdodHMgYXJlIE5vdCBJbmNsdWRlZCBpbnRvIFNtYXJ0IENvbnRyYWN0LiBEZXBsb3kgQWRtaW4gUmlnaHRzIEZpcnN0LgQNY2FsbGVyYWRkcmVzcwkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBBljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90CQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEAiRBc3NldCBub3QgRm91bmQgaW4gV2hpdGVsaXN0ZWQgVG9rZW4EBGluZm8JARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBCQDZBAEFDEVudGVyQXNzZXRJRAkArAICCQCsAgICBkFzc2V0IAUMRW50ZXJBc3NldElEAg4gZG9lc24ndCBleGlzdAQEbmFtZQgFBGluZm8EbmFtZQQIZGVjaW1hbHMIBQRpbmZvCGRlY2ltYWxzBApGaXJzdExQUXR5CQBoAgABCQBsBgAKAAAJAGsDCQBkAgUIZGVjaW1hbHMABgABAAIAAAAABQdDRUlMSU5HBAdMUGlzc3VlCQDCCAUJAKwCAgkArAICAgNMUC0JAK8CAgUEbmFtZQAIAgQtWFROCQCsAgIJAKwCAgkArAICCQCsAgICA0xQLQUEbmFtZQIELVhUTgIuIGlzIGEgTGlxdWlkaXR5IFByb3ZpZGVyIFRva2VuIElzc3VlZCBBZ2FpbnN0IAUMRW50ZXJBc3NldElEBQpGaXJzdExQUXR5CQBrAwkAZAIFCGRlY2ltYWxzAAYAAQACBgQETFBpZAkAuAgBBQdMUGlzc3VlAwkBAiE9AgULYWRtaW5yaWdodHMFDWNhbGxlcmFkZHJlc3MJAAIBCQCsAgIJAKwCAgIuWW91ciBhcmUgbm90IGFsbG93ZGVkIHRvIElzc3VlIExQIFRva2VuLiBPbmx5IAULYWRtaW5yaWdodHMCGCBjYW4gaXNzdWUgdGhlIExQIFRva2VuLgMJAQIhPQIFGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QFDEVudGVyQXNzZXRJRAkAAgECHlBhaXIgaXMgbm90IGF2YWlsYWJsZSBpbiBMaXN0LgkAzAgCBQdMUGlzc3VlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgIDTFBfBQxFbnRlckFzc2V0SUQJANgEAQUETFBpZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAglUb3RhbF9MUF8FDEVudGVyQXNzZXRJRAUKRmlyc3RMUFF0eQUDbmlsAWkBF1N3YXBBc3NldFRvWFROUGFpckVudHJ5AQxFbnRlckFzc2V0SUQEDWNhbGxlcmFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQDcG10AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAkQMCCAUBaQhwYXltZW50cwAACQACAQI1V2hpdGVsaXN0ZWQgVG9rZW4gaXMgcmVxdWlyZWQgYXMgQXR0YWNoZWQgcGF5bWVudFsxXS4EGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBA9DaGVja1hUTkJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAQRQ2hlY2tBc3NldEJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAQPbmV3YmFsYW5jZW9mWFROCQBrAwUPQ2hlY2tYVE5CYWxhbmNlBRFDaGVja0Fzc2V0QmFsYW5jZQkAZAIFEUNoZWNrQXNzZXRCYWxhbmNlCAUDcG10BmFtb3VudAQUcXVhbnRpdHlvZnByaWNlYXNzZXQJAGUCBQ9DaGVja1hUTkJhbGFuY2UFD25ld2JhbGFuY2VvZlhUTgQHU3dhcEZlZQADBBBTd2FwRmVldG9yZWNlaXZlCQBpAgkAaAIFFHF1YW50aXR5b2ZwcmljZWFzc2V0BQdTd2FwRmVlAOgHBBR1c2VyYmFsYW5jZXRvcmVjZWl2ZQkAZQIJAGUCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUQU3dhcEZlZXRvcmVjZWl2ZQUQU3dhcEZlZXRvcmVjZWl2ZQQYU3VtdXBvZkFzc2V0VG9YVE5Td2FwRmVlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICGVRvdGFsX1N3YXBfRmVlX0NvbGxlY3RlZF8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBtOZXdTdW11cG9mQXNzZXRUb1hUTlN3YXBGZWUJAGQCCQBkAgUYU3VtdXBvZkFzc2V0VG9YVE5Td2FwRmVlBRBTd2FwRmVldG9yZWNlaXZlBRBTd2FwRmVldG9yZWNlaXZlBBFTdW11cEFzc2V0QmFsYW5jZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEFk5ld1N1bXVwb2ZBc3NldEJhbGFuY2UJAGQCBRFDaGVja0Fzc2V0QmFsYW5jZQgFA3BtdAZhbW91bnQED1N1bXVwWFROQmFsYW5jZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEFE5ld1N1bXVwb2ZYVE5CYWxhbmNlCQBkAgkAZQIFD0NoZWNrWFROQmFsYW5jZQUUcXVhbnRpdHlvZnByaWNlYXNzZXQFEFN3YXBGZWV0b3JlY2VpdmUEBFRPUFQEByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgITVG90YWxfb2ZfUGFpcl9UeG5zXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABAZOZXdUUFQJAGQCBQRUT1BUAAEDCQAAAgUMRW50ZXJBc3NldElECQDYBAEFClhUTkFzc2V0SUQJAAIBAoUBSW5wdXQgY2FuIE5ldmVyIGJlIGEgWFROIEFzc2V0SUQuIEVudGVyIFdoaXRlbGlzdGVkIEFzc2V0SUQgaW4gaW5wdXQgJiBBdHRhY2ggV2hpdGVsaXN0ZWQgQXNzZXQgYXMgYW4gYXR0YWNobWVudCBUb2tlbiBpbiBwYXltZW50WzFdLgMJAQIhPQIFGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QFDEVudGVyQXNzZXRJRAkAAgECK1BhaXIgaXMgbm90IGF2YWlsYWJsZSBpbiBXaGl0ZWxpc3RlZCBBc3NldC4DCQAAAggFA3BtdAdhc3NldElkBQpYVE5Bc3NldElECQACAQJSWW91IGNhbid0IEF0dGFjaCBYVE4gYXMgYW4gQXR0YWNoZWQgUGF5bWVudC4gT25seSBXaGl0ZWxpc3RlZCBUb2tlbnMgYXJlIGFjY2VwdGVkLgMJAQIhPQIIBQNwbXQHYXNzZXRJZAkA2QQBBQxFbnRlckFzc2V0SUQJAAIBCQCsAgICMEluY29ycmVjdCBhc3NldCBhdHRhY2hlZCwgcGxlYXNlIGF0dGFjaCBvciBzZW5kIAUMRW50ZXJBc3NldElEAwkAAAIFD0NoZWNrWFROQmFsYW5jZQAACQACAQJlU3dhcCBQYWlyIE5lZWQgdG8gQWRkIExpcXVpZGl0eSBmaXJzdCBpbnRvIFBvb2wuIE9ubHkgQWZ0ZXIgdGhhdCBQYWlyIHdpbGwgYmUgYWN0aXZhdGVkIGZvciBTd2FwcGluZy4DCQAAAgURQ2hlY2tBc3NldEJhbGFuY2UAAAkAAgECZVN3YXAgUGFpciBOZWVkIHRvIEFkZCBMaXF1aWRpdHkgZmlyc3QgaW50byBQb29sLiBPbmx5IEFmdGVyIHRoYXQgUGFpciB3aWxsIGJlIGFjdGl2YXRlZCBmb3IgU3dhcHBpbmcuAwkAZgIAoI0GBRRxdWFudGl0eW9mcHJpY2Vhc3NldAkAAgEJAKwCAgkArAICAjRZb3VyIEF0dGFjaGVkIEFzc2V0IEFtb3VudCBpcyB2ZXJ5IGxvdy4gQXR0YWNoIE1vcmUgBQxFbnRlckFzc2V0SUQCOiBUb2tlbnMgdG8gQ2xhaW0gdGhlIG1pbmltdW0gQW1vdW50IG9mIDAuMSBkb2xsYXIgYXRsZWFzdC4DCQBmAgUUcXVhbnRpdHlvZnByaWNlYXNzZXQFD0NoZWNrWFROQmFsYW5jZQkAAgEJAKwCAgkArAICAh1Qb29sIE9ubHkgaGFzIGEgTGlxdWlkaXR5IG9mIAkApAMBCQBpAgUPQ2hlY2tYVE5CYWxhbmNlCQBsBgAKAAAABgAAAAAFB0NFSUxJTkcCHiBYVE4uIEFkZCBMaXF1aWRpdHkgaW50byBQb29sLgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQFG05ld1N1bXVwb2ZBc3NldFRvWFROU3dhcEZlZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAhNUb3RhbF9vZl9QYWlyX1R4bnNfBQxFbnRlckFzc2V0SUQFBk5ld1RQVAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBRZOZXdTdW11cG9mQXNzZXRCYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQFFE5ld1N1bXVwb2ZYVE5CYWxhbmNlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUUdXNlcmJhbGFuY2V0b3JlY2VpdmUFClhUTkFzc2V0SUQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwURQ29sbGVjdEZlZUFkZHJlc3MFEFN3YXBGZWV0b3JlY2VpdmUFClhUTkFzc2V0SUQFA25pbAFpARdTd2FwWFROVG9Bc3NldFBhaXJFbnRyeQEMRW50ZXJBc3NldElEBA1jYWxsZXJhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEA3BtdAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAJEDAggFAWkIcGF5bWVudHMAAAkAAgEJAKwCAgkArAICAgVPbmx5IAkA2AQBBQpYVE5Bc3NldElEAjEgWFROIFRva2VuIGlzIHJlcXVpcmVkIGFzIGFuIEF0dGFjaGVkIHBheW1lbnRbMV0uBA9DaGVja1hUTkJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAQRQ2hlY2tBc3NldEJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAQRbmV3YmFsYW5jZW9mQXNzZXQJAGsDBQ9DaGVja1hUTkJhbGFuY2UFEUNoZWNrQXNzZXRCYWxhbmNlCQBkAgUPQ2hlY2tYVE5CYWxhbmNlCAUDcG10BmFtb3VudAQUcXVhbnRpdHlvZnByaWNlYXNzZXQJAGUCBRFDaGVja0Fzc2V0QmFsYW5jZQURbmV3YmFsYW5jZW9mQXNzZXQEGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBAdTd2FwRmVlAAMEEFN3YXBGZWV0b3JlY2VpdmUJAGkCCQBoAgUUcXVhbnRpdHlvZnByaWNlYXNzZXQFB1N3YXBGZWUA6AcEFHVzZXJiYWxhbmNldG9yZWNlaXZlCQBlAgkAZQIFFHF1YW50aXR5b2ZwcmljZWFzc2V0BRBTd2FwRmVldG9yZWNlaXZlBRBTd2FwRmVldG9yZWNlaXZlBBhTdW11cG9mWFROVG9Bc3NldFN3YXBGZWUEByRtYXRjaDAJAJoIAgUEdGhpcwkArAICAhlUb3RhbF9Td2FwX0ZlZV9Db2xsZWN0ZWRfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEG05ld1N1bXVwb2ZYVE5Ub0Fzc2V0U3dhcEZlZQkAZAIJAGQCBRhTdW11cG9mWFROVG9Bc3NldFN3YXBGZWUFEFN3YXBGZWV0b3JlY2VpdmUFEFN3YXBGZWV0b3JlY2VpdmUEEVN1bXVwQXNzZXRCYWxhbmNlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQWTmV3U3VtdXBvZkFzc2V0QmFsYW5jZQkAZAIJAGUCBRFDaGVja0Fzc2V0QmFsYW5jZQUUcXVhbnRpdHlvZnByaWNlYXNzZXQFEFN3YXBGZWV0b3JlY2VpdmUED1N1bXVwWFROQmFsYW5jZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEFE5ld1N1bXVwb2ZYVE5CYWxhbmNlCQBkAgUPQ2hlY2tYVE5CYWxhbmNlCAUDcG10BmFtb3VudAQEVE9QVAQHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICAhNUb3RhbF9vZl9QYWlyX1R4bnNfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEBk5ld1RQVAkAZAIFBFRPUFQAAQMJAQIhPQIFGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QFDEVudGVyQXNzZXRJRAkAAgECK1BhaXIgaXMgbm90IGF2YWlsYWJsZSBpbiBXaGl0ZWxpc3RlZCBBc3NldC4DCQAAAgUMRW50ZXJBc3NldElECQDYBAEFClhUTkFzc2V0SUQJAAIBAndJbnB1dCBjYW4gTmV2ZXIgYmUgYSBYVE4gQXNzZXRJRC4gRW50ZXIgV2hpdGVsaXN0ZWQgQXNzZXRJRCBpbiBpbnB1dCAmIEF0dGFjaCBYVE4gYXMgYW4gYXR0YWNobWVudCBUb2tlbiBpbiBwYXltZW50WzFdLgMJAQIhPQIIBQNwbXQHYXNzZXRJZAUKWFROQXNzZXRJRAkAAgECe1lvdSBjYW4gQXR0YWNoIFhUTiBhcyBhbiBBdHRhY2hlZCBQYXltZW50WzFdIHRvIFN3YXAgWFROIFRvIFJlcXVpcmVkIFRva2VuLiBBbnkgb3RoZXIgYXNzZXQgZWxzZSB0aGFuIFhUTiB3aWxsIGJlIHJlamVjdGVkLgMJAGYCAKCNBggFA3BtdAZhbW91bnQJAAIBAllZb3VyIEF0dGFjaGVkIFhUTiBBbW91bnQgaXMgdmVyeSBsb3cuIEF0dGFjaCBBdGxlYXN0IDAuMSBYVE4gdG8gQ2xhaW0gdGhlIG1pbmltdW0gVG9rZW5zLgMJAAACBQ9DaGVja1hUTkJhbGFuY2UAAAkAAgECZVN3YXAgUGFpciBOZWVkIHRvIEFkZCBMaXF1aWRpdHkgZmlyc3QgaW50byBQb29sLiBPbmx5IEFmdGVyIHRoYXQgUGFpciB3aWxsIGJlIGFjdGl2YXRlZCBmb3IgU3dhcHBpbmcuAwkAAAIFEUNoZWNrQXNzZXRCYWxhbmNlAAAJAAIBAmVTd2FwIFBhaXIgTmVlZCB0byBBZGQgTGlxdWlkaXR5IGZpcnN0IGludG8gUG9vbC4gT25seSBBZnRlciB0aGF0IFBhaXIgd2lsbCBiZSBhY3RpdmF0ZWQgZm9yIFN3YXBwaW5nLgMJAGYCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAURQ2hlY2tBc3NldEJhbGFuY2UJAAIBCQCsAgIJAKwCAgIdUG9vbCBPbmx5IGhhcyBhIExpcXVpZGl0eSBvZiAJAKQDAQURQ2hlY2tBc3NldEJhbGFuY2UCISBUb2tlbnMuIEFkZCBMaXF1aWRpdHkgaW50byBQb29sLgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAhlUb3RhbF9Td2FwX0ZlZV9Db2xsZWN0ZWRfBQxFbnRlckFzc2V0SUQFG05ld1N1bXVwb2ZYVE5Ub0Fzc2V0U3dhcEZlZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAhNUb3RhbF9vZl9QYWlyX1R4bnNfBQxFbnRlckFzc2V0SUQFBk5ld1RQVAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBRZOZXdTdW11cG9mQXNzZXRCYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQFFE5ld1N1bXVwb2ZYVE5CYWxhbmNlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUUdXNlcmJhbGFuY2V0b3JlY2VpdmUJANkEAQUMRW50ZXJBc3NldElECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFEUNvbGxlY3RGZWVBZGRyZXNzBRBTd2FwRmVldG9yZWNlaXZlCQDZBAEFDEVudGVyQXNzZXRJRAUDbmlsAWkBDEFkZExpcXVpZGl0eQEMRW50ZXJBc3NldElEBA1jYWxsZXJhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEBHBtdDEJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQEcG10MgkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwABBBljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90CQCdCAIFBHRoaXMJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAQOUmVpc3N1ZWFzc2V0SWQJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgIDTFBfBQxFbnRlckFzc2V0SUQCLExQIFRva2VuIGlzIE1pc3Npbmcgb3IgTWF5IGJlIG5vdCBHZW5lcmF0ZWQuBA9DaGVja1hUTkJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAQRQ2hlY2tBc3NldEJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAQMZGVjaW1hbHNpbmZvCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQxFbnRlckFzc2V0SUQJAKwCAgkArAICAgZBc3NldCAFDEVudGVyQXNzZXRJRAIOIGRvZXNuJ3QgZXhpc3QECGRlY2ltYWxzCAUMZGVjaW1hbHNpbmZvCGRlY2ltYWxzBARhcmcxBQ9DaGVja1hUTkJhbGFuY2UEBGFyZzIFEUNoZWNrQXNzZXRCYWxhbmNlBAVhcmdzMwkAbAYJAGgCCQBpAgkAaAIFBGFyZzEAwIQ9BQRhcmcyCQBsBgAKAAAFCGRlY2ltYWxzAAAAAAUHQ0VJTElORwAAAAEAAAAABQdDRUlMSU5HBBJib3RoYXNzZXRzZGVjaW1hbHMJAGQCAAYFCGRlY2ltYWxzBA1zaGFyZWRlY2ltYWxzCQBpAgUSYm90aGFzc2V0c2RlY2ltYWxzAAIEFnF1YW50aXR5b2ZFbnRlckFzc2V0SUQJAGsDBQVhcmdzMwgFBHBtdDEGYW1vdW50CQBsBgAKAAAFEmJvdGhhc3NldHNkZWNpbWFscwAAAAAFB0NFSUxJTkcEEnF1YW50aXR5b2ZMUFRva2VuMQkAbAYJAGgCCQBrAwgFBHBtdDEGYW1vdW50AAEJAGwGAAoAAAUIZGVjaW1hbHMAAAAABQdDRUlMSU5HCQBrAwgFBHBtdDIGYW1vdW50AAEJAGwGAAoAAAAGAAAAAAUHQ0VJTElORwAAAAUAAQUNc2hhcmVkZWNpbWFscwUERE9XTgQQWFROSG9sZGluZ0luUGFpcgQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEE05ld1hUTkhvbGRpbmdJblBhaXIJAGQCBRBYVE5Ib2xkaW5nSW5QYWlyCAUEcG10MgZhbW91bnQEEkFzc2V0SG9sZGluZ0luUGFpcgQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEFU5ld0Fzc2V0SG9sZGluZ0luUGFpcgkAZAIFEkFzc2V0SG9sZGluZ0luUGFpcggFBHBtdDEGYW1vdW50BA1MUFRva2VuSXNzdWVkBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBBOZXdMUFRva2VuSXNzdWVkCQBkAgUNTFBUb2tlbklzc3VlZAUScXVhbnRpdHlvZkxQVG9rZW4xAwkBAiE9AgUZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAUMRW50ZXJBc3NldElECQACAQIrUGFpciBpcyBub3QgYXZhaWxhYmxlIGluIFdoaXRlbGlzdGVkIEFzc2V0LgMJAAACBQxFbnRlckFzc2V0SUQJANgEAQUKWFROQXNzZXRJRAkAAgECkAFJbnB1dCBjYW4gTmV2ZXIgYmUgYSBYVE4gQXNzZXRJRC4gRW50ZXIgV2hpdGVsaXN0ZWQgQXNzZXRJRCBpbiBpbnB1dCBhcyB3ZWxsIGFzIGluIHBheW1lbnRbMV0gJiBBdHRhY2ggWFROIGFzIGFuIGF0dGFjaG1lbnQgVG9rZW4gaW4gcGF5bWVudFsyXS4DCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAIJAAIBAp0BVHdvIGF0dGFjaGVkIGFzc2V0cyBleHBlY3RlZCBhcyBwYXltZW50IGluIDUwJS01MCUuIEtpbmRseSBBdHRhY2ggcGF5bWVudDEgPSBUb2tlbiB5b3Ugd2FudCB0byBhZGQgZm9yIExpcXVpZGl0eSAmIHBheW1lbnQyID0gRXF1aXZhbGVudCBBbW91bnQgb2YgWFROIFRva2VuLgMJAAACCAUEcG10MQdhc3NldElkBQpYVE5Bc3NldElECQACAQJ2WW91IEF0dGFjaGVkIFhUTiBhc3NldCBpbiBwYXltZW50WzFdLCBwbGVhc2UgYXR0YWNoIG9ubHkgd2hpdGVsaXN0ZWQgVG9rZW4gaW4gcGF5bWVudFsxXSBhbG9uZyB3aXRoIFhUTiBpbiBwYXltZW50WzJdLgMJAQIhPQIIBQRwbXQxB2Fzc2V0SWQJANkEAQUMRW50ZXJBc3NldElECQACAQJrSW5jb3JyZWN0IGFzc2V0IGF0dGFjaGVkIGZvciBMaXF1aWRpdHkgaW4gcGF5bWVudFsxXSwgcGxlYXNlIGF0dGFjaCBTdHJpbmcgQXNzZXQgb3IgV2hpdGVsaXN0ZWQgVG9rZW4gb25seS4DCQECIT0CCAUEcG10MQdhc3NldElkCQDZBAEFDEVudGVyQXNzZXRJRAkAAgECa0luY29ycmVjdCBhc3NldCBhdHRhY2hlZCBmb3IgTGlxdWlkaXR5IGluIHBheW1lbnRbMV0sIHBsZWFzZSBhdHRhY2ggU3RyaW5nIEFzc2V0IG9yIFdoaXRlbGlzdGVkIFRva2VuIG9ubHkuAwkBAiE9AggFBHBtdDIHYXNzZXRJZAUKWFROQXNzZXRJRAkAAgECaVdyb25nIEFzc2V0IEF0dGFjaGVkIGluIHBheW1lbnRzWzJdLCBQbGVhc2UgYXR0YWNoIHBheW1lbnRbMV0gPSBMaXF1aWRpdHkgVG9rZW4gJiBwYXltZW50WzJdID0gWFROIFRva2VuLgMJAGYCAMCWsQIIBQRwbXQyBmFtb3VudAkAAgECU3BsZWFzZSBhdHRhY2ggYXRsZWFzdCA1IFhUTiBpbiBwYXltZW50WzJdICYgRXF1aXZhbGVudCB3b3J0aCBvZiBUb2tlbiBpbiBwYXltZW50WzFdAwkBAiE9AggFBHBtdDIGYW1vdW50BRZxdWFudGl0eW9mRW50ZXJBc3NldElECQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgJeQXR0YWNoZWQgcGF5bWVudFsyXSBxdHkgaXMgbm90IG1hdGNoaW5nIGFzIHBlciBhdHRhY2hlZCBwYXltZW50WzFdLnBheW1lbnRbMl0gbXVzdCBiZSBhcyBpbnQgWwkApAMBBRZxdWFudGl0eW9mRW50ZXJBc3NldElEAgVdIG9yIAkApAMBCQBrAwUWcXVhbnRpdHlvZkVudGVyQXNzZXRJRAABAMCEPQIBLgkAsgICCQCkAwEFFnF1YW50aXR5b2ZFbnRlckFzc2V0SUQABgIFIFhUTi4DCQBmAgABBRJxdWFudGl0eW9mTFBUb2tlbjEJAAIBCQCsAgIJAKwCAgIgTFAgVG9rZW4gT3V0Y29tZSBpcyBnb2luZyBiZWxvdyAJAKQDAQUNc2hhcmVkZWNpbWFscwI6IERlY2ltYWxzLiBQbGVhc2UgQXR0YWNoIG1pbi4gMSBMUCB0b2tlbiBvciA1IFhUTiBBdGxlYXN0LgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBRNOZXdYVE5Ib2xkaW5nSW5QYWlyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQFFU5ld0Fzc2V0SG9sZGluZ0luUGFpcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAglUb3RhbF9MUF8FDEVudGVyQXNzZXRJRAUQTmV3TFBUb2tlbklzc3VlZAkAzAgCCQEHUmVpc3N1ZQMFDlJlaXNzdWVhc3NldElkBRJxdWFudGl0eW9mTFBUb2tlbjEGCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUScXVhbnRpdHlvZkxQVG9rZW4xBQ5SZWlzc3VlYXNzZXRJZAUDbmlsAWkBD1JlbW92ZUxpcXVpZGl0eQEMRW50ZXJBc3NldElEBA1jYWxsZXJhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEA3BtdAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAJEDAggFAWkIcGF5bWVudHMAAAkAAgECOk5vIHBheW1lbnQgYXR0YWNoZWQsIFBsZWFzZSBBdHRhY2ggTFAgVG9rZW4gYXMgcGF5bWVudFsxXS4EGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBBJSZWlzc3VlYWJsZWFzc2V0SWQJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgIDTFBfBQxFbnRlckFzc2V0SUQCJUxQIFRva2VuIGlzIE1pc3Npbmcgb3Igbm90IEdlbmVyYXRlZC4EDGRlY2ltYWxzaW5mbwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUMRW50ZXJBc3NldElECQCsAgIJAKwCAgIGQXNzZXQgBQxFbnRlckFzc2V0SUQCDiBkb2Vzbid0IGV4aXN0BAhkZWNpbWFscwgFDGRlY2ltYWxzaW5mbwhkZWNpbWFscwQSYm90aGFzc2V0c2RlY2ltYWxzCQBkAgAGBQhkZWNpbWFscwQNc2hhcmVkZWNpbWFscwkAaQIFEmJvdGhhc3NldHNkZWNpbWFscwACBBJDaGVja1RvdGFsTFBBbW91bnQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQEEFVzZXJMUFBlcmNlbnRhZ2UJAGwGCQBrAwgFA3BtdAZhbW91bnQJAGwGAAoAAAAIAAAAAAUHQ0VJTElORwUSQ2hlY2tUb3RhbExQQW1vdW50AAYAAQAAAAYFB0NFSUxJTkcED0NoZWNrWFROQmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBBFDaGVja0Fzc2V0QmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBA5Vc2VyTFBXb3J0aFhUTgkAawMFD0NoZWNrWFROQmFsYW5jZQUQVXNlckxQUGVyY2VudGFnZQkAbAYACgAAAAgAAAAABQdDRUlMSU5HBBBVc2VyTFBXb3J0aEFzc2V0CQBrAwURQ2hlY2tBc3NldEJhbGFuY2UFEFVzZXJMUFBlcmNlbnRhZ2UJAGwGAAoAAAAIAAAAAAUHQ0VJTElORwQQWFROSG9sZGluZ0luUGFpcgQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEE05ld1hUTkhvbGRpbmdJblBhaXIJAGUCBRBYVE5Ib2xkaW5nSW5QYWlyBQ5Vc2VyTFBXb3J0aFhUTgQSQXNzZXRIb2xkaW5nSW5QYWlyBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQVTmV3QXNzZXRIb2xkaW5nSW5QYWlyCQBlAgUSQXNzZXRIb2xkaW5nSW5QYWlyBRBVc2VyTFBXb3J0aEFzc2V0BA1MUFRva2VuSXNzdWVkBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBBOZXdMUFRva2VuSXNzdWVkCQBlAgUNTFBUb2tlbklzc3VlZAgFA3BtdAZhbW91bnQDCQECIT0CBRljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90BQxFbnRlckFzc2V0SUQJAAIBAiNQYWlyIGlzIG5vdCBhdmFpbGFibGUgaW4gV2hpdGVsaXN0LgMJAAACCQDZBAEFDEVudGVyQXNzZXRJRAUKWFROQXNzZXRJRAkAAgECakRvbid0IGNob29zZSBYVE4gQXNzZXRJRCBhcyBJbnB1dCwgT25seSBXaGl0ZWxpc3RlZCBBc3NldCBhcyBJbnB1dCBTdHJpbmcgJiBBdHRhY2ggTFAgVG9rZW5zIGFzIHBheW1lbnRbMV0DCQECIT0CCAUDcG10B2Fzc2V0SWQFElJlaXNzdWVhYmxlYXNzZXRJZAkAAgECR1dyb25nIEFzc2V0IGlzIGF0dGFjaGVkIGluIHBheW1lbnRbMV0gb3IgTFAgVG9rZW4gTm90IEZvdW5kIG9yIE1pc3NpbmcuAwkAZgIAAQUQVXNlckxQUGVyY2VudGFnZQkAAgECLllvdXIgTFAgVG9rZW4gYW1vdW50ICUgaXMgdmVyeSBsb3cgdG8gY29udmVydC4DCQBmAgABBQ5Vc2VyTFBXb3J0aFhUTgkAAgECUVlvdXIgTFAgVG9rZW4gY29udmVyc2lvbiBhbW91bnQgaXMgdmVyeSBsb3cgdG8gY29udmVydCBvciBsZXNzIHRoYW4gMC4wMDAwMDEgWFROLgMJAGYCAAEFEFVzZXJMUFdvcnRoQXNzZXQJAAIBAlxZb3VyIExQIFRva2VuIGNvbnZlcnNpb24gYW1vdW50IGlzIHZlcnkgbG93IHRvIGNvbnZlcnQgb3IgbGVzcyB0aGFuIGZyYWN0aW9uIHZhbHVlIG9mIFRva2VuLgkAzAgCCQEMSW50ZWdlckVudHJ5AgIWV2l0aGRyYXdfTFBfUGVyY2VudGFnZQUQVXNlckxQUGVyY2VudGFnZQkAzAgCCQEEQnVybgIFElJlaXNzdWVhYmxlYXNzZXRJZAgFA3BtdAZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQFEE5ld0xQVG9rZW5Jc3N1ZWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAUTTmV3WFROSG9sZGluZ0luUGFpcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBRVOZXdBc3NldEhvbGRpbmdJblBhaXIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQ5Vc2VyTFBXb3J0aFhUTgUKWFROQXNzZXRJRAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFEFVzZXJMUFdvcnRoQXNzZXQJANkEAQUMRW50ZXJBc3NldElEBQNuaWwBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5y01aGA==",
    "height": 2762388,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 57ncCXwhqgcktkwvbhpwiSdjqbGovShFHd8rnwWYXzD
Next: i7Nyvbq33FpALiVub1MFC1d8S4ZQ2VsoTqFoyNr8dY1

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

Old	New		Differences
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let dAppSinceStart = 1695040080000
5	5
6		-	let ~~USDCAssetID~~ = base58'5bXgvADuVoFdhtF5uKZAEiVdAo7ZCWw151L4yyf1PiES'
	6	+	let XTNAssetID = base58'5bXgvADuVoFdhtF5uKZAEiVdAo7ZCWw151L4yyf1PiES'
7	7
8	8		let CollectFeeAddress = addressFromPublicKey(base58'6Z73KxcX3sugpiStpSRXxKxTmWqCaLVwFeM6kwyiKVDR')
9	9

27	27		let decimals = info.decimals
28	28		let LPdecimals = fraction((decimals + 6), 1, 2)
29	29		let FirstLPQty = (1 * pow(10, 0, LPdecimals, 0, 0, CEILING))
30		-	let LPissue = Issue((("LP-" + take(name, 8)) + "-USDC"), (((("LP-" + name) + "-USDC") + " is a Liquidity Provider Token Issued Against ") + EnterAssetID), FirstLPQty, LPdecimals, true)
	30	+	let multiply_amounts = fraction(pmt1.amount, pmt2.amount, FirstLPQty)
	31	+	let getSqrt = sqrt(multiply_amounts, LPdecimals, LPdecimals, CEILING)
	32	+	let LPissue = Issue((("LP-" + take(name, 8)) + "-XTN"), (((("LP-" + name) + "-XTN") + " is a Liquidity Provider Token Issued Against ") + EnterAssetID), getSqrt, LPdecimals, true)
31	33		let LPid = calculateAssetId(LPissue)
32	34		if ((fetchpair == EnterAssetID))
33	35		then throw("Pair Already Exist in List.")
34	36		else if ((size(i.payments) != 2))
35	37		then throw("Two attached assets expected as payment. Kindly Attach payment1 = WAVES Token & payment2 = Token you want to List.")
36		-	else if (~~isDefined~~(pmt1.assetId))
37		-	then throw("Incorrect asset attached for Collateral, please attach ~~WAVES~~ only.")
	38	+	else if ((pmt1.assetId != XTNAssetID))
	39	+	then throw("Incorrect asset attached for Collateral, please attach XTN only.")
38	40		else if ((pmt1.amount != 10000000))
39	41		then throw((((("You attached only " + toString(fraction(pmt1.amount, 1, 100000000))) + ".") + toString(fraction(pmt1.amount, 1, 10000000))) + " WAVES for Listing in payment[1], please attach 10 WAVES."))
40	42		else if ((pmt2.assetId != assetinfopmt2))
41	43		then throw("Input String & Attached AssetID in payment2 is not matching.")
42	44		else if ((WAVES == true))
43	45		then throw("You Attached WAVES Asset ID for Listing, please attach Tokens You want to list in payment[2].")
44		-	else [StringEntry(("Pair_UV_" + EnterAssetID), EnterAssetID), IntegerEntry(("Listing_Fee_" + EnterAssetID), pmt1.amount), ScriptTransfer(CollectFeeAddress, pmt1.amount, unit), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~)), pmt1.amount), IntegerEntry(((("Balance_of_" + toBase58String(~~USDCAssetID~~)) + "_") + EnterAssetID), pmt2.amount), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), 0), IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~)), 0), IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), 0), IntegerEntry((toString(countdays()) + "_Day_Volume"), 0), LPissue, StringEntry(("LP_" + EnterAssetID), toBase58String(LPid)), IntegerEntry(("Total_LP_" + EnterAssetID), ~~FirstLPQty~~)]
	46	+	else [StringEntry(("Pair_UV_" + EnterAssetID), EnterAssetID), IntegerEntry(("Listing_Fee_" + EnterAssetID), pmt1.amount), ScriptTransfer(CollectFeeAddress, pmt1.amount, unit), 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), IntegerEntry((toString(countdays()) + "_Day_Volume"), 0), LPissue, StringEntry(("LP_" + EnterAssetID), toBase58String(LPid)), IntegerEntry(("Total_LP_" + EnterAssetID), getSqrt)]
45	47		}
46	48
47	49

55	57		let name = info.name
56	58		let decimals = info.decimals
57	59		let FirstLPQty = (1 * pow(10, 0, fraction((decimals + 6), 1, 2), 0, 0, CEILING))
58		-	let LPissue = Issue((("LP-" + take(name, 8)) + "-~~USDC~~"), (((("LP-" + name) + "-~~USDC~~") + " is a Liquidity Provider Token Issued Against ") + EnterAssetID), FirstLPQty, fraction((decimals + 6), 1, 2), true)
	60	+	let LPissue = Issue((("LP-" + take(name, 8)) + "-XTN"), (((("LP-" + name) + "-XTN") + " is a Liquidity Provider Token Issued Against ") + EnterAssetID), FirstLPQty, fraction((decimals + 6), 1, 2), true)
59	61		let LPid = calculateAssetId(LPissue)
60	62		if ((adminrights != calleraddress))
61	63		then throw((("Your are not allowded to Issue LP Token. Only " + adminrights) + " can issue the LP Token."))

67	69
68	70
69	71		@Callable(i)
70		-	func ~~SwapAssetToUSDCPairEntry~~ (EnterAssetID) = {
	72	+	func SwapAssetToXTNPairEntry (EnterAssetID) = {
71	73		let calleraddress = toBase58String(i.caller.bytes)
72	74		let pmt = if ((size(i.payments) == 1))
73	75		then i.payments[0]
74	76		else throw("Whitelisted Token is required as Attached payment[1].")
75	77		let checkpairisavailableornot = getString(this, ("Pair_UV_" + EnterAssetID))
76		-	let ~~CheckUSDCBalance~~ = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~)))
77		-	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(~~USDCAssetID~~)) + "_") + EnterAssetID))
78		-	let ~~newbalanceofUSDC~~ = fraction(~~CheckUSDCBalance~~, CheckAssetBalance, (CheckAssetBalance + pmt.amount))
79		-	let quantityofpriceasset = (~~CheckUSDCBalance - newbalanceofUSDC~~)
	78	+	let CheckXTNBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)))
	79	+	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID))
	80	+	let newbalanceofXTN = fraction(CheckXTNBalance, CheckAssetBalance, (CheckAssetBalance + pmt.amount))
	81	+	let quantityofpriceasset = (CheckXTNBalance - newbalanceofXTN)
80	82		let SwapFee = 3
81	83		let SwapFeetoreceive = ((quantityofpriceasset * SwapFee) / 1000)
82	84		let userbalancetoreceive = ((quantityofpriceasset - SwapFeetoreceive) - SwapFeetoreceive)
83		-	let ~~SumupofAssetToUSDCSwapFee~~ = match getInteger(this, ((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~))) {
	85	+	let SumupofAssetToXTNSwapFee = match getInteger(this, ((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
84	86		case a: Int =>
85	87		a
86	88		case _ =>
87	89		0
88	90		}
89		-	let ~~NewSumupofAssetToUSDCSwapFee~~ = ((~~SumupofAssetToUSDCSwapFee~~ + SwapFeetoreceive) + SwapFeetoreceive)
90		-	let SumupAssetBalance = match getInteger(this, ((("Balance_of_" + toBase58String(~~USDCAssetID~~)) + "_") + EnterAssetID)) {
	91	+	let NewSumupofAssetToXTNSwapFee = ((SumupofAssetToXTNSwapFee + SwapFeetoreceive) + SwapFeetoreceive)
	92	+	let SumupAssetBalance = match getInteger(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID)) {
91	93		case a: Int =>
92	94		a
93	95		case _ =>
94	96		0
95	97		}
96	98		let NewSumupofAssetBalance = (CheckAssetBalance + pmt.amount)
97		-	let ~~SumupUSDCBalance~~ = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~))) {
	99	+	let SumupXTNBalance = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
98	100		case a: Int =>
99	101		a
100	102		case _ =>
101	103		0
102	104		}
103		-	let ~~NewSumupofUSDCBalance~~ = ((~~CheckUSDCBalance~~ - quantityofpriceasset) + SwapFeetoreceive)
	105	+	let NewSumupofXTNBalance = ((CheckXTNBalance - quantityofpriceasset) + SwapFeetoreceive)
104	106		let TOPT = match getIntegerValue(this, ("Total_of_Pair_Txns_" + EnterAssetID)) {
105	107		case a: Int =>
106	108		a

108	110		0
109	111		}
110	112		let NewTPT = (TOPT + 1)
111		-	if ((EnterAssetID == toBase58String(~~USDCAssetID~~)))
112		-	then throw("Input can Never be a ~~USDC~~ AssetID. Enter Whitelisted AssetID in input & Attach Whitelisted Asset as an attachment Token in payment[1].")
	113	+	if ((EnterAssetID == toBase58String(XTNAssetID)))
	114	+	then throw("Input can Never be a XTN AssetID. Enter Whitelisted AssetID in input & Attach Whitelisted Asset as an attachment Token in payment[1].")
113	115		else if ((checkpairisavailableornot != EnterAssetID))
114	116		then throw("Pair is not available in Whitelisted Asset.")
115		-	else if ((pmt.assetId == ~~USDCAssetID~~))
116		-	then throw("You can't Attach ~~USDC~~ as an Attached Payment. Only Whitelisted Tokens are accepted.")
	117	+	else if ((pmt.assetId == XTNAssetID))
	118	+	then throw("You can't Attach XTN as an Attached Payment. Only Whitelisted Tokens are accepted.")
117	119		else if ((pmt.assetId != fromBase58String(EnterAssetID)))
118	120		then throw(("Incorrect asset attached, please attach or send " + EnterAssetID))
119		-	else if ((~~CheckUSDCBalance~~ == 0))
	121	+	else if ((CheckXTNBalance == 0))
120	122		then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
121	123		else if ((CheckAssetBalance == 0))
122	124		then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
123	125		else if ((100000 > quantityofpriceasset))
124	126		then throw((("Your Attached Asset Amount is very low. Attach More " + EnterAssetID) + " Tokens to Claim the minimum Amount of 0.1 dollar atleast."))
125		-	else if ((quantityofpriceasset > ~~CheckUSDCBalance~~))
126		-	then throw((("Pool Only has a Liquidity of " + toString((~~CheckUSDCBalance~~ / pow(10, 0, 6, 0, 0, CEILING)))) + " ~~USDC~~. Add Liquidity into Pool."))
127		-	else [IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~)), ~~NewSumupofAssetToUSDCSwapFee~~), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(~~USDCAssetID~~)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~)), ~~NewSumupofUSDCBalance~~), ScriptTransfer(i.caller, userbalancetoreceive, ~~USDCAssetID~~), ScriptTransfer(CollectFeeAddress, SwapFeetoreceive, ~~USDCAssetID~~)]
	127	+	else if ((quantityofpriceasset > CheckXTNBalance))
	128	+	then throw((("Pool Only has a Liquidity of " + toString((CheckXTNBalance / pow(10, 0, 6, 0, 0, CEILING)))) + " XTN. Add Liquidity into Pool."))
	129	+	else [IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofAssetToXTNSwapFee), 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(CollectFeeAddress, SwapFeetoreceive, XTNAssetID)]
128	130		}
129	131
130	132
131	133
132	134		@Callable(i)
133		-	func ~~SwapUSDCToAssetPairEntry~~ (EnterAssetID) = {
	135	+	func SwapXTNToAssetPairEntry (EnterAssetID) = {
134	136		let calleraddress = toBase58String(i.caller.bytes)
135	137		let pmt = if ((size(i.payments) == 1))
136	138		then i.payments[0]
137		-	else throw((("Only " + toBase58String(~~USDCAssetID~~)) + " ~~USDC~~ Token is required as an Attached payment[1]."))
138		-	let ~~CheckUSDCBalance~~ = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~)))
139		-	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(~~USDCAssetID~~)) + "_") + EnterAssetID))
140		-	let newbalanceofAsset = fraction(~~CheckUSDCBalance~~, CheckAssetBalance, (~~CheckUSDCBalance~~ + pmt.amount))
	139	+	else throw((("Only " + toBase58String(XTNAssetID)) + " XTN Token is required as an Attached payment[1]."))
	140	+	let CheckXTNBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)))
	141	+	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID))
	142	+	let newbalanceofAsset = fraction(CheckXTNBalance, CheckAssetBalance, (CheckXTNBalance + pmt.amount))
141	143		let quantityofpriceasset = (CheckAssetBalance - newbalanceofAsset)
142	144		let checkpairisavailableornot = getString(this, ("Pair_UV_" + EnterAssetID))
143	145		let SwapFee = 3
144	146		let SwapFeetoreceive = ((quantityofpriceasset * SwapFee) / 1000)
145	147		let userbalancetoreceive = ((quantityofpriceasset - SwapFeetoreceive) - SwapFeetoreceive)
146		-	let ~~SumupofUSDCToAssetSwapFee~~ = match getInteger(this, ("Total_Swap_Fee_Collected_" + EnterAssetID)) {
	148	+	let SumupofXTNToAssetSwapFee = match getInteger(this, ("Total_Swap_Fee_Collected_" + EnterAssetID)) {
147	149		case a: Int =>
148	150		a
149	151		case _ =>
150	152		0
151	153		}
152		-	let ~~NewSumupofUSDCToAssetSwapFee~~ = ((~~SumupofUSDCToAssetSwapFee~~ + SwapFeetoreceive) + SwapFeetoreceive)
153		-	let SumupAssetBalance = match getInteger(this, ((("Balance_of_" + toBase58String(~~USDCAssetID~~)) + "_") + EnterAssetID)) {
	154	+	let NewSumupofXTNToAssetSwapFee = ((SumupofXTNToAssetSwapFee + SwapFeetoreceive) + SwapFeetoreceive)
	155	+	let SumupAssetBalance = match getInteger(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID)) {
154	156		case a: Int =>
155	157		a
156	158		case _ =>
157	159		0
158	160		}
159	161		let NewSumupofAssetBalance = ((CheckAssetBalance - quantityofpriceasset) + SwapFeetoreceive)
160		-	let ~~SumupUSDCBalance~~ = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~))) {
	162	+	let SumupXTNBalance = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
161	163		case a: Int =>
162	164		a
163	165		case _ =>
164	166		0
165	167		}
166		-	let ~~NewSumupofUSDCBalance~~ = (~~CheckUSDCBalance~~ + pmt.amount)
	168	+	let NewSumupofXTNBalance = (CheckXTNBalance + pmt.amount)
167	169		let TOPT = match getIntegerValue(this, ("Total_of_Pair_Txns_" + EnterAssetID)) {
168	170		case a: Int =>
169	171		a

173	175		let NewTPT = (TOPT + 1)
174	176		if ((checkpairisavailableornot != EnterAssetID))
175	177		then throw("Pair is not available in Whitelisted Asset.")
176		-	else if ((EnterAssetID == toBase58String(~~USDCAssetID~~)))
177		-	then throw("Input can Never be a ~~USDC~~ AssetID. Enter Whitelisted AssetID in input & Attach ~~USDC~~ as an attachment Token in payment[1].")
178		-	else if ((pmt.assetId != ~~USDCAssetID~~))
179		-	then throw("You can Attach ~~USDC~~ as an Attached Payment[1] to Swap ~~USDC~~ To Required Token. Any other asset else than ~~USDC~~ will be rejected.")
	178	+	else if ((EnterAssetID == toBase58String(XTNAssetID)))
	179	+	then throw("Input can Never be a XTN AssetID. Enter Whitelisted AssetID in input & Attach XTN as an attachment Token in payment[1].")
	180	+	else if ((pmt.assetId != XTNAssetID))
	181	+	then throw("You can Attach XTN as an Attached Payment[1] to Swap XTN To Required Token. Any other asset else than XTN will be rejected.")
180	182		else if ((100000 > pmt.amount))
181		-	then throw("Your Attached ~~USDC~~ Amount is very low. Attach Atleast 0.1 ~~USDC~~ to Claim the minimum Tokens.")
182		-	else if ((~~CheckUSDCBalance~~ == 0))
	183	+	then throw("Your Attached XTN Amount is very low. Attach Atleast 0.1 XTN to Claim the minimum Tokens.")
	184	+	else if ((CheckXTNBalance == 0))
183	185		then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
184	186		else if ((CheckAssetBalance == 0))
185	187		then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
186	188		else if ((quantityofpriceasset > CheckAssetBalance))
187	189		then throw((("Pool Only has a Liquidity of " + toString(CheckAssetBalance)) + " Tokens. Add Liquidity into Pool."))
188		-	else [IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), ~~NewSumupofUSDCToAssetSwapFee~~), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(~~USDCAssetID~~)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~)), ~~NewSumupofUSDCBalance~~), ScriptTransfer(i.caller, userbalancetoreceive, fromBase58String(EnterAssetID)), ScriptTransfer(CollectFeeAddress, SwapFeetoreceive, fromBase58String(EnterAssetID))]
	190	+	else [IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), NewSumupofXTNToAssetSwapFee), 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(CollectFeeAddress, SwapFeetoreceive, fromBase58String(EnterAssetID))]
189	191		}
190	192
191	193

197	199		let pmt2 = value(i.payments[1])
198	200		let checkpairisavailableornot = getString(this, ("Pair_UV_" + EnterAssetID))
199	201		let ReissueassetId = fromBase58String(valueOrErrorMessage(getString(this, ("LP_" + EnterAssetID)), "LP Token is Missing or May be not Generated."))
200		-	let ~~CheckUSDCBalance~~ = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~)))
201		-	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(~~USDCAssetID~~)) + "_") + EnterAssetID))
	202	+	let CheckXTNBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)))
	203	+	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID))
202	204		let decimalsinfo = valueOrErrorMessage(assetInfo(fromBase58String(EnterAssetID)), (("Asset " + EnterAssetID) + " doesn't exist"))
203	205		let decimals = decimalsinfo.decimals
204		-	let arg1 = ~~CheckUSDCBalance~~
	206	+	let arg1 = CheckXTNBalance
205	207		let arg2 = CheckAssetBalance
206	208		let args3 = pow((((arg1 * 1000000) / arg2) * pow(10, 0, decimals, 0, 0, CEILING)), 0, 1, 0, 0, CEILING)
207	209		let bothassetsdecimals = (6 + decimals)
208	210		let sharedecimals = (bothassetsdecimals / 2)
209	211		let quantityofEnterAssetID = fraction(args3, pmt1.amount, pow(10, 0, bothassetsdecimals, 0, 0, CEILING))
210	212		let quantityofLPToken1 = pow((fraction(pmt1.amount, 1, pow(10, 0, decimals, 0, 0, CEILING)) * fraction(pmt2.amount, 1, pow(10, 0, 6, 0, 0, CEILING))), 0, 5, 1, sharedecimals, DOWN)
211		-	let ~~USDCHoldingInPair~~ = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~))) {
	213	+	let XTNHoldingInPair = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
212	214		case a: Int =>
213	215		a
214	216		case _ =>
215	217		0
216	218		}
217		-	let ~~NewUSDCHoldingInPair~~ = (~~USDCHoldingInPair~~ + pmt2.amount)
218		-	let AssetHoldingInPair = match getInteger(this, ((("Balance_of_" + toBase58String(~~USDCAssetID~~)) + "_") + EnterAssetID)) {
	219	+	let NewXTNHoldingInPair = (XTNHoldingInPair + pmt2.amount)
	220	+	let AssetHoldingInPair = match getInteger(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID)) {
219	221		case a: Int =>
220	222		a
221	223		case _ =>

231	233		let NewLPTokenIssued = (LPTokenIssued + quantityofLPToken1)
232	234		if ((checkpairisavailableornot != EnterAssetID))
233	235		then throw("Pair is not available in Whitelisted Asset.")
234		-	else if ((EnterAssetID == toBase58String(~~USDCAssetID~~)))
235		-	then throw("Input can Never be a ~~USDC~~ AssetID. Enter Whitelisted AssetID in input as well as in payment[1] & Attach ~~USDC~~ as an attachment Token in payment[2].")
	236	+	else if ((EnterAssetID == toBase58String(XTNAssetID)))
	237	+	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].")
236	238		else if ((size(i.payments) != 2))
237		-	then throw("Two attached assets expected as payment in 50%-50%. Kindly Attach payment1 = Token you want to add for Liquidity & payment2 = Equivalent Amount of ~~USDC~~ Token.")
238		-	else if ((pmt1.assetId == ~~USDCAssetID~~))
239		-	then throw("You Attached ~~USDC~~ asset in payment[1], please attach only whitelisted Token in payment[1] along with ~~USDC~~ in payment[2].")
	239	+	then throw("Two attached assets expected as payment in 50%-50%. Kindly Attach payment1 = Token you want to add for Liquidity & payment2 = Equivalent Amount of XTN Token.")
	240	+	else if ((pmt1.assetId == XTNAssetID))
	241	+	then throw("You Attached XTN asset in payment[1], please attach only whitelisted Token in payment[1] along with XTN in payment[2].")
240	242		else if ((pmt1.assetId != fromBase58String(EnterAssetID)))
241	243		then throw("Incorrect asset attached for Liquidity in payment[1], please attach String Asset or Whitelisted Token only.")
242	244		else if ((pmt1.assetId != fromBase58String(EnterAssetID)))
243	245		then throw("Incorrect asset attached for Liquidity in payment[1], please attach String Asset or Whitelisted Token only.")
244		-	else if ((pmt2.assetId != ~~USDCAssetID~~))
245		-	then throw("Wrong Asset Attached in payments[2], Please attach payment[1] = Liquidity Token & payment[2] = ~~USDC~~ Token.")
	246	+	else if ((pmt2.assetId != XTNAssetID))
	247	+	then throw("Wrong Asset Attached in payments[2], Please attach payment[1] = Liquidity Token & payment[2] = XTN Token.")
246	248		else if ((5000000 > pmt2.amount))
247		-	then throw("please attach atleast 5 ~~USDC~~ in payment[2] & Equivalent worth of Token in payment[1]")
	249	+	then throw("please attach atleast 5 XTN in payment[2] & Equivalent worth of Token in payment[1]")
248	250		else if ((pmt2.amount != quantityofEnterAssetID))
249		-	then throw((((((("Attached payment[2] qty is not matching as per attached payment[1].payment[2] must be as int [" + toString(quantityofEnterAssetID)) + "] or ") + toString(fraction(quantityofEnterAssetID, 1, 1000000))) + ".") + takeRight(toString(quantityofEnterAssetID), 6)) + " ~~USDC~~."))
	251	+	then throw((((((("Attached payment[2] qty is not matching as per attached payment[1].payment[2] must be as int [" + toString(quantityofEnterAssetID)) + "] or ") + toString(fraction(quantityofEnterAssetID, 1, 1000000))) + ".") + takeRight(toString(quantityofEnterAssetID), 6)) + " XTN."))
250	252		else if ((1 > quantityofLPToken1))
251		-	then throw((("LP Token Outcome is going below " + toString(sharedecimals)) + " Decimals. Please Attach min. 1 LP token or 5 ~~USDC~~ Atleast."))
252		-	else [IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~)), ~~NewUSDCHoldingInPair~~), IntegerEntry(((("Balance_of_" + toBase58String(~~USDCAssetID~~)) + "_") + EnterAssetID), NewAssetHoldingInPair), IntegerEntry(("Total_LP_" + EnterAssetID), NewLPTokenIssued), Reissue(ReissueassetId, quantityofLPToken1, true), ScriptTransfer(i.caller, quantityofLPToken1, ReissueassetId)]
	253	+	then throw((("LP Token Outcome is going below " + toString(sharedecimals)) + " Decimals. Please Attach min. 1 LP token or 5 XTN Atleast."))
	254	+	else [IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewXTNHoldingInPair), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewAssetHoldingInPair), IntegerEntry(("Total_LP_" + EnterAssetID), NewLPTokenIssued), Reissue(ReissueassetId, quantityofLPToken1, true), ScriptTransfer(i.caller, quantityofLPToken1, ReissueassetId)]
253	255		}
254	256
255	257

268	270		let sharedecimals = (bothassetsdecimals / 2)
269	271		let CheckTotalLPAmount = getIntegerValue(this, ("Total_LP_" + EnterAssetID))
270	272		let UserLPPercentage = pow(fraction(pmt.amount, pow(10, 0, 8, 0, 0, CEILING), CheckTotalLPAmount), 6, 1, 0, 6, CEILING)
271		-	let ~~CheckUSDCBalance~~ = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~)))
272		-	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(~~USDCAssetID~~)) + "_") + EnterAssetID))
273		-	let ~~UserLPWorthUSDC~~ = fraction(~~CheckUSDCBalance~~, UserLPPercentage, pow(10, 0, 8, 0, 0, CEILING))
	273	+	let CheckXTNBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)))
	274	+	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID))
	275	+	let UserLPWorthXTN = fraction(CheckXTNBalance, UserLPPercentage, pow(10, 0, 8, 0, 0, CEILING))
274	276		let UserLPWorthAsset = fraction(CheckAssetBalance, UserLPPercentage, pow(10, 0, 8, 0, 0, CEILING))
275		-	let ~~USDCHoldingInPair~~ = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~))) {
	277	+	let XTNHoldingInPair = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
276	278		case a: Int =>
277	279		a
278	280		case _ =>
279	281		0
280	282		}
281		-	let ~~NewUSDCHoldingInPair~~ = (~~USDCHoldingInPair - UserLPWorthUSDC~~)
282		-	let AssetHoldingInPair = match getInteger(this, ((("Balance_of_" + toBase58String(~~USDCAssetID~~)) + "_") + EnterAssetID)) {
	283	+	let NewXTNHoldingInPair = (XTNHoldingInPair - UserLPWorthXTN)
	284	+	let AssetHoldingInPair = match getInteger(this, ((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID)) {
283	285		case a: Int =>
284	286		a
285	287		case _ =>

295	297		let NewLPTokenIssued = (LPTokenIssued - pmt.amount)
296	298		if ((checkpairisavailableornot != EnterAssetID))
297	299		then throw("Pair is not available in Whitelist.")
298		-	else if ((fromBase58String(EnterAssetID) == ~~USDCAssetID~~))
299		-	then throw("Don't choose ~~USDC~~ AssetID as Input, Only Whitelisted Asset as Input String & Attach LP Tokens as payment[1]")
	300	+	else if ((fromBase58String(EnterAssetID) == XTNAssetID))
	301	+	then throw("Don't choose XTN AssetID as Input, Only Whitelisted Asset as Input String & Attach LP Tokens as payment[1]")
300	302		else if ((pmt.assetId != ReissueableassetId))
301	303		then throw("Wrong Asset is attached in payment[1] or LP Token Not Found or Missing.")
302	304		else if ((1 > UserLPPercentage))
303	305		then throw("Your LP Token amount % is very low to convert.")
304		-	else if ((1 > ~~UserLPWorthUSDC~~))
305		-	then throw("Your LP Token conversion amount is very low to convert or less than 0.000001 ~~USDC~~.")
	306	+	else if ((1 > UserLPWorthXTN))
	307	+	then throw("Your LP Token conversion amount is very low to convert or less than 0.000001 XTN.")
306	308		else if ((1 > UserLPWorthAsset))
307	309		then throw("Your LP Token conversion amount is very low to convert or less than fraction value of Token.")
308		-	else [IntegerEntry("Withdraw_LP_Percentage", UserLPPercentage), Burn(ReissueableassetId, pmt.amount), IntegerEntry(("Total_LP_" + EnterAssetID), NewLPTokenIssued), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(~~USDCAssetID~~)), ~~NewUSDCHoldingInPair~~), IntegerEntry(((("Balance_of_" + toBase58String(~~USDCAssetID~~)) + "_") + EnterAssetID), NewAssetHoldingInPair), ScriptTransfer(i.caller, ~~UserLPWorthUSDC~~, ~~USDCAssetID~~), ScriptTransfer(i.caller, UserLPWorthAsset, fromBase58String(EnterAssetID))]
	310	+	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))]
309	311		}
310		-
311		-
312		-
313		-	@Callable(i)
314		-	func Del (Key) = [DeleteEntry(Key)]
315	312
316	313
317	314		@Verifier(tx)

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

github/deemru/w8io/169f3d6 
114.58 ms ◑