w8 · tx · 9Zu···sMV

tx · 9ZuGYzAhsFYbt9KpzkWJKto5CyMNfaMJdKTrZiEchsMV

3N8VMRDjjw6kAuCviYwFq4yDWyctRuHPN7X:  -0.00800000 Waves

2022.11.10 12:15 [2310859] smart account 3N8VMRDjjw6kAuCviYwFq4yDWyctRuHPN7X > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9ZuGYzAhsFYbt9KpzkWJKto5CyMNfaMJdKTrZiEchsMV",
    "fee": 800000,
    "feeAssetId": null,
    "timestamp": 1668071775153,
    "version": 2,
    "chainId": 84,
    "sender": "3N8VMRDjjw6kAuCviYwFq4yDWyctRuHPN7X",
    "senderPublicKey": "SrcQexq2T9cnMXmLqfJtc8AnQ91ZjeaJtXoi1HwDsx9",
    "proofs": [
        "58yjEinEA3u8oqzEuSXZ7Thmdm3XTJZP2zRH6xx6bGVCFiJT1T39UwYJs6PCUUQghDbkVZBibuAjKAkRxuGYYx68"
    ],
    "script": "base64:BgIhCAISBAoCCAESAwoBCBIDCgEIEgMKAQgSAwoBCBIDCgEIEQEIcHJpY2VLZXkBBWFzc2V0CQCsAgIFBWFzc2V0AgZfcHJpY2UBCG93bmVyS2V5AQVhc3NldAkArAICBQVhc3NldAIGX293bmVyAQlpc3N1ZXJLZXkBBWFzc2V0CQCsAgIFBWFzc2V0AgdfaXNzdWVyAQduYW1lS2V5AQVhc3NldAkArAICBQVhc3NldAIFX25hbWUBDmRlc2NyaXB0aW9uS2V5AQVhc3NldAkArAICBQVhc3NldAIMX2Rlc2NyaXB0aW9uAQthc3NldEFjY2VzcwEFYXNzZXQJAKwCAgUFYXNzZXQCCV9hc3NldEJ1eQEKYXNzZXRPZmZlcgEFYXNzZXQJAKwCAgUFYXNzZXQCBl9vZmZlcgEOYXNzZXRPZmZlclN3YXABBWFzc2V0CQCsAgIFBWFzc2V0AgZfb2ZmZXIBDXRyeUdldEludGVnZXIBA2tleQQDdmFsBAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAUDdmFsAQx0cnlHZXRTdHJpbmcBA2tleQQDdmFsBAckbWF0Y2gwCQCdCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWIFByRtYXRjaDAFAWICAAUDdmFsAQp0cnlHZXRCb29sAQNrZXkEA3ZhbAQHJG1hdGNoMAkAmwgCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIHQm9vbGVhbgQBYgUHJG1hdGNoMAUBYgcFA3ZhbAELaXNQYXltZW50T2sDAWkRYWNjZXB0YWJsZUFzc2V0SWQFcHJpY2UDCQAAAgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUUGF5bWVudCBub3QgYXR0YWNoZWQEAXAJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQDdmFsBAckbWF0Y2gwCAUBcAdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEB2Fzc2V0SWQFByRtYXRjaDADCQAAAgkA2AQBBQdhc3NldElkBRFhY2NlcHRhYmxlQXNzZXRJZAkAZwIIBQFwBmFtb3VudAUFcHJpY2UHAwkAAQIFByRtYXRjaDACBFVuaXQEBXdhdmVzBQckbWF0Y2gwCQBnAggFAXAGYW1vdW50BQVwcmljZQkAAgECC01hdGNoIGVycm9yBQN2YWwBD2lzQWNjZXB0YWJsZU5mdAIGc3RhdHVzCWFzc2V0U2FsZQQHaWRBc3NldAQHJG1hdGNoMAgFCWFzc2V0U2FsZQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAWIFByRtYXRjaDAFAWIDCQABAgUHJG1hdGNoMAIEVW5pdAQBYgUHJG1hdGNoMAED0AAACQACAQILTWF0Y2ggZXJyb3IEBWFzc2V0BAckbWF0Y2gwCQDsBwEFB2lkQXNzZXQDCQABAgUHJG1hdGNoMAIFQXNzZXQEAWIFByRtYXRjaDAJANgEAQgIBQFiBmlzc3VlcgVieXRlcwMJAAECBQckbWF0Y2gwAgRVbml0BAV3YXZlcwUHJG1hdGNoMAIFV0FWRVMJAAIBAgtNYXRjaCBlcnJvcgMJAQp0cnlHZXRCb29sAQUFYXNzZXQFBnN0YXR1cwcBCmdldEFzc2V0SWQCBnN0YXR1cwlhc3NldFNhbGUEB2lkQXNzZXQEByRtYXRjaDAIBQlhc3NldFNhbGUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFiBQckbWF0Y2gwCQDYBAEFAWIDCQABAgUHJG1hdGNoMAIEVW5pdAQBYgUHJG1hdGNoMAIFV0FWRVMJAAIBAgtNYXRjaCBlcnJvcgkArAICCQCsAgIFBnN0YXR1cwIBXwUHaWRBc3NldAENZ2V0QXNzZXRQcmljZQIGc3RhdHVzCWFzc2V0U2FsZQQFcHJpY2UJAKQDAQgFCWFzc2V0U2FsZQZhbW91bnQJAKwCAgkArAICBQZzdGF0dXMCAV8FBXByaWNlAQ5nZXRBc3NldElzc3VlcgIGc3RhdHVzCWFzc2V0U2FsZQQHaWRBc3NldAQHJG1hdGNoMAgFCWFzc2V0U2FsZQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAWIFByRtYXRjaDAFAWIDCQABAgUHJG1hdGNoMAIEVW5pdAQBYgUHJG1hdGNoMAED0AAACQACAQILTWF0Y2ggZXJyb3IEBmlzc3VlcgQHJG1hdGNoMAkA7AcBBQdpZEFzc2V0AwkAAQIFByRtYXRjaDACBUFzc2V0BAFiBQckbWF0Y2gwCQDYBAEICAUBYgZpc3N1ZXIFYnl0ZXMDCQABAgUHJG1hdGNoMAIEVW5pdAQBYgUHJG1hdGNoMAIFV0FWRVMJAAIBAgtNYXRjaCBlcnJvcgkArAICCQCsAgIFBnN0YXR1cwIBXwUGaXNzdWVyARBnZXRUcmFuc2ZlckFzc2V0AgZzdGF0dXMEZGF0YQQPdHJhbnNmZXJBZGRyZXNzBAckbWF0Y2gwCQCmCAEIBQRkYXRhAl8xAwkAAQIFByRtYXRjaDACB0FkZHJlc3MEAWIFByRtYXRjaDAFAWIDCQABAgUHJG1hdGNoMAIEVW5pdAQBYgUHJG1hdGNoMAUEdGhpcwkAAgECC01hdGNoIGVycm9yAwkBAiE9AggFBGRhdGECXzMCBVdBVkVTCQDNCAIFBnN0YXR1cwkBDlNjcmlwdFRyYW5zZmVyAwUPdHJhbnNmZXJBZGRyZXNzCAUEZGF0YQJfMgkA2QQBCAUEZGF0YQJfMwkAzQgCBQZzdGF0dXMJAQ5TY3JpcHRUcmFuc2ZlcgMFD3RyYW5zZmVyQWRkcmVzcwgFBGRhdGECXzIFBHVuaXQGAWkBDG9mZmVyRm9yU2FsZQIMYXNzZXRJZFByaWNlBXByaWNlAwkBASEBAwkBCnRyeUdldEJvb2wBCQELYXNzZXRBY2Nlc3MBBQxhc3NldElkUHJpY2UJAGYCBQVwcmljZQAABwkAAgECFFNhbGUgQXNzZXQgaW5jb3JyZWN0BAxmaXJzdFBheW1lbnQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQHYXNzZXRJZAQHJG1hdGNoMAgFDGZpcnN0UGF5bWVudAdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAmlkBQckbWF0Y2gwBQJpZAMJAAECBQckbWF0Y2gwAgRVbml0BAF3BQckbWF0Y2gwCQACAQIQQXNzZXQgaXMgbm90IE5GVAkAAgECC01hdGNoIGVycm9yBAphc3NldElkU3RyCQDYBAEFB2Fzc2V0SWQEBWFzc2V0BAckbWF0Y2gwCQDsBwEFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIFQXNzZXQEAWEFByRtYXRjaDAFAWEJAAIBAiVFcnJvciBnZXR0aW5nIGluZm9ybWF0aW9uIGFib3V0IGFzc2V0AwMDCQECIT0CCAUFYXNzZXQIcXVhbnRpdHkAAQkBAiE9AggFBWFzc2V0CGRlY2ltYWxzAAAHCAUFYXNzZXQKcmVpc3N1YWJsZQcJAAIBAhBBc3NldCBpcyBub3QgTkZUCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEIcHJpY2VLZXkBBQphc3NldElkU3RyBQVwcmljZQkAzAgCCQELU3RyaW5nRW50cnkCCQEIb3duZXJLZXkBBQphc3NldElkU3RyCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMJAMwIAgkBC1N0cmluZ0VudHJ5AgkBCWlzc3VlcktleQEFCmFzc2V0SWRTdHIJANgEAQgIBQVhc3NldAZpc3N1ZXIFYnl0ZXMJAMwIAgkBC1N0cmluZ0VudHJ5AgkBB25hbWVLZXkBBQphc3NldElkU3RyCAUFYXNzZXQEbmFtZQkAzAgCCQELU3RyaW5nRW50cnkCCQEOZGVzY3JpcHRpb25LZXkBBQphc3NldElkU3RyCAUFYXNzZXQLZGVzY3JpcHRpb24JAMwIAgkBC1N0cmluZ0VudHJ5AgkBCmFzc2V0T2ZmZXIBBQphc3NldElkU3RyBQxhc3NldElkUHJpY2UFA25pbAFpAQxvZmZlckZvclN3YXABDGFzc2V0SWRQcmljZQQIY291bnRQYXkJAJADAQgFAWkIcGF5bWVudHMEBnN0YXR1cwoAAiRsCAUBaQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAGCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ9pc0FjY2VwdGFibGVOZnQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAwkBASEBBQZzdGF0dXMJAAIBAhJQYXltZW50cyBpbmNvcnJlY3QDCQBmAgkBDXRyeUdldEludGVnZXIBAgpjb21taXNzaW9uCAkAkQMCCAUBaQhwYXltZW50cwABBmFtb3VudAkAAgECFU5vIG1pbmltdW0gY29tbWlzc2lvbgQKcGF5bWVudEFsbAoAAiRsCAUBaQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzACAAoBBSRmMV8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEKZ2V0QXNzZXRJZAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMgkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIEBmlzc3VlcgoAAiRsCAUBaQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzACAAoBBSRmMl8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEOZ2V0QXNzZXRJc3N1ZXICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjJfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQUkZjJfMgIJAQUkZjJfMQIJAQUkZjJfMQIFBSRhY2MwAAAAAQACBAVwcmljZQoAAiRsCAUBaQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzACAAoBBSRmM18xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQENZ2V0QXNzZXRQcmljZQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmM18yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMgkBBSRmM18yAgkBBSRmM18xAgkBBSRmM18xAgUFJGFjYzAAAAABAAIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQEIcHJpY2VLZXkBBQpwYXltZW50QWxsAgRTd2FwBQVwcmljZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAQhvd25lcktleQEFCnBheW1lbnRBbGwCBFN3YXAJANgEAQgIBQFpBmNhbGxlcgVieXRlcwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAQlpc3N1ZXJLZXkBBQpwYXltZW50QWxsAgRTd2FwBQZpc3N1ZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQEKYXNzZXRPZmZlcgEFCnBheW1lbnRBbGwCBFN3YXAFDGFzc2V0SWRQcmljZQUDbmlsAWkBA2J1eQEIYXNzZXRTdHIEBXByaWNlCQENdHJ5R2V0SW50ZWdlcgEJAQhwcmljZUtleQEFCGFzc2V0U3RyBBFhY2NlcHRhYmxlQXNzZXRJZAkBDHRyeUdldFN0cmluZwEJAQphc3NldE9mZmVyAQUIYXNzZXRTdHIECG93bmVyU3RyCQEMdHJ5R2V0U3RyaW5nAQkBCG93bmVyS2V5AQUIYXNzZXRTdHIEBW93bmVyBAckbWF0Y2gwCQCmCAEFCG93bmVyU3RyAwkAAQIFByRtYXRjaDACB0FkZHJlc3MEAWEFByRtYXRjaDAFAWEJAAIBAhVBZGRyZXNzIHBhcnNpbmcgZXJyb3IDCQEBIQEJAQtpc1BheW1lbnRPawMFAWkFEWFjY2VwdGFibGVBc3NldElkBQVwcmljZQkAAgECHVdyb25nIHBheW1lbnQgYW1vdW50IG9yIGFzc2V0AwkAAAIFCG93bmVyU3RyCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMJAAIBAhhPd25lciBjYW5ub3QgYnV5IGhpcyBOVEYDCQAAAgUFcHJpY2UAAAkAAgECGFRoaXMgTkZUIGlzIG5vdCBmb3Igc2FsZQQDZmVlCQBoAgkAaQIFBXByaWNlAGQABQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQkA2QQBBQhhc3NldFN0cgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQVvd25lcgkAZQIFBXByaWNlBQNmZWUFBHVuaXQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCHByaWNlS2V5AQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCG93bmVyS2V5AQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCWlzc3VlcktleQEFCGFzc2V0U3RyCQDMCAIJAQtEZWxldGVFbnRyeQEJAQduYW1lS2V5AQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBDmRlc2NyaXB0aW9uS2V5AQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCmFzc2V0T2ZmZXIBBQhhc3NldFN0cgUDbmlsAWkBCHN3YXBEb25lAQdvZmZlcklkBAVwcmljZQkBDHRyeUdldFN0cmluZwEJAQhwcmljZUtleQEFB29mZmVySWQEBW9mZmVyCQEMdHJ5R2V0U3RyaW5nAQkBCmFzc2V0T2ZmZXIBBQdvZmZlcklkBApvd25lck9mZmVyCQEMdHJ5R2V0U3RyaW5nAQkBCG93bmVyS2V5AQUHb2ZmZXJJZAQIb3duZXJOZnQJAQx0cnlHZXRTdHJpbmcBCQEIb3duZXJLZXkBBQdvZmZlcklkAwkBAiE9AgUIb3duZXJOZnQJANgEAQgIBQFpBmNhbGxlcgVieXRlcwkAAgECNVRoZSBjYWxsaW5nIGFkZHJlc3MgaXMgbm90IHRoZSBvd25lciBvZiB0aGUgTkZUIHRva2VuAwkAAAIFBXByaWNlAgAJAAIBAhhUaGlzIE5GVCBpcyBub3QgZm9yIHNhbGUEA2ZlZQkBDXRyeUdldEludGVnZXIBAgpjb21taXNzaW9uBAlsaXN0QXNzZXQJALUJAgUHb2ZmZXJJZAIBXwQJbGlzdFByaWNlCQC1CQIFBXByaWNlAgFfCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFCG93bmVyTmZ0CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUJbGlzdFByaWNlAAAJANkEAQkAkQMCBQlsaXN0QXNzZXQAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQhvd25lck5mdAkAZQIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQlsaXN0UHJpY2UAAQUDZmVlBQR1bml0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFCm93bmVyT2ZmZXIAAQkA2QQBCQEMdHJ5R2V0U3RyaW5nAQUHb2ZmZXJJZAkAzAgCCQELRGVsZXRlRW50cnkBCQEIcHJpY2VLZXkBCQCRAwIFCWxpc3RBc3NldAAACQDMCAIJAQtEZWxldGVFbnRyeQEJAQhvd25lcktleQEJAJEDAgUJbGlzdEFzc2V0AAAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCWlzc3VlcktleQEJAJEDAgUJbGlzdEFzc2V0AAAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBB25hbWVLZXkBCQCRAwIFCWxpc3RBc3NldAAACQDMCAIJAQtEZWxldGVFbnRyeQEJAQ5kZXNjcmlwdGlvbktleQEJAJEDAgUJbGlzdEFzc2V0AAAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCHByaWNlS2V5AQUHb2ZmZXJJZAkAzAgCCQELRGVsZXRlRW50cnkBCQEIb3duZXJLZXkBBQdvZmZlcklkCQDMCAIJAQtEZWxldGVFbnRyeQEJAQlpc3N1ZXJLZXkBBQdvZmZlcklkBQNuaWwBaQENY2FuY2VsU2VsbGluZwEIYXNzZXRTdHIECG93bmVyU3RyCQEMdHJ5R2V0U3RyaW5nAQkBCG93bmVyS2V5AQUIYXNzZXRTdHIEBW93bmVyBAckbWF0Y2gwCQCmCAEFCG93bmVyU3RyAwkAAQIFByRtYXRjaDACB0FkZHJlc3MEAWEFByRtYXRjaDAFAWEJAAIBAhVBZGRyZXNzIHBhcnNpbmcgZXJyb3IDCQECIT0CBQhvd25lclN0cgkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzCQACAQI1VGhlIGNhbGxpbmcgYWRkcmVzcyBpcyBub3QgdGhlIG93bmVyIG9mIHRoZSBORlQgdG9rZW4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEJANkEAQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCHByaWNlS2V5AQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCG93bmVyS2V5AQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCWlzc3VlcktleQEFCGFzc2V0U3RyCQDMCAIJAQtEZWxldGVFbnRyeQEJAQduYW1lS2V5AQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBDmRlc2NyaXB0aW9uS2V5AQUIYXNzZXRTdHIFA25pbAFpAQpzd2FwQ2FuY2VsAQdvZmZlcklkBApvd25lck9mZmVyCQEMdHJ5R2V0U3RyaW5nAQkBCG93bmVyS2V5AQUHb2ZmZXJJZAQFcHJpY2UJAQx0cnlHZXRTdHJpbmcBCQEIcHJpY2VLZXkBBQdvZmZlcklkAwkBAiE9AgUKb3duZXJPZmZlcgkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzCQACAQI1VGhlIGNhbGxpbmcgYWRkcmVzcyBpcyBub3QgdGhlIG93bmVyIG9mIHRoZSBORlQgdG9rZW4ECWxpc3RBc3NldAkAtQkCBQdvZmZlcklkAgFfBAlsaXN0UHJpY2UJALUJAgUFcHJpY2UCAV8JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUKb3duZXJPZmZlcgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCWxpc3RQcmljZQAACQDZBAEJAJEDAgUJbGlzdEFzc2V0AAAJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBEUBleHRyTmF0aXZlKDEwNjIpAQUKb3duZXJPZmZlcgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFCWxpc3RQcmljZQABBQR1bml0CQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkBCHByaWNlS2V5AQUHb2ZmZXJJZAIEU3dhcAkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAQhvd25lcktleQEFB29mZmVySWQCBFN3YXAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQEJaXNzdWVyS2V5AQUHb2ZmZXJJZAIEU3dhcAUDbmlsAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tlefGC/OQ=",
    "height": 2310859,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: FNriYGb4pRehpjCUDKqf44gCWpGx6FcfUfU39ZL6KoAR
