w8 · tx · BwA···4PU

tx · BwA92uGYmvk21zBuCba3sbxrh33bJN9XAh97QV4go4PU

3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh:  -0.01400000 Waves

2021.11.26 22:02 [2873344] smart account 3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BwA92uGYmvk21zBuCba3sbxrh33bJN9XAh97QV4go4PU",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1637953368935,
    "version": 2,
    "chainId": 87,
    "sender": "3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh",
    "senderPublicKey": "AzSJ6Pz19UKc9NeFUtzk7Wa8emVYb8mqE49cv2n3foS4",
    "proofs": [
        "2p8hWsRkJoez9s85UNUdxKHgaMUs8TQHrJhYcGnkBxShQu9xzhZVCehMDSprQKjJzXmST7mKGPsF9yVxAPSdX5JL"
    ],
    "script": "base64:AAIFAAAAAAAAAB0IAhIDCgEBEgASABIAEgMKAQQSAwoBBBIECgIIAQAAAB4AAAAACGFkbWluS2V5AQAAABoBV0vDbM77M1hDWENREO7v7iEQF0vyeMt8MgAAAAABVAAAAAAAAAAAAwAAAAAIYXNzZXRJZHMJAARMAAAAAgEAAAAg8Rr+Jf72mTj0aSrE3+ES1keyxsoOujcJr3dtH46i5WMJAARMAAAAAgEAAAAgHpQHE1J2oSWV/chhqIJfEH/fOk8pu/yaRj9a/TZPn5EJAARMAAAAAgEAAAAgtiYpwwT1zlORpA5LdSQvZIxRsfrfr1QpvUjSHSqyqtEFAAAAA25pbAAAAAANQXNzZXRzV2VpZ2h0cwkABEwAAAACAAAAAAAAAABQCQAETAAAAAIAAAAAAAAAAAoJAARMAAAAAgAAAAAAAAAACgUAAAADbmlsAAAAABVBc3NldHNXZWlnaHRzRGVjaW1hbHMAAAAAAAAAAAIAAAAAEVBvb2xUb2tlbkRlY2ltYWxzAAAAAAAAAAAIAAAAAAhEZWNpbWFscwkABEwAAAACAAAAAAAAAAAICQAETAAAAAIAAAAAAAAAAAYJAARMAAAAAgAAAAAAAAAABgUAAAADbmlsAAAAAAZTY2FsZXMJAARMAAAAAgAAAAAABfXhAAkABEwAAAACAAAAAAAAD0JACQAETAAAAAIAAAAAAAAPQkAFAAAAA25pbAAAAAADRmVlAAAAAAAAAADIAAAAAAVTY2FsZQAAAAAAAAAnEAAAAAAGU2NhbGU4AAAAAAAF9eEAAAAAAAhGZWVTY2FsZQAAAAAAAAAnEAAAAAANZmVlQWdncmVnYXRvcgkBAAAAB0FkZHJlc3MAAAABAQAAABoBV4koG/KFWb+c3sKR5M8EFRU4JLZsBXH4fAEAAAAOZ2V0QXNzZXRTdHJpbmcAAAABAAAAB2Fzc2V0SWQEAAAAByRtYXRjaDAFAAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACkJ5dGVWZWN0b3IEAAAAAWIFAAAAByRtYXRjaDAJAAJYAAAAAQUAAAABYgIAAAAFV0FWRVMBAAAADWdldEFzc2V0Qnl0ZXMAAAABAAAACmFzc2V0SWRTdHIDCQAAAAAAAAIFAAAACmFzc2V0SWRTdHICAAAABVdBVkVTBQAAAAR1bml0CQACWQAAAAEFAAAACmFzc2V0SWRTdHIAAAAADGVhcm5lZEFzc2V0cwUAAAAIYXNzZXRJZHMBAAAADXRyeUdldEludGVnZXIAAAABAAAAA2tleQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYgUAAAAHJG1hdGNoMAUAAAABYgAAAAAAAAAAAAEAAAAMdHJ5R2V0QmluYXJ5AAAAAQAAAANrZXkEAAAAByRtYXRjaDAJAAQcAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAApCeXRlVmVjdG9yBAAAAAFiBQAAAAckbWF0Y2gwBQAAAAFiAQAAAAABAAAAFmdldEN1cnJlbnRUb2tlbkJhbGFuY2UAAAABAAAACXRva2VuVHlwZQQAAAAHdG9rZW5JZAkBAAAADmdldEFzc2V0U3RyaW5nAAAAAQkAAZEAAAACBQAAAAhhc3NldElkcwUAAAAJdG9rZW5UeXBlCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfBQAAAAd0b2tlbklkAgAAAAhfYmFsYW5jZQEAAAAQY2FsY3VsYXRlUElzc3VlZAAAAAIAAAAGYW1vdW50AAAAB3Rva2VuSWQEAAAAB1BzdXBwbHkJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQEAAAAB0JhbGFuY2UJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAAJYAAAAAQUAAAAHdG9rZW5JZAIAAAAIX2JhbGFuY2UJAQAAAAhmcmFjdGlvbgAAAAQFAAAABmFtb3VudAUAAAAHUHN1cHBseQUAAAAHQmFsYW5jZQUAAAAERE9XTgEAAAANZ2V0TWluUElzc3VlZAAAAAEAAAAIcGF5bWVudHMKAQAAAAdoYW5kbGVyAAAAAgAAAAVhY2N1bQAAAAdjdXJyZW50BAAAAAdQSXNzdWVkCQEAAAAQY2FsY3VsYXRlUElzc3VlZAAAAAIIBQAAAAdjdXJyZW50AAAABmFtb3VudAkBAAAABXZhbHVlAAAAAQgFAAAAB2N1cnJlbnQAAAAHYXNzZXRJZAMDCQAAAAAAAAIFAAAABWFjY3VtAAAAAAAAAAAABgkAAGYAAAACBQAAAAVhY2N1bQUAAAAHUElzc3VlZAUAAAAHUElzc3VlZAUAAAAFYWNjdW0EAAAACW1pblBJc3NlZAoAAAAAAiRsBQAAAAhwYXltZW50cwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAAAAAAAAAAAAAKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAB2hhbmRsZXIAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKBQAAAAltaW5QSXNzZWQBAAAAEmNhbGN1bGF0ZVVzZG5WYWx1ZQAAAAMAAAAHYXNzZXRJZAAAAAZhbW91bnQAAAAIYUJhbGFuY2UEAAAABnVzZG5JZAEAAAAgtiYpwwT1zlORpA5LdSQvZIxRsfrfr1QpvUjSHSqyqtEEAAAACnVzZG5XZWlnaHQJAAGRAAAAAgUAAAANQXNzZXRzV2VpZ2h0cwkBAAAABXZhbHVlAAAAAQkABE8AAAACBQAAAAhhc3NldElkcwUAAAAGdXNkbklkBAAAAAthc3NldFdlaWdodAkAAZEAAAACBQAAAA1Bc3NldHNXZWlnaHRzCQEAAAAFdmFsdWUAAAABCQAETwAAAAIFAAAACGFzc2V0SWRzBQAAAAdhc3NldElkBAAAAAt1c2RuQmFsYW5jZQkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwkBAAAADmdldEFzc2V0U3RyaW5nAAAAAQUAAAAGdXNkbklkAgAAAAhfYmFsYW5jZQkAAGsAAAADCQAAawAAAAMFAAAABmFtb3VudAUAAAALdXNkbkJhbGFuY2UFAAAACnVzZG5XZWlnaHQFAAAAC2Fzc2V0V2VpZ2h0BQAAAAhhQmFsYW5jZQEAAAATY2hlY2tUb2tlbnNWYWxpZGl0eQAAAAEAAAAIcGF5bWVudHMKAQAAAAhoYW5kbGVyMQAAAAIAAAAFYWNjdW0AAAAHcGF5bWVudAkABE4AAAACBQAAAAVhY2N1bQkABEwAAAACCQEAAAAFdmFsdWUAAAABCAUAAAAHcGF5bWVudAAAAAdhc3NldElkBQAAAANuaWwEAAAAA2lkcwoAAAAAAiRsBQAAAAhwYXltZW50cwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAIaGFuZGxlcjEAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKAwkAAAAAAAACBQAAAANpZHMFAAAAA2lkcwoBAAAACGhhbmRsZXIyAAAAAgAAAAVhY2N1bQAAAAdhc3NldElkAwkBAAAAAiE9AAAAAgkABE8AAAACBQAAAANpZHMFAAAAB2Fzc2V0SWQFAAAABHVuaXQJAABkAAAAAgUAAAAFYWNjdW0AAAAAAAAAAAEJAAACAAAAAQkAASwAAAACAgAAABRhc3NldCBub3QgYXR0YWNoZWQ6IAkBAAAADmdldEFzc2V0U3RyaW5nAAAAAQUAAAAHYXNzZXRJZAQAAAAGY2hlY2tzCgAAAAACJGwFAAAACGFzc2V0SWRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAAAAAAAAAAAAAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAIaGFuZGxlcjIAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKAwkAAAAAAAACBQAAAAZjaGVja3MFAAAABmNoZWNrcwYJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEAAAATaGFuZGxlUG9vbFRva2Vuc0FkZAAAAAQAAAAHUElzc3VlZAAAAAhwYXltZW50cwAAAAt1c2VyQWRkcmVzcwAAAApuZWVkQ2hhbmdlCgEAAAAVZ2V0VG9rZW5QYXltZW50QW1vdW50AAAAAQAAAAd0b2tlbklkCgEAAAAHaGFuZGxlcgAAAAIAAAAFYWNjdW0AAAAHcGF5bWVudAMJAAAAAAAAAggFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAUAAAAHdG9rZW5JZAgFAAAAB3BheW1lbnQAAAAGYW1vdW50BQAAAAVhY2N1bQoAAAAAAiRsBQAAAAhwYXltZW50cwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAAAAAAAAAAAAAKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAB2hhbmRsZXIAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKCgEAAAARaGFuZGxlVG9rZW5DaGFuZ2UAAAACAAAABWFjY3VtAAAAB3Rva2VuSWQEAAAAAkJrCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfCQEAAAAOZ2V0QXNzZXRTdHJpbmcAAAABBQAAAAd0b2tlbklkAgAAAAhfYmFsYW5jZQQAAAAHUFN1cHBseQkBAAAADXRyeUdldEludGVnZXIAAAABAgAAABdnbG9iYWxfcG9vbFRva2VuX2Ftb3VudAQAAAANdG9rZW5EZWNpbWFscwkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHc3RhdGljXwkBAAAADmdldEFzc2V0U3RyaW5nAAAAAQUAAAAHdG9rZW5JZAIAAAAGX3NjYWxlBAAAAAJEawkBAAAACGZyYWN0aW9uAAAABAkAAGUAAAACCQEAAAAIZnJhY3Rpb24AAAAECQAAZAAAAAIFAAAAB1BTdXBwbHkFAAAAB1BJc3N1ZWQFAAAADXRva2VuRGVjaW1hbHMFAAAAB1BTdXBwbHkFAAAABERPV04FAAAADXRva2VuRGVjaW1hbHMFAAAAAkJrBQAAAA10b2tlbkRlY2ltYWxzBQAAAARET1dOBAAAAA1wYXltZW50QW1vdW50CQEAAAAVZ2V0VG9rZW5QYXltZW50QW1vdW50AAAAAQUAAAAHdG9rZW5JZAQAAAAIdG9SZXR1cm4JAABlAAAAAgMJAQAAAAIhPQAAAAIFAAAADXBheW1lbnRBbW91bnQAAAAAAAAAAAAFAAAADXBheW1lbnRBbW91bnQAAAAAAAAAAAAFAAAAAkRrBAAAAAF0AwUAAAAKbmVlZENoYW5nZQkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAt1c2VyQWRkcmVzcwUAAAAIdG9SZXR1cm4FAAAAB3Rva2VuSWQFAAAAA25pbAUAAAADbmlsCQAETgAAAAIJAAROAAAAAgUAAAAFYWNjdW0FAAAAAXQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfCQEAAAAOZ2V0QXNzZXRTdHJpbmcAAAABBQAAAAd0b2tlbklkAgAAAAhfYmFsYW5jZQkAAGQAAAACBQAAAAJCawUAAAACRGsFAAAAA25pbAoAAAAAAiRsBQAAAAhhc3NldElkcwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAARaGFuZGxlVG9rZW5DaGFuZ2UAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKAQAAABZoYW5kbGVQb29sVG9rZW5zUmVkZWVtAAAAAgAAAAlQUmVkZWVtZWQAAAALdXNlckFkZHJlc3MKAQAAABFoYW5kbGVUb2tlblJlZGVlbQAAAAIAAAAFYWNjdW0AAAAHdG9rZW5JZAQAAAACQmsJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAQAAAA5nZXRBc3NldFN0cmluZwAAAAEFAAAAB3Rva2VuSWQCAAAACF9iYWxhbmNlBAAAAAdQU3VwcGx5CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAAF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BAAAAA10b2tlbkRlY2ltYWxzCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdzdGF0aWNfCQEAAAAOZ2V0QXNzZXRTdHJpbmcAAAABBQAAAAd0b2tlbklkAgAAAAZfc2NhbGUEAAAABmFtb3VudAkBAAAACGZyYWN0aW9uAAAABAkAAGUAAAACBQAAAA10b2tlbkRlY2ltYWxzCQEAAAAIZnJhY3Rpb24AAAAECQAAZQAAAAIFAAAAB1BTdXBwbHkFAAAACVBSZWRlZW1lZAUAAAANdG9rZW5EZWNpbWFscwUAAAAHUFN1cHBseQUAAAAERE9XTgUAAAACQmsFAAAADXRva2VuRGVjaW1hbHMFAAAABERPV04JAAROAAAAAgUAAAAFYWNjdW0JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfCQEAAAAOZ2V0QXNzZXRTdHJpbmcAAAABBQAAAAd0b2tlbklkAgAAAAhfYmFsYW5jZQkAAGUAAAACBQAAAAJCawUAAAAGYW1vdW50BQAAAANuaWwKAQAAABJoYW5kbGVUb2tlblJlZGVlbTIAAAACAAAABWFjY3VtAAAAB3Rva2VuSWQEAAAAAkJrCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfCQEAAAAOZ2V0QXNzZXRTdHJpbmcAAAABBQAAAAd0b2tlbklkAgAAAAhfYmFsYW5jZQQAAAAHUFN1cHBseQkBAAAADXRyeUdldEludGVnZXIAAAABAgAAABdnbG9iYWxfcG9vbFRva2VuX2Ftb3VudAQAAAANdG9rZW5EZWNpbWFscwkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHc3RhdGljXwkBAAAADmdldEFzc2V0U3RyaW5nAAAAAQUAAAAHdG9rZW5JZAIAAAAGX3NjYWxlBAAAAAZhbW91bnQJAQAAAAhmcmFjdGlvbgAAAAQJAABlAAAAAgUAAAANdG9rZW5EZWNpbWFscwkBAAAACGZyYWN0aW9uAAAABAkAAGUAAAACBQAAAAdQU3VwcGx5BQAAAAlQUmVkZWVtZWQFAAAADXRva2VuRGVjaW1hbHMFAAAAB1BTdXBwbHkFAAAABERPV04FAAAAAkJrBQAAAA10b2tlbkRlY2ltYWxzBQAAAARET1dOCQAETgAAAAIFAAAABWFjY3VtCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAC3VzZXJBZGRyZXNzBQAAAAZhbW91bnQFAAAAB3Rva2VuSWQFAAAAA25pbAkABE4AAAACCgAAAAACJGwFAAAACGFzc2V0SWRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAUAAAADbmlsCgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAABFoYW5kbGVUb2tlblJlZGVlbQAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoKAAAAAAIkbAUAAAAIYXNzZXRJZHMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwBQAAAANuaWwKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAEmhhbmRsZVRva2VuUmVkZWVtMgAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoBAAAAEmNhbGN1bGF0ZU91dEFtb3VudAAAAAUAAAAIQW1vdW50SW4AAAAHYXNzZXRJbgAAAAhhc3NldE91dAAAAAlCYWxhbmNlSW4AAAAKQmFsYW5jZU91dAQAAAAHSW5kZXhJbgkBAAAABXZhbHVlAAAAAQkABE8AAAACBQAAAAhhc3NldElkcwUAAAAHYXNzZXRJbgQAAAAISW5kZXhPdXQJAQAAAAV2YWx1ZQAAAAEJAARPAAAAAgUAAAAIYXNzZXRJZHMFAAAACGFzc2V0T3V0AwkAAAAAAAACBQAAAAdJbmRleEluBQAAAAhJbmRleE91dAkAAAIAAAABAgAAABJpbmFsaWQgdG9rZW5zIHBhaXIJAQAAAAhmcmFjdGlvbgAAAAQFAAAACkJhbGFuY2VPdXQJAABlAAAAAgkAAZEAAAACBQAAAAZTY2FsZXMFAAAACEluZGV4T3V0CQAAbAAAAAYJAABrAAAAAwUAAAAJQmFsYW5jZUluCQABkQAAAAIFAAAABlNjYWxlcwUAAAAHSW5kZXhJbgkAAGQAAAACBQAAAAlCYWxhbmNlSW4FAAAACEFtb3VudEluCQABkQAAAAIFAAAACERlY2ltYWxzBQAAAAdJbmRleEluCQAAawAAAAMJAAGRAAAAAgUAAAANQXNzZXRzV2VpZ2h0cwUAAAAHSW5kZXhJbgAAAAAAAAAnEAkAAZEAAAACBQAAAA1Bc3NldHNXZWlnaHRzBQAAAAhJbmRleE91dAAAAAAAAAAABAkAAZEAAAACBQAAAAhEZWNpbWFscwUAAAAISW5kZXhPdXQFAAAABUZMT09SCQABkQAAAAIFAAAABlNjYWxlcwUAAAAISW5kZXhPdXQFAAAABERPV04BAAAAD2dldFRva2VuQmFsYW5jZQAAAAEAAAAHYXNzZXRJZAQAAAAHJG1hdGNoMAUAAAAHYXNzZXRJZAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAKQnl0ZVZlY3RvcgQAAAABdAUAAAAHJG1hdGNoMAkAA/AAAAACBQAAAAR0aGlzBQAAAAF0CAkAA+8AAAABBQAAAAR0aGlzAAAACWF2YWlsYWJsZQEAAAAdY2FsY3VsYXRlQ3VycmVudEFzc2V0SW50ZXJlc3QAAAAEAAAAB2Fzc2V0SWQAAAAKYXNzZXRJZFN0cgAAAAhhQmFsYW5jZQAAABZ0b2tlbkVhcm5pbmdzTGFzdENoZWNrBAAAAAt0b3RhbFN0YWtlZAkBAAAADXRyeUdldEludGVnZXIAAAABAgAAABJnbG9iYWxfaW5kZXhTdGFrZWQEAAAAFXRva2VuQmFsYW5jZUxhc3RDaGVjawUAAAAWdG9rZW5FYXJuaW5nc0xhc3RDaGVjawQAAAATY3VycmVudEJhbGFuY2VEZWx0YQkAAGUAAAACCQEAAAAPZ2V0VG9rZW5CYWxhbmNlAAAAAQUAAAAHYXNzZXRJZAUAAAAIYUJhbGFuY2UEAAAAFGN1cnJlbnRUb2tlbkVhcm5pbmdzAwkAAGYAAAACBQAAABNjdXJyZW50QmFsYW5jZURlbHRhBQAAABV0b2tlbkJhbGFuY2VMYXN0Q2hlY2sFAAAAE2N1cnJlbnRCYWxhbmNlRGVsdGEFAAAAFXRva2VuQmFsYW5jZUxhc3RDaGVjawQAAAALbmV3RWFybmluZ3MJAABlAAAAAgUAAAAUY3VycmVudFRva2VuRWFybmluZ3MFAAAAFXRva2VuQmFsYW5jZUxhc3RDaGVjawQAAAALbmV3SW50ZXJlc3QDCQAAAAAAAAIFAAAAC3RvdGFsU3Rha2VkAAAAAAAAAAAAAAAAAAAAAAAACQAAawAAAAMFAAAAC25ld0Vhcm5pbmdzBQAAAAZTY2FsZTgFAAAAC3RvdGFsU3Rha2VkBAAAABFsYXN0Q2hlY2tJbnRlcmVzdAkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAARZ2xvYmFsX2xhc3RDaGVja18FAAAACmFzc2V0SWRTdHICAAAACV9pbnRlcmVzdAkAAGQAAAACBQAAABFsYXN0Q2hlY2tJbnRlcmVzdAUAAAALbmV3SW50ZXJlc3QBAAAAC2NsYWltUmVzdWx0AAAAAQAAAAdhZGRyZXNzBAAAAAphZGRyZXNzU3RyCQAEJQAAAAEFAAAAB2FkZHJlc3MEAAAADHB1enpsZUFtb3VudAkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIFAAAACmFkZHJlc3NTdHICAAAADF9pbmRleFN0YWtlZAoBAAAAB2hhbmRsZXIAAAACAAAABWFjY3VtAAAAB2Fzc2V0SWQEAAAACmFzc2V0SWRTdHIJAQAAAA5nZXRBc3NldFN0cmluZwAAAAEFAAAAB2Fzc2V0SWQEAAAACGFCYWxhbmNlCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfCQEAAAAOZ2V0QXNzZXRTdHJpbmcAAAABBQAAAAdhc3NldElkAgAAAAhfYmFsYW5jZQQAAAAWdG9rZW5FYXJuaW5nc0xhc3RDaGVjawkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAARZ2xvYmFsX2xhc3RDaGVja18FAAAACmFzc2V0SWRTdHICAAAACV9lYXJuaW5ncwQAAAAUY3VycmVudFRva2VuSW50ZXJlc3QJAQAAAB1jYWxjdWxhdGVDdXJyZW50QXNzZXRJbnRlcmVzdAAAAAQFAAAAB2Fzc2V0SWQFAAAACmFzc2V0SWRTdHIFAAAACGFCYWxhbmNlBQAAABZ0b2tlbkVhcm5pbmdzTGFzdENoZWNrBAAAABRjdXJyZW50VG9rZW5FYXJuaW5ncwkAAZYAAAABCQAETAAAAAIFAAAAFnRva2VuRWFybmluZ3NMYXN0Q2hlY2sJAARMAAAAAgkAAGUAAAACCQEAAAAPZ2V0VG9rZW5CYWxhbmNlAAAAAQUAAAAHYXNzZXRJZAUAAAAIYUJhbGFuY2UFAAAAA25pbAQAAAAMcmV3YXJkQW1vdW50CQAAawAAAAMFAAAADHB1enpsZUFtb3VudAkAAGUAAAACBQAAABRjdXJyZW50VG9rZW5JbnRlcmVzdAkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAphZGRyZXNzU3RyAgAAAAtfbGFzdENoZWNrXwUAAAAKYXNzZXRJZFN0cgIAAAAJX2ludGVyZXN0BQAAAAZTY2FsZTgEAAAACHRyYW5zZmVyAwkAAAAAAAACBQAAAAxyZXdhcmRBbW91bnQAAAAAAAAAAAAFAAAAA25pbAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAdhZGRyZXNzBQAAAAxyZXdhcmRBbW91bnQFAAAAB2Fzc2V0SWQFAAAAA25pbAkABRQAAAACCQAETgAAAAIJAAROAAAAAggFAAAABWFjY3VtAAAAAl8xBQAAAAh0cmFuc2ZlcgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAEWdsb2JhbF9sYXN0Q2hlY2tfBQAAAAphc3NldElkU3RyAgAAAAlfZWFybmluZ3MJAABlAAAAAgUAAAAUY3VycmVudFRva2VuRWFybmluZ3MFAAAADHJld2FyZEFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAEWdsb2JhbF9sYXN0Q2hlY2tfBQAAAAphc3NldElkU3RyAgAAAAlfaW50ZXJlc3QFAAAAFGN1cnJlbnRUb2tlbkludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAphZGRyZXNzU3RyAgAAAAtfbGFzdENoZWNrXwUAAAAKYXNzZXRJZFN0cgIAAAAJX2ludGVyZXN0BQAAABRjdXJyZW50VG9rZW5JbnRlcmVzdAUAAAADbmlsCQAAZAAAAAIIBQAAAAVhY2N1bQAAAAJfMgkBAAAAEmNhbGN1bGF0ZVVzZG5WYWx1ZQAAAAMFAAAAB2Fzc2V0SWQFAAAADHJld2FyZEFtb3VudAUAAAAIYUJhbGFuY2UEAAAABWFjY3VtCgAAAAACJGwFAAAADGVhcm5lZEFzc2V0cwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAJAAUUAAAAAgUAAAADbmlsAAAAAAAAAAAACgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAdoYW5kbGVyAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAABMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQAAAAEyAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgkABE4AAAACCAUAAAAFYWNjdW0AAAACXzEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAKYWRkcmVzc1N0cgIAAAATX2NsYWltZWRSZXdhcmRWYWx1ZQkAAGQAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgUAAAAKYWRkcmVzc1N0cgIAAAATX2NsYWltZWRSZXdhcmRWYWx1ZQgFAAAABWFjY3VtAAAAAl8yCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAACmFkZHJlc3NTdHICAAAACl9sYXN0Q2xhaW0IBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wBQAAAANuaWwBAAAAEGluZGV4U3Rha2VSZXN1bHQAAAACAAAACmFkZHJlc3NTdHIAAAAGYW1vdW50BAAAAAJsaQkBAAAAC2NsYWltUmVzdWx0AAAAAQkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAKYWRkcmVzc1N0cgkABE4AAAACBQAAAAJsaQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAAphZGRyZXNzU3RyAgAAAAxfaW5kZXhTdGFrZWQJAABkAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIFAAAACmFkZHJlc3NTdHICAAAADF9pbmRleFN0YWtlZAUAAAAGYW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABJnbG9iYWxfaW5kZXhTdGFrZWQJAABkAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABAgAAABJnbG9iYWxfaW5kZXhTdGFrZWQFAAAABmFtb3VudAUAAAADbmlsAAAABwAAAAFpAQAAAAdzZXRMb2NrAAAAAQAAAApsb2NrU3RhdHVzAwkBAAAAAiE9AAAAAggFAAAAAWkAAAAGY2FsbGVyCQEAAAAHQWRkcmVzcwAAAAEFAAAACGFkbWluS2V5CQAAAgAAAAECAAAACmFkbWluIG9ubHkJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAEHN0YXRpY193YXNMb2NrZWQFAAAACmxvY2tTdGF0dXMFAAAAA25pbAAAAAFpAQAAAAdwcmVJbml0AAAAAAoBAAAAB2hhbmRsZXIAAAACAAAABWFjY3VtAAAACGFzc2V0TnVtAwkAAGcAAAACBQAAAAhhc3NldE51bQUAAAABVAUAAAAFYWNjdW0JAAROAAAAAgUAAAAFYWNjdW0JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAdzdGF0aWNfCQEAAAAOZ2V0QXNzZXRTdHJpbmcAAAABCQABkQAAAAIFAAAACGFzc2V0SWRzBQAAAAhhc3NldE51bQIAAAAGX3NjYWxlCQABkQAAAAIFAAAABlNjYWxlcwUAAAAIYXNzZXROdW0JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAdzdGF0aWNfCQEAAAAOZ2V0QXNzZXRTdHJpbmcAAAABCQABkQAAAAIFAAAACGFzc2V0SWRzBQAAAAhhc3NldE51bQIAAAAHX3dlaWdodAkAAZEAAAACBQAAAA1Bc3NldHNXZWlnaHRzBQAAAAhhc3NldE51bQUAAAADbmlsCgAAAAACJGwJAARMAAAAAgAAAAAAAAAAAAkABEwAAAACAAAAAAAAAAABCQAETAAAAAIAAAAAAAAAAAIJAARMAAAAAgAAAAAAAAAAAwkABEwAAAACAAAAAAAAAAAECQAETAAAAAIAAAAAAAAAAAUJAARMAAAAAgAAAAAAAAAABgkABEwAAAACAAAAAAAAAAAHCQAETAAAAAIAAAAAAAAAAAgJAARMAAAAAgAAAAAAAAAACQUAAAADbmlsCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAUAAAADbmlsCgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAdoYW5kbGVyAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAABMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQAAAAEyAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgAAAAFpAQAAAAZkZUluaXQAAAAAAwkBAAAAAiE9AAAAAggFAAAAAWkAAAAGY2FsbGVyBQAAAAR0aGlzCQAAAgAAAAECAAAACmFkbWluIG9ubHkJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAEGdsb2JhbF93YXNJbml0ZWQAAAAAAAAAAAAFAAAAA25pbAAAAAFpAQAAAARpbml0AAAAAAoBAAAAC3ByZXBhcmVMaXN0AAAAAAoBAAAAB2hhbmRsZXIAAAACAAAABWFjY3VtAAAAAW4JAAROAAAAAgUAAAAFYWNjdW0JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfCQACWAAAAAEJAQAAAAV2YWx1ZQAAAAEIBQAAAAFuAAAAB2Fzc2V0SWQCAAAACF9iYWxhbmNlCAUAAAABbgAAAAZhbW91bnQFAAAAA25pbAoAAAAAAiRsCAUAAAABaQAAAAhwYXltZW50cwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAHaGFuZGxlcgAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoKAQAAABljYWxjdWxhdGVQb29sVG9rZW5zQW1vdW50AAAAAQAAAAhwYXltZW50cwoBAAAAB2hhbmRsZXIAAAACAAAABWFjY3VtAAAAA3BtdAQAAAAHYXNzZXRJZAkBAAAABXZhbHVlAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCgEAAAAIaGFuZGxlcjIAAAACAAAABWFjY3VtAAAAAW4DCQAAAAAAAAIFAAAAAW4FAAAAB2Fzc2V0SWQJAQAAAAV2YWx1ZQAAAAEJAARPAAAAAgUAAAAIYXNzZXRJZHMFAAAAAW4FAAAABWFjY3VtBAAAAAVUb2tlbgoAAAAAAiRsBQAAAAhhc3NldElkcwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAAAAAAAAAAAAEKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAACGhhbmRsZXIyAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAABMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQAAAAEyAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgkAAGgAAAACBQAAAAVhY2N1bQkAAGwAAAAGCAUAAAADcG10AAAABmFtb3VudAkAAZEAAAACBQAAAAhEZWNpbWFscwUAAAAFVG9rZW4JAAGRAAAAAgUAAAANQXNzZXRzV2VpZ2h0cwUAAAAFVG9rZW4FAAAAFUFzc2V0c1dlaWdodHNEZWNpbWFscwAAAAAAAAAAAQUAAAAFRkxPT1IKAAAAAAIkbAUAAAAIcGF5bWVudHMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwAAAAAAAAAAABCgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAdoYW5kbGVyAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAABMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQAAAAEyAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgMJAABmAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABAgAAABBnbG9iYWxfd2FzSW5pdGVkAAAAAAAAAAAACQAAAgAAAAECAAAAE3Bvb2wgYWxyZWFkeSBpbml0ZWQEAAAAEWluaXRpYWxQb29sVG9rZW5zCQEAAAAZY2FsY3VsYXRlUG9vbFRva2Vuc0Ftb3VudAAAAAEIBQAAAAFpAAAACHBheW1lbnRzBAAAAA5wb29sVG9rZW5Jc3N1ZQkABEMAAAAHAgAAAA9QWiBQdXp6bGUgSW5kZXgCAAAAHlB1enpsZSBwYXJlbnQgcG9vbCBpbmRleCB0b2tlbgUAAAARaW5pdGlhbFBvb2xUb2tlbnMFAAAAEVBvb2xUb2tlbkRlY2ltYWxzBgUAAAAEdW5pdAAAAAAAAAAAAAQAAAALcG9vbFRva2VuSWQJAAQ4AAAAAQUAAAAOcG9vbFRva2VuSXNzdWUJAAROAAAAAgkBAAAAC3ByZXBhcmVMaXN0AAAAAAkABEwAAAACBQAAAA5wb29sVG9rZW5Jc3N1ZQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQFAAAAEWluaXRpYWxQb29sVG9rZW5zCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABBnbG9iYWxfd2FzSW5pdGVkAAAAAAAAAAABCQAETAAAAAIJAQAAAAtCaW5hcnlFbnRyeQAAAAICAAAAE2dsb2JhbF9wb29sVG9rZW5faWQFAAAAC3Bvb2xUb2tlbklkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAARaW5pdGlhbFBvb2xUb2tlbnMFAAAAC3Bvb2xUb2tlbklkBQAAAANuaWwAAAABaQEAAAANZ2VuZXJhdGVJbmRleAAAAAEAAAAKbmVlZENoYW5nZQkAAAIAAAABAgAAABBMUCBpcyBjbG9zZWQgeWV0AAAAAWkBAAAAC3JlZGVlbUluZGV4AAAAAQAAAAxzZW5kVG9PcmlnaW4EAAAAA3BtdAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAkBAAAADHRyeUdldEJpbmFyeQAAAAECAAAAE2dsb2JhbF9wb29sVG9rZW5faWQJAAACAAAAAQIAAAAecGxlYXNlIGF0dGFjaCBwb29sIHNoYXJlIHRva2VuBAAAAAlQUmVkZWVtZWQIBQAAAANwbXQAAAAGYW1vdW50BAAAAAZyZXN1bHQJAQAAABZoYW5kbGVQb29sVG9rZW5zUmVkZWVtAAAAAgUAAAAJUFJlZGVlbWVkAwUAAAAMc2VuZFRvT3JpZ2luCAUAAAABaQAAAAxvcmlnaW5DYWxsZXIIBQAAAAFpAAAABmNhbGxlcgkABE4AAAACBQAAAAZyZXN1bHQJAARMAAAAAgkBAAAABEJ1cm4AAAACCQEAAAAMdHJ5R2V0QmluYXJ5AAAAAQIAAAATZ2xvYmFsX3Bvb2xUb2tlbl9pZAUAAAAJUFJlZGVlbWVkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABdnbG9iYWxfcG9vbFRva2VuX2Ftb3VudAkAAGUAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAAF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BQAAAAlQUmVkZWVtZWQFAAAAA25pbAAAAAFpAQAAAARzd2FwAAAAAgAAAAhhc3NldE91dAAAAAdtaW5pbXVtAwkAAGYAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAAEHN0YXRpY193YXNMb2NrZWQAAAAAAAAAAAAJAAACAAAAAQIAAAAQbG9ja2VkIGZvciBzd2FwcwQAAAADcG10CQEAAAAFdmFsdWUAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAAhBbW91bnRJbgkBAAAABXZhbHVlAAAAAQgJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50BAAAAAdBc3NldEluCAUAAAADcG10AAAAB2Fzc2V0SWQEAAAACEFzc2V0T3V0CQEAAAANZ2V0QXNzZXRCeXRlcwAAAAEFAAAACGFzc2V0T3V0BAAAAA5Bc3NldEluQmFsYW5jZQkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwkBAAAADmdldEFzc2V0U3RyaW5nAAAAAQUAAAAHQXNzZXRJbgIAAAAIX2JhbGFuY2UEAAAAD0Fzc2V0T3V0QmFsYW5jZQkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwUAAAAIYXNzZXRPdXQCAAAACF9iYWxhbmNlBAAAAAlBbW91bnRPdXQJAQAAABJjYWxjdWxhdGVPdXRBbW91bnQAAAAFBQAAAAhBbW91bnRJbgUAAAAHQXNzZXRJbgUAAAAIQXNzZXRPdXQFAAAADkFzc2V0SW5CYWxhbmNlBQAAAA9Bc3NldE91dEJhbGFuY2UEAAAACWZlZUFtb3VudAkAAGsAAAADBQAAAAlBbW91bnRPdXQFAAAAA0ZlZQUAAAAIRmVlU2NhbGUEAAAAEXByb3RvY29sRmVlQW1vdW50BQAAAAlmZWVBbW91bnQEAAAADmNsZWFuQW1vdW50T3V0CQAAZQAAAAIFAAAACUFtb3VudE91dAUAAAAJZmVlQW1vdW50AwkAAGYAAAACBQAAAAdtaW5pbXVtBQAAAA5jbGVhbkFtb3VudE91dAkAAAIAAAABCQABLAAAAAICAAAAK2Ftb3VudCB0byByZWNpZXZlIGlzIGxvd2VyIHRoYW4gZ2l2ZW4gb25lOiAJAAGkAAAAAQUAAAAOY2xlYW5BbW91bnRPdXQDCQAAZgAAAAIAAAAAAACYloAFAAAACEFtb3VudEluCQAAAgAAAAECAAAAHHN1bSB0byBleGNoYW5nZSBpcyB0b28gc21hbGwDCQAAZgAAAAIAAAAAAAAAAAAJAABlAAAAAgUAAAAPQXNzZXRPdXRCYWxhbmNlBQAAAAlBbW91bnRPdXQJAAACAAAAAQIAAAAbY29udHJhY3QgaXMgb3V0IG9mIHJlc2VydmVzCQAFFAAAAAIJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfBQAAAAhhc3NldE91dAIAAAAIX2JhbGFuY2UJAABlAAAAAgUAAAAPQXNzZXRPdXRCYWxhbmNlBQAAAAlBbW91bnRPdXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAANZmVlQWdncmVnYXRvcgUAAAARcHJvdG9jb2xGZWVBbW91bnQFAAAACEFzc2V0T3V0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwkBAAAADmdldEFzc2V0U3RyaW5nAAAAAQUAAAAHQXNzZXRJbgIAAAAIX2JhbGFuY2UJAABkAAAAAgUAAAAOQXNzZXRJbkJhbGFuY2UFAAAACEFtb3VudEluCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAOY2xlYW5BbW91bnRPdXQFAAAACEFzc2V0T3V0BQAAAANuaWwFAAAADmNsZWFuQW1vdW50T3V0AAAAADrrxRM=",
    "height": 2873344,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: EgKLPfmC2kxSsw5hayVVwiGuuTFN6riX9fJpfq4JwN9s
