w8 · tx · 334···QRw

tx · 3341mtjsq7CD686stViZX1CzungQjxhqSQVwcVv34QRw

3N543hU44PUZ7WRHcfMkAw5LqFswAAaVHgM:  -0.01700000 Waves

2023.09.30 12:34 [2777972] smart account 3N543hU44PUZ7WRHcfMkAw5LqFswAAaVHgM > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3341mtjsq7CD686stViZX1CzungQjxhqSQVwcVv34QRw",
    "fee": 1700000,
    "feeAssetId": null,
    "timestamp": 1696066466999,
    "version": 2,
    "chainId": 84,
    "sender": "3N543hU44PUZ7WRHcfMkAw5LqFswAAaVHgM",
    "senderPublicKey": "77iKzLEpg6rZvwvKZsPi7h1LBp9vgnDVRm44GdvNaVLQ",
    "proofs": [
        "MCdN9nHqmmXda5ifbpXoLCgjFcDZAYk3tskXm1hskyCZkQJFx8HYx6tDysvP83zzRjJFhrZdDtW9Wyh1FVBnQ8L"
    ],
    "script": "base64:BgIbCAISAwoBCBIDCgEIEgMKAQgSAwoBCBIDCgEICQAHVmVyc2lvbgIFMS4wLjAADmRBcHBTaW5jZVN0YXJ0AMD394yqMQALbGlzdGluZ19mZWUAgL/WBgAJa2V5MW93bmVyCQCnCAEBIC/MI9BPmHcpgjiz5B78lMslen9dOa5R2YaEtWjFpqZ7AAlrZXkyb3duZXIJAKcIAQEgg5XQHCRf0R38aPOY+n+4hhhB0YUiROU26xolJsRPOToACFRyZWFzdXJ5CQCnCAEBIM5I33N6c2d5KKDAZ8tN4OBxB27+QPlqeRoX3O6huCQBAAxXQVZFU0Fzc2V0SUQFBHVuaXQADldBVkVTQXNzZXROQU1FAgVXQVZFUwEJY291bnRkYXlzAAQHVFNfRGlmZgkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQ5kQXBwU2luY2VTdGFydAQJZGF5bnVtYmVyCQBrAwABBQdUU19EaWZmAIC4mSkFCWRheW51bWJlcgUBaQEMUmVnaXN0ZXJQYWlyAQxFbnRlckFzc2V0SUQEBHBtdDEJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQEcG10MgkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwABBARwbXQzCQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAIECmN1cnJlbnRLZXkJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQFV0FWRVMJAQEhAQkBCWlzRGVmaW5lZAEIBQRwbXQyB2Fzc2V0SWQECWZldGNocGFpcgkAnQgCBQR0aGlzCQCsAgICCFBhaXJfVVZfBQxFbnRlckFzc2V0SUQEDWFzc2V0aW5mb3BtdDIJANkEAQUMRW50ZXJBc3NldElEBARpbmZvCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQxFbnRlckFzc2V0SUQJAKwCAgkArAICAgZBc3NldCAFDEVudGVyQXNzZXRJRAIOIGRvZXNuJ3QgZXhpc3QEBG5hbWUIBQRpbmZvBG5hbWUECGRlY2ltYWxzCAUEaW5mbwhkZWNpbWFscwQSZ2V0X2Fzc2V0X2RlY2ltYWxzCQBsBgAKAAAFCGRlY2ltYWxzAAAAAAUHQ0VJTElORwQSZ2V0X1dBVkVTX2RlY2ltYWxzCQBsBgAKAAAACAAAAAAFB0NFSUxJTkcEEHVuaXRfdG9rZW5fcHJpY2UJAGsDCAUEcG10MQZhbW91bnQFEmdldF9hc3NldF9kZWNpbWFscwgFBHBtdDIGYW1vdW50BApMUGRlY2ltYWxzCQBrAwkAZAIFCGRlY2ltYWxzAAgAAQACBApGaXJzdExQUXR5CQBoAgABCQBsBgAKAAAFCkxQZGVjaW1hbHMAAAAABQdDRUlMSU5HBBBtdWx0aXBseV9hbW91bnRzCQBrAwgFBHBtdDEGYW1vdW50CAUEcG10MgZhbW91bnQFCkZpcnN0TFBRdHkEB2dldFNxcnQJAQRzcXJ0BAUQbXVsdGlwbHlfYW1vdW50cwUKTFBkZWNpbWFscwUKTFBkZWNpbWFscwUHQ0VJTElORwQHTFBpc3N1ZQkAwggFCQCsAgIJAKwCAgIDTFAtCQCvAgIFBG5hbWUABwIGLVdBVkVTCQCsAgIJAKwCAgkArAICCQCsAgICA0xQLQUEbmFtZQIGLVdBVkVTAi4gaXMgYSBMaXF1aWRpdHkgUHJvdmlkZXIgVG9rZW4gSXNzdWVkIEFnYWluc3QgBQxFbnRlckFzc2V0SUQFB2dldFNxcnQFCkxQZGVjaW1hbHMGBARMUGlkCQC4CAEFB0xQaXNzdWUDCQAAAgUJZmV0Y2hwYWlyBQxFbnRlckFzc2V0SUQJAAIBAhtQYWlyIEFscmVhZHkgRXhpc3QgaW4gTGlzdC4DCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAMJAAIBCQCsAgIJAKwCAgKHAVR3byBhdHRhY2hlZCBhc3NldHMgZXhwZWN0ZWQgYXMgcGF5bWVudC4gS2luZGx5IEF0dGFjaCBwYXltZW50MSA9IFdBVkVTIFRva2VuIEFtb3VudCAmIHBheW1lbnQyID0gVG9rZW4geW91IHdhbnQgdG8gTGlzdCAmIHBheW1lbnQzID0gWwkApAMBBQtsaXN0aW5nX2ZlZQIcLzEwXjhdIFdhdmVzIGFzIExpc3RpbmcgRmVlLgMJAQlpc0RlZmluZWQBCAUEcG10MQdhc3NldElkCQACAQJBSW5jb3JyZWN0IGFzc2V0IGF0dGFjaGVkIGFzIHBheW1lbnRbMV0sIHBsZWFzZSBhdHRhY2ggV0FWRVMgb25seS4DCQBmAgCAreIECAUEcG10MQZhbW91bnQJAAIBAlNBdHRhY2hlZCBwYXltZW50WzFdIGFtb3VudCBpcyBsZXNzIHRoYW4gMC4xIFdBVkVTLCBwbGVhc2UgYXR0YWNoIDAuMSBXQVZFUyBNaW5pbXVtLgMJAQIhPQIIBQRwbXQyB2Fzc2V0SWQFDWFzc2V0aW5mb3BtdDIJAAIBAjxJbnB1dCBTdHJpbmcgJiBBdHRhY2hlZCBBc3NldElEIGluIHBheW1lbnQyIGlzIG5vdCBtYXRjaGluZy4DCQECIT0CCAUEcG10MwZhbW91bnQFC2xpc3RpbmdfZmVlCQACAQkArAICCQCsAgICLEF0dGFjaGVkIHBheW1lbnRbM10gYW1vdW50IGhhcyB0byBiZSBleGFjdCBbCQCkAwEFC2xpc3RpbmdfZmVlAg0vMTBeOF0gV0FWRVMuAwkAAAIFBVdBVkVTBgkAAgECXVlvdSBBdHRhY2hlZCBXQVZFUyBBc3NldCBJRCBmb3IgTGlzdGluZywgcGxlYXNlIGF0dGFjaCBUb2tlbnMgWW91IHdhbnQgdG8gbGlzdCBpbiBwYXltZW50WzJdLgMJAGYCAGQFEHVuaXRfdG9rZW5fcHJpY2UJAAIBAnFMUCBUb2tlbiBPdXRjb21lIGlzIGdvaW5nIGJlbG93IDEwMCBpbiBGcmFjdGlvbmFsLiBQbGVhc2UgQXR0YWNoIG1vcmUgdG9rZW5zIGFtb3VudCBpbiBwYXltZW50WzFdIGFuZCBwYXltZW50WzJdLgMJAGYCAAEFB2dldFNxcnQJAAIBAmhMUCBUb2tlbiBPdXRjb21lIGlzIGdvaW5nIGJlbG93IDEgaW4gRnJhY3Rpb25hbC4gUGxlYXNlIEF0dGFjaCBtb3JlIGFtb3VudCBpbiBwYXltZW50WzFdIGFuZCBwYXltZW50WzJdLgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgICCFBhaXJfVVZfBQxFbnRlckFzc2V0SUQFDEVudGVyQXNzZXRJRAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAgxMaXN0aW5nX0ZlZV8FDEVudGVyQXNzZXRJRAgFBHBtdDMGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfBQ5XQVZFU0Fzc2V0TkFNRQgFBHBtdDEGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUOV0FWRVNBc3NldE5BTUUCAV8FDEVudGVyQXNzZXRJRAgFBHBtdDIGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICE1RvdGFsX29mX1BhaXJfVHhuc18FDEVudGVyQXNzZXRJRAAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAhlUb3RhbF9Td2FwX0ZlZV9Db2xsZWN0ZWRfBQxFbnRlckFzc2V0SUQCAV8FDldBVkVTQXNzZXROQU1FAAAJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEAAAJAMwIAgUHTFBpc3N1ZQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFB2dldFNxcnQFBExQaWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUJa2V5MW93bmVyCQBrAwULbGlzdGluZ19mZWUAAQACBQR1bml0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCWtleTJvd25lcgkAawMFC2xpc3RpbmdfZmVlAAEAAgUEdW5pdAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgICA0xQXwUMRW50ZXJBc3NldElECQDYBAEFBExQaWQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIJVG90YWxfTFBfBQxFbnRlckFzc2V0SUQFB2dldFNxcnQFA25pbAFpARlTd2FwQXNzZXRUb1dBVkVTUGFpckVudHJ5AQxFbnRlckFzc2V0SUQEDWNhbGxlcmFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQDcG10AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAkQMCCAUBaQhwYXltZW50cwAACQACAQI1V2hpdGVsaXN0ZWQgVG9rZW4gaXMgcmVxdWlyZWQgYXMgQXR0YWNoZWQgcGF5bWVudFsxXS4EGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBBFDaGVja1dBVkVTQmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwUOV0FWRVNBc3NldE5BTUUEEUNoZWNrQXNzZXRCYWxhbmNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUOV0FWRVNBc3NldE5BTUUCAV8FDEVudGVyQXNzZXRJRAQRbmV3YmFsYW5jZW9mV0FWRVMJAGsDBRFDaGVja1dBVkVTQmFsYW5jZQURQ2hlY2tBc3NldEJhbGFuY2UJAGQCBRFDaGVja0Fzc2V0QmFsYW5jZQgFA3BtdAZhbW91bnQEFHF1YW50aXR5b2ZwcmljZWFzc2V0CQBlAgURQ2hlY2tXQVZFU0JhbGFuY2UFEW5ld2JhbGFuY2VvZldBVkVTBAdTd2FwRmVlAAUECkN1cnJlbnRkYXkJAQljb3VudGRheXMABBBTd2FwRmVldG9yZWNlaXZlCQBpAgkAaAIFFHF1YW50aXR5b2ZwcmljZWFzc2V0BQdTd2FwRmVlAOgHBBR1c2VyYmFsYW5jZXRvcmVjZWl2ZQkAZQIJAGUCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUQU3dhcEZlZXRvcmVjZWl2ZQUQU3dhcEZlZXRvcmVjZWl2ZQQaU3VtdXBvZkFzc2V0VG9XQVZFU1N3YXBGZWUEByRtYXRjaDAJAJoIAgUEdGhpcwkArAICCQCsAgIJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEAgFfBQ5XQVZFU0Fzc2V0TkFNRQMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQdTmV3U3VtdXBvZkFzc2V0VG9XQVZFU1N3YXBGZWUJAGQCCQBkAgUaU3VtdXBvZkFzc2V0VG9XQVZFU1N3YXBGZWUFEFN3YXBGZWV0b3JlY2VpdmUFEFN3YXBGZWV0b3JlY2VpdmUEEVN1bXVwQXNzZXRCYWxhbmNlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQ5XQVZFU0Fzc2V0TkFNRQIBXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBZOZXdTdW11cG9mQXNzZXRCYWxhbmNlCQBkAgURQ2hlY2tBc3NldEJhbGFuY2UIBQNwbXQGYW1vdW50BBFTdW11cFdBVkVTQmFsYW5jZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfBQ5XQVZFU0Fzc2V0TkFNRQMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQWTmV3U3VtdXBvZldBVkVTQmFsYW5jZQkAZAIJAGUCBRFDaGVja1dBVkVTQmFsYW5jZQUUcXVhbnRpdHlvZnByaWNlYXNzZXQFEFN3YXBGZWV0b3JlY2VpdmUEBFRPUFQEByRtYXRjaDAJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgITVG90YWxfb2ZfUGFpcl9UeG5zXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABAZOZXdUUFQJAGQCBQRUT1BUAAEDCQAAAgUMRW50ZXJBc3NldElEBQ5XQVZFU0Fzc2V0TkFNRQkAAgEChwFJbnB1dCBjYW4gTmV2ZXIgYmUgYSBXQVZFUyBBc3NldElELiBFbnRlciBXaGl0ZWxpc3RlZCBBc3NldElEIGluIGlucHV0ICYgQXR0YWNoIFdoaXRlbGlzdGVkIEFzc2V0IGFzIGFuIGF0dGFjaG1lbnQgVG9rZW4gaW4gcGF5bWVudFsxXS4DCQECIT0CBRljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90BQxFbnRlckFzc2V0SUQJAAIBAitQYWlyIGlzIG5vdCBhdmFpbGFibGUgaW4gV2hpdGVsaXN0ZWQgQXNzZXQuAwkAAAIIBQNwbXQHYXNzZXRJZAUMV0FWRVNBc3NldElECQACAQJUWW91IGNhbid0IEF0dGFjaCBXQVZFUyBhcyBhbiBBdHRhY2hlZCBQYXltZW50LiBPbmx5IFdoaXRlbGlzdGVkIFRva2VucyBhcmUgYWNjZXB0ZWQuAwkBAiE9AggFA3BtdAdhc3NldElkCQDZBAEFDEVudGVyQXNzZXRJRAkAAgEJAKwCAgIwSW5jb3JyZWN0IGFzc2V0IGF0dGFjaGVkLCBwbGVhc2UgYXR0YWNoIG9yIHNlbmQgBQxFbnRlckFzc2V0SUQDCQAAAgURQ2hlY2tXQVZFU0JhbGFuY2UAAAkAAgECZVN3YXAgUGFpciBOZWVkIHRvIEFkZCBMaXF1aWRpdHkgZmlyc3QgaW50byBQb29sLiBPbmx5IEFmdGVyIHRoYXQgUGFpciB3aWxsIGJlIGFjdGl2YXRlZCBmb3IgU3dhcHBpbmcuAwkAAAIFEUNoZWNrQXNzZXRCYWxhbmNlAAAJAAIBAmVTd2FwIFBhaXIgTmVlZCB0byBBZGQgTGlxdWlkaXR5IGZpcnN0IGludG8gUG9vbC4gT25seSBBZnRlciB0aGF0IFBhaXIgd2lsbCBiZSBhY3RpdmF0ZWQgZm9yIFN3YXBwaW5nLgMJAGYCAICt4gQFFHF1YW50aXR5b2ZwcmljZWFzc2V0CQACAQkArAICCQCsAgICNFlvdXIgQXR0YWNoZWQgQXNzZXQgQW1vdW50IGlzIHZlcnkgbG93LiBBdHRhY2ggTW9yZSAFDEVudGVyQXNzZXRJRAI6IFRva2VucyB0byBDbGFpbSB0aGUgbWluaW11bSBBbW91bnQgb2YgMC4xIGRvbGxhciBhdGxlYXN0LgMJAGYCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAURQ2hlY2tXQVZFU0JhbGFuY2UJAAIBCQCsAgIJAKwCAgIdUG9vbCBPbmx5IGhhcyBhIExpcXVpZGl0eSBvZiAJAKQDAQkAaQIFEUNoZWNrV0FWRVNCYWxhbmNlCQBsBgAKAAAACAAAAAAFB0NFSUxJTkcCICBXQVZFUy4gQWRkIExpcXVpZGl0eSBpbnRvIFBvb2wuCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAhlUb3RhbF9Td2FwX0ZlZV9Db2xsZWN0ZWRfBQxFbnRlckFzc2V0SUQCAV8FDldBVkVTQXNzZXROQU1FBR1OZXdTdW11cG9mQXNzZXRUb1dBVkVTU3dhcEZlZQkAzAgCCQEMSW50ZWdlckVudHJ5AgILQ3VycmVudF9EYXkFCkN1cnJlbnRkYXkJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgITVG90YWxfb2ZfUGFpcl9UeG5zXwUMRW50ZXJBc3NldElEBQZOZXdUUFQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQ5XQVZFU0Fzc2V0TkFNRQIBXwUMRW50ZXJBc3NldElEBRZOZXdTdW11cG9mQXNzZXRCYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfBQ5XQVZFU0Fzc2V0TkFNRQUWTmV3U3VtdXBvZldBVkVTQmFsYW5jZQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFFHVzZXJiYWxhbmNldG9yZWNlaXZlBQxXQVZFU0Fzc2V0SUQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUJa2V5MW93bmVyCQBrAwUQU3dhcEZlZXRvcmVjZWl2ZQABAAMFDFdBVkVTQXNzZXRJRAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQlrZXkyb3duZXIJAGsDBRBTd2FwRmVldG9yZWNlaXZlAAEAAwUMV0FWRVNBc3NldElECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCFRyZWFzdXJ5CQBrAwUQU3dhcEZlZXRvcmVjZWl2ZQABAAMFDFdBVkVTQXNzZXRJRAUDbmlsAWkBGVN3YXBXQVZFU1RvQXNzZXRQYWlyRW50cnkBDEVudGVyQXNzZXRJRAQNY2FsbGVyYWRkcmVzcwkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzBANwbXQDCQAAAgkAkAMBCAUBaQhwYXltZW50cwABCQCRAwIIBQFpCHBheW1lbnRzAAAJAAIBCQCsAgIJAKwCAgIFT25seSAFDldBVkVTQXNzZXROQU1FAi0gVG9rZW4gaXMgcmVxdWlyZWQgYXMgYW4gQXR0YWNoZWQgcGF5bWVudFsxXS4EEUNoZWNrV0FWRVNCYWxhbmNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfBQ5XQVZFU0Fzc2V0TkFNRQQRQ2hlY2tBc3NldEJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQ5XQVZFU0Fzc2V0TkFNRQIBXwUMRW50ZXJBc3NldElEBBFuZXdiYWxhbmNlb2ZBc3NldAkAawMFEUNoZWNrV0FWRVNCYWxhbmNlBRFDaGVja0Fzc2V0QmFsYW5jZQkAZAIFEUNoZWNrV0FWRVNCYWxhbmNlCAUDcG10BmFtb3VudAQUcXVhbnRpdHlvZnByaWNlYXNzZXQJAGUCBRFDaGVja0Fzc2V0QmFsYW5jZQURbmV3YmFsYW5jZW9mQXNzZXQEGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBAdTd2FwRmVlAAUECkN1cnJlbnRkYXkJAQljb3VudGRheXMABBBTd2FwRmVldG9yZWNlaXZlCQBpAgkAaAIFFHF1YW50aXR5b2ZwcmljZWFzc2V0BQdTd2FwRmVlAOgHBBR1c2VyYmFsYW5jZXRvcmVjZWl2ZQkAZQIJAGUCBRRxdWFudGl0eW9mcHJpY2Vhc3NldAUQU3dhcEZlZXRvcmVjZWl2ZQUQU3dhcEZlZXRvcmVjZWl2ZQQaU3VtdXBvZldBVkVTVG9Bc3NldFN3YXBGZWUEByRtYXRjaDAJAJoIAgUEdGhpcwkArAICAhlUb3RhbF9Td2FwX0ZlZV9Db2xsZWN0ZWRfBQxFbnRlckFzc2V0SUQDCQABAgUHJG1hdGNoMAIDSW50BAFhBQckbWF0Y2gwBQFhAAAEHU5ld1N1bXVwb2ZXQVZFU1RvQXNzZXRTd2FwRmVlCQBkAgkAZAIFGlN1bXVwb2ZXQVZFU1RvQXNzZXRTd2FwRmVlBRBTd2FwRmVldG9yZWNlaXZlBRBTd2FwRmVldG9yZWNlaXZlBBFTdW11cEFzc2V0QmFsYW5jZQQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUOV0FWRVNBc3NldE5BTUUCAV8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQWTmV3U3VtdXBvZkFzc2V0QmFsYW5jZQkAZAIJAGUCBRFDaGVja0Fzc2V0QmFsYW5jZQUUcXVhbnRpdHlvZnByaWNlYXNzZXQFEFN3YXBGZWV0b3JlY2VpdmUEEVN1bXVwV0FWRVNCYWxhbmNlBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8FDldBVkVTQXNzZXROQU1FAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBZOZXdTdW11cG9mV0FWRVNCYWxhbmNlCQBkAgURQ2hlY2tXQVZFU0JhbGFuY2UIBQNwbXQGYW1vdW50BARUT1BUBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICE1RvdGFsX29mX1BhaXJfVHhuc18FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQGTmV3VFBUCQBkAgUEVE9QVAABAwkBAiE9AgUZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAUMRW50ZXJBc3NldElECQACAQIrUGFpciBpcyBub3QgYXZhaWxhYmxlIGluIFdoaXRlbGlzdGVkIEFzc2V0LgMJAAACBQxFbnRlckFzc2V0SUQFDldBVkVTQXNzZXROQU1FCQACAQJ7SW5wdXQgY2FuIE5ldmVyIGJlIGEgV0FWRVMgQXNzZXRJRC4gRW50ZXIgV2hpdGVsaXN0ZWQgQXNzZXRJRCBpbiBpbnB1dCAmIEF0dGFjaCBXQVZFUyBhcyBhbiBhdHRhY2htZW50IFRva2VuIGluIHBheW1lbnRbMV0uAwkBAiE9AggFA3BtdAdhc3NldElkBQxXQVZFU0Fzc2V0SUQJAAIBCQCsAgIJAKwCAgIPWW91IGNhbiBBdHRhY2ggBQ5XQVZFU0Fzc2V0TkFNRQJtIGFzIGFuIEF0dGFjaGVkIFBheW1lbnRbMV0gdG8gU3dhcCBXQVZFUyBUbyBSZXF1aXJlZCBUb2tlbi4gQW55IG90aGVyIGFzc2V0IGVsc2UgdGhhbiBXQVZFUyB3aWxsIGJlIHJlamVjdGVkLgMJAGYCAICt4gQIBQNwbXQGYW1vdW50CQACAQJdWW91ciBBdHRhY2hlZCBXQVZFUyBBbW91bnQgaXMgdmVyeSBsb3cuIEF0dGFjaCBBdGxlYXN0IDAuMSBXQVZFUyB0byBDbGFpbSB0aGUgbWluaW11bSBUb2tlbnMuAwkAAAIFEUNoZWNrV0FWRVNCYWxhbmNlAAAJAAIBAmVTd2FwIFBhaXIgTmVlZCB0byBBZGQgTGlxdWlkaXR5IGZpcnN0IGludG8gUG9vbC4gT25seSBBZnRlciB0aGF0IFBhaXIgd2lsbCBiZSBhY3RpdmF0ZWQgZm9yIFN3YXBwaW5nLgMJAAACBRFDaGVja0Fzc2V0QmFsYW5jZQAACQACAQJlU3dhcCBQYWlyIE5lZWQgdG8gQWRkIExpcXVpZGl0eSBmaXJzdCBpbnRvIFBvb2wuIE9ubHkgQWZ0ZXIgdGhhdCBQYWlyIHdpbGwgYmUgYWN0aXZhdGVkIGZvciBTd2FwcGluZy4DCQBmAgUUcXVhbnRpdHlvZnByaWNlYXNzZXQFEUNoZWNrQXNzZXRCYWxhbmNlCQACAQkArAICCQCsAgICHVBvb2wgT25seSBoYXMgYSBMaXF1aWRpdHkgb2YgCQCkAwEFEUNoZWNrQXNzZXRCYWxhbmNlAiEgVG9rZW5zLiBBZGQgTGlxdWlkaXR5IGludG8gUG9vbC4JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgIZVG90YWxfU3dhcF9GZWVfQ29sbGVjdGVkXwUMRW50ZXJBc3NldElEBR1OZXdTdW11cG9mV0FWRVNUb0Fzc2V0U3dhcEZlZQkAzAgCCQEMSW50ZWdlckVudHJ5AgILQ3VycmVudF9EYXkFCkN1cnJlbnRkYXkJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgITVG90YWxfb2ZfUGFpcl9UeG5zXwUMRW50ZXJBc3NldElEBQZOZXdUUFQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQ5XQVZFU0Fzc2V0TkFNRQIBXwUMRW50ZXJBc3NldElEBRZOZXdTdW11cG9mQXNzZXRCYWxhbmNlCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfBQ5XQVZFU0Fzc2V0TkFNRQUWTmV3U3VtdXBvZldBVkVTQmFsYW5jZQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFFHVzZXJiYWxhbmNldG9yZWNlaXZlCQDZBAEFDEVudGVyQXNzZXRJRAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQlrZXkxb3duZXIJAGsDBRBTd2FwRmVldG9yZWNlaXZlAAEAAwkA2QQBBQxFbnRlckFzc2V0SUQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUJa2V5Mm93bmVyCQBrAwUQU3dhcEZlZXRvcmVjZWl2ZQABAAMJANkEAQUMRW50ZXJBc3NldElECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFCFRyZWFzdXJ5CQBrAwUQU3dhcEZlZXRvcmVjZWl2ZQABAAMJANkEAQUMRW50ZXJBc3NldElEBQNuaWwBaQEMQWRkTGlxdWlkaXR5AQxFbnRlckFzc2V0SUQEDWNhbGxlcmFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQEcG10MQkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABARwbXQyCQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAEEGWNoZWNrcGFpcmlzYXZhaWxhYmxlb3Jub3QJAJ0IAgUEdGhpcwkArAICAghQYWlyX1VWXwUMRW50ZXJBc3NldElEBA5SZWlzc3VlYXNzZXRJZAkA2QQBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwkArAICAgNMUF8FDEVudGVyQXNzZXRJRAIsTFAgVG9rZW4gaXMgTWlzc2luZyBvciBNYXkgYmUgbm90IEdlbmVyYXRlZC4EEUNoZWNrV0FWRVNCYWxhbmNlCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfBQ5XQVZFU0Fzc2V0TkFNRQQRQ2hlY2tBc3NldEJhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQ5XQVZFU0Fzc2V0TkFNRQIBXwUMRW50ZXJBc3NldElEBAxkZWNpbWFsc2luZm8JARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA7AcBCQDZBAEFDEVudGVyQXNzZXRJRAkArAICCQCsAgICBkFzc2V0IAUMRW50ZXJBc3NldElEAg4gZG9lc24ndCBleGlzdAQIZGVjaW1hbHMIBQxkZWNpbWFsc2luZm8IZGVjaW1hbHMECkxQZGVjaW1hbHMJAGsDCQBkAgUIZGVjaW1hbHMABgABAAIECkZpcnN0TFBRdHkJAGgCAAEJAGwGAAoAAAUKTFBkZWNpbWFscwAAAAAFB0NFSUxJTkcEEG11bHRpcGx5X2Ftb3VudHMJAGsDCAUEcG10MQZhbW91bnQIBQRwbXQyBmFtb3VudAUKRmlyc3RMUFF0eQQHZ2V0U3FydAkBBHNxcnQEBRBtdWx0aXBseV9hbW91bnRzBQpMUGRlY2ltYWxzBQpMUGRlY2ltYWxzBQdDRUlMSU5HBBJnZXRfYXNzZXRfZGVjaW1hbHMJAGwGAAoAAAUIZGVjaW1hbHMAAAAABQdDRUlMSU5HBBJnZXRfV0FWRVNfZGVjaW1hbHMJAGwGAAoAAAAIAAAAAAUHQ0VJTElORwQQdW5pdF90b2tlbl9wcmljZQkAawMFEUNoZWNrV0FWRVNCYWxhbmNlBRJnZXRfYXNzZXRfZGVjaW1hbHMFEUNoZWNrQXNzZXRCYWxhbmNlBBl1c2VyX1dBVkVTX2RlcG9zaXRfYW1vdW50CQBrAwgFBHBtdDEGYW1vdW50BRB1bml0X3Rva2VuX3ByaWNlAAEEGGRpdmlkZV9ieV9hc3NldF9kZWNpbWFscwkAawMFGXVzZXJfV0FWRVNfZGVwb3NpdF9hbW91bnQAAQUSZ2V0X2Fzc2V0X2RlY2ltYWxzBBthY3R1YWxfV0FWRVNfZGVwb3NpdF9hbW91bnQFGGRpdmlkZV9ieV9hc3NldF9kZWNpbWFscwQSV0FWRVNIb2xkaW5nSW5QYWlyBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8FDldBVkVTQXNzZXROQU1FAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBVOZXdXQVZFU0hvbGRpbmdJblBhaXIJAGQCBRJXQVZFU0hvbGRpbmdJblBhaXIIBQRwbXQyBmFtb3VudAQSQXNzZXRIb2xkaW5nSW5QYWlyBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQ5XQVZFU0Fzc2V0TkFNRQIBXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBVOZXdBc3NldEhvbGRpbmdJblBhaXIJAGQCBRJBc3NldEhvbGRpbmdJblBhaXIIBQRwbXQxBmFtb3VudAQNTFBUb2tlbklzc3VlZAQHJG1hdGNoMAkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICAglUb3RhbF9MUF8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQQTmV3TFBUb2tlbklzc3VlZAkAZAIFDUxQVG9rZW5Jc3N1ZWQFB2dldFNxcnQDCQECIT0CBRljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90BQxFbnRlckFzc2V0SUQJAAIBAitQYWlyIGlzIG5vdCBhdmFpbGFibGUgaW4gV2hpdGVsaXN0ZWQgQXNzZXQuAwkAAAIFDEVudGVyQXNzZXRJRAUOV0FWRVNBc3NldE5BTUUJAAIBApQBSW5wdXQgY2FuIE5ldmVyIGJlIGEgV0FWRVMgQXNzZXRJRC4gRW50ZXIgV2hpdGVsaXN0ZWQgQXNzZXRJRCBpbiBpbnB1dCBhcyB3ZWxsIGFzIGluIHBheW1lbnRbMV0gJiBBdHRhY2ggV0FWRVMgYXMgYW4gYXR0YWNobWVudCBUb2tlbiBpbiBwYXltZW50WzJdLgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAgkAAgECjQFUd28gYXR0YWNoZWQgYXNzZXRzIGFyZSBleHBlY3RlZCBpbiBwYXltZW50LiBLaW5kbHkgQXR0YWNoIHBheW1lbnQxID0gVG9rZW4geW91IHdhbnQgdG8gYWRkIGZvciBMaXF1aWRpdHkgJiBwYXltZW50MiA9IEFtb3VudCBvZiBXQVZFUyBUb2tlbi4DCQAAAggFBHBtdDEHYXNzZXRJZAUMV0FWRVNBc3NldElECQACAQJ6WW91IEF0dGFjaGVkIFdBVkVTIGFzc2V0IGluIHBheW1lbnRbMV0sIHBsZWFzZSBhdHRhY2ggb25seSB3aGl0ZWxpc3RlZCBUb2tlbiBpbiBwYXltZW50WzFdIGFsb25nIHdpdGggV0FWRVMgaW4gcGF5bWVudFsyXS4DCQECIT0CCAUEcG10MQdhc3NldElkCQDZBAEFDEVudGVyQXNzZXRJRAkAAgECa0luY29ycmVjdCBhc3NldCBhdHRhY2hlZCBmb3IgTGlxdWlkaXR5IGluIHBheW1lbnRbMV0sIHBsZWFzZSBhdHRhY2ggU3RyaW5nIEFzc2V0IG9yIFdoaXRlbGlzdGVkIFRva2VuIG9ubHkuAwkBAiE9AggFBHBtdDIHYXNzZXRJZAUMV0FWRVNBc3NldElECQACAQJrV3JvbmcgQXNzZXQgQXR0YWNoZWQgaW4gcGF5bWVudHNbMl0sIFBsZWFzZSBhdHRhY2ggcGF5bWVudFsxXSA9IExpcXVpZGl0eSBUb2tlbiAmIHBheW1lbnRbMl0gPSBXQVZFUyBUb2tlbi4DCQBmAgCAreIECAUEcG10MgZhbW91bnQJAAIBAldwbGVhc2UgYXR0YWNoIGF0bGVhc3QgMC4xIFdBVkVTIGluIHBheW1lbnRbMl0gJiBFcXVpdmFsZW50IHdvcnRoIG9mIFRva2VuIGluIHBheW1lbnRbMV0DCQECIT0CCAUEcG10MgZhbW91bnQFG2FjdHVhbF9XQVZFU19kZXBvc2l0X2Ftb3VudAkAAgEJAKwCAgkArAICAl5BdHRhY2hlZCBwYXltZW50WzJdIHF0eSBpcyBub3QgbWF0Y2hpbmcgYXMgcGVyIGF0dGFjaGVkIHBheW1lbnRbMV0ucGF5bWVudFsyXSBtdXN0IGJlIGFzIGludCBbCQCkAwEFG2FjdHVhbF9XQVZFU19kZXBvc2l0X2Ftb3VudAIOXS8xMF44ICBXQVZFUy4DCQBmAgABBRB1bml0X3Rva2VuX3ByaWNlCQACAQIzVG9rZW4gUHJpY2UgT3V0Y29tZSBpcyBnb2luZyBiZWxvdyAxIGluIEZyYWN0aW9uYWwuAwkAZgIAAQUHZ2V0U3FydAkAAgECS0xQIFRva2VuIE91dGNvbWUgaXMgZ29pbmcgYmVsb3cgMSBpbiBGcmFjdGlvbmFsLiBQbGVhc2UgQXR0YWNoIG1vcmUgYW1vdW50LgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDEVudGVyQXNzZXRJRAIBXwUOV0FWRVNBc3NldE5BTUUFFU5ld1dBVkVTSG9sZGluZ0luUGFpcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDldBVkVTQXNzZXROQU1FAgFfBQxFbnRlckFzc2V0SUQFFU5ld0Fzc2V0SG9sZGluZ0luUGFpcgkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICAglUb3RhbF9MUF8FDEVudGVyQXNzZXRJRAUQTmV3TFBUb2tlbklzc3VlZAkAzAgCCQEMSW50ZWdlckVudHJ5AgILVG9rZW5fUHJpY2UFEHVuaXRfdG9rZW5fcHJpY2UJAMwIAgkBDEludGVnZXJFbnRyeQICGVVzZXJfV0FWRVNfRGVwb3NpdF9BbW91bnQFG2FjdHVhbF9XQVZFU19kZXBvc2l0X2Ftb3VudAkAzAgCCQEHUmVpc3N1ZQMFDlJlaXNzdWVhc3NldElkBQdnZXRTcXJ0BgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFB2dldFNxcnQFDlJlaXNzdWVhc3NldElkBQNuaWwBaQEPUmVtb3ZlTGlxdWlkaXR5AQxFbnRlckFzc2V0SUQEDWNhbGxlcmFkZHJlc3MJANgEAQgIBQFpBmNhbGxlcgVieXRlcwQDcG10AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAkQMCCAUBaQhwYXltZW50cwAACQACAQI6Tm8gcGF5bWVudCBhdHRhY2hlZCwgUGxlYXNlIEF0dGFjaCBMUCBUb2tlbiBhcyBwYXltZW50WzFdLgQZY2hlY2twYWlyaXNhdmFpbGFibGVvcm5vdAkAnQgCBQR0aGlzCQCsAgICCFBhaXJfVVZfBQxFbnRlckFzc2V0SUQEElJlaXNzdWVhYmxlYXNzZXRJZAkA2QQBCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAJ0IAgUEdGhpcwkArAICAgNMUF8FDEVudGVyQXNzZXRJRAIlTFAgVG9rZW4gaXMgTWlzc2luZyBvciBub3QgR2VuZXJhdGVkLgQMZGVjaW1hbHNpbmZvCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAOwHAQkA2QQBBQxFbnRlckFzc2V0SUQJAKwCAgkArAICAgZBc3NldCAFDEVudGVyQXNzZXRJRAIOIGRvZXNuJ3QgZXhpc3QECGRlY2ltYWxzCAUMZGVjaW1hbHNpbmZvCGRlY2ltYWxzBBJib3RoYXNzZXRzZGVjaW1hbHMJAGQCAAYFCGRlY2ltYWxzBA1zaGFyZWRlY2ltYWxzCQBpAgUSYm90aGFzc2V0c2RlY2ltYWxzAAIEEkNoZWNrVG90YWxMUEFtb3VudAkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICAglUb3RhbF9MUF8FDEVudGVyQXNzZXRJRAQQVXNlckxQUGVyY2VudGFnZQkAbAYJAGsDCAUDcG10BmFtb3VudAkAbAYACgAAAAgAAAAABQdDRUlMSU5HBRJDaGVja1RvdGFsTFBBbW91bnQABgABAAAABgUHQ0VJTElORwQRQ2hlY2tXQVZFU0JhbGFuY2UJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8FDldBVkVTQXNzZXROQU1FBBFDaGVja0Fzc2V0QmFsYW5jZQkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwkArAICCQCsAgIJAKwCAgILQmFsYW5jZV9vZl8FDldBVkVTQXNzZXROQU1FAgFfBQxFbnRlckFzc2V0SUQEEFVzZXJMUFdvcnRoV0FWRVMJAGsDBRFDaGVja1dBVkVTQmFsYW5jZQUQVXNlckxQUGVyY2VudGFnZQkAbAYACgAAAAgAAAAABQdDRUlMSU5HBBBVc2VyTFBXb3J0aEFzc2V0CQBrAwURQ2hlY2tBc3NldEJhbGFuY2UFEFVzZXJMUFBlcmNlbnRhZ2UJAGwGAAoAAAAIAAAAAAUHQ0VJTElORwQSV0FWRVNIb2xkaW5nSW5QYWlyBAckbWF0Y2gwCQCaCAIFBHRoaXMJAKwCAgkArAICCQCsAgICC0JhbGFuY2Vfb2ZfBQxFbnRlckFzc2V0SUQCAV8FDldBVkVTQXNzZXROQU1FAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBVOZXdXQVZFU0hvbGRpbmdJblBhaXIJAGUCBRJXQVZFU0hvbGRpbmdJblBhaXIFEFVzZXJMUFdvcnRoV0FWRVMEEkFzc2V0SG9sZGluZ0luUGFpcgQHJG1hdGNoMAkAmggCBQR0aGlzCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUOV0FWRVNBc3NldE5BTUUCAV8FDEVudGVyQXNzZXRJRAMJAAECBQckbWF0Y2gwAgNJbnQEAWEFByRtYXRjaDAFAWEAAAQVTmV3QXNzZXRIb2xkaW5nSW5QYWlyCQBlAgUSQXNzZXRIb2xkaW5nSW5QYWlyBRBVc2VyTFBXb3J0aEFzc2V0BA1MUFRva2VuSXNzdWVkBAckbWF0Y2gwCQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEAwkAAQIFByRtYXRjaDACA0ludAQBYQUHJG1hdGNoMAUBYQAABBBOZXdMUFRva2VuSXNzdWVkCQBlAgUNTFBUb2tlbklzc3VlZAgFA3BtdAZhbW91bnQDCQECIT0CBRljaGVja3BhaXJpc2F2YWlsYWJsZW9ybm90BQxFbnRlckFzc2V0SUQJAAIBAiNQYWlyIGlzIG5vdCBhdmFpbGFibGUgaW4gV2hpdGVsaXN0LgMJAAACBQxFbnRlckFzc2V0SUQFDldBVkVTQXNzZXROQU1FCQACAQJsRG9uJ3QgY2hvb3NlIFdBVkVTIEFzc2V0SUQgYXMgSW5wdXQsIE9ubHkgV2hpdGVsaXN0ZWQgQXNzZXQgYXMgSW5wdXQgU3RyaW5nICYgQXR0YWNoIExQIFRva2VucyBhcyBwYXltZW50WzFdAwkBAiE9AggFA3BtdAdhc3NldElkBRJSZWlzc3VlYWJsZWFzc2V0SWQJAAIBAkdXcm9uZyBBc3NldCBpcyBhdHRhY2hlZCBpbiBwYXltZW50WzFdIG9yIExQIFRva2VuIE5vdCBGb3VuZCBvciBNaXNzaW5nLgMJAGYCAAEFEFVzZXJMUFBlcmNlbnRhZ2UJAAIBAi5Zb3VyIExQIFRva2VuIGFtb3VudCAlIGlzIHZlcnkgbG93IHRvIGNvbnZlcnQuAwkAZgIAAQUQVXNlckxQV29ydGhXQVZFUwkAAgECVVlvdXIgTFAgVG9rZW4gY29udmVyc2lvbiBhbW91bnQgaXMgdmVyeSBsb3cgdG8gY29udmVydCBvciBsZXNzIHRoYW4gMC4wMDAwMDAwMSBXQVZFUy4DCQBmAgABBRBVc2VyTFBXb3J0aEFzc2V0CQACAQJcWW91ciBMUCBUb2tlbiBjb252ZXJzaW9uIGFtb3VudCBpcyB2ZXJ5IGxvdyB0byBjb252ZXJ0IG9yIGxlc3MgdGhhbiBmcmFjdGlvbiB2YWx1ZSBvZiBUb2tlbi4JAMwIAgkBDEludGVnZXJFbnRyeQICFldpdGhkcmF3X0xQX1BlcmNlbnRhZ2UFEFVzZXJMUFBlcmNlbnRhZ2UJAMwIAgkBBEJ1cm4CBRJSZWlzc3VlYWJsZWFzc2V0SWQIBQNwbXQGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgICCVRvdGFsX0xQXwUMRW50ZXJBc3NldElEBRBOZXdMUFRva2VuSXNzdWVkCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUMRW50ZXJBc3NldElEAgFfBQ5XQVZFU0Fzc2V0TkFNRQUVTmV3V0FWRVNIb2xkaW5nSW5QYWlyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkArAICAgtCYWxhbmNlX29mXwUOV0FWRVNBc3NldE5BTUUCAV8FDEVudGVyQXNzZXRJRAUVTmV3QXNzZXRIb2xkaW5nSW5QYWlyCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUQVXNlckxQV29ydGhXQVZFUwUMV0FWRVNBc3NldElECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUQVXNlckxQV29ydGhBc3NldAkA2QQBBQxFbnRlckFzc2V0SUQFA25pbAECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXkPVl/5",
    "height": 2777972,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: FKh6xHztYiaTLjbQ1E1HSjhRpi51NrHTxEGzXaitWx2T
