w8 · tx · 7ii···tbT

tx · 7iiAxwpcfPRJ1uTkR5gU1FrUw3MrMDgL7UTJ9GWPutbT

3PATXDVE53rKJtkwXYV3tvuLVS2fDtGtKCc:  -0.01700000 Waves

2022.08.29 14:30 [3271183] smart account 3PATXDVE53rKJtkwXYV3tvuLVS2fDtGtKCc > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7iiAxwpcfPRJ1uTkR5gU1FrUw3MrMDgL7UTJ9GWPutbT",
    "fee": 1700000,
    "feeAssetId": null,
    "timestamp": 1661772657852,
    "version": 2,
    "chainId": 87,
    "sender": "3PATXDVE53rKJtkwXYV3tvuLVS2fDtGtKCc",
    "senderPublicKey": "3pJsmGRpWHpqyaAjeX7BacMEfYx32LMNN4qwxQqASBmi",
    "proofs": [
        "nM9RJPCjg1AAPXkGA1kQeUcizSN9wxA9oSj3yk1EHuDqwFG2CTLKLkqU6D3Qh46fAvxuFJtszgJgzW3hkG8mm2t"
    ],
    "script": "base64:BgIoCAISBAoCAQgSAwoBCBIDCgEIEgMKAQgSAwoBCBIECgIICBIECgIICBEADWNyZWF0ZU5mdERhcHABGgFXk93E0hfnIAr99yESTvDwdmcmgwN41FxMABBtYXJrZXRGZWVBZGRyZXNzCQEHQWRkcmVzcwEBGgFXiqwWKFZBTE2Nqe/i/IDW833E18jzJ3qqABJwdXp6bGVTdGFrZUFkZHJlc3MBGgFXlGiM+e6iuaqf1vWOvKmPZxqcBvQWKYm7ABBwcm94eURhcHBBZGRyZXNzARoBVzPfhq9Dvq0SbPM9eK91jwNWtVu1Nlr0FwAObmZ0RHVja1dyYXBwZXIBGgFXFK1EUpul/f9hF//YOufxZ4qAnBS4L88eABFuZnRTaWduQXJ0V3JhcHBlcgEaAVfuoRoVw/G2X0Rl/1/IFTnEeUXVGEVHMAcADmR1Y2tGZWVBZGRyZXNzARoBVy6CChx+cyHzIYU93pmy0O4XjdZ/888bhQAMZHVja3NQZXJjZW50AB4ADnJveWFsdHlQZXJjZW50AAcBBWlzTkZUAQVhc3NldAMDCQAAAggFBWFzc2V0CGRlY2ltYWxzAAAJAAACCAUFYXNzZXQKcmVpc3N1YWJsZQcHCQAAAggFBWFzc2V0CHF1YW50aXR5AAEHAQhjaGVja05GVAEFYXNzZXQDAwMJAAACCAgFBWFzc2V0Bmlzc3VlcgVieXRlcwUNY3JlYXRlTmZ0RGFwcAkAAAIIBQVhc3NldAhkZWNpbWFscwAABwkAAAIIBQVhc3NldApyZWlzc3VhYmxlBwcJAAACCAUFYXNzZXQIcXVhbnRpdHkAAQcBDXRyeUdldEludGVnZXIBA2tleQQHJG1hdGNoMAkAmggCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABDHRyeUdldFN0cmluZwEDa2V5BAckbWF0Y2gwCQCdCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWIFByRtYXRjaDAFAWICAAEPdHJ5R2V0QXNzZXRJbmZvAgdhc3NldElkCGVycm9yTXNnBAckbWF0Y2gwCQDsBwEJANkEAQUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgVBc3NldAQBYQUHJG1hdGNoMAUBYQkAAgEFCGVycm9yTXNnAQ5nZXRBc3NldFN0cmluZwEHYXNzZXRJZAQHJG1hdGNoMAUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFiBQckbWF0Y2gwCQDYBAEFAWICBVdBVkVTAQ1nZXRBc3NldEJ5dGVzAQphc3NldElkU3RyAwkAAAIFCmFzc2V0SWRTdHICBVdBVkVTBQR1bml0CQDZBAEFCmFzc2V0SWRTdHIBEmFsbFRyYW5zZmVyc0ZvckJpZAIFbmZ0SWQHZXhjbHVkZQQKYXVjdGlvbktleQkArAICCQCsAgICCGF1Y3Rpb25fBQVuZnRJZAIFX2JpZHMEC2F1Y3Rpb25EYXRhCQEMdHJ5R2V0U3RyaW5nAQUKYXVjdGlvbktleQQJZXhjbHVkZUlkAwkAZgIJALECAQUHZXhjbHVkZQAABQdleGNsdWRlAgADCQAAAgkAsQIBBQthdWN0aW9uRGF0YQAABQNuaWwKARVnZXRSZXR1cm5UcmFuc2FjdGlvbnMCBWFjY3VtBG5leHQEDWJldFBhcnNlZERhdGEJALUJAgUEbmV4dAIBXwQIYmV0T3duZXIJAJEDAgUNYmV0UGFyc2VkRGF0YQAABAliZXRBbW91bnQJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQ1iZXRQYXJzZWREYXRhAAEECmJldEFzc2V0SWQDCQAAAgkAkQMCBQ1iZXRQYXJzZWREYXRhAAICBVdBVkVTBQR1bml0CQDZBAEJAJEDAgUNYmV0UGFyc2VkRGF0YQACAwMJAGYCCQCxAgEFCWV4Y2x1ZGVJZAAACQAAAgUJZXhjbHVkZUlkBQRuZXh0BwUFYWNjdW0JAM0IAgUFYWNjdW0JAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQkA2QQBBQhiZXRPd25lcgUJYmV0QW1vdW50BQpiZXRBc3NldElkCgACJGwJALUJAgULYXVjdGlvbkRhdGECASwKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBFWdldFJldHVyblRyYW5zYWN0aW9ucwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQIUTGlzdCBzaXplIGV4Y2VlZHMgMjYJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAAkACgALAAwADQAOAA8AEAARABIAEwAUABUAFgAXABgAGQAaBwFpAQdzZWxsTkZUAgtidXlPdXRQcmljZQ1idXlPdXRBc3NldElkBANwbXQDAwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAAAIICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AAEHCQCRAwIIBQFpCHBheW1lbnRzAAAJAAIBAhlORlQgbm90IGxpc3RlZCBhcyBwYXltZW50BAtidXlPdXRBc3NldAkBDWdldEFzc2V0Qnl0ZXMBBQ1idXlPdXRBc3NldElkAwkBCWlzRGVmaW5lZAEIBQNwbXQHYXNzZXRJZAQFbmZ0SWQJAQV2YWx1ZQEIBQNwbXQHYXNzZXRJZAQDbmZ0BAckbWF0Y2gwCQDsBwEFBW5mdElkAwkAAQIFByRtYXRjaDACBUFzc2V0BAFhBQckbWF0Y2gwBQFhCQACAQIOQ2FuJ3QgZmluZCBORlQDCQEIY2hlY2tORlQBBQNuZnQDCQBmAgULYnV5T3V0UHJpY2UAAAQMYXNzZXROYW1lU3RyCQDYBAEIBQNuZnQCaWQECW5mdElzc3VlcgQHJG1hdGNoMAkAnQgCCQEHQWRkcmVzcwEFDWNyZWF0ZU5mdERhcHAJAKwCAgkArAICAgRuZnRfBQxhc3NldE5hbWVTdHICB19pc3N1ZXIDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFhBQckbWF0Y2gwBQFhCQClCAEIBQFpBmNhbGxlcgQPcm95YWx0eVJlY2VpdmVyAwkBAiE9AgUJbmZ0SXNzdWVyCQDYBAEFEW5mdFNpZ25BcnRXcmFwcGVyBQluZnRJc3N1ZXIJAJEDAgkAtQkCCQCRAwIJALUJAggJAQV2YWx1ZQEJAOwHAQUFbmZ0SWQLZGVzY3JpcHRpb24CASAAAgIBLgAACQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIEbmZ0XwUMYXNzZXROYW1lU3RyAgxfYnV5T3V0UHJpY2UFC2J1eU91dFByaWNlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICAgRuZnRfBQxhc3NldE5hbWVTdHICDl9idXlPdXRBc3NldElkCQEOZ2V0QXNzZXRTdHJpbmcBBQtidXlPdXRBc3NldAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgIEbmZ0XwUMYXNzZXROYW1lU3RyAhBfcm95YWx0eVJlY2VpdmVyBQ9yb3lhbHR5UmVjZWl2ZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgICBG5mdF8FDGFzc2V0TmFtZVN0cgIHX3NlbGxlcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgIIYWRkcmVzc18JAKUIAQgFAWkMb3JpZ2luQ2FsbGVyAgVfbmZ0XwUMYXNzZXROYW1lU3RyBQxhc3NldE5hbWVTdHIJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQCsAgIJAKwCAgIIYWRkcmVzc18JAKUIAQgFAWkMb3JpZ2luQ2FsbGVyAgVfbmZ0XwUMYXNzZXROYW1lU3RyAgxfc3RhcnRTYWxlQXQFBmhlaWdodAUDbmlsCQACAQIfUHJpY2UgbXVzdCBiZSBncmVhdGVyIHRoYW4gemVybwkAAgECGk5GVCBpc3N1ZWQgYnkgYW5vdGhlciBkYXBwCQACAQImTkZUIGlzIG5vdCBhdHRhY2hlZCB0byB0aGUgdHJhbnNhY3Rpb24BaQEGYnV5TkZUAQVuZnRJZAQDcG10AwkAAAIJAJADAQgFAWkIcGF5bWVudHMAAQkAkQMCCAUBaQhwYXltZW50cwAACQACAQIcQXR0YWNoZWQgcGF5bWVudCBpcyByZXF1aXJlZAQLYnV5T3V0UHJpY2UJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICBG5mdF8FBW5mdElkAgxfYnV5T3V0UHJpY2UEEGJ1eU91dEFzc2V0SWRTdHIJAQx0cnlHZXRTdHJpbmcBCQCsAgIJAKwCAgIEbmZ0XwUFbmZ0SWQCDl9idXlPdXRBc3NldElkBA9yb3lhbHR5UmVjZWl2ZXIJAQx0cnlHZXRTdHJpbmcBCQCsAgIJAKwCAgIEbmZ0XwUFbmZ0SWQCEF9yb3lhbHR5UmVjZWl2ZXIECXNlbGxlclN0cgkBDHRyeUdldFN0cmluZwEJAKwCAgkArAICAgRuZnRfBQVuZnRJZAIHX3NlbGxlcgQIbmZ0QXNzZXQJAQ90cnlHZXRBc3NldEluZm8CBQVuZnRJZAINTkZUIG5vdCBmb3VuZAQNYnV5T3V0QXNzZXRJZAMJAAACBRBidXlPdXRBc3NldElkU3RyAgVXQVZFUwUEdW5pdAQHJG1hdGNoMAkA7AcBCQDZBAEFEGJ1eU91dEFzc2V0SWRTdHIDCQABAgUHJG1hdGNoMAIFQXNzZXQEAWEFByRtYXRjaDAIBQFhAmlkCQACAQIWQnV5b3V0IGFzc2V0IG5vdCBmb3VuZAQKYXVjdGlvbktleQkArAICCQCsAgICCGF1Y3Rpb25fCQDYBAEIBQhuZnRBc3NldAJpZAIFX2JpZHMDAwkAZgIFC2J1eU91dFByaWNlAAAJAGcCCAUDcG10BmFtb3VudAULYnV5T3V0UHJpY2UHBAlkdWNrTmZ0SWQJAQt2YWx1ZU9yRWxzZQIJAJ0IAgkBB0FkZHJlc3MBBQ5uZnREdWNrV3JhcHBlcgkArAICCQCsAgICBG5mdF8FBW5mdElkAgdfZHVja0lkAgAEDHRyYW5zZmVyRmVlcwMJAGYCCQCxAgEFCWR1Y2tOZnRJZAAABAdkdWNrRmVlCQBrAwULYnV5T3V0UHJpY2UFDGR1Y2tzUGVyY2VudABkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQkA2QQBBQlzZWxsZXJTdHIJAGUCBQtidXlPdXRQcmljZQUHZHVja0ZlZQUNYnV5T3V0QXNzZXRJZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQEHQWRkcmVzcwEFDmR1Y2tGZWVBZGRyZXNzBQdkdWNrRmVlBQ1idXlPdXRBc3NldElkBQNuaWwEC3JveWFsdHlQYXJ0CQBrAwULYnV5T3V0UHJpY2UFDnJveWFsdHlQZXJjZW50AGQECW1hcmtldEZlZQkAawMFC2J1eU91dFByaWNlAAMAZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQEHQWRkcmVzcwEJANkEAQUJc2VsbGVyU3RyCQBlAgkAZQIFC2J1eU91dFByaWNlBQtyb3lhbHR5UGFydAUJbWFya2V0RmVlBQ1idXlPdXRBc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQkA2QQBBQ9yb3lhbHR5UmVjZWl2ZXIFC3JveWFsdHlQYXJ0BQ1idXlPdXRBc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFEG1hcmtldEZlZUFkZHJlc3MFCW1hcmtldEZlZQUNYnV5T3V0QXNzZXRJZAUDbmlsAwkAAAIIBQNwbXQHYXNzZXRJZAUNYnV5T3V0QXNzZXRJZAQHaXNHcm91cAkBC3ZhbHVlT3JFbHNlAgkAmwgCCQEHQWRkcmVzcwEFDWNyZWF0ZU5mdERhcHAJAKwCAgkArAICAgRuZnRfBQVuZnRJZAIIX2lzR3JvdXAHAwkBASEBBQdpc0dyb3VwCQCUCgIJAM4IAgkAzggCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABCAUIbmZ0QXNzZXQCaWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgICBG5mdF8FBW5mdElkAgxfYnV5T3V0UHJpY2UJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgICBG5mdF8FBW5mdElkAg5fYnV5T3V0QXNzZXRJZAkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgIEbmZ0XwUFbmZ0SWQCEF9yb3lhbHR5UmVjZWl2ZXIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgICBG5mdF8FBW5mdElkAgdfc2VsbGVyCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkArAICCQCsAgICCGFkZHJlc3NfBQlzZWxsZXJTdHICBV9uZnRfBQVuZnRJZAkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgkArAICCQCsAgICCGFkZHJlc3NfBQlzZWxsZXJTdHICBV9uZnRfBQVuZnRJZAIMX3N0YXJ0U2FsZUF0CQDMCAIJAQtEZWxldGVFbnRyeQEFCmF1Y3Rpb25LZXkFA25pbAUMdHJhbnNmZXJGZWVzCQESYWxsVHJhbnNmZXJzRm9yQmlkAgkA2AQBCAUIbmZ0QXNzZXQCaWQCAAkA2AQBCAUIbmZ0QXNzZXQCaWQEC25ld05GVElkU3RyBAckbWF0Y2gwCQD8BwQJAQdBZGRyZXNzAQUNY3JlYXRlTmZ0RGFwcAINbWludEZyb21Hcm91cAkAzAgCBQVuZnRJZAUDbmlsBQNuaWwDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzCQACAQIlU29tdGhpbmcgd3Jvbmcgd2hlbiBtaW50IG11bHRpcGxlIE5GVAMJAAACBQtuZXdORlRJZFN0cgULbmV3TkZUSWRTdHIEDmdyb3VwQXZhaWxhYmxlCQEFdmFsdWUBCQCaCAIJAQdBZGRyZXNzAQUNY3JlYXRlTmZ0RGFwcAkArAICCQCsAgICBmdyb3VwXwUFbmZ0SWQCCl9hdmFpbGFibGUDCQAAAgUOZ3JvdXBBdmFpbGFibGUFDmdyb3VwQXZhaWxhYmxlAwkAAAIFDmdyb3VwQXZhaWxhYmxlAAAEA2ludgkA/AcECQEHQWRkcmVzcwEFDWNyZWF0ZU5mdERhcHACB2J1cm5ORlQFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQVuZnRJZAABBQNuaWwDCQAAAgUDaW52BQNpbnYJAJQKAgkAzggCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABCQDZBAEFC25ld05GVElkU3RyCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkArAICAgRuZnRfBQVuZnRJZAIMX2J1eU91dFByaWNlCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkArAICAgRuZnRfBQVuZnRJZAIOX2J1eU91dEFzc2V0SWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgICBG5mdF8FBW5mdElkAhBfcm95YWx0eVJlY2VpdmVyCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkArAICAgRuZnRfBQVuZnRJZAIHX3NlbGxlcgkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgkArAICAghhZGRyZXNzXwUJc2VsbGVyU3RyAgVfbmZ0XwUFbmZ0SWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgIJAKwCAgkArAICAghhZGRyZXNzXwUJc2VsbGVyU3RyAgVfbmZ0XwUFbmZ0SWQCDF9zdGFydFNhbGVBdAkAzAgCCQELRGVsZXRlRW50cnkBBQphdWN0aW9uS2V5BQNuaWwFDHRyYW5zZmVyRmVlcwkA2QQBBQtuZXdORlRJZFN0cgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAlAoCCQDOCAIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEJANkEAQULbmV3TkZUSWRTdHIFA25pbAUMdHJhbnNmZXJGZWVzCQDZBAEFC25ld05GVElkU3RyCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQIyVGhlIGJ1eW91dCBhc3NldCBkb2VzIG5vdCBtYXRjaCB0aGUgcHVyY2hhc2UgYXNzZXQJAAIBAihQYXltZW50IGFtb3VudCBtdXN0IGJlIGdyZWF0ZXIgdGhhbiB6ZXJvAWkBCmNhbmNlbFNlbGwBBW5mdElkBAlzZWxsZXJTdHIJAQx0cnlHZXRTdHJpbmcBCQCsAgIJAKwCAgIEbmZ0XwUFbmZ0SWQCB19zZWxsZXIECG5mdEFzc2V0CQEPdHJ5R2V0QXNzZXRJbmZvAgUFbmZ0SWQCDU5GVCBub3QgZm91bmQECmF1Y3Rpb25LZXkJAKwCAgkArAICAghhdWN0aW9uXwkA2AQBCAUIbmZ0QXNzZXQCaWQCBV9iaWRzAwMJAGYCCQCxAgEFCXNlbGxlclN0cgAACQAAAgUJc2VsbGVyU3RyCQClCAEIBQFpDG9yaWdpbkNhbGxlcgcJAJQKAgkAzggCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABCAUIbmZ0QXNzZXQCaWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgICBG5mdF8FBW5mdElkAgxfYnV5T3V0UHJpY2UJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgICBG5mdF8FBW5mdElkAg5fYnV5T3V0QXNzZXRJZAkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgIEbmZ0XwUFbmZ0SWQCEF9yb3lhbHR5UmVjZWl2ZXIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgICBG5mdF8FBW5mdElkAgdfc2VsbGVyCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkArAICCQCsAgICCGFkZHJlc3NfBQlzZWxsZXJTdHICBV9uZnRfBQVuZnRJZAkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgkArAICCQCsAgICCGFkZHJlc3NfBQlzZWxsZXJTdHICBV9uZnRfBQVuZnRJZAIMX3N0YXJ0U2FsZUF0CQDMCAIJAQtEZWxldGVFbnRyeQEFCmF1Y3Rpb25LZXkFA25pbAkBEmFsbFRyYW5zZmVyc0ZvckJpZAIJANgEAQgFCG5mdEFzc2V0AmlkAgAFBW5mdElkCQACAQIUWW91IGFyZSBub3QgYSBzZWxsZXIBaQEEbGlrZQEFbmZ0SWQECG5mdEFzc2V0CQDsBwEJANkEAQUFbmZ0SWQECWR1Y2tOZnRJZAkBC3ZhbHVlT3JFbHNlAgkAnQgCCQEHQWRkcmVzcwEFDm5mdER1Y2tXcmFwcGVyCQCsAgIJAKwCAgIEbmZ0XwUFbmZ0SWQCB19kdWNrSWQCAAQMc2lnbkFydE5mdElkCQELdmFsdWVPckVsc2UCCQCdCAIJAQdBZGRyZXNzAQURbmZ0U2lnbkFydFdyYXBwZXIJAKwCAgkArAICAgtzaWduQXJ0TmZ0XwUFbmZ0SWQCCF9hc3NldElkAgAEDHVwZGF0ZWROZnRJZAMJAGYCCQCxAgEFCWR1Y2tOZnRJZAAABQlkdWNrTmZ0SWQDCQBmAgkAsQIBBQxzaWduQXJ0TmZ0SWQAAAUMc2lnbkFydE5mdElkBQVuZnRJZAMDCQEJaXNEZWZpbmVkAQUIbmZ0QXNzZXQJAQhjaGVja05GVAEJAQV2YWx1ZQEFCG5mdEFzc2V0BwQNY2FsbGVyQWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEC2NvdW50U3Rha2VkBAckbWF0Y2gwCQCaCAIJAQdBZGRyZXNzAQUScHV6emxlU3Rha2VBZGRyZXNzCQCsAgIFDWNhbGxlckFkZHJlc3MCB19zdGFrZWQDCQABAgUHJG1hdGNoMAIDSW50BAFjBQckbWF0Y2gwBQFjAAADCQBnAgULY291bnRTdGFrZWQAgMLXLwQLbmZ0TGlrZXNLZXkJAKwCAgkArAICAgRuZnRfBQx1cGRhdGVkTmZ0SWQCBl9saWtlcwQNbmZ0TGlrZXNWYWx1ZQkBDHRyeUdldFN0cmluZwEJAKwCAgkArAICAgRuZnRfBQx1cGRhdGVkTmZ0SWQCBl9saWtlcwMJAQEhAQkBCWlzRGVmaW5lZAEJALMJAgUNbmZ0TGlrZXNWYWx1ZQUNY2FsbGVyQWRkcmVzcwQNbmV3TGlrZXNWYWx1ZQMJAAACCQCxAgEFDW5mdExpa2VzVmFsdWUAAAkApQgBCAUBaQZjYWxsZXIJAKwCAgkArAICBQ1uZnRMaWtlc1ZhbHVlAgEsBQ1jYWxsZXJBZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIFC25mdExpa2VzS2V5BQ1uZXdMaWtlc1ZhbHVlBQNuaWwJAAIBAhZZb3UgaGF2ZSBhbHJlYWR5IHZvdGVkCQACAQIrWW91IGNhbiBsaWtlIGlmIHlvdSBzdGFrZSAxIG9yIG1vcmUgUHV6emxlcwkAAgECDkludmFsaWQgTkZUIGlkAWkBCHBsYWNlQmlkAQVuZnRJZAQHaXNHcm91cAkBC3ZhbHVlT3JFbHNlAgkAmwgCCQEHQWRkcmVzcwEFDWNyZWF0ZU5mdERhcHAJAKwCAgkArAICAgRuZnRfBQVuZnRJZAIIX2lzR3JvdXAHAwUHaXNHcm91cAkAAgECPFRoaXMgZnVuY3Rpb24gaXMgbm90IHRlbXBvcmFyaWx5IGF2YWlsYWJsZSBmb3IgbXVsdGlwbGUgTkZUcwMDCQBmAggJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQAAAMJAQEhAQkBCWlzRGVmaW5lZAEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAYJAQEhAQkBBWlzTkZUAQkBBXZhbHVlAQkA7AcBCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQHBAhuZnRBc3NldAkBD3RyeUdldEFzc2V0SW5mbwIFBW5mdElkAg1ORlQgbm90IGZvdW5kBAluZnRBbW91bnQEByRtYXRjaDAJAPAHAgUEdGhpcwgFCG5mdEFzc2V0AmlkAwkAAQIFByRtYXRjaDACA0ludAQBYwUHJG1hdGNoMAUBYwAABAlzZWxsZXJTdHIJARFAZXh0ck5hdGl2ZSgxMDU4KQEJAKwCAgkArAICAgRuZnRfBQVuZnRJZAIHX3NlbGxlcgMJAQIhPQIFCXNlbGxlclN0cgkApQgBCAUBaQZjYWxsZXIDAwkAAAIFCW5mdEFtb3VudAABCQEIY2hlY2tORlQBBQhuZnRBc3NldAcECWNhbGxlclN0cgkApQgBCAUBaQZjYWxsZXIEC2Fzc2V0QW1vdW50CAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQKYXNzZXRJZFN0cgkBDmdldEFzc2V0U3RyaW5nAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBAphdWN0aW9uS2V5CQCsAgIJAKwCAgIIYXVjdGlvbl8JANgEAQgFCG5mdEFzc2V0AmlkAgVfYmlkcwQLYXVjdGlvbkRhdGEJAQx0cnlHZXRTdHJpbmcBBQphdWN0aW9uS2V5BAlhZGRlZERhdGEJAKwCAgkArAICCQCsAgIJAKwCAgUJY2FsbGVyU3RyAgFfCQCkAwEFC2Fzc2V0QW1vdW50AgFfBQphc3NldElkU3RyAwkAZgIAFQkAZAIJAJADAQkAtQkCBQthdWN0aW9uRGF0YQIBLAABBAVleGlzdAkBCGNvbnRhaW5zAgULYXVjdGlvbkRhdGEJAKUIAQgFAWkGY2FsbGVyAwkBASEBBQVleGlzdAQLdXBkYXRlZERhdGEEByRtYXRjaDAJAKIIAQUKYXVjdGlvbktleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJAKwCAgkArAICBQFzAgEsBQlhZGRlZERhdGEFCWFkZGVkRGF0YQkAzAgCCQELU3RyaW5nRW50cnkCBQphdWN0aW9uS2V5BQt1cGRhdGVkRGF0YQUDbmlsCQACAQIUWW91IGhhdmUgYWxyZWFkeSBiaWQJAAIBAi1Zb3UgY2Fubm90IGNyZWF0ZSBtb3JlIHRoYW4gMjcgYmV0cyBmb3IgMSBORlQJAAIBAg9JbnZhbGlkIE5GVCBJZC4JAAIBAhFTZWxsZXIgY2Fubm90IGJpZAkAAgECFFBheW1lbnQgbm90IGF0dGFjaGVkAWkBCWNhbmNlbEJpZAIFbmZ0SWQFYmV0SWQECG5mdEFzc2V0CQEPdHJ5R2V0QXNzZXRJbmZvAgUFbmZ0SWQCDU5GVCBub3QgZm91bmQECmF1Y3Rpb25LZXkJAKwCAgkArAICAghhdWN0aW9uXwkA2AQBCAUIbmZ0QXNzZXQCaWQCBV9iaWRzBAthdWN0aW9uRGF0YQkBDHRyeUdldFN0cmluZwEFCmF1Y3Rpb25LZXkDCQBmAgkAsQIBBQthdWN0aW9uRGF0YQAABAljYWxsZXJTdHIJAKUIAQgFAWkGY2FsbGVyBARiZXRzCQC1CQIFC2F1Y3Rpb25EYXRhAgEsBAhiZXRJbmRleAQHJG1hdGNoMAkAzwgCBQRiZXRzBQViZXRJZAMJAAECBQckbWF0Y2gwAgNJbnQEA2lkeAUHJG1hdGNoMAUDaWR4CQACAQITQmV0IG5vdCBmb3VuZCBieSBpZAQHYmV0RGF0YQkAkQMCBQRiZXRzBQhiZXRJbmRleAQNYmV0UGFyc2VkRGF0YQkAtQkCBQdiZXREYXRhAgFfBAhiZXRPd25lcgkAkQMCBQ1iZXRQYXJzZWREYXRhAAAECWJldEFtb3VudAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFDWJldFBhcnNlZERhdGEAAQQKYmV0QXNzZXRJZAMJAAACCQCRAwIFDWJldFBhcnNlZERhdGEAAgIFV0FWRVMFBHVuaXQJANkEAQkAkQMCBQ1iZXRQYXJzZWREYXRhAAIDCQAAAgUIYmV0T3duZXIFCWNhbGxlclN0cgQHbmV3QmV0cwkA0QgCBQRiZXRzBQhiZXRJbmRleAQOdXBkYXRlRGF0YUxpc3QDCQAAAgkAkAMBBQduZXdCZXRzAAAJAMwIAgkBC0RlbGV0ZUVudHJ5AQUKYXVjdGlvbktleQUDbmlsCQDMCAIJAQtTdHJpbmdFbnRyeQIFCmF1Y3Rpb25LZXkJALkJAgUHbmV3QmV0cwIBLAUDbmlsCQDOCAIJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQliZXRBbW91bnQFCmJldEFzc2V0SWQFA25pbAUOdXBkYXRlRGF0YUxpc3QJAAIBAhRUaGlzIGlzIG5vdCB5b3VyIGJldAkAAgECDUJldCBub3QgZm91bmQBaQEJYWNjZXB0QmlkAgVuZnRJZAViZXRJZAQIbmZ0QXNzZXQJAQ90cnlHZXRBc3NldEluZm8CBQVuZnRJZAINTkZUIG5vdCBmb3VuZAMJAAACCQDwBwIFBHRoaXMIBQhuZnRBc3NldAJpZAABBAlzZWxsZXJTdHIJAQx0cnlHZXRTdHJpbmcBCQCsAgIJAKwCAgIEbmZ0XwUFbmZ0SWQCB19zZWxsZXIECmF1Y3Rpb25LZXkJAKwCAgkArAICAghhdWN0aW9uXwkA2AQBCAUIbmZ0QXNzZXQCaWQCBV9iaWRzAwkAAAIFCXNlbGxlclN0cgkApQgBCAUBaQZjYWxsZXIEC2F1Y3Rpb25EYXRhCQEMdHJ5R2V0U3RyaW5nAQUKYXVjdGlvbktleQMJAGYCCQCxAgEFC2F1Y3Rpb25EYXRhAAAEBGJldHMJALUJAgULYXVjdGlvbkRhdGECASwEDWJldFBhcnNlZERhdGEJALUJAgUFYmV0SWQCAV8ECGJldE93bmVyCQCRAwIFDWJldFBhcnNlZERhdGEAAAQJYmV0QW1vdW50CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUNYmV0UGFyc2VkRGF0YQABBApiZXRBc3NldElkAwkAAAIJAJEDAgUNYmV0UGFyc2VkRGF0YQACAgVXQVZFUwUEdW5pdAkA2QQBCQCRAwIFDWJldFBhcnNlZERhdGEAAgQPcm95YWx0eVJlY2VpdmVyCQEMdHJ5R2V0U3RyaW5nAQkArAICCQCsAgICBG5mdF8FBW5mdElkAhBfcm95YWx0eVJlY2VpdmVyBAtyb3lhbHR5UGFydAkAawMFCWJldEFtb3VudAUOcm95YWx0eVBlcmNlbnQAZAQJbWFya2V0RmVlCQBrAwUJYmV0QW1vdW50AAMAZAQOdW5sb2NrZWROZnRTdHIEByRtYXRjaDAJAPwHBAkBB0FkZHJlc3MBBRBwcm94eURhcHBBZGRyZXNzAgZ1bmxvY2sFA25pbAkAzAgCCQEPQXR0YWNoZWRQYXltZW50AgkA2QQBBQVuZnRJZAABBQNuaWwDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwBQFzCQACAQkArAICAitTb210aGluZyB3cm9uZyB3aGVuIHVubG9jayBORlQgaW4gYWRkcmVzczogCQDYBAEFEHByb3h5RGFwcEFkZHJlc3MDCQAAAgUOdW5sb2NrZWROZnRTdHIFDnVubG9ja2VkTmZ0U3RyAwMJAQ9jb250YWluc0VsZW1lbnQCBQRiZXRzBQViZXRJZAkAZgIFCWJldEFtb3VudAAABwkAzggCCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQkA2QQBBQhiZXRPd25lcgABCQDZBAEFDnVubG9ja2VkTmZ0U3RyCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgkAZQIJAGUCBQliZXRBbW91bnQFC3JveWFsdHlQYXJ0BQltYXJrZXRGZWUFCmJldEFzc2V0SWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBB0FkZHJlc3MBCQDZBAEFD3JveWFsdHlSZWNlaXZlcgULcm95YWx0eVBhcnQFCmJldEFzc2V0SWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUQbWFya2V0RmVlQWRkcmVzcwUJbWFya2V0RmVlBQpiZXRBc3NldElkCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkArAICAgRuZnRfBQVuZnRJZAIMX2J1eU91dFByaWNlCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkArAICAgRuZnRfBQVuZnRJZAIOX2J1eU91dEFzc2V0SWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgICBG5mdF8FBW5mdElkAhBfcm95YWx0eVJlY2VpdmVyCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkArAICAgRuZnRfBQVuZnRJZAIHX3NlbGxlcgkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgkArAICAghhZGRyZXNzXwUJc2VsbGVyU3RyAgVfbmZ0XwUFbmZ0SWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgIJAKwCAgkArAICAghhZGRyZXNzXwUJc2VsbGVyU3RyAgVfbmZ0XwUFbmZ0SWQCDF9zdGFydFNhbGVBdAkAzAgCCQELRGVsZXRlRW50cnkBBQphdWN0aW9uS2V5BQNuaWwJARJhbGxUcmFuc2ZlcnNGb3JCaWQCCQDYBAEIBQhuZnRBc3NldAJpZAUFYmV0SWQJAAIBAhNCZXQgbm90IGZvdW5kIGJ5IElkCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQACAQINQmV0IG5vdCBmb3VuZAkAAgECFFlvdSBhcmUgbm90IGEgc2VsbGVyCQACAQIZTkZUIG5vdCBmb3VuZCBvbiBjb250cmFjdAECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXnBf9ob",
    "height": 3271183,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: D2eDgK5kZFCDB7kgYwLKn4i29aMFhPLzdTTd8THmoTFm
