w8 · tx · FxU···HGy

tx · FxUFGsw1FwwuA9TEjrbyEDnpo4CLPca9tbDKrBHmhHGy

3N7J6mMMkjVViBREz9y53JmcX7r7KZRXQpL:  -0.04000000 Waves

2022.04.20 16:21 [2016917] smart account 3N7J6mMMkjVViBREz9y53JmcX7r7KZRXQpL > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "FxUFGsw1FwwuA9TEjrbyEDnpo4CLPca9tbDKrBHmhHGy",
    "fee": 4000000,
    "feeAssetId": null,
    "timestamp": 1650460887261,
    "version": 2,
    "chainId": 84,
    "sender": "3N7J6mMMkjVViBREz9y53JmcX7r7KZRXQpL",
    "senderPublicKey": "G6aSmaqLJ4p7jzm7BnQcZuqa2NRRLVtzqdYNjYErnEZZ",
    "proofs": [
        "2L71ZawSA6es3BBkQApkWGL1Ysh6HLJ6AbbqSQmUY19ZaxbgV9xRxQ6UwXPbdtzXekvqRW6UXTSehiaocPnF8nU3"
    ],
    "script": "base64:AAIFAAAAAAAAADEIAhIFCgMICAgSBAoCCAgSBgoECAgICBIECgIIARIFCgMICAgSBQoDCAgIEgQKAggIAAAAEwAAAAAEQ09MUwAAAAAAAAAEAAAAAAAEUk9XUwAAAAAAAAAEAAAAAAAJbmZ0RG9tYWluAgAAABhodHRwczovL25mdC5ncmlkZ2FuZy5pby8AAAAAFWFkZE93bmVyQW5kQW1vdW50RnVuYwIAAAARYWRkT3duZXJBbmRBbW91bnQAAAAABURFQlVHBgAAAAARbWluRm9yU2FsZVdhdmxldHMAAAAAAAX14QAAAAAAEG1pblB1cmNoYXNlUHJpY2UAAAAAAAAPQkAAAAAABGRhcHACAAAAIzNON0o2bU1Na2pWVmlCUkV6OXk1M0ptY1g3cjdLWlJYUXBMAAAAAAtkYXBwQWRkcmVzcwkBAAAAB0FkZHJlc3MAAAABCQACWQAAAAEFAAAABGRhcHAAAAAAEWhvbGRpbmdzUHVibGljS2V5AgAAACxBeUF3V2JNUE03YTRWWWtuMWJoRUJmdEM1V1pnZnZVWGdyWURlOThtdkxzdgAAAAAIaG9sZGluZ3MCAAAAIzNNd1BzTHk5RjFtVVFyZFAzN3NDQUt2SHVFNUh2UEU2NzRZAAAAAA9ob2xkaW5nc0FkZHJlc3MJAQAAAAdBZGRyZXNzAAAAAQkAAlkAAAABBQAAAAhob2xkaW5ncwEAAAAMZ2V0QXNzZXROYW1lAAAAAgAAAAF4AAAAAXkJAAEsAAAAAgkAASwAAAACBQAAAAF4AgAAAAEsBQAAAAF5AQAAABBnZXREYXRhS2V5UHJlZml4AAAAAgAAAAF4AAAAAXkJAQAAAAxnZXRBc3NldE5hbWUAAAACBQAAAAF4BQAAAAF5AQAAABBnZXRYWUdlbkZyb21OYW1lAAAAAQAAAARuYW1lBAAAAAVwYXJ0cwkABLUAAAACBQAAAARuYW1lAgAAAAEsBAAAAAV0dXBsZQkABRQAAAACCQABkQAAAAIFAAAABXBhcnRzAAAAAAAAAAAACQABkQAAAAIFAAAABXBhcnRzAAAAAAAAAAABBQAAAAV0dXBsZQEAAAAdZ2V0RGF0YUtleVByZWZpeEZyb21Bc3NldE5hbWUAAAABAAAABG5hbWUEAAAACSR0MDkwNjk0MQkBAAAAEGdldFhZR2VuRnJvbU5hbWUAAAABBQAAAARuYW1lBAAAAAF4CAUAAAAJJHQwOTA2OTQxAAAAAl8xBAAAAAF5CAUAAAAJJHQwOTA2OTQxAAAAAl8yBAAAAAZwcmVmaXgJAQAAABBnZXREYXRhS2V5UHJlZml4AAAAAgUAAAABeAUAAAABeQUAAAAGcHJlZml4AQAAAAtjbGFpbVNxdWFyZQAAAAUAAAABeAAAAAF5AAAAA2dlbgAAAAdvd25lcklkAAAADXRyYW5zYWN0aW9uSWQEAAAADHJlc29sdmVkWFN0cgUAAAABeAQAAAAMcmVzb2x2ZWRZU3RyBQAAAAF5BAAAAA5yZXNvbHZlZEdlblN0cgUAAAADZ2VuBAAAAAlhc3NldE5hbWUJAQAAAAxnZXRBc3NldE5hbWUAAAACBQAAAAxyZXNvbHZlZFhTdHIFAAAADHJlc29sdmVkWVN0cgQAAAAIYXNzZXRVcmwJAAEsAAAAAgkAASwAAAACBQAAAAluZnREb21haW4FAAAADXRyYW5zYWN0aW9uSWQCAAAABC5wbmcEAAAABWFzc2V0CQAEQgAAAAUFAAAACWFzc2V0TmFtZQUAAAAIYXNzZXRVcmwAAAAAAAAAAAEAAAAAAAAAAAAHBAAAAAdhc3NldElkCQAEOAAAAAEFAAAABWFzc2V0BAAAAA1kYXRhS2V5UHJlZml4CQEAAAAQZ2V0RGF0YUtleVByZWZpeAAAAAIFAAAADHJlc29sdmVkWFN0cgUAAAAMcmVzb2x2ZWRZU3RyCQAFFgAAAAQFAAAABWFzc2V0BQAAAAdhc3NldElkBQAAAAhhc3NldFVybAUAAAANZGF0YUtleVByZWZpeAEAAAAVZ2V0VHJhbnNhY3Rpb25FbnRyaWVzAAAABQAAAAZwcmVmaXgAAAAHYXNzZXRJZAAAAAVhc3NldAAAAAVvd25lcgAAAANnZW4JAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACBQAAAAZwcmVmaXgCAAAACF9hc3NldElkBQAAAAdhc3NldElkCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAAGcHJlZml4AgAAAAZfYXNzZXQFAAAABWFzc2V0CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAAGcHJlZml4AgAAAAZfb3duZXIFAAAABW93bmVyCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAAGcHJlZml4AgAAAARfZ2VuBQAAAANnZW4FAAAAA25pbAEAAAAIYnVybkZvbGQAAAACAAAABWFjY3VtAAAABG5leHQEAAAADHJlc29sdmVkTmV4dAQAAAAHJG1hdGNoMAUAAAAEbmV4dAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAEVW5pdAIAAAAFdW5zZXQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAADdmFsBQAAAAckbWF0Y2gwBQAAAAN2YWwJAAACAAAAAQIAAAALTWF0Y2ggZXJyb3IDCQAAAAAAAAIFAAAADHJlc29sdmVkTmV4dAIAAAAFdW5zZXQFAAAABWFjY3VtBAAAAAdhc3NldElkBAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAABHRoaXMJAAEsAAAAAgUAAAAMcmVzb2x2ZWROZXh0AgAAAAhfYXNzZXRJZAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAEVW5pdAIAAAAFdW5zZXQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAADdmFsBQAAAAckbWF0Y2gwBQAAAAN2YWwJAAACAAAAAQIAAAALTWF0Y2ggZXJyb3IDCQAAAAAAAAIFAAAAB2Fzc2V0SWQCAAAABXVuc2V0BQAAAAVhY2N1bQkABE4AAAACBQAAAAVhY2N1bQkABEwAAAACCQEAAAAEQnVybgAAAAIJAAJZAAAAAQUAAAAHYXNzZXRJZAAAAAAAAAAAAQUAAAADbmlsAAAABwAAAAFpAQAAAAhwdXJjaGFzZQAAAAMAAAABeAAAAAF5AAAACHVzZXJUZXh0BAAAAAZwcmVmaXgJAQAAABBnZXREYXRhS2V5UHJlZml4AAAAAgUAAAABeAUAAAABeQQAAAANcGF5bWVudEFtb3VudAkBAAAAC3ZhbHVlT3JFbHNlAAAAAggJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAAAAAGYW1vdW50AAAAAAAAAAAABAAAAA9leGlzdGluZ0Fzc2V0SWQEAAAAByRtYXRjaDAJAAQdAAAAAgUAAAAEdGhpcwkAASwAAAACBQAAAAZwcmVmaXgCAAAACF9hc3NldElkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAARVbml0AgAAAAV1bnNldAMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAANlcnIFAAAAByRtYXRjaDAJAAACAAAAAQIAAAAmVGhpcyBzcXVhcmUgaGFzIGFscmVhZHkgYmVlbiBwdXJjaGFzZWQJAAACAAAAAQIAAAALTWF0Y2ggZXJyb3IDCQAAZgAAAAIFAAAAEG1pblB1cmNoYXNlUHJpY2UFAAAADXBheW1lbnRBbW91bnQJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAAGllvdSBuZWVkIHRvIHNlbmQgYXQgbGVhc3QgCQABpAAAAAEFAAAAEG1pblB1cmNoYXNlUHJpY2UCAAAAHFdBVkxFVFMgdG8gcHVyY2hhc2UgYSBzcXVhcmUEAAAAB293bmVySWQJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwQAAAANdHJhbnNhY3Rpb25JZAkAAlgAAAABCAUAAAABaQAAAA10cmFuc2FjdGlvbklkBAAAAAskdDAyODYxMjk1NgkBAAAAC2NsYWltU3F1YXJlAAAABQUAAAABeAUAAAABeQIAAAABMQUAAAAHb3duZXJJZAUAAAANdHJhbnNhY3Rpb25JZAQAAAAFYXNzZXQIBQAAAAskdDAyODYxMjk1NgAAAAJfMQQAAAAHYXNzZXRJZAgFAAAACyR0MDI4NjEyOTU2AAAAAl8yBAAAAAhhc3NldFVybAgFAAAACyR0MDI4NjEyOTU2AAAAAl8zBAAAAA1kYXRhS2V5UHJlZml4CAUAAAALJHQwMjg2MTI5NTYAAAACXzQJAAROAAAAAgkBAAAAFWdldFRyYW5zYWN0aW9uRW50cmllcwAAAAUFAAAADWRhdGFLZXlQcmVmaXgJAAJYAAAAAQUAAAAHYXNzZXRJZAUAAAAIYXNzZXRVcmwFAAAAB293bmVySWQCAAAAATEJAARMAAAAAgUAAAAFYXNzZXQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACBQAAAAdvd25lcklkAgAAAAdfaGFuZGxlBQAAAAh1c2VyVGV4dAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAA10cmFuc2FjdGlvbklkBQAAAA1kYXRhS2V5UHJlZml4CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgAAAAAAAAAAAQUAAAAHYXNzZXRJZAUAAAADbmlsAAAAAWkBAAAAB2F1dG9CdXkAAAACAAAAAXgAAAABeQQAAAAIY2FsbGVySWQJAAJYAAAAAQgIBQAAAAFpAAAABmNhbGxlcgAAAAVieXRlcwMDCQEAAAACIT0AAAACBQAAAAhjYWxsZXJJZAUAAAAIaG9sZGluZ3MJAQAAAAIhPQAAAAIFAAAACGNhbGxlcklkBQAAAARkYXBwBwkAAAIAAAABAgAAACZUaGlzIGNhbiBvbmx5IGJlIHRyaWdnZXJpbmcgaW50ZXJuYWxseQQAAAANdHJhbnNhY3Rpb25JZAkAAlgAAAABCAUAAAABaQAAAA10cmFuc2FjdGlvbklkBAAAAAskdDAzNDkxMzU4NwkBAAAAC2NsYWltU3F1YXJlAAAABQUAAAABeAUAAAABeQIAAAABMQUAAAAIaG9sZGluZ3MFAAAADXRyYW5zYWN0aW9uSWQEAAAABWFzc2V0CAUAAAALJHQwMzQ5MTM1ODcAAAACXzEEAAAAB2Fzc2V0SWQIBQAAAAskdDAzNDkxMzU4NwAAAAJfMgQAAAAIYXNzZXRVcmwIBQAAAAskdDAzNDkxMzU4NwAAAAJfMwQAAAANZGF0YUtleVByZWZpeAgFAAAACyR0MDM0OTEzNTg3AAAAAl80BAAAAAphc3NldElkU3RyCQACWAAAAAEFAAAAB2Fzc2V0SWQEAAAAA3JlcwkAA/wAAAAEBQAAAA9ob2xkaW5nc0FkZHJlc3MFAAAAFWFkZE93bmVyQW5kQW1vdW50RnVuYwkABEwAAAACBQAAAAhob2xkaW5ncwkABEwAAAACBQAAAAphc3NldElkU3RyCQAETAAAAAIAAAAAAAAAAAMFAAAAA25pbAkABEwAAAACCQEAAAAPQXR0YWNoZWRQYXltZW50AAAAAgUAAAAEdW5pdAAAAAAAAAAAAAUAAAADbmlsAwkAAAAAAAACBQAAAANyZXMFAAAAA3JlcwkABE4AAAACCQEAAAAVZ2V0VHJhbnNhY3Rpb25FbnRyaWVzAAAABQUAAAANZGF0YUtleVByZWZpeAUAAAAKYXNzZXRJZFN0cgUAAAAIYXNzZXRVcmwFAAAACGhvbGRpbmdzAgAAAAExCQAETAAAAAIFAAAABWFzc2V0CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAADXRyYW5zYWN0aW9uSWQFAAAADWRhdGFLZXlQcmVmaXgJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwUAAAAPaG9sZGluZ3NBZGRyZXNzAAAAAAAAAAABBQAAAAdhc3NldElkBQAAAANuaWwJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAWkBAAAABmV2b2x2ZQAAAAQAAAABeAAAAAF5AAAAA2dlbgAAAAxjb29yZHNUb0J1cm4EAAAACGNhbGxlcklkCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAADXRyYW5zYWN0aW9uSWQJAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAQAAAALJHQwNDE1NTQ1MTgJAQAAAAtjbGFpbVNxdWFyZQAAAAUFAAAAAXgFAAAAAXkFAAAAA2dlbgUAAAAIY2FsbGVySWQFAAAADXRyYW5zYWN0aW9uSWQEAAAABWFzc2V0CAUAAAALJHQwNDE1NTQ1MTgAAAACXzEEAAAAB2Fzc2V0SWQIBQAAAAskdDA0MTU1NDUxOAAAAAJfMgQAAAAIYXNzZXRVcmwIBQAAAAskdDA0MTU1NDUxOAAAAAJfMwQAAAANZGF0YUtleVByZWZpeAgFAAAACyR0MDQxNTU0NTE4AAAAAl80BAAAABBidXJuVHJhbnNhY3Rpb25zCgAAAAACJGwJAAS1AAAAAgUAAAAMY29vcmRzVG9CdXJuAgAAAAF8CgAAAAACJHMJAAGQAAAAAQUAAAACJGwKAAAAAAUkYWNjMAUAAAADbmlsCgEAAAAFJGYwXzEAAAACAAAAAiRhAAAAAiRpAwkAAGcAAAACBQAAAAIkaQUAAAACJHMFAAAAAiRhCQEAAAAIYnVybkZvbGQAAAACBQAAAAIkYQkAAZEAAAACBQAAAAIkbAUAAAACJGkKAQAAAAUkZjBfMgAAAAIAAAACJGEAAAACJGkDCQAAZwAAAAIFAAAAAiRpBQAAAAIkcwUAAAACJGEJAAACAAAAAQIAAAAVTGlzdCBzaXplIGV4Y2VlZHMgMTEwCQEAAAAFJGYwXzIAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACCQEAAAAFJGYwXzEAAAACBQAAAAUkYWNjMAAAAAAAAAAAAAAAAAAAAAAAAQAAAAAAAAAAAgAAAAAAAAAAAwAAAAAAAAAABAAAAAAAAAAABQAAAAAAAAAABgAAAAAAAAAABwAAAAAAAAAACAAAAAAAAAAACQAAAAAAAAAACgAAAAAAAAAACwAAAAAAAAAADAAAAAAAAAAADQAAAAAAAAAADgAAAAAAAAAADwAAAAAAAAAAEAAAAAAAAAAAEQAAAAAAAAAAEgAAAAAAAAAAEwAAAAAAAAAAFAAAAAAAAAAAFQAAAAAAAAAAFgAAAAAAAAAAFwAAAAAAAAAAGAAAAAAAAAAAGQAAAAAAAAAAGgAAAAAAAAAAGwAAAAAAAAAAHAAAAAAAAAAAHQAAAAAAAAAAHgAAAAAAAAAAHwAAAAAAAAAAIAAAAAAAAAAAIQAAAAAAAAAAIgAAAAAAAAAAIwAAAAAAAAAAJAAAAAAAAAAAJQAAAAAAAAAAJgAAAAAAAAAAJwAAAAAAAAAAKAAAAAAAAAAAKQAAAAAAAAAAKgAAAAAAAAAAKwAAAAAAAAAALAAAAAAAAAAALQAAAAAAAAAALgAAAAAAAAAALwAAAAAAAAAAMAAAAAAAAAAAMQAAAAAAAAAAMgAAAAAAAAAAMwAAAAAAAAAANAAAAAAAAAAANQAAAAAAAAAANgAAAAAAAAAANwAAAAAAAAAAOAAAAAAAAAAAOQAAAAAAAAAAOgAAAAAAAAAAOwAAAAAAAAAAPAAAAAAAAAAAPQAAAAAAAAAAPgAAAAAAAAAAPwAAAAAAAAAAQAAAAAAAAAAAQQAAAAAAAAAAQgAAAAAAAAAAQwAAAAAAAAAARAAAAAAAAAAARQAAAAAAAAAARgAAAAAAAAAARwAAAAAAAAAASAAAAAAAAAAASQAAAAAAAAAASgAAAAAAAAAASwAAAAAAAAAATAAAAAAAAAAATQAAAAAAAAAATgAAAAAAAAAATwAAAAAAAAAAUAAAAAAAAAAAUQAAAAAAAAAAUgAAAAAAAAAAUwAAAAAAAAAAVAAAAAAAAAAAVQAAAAAAAAAAVgAAAAAAAAAAVwAAAAAAAAAAWAAAAAAAAAAAWQAAAAAAAAAAWgAAAAAAAAAAWwAAAAAAAAAAXAAAAAAAAAAAXQAAAAAAAAAAXgAAAAAAAAAAXwAAAAAAAAAAYAAAAAAAAAAAYQAAAAAAAAAAYgAAAAAAAAAAYwAAAAAAAAAAZAAAAAAAAAAAZQAAAAAAAAAAZgAAAAAAAAAAZwAAAAAAAAAAaAAAAAAAAAAAaQAAAAAAAAAAagAAAAAAAAAAawAAAAAAAAAAbAAAAAAAAAAAbQAAAAAAAAAAbgkABE4AAAACCQAETgAAAAIFAAAAEGJ1cm5UcmFuc2FjdGlvbnMJAQAAABVnZXRUcmFuc2FjdGlvbkVudHJpZXMAAAAFBQAAAA1kYXRhS2V5UHJlZml4CQACWAAAAAEFAAAAB2Fzc2V0SWQFAAAACGFzc2V0VXJsBQAAAAhjYWxsZXJJZAUAAAADZ2VuCQAETAAAAAIFAAAABWFzc2V0CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAADXRyYW5zYWN0aW9uSWQFAAAADWRhdGFLZXlQcmVmaXgJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyAAAAAAAAAAABBQAAAAdhc3NldElkBQAAAANuaWwAAAABaQEAAAAKcHV0Rm9yU2FsZQAAAAIAAAAHYXNzZXRJZAAAAAZhbW91bnQEAAAACGNhbGxlcklkCQACWAAAAAEICAUAAAABaQAAAAZjYWxsZXIAAAAFYnl0ZXMEAAAACWFzc2V0RGF0YQQAAAAHJG1hdGNoMAkAA+wAAAABCQACWQAAAAEFAAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABUFzc2V0BAAAAANhc3MFAAAAByRtYXRjaDAFAAAAA2FzcwkAAAIAAAABAgAAAA9Bc3NldCBub3QgZm91bmQEAAAACmRhdGFQcmVmaXgJAQAAAB1nZXREYXRhS2V5UHJlZml4RnJvbUFzc2V0TmFtZQAAAAEIBQAAAAlhc3NldERhdGEAAAAEbmFtZQQAAAAHb3duZXJJZAQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzCQABLAAAAAIFAAAACmRhdGFQcmVmaXgCAAAABl9vd25lcgMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFzBQAAAAckbWF0Y2gwBQAAAAFzCQAAAgAAAAECAAAAF093bmVyIG5vdCBmb3VuZCBpbiBkYXRhAwkAAGYAAAACBQAAABFtaW5Gb3JTYWxlV2F2bGV0cwUAAAAGYW1vdW50CQAAAgAAAAECAAAAI0Ftb3VudCBuZWVkcyB0byBiZSBtb3JlIHRoYW4gMSB3YXZlAwMJAQAAAAIhPQAAAAIFAAAACGNhbGxlcklkBQAAAAdvd25lcklkCQEAAAACIT0AAAACBQAAAAhjYWxsZXJJZAUAAAAIaG9sZGluZ3MHCQAAAgAAAAECAAAALllvdSBhcmUgbm90IGFibGUgdG8gcHV0IHRoaXMgYXNzZXQgdXAgZm9yIHNhbGUEAAAAA3JlcwkAA/wAAAAEBQAAAA9ob2xkaW5nc0FkZHJlc3MFAAAAFWFkZE93bmVyQW5kQW1vdW50RnVuYwkABEwAAAACBQAAAAhjYWxsZXJJZAkABEwAAAACBQAAAAdhc3NldElkCQAETAAAAAIFAAAABmFtb3VudAUAAAADbmlsCQAETAAAAAIJAQAAAA9BdHRhY2hlZFBheW1lbnQAAAACBQAAAAR1bml0AAAAAAAAAAAABQAAAANuaWwDCQAAAAAAAAIFAAAAA3JlcwUAAAADcmVzCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAD2hvbGRpbmdzQWRkcmVzcwAAAAAAAAAAAQkAAlkAAAABBQAAAAdhc3NldElkBQAAAANuaWwJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAWkBAAAADGZpbmFsaXplU2FsZQAAAAMAAAAHYXNzZXRJZAAAAAdvd25lcklkAAAACHVzZXJUZXh0BAAAAAhjYWxsZXJJZAkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAwkBAAAAAiE9AAAAAgUAAAAIY2FsbGVySWQFAAAACGhvbGRpbmdzCQAAAgAAAAECAAAAJlRoaXMgY2FuIG9ubHkgYmUgdHJpZ2dlcmluZyBpbnRlcm5hbGx5BAAAAAZwcmVmaXgEAAAAByRtYXRjaDAJAAPsAAAAAQkAAlkAAAABBQAAAAdhc3NldElkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAVBc3NldAQAAAAFYXNzZXQFAAAAByRtYXRjaDAIBQAAAAVhc3NldAAAAARuYW1lCQAAAgAAAAECAAAAEENhbid0IGZpbmQgYXNzZXQJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACBQAAAAZwcmVmaXgCAAAABl9vd25lcgUAAAAHb3duZXJJZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIFAAAAB293bmVySWQCAAAAB19oYW5kbGUFAAAACHVzZXJUZXh0BQAAAANuaWwAAAABaQEAAAAWYWRtaW5Qcm9tb3Rpb25QdXJjaGFzZQAAAAMAAAABeAAAAAF5AAAAEWRlc2luYXRpb25BZGRyZXNzBAAAAAhjYWxsZXJJZAkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAwkBAAAAAiE9AAAAAgUAAAAIY2FsbGVySWQFAAAACGhvbGRpbmdzCQAAAgAAAAECAAAAJlRoaXMgY2FuIG9ubHkgYmUgdHJpZ2dlcmluZyBpbnRlcm5hbGx5BAAAAA10cmFuc2FjdGlvbklkCQACWAAAAAEIBQAAAAFpAAAADXRyYW5zYWN0aW9uSWQEAAAACyR0MDY0NjA2NTY1CQEAAAALY2xhaW1TcXVhcmUAAAAFBQAAAAF4BQAAAAF5AgAAAAExBQAAABFkZXNpbmF0aW9uQWRkcmVzcwUAAAANdHJhbnNhY3Rpb25JZAQAAAAFYXNzZXQIBQAAAAskdDA2NDYwNjU2NQAAAAJfMQQAAAAHYXNzZXRJZAgFAAAACyR0MDY0NjA2NTY1AAAAAl8yBAAAAAhhc3NldFVybAgFAAAACyR0MDY0NjA2NTY1AAAAAl8zBAAAAA1kYXRhS2V5UHJlZml4CAUAAAALJHQwNjQ2MDY1NjUAAAACXzQEAAAACmFzc2V0SWRTdHIJAAJYAAAAAQUAAAAHYXNzZXRJZAkABE4AAAACCQEAAAAVZ2V0VHJhbnNhY3Rpb25FbnRyaWVzAAAABQUAAAANZGF0YUtleVByZWZpeAUAAAAKYXNzZXRJZFN0cgUAAAAIYXNzZXRVcmwFAAAAEWRlc2luYXRpb25BZGRyZXNzAgAAAAExCQAETAAAAAIFAAAABWFzc2V0CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAADXRyYW5zYWN0aW9uSWQFAAAADWRhdGFLZXlQcmVmaXgJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAB0FkZHJlc3MAAAABCQACWQAAAAEFAAAAEWRlc2luYXRpb25BZGRyZXNzAAAAAAAAAAABBQAAAAdhc3NldElkBQAAAANuaWwAAAABaQEAAAAOYWRtaW5TZXRIYW5kbGUAAAACAAAAB293bmVySWQAAAAGaGFuZGxlBAAAAAhjYWxsZXJJZAkAAlgAAAABCAgFAAAAAWkAAAAGY2FsbGVyAAAABWJ5dGVzAwkBAAAAAiE9AAAAAgUAAAAIY2FsbGVySWQFAAAACGhvbGRpbmdzCQAAAgAAAAECAAAAJlRoaXMgY2FuIG9ubHkgYmUgdHJpZ2dlcmluZyBpbnRlcm5hbGx5CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgUAAAAHb3duZXJJZAIAAAAHX2hhbmRsZQUAAAAGaGFuZGxlBQAAAANuaWwAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAAAwMJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAACAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5BgkAAAAAAAACCQEAAAAUYWRkcmVzc0Zyb21QdWJsaWNLZXkAAAABCAUAAAACdHgAAAAPc2VuZGVyUHVibGljS2V5BQAAAA9ob2xkaW5nc0FkZHJlc3MGCQAAAAAAAAIJAQAAABRhZGRyZXNzRnJvbVB1YmxpY0tleQAAAAEIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXkFAAAAC2RhcHBBZGRyZXNzcB0Akg==",
    "height": 2016917,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: Ew4q9KZXahkkyu6ryMVxVCGWy3pumEtPVGkoyJQ7ohpY