Next: 7jvSbJ95dLADXPhnCFNureUdrgQpHZTAG1Po5ULHXDP

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

Old	New		Differences
13	13
14	14		let Treasury = addressFromPublicKey(base58'EtFSDsn89XfmXQvuQXPQMbLDbaAZ1YWYZHksptpQH4gp')
15	15
16		-	let ~~XTNAssetID~~ = unit
	16	+	let WAVESAssetID = unit
17	17
18		-	let ~~WAVESAssetID~~ = "WAVES"
	18	+	let WAVESAssetNAME = "WAVES"
19	19
20	20		func countdays () = {
21	21		let TS_Diff = (lastBlock.timestamp - dAppSinceStart)

63	63		then throw("LP Token Outcome is going below 100 in Fractional. Please Attach more tokens amount in payment[1] and payment[2].")
64	64		else if ((1 > getSqrt))
65	65		then throw("LP Token Outcome is going below 1 in Fractional. Please Attach more amount in payment[1] and payment[2].")
66		-	else [StringEntry(("Pair_UV_" + EnterAssetID), EnterAssetID), IntegerEntry(("Listing_Fee_" + EnterAssetID), pmt3.amount), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + ~~WAVESAssetID~~), pmt1.amount), IntegerEntry(((("Balance_of_" + ~~WAVESAssetID~~) + "_") + EnterAssetID), pmt2.amount), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), 0), IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + ~~WAVESAssetID~~), 0), IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), 0), LPissue, ScriptTransfer(i.caller, getSqrt, LPid), ScriptTransfer(key1owner, fraction(listing_fee, 1, 2), unit), ScriptTransfer(key2owner, fraction(listing_fee, 1, 2), unit), StringEntry(("LP_" + EnterAssetID), toBase58String(LPid)), IntegerEntry(("Total_LP_" + EnterAssetID), getSqrt)]
	66	+	else [StringEntry(("Pair_UV_" + EnterAssetID), EnterAssetID), IntegerEntry(("Listing_Fee_" + EnterAssetID), pmt3.amount), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + WAVESAssetNAME), pmt1.amount), IntegerEntry(((("Balance_of_" + WAVESAssetNAME) + "_") + EnterAssetID), pmt2.amount), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), 0), IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + WAVESAssetNAME), 0), IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), 0), LPissue, ScriptTransfer(i.caller, getSqrt, LPid), ScriptTransfer(key1owner, fraction(listing_fee, 1, 2), unit), ScriptTransfer(key2owner, fraction(listing_fee, 1, 2), unit), StringEntry(("LP_" + EnterAssetID), toBase58String(LPid)), IntegerEntry(("Total_LP_" + EnterAssetID), getSqrt)]
