tx · Ew4q9KZXahkkyu6ryMVxVCGWy3pumEtPVGkoyJQ7ohpY

3N7J6mMMkjVViBREz9y53JmcX7r7KZRXQpL:  -0.04000000 Waves

2022.04.20 15:43 [2016877] smart account 3N7J6mMMkjVViBREz9y53JmcX7r7KZRXQpL > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "Ew4q9KZXahkkyu6ryMVxVCGWy3pumEtPVGkoyJQ7ohpY",
    "fee": 4000000,
    "feeAssetId": null,
    "timestamp": 1650458582505,
    "version": 2,
    "chainId": 84,
    "sender": "3N7J6mMMkjVViBREz9y53JmcX7r7KZRXQpL",
    "senderPublicKey": "G6aSmaqLJ4p7jzm7BnQcZuqa2NRRLVtzqdYNjYErnEZZ",
    "proofs": [
        "5qejGBeJMaHrs4TimK5H1yZViUvehexybJax6ujTBsjWkTEHrAvSANgkTESt3SgRqf8HXiHA97fHWqbBMGokFxLT"
    ],
    "script": "base64:AAIFAAAAAAAAADIIAhIFCgMICAgSBAoCCAgSBwoFCAgICAgSBAoCCAESBQoDCAgIEgUKAwgICBIECgIICAAAABMAAAAABENPTFMAAAAAAAAABAAAAAAABFJPV1MAAAAAAAAABAAAAAAACW5mdERvbWFpbgIAAAAYaHR0cHM6Ly9uZnQuZ3JpZGdhbmcuaW8vAAAAABVhZGRPd25lckFuZEFtb3VudEZ1bmMCAAAAEWFkZE93bmVyQW5kQW1vdW50AAAAAAVERUJVRwYAAAAAEW1pbkZvclNhbGVXYXZsZXRzAAAAAAAF9eEAAAAAABBtaW5QdXJjaGFzZVByaWNlAAAAAAAAD0JAAAAAAARkYXBwAgAAACMzTjdKNm1NTWtqVlZpQlJFejl5NTNKbWNYN3I3S1pSWFFwTAAAAAALZGFwcEFkZHJlc3MJAQAAAAdBZGRyZXNzAAAAAQkAAlkAAAABBQAAAARkYXBwAAAAABFob2xkaW5nc1B1YmxpY0tleQIAAAAsQXlBd1diTVBNN2E0VllrbjFiaEVCZnRDNVdaZ2Z2VVhncllEZTk4bXZMc3YAAAAACGhvbGRpbmdzAgAAACMzTXdQc0x5OUYxbVVRcmRQMzdzQ0FLdkh1RTVIdlBFNjc0WQAAAAAPaG9sZGluZ3NBZGRyZXNzCQEAAAAHQWRkcmVzcwAAAAEJAAJZAAAAAQUAAAAIaG9sZGluZ3MBAAAADGdldEFzc2V0TmFtZQAAAAIAAAABeAAAAAF5CQABLAAAAAIJAAEsAAAAAgUAAAABeAIAAAABLAUAAAABeQEAAAAQZ2V0RGF0YUtleVByZWZpeAAAAAIAAAABeAAAAAF5CQEAAAAMZ2V0QXNzZXROYW1lAAAAAgUAAAABeAUAAAABeQEAAAAQZ2V0WFlHZW5Gcm9tTmFtZQAAAAEAAAAEbmFtZQQAAAAFcGFydHMJAAS1AAAAAgUAAAAEbmFtZQIAAAABLAQAAAAFdHVwbGUJAAUUAAAAAgkAAZEAAAACBQAAAAVwYXJ0cwAAAAAAAAAAAAkAAZEAAAACBQAAAAVwYXJ0cwAAAAAAAAAAAQUAAAAFdHVwbGUBAAAAHWdldERhdGFLZXlQcmVmaXhGcm9tQXNzZXROYW1lAAAAAQAAAARuYW1lBAAAAAkkdDA5MDY5NDEJAQAAABBnZXRYWUdlbkZyb21OYW1lAAAAAQUAAAAEbmFtZQQAAAABeAgFAAAACSR0MDkwNjk0MQAAAAJfMQQAAAABeQgFAAAACSR0MDkwNjk0MQAAAAJfMgQAAAAGcHJlZml4CQEAAAAQZ2V0RGF0YUtleVByZWZpeAAAAAIFAAAAAXgFAAAAAXkFAAAABnByZWZpeAEAAAALY2xhaW1TcXVhcmUAAAAFAAAAAXgAAAABeQAAAANnZW4AAAAHb3duZXJJZAAAAA10cmFuc2FjdGlvbklkBAAAAAxyZXNvbHZlZFhTdHIFAAAAAXgEAAAADHJlc29sdmVkWVN0cgUAAAABeQQAAAAOcmVzb2x2ZWRHZW5TdHIFAAAAA2dlbgQAAAAJYXNzZXROYW1lCQEAAAAMZ2V0QXNzZXROYW1lAAAAAgUAAAAMcmVzb2x2ZWRYU3RyBQAAAAxyZXNvbHZlZFlTdHIEAAAACGFzc2V0VXJsCQABLAAAAAIJAAEsAAAAAgUAAAAJbmZ0RG9tYWluBQAAAA10cmFuc2FjdGlvbklkAgAAAAQucG5nBAAAAAVhc3NldAkABEIAAAAFBQAAAAlhc3NldE5hbWUFAAAACGFzc2V0VXJsAAAAAAAAAAABAAAAAAAAAAAABwQAAAAHYXNzZXRJZAkABDgAAAABBQAAAAVhc3NldAQAAAANZGF0YUtleVByZWZpeAkBAAAAEGdldERhdGFLZXlQcmVmaXgAAAACBQAAAAxyZXNvbHZlZFhTdHIFAAAADHJlc29sdmVkWVN0cgkABRYAAAAEBQAAAAVhc3NldAUAAAAHYXNzZXRJZAUAAAAIYXNzZXRVcmwFAAAADWRhdGFLZXlQcmVmaXgBAAAAFWdldFRyYW5zYWN0aW9uRW50cmllcwAAAAUAAAAGcHJlZml4AAAAB2Fzc2V0SWQAAAAFYXNzZXQAAAAFb3duZXIAAAADZ2VuCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAAGcHJlZml4AgAAAAhfYXNzZXRJZAUAAAAHYXNzZXRJZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAABnByZWZpeAIAAAAGX2Fzc2V0BQAAAAVhc3NldAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAABnByZWZpeAIAAAAGX293bmVyBQAAAAVvd25lcgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAABnByZWZpeAIAAAAEX2dlbgUAAAADZ2VuBQAAAANuaWwBAAAACGJ1cm5Gb2xkAAAAAgAAAAVhY2N1bQAAAARuZXh0BAAAAAxyZXNvbHZlZE5leHQEAAAAByRtYXRjaDAFAAAABG5leHQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABFVuaXQCAAAABXVuc2V0AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAA3ZhbAUAAAAHJG1hdGNoMAUAAAADdmFsCQAAAgAAAAECAAAAC01hdGNoIGVycm9yAwkAAAAAAAACBQAAAAxyZXNvbHZlZE5leHQCAAAABXVuc2V0BQAAAAVhY2N1bQQAAAAHYXNzZXRJZAQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQABLAAAAAIFAAAADHJlc29sdmVkTmV4dAIAAAAIX2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABFVuaXQCAAAABXVuc2V0AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAA3ZhbAUAAAAHJG1hdGNoMAUAAAADdmFsCQAAAgAAAAECAAAAC01hdGNoIGVycm9yAwkAAAAAAAACBQAAAAdhc3NldElkAgAAAAV1bnNldAUAAAAFYWNjdW0JAAROAAAAAgUAAAAFYWNjdW0JAARMAAAAAgkBAAAABEJ1cm4AAAACCQACWQAAAAEFAAAAB2Fzc2V0SWQAAAAAAAAAAAEFAAAAA25pbAAAAAcAAAABaQEAAAAIcHVyY2hhc2UAAAADAAAAAXgAAAABeQAAAAh1c2VyVGV4dAQAAAAGcHJlZml4CQEAAAAQZ2V0RGF0YUtleVByZWZpeAAAAAIFAAAAAXgFAAAAAXkEAAAADXBheW1lbnRBbW91bnQJAQAAAAt2YWx1ZU9yRWxzZQAAAAIICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAAAAAAAAAAAAAQAAAAPZXhpc3RpbmdBc3NldElkBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAGcHJlZml4AgAAAAhfYXNzZXRJZAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAEVW5pdAIAAAAFdW5zZXQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAADZXJyBQAAAAckbWF0Y2gwCQAAAgAAAAECAAAAJlRoaXMgc3F1YXJlIGhhcyBhbHJlYWR5IGJlZW4gcHVyY2hhc2VkCQAAAgAAAAECAAAAC01hdGNoIGVycm9yAwkAAGYAAAACBQAAABBtaW5QdXJjaGFzZVByaWNlBQAAAA1wYXltZW50QW1vdW50CQAAAgAAAAEJAAEsAAAAAgkAASwAAAACAgAAABpZb3UgbmVlZCB0byBzZW5kIGF0IGxlYXN0IAkAAaQAAAABBQAAABBtaW5QdXJjaGFzZVByaWNlAgAAABxXQVZMRVRTIHRvIHB1cmNoYXNlIGEgc3F1YXJlBAAAAAdvd25lcklkCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAADXRyYW5zYWN0aW9uSWQJAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAQAAAALJHQwMjg2MTI5NTYJAQAAAAtjbGFpbVNxdWFyZQAAAAUFAAAAAXgFAAAAAXkCAAAAATEFAAAAB293bmVySWQFAAAADXRyYW5zYWN0aW9uSWQEAAAABWFzc2V0CAUAAAALJHQwMjg2MTI5NTYAAAACXzEEAAAAB2Fzc2V0SWQIBQAAAAskdDAyODYxMjk1NgAAAAJfMgQAAAAIYXNzZXRVcmwIBQAAAAskdDAyODYxMjk1NgAAAAJfMwQAAAANZGF0YUtleVByZWZpeAgFAAAACyR0MDI4NjEyOTU2AAAAAl80CQAETgAAAAIJAQAAABVnZXRUcmFuc2FjdGlvbkVudHJpZXMAAAAFBQAAAA1kYXRhS2V5UHJlZml4CQACWAAAAAEFAAAAB2Fzc2V0SWQFAAAACGFzc2V0VXJsBQAAAAdvd25lcklkAgAAAAExCQAETAAAAAIFAAAABWFzc2V0CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAAHb3duZXJJZAIAAAAHX2hhbmRsZQUAAAAIdXNlclRleHQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgUAAAANdHJhbnNhY3Rpb25JZAUAAAANZGF0YUtleVByZWZpeAkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIAAAAAAAAAAAEFAAAAB2Fzc2V0SWQFAAAAA25pbAAAAAFpAQAAAAdhdXRvQnV5AAAAAgAAAAF4AAAAAXkEAAAACGNhbGxlcklkCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMDAwkBAAAAAiE9AAAAAgUAAAAIY2FsbGVySWQFAAAACGhvbGRpbmdzCQEAAAACIT0AAAACBQAAAAhjYWxsZXJJZAUAAAAEZGFwcAcJAAACAAAAAQIAAAAmVGhpcyBjYW4gb25seSBiZSB0cmlnZ2VyaW5nIGludGVybmFsbHkEAAAADXRyYW5zYWN0aW9uSWQJAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAQAAAALJHQwMzQ5MTM1ODcJAQAAAAtjbGFpbVNxdWFyZQAAAAUFAAAAAXgFAAAAAXkCAAAAATEFAAAACGhvbGRpbmdzBQAAAA10cmFuc2FjdGlvbklkBAAAAAVhc3NldAgFAAAACyR0MDM0OTEzNTg3AAAAAl8xBAAAAAdhc3NldElkCAUAAAALJHQwMzQ5MTM1ODcAAAACXzIEAAAACGFzc2V0VXJsCAUAAAALJHQwMzQ5MTM1ODcAAAACXzMEAAAADWRhdGFLZXlQcmVmaXgIBQAAAAskdDAzNDkxMzU4NwAAAAJfNAQAAAAKYXNzZXRJZFN0cgkAAlgAAAABBQAAAAdhc3NldElkBAAAAANyZXMJAAP8AAAABAUAAAAPaG9sZGluZ3NBZGRyZXNzBQAAABVhZGRPd25lckFuZEFtb3VudEZ1bmMJAARMAAAAAgUAAAAIaG9sZGluZ3MJAARMAAAAAgUAAAAKYXNzZXRJZFN0cgkABEwAAAACAAAAAAAAAAADBQAAAANuaWwJAARMAAAAAgkBAAAAD0F0dGFjaGVkUGF5bWVudAAAAAIFAAAABHVuaXQAAAAAAAAAAAAFAAAAA25pbAMJAAAAAAAAAgUAAAADcmVzBQAAAANyZXMJAAROAAAAAgkBAAAAFWdldFRyYW5zYWN0aW9uRW50cmllcwAAAAUFAAAADWRhdGFLZXlQcmVmaXgFAAAACmFzc2V0SWRTdHIFAAAACGFzc2V0VXJsBQAAAAhob2xkaW5ncwIAAAABMQkABEwAAAACBQAAAAVhc3NldAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAA10cmFuc2FjdGlvbklkBQAAAA1kYXRhS2V5UHJlZml4CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAD2hvbGRpbmdzQWRkcmVzcwAAAAAAAAAAAQUAAAAHYXNzZXRJZAUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFpAQAAAAZldm9sdmUAAAAFAAAAAXgAAAABeQAAAANnZW4AAAAHb3duZXJJZAAAAAxjb29yZHNUb0J1cm4EAAAACGNhbGxlcklkCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMDCQEAAAACIT0AAAACBQAAAAhjYWxsZXJJZAUAAAAIaG9sZGluZ3MJAAACAAAAAQIAAAAmVGhpcyBjYW4gb25seSBiZSB0cmlnZ2VyaW5nIGludGVybmFsbHkEAAAADXRyYW5zYWN0aW9uSWQJAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAQAAAALJHQwNDI2NTQ2NTUJAQAAAAtjbGFpbVNxdWFyZQAAAAUFAAAAAXgFAAAAAXkFAAAAA2dlbgUAAAAHb3duZXJJZAUAAAANdHJhbnNhY3Rpb25JZAQAAAAFYXNzZXQIBQAAAAskdDA0MjY1NDY1NQAAAAJfMQQAAAAHYXNzZXRJZAgFAAAACyR0MDQyNjU0NjU1AAAAAl8yBAAAAAhhc3NldFVybAgFAAAACyR0MDQyNjU0NjU1AAAAAl8zBAAAAA1kYXRhS2V5UHJlZml4CAUAAAALJHQwNDI2NTQ2NTUAAAACXzQEAAAAEGJ1cm5UcmFuc2FjdGlvbnMKAAAAAAIkbAkABLUAAAACBQAAAAxjb29yZHNUb0J1cm4CAAAAAXwKAAAAAAIkcwkAAZAAAAABBQAAAAIkbAoAAAAABSRhY2MwBQAAAANuaWwKAQAAAAUkZjBfMQAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAQAAAAhidXJuRm9sZAAAAAIFAAAAAiRhCQABkQAAAAIFAAAAAiRsBQAAAAIkaQoBAAAABSRmMF8yAAAAAgAAAAIkYQAAAAIkaQMJAABnAAAAAgUAAAACJGkFAAAAAiRzBQAAAAIkYQkAAAIAAAABAgAAABVMaXN0IHNpemUgZXhjZWVkcyAxMTAJAQAAAAUkZjBfMgAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIJAQAAAAUkZjBfMQAAAAIFAAAABSRhY2MwAAAAAAAAAAAAAAAAAAAAAAABAAAAAAAAAAACAAAAAAAAAAADAAAAAAAAAAAEAAAAAAAAAAAFAAAAAAAAAAAGAAAAAAAAAAAHAAAAAAAAAAAIAAAAAAAAAAAJAAAAAAAAAAAKAAAAAAAAAAALAAAAAAAAAAAMAAAAAAAAAAANAAAAAAAAAAAOAAAAAAAAAAAPAAAAAAAAAAAQAAAAAAAAAAARAAAAAAAAAAASAAAAAAAAAAATAAAAAAAAAAAUAAAAAAAAAAAVAAAAAAAAAAAWAAAAAAAAAAAXAAAAAAAAAAAYAAAAAAAAAAAZAAAAAAAAAAAaAAAAAAAAAAAbAAAAAAAAAAAcAAAAAAAAAAAdAAAAAAAAAAAeAAAAAAAAAAAfAAAAAAAAAAAgAAAAAAAAAAAhAAAAAAAAAAAiAAAAAAAAAAAjAAAAAAAAAAAkAAAAAAAAAAAlAAAAAAAAAAAmAAAAAAAAAAAnAAAAAAAAAAAoAAAAAAAAAAApAAAAAAAAAAAqAAAAAAAAAAArAAAAAAAAAAAsAAAAAAAAAAAtAAAAAAAAAAAuAAAAAAAAAAAvAAAAAAAAAAAwAAAAAAAAAAAxAAAAAAAAAAAyAAAAAAAAAAAzAAAAAAAAAAA0AAAAAAAAAAA1AAAAAAAAAAA2AAAAAAAAAAA3AAAAAAAAAAA4AAAAAAAAAAA5AAAAAAAAAAA6AAAAAAAAAAA7AAAAAAAAAAA8AAAAAAAAAAA9AAAAAAAAAAA+AAAAAAAAAAA/AAAAAAAAAABAAAAAAAAAAABBAAAAAAAAAABCAAAAAAAAAABDAAAAAAAAAABEAAAAAAAAAABFAAAAAAAAAABGAAAAAAAAAABHAAAAAAAAAABIAAAAAAAAAABJAAAAAAAAAABKAAAAAAAAAABLAAAAAAAAAABMAAAAAAAAAABNAAAAAAAAAABOAAAAAAAAAABPAAAAAAAAAABQAAAAAAAAAABRAAAAAAAAAABSAAAAAAAAAABTAAAAAAAAAABUAAAAAAAAAABVAAAAAAAAAABWAAAAAAAAAABXAAAAAAAAAABYAAAAAAAAAABZAAAAAAAAAABaAAAAAAAAAABbAAAAAAAAAABcAAAAAAAAAABdAAAAAAAAAABeAAAAAAAAAABfAAAAAAAAAABgAAAAAAAAAABhAAAAAAAAAABiAAAAAAAAAABjAAAAAAAAAABkAAAAAAAAAABlAAAAAAAAAABmAAAAAAAAAABnAAAAAAAAAABoAAAAAAAAAABpAAAAAAAAAABqAAAAAAAAAABrAAAAAAAAAABsAAAAAAAAAABtAAAAAAAAAABuCQAETgAAAAIJAAROAAAAAgUAAAAQYnVyblRyYW5zYWN0aW9ucwkBAAAAFWdldFRyYW5zYWN0aW9uRW50cmllcwAAAAUFAAAADWRhdGFLZXlQcmVmaXgJAAJYAAAAAQUAAAAHYXNzZXRJZAUAAAAIYXNzZXRVcmwFAAAAB293bmVySWQFAAAAA2dlbgkABEwAAAACBQAAAAVhc3NldAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAA10cmFuc2FjdGlvbklkBQAAAA1kYXRhS2V5UHJlZml4CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAAAdBZGRyZXNzAAAAAQkAAlkAAAABBQAAAAdvd25lcklkAAAAAAAAAAABBQAAAAdhc3NldElkBQAAAANuaWwAAAABaQEAAAAKcHV0Rm9yU2FsZQAAAAIAAAAHYXNzZXRJZAAAAAZhbW91bnQEAAAACGNhbGxlcklkCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAACWFzc2V0RGF0YQQAAAAHJG1hdGNoMAkAA+wAAAABCQACWQAAAAEFAAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABUFzc2V0BAAAAANhc3MFAAAAByRtYXRjaDAFAAAAA2FzcwkAAAIAAAABAgAAAA9Bc3NldCBub3QgZm91bmQEAAAACmRhdGFQcmVmaXgJAQAAAB1nZXREYXRhS2V5UHJlZml4RnJvbUFzc2V0TmFtZQAAAAEIBQAAAAlhc3NldERhdGEAAAAEbmFtZQQAAAAHb3duZXJJZAQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQABLAAAAAIFAAAACmRhdGFQcmVmaXgCAAAABl9vd25lcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFzBQAAAAckbWF0Y2gwBQAAAAFzCQAAAgAAAAECAAAAF093bmVyIG5vdCBmb3VuZCBpbiBkYXRhAwkAAGYAAAACBQAAABFtaW5Gb3JTYWxlV2F2bGV0cwUAAAAGYW1vdW50CQAAAgAAAAECAAAAI0Ftb3VudCBuZWVkcyB0byBiZSBtb3JlIHRoYW4gMSB3YXZlAwMJAQAAAAIhPQAAAAIFAAAACGNhbGxlcklkBQAAAAdvd25lcklkCQEAAAACIT0AAAACBQAAAAhjYWxsZXJJZAUAAAAIaG9sZGluZ3MHCQAAAgAAAAECAAAALllvdSBhcmUgbm90IGFibGUgdG8gcHV0IHRoaXMgYXNzZXQgdXAgZm9yIHNhbGUEAAAAA3JlcwkAA/wAAAAEBQAAAA9ob2xkaW5nc0FkZHJlc3MFAAAAFWFkZE93bmVyQW5kQW1vdW50RnVuYwkABEwAAAACBQAAAAhjYWxsZXJJZAkABEwAAAACBQAAAAdhc3NldElkCQAETAAAAAIFAAAABmFtb3VudAUAAAADbmlsCQAETAAAAAIJAQAAAA9BdHRhY2hlZFBheW1lbnQAAAACBQAAAAR1bml0AAAAAAAAAAAABQAAAANuaWwDCQAAAAAAAAIFAAAAA3JlcwUAAAADcmVzCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAD2hvbGRpbmdzQWRkcmVzcwAAAAAAAAAAAQkAAlkAAAABBQAAAAdhc3NldElkBQAAAANuaWwJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAWkBAAAADGZpbmFsaXplU2FsZQAAAAMAAAAHYXNzZXRJZAAAAAdvd25lcklkAAAACHVzZXJUZXh0BAAAAAhjYWxsZXJJZAkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAwkBAAAAAiE9AAAAAgUAAAAIY2FsbGVySWQFAAAACGhvbGRpbmdzCQAAAgAAAAECAAAAJlRoaXMgY2FuIG9ubHkgYmUgdHJpZ2dlcmluZyBpbnRlcm5hbGx5BAAAAAZwcmVmaXgEAAAAByRtYXRjaDAJAAPsAAAAAQkAAlkAAAABBQAAAAdhc3NldElkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAVBc3NldAQAAAAFYXNzZXQFAAAAByRtYXRjaDAIBQAAAAVhc3NldAAAAARuYW1lCQAAAgAAAAECAAAAEENhbid0IGZpbmQgYXNzZXQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACBQAAAAZwcmVmaXgCAAAABl9vd25lcgUAAAAHb3duZXJJZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAAB293bmVySWQCAAAAB19oYW5kbGUFAAAACHVzZXJUZXh0BQAAAANuaWwAAAABaQEAAAAWYWRtaW5Qcm9tb3Rpb25QdXJjaGFzZQAAAAMAAAABeAAAAAF5AAAAEWRlc2luYXRpb25BZGRyZXNzBAAAAAhjYWxsZXJJZAkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAwkBAAAAAiE9AAAAAgUAAAAIY2FsbGVySWQFAAAACGhvbGRpbmdzCQAAAgAAAAECAAAAJlRoaXMgY2FuIG9ubHkgYmUgdHJpZ2dlcmluZyBpbnRlcm5hbGx5BAAAAA10cmFuc2FjdGlvbklkCQACWAAAAAEIBQAAAAFpAAAADXRyYW5zYWN0aW9uSWQEAAAACyR0MDY2MzQ2NzM5CQEAAAALY2xhaW1TcXVhcmUAAAAFBQAAAAF4BQAAAAF5AgAAAAExBQAAABFkZXNpbmF0aW9uQWRkcmVzcwUAAAANdHJhbnNhY3Rpb25JZAQAAAAFYXNzZXQIBQAAAAskdDA2NjM0NjczOQAAAAJfMQQAAAAHYXNzZXRJZAgFAAAACyR0MDY2MzQ2NzM5AAAAAl8yBAAAAAhhc3NldFVybAgFAAAACyR0MDY2MzQ2NzM5AAAAAl8zBAAAAA1kYXRhS2V5UHJlZml4CAUAAAALJHQwNjYzNDY3MzkAAAACXzQEAAAACmFzc2V0SWRTdHIJAAJYAAAAAQUAAAAHYXNzZXRJZAkABE4AAAACCQEAAAAVZ2V0VHJhbnNhY3Rpb25FbnRyaWVzAAAABQUAAAANZGF0YUtleVByZWZpeAUAAAAKYXNzZXRJZFN0cgUAAAAIYXNzZXRVcmwFAAAAEWRlc2luYXRpb25BZGRyZXNzAgAAAAExCQAETAAAAAIFAAAABWFzc2V0CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAADXRyYW5zYWN0aW9uSWQFAAAADWRhdGFLZXlQcmVmaXgJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAB0FkZHJlc3MAAAABCQACWQAAAAEFAAAAEWRlc2luYXRpb25BZGRyZXNzAAAAAAAAAAABBQAAAAdhc3NldElkBQAAAANuaWwAAAABaQEAAAAOYWRtaW5TZXRIYW5kbGUAAAACAAAAB293bmVySWQAAAAGaGFuZGxlBAAAAAhjYWxsZXJJZAkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAwkBAAAAAiE9AAAAAgUAAAAIY2FsbGVySWQFAAAACGhvbGRpbmdzCQAAAgAAAAECAAAAJlRoaXMgY2FuIG9ubHkgYmUgdHJpZ2dlcmluZyBpbnRlcm5hbGx5CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAAHb3duZXJJZAIAAAAHX2hhbmRsZQUAAAAGaGFuZGxlBQAAAANuaWwAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAAAwMJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5BgkAAAAAAAACCQEAAAAUYWRkcmVzc0Zyb21QdWJsaWNLZXkAAAABCAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5BQAAAA9ob2xkaW5nc0FkZHJlc3MGCQAAAAAAAAIJAQAAABRhZGRyZXNzRnJvbVB1YmxpY0tleQAAAAEIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXkFAAAAC2RhcHBBZGRyZXNz1/vlFQ==",
    "height": 2016877,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: HSVG75L6UBtr3LSeJmNVcigC1AgziJ3mMCmpn86Dt2tR