Next: QQgwnMjhLeCsVEBwnmSpkCYX32MGVkdZgASC5HfiUXW

Diff: 
Old New Differences
143 143  
144 144  
145 145  @Callable(i)
146 - func evolve (x,y,gen,ownerId,coordsToBurn) = {
146 + func evolve (x,y,gen,coordsToBurn) = {
147 147      let callerId = toBase58String(i.caller.bytes)
148 -     if ((callerId != holdings))
149 -         then throw("This can only be triggering internally")
150 -         else {
151 -             let transactionId = toBase58String(i.transactionId)
152 -             let $t042654655 = claimSquare(x, y, gen, ownerId, transactionId)
153 -             let asset = $t042654655._1
154 -             let assetId = $t042654655._2
155 -             let assetUrl = $t042654655._3
156 -             let dataKeyPrefix = $t042654655._4
157 -             let burnTransactions = {
158 -                 let $l = split(coordsToBurn, "|")
159 -                 let $s = size($l)
160 -                 let $acc0 = nil
161 -                 func $f0_1 ($a,$i) =                 if (($i >= $s))
162 -                     then $a
163 -                     else burnFold($a, $l[$i])
148 +     let transactionId = toBase58String(i.transactionId)
149 +     let $t041554518 = claimSquare(x, y, gen, callerId, transactionId)
150 +     let asset = $t041554518._1
151 +     let assetId = $t041554518._2
152 +     let assetUrl = $t041554518._3
153 +     let dataKeyPrefix = $t041554518._4
154 +     let burnTransactions = {
155 +         let $l = split(coordsToBurn, "|")
156 +         let $s = size($l)
157 +         let $acc0 = nil
158 +         func $f0_1 ($a,$i) =         if (($i >= $s))
159 +             then $a
160 +             else burnFold($a, $l[$i])
164 161  
165 -                 func $f0_2 ($a,$i) =                 if (($i >= $s))
166 -                     then $a
167 -                     else throw("List size exceeds 110")
162 +         func $f0_2 ($a,$i) =         if (($i >= $s))
163 +             then $a
164 +             else throw("List size exceeds 110")
168 165  
169 -                 $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 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)
170 -                 }
171 -             ((burnTransactions ++ getTransactionEntries(dataKeyPrefix, toBase58String(assetId), assetUrl, ownerId, gen)) ++ [asset, StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(Address(fromBase58String(ownerId)), 1, assetId)])
172 -             }
166 +         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 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)
167 +         }
168 +     ((burnTransactions ++ getTransactionEntries(dataKeyPrefix, toBase58String(assetId), assetUrl, callerId, gen)) ++ [asset, StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(i.caller, 1, assetId)])
173 169      }
174 170  
175 171  
231 227          then throw("This can only be triggering internally")
232 228          else {
233 229              let transactionId = toBase58String(i.transactionId)
234 -             let $t066346739 = claimSquare(x, y, "1", desinationAddress, transactionId)
235 -             let asset = $t066346739._1
236 -             let assetId = $t066346739._2
237 -             let assetUrl = $t066346739._3
238 -             let dataKeyPrefix = $t066346739._4
230 +             let $t064606565 = claimSquare(x, y, "1", desinationAddress, transactionId)
231 +             let asset = $t064606565._1
232 +             let assetId = $t064606565._2
233 +             let assetUrl = $t064606565._3
234 +             let dataKeyPrefix = $t064606565._4
239 235              let assetIdStr = toBase58String(assetId)
240 236              (getTransactionEntries(dataKeyPrefix, assetIdStr, assetUrl, desinationAddress, "1") ++ [asset, StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(Address(fromBase58String(desinationAddress)), 1, assetId)])
241 237              }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 5 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let COLS = 1024
5 5  
6 6  let ROWS = 1024
7 7  
8 8  let nftDomain = "https://nft.gridgang.io/"
9 9  
10 10  let addOwnerAndAmountFunc = "addOwnerAndAmount"
11 11  
12 12  let DEBUG = true
13 13  
14 14  let minForSaleWavlets = 100000000
15 15  
16 16  let minPurchasePrice = 1000000
17 17  
18 18  let dapp = "3N7J6mMMkjVViBREz9y53JmcX7r7KZRXQpL"
19 19  
20 20  let dappAddress = Address(fromBase58String(dapp))
21 21  
22 22  let holdingsPublicKey = "AyAwWbMPM7a4VYkn1bhEBftC5WZgfvUXgrYDe98mvLsv"
23 23  
24 24  let holdings = "3MwPsLy9F1mUQrdP37sCAKvHuE5HvPE674Y"
25 25  
26 26  let holdingsAddress = Address(fromBase58String(holdings))
27 27  
28 28  func getAssetName (x,y) = ((x + ",") + y)
29 29  
30 30  
31 31  func getDataKeyPrefix (x,y) = getAssetName(x, y)
32 32  
33 33  
34 34  func getXYGenFromName (name) = {
35 35      let parts = split(name, ",")
36 36      let tuple = $Tuple2(parts[0], parts[1])
37 37      tuple
38 38      }
39 39  
40 40  
41 41  func getDataKeyPrefixFromAssetName (name) = {
42 42      let $t0906941 = getXYGenFromName(name)
43 43      let x = $t0906941._1
44 44      let y = $t0906941._2
45 45      let prefix = getDataKeyPrefix(x, y)
46 46      prefix
47 47      }
48 48  
49 49  
50 50  func claimSquare (x,y,gen,ownerId,transactionId) = {
51 51      let resolvedXStr = x
52 52      let resolvedYStr = y
53 53      let resolvedGenStr = gen
54 54      let assetName = getAssetName(resolvedXStr, resolvedYStr)
55 55      let assetUrl = ((nftDomain + transactionId) + ".png")
56 56      let asset = Issue(assetName, assetUrl, 1, 0, false)
57 57      let assetId = calculateAssetId(asset)
58 58      let dataKeyPrefix = getDataKeyPrefix(resolvedXStr, resolvedYStr)
59 59      $Tuple4(asset, assetId, assetUrl, dataKeyPrefix)
60 60      }
61 61  
62 62  
63 63  func getTransactionEntries (prefix,assetId,asset,owner,gen) = [StringEntry((prefix + "_assetId"), assetId), StringEntry((prefix + "_asset"), asset), StringEntry((prefix + "_owner"), owner), StringEntry((prefix + "_gen"), gen)]
64 64  
65 65  
66 66  func burnFold (accum,next) = {
67 67      let resolvedNext =     match next {
68 68          case _: Unit => 
69 69              "unset"
70 70          case val: String => 
71 71              val
72 72          case _ => 
73 73              throw("Match error")
74 74      }
75 75      if ((resolvedNext == "unset"))
76 76          then accum
77 77          else {
78 78              let assetId =             match getString(this, (resolvedNext + "_assetId")) {
79 79                  case _: Unit => 
80 80                      "unset"
81 81                  case val: String => 
82 82                      val
83 83                  case _ => 
84 84                      throw("Match error")
85 85              }
86 86              if ((assetId == "unset"))
87 87                  then accum
88 88                  else (accum ++ [Burn(fromBase58String(assetId), 1)])
89 89              }
90 90      }
91 91  
92 92  
93 93  @Callable(i)
94 94  func purchase (x,y,userText) = {
95 95      let prefix = getDataKeyPrefix(x, y)
96 96      let paymentAmount = valueOrElse(i.payments[0].amount, 0)
97 97      let existingAssetId =     match getString(this, (prefix + "_assetId")) {
98 98          case _: Unit => 
99 99              "unset"
100 100          case err: String => 
101 101              throw("This square has already been purchased")
102 102          case _ => 
103 103              throw("Match error")
104 104      }
105 105      if ((minPurchasePrice > paymentAmount))
106 106          then throw((("You need to send at least " + toString(minPurchasePrice)) + "WAVLETS to purchase a square"))
107 107          else {
108 108              let ownerId = toBase58String(i.caller.bytes)
109 109              let transactionId = toBase58String(i.transactionId)
110 110              let $t028612956 = claimSquare(x, y, "1", ownerId, transactionId)
111 111              let asset = $t028612956._1
112 112              let assetId = $t028612956._2
113 113              let assetUrl = $t028612956._3
114 114              let dataKeyPrefix = $t028612956._4
115 115              (getTransactionEntries(dataKeyPrefix, toBase58String(assetId), assetUrl, ownerId, "1") ++ [asset, StringEntry((ownerId + "_handle"), userText), StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(i.caller, 1, assetId)])
116 116              }
117 117      }
118 118  
119 119  
120 120  
121 121  @Callable(i)
122 122  func autoBuy (x,y) = {
123 123      let callerId = toBase58String(i.caller.bytes)
124 124      if (if ((callerId != holdings))
125 125          then (callerId != dapp)
126 126          else false)
127 127          then throw("This can only be triggering internally")
128 128          else {
129 129              let transactionId = toBase58String(i.transactionId)
130 130              let $t034913587 = claimSquare(x, y, "1", holdings, transactionId)
131 131              let asset = $t034913587._1
132 132              let assetId = $t034913587._2
133 133              let assetUrl = $t034913587._3
134 134              let dataKeyPrefix = $t034913587._4
135 135              let assetIdStr = toBase58String(assetId)
136 136              let res = invoke(holdingsAddress, addOwnerAndAmountFunc, [holdings, assetIdStr, 3], [AttachedPayment(unit, 0)])
137 137              if ((res == res))
138 138                  then (getTransactionEntries(dataKeyPrefix, assetIdStr, assetUrl, holdings, "1") ++ [asset, StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(holdingsAddress, 1, assetId)])
139 139                  else throw("Strict value is not equal to itself.")
140 140              }
141 141      }
142 142  
143 143  
144 144  
145 145  @Callable(i)
146 - func evolve (x,y,gen,ownerId,coordsToBurn) = {
146 + func evolve (x,y,gen,coordsToBurn) = {
147 147      let callerId = toBase58String(i.caller.bytes)
148 -     if ((callerId != holdings))
149 -         then throw("This can only be triggering internally")
150 -         else {
151 -             let transactionId = toBase58String(i.transactionId)
152 -             let $t042654655 = claimSquare(x, y, gen, ownerId, transactionId)
153 -             let asset = $t042654655._1
154 -             let assetId = $t042654655._2
155 -             let assetUrl = $t042654655._3
156 -             let dataKeyPrefix = $t042654655._4
157 -             let burnTransactions = {
158 -                 let $l = split(coordsToBurn, "|")
159 -                 let $s = size($l)
160 -                 let $acc0 = nil
161 -                 func $f0_1 ($a,$i) =                 if (($i >= $s))
162 -                     then $a
163 -                     else burnFold($a, $l[$i])
148 +     let transactionId = toBase58String(i.transactionId)
149 +     let $t041554518 = claimSquare(x, y, gen, callerId, transactionId)
150 +     let asset = $t041554518._1
151 +     let assetId = $t041554518._2
152 +     let assetUrl = $t041554518._3
153 +     let dataKeyPrefix = $t041554518._4
154 +     let burnTransactions = {
155 +         let $l = split(coordsToBurn, "|")
156 +         let $s = size($l)
157 +         let $acc0 = nil
158 +         func $f0_1 ($a,$i) =         if (($i >= $s))
159 +             then $a
160 +             else burnFold($a, $l[$i])
164 161  
165 -                 func $f0_2 ($a,$i) =                 if (($i >= $s))
166 -                     then $a
167 -                     else throw("List size exceeds 110")
162 +         func $f0_2 ($a,$i) =         if (($i >= $s))
163 +             then $a
164 +             else throw("List size exceeds 110")
168 165  
169 -                 $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 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)
170 -                 }
171 -             ((burnTransactions ++ getTransactionEntries(dataKeyPrefix, toBase58String(assetId), assetUrl, ownerId, gen)) ++ [asset, StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(Address(fromBase58String(ownerId)), 1, assetId)])
172 -             }
166 +         $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 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)
167 +         }
168 +     ((burnTransactions ++ getTransactionEntries(dataKeyPrefix, toBase58String(assetId), assetUrl, callerId, gen)) ++ [asset, StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(i.caller, 1, assetId)])
173 169      }
174 170  
175 171  
176 172  
177 173  @Callable(i)
178 174  func putForSale (assetId,amount) = {
179 175      let callerId = toBase58String(i.caller.bytes)
180 176      let assetData =     match assetInfo(fromBase58String(assetId)) {
181 177          case ass: Asset => 
182 178              ass
183 179          case _ => 
184 180              throw("Asset not found")
185 181      }
186 182      let dataPrefix = getDataKeyPrefixFromAssetName(assetData.name)
187 183      let ownerId =     match getString(this, (dataPrefix + "_owner")) {
188 184          case s: String => 
189 185              s
190 186          case _ => 
191 187              throw("Owner not found in data")
192 188      }
193 189      if ((minForSaleWavlets > amount))
194 190          then throw("Amount needs to be more than 1 wave")
195 191          else if (if ((callerId != ownerId))
196 192              then (callerId != holdings)
197 193              else false)
198 194              then throw("You are not able to put this asset up for sale")
199 195              else {
200 196                  let res = invoke(holdingsAddress, addOwnerAndAmountFunc, [callerId, assetId, amount], [AttachedPayment(unit, 0)])
201 197                  if ((res == res))
202 198                      then [ScriptTransfer(holdingsAddress, 1, fromBase58String(assetId))]
203 199                      else throw("Strict value is not equal to itself.")
204 200                  }
205 201      }
206 202  
207 203  
208 204  
209 205  @Callable(i)
210 206  func finalizeSale (assetId,ownerId,userText) = {
211 207      let callerId = toBase58String(i.caller.bytes)
212 208      if ((callerId != holdings))
213 209          then throw("This can only be triggering internally")
214 210          else {
215 211              let prefix =             match assetInfo(fromBase58String(assetId)) {
216 212                  case asset: Asset => 
217 213                      asset.name
218 214                  case _ => 
219 215                      throw("Can't find asset")
220 216              }
221 217  [StringEntry((prefix + "_owner"), ownerId), StringEntry((ownerId + "_handle"), userText)]
222 218              }
223 219      }
224 220  
225 221  
226 222  
227 223  @Callable(i)
228 224  func adminPromotionPurchase (x,y,desinationAddress) = {
229 225      let callerId = toBase58String(i.caller.bytes)
230 226      if ((callerId != holdings))
231 227          then throw("This can only be triggering internally")
232 228          else {
233 229              let transactionId = toBase58String(i.transactionId)
234 -             let $t066346739 = claimSquare(x, y, "1", desinationAddress, transactionId)
235 -             let asset = $t066346739._1
236 -             let assetId = $t066346739._2
237 -             let assetUrl = $t066346739._3
238 -             let dataKeyPrefix = $t066346739._4
230 +             let $t064606565 = claimSquare(x, y, "1", desinationAddress, transactionId)
231 +             let asset = $t064606565._1
232 +             let assetId = $t064606565._2
233 +             let assetUrl = $t064606565._3
234 +             let dataKeyPrefix = $t064606565._4
239 235              let assetIdStr = toBase58String(assetId)
240 236              (getTransactionEntries(dataKeyPrefix, assetIdStr, assetUrl, desinationAddress, "1") ++ [asset, StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(Address(fromBase58String(desinationAddress)), 1, assetId)])
241 237              }
242 238      }
243 239  
244 240  
245 241  
246 242  @Callable(i)
247 243  func adminSetHandle (ownerId,handle) = {
248 244      let callerId = toBase58String(i.caller.bytes)
249 245      if ((callerId != holdings))
250 246          then throw("This can only be triggering internally")
251 247          else [StringEntry((ownerId + "_handle"), handle)]
252 248      }
253 249  
254 250  
255 251  @Verifier(tx)
256 252  func verify () = if (if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
257 253      then true
258 254      else (addressFromPublicKey(tx.senderPublicKey) == holdingsAddress))
259 255      then true
260 256      else (addressFromPublicKey(tx.senderPublicKey) == dappAddress)
261 257