Next: ENBy7Jsp7aU3nrrqEjVnSuaFoxbYNwWUqvPTxZzAGkgf

Diff: 
Old New Differences
20 20  
21 21  
22 22  func assetOffer (asset) = (asset + "_offer")
23 + 
24 + 
25 + func assetOfferSwap (asset) = (asset + "_offer")
23 26  
24 27  
25 28  func tryGetInteger (key) = {
248 251  
249 252                      $f3_2($f3_1($f3_1($acc0, 0), 1), 2)
250 253                      }
251 - [StringEntry(priceKey(paymentAll), price), StringEntry(ownerKey(paymentAll), toBase58String(i.caller.bytes)), StringEntry(issuerKey(paymentAll), issuer), StringEntry(assetOffer(paymentAll), assetIdPrice)]
254 + [StringEntry((priceKey(paymentAll) + "Swap"), price), StringEntry((ownerKey(paymentAll) + "Swap"), toBase58String(i.caller.bytes)), StringEntry((issuerKey(paymentAll) + "Swap"), issuer), StringEntry((assetOffer(paymentAll) + "Swap"), assetIdPrice)]
252 255                  }
253 256      }
254 257  
324 327          else {
325 328              let listAsset = split(offerId, "_")
326 329              let listPrice = split(price, "_")
327 - [ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[0]), fromBase58String(listAsset[0])), ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[1]), unit), DeleteEntry(priceKey(offerId)), DeleteEntry(ownerKey(offerId)), DeleteEntry(issuerKey(offerId))]
330 + [ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[0]), fromBase58String(listAsset[0])), ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[1]), unit), DeleteEntry((priceKey(offerId) + "Swap")), DeleteEntry((ownerKey(offerId) + "Swap")), DeleteEntry((issuerKey(offerId) + "Swap"))]
328 331              }
329 332      }
330 333  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  func priceKey (asset) = (asset + "_price")
5 5  
6 6  
7 7  func ownerKey (asset) = (asset + "_owner")
8 8  
9 9  
10 10  func issuerKey (asset) = (asset + "_issuer")
11 11  
12 12  
13 13  func nameKey (asset) = (asset + "_name")
14 14  
15 15  
16 16  func descriptionKey (asset) = (asset + "_description")
17 17  
18 18  
19 19  func assetAccess (asset) = (asset + "_assetBuy")
20 20  
21 21  
22 22  func assetOffer (asset) = (asset + "_offer")
23 + 
24 + 
25 + func assetOfferSwap (asset) = (asset + "_offer")
23 26  
24 27  
25 28  func tryGetInteger (key) = {
26 29      let val =     match getInteger(this, key) {
27 30          case b: Int => 
28 31              b
29 32          case _ => 
30 33              0
31 34      }
32 35      val
33 36      }
34 37  
35 38  
36 39  func tryGetString (key) = {
37 40      let val =     match getString(this, key) {
38 41          case b: String => 
39 42              b
40 43          case _ => 
41 44              ""
42 45      }
43 46      val
44 47      }
45 48  
46 49  
47 50  func tryGetBool (key) = {
48 51      let val =     match getBoolean(this, key) {
49 52          case b: Boolean => 
50 53              b
51 54          case _ => 
52 55              false
53 56      }
54 57      val
55 58      }
56 59  
57 60  
58 61  func isPaymentOk (i,acceptableAssetId,price) = if ((size(i.payments) == 0))
59 62      then throw("Payment not attached")
60 63      else {
61 64          let p = value(i.payments[0])
62 65          let val =         match p.assetId {
63 66              case assetId: ByteVector => 
64 67                  if ((toBase58String(assetId) == acceptableAssetId))
65 68                      then (p.amount >= price)
66 69                      else false
67 70              case waves: Unit => 
68 71                  (p.amount >= price)
69 72              case _ => 
70 73                  throw("Match error")
71 74          }
72 75          val
73 76          }
74 77  
75 78  
76 79  func isAcceptableNft (status,assetSale) = {
77 80      let idAsset =     match assetSale.assetId {
78 81          case b: ByteVector => 
79 82              b
80 83          case b: Unit => 
81 84              base58'2CsAf'
82 85          case _ => 
83 86              throw("Match error")
84 87      }
85 88      let asset =     match assetInfo(idAsset) {
86 89          case b: Asset => 
87 90              toBase58String(b.issuer.bytes)
88 91          case waves: Unit => 
89 92              "WAVES"
90 93          case _ => 
91 94              throw("Match error")
92 95      }
93 96      if (tryGetBool(asset))
94 97          then status
95 98          else false
96 99      }
97 100  
98 101  
99 102  func getAssetId (status,assetSale) = {
100 103      let idAsset =     match assetSale.assetId {
101 104          case b: ByteVector => 
102 105              toBase58String(b)
103 106          case b: Unit => 
104 107              "WAVES"
105 108          case _ => 
106 109              throw("Match error")
107 110      }
108 111      ((status + "_") + idAsset)
109 112      }
110 113  
111 114  
112 115  func getAssetPrice (status,assetSale) = {
113 116      let price = toString(assetSale.amount)
114 117      ((status + "_") + price)
115 118      }
116 119  
117 120  
118 121  func getAssetIssuer (status,assetSale) = {
119 122      let idAsset =     match assetSale.assetId {
120 123          case b: ByteVector => 
121 124              b
122 125          case b: Unit => 
123 126              base58'2CsAf'
124 127          case _ => 
125 128              throw("Match error")
126 129      }
127 130      let issuer =     match assetInfo(idAsset) {
128 131          case b: Asset => 
129 132              toBase58String(b.issuer.bytes)
130 133          case b: Unit => 
131 134              "WAVES"
132 135          case _ => 
133 136              throw("Match error")
134 137      }
135 138      ((status + "_") + issuer)
136 139      }
137 140  
138 141  
139 142  func getTransferAsset (status,data) = {
140 143      let transferAddress =     match addressFromString(data._1) {
141 144          case b: Address => 
142 145              b
143 146          case b: Unit => 
144 147              this
145 148          case _ => 
146 149              throw("Match error")
147 150      }
148 151      if ((data._3 != "WAVES"))
149 152          then (status :+ ScriptTransfer(transferAddress, data._2, fromBase58String(data._3)))
150 153          else (status :+ ScriptTransfer(transferAddress, data._2, unit))
151 154      }
152 155  
153 156  
154 157  @Callable(i)
155 158  func offerForSale (assetIdPrice,price) = if (!(if (tryGetBool(assetAccess(assetIdPrice)))
156 159      then (price > 0)
157 160      else false))
158 161      then throw("Sale Asset incorrect")
159 162      else {
160 163          let firstPayment = value(i.payments[0])
161 164          let assetId =         match firstPayment.assetId {
162 165              case id: ByteVector => 
163 166                  id
164 167              case w: Unit => 
165 168                  throw("Asset is not NFT")
166 169              case _ => 
167 170                  throw("Match error")
168 171          }
169 172          let assetIdStr = toBase58String(assetId)
170 173          let asset =         match assetInfo(assetId) {
171 174              case a: Asset => 
172 175                  a
173 176              case _ => 
174 177                  throw("Error getting information about asset")
175 178          }
176 179          if (if (if ((asset.quantity != 1))
177 180              then (asset.decimals != 0)
178 181              else false)
179 182              then asset.reissuable
180 183              else false)
181 184              then throw("Asset is not NFT")
182 185              else [IntegerEntry(priceKey(assetIdStr), price), StringEntry(ownerKey(assetIdStr), toBase58String(i.caller.bytes)), StringEntry(issuerKey(assetIdStr), toBase58String(asset.issuer.bytes)), StringEntry(nameKey(assetIdStr), asset.name), StringEntry(descriptionKey(assetIdStr), asset.description), StringEntry(assetOffer(assetIdStr), assetIdPrice)]
183 186          }
184 187  
185 188  
186 189  
187 190  @Callable(i)
188 191  func offerForSwap (assetIdPrice) = {
189 192      let countPay = size(i.payments)
190 193      let status = {
191 194          let $l = i.payments
192 195          let $s = size($l)
193 196          let $acc0 = true
194 197          func $f0_1 ($a,$i) =         if (($i >= $s))
195 198              then $a
196 199              else isAcceptableNft($a, $l[$i])
197 200  
198 201          func $f0_2 ($a,$i) =         if (($i >= $s))
199 202              then $a
200 203              else throw("List size exceeds 2")
201 204  
202 205          $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
203 206          }
204 207      if (!(status))
205 208          then throw("Payments incorrect")
206 209          else if ((tryGetInteger("commission") > i.payments[1].amount))
207 210              then throw("No minimum commission")
208 211              else {
209 212                  let paymentAll = {
210 213                      let $l = i.payments
211 214                      let $s = size($l)
212 215                      let $acc0 = ""
213 216                      func $f1_1 ($a,$i) =                     if (($i >= $s))
214 217                          then $a
215 218                          else getAssetId($a, $l[$i])
216 219  
217 220                      func $f1_2 ($a,$i) =                     if (($i >= $s))
218 221                          then $a
219 222                          else throw("List size exceeds 2")
220 223  
221 224                      $f1_2($f1_1($f1_1($acc0, 0), 1), 2)
222 225                      }
223 226                  let issuer = {
224 227                      let $l = i.payments
225 228                      let $s = size($l)
226 229                      let $acc0 = ""
227 230                      func $f2_1 ($a,$i) =                     if (($i >= $s))
228 231                          then $a
229 232                          else getAssetIssuer($a, $l[$i])
230 233  
231 234                      func $f2_2 ($a,$i) =                     if (($i >= $s))
232 235                          then $a
233 236                          else throw("List size exceeds 2")
234 237  
235 238                      $f2_2($f2_1($f2_1($acc0, 0), 1), 2)
236 239                      }
237 240                  let price = {
238 241                      let $l = i.payments
239 242                      let $s = size($l)
240 243                      let $acc0 = ""
241 244                      func $f3_1 ($a,$i) =                     if (($i >= $s))
242 245                          then $a
243 246                          else getAssetPrice($a, $l[$i])
244 247  
245 248                      func $f3_2 ($a,$i) =                     if (($i >= $s))
246 249                          then $a
247 250                          else throw("List size exceeds 2")
248 251  
249 252                      $f3_2($f3_1($f3_1($acc0, 0), 1), 2)
250 253                      }
251 - [StringEntry(priceKey(paymentAll), price), StringEntry(ownerKey(paymentAll), toBase58String(i.caller.bytes)), StringEntry(issuerKey(paymentAll), issuer), StringEntry(assetOffer(paymentAll), assetIdPrice)]
254 + [StringEntry((priceKey(paymentAll) + "Swap"), price), StringEntry((ownerKey(paymentAll) + "Swap"), toBase58String(i.caller.bytes)), StringEntry((issuerKey(paymentAll) + "Swap"), issuer), StringEntry((assetOffer(paymentAll) + "Swap"), assetIdPrice)]
252 255                  }
253 256      }
254 257  
255 258  
256 259  
257 260  @Callable(i)
258 261  func buy (assetStr) = {
259 262      let price = tryGetInteger(priceKey(assetStr))
260 263      let acceptableAssetId = tryGetString(assetOffer(assetStr))
261 264      let ownerStr = tryGetString(ownerKey(assetStr))
262 265      let owner =     match addressFromString(ownerStr) {
263 266          case a: Address => 
264 267              a
265 268          case _ => 
266 269              throw("Address parsing error")
267 270      }
268 271      if (!(isPaymentOk(i, acceptableAssetId, price)))
269 272          then throw("Wrong payment amount or asset")
270 273          else if ((ownerStr == toBase58String(i.caller.bytes)))
271 274              then throw("Owner cannot buy his NTF")
272 275              else if ((price == 0))
273 276                  then throw("This NFT is not for sale")
274 277                  else {
275 278                      let fee = ((price / 100) * 5)
276 279  [ScriptTransfer(i.caller, 1, fromBase58String(assetStr)), ScriptTransfer(owner, (price - fee), unit), DeleteEntry(priceKey(assetStr)), DeleteEntry(ownerKey(assetStr)), DeleteEntry(issuerKey(assetStr)), DeleteEntry(nameKey(assetStr)), DeleteEntry(descriptionKey(assetStr)), DeleteEntry(assetOffer(assetStr))]
277 280                      }
278 281      }
279 282  
280 283  
281 284  
282 285  @Callable(i)
283 286  func swapDone (offerId) = {
284 287      let price = tryGetString(priceKey(offerId))
285 288      let offer = tryGetString(assetOffer(offerId))
286 289      let ownerOffer = tryGetString(ownerKey(offerId))
287 290      let ownerNft = tryGetString(ownerKey(offerId))
288 291      if ((ownerNft != toBase58String(i.caller.bytes)))
289 292          then throw("The calling address is not the owner of the NFT token")
290 293          else if ((price == ""))
291 294              then throw("This NFT is not for sale")
292 295              else {
293 296                  let fee = tryGetInteger("commission")
294 297                  let listAsset = split(offerId, "_")
295 298                  let listPrice = split(price, "_")
296 299  [ScriptTransfer(addressFromStringValue(ownerNft), parseIntValue(listPrice[0]), fromBase58String(listAsset[0])), ScriptTransfer(addressFromStringValue(ownerNft), (parseIntValue(listPrice[1]) - fee), unit), ScriptTransfer(addressFromStringValue(ownerOffer), 1, fromBase58String(tryGetString(offerId))), DeleteEntry(priceKey(listAsset[0])), DeleteEntry(ownerKey(listAsset[0])), DeleteEntry(issuerKey(listAsset[0])), DeleteEntry(nameKey(listAsset[0])), DeleteEntry(descriptionKey(listAsset[0])), DeleteEntry(priceKey(offerId)), DeleteEntry(ownerKey(offerId)), DeleteEntry(issuerKey(offerId))]
297 300                  }
298 301      }
299 302  
300 303  
301 304  
302 305  @Callable(i)
303 306  func cancelSelling (assetStr) = {
304 307      let ownerStr = tryGetString(ownerKey(assetStr))
305 308      let owner =     match addressFromString(ownerStr) {
306 309          case a: Address => 
307 310              a
308 311          case _ => 
309 312              throw("Address parsing error")
310 313      }
311 314      if ((ownerStr != toBase58String(i.caller.bytes)))
312 315          then throw("The calling address is not the owner of the NFT token")
313 316          else [ScriptTransfer(i.caller, 1, fromBase58String(assetStr)), DeleteEntry(priceKey(assetStr)), DeleteEntry(ownerKey(assetStr)), DeleteEntry(issuerKey(assetStr)), DeleteEntry(nameKey(assetStr)), DeleteEntry(descriptionKey(assetStr))]
314 317      }
315 318  
316 319  
317 320  
318 321  @Callable(i)
319 322  func swapCancel (offerId) = {
320 323      let ownerOffer = tryGetString(ownerKey(offerId))
321 324      let price = tryGetString(priceKey(offerId))
322 325      if ((ownerOffer != toBase58String(i.caller.bytes)))
323 326          then throw("The calling address is not the owner of the NFT token")
324 327          else {
325 328              let listAsset = split(offerId, "_")
326 329              let listPrice = split(price, "_")
327 - [ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[0]), fromBase58String(listAsset[0])), ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[1]), unit), DeleteEntry(priceKey(offerId)), DeleteEntry(ownerKey(offerId)), DeleteEntry(issuerKey(offerId))]
330 + [ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[0]), fromBase58String(listAsset[0])), ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[1]), unit), DeleteEntry((priceKey(offerId) + "Swap")), DeleteEntry((ownerKey(offerId) + "Swap")), DeleteEntry((issuerKey(offerId) + "Swap"))]
328 331              }
329 332      }
330 333  
331 334  
332 335  @Verifier(tx)
333 336  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
334 337