Next: FxUFGsw1FwwuA9TEjrbyEDnpo4CLPca9tbDKrBHmhHGy

Diff: 

OldNewDifferences
6363 func J (w,H,G,K,y) = [StringEntry((w + "_assetId"), H), StringEntry((w + "_asset"), G), StringEntry((w + "_owner"), K), StringEntry((w + "_gen"), y)]
6464 
6565 
66-@Callable(L)
67-func purchase (n,o,M) = {
66+func L (M,N) = {
67+    let O = {
68+        let P = N
69+        if ($isInstanceOf(P, "Unit"))
70+            then "unset"
71+            else if ($isInstanceOf(P, "String"))
72+                then {
73+                    let Q = P
74+                    Q
75+                    }
76+                else throw("Match error")
77+        }
78+    if ((O == "unset"))
79+        then M
80+        else {
81+            let H = {
82+                let P = getString(this, (O + "_assetId"))
83+                if ($isInstanceOf(P, "Unit"))
84+                    then "unset"
85+                    else if ($isInstanceOf(P, "String"))
86+                        then {
87+                            let Q = P
88+                            Q
89+                            }
90+                        else throw("Match error")
91+                }
92+            if ((H == "unset"))
93+                then M
94+                else (M ++ [Burn(fromBase58String(H), 1)])
95+            }
96+    }
97+
98+
99+@Callable(R)
100+func purchase (n,o,S) = {
68101     let w = p(n, o)
69-    let N = valueOrElse(L.payments[0].amount, 0)
70-    let O = {
102+    let T = valueOrElse(R.payments[0].amount, 0)
103+    let U = {
71104         let P = getString(this, (w + "_assetId"))
72105         if ($isInstanceOf(P, "Unit"))
73106             then "unset"
74107             else if ($isInstanceOf(P, "String"))
75108                 then {
76-                    let Q = P
109+                    let V = P
77110                     throw("This square has already been purchased")
78111                     }
79112                 else throw("Match error")
80113         }
81-    if ((g > N))
114+    if ((g > T))
82115         then throw((("You need to send at least " + toString(g)) + "WAVLETS to purchase a square"))
83116         else {
84-            let z = toBase58String(L.caller.bytes)
85-            let A = toBase58String(L.transactionId)
86-            let R = x(n, o, "1", z, A)
87-            let G = R._1
88-            let H = R._2
89-            let F = R._3
90-            let I = R._4
91-            (J(I, toBase58String(H), F, z, "1") ++ [G, StringEntry((z + "_handle"), M), StringEntry(A, I), ScriptTransfer(L.caller, 1, H)])
117+            let z = toBase58String(R.caller.bytes)
118+            let A = toBase58String(R.transactionId)
119+            let W = x(n, o, "1", z, A)
120+            let G = W._1
121+            let H = W._2
122+            let F = W._3
123+            let I = W._4
124+            (J(I, toBase58String(H), F, z, "1") ++ [G, StringEntry((z + "_handle"), S), StringEntry(A, I), ScriptTransfer(R.caller, 1, H)])
92125             }
93126     }
94127 
95128 
96129 
97-@Callable(L)
130+@Callable(R)
98131 func autoBuy (n,o) = {
99-    let S = toBase58String(L.caller.bytes)
100-    if (if ((S != k))
101-        then (S != h)
132+    let X = toBase58String(R.caller.bytes)
133+    if (if ((X != k))
134+        then (X != h)
102135         else false)
103136         then throw("This can only be triggering internally")
104137         else {
105-            let A = toBase58String(L.transactionId)
106-            let T = x(n, o, "1", k, A)
107-            let G = T._1
108-            let H = T._2
109-            let F = T._3
110-            let I = T._4
111-            let U = toBase58String(H)
112-            let V = invoke(l, d, [k, U, 3], [AttachedPayment(unit, 0)])
113-            if ((V == V))
114-                then (J(I, U, F, k, "1") ++ [G, StringEntry(A, I), ScriptTransfer(l, 1, H)])
138+            let A = toBase58String(R.transactionId)
139+            let Y = x(n, o, "1", k, A)
140+            let G = Y._1
141+            let H = Y._2
142+            let F = Y._3
143+            let I = Y._4
144+            let Z = toBase58String(H)
145+            let aa = invoke(l, d, [k, Z, 3], [AttachedPayment(unit, 0)])
146+            if ((aa == aa))
147+                then (J(I, Z, F, k, "1") ++ [G, StringEntry(A, I), ScriptTransfer(l, 1, H)])
115148                 else throw("Strict value is not equal to itself.")
116149             }
117150     }
118151 
119152 
120153 
121-@Callable(L)
122-func evolve (n,o,y,z) = {
123-    let S = toBase58String(L.caller.bytes)
124-    if ((S != k))
154+@Callable(R)
155+func evolve (n,o,y,z,ab) = {
156+    let X = toBase58String(R.caller.bytes)
157+    if ((X != k))
125158         then throw("This can only be triggering internally")
126159         else {
127-            let A = toBase58String(L.transactionId)
128-            let W = x(n, o, y, z, A)
129-            let G = W._1
130-            let H = W._2
131-            let F = W._3
132-            let I = W._4
133-            (J(I, toBase58String(H), F, z, y) ++ [G, StringEntry(A, I), ScriptTransfer(Address(fromBase58String(z)), 1, H)])
160+            let A = toBase58String(R.transactionId)
161+            let ac = x(n, o, y, z, A)
162+            let G = ac._1
163+            let H = ac._2
164+            let F = ac._3
165+            let I = ac._4
166+            let ad = {
167+                let ae = split(ab, "|")
168+                let af = size(ae)
169+                let ag = nil
170+                func ah (ai,aj) =                 if ((aj >= af))
171+                    then ai
172+                    else L(ai, ae[aj])
173+
174+                func ak (ai,aj) =                 if ((aj >= af))
175+                    then ai
176+                    else throw("List size exceeds 110")
177+
178+                ak(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ag, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100), 101), 102), 103), 104), 105), 106), 107), 108), 109), 110)
179+                }
180+            ((ad ++ J(I, toBase58String(H), F, z, y)) ++ [G, StringEntry(A, I), ScriptTransfer(Address(fromBase58String(z)), 1, H)])
134181             }
135182     }
136183 
137184 
138185 
139-@Callable(L)
140-func putForSale (H,X) = {
141-    let S = toBase58String(L.caller.bytes)
142-    let Y = {
186+@Callable(R)
187+func putForSale (H,al) = {
188+    let X = toBase58String(R.caller.bytes)
189+    let am = {
143190         let P = assetInfo(fromBase58String(H))
144191         if ($isInstanceOf(P, "Asset"))
145192             then {
146-                let Z = P
147-                Z
193+                let an = P
194+                an
148195                 }
149196             else throw("Asset not found")
150197         }
151-    let aa = u(Y.name)
198+    let ao = u(am.name)
152199     let z = {
153-        let P = getString(this, (aa + "_owner"))
200+        let P = getString(this, (ao + "_owner"))
154201         if ($isInstanceOf(P, "String"))
155202             then {
156-                let ab = P
157-                ab
203+                let ap = P
204+                ap
158205                 }
159206             else throw("Owner not found in data")
160207         }
161-    if ((f > X))
208+    if ((f > al))
162209         then throw("Amount needs to be more than 1 wave")
163-        else if (if ((S != z))
164-            then (S != k)
210+        else if (if ((X != z))
211+            then (X != k)
165212             else false)
166213             then throw("You are not able to put this asset up for sale")
167214             else {
168-                let V = invoke(l, d, [S, H, X], [AttachedPayment(unit, 0)])
169-                if ((V == V))
215+                let aa = invoke(l, d, [X, H, al], [AttachedPayment(unit, 0)])
216+                if ((aa == aa))
170217                     then [ScriptTransfer(l, 1, fromBase58String(H))]
171218                     else throw("Strict value is not equal to itself.")
172219                 }
174221 
175222 
176223 
177-@Callable(L)
178-func finalizeSale (H,z,M) = {
179-    let S = toBase58String(L.caller.bytes)
180-    if ((S != k))
224+@Callable(R)
225+func finalizeSale (H,z,S) = {
226+    let X = toBase58String(R.caller.bytes)
227+    if ((X != k))
181228         then throw("This can only be triggering internally")
182229         else {
183230             let w = {
189236                         }
190237                     else throw("Can't find asset")
191238                 }
192-[StringEntry((w + "_owner"), z), StringEntry((z + "_handle"), M)]
239+[StringEntry((w + "_owner"), z), StringEntry((z + "_handle"), S)]
193240             }
194241     }
195242 
196243 
197244 
198-@Callable(L)
199-func adminPromotionPurchase (n,o,ac) = {
200-    let S = toBase58String(L.caller.bytes)
201-    if ((S != k))
245+@Callable(R)
246+func adminPromotionPurchase (n,o,aq) = {
247+    let X = toBase58String(R.caller.bytes)
248+    if ((X != k))
202249         then throw("This can only be triggering internally")
203250         else {
204-            let A = toBase58String(L.transactionId)
205-            let ad = x(n, o, "1", ac, A)
206-            let G = ad._1
207-            let H = ad._2
208-            let F = ad._3
209-            let I = ad._4
210-            let U = toBase58String(H)
211-            (J(I, U, F, ac, "1") ++ [G, StringEntry(A, I), ScriptTransfer(Address(fromBase58String(ac)), 1, H)])
251+            let A = toBase58String(R.transactionId)
252+            let ar = x(n, o, "1", aq, A)
253+            let G = ar._1
254+            let H = ar._2
255+            let F = ar._3
256+            let I = ar._4
257+            let Z = toBase58String(H)
258+            (J(I, Z, F, aq, "1") ++ [G, StringEntry(A, I), ScriptTransfer(Address(fromBase58String(aq)), 1, H)])
212259             }
213260     }
214261 
215262 
216263 
217-@Callable(L)
218-func adminSetHandle (z,ae) = {
219-    let S = toBase58String(L.caller.bytes)
220-    if ((S != k))
264+@Callable(R)
265+func adminSetHandle (z,as) = {
266+    let X = toBase58String(R.caller.bytes)
267+    if ((X != k))
221268         then throw("This can only be triggering internally")
222-        else [StringEntry((z + "_handle"), ae)]
269+        else [StringEntry((z + "_handle"), as)]
223270     }
224271 
225272 
226-
227-@Callable(L)
228-func burnTest (H) = [Burn(fromBase58String(H), 1)]
229-
230-
231-@Verifier(af)
232-func ag () = if (if (sigVerify(af.bodyBytes, af.proofs[0], af.senderPublicKey))
273+@Verifier(at)
274+func au () = if (if (sigVerify(at.bodyBytes, at.proofs[0], at.senderPublicKey))
233275     then true
234-    else (addressFromPublicKey(af.senderPublicKey) == l))
276+    else (addressFromPublicKey(at.senderPublicKey) == l))
235277     then true
236-    else (addressFromPublicKey(af.senderPublicKey) == i)
278+    else (addressFromPublicKey(at.senderPublicKey) == i)
237279 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let a = 1024
55 
66 let b = 1024
77 
88 let c = "https://nft.gridgang.io/"
99 
1010 let d = "addOwnerAndAmount"
1111 
1212 let e = true
1313 
1414 let f = 100000000
1515 
1616 let g = 1000000
1717 
1818 let h = "3N7J6mMMkjVViBREz9y53JmcX7r7KZRXQpL"
1919 
2020 let i = Address(fromBase58String(h))
2121 
2222 let j = "AyAwWbMPM7a4VYkn1bhEBftC5WZgfvUXgrYDe98mvLsv"
2323 
2424 let k = "3MwPsLy9F1mUQrdP37sCAKvHuE5HvPE674Y"
2525 
2626 let l = Address(fromBase58String(k))
2727 
2828 func m (n,o) = ((n + ",") + o)
2929 
3030 
3131 func p (n,o) = m(n, o)
3232 
3333 
3434 func q (r) = {
3535     let s = split(r, ",")
3636     let t = $Tuple2(s[0], s[1])
3737     t
3838     }
3939 
4040 
4141 func u (r) = {
4242     let v = q(r)
4343     let n = v._1
4444     let o = v._2
4545     let w = p(n, o)
4646     w
4747     }
4848 
4949 
5050 func x (n,o,y,z,A) = {
5151     let B = n
5252     let C = o
5353     let D = y
5454     let E = m(B, C)
5555     let F = ((c + A) + ".png")
5656     let G = Issue(E, F, 1, 0, false)
5757     let H = calculateAssetId(G)
5858     let I = p(B, C)
5959     $Tuple4(G, H, F, I)
6060     }
6161 
6262 
6363 func J (w,H,G,K,y) = [StringEntry((w + "_assetId"), H), StringEntry((w + "_asset"), G), StringEntry((w + "_owner"), K), StringEntry((w + "_gen"), y)]
6464 
6565 
66-@Callable(L)
67-func purchase (n,o,M) = {
66+func L (M,N) = {
67+    let O = {
68+        let P = N
69+        if ($isInstanceOf(P, "Unit"))
70+            then "unset"
71+            else if ($isInstanceOf(P, "String"))
72+                then {
73+                    let Q = P
74+                    Q
75+                    }
76+                else throw("Match error")
77+        }
78+    if ((O == "unset"))
79+        then M
80+        else {
81+            let H = {
82+                let P = getString(this, (O + "_assetId"))
83+                if ($isInstanceOf(P, "Unit"))
84+                    then "unset"
85+                    else if ($isInstanceOf(P, "String"))
86+                        then {
87+                            let Q = P
88+                            Q
89+                            }
90+                        else throw("Match error")
91+                }
92+            if ((H == "unset"))
93+                then M
94+                else (M ++ [Burn(fromBase58String(H), 1)])
95+            }
96+    }
97+
98+
99+@Callable(R)
100+func purchase (n,o,S) = {
68101     let w = p(n, o)
69-    let N = valueOrElse(L.payments[0].amount, 0)
70-    let O = {
102+    let T = valueOrElse(R.payments[0].amount, 0)
103+    let U = {
71104         let P = getString(this, (w + "_assetId"))
72105         if ($isInstanceOf(P, "Unit"))
73106             then "unset"
74107             else if ($isInstanceOf(P, "String"))
75108                 then {
76-                    let Q = P
109+                    let V = P
77110                     throw("This square has already been purchased")
78111                     }
79112                 else throw("Match error")
80113         }
81-    if ((g > N))
114+    if ((g > T))
82115         then throw((("You need to send at least " + toString(g)) + "WAVLETS to purchase a square"))
83116         else {
84-            let z = toBase58String(L.caller.bytes)
85-            let A = toBase58String(L.transactionId)
86-            let R = x(n, o, "1", z, A)
87-            let G = R._1
88-            let H = R._2
89-            let F = R._3
90-            let I = R._4
91-            (J(I, toBase58String(H), F, z, "1") ++ [G, StringEntry((z + "_handle"), M), StringEntry(A, I), ScriptTransfer(L.caller, 1, H)])
117+            let z = toBase58String(R.caller.bytes)
118+            let A = toBase58String(R.transactionId)
119+            let W = x(n, o, "1", z, A)
120+            let G = W._1
121+            let H = W._2
122+            let F = W._3
123+            let I = W._4
124+            (J(I, toBase58String(H), F, z, "1") ++ [G, StringEntry((z + "_handle"), S), StringEntry(A, I), ScriptTransfer(R.caller, 1, H)])
92125             }
93126     }
94127 
95128 
96129 
97-@Callable(L)
130+@Callable(R)
98131 func autoBuy (n,o) = {
99-    let S = toBase58String(L.caller.bytes)
100-    if (if ((S != k))
101-        then (S != h)
132+    let X = toBase58String(R.caller.bytes)
133+    if (if ((X != k))
134+        then (X != h)
102135         else false)
103136         then throw("This can only be triggering internally")
104137         else {
105-            let A = toBase58String(L.transactionId)
106-            let T = x(n, o, "1", k, A)
107-            let G = T._1
108-            let H = T._2
109-            let F = T._3
110-            let I = T._4
111-            let U = toBase58String(H)
112-            let V = invoke(l, d, [k, U, 3], [AttachedPayment(unit, 0)])
113-            if ((V == V))
114-                then (J(I, U, F, k, "1") ++ [G, StringEntry(A, I), ScriptTransfer(l, 1, H)])
138+            let A = toBase58String(R.transactionId)
139+            let Y = x(n, o, "1", k, A)
140+            let G = Y._1
141+            let H = Y._2
142+            let F = Y._3
143+            let I = Y._4
144+            let Z = toBase58String(H)
145+            let aa = invoke(l, d, [k, Z, 3], [AttachedPayment(unit, 0)])
146+            if ((aa == aa))
147+                then (J(I, Z, F, k, "1") ++ [G, StringEntry(A, I), ScriptTransfer(l, 1, H)])
115148                 else throw("Strict value is not equal to itself.")
116149             }
117150     }
118151 
119152 
120153 
121-@Callable(L)
122-func evolve (n,o,y,z) = {
123-    let S = toBase58String(L.caller.bytes)
124-    if ((S != k))
154+@Callable(R)
155+func evolve (n,o,y,z,ab) = {
156+    let X = toBase58String(R.caller.bytes)
157+    if ((X != k))
125158         then throw("This can only be triggering internally")
126159         else {
127-            let A = toBase58String(L.transactionId)
128-            let W = x(n, o, y, z, A)
129-            let G = W._1
130-            let H = W._2
131-            let F = W._3
132-            let I = W._4
133-            (J(I, toBase58String(H), F, z, y) ++ [G, StringEntry(A, I), ScriptTransfer(Address(fromBase58String(z)), 1, H)])
160+            let A = toBase58String(R.transactionId)
161+            let ac = x(n, o, y, z, A)
162+            let G = ac._1
163+            let H = ac._2
164+            let F = ac._3
165+            let I = ac._4
166+            let ad = {
167+                let ae = split(ab, "|")
168+                let af = size(ae)
169+                let ag = nil
170+                func ah (ai,aj) =                 if ((aj >= af))
171+                    then ai
172+                    else L(ai, ae[aj])
173+
174+                func ak (ai,aj) =                 if ((aj >= af))
175+                    then ai
176+                    else throw("List size exceeds 110")
177+
178+                ak(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ah(ag, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26), 27), 28), 29), 30), 31), 32), 33), 34), 35), 36), 37), 38), 39), 40), 41), 42), 43), 44), 45), 46), 47), 48), 49), 50), 51), 52), 53), 54), 55), 56), 57), 58), 59), 60), 61), 62), 63), 64), 65), 66), 67), 68), 69), 70), 71), 72), 73), 74), 75), 76), 77), 78), 79), 80), 81), 82), 83), 84), 85), 86), 87), 88), 89), 90), 91), 92), 93), 94), 95), 96), 97), 98), 99), 100), 101), 102), 103), 104), 105), 106), 107), 108), 109), 110)
179+                }
180+            ((ad ++ J(I, toBase58String(H), F, z, y)) ++ [G, StringEntry(A, I), ScriptTransfer(Address(fromBase58String(z)), 1, H)])
134181             }
135182     }
136183 
137184 
138185 
139-@Callable(L)
140-func putForSale (H,X) = {
141-    let S = toBase58String(L.caller.bytes)
142-    let Y = {
186+@Callable(R)
187+func putForSale (H,al) = {
188+    let X = toBase58String(R.caller.bytes)
189+    let am = {
143190         let P = assetInfo(fromBase58String(H))
144191         if ($isInstanceOf(P, "Asset"))
145192             then {
146-                let Z = P
147-                Z
193+                let an = P
194+                an
148195                 }
149196             else throw("Asset not found")
150197         }
151-    let aa = u(Y.name)
198+    let ao = u(am.name)
152199     let z = {
153-        let P = getString(this, (aa + "_owner"))
200+        let P = getString(this, (ao + "_owner"))
154201         if ($isInstanceOf(P, "String"))
155202             then {
156-                let ab = P
157-                ab
203+                let ap = P
204+                ap
158205                 }
159206             else throw("Owner not found in data")
160207         }
161-    if ((f > X))
208+    if ((f > al))
162209         then throw("Amount needs to be more than 1 wave")
163-        else if (if ((S != z))
164-            then (S != k)
210+        else if (if ((X != z))
211+            then (X != k)
165212             else false)
166213             then throw("You are not able to put this asset up for sale")
167214             else {
168-                let V = invoke(l, d, [S, H, X], [AttachedPayment(unit, 0)])
169-                if ((V == V))
215+                let aa = invoke(l, d, [X, H, al], [AttachedPayment(unit, 0)])
216+                if ((aa == aa))
170217                     then [ScriptTransfer(l, 1, fromBase58String(H))]
171218                     else throw("Strict value is not equal to itself.")
172219                 }
173220     }
174221 
175222 
176223 
177-@Callable(L)
178-func finalizeSale (H,z,M) = {
179-    let S = toBase58String(L.caller.bytes)
180-    if ((S != k))
224+@Callable(R)
225+func finalizeSale (H,z,S) = {
226+    let X = toBase58String(R.caller.bytes)
227+    if ((X != k))
181228         then throw("This can only be triggering internally")
182229         else {
183230             let w = {
184231                 let P = assetInfo(fromBase58String(H))
185232                 if ($isInstanceOf(P, "Asset"))
186233                     then {
187234                         let G = P
188235                         G.name
189236                         }
190237                     else throw("Can't find asset")
191238                 }
192-[StringEntry((w + "_owner"), z), StringEntry((z + "_handle"), M)]
239+[StringEntry((w + "_owner"), z), StringEntry((z + "_handle"), S)]
193240             }
194241     }
195242 
196243 
197244 
198-@Callable(L)
199-func adminPromotionPurchase (n,o,ac) = {
200-    let S = toBase58String(L.caller.bytes)
201-    if ((S != k))
245+@Callable(R)
246+func adminPromotionPurchase (n,o,aq) = {
247+    let X = toBase58String(R.caller.bytes)
248+    if ((X != k))
202249         then throw("This can only be triggering internally")
203250         else {
204-            let A = toBase58String(L.transactionId)
205-            let ad = x(n, o, "1", ac, A)
206-            let G = ad._1
207-            let H = ad._2
208-            let F = ad._3
209-            let I = ad._4
210-            let U = toBase58String(H)
211-            (J(I, U, F, ac, "1") ++ [G, StringEntry(A, I), ScriptTransfer(Address(fromBase58String(ac)), 1, H)])
251+            let A = toBase58String(R.transactionId)
252+            let ar = x(n, o, "1", aq, A)
253+            let G = ar._1
254+            let H = ar._2
255+            let F = ar._3
256+            let I = ar._4
257+            let Z = toBase58String(H)
258+            (J(I, Z, F, aq, "1") ++ [G, StringEntry(A, I), ScriptTransfer(Address(fromBase58String(aq)), 1, H)])
212259             }
213260     }
214261 
215262 
216263 
217-@Callable(L)
218-func adminSetHandle (z,ae) = {
219-    let S = toBase58String(L.caller.bytes)
220-    if ((S != k))
264+@Callable(R)
265+func adminSetHandle (z,as) = {
266+    let X = toBase58String(R.caller.bytes)
267+    if ((X != k))
221268         then throw("This can only be triggering internally")
222-        else [StringEntry((z + "_handle"), ae)]
269+        else [StringEntry((z + "_handle"), as)]
223270     }
224271 
225272 
226-
227-@Callable(L)
228-func burnTest (H) = [Burn(fromBase58String(H), 1)]
229-
230-
231-@Verifier(af)
232-func ag () = if (if (sigVerify(af.bodyBytes, af.proofs[0], af.senderPublicKey))
273+@Verifier(at)
274+func au () = if (if (sigVerify(at.bodyBytes, at.proofs[0], at.senderPublicKey))
233275     then true
234-    else (addressFromPublicKey(af.senderPublicKey) == l))
276+    else (addressFromPublicKey(at.senderPublicKey) == l))
235277     then true
236-    else (addressFromPublicKey(af.senderPublicKey) == i)
278+    else (addressFromPublicKey(at.senderPublicKey) == i)
237279 
github/deemru/w8io/026f985 
133.56 ms ◑