Old	New		Differences
143	143
144	144
145	145		@Callable(i)
146		-	func evolve (x,y,gen,~~ownerId,~~coordsToBurn) = {
	146	+	func evolve (x,y,gen,coordsToBurn) = {
147	147		let callerId = toBase58String(i.caller.bytes)
148		-	if ((callerId != holdings))
149		-	then throw("This can only be triggering internally")
150		-	else {
151		-	let transactionId = toBase58String(i.transactionId)
152		-	let $t042654655 = claimSquare(x, y, gen, ownerId, transactionId)
153		-	let asset = $t042654655._1
154		-	let assetId = $t042654655._2
155		-	let assetUrl = $t042654655._3
156		-	let dataKeyPrefix = $t042654655._4
157		-	let burnTransactions = {
158		-	let $l = split(coordsToBurn, "\|")
159		-	let $s = size($l)
160		-	let $acc0 = nil
161		-	func $f0_1 ($a,$i) = if (($i >= $s))
162		-	then $a
163		-	else burnFold($a, $l[$i])
	148	+	let transactionId = toBase58String(i.transactionId)
	149	+	let $t041554518 = claimSquare(x, y, gen, callerId, transactionId)
	150	+	let asset = $t041554518._1
	151	+	let assetId = $t041554518._2
	152	+	let assetUrl = $t041554518._3
	153	+	let dataKeyPrefix = $t041554518._4
	154	+	let burnTransactions = {
	155	+	let $l = split(coordsToBurn, "\|")
	156	+	let $s = size($l)
	157	+	let $acc0 = nil
	158	+	func $f0_1 ($a,$i) = if (($i >= $s))
	159	+	then $a
	160	+	else burnFold($a, $l[$i])
164	161
165		-	func $f0_2 ($a,$i) = if (($i >= $s))
166		-	then $a
167		-	else throw("List size exceeds 110")
	162	+	func $f0_2 ($a,$i) = if (($i >= $s))
	163	+	then $a
	164	+	else throw("List size exceeds 110")
168	165
169		-	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 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)
170		-	}
171		-	((burnTransactions ++ getTransactionEntries(dataKeyPrefix, toBase58String(assetId), assetUrl, ownerId, gen)) ++ [asset, StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(Address(fromBase58String(ownerId)), 1, assetId)])
172		-	}
	166	+	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 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)
	167	+	}
	168	+	((burnTransactions ++ getTransactionEntries(dataKeyPrefix, toBase58String(assetId), assetUrl, callerId, gen)) ++ [asset, StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(i.caller, 1, assetId)])