Next: 6Wi64awabRx7HBNWJ9emEKtW7BB7fbPZNsHx34PZ5b8x

Diff: 
Old New Differences
465 465          let cleanAmountOut = (AmountOut - feeAmount)
466 466          if ((minimum > cleanAmountOut))
467 467              then throw(("amount to recieve is lower than given one: " + toString(cleanAmountOut)))
468 -             else if ((10000 > AmountIn))
468 +             else if ((10000000 > AmountIn))
469 469                  then throw("sum to exchange is too small")
470 470                  else if ((0 > (AssetOutBalance - AmountOut)))
471 471                      then throw("contract is out of reserves")
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let adminKey = base58'3P8qVX189qpoTJZQQQdKS9endHK5sxWsvrd'
5 5  
6 6  let T = 3
7 7  
8 8  let assetIds = [base58'HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS', base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ', base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p']
9 9  
10 10  let AssetsWeights = [80, 10, 10]
11 11  
12 12  let AssetsWeightsDecimals = 2
13 13  
14 14  let PoolTokenDecimals = 8
15 15  
16 16  let Decimals = [8, 6, 6]
17 17  
18 18  let Scales = [100000000, 1000000, 1000000]
19 19  
20 20  let Fee = 200
21 21  
22 22  let Scale = 10000
23 23  
24 24  let Scale8 = 100000000
25 25  
26 26  let FeeScale = 10000
27 27  
28 28  let feeAggregator = Address(base58'3PES7MMthaKJx9WMXnNCY3cwTGG9nD9YT8f')
29 29  
30 30  func getAssetString (assetId) = match assetId {
31 31      case b: ByteVector => 
32 32          toBase58String(b)
33 33      case _ => 
34 34          "WAVES"
35 35  }
36 36  
37 37  
38 38  func getAssetBytes (assetIdStr) = if ((assetIdStr == "WAVES"))
39 39      then unit
40 40      else fromBase58String(assetIdStr)
41 41  
42 42  
43 43  let earnedAssets = assetIds
44 44  
45 45  func tryGetInteger (key) = match getInteger(this, key) {
46 46      case b: Int => 
47 47          b
48 48      case _ => 
49 49          0
50 50  }
51 51  
52 52  
53 53  func tryGetBinary (key) = match getBinary(this, key) {
54 54      case b: ByteVector => 
55 55          b
56 56      case _ => 
57 57          base58''
58 58  }
59 59  
60 60  
61 61  func getCurrentTokenBalance (tokenType) = {
62 62      let tokenId = getAssetString(assetIds[tokenType])
63 63      tryGetInteger((("global_" + tokenId) + "_balance"))
64 64      }
65 65  
66 66  
67 67  func calculatePIssued (amount,tokenId) = {
68 68      let Psupply = tryGetInteger("global_poolToken_amount")
69 69      let Balance = tryGetInteger((("global_" + toBase58String(tokenId)) + "_balance"))
70 70      fraction(amount, Psupply, Balance, DOWN)
71 71      }
72 72  
73 73  
74 74  func getMinPIssued (payments) = {
75 75      func handler (accum,current) =     {
76 76          let PIssued = calculatePIssued(current.amount, value(current.assetId))
77 77          if (if ((accum == 0))
78 78              then true
79 79              else (accum > PIssued))
80 80              then PIssued
81 81              else accum
82 82          }
83 83  
84 84      let minPIssed = {
85 85          let $l = payments
86 86          let $s = size($l)
87 87          let $acc0 = 0
88 88          func 1 ($a,$i) =         if (($i >= $s))
89 89              then $a
90 90              else handler($a, $l[$i])
91 91  
92 92          func 2 ($a,$i) =         if (($i >= $s))
93 93              then $a
94 94              else throw("List size exceeds 10")
95 95  
96 96          2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
97 97          }
98 98      minPIssed
99 99      }
100 100  
101 101  
102 102  func calculateUsdnValue (assetId,amount,aBalance) = {
103 103      let usdnId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
104 104      let usdnWeight = AssetsWeights[value(indexOf(assetIds, usdnId))]
105 105      let assetWeight = AssetsWeights[value(indexOf(assetIds, assetId))]
106 106      let usdnBalance = tryGetInteger((("global_" + getAssetString(usdnId)) + "_balance"))
107 107      fraction(fraction(amount, usdnBalance, usdnWeight), assetWeight, aBalance)
108 108      }
109 109  
110 110  
111 111  func checkTokensValidity (payments) = {
112 112      func handler1 (accum,payment) =     (accum ++ [value(payment.assetId)])
113 113  
114 114      let ids = {
115 115          let $l = payments
116 116          let $s = size($l)
117 117          let $acc0 = nil
118 118          func 1 ($a,$i) =         if (($i >= $s))
119 119              then $a
120 120              else handler1($a, $l[$i])
121 121  
122 122          func 2 ($a,$i) =         if (($i >= $s))
123 123              then $a
124 124              else throw("List size exceeds 10")
125 125  
126 126          2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
127 127          }
128 128      if ((ids == ids))
129 129          then {
130 130              func handler2 (accum,assetId) =             if ((indexOf(ids, assetId) != unit))
131 131                  then (accum + 1)
132 132                  else throw(("asset not attached: " + getAssetString(assetId)))
133 133  
134 134              let checks = {
135 135                  let $l = assetIds
136 136                  let $s = size($l)
137 137                  let $acc0 = 0
138 138                  func 1 ($a,$i) =                 if (($i >= $s))
139 139                      then $a
140 140                      else handler2($a, $l[$i])
141 141  
142 142                  func 2 ($a,$i) =                 if (($i >= $s))
143 143                      then $a
144 144                      else throw("List size exceeds 10")
145 145  
146 146                  2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
147 147                  }
148 148              if ((checks == checks))
149 149                  then true
150 150                  else throw("Strict value is not equal to itself.")
151 151              }
152 152          else throw("Strict value is not equal to itself.")
153 153      }
154 154  
155 155  
156 156  func handlePoolTokensAdd (PIssued,payments,userAddress,needChange) = {
157 157      func getTokenPaymentAmount (tokenId) =     {
158 158          func handler (accum,payment) =         if ((payment.assetId == tokenId))
159 159              then payment.amount
160 160              else accum
161 161  
162 162          let $l = payments
163 163          let $s = size($l)
164 164          let $acc0 = 0
165 165          func 1 ($a,$i) =         if (($i >= $s))
166 166              then $a
167 167              else handler($a, $l[$i])
168 168  
169 169          func 2 ($a,$i) =         if (($i >= $s))
170 170              then $a
171 171              else throw("List size exceeds 10")
172 172  
173 173          2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
174 174          }
175 175  
176 176      func handleTokenChange (accum,tokenId) =     {
177 177          let Bk = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
178 178          let PSupply = tryGetInteger("global_poolToken_amount")
179 179          let tokenDecimals = tryGetInteger((("static_" + getAssetString(tokenId)) + "_scale"))
180 180          let Dk = fraction((fraction((PSupply + PIssued), tokenDecimals, PSupply, DOWN) - tokenDecimals), Bk, tokenDecimals, DOWN)
181 181          let paymentAmount = getTokenPaymentAmount(tokenId)
182 182          let toReturn = ((if ((paymentAmount != 0))
183 183              then paymentAmount
184 184              else 0) - Dk)
185 185          let t = if (needChange)
186 186              then [ScriptTransfer(userAddress, toReturn, tokenId)]
187 187              else nil
188 188          ((accum ++ t) ++ [IntegerEntry((("global_" + getAssetString(tokenId)) + "_balance"), (Bk + Dk))])
189 189          }
190 190  
191 191      let $l = assetIds
192 192      let $s = size($l)
193 193      let $acc0 = nil
194 194      func 1 ($a,$i) =     if (($i >= $s))
195 195          then $a
196 196          else handleTokenChange($a, $l[$i])
197 197  
198 198      func 2 ($a,$i) =     if (($i >= $s))
199 199          then $a
200 200          else throw("List size exceeds 10")
201 201  
202 202      2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
203 203      }
204 204  
205 205  
206 206  func handlePoolTokensRedeem (PRedeemed,userAddress) = {
207 207      func handleTokenRedeem (accum,tokenId) =     {
208 208          let Bk = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
209 209          let PSupply = tryGetInteger("global_poolToken_amount")
210 210          let tokenDecimals = tryGetInteger((("static_" + getAssetString(tokenId)) + "_scale"))
211 211          let amount = fraction((tokenDecimals - fraction((PSupply - PRedeemed), tokenDecimals, PSupply, DOWN)), Bk, tokenDecimals, DOWN)
212 212          (accum ++ [IntegerEntry((("global_" + getAssetString(tokenId)) + "_balance"), (Bk - amount))])
213 213          }
214 214  
215 215      func handleTokenRedeem2 (accum,tokenId) =     {
216 216          let Bk = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
217 217          let PSupply = tryGetInteger("global_poolToken_amount")
218 218          let tokenDecimals = tryGetInteger((("static_" + getAssetString(tokenId)) + "_scale"))
219 219          let amount = fraction((tokenDecimals - fraction((PSupply - PRedeemed), tokenDecimals, PSupply, DOWN)), Bk, tokenDecimals, DOWN)
220 220          (accum ++ [ScriptTransfer(userAddress, amount, tokenId)])
221 221          }
222 222  
223 223      ({
224 224          let $l = assetIds
225 225          let $s = size($l)
226 226          let $acc0 = nil
227 227          func 1 ($a,$i) =         if (($i >= $s))
228 228              then $a
229 229              else handleTokenRedeem($a, $l[$i])
230 230  
231 231          func 2 ($a,$i) =         if (($i >= $s))
232 232              then $a
233 233              else throw("List size exceeds 10")
234 234  
235 235          2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
236 236          } ++ {
237 237          let $l = assetIds
238 238          let $s = size($l)
239 239          let $acc0 = nil
240 240          func 1 ($a,$i) =         if (($i >= $s))
241 241              then $a
242 242              else handleTokenRedeem2($a, $l[$i])
243 243  
244 244          func 2 ($a,$i) =         if (($i >= $s))
245 245              then $a
246 246              else throw("List size exceeds 10")
247 247  
248 248          2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
249 249          })
250 250      }
251 251  
252 252  
253 253  func calculateOutAmount (AmountIn,assetIn,assetOut,BalanceIn,BalanceOut) = {
254 254      let IndexIn = value(indexOf(assetIds, assetIn))
255 255      let IndexOut = value(indexOf(assetIds, assetOut))
256 256      if ((IndexIn == IndexOut))
257 257          then throw("inalid tokens pair")
258 258          else fraction(BalanceOut, (Scales[IndexOut] - pow(fraction(BalanceIn, Scales[IndexIn], (BalanceIn + AmountIn)), Decimals[IndexIn], fraction(AssetsWeights[IndexIn], 10000, AssetsWeights[IndexOut]), 4, Decimals[IndexOut], FLOOR)), Scales[IndexOut], DOWN)
259 259      }
260 260  
261 261  
262 262  func getTokenBalance (assetId) = match assetId {
263 263      case t: ByteVector => 
264 264          assetBalance(this, t)
265 265      case _ => 
266 266          wavesBalance(this).available
267 267  }
268 268  
269 269  
270 270  func calculateCurrentAssetInterest (assetId,assetIdStr,aBalance,tokenEarningsLastCheck) = {
271 271      let totalStaked = tryGetInteger("global_indexStaked")
272 272      let tokenBalanceLastCheck = tokenEarningsLastCheck
273 273      let currentBalanceDelta = (getTokenBalance(assetId) - aBalance)
274 274      let currentTokenEarnings = if ((currentBalanceDelta > tokenBalanceLastCheck))
275 275          then currentBalanceDelta
276 276          else tokenBalanceLastCheck
277 277      let newEarnings = (currentTokenEarnings - tokenBalanceLastCheck)
278 278      let newInterest = if ((totalStaked == 0))
279 279          then 0
280 280          else fraction(newEarnings, Scale8, totalStaked)
281 281      let lastCheckInterest = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_interest"))
282 282      (lastCheckInterest + newInterest)
283 283      }
284 284  
285 285  
286 286  func claimResult (address) = {
287 287      let addressStr = toString(address)
288 288      let puzzleAmount = tryGetInteger((addressStr + "_indexStaked"))
289 289      func handler (accum,assetId) =     {
290 290          let assetIdStr = getAssetString(assetId)
291 291          let aBalance = tryGetInteger((("global_" + getAssetString(assetId)) + "_balance"))
292 292          let tokenEarningsLastCheck = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_earnings"))
293 293          let currentTokenInterest = calculateCurrentAssetInterest(assetId, assetIdStr, aBalance, tokenEarningsLastCheck)
294 294          let currentTokenEarnings = max([tokenEarningsLastCheck, (getTokenBalance(assetId) - aBalance)])
295 295          let rewardAmount = fraction(puzzleAmount, (currentTokenInterest - tryGetInteger((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"))), Scale8)
296 296          let transfer = if ((rewardAmount == 0))
297 297              then nil
298 298              else [ScriptTransfer(address, rewardAmount, assetId)]
299 299          $Tuple2(((accum._1 ++ transfer) ++ [IntegerEntry((("global_lastCheck_" + assetIdStr) + "_earnings"), (currentTokenEarnings - rewardAmount)), IntegerEntry((("global_lastCheck_" + assetIdStr) + "_interest"), currentTokenInterest), IntegerEntry((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"), currentTokenInterest)]), (accum._2 + calculateUsdnValue(assetId, rewardAmount, aBalance)))
300 300          }
301 301  
302 302      let accum = {
303 303          let $l = earnedAssets
304 304          let $s = size($l)
305 305          let $acc0 = $Tuple2(nil, 0)
306 306          func 1 ($a,$i) =         if (($i >= $s))
307 307              then $a
308 308              else handler($a, $l[$i])
309 309  
310 310          func 2 ($a,$i) =         if (($i >= $s))
311 311              then $a
312 312              else throw("List size exceeds 10")
313 313  
314 314          2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
315 315          }
316 316      (accum._1 ++ [IntegerEntry((addressStr + "_claimedRewardValue"), (tryGetInteger((addressStr + "_claimedRewardValue")) + accum._2)), IntegerEntry((addressStr + "_lastClaim"), lastBlock.timestamp)])
317 317      }
318 318  
319 319  
320 320  func indexStakeResult (addressStr,amount) = {
321 321      let li = claimResult(addressFromStringValue(addressStr))
322 322      (li ++ [IntegerEntry((addressStr + "_indexStaked"), (tryGetInteger((addressStr + "_indexStaked")) + amount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") + amount))])
323 323      }
324 324  
325 325  
326 326  @Callable(i)
327 327  func setLock (lockStatus) = if ((i.caller != Address(adminKey)))
328 328      then throw("admin only")
329 329      else [IntegerEntry("static_wasLocked", lockStatus)]
330 330  
331 331  
332 332  
333 333  @Callable(i)
334 334  func preInit () = {
335 335      func handler (accum,assetNum) =     if ((assetNum >= T))
336 336          then accum
337 337          else (accum ++ [IntegerEntry((("static_" + getAssetString(assetIds[assetNum])) + "_scale"), Scales[assetNum]), IntegerEntry((("static_" + getAssetString(assetIds[assetNum])) + "_weight"), AssetsWeights[assetNum])])
338 338  
339 339      let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
340 340      let $s = size($l)
341 341      let $acc0 = nil
342 342      func 1 ($a,$i) =     if (($i >= $s))
343 343          then $a
344 344          else handler($a, $l[$i])
345 345  
346 346      func 2 ($a,$i) =     if (($i >= $s))
347 347          then $a
348 348          else throw("List size exceeds 10")
349 349  
350 350      2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
351 351      }
352 352  
353 353  
354 354  
355 355  @Callable(i)
356 356  func deInit () = if ((i.caller != this))
357 357      then throw("admin only")
358 358      else [IntegerEntry("global_wasInited", 0)]
359 359  
360 360  
361 361  
362 362  @Callable(i)
363 363  func init () = {
364 364      func prepareList () =     {
365 365          func handler (accum,n) =         (accum ++ [IntegerEntry((("global_" + toBase58String(value(n.assetId))) + "_balance"), n.amount)])
366 366  
367 367          let $l = i.payments
368 368          let $s = size($l)
369 369          let $acc0 = nil
370 370          func 1 ($a,$i) =         if (($i >= $s))
371 371              then $a
372 372              else handler($a, $l[$i])
373 373  
374 374          func 2 ($a,$i) =         if (($i >= $s))
375 375              then $a
376 376              else throw("List size exceeds 10")
377 377  
378 378          2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
379 379          }
380 380  
381 381      func calculatePoolTokensAmount (payments) =     {
382 382          func handler (accum,pmt) =         {
383 383              let assetId = value(pmt.assetId)
384 384              func handler2 (accum,n) =             if ((n == assetId))
385 385                  then value(indexOf(assetIds, n))
386 386                  else accum
387 387  
388 388              let Token = {
389 389                  let $l = assetIds
390 390                  let $s = size($l)
391 391                  let $acc0 = 1
392 392                  func 1 ($a,$i) =                 if (($i >= $s))
393 393                      then $a
394 394                      else handler2($a, $l[$i])
395 395  
396 396                  func 2 ($a,$i) =                 if (($i >= $s))
397 397                      then $a
398 398                      else throw("List size exceeds 10")
399 399  
400 400                  2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
401 401                  }
402 402              (accum * pow(pmt.amount, Decimals[Token], AssetsWeights[Token], AssetsWeightsDecimals, 1, FLOOR))
403 403              }
404 404  
405 405          let $l = payments
406 406          let $s = size($l)
407 407          let $acc0 = 1
408 408          func 1 ($a,$i) =         if (($i >= $s))
409 409              then $a
410 410              else handler($a, $l[$i])
411 411  
412 412          func 2 ($a,$i) =         if (($i >= $s))
413 413              then $a
414 414              else throw("List size exceeds 10")
415 415  
416 416          2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
417 417          }
418 418  
419 419      if ((tryGetInteger("global_wasInited") > 0))
420 420          then throw("pool already inited")
421 421          else {
422 422              let initialPoolTokens = calculatePoolTokensAmount(i.payments)
423 423              let poolTokenIssue = Issue("PZ Puzzle Index", "Puzzle parent pool index token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
424 424              let poolTokenId = calculateAssetId(poolTokenIssue)
425 425              (prepareList() ++ [poolTokenIssue, IntegerEntry("global_poolToken_amount", initialPoolTokens), IntegerEntry("global_wasInited", 1), BinaryEntry("global_poolToken_id", poolTokenId), ScriptTransfer(i.caller, initialPoolTokens, poolTokenId)])
426 426              }
427 427      }
428 428  
429 429  
430 430  
431 431  @Callable(i)
432 432  func generateIndex (needChange) = throw("LP is closed yet")
433 433  
434 434  
435 435  
436 436  @Callable(i)
437 437  func redeemIndex (sendToOrigin) = {
438 438      let pmt = i.payments[0]
439 439      if ((pmt.assetId != tryGetBinary("global_poolToken_id")))
440 440          then throw("please attach pool share token")
441 441          else {
442 442              let PRedeemed = pmt.amount
443 443              let result = handlePoolTokensRedeem(PRedeemed, if (sendToOrigin)
444 444                  then i.originCaller
445 445                  else i.caller)
446 446              (result ++ [Burn(tryGetBinary("global_poolToken_id"), PRedeemed), IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") - PRedeemed))])
447 447              }
448 448      }
449 449  
450 450  
451 451  
452 452  @Callable(i)
453 453  func swap (assetOut,minimum) = if ((tryGetInteger("static_wasLocked") > 0))
454 454      then throw("locked for swaps")
455 455      else {
456 456          let pmt = value(i.payments[0])
457 457          let AmountIn = value(i.payments[0].amount)
458 458          let AssetIn = pmt.assetId
459 459          let AssetOut = getAssetBytes(assetOut)
460 460          let AssetInBalance = tryGetInteger((("global_" + getAssetString(AssetIn)) + "_balance"))
461 461          let AssetOutBalance = tryGetInteger((("global_" + assetOut) + "_balance"))
462 462          let AmountOut = calculateOutAmount(AmountIn, AssetIn, AssetOut, AssetInBalance, AssetOutBalance)
463 463          let feeAmount = fraction(AmountOut, Fee, FeeScale)
464 464          let protocolFeeAmount = feeAmount
465 465          let cleanAmountOut = (AmountOut - feeAmount)
466 466          if ((minimum > cleanAmountOut))
467 467              then throw(("amount to recieve is lower than given one: " + toString(cleanAmountOut)))
468 -             else if ((10000 > AmountIn))
468 +             else if ((10000000 > AmountIn))
469 469                  then throw("sum to exchange is too small")
470 470                  else if ((0 > (AssetOutBalance - AmountOut)))
471 471                      then throw("contract is out of reserves")
472 472                      else $Tuple2([IntegerEntry((("global_" + assetOut) + "_balance"), (AssetOutBalance - AmountOut)), ScriptTransfer(feeAggregator, protocolFeeAmount, AssetOut), IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), (AssetInBalance + AmountIn)), ScriptTransfer(i.caller, cleanAmountOut, AssetOut)], cleanAmountOut)
473 473          }
474 474  
475 475

Old	New		Differences
465	465		let cleanAmountOut = (AmountOut - feeAmount)
466	466		if ((minimum > cleanAmountOut))
467	467		then throw(("amount to recieve is lower than given one: " + toString(cleanAmountOut)))
468		-	else if ((~~10000~~ > AmountIn))
	468	+	else if ((10000000 > AmountIn))
469	469		then throw("sum to exchange is too small")
470	470		else if ((0 > (AssetOutBalance - AmountOut)))
471	471		then throw("contract is out of reserves")

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let adminKey = base58'3P8qVX189qpoTJZQQQdKS9endHK5sxWsvrd'
5	5
6	6		let T = 3
7	7
8	8		let assetIds = [base58'HEB8Qaw9xrWpWs8tHsiATYGBWDBtP2S7kcPALrMu43AS', base58'34N9YcEETLWn93qYQ64EsP1x89tSruJU44RrEMSXXEPJ', base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p']
9	9
10	10		let AssetsWeights = [80, 10, 10]
11	11
12	12		let AssetsWeightsDecimals = 2
13	13
14	14		let PoolTokenDecimals = 8
15	15
16	16		let Decimals = [8, 6, 6]
17	17
18	18		let Scales = [100000000, 1000000, 1000000]
19	19
20	20		let Fee = 200
21	21
22	22		let Scale = 10000
23	23
24	24		let Scale8 = 100000000
25	25
26	26		let FeeScale = 10000
27	27
28	28		let feeAggregator = Address(base58'3PES7MMthaKJx9WMXnNCY3cwTGG9nD9YT8f')
29	29
30	30		func getAssetString (assetId) = match assetId {
31	31		case b: ByteVector =>
32	32		toBase58String(b)
33	33		case _ =>
34	34		"WAVES"
35	35		}
36	36
37	37
38	38		func getAssetBytes (assetIdStr) = if ((assetIdStr == "WAVES"))
39	39		then unit
40	40		else fromBase58String(assetIdStr)
41	41
42	42
43	43		let earnedAssets = assetIds
44	44
45	45		func tryGetInteger (key) = match getInteger(this, key) {
46	46		case b: Int =>
47	47		b
48	48		case _ =>
49	49		0
50	50		}
51	51
52	52
53	53		func tryGetBinary (key) = match getBinary(this, key) {
54	54		case b: ByteVector =>
55	55		b
56	56		case _ =>
57	57		base58''
58	58		}
59	59
60	60
61	61		func getCurrentTokenBalance (tokenType) = {
62	62		let tokenId = getAssetString(assetIds[tokenType])
63	63		tryGetInteger((("global_" + tokenId) + "_balance"))
64	64		}
65	65
66	66
67	67		func calculatePIssued (amount,tokenId) = {
68	68		let Psupply = tryGetInteger("global_poolToken_amount")
69	69		let Balance = tryGetInteger((("global_" + toBase58String(tokenId)) + "_balance"))
70	70		fraction(amount, Psupply, Balance, DOWN)
71	71		}
72	72
73	73
74	74		func getMinPIssued (payments) = {
75	75		func handler (accum,current) = {
76	76		let PIssued = calculatePIssued(current.amount, value(current.assetId))
77	77		if (if ((accum == 0))
78	78		then true
79	79		else (accum > PIssued))
80	80		then PIssued
81	81		else accum
82	82		}
83	83
84	84		let minPIssed = {
85	85		let $l = payments
86	86		let $s = size($l)
87	87		let $acc0 = 0
88	88		func 1 ($a,$i) = if (($i >= $s))
89	89		then $a
90	90		else handler($a, $l[$i])
91	91
92	92		func 2 ($a,$i) = if (($i >= $s))
93	93		then $a
94	94		else throw("List size exceeds 10")
95	95
96	96		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
97	97		}
98	98		minPIssed
99	99		}
100	100
101	101
102	102		func calculateUsdnValue (assetId,amount,aBalance) = {
103	103		let usdnId = base58'DG2xFkPdDwKUoBkzGAhQtLpSGzfXLiCYPEzeKH2Ad24p'
104	104		let usdnWeight = AssetsWeights[value(indexOf(assetIds, usdnId))]
105	105		let assetWeight = AssetsWeights[value(indexOf(assetIds, assetId))]
106	106		let usdnBalance = tryGetInteger((("global_" + getAssetString(usdnId)) + "_balance"))
107	107		fraction(fraction(amount, usdnBalance, usdnWeight), assetWeight, aBalance)
108	108		}
109	109
110	110
111	111		func checkTokensValidity (payments) = {
112	112		func handler1 (accum,payment) = (accum ++ [value(payment.assetId)])
113	113
114	114		let ids = {
115	115		let $l = payments
116	116		let $s = size($l)
117	117		let $acc0 = nil
118	118		func 1 ($a,$i) = if (($i >= $s))
119	119		then $a
120	120		else handler1($a, $l[$i])
121	121
122	122		func 2 ($a,$i) = if (($i >= $s))
123	123		then $a
124	124		else throw("List size exceeds 10")
125	125
126	126		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
127	127		}
128	128		if ((ids == ids))
129	129		then {
130	130		func handler2 (accum,assetId) = if ((indexOf(ids, assetId) != unit))
131	131		then (accum + 1)
132	132		else throw(("asset not attached: " + getAssetString(assetId)))
133	133
134	134		let checks = {
135	135		let $l = assetIds
136	136		let $s = size($l)
137	137		let $acc0 = 0
138	138		func 1 ($a,$i) = if (($i >= $s))
139	139		then $a
140	140		else handler2($a, $l[$i])
141	141
142	142		func 2 ($a,$i) = if (($i >= $s))
143	143		then $a
144	144		else throw("List size exceeds 10")
145	145
146	146		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
147	147		}
148	148		if ((checks == checks))
149	149		then true
150	150		else throw("Strict value is not equal to itself.")
151	151		}
152	152		else throw("Strict value is not equal to itself.")
153	153		}
154	154
155	155
156	156		func handlePoolTokensAdd (PIssued,payments,userAddress,needChange) = {
157	157		func getTokenPaymentAmount (tokenId) = {
158	158		func handler (accum,payment) = if ((payment.assetId == tokenId))
159	159		then payment.amount
160	160		else accum
161	161
162	162		let $l = payments
163	163		let $s = size($l)
164	164		let $acc0 = 0
165	165		func 1 ($a,$i) = if (($i >= $s))
166	166		then $a
167	167		else handler($a, $l[$i])
168	168
169	169		func 2 ($a,$i) = if (($i >= $s))
170	170		then $a
171	171		else throw("List size exceeds 10")
172	172
173	173		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
174	174		}
175	175
176	176		func handleTokenChange (accum,tokenId) = {
177	177		let Bk = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
178	178		let PSupply = tryGetInteger("global_poolToken_amount")
179	179		let tokenDecimals = tryGetInteger((("static_" + getAssetString(tokenId)) + "_scale"))
180	180		let Dk = fraction((fraction((PSupply + PIssued), tokenDecimals, PSupply, DOWN) - tokenDecimals), Bk, tokenDecimals, DOWN)
181	181		let paymentAmount = getTokenPaymentAmount(tokenId)
182	182		let toReturn = ((if ((paymentAmount != 0))
183	183		then paymentAmount
184	184		else 0) - Dk)
185	185		let t = if (needChange)
186	186		then [ScriptTransfer(userAddress, toReturn, tokenId)]
187	187		else nil
188	188		((accum ++ t) ++ [IntegerEntry((("global_" + getAssetString(tokenId)) + "_balance"), (Bk + Dk))])
189	189		}
190	190
191	191		let $l = assetIds
192	192		let $s = size($l)
193	193		let $acc0 = nil
194	194		func 1 ($a,$i) = if (($i >= $s))
195	195		then $a
196	196		else handleTokenChange($a, $l[$i])
197	197
198	198		func 2 ($a,$i) = if (($i >= $s))
199	199		then $a
200	200		else throw("List size exceeds 10")
201	201
202	202		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
203	203		}
204	204
205	205
206	206		func handlePoolTokensRedeem (PRedeemed,userAddress) = {
207	207		func handleTokenRedeem (accum,tokenId) = {
208	208		let Bk = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
209	209		let PSupply = tryGetInteger("global_poolToken_amount")
210	210		let tokenDecimals = tryGetInteger((("static_" + getAssetString(tokenId)) + "_scale"))
211	211		let amount = fraction((tokenDecimals - fraction((PSupply - PRedeemed), tokenDecimals, PSupply, DOWN)), Bk, tokenDecimals, DOWN)
212	212		(accum ++ [IntegerEntry((("global_" + getAssetString(tokenId)) + "_balance"), (Bk - amount))])
213	213		}
214	214
215	215		func handleTokenRedeem2 (accum,tokenId) = {
216	216		let Bk = tryGetInteger((("global_" + getAssetString(tokenId)) + "_balance"))
217	217		let PSupply = tryGetInteger("global_poolToken_amount")
218	218		let tokenDecimals = tryGetInteger((("static_" + getAssetString(tokenId)) + "_scale"))
219	219		let amount = fraction((tokenDecimals - fraction((PSupply - PRedeemed), tokenDecimals, PSupply, DOWN)), Bk, tokenDecimals, DOWN)
220	220		(accum ++ [ScriptTransfer(userAddress, amount, tokenId)])
221	221		}
222	222
223	223		({
224	224		let $l = assetIds
225	225		let $s = size($l)
226	226		let $acc0 = nil
227	227		func 1 ($a,$i) = if (($i >= $s))
228	228		then $a
229	229		else handleTokenRedeem($a, $l[$i])
230	230
231	231		func 2 ($a,$i) = if (($i >= $s))
232	232		then $a
233	233		else throw("List size exceeds 10")
234	234
235	235		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
236	236		} ++ {
237	237		let $l = assetIds
238	238		let $s = size($l)
239	239		let $acc0 = nil
240	240		func 1 ($a,$i) = if (($i >= $s))
241	241		then $a
242	242		else handleTokenRedeem2($a, $l[$i])
243	243
244	244		func 2 ($a,$i) = if (($i >= $s))
245	245		then $a
246	246		else throw("List size exceeds 10")
247	247
248	248		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
249	249		})
250	250		}
251	251
252	252
253	253		func calculateOutAmount (AmountIn,assetIn,assetOut,BalanceIn,BalanceOut) = {
254	254		let IndexIn = value(indexOf(assetIds, assetIn))
255	255		let IndexOut = value(indexOf(assetIds, assetOut))
256	256		if ((IndexIn == IndexOut))
257	257		then throw("inalid tokens pair")
258	258		else fraction(BalanceOut, (Scales[IndexOut] - pow(fraction(BalanceIn, Scales[IndexIn], (BalanceIn + AmountIn)), Decimals[IndexIn], fraction(AssetsWeights[IndexIn], 10000, AssetsWeights[IndexOut]), 4, Decimals[IndexOut], FLOOR)), Scales[IndexOut], DOWN)
259	259		}
260	260
261	261
262	262		func getTokenBalance (assetId) = match assetId {
263	263		case t: ByteVector =>
264	264		assetBalance(this, t)
265	265		case _ =>
266	266		wavesBalance(this).available
267	267		}
268	268
269	269
270	270		func calculateCurrentAssetInterest (assetId,assetIdStr,aBalance,tokenEarningsLastCheck) = {
271	271		let totalStaked = tryGetInteger("global_indexStaked")
272	272		let tokenBalanceLastCheck = tokenEarningsLastCheck
273	273		let currentBalanceDelta = (getTokenBalance(assetId) - aBalance)
274	274		let currentTokenEarnings = if ((currentBalanceDelta > tokenBalanceLastCheck))
275	275		then currentBalanceDelta
276	276		else tokenBalanceLastCheck
277	277		let newEarnings = (currentTokenEarnings - tokenBalanceLastCheck)
278	278		let newInterest = if ((totalStaked == 0))
279	279		then 0
280	280		else fraction(newEarnings, Scale8, totalStaked)
281	281		let lastCheckInterest = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_interest"))
282	282		(lastCheckInterest + newInterest)
283	283		}
284	284
285	285
286	286		func claimResult (address) = {
287	287		let addressStr = toString(address)
288	288		let puzzleAmount = tryGetInteger((addressStr + "_indexStaked"))
289	289		func handler (accum,assetId) = {
290	290		let assetIdStr = getAssetString(assetId)
291	291		let aBalance = tryGetInteger((("global_" + getAssetString(assetId)) + "_balance"))
292	292		let tokenEarningsLastCheck = tryGetInteger((("global_lastCheck_" + assetIdStr) + "_earnings"))
293	293		let currentTokenInterest = calculateCurrentAssetInterest(assetId, assetIdStr, aBalance, tokenEarningsLastCheck)
294	294		let currentTokenEarnings = max([tokenEarningsLastCheck, (getTokenBalance(assetId) - aBalance)])
295	295		let rewardAmount = fraction(puzzleAmount, (currentTokenInterest - tryGetInteger((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"))), Scale8)
296	296		let transfer = if ((rewardAmount == 0))
297	297		then nil
298	298		else [ScriptTransfer(address, rewardAmount, assetId)]
299	299		$Tuple2(((accum._1 ++ transfer) ++ [IntegerEntry((("global_lastCheck_" + assetIdStr) + "_earnings"), (currentTokenEarnings - rewardAmount)), IntegerEntry((("global_lastCheck_" + assetIdStr) + "_interest"), currentTokenInterest), IntegerEntry((((addressStr + "_lastCheck_") + assetIdStr) + "_interest"), currentTokenInterest)]), (accum._2 + calculateUsdnValue(assetId, rewardAmount, aBalance)))
300	300		}
301	301
302	302		let accum = {
303	303		let $l = earnedAssets
304	304		let $s = size($l)
305	305		let $acc0 = $Tuple2(nil, 0)
306	306		func 1 ($a,$i) = if (($i >= $s))
307	307		then $a
308	308		else handler($a, $l[$i])
309	309
310	310		func 2 ($a,$i) = if (($i >= $s))
311	311		then $a
312	312		else throw("List size exceeds 10")
313	313
314	314		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
315	315		}
316	316		(accum._1 ++ [IntegerEntry((addressStr + "_claimedRewardValue"), (tryGetInteger((addressStr + "_claimedRewardValue")) + accum._2)), IntegerEntry((addressStr + "_lastClaim"), lastBlock.timestamp)])
317	317		}
318	318
319	319
320	320		func indexStakeResult (addressStr,amount) = {
321	321		let li = claimResult(addressFromStringValue(addressStr))
322	322		(li ++ [IntegerEntry((addressStr + "_indexStaked"), (tryGetInteger((addressStr + "_indexStaked")) + amount)), IntegerEntry("global_indexStaked", (tryGetInteger("global_indexStaked") + amount))])
323	323		}
324	324
325	325
326	326		@Callable(i)
327	327		func setLock (lockStatus) = if ((i.caller != Address(adminKey)))
328	328		then throw("admin only")
329	329		else [IntegerEntry("static_wasLocked", lockStatus)]
330	330
331	331
332	332
333	333		@Callable(i)
334	334		func preInit () = {
335	335		func handler (accum,assetNum) = if ((assetNum >= T))
336	336		then accum
337	337		else (accum ++ [IntegerEntry((("static_" + getAssetString(assetIds[assetNum])) + "_scale"), Scales[assetNum]), IntegerEntry((("static_" + getAssetString(assetIds[assetNum])) + "_weight"), AssetsWeights[assetNum])])
338	338
339	339		let $l = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
340	340		let $s = size($l)
341	341		let $acc0 = nil
342	342		func 1 ($a,$i) = if (($i >= $s))
343	343		then $a
344	344		else handler($a, $l[$i])
345	345
346	346		func 2 ($a,$i) = if (($i >= $s))
347	347		then $a
348	348		else throw("List size exceeds 10")
349	349
350	350		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
351	351		}
352	352
353	353
354	354
355	355		@Callable(i)
356	356		func deInit () = if ((i.caller != this))
357	357		then throw("admin only")
358	358		else [IntegerEntry("global_wasInited", 0)]
359	359
360	360
361	361
362	362		@Callable(i)
363	363		func init () = {
364	364		func prepareList () = {
365	365		func handler (accum,n) = (accum ++ [IntegerEntry((("global_" + toBase58String(value(n.assetId))) + "_balance"), n.amount)])
366	366
367	367		let $l = i.payments
368	368		let $s = size($l)
369	369		let $acc0 = nil
370	370		func 1 ($a,$i) = if (($i >= $s))
371	371		then $a
372	372		else handler($a, $l[$i])
373	373
374	374		func 2 ($a,$i) = if (($i >= $s))
375	375		then $a
376	376		else throw("List size exceeds 10")
377	377
378	378		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
379	379		}
380	380
381	381		func calculatePoolTokensAmount (payments) = {
382	382		func handler (accum,pmt) = {
383	383		let assetId = value(pmt.assetId)
384	384		func handler2 (accum,n) = if ((n == assetId))
385	385		then value(indexOf(assetIds, n))
386	386		else accum
387	387
388	388		let Token = {
389	389		let $l = assetIds
390	390		let $s = size($l)
391	391		let $acc0 = 1
392	392		func 1 ($a,$i) = if (($i >= $s))
393	393		then $a
394	394		else handler2($a, $l[$i])
395	395
396	396		func 2 ($a,$i) = if (($i >= $s))
397	397		then $a
398	398		else throw("List size exceeds 10")
399	399
400	400		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
401	401		}
402	402		(accum * pow(pmt.amount, Decimals[Token], AssetsWeights[Token], AssetsWeightsDecimals, 1, FLOOR))
403	403		}
404	404
405	405		let $l = payments
406	406		let $s = size($l)
407	407		let $acc0 = 1
408	408		func 1 ($a,$i) = if (($i >= $s))
409	409		then $a
410	410		else handler($a, $l[$i])
411	411
412	412		func 2 ($a,$i) = if (($i >= $s))
413	413		then $a
414	414		else throw("List size exceeds 10")
415	415
416	416		2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
417	417		}
418	418
419	419		if ((tryGetInteger("global_wasInited") > 0))
420	420		then throw("pool already inited")
421	421		else {
422	422		let initialPoolTokens = calculatePoolTokensAmount(i.payments)
423	423		let poolTokenIssue = Issue("PZ Puzzle Index", "Puzzle parent pool index token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
424	424		let poolTokenId = calculateAssetId(poolTokenIssue)
425	425		(prepareList() ++ [poolTokenIssue, IntegerEntry("global_poolToken_amount", initialPoolTokens), IntegerEntry("global_wasInited", 1), BinaryEntry("global_poolToken_id", poolTokenId), ScriptTransfer(i.caller, initialPoolTokens, poolTokenId)])
426	426		}
427	427		}
428	428
429	429
430	430
431	431		@Callable(i)
432	432		func generateIndex (needChange) = throw("LP is closed yet")
433	433
434	434
435	435
436	436		@Callable(i)
437	437		func redeemIndex (sendToOrigin) = {
438	438		let pmt = i.payments[0]
439	439		if ((pmt.assetId != tryGetBinary("global_poolToken_id")))
440	440		then throw("please attach pool share token")
441	441		else {
442	442		let PRedeemed = pmt.amount
443	443		let result = handlePoolTokensRedeem(PRedeemed, if (sendToOrigin)
444	444		then i.originCaller
445	445		else i.caller)
446	446		(result ++ [Burn(tryGetBinary("global_poolToken_id"), PRedeemed), IntegerEntry("global_poolToken_amount", (tryGetInteger("global_poolToken_amount") - PRedeemed))])
447	447		}
448	448		}
449	449
450	450
451	451
452	452		@Callable(i)
453	453		func swap (assetOut,minimum) = if ((tryGetInteger("static_wasLocked") > 0))
454	454		then throw("locked for swaps")
455	455		else {
456	456		let pmt = value(i.payments[0])
457	457		let AmountIn = value(i.payments[0].amount)
458	458		let AssetIn = pmt.assetId
459	459		let AssetOut = getAssetBytes(assetOut)
460	460		let AssetInBalance = tryGetInteger((("global_" + getAssetString(AssetIn)) + "_balance"))
461	461		let AssetOutBalance = tryGetInteger((("global_" + assetOut) + "_balance"))
462	462		let AmountOut = calculateOutAmount(AmountIn, AssetIn, AssetOut, AssetInBalance, AssetOutBalance)
463	463		let feeAmount = fraction(AmountOut, Fee, FeeScale)
464	464		let protocolFeeAmount = feeAmount
465	465		let cleanAmountOut = (AmountOut - feeAmount)
466	466		if ((minimum > cleanAmountOut))
467	467		then throw(("amount to recieve is lower than given one: " + toString(cleanAmountOut)))
468		-	else if ((~~10000~~ > AmountIn))
	468	+	else if ((10000000 > AmountIn))
469	469		then throw("sum to exchange is too small")
470	470		else if ((0 > (AssetOutBalance - AmountOut)))
471	471		then throw("contract is out of reserves")
472	472		else $Tuple2([IntegerEntry((("global_" + assetOut) + "_balance"), (AssetOutBalance - AmountOut)), ScriptTransfer(feeAggregator, protocolFeeAmount, AssetOut), IntegerEntry((("global_" + getAssetString(AssetIn)) + "_balance"), (AssetInBalance + AmountIn)), ScriptTransfer(i.caller, cleanAmountOut, AssetOut)], cleanAmountOut)
473	473		}
474	474
475	475

github/deemru/w8io/6500d08 
66.73 ms ◑