w8 · tx · 3z8···N7D

tx · 3z8sdR9ciaTmCUsfmhEMJMjGpGctNEmPGtRittZ7UN7D

3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5:  -0.01800000 Waves

2023.09.20 11:05 [2763434] smart account 3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3z8sdR9ciaTmCUsfmhEMJMjGpGctNEmPGtRittZ7UN7D",
    "fee": 1800000,
    "feeAssetId": null,
    "timestamp": 1695197143605,
    "version": 2,
    "chainId": 84,
    "sender": "3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5",
    "senderPublicKey": "2LmNyaN5YAXdg9C5vsXcTLU66hsW2KUNPsN7KcHBYhUo",
    "proofs": [
        "4Gk1DZyWT52XDsp6BgSez2XAHzQ18DXDvKoksvr5vJCnHhGYivBeS6iZd8h4uMEwrJDF7uyMnJyfawSoUdQ5pwgc"
    ],
    "script": "base64:BgIgCAISAwoBCBIDCgEIEgMKAQgSAwoBCBIDCgEIEgMKAQgEAA5kQXBwU2luY2VTdGFydADA9/eMqjEAClhUTkFzc2V0SUQBIAhlhLcP8IpqGvPiaOguCJAkw9MnWAPNLPYuXgvf2hWkABFDb2xsZWN0RmVlQWRkcmVzcwkApwgBASBSg9mgi9eQkjsz5eBARHIbc7Hg/F4fmB0sxZ6ySMfiIAEJY291bnRkYXlzAAQHVFNfRGlmZgkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQ5kQXBwU2luY2VTdGFydAQJZGF5bnVtYmVyCQBrAwABBQdUU19EaWZmAIC4mSkFCWRheW51bWJlcgYBaQEMUmVnaXN0ZXJQYWlyAQxFbnRlckFzc2V0SUQEBHBtdDEJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQEcG10MgkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwABBApjdXJyZW50S2V5CQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEBVdBVkVTCQEBIQEJAQlpc0RlZmluZWQBCAUEcG10Mgdhc3NldElkBAlmZXRjaHBhaXIJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBA1hc3NldGluZm9wbXQyCQDZBAEFDEVudGVyQXNzZXRJRAQEaW5mbwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUMRW50ZXJBc3NldElECQCsAgIJAKwCAgIGQXNzZXQgBQxFbnRlckFzc2V0SUQCDiBkb2Vzbid0IGV4aXN0BARuYW1lCAUEaW5mbwRuYW1lBAhkZWNpbWFscwgFBGluZm8IZGVjaW1hbHMECkxQZGVjaW1hbHMJAGsDCQBkAgUIZGVjaW1hbHMABgABAAIECkZpcnN0TFBRdHkJAGgCAAEJAGwGAAoAAAUKTFBkZWNpbWFscwAAAAAFB0NFSUxJTkcEEG11bHRpcGx5X2Ftb3VudHMJAGsDCAUEcG10MQZhbW91bnQIBQRwbXQyBmFtb3VudAUKRmlyc3RMUFF0eQQHZ2V0U3FydAkBBHNxcnQEBRBtdWx0aXBseV9hbW91bnRzBQpMUGRlY2ltYWxzBQpMUGRlY2ltYWxzBQdDRUlMSU5HBAdMUGlzc3VlCQDCCAUJAKwCAgkArAICAgNMUC0JAK8CAgUEbmFtZQAIAgQtWFROCQCsAgIJAKwCAgkArAICCQCsAgICA0xQLQUEbmFtZQIELVhUTgIuIGlzIGEgTGlxdWlkaXR5IFByb3ZpZGVyIFRva2VuIElzc3VlZCBBZ2FpbnN0IAUMRW50ZXJBc3NldElEBQdnZXRTcXJ0BQpMUGRlY2ltYWxzBgQETFBpZAkAuAgBBQdMUGlzc3VlAwkAAAIFCWZldGNocGFpcgUMRW50ZXJBc3NldElECQACAQIbUGFpciBBbHJlYWR5IEV4aXN0IGluIExpc3QuAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwACCQACAQJyVHdvIGF0dGFjaGVkIGFzc2V0cyBleHBlY3RlZCBhcyBwYXltZW50LiBLaW5kbHkgQXR0YWNoIHBheW1lbnQxID0gV0FWRVMgVG9rZW4gJiBwYXltZW50MiA9IFRva2VuIHlvdSB3YW50IHRvIExpc3QuAwkBAiE9AggFBHBtdDEHYXNzZXRJZAUKWFROQXNzZXRJRAkAAgECP0luY29ycmVjdCBhc3NldCBhdHRhY2hlZCBhcyBwYXltZW50WzFdLCBwbGVhc2UgYXR0YWNoIFhUTiBvbmx5LgMJAGYCAKCNBggFBHBtdDEGYW1vdW50CQACAQkArAICCQCsAgIJAKwCAgkArAICAhJZb3UgYXR0YWNoZWQgb25seSAJAKQDAQkAawMIBQRwbXQxBmFtb3VudAABAIDC1y8CAS4JAKQDAQkAawMIBQRwbXQxBmFtb3VudAABAICt4gQCOSBXQVZFUyBmb3IgTGlzdGluZyBpbiBwYXltZW50WzFdLCBwbGVhc2UgYXR0YWNoIDEwIFdBVkVTLgMJAQIhPQIIBQRwbXQyB2Fzc2V0SWQFDWFzc2V0aW5mb3BtdDIJAAIBAjxJbnB1dCBTdHJpbmcgJiBBdHRhY2hlZCBBc3NldElEIGluIHBheW1lbnQyIGlzIG5vdCBtYXRjaGluZy4DCQAAAgUFV0FWRVMGCQACAQJdWW91IEF0dGFjaGVkIFdBVkVTIEFzc2V0IElEIGZvciBMaXN0aW5nLCBwbGVhc2UgYXR0YWNoIFRva2VucyBZb3Ugd2FudCB0byBsaXN0IGluIHBheW1lbnRbMl0uCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAUMRW50ZXJBc3NldElECQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICDExpc3RpbmdfRmVlXwUMRW50ZXJBc3NldElECAUEcG10MQZhbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQdnZXRTcXJ0BQpYVE5Bc3NldElECQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQIBQRwbXQxBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElECAUEcG10MgZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgITVG90YWxfb2ZfUGFpcl9UeG5zXwUMRW50ZXJBc3NldElEAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICGVRvdGFsX1N3YXBfRmVlX0NvbGxlY3RlZF8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgkApAMBCQEJY291bnRkYXlzAAIMX0RheV9Wb2x1bWVfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICCQCsAgIJAKQDAQkBCWNvdW50ZGF5cwACDF9EYXlfVm9sdW1lXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQAAAkAzAgCBQdMUGlzc3VlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgIDTFBfBQxFbnRlckFzc2V0SUQJANgEAQUETFBpZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAglUb3RhbF9MUF8FDEVudGVyQXNzZXRJRAUHZ2V0U3FydAUDbmlsAWkBDElzc3VlTFBUb2tlbgEMRW50ZXJBc3NldElEBAthZG1pbnJpZ2h0cwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMCD0xQX0FkbWluX1JpZ2h0cwJQTFAgQWRtaW4gUmlnaHRzIGFyZSBOb3QgSW5jbHVkZWQgaW50byBTbWFydCBDb250cmFjdC4gRGVwbG95IEFkbWluIFJpZ2h0cyBGaXJzdC4EDWNhbGxlcmFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAIkQXNzZXQgbm90IEZvdW5kIGluIFdoaXRlbGlzdGVkIFRva2VuBARpbmZvCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQxFbnRlckFzc2V0SUQJAKwCAgkArAICAgZBc3NldCAFDEVudGVyQXNzZXRJRAIOIGRvZXNuJ3QgZXhpc3QEBG5hbWUIBQRpbmZvBG5hbWUECGRlY2ltYWxzCAUEaW5mbwhkZWNpbWFscwQKRmlyc3RMUFF0eQkAaAIAAQkAbAYACgAACQBrAwkAZAIFCGRlY2ltYWxzAAYAAQACAAAAAAUHQ0VJTElORwQHTFBpc3N1ZQkAwggFCQCsAgIJAKwCAgIDTFAtCQCvAgIFBG5hbWUACAIELVhUTgkArAICCQCsAgIJAKwCAgkArAICAgNMUC0FBG5hbWUCBC1YVE4CLiBpcyBhIExpcXVpZGl0eSBQcm92aWRlciBUb2tlbiBJc3N1ZWQgQWdhaW5zdCAFDEVudGVyQXNzZXRJRAUKRmlyc3RMUFF0eQkAawMJAGQCBQhkZWNpbWFscwAGAAEAAgYEBExQaWQJALgIAQUHTFBpc3N1ZQMJAQIhPQIFC2FkbWlucmlnaHRzBQ1jYWxsZXJhZGRyZXNzCQACAQkArAICCQCsAgICLllvdXIgYXJlIG5vdCBhbGxvd2RlZCB0byBJc3N1ZSBMUCBUb2tlbi4gT25seSAFC2FkbWlucmlnaHRzAhggY2FuIGlzc3VlIHRoZSBMUCBUb2tlbi4DCQECIT0CBRljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90BQxFbnRlckFzc2V0SUQJAAIBAh5QYWlyIGlzIG5vdCBhdmFpbGFibGUgaW4gTGlzdC4JAMwIAgUHTFBpc3N1ZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgICA0xQXwUMRW50ZXJBc3NldElECQDYBAEFBExQaWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQFCkZpcnN0TFBRdHkFA25pbAFpARdTd2FwQXNzZXRUb1hUTlBhaXJFbnRyeQEMRW50ZXJBc3NldElEBA1jYWxsZXJhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEA3BtdAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAJEDAggFAWkIcGF5bWVudHMAAAkAAgECNVdoaXRlbGlzdGVkIFRva2VuIGlzIHJlcXVpcmVkIGFzIEF0dGFjaGVkIHBheW1lbnRbMV0uBBljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90CQCdCAIFBHRoaXMJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAQPQ2hlY2tYVE5CYWxhbmNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQEEUNoZWNrQXNzZXRCYWxhbmNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQED25ld2JhbGFuY2VvZlhUTgkAawMFD0NoZWNrWFROQmFsYW5jZQURQ2hlY2tBc3NldEJhbGFuY2UJAGQCBRFDaGVja0Fzc2V0QmFsYW5jZQgFA3BtdAZhbW91bnQEFHF1YW50aXR5b2ZwcmljZWFzc2V0CQBlAgUPQ2hlY2tYVE5CYWxhbmNlBQ9uZXdiYWxhbmNlb2ZYVE4EB1N3YXBGZWUAAwQKQ3VycmVudGRheQkBCWNvdW50ZGF5cwAEEFN3YXBGZWV0b3JlY2VpdmUJAGkCCQBoAgUUcXVhbnRpdHlvZnByaWNlYXNzZXQFB1N3YXBGZWUA6AcEFHVzZXJiYWxhbmNldG9yZWNlaXZlCQBlAgkAZQIFFHF1YW50aXR5b2ZwcmljZWFzc2V0BRBTd2FwRmVldG9yZWNlaXZlBRBTd2FwRmVldG9yZWNlaXZlBBhTdW11cG9mQXNzZXRUb1hUTlN3YXBGZWUEByRtYXRjaDAJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEG05ld1N1bXVwb2ZBc3NldFRvWFROU3dhcEZlZQkAZAIJAGQCBRhTdW11cG9mQXNzZXRUb1hUTlN3YXBGZWUFEFN3YXBGZWV0b3JlY2VpdmUFEFN3YXBGZWV0b3JlY2VpdmUEEVN1bXVwQXNzZXRCYWxhbmNlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQWTmV3U3VtdXBvZkFzc2V0QmFsYW5jZQkAZAIFEUNoZWNrQXNzZXRCYWxhbmNlCAUDcG10BmFtb3VudAQPU3VtdXBYVE5CYWxhbmNlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQUTmV3U3VtdXBvZlhUTkJhbGFuY2UJAGQCCQBlAgUPQ2hlY2tYVE5CYWxhbmNlBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUQU3dhcEZlZXRvcmVjZWl2ZQQEVE9QVAQHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICAhNUb3RhbF9vZl9QYWlyX1R4bnNfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEBk5ld1RQVAkAZAIFBFRPUFQAAQQEVE9QVgQHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgkArAICCQCkAwEFCkN1cnJlbnRkYXkCDF9EYXlfVm9sdW1lXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEBk5ld1RQVgkAZAIFBFRPUFYIBQNwbXQGYW1vdW50AwkAAAIFDEVudGVyQXNzZXRJRAkA2AQBBQpYVE5Bc3NldElECQACAQKFAUlucHV0IGNhbiBOZXZlciBiZSBhIFhUTiBBc3NldElELiBFbnRlciBXaGl0ZWxpc3RlZCBBc3NldElEIGluIGlucHV0ICYgQXR0YWNoIFdoaXRlbGlzdGVkIEFzc2V0IGFzIGFuIGF0dGFjaG1lbnQgVG9rZW4gaW4gcGF5bWVudFsxXS4DCQECIT0CBRljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90BQxFbnRlckFzc2V0SUQJAAIBAitQYWlyIGlzIG5vdCBhdmFpbGFibGUgaW4gV2hpdGVsaXN0ZWQgQXNzZXQuAwkAAAIIBQNwbXQHYXNzZXRJZAUKWFROQXNzZXRJRAkAAgECUllvdSBjYW4ndCBBdHRhY2ggWFROIGFzIGFuIEF0dGFjaGVkIFBheW1lbnQuIE9ubHkgV2hpdGVsaXN0ZWQgVG9rZW5zIGFyZSBhY2NlcHRlZC4DCQECIT0CCAUDcG10B2Fzc2V0SWQJANkEAQUMRW50ZXJBc3NldElECQACAQkArAICAjBJbmNvcnJlY3QgYXNzZXQgYXR0YWNoZWQsIHBsZWFzZSBhdHRhY2ggb3Igc2VuZCAFDEVudGVyQXNzZXRJRAMJAAACBQ9DaGVja1hUTkJhbGFuY2UAAAkAAgECZVN3YXAgUGFpciBOZWVkIHRvIEFkZCBMaXF1aWRpdHkgZmlyc3QgaW50byBQb29sLiBPbmx5IEFmdGVyIHRoYXQgUGFpciB3aWxsIGJlIGFjdGl2YXRlZCBmb3IgU3dhcHBpbmcuAwkAAAIFEUNoZWNrQXNzZXRCYWxhbmNlAAAJAAIBAmVTd2FwIFBhaXIgTmVlZCB0byBBZGQgTGlxdWlkaXR5IGZpcnN0IGludG8gUG9vbC4gT25seSBBZnRlciB0aGF0IFBhaXIgd2lsbCBiZSBhY3RpdmF0ZWQgZm9yIFN3YXBwaW5nLgMJAGYCAKCNBgUUcXVhbnRpdHlvZnByaWNlYXNzZXQJAAIBCQCsAgIJAKwCAgI0WW91ciBBdHRhY2hlZCBBc3NldCBBbW91bnQgaXMgdmVyeSBsb3cuIEF0dGFjaCBNb3JlIAUMRW50ZXJBc3NldElEAjogVG9rZW5zIHRvIENsYWltIHRoZSBtaW5pbXVtIEFtb3VudCBvZiAwLjEgZG9sbGFyIGF0bGVhc3QuAwkAZgIFFHF1YW50aXR5b2ZwcmljZWFzc2V0BQ9DaGVja1hUTkJhbGFuY2UJAAIBCQCsAgIJAKwCAgIdUG9vbCBPbmx5IGhhcyBhIExpcXVpZGl0eSBvZiAJAKQDAQkAaQIFD0NoZWNrWFROQmFsYW5jZQkAbAYACgAAAAYAAAAABQdDRUlMSU5HAh4gWFROLiBBZGQgTGlxdWlkaXR5IGludG8gUG9vbC4JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICGVRvdGFsX1N3YXBfRmVlX0NvbGxlY3RlZF8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBRtOZXdTdW11cG9mQXNzZXRUb1hUTlN3YXBGZWUJAMwIAgkBDEludGVnZXJFbnRyeQICC0N1cnJlbnRfRGF5BQpDdXJyZW50ZGF5CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICE1RvdGFsX29mX1BhaXJfVHhuc18FDEVudGVyQXNzZXRJRAUGTmV3VFBUCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQFFk5ld1N1bXVwb2ZBc3NldEJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAUUTmV3U3VtdXBvZlhUTkJhbGFuY2UJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBRR1c2VyYmFsYW5jZXRvcmVjZWl2ZQUKWFROQXNzZXRJRAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBRFDb2xsZWN0RmVlQWRkcmVzcwUQU3dhcEZlZXRvcmVjZWl2ZQUKWFROQXNzZXRJRAUDbmlsAWkBF1N3YXBYVE5Ub0Fzc2V0UGFpckVudHJ5AQxFbnRlckFzc2V0SUQEDWNhbGxlcmFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQDcG10AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAkQMCCAUBaQhwYXltZW50cwAACQACAQkArAICCQCsAgICBU9ubHkgCQDYBAEFClhUTkFzc2V0SUQCMSBYVE4gVG9rZW4gaXMgcmVxdWlyZWQgYXMgYW4gQXR0YWNoZWQgcGF5bWVudFsxXS4ED0NoZWNrWFROQmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBBFDaGVja0Fzc2V0QmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBBFuZXdiYWxhbmNlb2ZBc3NldAkAawMFD0NoZWNrWFROQmFsYW5jZQURQ2hlY2tBc3NldEJhbGFuY2UJAGQCBQ9DaGVja1hUTkJhbGFuY2UIBQNwbXQGYW1vdW50BBRxdWFudGl0eW9mcHJpY2Vhc3NldAkAZQIFEUNoZWNrQXNzZXRCYWxhbmNlBRFuZXdiYWxhbmNlb2ZBc3NldAQZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAkAnQgCBQR0aGlzCQCsAgICCFBhaXJfVVZfBQxFbnRlckFzc2V0SUQEB1N3YXBGZWUAAwQQU3dhcEZlZXRvcmVjZWl2ZQkAaQIJAGgCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUHU3dhcEZlZQDoBwQUdXNlcmJhbGFuY2V0b3JlY2VpdmUJAGUCCQBlAgUUcXVhbnRpdHlvZnByaWNlYXNzZXQFEFN3YXBGZWV0b3JlY2VpdmUFEFN3YXBGZWV0b3JlY2VpdmUEGFN1bXVwb2ZYVE5Ub0Fzc2V0U3dhcEZlZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgICGVRvdGFsX1N3YXBfRmVlX0NvbGxlY3RlZF8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQbTmV3U3VtdXBvZlhUTlRvQXNzZXRTd2FwRmVlCQBkAgkAZAIFGFN1bXVwb2ZYVE5Ub0Fzc2V0U3dhcEZlZQUQU3dhcEZlZXRvcmVjZWl2ZQUQU3dhcEZlZXRvcmVjZWl2ZQQRU3VtdXBBc3NldEJhbGFuY2UEByRtYXRjaDAJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBZOZXdTdW11cG9mQXNzZXRCYWxhbmNlCQBkAgkAZQIFEUNoZWNrQXNzZXRCYWxhbmNlBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUQU3dhcEZlZXRvcmVjZWl2ZQQPU3VtdXBYVE5CYWxhbmNlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQUTmV3U3VtdXBvZlhUTkJhbGFuY2UJAGQCBQ9DaGVja1hUTkJhbGFuY2UIBQNwbXQGYW1vdW50BARUT1BUBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICE1RvdGFsX29mX1BhaXJfVHhuc18FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQGTmV3VFBUCQBkAgUEVE9QVAABBARUT1BWBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICCQCsAgIJAKQDAQkBCWNvdW50ZGF5cwACDF9EYXlfVm9sdW1lXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEBk5ld1RQVgkAZAIFBFRPUFYIBQNwbXQGYW1vdW50AwkBAiE9AgUZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAUMRW50ZXJBc3NldElECQACAQIrUGFpciBpcyBub3QgYXZhaWxhYmxlIGluIFdoaXRlbGlzdGVkIEFzc2V0LgMJAAACBQxFbnRlckFzc2V0SUQJANgEAQUKWFROQXNzZXRJRAkAAgECd0lucHV0IGNhbiBOZXZlciBiZSBhIFhUTiBBc3NldElELiBFbnRlciBXaGl0ZWxpc3RlZCBBc3NldElEIGluIGlucHV0ICYgQXR0YWNoIFhUTiBhcyBhbiBhdHRhY2htZW50IFRva2VuIGluIHBheW1lbnRbMV0uAwkBAiE9AggFA3BtdAdhc3NldElkBQpYVE5Bc3NldElECQACAQJ7WW91IGNhbiBBdHRhY2ggWFROIGFzIGFuIEF0dGFjaGVkIFBheW1lbnRbMV0gdG8gU3dhcCBYVE4gVG8gUmVxdWlyZWQgVG9rZW4uIEFueSBvdGhlciBhc3NldCBlbHNlIHRoYW4gWFROIHdpbGwgYmUgcmVqZWN0ZWQuAwkAZgIAoI0GCAUDcG10BmFtb3VudAkAAgECWVlvdXIgQXR0YWNoZWQgWFROIEFtb3VudCBpcyB2ZXJ5IGxvdy4gQXR0YWNoIEF0bGVhc3QgMC4xIFhUTiB0byBDbGFpbSB0aGUgbWluaW11bSBUb2tlbnMuAwkAAAIFD0NoZWNrWFROQmFsYW5jZQAACQACAQJlU3dhcCBQYWlyIE5lZWQgdG8gQWRkIExpcXVpZGl0eSBmaXJzdCBpbnRvIFBvb2wuIE9ubHkgQWZ0ZXIgdGhhdCBQYWlyIHdpbGwgYmUgYWN0aXZhdGVkIGZvciBTd2FwcGluZy4DCQAAAgURQ2hlY2tBc3NldEJhbGFuY2UAAAkAAgECZVN3YXAgUGFpciBOZWVkIHRvIEFkZCBMaXF1aWRpdHkgZmlyc3QgaW50byBQb29sLiBPbmx5IEFmdGVyIHRoYXQgUGFpciB3aWxsIGJlIGFjdGl2YXRlZCBmb3IgU3dhcHBpbmcuAwkAZgIFFHF1YW50aXR5b2ZwcmljZWFzc2V0BRFDaGVja0Fzc2V0QmFsYW5jZQkAAgEJAKwCAgkArAICAh1Qb29sIE9ubHkgaGFzIGEgTGlxdWlkaXR5IG9mIAkApAMBBRFDaGVja0Fzc2V0QmFsYW5jZQIhIFRva2Vucy4gQWRkIExpcXVpZGl0eSBpbnRvIFBvb2wuCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICGVRvdGFsX1N3YXBfRmVlX0NvbGxlY3RlZF8FDEVudGVyQXNzZXRJRAUbTmV3U3VtdXBvZlhUTlRvQXNzZXRTd2FwRmVlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICCQCsAgIJAKQDAQkBCWNvdW50ZGF5cwACDF9EYXlfVm9sdW1lXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQFBk5ld1RQVgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAhNUb3RhbF9vZl9QYWlyX1R4bnNfBQxFbnRlckFzc2V0SUQFBk5ld1RQVAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBRZOZXdTdW11cG9mQXNzZXRCYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQFFE5ld1N1bXVwb2ZYVE5CYWxhbmNlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUUdXNlcmJhbGFuY2V0b3JlY2VpdmUJANkEAQUMRW50ZXJBc3NldElECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFEUNvbGxlY3RGZWVBZGRyZXNzBRBTd2FwRmVldG9yZWNlaXZlCQDZBAEFDEVudGVyQXNzZXRJRAUDbmlsAWkBDEFkZExpcXVpZGl0eQEMRW50ZXJBc3NldElEBA1jYWxsZXJhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEBHBtdDEJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQEcG10MgkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwABBBljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90CQCdCAIFBHRoaXMJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAQOUmVpc3N1ZWFzc2V0SWQJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgIDTFBfBQxFbnRlckFzc2V0SUQCLExQIFRva2VuIGlzIE1pc3Npbmcgb3IgTWF5IGJlIG5vdCBHZW5lcmF0ZWQuBA9DaGVja1hUTkJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAQRQ2hlY2tBc3NldEJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAQMZGVjaW1hbHNpbmZvCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQxFbnRlckFzc2V0SUQJAKwCAgkArAICAgZBc3NldCAFDEVudGVyQXNzZXRJRAIOIGRvZXNuJ3QgZXhpc3QECGRlY2ltYWxzCAUMZGVjaW1hbHNpbmZvCGRlY2ltYWxzBARhcmcxBQ9DaGVja1hUTkJhbGFuY2UEBGFyZzIFEUNoZWNrQXNzZXRCYWxhbmNlBAVhcmdzMwkAbAYJAGgCCQBpAgkAaAIFBGFyZzEAwIQ9BQRhcmcyCQBsBgAKAAAFCGRlY2ltYWxzAAAAAAUHQ0VJTElORwAAAAEAAAAABQdDRUlMSU5HBBJib3RoYXNzZXRzZGVjaW1hbHMJAGQCAAYFCGRlY2ltYWxzBA1zaGFyZWRlY2ltYWxzCQBpAgUSYm90aGFzc2V0c2RlY2ltYWxzAAIEFnF1YW50aXR5b2ZFbnRlckFzc2V0SUQJAGsDBQVhcmdzMwgFBHBtdDEGYW1vdW50CQBsBgAKAAAFEmJvdGhhc3NldHNkZWNpbWFscwAAAAAFB0NFSUxJTkcEEnF1YW50aXR5b2ZMUFRva2VuMQkAbAYJAGgCCQBrAwgFBHBtdDEGYW1vdW50AAEJAGwGAAoAAAUIZGVjaW1hbHMAAAAABQdDRUlMSU5HCQBrAwgFBHBtdDIGYW1vdW50AAEJAGwGAAoAAAAGAAAAAAUHQ0VJTElORwAAAAUAAQUNc2hhcmVkZWNpbWFscwUERE9XTgQQWFROSG9sZGluZ0luUGFpcgQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEE05ld1hUTkhvbGRpbmdJblBhaXIJAGQCBRBYVE5Ib2xkaW5nSW5QYWlyCAUEcG10MgZhbW91bnQEEkFzc2V0SG9sZGluZ0luUGFpcgQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEFU5ld0Fzc2V0SG9sZGluZ0luUGFpcgkAZAIFEkFzc2V0SG9sZGluZ0luUGFpcggFBHBtdDEGYW1vdW50BA1MUFRva2VuSXNzdWVkBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBBOZXdMUFRva2VuSXNzdWVkCQBkAgUNTFBUb2tlbklzc3VlZAUScXVhbnRpdHlvZkxQVG9rZW4xAwkBAiE9AgUZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAUMRW50ZXJBc3NldElECQACAQIrUGFpciBpcyBub3QgYXZhaWxhYmxlIGluIFdoaXRlbGlzdGVkIEFzc2V0LgMJAAACBQxFbnRlckFzc2V0SUQJANgEAQUKWFROQXNzZXRJRAkAAgECkAFJbnB1dCBjYW4gTmV2ZXIgYmUgYSBYVE4gQXNzZXRJRC4gRW50ZXIgV2hpdGVsaXN0ZWQgQXNzZXRJRCBpbiBpbnB1dCBhcyB3ZWxsIGFzIGluIHBheW1lbnRbMV0gJiBBdHRhY2ggWFROIGFzIGFuIGF0dGFjaG1lbnQgVG9rZW4gaW4gcGF5bWVudFsyXS4DCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAIJAAIBAp0BVHdvIGF0dGFjaGVkIGFzc2V0cyBleHBlY3RlZCBhcyBwYXltZW50IGluIDUwJS01MCUuIEtpbmRseSBBdHRhY2ggcGF5bWVudDEgPSBUb2tlbiB5b3Ugd2FudCB0byBhZGQgZm9yIExpcXVpZGl0eSAmIHBheW1lbnQyID0gRXF1aXZhbGVudCBBbW91bnQgb2YgWFROIFRva2VuLgMJAAACCAUEcG10MQdhc3NldElkBQpYVE5Bc3NldElECQACAQJ2WW91IEF0dGFjaGVkIFhUTiBhc3NldCBpbiBwYXltZW50WzFdLCBwbGVhc2UgYXR0YWNoIG9ubHkgd2hpdGVsaXN0ZWQgVG9rZW4gaW4gcGF5bWVudFsxXSBhbG9uZyB3aXRoIFhUTiBpbiBwYXltZW50WzJdLgMJAQIhPQIIBQRwbXQxB2Fzc2V0SWQJANkEAQUMRW50ZXJBc3NldElECQACAQJrSW5jb3JyZWN0IGFzc2V0IGF0dGFjaGVkIGZvciBMaXF1aWRpdHkgaW4gcGF5bWVudFsxXSwgcGxlYXNlIGF0dGFjaCBTdHJpbmcgQXNzZXQgb3IgV2hpdGVsaXN0ZWQgVG9rZW4gb25seS4DCQECIT0CCAUEcG10MQdhc3NldElkCQDZBAEFDEVudGVyQXNzZXRJRAkAAgECa0luY29ycmVjdCBhc3NldCBhdHRhY2hlZCBmb3IgTGlxdWlkaXR5IGluIHBheW1lbnRbMV0sIHBsZWFzZSBhdHRhY2ggU3RyaW5nIEFzc2V0IG9yIFdoaXRlbGlzdGVkIFRva2VuIG9ubHkuAwkBAiE9AggFBHBtdDIHYXNzZXRJZAUKWFROQXNzZXRJRAkAAgECaVdyb25nIEFzc2V0IEF0dGFjaGVkIGluIHBheW1lbnRzWzJdLCBQbGVhc2UgYXR0YWNoIHBheW1lbnRbMV0gPSBMaXF1aWRpdHkgVG9rZW4gJiBwYXltZW50WzJdID0gWFROIFRva2VuLgMJAGYCAMCWsQIIBQRwbXQyBmFtb3VudAkAAgECU3BsZWFzZSBhdHRhY2ggYXRsZWFzdCA1IFhUTiBpbiBwYXltZW50WzJdICYgRXF1aXZhbGVudCB3b3J0aCBvZiBUb2tlbiBpbiBwYXltZW50WzFdAwkBAiE9AggFBHBtdDIGYW1vdW50BRZxdWFudGl0eW9mRW50ZXJBc3NldElECQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgJeQXR0YWNoZWQgcGF5bWVudFsyXSBxdHkgaXMgbm90IG1hdGNoaW5nIGFzIHBlciBhdHRhY2hlZCBwYXltZW50WzFdLnBheW1lbnRbMl0gbXVzdCBiZSBhcyBpbnQgWwkApAMBBRZxdWFudGl0eW9mRW50ZXJBc3NldElEAgVdIG9yIAkApAMBCQBrAwUWcXVhbnRpdHlvZkVudGVyQXNzZXRJRAABAMCEPQIBLgkAsgICCQCkAwEFFnF1YW50aXR5b2ZFbnRlckFzc2V0SUQABgIFIFhUTi4DCQBmAgABBRJxdWFudGl0eW9mTFBUb2tlbjEJAAIBCQCsAgIJAKwCAgIgTFAgVG9rZW4gT3V0Y29tZSBpcyBnb2luZyBiZWxvdyAJAKQDAQUNc2hhcmVkZWNpbWFscwI6IERlY2ltYWxzLiBQbGVhc2UgQXR0YWNoIG1pbi4gMSBMUCB0b2tlbiBvciA1IFhUTiBBdGxlYXN0LgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBRNOZXdYVE5Ib2xkaW5nSW5QYWlyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQFFU5ld0Fzc2V0SG9sZGluZ0luUGFpcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAglUb3RhbF9MUF8FDEVudGVyQXNzZXRJRAUQTmV3TFBUb2tlbklzc3VlZAkAzAgCCQEHUmVpc3N1ZQMFDlJlaXNzdWVhc3NldElkBRJxdWFudGl0eW9mTFBUb2tlbjEGCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUScXVhbnRpdHlvZkxQVG9rZW4xBQ5SZWlzc3VlYXNzZXRJZAUDbmlsAWkBD1JlbW92ZUxpcXVpZGl0eQEMRW50ZXJBc3NldElEBA1jYWxsZXJhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEA3BtdAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAJEDAggFAWkIcGF5bWVudHMAAAkAAgECOk5vIHBheW1lbnQgYXR0YWNoZWQsIFBsZWFzZSBBdHRhY2ggTFAgVG9rZW4gYXMgcGF5bWVudFsxXS4EGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBBJSZWlzc3VlYWJsZWFzc2V0SWQJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgIDTFBfBQxFbnRlckFzc2V0SUQCJUxQIFRva2VuIGlzIE1pc3Npbmcgb3Igbm90IEdlbmVyYXRlZC4EDGRlY2ltYWxzaW5mbwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUMRW50ZXJBc3NldElECQCsAgIJAKwCAgIGQXNzZXQgBQxFbnRlckFzc2V0SUQCDiBkb2Vzbid0IGV4aXN0BAhkZWNpbWFscwgFDGRlY2ltYWxzaW5mbwhkZWNpbWFscwQSYm90aGFzc2V0c2RlY2ltYWxzCQBkAgAGBQhkZWNpbWFscwQNc2hhcmVkZWNpbWFscwkAaQIFEmJvdGhhc3NldHNkZWNpbWFscwACBBJDaGVja1RvdGFsTFBBbW91bnQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQEEFVzZXJMUFBlcmNlbnRhZ2UJAGwGCQBrAwgFA3BtdAZhbW91bnQJAGwGAAoAAAAIAAAAAAUHQ0VJTElORwUSQ2hlY2tUb3RhbExQQW1vdW50AAYAAQAAAAYFB0NFSUxJTkcED0NoZWNrWFROQmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBBFDaGVja0Fzc2V0QmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBA5Vc2VyTFBXb3J0aFhUTgkAawMFD0NoZWNrWFROQmFsYW5jZQUQVXNlckxQUGVyY2VudGFnZQkAbAYACgAAAAgAAAAABQdDRUlMSU5HBBBVc2VyTFBXb3J0aEFzc2V0CQBrAwURQ2hlY2tBc3NldEJhbGFuY2UFEFVzZXJMUFBlcmNlbnRhZ2UJAGwGAAoAAAAIAAAAAAUHQ0VJTElORwQQWFROSG9sZGluZ0luUGFpcgQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEE05ld1hUTkhvbGRpbmdJblBhaXIJAGUCBRBYVE5Ib2xkaW5nSW5QYWlyBQ5Vc2VyTFBXb3J0aFhUTgQSQXNzZXRIb2xkaW5nSW5QYWlyBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQVTmV3QXNzZXRIb2xkaW5nSW5QYWlyCQBlAgUSQXNzZXRIb2xkaW5nSW5QYWlyBRBVc2VyTFBXb3J0aEFzc2V0BA1MUFRva2VuSXNzdWVkBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBBOZXdMUFRva2VuSXNzdWVkCQBlAgUNTFBUb2tlbklzc3VlZAgFA3BtdAZhbW91bnQDCQECIT0CBRljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90BQxFbnRlckFzc2V0SUQJAAIBAiNQYWlyIGlzIG5vdCBhdmFpbGFibGUgaW4gV2hpdGVsaXN0LgMJAAACCQDZBAEFDEVudGVyQXNzZXRJRAUKWFROQXNzZXRJRAkAAgECakRvbid0IGNob29zZSBYVE4gQXNzZXRJRCBhcyBJbnB1dCwgT25seSBXaGl0ZWxpc3RlZCBBc3NldCBhcyBJbnB1dCBTdHJpbmcgJiBBdHRhY2ggTFAgVG9rZW5zIGFzIHBheW1lbnRbMV0DCQECIT0CCAUDcG10B2Fzc2V0SWQFElJlaXNzdWVhYmxlYXNzZXRJZAkAAgECR1dyb25nIEFzc2V0IGlzIGF0dGFjaGVkIGluIHBheW1lbnRbMV0gb3IgTFAgVG9rZW4gTm90IEZvdW5kIG9yIE1pc3NpbmcuAwkAZgIAAQUQVXNlckxQUGVyY2VudGFnZQkAAgECLllvdXIgTFAgVG9rZW4gYW1vdW50ICUgaXMgdmVyeSBsb3cgdG8gY29udmVydC4DCQBmAgABBQ5Vc2VyTFBXb3J0aFhUTgkAAgECUVlvdXIgTFAgVG9rZW4gY29udmVyc2lvbiBhbW91bnQgaXMgdmVyeSBsb3cgdG8gY29udmVydCBvciBsZXNzIHRoYW4gMC4wMDAwMDEgWFROLgMJAGYCAAEFEFVzZXJMUFdvcnRoQXNzZXQJAAIBAlxZb3VyIExQIFRva2VuIGNvbnZlcnNpb24gYW1vdW50IGlzIHZlcnkgbG93IHRvIGNvbnZlcnQgb3IgbGVzcyB0aGFuIGZyYWN0aW9uIHZhbHVlIG9mIFRva2VuLgkAzAgCCQEMSW50ZWdlckVudHJ5AgIWV2l0aGRyYXdfTFBfUGVyY2VudGFnZQUQVXNlckxQUGVyY2VudGFnZQkAzAgCCQEEQnVybgIFElJlaXNzdWVhYmxlYXNzZXRJZAgFA3BtdAZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQFEE5ld0xQVG9rZW5Jc3N1ZWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAUTTmV3WFROSG9sZGluZ0luUGFpcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBRVOZXdBc3NldEhvbGRpbmdJblBhaXIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQ5Vc2VyTFBXb3J0aFhUTgUKWFROQXNzZXRJRAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFEFVzZXJMUFdvcnRoQXNzZXQJANkEAQUMRW50ZXJBc3NldElEBQNuaWwBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5pYZqGQ==",
    "height": 2763434,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3XHBoMsryPB4XqoSBmRCwemQaYrZJVxh7GPM5GTDUU92
Next: FNb9ZMFuQRJN2a2rE9DWVyyrPiiepT5BhXoX9x81o7fs

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

Old	New		Differences
134	134		then throw((("Your Attached Asset Amount is very low. Attach More " + EnterAssetID) + " Tokens to Claim the minimum Amount of 0.1 dollar atleast."))
135	135		else if ((quantityofpriceasset > CheckXTNBalance))
136	136		then throw((("Pool Only has a Liquidity of " + toString((CheckXTNBalance / pow(10, 0, 6, 0, 0, CEILING)))) + " XTN. Add Liquidity into Pool."))
137		-	else [IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofAssetToXTNSwapFee), IntegerEntry(~~((((toString(Currentday) +~~ "_Day~~_Volume_~~"~~) + toBase58String(XTNAssetID)) + "_") + EnterAssetID)~~, ~~NewTPV~~), 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)]
	137	+	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)]
138	138		}
139	139
140	140

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

github/deemru/w8io/169f3d6 
57.34 ms ◑