173	169		}
174	170
175	171

231	227		then throw("This can only be triggering internally")
232	228		else {
233	229		let transactionId = toBase58String(i.transactionId)
234		-	let $~~t066346739~~ = claimSquare(x, y, "1", desinationAddress, transactionId)
235		-	let asset = $~~t066346739~~._1
236		-	let assetId = $~~t066346739~~._2
237		-	let assetUrl = $~~t066346739~~._3
238		-	let dataKeyPrefix = $~~t066346739~~._4
	230	+	let $t064606565 = claimSquare(x, y, "1", desinationAddress, transactionId)
	231	+	let asset = $t064606565._1
	232	+	let assetId = $t064606565._2
	233	+	let assetUrl = $t064606565._3
	234	+	let dataKeyPrefix = $t064606565._4
239	235		let assetIdStr = toBase58String(assetId)
240	236		(getTransactionEntries(dataKeyPrefix, assetIdStr, assetUrl, desinationAddress, "1") ++ [asset, StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(Address(fromBase58String(desinationAddress)), 1, assetId)])
241	237		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let COLS = 1024
5	5
6	6		let ROWS = 1024
7	7
8	8		let nftDomain = "https://nft.gridgang.io/"
9	9
10	10		let addOwnerAndAmountFunc = "addOwnerAndAmount"
11	11
12	12		let DEBUG = true
13	13
14	14		let minForSaleWavlets = 100000000
15	15
16	16		let minPurchasePrice = 1000000
17	17
18	18		let dapp = "3N7J6mMMkjVViBREz9y53JmcX7r7KZRXQpL"
19	19
20	20		let dappAddress = Address(fromBase58String(dapp))
21	21
22	22		let holdingsPublicKey = "AyAwWbMPM7a4VYkn1bhEBftC5WZgfvUXgrYDe98mvLsv"
23	23
24	24		let holdings = "3MwPsLy9F1mUQrdP37sCAKvHuE5HvPE674Y"
25	25
26	26		let holdingsAddress = Address(fromBase58String(holdings))
27	27
28	28		func getAssetName (x,y) = ((x + ",") + y)
29	29
30	30
31	31		func getDataKeyPrefix (x,y) = getAssetName(x, y)
32	32
33	33
34	34		func getXYGenFromName (name) = {
35	35		let parts = split(name, ",")
36	36		let tuple = $Tuple2(parts[0], parts[1])
37	37		tuple
38	38		}
39	39
40	40
41	41		func getDataKeyPrefixFromAssetName (name) = {
42	42		let $t0906941 = getXYGenFromName(name)
43	43		let x = $t0906941._1
44	44		let y = $t0906941._2
45	45		let prefix = getDataKeyPrefix(x, y)
46	46		prefix
47	47		}
48	48
49	49
50	50		func claimSquare (x,y,gen,ownerId,transactionId) = {
51	51		let resolvedXStr = x
52	52		let resolvedYStr = y
53	53		let resolvedGenStr = gen
54	54		let assetName = getAssetName(resolvedXStr, resolvedYStr)
55	55		let assetUrl = ((nftDomain + transactionId) + ".png")
56	56		let asset = Issue(assetName, assetUrl, 1, 0, false)
57	57		let assetId = calculateAssetId(asset)
58	58		let dataKeyPrefix = getDataKeyPrefix(resolvedXStr, resolvedYStr)
59	59		$Tuple4(asset, assetId, assetUrl, dataKeyPrefix)
60	60		}
61	61
62	62
63	63		func getTransactionEntries (prefix,assetId,asset,owner,gen) = [StringEntry((prefix + "_assetId"), assetId), StringEntry((prefix + "_asset"), asset), StringEntry((prefix + "_owner"), owner), StringEntry((prefix + "_gen"), gen)]
64	64
65	65
66	66		func burnFold (accum,next) = {
67	67		let resolvedNext = match next {
68	68		case _: Unit =>
69	69		"unset"
70	70		case val: String =>
71	71		val
72	72		case _ =>
73	73		throw("Match error")
74	74		}
75	75		if ((resolvedNext == "unset"))
76	76		then accum
77	77		else {
78	78		let assetId = match getString(this, (resolvedNext + "_assetId")) {
79	79		case _: Unit =>
80	80		"unset"
81	81		case val: String =>
82	82		val
83	83		case _ =>
84	84		throw("Match error")
85	85		}
86	86		if ((assetId == "unset"))
87	87		then accum
88	88		else (accum ++ [Burn(fromBase58String(assetId), 1)])
89	89		}
90	90		}
91	91
92	92
93	93		@Callable(i)
94	94		func purchase (x,y,userText) = {
95	95		let prefix = getDataKeyPrefix(x, y)
96	96		let paymentAmount = valueOrElse(i.payments[0].amount, 0)
97	97		let existingAssetId = match getString(this, (prefix + "_assetId")) {
98	98		case _: Unit =>
99	99		"unset"
100	100		case err: String =>
101	101		throw("This square has already been purchased")
102	102		case _ =>
103	103		throw("Match error")
104	104		}
105	105		if ((minPurchasePrice > paymentAmount))
106	106		then throw((("You need to send at least " + toString(minPurchasePrice)) + "WAVLETS to purchase a square"))
107	107		else {
108	108		let ownerId = toBase58String(i.caller.bytes)
109	109		let transactionId = toBase58String(i.transactionId)
110	110		let $t028612956 = claimSquare(x, y, "1", ownerId, transactionId)
111	111		let asset = $t028612956._1
112	112		let assetId = $t028612956._2
113	113		let assetUrl = $t028612956._3
114	114		let dataKeyPrefix = $t028612956._4
115	115		(getTransactionEntries(dataKeyPrefix, toBase58String(assetId), assetUrl, ownerId, "1") ++ [asset, StringEntry((ownerId + "_handle"), userText), StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(i.caller, 1, assetId)])
116	116		}
117	117		}
118	118
119	119
120	120
121	121		@Callable(i)
122	122		func autoBuy (x,y) = {
123	123		let callerId = toBase58String(i.caller.bytes)
124	124		if (if ((callerId != holdings))
125	125		then (callerId != dapp)
126	126		else false)
127	127		then throw("This can only be triggering internally")
128	128		else {
129	129		let transactionId = toBase58String(i.transactionId)
130	130		let $t034913587 = claimSquare(x, y, "1", holdings, transactionId)
131	131		let asset = $t034913587._1
132	132		let assetId = $t034913587._2
133	133		let assetUrl = $t034913587._3
134	134		let dataKeyPrefix = $t034913587._4
135	135		let assetIdStr = toBase58String(assetId)
136	136		let res = invoke(holdingsAddress, addOwnerAndAmountFunc, [holdings, assetIdStr, 3], [AttachedPayment(unit, 0)])
137	137		if ((res == res))
138	138		then (getTransactionEntries(dataKeyPrefix, assetIdStr, assetUrl, holdings, "1") ++ [asset, StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(holdingsAddress, 1, assetId)])
139	139		else throw("Strict value is not equal to itself.")
140	140		}
141	141		}
142	142
143	143
144	144
145	145		@Callable(i)
146		-	func evolve (x,y,gen,~~ownerId,~~coordsToBurn) = {
	146	+	func evolve (x,y,gen,coordsToBurn) = {
147	147		let callerId = toBase58String(i.caller.bytes)
148		-	if ((callerId != holdings))
149		-	then throw("This can only be triggering internally")
150		-	else {
151		-	let transactionId = toBase58String(i.transactionId)
152		-	let $t042654655 = claimSquare(x, y, gen, ownerId, transactionId)
153		-	let asset = $t042654655._1
154		-	let assetId = $t042654655._2
155		-	let assetUrl = $t042654655._3
156		-	let dataKeyPrefix = $t042654655._4
157		-	let burnTransactions = {
158		-	let $l = split(coordsToBurn, "\|")
159		-	let $s = size($l)
160		-	let $acc0 = nil
161		-	func $f0_1 ($a,$i) = if (($i >= $s))
162		-	then $a
163		-	else burnFold($a, $l[$i])
	148	+	let transactionId = toBase58String(i.transactionId)
	149	+	let $t041554518 = claimSquare(x, y, gen, callerId, transactionId)
	150	+	let asset = $t041554518._1
	151	+	let assetId = $t041554518._2
	152	+	let assetUrl = $t041554518._3
	153	+	let dataKeyPrefix = $t041554518._4
	154	+	let burnTransactions = {
	155	+	let $l = split(coordsToBurn, "\|")
	156	+	let $s = size($l)
	157	+	let $acc0 = nil
	158	+	func $f0_1 ($a,$i) = if (($i >= $s))
	159	+	then $a
	160	+	else burnFold($a, $l[$i])
164	161
165		-	func $f0_2 ($a,$i) = if (($i >= $s))
166		-	then $a
167		-	else throw("List size exceeds 110")
	162	+	func $f0_2 ($a,$i) = if (($i >= $s))
	163	+	then $a
	164	+	else throw("List size exceeds 110")
168	165
169		-	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 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)
170		-	}
171		-	((burnTransactions ++ getTransactionEntries(dataKeyPrefix, toBase58String(assetId), assetUrl, ownerId, gen)) ++ [asset, StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(Address(fromBase58String(ownerId)), 1, assetId)])
172		-	}
	166	+	$f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 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)
	167	+	}
	168	+	((burnTransactions ++ getTransactionEntries(dataKeyPrefix, toBase58String(assetId), assetUrl, callerId, gen)) ++ [asset, StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(i.caller, 1, assetId)])
173	169		}
174	170
175	171
176	172
177	173		@Callable(i)
178	174		func putForSale (assetId,amount) = {
179	175		let callerId = toBase58String(i.caller.bytes)
180	176		let assetData = match assetInfo(fromBase58String(assetId)) {
181	177		case ass: Asset =>
182	178		ass
183	179		case _ =>
184	180		throw("Asset not found")
185	181		}
186	182		let dataPrefix = getDataKeyPrefixFromAssetName(assetData.name)
187	183		let ownerId = match getString(this, (dataPrefix + "_owner")) {
188	184		case s: String =>
189	185		s
190	186		case _ =>
191	187		throw("Owner not found in data")
192	188		}
193	189		if ((minForSaleWavlets > amount))
194	190		then throw("Amount needs to be more than 1 wave")
195	191		else if (if ((callerId != ownerId))
196	192		then (callerId != holdings)
197	193		else false)
198	194		then throw("You are not able to put this asset up for sale")
199	195		else {
200	196		let res = invoke(holdingsAddress, addOwnerAndAmountFunc, [callerId, assetId, amount], [AttachedPayment(unit, 0)])
201	197		if ((res == res))
202	198		then [ScriptTransfer(holdingsAddress, 1, fromBase58String(assetId))]
203	199		else throw("Strict value is not equal to itself.")
204	200		}
205	201		}
206	202
207	203
208	204
209	205		@Callable(i)
210	206		func finalizeSale (assetId,ownerId,userText) = {
211	207		let callerId = toBase58String(i.caller.bytes)
212	208		if ((callerId != holdings))
213	209		then throw("This can only be triggering internally")
214	210		else {
215	211		let prefix = match assetInfo(fromBase58String(assetId)) {
216	212		case asset: Asset =>
217	213		asset.name
218	214		case _ =>
219	215		throw("Can't find asset")
220	216		}
221	217		[StringEntry((prefix + "_owner"), ownerId), StringEntry((ownerId + "_handle"), userText)]
222	218		}
223	219		}
224	220
225	221
226	222
227	223		@Callable(i)
228	224		func adminPromotionPurchase (x,y,desinationAddress) = {
229	225		let callerId = toBase58String(i.caller.bytes)
230	226		if ((callerId != holdings))
231	227		then throw("This can only be triggering internally")
232	228		else {
233	229		let transactionId = toBase58String(i.transactionId)
234		-	let $~~t066346739~~ = claimSquare(x, y, "1", desinationAddress, transactionId)
235		-	let asset = $~~t066346739~~._1
236		-	let assetId = $~~t066346739~~._2
237		-	let assetUrl = $~~t066346739~~._3
238		-	let dataKeyPrefix = $~~t066346739~~._4
	230	+	let $t064606565 = claimSquare(x, y, "1", desinationAddress, transactionId)
	231	+	let asset = $t064606565._1
	232	+	let assetId = $t064606565._2
	233	+	let assetUrl = $t064606565._3
	234	+	let dataKeyPrefix = $t064606565._4
239	235		let assetIdStr = toBase58String(assetId)
240	236		(getTransactionEntries(dataKeyPrefix, assetIdStr, assetUrl, desinationAddress, "1") ++ [asset, StringEntry(transactionId, dataKeyPrefix), ScriptTransfer(Address(fromBase58String(desinationAddress)), 1, assetId)])
241	237		}
242	238		}
243	239
244	240
245	241
246	242		@Callable(i)
247	243		func adminSetHandle (ownerId,handle) = {
248	244		let callerId = toBase58String(i.caller.bytes)
249	245		if ((callerId != holdings))
250	246		then throw("This can only be triggering internally")
251	247		else [StringEntry((ownerId + "_handle"), handle)]
252	248		}
253	249
254	250
255	251		@Verifier(tx)
256	252		func verify () = if (if (sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey))
257	253		then true
258	254		else (addressFromPublicKey(tx.senderPublicKey) == holdingsAddress))
259	255		then true
260	256		else (addressFromPublicKey(tx.senderPublicKey) == dappAddress)
261	257

github/deemru/w8io/169f3d6 
46.70 ms ◑