2022.03.25 15:23 [3044622] smart account 3P5UKXpQbom7GB2WGdPG5yGQPeQQuM3hFmw > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Br13GfdXoTV3PEU4TidSB6CqinwYFiAgpjAZxyeRCJwh",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1648211038382,
    "version": 1,
    "sender": "3P5UKXpQbom7GB2WGdPG5yGQPeQQuM3hFmw",
    "senderPublicKey": "4MfTwwE7yP4BFGaifQrcc9Nwb5BA9t92WKhVb6Ton65k",
    "proofs": [
        "U6Pb71dMcWxWiLnd7SmZTZEvcNLZLywHx1QBktwMQFSiYKmG3sogcze88Hs49b6pYgjCNFZytpqecSL88GCDmPm"
    ],
    "script": "base64:AAIFAAAAAAAAABkIAhIHCgUYGBEBARIHCgUYGBEBARIDCgEYAAAADQEAAAAQZ2V0U3RyaW5nT3JUaHJvdwAAAAIAAAAHYWRkcmVzcwAAAANrZXkJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABB0AAAACBQAAAAdhZGRyZXNzBQAAAANrZXkJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAADENhbid0IHJlYWQgJwUAAAADa2V5AgAAAA0nIGF0IGFkZHJlc3MgCQAEJQAAAAEFAAAAB2FkZHJlc3MBAAAAE3BhcnNlQWRkcmVzc09yVGhyb3cAAAABAAAADG1heWJlQWRkcmVzcwkBAAAAE3ZhbHVlT3JFcnJvck1lc3NhZ2UAAAACCQAEJgAAAAEFAAAADG1heWJlQWRkcmVzcwkAASwAAAACCQABLAAAAAICAAAAGkNhbid0IHBhcnNlIGFkZHJlc3MgZnJvbSAnBQAAAAxtYXliZUFkZHJlc3MCAAAAAScBAAAAD3BhcnNlSW50T3JUaHJvdwAAAAEAAAAIbWF5YmVJbnQJAQAAABN2YWx1ZU9yRXJyb3JNZXNzYWdlAAAAAgkABLYAAAABBQAAAAhtYXliZUludAkAASwAAAACCQABLAAAAAICAAAAGkNhbid0IHBhcnNlIGludGVnZXIgZnJvbSAnBQAAAAhtYXliZUludAIAAAABJwAAAAAJY29sbGVjdG9yCQEAAAATcGFyc2VBZGRyZXNzT3JUaHJvdwAAAAEJAQAAABBnZXRTdHJpbmdPclRocm93AAAAAgUAAAAEdGhpcwIAAAAJY29sbGVjdG9yAAAAAAZvcmFjbGUJAQAAABNwYXJzZUFkZHJlc3NPclRocm93AAAAAQkBAAAAEGdldFN0cmluZ09yVGhyb3cAAAACBQAAAAR0aGlzAgAAAAZvcmFjbGUAAAAABXBvb2xzCQAEtQAAAAIJAQAAABBnZXRTdHJpbmdPclRocm93AAAAAgUAAAAGb3JhY2xlAgAAAAVwb29scwIAAAABLAAAAAAGcFBvb2xzCQAEtQAAAAIJAQAAABBnZXRTdHJpbmdPclRocm93AAAAAgUAAAAEdGhpcwIAAAAHcC1wb29scwIAAAABLAEAAAAKZ2V0QXNzZXRJZAAAAAEAAAAFYXNzZXQDCQAAAAAAAAIFAAAABWFzc2V0AgAAAAVXQVZFUwUAAAAEdW5pdAkAAlkAAAABBQAAAAVhc3NldAEAAAAPYXNzZXRJZFRvU3RyaW5nAAAAAQAAAAdhc3NldElkBAAAAAckbWF0Y2gwBQAAAAdhc3NldElkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAApCeXRlVmVjdG9yBAAAAAVhc3NldAUAAAAHJG1hdGNoMAkAAlgAAAABBQAAAAVhc3NldAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAEVW5pdAQAAAAFd2F2ZXMFAAAAByRtYXRjaDACAAAABVdBVkVTCQAAAgAAAAECAAAAC01hdGNoIGVycm9yAQAAAApnZXRCYWxhbmNlAAAAAQAAAAdhc3NldElkBAAAAAckbWF0Y2gwBQAAAAdhc3NldElkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAApCeXRlVmVjdG9yBAAAAAVhc3NldAUAAAAHJG1hdGNoMAkAA/AAAAACBQAAAAR0aGlzBQAAAAVhc3NldAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAEVW5pdAQAAAAFd2F2ZXMFAAAAByRtYXRjaDAICQAD7wAAAAEFAAAABHRoaXMAAAAJYXZhaWxhYmxlCQAAAgAAAAECAAAAC01hdGNoIGVycm9yAQAAAAlkZWR1Y3RGZWUAAAABAAAABmFtb3VudAQAAAADZmVlCQAAawAAAAMFAAAABmFtb3VudAAAAAAAAAAAAQAAAAAAAAAD6AkABRQAAAACCQAAZQAAAAIFAAAABmFtb3VudAUAAAADZmVlBQAAAANmZWUBAAAABmRvU3dhcAAAAAUAAAAEcG9vbAAAAAdwYXltZW50AAAADWFzc2V0UmVjZWl2ZWQAAAASZXN0QW1vdW50VG9SZWNlaXZlAAAAEXNsaXBwYWdlVG9sZXJhbmNlBAAAAAtwb29sQWRkcmVzcwkBAAAAE3BhcnNlQWRkcmVzc09yVGhyb3cAAAABBQAAAARwb29sBAAAAAx2ZXJzaW9uTWFqb3IJAQAAAA9wYXJzZUludE9yVGhyb3cAAAABCQABkQAAAAIJAAS1AAAAAgkBAAAAEGdldFN0cmluZ09yVGhyb3cAAAACBQAAAAtwb29sQWRkcmVzcwIAAAAHdmVyc2lvbgIAAAABLgAAAAAAAAAAAAQAAAAPYXNzZXRSZWNlaXZlZElkCQEAAAAKZ2V0QXNzZXRJZAAAAAEFAAAADWFzc2V0UmVjZWl2ZWQDCQAAZgAAAAIAAAAAAAAAAAAFAAAAEmVzdEFtb3VudFRvUmVjZWl2ZQkAAAIAAAABAgAAACNlc3RBbW91bnRUb1JlY2VpdmUgbXVzdCBiZSBwb3NpdGl2ZQMJAQAAAA9jb250YWluc0VsZW1lbnQAAAACBQAAAAVwb29scwUAAAAEcG9vbAQAAAAKcG9vbEFzc2V0QQkBAAAAEGdldFN0cmluZ09yVGhyb3cAAAACBQAAAAtwb29sQWRkcmVzcwIAAAAKQV9hc3NldF9pZAQAAAAKcG9vbEFzc2V0QgkBAAAAEGdldFN0cmluZ09yVGhyb3cAAAACBQAAAAtwb29sQWRkcmVzcwIAAAAKQl9hc3NldF9pZAQAAAAMcG9vbEFzc2V0SWRBCQEAAAAKZ2V0QXNzZXRJZAAAAAEFAAAACnBvb2xBc3NldEEEAAAADHBvb2xBc3NldElkQgkBAAAACmdldEFzc2V0SWQAAAABBQAAAApwb29sQXNzZXRCBAAAAAskdDAyMDMzMjM3NwMDCQAAAAAAAAIIBQAAAAdwYXltZW50AAAAB2Fzc2V0SWQFAAAADHBvb2xBc3NldElkQQkAAAAAAAACBQAAAA9hc3NldFJlY2VpdmVkSWQFAAAADHBvb2xBc3NldElkQgcJAAUUAAAAAgUAAAAMcG9vbEFzc2V0SWRBBQAAAAxwb29sQXNzZXRJZEIDAwkAAAAAAAACBQAAAA9hc3NldFJlY2VpdmVkSWQFAAAADHBvb2xBc3NldElkQQkAAAAAAAACCAUAAAAHcGF5bWVudAAAAAdhc3NldElkBQAAAAxwb29sQXNzZXRJZEIHCQAFFAAAAAIFAAAADHBvb2xBc3NldElkQgUAAAAMcG9vbEFzc2V0SWRBCQAAAgAAAAECAAAAF1Vuc3VwcG9ydGVkIGFzc2V0cyBwYWlyBAAAAAdhc3NldEluCAUAAAALJHQwMjAzMzIzNzcAAAACXzEEAAAACGFzc2V0T3V0CAUAAAALJHQwMjAzMzIzNzcAAAACXzIEAAAABGFyZ3MDCQAAAAAAAAIFAAAADHZlcnNpb25NYWpvcgAAAAAAAAAAAQkABEwAAAACAAAAAAAAAAABBQAAAANuaWwDCQAAAAAAAAIFAAAADHZlcnNpb25NYWpvcgAAAAAAAAAAAgMJAABnAAAAAgAAAAAAAAAAAAUAAAASZXN0QW1vdW50VG9SZWNlaXZlCQAAAgAAAAECAAAAI2VzdEFtb3VudFRvUmVjZWl2ZSBtdXN0IGJlIHBvc2l0aXZlAwMJAABmAAAAAgAAAAAAAAAAAAUAAAARc2xpcHBhZ2VUb2xlcmFuY2UGCQAAZgAAAAIFAAAAEXNsaXBwYWdlVG9sZXJhbmNlAAAAAAAAAAPoCQAAAgAAAAECAAAARlNsaXBwYWdlIHRvbGVyYW5jZSBtdXN0IGJlIG5vbi1uZWdhdGl2ZSBhbmQgbGVzcyB0aGFuIG9yIGVxdWFsIHRvIDEwMDAEAAAACW1pbkFtb3VudAkAAGUAAAACBQAAABJlc3RBbW91bnRUb1JlY2VpdmUJAABrAAAAAwUAAAASZXN0QW1vdW50VG9SZWNlaXZlBQAAABFzbGlwcGFnZVRvbGVyYW5jZQAAAAAAAAAD6AkABEwAAAACBQAAABJlc3RBbW91bnRUb1JlY2VpdmUJAARMAAAAAgMJAABmAAAAAgUAAAAJbWluQW1vdW50AAAAAAAAAAAABQAAAAltaW5BbW91bnQAAAAAAAAAAAEFAAAAA25pbAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAWVW5rbm93biBwb29sIHZlcnNpb24gJwkAAaQAAAABBQAAAAx2ZXJzaW9uTWFqb3ICAAAAFicsIGJ1dCAxIG9yIDIgZXhwZWN0ZWQEAAAADWJhbGFuY2VCZWZvcmUJAQAAAApnZXRCYWxhbmNlAAAAAQUAAAAPYXNzZXRSZWNlaXZlZElkAwkAAAAAAAACBQAAAA1iYWxhbmNlQmVmb3JlBQAAAA1iYWxhbmNlQmVmb3JlBAAAAAZyZXN1bHQJAAP8AAAABAUAAAALcG9vbEFkZHJlc3MCAAAACGV4Y2hhbmdlBQAAAARhcmdzCQAETAAAAAIFAAAAB3BheW1lbnQFAAAAA25pbAMJAAAAAAAAAgUAAAAGcmVzdWx0BQAAAAZyZXN1bHQEAAAACHJlY2VpdmVkCQAAZQAAAAIJAQAAAApnZXRCYWxhbmNlAAAAAQUAAAAPYXNzZXRSZWNlaXZlZElkBQAAAA1iYWxhbmNlQmVmb3JlAwkAAAAAAAACBQAAAAhyZWNlaXZlZAUAAAAIcmVjZWl2ZWQDCQAAZwAAAAIAAAAAAAAAAAAFAAAACHJlY2VpdmVkCQAAAgAAAAECAAAAKlJlY2VpdmVkIGFtb3VudCBmcm9tIHBvb2wgbXVzdCBiZSBwb3NpdGl2ZQUAAAAIcmVjZWl2ZWQJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4DCQEAAAAPY29udGFpbnNFbGVtZW50AAAAAgUAAAAGcFBvb2xzBQAAAARwb29sBAAAAA1iYWxhbmNlQmVmb3JlCQEAAAAKZ2V0QmFsYW5jZQAAAAEFAAAAD2Fzc2V0UmVjZWl2ZWRJZAMJAAAAAAAAAgUAAAANYmFsYW5jZUJlZm9yZQUAAAANYmFsYW5jZUJlZm9yZQQAAAAGcmVzdWx0CQAD/AAAAAQFAAAAC3Bvb2xBZGRyZXNzAgAAAARzd2FwCQAETAAAAAIFAAAADWFzc2V0UmVjZWl2ZWQJAARMAAAAAgAAAAAAAAAAAAUAAAADbmlsCQAETAAAAAIFAAAAB3BheW1lbnQFAAAAA25pbAMJAAAAAAAAAgUAAAAGcmVzdWx0BQAAAAZyZXN1bHQEAAAACHJlY2VpdmVkCQAAZQAAAAIJAQAAAApnZXRCYWxhbmNlAAAAAQUAAAAPYXNzZXRSZWNlaXZlZElkBQAAAA1iYWxhbmNlQmVmb3JlAwkAAAAAAAACBQAAAAhyZWNlaXZlZAUAAAAIcmVjZWl2ZWQDCQAAZwAAAAIAAAAAAAAAAAAFAAAACHJlY2VpdmVkCQAAAgAAAAECAAAAKlJlY2VpdmVkIGFtb3VudCBmcm9tIHBvb2wgbXVzdCBiZSBwb3NpdGl2ZQUAAAAIcmVjZWl2ZWQJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAAHVRoZXJlIGlzIG5vIHBvb2wgYXQgYWRkcmVzcyAnBQAAAARwb29sAgAAAAEnAQAAAAdzd2FwU2VxAAAABgAAAANpbnYAAAAJYWRkcmVzc2VzAAAAD2Fzc2V0c1RvUmVjZWl2ZQAAAAtlc3RSZWNlaXZlZAAAABFzbGlwcGFnZVRvbGVyYW5jZQAAAAttaW5SZWNlaXZlZAQAAAADcG10AwkAAGYAAAACCQABkAAAAAEIBQAAAANpbnYAAAAIcGF5bWVudHMAAAAAAAAAAAAJAAGRAAAAAggFAAAAA2ludgAAAAhwYXltZW50cwAAAAAAAAAAAAkAAAIAAAABAgAAABBQYXltZW50IHJlcXVpcmVkBAAAAAphc3NldEZpbmFsCQABkQAAAAIFAAAAD2Fzc2V0c1RvUmVjZWl2ZQkAAGUAAAACCQABkAAAAAEFAAAAD2Fzc2V0c1RvUmVjZWl2ZQAAAAAAAAAAAQQAAAAMYXNzZXRGaW5hbElkCQEAAAAKZ2V0QXNzZXRJZAAAAAEFAAAACmFzc2V0RmluYWwEAAAAB2luZGljZXMJAARMAAAAAgAAAAAAAAAAAAkABEwAAAACAAAAAAAAAAABCQAETAAAAAIAAAAAAAAAAAIJAARMAAAAAgAAAAAAAAAAAwkABEwAAAACAAAAAAAAAAAECQAETAAAAAIAAAAAAAAAAAUJAARMAAAAAgAAAAAAAAAABgkABEwAAAACAAAAAAAAAAAHCQAETAAAAAIAAAAAAAAAAAgJAARMAAAAAgAAAAAAAAAACQUAAAADbmlsCgEAAAAIZm9sZFN3YXAAAAACAAAAEHByZXZpb3VzUmVjZWl2ZWQAAAAFaW5kZXgDCQAAZwAAAAIFAAAABWluZGV4CQABkAAAAAEFAAAACWFkZHJlc3NlcwUAAAAQcHJldmlvdXNSZWNlaXZlZAQAAAANYXNzZXRSZWNlaXZlZAkAAZEAAAACBQAAAA9hc3NldHNUb1JlY2VpdmUFAAAABWluZGV4BAAAAA9hc3NldFJlY2VpdmVkSWQJAQAAAApnZXRBc3NldElkAAAAAQUAAAANYXNzZXRSZWNlaXZlZAQAAAAHJG1hdGNoMAkBAAAABmRvU3dhcAAAAAUJAAGRAAAAAgUAAAAJYWRkcmVzc2VzBQAAAAVpbmRleAUAAAAQcHJldmlvdXNSZWNlaXZlZAUAAAANYXNzZXRSZWNlaXZlZAkAAZEAAAACBQAAAAtlc3RSZWNlaXZlZAUAAAAFaW5kZXgFAAAAEXNsaXBwYWdlVG9sZXJhbmNlAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAABmluY29tZQUAAAAHJG1hdGNoMAkBAAAAD0F0dGFjaGVkUGF5bWVudAAAAAIFAAAAD2Fzc2V0UmVjZWl2ZWRJZAUAAAAGaW5jb21lCQAAAgAAAAECAAAAGENhbid0IGhhbmRsZSBzd2FwIHJlc3VsdAQAAAAFZmluYWwDCQAAZgAAAAIJAAGQAAAAAQUAAAAJYWRkcmVzc2VzAAAAAAAAAAAACgAAAAACJGwFAAAAB2luZGljZXMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwBQAAAANwbXQKAQAAAAUkZjBfMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAhmb2xkU3dhcAAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAABSRmMF8yAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAABSRmMF8yAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoJAAACAAAAAQIAAAAUUGF0aCBjYW5ub3QgYmUgZW1wdHkEAAAACyR0MDUwMzI1MDg0CQEAAAAJZGVkdWN0RmVlAAAAAQgFAAAABWZpbmFsAAAABmFtb3VudAQAAAAOcmVzdWx0QWZ0ZXJGZWUIBQAAAAskdDA1MDMyNTA4NAAAAAJfMQQAAAADZmVlCAUAAAALJHQwNTAzMjUwODQAAAACXzIDCQAAZwAAAAIAAAAAAAAAAAAIBQAAAAVmaW5hbAAAAAZhbW91bnQJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAADFN3YXAgcmVzdWx0IAkAAaQAAAABCAUAAAAFZmluYWwAAAAGYW1vdW50AgAAABEgbXVzdCBiZSBwb3NpdGl2ZQMJAABmAAAAAgUAAAALbWluUmVjZWl2ZWQFAAAADnJlc3VsdEFmdGVyRmVlCQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAADFN3YXAgcmVzdWx0IAkAAaQAAAABBQAAAA5yZXN1bHRBZnRlckZlZQIAAAAXIGlzIGxlc3MgdGhlbiBleHBlY3RlZCAJAAGkAAAAAQUAAAALbWluUmVjZWl2ZWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAA2ludgAAAAZjYWxsZXIFAAAADnJlc3VsdEFmdGVyRmVlBQAAAAxhc3NldEZpbmFsSWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAJY29sbGVjdG9yBQAAAANmZWUFAAAADGFzc2V0RmluYWxJZAUAAAADbmlsAAAAAwAAAANpbnYBAAAABHN3YXAAAAAFAAAACWFkZHJlc3NlcwAAAA9hc3NldHNUb1JlY2VpdmUAAAALZXN0UmVjZWl2ZWQAAAARc2xpcHBhZ2VUb2xlcmFuY2UAAAALbWluUmVjZWl2ZWQJAQAAAAdzd2FwU2VxAAAABgUAAAADaW52BQAAAAlhZGRyZXNzZXMFAAAAD2Fzc2V0c1RvUmVjZWl2ZQUAAAALZXN0UmVjZWl2ZWQFAAAAEXNsaXBwYWdlVG9sZXJhbmNlBQAAAAttaW5SZWNlaXZlZAAAAANpbnYBAAAAB3Rlc3RTZXEAAAAFAAAACWFkZHJlc3NlcwAAAA9hc3NldHNUb1JlY2VpdmUAAAALZXN0UmVjZWl2ZWQAAAARc2xpcHBhZ2VUb2xlcmFuY2UAAAALbWluUmVjZWl2ZWQJAQAAAAdzd2FwU2VxAAAABgUAAAADaW52BQAAAAlhZGRyZXNzZXMFAAAAD2Fzc2V0c1RvUmVjZWl2ZQUAAAALZXN0UmVjZWl2ZWQFAAAAEXNsaXBwYWdlVG9sZXJhbmNlBQAAAAttaW5SZWNlaXZlZAAAAANpbnYBAAAACGFkZFBvb2xzAAAAAQAAAA1wb29sQWRkcmVzc2VzCgEAAAARYWRkSWZEb2VzTm90RXhpc3QAAAACAAAABXBvb2xzAAAABHBvb2wDCQEAAAAPY29udGFpbnNFbGVtZW50AAAAAgUAAAAFcG9vbHMFAAAABHBvb2wJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAABlBvb2wgJwUAAAAEcG9vbAIAAAASJyBpcyBhbHJlYWR5IGFkZGVkCQAETQAAAAIFAAAABXBvb2xzCQEAAAATcGFyc2VBZGRyZXNzT3JUaHJvdwAAAAEFAAAABHBvb2wDCQEAAAABIQAAAAEJAQAAAA9jb250YWluc0VsZW1lbnQAAAACCQAETAAAAAIFAAAABHRoaXMJAARMAAAAAgUAAAAJY29sbGVjdG9yBQAAAANuaWwIBQAAAANpbnYAAAAGY2FsbGVyCQAAAgAAAAECAAAAK29ubHkgc2VsZiBjYWxscyBvciBieSBjb2xsZWN0b3IgYXJlIGFsbG93ZWQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgIAAAAHcC1wb29scwkABLkAAAACCgAAAAACJGwFAAAADXBvb2xBZGRyZXNzZXMKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwBQAAAAZwUG9vbHMKAQAAAAUkZjBfMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAABFhZGRJZkRvZXNOb3RFeGlzdAAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAABSRmMF8yAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABRMaXN0IHNpemUgZXhjZWVkcyAxMAkBAAAABSRmMF8yAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgkBAAAABSRmMF8xAAAAAgUAAAAFJGFjYzAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAIAAAAAAAAAAAMAAAAAAAAAAAQAAAAAAAAAAAUAAAAAAAAAAAYAAAAAAAAAAAcAAAAAAAAAAAgAAAAAAAAAAAkAAAAAAAAAAAoCAAAAASwFAAAAA25pbAAAAACtlvpd",
    "chainId": 87,
    "height": 3044622,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DyBTnroPAA8tcdTtimLMsCMRpH69QdgCx7JPqbBCxizh
