w8 · tx · 9RM···yND

tx · 9RMqGaS7htDjdg9JHWteCNNSDJMnui3ALmSDPesFCyND

3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5:  -0.01900000 Waves

2023.09.24 09:15 [2769109] smart account 3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9RMqGaS7htDjdg9JHWteCNNSDJMnui3ALmSDPesFCyND",
    "fee": 1900000,
    "feeAssetId": null,
    "timestamp": 1695536150130,
    "version": 2,
    "chainId": 84,
    "sender": "3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5",
    "senderPublicKey": "2LmNyaN5YAXdg9C5vsXcTLU66hsW2KUNPsN7KcHBYhUo",
    "proofs": [
        "3XbSJ8qNRe9ujTFt8yam7Q7esGrSN9rMGVWS1zbTEaEk5XVH14UqNnuTdxKEfDki2PoRYg6bxnDzs5f6dkWoqQCC"
    ],
    "script": "base64:BgIgCAISAwoBCBIDCgEIEgMKAQgSAwoBCBIDCgEIEgMKAQgFAA5kQXBwU2luY2VTdGFydADA9/eMqjEAC2xpc3RpbmdfZmVlAIDO5M0CAApYVE5Bc3NldElEASAIZYS3D/CKahrz4mjoLgiQJMPTJ1gDzSz2Ll4L39oVpAARQ29sbGVjdEZlZUFkZHJlc3MJAKcIAQEgUoPZoIvXkJI7M+XgQERyG3Ox4PxeH5gdLMWeskjH4iABCWNvdW50ZGF5cwAEB1RTX0RpZmYJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUOZEFwcFNpbmNlU3RhcnQECWRheW51bWJlcgkAawMAAQUHVFNfRGlmZgCAuJkpBQlkYXludW1iZXIGAWkBDFJlZ2lzdGVyUGFpcgEMRW50ZXJBc3NldElEBARwbXQxCQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAEBHBtdDIJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAQQKY3VycmVudEtleQkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBAVXQVZFUwkBASEBCQEJaXNEZWZpbmVkAQgFBHBtdDIHYXNzZXRJZAQJZmV0Y2hwYWlyCQCdCAIFBHRoaXMJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAQNYXNzZXRpbmZvcG10MgkA2QQBBQxFbnRlckFzc2V0SUQECkN1cnJlbnRkYXkJAQljb3VudGRheXMABARpbmZvCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQxFbnRlckFzc2V0SUQJAKwCAgkArAICAgZBc3NldCAFDEVudGVyQXNzZXRJRAIOIGRvZXNuJ3QgZXhpc3QEBG5hbWUIBQRpbmZvBG5hbWUECGRlY2ltYWxzCAUEaW5mbwhkZWNpbWFscwQKTFBkZWNpbWFscwkAawMJAGQCBQhkZWNpbWFscwAGAAEAAgQKRmlyc3RMUFF0eQkAaAIAAQkAbAYACgAABQpMUGRlY2ltYWxzAAAAAAUHQ0VJTElORwQQbXVsdGlwbHlfYW1vdW50cwkAawMIBQRwbXQxBmFtb3VudAgFBHBtdDIGYW1vdW50BQpGaXJzdExQUXR5BAdnZXRTcXJ0CQEEc3FydAQFEG11bHRpcGx5X2Ftb3VudHMFCkxQZGVjaW1hbHMFCkxQZGVjaW1hbHMFB0NFSUxJTkcEB0xQaXNzdWUJAMIIBQkArAICCQCsAgICA0xQLQkArwICBQRuYW1lAAgCBC1YVE4JAKwCAgkArAICCQCsAgIJAKwCAgIDTFAtBQRuYW1lAgQtWFROAi4gaXMgYSBMaXF1aWRpdHkgUHJvdmlkZXIgVG9rZW4gSXNzdWVkIEFnYWluc3QgBQxFbnRlckFzc2V0SUQFB2dldFNxcnQFCkxQZGVjaW1hbHMGBARMUGlkCQC4CAEFB0xQaXNzdWUDCQAAAgUJZmV0Y2hwYWlyBQxFbnRlckFzc2V0SUQJAAIBAhtQYWlyIEFscmVhZHkgRXhpc3QgaW4gTGlzdC4DCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAMJAAIBCQCsAgIJAKwCAgJ+VHdvIGF0dGFjaGVkIGFzc2V0cyBleHBlY3RlZCBhcyBwYXltZW50LiBLaW5kbHkgQXR0YWNoIHBheW1lbnQxID0gWFROIFRva2VuICYgcGF5bWVudDIgPSBUb2tlbiB5b3Ugd2FudCB0byBMaXN0ICYgcGF5bWVudDMgPSBbCQCkAwEFC2xpc3RpbmdfZmVlAg0vMTBeOF0gV2F2ZXMuAwkBAiE9AggFBHBtdDEHYXNzZXRJZAUKWFROQXNzZXRJRAkAAgECP0luY29ycmVjdCBhc3NldCBhdHRhY2hlZCBhcyBwYXltZW50WzFdLCBwbGVhc2UgYXR0YWNoIFhUTiBvbmx5LgMJAGYCAKCNBggFBHBtdDEGYW1vdW50CQACAQJPQXR0YWNoZWQgcGF5bWVudFsxXSBhbW91bnQgaXMgbGVzcyB0aGFuIDAuMSBYVE4sIHBsZWFzZSBhdHRhY2ggMC4xIFhUTiBNaW5pbXVtLgMJAQIhPQIIBQRwbXQyB2Fzc2V0SWQFDWFzc2V0aW5mb3BtdDIJAAIBAjxJbnB1dCBTdHJpbmcgJiBBdHRhY2hlZCBBc3NldElEIGluIHBheW1lbnQyIGlzIG5vdCBtYXRjaGluZy4DCQAAAgUFV0FWRVMGCQACAQJdWW91IEF0dGFjaGVkIFdBVkVTIEFzc2V0IElEIGZvciBMaXN0aW5nLCBwbGVhc2UgYXR0YWNoIFRva2VucyBZb3Ugd2FudCB0byBsaXN0IGluIHBheW1lbnRbMl0uCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAUMRW50ZXJBc3NldElECQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICDExpc3RpbmdfRmVlXwUMRW50ZXJBc3NldElECAUEcG10MQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAgFBHBtdDEGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQIBQRwbXQyBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAhNUb3RhbF9vZl9QYWlyX1R4bnNfBQxFbnRlckFzc2V0SUQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAhlUb3RhbF9Td2FwX0ZlZV9Db2xsZWN0ZWRfBQxFbnRlckFzc2V0SUQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgkArAICCQCkAwEFCkN1cnJlbnRkYXkCDF9EYXlfVm9sdW1lXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQAAAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgkArAICCQCkAwEFCkN1cnJlbnRkYXkCDF9EYXlfVm9sdW1lXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQAAAkAzAgCBQdMUGlzc3VlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUHZ2V0U3FydAUETFBpZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgICA0xQXwUMRW50ZXJBc3NldElECQDYBAEFBExQaWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQFB2dldFNxcnQFA25pbAFpARdTd2FwQXNzZXRUb1hUTlBhaXJFbnRyeQEMRW50ZXJBc3NldElEBA1jYWxsZXJhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEA3BtdAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAJEDAggFAWkIcGF5bWVudHMAAAkAAgECNVdoaXRlbGlzdGVkIFRva2VuIGlzIHJlcXVpcmVkIGFzIEF0dGFjaGVkIHBheW1lbnRbMV0uBBljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90CQCdCAIFBHRoaXMJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAQPQ2hlY2tYVE5CYWxhbmNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQEEUNoZWNrQXNzZXRCYWxhbmNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQED25ld2JhbGFuY2VvZlhUTgkAawMFD0NoZWNrWFROQmFsYW5jZQURQ2hlY2tBc3NldEJhbGFuY2UJAGQCBRFDaGVja0Fzc2V0QmFsYW5jZQgFA3BtdAZhbW91bnQEFHF1YW50aXR5b2ZwcmljZWFzc2V0CQBlAgUPQ2hlY2tYVE5CYWxhbmNlBQ9uZXdiYWxhbmNlb2ZYVE4EB1N3YXBGZWUAAwQKQ3VycmVudGRheQkBCWNvdW50ZGF5cwAEEFN3YXBGZWV0b3JlY2VpdmUJAGkCCQBoAgUUcXVhbnRpdHlvZnByaWNlYXNzZXQFB1N3YXBGZWUA6AcEFHVzZXJiYWxhbmNldG9yZWNlaXZlCQBlAgkAZQIFFHF1YW50aXR5b2ZwcmljZWFzc2V0BRBTd2FwRmVldG9yZWNlaXZlBRBTd2FwRmVldG9yZWNlaXZlBBhTdW11cG9mQXNzZXRUb1hUTlN3YXBGZWUEByRtYXRjaDAJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEG05ld1N1bXVwb2ZBc3NldFRvWFROU3dhcEZlZQkAZAIJAGQCBRhTdW11cG9mQXNzZXRUb1hUTlN3YXBGZWUFEFN3YXBGZWV0b3JlY2VpdmUFEFN3YXBGZWV0b3JlY2VpdmUEEVN1bXVwQXNzZXRCYWxhbmNlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQWTmV3U3VtdXBvZkFzc2V0QmFsYW5jZQkAZAIFEUNoZWNrQXNzZXRCYWxhbmNlCAUDcG10BmFtb3VudAQPU3VtdXBYVE5CYWxhbmNlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQUTmV3U3VtdXBvZlhUTkJhbGFuY2UJAGQCCQBlAgUPQ2hlY2tYVE5CYWxhbmNlBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUQU3dhcEZlZXRvcmVjZWl2ZQQEVE9QVAQHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICAhNUb3RhbF9vZl9QYWlyX1R4bnNfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEBk5ld1RQVAkAZAIFBFRPUFQAAQMJAAACBQxFbnRlckFzc2V0SUQJANgEAQUKWFROQXNzZXRJRAkAAgEChQFJbnB1dCBjYW4gTmV2ZXIgYmUgYSBYVE4gQXNzZXRJRC4gRW50ZXIgV2hpdGVsaXN0ZWQgQXNzZXRJRCBpbiBpbnB1dCAmIEF0dGFjaCBXaGl0ZWxpc3RlZCBBc3NldCBhcyBhbiBhdHRhY2htZW50IFRva2VuIGluIHBheW1lbnRbMV0uAwkBAiE9AgUZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAUMRW50ZXJBc3NldElECQACAQIrUGFpciBpcyBub3QgYXZhaWxhYmxlIGluIFdoaXRlbGlzdGVkIEFzc2V0LgMJAAACCAUDcG10B2Fzc2V0SWQFClhUTkFzc2V0SUQJAAIBAlJZb3UgY2FuJ3QgQXR0YWNoIFhUTiBhcyBhbiBBdHRhY2hlZCBQYXltZW50LiBPbmx5IFdoaXRlbGlzdGVkIFRva2VucyBhcmUgYWNjZXB0ZWQuAwkBAiE9AggFA3BtdAdhc3NldElkCQDZBAEFDEVudGVyQXNzZXRJRAkAAgEJAKwCAgIwSW5jb3JyZWN0IGFzc2V0IGF0dGFjaGVkLCBwbGVhc2UgYXR0YWNoIG9yIHNlbmQgBQxFbnRlckFzc2V0SUQDCQAAAgUPQ2hlY2tYVE5CYWxhbmNlAAAJAAIBAmVTd2FwIFBhaXIgTmVlZCB0byBBZGQgTGlxdWlkaXR5IGZpcnN0IGludG8gUG9vbC4gT25seSBBZnRlciB0aGF0IFBhaXIgd2lsbCBiZSBhY3RpdmF0ZWQgZm9yIFN3YXBwaW5nLgMJAAACBRFDaGVja0Fzc2V0QmFsYW5jZQAACQACAQJlU3dhcCBQYWlyIE5lZWQgdG8gQWRkIExpcXVpZGl0eSBmaXJzdCBpbnRvIFBvb2wuIE9ubHkgQWZ0ZXIgdGhhdCBQYWlyIHdpbGwgYmUgYWN0aXZhdGVkIGZvciBTd2FwcGluZy4DCQBmAgCgjQYFFHF1YW50aXR5b2ZwcmljZWFzc2V0CQACAQkArAICCQCsAgICNFlvdXIgQXR0YWNoZWQgQXNzZXQgQW1vdW50IGlzIHZlcnkgbG93LiBBdHRhY2ggTW9yZSAFDEVudGVyQXNzZXRJRAI6IFRva2VucyB0byBDbGFpbSB0aGUgbWluaW11bSBBbW91bnQgb2YgMC4xIGRvbGxhciBhdGxlYXN0LgMJAGYCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUPQ2hlY2tYVE5CYWxhbmNlCQACAQkArAICCQCsAgICHVBvb2wgT25seSBoYXMgYSBMaXF1aWRpdHkgb2YgCQCkAwEJAGkCBQ9DaGVja1hUTkJhbGFuY2UJAGwGAAoAAAAGAAAAAAUHQ0VJTElORwIeIFhUTi4gQWRkIExpcXVpZGl0eSBpbnRvIFBvb2wuCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAhlUb3RhbF9Td2FwX0ZlZV9Db2xsZWN0ZWRfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAUbTmV3U3VtdXBvZkFzc2V0VG9YVE5Td2FwRmVlCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgtDdXJyZW50X0RheQUKQ3VycmVudGRheQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAhNUb3RhbF9vZl9QYWlyX1R4bnNfBQxFbnRlckFzc2V0SUQFBk5ld1RQVAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBRZOZXdTdW11cG9mQXNzZXRCYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQFFE5ld1N1bXVwb2ZYVE5CYWxhbmNlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUUdXNlcmJhbGFuY2V0b3JlY2VpdmUFClhUTkFzc2V0SUQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwURQ29sbGVjdEZlZUFkZHJlc3MFEFN3YXBGZWV0b3JlY2VpdmUFClhUTkFzc2V0SUQFA25pbAFpARdTd2FwWFROVG9Bc3NldFBhaXJFbnRyeQEMRW50ZXJBc3NldElEBA1jYWxsZXJhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEA3BtdAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAJEDAggFAWkIcGF5bWVudHMAAAkAAgEJAKwCAgkArAICAgVPbmx5IAkA2AQBBQpYVE5Bc3NldElEAjEgWFROIFRva2VuIGlzIHJlcXVpcmVkIGFzIGFuIEF0dGFjaGVkIHBheW1lbnRbMV0uBA9DaGVja1hUTkJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAQRQ2hlY2tBc3NldEJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAQRbmV3YmFsYW5jZW9mQXNzZXQJAGsDBQ9DaGVja1hUTkJhbGFuY2UFEUNoZWNrQXNzZXRCYWxhbmNlCQBkAgUPQ2hlY2tYVE5CYWxhbmNlCAUDcG10BmFtb3VudAQUcXVhbnRpdHlvZnByaWNlYXNzZXQJAGUCBRFDaGVja0Fzc2V0QmFsYW5jZQURbmV3YmFsYW5jZW9mQXNzZXQEGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBAdTd2FwRmVlAAMECkN1cnJlbnRkYXkJAQljb3VudGRheXMABBBTd2FwRmVldG9yZWNlaXZlCQBpAgkAaAIFFHF1YW50aXR5b2ZwcmljZWFzc2V0BQdTd2FwRmVlAOgHBBR1c2VyYmFsYW5jZXRvcmVjZWl2ZQkAZQIJAGUCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUQU3dhcEZlZXRvcmVjZWl2ZQUQU3dhcEZlZXRvcmVjZWl2ZQQYU3VtdXBvZlhUTlRvQXNzZXRTd2FwRmVlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBtOZXdTdW11cG9mWFROVG9Bc3NldFN3YXBGZWUJAGQCCQBkAgUYU3VtdXBvZlhUTlRvQXNzZXRTd2FwRmVlBRBTd2FwRmVldG9yZWNlaXZlBRBTd2FwRmVldG9yZWNlaXZlBBFTdW11cEFzc2V0QmFsYW5jZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEFk5ld1N1bXVwb2ZBc3NldEJhbGFuY2UJAGQCCQBlAgURQ2hlY2tBc3NldEJhbGFuY2UFFHF1YW50aXR5b2ZwcmljZWFzc2V0BRBTd2FwRmVldG9yZWNlaXZlBA9TdW11cFhUTkJhbGFuY2UEByRtYXRjaDAJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBROZXdTdW11cG9mWFROQmFsYW5jZQkAZAIFD0NoZWNrWFROQmFsYW5jZQgFA3BtdAZhbW91bnQEBFRPUFQEByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgITVG90YWxfb2ZfUGFpcl9UeG5zXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABAZOZXdUUFQJAGQCBQRUT1BUAAEDCQECIT0CBRljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90BQxFbnRlckFzc2V0SUQJAAIBAitQYWlyIGlzIG5vdCBhdmFpbGFibGUgaW4gV2hpdGVsaXN0ZWQgQXNzZXQuAwkAAAIFDEVudGVyQXNzZXRJRAkA2AQBBQpYVE5Bc3NldElECQACAQJ3SW5wdXQgY2FuIE5ldmVyIGJlIGEgWFROIEFzc2V0SUQuIEVudGVyIFdoaXRlbGlzdGVkIEFzc2V0SUQgaW4gaW5wdXQgJiBBdHRhY2ggWFROIGFzIGFuIGF0dGFjaG1lbnQgVG9rZW4gaW4gcGF5bWVudFsxXS4DCQECIT0CCAUDcG10B2Fzc2V0SWQFClhUTkFzc2V0SUQJAAIBAntZb3UgY2FuIEF0dGFjaCBYVE4gYXMgYW4gQXR0YWNoZWQgUGF5bWVudFsxXSB0byBTd2FwIFhUTiBUbyBSZXF1aXJlZCBUb2tlbi4gQW55IG90aGVyIGFzc2V0IGVsc2UgdGhhbiBYVE4gd2lsbCBiZSByZWplY3RlZC4DCQBmAgCgjQYIBQNwbXQGYW1vdW50CQACAQJZWW91ciBBdHRhY2hlZCBYVE4gQW1vdW50IGlzIHZlcnkgbG93LiBBdHRhY2ggQXRsZWFzdCAwLjEgWFROIHRvIENsYWltIHRoZSBtaW5pbXVtIFRva2Vucy4DCQAAAgUPQ2hlY2tYVE5CYWxhbmNlAAAJAAIBAmVTd2FwIFBhaXIgTmVlZCB0byBBZGQgTGlxdWlkaXR5IGZpcnN0IGludG8gUG9vbC4gT25seSBBZnRlciB0aGF0IFBhaXIgd2lsbCBiZSBhY3RpdmF0ZWQgZm9yIFN3YXBwaW5nLgMJAAACBRFDaGVja0Fzc2V0QmFsYW5jZQAACQACAQJlU3dhcCBQYWlyIE5lZWQgdG8gQWRkIExpcXVpZGl0eSBmaXJzdCBpbnRvIFBvb2wuIE9ubHkgQWZ0ZXIgdGhhdCBQYWlyIHdpbGwgYmUgYWN0aXZhdGVkIGZvciBTd2FwcGluZy4DCQBmAgUUcXVhbnRpdHlvZnByaWNlYXNzZXQFEUNoZWNrQXNzZXRCYWxhbmNlCQACAQkArAICCQCsAgICHVBvb2wgT25seSBoYXMgYSBMaXF1aWRpdHkgb2YgCQCkAwEFEUNoZWNrQXNzZXRCYWxhbmNlAiEgVG9rZW5zLiBBZGQgTGlxdWlkaXR5IGludG8gUG9vbC4JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEBRtOZXdTdW11cG9mWFROVG9Bc3NldFN3YXBGZWUJAMwIAgkBDEludGVnZXJFbnRyeQICC0N1cnJlbnRfRGF5BQpDdXJyZW50ZGF5CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICE1RvdGFsX29mX1BhaXJfVHhuc18FDEVudGVyQXNzZXRJRAUGTmV3VFBUCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQFFk5ld1N1bXVwb2ZBc3NldEJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAUUTmV3U3VtdXBvZlhUTkJhbGFuY2UJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBRR1c2VyYmFsYW5jZXRvcmVjZWl2ZQkA2QQBBQxFbnRlckFzc2V0SUQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwURQ29sbGVjdEZlZUFkZHJlc3MFEFN3YXBGZWV0b3JlY2VpdmUJANkEAQUMRW50ZXJBc3NldElEBQNuaWwBaQESTGF0ZXN0QWRkTGlxdWlkaXR5AQxFbnRlckFzc2V0SUQEDWNhbGxlcmFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQEcG10MQkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABARwbXQyCQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAEEGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBA5SZWlzc3VlYXNzZXRJZAkA2QQBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwkArAICAgNMUF8FDEVudGVyQXNzZXRJRAIsTFAgVG9rZW4gaXMgTWlzc2luZyBvciBNYXkgYmUgbm90IEdlbmVyYXRlZC4ED0NoZWNrWFROQmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBBFDaGVja0Fzc2V0QmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBAxkZWNpbWFsc2luZm8JARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBCQDZBAEFDEVudGVyQXNzZXRJRAkArAICCQCsAgICBkFzc2V0IAUMRW50ZXJBc3NldElEAg4gZG9lc24ndCBleGlzdAQIZGVjaW1hbHMIBQxkZWNpbWFsc2luZm8IZGVjaW1hbHMECkxQZGVjaW1hbHMJAGsDCQBkAgUIZGVjaW1hbHMABgABAAIECkZpcnN0TFBRdHkJAGgCAAEJAGwGAAoAAAUKTFBkZWNpbWFscwAAAAAFB0NFSUxJTkcEEG11bHRpcGx5X2Ftb3VudHMJAGsDCAUEcG10MQZhbW91bnQIBQRwbXQyBmFtb3VudAUKRmlyc3RMUFF0eQQHZ2V0U3FydAkBBHNxcnQEBRBtdWx0aXBseV9hbW91bnRzBQpMUGRlY2ltYWxzBQpMUGRlY2ltYWxzBQdDRUlMSU5HBBBYVE5Ib2xkaW5nSW5QYWlyBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQTTmV3WFROSG9sZGluZ0luUGFpcgkAZAIFEFhUTkhvbGRpbmdJblBhaXIIBQRwbXQyBmFtb3VudAQSQXNzZXRIb2xkaW5nSW5QYWlyBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQVTmV3QXNzZXRIb2xkaW5nSW5QYWlyCQBkAgUSQXNzZXRIb2xkaW5nSW5QYWlyCAUEcG10MQZhbW91bnQEDUxQVG9rZW5Jc3N1ZWQEByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEEE5ld0xQVG9rZW5Jc3N1ZWQJAGQCBQ1MUFRva2VuSXNzdWVkBQdnZXRTcXJ0AwkBAiE9AgUZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAUMRW50ZXJBc3NldElECQACAQIrUGFpciBpcyBub3QgYXZhaWxhYmxlIGluIFdoaXRlbGlzdGVkIEFzc2V0LgMJAAACBQxFbnRlckFzc2V0SUQJANgEAQUKWFROQXNzZXRJRAkAAgECkAFJbnB1dCBjYW4gTmV2ZXIgYmUgYSBYVE4gQXNzZXRJRC4gRW50ZXIgV2hpdGVsaXN0ZWQgQXNzZXRJRCBpbiBpbnB1dCBhcyB3ZWxsIGFzIGluIHBheW1lbnRbMV0gJiBBdHRhY2ggWFROIGFzIGFuIGF0dGFjaG1lbnQgVG9rZW4gaW4gcGF5bWVudFsyXS4DCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAIJAAIBAosBVHdvIGF0dGFjaGVkIGFzc2V0cyBhcmUgZXhwZWN0ZWQgaW4gcGF5bWVudC4gS2luZGx5IEF0dGFjaCBwYXltZW50MSA9IFRva2VuIHlvdSB3YW50IHRvIGFkZCBmb3IgTGlxdWlkaXR5ICYgcGF5bWVudDIgPSBBbW91bnQgb2YgWFROIFRva2VuLgMJAAACCAUEcG10MQdhc3NldElkBQpYVE5Bc3NldElECQACAQJ2WW91IEF0dGFjaGVkIFhUTiBhc3NldCBpbiBwYXltZW50WzFdLCBwbGVhc2UgYXR0YWNoIG9ubHkgd2hpdGVsaXN0ZWQgVG9rZW4gaW4gcGF5bWVudFsxXSBhbG9uZyB3aXRoIFhUTiBpbiBwYXltZW50WzJdLgMJAQIhPQIIBQRwbXQxB2Fzc2V0SWQJANkEAQUMRW50ZXJBc3NldElECQACAQJrSW5jb3JyZWN0IGFzc2V0IGF0dGFjaGVkIGZvciBMaXF1aWRpdHkgaW4gcGF5bWVudFsxXSwgcGxlYXNlIGF0dGFjaCBTdHJpbmcgQXNzZXQgb3IgV2hpdGVsaXN0ZWQgVG9rZW4gb25seS4DCQECIT0CCAUEcG10Mgdhc3NldElkBQpYVE5Bc3NldElECQACAQJpV3JvbmcgQXNzZXQgQXR0YWNoZWQgaW4gcGF5bWVudHNbMl0sIFBsZWFzZSBhdHRhY2ggcGF5bWVudFsxXSA9IExpcXVpZGl0eSBUb2tlbiAmIHBheW1lbnRbMl0gPSBYVE4gVG9rZW4uAwkAZgIAoI0GCAUEcG10MgZhbW91bnQJAAIBAlVwbGVhc2UgYXR0YWNoIGF0bGVhc3QgMC4xIFhUTiBpbiBwYXltZW50WzJdICYgRXF1aXZhbGVudCB3b3J0aCBvZiBUb2tlbiBpbiBwYXltZW50WzFdAwkAZgIAAQUHZ2V0U3FydAkAAgECS0xQIFRva2VuIE91dGNvbWUgaXMgZ29pbmcgYmVsb3cgMSBpbiBGcmFjdGlvbmFsLiBQbGVhc2UgQXR0YWNoIG1vcmUgYW1vdW50LgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBRNOZXdYVE5Ib2xkaW5nSW5QYWlyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQFFU5ld0Fzc2V0SG9sZGluZ0luUGFpcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAglUb3RhbF9MUF8FDEVudGVyQXNzZXRJRAUQTmV3TFBUb2tlbklzc3VlZAkAzAgCCQEHUmVpc3N1ZQMFDlJlaXNzdWVhc3NldElkBQdnZXRTcXJ0BgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFB2dldFNxcnQFDlJlaXNzdWVhc3NldElkBQNuaWwBaQEMQWRkTGlxdWlkaXR5AQxFbnRlckFzc2V0SUQEDWNhbGxlcmFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQEcG10MQkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABARwbXQyCQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAEEGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBA5SZWlzc3VlYXNzZXRJZAkA2QQBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwkArAICAgNMUF8FDEVudGVyQXNzZXRJRAIsTFAgVG9rZW4gaXMgTWlzc2luZyBvciBNYXkgYmUgbm90IEdlbmVyYXRlZC4ED0NoZWNrWFROQmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBBFDaGVja0Fzc2V0QmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBAxkZWNpbWFsc2luZm8JARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBCQDZBAEFDEVudGVyQXNzZXRJRAkArAICCQCsAgICBkFzc2V0IAUMRW50ZXJBc3NldElEAg4gZG9lc24ndCBleGlzdAQIZGVjaW1hbHMIBQxkZWNpbWFsc2luZm8IZGVjaW1hbHMEBGFyZzEFD0NoZWNrWFROQmFsYW5jZQQEYXJnMgURQ2hlY2tBc3NldEJhbGFuY2UEBWFyZ3MzCQBsBgkAaAIJAGkCCQBoAgUEYXJnMQDAhD0FBGFyZzIJAGwGAAoAAAUIZGVjaW1hbHMAAAAABQdDRUlMSU5HAAAAAQAAAAAFB0NFSUxJTkcEEmJvdGhhc3NldHNkZWNpbWFscwkAZAIABgUIZGVjaW1hbHMEDXNoYXJlZGVjaW1hbHMJAGkCBRJib3RoYXNzZXRzZGVjaW1hbHMAAgQWcXVhbnRpdHlvZkVudGVyQXNzZXRJRAkAawMFBWFyZ3MzCAUEcG10MQZhbW91bnQJAGwGAAoAAAUSYm90aGFzc2V0c2RlY2ltYWxzAAAAAAUHQ0VJTElORwQScXVhbnRpdHlvZkxQVG9rZW4xCQBsBgkAaAIJAGsDCAUEcG10MQZhbW91bnQAAQkAbAYACgAABQhkZWNpbWFscwAAAAAFB0NFSUxJTkcJAGsDCAUEcG10MgZhbW91bnQAAQkAbAYACgAAAAYAAAAABQdDRUlMSU5HAAAABQABBQ1zaGFyZWRlY2ltYWxzBQRET1dOBBBYVE5Ib2xkaW5nSW5QYWlyBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQTTmV3WFROSG9sZGluZ0luUGFpcgkAZAIFEFhUTkhvbGRpbmdJblBhaXIIBQRwbXQyBmFtb3VudAQSQXNzZXRIb2xkaW5nSW5QYWlyBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQVTmV3QXNzZXRIb2xkaW5nSW5QYWlyCQBkAgUSQXNzZXRIb2xkaW5nSW5QYWlyCAUEcG10MQZhbW91bnQEDUxQVG9rZW5Jc3N1ZWQEByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEEE5ld0xQVG9rZW5Jc3N1ZWQJAGQCBQ1MUFRva2VuSXNzdWVkBRJxdWFudGl0eW9mTFBUb2tlbjEDCQECIT0CBRljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90BQxFbnRlckFzc2V0SUQJAAIBAitQYWlyIGlzIG5vdCBhdmFpbGFibGUgaW4gV2hpdGVsaXN0ZWQgQXNzZXQuAwkAAAIFDEVudGVyQXNzZXRJRAkA2AQBBQpYVE5Bc3NldElECQACAQKQAUlucHV0IGNhbiBOZXZlciBiZSBhIFhUTiBBc3NldElELiBFbnRlciBXaGl0ZWxpc3RlZCBBc3NldElEIGluIGlucHV0IGFzIHdlbGwgYXMgaW4gcGF5bWVudFsxXSAmIEF0dGFjaCBYVE4gYXMgYW4gYXR0YWNobWVudCBUb2tlbiBpbiBwYXltZW50WzJdLgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAgkAAgECnQFUd28gYXR0YWNoZWQgYXNzZXRzIGV4cGVjdGVkIGFzIHBheW1lbnQgaW4gNTAlLTUwJS4gS2luZGx5IEF0dGFjaCBwYXltZW50MSA9IFRva2VuIHlvdSB3YW50IHRvIGFkZCBmb3IgTGlxdWlkaXR5ICYgcGF5bWVudDIgPSBFcXVpdmFsZW50IEFtb3VudCBvZiBYVE4gVG9rZW4uAwkAAAIIBQRwbXQxB2Fzc2V0SWQFClhUTkFzc2V0SUQJAAIBAnZZb3UgQXR0YWNoZWQgWFROIGFzc2V0IGluIHBheW1lbnRbMV0sIHBsZWFzZSBhdHRhY2ggb25seSB3aGl0ZWxpc3RlZCBUb2tlbiBpbiBwYXltZW50WzFdIGFsb25nIHdpdGggWFROIGluIHBheW1lbnRbMl0uAwkBAiE9AggFBHBtdDEHYXNzZXRJZAkA2QQBBQxFbnRlckFzc2V0SUQJAAIBAmtJbmNvcnJlY3QgYXNzZXQgYXR0YWNoZWQgZm9yIExpcXVpZGl0eSBpbiBwYXltZW50WzFdLCBwbGVhc2UgYXR0YWNoIFN0cmluZyBBc3NldCBvciBXaGl0ZWxpc3RlZCBUb2tlbiBvbmx5LgMJAQIhPQIIBQRwbXQyB2Fzc2V0SWQFClhUTkFzc2V0SUQJAAIBAmlXcm9uZyBBc3NldCBBdHRhY2hlZCBpbiBwYXltZW50c1syXSwgUGxlYXNlIGF0dGFjaCBwYXltZW50WzFdID0gTGlxdWlkaXR5IFRva2VuICYgcGF5bWVudFsyXSA9IFhUTiBUb2tlbi4DCQBmAgDAlrECCAUEcG10MgZhbW91bnQJAAIBAlNwbGVhc2UgYXR0YWNoIGF0bGVhc3QgNSBYVE4gaW4gcGF5bWVudFsyXSAmIEVxdWl2YWxlbnQgd29ydGggb2YgVG9rZW4gaW4gcGF5bWVudFsxXQMJAQIhPQIIBQRwbXQyBmFtb3VudAUWcXVhbnRpdHlvZkVudGVyQXNzZXRJRAkAAgEJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICXkF0dGFjaGVkIHBheW1lbnRbMl0gcXR5IGlzIG5vdCBtYXRjaGluZyBhcyBwZXIgYXR0YWNoZWQgcGF5bWVudFsxXS5wYXltZW50WzJdIG11c3QgYmUgYXMgaW50IFsJAKQDAQUWcXVhbnRpdHlvZkVudGVyQXNzZXRJRAIFXSBvciAJAKQDAQkAawMFFnF1YW50aXR5b2ZFbnRlckFzc2V0SUQAAQDAhD0CAS4JALICAgkApAMBBRZxdWFudGl0eW9mRW50ZXJBc3NldElEAAYCBSBYVE4uAwkAZgIAAQUScXVhbnRpdHlvZkxQVG9rZW4xCQACAQkArAICCQCsAgICIExQIFRva2VuIE91dGNvbWUgaXMgZ29pbmcgYmVsb3cgCQCkAwEFDXNoYXJlZGVjaW1hbHMCOiBEZWNpbWFscy4gUGxlYXNlIEF0dGFjaCBtaW4uIDEgTFAgdG9rZW4gb3IgNSBYVE4gQXRsZWFzdC4JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAUTTmV3WFROSG9sZGluZ0luUGFpcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBRVOZXdBc3NldEhvbGRpbmdJblBhaXIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQFEE5ld0xQVG9rZW5Jc3N1ZWQJAMwIAgkBB1JlaXNzdWUDBQ5SZWlzc3VlYXNzZXRJZAUScXVhbnRpdHlvZkxQVG9rZW4xBgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFEnF1YW50aXR5b2ZMUFRva2VuMQUOUmVpc3N1ZWFzc2V0SWQFA25pbAFpAQ9SZW1vdmVMaXF1aWRpdHkBDEVudGVyQXNzZXRJRAQNY2FsbGVyYWRkcmVzcwkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBANwbXQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABCQCRAwIIBQFpCHBheW1lbnRzAAAJAAIBAjpObyBwYXltZW50IGF0dGFjaGVkLCBQbGVhc2UgQXR0YWNoIExQIFRva2VuIGFzIHBheW1lbnRbMV0uBBljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90CQCdCAIFBHRoaXMJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAQSUmVpc3N1ZWFibGVhc3NldElkCQDZBAEJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAnQgCBQR0aGlzCQCsAgICA0xQXwUMRW50ZXJBc3NldElEAiVMUCBUb2tlbiBpcyBNaXNzaW5nIG9yIG5vdCBHZW5lcmF0ZWQuBAxkZWNpbWFsc2luZm8JARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBCQDZBAEFDEVudGVyQXNzZXRJRAkArAICCQCsAgICBkFzc2V0IAUMRW50ZXJBc3NldElEAg4gZG9lc24ndCBleGlzdAQIZGVjaW1hbHMIBQxkZWNpbWFsc2luZm8IZGVjaW1hbHMEEmJvdGhhc3NldHNkZWNpbWFscwkAZAIABgUIZGVjaW1hbHMEDXNoYXJlZGVjaW1hbHMJAGkCBRJib3RoYXNzZXRzZGVjaW1hbHMAAgQSQ2hlY2tUb3RhbExQQW1vdW50CQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEBBBVc2VyTFBQZXJjZW50YWdlCQBsBgkAawMIBQNwbXQGYW1vdW50CQBsBgAKAAAACAAAAAAFB0NFSUxJTkcFEkNoZWNrVG90YWxMUEFtb3VudAAGAAEAAAAGBQdDRUlMSU5HBA9DaGVja1hUTkJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAQRQ2hlY2tBc3NldEJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAQOVXNlckxQV29ydGhYVE4JAGsDBQ9DaGVja1hUTkJhbGFuY2UFEFVzZXJMUFBlcmNlbnRhZ2UJAGwGAAoAAAAIAAAAAAUHQ0VJTElORwQQVXNlckxQV29ydGhBc3NldAkAawMFEUNoZWNrQXNzZXRCYWxhbmNlBRBVc2VyTFBQZXJjZW50YWdlCQBsBgAKAAAACAAAAAAFB0NFSUxJTkcEEFhUTkhvbGRpbmdJblBhaXIEByRtYXRjaDAJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBNOZXdYVE5Ib2xkaW5nSW5QYWlyCQBlAgUQWFROSG9sZGluZ0luUGFpcgUOVXNlckxQV29ydGhYVE4EEkFzc2V0SG9sZGluZ0luUGFpcgQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEFU5ld0Fzc2V0SG9sZGluZ0luUGFpcgkAZQIFEkFzc2V0SG9sZGluZ0luUGFpcgUQVXNlckxQV29ydGhBc3NldAQNTFBUb2tlbklzc3VlZAQHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICAglUb3RhbF9MUF8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQQTmV3TFBUb2tlbklzc3VlZAkAZQIFDUxQVG9rZW5Jc3N1ZWQIBQNwbXQGYW1vdW50AwkBAiE9AgUZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAUMRW50ZXJBc3NldElECQACAQIjUGFpciBpcyBub3QgYXZhaWxhYmxlIGluIFdoaXRlbGlzdC4DCQAAAgkA2QQBBQxFbnRlckFzc2V0SUQFClhUTkFzc2V0SUQJAAIBAmpEb24ndCBjaG9vc2UgWFROIEFzc2V0SUQgYXMgSW5wdXQsIE9ubHkgV2hpdGVsaXN0ZWQgQXNzZXQgYXMgSW5wdXQgU3RyaW5nICYgQXR0YWNoIExQIFRva2VucyBhcyBwYXltZW50WzFdAwkBAiE9AggFA3BtdAdhc3NldElkBRJSZWlzc3VlYWJsZWFzc2V0SWQJAAIBAkdXcm9uZyBBc3NldCBpcyBhdHRhY2hlZCBpbiBwYXltZW50WzFdIG9yIExQIFRva2VuIE5vdCBGb3VuZCBvciBNaXNzaW5nLgMJAGYCAAEFEFVzZXJMUFBlcmNlbnRhZ2UJAAIBAi5Zb3VyIExQIFRva2VuIGFtb3VudCAlIGlzIHZlcnkgbG93IHRvIGNvbnZlcnQuAwkAZgIAAQUOVXNlckxQV29ydGhYVE4JAAIBAlFZb3VyIExQIFRva2VuIGNvbnZlcnNpb24gYW1vdW50IGlzIHZlcnkgbG93IHRvIGNvbnZlcnQgb3IgbGVzcyB0aGFuIDAuMDAwMDAxIFhUTi4DCQBmAgABBRBVc2VyTFBXb3J0aEFzc2V0CQACAQJcWW91ciBMUCBUb2tlbiBjb252ZXJzaW9uIGFtb3VudCBpcyB2ZXJ5IGxvdyB0byBjb252ZXJ0IG9yIGxlc3MgdGhhbiBmcmFjdGlvbiB2YWx1ZSBvZiBUb2tlbi4JAMwIAgkBDEludGVnZXJFbnRyeQICFldpdGhkcmF3X0xQX1BlcmNlbnRhZ2UFEFVzZXJMUFBlcmNlbnRhZ2UJAMwIAgkBBEJ1cm4CBRJSZWlzc3VlYWJsZWFzc2V0SWQIBQNwbXQGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEBRBOZXdMUFRva2VuSXNzdWVkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQFE05ld1hUTkhvbGRpbmdJblBhaXIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAUVTmV3QXNzZXRIb2xkaW5nSW5QYWlyCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUOVXNlckxQV29ydGhYVE4FClhUTkFzc2V0SUQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBRBVc2VyTFBXb3J0aEFzc2V0CQDZBAEFDEVudGVyQXNzZXRJRAUDbmlsAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleblWXL8=",
    "height": 2769109,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: EM67v1Yd5kDKBxs4gRj8dJ2tSu6Z7Stb372YYKwS9arn
Next: H1keRYgn5mT4JkTmph1Buy1mnNepLbqFqS9d5wo58h18

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

Old	New		Differences
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let dAppSinceStart = 1694928600000
	5	+
	6	+	let listing_fee = 700000000
5	7
6	8		let XTNAssetID = base58'Zn3cLHW7aAVPm5aACcTjvg7e7iEy2cKDtbowok5qa9H'
7	9

34	36		let LPid = calculateAssetId(LPissue)
35	37		if ((fetchpair == EnterAssetID))
36	38		then throw("Pair Already Exist in List.")
37		-	else if ((size(i.payments) != 2))
38		-	then throw("Two attached assets expected as payment. Kindly Attach payment1 = XTN Token & payment2 = Token you want to List.")
	39	+	else if ((size(i.payments) != 3))
	40	+	then throw((("Two attached assets expected as payment. Kindly Attach payment1 = XTN Token & payment2 = Token you want to List & payment3 = [" + toString(listing_fee)) + "/10^8] Waves."))
39	41		else if ((pmt1.assetId != XTNAssetID))
40	42		then throw("Incorrect asset attached as payment[1], please attach XTN only.")
41	43		else if ((100000 > pmt1.amount))

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

github/deemru/w8io/169f3d6 
57.74 ms ◑