Old	New		Differences
20	20
21	21
22	22		func assetOffer (asset) = (asset + "_offer")
	23	+
	24	+
	25	+	func assetOfferSwap (asset) = (asset + "_offer")
23	26
24	27
25	28		func tryGetInteger (key) = {

248	251
249	252		$f3_2($f3_1($f3_1($acc0, 0), 1), 2)
250	253		}
251		-	[StringEntry(priceKey(paymentAll), price), StringEntry(ownerKey(paymentAll), toBase58String(i.caller.bytes)), StringEntry(issuerKey(paymentAll), issuer), StringEntry(assetOffer(paymentAll), assetIdPrice)]
	254	+	[StringEntry((priceKey(paymentAll) + "Swap"), price), StringEntry((ownerKey(paymentAll) + "Swap"), toBase58String(i.caller.bytes)), StringEntry((issuerKey(paymentAll) + "Swap"), issuer), StringEntry((assetOffer(paymentAll) + "Swap"), assetIdPrice)]
252	255		}
253	256		}
254	257

324	327		else {
325	328		let listAsset = split(offerId, "_")
326	329		let listPrice = split(price, "_")
327		-	[ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[0]), fromBase58String(listAsset[0])), ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[1]), unit), DeleteEntry(priceKey(offerId)), DeleteEntry(ownerKey(offerId)), DeleteEntry(issuerKey(offerId))]
	330	+	[ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[0]), fromBase58String(listAsset[0])), ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[1]), unit), DeleteEntry((priceKey(offerId) + "Swap")), DeleteEntry((ownerKey(offerId) + "Swap")), DeleteEntry((issuerKey(offerId) + "Swap"))]