Next: 4SMZb6JX9L4vksojYTVgvyZMna548XanWSuvmYMDUKmD

Diff: 
Old
New
Differences
184
184
 
func testSeq (addresses,assetsToReceive,estReceived,slippageTolerance,minReceived) = swapSeq(inv, addresses, assetsToReceive, estReceived, slippageTolerance, minReceived)
185
185
 
186
186
 
187
+
188
+
@Callable(inv)
189
+
func addPools (poolAddresses) = {
190
+
    func addIfDoesNotExist (pools,pool) =     if (containsElement(pools, pool))
191
+
        then throw((("Pool '" + pool) + "' is already added"))
192
+
        else (pools :+ parseAddressOrThrow(pool))
193
+
194
+
    if (!(containsElement([this, collector], inv.caller)))
195
+
        then throw("only self calls or by collector are allowed")
196
+
        else [StringEntry("p-pools", makeString({
197
+
            let $l = poolAddresses
198
+
            let $s = size($l)
199
+
            let $acc0 = pPools
200
+
            func $f0_1 ($a,$i) =             if (($i >= $s))
201
+
                then $a
202
+
                else addIfDoesNotExist($a, $l[$i])
203
+
204
+
            func $f0_2 ($a,$i) =             if (($i >= $s))
205
+
                then $a
206
+
                else throw("List size exceeds 10")
207
+
208
+
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
209
+
            }, ","))]
210
+
    }
