w8 · tx · JCv···G8v

tx · JCvxN8em6PvXQqLks7hGFaVhG9vmvPMaN8D96mD8oG8v

3N9Va1p9rXQcerF47J5Euf3qekbnascvvV3:  -0.01900000 Waves

2022.09.15 11:32 [2229973] smart account 3N9Va1p9rXQcerF47J5Euf3qekbnascvvV3 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "JCvxN8em6PvXQqLks7hGFaVhG9vmvPMaN8D96mD8oG8v",
    "fee": 1900000,
    "feeAssetId": null,
    "timestamp": 1663230800896,
    "version": 2,
    "chainId": 84,
    "sender": "3N9Va1p9rXQcerF47J5Euf3qekbnascvvV3",
    "senderPublicKey": "DN6GkmVYEAGVKgHugczh1uWUcZJRCevjM4Lmxx1jkAiL",
    "proofs": [
        "3Dk9nHamUSKJUkbbioQsRmJDaDkEYKFPDbqLJXbQberKx27rGEawWyGCEGoySgEKBDpcYvk3QYTwt3R84vubYkri"
    ],
    "script": "base64:AAIFAAAAAAAAACMIAhIAEgASABIAEgASAwoBARIAEgMKAQQSAwoBARIECgIIAQAAABsAAAAAAVQAAAAAAAAAAAoAAAAACGFzc2V0SWRzCQAETAAAAAIBAAAAIC03E4HTJDddn+FvdtPRD5PvLCz03YmtXEpW6HzJAXIbCQAETAAAAAIBAAAAIK2dSBaFkXln78NKeoaZ0d1Q6QVJPOT+QERHjOGDxML0BQAAAANuaWwAAAAADUFzc2V0c1dlaWdodHMJAARMAAAAAgAAAAAAAAAAMgkABEwAAAACAAAAAAAAAAAyBQAAAANuaWwAAAAAFUFzc2V0c1dlaWdodHNEZWNpbWFscwAAAAAAAAAAAgAAAAARUG9vbFRva2VuRGVjaW1hbHMAAAAAAAAAAAAAAAAACERlY2ltYWxzCQAETAAAAAIAAAAAAAAAAAgJAARMAAAAAgAAAAAAAAAACAkABEwAAAACAAAAAAAAAAAICQAETAAAAAIAAAAAAAAAAAgJAARMAAAAAgAAAAAAAAAACAkABEwAAAACAAAAAAAAAAAICQAETAAAAAIAAAAAAAAAAAgJAARMAAAAAgAAAAAAAAAACAkABEwAAAACAAAAAAAAAAAICQAETAAAAAIAAAAAAAAAAAYFAAAAA25pbAAAAAAGU2NhbGVzCQAETAAAAAIAAAAAAAX14QAJAARMAAAAAgAAAAAAAA9CQAUAAAADbmlsAAAAAANGZWUAAAAAAAAAAMgAAAAABVNjYWxlAAAAAAAAACcQAAAAAAZTY2FsZTgAAAAAAAX14QAAAAAACEZlZVNjYWxlAAAAAAAAACcQAAAAAA1mZWVBZ2dyZWdhdG9yCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFXa9qiVoYv7TytpuPotF7xQ9S6A7dRN064AAAAAA1sYXllcjJBZGRyZXNzCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFXfsZmrJOybCLb7SJWKYMP5vCMcOJ8e66xAAAAAAxlYXJuZWRBc3NldHMFAAAACGFzc2V0SWRzAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQAAAANrZXkEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWIFAAAAByRtYXRjaDAFAAAAAWIAAAAAAAAAAAABAAAADHRyeUdldEJpbmFyeQAAAAEAAAADa2V5BAAAAAckbWF0Y2gwCQAEHAAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAKQnl0ZVZlY3RvcgQAAAABYgUAAAAHJG1hdGNoMAUAAAABYgEAAAAAAQAAABZnZXRDdXJyZW50VG9rZW5CYWxhbmNlAAAAAQAAAAl0b2tlblR5cGUEAAAAB3Rva2VuSWQJAAJYAAAAAQkAAZEAAAACBQAAAAhhc3NldElkcwUAAAAJdG9rZW5UeXBlCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfBQAAAAd0b2tlbklkAgAAAAhfYmFsYW5jZQEAAAAQY2FsY3VsYXRlUElzc3VlZAAAAAIAAAAGYW1vdW50AAAAB3Rva2VuSWQEAAAAB1BzdXBwbHkJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQEAAAAB0JhbGFuY2UJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAAJYAAAAAQUAAAAHdG9rZW5JZAIAAAAIX2JhbGFuY2UJAQAAAAhmcmFjdGlvbgAAAAQFAAAABmFtb3VudAUAAAAHUHN1cHBseQUAAAAHQmFsYW5jZQUAAAAERE9XTgEAAAANZ2V0TWluUElzc3VlZAAAAAEAAAAIcGF5bWVudHMKAQAAAAdoYW5kbGVyAAAAAgAAAAVhY2N1bQAAAAdjdXJyZW50BAAAAAdQSXNzdWVkCQEAAAAQY2FsY3VsYXRlUElzc3VlZAAAAAIIBQAAAAdjdXJyZW50AAAABmFtb3VudAkBAAAABXZhbHVlAAAAAQgFAAAAB2N1cnJlbnQAAAAHYXNzZXRJZAMDCQAAAAAAAAIFAAAABWFjY3VtAAAAAAAAAAAABgkAAGYAAAACBQAAAAVhY2N1bQUAAAAHUElzc3VlZAUAAAAHUElzc3VlZAUAAAAFYWNjdW0EAAAACW1pblBJc3NlZAoAAAAAAiRsBQAAAAhwYXltZW50cwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAAAAAAAAAAAAAKAQAAAAUkZjBfMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAdoYW5kbGVyAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAAFJGYwXzIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQAAAAUkZjBfMgAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACBQAAAAltaW5QSXNzZWQBAAAAEmNhbGN1bGF0ZVVzZG5WYWx1ZQAAAAMAAAAHYXNzZXRJZAAAAAZhbW91bnQAAAAIYUJhbGFuY2UEAAAABnVzZG5JZAEAAAAgtiYpwwT1zlORpA5LdSQvZIxRsfrfr1QpvUjSHSqyqtEEAAAAB3VzZG5OdW0JAQAAAAV2YWx1ZQAAAAEJAARPAAAAAgUAAAAIYXNzZXRJZHMFAAAABnVzZG5JZAQAAAAKdXNkbldlaWdodAkAAZEAAAACBQAAAA1Bc3NldHNXZWlnaHRzBQAAAAd1c2RuTnVtBAAAAAthc3NldFdlaWdodAkAAZEAAAACBQAAAA1Bc3NldHNXZWlnaHRzBQAAAAd1c2RuTnVtBAAAAAt1c2RuQmFsYW5jZQkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwkAAlgAAAABBQAAAAZ1c2RuSWQCAAAACF9iYWxhbmNlCQAAaQAAAAIJAABrAAAAAwUAAAAGYW1vdW50BQAAAAt1c2RuQmFsYW5jZQUAAAAKdXNkbldlaWdodAkAAGkAAAACBQAAAAhhQmFsYW5jZQUAAAALYXNzZXRXZWlnaHQBAAAAE2NoZWNrVG9rZW5zVmFsaWRpdHkAAAABAAAACHBheW1lbnRzCgEAAAAIaGFuZGxlcjEAAAACAAAABWFjY3VtAAAAB3BheW1lbnQJAAROAAAAAgUAAAAFYWNjdW0JAARMAAAAAgkBAAAABXZhbHVlAAAAAQgFAAAAB3BheW1lbnQAAAAHYXNzZXRJZAUAAAADbmlsBAAAAANpZHMKAAAAAAIkbAUAAAAIcGF5bWVudHMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwBQAAAANuaWwKAQAAAAUkZjBfMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAhoYW5kbGVyMQAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAABSRmMF8yAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABNMaXN0IHNpemUgZXhjZWVkcyAyCQEAAAAFJGYwXzIAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgMJAAAAAAAAAgUAAAADaWRzBQAAAANpZHMKAQAAAAhoYW5kbGVyMgAAAAIAAAAFYWNjdW0AAAAHYXNzZXRJZAMJAQAAAAIhPQAAAAIJAARPAAAAAgUAAAADaWRzBQAAAAdhc3NldElkBQAAAAR1bml0CQAAZAAAAAIFAAAABWFjY3VtAAAAAAAAAAABCQAAAgAAAAEJAAEsAAAAAgIAAAAUYXNzZXQgbm90IGF0dGFjaGVkOiAJAAJYAAAAAQUAAAAHYXNzZXRJZAQAAAAGY2hlY2tzCgAAAAACJGwFAAAACGFzc2V0SWRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAAAAAAAAAAAAAoBAAAABSRmMV8xAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAACGhhbmRsZXIyAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAAFJGYxXzIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQAAAAUkZjFfMgAAAAIJAQAAAAUkZjFfMQAAAAIJAQAAAAUkZjFfMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAwkAAAAAAAACBQAAAAZjaGVja3MFAAAABmNoZWNrcwYJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEAAAATaGFuZGxlUG9vbFRva2Vuc0FkZAAAAAMAAAAHUElzc3VlZAAAAAhwYXltZW50cwAAAAt1c2VyQWRkcmVzcwoBAAAAFWdldFRva2VuUGF5bWVudEFtb3VudAAAAAEAAAAHdG9rZW5JZAoBAAAAB2hhbmRsZXIAAAACAAAABWFjY3VtAAAAB3BheW1lbnQDCQAAAAAAAAIIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQFAAAAB3Rva2VuSWQIBQAAAAdwYXltZW50AAAABmFtb3VudAUAAAAFYWNjdW0KAAAAAAIkbAUAAAAIcGF5bWVudHMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwAAAAAAAAAAAACgEAAAAFJGYwXzEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAHaGFuZGxlcgAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAABSRmMF8yAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABNMaXN0IHNpemUgZXhjZWVkcyAyCQEAAAAFJGYwXzIAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgoBAAAAEWhhbmRsZVRva2VuQ2hhbmdlAAAAAgAAAAVhY2N1bQAAAAd0b2tlbklkBAAAAAJCawkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwkAAlgAAAABBQAAAAd0b2tlbklkAgAAAAhfYmFsYW5jZQQAAAAHUFN1cHBseQkBAAAADXRyeUdldEludGVnZXIAAAABAgAAABdnbG9iYWxfcG9vbFRva2VuX2Ftb3VudAQAAAANdG9rZW5EZWNpbWFscwkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHc3RhdGljXwkAAlgAAAABBQAAAAd0b2tlbklkAgAAAAZfc2NhbGUEAAAAAkRrCQEAAAAIZnJhY3Rpb24AAAAECQAAZQAAAAIJAQAAAAhmcmFjdGlvbgAAAAQJAABkAAAAAgUAAAAHUFN1cHBseQUAAAAHUElzc3VlZAUAAAANdG9rZW5EZWNpbWFscwUAAAAHUFN1cHBseQUAAAAERE9XTgUAAAANdG9rZW5EZWNpbWFscwUAAAACQmsFAAAADXRva2VuRGVjaW1hbHMFAAAABERPV04EAAAADXBheW1lbnRBbW91bnQJAQAAABVnZXRUb2tlblBheW1lbnRBbW91bnQAAAABBQAAAAd0b2tlbklkBAAAAAh0b1JldHVybgkAAGUAAAACAwkBAAAAAiE9AAAAAgUAAAANcGF5bWVudEFtb3VudAAAAAAAAAAAAAUAAAANcGF5bWVudEFtb3VudAAAAAAAAAAAAAUAAAACRGsJAAROAAAAAgUAAAAFYWNjdW0JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfCQACWAAAAAEFAAAAB3Rva2VuSWQCAAAACF9iYWxhbmNlCQAAZAAAAAIFAAAAAkJrBQAAAAJEawkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADBQAAAAt1c2VyQWRkcmVzcwUAAAAIdG9SZXR1cm4FAAAAB3Rva2VuSWQFAAAAA25pbAoAAAAAAiRsBQAAAAhhc3NldElkcwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAABSRmMF8xAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAEWhhbmRsZVRva2VuQ2hhbmdlAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAAFJGYwXzIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQAAAAUkZjBfMgAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAQAAABZoYW5kbGVQb29sVG9rZW5zUmVkZWVtAAAAAgAAAAlQUmVkZWVtZWQAAAALdXNlckFkZHJlc3MKAQAAABFoYW5kbGVUb2tlblJlZGVlbQAAAAIAAAAFYWNjdW0AAAAHdG9rZW5JZAQAAAACQmsJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAAJYAAAAAQUAAAAHdG9rZW5JZAIAAAAIX2JhbGFuY2UEAAAAB1BTdXBwbHkJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQEAAAADXRva2VuRGVjaW1hbHMJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB3N0YXRpY18JAAJYAAAAAQUAAAAHdG9rZW5JZAIAAAAGX3NjYWxlBAAAAAZhbW91bnQJAQAAAAhmcmFjdGlvbgAAAAQJAABlAAAAAgUAAAANdG9rZW5EZWNpbWFscwkBAAAACGZyYWN0aW9uAAAABAkAAGUAAAACBQAAAAdQU3VwcGx5BQAAAAlQUmVkZWVtZWQFAAAADXRva2VuRGVjaW1hbHMFAAAAB1BTdXBwbHkFAAAABERPV04FAAAAAkJrBQAAAA10b2tlbkRlY2ltYWxzBQAAAARET1dOCQAETgAAAAIFAAAABWFjY3VtCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwkAAlgAAAABBQAAAAd0b2tlbklkAgAAAAhfYmFsYW5jZQkAAGUAAAACBQAAAAJCawUAAAAGYW1vdW50CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAC3VzZXJBZGRyZXNzBQAAAAZhbW91bnQFAAAAB3Rva2VuSWQFAAAAA25pbAoAAAAAAiRsBQAAAAhhc3NldElkcwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAABSRmMF8xAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAEWhhbmRsZVRva2VuUmVkZWVtAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAAFJGYwXzIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQAAAAUkZjBfMgAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAQAAABJjYWxjdWxhdGVPdXRBbW91bnQAAAAFAAAACEFtb3VudEluAAAAB2Fzc2V0SW4AAAAIYXNzZXRPdXQAAAAJQmFsYW5jZUluAAAACkJhbGFuY2VPdXQEAAAAB0luZGV4SW4JAQAAAAV2YWx1ZQAAAAEJAARPAAAAAgUAAAAIYXNzZXRJZHMFAAAAB2Fzc2V0SW4EAAAACEluZGV4T3V0CQEAAAAFdmFsdWUAAAABCQAETwAAAAIFAAAACGFzc2V0SWRzBQAAAAhhc3NldE91dAMJAAAAAAAAAgUAAAAHSW5kZXhJbgUAAAAISW5kZXhPdXQJAAACAAAAAQIAAAATaW52YWxpZCB0b2tlbnMgcGFpcgkBAAAACGZyYWN0aW9uAAAABAUAAAAKQmFsYW5jZU91dAkAAGUAAAACCQABkQAAAAIFAAAABlNjYWxlcwUAAAAISW5kZXhPdXQJAABsAAAABgkAAGkAAAACCQAAaAAAAAIFAAAACUJhbGFuY2VJbgkAAZEAAAACBQAAAAZTY2FsZXMFAAAAB0luZGV4SW4JAABkAAAAAgUAAAAJQmFsYW5jZUluBQAAAAhBbW91bnRJbgkAAZEAAAACBQAAAAhEZWNpbWFscwUAAAAHSW5kZXhJbgkAAGsAAAADCQABkQAAAAIFAAAADUFzc2V0c1dlaWdodHMFAAAAB0luZGV4SW4AAAAAAAAAJxAJAAGRAAAAAgUAAAANQXNzZXRzV2VpZ2h0cwUAAAAISW5kZXhPdXQAAAAAAAAAAAQJAAGRAAAAAgUAAAAIRGVjaW1hbHMFAAAACEluZGV4T3V0BQAAAAVGTE9PUgkAAZEAAAACBQAAAAZTY2FsZXMFAAAACEluZGV4T3V0BQAAAARET1dOAQAAAB1jYWxjdWxhdGVDdXJyZW50QXNzZXRJbnRlcmVzdAAAAAQAAAAHYXNzZXRJZAAAAAphc3NldElkU3RyAAAACGFCYWxhbmNlAAAAFnRva2VuRWFybmluZ3NMYXN0Q2hlY2sEAAAAC3RvdGFsU3Rha2VkCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAAEmdsb2JhbF9pbmRleFN0YWtlZAQAAAAVdG9rZW5CYWxhbmNlTGFzdENoZWNrBQAAABZ0b2tlbkVhcm5pbmdzTGFzdENoZWNrBAAAABNjdXJyZW50QmFsYW5jZURlbHRhCQAAZQAAAAIJAAPwAAAAAgUAAAAEdGhpcwUAAAAHYXNzZXRJZAUAAAAIYUJhbGFuY2UEAAAAFGN1cnJlbnRUb2tlbkVhcm5pbmdzAwkAAGYAAAACBQAAABNjdXJyZW50QmFsYW5jZURlbHRhBQAAABV0b2tlbkJhbGFuY2VMYXN0Q2hlY2sFAAAAE2N1cnJlbnRCYWxhbmNlRGVsdGEFAAAAFXRva2VuQmFsYW5jZUxhc3RDaGVjawQAAAALbmV3RWFybmluZ3MJAABlAAAAAgUAAAAUY3VycmVudFRva2VuRWFybmluZ3MFAAAAFXRva2VuQmFsYW5jZUxhc3RDaGVjawQAAAALbmV3SW50ZXJlc3QDCQAAAAAAAAIFAAAAC3RvdGFsU3Rha2VkAAAAAAAAAAAAAAAAAAAAAAAACQAAawAAAAMFAAAAC25ld0Vhcm5pbmdzBQAAAAZTY2FsZTgFAAAAC3RvdGFsU3Rha2VkBAAAABFsYXN0Q2hlY2tJbnRlcmVzdAkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAARZ2xvYmFsX2xhc3RDaGVja18FAAAACmFzc2V0SWRTdHICAAAACV9pbnRlcmVzdAkAAGQAAAACBQAAABFsYXN0Q2hlY2tJbnRlcmVzdAUAAAALbmV3SW50ZXJlc3QBAAAAC2NsYWltUmVzdWx0AAAAAgAAAAdhZGRyZXNzAAAACGFkZHJlc3MyBAAAAAphZGRyZXNzU3RyCQAEJQAAAAEFAAAAB2FkZHJlc3MEAAAADHB1enpsZUFtb3VudAkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIFAAAACmFkZHJlc3NTdHICAAAADF9pbmRleFN0YWtlZAoBAAAAB2hhbmRsZXIAAAACAAAABWFjY3VtAAAAB2Fzc2V0SWQEAAAACmFzc2V0SWRTdHIJAAJYAAAAAQUAAAAHYXNzZXRJZAQAAAAIYUJhbGFuY2UJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAAJYAAAAAQUAAAAHYXNzZXRJZAIAAAAIX2JhbGFuY2UEAAAAFnRva2VuRWFybmluZ3NMYXN0Q2hlY2sJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAEWdsb2JhbF9sYXN0Q2hlY2tfBQAAAAphc3NldElkU3RyAgAAAAlfZWFybmluZ3MEAAAAFGN1cnJlbnRUb2tlbkludGVyZXN0CQEAAAAdY2FsY3VsYXRlQ3VycmVudEFzc2V0SW50ZXJlc3QAAAAEBQAAAAdhc3NldElkBQAAAAphc3NldElkU3RyBQAAAAhhQmFsYW5jZQUAAAAWdG9rZW5FYXJuaW5nc0xhc3RDaGVjawQAAAAUY3VycmVudFRva2VuRWFybmluZ3MJAAGWAAAAAQkABEwAAAACBQAAABZ0b2tlbkVhcm5pbmdzTGFzdENoZWNrCQAETAAAAAIJAABlAAAAAgkAA/AAAAACBQAAAAR0aGlzBQAAAAdhc3NldElkBQAAAAhhQmFsYW5jZQUAAAADbmlsBAAAAAxyZXdhcmRBbW91bnQJAABrAAAAAwUAAAAMcHV6emxlQW1vdW50CQAAZQAAAAIFAAAAFGN1cnJlbnRUb2tlbkludGVyZXN0CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAACmFkZHJlc3NTdHICAAAAC19sYXN0Q2hlY2tfBQAAAAphc3NldElkU3RyAgAAAAlfaW50ZXJlc3QFAAAABlNjYWxlOAQAAAAIdHJhbnNmZXIDCQAAAAAAAAIFAAAADHJld2FyZEFtb3VudAAAAAAAAAAAAAUAAAADbmlsCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAACGFkZHJlc3MyBQAAAAxyZXdhcmRBbW91bnQFAAAAB2Fzc2V0SWQFAAAAA25pbAkABRQAAAACCQAETgAAAAIJAAROAAAAAggFAAAABWFjY3VtAAAAAl8xBQAAAAh0cmFuc2ZlcgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAEWdsb2JhbF9sYXN0Q2hlY2tfBQAAAAphc3NldElkU3RyAgAAAAlfZWFybmluZ3MJAABlAAAAAgUAAAAUY3VycmVudFRva2VuRWFybmluZ3MFAAAADHJld2FyZEFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAEWdsb2JhbF9sYXN0Q2hlY2tfBQAAAAphc3NldElkU3RyAgAAAAlfaW50ZXJlc3QFAAAAFGN1cnJlbnRUb2tlbkludGVyZXN0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAphZGRyZXNzU3RyAgAAAAtfbGFzdENoZWNrXwUAAAAKYXNzZXRJZFN0cgIAAAAJX2ludGVyZXN0BQAAABRjdXJyZW50VG9rZW5JbnRlcmVzdAUAAAADbmlsCQAAZAAAAAIIBQAAAAVhY2N1bQAAAAJfMgkBAAAAEmNhbGN1bGF0ZVVzZG5WYWx1ZQAAAAMFAAAAB2Fzc2V0SWQFAAAADHJld2FyZEFtb3VudAUAAAAIYUJhbGFuY2UEAAAABWFjY3VtCgAAAAACJGwFAAAADGVhcm5lZEFzc2V0cwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAJAAUUAAAAAgUAAAADbmlsAAAAAAAAAAAACgEAAAAFJGYwXzEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAHaGFuZGxlcgAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAABSRmMF8yAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABNMaXN0IHNpemUgZXhjZWVkcyAyCQEAAAAFJGYwXzIAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgkABE4AAAACCAUAAAAFYWNjdW0AAAACXzEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAKYWRkcmVzc1N0cgIAAAATX2NsYWltZWRSZXdhcmRWYWx1ZQkAAGQAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgUAAAAKYWRkcmVzc1N0cgIAAAATX2NsYWltZWRSZXdhcmRWYWx1ZQgFAAAABWFjY3VtAAAAAl8yCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAACmFkZHJlc3NTdHICAAAACl9sYXN0Q2xhaW0IBQAAAAlsYXN0QmxvY2sAAAAJdGltZXN0YW1wBQAAAANuaWwBAAAAEGluZGV4U3Rha2VSZXN1bHQAAAACAAAACmFkZHJlc3NTdHIAAAAGYW1vdW50BAAAAAdhZGRyZXNzCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAphZGRyZXNzU3RyBAAAAAJsaQkBAAAAC2NsYWltUmVzdWx0AAAAAgUAAAAHYWRkcmVzcwUAAAAHYWRkcmVzcwkABE4AAAACBQAAAAJsaQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAAphZGRyZXNzU3RyAgAAAAxfaW5kZXhTdGFrZWQJAABkAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIFAAAACmFkZHJlc3NTdHICAAAADF9pbmRleFN0YWtlZAUAAAAGYW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABJnbG9iYWxfaW5kZXhTdGFrZWQJAABkAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABAgAAABJnbG9iYWxfaW5kZXhTdGFrZWQFAAAABmFtb3VudAUAAAADbmlsAAAACgAAAAFpAQAAAAdwcmVJbml0AAAAAAoBAAAAB2hhbmRsZXIAAAACAAAABWFjY3VtAAAACGFzc2V0TnVtAwkAAGcAAAACBQAAAAhhc3NldE51bQUAAAABVAUAAAAFYWNjdW0JAAROAAAAAgUAAAAFYWNjdW0JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAdzdGF0aWNfCQACWAAAAAEJAAGRAAAAAgUAAAAIYXNzZXRJZHMAAAAAAAAAAAACAAAABl9zY2FsZQkAAZEAAAACBQAAAAZTY2FsZXMFAAAACGFzc2V0TnVtCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAHc3RhdGljXwkAAlgAAAABCQABkQAAAAIFAAAACGFzc2V0SWRzAAAAAAAAAAAAAgAAAAdfd2VpZ2h0CQABkQAAAAIFAAAADUFzc2V0c1dlaWdodHMFAAAACGFzc2V0TnVtBQAAAANuaWwKAAAAAAIkbAkABEwAAAACAAAAAAAAAAAACQAETAAAAAIAAAAAAAAAAAEFAAAAA25pbAoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAABSRmMF8xAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAB2hhbmRsZXIAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAUkZjBfMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAATTGlzdCBzaXplIGV4Y2VlZHMgMgkBAAAABSRmMF8yAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAABaQEAAAAGZGVJbml0AAAAAAMJAQAAAAIhPQAAAAIIBQAAAAFpAAAABmNhbGxlcgUAAAAEdGhpcwkAAAIAAAABAgAAAAphZG1pbiBvbmx5CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABBnbG9iYWxfd2FzSW5pdGVkAAAAAAAAAAAABQAAAANuaWwAAAABaQEAAAAEaW5pdAAAAAAKAQAAAAtwcmVwYXJlTGlzdAAAAAAKAQAAAAdoYW5kbGVyAAAAAgAAAAVhY2N1bQAAAAFuCQAETgAAAAIFAAAABWFjY3VtCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwkAAlgAAAABCQEAAAAFdmFsdWUAAAABCAUAAAABbgAAAAdhc3NldElkAgAAAAhfYmFsYW5jZQgFAAAAAW4AAAAGYW1vdW50BQAAAANuaWwKAAAAAAIkbAgFAAAAAWkAAAAIcGF5bWVudHMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwBQAAAANuaWwKAQAAAAUkZjBfMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAdoYW5kbGVyAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAAFJGYwXzIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQAAAAUkZjBfMgAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACCgEAAAAZY2FsY3VsYXRlUG9vbFRva2Vuc0Ftb3VudAAAAAEAAAAIcGF5bWVudHMKAQAAAAdoYW5kbGVyAAAAAgAAAAVhY2N1bQAAAANwbXQEAAAAB2Fzc2V0SWQJAQAAAAV2YWx1ZQAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAoBAAAACGhhbmRsZXIyAAAAAgAAAAVhY2N1bQAAAAFuAwkAAAAAAAACBQAAAAFuBQAAAAdhc3NldElkCQEAAAAFdmFsdWUAAAABCQAETwAAAAIFAAAACGFzc2V0SWRzBQAAAAFuBQAAAAVhY2N1bQQAAAAFVG9rZW4KAAAAAAIkbAUAAAAIYXNzZXRJZHMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwAAAAAAAAAAABCgEAAAAFJGYwXzEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAIaGFuZGxlcjIAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAUkZjBfMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAATTGlzdCBzaXplIGV4Y2VlZHMgMgkBAAAABSRmMF8yAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIJAABoAAAAAgUAAAAFYWNjdW0JAABsAAAABggFAAAAA3BtdAAAAAZhbW91bnQJAAGRAAAAAgUAAAAIRGVjaW1hbHMFAAAABVRva2VuCQABkQAAAAIFAAAADUFzc2V0c1dlaWdodHMFAAAABVRva2VuBQAAABVBc3NldHNXZWlnaHRzRGVjaW1hbHMAAAAAAAAAAAEFAAAABUZMT09SCgAAAAACJGwFAAAACHBheW1lbnRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAAAAAAAAAAAAQoBAAAABSRmMF8xAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAB2hhbmRsZXIAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAUkZjBfMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAATTGlzdCBzaXplIGV4Y2VlZHMgMgkBAAAABSRmMF8yAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIDCQAAZgAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAQZ2xvYmFsX3dhc0luaXRlZAAAAAAAAAAAAAkAAAIAAAABAgAAABNwb29sIGFscmVhZHkgaW5pdGVkBAAAABFpbml0aWFsUG9vbFRva2VucwkBAAAAGWNhbGN1bGF0ZVBvb2xUb2tlbnNBbW91bnQAAAABCAUAAAABaQAAAAhwYXltZW50cwQAAAAOcG9vbFRva2VuSXNzdWUJAARDAAAABwIAAAACUFQCAAAAClBvb2wgVG9rZW4FAAAAEWluaXRpYWxQb29sVG9rZW5zBQAAABFQb29sVG9rZW5EZWNpbWFscwYFAAAABHVuaXQAAAAAAAAAAAAEAAAAC3Bvb2xUb2tlbklkCQAEOAAAAAEFAAAADnBvb2xUb2tlbklzc3VlCQAETgAAAAIJAQAAAAtwcmVwYXJlTGlzdAAAAAAJAARMAAAAAgUAAAAOcG9vbFRva2VuSXNzdWUJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BQAAABFpbml0aWFsUG9vbFRva2VucwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAQZ2xvYmFsX3dhc0luaXRlZAAAAAAAAAAAAQkABEwAAAACCQEAAAALQmluYXJ5RW50cnkAAAACAgAAABNnbG9iYWxfcG9vbFRva2VuX2lkBQAAAAtwb29sVG9rZW5JZAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAEWluaXRpYWxQb29sVG9rZW5zBQAAAAtwb29sVG9rZW5JZAUAAAADbmlsAAAAAWkBAAAADWdlbmVyYXRlSW5kZXgAAAAAAwkBAAAAAiE9AAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwUAAAABVAkAAAIAAAABCQABLAAAAAICAAAAO3lvdSBuZWVkIHRvIGF0dGFjaCBhbGwgcG9vbCB0b2tlbnMuIGFtb3VudCBvZiBwb29sIHRva2VuczogCQABpAAAAAEFAAAAAVQDCQEAAAABIQAAAAEJAQAAABNjaGVja1Rva2Vuc1ZhbGlkaXR5AAAAAQgFAAAAAWkAAAAIcGF5bWVudHMJAAACAAAAAQIAAAAVd3JvbmcgYXNzZXRzIGF0dGFjaGVkBAAAAAdQSXNzdWVkCQEAAAANZ2V0TWluUElzc3VlZAAAAAEIBQAAAAFpAAAACHBheW1lbnRzBAAAAAdyZWlzc3VlCQEAAAAHUmVpc3N1ZQAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDU3KQAAAAECAAAAE2dsb2JhbF9wb29sVG9rZW5faWQFAAAAB1BJc3N1ZWQGBAAAAAZyZXN1bHQJAQAAABNoYW5kbGVQb29sVG9rZW5zQWRkAAAAAwUAAAAHUElzc3VlZAgFAAAAAWkAAAAIcGF5bWVudHMIBQAAAAFpAAAADG9yaWdpbkNhbGxlcgkABRQAAAACCQAETgAAAAIFAAAABnJlc3VsdAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAAB1BJc3N1ZWQJAQAAAAx0cnlHZXRCaW5hcnkAAAABAgAAABNnbG9iYWxfcG9vbFRva2VuX2lkCQAETAAAAAIFAAAAB3JlaXNzdWUJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50CQAAZAAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQFAAAAB1BJc3N1ZWQFAAAAA25pbAUAAAAHUElzc3VlZAAAAAFpAQAAAApzdGFrZUluZGV4AAAAAAQAAAAKYWRkcmVzc1N0cgkABCUAAAABCAUAAAABaQAAAAxvcmlnaW5DYWxsZXIEAAAAA3BtdAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAMJAQAAAAIhPQAAAAIJAQAAAAV2YWx1ZQAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAkBAAAADHRyeUdldEJpbmFyeQAAAAECAAAAE2dsb2JhbF9wb29sVG9rZW5faWQJAAACAAAAAQIAAAAUd3JvbmcgYXNzZXQgYXR0YWNoZWQJAQAAABBpbmRleFN0YWtlUmVzdWx0AAAAAgUAAAAKYWRkcmVzc1N0cggFAAAAA3BtdAAAAAZhbW91bnQAAAABaQEAAAAMdW5zdGFrZUluZGV4AAAAAQAAAAxwdXp6bGVBbW91bnQEAAAACmFkZHJlc3NTdHIJAAQlAAAAAQgFAAAAAWkAAAAMb3JpZ2luQ2FsbGVyBAAAAA9wdXp6bGVBdmFpbGFibGUJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACBQAAAAphZGRyZXNzU3RyAgAAAAxfaW5kZXhTdGFrZWQDCQAAZgAAAAIFAAAADHB1enpsZUFtb3VudAUAAAAPcHV6emxlQXZhaWxhYmxlCQAAAgAAAAECAAAAJXlvdSBkb24ndCBoYXZlIGluZGV4IHRva2VucyBhdmFpbGFibGUJAAROAAAAAgkBAAAAC2NsYWltUmVzdWx0AAAAAggFAAAAAWkAAAAMb3JpZ2luQ2FsbGVyCAUAAAABaQAAAAxvcmlnaW5DYWxsZXIJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAKYWRkcmVzc1N0cgIAAAAMX2luZGV4U3Rha2VkCQAAZQAAAAIFAAAAD3B1enpsZUF2YWlsYWJsZQUAAAAMcHV6emxlQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABJnbG9iYWxfaW5kZXhTdGFrZWQJAABlAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABAgAAABJnbG9iYWxfaW5kZXhTdGFrZWQFAAAADHB1enpsZUFtb3VudAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAADHB1enpsZUFtb3VudAkBAAAAEUBleHRyTmF0aXZlKDEwNTcpAAAAAQIAAAATZ2xvYmFsX3Bvb2xUb2tlbl9pZAUAAAADbmlsAAAAAWkBAAAAEWNsYWltSW5kZXhSZXdhcmRzAAAAAAkBAAAAC2NsYWltUmVzdWx0AAAAAggFAAAAAWkAAAAGY2FsbGVyCAUAAAABaQAAAAZjYWxsZXIAAAABaQEAAAALcmVkZWVtSW5kZXgAAAABAAAADHNlbmRUb09yaWdpbgQAAAADcG10CQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkCQEAAAAMdHJ5R2V0QmluYXJ5AAAAAQIAAAATZ2xvYmFsX3Bvb2xUb2tlbl9pZAkAAAIAAAABAgAAAB5wbGVhc2UgYXR0YWNoIHBvb2wgc2hhcmUgdG9rZW4EAAAACVBSZWRlZW1lZAgFAAAAA3BtdAAAAAZhbW91bnQEAAAABnJlc3VsdAkBAAAAFmhhbmRsZVBvb2xUb2tlbnNSZWRlZW0AAAACBQAAAAlQUmVkZWVtZWQDBQAAAAxzZW5kVG9PcmlnaW4IBQAAAAFpAAAADG9yaWdpbkNhbGxlcggFAAAAAWkAAAAGY2FsbGVyCQAETgAAAAIFAAAABnJlc3VsdAkABEwAAAACCQEAAAAEQnVybgAAAAIJAQAAAAx0cnlHZXRCaW5hcnkAAAABAgAAABNnbG9iYWxfcG9vbFRva2VuX2lkBQAAAAlQUmVkZWVtZWQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50CQAAZQAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQFAAAACVBSZWRlZW1lZAUAAAADbmlsAAAAAWkBAAAAFXVuc3Rha2VBbmRSZWRlZW1JbmRleAAAAAEAAAAMcHV6emxlQW1vdW50BAAAAAphZGRyZXNzU3RyCQAEJQAAAAEIBQAAAAFpAAAADG9yaWdpbkNhbGxlcgQAAAAPcHV6emxlQXZhaWxhYmxlCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgUAAAAKYWRkcmVzc1N0cgIAAAAMX2luZGV4U3Rha2VkAwkAAGYAAAACBQAAAAxwdXp6bGVBbW91bnQFAAAAD3B1enpsZUF2YWlsYWJsZQkAAAIAAAABAgAAACV5b3UgZG9uJ3QgaGF2ZSBpbmRleCB0b2tlbnMgYXZhaWxhYmxlBAAAAAhjbGFpbVJlcwkABE4AAAACCQEAAAALY2xhaW1SZXN1bHQAAAACCAUAAAABaQAAAAxvcmlnaW5DYWxsZXIIBQAAAAFpAAAABmNhbGxlcgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAAphZGRyZXNzU3RyAgAAAAxfaW5kZXhTdGFrZWQJAABlAAAAAgUAAAAPcHV6emxlQXZhaWxhYmxlBQAAAAxwdXp6bGVBbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAEmdsb2JhbF9pbmRleFN0YWtlZAkAAGUAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAAEmdsb2JhbF9pbmRleFN0YWtlZAUAAAAMcHV6emxlQW1vdW50BQAAAANuaWwEAAAABnJlc3VsdAkBAAAAFmhhbmRsZVBvb2xUb2tlbnNSZWRlZW0AAAACBQAAAAxwdXp6bGVBbW91bnQIBQAAAAFpAAAABmNhbGxlcgkABE4AAAACCQAETgAAAAIFAAAACGNsYWltUmVzBQAAAAZyZXN1bHQJAARMAAAAAgkBAAAABEJ1cm4AAAACCQEAAAAMdHJ5R2V0QmluYXJ5AAAAAQIAAAATZ2xvYmFsX3Bvb2xUb2tlbl9pZAUAAAAMcHV6emxlQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABdnbG9iYWxfcG9vbFRva2VuX2Ftb3VudAkAAGUAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAAF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BQAAAAxwdXp6bGVBbW91bnQFAAAAA25pbAAAAAFpAQAAAARzd2FwAAAAAgAAAAhhc3NldE91dAAAAAdtaW5pbXVtBAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAACEFtb3VudEluCQEAAAAFdmFsdWUAAAABCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQEAAAAB0Fzc2V0SW4JAQAAAAV2YWx1ZQAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAQAAAAIQXNzZXRPdXQJAAJZAAAAAQUAAAAIYXNzZXRPdXQEAAAADkFzc2V0SW5CYWxhbmNlCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfCQACWAAAAAEFAAAAB0Fzc2V0SW4CAAAACF9iYWxhbmNlBAAAAA9Bc3NldE91dEJhbGFuY2UJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8FAAAACGFzc2V0T3V0AgAAAAhfYmFsYW5jZQQAAAAJQW1vdW50T3V0CQEAAAASY2FsY3VsYXRlT3V0QW1vdW50AAAABQUAAAAIQW1vdW50SW4FAAAAB0Fzc2V0SW4FAAAACEFzc2V0T3V0BQAAAA5Bc3NldEluQmFsYW5jZQUAAAAPQXNzZXRPdXRCYWxhbmNlBAAAAAlmZWVBbW91bnQJAABrAAAAAwUAAAAJQW1vdW50T3V0BQAAAANGZWUFAAAACEZlZVNjYWxlBAAAABFwcm90b2NvbEZlZUFtb3VudAkAAGsAAAADBQAAAAlmZWVBbW91bnQAAAAAAAAAACgAAAAAAAAAAGQEAAAADmNsZWFuQW1vdW50T3V0CQAAZQAAAAIFAAAACUFtb3VudE91dAUAAAAJZmVlQW1vdW50AwkAAGYAAAACBQAAAAdtaW5pbXVtBQAAAA5jbGVhbkFtb3VudE91dAkAAAIAAAABCQABLAAAAAICAAAAK2Ftb3VudCB0byByZWNpZXZlIGlzIGxvd2VyIHRoYW4gZ2l2ZW4gb25lOiAJAAGkAAAAAQUAAAAOY2xlYW5BbW91bnRPdXQDCQAAZgAAAAIAAAAAAAAAJxAFAAAACEFtb3VudEluCQAAAgAAAAECAAAAHHN1bSB0byBleGNoYW5nZSBpcyB0b28gc21hbGwDCQAAZgAAAAIAAAAAAAAAAAAJAABlAAAAAgUAAAAPQXNzZXRPdXRCYWxhbmNlBQAAAAlBbW91bnRPdXQJAAACAAAAAQIAAAAbY29udHJhY3QgaXMgb3V0IG9mIHJlc2VydmVzBAAAAA9wbXRUb0FnZ3JlZ2F0b3IDCQEAAAACIT0AAAACCAUAAAABaQAAAAZjYWxsZXIFAAAADWxheWVyMkFkZHJlc3MJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAANZmVlQWdncmVnYXRvcgUAAAARcHJvdG9jb2xGZWVBbW91bnQFAAAACEFzc2V0T3V0BQAAAANuaWwFAAAAA25pbAkABRQAAAACCQAETgAAAAIFAAAAD3BtdFRvQWdncmVnYXRvcgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8FAAAACGFzc2V0T3V0AgAAAAhfYmFsYW5jZQkAAGUAAAACBQAAAA9Bc3NldE91dEJhbGFuY2UFAAAACUFtb3VudE91dAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAAJYAAAAAQUAAAAHQXNzZXRJbgIAAAAIX2JhbGFuY2UJAABkAAAAAgUAAAAOQXNzZXRJbkJhbGFuY2UFAAAACEFtb3VudEluCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAOY2xlYW5BbW91bnRPdXQFAAAACEFzc2V0T3V0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAA1nbG9iYWxfdm9sdW1lCQAAZAAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAANZ2xvYmFsX3ZvbHVtZQkBAAAAEmNhbGN1bGF0ZVVzZG5WYWx1ZQAAAAMFAAAAB0Fzc2V0SW4FAAAACEFtb3VudEluBQAAAA5Bc3NldEluQmFsYW5jZQUAAAADbmlsBQAAAA5jbGVhbkFtb3VudE91dAAAAAAPdcph",
    "height": 2229973,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: JACMyrqpWwzWzpeSAh5Ui73RRnR4JiP9otetTkVE3qzu
Next: none

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

Old	New		Differences
284	284		then accum
285	285		else (accum ++ [IntegerEntry((("static_" + toBase58String(assetIds[0])) + "_scale"), Scales[assetNum]), IntegerEntry((("static_" + toBase58String(assetIds[0])) + "_weight"), AssetsWeights[assetNum])])
286	286
287		-	let $l = [0, 1~~, 2, 3, 4, 5, 6, 7, 8, 9~~]
	287	+	let $l = [0, 1]
288	288		let $s = size($l)
289	289		let $acc0 = nil
290	290		func $f0_1 ($a,$i) = if (($i >= $s))

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

github/deemru/w8io/c3f4982 
48.60 ms ◑