328	331		}
329	332		}
330	333

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		func priceKey (asset) = (asset + "_price")
5	5
6	6
7	7		func ownerKey (asset) = (asset + "_owner")
8	8
9	9
10	10		func issuerKey (asset) = (asset + "_issuer")
11	11
12	12
13	13		func nameKey (asset) = (asset + "_name")
14	14
15	15
16	16		func descriptionKey (asset) = (asset + "_description")
17	17
18	18
19	19		func assetAccess (asset) = (asset + "_assetBuy")
20	20
21	21
22	22		func assetOffer (asset) = (asset + "_offer")
	23	+
	24	+
	25	+	func assetOfferSwap (asset) = (asset + "_offer")
23	26
24	27
25	28		func tryGetInteger (key) = {
26	29		let val = match getInteger(this, key) {
27	30		case b: Int =>
28	31		b
29	32		case _ =>
30	33		0
31	34		}
32	35		val
33	36		}
34	37
35	38
36	39		func tryGetString (key) = {
37	40		let val = match getString(this, key) {
38	41		case b: String =>
39	42		b
40	43		case _ =>
41	44		""
42	45		}
43	46		val
44	47		}
45	48
46	49
47	50		func tryGetBool (key) = {
48	51		let val = match getBoolean(this, key) {
49	52		case b: Boolean =>
50	53		b
51	54		case _ =>
52	55		false
53	56		}
54	57		val
55	58		}
56	59
57	60
58	61		func isPaymentOk (i,acceptableAssetId,price) = if ((size(i.payments) == 0))
59	62		then throw("Payment not attached")
60	63		else {
61	64		let p = value(i.payments[0])
62	65		let val = match p.assetId {
63	66		case assetId: ByteVector =>
64	67		if ((toBase58String(assetId) == acceptableAssetId))
65	68		then (p.amount >= price)
66	69		else false
67	70		case waves: Unit =>
68	71		(p.amount >= price)
69	72		case _ =>
70	73		throw("Match error")
71	74		}
72	75		val
73	76		}
74	77
75	78
76	79		func isAcceptableNft (status,assetSale) = {
77	80		let idAsset = match assetSale.assetId {
78	81		case b: ByteVector =>
79	82		b
80	83		case b: Unit =>
81	84		base58'2CsAf'
82	85		case _ =>
83	86		throw("Match error")
84	87		}
85	88		let asset = match assetInfo(idAsset) {
86	89		case b: Asset =>
87	90		toBase58String(b.issuer.bytes)
88	91		case waves: Unit =>
89	92		"WAVES"
90	93		case _ =>
91	94		throw("Match error")
92	95		}
93	96		if (tryGetBool(asset))
94	97		then status
95	98		else false
96	99		}
97	100
98	101
99	102		func getAssetId (status,assetSale) = {
100	103		let idAsset = match assetSale.assetId {
101	104		case b: ByteVector =>
102	105		toBase58String(b)
103	106		case b: Unit =>
104	107		"WAVES"
105	108		case _ =>
106	109		throw("Match error")
107	110		}
108	111		((status + "_") + idAsset)
109	112		}
110	113
111	114
112	115		func getAssetPrice (status,assetSale) = {
113	116		let price = toString(assetSale.amount)
114	117		((status + "_") + price)
115	118		}
116	119
117	120
118	121		func getAssetIssuer (status,assetSale) = {
119	122		let idAsset = match assetSale.assetId {
120	123		case b: ByteVector =>
121	124		b
122	125		case b: Unit =>
123	126		base58'2CsAf'
124	127		case _ =>
125	128		throw("Match error")
126	129		}
127	130		let issuer = match assetInfo(idAsset) {
128	131		case b: Asset =>
129	132		toBase58String(b.issuer.bytes)
130	133		case b: Unit =>
131	134		"WAVES"
132	135		case _ =>
133	136		throw("Match error")
134	137		}
135	138		((status + "_") + issuer)
136	139		}
137	140
138	141
139	142		func getTransferAsset (status,data) = {
140	143		let transferAddress = match addressFromString(data._1) {
141	144		case b: Address =>
142	145		b
143	146		case b: Unit =>
144	147		this
145	148		case _ =>
146	149		throw("Match error")
147	150		}
148	151		if ((data._3 != "WAVES"))
149	152		then (status :+ ScriptTransfer(transferAddress, data._2, fromBase58String(data._3)))
150	153		else (status :+ ScriptTransfer(transferAddress, data._2, unit))
151	154		}
152	155
153	156
154	157		@Callable(i)
155	158		func offerForSale (assetIdPrice,price) = if (!(if (tryGetBool(assetAccess(assetIdPrice)))
156	159		then (price > 0)
157	160		else false))
158	161		then throw("Sale Asset incorrect")
159	162		else {
160	163		let firstPayment = value(i.payments[0])
161	164		let assetId = match firstPayment.assetId {
162	165		case id: ByteVector =>
163	166		id
164	167		case w: Unit =>
165	168		throw("Asset is not NFT")
166	169		case _ =>
167	170		throw("Match error")
168	171		}
169	172		let assetIdStr = toBase58String(assetId)
170	173		let asset = match assetInfo(assetId) {
171	174		case a: Asset =>
172	175		a
173	176		case _ =>
174	177		throw("Error getting information about asset")
175	178		}
176	179		if (if (if ((asset.quantity != 1))
177	180		then (asset.decimals != 0)
178	181		else false)
179	182		then asset.reissuable
180	183		else false)
181	184		then throw("Asset is not NFT")
182	185		else [IntegerEntry(priceKey(assetIdStr), price), StringEntry(ownerKey(assetIdStr), toBase58String(i.caller.bytes)), StringEntry(issuerKey(assetIdStr), toBase58String(asset.issuer.bytes)), StringEntry(nameKey(assetIdStr), asset.name), StringEntry(descriptionKey(assetIdStr), asset.description), StringEntry(assetOffer(assetIdStr), assetIdPrice)]
183	186		}
184	187
185	188
186	189
187	190		@Callable(i)
188	191		func offerForSwap (assetIdPrice) = {
189	192		let countPay = size(i.payments)
190	193		let status = {
191	194		let $l = i.payments
192	195		let $s = size($l)
193	196		let $acc0 = true
194	197		func $f0_1 ($a,$i) = if (($i >= $s))
195	198		then $a
196	199		else isAcceptableNft($a, $l[$i])
197	200
198	201		func $f0_2 ($a,$i) = if (($i >= $s))
199	202		then $a
200	203		else throw("List size exceeds 2")
201	204
202	205		$f0_2($f0_1($f0_1($acc0, 0), 1), 2)
203	206		}
204	207		if (!(status))
205	208		then throw("Payments incorrect")
206	209		else if ((tryGetInteger("commission") > i.payments[1].amount))
207	210		then throw("No minimum commission")
208	211		else {
209	212		let paymentAll = {
210	213		let $l = i.payments
211	214		let $s = size($l)
212	215		let $acc0 = ""
213	216		func $f1_1 ($a,$i) = if (($i >= $s))
214	217		then $a
215	218		else getAssetId($a, $l[$i])
216	219
217	220		func $f1_2 ($a,$i) = if (($i >= $s))
218	221		then $a
219	222		else throw("List size exceeds 2")
220	223
221	224		$f1_2($f1_1($f1_1($acc0, 0), 1), 2)
222	225		}
223	226		let issuer = {
224	227		let $l = i.payments
225	228		let $s = size($l)
226	229		let $acc0 = ""
227	230		func $f2_1 ($a,$i) = if (($i >= $s))
228	231		then $a
229	232		else getAssetIssuer($a, $l[$i])
230	233
231	234		func $f2_2 ($a,$i) = if (($i >= $s))
232	235		then $a
233	236		else throw("List size exceeds 2")
234	237
235	238		$f2_2($f2_1($f2_1($acc0, 0), 1), 2)
236	239		}
237	240		let price = {
238	241		let $l = i.payments
239	242		let $s = size($l)
240	243		let $acc0 = ""
241	244		func $f3_1 ($a,$i) = if (($i >= $s))
242	245		then $a
243	246		else getAssetPrice($a, $l[$i])
244	247
245	248		func $f3_2 ($a,$i) = if (($i >= $s))
246	249		then $a
247	250		else throw("List size exceeds 2")
248	251
249	252		$f3_2($f3_1($f3_1($acc0, 0), 1), 2)
250	253		}
251		-	[StringEntry(priceKey(paymentAll), price), StringEntry(ownerKey(paymentAll), toBase58String(i.caller.bytes)), StringEntry(issuerKey(paymentAll), issuer), StringEntry(assetOffer(paymentAll), assetIdPrice)]
	254	+	[StringEntry((priceKey(paymentAll) + "Swap"), price), StringEntry((ownerKey(paymentAll) + "Swap"), toBase58String(i.caller.bytes)), StringEntry((issuerKey(paymentAll) + "Swap"), issuer), StringEntry((assetOffer(paymentAll) + "Swap"), assetIdPrice)]
252	255		}
253	256		}
254	257
255	258
256	259
257	260		@Callable(i)
258	261		func buy (assetStr) = {
259	262		let price = tryGetInteger(priceKey(assetStr))
260	263		let acceptableAssetId = tryGetString(assetOffer(assetStr))
261	264		let ownerStr = tryGetString(ownerKey(assetStr))
262	265		let owner = match addressFromString(ownerStr) {
263	266		case a: Address =>
264	267		a
265	268		case _ =>
266	269		throw("Address parsing error")
267	270		}
268	271		if (!(isPaymentOk(i, acceptableAssetId, price)))
269	272		then throw("Wrong payment amount or asset")
270	273		else if ((ownerStr == toBase58String(i.caller.bytes)))
271	274		then throw("Owner cannot buy his NTF")
272	275		else if ((price == 0))
273	276		then throw("This NFT is not for sale")
274	277		else {
275	278		let fee = ((price / 100) * 5)
276	279		[ScriptTransfer(i.caller, 1, fromBase58String(assetStr)), ScriptTransfer(owner, (price - fee), unit), DeleteEntry(priceKey(assetStr)), DeleteEntry(ownerKey(assetStr)), DeleteEntry(issuerKey(assetStr)), DeleteEntry(nameKey(assetStr)), DeleteEntry(descriptionKey(assetStr)), DeleteEntry(assetOffer(assetStr))]
277	280		}
278	281		}
279	282
280	283
281	284
282	285		@Callable(i)
283	286		func swapDone (offerId) = {
284	287		let price = tryGetString(priceKey(offerId))
285	288		let offer = tryGetString(assetOffer(offerId))
286	289		let ownerOffer = tryGetString(ownerKey(offerId))
287	290		let ownerNft = tryGetString(ownerKey(offerId))
288	291		if ((ownerNft != toBase58String(i.caller.bytes)))
289	292		then throw("The calling address is not the owner of the NFT token")
290	293		else if ((price == ""))
291	294		then throw("This NFT is not for sale")
292	295		else {
293	296		let fee = tryGetInteger("commission")
294	297		let listAsset = split(offerId, "_")
295	298		let listPrice = split(price, "_")
296	299		[ScriptTransfer(addressFromStringValue(ownerNft), parseIntValue(listPrice[0]), fromBase58String(listAsset[0])), ScriptTransfer(addressFromStringValue(ownerNft), (parseIntValue(listPrice[1]) - fee), unit), ScriptTransfer(addressFromStringValue(ownerOffer), 1, fromBase58String(tryGetString(offerId))), DeleteEntry(priceKey(listAsset[0])), DeleteEntry(ownerKey(listAsset[0])), DeleteEntry(issuerKey(listAsset[0])), DeleteEntry(nameKey(listAsset[0])), DeleteEntry(descriptionKey(listAsset[0])), DeleteEntry(priceKey(offerId)), DeleteEntry(ownerKey(offerId)), DeleteEntry(issuerKey(offerId))]
297	300		}
298	301		}
299	302
300	303
301	304
302	305		@Callable(i)
303	306		func cancelSelling (assetStr) = {
304	307		let ownerStr = tryGetString(ownerKey(assetStr))
305	308		let owner = match addressFromString(ownerStr) {
306	309		case a: Address =>
307	310		a
308	311		case _ =>
309	312		throw("Address parsing error")
310	313		}
311	314		if ((ownerStr != toBase58String(i.caller.bytes)))
312	315		then throw("The calling address is not the owner of the NFT token")
313	316		else [ScriptTransfer(i.caller, 1, fromBase58String(assetStr)), DeleteEntry(priceKey(assetStr)), DeleteEntry(ownerKey(assetStr)), DeleteEntry(issuerKey(assetStr)), DeleteEntry(nameKey(assetStr)), DeleteEntry(descriptionKey(assetStr))]
314	317		}
315	318
316	319
317	320
318	321		@Callable(i)
319	322		func swapCancel (offerId) = {
320	323		let ownerOffer = tryGetString(ownerKey(offerId))
321	324		let price = tryGetString(priceKey(offerId))
322	325		if ((ownerOffer != toBase58String(i.caller.bytes)))
323	326		then throw("The calling address is not the owner of the NFT token")
324	327		else {
325	328		let listAsset = split(offerId, "_")
326	329		let listPrice = split(price, "_")
327		-	[ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[0]), fromBase58String(listAsset[0])), ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[1]), unit), DeleteEntry(priceKey(offerId)), DeleteEntry(ownerKey(offerId)), DeleteEntry(issuerKey(offerId))]
	330	+	[ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[0]), fromBase58String(listAsset[0])), ScriptTransfer(addressFromStringValue(ownerOffer), parseIntValue(listPrice[1]), unit), DeleteEntry((priceKey(offerId) + "Swap")), DeleteEntry((ownerKey(offerId) + "Swap")), DeleteEntry((issuerKey(offerId) + "Swap"))]
328	331		}
329	332		}
330	333
331	334
332	335		@Verifier(tx)
333	336		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
334	337

github/deemru/w8io/026f985 
54.94 ms ◑