Next: ApQt8iRCoz2oeJihM8r8JAQuvjeHjBPikyTRsxz1MeWU

Diff: 
Old New Differences
202 202                                      let groupAvailable = value(getInteger(Address(createNftDapp), (("group_" + nftId) + "_available")))
203 203                                      if ((groupAvailable == groupAvailable))
204 204                                          then if ((groupAvailable == 0))
205 -                                             then $Tuple2(([ScriptTransfer(i.caller, 1, fromBase58String(newNFTIdStr)), DeleteEntry((("nft_" + nftId) + "_buyOutPrice")), DeleteEntry((("nft_" + nftId) + "_buyOutAssetId")), DeleteEntry((("nft_" + nftId) + "_royaltyReceiver")), DeleteEntry((("nft_" + nftId) + "_seller")), DeleteEntry(((("address_" + sellerStr) + "_nft_") + nftId)), DeleteEntry((((("address_" + sellerStr) + "_nft_") + nftId) + "_startSaleAt")), DeleteEntry(auctionKey)] ++ transferFees), fromBase58String(newNFTIdStr))
205 +                                             then {
206 +                                                 let inv = invoke(Address(createNftDapp), "burnNFT", nil, [AttachedPayment(fromBase58String(nftId), 1)])
207 +                                                 if ((inv == inv))
208 +                                                     then $Tuple2(([ScriptTransfer(i.caller, 1, fromBase58String(newNFTIdStr)), DeleteEntry((("nft_" + nftId) + "_buyOutPrice")), DeleteEntry((("nft_" + nftId) + "_buyOutAssetId")), DeleteEntry((("nft_" + nftId) + "_royaltyReceiver")), DeleteEntry((("nft_" + nftId) + "_seller")), DeleteEntry(((("address_" + sellerStr) + "_nft_") + nftId)), DeleteEntry((((("address_" + sellerStr) + "_nft_") + nftId) + "_startSaleAt")), DeleteEntry(auctionKey)] ++ transferFees), fromBase58String(newNFTIdStr))
209 +                                                     else throw("Strict value is not equal to itself.")
210 +                                                 }
206 211                                              else $Tuple2(([ScriptTransfer(i.caller, 1, fromBase58String(newNFTIdStr))] ++ transferFees), fromBase58String(newNFTIdStr))
207 212                                          else throw("Strict value is not equal to itself.")
208 213                                      }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let createNftDapp = base58'3PFQjjDMiZKQZdu5JqTHD7HwgSXyp9Rw9By'
5 5  
6 6  let marketFeeAddress = Address(base58'3PEa88W5it7LVPVwtpZDfYajQQWkxFNG8qf')
7 7  
8 8  let puzzleStakeAddress = base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'
9 9  
10 10  let proxyDappAddress = base58'3P6fAxtw12pjFhayEfpcUWxgu2BHVCeP78A'
11 11  
12 12  let nftDuckWrapper = base58'3P3pDosq4GCwfJkvq4yqKvvoTwmoqc9qPmo'
13 13  
14 14  let nftSignArtWrapper = base58'3PPgeYTWMRZ7S7jSLpnVuKKB9r6XuDk3ndC'
15 15  
16 16  let duckFeeAddress = base58'3P6AobNbcQ3ZjcRY37mJPKN8PP9Giz8kgeY'
17 17  
18 18  let ducksPercent = 30
19 19  
20 20  let royaltyPercent = 7
21 21  
22 22  func isNFT (asset) = if (if ((asset.decimals == 0))
23 23      then (asset.reissuable == false)
24 24      else false)
25 25      then (asset.quantity == 1)
26 26      else false
27 27  
28 28  
29 29  func checkNFT (asset) = if (if (if ((asset.issuer.bytes == createNftDapp))
30 30      then (asset.decimals == 0)
31 31      else false)
32 32      then (asset.reissuable == false)
33 33      else false)
34 34      then (asset.quantity == 1)
35 35      else false
36 36  
37 37  
38 38  func tryGetInteger (key) = match getInteger(this, key) {
39 39      case b: Int => 
40 40          b
41 41      case _ => 
42 42          0
43 43  }
44 44  
45 45  
46 46  func tryGetString (key) = match getString(this, key) {
47 47      case b: String => 
48 48          b
49 49      case _ => 
50 50          ""
51 51  }
52 52  
53 53  
54 54  func tryGetAssetInfo (assetId,errorMsg) = match assetInfo(fromBase58String(assetId)) {
55 55      case a: Asset => 
56 56          a
57 57      case _ => 
58 58          throw(errorMsg)
59 59  }
60 60  
61 61  
62 62  func getAssetString (assetId) = match assetId {
63 63      case b: ByteVector => 
64 64          toBase58String(b)
65 65      case _ => 
66 66          "WAVES"
67 67  }
68 68  
69 69  
70 70  func getAssetBytes (assetIdStr) = if ((assetIdStr == "WAVES"))
71 71      then unit
72 72      else fromBase58String(assetIdStr)
73 73  
74 74  
75 75  func allTransfersForBid (nftId,exclude) = {
76 76      let auctionKey = (("auction_" + nftId) + "_bids")
77 77      let auctionData = tryGetString(auctionKey)
78 78      let excludeId = if ((size(exclude) > 0))
79 79          then exclude
80 80          else ""
81 81      if ((size(auctionData) == 0))
82 82          then nil
83 83          else {
84 84              func getReturnTransactions (accum,next) =             {
85 85                  let betParsedData = split(next, "_")
86 86                  let betOwner = betParsedData[0]
87 87                  let betAmount = parseIntValue(betParsedData[1])
88 88                  let betAssetId = if ((betParsedData[2] == "WAVES"))
89 89                      then unit
90 90                      else fromBase58String(betParsedData[2])
91 91                  if (if ((size(excludeId) > 0))
92 92                      then (excludeId == next)
93 93                      else false)
94 94                      then accum
95 95                      else (accum :+ ScriptTransfer(Address(fromBase58String(betOwner)), betAmount, betAssetId))
96 96                  }
97 97  
98 98              let $l = split(auctionData, ",")
99 99              let $s = size($l)
100 100              let $acc0 = nil
101 101              func $f0_1 ($a,$i) =             if (($i >= $s))
102 102                  then $a
103 103                  else getReturnTransactions($a, $l[$i])
104 104  
105 105              func $f0_2 ($a,$i) =             if (($i >= $s))
106 106                  then $a
107 107                  else throw("List size exceeds 26")
108 108  
109 109              $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($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)
110 110              }
111 111      }
112 112  
113 113  
114 114  @Callable(i)
115 115  func sellNFT (buyOutPrice,buyOutAssetId) = {
116 116      let pmt = if (if ((size(i.payments) == 1))
117 117          then (i.payments[0].amount == 1)
118 118          else false)
119 119          then i.payments[0]
120 120          else throw("NFT not listed as payment")
121 121      let buyOutAsset = getAssetBytes(buyOutAssetId)
122 122      if (isDefined(pmt.assetId))
123 123          then {
124 124              let nftId = value(pmt.assetId)
125 125              let nft =             match assetInfo(nftId) {
126 126                  case a: Asset => 
127 127                      a
128 128                  case _ => 
129 129                      throw("Can't find NFT")
130 130              }
131 131              if (checkNFT(nft))
132 132                  then if ((buyOutPrice > 0))
133 133                      then {
134 134                          let assetNameStr = toBase58String(nft.id)
135 135                          let nftIssuer =                         match getString(Address(createNftDapp), (("nft_" + assetNameStr) + "_issuer")) {
136 136                              case a: String => 
137 137                                  a
138 138                              case _ => 
139 139                                  toString(i.caller)
140 140                          }
141 141                          let royaltyReceiver = if ((nftIssuer != toBase58String(nftSignArtWrapper)))
142 142                              then nftIssuer
143 143                              else split(split(value(assetInfo(nftId)).description, " ")[2], ".")[0]
144 144  [IntegerEntry((("nft_" + assetNameStr) + "_buyOutPrice"), buyOutPrice), StringEntry((("nft_" + assetNameStr) + "_buyOutAssetId"), getAssetString(buyOutAsset)), StringEntry((("nft_" + assetNameStr) + "_royaltyReceiver"), royaltyReceiver), StringEntry((("nft_" + assetNameStr) + "_seller"), toString(i.originCaller)), StringEntry(((("address_" + toString(i.originCaller)) + "_nft_") + assetNameStr), assetNameStr), IntegerEntry((((("address_" + toString(i.originCaller)) + "_nft_") + assetNameStr) + "_startSaleAt"), height)]
145 145                          }
146 146                      else throw("Price must be greater than zero")
147 147                  else throw("NFT issued by another dapp")
148 148              }
149 149          else throw("NFT is not attached to the transaction")
150 150      }
151 151  
152 152  
153 153  
154 154  @Callable(i)
155 155  func buyNFT (nftId) = {
156 156      let pmt = if ((size(i.payments) == 1))
157 157          then i.payments[0]
158 158          else throw("Attached payment is required")
159 159      let buyOutPrice = tryGetInteger((("nft_" + nftId) + "_buyOutPrice"))
160 160      let buyOutAssetIdStr = tryGetString((("nft_" + nftId) + "_buyOutAssetId"))
161 161      let royaltyReceiver = tryGetString((("nft_" + nftId) + "_royaltyReceiver"))
162 162      let sellerStr = tryGetString((("nft_" + nftId) + "_seller"))
163 163      let nftAsset = tryGetAssetInfo(nftId, "NFT not found")
164 164      let buyOutAssetId = if ((buyOutAssetIdStr == "WAVES"))
165 165          then unit
166 166          else         match assetInfo(fromBase58String(buyOutAssetIdStr)) {
167 167              case a: Asset => 
168 168                  a.id
169 169              case _ => 
170 170                  throw("Buyout asset not found")
171 171          }
172 172      let auctionKey = (("auction_" + toBase58String(nftAsset.id)) + "_bids")
173 173      if (if ((buyOutPrice > 0))
174 174          then (pmt.amount >= buyOutPrice)
175 175          else false)
176 176          then {
177 177              let duckNftId = valueOrElse(getString(Address(nftDuckWrapper), (("nft_" + nftId) + "_duckId")), "")
178 178              let transferFees = if ((size(duckNftId) > 0))
179 179                  then {
180 180                      let duckFee = fraction(buyOutPrice, ducksPercent, 100)
181 181  [ScriptTransfer(Address(fromBase58String(sellerStr)), (buyOutPrice - duckFee), buyOutAssetId), ScriptTransfer(Address(duckFeeAddress), duckFee, buyOutAssetId)]
182 182                      }
183 183                  else {
184 184                      let royaltyPart = fraction(buyOutPrice, royaltyPercent, 100)
185 185                      let marketFee = fraction(buyOutPrice, 3, 100)
186 186  [ScriptTransfer(Address(fromBase58String(sellerStr)), ((buyOutPrice - royaltyPart) - marketFee), buyOutAssetId), ScriptTransfer(Address(fromBase58String(royaltyReceiver)), royaltyPart, buyOutAssetId), ScriptTransfer(marketFeeAddress, marketFee, buyOutAssetId)]
187 187                      }
188 188              if ((pmt.assetId == buyOutAssetId))
189 189                  then {
190 190                      let isGroup = valueOrElse(getBoolean(Address(createNftDapp), (("nft_" + nftId) + "_isGroup")), false)
191 191                      if (!(isGroup))
192 192                          then $Tuple2((([ScriptTransfer(i.caller, 1, nftAsset.id), DeleteEntry((("nft_" + nftId) + "_buyOutPrice")), DeleteEntry((("nft_" + nftId) + "_buyOutAssetId")), DeleteEntry((("nft_" + nftId) + "_royaltyReceiver")), DeleteEntry((("nft_" + nftId) + "_seller")), DeleteEntry(((("address_" + sellerStr) + "_nft_") + nftId)), DeleteEntry((((("address_" + sellerStr) + "_nft_") + nftId) + "_startSaleAt")), DeleteEntry(auctionKey)] ++ transferFees) ++ allTransfersForBid(toBase58String(nftAsset.id), "")), toBase58String(nftAsset.id))
193 193                          else {
194 194                              let newNFTIdStr =                             match invoke(Address(createNftDapp), "mintFromGroup", [nftId], nil) {
195 195                                  case s: String => 
196 196                                      s
197 197                                  case _ => 
198 198                                      throw("Somthing wrong when mint multiple NFT")
199 199                              }
200 200                              if ((newNFTIdStr == newNFTIdStr))
201 201                                  then {
202 202                                      let groupAvailable = value(getInteger(Address(createNftDapp), (("group_" + nftId) + "_available")))
203 203                                      if ((groupAvailable == groupAvailable))
204 204                                          then if ((groupAvailable == 0))
205 -                                             then $Tuple2(([ScriptTransfer(i.caller, 1, fromBase58String(newNFTIdStr)), DeleteEntry((("nft_" + nftId) + "_buyOutPrice")), DeleteEntry((("nft_" + nftId) + "_buyOutAssetId")), DeleteEntry((("nft_" + nftId) + "_royaltyReceiver")), DeleteEntry((("nft_" + nftId) + "_seller")), DeleteEntry(((("address_" + sellerStr) + "_nft_") + nftId)), DeleteEntry((((("address_" + sellerStr) + "_nft_") + nftId) + "_startSaleAt")), DeleteEntry(auctionKey)] ++ transferFees), fromBase58String(newNFTIdStr))
205 +                                             then {
206 +                                                 let inv = invoke(Address(createNftDapp), "burnNFT", nil, [AttachedPayment(fromBase58String(nftId), 1)])
207 +                                                 if ((inv == inv))
208 +                                                     then $Tuple2(([ScriptTransfer(i.caller, 1, fromBase58String(newNFTIdStr)), DeleteEntry((("nft_" + nftId) + "_buyOutPrice")), DeleteEntry((("nft_" + nftId) + "_buyOutAssetId")), DeleteEntry((("nft_" + nftId) + "_royaltyReceiver")), DeleteEntry((("nft_" + nftId) + "_seller")), DeleteEntry(((("address_" + sellerStr) + "_nft_") + nftId)), DeleteEntry((((("address_" + sellerStr) + "_nft_") + nftId) + "_startSaleAt")), DeleteEntry(auctionKey)] ++ transferFees), fromBase58String(newNFTIdStr))
209 +                                                     else throw("Strict value is not equal to itself.")
210 +                                                 }
206 211                                              else $Tuple2(([ScriptTransfer(i.caller, 1, fromBase58String(newNFTIdStr))] ++ transferFees), fromBase58String(newNFTIdStr))
207 212                                          else throw("Strict value is not equal to itself.")
208 213                                      }
209 214                                  else throw("Strict value is not equal to itself.")
210 215                              }
211 216                      }
212 217                  else throw("The buyout asset does not match the purchase asset")
213 218              }
214 219          else throw("Payment amount must be greater than zero")
215 220      }
216 221  
217 222  
218 223  
219 224  @Callable(i)
220 225  func cancelSell (nftId) = {
221 226      let sellerStr = tryGetString((("nft_" + nftId) + "_seller"))
222 227      let nftAsset = tryGetAssetInfo(nftId, "NFT not found")
223 228      let auctionKey = (("auction_" + toBase58String(nftAsset.id)) + "_bids")
224 229      if (if ((size(sellerStr) > 0))
225 230          then (sellerStr == toString(i.originCaller))
226 231          else false)
227 232          then $Tuple2(([ScriptTransfer(i.caller, 1, nftAsset.id), DeleteEntry((("nft_" + nftId) + "_buyOutPrice")), DeleteEntry((("nft_" + nftId) + "_buyOutAssetId")), DeleteEntry((("nft_" + nftId) + "_royaltyReceiver")), DeleteEntry((("nft_" + nftId) + "_seller")), DeleteEntry(((("address_" + sellerStr) + "_nft_") + nftId)), DeleteEntry((((("address_" + sellerStr) + "_nft_") + nftId) + "_startSaleAt")), DeleteEntry(auctionKey)] ++ allTransfersForBid(toBase58String(nftAsset.id), "")), nftId)
228 233          else throw("You are not a seller")
229 234      }
230 235  
231 236  
232 237  
233 238  @Callable(i)
234 239  func like (nftId) = {
235 240      let nftAsset = assetInfo(fromBase58String(nftId))
236 241      let duckNftId = valueOrElse(getString(Address(nftDuckWrapper), (("nft_" + nftId) + "_duckId")), "")
237 242      let signArtNftId = valueOrElse(getString(Address(nftSignArtWrapper), (("signArtNft_" + nftId) + "_assetId")), "")
238 243      let updatedNftId = if ((size(duckNftId) > 0))
239 244          then duckNftId
240 245          else if ((size(signArtNftId) > 0))
241 246              then signArtNftId
242 247              else nftId
243 248      if (if (isDefined(nftAsset))
244 249          then checkNFT(value(nftAsset))
245 250          else false)
246 251          then {
247 252              let callerAddress = toString(i.caller)
248 253              let countStaked =             match getInteger(Address(puzzleStakeAddress), (callerAddress + "_staked")) {
249 254                  case c: Int => 
250 255                      c
251 256                  case _ => 
252 257                      0
253 258              }
254 259              if ((countStaked >= 100000000))
255 260                  then {
256 261                      let nftLikesKey = (("nft_" + updatedNftId) + "_likes")
257 262                      let nftLikesValue = tryGetString((("nft_" + updatedNftId) + "_likes"))
258 263                      if (!(isDefined(indexOf(nftLikesValue, callerAddress))))
259 264                          then {
260 265                              let newLikesValue = if ((size(nftLikesValue) == 0))
261 266                                  then toString(i.caller)
262 267                                  else ((nftLikesValue + ",") + callerAddress)
263 268  [StringEntry(nftLikesKey, newLikesValue)]
264 269                              }
265 270                          else throw("You have already voted")
266 271                      }
267 272                  else throw("You can like if you stake 1 or more Puzzles")
268 273              }
269 274          else throw("Invalid NFT id")
270 275      }
271 276  
272 277  
273 278  
274 279  @Callable(i)
275 280  func placeBid (nftId) = {
276 281      let isGroup = valueOrElse(getBoolean(Address(createNftDapp), (("nft_" + nftId) + "_isGroup")), false)
277 282      if (isGroup)
278 283          then throw("This function is not temporarily available for multiple NFTs")
279 284          else if (if ((i.payments[0].amount > 0))
280 285              then if (!(isDefined(i.payments[0].assetId)))
281 286                  then true
282 287                  else !(isNFT(value(assetInfo(value(i.payments[0].assetId)))))
283 288              else false)
284 289              then {
285 290                  let nftAsset = tryGetAssetInfo(nftId, "NFT not found")
286 291                  let nftAmount =                 match assetBalance(this, nftAsset.id) {
287 292                      case c: Int => 
288 293                          c
289 294                      case _ => 
290 295                          0
291 296                  }
292 297                  let sellerStr = getStringValue((("nft_" + nftId) + "_seller"))
293 298                  if ((sellerStr != toString(i.caller)))
294 299                      then if (if ((nftAmount == 1))
295 300                          then checkNFT(nftAsset)
296 301                          else false)
297 302                          then {
298 303                              let callerStr = toString(i.caller)
299 304                              let assetAmount = i.payments[0].amount
300 305                              let assetIdStr = getAssetString(i.payments[0].assetId)
301 306                              let auctionKey = (("auction_" + toBase58String(nftAsset.id)) + "_bids")
302 307                              let auctionData = tryGetString(auctionKey)
303 308                              let addedData = ((((callerStr + "_") + toString(assetAmount)) + "_") + assetIdStr)
304 309                              if ((21 > (size(split(auctionData, ",")) + 1)))
305 310                                  then {
306 311                                      let exist = contains(auctionData, toString(i.caller))
307 312                                      if (!(exist))
308 313                                          then {
309 314                                              let updatedData =                                             match getString(auctionKey) {
310 315                                                  case s: String => 
311 316                                                      ((s + ",") + addedData)
312 317                                                  case _ => 
313 318                                                      addedData
314 319                                              }
315 320  [StringEntry(auctionKey, updatedData)]
316 321                                              }
317 322                                          else throw("You have already bid")
318 323                                      }
319 324                                  else throw("You cannot create more than 27 bets for 1 NFT")
320 325                              }
321 326                          else throw("Invalid NFT Id.")
322 327                      else throw("Seller cannot bid")
323 328                  }
324 329              else throw("Payment not attached")
325 330      }
326 331  
327 332  
328 333  
329 334  @Callable(i)
330 335  func cancelBid (nftId,betId) = {
331 336      let nftAsset = tryGetAssetInfo(nftId, "NFT not found")
332 337      let auctionKey = (("auction_" + toBase58String(nftAsset.id)) + "_bids")
333 338      let auctionData = tryGetString(auctionKey)
334 339      if ((size(auctionData) > 0))
335 340          then {
336 341              let callerStr = toString(i.caller)
337 342              let bets = split(auctionData, ",")
338 343              let betIndex =             match indexOf(bets, betId) {
339 344                  case idx: Int => 
340 345                      idx
341 346                  case _ => 
342 347                      throw("Bet not found by id")
343 348              }
344 349              let betData = bets[betIndex]
345 350              let betParsedData = split(betData, "_")
346 351              let betOwner = betParsedData[0]
347 352              let betAmount = parseIntValue(betParsedData[1])
348 353              let betAssetId = if ((betParsedData[2] == "WAVES"))
349 354                  then unit
350 355                  else fromBase58String(betParsedData[2])
351 356              if ((betOwner == callerStr))
352 357                  then {
353 358                      let newBets = removeByIndex(bets, betIndex)
354 359                      let updateDataList = if ((size(newBets) == 0))
355 360                          then [DeleteEntry(auctionKey)]
356 361                          else [StringEntry(auctionKey, makeString(newBets, ","))]
357 362                      ([ScriptTransfer(i.caller, betAmount, betAssetId)] ++ updateDataList)
358 363                      }
359 364                  else throw("This is not your bet")
360 365              }
361 366          else throw("Bet not found")
362 367      }
363 368  
364 369  
365 370  
366 371  @Callable(i)
367 372  func acceptBid (nftId,betId) = {
368 373      let nftAsset = tryGetAssetInfo(nftId, "NFT not found")
369 374      if ((assetBalance(this, nftAsset.id) == 1))
370 375          then {
371 376              let sellerStr = tryGetString((("nft_" + nftId) + "_seller"))
372 377              let auctionKey = (("auction_" + toBase58String(nftAsset.id)) + "_bids")
373 378              if ((sellerStr == toString(i.caller)))
374 379                  then {
375 380                      let auctionData = tryGetString(auctionKey)
376 381                      if ((size(auctionData) > 0))
377 382                          then {
378 383                              let bets = split(auctionData, ",")
379 384                              let betParsedData = split(betId, "_")
380 385                              let betOwner = betParsedData[0]
381 386                              let betAmount = parseIntValue(betParsedData[1])
382 387                              let betAssetId = if ((betParsedData[2] == "WAVES"))
383 388                                  then unit
384 389                                  else fromBase58String(betParsedData[2])
385 390                              let royaltyReceiver = tryGetString((("nft_" + nftId) + "_royaltyReceiver"))
386 391                              let royaltyPart = fraction(betAmount, royaltyPercent, 100)
387 392                              let marketFee = fraction(betAmount, 3, 100)
388 393                              let unlockedNftStr =                             match invoke(Address(proxyDappAddress), "unlock", nil, [AttachedPayment(fromBase58String(nftId), 1)]) {
389 394                                  case s: String => 
390 395                                      s
391 396                                  case _ => 
392 397                                      throw(("Somthing wrong when unlock NFT in address: " + toBase58String(proxyDappAddress)))
393 398                              }
394 399                              if ((unlockedNftStr == unlockedNftStr))
395 400                                  then if (if (containsElement(bets, betId))
396 401                                      then (betAmount > 0)
397 402                                      else false)
398 403                                      then ([ScriptTransfer(Address(fromBase58String(betOwner)), 1, fromBase58String(unlockedNftStr)), ScriptTransfer(i.caller, ((betAmount - royaltyPart) - marketFee), betAssetId), ScriptTransfer(Address(fromBase58String(royaltyReceiver)), royaltyPart, betAssetId), ScriptTransfer(marketFeeAddress, marketFee, betAssetId), DeleteEntry((("nft_" + nftId) + "_buyOutPrice")), DeleteEntry((("nft_" + nftId) + "_buyOutAssetId")), DeleteEntry((("nft_" + nftId) + "_royaltyReceiver")), DeleteEntry((("nft_" + nftId) + "_seller")), DeleteEntry(((("address_" + sellerStr) + "_nft_") + nftId)), DeleteEntry((((("address_" + sellerStr) + "_nft_") + nftId) + "_startSaleAt")), DeleteEntry(auctionKey)] ++ allTransfersForBid(toBase58String(nftAsset.id), betId))
399 404                                      else throw("Bet not found by Id")
400 405                                  else throw("Strict value is not equal to itself.")
401 406                              }
402 407                          else throw("Bet not found")
403 408                      }
404 409                  else throw("You are not a seller")
405 410              }
406 411          else throw("NFT not found on contract")
407 412      }
408 413  
409 414  
410 415  @Verifier(tx)
411 416  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
412 417

