w8 · tx · A7s···4Ct

tx · A7sqUsyqdGNzmxmA49mg33bBo2GfYvymqbZp7V9gb4Ct

3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh:  -0.01400000 Waves

2021.11.26 18:36 [2873136] smart account 3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "A7sqUsyqdGNzmxmA49mg33bBo2GfYvymqbZp7V9gb4Ct",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1637941082761,
    "version": 2,
    "chainId": 87,
    "sender": "3PFDgzu1UtswAkCMxqqQjbTeHaX4cMab8Kh",
    "senderPublicKey": "AzSJ6Pz19UKc9NeFUtzk7Wa8emVYb8mqE49cv2n3foS4",
    "proofs": [
        "3bcVzBFWmBWBz7ZyEm5bciuz7YCV3X781D1vBvQDUD9pSQE7y3NntzFjGYmDBTygr1PKu5k4eaTmG3VgyH1urDQz"
    ],
    "script": "base64:AAIFAAAAAAAAAB0IAhIDCgEBEgASABIAEgMKAQQSAwoBBBIECgIIAQAAAB4AAAAACGFkbWluS2V5AQAAABoBV0cJPRCxcfQmbeuFCeQLDOfajdzhrhJtvgAAAAABVAAAAAAAAAAAAwAAAAAIYXNzZXRJZHMJAARMAAAAAgEAAAAg8Rr+Jf72mTj0aSrE3+ES1keyxsoOujcJr3dtH46i5WMJAARMAAAAAgEAAAAgHpQHE1J2oSWV/chhqIJfEH/fOk8pu/yaRj9a/TZPn5EJAARMAAAAAgEAAAAgtiYpwwT1zlORpA5LdSQvZIxRsfrfr1QpvUjSHSqyqtEFAAAAA25pbAAAAAANQXNzZXRzV2VpZ2h0cwkABEwAAAACAAAAAAAAAABQCQAETAAAAAIAAAAAAAAAAAoJAARMAAAAAgAAAAAAAAAACgUAAAADbmlsAAAAABVBc3NldHNXZWlnaHRzRGVjaW1hbHMAAAAAAAAAAAIAAAAAEVBvb2xUb2tlbkRlY2ltYWxzAAAAAAAAAAAIAAAAAAhEZWNpbWFscwkABEwAAAACAAAAAAAAAAAICQAETAAAAAIAAAAAAAAAAAYJAARMAAAAAgAAAAAAAAAABgUAAAADbmlsAAAAAAZTY2FsZXMJAARMAAAAAgAAAAAABfXhAAkABEwAAAACAAAAAAAAD0JACQAETAAAAAIAAAAAAAAPQkAFAAAAA25pbAAAAAADRmVlAAAAAAAAAADIAAAAAAVTY2FsZQAAAAAAAAAnEAAAAAAGU2NhbGU4AAAAAAAF9eEAAAAAAAhGZWVTY2FsZQAAAAAAAAAnEAAAAAANZmVlQWdncmVnYXRvcgkBAAAAB0FkZHJlc3MAAAABAQAAABoBV4koG/KFWb+c3sKR5M8EFRU4JLZsBXH4fAEAAAAOZ2V0QXNzZXRTdHJpbmcAAAABAAAAB2Fzc2V0SWQEAAAAByRtYXRjaDAFAAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACkJ5dGVWZWN0b3IEAAAAAWIFAAAAByRtYXRjaDAJAAJYAAAAAQUAAAABYgIAAAAFV0FWRVMBAAAADWdldEFzc2V0Qnl0ZXMAAAABAAAACmFzc2V0SWRTdHIDCQAAAAAAAAIFAAAACmFzc2V0SWRTdHICAAAABVdBVkVTBQAAAAR1bml0CQACWQAAAAEFAAAACmFzc2V0SWRTdHIAAAAADGVhcm5lZEFzc2V0cwUAAAAIYXNzZXRJZHMBAAAADXRyeUdldEludGVnZXIAAAABAAAAA2tleQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYgUAAAAHJG1hdGNoMAUAAAABYgAAAAAAAAAAAAEAAAAMdHJ5R2V0QmluYXJ5AAAAAQAAAANrZXkEAAAAByRtYXRjaDAJAAQcAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAApCeXRlVmVjdG9yBAAAAAFiBQAAAAckbWF0Y2gwBQAAAAFiAQAAAAABAAAAFmdldEN1cnJlbnRUb2tlbkJhbGFuY2UAAAABAAAACXRva2VuVHlwZQQAAAAHdG9rZW5JZAkBAAAADmdldEFzc2V0U3RyaW5nAAAAAQkAAZEAAAACBQAAAAhhc3NldElkcwUAAAAJdG9rZW5UeXBlCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfBQAAAAd0b2tlbklkAgAAAAhfYmFsYW5jZQEAAAAQY2FsY3VsYXRlUElzc3VlZAAAAAIAAAAGYW1vdW50AAAAB3Rva2VuSWQEAAAAB1BzdXBwbHkJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQEAAAAB0JhbGFuY2UJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAAJYAAAAAQUAAAAHdG9rZW5JZAIAAAAIX2JhbGFuY2UJAQAAAAhmcmFjdGlvbgAAAAQFAAAABmFtb3VudAUAAAAHUHN1cHBseQUAAAAHQmFsYW5jZQUAAAAERE9XTgEAAAANZ2V0TWluUElzc3VlZAAAAAEAAAAIcGF5bWVudHMKAQAAAAdoYW5kbGVyAAAAAgAAAAVhY2N1bQAAAAdjdXJyZW50BAAAAAdQSXNzdWVkCQEAAAAQY2FsY3VsYXRlUElzc3VlZAAAAAIIBQAAAAdjdXJyZW50AAAABmFtb3VudAkBAAAABXZhbHVlAAAAAQgFAAAAB2N1cnJlbnQAAAAHYXNzZXRJZAMDCQAAAAAAAAIFAAAABWFjY3VtAAAAAAAAAAAABgkAAGYAAAACBQAAAAVhY2N1bQUAAAAHUElzc3VlZAUAAAAHUElzc3VlZAUAAAAFYWNjdW0EAAAACW1pblBJc3NlZAoAAAAAAiRsBQAAAAhwYXltZW50cwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAAAAAAAAAAAAAKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAB2hhbmRsZXIAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKBQAAAAltaW5QSXNzZWQBAAAAEmNhbGN1bGF0ZVVzZG5WYWx1ZQAAAAMAAAAHYXNzZXRJZAAAAAZhbW91bnQAAAAIYUJhbGFuY2UEAAAABnVzZG5JZAEAAAAgtiYpwwT1zlORpA5LdSQvZIxRsfrfr1QpvUjSHSqyqtEEAAAACnVzZG5XZWlnaHQJAAGRAAAAAgUAAAANQXNzZXRzV2VpZ2h0cwkBAAAABXZhbHVlAAAAAQkABE8AAAACBQAAAAhhc3NldElkcwUAAAAGdXNkbklkBAAAAAthc3NldFdlaWdodAkAAZEAAAACBQAAAA1Bc3NldHNXZWlnaHRzCQEAAAAFdmFsdWUAAAABCQAETwAAAAIFAAAACGFzc2V0SWRzBQAAAAdhc3NldElkBAAAAAt1c2RuQmFsYW5jZQkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwkBAAAADmdldEFzc2V0U3RyaW5nAAAAAQUAAAAGdXNkbklkAgAAAAhfYmFsYW5jZQkAAGkAAAACCQAAawAAAAMFAAAABmFtb3VudAUAAAALdXNkbkJhbGFuY2UFAAAACnVzZG5XZWlnaHQJAABpAAAAAgUAAAAIYUJhbGFuY2UFAAAAC2Fzc2V0V2VpZ2h0AQAAABNjaGVja1Rva2Vuc1ZhbGlkaXR5AAAAAQAAAAhwYXltZW50cwoBAAAACGhhbmRsZXIxAAAAAgAAAAVhY2N1bQAAAAdwYXltZW50CQAETgAAAAIFAAAABWFjY3VtCQAETAAAAAIJAQAAAAV2YWx1ZQAAAAEIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQFAAAAA25pbAQAAAADaWRzCgAAAAACJGwFAAAACHBheW1lbnRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAUAAAADbmlsCgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAhoYW5kbGVyMQAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoDCQAAAAAAAAIFAAAAA2lkcwUAAAADaWRzCgEAAAAIaGFuZGxlcjIAAAACAAAABWFjY3VtAAAAB2Fzc2V0SWQDCQEAAAACIT0AAAACCQAETwAAAAIFAAAAA2lkcwUAAAAHYXNzZXRJZAUAAAAEdW5pdAkAAGQAAAACBQAAAAVhY2N1bQAAAAAAAAAAAQkAAAIAAAABCQABLAAAAAICAAAAFGFzc2V0IG5vdCBhdHRhY2hlZDogCQEAAAAOZ2V0QXNzZXRTdHJpbmcAAAABBQAAAAdhc3NldElkBAAAAAZjaGVja3MKAAAAAAIkbAUAAAAIYXNzZXRJZHMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwAAAAAAAAAAAACgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAhoYW5kbGVyMgAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoDCQAAAAAAAAIFAAAABmNoZWNrcwUAAAAGY2hlY2tzBgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQAAABNoYW5kbGVQb29sVG9rZW5zQWRkAAAABAAAAAdQSXNzdWVkAAAACHBheW1lbnRzAAAAC3VzZXJBZGRyZXNzAAAACm5lZWRDaGFuZ2UKAQAAABVnZXRUb2tlblBheW1lbnRBbW91bnQAAAABAAAAB3Rva2VuSWQKAQAAAAdoYW5kbGVyAAAAAgAAAAVhY2N1bQAAAAdwYXltZW50AwkAAAAAAAACCAUAAAAHcGF5bWVudAAAAAdhc3NldElkBQAAAAd0b2tlbklkCAUAAAAHcGF5bWVudAAAAAZhbW91bnQFAAAABWFjY3VtCgAAAAACJGwFAAAACHBheW1lbnRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAAAAAAAAAAAAAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAHaGFuZGxlcgAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoKAQAAABFoYW5kbGVUb2tlbkNoYW5nZQAAAAIAAAAFYWNjdW0AAAAHdG9rZW5JZAQAAAACQmsJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAQAAAA5nZXRBc3NldFN0cmluZwAAAAEFAAAAB3Rva2VuSWQCAAAACF9iYWxhbmNlBAAAAAdQU3VwcGx5CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAAF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BAAAAA10b2tlbkRlY2ltYWxzCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdzdGF0aWNfCQEAAAAOZ2V0QXNzZXRTdHJpbmcAAAABBQAAAAd0b2tlbklkAgAAAAZfc2NhbGUEAAAAAkRrCQEAAAAIZnJhY3Rpb24AAAAECQAAZQAAAAIJAQAAAAhmcmFjdGlvbgAAAAQJAABkAAAAAgUAAAAHUFN1cHBseQUAAAAHUElzc3VlZAUAAAANdG9rZW5EZWNpbWFscwUAAAAHUFN1cHBseQUAAAAERE9XTgUAAAANdG9rZW5EZWNpbWFscwUAAAACQmsFAAAADXRva2VuRGVjaW1hbHMFAAAABERPV04EAAAADXBheW1lbnRBbW91bnQJAQAAABVnZXRUb2tlblBheW1lbnRBbW91bnQAAAABBQAAAAd0b2tlbklkBAAAAAh0b1JldHVybgkAAGUAAAACAwkBAAAAAiE9AAAAAgUAAAANcGF5bWVudEFtb3VudAAAAAAAAAAAAAUAAAANcGF5bWVudEFtb3VudAAAAAAAAAAAAAUAAAACRGsEAAAAAXQDBQAAAApuZWVkQ2hhbmdlCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAC3VzZXJBZGRyZXNzBQAAAAh0b1JldHVybgUAAAAHdG9rZW5JZAUAAAADbmlsBQAAAANuaWwJAAROAAAAAgkABE4AAAACBQAAAAVhY2N1bQUAAAABdAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAQAAAA5nZXRBc3NldFN0cmluZwAAAAEFAAAAB3Rva2VuSWQCAAAACF9iYWxhbmNlCQAAZAAAAAIFAAAAAkJrBQAAAAJEawUAAAADbmlsCgAAAAACJGwFAAAACGFzc2V0SWRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAUAAAADbmlsCgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAABFoYW5kbGVUb2tlbkNoYW5nZQAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoBAAAAFmhhbmRsZVBvb2xUb2tlbnNSZWRlZW0AAAACAAAACVBSZWRlZW1lZAAAAAt1c2VyQWRkcmVzcwoBAAAAEWhhbmRsZVRva2VuUmVkZWVtAAAAAgAAAAVhY2N1bQAAAAd0b2tlbklkBAAAAAJCawkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwkBAAAADmdldEFzc2V0U3RyaW5nAAAAAQUAAAAHdG9rZW5JZAIAAAAIX2JhbGFuY2UEAAAAB1BTdXBwbHkJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQEAAAADXRva2VuRGVjaW1hbHMJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB3N0YXRpY18JAQAAAA5nZXRBc3NldFN0cmluZwAAAAEFAAAAB3Rva2VuSWQCAAAABl9zY2FsZQQAAAAGYW1vdW50CQEAAAAIZnJhY3Rpb24AAAAECQAAZQAAAAIFAAAADXRva2VuRGVjaW1hbHMJAQAAAAhmcmFjdGlvbgAAAAQJAABlAAAAAgUAAAAHUFN1cHBseQUAAAAJUFJlZGVlbWVkBQAAAA10b2tlbkRlY2ltYWxzBQAAAAdQU3VwcGx5BQAAAARET1dOBQAAAAJCawUAAAANdG9rZW5EZWNpbWFscwUAAAAERE9XTgkABE4AAAACBQAAAAVhY2N1bQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAQAAAA5nZXRBc3NldFN0cmluZwAAAAEFAAAAB3Rva2VuSWQCAAAACF9iYWxhbmNlCQAAZQAAAAIFAAAAAkJrBQAAAAZhbW91bnQFAAAAA25pbAoBAAAAEmhhbmRsZVRva2VuUmVkZWVtMgAAAAIAAAAFYWNjdW0AAAAHdG9rZW5JZAQAAAACQmsJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAQAAAA5nZXRBc3NldFN0cmluZwAAAAEFAAAAB3Rva2VuSWQCAAAACF9iYWxhbmNlBAAAAAdQU3VwcGx5CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAAF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BAAAAA10b2tlbkRlY2ltYWxzCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdzdGF0aWNfCQEAAAAOZ2V0QXNzZXRTdHJpbmcAAAABBQAAAAd0b2tlbklkAgAAAAZfc2NhbGUEAAAABmFtb3VudAkBAAAACGZyYWN0aW9uAAAABAkAAGUAAAACBQAAAA10b2tlbkRlY2ltYWxzCQEAAAAIZnJhY3Rpb24AAAAECQAAZQAAAAIFAAAAB1BTdXBwbHkFAAAACVBSZWRlZW1lZAUAAAANdG9rZW5EZWNpbWFscwUAAAAHUFN1cHBseQUAAAAERE9XTgUAAAACQmsFAAAADXRva2VuRGVjaW1hbHMFAAAABERPV04JAAROAAAAAgUAAAAFYWNjdW0JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAALdXNlckFkZHJlc3MFAAAABmFtb3VudAUAAAAHdG9rZW5JZAUAAAADbmlsCQAETgAAAAIKAAAAAAIkbAUAAAAIYXNzZXRJZHMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwBQAAAANuaWwKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAEWhhbmRsZVRva2VuUmVkZWVtAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAABMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQAAAAEyAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgoAAAAAAiRsBQAAAAhhc3NldElkcwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAASaGFuZGxlVG9rZW5SZWRlZW0yAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAABMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQAAAAEyAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgEAAAASY2FsY3VsYXRlT3V0QW1vdW50AAAABQAAAAhBbW91bnRJbgAAAAdhc3NldEluAAAACGFzc2V0T3V0AAAACUJhbGFuY2VJbgAAAApCYWxhbmNlT3V0BAAAAAdJbmRleEluCQEAAAAFdmFsdWUAAAABCQAETwAAAAIFAAAACGFzc2V0SWRzBQAAAAdhc3NldEluBAAAAAhJbmRleE91dAkBAAAABXZhbHVlAAAAAQkABE8AAAACBQAAAAhhc3NldElkcwUAAAAIYXNzZXRPdXQDCQAAAAAAAAIFAAAAB0luZGV4SW4FAAAACEluZGV4T3V0CQAAAgAAAAECAAAAEmluYWxpZCB0b2tlbnMgcGFpcgkBAAAACGZyYWN0aW9uAAAABAUAAAAKQmFsYW5jZU91dAkAAGUAAAACCQABkQAAAAIFAAAABlNjYWxlcwUAAAAISW5kZXhPdXQJAABsAAAABgkAAGsAAAADBQAAAAlCYWxhbmNlSW4JAAGRAAAAAgUAAAAGU2NhbGVzBQAAAAdJbmRleEluCQAAZAAAAAIFAAAACUJhbGFuY2VJbgUAAAAIQW1vdW50SW4JAAGRAAAAAgUAAAAIRGVjaW1hbHMFAAAAB0luZGV4SW4JAABrAAAAAwkAAZEAAAACBQAAAA1Bc3NldHNXZWlnaHRzBQAAAAdJbmRleEluAAAAAAAAACcQCQABkQAAAAIFAAAADUFzc2V0c1dlaWdodHMFAAAACEluZGV4T3V0AAAAAAAAAAAECQABkQAAAAIFAAAACERlY2ltYWxzBQAAAAhJbmRleE91dAUAAAAFRkxPT1IJAAGRAAAAAgUAAAAGU2NhbGVzBQAAAAhJbmRleE91dAUAAAAERE9XTgEAAAAPZ2V0VG9rZW5CYWxhbmNlAAAAAQAAAAdhc3NldElkBAAAAAckbWF0Y2gwBQAAAAdhc3NldElkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAApCeXRlVmVjdG9yBAAAAAF0BQAAAAckbWF0Y2gwCQAD8AAAAAIFAAAABHRoaXMFAAAAAXQICQAD7wAAAAEFAAAABHRoaXMAAAAJYXZhaWxhYmxlAQAAAB1jYWxjdWxhdGVDdXJyZW50QXNzZXRJbnRlcmVzdAAAAAQAAAAHYXNzZXRJZAAAAAphc3NldElkU3RyAAAACGFCYWxhbmNlAAAAFnRva2VuRWFybmluZ3NMYXN0Q2hlY2sEAAAAC3RvdGFsU3Rha2VkCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAAEmdsb2JhbF9pbmRleFN0YWtlZAQAAAAVdG9rZW5CYWxhbmNlTGFzdENoZWNrBQAAABZ0b2tlbkVhcm5pbmdzTGFzdENoZWNrBAAAABNjdXJyZW50QmFsYW5jZURlbHRhCQAAZQAAAAIJAQAAAA9nZXRUb2tlbkJhbGFuY2UAAAABBQAAAAdhc3NldElkBQAAAAhhQmFsYW5jZQQAAAAUY3VycmVudFRva2VuRWFybmluZ3MDCQAAZgAAAAIFAAAAE2N1cnJlbnRCYWxhbmNlRGVsdGEFAAAAFXRva2VuQmFsYW5jZUxhc3RDaGVjawUAAAATY3VycmVudEJhbGFuY2VEZWx0YQUAAAAVdG9rZW5CYWxhbmNlTGFzdENoZWNrBAAAAAtuZXdFYXJuaW5ncwkAAGUAAAACBQAAABRjdXJyZW50VG9rZW5FYXJuaW5ncwUAAAAVdG9rZW5CYWxhbmNlTGFzdENoZWNrBAAAAAtuZXdJbnRlcmVzdAMJAAAAAAAAAgUAAAALdG90YWxTdGFrZWQAAAAAAAAAAAAAAAAAAAAAAAAJAABrAAAAAwUAAAALbmV3RWFybmluZ3MFAAAABlNjYWxlOAUAAAALdG90YWxTdGFrZWQEAAAAEWxhc3RDaGVja0ludGVyZXN0CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAABFnbG9iYWxfbGFzdENoZWNrXwUAAAAKYXNzZXRJZFN0cgIAAAAJX2ludGVyZXN0CQAAZAAAAAIFAAAAEWxhc3RDaGVja0ludGVyZXN0BQAAAAtuZXdJbnRlcmVzdAEAAAALY2xhaW1SZXN1bHQAAAABAAAAB2FkZHJlc3MEAAAACmFkZHJlc3NTdHIJAAQlAAAAAQUAAAAHYWRkcmVzcwQAAAAMcHV6emxlQW1vdW50CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgUAAAAKYWRkcmVzc1N0cgIAAAAMX2luZGV4U3Rha2VkCgEAAAAHaGFuZGxlcgAAAAIAAAAFYWNjdW0AAAAHYXNzZXRJZAQAAAAKYXNzZXRJZFN0cgkBAAAADmdldEFzc2V0U3RyaW5nAAAAAQUAAAAHYXNzZXRJZAQAAAAIYUJhbGFuY2UJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAQAAAA5nZXRBc3NldFN0cmluZwAAAAEFAAAAB2Fzc2V0SWQCAAAACF9iYWxhbmNlBAAAABZ0b2tlbkVhcm5pbmdzTGFzdENoZWNrCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAABFnbG9iYWxfbGFzdENoZWNrXwUAAAAKYXNzZXRJZFN0cgIAAAAJX2Vhcm5pbmdzBAAAABRjdXJyZW50VG9rZW5JbnRlcmVzdAkBAAAAHWNhbGN1bGF0ZUN1cnJlbnRBc3NldEludGVyZXN0AAAABAUAAAAHYXNzZXRJZAUAAAAKYXNzZXRJZFN0cgUAAAAIYUJhbGFuY2UFAAAAFnRva2VuRWFybmluZ3NMYXN0Q2hlY2sEAAAAFGN1cnJlbnRUb2tlbkVhcm5pbmdzCQABlgAAAAEJAARMAAAAAgUAAAAWdG9rZW5FYXJuaW5nc0xhc3RDaGVjawkABEwAAAACCQAAZQAAAAIJAQAAAA9nZXRUb2tlbkJhbGFuY2UAAAABBQAAAAdhc3NldElkBQAAAAhhQmFsYW5jZQUAAAADbmlsBAAAAAxyZXdhcmRBbW91bnQJAABrAAAAAwUAAAAMcHV6emxlQW1vdW50CQAAZQAAAAIFAAAAFGN1cnJlbnRUb2tlbkludGVyZXN0CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAACmFkZHJlc3NTdHICAAAAC19sYXN0Q2hlY2tfBQAAAAphc3NldElkU3RyAgAAAAlfaW50ZXJlc3QFAAAABlNjYWxlOAQAAAAIdHJhbnNmZXIDCQAAAAAAAAIFAAAADHJld2FyZEFtb3VudAAAAAAAAAAAAAUAAAADbmlsCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAB2FkZHJlc3MFAAAADHJld2FyZEFtb3VudAUAAAAHYXNzZXRJZAUAAAADbmlsCQAFFAAAAAIJAAROAAAAAgkABE4AAAACCAUAAAAFYWNjdW0AAAACXzEFAAAACHRyYW5zZmVyCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgIAAAARZ2xvYmFsX2xhc3RDaGVja18FAAAACmFzc2V0SWRTdHICAAAACV9lYXJuaW5ncwkAAGUAAAACBQAAABRjdXJyZW50VG9rZW5FYXJuaW5ncwUAAAAMcmV3YXJkQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgIAAAARZ2xvYmFsX2xhc3RDaGVja18FAAAACmFzc2V0SWRTdHICAAAACV9pbnRlcmVzdAUAAAAUY3VycmVudFRva2VuSW50ZXJlc3QJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAACmFkZHJlc3NTdHICAAAAC19sYXN0Q2hlY2tfBQAAAAphc3NldElkU3RyAgAAAAlfaW50ZXJlc3QFAAAAFGN1cnJlbnRUb2tlbkludGVyZXN0BQAAAANuaWwJAABkAAAAAggFAAAABWFjY3VtAAAAAl8yCQEAAAASY2FsY3VsYXRlVXNkblZhbHVlAAAAAwUAAAAHYXNzZXRJZAUAAAAMcmV3YXJkQW1vdW50BQAAAAhhQmFsYW5jZQQAAAAFYWNjdW0KAAAAAAIkbAUAAAAMZWFybmVkQXNzZXRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAkABRQAAAACBQAAAANuaWwAAAAAAAAAAAAKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAB2hhbmRsZXIAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKCQAETgAAAAIIBQAAAAVhY2N1bQAAAAJfMQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACBQAAAAphZGRyZXNzU3RyAgAAABNfY2xhaW1lZFJld2FyZFZhbHVlCQAAZAAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACBQAAAAphZGRyZXNzU3RyAgAAABNfY2xhaW1lZFJld2FyZFZhbHVlCAUAAAAFYWNjdW0AAAACXzIJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgUAAAAKYWRkcmVzc1N0cgIAAAAKX2xhc3RDbGFpbQgFAAAACWxhc3RCbG9jawAAAAl0aW1lc3RhbXAFAAAAA25pbAEAAAAQaW5kZXhTdGFrZVJlc3VsdAAAAAIAAAAKYWRkcmVzc1N0cgAAAAZhbW91bnQEAAAAAmxpCQEAAAALY2xhaW1SZXN1bHQAAAABCQEAAAARQGV4dHJOYXRpdmUoMTA2MikAAAABBQAAAAphZGRyZXNzU3RyCQAETgAAAAIFAAAAAmxpCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAACmFkZHJlc3NTdHICAAAADF9pbmRleFN0YWtlZAkAAGQAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgUAAAAKYWRkcmVzc1N0cgIAAAAMX2luZGV4U3Rha2VkBQAAAAZhbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAEmdsb2JhbF9pbmRleFN0YWtlZAkAAGQAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAAEmdsb2JhbF9pbmRleFN0YWtlZAUAAAAGYW1vdW50BQAAAANuaWwAAAAHAAAAAWkBAAAAB3NldExvY2sAAAABAAAACmxvY2tTdGF0dXMDCQEAAAACIT0AAAACCAUAAAABaQAAAAZjYWxsZXIJAQAAAAdBZGRyZXNzAAAAAQUAAAAIYWRtaW5LZXkJAAACAAAAAQIAAAAKYWRtaW4gb25seQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAQc3RhdGljX3dhc0xvY2tlZAUAAAAKbG9ja1N0YXR1cwUAAAADbmlsAAAAAWkBAAAAB3ByZUluaXQAAAAACgEAAAAHaGFuZGxlcgAAAAIAAAAFYWNjdW0AAAAIYXNzZXROdW0DCQAAZwAAAAIFAAAACGFzc2V0TnVtBQAAAAFUBQAAAAVhY2N1bQkABE4AAAACBQAAAAVhY2N1bQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAB3N0YXRpY18JAQAAAA5nZXRBc3NldFN0cmluZwAAAAEJAAGRAAAAAgUAAAAIYXNzZXRJZHMFAAAACGFzc2V0TnVtAgAAAAZfc2NhbGUJAAGRAAAAAgUAAAAGU2NhbGVzBQAAAAhhc3NldE51bQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAB3N0YXRpY18JAQAAAA5nZXRBc3NldFN0cmluZwAAAAEJAAGRAAAAAgUAAAAIYXNzZXRJZHMFAAAACGFzc2V0TnVtAgAAAAdfd2VpZ2h0CQABkQAAAAIFAAAADUFzc2V0c1dlaWdodHMFAAAACGFzc2V0TnVtBQAAAANuaWwKAAAAAAIkbAkABEwAAAACAAAAAAAAAAAACQAETAAAAAIAAAAAAAAAAAEJAARMAAAAAgAAAAAAAAAAAgkABEwAAAACAAAAAAAAAAADCQAETAAAAAIAAAAAAAAAAAQJAARMAAAAAgAAAAAAAAAABQkABEwAAAACAAAAAAAAAAAGCQAETAAAAAIAAAAAAAAAAAcJAARMAAAAAgAAAAAAAAAACAkABEwAAAACAAAAAAAAAAAJBQAAAANuaWwKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwBQAAAANuaWwKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAB2hhbmRsZXIAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKAAAAAWkBAAAABmRlSW5pdAAAAAADCQEAAAACIT0AAAACCAUAAAABaQAAAAZjYWxsZXIFAAAABHRoaXMJAAACAAAAAQIAAAAKYWRtaW4gb25seQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAQZ2xvYmFsX3dhc0luaXRlZAAAAAAAAAAAAAUAAAADbmlsAAAAAWkBAAAABGluaXQAAAAACgEAAAALcHJlcGFyZUxpc3QAAAAACgEAAAAHaGFuZGxlcgAAAAIAAAAFYWNjdW0AAAABbgkABE4AAAACBQAAAAVhY2N1bQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAAJYAAAAAQkBAAAABXZhbHVlAAAAAQgFAAAAAW4AAAAHYXNzZXRJZAIAAAAIX2JhbGFuY2UIBQAAAAFuAAAABmFtb3VudAUAAAADbmlsCgAAAAACJGwIBQAAAAFpAAAACHBheW1lbnRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAUAAAADbmlsCgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAdoYW5kbGVyAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAABMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQAAAAEyAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgoBAAAAGWNhbGN1bGF0ZVBvb2xUb2tlbnNBbW91bnQAAAABAAAACHBheW1lbnRzCgEAAAAHaGFuZGxlcgAAAAIAAAAFYWNjdW0AAAADcG10BAAAAAdhc3NldElkCQEAAAAFdmFsdWUAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQKAQAAAAhoYW5kbGVyMgAAAAIAAAAFYWNjdW0AAAABbgMJAAAAAAAAAgUAAAABbgUAAAAHYXNzZXRJZAkBAAAABXZhbHVlAAAAAQkABE8AAAACBQAAAAhhc3NldElkcwUAAAABbgUAAAAFYWNjdW0EAAAABVRva2VuCgAAAAACJGwFAAAACGFzc2V0SWRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAAAAAAAAAAAAQoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAIaGFuZGxlcjIAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKCQAAaAAAAAIFAAAABWFjY3VtCQAAbAAAAAYIBQAAAANwbXQAAAAGYW1vdW50CQABkQAAAAIFAAAACERlY2ltYWxzBQAAAAVUb2tlbgkAAZEAAAACBQAAAA1Bc3NldHNXZWlnaHRzBQAAAAVUb2tlbgUAAAAVQXNzZXRzV2VpZ2h0c0RlY2ltYWxzAAAAAAAAAAABBQAAAAVGTE9PUgoAAAAAAiRsBQAAAAhwYXltZW50cwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAAAAAAAAAAAAEKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAB2hhbmRsZXIAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKAwkAAGYAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAAEGdsb2JhbF93YXNJbml0ZWQAAAAAAAAAAAAJAAACAAAAAQIAAAATcG9vbCBhbHJlYWR5IGluaXRlZAQAAAARaW5pdGlhbFBvb2xUb2tlbnMJAQAAABljYWxjdWxhdGVQb29sVG9rZW5zQW1vdW50AAAAAQgFAAAAAWkAAAAIcGF5bWVudHMEAAAADnBvb2xUb2tlbklzc3VlCQAEQwAAAAcCAAAAD1BaIFB1enpsZSBJbmRleAIAAAAeUHV6emxlIHBhcmVudCBwb29sIGluZGV4IHRva2VuBQAAABFpbml0aWFsUG9vbFRva2VucwUAAAARUG9vbFRva2VuRGVjaW1hbHMGBQAAAAR1bml0AAAAAAAAAAAABAAAAAtwb29sVG9rZW5JZAkABDgAAAABBQAAAA5wb29sVG9rZW5Jc3N1ZQkABE4AAAACCQEAAAALcHJlcGFyZUxpc3QAAAAACQAETAAAAAIFAAAADnBvb2xUb2tlbklzc3VlCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABdnbG9iYWxfcG9vbFRva2VuX2Ftb3VudAUAAAARaW5pdGlhbFBvb2xUb2tlbnMJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAEGdsb2JhbF93YXNJbml0ZWQAAAAAAAAAAAEJAARMAAAAAgkBAAAAC0JpbmFyeUVudHJ5AAAAAgIAAAATZ2xvYmFsX3Bvb2xUb2tlbl9pZAUAAAALcG9vbFRva2VuSWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyBQAAABFpbml0aWFsUG9vbFRva2VucwUAAAALcG9vbFRva2VuSWQFAAAAA25pbAAAAAFpAQAAAA1nZW5lcmF0ZUluZGV4AAAAAQAAAApuZWVkQ2hhbmdlCQAAAgAAAAECAAAAEExQIGlzIGNsb3NlZCB5ZXQAAAABaQEAAAALcmVkZWVtSW5kZXgAAAABAAAADHNlbmRUb09yaWdpbgQAAAADcG10CQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAwkBAAAAAiE9AAAAAggFAAAAA3BtdAAAAAdhc3NldElkCQEAAAAMdHJ5R2V0QmluYXJ5AAAAAQIAAAATZ2xvYmFsX3Bvb2xUb2tlbl9pZAkAAAIAAAABAgAAAB5wbGVhc2UgYXR0YWNoIHBvb2wgc2hhcmUgdG9rZW4EAAAACVBSZWRlZW1lZAgFAAAAA3BtdAAAAAZhbW91bnQEAAAABnJlc3VsdAkBAAAAFmhhbmRsZVBvb2xUb2tlbnNSZWRlZW0AAAACBQAAAAlQUmVkZWVtZWQDBQAAAAxzZW5kVG9PcmlnaW4IBQAAAAFpAAAADG9yaWdpbkNhbGxlcggFAAAAAWkAAAAGY2FsbGVyCQAETgAAAAIFAAAABnJlc3VsdAkABEwAAAACCQEAAAAEQnVybgAAAAIJAQAAAAx0cnlHZXRCaW5hcnkAAAABAgAAABNnbG9iYWxfcG9vbFRva2VuX2lkBQAAAAlQUmVkZWVtZWQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50CQAAZQAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQFAAAACVBSZWRlZW1lZAUAAAADbmlsAAAAAWkBAAAABHN3YXAAAAACAAAACGFzc2V0T3V0AAAAB21pbmltdW0DCQAAZgAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAQc3RhdGljX3dhc0xvY2tlZAAAAAAAAAAAAAkAAAIAAAABAgAAABBsb2NrZWQgZm9yIHN3YXBzBAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAACEFtb3VudEluCQEAAAAFdmFsdWUAAAABCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQEAAAAB0Fzc2V0SW4IBQAAAANwbXQAAAAHYXNzZXRJZAQAAAAIQXNzZXRPdXQJAQAAAA1nZXRBc3NldEJ5dGVzAAAAAQUAAAAIYXNzZXRPdXQEAAAADkFzc2V0SW5CYWxhbmNlCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfCQEAAAAOZ2V0QXNzZXRTdHJpbmcAAAABBQAAAAdBc3NldEluAgAAAAhfYmFsYW5jZQQAAAAPQXNzZXRPdXRCYWxhbmNlCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfBQAAAAhhc3NldE91dAIAAAAIX2JhbGFuY2UEAAAACUFtb3VudE91dAkBAAAAEmNhbGN1bGF0ZU91dEFtb3VudAAAAAUFAAAACEFtb3VudEluBQAAAAdBc3NldEluBQAAAAhBc3NldE91dAUAAAAOQXNzZXRJbkJhbGFuY2UFAAAAD0Fzc2V0T3V0QmFsYW5jZQQAAAAJZmVlQW1vdW50CQAAawAAAAMFAAAACUFtb3VudE91dAUAAAADRmVlBQAAAAhGZWVTY2FsZQQAAAARcHJvdG9jb2xGZWVBbW91bnQJAABrAAAAAwUAAAAJZmVlQW1vdW50AAAAAAAAAAAoAAAAAAAAAABkBAAAAA5jbGVhbkFtb3VudE91dAkAAGUAAAACBQAAAAlBbW91bnRPdXQFAAAACWZlZUFtb3VudAMJAABmAAAAAgUAAAAHbWluaW11bQUAAAAOY2xlYW5BbW91bnRPdXQJAAACAAAAAQkAASwAAAACAgAAACthbW91bnQgdG8gcmVjaWV2ZSBpcyBsb3dlciB0aGFuIGdpdmVuIG9uZTogCQABpAAAAAEFAAAADmNsZWFuQW1vdW50T3V0AwkAAGYAAAACAAAAAAAAACcQBQAAAAhBbW91bnRJbgkAAAIAAAABAgAAABxzdW0gdG8gZXhjaGFuZ2UgaXMgdG9vIHNtYWxsAwkAAGYAAAACAAAAAAAAAAAACQAAZQAAAAIFAAAAD0Fzc2V0T3V0QmFsYW5jZQUAAAAJQW1vdW50T3V0CQAAAgAAAAECAAAAG2NvbnRyYWN0IGlzIG91dCBvZiByZXNlcnZlcwkABRQAAAACCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwUAAAAIYXNzZXRPdXQCAAAACF9iYWxhbmNlCQAAZQAAAAIFAAAAD0Fzc2V0T3V0QmFsYW5jZQUAAAAJQW1vdW50T3V0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAADWZlZUFnZ3JlZ2F0b3IFAAAAEXByb3RvY29sRmVlQW1vdW50BQAAAAhBc3NldE91dAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAQAAAA5nZXRBc3NldFN0cmluZwAAAAEFAAAAB0Fzc2V0SW4CAAAACF9iYWxhbmNlCQAAZAAAAAIFAAAADkFzc2V0SW5CYWxhbmNlBQAAAAhBbW91bnRJbgkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIFAAAADmNsZWFuQW1vdW50T3V0BQAAAAhBc3NldE91dAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAANZ2xvYmFsX3ZvbHVtZQkAAGQAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAADWdsb2JhbF92b2x1bWUJAQAAABJjYWxjdWxhdGVVc2RuVmFsdWUAAAADBQAAAAdBc3NldEluBQAAAAhBbW91bnRJbgUAAAAOQXNzZXRJbkJhbGFuY2UFAAAAA25pbAUAAAAOY2xlYW5BbW91bnRPdXQAAAAA8gi8MQ==",
    "height": 2873136,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BGZJqDNGpvr4ccaXmf5BzzaCWvQwm9ReTpUdGQSv5taZ