67	67		}
68	68
69	69

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		-	let ~~CheckXTNBalance~~ = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + ~~WAVESAssetID~~))
79		-	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + ~~WAVESAssetID~~) + "_") + EnterAssetID))
80		-	let ~~newbalanceofXTN~~ = fraction(~~CheckXTNBalance~~, CheckAssetBalance, (CheckAssetBalance + pmt.amount))
81		-	let quantityofpriceasset = (~~CheckXTNBalance - newbalanceofXTN~~)
	78	+	let CheckWAVESBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + WAVESAssetNAME))
	79	+	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + WAVESAssetNAME) + "_") + EnterAssetID))
	80	+	let newbalanceofWAVES = fraction(CheckWAVESBalance, CheckAssetBalance, (CheckAssetBalance + pmt.amount))
	81	+	let quantityofpriceasset = (CheckWAVESBalance - newbalanceofWAVES)
82	82		let SwapFee = 5
83	83		let Currentday = countdays()
84	84		let SwapFeetoreceive = ((quantityofpriceasset * SwapFee) / 1000)
85	85		let userbalancetoreceive = ((quantityofpriceasset - SwapFeetoreceive) - SwapFeetoreceive)
86		-	let ~~SumupofAssetToXTNSwapFee~~ = match getInteger(this, ((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + ~~WAVESAssetID~~)) {
	86	+	let SumupofAssetToWAVESSwapFee = match getInteger(this, ((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + WAVESAssetNAME)) {
87	87		case a: Int =>
88	88		a
89	89		case _ =>
90	90		0
91	91		}
92		-	let ~~NewSumupofAssetToXTNSwapFee~~ = ((~~SumupofAssetToXTNSwapFee~~ + SwapFeetoreceive) + SwapFeetoreceive)
93		-	let SumupAssetBalance = match getInteger(this, ((("Balance_of_" + ~~WAVESAssetID~~) + "_") + EnterAssetID)) {
	92	+	let NewSumupofAssetToWAVESSwapFee = ((SumupofAssetToWAVESSwapFee + SwapFeetoreceive) + SwapFeetoreceive)
	93	+	let SumupAssetBalance = match getInteger(this, ((("Balance_of_" + WAVESAssetNAME) + "_") + 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		-	let ~~SumupXTNBalance~~ = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + ~~WAVESAssetID~~)) {
	100	+	let SumupWAVESBalance = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + WAVESAssetNAME)) {
101	101		case a: Int =>
102	102		a
103	103		case _ =>
104	104		0
105	105		}
106		-	let ~~NewSumupofXTNBalance~~ = ((~~CheckXTNBalance~~ - quantityofpriceasset) + SwapFeetoreceive)
	106	+	let NewSumupofWAVESBalance = ((CheckWAVESBalance - quantityofpriceasset) + SwapFeetoreceive)
107	107		let TOPT = match getIntegerValue(this, ("Total_of_Pair_Txns_" + EnterAssetID)) {
108	108		case a: Int =>
109	109		a

111	111		0
112	112		}
113	113		let NewTPT = (TOPT + 1)
114		-	if ((EnterAssetID == ~~WAVESAssetID~~))
115		-	then throw("Input can Never be a ~~XTN~~ AssetID. Enter Whitelisted AssetID in input & Attach Whitelisted Asset as an attachment Token in payment[1].")
	114	+	if ((EnterAssetID == WAVESAssetNAME))
	115	+	then throw("Input can Never be a WAVES AssetID. Enter Whitelisted AssetID in input & Attach Whitelisted Asset as an attachment Token in payment[1].")
116	116		else if ((checkpairisavailableornot != EnterAssetID))
117	117		then throw("Pair is not available in Whitelisted Asset.")
118		-	else if ((pmt.assetId == ~~XTNAssetID~~))
119		-	then throw("You can't Attach ~~XTN~~ as an Attached Payment. Only Whitelisted Tokens are accepted.")
	118	+	else if ((pmt.assetId == WAVESAssetID))
	119	+	then throw("You can't Attach WAVES as an Attached Payment. Only Whitelisted Tokens are accepted.")
120	120		else if ((pmt.assetId != fromBase58String(EnterAssetID)))
121	121		then throw(("Incorrect asset attached, please attach or send " + EnterAssetID))
122		-	else if ((~~CheckXTNBalance~~ == 0))
	122	+	else if ((CheckWAVESBalance == 0))
123	123		then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
124	124		else if ((CheckAssetBalance == 0))
125	125		then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
126		-	else if ((~~100000~~ > quantityofpriceasset))
	126	+	else if ((10000000 > quantityofpriceasset))
127	127		then throw((("Your Attached Asset Amount is very low. Attach More " + EnterAssetID) + " Tokens to Claim the minimum Amount of 0.1 dollar atleast."))
128		-	else if ((quantityofpriceasset > ~~CheckXTNBalance~~))
129		-	then throw((("Pool Only has a Liquidity of " + toString((~~CheckXTNBalance~~ / pow(10, 0, 6, 0, 0, CEILING)))) + " ~~XTN~~. Add Liquidity into Pool."))
130		-	else [IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + ~~WAVESAssetID~~), ~~NewSumupofAssetToXTNSwapFee~~), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + ~~WAVESAssetID~~) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + ~~WAVESAssetID~~), ~~NewSumupofXTNBalance~~), ScriptTransfer(i.caller, userbalancetoreceive, ~~XTNAssetID~~), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 3), ~~XTNAssetID~~), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), ~~XTNAssetID~~), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), ~~XTNAssetID~~)]
	128	+	else if ((quantityofpriceasset > CheckWAVESBalance))
	129	+	then throw((("Pool Only has a Liquidity of " + toString((CheckWAVESBalance / pow(10, 0, 8, 0, 0, CEILING)))) + " WAVES. Add Liquidity into Pool."))
	130	+	else [IntegerEntry(((("Total_Swap_Fee_Collected_" + EnterAssetID) + "_") + WAVESAssetNAME), NewSumupofAssetToWAVESSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + WAVESAssetNAME) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + WAVESAssetNAME), NewSumupofWAVESBalance), ScriptTransfer(i.caller, userbalancetoreceive, WAVESAssetID), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 3), WAVESAssetID), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), WAVESAssetID), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), WAVESAssetID)]