211
+
212
+

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
func getStringOrThrow (address,key) = valueOrErrorMessage(getString(address, key), ((("Can't read '" + key) + "' at address ") + toString(address)))
5
5
 
6
6
 
7
7
 
func parseAddressOrThrow (maybeAddress) = valueOrErrorMessage(addressFromString(maybeAddress), (("Can't parse address from '" + maybeAddress) + "'"))
8
8
 
9
9
 
10
10
 
func parseIntOrThrow (maybeInt) = valueOrErrorMessage(parseInt(maybeInt), (("Can't parse integer from '" + maybeInt) + "'"))
11
11
 
12
12
 
13
13
 
let collector = parseAddressOrThrow(getStringOrThrow(this, "collector"))
14
14
 
15
15
 
let oracle = parseAddressOrThrow(getStringOrThrow(this, "oracle"))
16
16
 
17
17
 
let pools = split(getStringOrThrow(oracle, "pools"), ",")
18
18
 
19
19
 
let pPools = split(getStringOrThrow(this, "p-pools"), ",")
20
20
 
21
21
 
func getAssetId (asset) = if ((asset == "WAVES"))
22
22
 
    then unit
23
23
 
    else fromBase58String(asset)
24
24
 
25
25
 
26
26
 
func assetIdToString (assetId) = match assetId {
27
27
 
    case asset: ByteVector => 
28
28
 
        toBase58String(asset)
29
29
 
    case waves: Unit => 
30
30
 
        "WAVES"
31
31
 
    case _ => 
32
32
 
        throw("Match error")
33
33
 
}
34
34
 
