w8 · tx · 9ho···DDF

tx · 9hojRZnu984qH6SAZLnjXdrdAFoQFxs4GRX6hUND6DDF

3Mtwm9zTenpozLfVL46hAidH3zuLKScURQK:  -0.01400000 Waves

2021.11.17 16:47 [1795112] smart account 3Mtwm9zTenpozLfVL46hAidH3zuLKScURQK > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9hojRZnu984qH6SAZLnjXdrdAFoQFxs4GRX6hUND6DDF",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1637156902874,
    "version": 2,
    "chainId": 84,
    "sender": "3Mtwm9zTenpozLfVL46hAidH3zuLKScURQK",
    "senderPublicKey": "Eu1AYNJAMgEeS5Wftr8wEFyspBRFVBv9qQV7XCYzGpxn",
    "proofs": [
        "2xA5fAagEamW3N3GVQeU4VkUDMWL7bmSibeStGVPEzmwcAwpVJHdkikhhgtiZECKiX4se2cijiCFzAn7EGaNCmA"
    ],
    "script": "base64:AAIFAAAAAAAAABAIAhIAEgASABIAEgQKAggBAAAAFAAAAAABVAAAAAAAAAAAAgAAAAAIYXNzZXRJZHMJAARMAAAAAgEAAAAgCGWEtw/wimoa8+Jo6C4IkCTD0ydYA80s9i5eC9/aFaQJAARMAAAAAgEAAAAg/sQa4d7v52kifRLo73ftXd9xD7wgh9JaaHT98W4IWDcFAAAAA25pbAAAAAANQXNzZXRzV2VpZ2h0cwkABEwAAAACAAAAAAAAAABQCQAETAAAAAIAAAAAAAAAABQFAAAAA25pbAAAAAAVQXNzZXRzV2VpZ2h0c0RlY2ltYWxzAAAAAAAAAAACAAAAABFQb29sVG9rZW5EZWNpbWFscwAAAAAAAAAACAAAAAAIRGVjaW1hbHMJAARMAAAAAgAAAAAAAAAACAkABEwAAAACAAAAAAAAAAAGBQAAAANuaWwAAAAABlNjYWxlcwkABEwAAAACAAAAAAAF9eEACQAETAAAAAIAAAAAAAAPQkAFAAAAA25pbAAAAAADRmVlAAAAAAAAAADIAAAAAAVTY2FsZQAAAAAAAAAnEAAAAAAIRmVlU2NhbGUAAAAAAAAAJxAAAAAADWZlZUFnZ3JlZ2F0b3IJAQAAAAdBZGRyZXNzAAAAAQEAAAAaAVd/xowzGJQY0BUK98y5OYEEhR4yhBXd2+wBAAAADXRyeUdldEludGVnZXIAAAABAAAAA2tleQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYgUAAAAHJG1hdGNoMAUAAAABYgAAAAAAAAAAAAEAAAAMdHJ5R2V0QmluYXJ5AAAAAQAAAANrZXkEAAAAByRtYXRjaDAJAAQcAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAApCeXRlVmVjdG9yBAAAAAFiBQAAAAckbWF0Y2gwBQAAAAFiAQAAAAABAAAAFmdldEN1cnJlbnRUb2tlbkJhbGFuY2UAAAABAAAACXRva2VuVHlwZQQAAAAHdG9rZW5JZAkAAlgAAAABCQABkQAAAAIFAAAACGFzc2V0SWRzBQAAAAl0b2tlblR5cGUJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8FAAAAB3Rva2VuSWQCAAAACF9iYWxhbmNlAQAAABBjYWxjdWxhdGVQSXNzdWVkAAAAAgAAAAZhbW91bnQAAAAHdG9rZW5JZAQAAAAHUHN1cHBseQkBAAAADXRyeUdldEludGVnZXIAAAABAgAAABdnbG9iYWxfcG9vbFRva2VuX2Ftb3VudAQAAAAHQmFsYW5jZQkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwkAAlgAAAABBQAAAAd0b2tlbklkAgAAAAhfYmFsYW5jZQkBAAAACGZyYWN0aW9uAAAABAUAAAAGYW1vdW50BQAAAAdQc3VwcGx5BQAAAAdCYWxhbmNlBQAAAARET1dOAQAAAA1nZXRNaW5QSXNzdWVkAAAAAQAAAAhwYXltZW50cwoBAAAAB2hhbmRsZXIAAAACAAAABWFjY3VtAAAAB2N1cnJlbnQEAAAAB1BJc3N1ZWQJAQAAABBjYWxjdWxhdGVQSXNzdWVkAAAAAggFAAAAB2N1cnJlbnQAAAAGYW1vdW50CQEAAAAFdmFsdWUAAAABCAUAAAAHY3VycmVudAAAAAdhc3NldElkAwMJAAAAAAAAAgUAAAAFYWNjdW0AAAAAAAAAAAAGCQAAZgAAAAIFAAAABWFjY3VtBQAAAAdQSXNzdWVkBQAAAAdQSXNzdWVkBQAAAAVhY2N1bQQAAAAJbWluUElzc2VkCgAAAAACJGwFAAAACHBheW1lbnRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAAAAAAAAAAAAAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAHaGFuZGxlcgAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoFAAAACW1pblBJc3NlZAEAAAATY2hlY2tUb2tlbnNWYWxpZGl0eQAAAAEAAAAIcGF5bWVudHMKAQAAAAhoYW5kbGVyMQAAAAIAAAAFYWNjdW0AAAAHcGF5bWVudAkABE4AAAACBQAAAAVhY2N1bQkABEwAAAACCQEAAAAFdmFsdWUAAAABCAUAAAAHcGF5bWVudAAAAAdhc3NldElkBQAAAANuaWwEAAAAA2lkcwoAAAAAAiRsBQAAAAhwYXltZW50cwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAIaGFuZGxlcjEAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKCgEAAAAIaGFuZGxlcjIAAAACAAAABWFjY3VtAAAAB2Fzc2V0SWQDCQEAAAACIT0AAAACCQAETwAAAAIFAAAAA2lkcwUAAAAHYXNzZXRJZAUAAAAEdW5pdAkAAGQAAAACBQAAAAVhY2N1bQAAAAAAAAAAAQkAAAIAAAABCQABLAAAAAICAAAAFGFzc2V0IG5vdCBhdHRhY2hlZDogCQACWAAAAAEFAAAAB2Fzc2V0SWQEAAAABmNoZWNrcwoAAAAAAiRsBQAAAAhhc3NldElkcwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAAAAAAAAAAAAAKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAACGhhbmRsZXIyAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAABMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQAAAAEyAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgYBAAAAE2hhbmRsZVBvb2xUb2tlbnNBZGQAAAADAAAAB1BJc3N1ZWQAAAAIcGF5bWVudHMAAAALdXNlckFkZHJlc3MKAQAAABVnZXRUb2tlblBheW1lbnRBbW91bnQAAAABAAAAB3Rva2VuSWQKAQAAAAdoYW5kbGVyAAAAAgAAAAVhY2N1bQAAAAdwYXltZW50AwkAAAAAAAACCAUAAAAHcGF5bWVudAAAAAdhc3NldElkBQAAAAd0b2tlbklkCAUAAAAHcGF5bWVudAAAAAZhbW91bnQFAAAABWFjY3VtCgAAAAACJGwFAAAACHBheW1lbnRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAAAAAAAAAAAAAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAHaGFuZGxlcgAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoKAQAAABFoYW5kbGVUb2tlbkNoYW5nZQAAAAIAAAAFYWNjdW0AAAAHdG9rZW5JZAQAAAACQmsJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAAJYAAAAAQUAAAAHdG9rZW5JZAIAAAAIX2JhbGFuY2UEAAAAB1BTdXBwbHkJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQEAAAADXRva2VuRGVjaW1hbHMJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB3N0YXRpY18JAAJYAAAAAQUAAAAHdG9rZW5JZAIAAAAGX3NjYWxlBAAAAAJEawkAAGsAAAADCQAAZQAAAAIJAABrAAAAAwkAAGQAAAACBQAAAAdQU3VwcGx5BQAAAAdQSXNzdWVkBQAAAA10b2tlbkRlY2ltYWxzBQAAAAdQU3VwcGx5BQAAAA10b2tlbkRlY2ltYWxzBQAAAAJCawUAAAANdG9rZW5EZWNpbWFscwkABE4AAAACBQAAAAVhY2N1bQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAAJYAAAAAQUAAAAHdG9rZW5JZAIAAAAIX2JhbGFuY2UJAABkAAAAAgUAAAACQmsFAAAAAkRrBQAAAANuaWwKAQAAABJoYW5kbGVUb2tlbkNoYW5nZTIAAAACAAAABWFjY3VtAAAAB3Rva2VuSWQEAAAAAkJrCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfCQACWAAAAAEFAAAAB3Rva2VuSWQCAAAACF9iYWxhbmNlBAAAAAdQU3VwcGx5CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAAF2dsb2JhbF9wb29sVG9rZW5fYW1vdW50BAAAAA10b2tlbkRlY2ltYWxzCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdzdGF0aWNfCQACWAAAAAEFAAAAB3Rva2VuSWQCAAAABl9zY2FsZQQAAAACRGsJAABrAAAAAwkAAGUAAAACCQAAawAAAAMJAABkAAAAAgUAAAAHUFN1cHBseQUAAAAHUElzc3VlZAUAAAANdG9rZW5EZWNpbWFscwUAAAAHUFN1cHBseQUAAAANdG9rZW5EZWNpbWFscwUAAAACQmsFAAAADXRva2VuRGVjaW1hbHMEAAAADXBheW1lbnRBbW91bnQJAQAAABVnZXRUb2tlblBheW1lbnRBbW91bnQAAAABBQAAAAd0b2tlbklkBAAAAAh0b1JldHVybgkAAGUAAAACAwkBAAAAAiE9AAAAAgUAAAANcGF5bWVudEFtb3VudAAAAAAAAAAAAAUAAAANcGF5bWVudEFtb3VudAAAAAAAAAAAAAUAAAACRGsJAAROAAAAAgUAAAAFYWNjdW0JAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAALdXNlckFkZHJlc3MFAAAACHRvUmV0dXJuBQAAAAd0b2tlbklkBQAAAANuaWwJAAROAAAAAgoAAAAAAiRsBQAAAAhhc3NldElkcwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAARaGFuZGxlVG9rZW5DaGFuZ2UAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKCgAAAAACJGwFAAAACGFzc2V0SWRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAUAAAADbmlsCgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAABJoYW5kbGVUb2tlbkNoYW5nZTIAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAEyAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAAATIAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKAQAAABZoYW5kbGVQb29sVG9rZW5zUmVkZWVtAAAAAgAAAAlQUmVkZWVtZWQAAAALdXNlckFkZHJlc3MKAQAAABFoYW5kbGVUb2tlblJlZGVlbQAAAAIAAAAFYWNjdW0AAAAHdG9rZW5JZAQAAAACQmsJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAAJYAAAAAQUAAAAHdG9rZW5JZAIAAAAIX2JhbGFuY2UEAAAAB1BTdXBwbHkJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQEAAAADXRva2VuRGVjaW1hbHMJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB3N0YXRpY18JAAJYAAAAAQUAAAAHdG9rZW5JZAIAAAAGX3NjYWxlBAAAAAZhbW91bnQJAABrAAAAAwkAAGUAAAACBQAAAA10b2tlbkRlY2ltYWxzCQAAawAAAAMJAABlAAAAAgUAAAAHUFN1cHBseQUAAAAJUFJlZGVlbWVkBQAAAA10b2tlbkRlY2ltYWxzBQAAAAdQU3VwcGx5BQAAAAJCawUAAAANdG9rZW5EZWNpbWFscwkABE4AAAACBQAAAAVhY2N1bQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAAJYAAAAAQUAAAAHdG9rZW5JZAIAAAAIX2JhbGFuY2UJAABlAAAAAgUAAAACQmsFAAAABmFtb3VudAUAAAADbmlsCgEAAAASaGFuZGxlVG9rZW5SZWRlZW0yAAAAAgAAAAVhY2N1bQAAAAd0b2tlbklkBAAAAAJCawkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwkAAlgAAAABBQAAAAd0b2tlbklkAgAAAAhfYmFsYW5jZQQAAAAHUFN1cHBseQkBAAAADXRyeUdldEludGVnZXIAAAABAgAAABdnbG9iYWxfcG9vbFRva2VuX2Ftb3VudAQAAAANdG9rZW5EZWNpbWFscwkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHc3RhdGljXwkAAlgAAAABBQAAAAd0b2tlbklkAgAAAAZfc2NhbGUEAAAABmFtb3VudAkAAGsAAAADCQAAZQAAAAIFAAAADXRva2VuRGVjaW1hbHMJAABrAAAAAwkAAGUAAAACBQAAAAdQU3VwcGx5BQAAAAlQUmVkZWVtZWQFAAAADXRva2VuRGVjaW1hbHMFAAAAB1BTdXBwbHkFAAAAAkJrBQAAAA10b2tlbkRlY2ltYWxzCQAETgAAAAIFAAAABWFjY3VtCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAC3VzZXJBZGRyZXNzBQAAAAZhbW91bnQFAAAAB3Rva2VuSWQFAAAAA25pbAkABE4AAAACCgAAAAACJGwFAAAACGFzc2V0SWRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAUAAAADbmlsCgEAAAABMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAABFoYW5kbGVUb2tlblJlZGVlbQAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoKAAAAAAIkbAUAAAAIYXNzZXRJZHMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwBQAAAANuaWwKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAAEmhhbmRsZVRva2VuUmVkZWVtMgAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoBAAAAEmNhbGN1bGF0ZU91dEFtb3VudAAAAAMAAAAIQW1vdW50SW4AAAAHYXNzZXRJbgAAAAhhc3NldE91dAQAAAAHSW5kZXhJbgkBAAAABXZhbHVlAAAAAQkABE8AAAACBQAAAAhhc3NldElkcwUAAAAHYXNzZXRJbgQAAAAISW5kZXhPdXQJAQAAAAV2YWx1ZQAAAAEJAARPAAAAAgUAAAAIYXNzZXRJZHMFAAAACGFzc2V0T3V0AwkAAAAAAAACBQAAAAdJbmRleEluBQAAAAhJbmRleE91dAkAAAIAAAABAgAAABJpbmFsaWQgdG9rZW5zIHBhaXIEAAAACUJhbGFuY2VJbgkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwkAAlgAAAABBQAAAAdhc3NldEluAgAAAAhfYmFsYW5jZQQAAAAKQmFsYW5jZU91dAkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwkAAlgAAAABBQAAAAhhc3NldE91dAIAAAAIX2JhbGFuY2UJAQAAAAhmcmFjdGlvbgAAAAQFAAAACkJhbGFuY2VPdXQJAABlAAAAAgkAAZEAAAACBQAAAAZTY2FsZXMFAAAACEluZGV4T3V0CQAAbAAAAAYJAABpAAAAAgkAAGgAAAACBQAAAAlCYWxhbmNlSW4JAAGRAAAAAgUAAAAGU2NhbGVzBQAAAAdJbmRleEluCQAAZAAAAAIFAAAACUJhbGFuY2VJbgUAAAAIQW1vdW50SW4JAAGRAAAAAgUAAAAIRGVjaW1hbHMFAAAAB0luZGV4SW4JAABrAAAAAwkAAZEAAAACBQAAAA1Bc3NldHNXZWlnaHRzBQAAAAdJbmRleEluAAAAAAAAACcQCQABkQAAAAIFAAAADUFzc2V0c1dlaWdodHMFAAAACEluZGV4T3V0AAAAAAAAAAAECQABkQAAAAIFAAAACERlY2ltYWxzBQAAAAhJbmRleE91dAUAAAAFRkxPT1IJAAGRAAAAAgUAAAAGU2NhbGVzBQAAAAhJbmRleE91dAUAAAAERE9XTgAAAAUAAAABaQEAAAAHcHJlSW5pdAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAdzdGF0aWNfCQACWAAAAAEJAAGRAAAAAgUAAAAIYXNzZXRJZHMAAAAAAAAAAAACAAAABl9zY2FsZQkAAZEAAAACBQAAAAZTY2FsZXMAAAAAAAAAAAAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAdzdGF0aWNfCQACWAAAAAEJAAGRAAAAAgUAAAAIYXNzZXRJZHMAAAAAAAAAAAECAAAABl9zY2FsZQkAAZEAAAACBQAAAAZTY2FsZXMAAAAAAAAAAAEFAAAAA25pbAAAAAFpAQAAAARpbml0AAAAAAoBAAAAC3ByZXBhcmVMaXN0AAAAAAoBAAAAB2hhbmRsZXIAAAACAAAABWFjY3VtAAAAAW4JAAROAAAAAgUAAAAFYWNjdW0JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfCQACWAAAAAEJAQAAAAV2YWx1ZQAAAAEIBQAAAAFuAAAAB2Fzc2V0SWQCAAAACF9iYWxhbmNlCAUAAAABbgAAAAZhbW91bnQFAAAAA25pbAoAAAAAAiRsCAUAAAABaQAAAAhwYXltZW50cwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAFAAAAA25pbAoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAHaGFuZGxlcgAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoKAQAAABljYWxjdWxhdGVQb29sVG9rZW5zQW1vdW50AAAAAQAAAAhwYXltZW50cwoBAAAAB2hhbmRsZXIAAAACAAAABWFjY3VtAAAAA3BtdAQAAAAHYXNzZXRJZAkBAAAABXZhbHVlAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkCgEAAAAIaGFuZGxlcjIAAAACAAAABWFjY3VtAAAAAW4DCQAAAAAAAAIFAAAAAW4FAAAAB2Fzc2V0SWQJAQAAAAV2YWx1ZQAAAAEJAARPAAAAAgUAAAAIYXNzZXRJZHMFAAAAAW4FAAAABWFjY3VtBAAAAAVUb2tlbgoAAAAAAiRsBQAAAAhhc3NldElkcwoAAAAAAiRzCQABkAAAAAEFAAAAAiRsCgAAAAAFJGFjYzAAAAAAAAAAAAEKAQAAAAExAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkBAAAACGhhbmRsZXIyAAAAAgUAAAACJGEJAAGRAAAAAgUAAAACJGwFAAAAAiRpCgEAAAABMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAUTGlzdCBzaXplIGV4Y2VlZHMgMTAJAQAAAAEyAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgkAAGgAAAACBQAAAAVhY2N1bQkAAGwAAAAGCAUAAAADcG10AAAABmFtb3VudAkAAZEAAAACBQAAAAhEZWNpbWFscwUAAAAFVG9rZW4JAAGRAAAAAgUAAAANQXNzZXRzV2VpZ2h0cwUAAAAFVG9rZW4FAAAAFUFzc2V0c1dlaWdodHNEZWNpbWFscwUAAAARUG9vbFRva2VuRGVjaW1hbHMFAAAABUZMT09SCgAAAAACJGwFAAAACHBheW1lbnRzCgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAAAAAAAAAAAAQoBAAAAATEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAHaGFuZGxlcgAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAAATIAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQAAAgAAAAECAAAAFExpc3Qgc2l6ZSBleGNlZWRzIDEwCQEAAAABMgAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgkBAAAAATEAAAACCQEAAAABMQAAAAIJAQAAAAExAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoDCQAAZgAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAQZ2xvYmFsX3dhc0luaXRlZAAAAAAAAAAAAAkAAAIAAAABAgAAABNwb29sIGFscmVhZHkgaW5pdGVkBAAAABFpbml0aWFsUG9vbFRva2VucwkBAAAAGWNhbGN1bGF0ZVBvb2xUb2tlbnNBbW91bnQAAAABCAUAAAABaQAAAAhwYXltZW50cwQAAAAOcG9vbFRva2VuSXNzdWUJAARDAAAABwIAAAAHUHV6emxlMgIAAAAWUHV6emxlIFN3YXAgUG9vbCBUb2tlbgUAAAARaW5pdGlhbFBvb2xUb2tlbnMFAAAAEVBvb2xUb2tlbkRlY2ltYWxzBgUAAAAEdW5pdAAAAAAAAAAAAAQAAAALcG9vbFRva2VuSWQJAAQ4AAAAAQUAAAAOcG9vbFRva2VuSXNzdWUJAAROAAAAAgkBAAAAC3ByZXBhcmVMaXN0AAAAAAkABEwAAAACBQAAAA5wb29sVG9rZW5Jc3N1ZQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAXZ2xvYmFsX3Bvb2xUb2tlbl9hbW91bnQFAAAAEWluaXRpYWxQb29sVG9rZW5zCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABBnbG9iYWxfd2FzSW5pdGVkAAAAAAAAAAABCQAETAAAAAIJAQAAAAtCaW5hcnlFbnRyeQAAAAICAAAAE2dsb2JhbF9wb29sVG9rZW5faWQFAAAAC3Bvb2xUb2tlbklkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAARaW5pdGlhbFBvb2xUb2tlbnMFAAAAC3Bvb2xUb2tlbklkBQAAAANuaWwAAAABaQEAAAAMYWRkTGlxdWlkaXR5AAAAAAkAAAIAAAABAgAAABBMUCBpcyBjbG9zZWQgeWV0AAAAAWkBAAAAD3JlbW92ZUxpcXVpZGl0eQAAAAAJAAACAAAAAQIAAAAQTFAgaXMgY2xvc2VkIHlldAAAAAFpAQAAAARzd2FwAAAAAgAAAAhhc3NldE91dAAAAAdtaW5pbXVtBAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAACEFtb3VudEluCQEAAAAFdmFsdWUAAAABCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAZhbW91bnQEAAAAB0Fzc2V0SW4JAQAAAAV2YWx1ZQAAAAEIBQAAAANwbXQAAAAHYXNzZXRJZAQAAAAIQXNzZXRPdXQJAAJZAAAAAQUAAAAIYXNzZXRPdXQEAAAACUFtb3VudE91dAkBAAAAEmNhbGN1bGF0ZU91dEFtb3VudAAAAAMFAAAACEFtb3VudEluBQAAAAdBc3NldEluBQAAAAhBc3NldE91dAMJAABmAAAAAgUAAAAHbWluaW11bQUAAAAJQW1vdW50T3V0CQAAAgAAAAEJAAEsAAAAAgIAAAArYW1vdW50IHRvIHJlY2lldmUgaXQgbG93ZXIgdGhhbiBnaXZlbiBvbmU6IAkAAaQAAAABBQAAAAlBbW91bnRPdXQDCQAAZgAAAAIJAABpAAAAAgkAAZEAAAACBQAAAAZTY2FsZXMJAQAAAAV2YWx1ZQAAAAEJAARPAAAAAgUAAAAIYXNzZXRJZHMFAAAAB0Fzc2V0SW4AAAAAAAAAJxAFAAAACEFtb3VudEluCQAAAgAAAAECAAAAHHN1bSB0byBleGNoYW5nZSBpcyB0b28gc21hbGwDCQAAZgAAAAIAAAAAAAAAAAAJAABlAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAHZ2xvYmFsXwkAAlgAAAABBQAAAAhBc3NldE91dAIAAAAIX2JhbGFuY2UFAAAACUFtb3VudE91dAkAAAIAAAABAgAAABtjb250cmFjdCBpcyBvdXQgb2YgcmVzZXJ2ZXMEAAAACWZlZUFtb3VudAkAAGsAAAADBQAAAAlBbW91bnRPdXQFAAAAA0ZlZQUAAAAIRmVlU2NhbGUEAAAADmNsZWFuQW1vdW50T3V0CQAAZQAAAAIFAAAACUFtb3VudE91dAUAAAAJZmVlQW1vdW50CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAADWZlZUFnZ3JlZ2F0b3IFAAAACWZlZUFtb3VudAUAAAAIQXNzZXRPdXQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfCQACWAAAAAEFAAAACEFzc2V0T3V0AgAAAAhfYmFsYW5jZQkAAGUAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfCQACWAAAAAEFAAAACEFzc2V0T3V0AgAAAAhfYmFsYW5jZQUAAAAOY2xlYW5BbW91bnRPdXQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAdnbG9iYWxfCQACWAAAAAEFAAAAB0Fzc2V0SW4CAAAACF9iYWxhbmNlCQAAZAAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAAB2dsb2JhbF8JAAJYAAAAAQUAAAAHQXNzZXRJbgIAAAAIX2JhbGFuY2UFAAAACEFtb3VudEluCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAOY2xlYW5BbW91bnRPdXQFAAAACEFzc2V0T3V0BQAAAANuaWwAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAACQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAAAnR4AAAAD3NlbmRlclB1YmxpY0tleQqjs3U=",
    "height": 1795112,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: none