131	131		}
132	132
133	133

137	137		let calleraddress = toBase58String(i.caller.bytes)
138	138		let pmt = if ((size(i.payments) == 1))
139	139		then i.payments[0]
140		-	else throw((("Only " + ~~WAVESAssetID~~) + " Token is required as an Attached payment[1]."))
141		-	let ~~CheckXTNBalance~~ = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + ~~WAVESAssetID~~))
142		-	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + ~~WAVESAssetID~~) + "_") + EnterAssetID))
143		-	let newbalanceofAsset = fraction(~~CheckXTNBalance~~, CheckAssetBalance, (~~CheckXTNBalance~~ + pmt.amount))
	140	+	else throw((("Only " + WAVESAssetNAME) + " Token is required as an Attached payment[1]."))
	141	+	let CheckWAVESBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + WAVESAssetNAME))
	142	+	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + WAVESAssetNAME) + "_") + EnterAssetID))
	143	+	let newbalanceofAsset = fraction(CheckWAVESBalance, CheckAssetBalance, (CheckWAVESBalance + pmt.amount))
144	144		let quantityofpriceasset = (CheckAssetBalance - newbalanceofAsset)
145	145		let checkpairisavailableornot = getString(this, ("Pair_UV_" + EnterAssetID))
146	146		let SwapFee = 5
147	147		let Currentday = countdays()
148	148		let SwapFeetoreceive = ((quantityofpriceasset * SwapFee) / 1000)
149	149		let userbalancetoreceive = ((quantityofpriceasset - SwapFeetoreceive) - SwapFeetoreceive)
150		-	let ~~SumupofXTNToAssetSwapFee~~ = match getInteger(this, ("Total_Swap_Fee_Collected_" + EnterAssetID)) {
	150	+	let SumupofWAVESToAssetSwapFee = match getInteger(this, ("Total_Swap_Fee_Collected_" + EnterAssetID)) {
151	151		case a: Int =>
152	152		a
153	153		case _ =>
154	154		0
155	155		}
156		-	let ~~NewSumupofXTNToAssetSwapFee~~ = ((~~SumupofXTNToAssetSwapFee~~ + SwapFeetoreceive) + SwapFeetoreceive)
157		-	let SumupAssetBalance = match getInteger(this, ((("Balance_of_" + ~~WAVESAssetID~~) + "_") + EnterAssetID)) {
	156	+	let NewSumupofWAVESToAssetSwapFee = ((SumupofWAVESToAssetSwapFee + SwapFeetoreceive) + SwapFeetoreceive)
	157	+	let SumupAssetBalance = match getInteger(this, ((("Balance_of_" + WAVESAssetNAME) + "_") + EnterAssetID)) {
158	158		case a: Int =>
159	159		a
160	160		case _ =>
161	161		0
162	162		}
163	163		let NewSumupofAssetBalance = ((CheckAssetBalance - quantityofpriceasset) + SwapFeetoreceive)
164		-	let ~~SumupXTNBalance~~ = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + ~~WAVESAssetID~~)) {
	164	+	let SumupWAVESBalance = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + WAVESAssetNAME)) {
165	165		case a: Int =>
166	166		a
167	167		case _ =>
168	168		0
169	169		}
170		-	let ~~NewSumupofXTNBalance~~ = (~~CheckXTNBalance~~ + pmt.amount)
	170	+	let NewSumupofWAVESBalance = (CheckWAVESBalance + pmt.amount)