35
35
 
36
36
 
func getBalance (assetId) = match assetId {
37
37
 
    case asset: ByteVector => 
38
38
 
        assetBalance(this, asset)
39
39
 
    case waves: Unit => 
40
40
 
        wavesBalance(this).available
41
41
 
    case _ => 
42
42
 
        throw("Match error")
43
43
 
}
44
44
 
45
45
 
46
46
 
func deductFee (amount) = {
47
47
 
    let fee = fraction(amount, 1, 1000)
48
48
 
    $Tuple2((amount - fee), fee)
49
49
 
    }
50
50
 
51
51
 
52
52
 
func doSwap (pool,payment,assetReceived,estAmountToReceive,slippageTolerance) = {
53
53
 
    let poolAddress = parseAddressOrThrow(pool)
54
54
 
    let versionMajor = parseIntOrThrow(split(getStringOrThrow(poolAddress, "version"), ".")[0])
55
55
 
    let assetReceivedId = getAssetId(assetReceived)
56
56
 
    if ((0 > estAmountToReceive))
57
57
 
        then throw("estAmountToReceive must be positive")
58
58
 
        else if (containsElement(pools, pool))
59
59
 
            then {
60
60
 
                let poolAssetA = getStringOrThrow(poolAddress, "A_asset_id")
61
61
 
                let poolAssetB = getStringOrThrow(poolAddress, "B_asset_id")
62
62
 
                let poolAssetIdA = getAssetId(poolAssetA)
63
63
 
                let poolAssetIdB = getAssetId(poolAssetB)
64
64
 
                let $t020332377 = if (if ((payment.assetId == poolAssetIdA))
65
65
 
                    then (assetReceivedId == poolAssetIdB)
66
66
 
                    else false)
67
67
 
                    then $Tuple2(poolAssetIdA, poolAssetIdB)
68
68
 
                    else if (if ((assetReceivedId == poolAssetIdA))
69
69
 
                        then (payment.assetId == poolAssetIdB)
70
70
 
                        else false)
71
71
 
                        then $Tuple2(poolAssetIdB, poolAssetIdA)
72
72
 
                        else throw("Unsupported assets pair")
73
73
 
                let assetIn = $t020332377._1
74
74
 
                let assetOut = $t020332377._2
75
75
 
                let args = if ((versionMajor == 1))
76
76
 
                    then [1]
77
77
 
                    else if ((versionMajor == 2))
78
78
 
                        then if ((0 >= estAmountToReceive))
79
79
 
                            then throw("estAmountToReceive must be positive")
80
80
 
                            else if (if ((0 > slippageTolerance))
81
81
 
                                then true
82
82
 
                                else (slippageTolerance > 1000))
83
83
 
                                then throw("Slippage tolerance must be non-negative and less than or equal to 1000")
84
84
 
                                else {
85
85
 
                                    let minAmount = (estAmountToReceive - fraction(estAmountToReceive, slippageTolerance, 1000))
86
86
 
[estAmountToReceive, if ((minAmount > 0))
87
87
 
                                        then minAmount
88
88
 
                                        else 1]
89
89
 
                                    }
90
90
 
                        else throw((("Unknown pool version '" + toString(versionMajor)) + "', but 1 or 2 expected"))
91
91
 
                let balanceBefore = getBalance(assetReceivedId)
92
92
 
                if ((balanceBefore == balanceBefore))
93
93
 
                    then {
94
94
 
                        let result = invoke(poolAddress, "exchange", args, [payment])
95
95
 
                        if ((result == result))
96
96
 
                            then {
97
97
 
                                let received = (getBalance(assetReceivedId) - balanceBefore)
98
98
 
                                if ((received == received))
99
99
 
                                    then if ((0 >= received))
100
100
 
                                        then throw("Received amount from pool must be positive")
101
101
 
                                        else received
102
102
 
                                    else throw("Strict value is not equal to itself.")
103
103
 
                                }
104
104
 
                            else throw("Strict value is not equal to itself.")
105
105
 
                        }
106
106
 
                    else throw("Strict value is not equal to itself.")
107
107
 
                }
108
108
 
            else if (containsElement(pPools, pool))
109
109
 
                then {
110
110
 
                    let balanceBefore = getBalance(assetReceivedId)
111
111
 
                    if ((balanceBefore == balanceBefore))
112
112
 
                        then {
113
113
 
                            let result = invoke(poolAddress, "swap", [assetReceived, 0], [payment])
114
114
 
                            if ((result == result))
115
115
 
                                then {
116
116
 
                                    let received = (getBalance(assetReceivedId) - balanceBefore)
117
117
 
                                    if ((received == received))
118
118
 
                                        then if ((0 >= received))
119
119
 
                                            then throw("Received amount from pool must be positive")
120
120
 
                                            else received
121
121
 
                                        else throw("Strict value is not equal to itself.")
122
122
 
                                    }
123
123
 
                                else throw("Strict value is not equal to itself.")
124
124
 
                            }
125
125
 
                        else throw("Strict value is not equal to itself.")
126
126
 
                    }
127
127
 
                else throw((("There is no pool at address '" + pool) + "'"))
128
128
 
    }