Old	New		Differences
202	202		let groupAvailable = value(getInteger(Address(createNftDapp), (("group_" + nftId) + "_available")))
203	203		if ((groupAvailable == groupAvailable))
204	204		then if ((groupAvailable == 0))
205		-	then $Tuple2(([ScriptTransfer(i.caller, 1, fromBase58String(newNFTIdStr)), DeleteEntry((("nft_" + nftId) + "_buyOutPrice")), DeleteEntry((("nft_" + nftId) + "_buyOutAssetId")), DeleteEntry((("nft_" + nftId) + "_royaltyReceiver")), DeleteEntry((("nft_" + nftId) + "_seller")), DeleteEntry(((("address_" + sellerStr) + "_nft_") + nftId)), DeleteEntry((((("address_" + sellerStr) + "_nft_") + nftId) + "_startSaleAt")), DeleteEntry(auctionKey)] ++ transferFees), fromBase58String(newNFTIdStr))
	205	+	then {
	206	+	let inv = invoke(Address(createNftDapp), "burnNFT", nil, [AttachedPayment(fromBase58String(nftId), 1)])
	207	+	if ((inv == inv))
	208	+	then $Tuple2(([ScriptTransfer(i.caller, 1, fromBase58String(newNFTIdStr)), DeleteEntry((("nft_" + nftId) + "_buyOutPrice")), DeleteEntry((("nft_" + nftId) + "_buyOutAssetId")), DeleteEntry((("nft_" + nftId) + "_royaltyReceiver")), DeleteEntry((("nft_" + nftId) + "_seller")), DeleteEntry(((("address_" + sellerStr) + "_nft_") + nftId)), DeleteEntry((((("address_" + sellerStr) + "_nft_") + nftId) + "_startSaleAt")), DeleteEntry(auctionKey)] ++ transferFees), fromBase58String(newNFTIdStr))
	209	+	else throw("Strict value is not equal to itself.")
	210	+	}