171	171		let TOPT = match getIntegerValue(this, ("Total_of_Pair_Txns_" + EnterAssetID)) {
172	172		case a: Int =>
173	173		a

177	177		let NewTPT = (TOPT + 1)
178	178		if ((checkpairisavailableornot != EnterAssetID))
179	179		then throw("Pair is not available in Whitelisted Asset.")
180		-	else if ((EnterAssetID == ~~WAVESAssetID~~))
	180	+	else if ((EnterAssetID == WAVESAssetNAME))
181	181		then throw("Input can Never be a WAVES AssetID. Enter Whitelisted AssetID in input & Attach WAVES as an attachment Token in payment[1].")
182		-	else if ((pmt.assetId != ~~XTNAssetID~~))
183		-	then throw((("You can Attach " + ~~WAVESAssetID~~) + " as an Attached Payment[1] to Swap WAVES To Required Token. Any other asset else than WAVES will be rejected."))
	182	+	else if ((pmt.assetId != WAVESAssetID))
	183	+	then throw((("You can Attach " + WAVESAssetNAME) + " as an Attached Payment[1] to Swap WAVES To Required Token. Any other asset else than WAVES will be rejected."))
184	184		else if ((10000000 > pmt.amount))
185	185		then throw("Your Attached WAVES Amount is very low. Attach Atleast 0.1 WAVES to Claim the minimum Tokens.")
186		-	else if ((~~CheckXTNBalance~~ == 0))
	186	+	else if ((CheckWAVESBalance == 0))
187	187		then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
188	188		else if ((CheckAssetBalance == 0))
189	189		then throw("Swap Pair Need to Add Liquidity first into Pool. Only After that Pair will be activated for Swapping.")
190	190		else if ((quantityofpriceasset > CheckAssetBalance))
191	191		then throw((("Pool Only has a Liquidity of " + toString(CheckAssetBalance)) + " Tokens. Add Liquidity into Pool."))
192		-	else [IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), ~~NewSumupofXTNToAssetSwapFee~~), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + ~~WAVESAssetID~~) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + ~~WAVESAssetID~~), ~~NewSumupofXTNBalance~~), ScriptTransfer(i.caller, userbalancetoreceive, fromBase58String(EnterAssetID)), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID)), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID))]
	192	+	else [IntegerEntry(("Total_Swap_Fee_Collected_" + EnterAssetID), NewSumupofWAVESToAssetSwapFee), IntegerEntry("Current_Day", Currentday), IntegerEntry(("Total_of_Pair_Txns_" + EnterAssetID), NewTPT), IntegerEntry(((("Balance_of_" + WAVESAssetNAME) + "_") + EnterAssetID), NewSumupofAssetBalance), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + WAVESAssetNAME), NewSumupofWAVESBalance), ScriptTransfer(i.caller, userbalancetoreceive, fromBase58String(EnterAssetID)), ScriptTransfer(key1owner, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID)), ScriptTransfer(key2owner, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID)), ScriptTransfer(Treasury, fraction(SwapFeetoreceive, 1, 3), fromBase58String(EnterAssetID))]