129
129
 
130
130
 
131
131
 
func swapSeq (inv,addresses,assetsToReceive,estReceived,slippageTolerance,minReceived) = {
132
132
 
    let pmt = if ((size(inv.payments) > 0))
133
133
 
        then inv.payments[0]
134
134
 
        else throw("Payment required")
135
135
 
    let assetFinal = assetsToReceive[(size(assetsToReceive) - 1)]
136
136
 
    let assetFinalId = getAssetId(assetFinal)
137
137
 
    let indices = [0, 1, 2, 3, 4, 5, 6, 7, 8, 9]
138
138
 
    func foldSwap (previousReceived,index) =     if ((index >= size(addresses)))
139
139
 
        then previousReceived
140
140
 
        else {
141
141
 
            let assetReceived = assetsToReceive[index]
142
142
 
            let assetReceivedId = getAssetId(assetReceived)
143
143
 
            match doSwap(addresses[index], previousReceived, assetReceived, estReceived[index], slippageTolerance) {
144
144
 
                case income: Int => 
145
145
 
                    AttachedPayment(assetReceivedId, income)
146
146
 
                case _ => 
147
147
 
                    throw("Can't handle swap result")
148
148
 
            }
149
149
 
            }
150
150
 
151
151
 
    let final = if ((size(addresses) > 0))
152
152
 
        then {
153
153
 
            let $l = indices
154
154
 
            let $s = size($l)
155
155
 
            let $acc0 = pmt
156
156
 
            func $f0_1 ($a,$i) =             if (($i >= $s))
157
157
 
                then $a
158
158
 
                else foldSwap($a, $l[$i])
159
159
 
160
160
 
            func $f0_2 ($a,$i) =             if (($i >= $s))
161
161
 
                then $a
162
162
 
                else throw("List size exceeds 10")
163
163
 
164
164
 
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
165
165
 
            }
166
166
 
        else throw("Path cannot be empty")
167
167
 
    let $t050325084 = deductFee(final.amount)
168
168
 
    let resultAfterFee = $t050325084._1
169
169
 
    let fee = $t050325084._2
170
170
 
    if ((0 >= final.amount))
171
171
 
        then throw((("Swap result " + toString(final.amount)) + " must be positive"))
172
172
 
        else if ((minReceived > resultAfterFee))
173
173
 
            then throw(((("Swap result " + toString(resultAfterFee)) + " is less then expected ") + toString(minReceived)))
174
174
 
            else [ScriptTransfer(inv.caller, resultAfterFee, assetFinalId), ScriptTransfer(collector, fee, assetFinalId)]
175
175
 
    }