Next: EkrCsQ5aENiLcaQwXfuwjDBGy7uU5298N3iYmRUmCmCJ

Diff: 
Old New Differences
334 334  func preInit () = {
335 335      func handler (accum,assetNum) =     if ((assetNum >= T))
336 336          then accum
337 -         else (accum ++ [IntegerEntry((("static_" + getAssetString(assetIds[0])) + "_scale"), Scales[assetNum]), IntegerEntry((("static_" + getAssetString(assetIds[0])) + "_weight"), AssetsWeights[assetNum])])
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)
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let adminKey = base58'3P8QVmmftGNu9JEvuwkq5a22UrHGyg4wBkR'
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(amount, usdnBalance, usdnWeight) / (aBalance / assetWeight))
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 -         else (accum ++ [IntegerEntry((("static_" + getAssetString(assetIds[0])) + "_scale"), Scales[assetNum]), IntegerEntry((("static_" + getAssetString(assetIds[0])) + "_weight"), AssetsWeights[assetNum])])
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 = fraction(feeAmount, 40, 100)
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 468              else if ((10000 > 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), IntegerEntry("global_volume", (tryGetInteger("global_volume") + calculateUsdnValue(AssetIn, AmountIn, AssetInBalance)))], cleanAmountOut)
473 473          }
474 474  
475 475

Old	New		Differences
334	334		func preInit () = {
335	335		func handler (accum,assetNum) = if ((assetNum >= T))
336	336		then accum
337		-	else (accum ++ [IntegerEntry((("static_" + getAssetString(assetIds[0])) + "_scale"), Scales[assetNum]), IntegerEntry((("static_" + getAssetString(assetIds[0])) + "_weight"), AssetsWeights[assetNum])])
	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)

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let adminKey = base58'3P8QVmmftGNu9JEvuwkq5a22UrHGyg4wBkR'
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(amount, usdnBalance, usdnWeight) / (aBalance / assetWeight))
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		-	else (accum ++ [IntegerEntry((("static_" + getAssetString(assetIds[0])) + "_scale"), Scales[assetNum]), IntegerEntry((("static_" + getAssetString(assetIds[0])) + "_weight"), AssetsWeights[assetNum])])
	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 = fraction(feeAmount, 40, 100)
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	468		else if ((10000 > 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), IntegerEntry("global_volume", (tryGetInteger("global_volume") + calculateUsdnValue(AssetIn, AmountIn, AssetInBalance)))], cleanAmountOut)
473	473		}
474	474
475	475

github/deemru/w8io/3ef1775 
74.03 ms ◑