193	193		}
194	194
195	195

201	201		let pmt2 = value(i.payments[1])
202	202		let checkpairisavailableornot = getString(this, ("Pair_UV_" + EnterAssetID))
203	203		let ReissueassetId = fromBase58String(valueOrErrorMessage(getString(this, ("LP_" + EnterAssetID)), "LP Token is Missing or May be not Generated."))
204		-	let ~~CheckXTNBalance~~ = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + ~~WAVESAssetID~~))
205		-	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + ~~WAVESAssetID~~) + "_") + EnterAssetID))
	204	+	let CheckWAVESBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + WAVESAssetNAME))
	205	+	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + WAVESAssetNAME) + "_") + EnterAssetID))
206	206		let decimalsinfo = valueOrErrorMessage(assetInfo(fromBase58String(EnterAssetID)), (("Asset " + EnterAssetID) + " doesn't exist"))
207	207		let decimals = decimalsinfo.decimals
208	208		let LPdecimals = fraction((decimals + 6), 1, 2)

211	211		let getSqrt = sqrt(multiply_amounts, LPdecimals, LPdecimals, CEILING)
212	212		let get_asset_decimals = pow(10, 0, decimals, 0, 0, CEILING)
213	213		let get_WAVES_decimals = pow(10, 0, 8, 0, 0, CEILING)
214		-	let unit_token_price = fraction(~~CheckXTNBalance~~, get_asset_decimals, CheckAssetBalance)
215		-	let user_~~XTN~~_deposit_amount = fraction(pmt1.amount, unit_token_price, 1)
216		-	let divide_by_asset_decimals = fraction(user_~~XTN~~_deposit_amount, 1, get_asset_decimals)
217		-	let actual_~~XTN~~_deposit_amount = divide_by_asset_decimals
218		-	let ~~XTNHoldingInPair~~ = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + ~~WAVESAssetID~~)) {
	214	+	let unit_token_price = fraction(CheckWAVESBalance, get_asset_decimals, CheckAssetBalance)
	215	+	let user_WAVES_deposit_amount = fraction(pmt1.amount, unit_token_price, 1)
	216	+	let divide_by_asset_decimals = fraction(user_WAVES_deposit_amount, 1, get_asset_decimals)
	217	+	let actual_WAVES_deposit_amount = divide_by_asset_decimals
	218	+	let WAVESHoldingInPair = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + WAVESAssetNAME)) {
219	219		case a: Int =>
220	220		a
221	221		case _ =>
222	222		0
223	223		}
224		-	let ~~NewXTNHoldingInPair~~ = (~~XTNHoldingInPair~~ + pmt2.amount)
225		-	let AssetHoldingInPair = match getInteger(this, ((("Balance_of_" + ~~WAVESAssetID~~) + "_") + EnterAssetID)) {
	224	+	let NewWAVESHoldingInPair = (WAVESHoldingInPair + pmt2.amount)
	225	+	let AssetHoldingInPair = match getInteger(this, ((("Balance_of_" + WAVESAssetNAME) + "_") + EnterAssetID)) {
226	226		case a: Int =>
227	227		a
228	228		case _ =>

238	238		let NewLPTokenIssued = (LPTokenIssued + getSqrt)
239	239		if ((checkpairisavailableornot != EnterAssetID))
240	240		then throw("Pair is not available in Whitelisted Asset.")
241		-	else if ((EnterAssetID == ~~WAVESAssetID~~))
242		-	then throw("Input can Never be a WAVES AssetID. Enter Whitelisted AssetID in input as well as in payment[1] & Attach ~~XTN~~ as an attachment Token in payment[2].")
	241	+	else if ((EnterAssetID == WAVESAssetNAME))
	242	+	then throw("Input can Never be a WAVES AssetID. Enter Whitelisted AssetID in input as well as in payment[1] & Attach WAVES as an attachment Token in payment[2].")
243	243		else if ((size(i.payments) != 2))
244		-	then throw("Two attached assets are expected in payment. Kindly Attach payment1 = Token you want to add for Liquidity & payment2 = Amount of ~~XTN~~ Token.")
245		-	else if ((pmt1.assetId == ~~XTNAssetID~~))
246		-	then throw("You Attached ~~XTN~~ asset in payment[1], please attach only whitelisted Token in payment[1] along with ~~XTN~~ in payment[2].")
	244	+	then throw("Two attached assets are expected in payment. Kindly Attach payment1 = Token you want to add for Liquidity & payment2 = Amount of WAVES Token.")
	245	+	else if ((pmt1.assetId == WAVESAssetID))
	246	+	then throw("You Attached WAVES asset in payment[1], please attach only whitelisted Token in payment[1] along with WAVES in payment[2].")
247	247		else if ((pmt1.assetId != fromBase58String(EnterAssetID)))
248	248		then throw("Incorrect asset attached for Liquidity in payment[1], please attach String Asset or Whitelisted Token only.")
249		-	else if ((pmt2.assetId != ~~XTNAssetID~~))
250		-	then throw("Wrong Asset Attached in payments[2], Please attach payment[1] = Liquidity Token & payment[2] = ~~XTN~~ Token.")
251		-	else if ((~~100000~~ > pmt2.amount))
252		-	then throw("please attach atleast 0.1 ~~XTN~~ in payment[2] & Equivalent worth of Token in payment[1]")
253		-	else if ((pmt2.amount != actual_~~XTN~~_deposit_amount))
254		-	then throw((("Attached payment[2] qty is not matching as per attached payment[1].payment[2] must be as int [" + toString(actual_~~XTN~~_deposit_amount)) + "]/10^8 WAVES."))
	249	+	else if ((pmt2.assetId != WAVESAssetID))
	250	+	then throw("Wrong Asset Attached in payments[2], Please attach payment[1] = Liquidity Token & payment[2] = WAVES Token.")
	251	+	else if ((10000000 > pmt2.amount))
	252	+	then throw("please attach atleast 0.1 WAVES in payment[2] & Equivalent worth of Token in payment[1]")
	253	+	else if ((pmt2.amount != actual_WAVES_deposit_amount))
	254	+	then throw((("Attached payment[2] qty is not matching as per attached payment[1].payment[2] must be as int [" + toString(actual_WAVES_deposit_amount)) + "]/10^8 WAVES."))
255	255		else if ((1 > unit_token_price))
256	256		then throw("Token Price Outcome is going below 1 in Fractional.")
257	257		else if ((1 > getSqrt))
258	258		then throw("LP Token Outcome is going below 1 in Fractional. Please Attach more amount.")
259		-	else [IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + ~~WAVESAssetID~~), ~~NewXTNHoldingInPair~~), IntegerEntry(((("Balance_of_" + ~~WAVESAssetID~~) + "_") + EnterAssetID), NewAssetHoldingInPair), IntegerEntry(("Total_LP_" + EnterAssetID), NewLPTokenIssued), IntegerEntry("Token_Price", unit_token_price), IntegerEntry("User_~~XTN~~_Deposit_Amount", actual_~~XTN~~_deposit_amount), Reissue(ReissueassetId, getSqrt, true), ScriptTransfer(i.caller, getSqrt, ReissueassetId)]
	259	+	else [IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + WAVESAssetNAME), NewWAVESHoldingInPair), IntegerEntry(((("Balance_of_" + WAVESAssetNAME) + "_") + EnterAssetID), NewAssetHoldingInPair), IntegerEntry(("Total_LP_" + EnterAssetID), NewLPTokenIssued), IntegerEntry("Token_Price", unit_token_price), IntegerEntry("User_WAVES_Deposit_Amount", actual_WAVES_deposit_amount), Reissue(ReissueassetId, getSqrt, true), ScriptTransfer(i.caller, getSqrt, ReissueassetId)]