176
176
 
177
177
 
178
178
 
@Callable(inv)
179
179
 
func swap (addresses,assetsToReceive,estReceived,slippageTolerance,minReceived) = swapSeq(inv, addresses, assetsToReceive, estReceived, slippageTolerance, minReceived)
180
180
 
181
181
 
182
182
 
183
183
 
@Callable(inv)
184
184
 
func testSeq (addresses,assetsToReceive,estReceived,slippageTolerance,minReceived) = swapSeq(inv, addresses, assetsToReceive, estReceived, slippageTolerance, minReceived)
185
185
 
186
186
 
187
+
188
+
@Callable(inv)
189
+
func addPools (poolAddresses) = {
190
+
    func addIfDoesNotExist (pools,pool) =     if (containsElement(pools, pool))
191
+
        then throw((("Pool '" + pool) + "' is already added"))
192
+
        else (pools :+ parseAddressOrThrow(pool))
193
+
194
+
    if (!(containsElement([this, collector], inv.caller)))
195
+
        then throw("only self calls or by collector are allowed")
196
+
        else [StringEntry("p-pools", makeString({
197
+
            let $l = poolAddresses
198
+
            let $s = size($l)
199
+
            let $acc0 = pPools
200
+
            func $f0_1 ($a,$i) =             if (($i >= $s))
201
+
                then $a
202
+
                else addIfDoesNotExist($a, $l[$i])
203
+
204
+
            func $f0_2 ($a,$i) =             if (($i >= $s))
205
+
                then $a
206
+
                else throw("List size exceeds 10")
207
+
208
+
            $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10)
209
+
            }, ","))]
210
+
    }
211
+
212
+

github/deemru/w8io/786bc32 
47.16 ms ◑