Next: 5DkpPCV6qPAFnUTAg1i6EhggHoHmKWSkpb8SJivMShrz

Full: 
Old New Differences
1 - # no script
1 + {-# STDLIB_VERSION 5 #-}
2 + {-# SCRIPT_TYPE ACCOUNT #-}
3 + {-# CONTENT_TYPE DAPP #-}
4 + let T = 2
5 + 
6 + let assetIds = [base58'Zn3cLHW7aAVPm5aACcTjvg7e7iEy2cKDtbowok5qa9H', base58'J9VzWPfRSQyCbEv5oWpxLSihigbpbJsGBHJZV9Ct8ook']
7 + 
8 + let AssetsWeights = [80, 20]
9 + 
10 + let AssetsWeightsDecimals = 2
11 + 
12 + let PoolTokenDecimals = 8
13 + 
14 + let Decimals = [8, 6]
15 + 
16 + let Scales = [100000000, 1000000]
17 + 
18 + let Fee = 200
19 + 
20 + let Scale = 10000
21 + 
22 + let FeeScale = 10000
23 + 
24 + let feeAggregator = Address(base58'3PDaWPwa1Ap8rhxbCNYvfs2b174rHgwEN8T')
25 + 
26 + func tryGetInteger (key) = match getInteger(this, key) {
27 +     case b: Int => 
28 +         b
29 +     case _ => 
30 +         0
31 + }
32 + 
33 + 
34 + func tryGetBinary (key) = match getBinary(this, key) {
35 +     case b: ByteVector => 
36 +         b
37 +     case _ => 
38 +         base58''
39 + }
40 + 
41 + 
42 + func getCurrentTokenBalance (tokenType) = {
43 +     let tokenId = toBase58String(assetIds[tokenType])
44 +     tryGetInteger((("global_" + tokenId) + "_balance"))
45 +     }
46 + 
47 + 
48 + func calculatePIssued (amount,tokenId) = {
49 +     let Psupply = tryGetInteger("global_poolToken_amount")
50 +     let Balance = tryGetInteger((("global_" + toBase58String(tokenId)) + "_balance"))
51 +     fraction(amount, Psupply, Balance, DOWN)
52 +     }
53 + 
54 + 
55 + func getMinPIssued (payments) = {
56 +     func handler (accum,current) =     {
57 +         let PIssued = calculatePIssued(current.amount, value(current.assetId))
58 +         if (if ((accum == 0))
59 +             then true
60 +             else (accum > PIssued))
61 +             then PIssued
62 +             else accum
63 +         }
64 + 
65 +     let minPIssed = {
66 +         let $l = payments
67 +         let $s = size($l)
68 +         let $acc0 = 0
69 +         func 1 ($a,$i) =         if (($i >= $s))
70 +             then $a
71 +             else handler($a, $l[$i])
72 + 
73 +         func 2 ($a,$i) =         if (($i >= $s))
74 +             then $a
75 +             else throw("List size exceeds 10")
76 + 
77 +         2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
78 +         }
79 +     minPIssed
80 +     }
81 + 
82 + 
83 + func checkTokensValidity (payments) = {
84 +     func handler1 (accum,payment) =     (accum ++ [value(payment.assetId)])
85 + 
86 +     let ids = {
87 +         let $l = payments
88 +         let $s = size($l)
89 +         let $acc0 = nil
90 +         func 1 ($a,$i) =         if (($i >= $s))
91 +             then $a
92 +             else handler1($a, $l[$i])
93 + 
94 +         func 2 ($a,$i) =         if (($i >= $s))
95 +             then $a
96 +             else throw("List size exceeds 10")
97 + 
98 +         2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
99 +         }
100 +     func handler2 (accum,assetId) =     if ((indexOf(ids, assetId) != unit))
101 +         then (accum + 1)
102 +         else throw(("asset not attached: " + toBase58String(assetId)))
103 + 
104 +     let checks = {
105 +         let $l = assetIds
106 +         let $s = size($l)
107 +         let $acc0 = 0
108 +         func 1 ($a,$i) =         if (($i >= $s))
109 +             then $a
110 +             else handler2($a, $l[$i])
111 + 
112 +         func 2 ($a,$i) =         if (($i >= $s))
113 +             then $a
114 +             else throw("List size exceeds 10")
115 + 
116 +         2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
117 +         }
118 +     true
119 +     }
120 + 
121 + 
122 + func handlePoolTokensAdd (PIssued,payments,userAddress) = {
123 +     func getTokenPaymentAmount (tokenId) =     {
124 +         func handler (accum,payment) =         if ((payment.assetId == tokenId))
125 +             then payment.amount
126 +             else accum
127 + 
128 +         let $l = payments
129 +         let $s = size($l)
130 +         let $acc0 = 0
131 +         func 1 ($a,$i) =         if (($i >= $s))
132 +             then $a
133 +             else handler($a, $l[$i])
134 + 
135 +         func 2 ($a,$i) =         if (($i >= $s))
136 +             then $a
137 +             else throw("List size exceeds 10")
138 + 
139 +         2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
140 +         }
141 + 
142 +     func handleTokenChange (accum,tokenId) =     {
143 +         let Bk = tryGetInteger((("global_" + toBase58String(tokenId)) + "_balance"))
144 +         let PSupply = tryGetInteger("global_poolToken_amount")
145 +         let tokenDecimals = tryGetInteger((("static_" + toBase58String(tokenId)) + "_scale"))
146 +         let Dk = fraction((fraction((PSupply + PIssued), tokenDecimals, PSupply) - tokenDecimals), Bk, tokenDecimals)
147 +         (accum ++ [IntegerEntry((("global_" + toBase58String(tokenId)) + "_balance"), (Bk + Dk))])
148 +         }
149 + 
150 +     func handleTokenChange2 (accum,tokenId) =     {
151 +         let Bk = tryGetInteger((("global_" + toBase58String(tokenId)) + "_balance"))
152 +         let PSupply = tryGetInteger("global_poolToken_amount")
153 +         let tokenDecimals = tryGetInteger((("static_" + toBase58String(tokenId)) + "_scale"))
154 +         let Dk = fraction((fraction((PSupply + PIssued), tokenDecimals, PSupply) - tokenDecimals), Bk, tokenDecimals)
155 +         let paymentAmount = getTokenPaymentAmount(tokenId)
156 +         let toReturn = ((if ((paymentAmount != 0))
157 +             then paymentAmount
158 +             else 0) - Dk)
159 +         (accum ++ [ScriptTransfer(userAddress, toReturn, tokenId)])
160 +         }
161 + 
162 +     ({
163 +         let $l = assetIds
164 +         let $s = size($l)
165 +         let $acc0 = nil
166 +         func 1 ($a,$i) =         if (($i >= $s))
167 +             then $a
168 +             else handleTokenChange($a, $l[$i])
169 + 
170 +         func 2 ($a,$i) =         if (($i >= $s))
171 +             then $a
172 +             else throw("List size exceeds 10")
173 + 
174 +         2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
175 +         } ++ {
176 +         let $l = assetIds
177 +         let $s = size($l)
178 +         let $acc0 = nil
179 +         func 1 ($a,$i) =         if (($i >= $s))
180 +             then $a
181 +             else handleTokenChange2($a, $l[$i])
182 + 
183 +         func 2 ($a,$i) =         if (($i >= $s))
184 +             then $a
185 +             else throw("List size exceeds 10")
186 + 
187 +         2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
188 +         })
189 +     }
190 + 
191 + 
192 + func handlePoolTokensRedeem (PRedeemed,userAddress) = {
193 +     func handleTokenRedeem (accum,tokenId) =     {
194 +         let Bk = tryGetInteger((("global_" + toBase58String(tokenId)) + "_balance"))
195 +         let PSupply = tryGetInteger("global_poolToken_amount")
196 +         let tokenDecimals = tryGetInteger((("static_" + toBase58String(tokenId)) + "_scale"))
197 +         let amount = fraction((tokenDecimals - fraction((PSupply - PRedeemed), tokenDecimals, PSupply)), Bk, tokenDecimals)
198 +         (accum ++ [IntegerEntry((("global_" + toBase58String(tokenId)) + "_balance"), (Bk - amount))])
199 +         }
200 + 
201 +     func handleTokenRedeem2 (accum,tokenId) =     {
202 +         let Bk = tryGetInteger((("global_" + toBase58String(tokenId)) + "_balance"))
203 +         let PSupply = tryGetInteger("global_poolToken_amount")
204 +         let tokenDecimals = tryGetInteger((("static_" + toBase58String(tokenId)) + "_scale"))
205 +         let amount = fraction((tokenDecimals - fraction((PSupply - PRedeemed), tokenDecimals, PSupply)), Bk, tokenDecimals)
206 +         (accum ++ [ScriptTransfer(userAddress, amount, tokenId)])
207 +         }
208 + 
209 +     ({
210 +         let $l = assetIds
211 +         let $s = size($l)
212 +         let $acc0 = nil
213 +         func 1 ($a,$i) =         if (($i >= $s))
214 +             then $a
215 +             else handleTokenRedeem($a, $l[$i])
216 + 
217 +         func 2 ($a,$i) =         if (($i >= $s))
218 +             then $a
219 +             else throw("List size exceeds 10")
220 + 
221 +         2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
222 +         } ++ {
223 +         let $l = assetIds
224 +         let $s = size($l)
225 +         let $acc0 = nil
226 +         func 1 ($a,$i) =         if (($i >= $s))
227 +             then $a
228 +             else handleTokenRedeem2($a, $l[$i])
229 + 
230 +         func 2 ($a,$i) =         if (($i >= $s))
231 +             then $a
232 +             else throw("List size exceeds 10")
233 + 
234 +         2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
235 +         })
236 +     }
237 + 
238 + 
239 + func calculateOutAmount (AmountIn,assetIn,assetOut) = {
240 +     let IndexIn = value(indexOf(assetIds, assetIn))
241 +     let IndexOut = value(indexOf(assetIds, assetOut))
242 +     if ((IndexIn == IndexOut))
243 +         then throw("inalid tokens pair")
244 +         else {
245 +             let BalanceIn = tryGetInteger((("global_" + toBase58String(assetIn)) + "_balance"))
246 +             let BalanceOut = tryGetInteger((("global_" + toBase58String(assetOut)) + "_balance"))
247 +             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)
248 +             }
249 +     }
250 + 
251 + 
252 + @Callable(i)
253 + func preInit () = [IntegerEntry((("static_" + toBase58String(assetIds[0])) + "_scale"), Scales[0]), IntegerEntry((("static_" + toBase58String(assetIds[1])) + "_scale"), Scales[1])]
254 + 
255 + 
256 + 
257 + @Callable(i)
258 + func init () = {
259 +     func prepareList () =     {
260 +         func handler (accum,n) =         (accum ++ [IntegerEntry((("global_" + toBase58String(value(n.assetId))) + "_balance"), n.amount)])
261 + 
262 +         let $l = i.payments
263 +         let $s = size($l)
264 +         let $acc0 = nil
265 +         func 1 ($a,$i) =         if (($i >= $s))
266 +             then $a
267 +             else handler($a, $l[$i])
268 + 
269 +         func 2 ($a,$i) =         if (($i >= $s))
270 +             then $a
271 +             else throw("List size exceeds 10")
272 + 
273 +         2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
274 +         }
275 + 
276 +     func calculatePoolTokensAmount (payments) =     {
277 +         func handler (accum,pmt) =         {
278 +             let assetId = value(pmt.assetId)
279 +             func handler2 (accum,n) =             if ((n == assetId))
280 +                 then value(indexOf(assetIds, n))
281 +                 else accum
282 + 
283 +             let Token = {
284 +                 let $l = assetIds
285 +                 let $s = size($l)
286 +                 let $acc0 = 1
287 +                 func 1 ($a,$i) =                 if (($i >= $s))
288 +                     then $a
289 +                     else handler2($a, $l[$i])
290 + 
291 +                 func 2 ($a,$i) =                 if (($i >= $s))
292 +                     then $a
293 +                     else throw("List size exceeds 10")
294 + 
295 +                 2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
296 +                 }
297 +             (accum * pow(pmt.amount, Decimals[Token], AssetsWeights[Token], AssetsWeightsDecimals, PoolTokenDecimals, FLOOR))
298 +             }
299 + 
300 +         let $l = payments
301 +         let $s = size($l)
302 +         let $acc0 = 1
303 +         func 1 ($a,$i) =         if (($i >= $s))
304 +             then $a
305 +             else handler($a, $l[$i])
306 + 
307 +         func 2 ($a,$i) =         if (($i >= $s))
308 +             then $a
309 +             else throw("List size exceeds 10")
310 + 
311 +         2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
312 +         }
313 + 
314 +     if ((tryGetInteger("global_wasInited") > 0))
315 +         then throw("pool already inited")
316 +         else {
317 +             let initialPoolTokens = calculatePoolTokensAmount(i.payments)
318 +             let poolTokenIssue = Issue("Puzzle2", "Puzzle Swap Pool Token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
319 +             let poolTokenId = calculateAssetId(poolTokenIssue)
320 +             (prepareList() ++ [poolTokenIssue, IntegerEntry("global_poolToken_amount", initialPoolTokens), IntegerEntry("global_wasInited", 1), BinaryEntry("global_poolToken_id", poolTokenId), ScriptTransfer(i.caller, initialPoolTokens, poolTokenId)])
321 +             }
322 +     }
323 + 
324 + 
325 + 
326 + @Callable(i)
327 + func addLiquidity () = throw("LP is closed yet")
328 + 
329 + 
330 + 
331 + @Callable(i)
332 + func removeLiquidity () = throw("LP is closed yet")
333 + 
334 + 
335 + 
336 + @Callable(i)
337 + func swap (assetOut,minimum) = {
338 +     let pmt = value(i.payments[0])
339 +     let AmountIn = value(i.payments[0].amount)
340 +     let AssetIn = value(pmt.assetId)
341 +     let AssetOut = fromBase58String(assetOut)
342 +     let AmountOut = calculateOutAmount(AmountIn, AssetIn, AssetOut)
343 +     if ((minimum > AmountOut))
344 +         then throw(("amount to recieve it lower than given one: " + toString(AmountOut)))
345 +         else if (((Scales[value(indexOf(assetIds, AssetIn))] / 10000) > AmountIn))
346 +             then throw("sum to exchange is too small")
347 +             else if ((0 > (tryGetInteger((("global_" + toBase58String(AssetOut)) + "_balance")) - AmountOut)))
348 +                 then throw("contract is out of reserves")
349 +                 else {
350 +                     let feeAmount = fraction(AmountOut, Fee, FeeScale)
351 +                     let cleanAmountOut = (AmountOut - feeAmount)
352 + [ScriptTransfer(feeAggregator, feeAmount, AssetOut), IntegerEntry((("global_" + toBase58String(AssetOut)) + "_balance"), (tryGetInteger((("global_" + toBase58String(AssetOut)) + "_balance")) - cleanAmountOut)), IntegerEntry((("global_" + toBase58String(AssetIn)) + "_balance"), (tryGetInteger((("global_" + toBase58String(AssetIn)) + "_balance")) + AmountIn)), ScriptTransfer(i.caller, cleanAmountOut, AssetOut)]
353 +                     }
354 +     }
355 + 
356 + 
357 + @Verifier(tx)
358 + func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
359 +

Old	New		Differences
1		-	# no script
	1	+	{-# STDLIB_VERSION 5 #-}
	2	+	{-# SCRIPT_TYPE ACCOUNT #-}
	3	+	{-# CONTENT_TYPE DAPP #-}
	4	+	let T = 2
	5	+
	6	+	let assetIds = [base58'Zn3cLHW7aAVPm5aACcTjvg7e7iEy2cKDtbowok5qa9H', base58'J9VzWPfRSQyCbEv5oWpxLSihigbpbJsGBHJZV9Ct8ook']
	7	+
	8	+	let AssetsWeights = [80, 20]
	9	+
	10	+	let AssetsWeightsDecimals = 2
	11	+
	12	+	let PoolTokenDecimals = 8
	13	+
	14	+	let Decimals = [8, 6]
	15	+
	16	+	let Scales = [100000000, 1000000]
	17	+
	18	+	let Fee = 200
	19	+
	20	+	let Scale = 10000
	21	+
	22	+	let FeeScale = 10000
	23	+
	24	+	let feeAggregator = Address(base58'3PDaWPwa1Ap8rhxbCNYvfs2b174rHgwEN8T')
	25	+
	26	+	func tryGetInteger (key) = match getInteger(this, key) {
	27	+	case b: Int =>
	28	+	b
	29	+	case _ =>
	30	+	0
	31	+	}
	32	+
	33	+
	34	+	func tryGetBinary (key) = match getBinary(this, key) {
	35	+	case b: ByteVector =>
	36	+	b
	37	+	case _ =>
	38	+	base58''
	39	+	}
	40	+
	41	+
	42	+	func getCurrentTokenBalance (tokenType) = {
	43	+	let tokenId = toBase58String(assetIds[tokenType])
	44	+	tryGetInteger((("global_" + tokenId) + "_balance"))
	45	+	}
	46	+
	47	+
	48	+	func calculatePIssued (amount,tokenId) = {
	49	+	let Psupply = tryGetInteger("global_poolToken_amount")
	50	+	let Balance = tryGetInteger((("global_" + toBase58String(tokenId)) + "_balance"))
	51	+	fraction(amount, Psupply, Balance, DOWN)
	52	+	}
	53	+
	54	+
	55	+	func getMinPIssued (payments) = {
	56	+	func handler (accum,current) = {
	57	+	let PIssued = calculatePIssued(current.amount, value(current.assetId))
	58	+	if (if ((accum == 0))
	59	+	then true
	60	+	else (accum > PIssued))
	61	+	then PIssued
	62	+	else accum
	63	+	}
	64	+
	65	+	let minPIssed = {
	66	+	let $l = payments
	67	+	let $s = size($l)
	68	+	let $acc0 = 0
	69	+	func 1 ($a,$i) = if (($i >= $s))
	70	+	then $a
	71	+	else handler($a, $l[$i])
	72	+
	73	+	func 2 ($a,$i) = if (($i >= $s))
	74	+	then $a
	75	+	else throw("List size exceeds 10")
	76	+
	77	+	2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
	78	+	}
	79	+	minPIssed
	80	+	}
	81	+
	82	+
	83	+	func checkTokensValidity (payments) = {
	84	+	func handler1 (accum,payment) = (accum ++ [value(payment.assetId)])
	85	+
	86	+	let ids = {
	87	+	let $l = payments
	88	+	let $s = size($l)
	89	+	let $acc0 = nil
	90	+	func 1 ($a,$i) = if (($i >= $s))
	91	+	then $a
	92	+	else handler1($a, $l[$i])
	93	+
	94	+	func 2 ($a,$i) = if (($i >= $s))
	95	+	then $a
	96	+	else throw("List size exceeds 10")
	97	+
	98	+	2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
	99	+	}
	100	+	func handler2 (accum,assetId) = if ((indexOf(ids, assetId) != unit))
	101	+	then (accum + 1)
	102	+	else throw(("asset not attached: " + toBase58String(assetId)))
	103	+
	104	+	let checks = {
	105	+	let $l = assetIds
	106	+	let $s = size($l)
	107	+	let $acc0 = 0
	108	+	func 1 ($a,$i) = if (($i >= $s))
	109	+	then $a
	110	+	else handler2($a, $l[$i])
	111	+
	112	+	func 2 ($a,$i) = if (($i >= $s))
	113	+	then $a
	114	+	else throw("List size exceeds 10")
	115	+
	116	+	2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
	117	+	}
	118	+	true
	119	+	}
	120	+
	121	+
	122	+	func handlePoolTokensAdd (PIssued,payments,userAddress) = {
	123	+	func getTokenPaymentAmount (tokenId) = {
	124	+	func handler (accum,payment) = if ((payment.assetId == tokenId))
	125	+	then payment.amount
	126	+	else accum
	127	+
	128	+	let $l = payments
	129	+	let $s = size($l)
	130	+	let $acc0 = 0
	131	+	func 1 ($a,$i) = if (($i >= $s))
	132	+	then $a
	133	+	else handler($a, $l[$i])
	134	+
	135	+	func 2 ($a,$i) = if (($i >= $s))
	136	+	then $a
	137	+	else throw("List size exceeds 10")
	138	+
	139	+	2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
	140	+	}
	141	+
	142	+	func handleTokenChange (accum,tokenId) = {
	143	+	let Bk = tryGetInteger((("global_" + toBase58String(tokenId)) + "_balance"))
	144	+	let PSupply = tryGetInteger("global_poolToken_amount")
	145	+	let tokenDecimals = tryGetInteger((("static_" + toBase58String(tokenId)) + "_scale"))
	146	+	let Dk = fraction((fraction((PSupply + PIssued), tokenDecimals, PSupply) - tokenDecimals), Bk, tokenDecimals)
	147	+	(accum ++ [IntegerEntry((("global_" + toBase58String(tokenId)) + "_balance"), (Bk + Dk))])
	148	+	}
	149	+
	150	+	func handleTokenChange2 (accum,tokenId) = {
	151	+	let Bk = tryGetInteger((("global_" + toBase58String(tokenId)) + "_balance"))
	152	+	let PSupply = tryGetInteger("global_poolToken_amount")
	153	+	let tokenDecimals = tryGetInteger((("static_" + toBase58String(tokenId)) + "_scale"))
	154	+	let Dk = fraction((fraction((PSupply + PIssued), tokenDecimals, PSupply) - tokenDecimals), Bk, tokenDecimals)
	155	+	let paymentAmount = getTokenPaymentAmount(tokenId)
	156	+	let toReturn = ((if ((paymentAmount != 0))
	157	+	then paymentAmount
	158	+	else 0) - Dk)
	159	+	(accum ++ [ScriptTransfer(userAddress, toReturn, tokenId)])
	160	+	}
	161	+
	162	+	({
	163	+	let $l = assetIds
	164	+	let $s = size($l)
	165	+	let $acc0 = nil
	166	+	func 1 ($a,$i) = if (($i >= $s))
	167	+	then $a
	168	+	else handleTokenChange($a, $l[$i])
	169	+
	170	+	func 2 ($a,$i) = if (($i >= $s))
	171	+	then $a
	172	+	else throw("List size exceeds 10")
	173	+
	174	+	2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
	175	+	} ++ {
	176	+	let $l = assetIds
	177	+	let $s = size($l)
	178	+	let $acc0 = nil
	179	+	func 1 ($a,$i) = if (($i >= $s))
	180	+	then $a
	181	+	else handleTokenChange2($a, $l[$i])
	182	+
	183	+	func 2 ($a,$i) = if (($i >= $s))
	184	+	then $a
	185	+	else throw("List size exceeds 10")
	186	+
	187	+	2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
	188	+	})
	189	+	}
	190	+
	191	+
	192	+	func handlePoolTokensRedeem (PRedeemed,userAddress) = {
	193	+	func handleTokenRedeem (accum,tokenId) = {
	194	+	let Bk = tryGetInteger((("global_" + toBase58String(tokenId)) + "_balance"))
	195	+	let PSupply = tryGetInteger("global_poolToken_amount")
	196	+	let tokenDecimals = tryGetInteger((("static_" + toBase58String(tokenId)) + "_scale"))
	197	+	let amount = fraction((tokenDecimals - fraction((PSupply - PRedeemed), tokenDecimals, PSupply)), Bk, tokenDecimals)
	198	+	(accum ++ [IntegerEntry((("global_" + toBase58String(tokenId)) + "_balance"), (Bk - amount))])
	199	+	}
	200	+
	201	+	func handleTokenRedeem2 (accum,tokenId) = {
	202	+	let Bk = tryGetInteger((("global_" + toBase58String(tokenId)) + "_balance"))
	203	+	let PSupply = tryGetInteger("global_poolToken_amount")
	204	+	let tokenDecimals = tryGetInteger((("static_" + toBase58String(tokenId)) + "_scale"))
	205	+	let amount = fraction((tokenDecimals - fraction((PSupply - PRedeemed), tokenDecimals, PSupply)), Bk, tokenDecimals)
	206	+	(accum ++ [ScriptTransfer(userAddress, amount, tokenId)])
	207	+	}
	208	+
	209	+	({
	210	+	let $l = assetIds
	211	+	let $s = size($l)
	212	+	let $acc0 = nil
	213	+	func 1 ($a,$i) = if (($i >= $s))
	214	+	then $a
	215	+	else handleTokenRedeem($a, $l[$i])
	216	+
	217	+	func 2 ($a,$i) = if (($i >= $s))
	218	+	then $a
	219	+	else throw("List size exceeds 10")
	220	+
	221	+	2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
	222	+	} ++ {
	223	+	let $l = assetIds
	224	+	let $s = size($l)
	225	+	let $acc0 = nil
	226	+	func 1 ($a,$i) = if (($i >= $s))
	227	+	then $a
	228	+	else handleTokenRedeem2($a, $l[$i])
	229	+
	230	+	func 2 ($a,$i) = if (($i >= $s))
	231	+	then $a
	232	+	else throw("List size exceeds 10")
	233	+
	234	+	2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
	235	+	})
	236	+	}
	237	+
	238	+
	239	+	func calculateOutAmount (AmountIn,assetIn,assetOut) = {
	240	+	let IndexIn = value(indexOf(assetIds, assetIn))
	241	+	let IndexOut = value(indexOf(assetIds, assetOut))
	242	+	if ((IndexIn == IndexOut))
	243	+	then throw("inalid tokens pair")
	244	+	else {
	245	+	let BalanceIn = tryGetInteger((("global_" + toBase58String(assetIn)) + "_balance"))
	246	+	let BalanceOut = tryGetInteger((("global_" + toBase58String(assetOut)) + "_balance"))
	247	+	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)
	248	+	}
	249	+	}
	250	+
	251	+
	252	+	@Callable(i)
	253	+	func preInit () = [IntegerEntry((("static_" + toBase58String(assetIds[0])) + "_scale"), Scales[0]), IntegerEntry((("static_" + toBase58String(assetIds[1])) + "_scale"), Scales[1])]
	254	+
	255	+
	256	+
	257	+	@Callable(i)
	258	+	func init () = {
	259	+	func prepareList () = {
	260	+	func handler (accum,n) = (accum ++ [IntegerEntry((("global_" + toBase58String(value(n.assetId))) + "_balance"), n.amount)])
	261	+
	262	+	let $l = i.payments
	263	+	let $s = size($l)
	264	+	let $acc0 = nil
	265	+	func 1 ($a,$i) = if (($i >= $s))
	266	+	then $a
	267	+	else handler($a, $l[$i])
	268	+
	269	+	func 2 ($a,$i) = if (($i >= $s))
	270	+	then $a
	271	+	else throw("List size exceeds 10")
	272	+
	273	+	2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
	274	+	}
	275	+
	276	+	func calculatePoolTokensAmount (payments) = {
	277	+	func handler (accum,pmt) = {
	278	+	let assetId = value(pmt.assetId)
	279	+	func handler2 (accum,n) = if ((n == assetId))
	280	+	then value(indexOf(assetIds, n))
	281	+	else accum
	282	+
	283	+	let Token = {
	284	+	let $l = assetIds
	285	+	let $s = size($l)
	286	+	let $acc0 = 1
	287	+	func 1 ($a,$i) = if (($i >= $s))
	288	+	then $a
	289	+	else handler2($a, $l[$i])
	290	+
	291	+	func 2 ($a,$i) = if (($i >= $s))
	292	+	then $a
	293	+	else throw("List size exceeds 10")
	294	+
	295	+	2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
	296	+	}
	297	+	(accum * pow(pmt.amount, Decimals[Token], AssetsWeights[Token], AssetsWeightsDecimals, PoolTokenDecimals, FLOOR))
	298	+	}
	299	+
	300	+	let $l = payments
	301	+	let $s = size($l)
	302	+	let $acc0 = 1
	303	+	func 1 ($a,$i) = if (($i >= $s))
	304	+	then $a
	305	+	else handler($a, $l[$i])
	306	+
	307	+	func 2 ($a,$i) = if (($i >= $s))
	308	+	then $a
	309	+	else throw("List size exceeds 10")
	310	+
	311	+	2(1(1(1(1(1(1(1(1(1(1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
	312	+	}
	313	+
	314	+	if ((tryGetInteger("global_wasInited") > 0))
	315	+	then throw("pool already inited")
	316	+	else {
	317	+	let initialPoolTokens = calculatePoolTokensAmount(i.payments)
	318	+	let poolTokenIssue = Issue("Puzzle2", "Puzzle Swap Pool Token", initialPoolTokens, PoolTokenDecimals, true, unit, 0)
	319	+	let poolTokenId = calculateAssetId(poolTokenIssue)
	320	+	(prepareList() ++ [poolTokenIssue, IntegerEntry("global_poolToken_amount", initialPoolTokens), IntegerEntry("global_wasInited", 1), BinaryEntry("global_poolToken_id", poolTokenId), ScriptTransfer(i.caller, initialPoolTokens, poolTokenId)])
	321	+	}
	322	+	}
	323	+
	324	+
	325	+
	326	+	@Callable(i)
	327	+	func addLiquidity () = throw("LP is closed yet")
	328	+
	329	+
	330	+
	331	+	@Callable(i)
	332	+	func removeLiquidity () = throw("LP is closed yet")
	333	+
	334	+
	335	+
	336	+	@Callable(i)
	337	+	func swap (assetOut,minimum) = {
	338	+	let pmt = value(i.payments[0])
	339	+	let AmountIn = value(i.payments[0].amount)
	340	+	let AssetIn = value(pmt.assetId)
	341	+	let AssetOut = fromBase58String(assetOut)
	342	+	let AmountOut = calculateOutAmount(AmountIn, AssetIn, AssetOut)
	343	+	if ((minimum > AmountOut))
	344	+	then throw(("amount to recieve it lower than given one: " + toString(AmountOut)))
	345	+	else if (((Scales[value(indexOf(assetIds, AssetIn))] / 10000) > AmountIn))
	346	+	then throw("sum to exchange is too small")
	347	+	else if ((0 > (tryGetInteger((("global_" + toBase58String(AssetOut)) + "_balance")) - AmountOut)))
	348	+	then throw("contract is out of reserves")
	349	+	else {
	350	+	let feeAmount = fraction(AmountOut, Fee, FeeScale)
	351	+	let cleanAmountOut = (AmountOut - feeAmount)
	352	+	[ScriptTransfer(feeAggregator, feeAmount, AssetOut), IntegerEntry((("global_" + toBase58String(AssetOut)) + "_balance"), (tryGetInteger((("global_" + toBase58String(AssetOut)) + "_balance")) - cleanAmountOut)), IntegerEntry((("global_" + toBase58String(AssetIn)) + "_balance"), (tryGetInteger((("global_" + toBase58String(AssetIn)) + "_balance")) + AmountIn)), ScriptTransfer(i.caller, cleanAmountOut, AssetOut)]
	353	+	}
	354	+	}
	355	+
	356	+
	357	+	@Verifier(tx)
	358	+	func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
	359	+

github/deemru/w8io/169f3d6 
37.72 ms ◑