260	260		}
261	261
262	262

275	275		let sharedecimals = (bothassetsdecimals / 2)
276	276		let CheckTotalLPAmount = getIntegerValue(this, ("Total_LP_" + EnterAssetID))
277	277		let UserLPPercentage = pow(fraction(pmt.amount, pow(10, 0, 8, 0, 0, CEILING), CheckTotalLPAmount), 6, 1, 0, 6, CEILING)
278		-	let ~~CheckXTNBalance~~ = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + ~~WAVESAssetID~~))
279		-	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + ~~WAVESAssetID~~) + "_") + EnterAssetID))
280		-	let ~~UserLPWorthXTN~~ = fraction(~~CheckXTNBalance~~, UserLPPercentage, pow(10, 0, 8, 0, 0, CEILING))
	278	+	let CheckWAVESBalance = getIntegerValue(this, ((("Balance_of_" + EnterAssetID) + "_") + WAVESAssetNAME))
	279	+	let CheckAssetBalance = getIntegerValue(this, ((("Balance_of_" + WAVESAssetNAME) + "_") + EnterAssetID))
	280	+	let UserLPWorthWAVES = fraction(CheckWAVESBalance, UserLPPercentage, pow(10, 0, 8, 0, 0, CEILING))
281	281		let UserLPWorthAsset = fraction(CheckAssetBalance, UserLPPercentage, pow(10, 0, 8, 0, 0, CEILING))
282		-	let ~~XTNHoldingInPair~~ = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + ~~WAVESAssetID~~)) {
	282	+	let WAVESHoldingInPair = match getInteger(this, ((("Balance_of_" + EnterAssetID) + "_") + WAVESAssetNAME)) {
283	283		case a: Int =>
284	284		a
285	285		case _ =>
286	286		0
287	287		}
288		-	let ~~NewXTNHoldingInPair~~ = (~~XTNHoldingInPair - UserLPWorthXTN~~)
289		-	let AssetHoldingInPair = match getInteger(this, ((("Balance_of_" + ~~WAVESAssetID~~) + "_") + EnterAssetID)) {
	288	+	let NewWAVESHoldingInPair = (WAVESHoldingInPair - UserLPWorthWAVES)
	289	+	let AssetHoldingInPair = match getInteger(this, ((("Balance_of_" + WAVESAssetNAME) + "_") + EnterAssetID)) {
290	290		case a: Int =>
291	291		a
292	292		case _ =>

302	302		let NewLPTokenIssued = (LPTokenIssued - pmt.amount)
303	303		if ((checkpairisavailableornot != EnterAssetID))
304	304		then throw("Pair is not available in Whitelist.")
305		-	else if ((EnterAssetID == ~~WAVESAssetID~~))
	305	+	else if ((EnterAssetID == WAVESAssetNAME))
306	306		then throw("Don't choose WAVES AssetID as Input, Only Whitelisted Asset as Input String & Attach LP Tokens as payment[1]")
307	307		else if ((pmt.assetId != ReissueableassetId))
308	308		then throw("Wrong Asset is attached in payment[1] or LP Token Not Found or Missing.")
309	309		else if ((1 > UserLPPercentage))
310	310		then throw("Your LP Token amount % is very low to convert.")
311		-	else if ((1 > ~~UserLPWorthXTN~~))
312		-	then throw("Your LP Token conversion amount is very low to convert or less than 0.~~000001 XTN~~.")
	311	+	else if ((1 > UserLPWorthWAVES))
	312	+	then throw("Your LP Token conversion amount is very low to convert or less than 0.00000001 WAVES.")
313	313		else if ((1 > UserLPWorthAsset))
314	314		then throw("Your LP Token conversion amount is very low to convert or less than fraction value of Token.")
315		-	else [IntegerEntry("Withdraw_LP_Percentage", UserLPPercentage), Burn(ReissueableassetId, pmt.amount), IntegerEntry(("Total_LP_" + EnterAssetID), NewLPTokenIssued), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + ~~WAVESAssetID~~), ~~NewXTNHoldingInPair~~), IntegerEntry(((("Balance_of_" + ~~WAVESAssetID~~) + "_") + EnterAssetID), NewAssetHoldingInPair), ScriptTransfer(i.caller, ~~UserLPWorthXTN~~, ~~XTNAssetID~~), ScriptTransfer(i.caller, UserLPWorthAsset, fromBase58String(EnterAssetID))]
	315	+	else [IntegerEntry("Withdraw_LP_Percentage", UserLPPercentage), Burn(ReissueableassetId, pmt.amount), IntegerEntry(("Total_LP_" + EnterAssetID), NewLPTokenIssued), IntegerEntry(((("Balance_of_" + EnterAssetID) + "_") + WAVESAssetNAME), NewWAVESHoldingInPair), IntegerEntry(((("Balance_of_" + WAVESAssetNAME) + "_") + EnterAssetID), NewAssetHoldingInPair), ScriptTransfer(i.caller, UserLPWorthWAVES, WAVESAssetID), ScriptTransfer(i.caller, UserLPWorthAsset, fromBase58String(EnterAssetID))]
316	316		}
317	317
318	318

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

github/deemru/w8io/169f3d6 
109.61 ms ◑