w8 · tx · HFv···s5v

tx · HFvZgV4BDASz3QqUAJyaujUrRoXF3zxU4xWQtwuS2s5v

3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5:  -0.01800000 Waves

2023.09.20 10:01 [2763372] smart account 3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HFvZgV4BDASz3QqUAJyaujUrRoXF3zxU4xWQtwuS2s5v",
    "fee": 1800000,
    "feeAssetId": null,
    "timestamp": 1695193247870,
    "version": 2,
    "chainId": 84,
    "sender": "3MsVsEgTUxTm6ETYkHGaqMhMhiY2Nb3yDN5",
    "senderPublicKey": "2LmNyaN5YAXdg9C5vsXcTLU66hsW2KUNPsN7KcHBYhUo",
    "proofs": [
        "xsf5pqsvKcQ8Z5cBzYCHx45pFSxjU7DaffSYYX8SDWpJ4mYzjwpKXWDn7bqSqmYGphFvYmvaF6t2d1cYagEkKbd"
    ],
    "script": "base64:BgIgCAISAwoBCBIDCgEIEgMKAQgSAwoBCBIDCgEIEgMKAQgEAA5kQXBwU2luY2VTdGFydACAkYzCqjEAClhUTkFzc2V0SUQBIAhlhLcP8IpqGvPiaOguCJAkw9MnWAPNLPYuXgvf2hWkABFDb2xsZWN0RmVlQWRkcmVzcwkApwgBASBSg9mgi9eQkjsz5eBARHIbc7Hg/F4fmB0sxZ6ySMfiIAEJY291bnRkYXlzAAQHVFNfRGlmZgkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQ5kQXBwU2luY2VTdGFydAQJZGF5bnVtYmVyCQBrAwABBQdUU19EaWZmAIC4mSkFCWRheW51bWJlcgYBaQEMUmVnaXN0ZXJQYWlyAQxFbnRlckFzc2V0SUQEBHBtdDEJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQEcG10MgkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwABBApjdXJyZW50S2V5CQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEBVdBVkVTCQEBIQEJAQlpc0RlZmluZWQBCAUEcG10Mgdhc3NldElkBAlmZXRjaHBhaXIJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBA1hc3NldGluZm9wbXQyCQDZBAEFDEVudGVyQXNzZXRJRAQEaW5mbwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUMRW50ZXJBc3NldElECQCsAgIJAKwCAgIGQXNzZXQgBQxFbnRlckFzc2V0SUQCDiBkb2Vzbid0IGV4aXN0BARuYW1lCAUEaW5mbwRuYW1lBAhkZWNpbWFscwgFBGluZm8IZGVjaW1hbHMECkxQZGVjaW1hbHMJAGsDCQBkAgUIZGVjaW1hbHMABgABAAIECkZpcnN0TFBRdHkJAGgCAAEJAGwGAAoAAAUKTFBkZWNpbWFscwAAAAAFB0NFSUxJTkcEEG11bHRpcGx5X2Ftb3VudHMJAGsDCAUEcG10MQZhbW91bnQIBQRwbXQyBmFtb3VudAUKRmlyc3RMUFF0eQQHZ2V0U3FydAkBBHNxcnQEBRBtdWx0aXBseV9hbW91bnRzBQpMUGRlY2ltYWxzBQpMUGRlY2ltYWxzBQdDRUlMSU5HBAdMUGlzc3VlCQDCCAUJAKwCAgkArAICAgNMUC0JAK8CAgUEbmFtZQAIAgQtWFROCQCsAgIJAKwCAgkArAICCQCsAgICA0xQLQUEbmFtZQIELVhUTgIuIGlzIGEgTGlxdWlkaXR5IFByb3ZpZGVyIFRva2VuIElzc3VlZCBBZ2FpbnN0IAUMRW50ZXJBc3NldElEBQdnZXRTcXJ0BQpMUGRlY2ltYWxzBgQETFBpZAkAuAgBBQdMUGlzc3VlAwkAAAIFCWZldGNocGFpcgUMRW50ZXJBc3NldElECQACAQIbUGFpciBBbHJlYWR5IEV4aXN0IGluIExpc3QuAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwACCQACAQJyVHdvIGF0dGFjaGVkIGFzc2V0cyBleHBlY3RlZCBhcyBwYXltZW50LiBLaW5kbHkgQXR0YWNoIHBheW1lbnQxID0gV0FWRVMgVG9rZW4gJiBwYXltZW50MiA9IFRva2VuIHlvdSB3YW50IHRvIExpc3QuAwkBAiE9AggFBHBtdDEHYXNzZXRJZAUKWFROQXNzZXRJRAkAAgECP0luY29ycmVjdCBhc3NldCBhdHRhY2hlZCBhcyBwYXltZW50WzFdLCBwbGVhc2UgYXR0YWNoIFhUTiBvbmx5LgMJAGYCAKCNBggFBHBtdDEGYW1vdW50CQACAQkArAICCQCsAgIJAKwCAgkArAICAhJZb3UgYXR0YWNoZWQgb25seSAJAKQDAQkAawMIBQRwbXQxBmFtb3VudAABAIDC1y8CAS4JAKQDAQkAawMIBQRwbXQxBmFtb3VudAABAICt4gQCOSBXQVZFUyBmb3IgTGlzdGluZyBpbiBwYXltZW50WzFdLCBwbGVhc2UgYXR0YWNoIDEwIFdBVkVTLgMJAQIhPQIIBQRwbXQyB2Fzc2V0SWQFDWFzc2V0aW5mb3BtdDIJAAIBAjxJbnB1dCBTdHJpbmcgJiBBdHRhY2hlZCBBc3NldElEIGluIHBheW1lbnQyIGlzIG5vdCBtYXRjaGluZy4DCQAAAgUFV0FWRVMGCQACAQJdWW91IEF0dGFjaGVkIFdBVkVTIEFzc2V0IElEIGZvciBMaXN0aW5nLCBwbGVhc2UgYXR0YWNoIFRva2VucyBZb3Ugd2FudCB0byBsaXN0IGluIHBheW1lbnRbMl0uCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAUMRW50ZXJBc3NldElECQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICDExpc3RpbmdfRmVlXwUMRW50ZXJBc3NldElECAUEcG10MQZhbW91bnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQdnZXRTcXJ0BQpYVE5Bc3NldElECQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQIBQRwbXQxBmFtb3VudAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElECAUEcG10MgZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgITVG90YWxfb2ZfUGFpcl9UeG5zXwUMRW50ZXJBc3NldElEAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICGVRvdGFsX1N3YXBfRmVlX0NvbGxlY3RlZF8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgkApAMBCQEJY291bnRkYXlzAAIMX0RheV9Wb2x1bWVfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICCQCsAgIJAKQDAQkBCWNvdW50ZGF5cwACDF9EYXlfVm9sdW1lXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQAAAkAzAgCBQdMUGlzc3VlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgIDTFBfBQxFbnRlckFzc2V0SUQJANgEAQUETFBpZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAglUb3RhbF9MUF8FDEVudGVyQXNzZXRJRAUHZ2V0U3FydAUDbmlsAWkBDElzc3VlTFBUb2tlbgEMRW50ZXJBc3NldElEBAthZG1pbnJpZ2h0cwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMCD0xQX0FkbWluX1JpZ2h0cwJQTFAgQWRtaW4gUmlnaHRzIGFyZSBOb3QgSW5jbHVkZWQgaW50byBTbWFydCBDb250cmFjdC4gRGVwbG95IEFkbWluIFJpZ2h0cyBGaXJzdC4EDWNhbGxlcmFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAIkQXNzZXQgbm90IEZvdW5kIGluIFdoaXRlbGlzdGVkIFRva2VuBARpbmZvCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQxFbnRlckFzc2V0SUQJAKwCAgkArAICAgZBc3NldCAFDEVudGVyQXNzZXRJRAIOIGRvZXNuJ3QgZXhpc3QEBG5hbWUIBQRpbmZvBG5hbWUECGRlY2ltYWxzCAUEaW5mbwhkZWNpbWFscwQKRmlyc3RMUFF0eQkAaAIAAQkAbAYACgAACQBrAwkAZAIFCGRlY2ltYWxzAAYAAQACAAAAAAUHQ0VJTElORwQHTFBpc3N1ZQkAwggFCQCsAgIJAKwCAgIDTFAtCQCvAgIFBG5hbWUACAIELVhUTgkArAICCQCsAgIJAKwCAgkArAICAgNMUC0FBG5hbWUCBC1YVE4CLiBpcyBhIExpcXVpZGl0eSBQcm92aWRlciBUb2tlbiBJc3N1ZWQgQWdhaW5zdCAFDEVudGVyQXNzZXRJRAUKRmlyc3RMUFF0eQkAawMJAGQCBQhkZWNpbWFscwAGAAEAAgYEBExQaWQJALgIAQUHTFBpc3N1ZQMJAQIhPQIFC2FkbWlucmlnaHRzBQ1jYWxsZXJhZGRyZXNzCQACAQkArAICCQCsAgICLllvdXIgYXJlIG5vdCBhbGxvd2RlZCB0byBJc3N1ZSBMUCBUb2tlbi4gT25seSAFC2FkbWlucmlnaHRzAhggY2FuIGlzc3VlIHRoZSBMUCBUb2tlbi4DCQECIT0CBRljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90BQxFbnRlckFzc2V0SUQJAAIBAh5QYWlyIGlzIG5vdCBhdmFpbGFibGUgaW4gTGlzdC4JAMwIAgUHTFBpc3N1ZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgICA0xQXwUMRW50ZXJBc3NldElECQDYBAEFBExQaWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQFCkZpcnN0TFBRdHkFA25pbAFpARdTd2FwQXNzZXRUb1hUTlBhaXJFbnRyeQEMRW50ZXJBc3NldElEBA1jYWxsZXJhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEA3BtdAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAJEDAggFAWkIcGF5bWVudHMAAAkAAgECNVdoaXRlbGlzdGVkIFRva2VuIGlzIHJlcXVpcmVkIGFzIEF0dGFjaGVkIHBheW1lbnRbMV0uBBljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90CQCdCAIFBHRoaXMJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAQPQ2hlY2tYVE5CYWxhbmNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQEEUNoZWNrQXNzZXRCYWxhbmNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQED25ld2JhbGFuY2VvZlhUTgkAawMFD0NoZWNrWFROQmFsYW5jZQURQ2hlY2tBc3NldEJhbGFuY2UJAGQCBRFDaGVja0Fzc2V0QmFsYW5jZQgFA3BtdAZhbW91bnQEFHF1YW50aXR5b2ZwcmljZWFzc2V0CQBlAgUPQ2hlY2tYVE5CYWxhbmNlBQ9uZXdiYWxhbmNlb2ZYVE4EB1N3YXBGZWUAAwQQU3dhcEZlZXRvcmVjZWl2ZQkAaQIJAGgCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUHU3dhcEZlZQDoBwQUdXNlcmJhbGFuY2V0b3JlY2VpdmUJAGUCCQBlAgUUcXVhbnRpdHlvZnByaWNlYXNzZXQFEFN3YXBGZWV0b3JlY2VpdmUFEFN3YXBGZWV0b3JlY2VpdmUEGFN1bXVwb2ZBc3NldFRvWFROU3dhcEZlZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAhlUb3RhbF9Td2FwX0ZlZV9Db2xsZWN0ZWRfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQbTmV3U3VtdXBvZkFzc2V0VG9YVE5Td2FwRmVlCQBkAgkAZAIFGFN1bXVwb2ZBc3NldFRvWFROU3dhcEZlZQUQU3dhcEZlZXRvcmVjZWl2ZQUQU3dhcEZlZXRvcmVjZWl2ZQQRU3VtdXBBc3NldEJhbGFuY2UEByRtYXRjaDAJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBZOZXdTdW11cG9mQXNzZXRCYWxhbmNlCQBkAgURQ2hlY2tBc3NldEJhbGFuY2UIBQNwbXQGYW1vdW50BA9TdW11cFhUTkJhbGFuY2UEByRtYXRjaDAJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBROZXdTdW11cG9mWFROQmFsYW5jZQkAZAIJAGUCBQ9DaGVja1hUTkJhbGFuY2UFFHF1YW50aXR5b2ZwcmljZWFzc2V0BRBTd2FwRmVldG9yZWNlaXZlBARUT1BUBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICE1RvdGFsX29mX1BhaXJfVHhuc18FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQGTmV3VFBUCQBkAgUEVE9QVAABBARUT1BWBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICCQCsAgIJAKQDAQkBCWNvdW50ZGF5cwACDF9EYXlfVm9sdW1lXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEBk5ld1RQVgkAZAIFBFRPUFYIBQNwbXQGYW1vdW50AwkAAAIFDEVudGVyQXNzZXRJRAkA2AQBBQpYVE5Bc3NldElECQACAQKFAUlucHV0IGNhbiBOZXZlciBiZSBhIFhUTiBBc3NldElELiBFbnRlciBXaGl0ZWxpc3RlZCBBc3NldElEIGluIGlucHV0ICYgQXR0YWNoIFdoaXRlbGlzdGVkIEFzc2V0IGFzIGFuIGF0dGFjaG1lbnQgVG9rZW4gaW4gcGF5bWVudFsxXS4DCQECIT0CBRljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90BQxFbnRlckFzc2V0SUQJAAIBAitQYWlyIGlzIG5vdCBhdmFpbGFibGUgaW4gV2hpdGVsaXN0ZWQgQXNzZXQuAwkAAAIIBQNwbXQHYXNzZXRJZAUKWFROQXNzZXRJRAkAAgECUllvdSBjYW4ndCBBdHRhY2ggWFROIGFzIGFuIEF0dGFjaGVkIFBheW1lbnQuIE9ubHkgV2hpdGVsaXN0ZWQgVG9rZW5zIGFyZSBhY2NlcHRlZC4DCQECIT0CCAUDcG10B2Fzc2V0SWQJANkEAQUMRW50ZXJBc3NldElECQACAQkArAICAjBJbmNvcnJlY3QgYXNzZXQgYXR0YWNoZWQsIHBsZWFzZSBhdHRhY2ggb3Igc2VuZCAFDEVudGVyQXNzZXRJRAMJAAACBQ9DaGVja1hUTkJhbGFuY2UAAAkAAgECZVN3YXAgUGFpciBOZWVkIHRvIEFkZCBMaXF1aWRpdHkgZmlyc3QgaW50byBQb29sLiBPbmx5IEFmdGVyIHRoYXQgUGFpciB3aWxsIGJlIGFjdGl2YXRlZCBmb3IgU3dhcHBpbmcuAwkAAAIFEUNoZWNrQXNzZXRCYWxhbmNlAAAJAAIBAmVTd2FwIFBhaXIgTmVlZCB0byBBZGQgTGlxdWlkaXR5IGZpcnN0IGludG8gUG9vbC4gT25seSBBZnRlciB0aGF0IFBhaXIgd2lsbCBiZSBhY3RpdmF0ZWQgZm9yIFN3YXBwaW5nLgMJAGYCAKCNBgUUcXVhbnRpdHlvZnByaWNlYXNzZXQJAAIBCQCsAgIJAKwCAgI0WW91ciBBdHRhY2hlZCBBc3NldCBBbW91bnQgaXMgdmVyeSBsb3cuIEF0dGFjaCBNb3JlIAUMRW50ZXJBc3NldElEAjogVG9rZW5zIHRvIENsYWltIHRoZSBtaW5pbXVtIEFtb3VudCBvZiAwLjEgZG9sbGFyIGF0bGVhc3QuAwkAZgIFFHF1YW50aXR5b2ZwcmljZWFzc2V0BQ9DaGVja1hUTkJhbGFuY2UJAAIBCQCsAgIJAKwCAgIdUG9vbCBPbmx5IGhhcyBhIExpcXVpZGl0eSBvZiAJAKQDAQkAaQIFD0NoZWNrWFROQmFsYW5jZQkAbAYACgAAAAYAAAAABQdDRUlMSU5HAh4gWFROLiBBZGQgTGlxdWlkaXR5IGludG8gUG9vbC4JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICGVRvdGFsX1N3YXBfRmVlX0NvbGxlY3RlZF8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBRtOZXdTdW11cG9mQXNzZXRUb1hUTlN3YXBGZWUJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgkApAMBCQEJY291bnRkYXlzAAIMX0RheV9Wb2x1bWVfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAUGTmV3VFBWCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICE1RvdGFsX29mX1BhaXJfVHhuc18FDEVudGVyQXNzZXRJRAUGTmV3VFBUCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQFFk5ld1N1bXVwb2ZBc3NldEJhbGFuY2UJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAUUTmV3U3VtdXBvZlhUTkJhbGFuY2UJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBRR1c2VyYmFsYW5jZXRvcmVjZWl2ZQUKWFROQXNzZXRJRAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBRFDb2xsZWN0RmVlQWRkcmVzcwUQU3dhcEZlZXRvcmVjZWl2ZQUKWFROQXNzZXRJRAUDbmlsAWkBF1N3YXBYVE5Ub0Fzc2V0UGFpckVudHJ5AQxFbnRlckFzc2V0SUQEDWNhbGxlcmFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQDcG10AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAkQMCCAUBaQhwYXltZW50cwAACQACAQkArAICCQCsAgICBU9ubHkgCQDYBAEFClhUTkFzc2V0SUQCMSBYVE4gVG9rZW4gaXMgcmVxdWlyZWQgYXMgYW4gQXR0YWNoZWQgcGF5bWVudFsxXS4ED0NoZWNrWFROQmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBBFDaGVja0Fzc2V0QmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBBFuZXdiYWxhbmNlb2ZBc3NldAkAawMFD0NoZWNrWFROQmFsYW5jZQURQ2hlY2tBc3NldEJhbGFuY2UJAGQCBQ9DaGVja1hUTkJhbGFuY2UIBQNwbXQGYW1vdW50BBRxdWFudGl0eW9mcHJpY2Vhc3NldAkAZQIFEUNoZWNrQXNzZXRCYWxhbmNlBRFuZXdiYWxhbmNlb2ZBc3NldAQZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAkAnQgCBQR0aGlzCQCsAgICCFBhaXJfVVZfBQxFbnRlckFzc2V0SUQEB1N3YXBGZWUAAwQQU3dhcEZlZXRvcmVjZWl2ZQkAaQIJAGgCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUHU3dhcEZlZQDoBwQUdXNlcmJhbGFuY2V0b3JlY2VpdmUJAGUCCQBlAgUUcXVhbnRpdHlvZnByaWNlYXNzZXQFEFN3YXBGZWV0b3JlY2VpdmUFEFN3YXBGZWV0b3JlY2VpdmUEGFN1bXVwb2ZYVE5Ub0Fzc2V0U3dhcEZlZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgICGVRvdGFsX1N3YXBfRmVlX0NvbGxlY3RlZF8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQbTmV3U3VtdXBvZlhUTlRvQXNzZXRTd2FwRmVlCQBkAgkAZAIFGFN1bXVwb2ZYVE5Ub0Fzc2V0U3dhcEZlZQUQU3dhcEZlZXRvcmVjZWl2ZQUQU3dhcEZlZXRvcmVjZWl2ZQQRU3VtdXBBc3NldEJhbGFuY2UEByRtYXRjaDAJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBZOZXdTdW11cG9mQXNzZXRCYWxhbmNlCQBkAgkAZQIFEUNoZWNrQXNzZXRCYWxhbmNlBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUQU3dhcEZlZXRvcmVjZWl2ZQQPU3VtdXBYVE5CYWxhbmNlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQUTmV3U3VtdXBvZlhUTkJhbGFuY2UJAGQCBQ9DaGVja1hUTkJhbGFuY2UIBQNwbXQGYW1vdW50BARUT1BUBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICE1RvdGFsX29mX1BhaXJfVHhuc18FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQGTmV3VFBUCQBkAgUEVE9QVAABBARUT1BWBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICCQCsAgIJAKQDAQkBCWNvdW50ZGF5cwACDF9EYXlfVm9sdW1lXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEBk5ld1RQVgkAZAIFBFRPUFYIBQNwbXQGYW1vdW50AwkBAiE9AgUZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAUMRW50ZXJBc3NldElECQACAQIrUGFpciBpcyBub3QgYXZhaWxhYmxlIGluIFdoaXRlbGlzdGVkIEFzc2V0LgMJAAACBQxFbnRlckFzc2V0SUQJANgEAQUKWFROQXNzZXRJRAkAAgECd0lucHV0IGNhbiBOZXZlciBiZSBhIFhUTiBBc3NldElELiBFbnRlciBXaGl0ZWxpc3RlZCBBc3NldElEIGluIGlucHV0ICYgQXR0YWNoIFhUTiBhcyBhbiBhdHRhY2htZW50IFRva2VuIGluIHBheW1lbnRbMV0uAwkBAiE9AggFA3BtdAdhc3NldElkBQpYVE5Bc3NldElECQACAQJ7WW91IGNhbiBBdHRhY2ggWFROIGFzIGFuIEF0dGFjaGVkIFBheW1lbnRbMV0gdG8gU3dhcCBYVE4gVG8gUmVxdWlyZWQgVG9rZW4uIEFueSBvdGhlciBhc3NldCBlbHNlIHRoYW4gWFROIHdpbGwgYmUgcmVqZWN0ZWQuAwkAZgIAoI0GCAUDcG10BmFtb3VudAkAAgECWVlvdXIgQXR0YWNoZWQgWFROIEFtb3VudCBpcyB2ZXJ5IGxvdy4gQXR0YWNoIEF0bGVhc3QgMC4xIFhUTiB0byBDbGFpbSB0aGUgbWluaW11bSBUb2tlbnMuAwkAAAIFD0NoZWNrWFROQmFsYW5jZQAACQACAQJlU3dhcCBQYWlyIE5lZWQgdG8gQWRkIExpcXVpZGl0eSBmaXJzdCBpbnRvIFBvb2wuIE9ubHkgQWZ0ZXIgdGhhdCBQYWlyIHdpbGwgYmUgYWN0aXZhdGVkIGZvciBTd2FwcGluZy4DCQAAAgURQ2hlY2tBc3NldEJhbGFuY2UAAAkAAgECZVN3YXAgUGFpciBOZWVkIHRvIEFkZCBMaXF1aWRpdHkgZmlyc3QgaW50byBQb29sLiBPbmx5IEFmdGVyIHRoYXQgUGFpciB3aWxsIGJlIGFjdGl2YXRlZCBmb3IgU3dhcHBpbmcuAwkAZgIFFHF1YW50aXR5b2ZwcmljZWFzc2V0BRFDaGVja0Fzc2V0QmFsYW5jZQkAAgEJAKwCAgkArAICAh1Qb29sIE9ubHkgaGFzIGEgTGlxdWlkaXR5IG9mIAkApAMBBRFDaGVja0Fzc2V0QmFsYW5jZQIhIFRva2Vucy4gQWRkIExpcXVpZGl0eSBpbnRvIFBvb2wuCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICGVRvdGFsX1N3YXBfRmVlX0NvbGxlY3RlZF8FDEVudGVyQXNzZXRJRAUbTmV3U3VtdXBvZlhUTlRvQXNzZXRTd2FwRmVlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICCQCsAgIJAKQDAQkBCWNvdW50ZGF5cwACDF9EYXlfVm9sdW1lXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQFBk5ld1RQVgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAhNUb3RhbF9vZl9QYWlyX1R4bnNfBQxFbnRlckFzc2V0SUQFBk5ld1RQVAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBRZOZXdTdW11cG9mQXNzZXRCYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQFFE5ld1N1bXVwb2ZYVE5CYWxhbmNlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUUdXNlcmJhbGFuY2V0b3JlY2VpdmUJANkEAQUMRW50ZXJBc3NldElECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFEUNvbGxlY3RGZWVBZGRyZXNzBRBTd2FwRmVldG9yZWNlaXZlCQDZBAEFDEVudGVyQXNzZXRJRAUDbmlsAWkBDEFkZExpcXVpZGl0eQEMRW50ZXJBc3NldElEBA1jYWxsZXJhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEBHBtdDEJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQEcG10MgkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwABBBljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90CQCdCAIFBHRoaXMJAKwCAgIIUGFpcl9VVl8FDEVudGVyQXNzZXRJRAQOUmVpc3N1ZWFzc2V0SWQJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgIDTFBfBQxFbnRlckFzc2V0SUQCLExQIFRva2VuIGlzIE1pc3Npbmcgb3IgTWF5IGJlIG5vdCBHZW5lcmF0ZWQuBA9DaGVja1hUTkJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAQRQ2hlY2tBc3NldEJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAQMZGVjaW1hbHNpbmZvCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQxFbnRlckFzc2V0SUQJAKwCAgkArAICAgZBc3NldCAFDEVudGVyQXNzZXRJRAIOIGRvZXNuJ3QgZXhpc3QECGRlY2ltYWxzCAUMZGVjaW1hbHNpbmZvCGRlY2ltYWxzBARhcmcxBQ9DaGVja1hUTkJhbGFuY2UEBGFyZzIFEUNoZWNrQXNzZXRCYWxhbmNlBAVhcmdzMwkAbAYJAGgCCQBpAgkAaAIFBGFyZzEAwIQ9BQRhcmcyCQBsBgAKAAAFCGRlY2ltYWxzAAAAAAUHQ0VJTElORwAAAAEAAAAABQdDRUlMSU5HBBJib3RoYXNzZXRzZGVjaW1hbHMJAGQCAAYFCGRlY2ltYWxzBA1zaGFyZWRlY2ltYWxzCQBpAgUSYm90aGFzc2V0c2RlY2ltYWxzAAIEFnF1YW50aXR5b2ZFbnRlckFzc2V0SUQJAGsDBQVhcmdzMwgFBHBtdDEGYW1vdW50CQBsBgAKAAAFEmJvdGhhc3NldHNkZWNpbWFscwAAAAAFB0NFSUxJTkcEEnF1YW50aXR5b2ZMUFRva2VuMQkAbAYJAGgCCQBrAwgFBHBtdDEGYW1vdW50AAEJAGwGAAoAAAUIZGVjaW1hbHMAAAAABQdDRUlMSU5HCQBrAwgFBHBtdDIGYW1vdW50AAEJAGwGAAoAAAAGAAAAAAUHQ0VJTElORwAAAAUAAQUNc2hhcmVkZWNpbWFscwUERE9XTgQQWFROSG9sZGluZ0luUGFpcgQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEE05ld1hUTkhvbGRpbmdJblBhaXIJAGQCBRBYVE5Ib2xkaW5nSW5QYWlyCAUEcG10MgZhbW91bnQEEkFzc2V0SG9sZGluZ0luUGFpcgQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEFU5ld0Fzc2V0SG9sZGluZ0luUGFpcgkAZAIFEkFzc2V0SG9sZGluZ0luUGFpcggFBHBtdDEGYW1vdW50BA1MUFRva2VuSXNzdWVkBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBBOZXdMUFRva2VuSXNzdWVkCQBkAgUNTFBUb2tlbklzc3VlZAUScXVhbnRpdHlvZkxQVG9rZW4xAwkBAiE9AgUZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAUMRW50ZXJBc3NldElECQACAQIrUGFpciBpcyBub3QgYXZhaWxhYmxlIGluIFdoaXRlbGlzdGVkIEFzc2V0LgMJAAACBQxFbnRlckFzc2V0SUQJANgEAQUKWFROQXNzZXRJRAkAAgECkAFJbnB1dCBjYW4gTmV2ZXIgYmUgYSBYVE4gQXNzZXRJRC4gRW50ZXIgV2hpdGVsaXN0ZWQgQXNzZXRJRCBpbiBpbnB1dCBhcyB3ZWxsIGFzIGluIHBheW1lbnRbMV0gJiBBdHRhY2ggWFROIGFzIGFuIGF0dGFjaG1lbnQgVG9rZW4gaW4gcGF5bWVudFsyXS4DCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAIJAAIBAp0BVHdvIGF0dGFjaGVkIGFzc2V0cyBleHBlY3RlZCBhcyBwYXltZW50IGluIDUwJS01MCUuIEtpbmRseSBBdHRhY2ggcGF5bWVudDEgPSBUb2tlbiB5b3Ugd2FudCB0byBhZGQgZm9yIExpcXVpZGl0eSAmIHBheW1lbnQyID0gRXF1aXZhbGVudCBBbW91bnQgb2YgWFROIFRva2VuLgMJAAACCAUEcG10MQdhc3NldElkBQpYVE5Bc3NldElECQACAQJ2WW91IEF0dGFjaGVkIFhUTiBhc3NldCBpbiBwYXltZW50WzFdLCBwbGVhc2UgYXR0YWNoIG9ubHkgd2hpdGVsaXN0ZWQgVG9rZW4gaW4gcGF5bWVudFsxXSBhbG9uZyB3aXRoIFhUTiBpbiBwYXltZW50WzJdLgMJAQIhPQIIBQRwbXQxB2Fzc2V0SWQJANkEAQUMRW50ZXJBc3NldElECQACAQJrSW5jb3JyZWN0IGFzc2V0IGF0dGFjaGVkIGZvciBMaXF1aWRpdHkgaW4gcGF5bWVudFsxXSwgcGxlYXNlIGF0dGFjaCBTdHJpbmcgQXNzZXQgb3IgV2hpdGVsaXN0ZWQgVG9rZW4gb25seS4DCQECIT0CCAUEcG10MQdhc3NldElkCQDZBAEFDEVudGVyQXNzZXRJRAkAAgECa0luY29ycmVjdCBhc3NldCBhdHRhY2hlZCBmb3IgTGlxdWlkaXR5IGluIHBheW1lbnRbMV0sIHBsZWFzZSBhdHRhY2ggU3RyaW5nIEFzc2V0IG9yIFdoaXRlbGlzdGVkIFRva2VuIG9ubHkuAwkBAiE9AggFBHBtdDIHYXNzZXRJZAUKWFROQXNzZXRJRAkAAgECaVdyb25nIEFzc2V0IEF0dGFjaGVkIGluIHBheW1lbnRzWzJdLCBQbGVhc2UgYXR0YWNoIHBheW1lbnRbMV0gPSBMaXF1aWRpdHkgVG9rZW4gJiBwYXltZW50WzJdID0gWFROIFRva2VuLgMJAGYCAMCWsQIIBQRwbXQyBmFtb3VudAkAAgECU3BsZWFzZSBhdHRhY2ggYXRsZWFzdCA1IFhUTiBpbiBwYXltZW50WzJdICYgRXF1aXZhbGVudCB3b3J0aCBvZiBUb2tlbiBpbiBwYXltZW50WzFdAwkBAiE9AggFBHBtdDIGYW1vdW50BRZxdWFudGl0eW9mRW50ZXJBc3NldElECQACAQkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgJeQXR0YWNoZWQgcGF5bWVudFsyXSBxdHkgaXMgbm90IG1hdGNoaW5nIGFzIHBlciBhdHRhY2hlZCBwYXltZW50WzFdLnBheW1lbnRbMl0gbXVzdCBiZSBhcyBpbnQgWwkApAMBBRZxdWFudGl0eW9mRW50ZXJBc3NldElEAgVdIG9yIAkApAMBCQBrAwUWcXVhbnRpdHlvZkVudGVyQXNzZXRJRAABAMCEPQIBLgkAsgICCQCkAwEFFnF1YW50aXR5b2ZFbnRlckFzc2V0SUQABgIFIFhUTi4DCQBmAgABBRJxdWFudGl0eW9mTFBUb2tlbjEJAAIBCQCsAgIJAKwCAgIgTFAgVG9rZW4gT3V0Y29tZSBpcyBnb2luZyBiZWxvdyAJAKQDAQUNc2hhcmVkZWNpbWFscwI6IERlY2ltYWxzLiBQbGVhc2UgQXR0YWNoIG1pbi4gMSBMUCB0b2tlbiBvciA1IFhUTiBBdGxlYXN0LgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBRNOZXdYVE5Ib2xkaW5nSW5QYWlyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwkA2AQBBQpYVE5Bc3NldElEAgFfBQxFbnRlckFzc2V0SUQFFU5ld0Fzc2V0SG9sZGluZ0luUGFpcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAglUb3RhbF9MUF8FDEVudGVyQXNzZXRJRAUQTmV3TFBUb2tlbklzc3VlZAkAzAgCCQEHUmVpc3N1ZQMFDlJlaXNzdWVhc3NldElkBRJxdWFudGl0eW9mTFBUb2tlbjEGCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUScXVhbnRpdHlvZkxQVG9rZW4xBQ5SZWlzc3VlYXNzZXRJZAUDbmlsAWkBD1JlbW92ZUxpcXVpZGl0eQEMRW50ZXJBc3NldElEBA1jYWxsZXJhZGRyZXNzCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMEA3BtdAMJAAACCQCQAwEIBQFpCHBheW1lbnRzAAEJAJEDAggFAWkIcGF5bWVudHMAAAkAAgECOk5vIHBheW1lbnQgYXR0YWNoZWQsIFBsZWFzZSBBdHRhY2ggTFAgVG9rZW4gYXMgcGF5bWVudFsxXS4EGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBBJSZWlzc3VlYWJsZWFzc2V0SWQJANkEAQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCdCAIFBHRoaXMJAKwCAgIDTFBfBQxFbnRlckFzc2V0SUQCJUxQIFRva2VuIGlzIE1pc3Npbmcgb3Igbm90IEdlbmVyYXRlZC4EDGRlY2ltYWxzaW5mbwkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDsBwEJANkEAQUMRW50ZXJBc3NldElECQCsAgIJAKwCAgIGQXNzZXQgBQxFbnRlckFzc2V0SUQCDiBkb2Vzbid0IGV4aXN0BAhkZWNpbWFscwgFDGRlY2ltYWxzaW5mbwhkZWNpbWFscwQSYm90aGFzc2V0c2RlY2ltYWxzCQBkAgAGBQhkZWNpbWFscwQNc2hhcmVkZWNpbWFscwkAaQIFEmJvdGhhc3NldHNkZWNpbWFscwACBBJDaGVja1RvdGFsTFBBbW91bnQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQEEFVzZXJMUFBlcmNlbnRhZ2UJAGwGCQBrAwgFA3BtdAZhbW91bnQJAGwGAAoAAAAIAAAAAAUHQ0VJTElORwUSQ2hlY2tUb3RhbExQQW1vdW50AAYAAQAAAAYFB0NFSUxJTkcED0NoZWNrWFROQmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwkA2AQBBQpYVE5Bc3NldElEBBFDaGVja0Fzc2V0QmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBA5Vc2VyTFBXb3J0aFhUTgkAawMFD0NoZWNrWFROQmFsYW5jZQUQVXNlckxQUGVyY2VudGFnZQkAbAYACgAAAAgAAAAABQdDRUlMSU5HBBBVc2VyTFBXb3J0aEFzc2V0CQBrAwURQ2hlY2tBc3NldEJhbGFuY2UFEFVzZXJMUFBlcmNlbnRhZ2UJAGwGAAoAAAAIAAAAAAUHQ0VJTElORwQQWFROSG9sZGluZ0luUGFpcgQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfCQDYBAEFClhUTkFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEE05ld1hUTkhvbGRpbmdJblBhaXIJAGUCBRBYVE5Ib2xkaW5nSW5QYWlyBQ5Vc2VyTFBXb3J0aFhUTgQSQXNzZXRIb2xkaW5nSW5QYWlyBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfCQDYBAEFClhUTkFzc2V0SUQCAV8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQVTmV3QXNzZXRIb2xkaW5nSW5QYWlyCQBlAgUSQXNzZXRIb2xkaW5nSW5QYWlyBRBVc2VyTFBXb3J0aEFzc2V0BA1MUFRva2VuSXNzdWVkBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBBOZXdMUFRva2VuSXNzdWVkCQBlAgUNTFBUb2tlbklzc3VlZAgFA3BtdAZhbW91bnQDCQECIT0CBRljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90BQxFbnRlckFzc2V0SUQJAAIBAiNQYWlyIGlzIG5vdCBhdmFpbGFibGUgaW4gV2hpdGVsaXN0LgMJAAACCQDZBAEFDEVudGVyQXNzZXRJRAUKWFROQXNzZXRJRAkAAgECakRvbid0IGNob29zZSBYVE4gQXNzZXRJRCBhcyBJbnB1dCwgT25seSBXaGl0ZWxpc3RlZCBBc3NldCBhcyBJbnB1dCBTdHJpbmcgJiBBdHRhY2ggTFAgVG9rZW5zIGFzIHBheW1lbnRbMV0DCQECIT0CCAUDcG10B2Fzc2V0SWQFElJlaXNzdWVhYmxlYXNzZXRJZAkAAgECR1dyb25nIEFzc2V0IGlzIGF0dGFjaGVkIGluIHBheW1lbnRbMV0gb3IgTFAgVG9rZW4gTm90IEZvdW5kIG9yIE1pc3NpbmcuAwkAZgIAAQUQVXNlckxQUGVyY2VudGFnZQkAAgECLllvdXIgTFAgVG9rZW4gYW1vdW50ICUgaXMgdmVyeSBsb3cgdG8gY29udmVydC4DCQBmAgABBQ5Vc2VyTFBXb3J0aFhUTgkAAgECUVlvdXIgTFAgVG9rZW4gY29udmVyc2lvbiBhbW91bnQgaXMgdmVyeSBsb3cgdG8gY29udmVydCBvciBsZXNzIHRoYW4gMC4wMDAwMDEgWFROLgMJAGYCAAEFEFVzZXJMUFdvcnRoQXNzZXQJAAIBAlxZb3VyIExQIFRva2VuIGNvbnZlcnNpb24gYW1vdW50IGlzIHZlcnkgbG93IHRvIGNvbnZlcnQgb3IgbGVzcyB0aGFuIGZyYWN0aW9uIHZhbHVlIG9mIFRva2VuLgkAzAgCCQEMSW50ZWdlckVudHJ5AgIWV2l0aGRyYXdfTFBfUGVyY2VudGFnZQUQVXNlckxQUGVyY2VudGFnZQkAzAgCCQEEQnVybgIFElJlaXNzdWVhYmxlYXNzZXRJZAgFA3BtdAZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQFEE5ld0xQVG9rZW5Jc3N1ZWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8JANgEAQUKWFROQXNzZXRJRAUTTmV3WFROSG9sZGluZ0luUGFpcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8JANgEAQUKWFROQXNzZXRJRAIBXwUMRW50ZXJBc3NldElEBRVOZXdBc3NldEhvbGRpbmdJblBhaXIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQ5Vc2VyTFBXb3J0aFhUTgUKWFROQXNzZXRJRAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFEFVzZXJMUFdvcnRoQXNzZXQJANkEAQUMRW50ZXJBc3NldElEBQNuaWwBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5sF4Aug==",
    "height": 2763372,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2twHswFtBcK6LjUuVtXgg2ohhHR5Jr2GWji7zFzsV9z3