206	211		else $Tuple2(([ScriptTransfer(i.caller, 1, fromBase58String(newNFTIdStr))] ++ transferFees), fromBase58String(newNFTIdStr))
207	212		else throw("Strict value is not equal to itself.")
208	213		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let createNftDapp = base58'3PFQjjDMiZKQZdu5JqTHD7HwgSXyp9Rw9By'
5	5
6	6		let marketFeeAddress = Address(base58'3PEa88W5it7LVPVwtpZDfYajQQWkxFNG8qf')
7	7
8	8		let puzzleStakeAddress = base58'3PFTbywqxtFfukX3HyT881g4iW5K4QL3FAS'
9	9
10	10		let proxyDappAddress = base58'3P6fAxtw12pjFhayEfpcUWxgu2BHVCeP78A'
11	11
12	12		let nftDuckWrapper = base58'3P3pDosq4GCwfJkvq4yqKvvoTwmoqc9qPmo'
13	13
14	14		let nftSignArtWrapper = base58'3PPgeYTWMRZ7S7jSLpnVuKKB9r6XuDk3ndC'
15	15
16	16		let duckFeeAddress = base58'3P6AobNbcQ3ZjcRY37mJPKN8PP9Giz8kgeY'
17	17
18	18		let ducksPercent = 30
19	19
20	20		let royaltyPercent = 7
21	21
22	22		func isNFT (asset) = if (if ((asset.decimals == 0))
23	23		then (asset.reissuable == false)
24	24		else false)
25	25		then (asset.quantity == 1)
26	26		else false
27	27
28	28
29	29		func checkNFT (asset) = if (if (if ((asset.issuer.bytes == createNftDapp))
30	30		then (asset.decimals == 0)
31	31		else false)
32	32		then (asset.reissuable == false)
33	33		else false)
34	34		then (asset.quantity == 1)
35	35		else false
36	36
37	37
38	38		func tryGetInteger (key) = match getInteger(this, key) {
39	39		case b: Int =>
40	40		b
41	41		case _ =>
42	42		0
43	43		}
44	44
45	45
46	46		func tryGetString (key) = match getString(this, key) {
47	47		case b: String =>
48	48		b
49	49		case _ =>
50	50		""
51	51		}
52	52
53	53
54	54		func tryGetAssetInfo (assetId,errorMsg) = match assetInfo(fromBase58String(assetId)) {
55	55		case a: Asset =>
56	56		a
57	57		case _ =>
58	58		throw(errorMsg)
59	59		}
60	60
61	61
62	62		func getAssetString (assetId) = match assetId {
63	63		case b: ByteVector =>
64	64		toBase58String(b)
65	65		case _ =>
66	66		"WAVES"
67	67		}
68	68
69	69
70	70		func getAssetBytes (assetIdStr) = if ((assetIdStr == "WAVES"))
71	71		then unit
72	72		else fromBase58String(assetIdStr)
73	73
74	74
75	75		func allTransfersForBid (nftId,exclude) = {
76	76		let auctionKey = (("auction_" + nftId) + "_bids")
77	77		let auctionData = tryGetString(auctionKey)
78	78		let excludeId = if ((size(exclude) > 0))
79	79		then exclude
80	80		else ""
81	81		if ((size(auctionData) == 0))
82	82		then nil
83	83		else {
84	84		func getReturnTransactions (accum,next) = {
85	85		let betParsedData = split(next, "_")
86	86		let betOwner = betParsedData[0]
87	87		let betAmount = parseIntValue(betParsedData[1])
88	88		let betAssetId = if ((betParsedData[2] == "WAVES"))
89	89		then unit
90	90		else fromBase58String(betParsedData[2])
91	91		if (if ((size(excludeId) > 0))
92	92		then (excludeId == next)
93	93		else false)
94	94		then accum
95	95		else (accum :+ ScriptTransfer(Address(fromBase58String(betOwner)), betAmount, betAssetId))
96	96		}
97	97
98	98		let $l = split(auctionData, ",")
99	99		let $s = size($l)
100	100		let $acc0 = nil
101	101		func $f0_1 ($a,$i) = if (($i >= $s))
102	102		then $a
103	103		else getReturnTransactions($a, $l[$i])
104	104
105	105		func $f0_2 ($a,$i) = if (($i >= $s))
106	106		then $a
107	107		else throw("List size exceeds 26")
108	108
109	109		$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($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)
110	110		}
111	111		}
112	112
113	113
114	114		@Callable(i)
115	115		func sellNFT (buyOutPrice,buyOutAssetId) = {
116	116		let pmt = if (if ((size(i.payments) == 1))
117	117		then (i.payments[0].amount == 1)
118	118		else false)
119	119		then i.payments[0]
120	120		else throw("NFT not listed as payment")
121	121		let buyOutAsset = getAssetBytes(buyOutAssetId)
122	122		if (isDefined(pmt.assetId))
123	123		then {
124	124		let nftId = value(pmt.assetId)
125	125		let nft = match assetInfo(nftId) {
126	126		case a: Asset =>
127	127		a
128	128		case _ =>
129	129		throw("Can't find NFT")
130	130		}
131	131		if (checkNFT(nft))
132	132		then if ((buyOutPrice > 0))
133	133		then {
134	134		let assetNameStr = toBase58String(nft.id)
135	135		let nftIssuer = match getString(Address(createNftDapp), (("nft_" + assetNameStr) + "_issuer")) {
136	136		case a: String =>
137	137		a
138	138		case _ =>
139	139		toString(i.caller)
140	140		}
141	141		let royaltyReceiver = if ((nftIssuer != toBase58String(nftSignArtWrapper)))
142	142		then nftIssuer
143	143		else split(split(value(assetInfo(nftId)).description, " ")[2], ".")[0]
144	144		[IntegerEntry((("nft_" + assetNameStr) + "_buyOutPrice"), buyOutPrice), StringEntry((("nft_" + assetNameStr) + "_buyOutAssetId"), getAssetString(buyOutAsset)), StringEntry((("nft_" + assetNameStr) + "_royaltyReceiver"), royaltyReceiver), StringEntry((("nft_" + assetNameStr) + "_seller"), toString(i.originCaller)), StringEntry(((("address_" + toString(i.originCaller)) + "_nft_") + assetNameStr), assetNameStr), IntegerEntry((((("address_" + toString(i.originCaller)) + "_nft_") + assetNameStr) + "_startSaleAt"), height)]
145	145		}
146	146		else throw("Price must be greater than zero")
147	147		else throw("NFT issued by another dapp")
148	148		}
149	149		else throw("NFT is not attached to the transaction")
150	150		}
151	151
152	152
153	153
154	154		@Callable(i)
155	155		func buyNFT (nftId) = {
156	156		let pmt = if ((size(i.payments) == 1))
157	157		then i.payments[0]
158	158		else throw("Attached payment is required")
159	159		let buyOutPrice = tryGetInteger((("nft_" + nftId) + "_buyOutPrice"))
160	160		let buyOutAssetIdStr = tryGetString((("nft_" + nftId) + "_buyOutAssetId"))
161	161		let royaltyReceiver = tryGetString((("nft_" + nftId) + "_royaltyReceiver"))
162	162		let sellerStr = tryGetString((("nft_" + nftId) + "_seller"))
163	163		let nftAsset = tryGetAssetInfo(nftId, "NFT not found")
164	164		let buyOutAssetId = if ((buyOutAssetIdStr == "WAVES"))
165	165		then unit
166	166		else match assetInfo(fromBase58String(buyOutAssetIdStr)) {
167	167		case a: Asset =>
168	168		a.id
169	169		case _ =>
170	170		throw("Buyout asset not found")
171	171		}
172	172		let auctionKey = (("auction_" + toBase58String(nftAsset.id)) + "_bids")
173	173		if (if ((buyOutPrice > 0))
174	174		then (pmt.amount >= buyOutPrice)
175	175		else false)
176	176		then {
177	177		let duckNftId = valueOrElse(getString(Address(nftDuckWrapper), (("nft_" + nftId) + "_duckId")), "")
178	178		let transferFees = if ((size(duckNftId) > 0))
179	179		then {
180	180		let duckFee = fraction(buyOutPrice, ducksPercent, 100)
181	181		[ScriptTransfer(Address(fromBase58String(sellerStr)), (buyOutPrice - duckFee), buyOutAssetId), ScriptTransfer(Address(duckFeeAddress), duckFee, buyOutAssetId)]
182	182		}
183	183		else {
184	184		let royaltyPart = fraction(buyOutPrice, royaltyPercent, 100)
185	185		let marketFee = fraction(buyOutPrice, 3, 100)
186	186		[ScriptTransfer(Address(fromBase58String(sellerStr)), ((buyOutPrice - royaltyPart) - marketFee), buyOutAssetId), ScriptTransfer(Address(fromBase58String(royaltyReceiver)), royaltyPart, buyOutAssetId), ScriptTransfer(marketFeeAddress, marketFee, buyOutAssetId)]
187	187		}
188	188		if ((pmt.assetId == buyOutAssetId))
189	189		then {
190	190		let isGroup = valueOrElse(getBoolean(Address(createNftDapp), (("nft_" + nftId) + "_isGroup")), false)
191	191		if (!(isGroup))
192	192		then $Tuple2((([ScriptTransfer(i.caller, 1, nftAsset.id), DeleteEntry((("nft_" + nftId) + "_buyOutPrice")), DeleteEntry((("nft_" + nftId) + "_buyOutAssetId")), DeleteEntry((("nft_" + nftId) + "_royaltyReceiver")), DeleteEntry((("nft_" + nftId) + "_seller")), DeleteEntry(((("address_" + sellerStr) + "_nft_") + nftId)), DeleteEntry((((("address_" + sellerStr) + "_nft_") + nftId) + "_startSaleAt")), DeleteEntry(auctionKey)] ++ transferFees) ++ allTransfersForBid(toBase58String(nftAsset.id), "")), toBase58String(nftAsset.id))
193	193		else {
194	194		let newNFTIdStr = match invoke(Address(createNftDapp), "mintFromGroup", [nftId], nil) {
195	195		case s: String =>
196	196		s
197	197		case _ =>
198	198		throw("Somthing wrong when mint multiple NFT")
199	199		}
200	200		if ((newNFTIdStr == newNFTIdStr))
201	201		then {
202	202		let groupAvailable = value(getInteger(Address(createNftDapp), (("group_" + nftId) + "_available")))
203	203		if ((groupAvailable == groupAvailable))
204	204		then if ((groupAvailable == 0))
205		-	then $Tuple2(([ScriptTransfer(i.caller, 1, fromBase58String(newNFTIdStr)), DeleteEntry((("nft_" + nftId) + "_buyOutPrice")), DeleteEntry((("nft_" + nftId) + "_buyOutAssetId")), DeleteEntry((("nft_" + nftId) + "_royaltyReceiver")), DeleteEntry((("nft_" + nftId) + "_seller")), DeleteEntry(((("address_" + sellerStr) + "_nft_") + nftId)), DeleteEntry((((("address_" + sellerStr) + "_nft_") + nftId) + "_startSaleAt")), DeleteEntry(auctionKey)] ++ transferFees), fromBase58String(newNFTIdStr))
	205	+	then {
	206	+	let inv = invoke(Address(createNftDapp), "burnNFT", nil, [AttachedPayment(fromBase58String(nftId), 1)])
	207	+	if ((inv == inv))
	208	+	then $Tuple2(([ScriptTransfer(i.caller, 1, fromBase58String(newNFTIdStr)), DeleteEntry((("nft_" + nftId) + "_buyOutPrice")), DeleteEntry((("nft_" + nftId) + "_buyOutAssetId")), DeleteEntry((("nft_" + nftId) + "_royaltyReceiver")), DeleteEntry((("nft_" + nftId) + "_seller")), DeleteEntry(((("address_" + sellerStr) + "_nft_") + nftId)), DeleteEntry((((("address_" + sellerStr) + "_nft_") + nftId) + "_startSaleAt")), DeleteEntry(auctionKey)] ++ transferFees), fromBase58String(newNFTIdStr))
	209	+	else throw("Strict value is not equal to itself.")
	210	+	}
206	211		else $Tuple2(([ScriptTransfer(i.caller, 1, fromBase58String(newNFTIdStr))] ++ transferFees), fromBase58String(newNFTIdStr))
207	212		else throw("Strict value is not equal to itself.")
208	213		}
209	214		else throw("Strict value is not equal to itself.")
210	215		}
211	216		}
212	217		else throw("The buyout asset does not match the purchase asset")
213	218		}
214	219		else throw("Payment amount must be greater than zero")
215	220		}
216	221
217	222
218	223
219	224		@Callable(i)
220	225		func cancelSell (nftId) = {
221	226		let sellerStr = tryGetString((("nft_" + nftId) + "_seller"))
222	227		let nftAsset = tryGetAssetInfo(nftId, "NFT not found")
223	228		let auctionKey = (("auction_" + toBase58String(nftAsset.id)) + "_bids")
224	229		if (if ((size(sellerStr) > 0))
225	230		then (sellerStr == toString(i.originCaller))
226	231		else false)
227	232		then $Tuple2(([ScriptTransfer(i.caller, 1, nftAsset.id), DeleteEntry((("nft_" + nftId) + "_buyOutPrice")), DeleteEntry((("nft_" + nftId) + "_buyOutAssetId")), DeleteEntry((("nft_" + nftId) + "_royaltyReceiver")), DeleteEntry((("nft_" + nftId) + "_seller")), DeleteEntry(((("address_" + sellerStr) + "_nft_") + nftId)), DeleteEntry((((("address_" + sellerStr) + "_nft_") + nftId) + "_startSaleAt")), DeleteEntry(auctionKey)] ++ allTransfersForBid(toBase58String(nftAsset.id), "")), nftId)
228	233		else throw("You are not a seller")
229	234		}
230	235
231	236
232	237
233	238		@Callable(i)
234	239		func like (nftId) = {
235	240		let nftAsset = assetInfo(fromBase58String(nftId))
236	241		let duckNftId = valueOrElse(getString(Address(nftDuckWrapper), (("nft_" + nftId) + "_duckId")), "")
237	242		let signArtNftId = valueOrElse(getString(Address(nftSignArtWrapper), (("signArtNft_" + nftId) + "_assetId")), "")
238	243		let updatedNftId = if ((size(duckNftId) > 0))
239	244		then duckNftId
240	245		else if ((size(signArtNftId) > 0))
241	246		then signArtNftId
242	247		else nftId
243	248		if (if (isDefined(nftAsset))
244	249		then checkNFT(value(nftAsset))
245	250		else false)
246	251		then {
247	252		let callerAddress = toString(i.caller)
248	253		let countStaked = match getInteger(Address(puzzleStakeAddress), (callerAddress + "_staked")) {
249	254		case c: Int =>
250	255		c
251	256		case _ =>
252	257		0
253	258		}
254	259		if ((countStaked >= 100000000))
255	260		then {
256	261		let nftLikesKey = (("nft_" + updatedNftId) + "_likes")
257	262		let nftLikesValue = tryGetString((("nft_" + updatedNftId) + "_likes"))
258	263		if (!(isDefined(indexOf(nftLikesValue, callerAddress))))
259	264		then {
260	265		let newLikesValue = if ((size(nftLikesValue) == 0))
261	266		then toString(i.caller)
262	267		else ((nftLikesValue + ",") + callerAddress)
263	268		[StringEntry(nftLikesKey, newLikesValue)]
264	269		}
265	270		else throw("You have already voted")
266	271		}
267	272		else throw("You can like if you stake 1 or more Puzzles")
268	273		}
269	274		else throw("Invalid NFT id")
270	275		}
271	276
272	277
273	278
274	279		@Callable(i)
275	280		func placeBid (nftId) = {
276	281		let isGroup = valueOrElse(getBoolean(Address(createNftDapp), (("nft_" + nftId) + "_isGroup")), false)
277	282		if (isGroup)
278	283		then throw("This function is not temporarily available for multiple NFTs")
279	284		else if (if ((i.payments[0].amount > 0))
280	285		then if (!(isDefined(i.payments[0].assetId)))
281	286		then true
282	287		else !(isNFT(value(assetInfo(value(i.payments[0].assetId)))))
283	288		else false)
284	289		then {
285	290		let nftAsset = tryGetAssetInfo(nftId, "NFT not found")
286	291		let nftAmount = match assetBalance(this, nftAsset.id) {
287	292		case c: Int =>
288	293		c
289	294		case _ =>
290	295		0
291	296		}
292	297		let sellerStr = getStringValue((("nft_" + nftId) + "_seller"))
293	298		if ((sellerStr != toString(i.caller)))
294	299		then if (if ((nftAmount == 1))
295	300		then checkNFT(nftAsset)
296	301		else false)
297	302		then {
298	303		let callerStr = toString(i.caller)
299	304		let assetAmount = i.payments[0].amount
300	305		let assetIdStr = getAssetString(i.payments[0].assetId)
301	306		let auctionKey = (("auction_" + toBase58String(nftAsset.id)) + "_bids")
302	307		let auctionData = tryGetString(auctionKey)
303	308		let addedData = ((((callerStr + "_") + toString(assetAmount)) + "_") + assetIdStr)
304	309		if ((21 > (size(split(auctionData, ",")) + 1)))
305	310		then {
306	311		let exist = contains(auctionData, toString(i.caller))
307	312		if (!(exist))
308	313		then {
309	314		let updatedData = match getString(auctionKey) {
310	315		case s: String =>
311	316		((s + ",") + addedData)
312	317		case _ =>
313	318		addedData
314	319		}
315	320		[StringEntry(auctionKey, updatedData)]
316	321		}
317	322		else throw("You have already bid")
318	323		}
319	324		else throw("You cannot create more than 27 bets for 1 NFT")
320	325		}
321	326		else throw("Invalid NFT Id.")
322	327		else throw("Seller cannot bid")
323	328		}
324	329		else throw("Payment not attached")
325	330		}
326	331
327	332
328	333
329	334		@Callable(i)
330	335		func cancelBid (nftId,betId) = {
331	336		let nftAsset = tryGetAssetInfo(nftId, "NFT not found")
332	337		let auctionKey = (("auction_" + toBase58String(nftAsset.id)) + "_bids")
333	338		let auctionData = tryGetString(auctionKey)
334	339		if ((size(auctionData) > 0))
335	340		then {
336	341		let callerStr = toString(i.caller)
337	342		let bets = split(auctionData, ",")
338	343		let betIndex = match indexOf(bets, betId) {
339	344		case idx: Int =>
340	345		idx
341	346		case _ =>
342	347		throw("Bet not found by id")
343	348		}
344	349		let betData = bets[betIndex]
345	350		let betParsedData = split(betData, "_")
346	351		let betOwner = betParsedData[0]
347	352		let betAmount = parseIntValue(betParsedData[1])
348	353		let betAssetId = if ((betParsedData[2] == "WAVES"))
349	354		then unit
350	355		else fromBase58String(betParsedData[2])
351	356		if ((betOwner == callerStr))
352	357		then {
353	358		let newBets = removeByIndex(bets, betIndex)
354	359		let updateDataList = if ((size(newBets) == 0))
355	360		then [DeleteEntry(auctionKey)]
356	361		else [StringEntry(auctionKey, makeString(newBets, ","))]
357	362		([ScriptTransfer(i.caller, betAmount, betAssetId)] ++ updateDataList)
358	363		}
359	364		else throw("This is not your bet")
360	365		}
361	366		else throw("Bet not found")
362	367		}
363	368
364	369
365	370
366	371		@Callable(i)
367	372		func acceptBid (nftId,betId) = {
368	373		let nftAsset = tryGetAssetInfo(nftId, "NFT not found")
369	374		if ((assetBalance(this, nftAsset.id) == 1))
370	375		then {
371	376		let sellerStr = tryGetString((("nft_" + nftId) + "_seller"))
372	377		let auctionKey = (("auction_" + toBase58String(nftAsset.id)) + "_bids")
373	378		if ((sellerStr == toString(i.caller)))
374	379		then {
375	380		let auctionData = tryGetString(auctionKey)
376	381		if ((size(auctionData) > 0))
377	382		then {
378	383		let bets = split(auctionData, ",")
379	384		let betParsedData = split(betId, "_")
380	385		let betOwner = betParsedData[0]
381	386		let betAmount = parseIntValue(betParsedData[1])
382	387		let betAssetId = if ((betParsedData[2] == "WAVES"))
383	388		then unit
384	389		else fromBase58String(betParsedData[2])
385	390		let royaltyReceiver = tryGetString((("nft_" + nftId) + "_royaltyReceiver"))
386	391		let royaltyPart = fraction(betAmount, royaltyPercent, 100)
387	392		let marketFee = fraction(betAmount, 3, 100)
388	393		let unlockedNftStr = match invoke(Address(proxyDappAddress), "unlock", nil, [AttachedPayment(fromBase58String(nftId), 1)]) {
389	394		case s: String =>
390	395		s
391	396		case _ =>
392	397		throw(("Somthing wrong when unlock NFT in address: " + toBase58String(proxyDappAddress)))
393	398		}
394	399		if ((unlockedNftStr == unlockedNftStr))
395	400		then if (if (containsElement(bets, betId))
396	401		then (betAmount > 0)
397	402		else false)
398	403		then ([ScriptTransfer(Address(fromBase58String(betOwner)), 1, fromBase58String(unlockedNftStr)), ScriptTransfer(i.caller, ((betAmount - royaltyPart) - marketFee), betAssetId), ScriptTransfer(Address(fromBase58String(royaltyReceiver)), royaltyPart, betAssetId), ScriptTransfer(marketFeeAddress, marketFee, betAssetId), DeleteEntry((("nft_" + nftId) + "_buyOutPrice")), DeleteEntry((("nft_" + nftId) + "_buyOutAssetId")), DeleteEntry((("nft_" + nftId) + "_royaltyReceiver")), DeleteEntry((("nft_" + nftId) + "_seller")), DeleteEntry(((("address_" + sellerStr) + "_nft_") + nftId)), DeleteEntry((((("address_" + sellerStr) + "_nft_") + nftId) + "_startSaleAt")), DeleteEntry(auctionKey)] ++ allTransfersForBid(toBase58String(nftAsset.id), betId))
399	404		else throw("Bet not found by Id")
400	405		else throw("Strict value is not equal to itself.")
401	406		}
402	407		else throw("Bet not found")
403	408		}
404	409		else throw("You are not a seller")
405	410		}
406	411		else throw("NFT not found on contract")
407	412		}
408	413
409	414
410	415		@Verifier(tx)
411	416		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
412	417

github/deemru/w8io/0e76f2f 
61.07 ms ◑