Next: BV2X9VMoKP45Cpbpe6GEM4vv3phP4ww5vBa1yDcYSoqQ

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

Old	New		Differences
180	180		0
181	181		}
182	182		let NewTPT = (TOPT + 1)
	183	+	let TOPV = match getIntegerValue(this, ((((toString(countdays()) + "_Day_Volume_") + EnterAssetID) + "_") + toBase58String(XTNAssetID))) {
	184	+	case a: Int =>
	185	+	a
	186	+	case _ =>
	187	+	0
	188	+	}
	189	+	let NewTPV = (TOPV + pmt.amount)
183	190		if ((checkpairisavailableornot != EnterAssetID))
184	191		then throw("Pair is not available in Whitelisted Asset.")
185	192		else if ((EnterAssetID == toBase58String(XTNAssetID)))

194	201		then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
195	202		else if ((quantityofpriceasset > CheckAssetBalance))
196	203		then throw((("Pool Only has a Liquidity of " + toString(CheckAssetBalance)) + " Tokens. Add Liquidity into Pool."))
197		-	else [IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), NewSumupofXTNToAssetSwapFee), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + toBase58String(XTNAssetID)) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + toBase58String(XTNAssetID)), NewSumupofXTNBalance), ScriptTransfer(i.caller, userbalancetoreceive, fromBase58String(EnterAssetID)), ScriptTransfer(CollectFeeAddress, SwapFeetoreceive, fromBase58String(EnterAssetID))]
	204	+	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))]
198	205		}
199	206
200	207

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

github/deemru/w8io/169f3d6 
83.61 ms ◑