w8 · tx · D9h···7Dc

tx · D9hhaBDw81Q18gZWXYz6vZLLdYzTsP6XmVjhd8pQY7Dc

3N8VMRDjjw6kAuCviYwFq4yDWyctRuHPN7X:  -0.00800000 Waves

2022.11.10 13:10 [2310918] smart account 3N8VMRDjjw6kAuCviYwFq4yDWyctRuHPN7X > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "D9hhaBDw81Q18gZWXYz6vZLLdYzTsP6XmVjhd8pQY7Dc",
    "fee": 800000,
    "feeAssetId": null,
    "timestamp": 1668075020272,
    "version": 2,
    "chainId": 84,
    "sender": "3N8VMRDjjw6kAuCviYwFq4yDWyctRuHPN7X",
    "senderPublicKey": "SrcQexq2T9cnMXmLqfJtc8AnQ91ZjeaJtXoi1HwDsx9",
    "proofs": [
        "4TjJvZdjF479oeFuuzQJBQ8S365PkUBsMbCSeZf52NQq9R1LtSEvUej4MC4cri6k4gWrnaJKn3biPGkJgM6NgPsQ"
    ],
    "script": "base64:BgIhCAISBAoCCAESAwoBCBIDCgEIEgMKAQgSAwoBCBIDCgEIEQEIcHJpY2VLZXkBBWFzc2V0CQCsAgIFBWFzc2V0AgZfcHJpY2UBCG93bmVyS2V5AQVhc3NldAkArAICBQVhc3NldAIGX293bmVyAQlpc3N1ZXJLZXkBBWFzc2V0CQCsAgIFBWFzc2V0AgdfaXNzdWVyAQduYW1lS2V5AQVhc3NldAkArAICBQVhc3NldAIFX25hbWUBDmRlc2NyaXB0aW9uS2V5AQVhc3NldAkArAICBQVhc3NldAIMX2Rlc2NyaXB0aW9uAQthc3NldEFjY2VzcwEFYXNzZXQJAKwCAgUFYXNzZXQCCV9hc3NldEJ1eQEKYXNzZXRPZmZlcgEFYXNzZXQJAKwCAgUFYXNzZXQCBl9vZmZlcgEOYXNzZXRPZmZlclN3YXABBWFzc2V0CQCsAgIFBWFzc2V0AgZfb2ZmZXIBDXRyeUdldEludGVnZXIBA2tleQQDdmFsBAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAUDdmFsAQx0cnlHZXRTdHJpbmcBA2tleQQDdmFsBAckbWF0Y2gwCQCdCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWIFByRtYXRjaDAFAWICAAUDdmFsAQp0cnlHZXRCb29sAQNrZXkEA3ZhbAQHJG1hdGNoMAkAmwgCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIHQm9vbGVhbgQBYgUHJG1hdGNoMAUBYgcFA3ZhbAELaXNQYXltZW50T2sDAWkRYWNjZXB0YWJsZUFzc2V0SWQFcHJpY2UDCQAAAgkAkAMBCAUBaQhwYXltZW50cwAACQACAQIUUGF5bWVudCBub3QgYXR0YWNoZWQEAXAJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQDdmFsBAckbWF0Y2gwCAUBcAdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEB2Fzc2V0SWQFByRtYXRjaDADCQAAAgkA2AQBBQdhc3NldElkBRFhY2NlcHRhYmxlQXNzZXRJZAkAZwIIBQFwBmFtb3VudAUFcHJpY2UHAwkAAQIFByRtYXRjaDACBFVuaXQEBXdhdmVzBQckbWF0Y2gwCQBnAggFAXAGYW1vdW50BQVwcmljZQkAAgECC01hdGNoIGVycm9yBQN2YWwBD2lzQWNjZXB0YWJsZU5mdAIGc3RhdHVzCWFzc2V0U2FsZQQHaWRBc3NldAQHJG1hdGNoMAgFCWFzc2V0U2FsZQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAWIFByRtYXRjaDAFAWIDCQABAgUHJG1hdGNoMAIEVW5pdAQBYgUHJG1hdGNoMAED0AAACQACAQILTWF0Y2ggZXJyb3IEBWFzc2V0BAckbWF0Y2gwCQDsBwEFB2lkQXNzZXQDCQABAgUHJG1hdGNoMAIFQXNzZXQEAWIFByRtYXRjaDAJANgEAQgIBQFiBmlzc3VlcgVieXRlcwMJAAECBQckbWF0Y2gwAgRVbml0BAV3YXZlcwUHJG1hdGNoMAIFV0FWRVMJAAIBAgtNYXRjaCBlcnJvcgMJAQp0cnlHZXRCb29sAQUFYXNzZXQFBnN0YXR1cwcBCmdldEFzc2V0SWQCBnN0YXR1cwlhc3NldFNhbGUEB2lkQXNzZXQEByRtYXRjaDAIBQlhc3NldFNhbGUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgpCeXRlVmVjdG9yBAFiBQckbWF0Y2gwCQDYBAEFAWIDCQABAgUHJG1hdGNoMAIEVW5pdAQBYgUHJG1hdGNoMAIFV0FWRVMJAAIBAgtNYXRjaCBlcnJvcgkArAICCQCsAgIFBnN0YXR1cwIBXwUHaWRBc3NldAENZ2V0QXNzZXRQcmljZQIGc3RhdHVzCWFzc2V0U2FsZQQFcHJpY2UJAKQDAQgFCWFzc2V0U2FsZQZhbW91bnQJAKwCAgkArAICBQZzdGF0dXMCAV8FBXByaWNlAQ5nZXRBc3NldElzc3VlcgIGc3RhdHVzCWFzc2V0U2FsZQQHaWRBc3NldAQHJG1hdGNoMAgFCWFzc2V0U2FsZQdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAWIFByRtYXRjaDAFAWIDCQABAgUHJG1hdGNoMAIEVW5pdAQBYgUHJG1hdGNoMAED0AAACQACAQILTWF0Y2ggZXJyb3IEBmlzc3VlcgQHJG1hdGNoMAkA7AcBBQdpZEFzc2V0AwkAAQIFByRtYXRjaDACBUFzc2V0BAFiBQckbWF0Y2gwCQDYBAEICAUBYgZpc3N1ZXIFYnl0ZXMDCQABAgUHJG1hdGNoMAIEVW5pdAQBYgUHJG1hdGNoMAIFV0FWRVMJAAIBAgtNYXRjaCBlcnJvcgkArAICCQCsAgIFBnN0YXR1cwIBXwUGaXNzdWVyARBnZXRUcmFuc2ZlckFzc2V0AgZzdGF0dXMEZGF0YQQPdHJhbnNmZXJBZGRyZXNzBAckbWF0Y2gwCQCmCAEIBQRkYXRhAl8xAwkAAQIFByRtYXRjaDACB0FkZHJlc3MEAWIFByRtYXRjaDAFAWIDCQABAgUHJG1hdGNoMAIEVW5pdAQBYgUHJG1hdGNoMAUEdGhpcwkAAgECC01hdGNoIGVycm9yAwkBAiE9AggFBGRhdGECXzMCBVdBVkVTCQDNCAIFBnN0YXR1cwkBDlNjcmlwdFRyYW5zZmVyAwUPdHJhbnNmZXJBZGRyZXNzCAUEZGF0YQJfMgkA2QQBCAUEZGF0YQJfMwkAzQgCBQZzdGF0dXMJAQ5TY3JpcHRUcmFuc2ZlcgMFD3RyYW5zZmVyQWRkcmVzcwgFBGRhdGECXzIFBHVuaXQGAWkBDG9mZmVyRm9yU2FsZQIMYXNzZXRJZFByaWNlBXByaWNlAwkBASEBAwkBCnRyeUdldEJvb2wBCQELYXNzZXRBY2Nlc3MBBQxhc3NldElkUHJpY2UJAGYCBQVwcmljZQAABwkAAgECFFNhbGUgQXNzZXQgaW5jb3JyZWN0BAxmaXJzdFBheW1lbnQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQHYXNzZXRJZAQHJG1hdGNoMAgFDGZpcnN0UGF5bWVudAdhc3NldElkAwkAAQIFByRtYXRjaDACCkJ5dGVWZWN0b3IEAmlkBQckbWF0Y2gwBQJpZAMJAAECBQckbWF0Y2gwAgRVbml0BAF3BQckbWF0Y2gwCQACAQIQQXNzZXQgaXMgbm90IE5GVAkAAgECC01hdGNoIGVycm9yBAphc3NldElkU3RyCQDYBAEFB2Fzc2V0SWQEBWFzc2V0BAckbWF0Y2gwCQDsBwEFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIFQXNzZXQEAWEFByRtYXRjaDAFAWEJAAIBAiVFcnJvciBnZXR0aW5nIGluZm9ybWF0aW9uIGFib3V0IGFzc2V0AwMDCQECIT0CCAUFYXNzZXQIcXVhbnRpdHkAAQkBAiE9AggFBWFzc2V0CGRlY2ltYWxzAAAHCAUFYXNzZXQKcmVpc3N1YWJsZQcJAAIBAhBBc3NldCBpcyBub3QgTkZUCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEIcHJpY2VLZXkBBQphc3NldElkU3RyBQVwcmljZQkAzAgCCQELU3RyaW5nRW50cnkCCQEIb3duZXJLZXkBBQphc3NldElkU3RyCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMJAMwIAgkBC1N0cmluZ0VudHJ5AgkBCWlzc3VlcktleQEFCmFzc2V0SWRTdHIJANgEAQgIBQVhc3NldAZpc3N1ZXIFYnl0ZXMJAMwIAgkBC1N0cmluZ0VudHJ5AgkBB25hbWVLZXkBBQphc3NldElkU3RyCAUFYXNzZXQEbmFtZQkAzAgCCQELU3RyaW5nRW50cnkCCQEOZGVzY3JpcHRpb25LZXkBBQphc3NldElkU3RyCAUFYXNzZXQLZGVzY3JpcHRpb24JAMwIAgkBC1N0cmluZ0VudHJ5AgkBCmFzc2V0T2ZmZXIBBQphc3NldElkU3RyBQxhc3NldElkUHJpY2UFA25pbAFpAQxvZmZlckZvclN3YXABDGFzc2V0SWRQcmljZQQIY291bnRQYXkJAJADAQgFAWkIcGF5bWVudHMEBnN0YXR1cwoAAiRsCAUBaQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAGCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ9pc0FjY2VwdGFibGVOZnQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAwkBASEBBQZzdGF0dXMJAAIBAhJQYXltZW50cyBpbmNvcnJlY3QDCQBmAgkBDXRyeUdldEludGVnZXIBAgpjb21taXNzaW9uCAkAkQMCCAUBaQhwYXltZW50cwABBmFtb3VudAkAAgECFU5vIG1pbmltdW0gY29tbWlzc2lvbgQKcGF5bWVudEFsbAoAAiRsCAUBaQhwYXltZW50cwoAAiRzCQCQAwEFAiRsCgAFJGFjYzACBFN3YXAKAQUkZjFfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCmdldEFzc2V0SWQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACBAZpc3N1ZXIKAAIkbAgFAWkIcGF5bWVudHMKAAIkcwkAkAMBBQIkbAoABSRhY2MwAgRTd2FwCgEFJGYyXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQ5nZXRBc3NldElzc3VlcgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMl8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMgkBBSRmMl8yAgkBBSRmMl8xAgkBBSRmMl8xAgUFJGFjYzAAAAABAAIEBXByaWNlCgACJGwIBQFpCHBheW1lbnRzCgACJHMJAJADAQUCJGwKAAUkYWNjMAIEU3dhcAoBBSRmM18xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQENZ2V0QXNzZXRQcmljZQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmM18yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMgkBBSRmM18yAgkBBSRmM18xAgkBBSRmM18xAgUFJGFjYzAAAAABAAIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQEIcHJpY2VLZXkBBQpwYXltZW50QWxsAgRTd2FwBQVwcmljZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAQhvd25lcktleQEFCnBheW1lbnRBbGwCBFN3YXAJANgEAQgIBQFpBmNhbGxlcgVieXRlcwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAQlpc3N1ZXJLZXkBBQpwYXltZW50QWxsAgRTd2FwBQZpc3N1ZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQEKYXNzZXRPZmZlcgEFCnBheW1lbnRBbGwCBFN3YXAFDGFzc2V0SWRQcmljZQUDbmlsAWkBA2J1eQEIYXNzZXRTdHIEBXByaWNlCQENdHJ5R2V0SW50ZWdlcgEJAQhwcmljZUtleQEFCGFzc2V0U3RyBBFhY2NlcHRhYmxlQXNzZXRJZAkBDHRyeUdldFN0cmluZwEJAQphc3NldE9mZmVyAQUIYXNzZXRTdHIECG93bmVyU3RyCQEMdHJ5R2V0U3RyaW5nAQkBCG93bmVyS2V5AQUIYXNzZXRTdHIEBW93bmVyBAckbWF0Y2gwCQCmCAEFCG93bmVyU3RyAwkAAQIFByRtYXRjaDACB0FkZHJlc3MEAWEFByRtYXRjaDAFAWEJAAIBAhVBZGRyZXNzIHBhcnNpbmcgZXJyb3IDCQEBIQEJAQtpc1BheW1lbnRPawMFAWkFEWFjY2VwdGFibGVBc3NldElkBQVwcmljZQkAAgECHVdyb25nIHBheW1lbnQgYW1vdW50IG9yIGFzc2V0AwkAAAIFCG93bmVyU3RyCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMJAAIBAhhPd25lciBjYW5ub3QgYnV5IGhpcyBOVEYDCQAAAgUFcHJpY2UAAAkAAgECGFRoaXMgTkZUIGlzIG5vdCBmb3Igc2FsZQQDZmVlCQBoAgkAaQIFBXByaWNlAGQABQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQkA2QQBBQhhc3NldFN0cgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQVvd25lcgkAZQIFBXByaWNlBQNmZWUFBHVuaXQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCHByaWNlS2V5AQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCG93bmVyS2V5AQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCWlzc3VlcktleQEFCGFzc2V0U3RyCQDMCAIJAQtEZWxldGVFbnRyeQEJAQduYW1lS2V5AQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBDmRlc2NyaXB0aW9uS2V5AQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCmFzc2V0T2ZmZXIBBQhhc3NldFN0cgUDbmlsAWkBCHN3YXBEb25lAQdvZmZlcklkBAVwcmljZQkBDHRyeUdldFN0cmluZwEJAQhwcmljZUtleQEFB29mZmVySWQEBW9mZmVyCQEMdHJ5R2V0U3RyaW5nAQkBCmFzc2V0T2ZmZXIBBQdvZmZlcklkBApvd25lck9mZmVyCQEMdHJ5R2V0U3RyaW5nAQkBCG93bmVyS2V5AQUHb2ZmZXJJZAQIb3duZXJOZnQJAQx0cnlHZXRTdHJpbmcBCQEIb3duZXJLZXkBBQdvZmZlcklkAwkBAiE9AgUIb3duZXJOZnQJANgEAQgIBQFpBmNhbGxlcgVieXRlcwkAAgECNVRoZSBjYWxsaW5nIGFkZHJlc3MgaXMgbm90IHRoZSBvd25lciBvZiB0aGUgTkZUIHRva2VuAwkAAAIFBXByaWNlAgAJAAIBAhhUaGlzIE5GVCBpcyBub3QgZm9yIHNhbGUEA2ZlZQkBDXRyeUdldEludGVnZXIBAgpjb21taXNzaW9uBAlsaXN0QXNzZXQJALUJAgUHb2ZmZXJJZAIBXwQJbGlzdFByaWNlCQC1CQIFBXByaWNlAgFfCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFCG93bmVyTmZ0CQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUJbGlzdFByaWNlAAAJANkEAQkAkQMCBQlsaXN0QXNzZXQAAAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQhvd25lck5mdAkAZQIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQlsaXN0UHJpY2UAAQUDZmVlBQR1bml0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFCm93bmVyT2ZmZXIAAQkA2QQBCQEMdHJ5R2V0U3RyaW5nAQUHb2ZmZXJJZAkAzAgCCQELRGVsZXRlRW50cnkBCQEIcHJpY2VLZXkBCQCRAwIFCWxpc3RBc3NldAAACQDMCAIJAQtEZWxldGVFbnRyeQEJAQhvd25lcktleQEJAJEDAgUJbGlzdEFzc2V0AAAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCWlzc3VlcktleQEJAJEDAgUJbGlzdEFzc2V0AAAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBB25hbWVLZXkBCQCRAwIFCWxpc3RBc3NldAAACQDMCAIJAQtEZWxldGVFbnRyeQEJAQ5kZXNjcmlwdGlvbktleQEJAJEDAgUJbGlzdEFzc2V0AAAJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCHByaWNlS2V5AQUHb2ZmZXJJZAkAzAgCCQELRGVsZXRlRW50cnkBCQEIb3duZXJLZXkBBQdvZmZlcklkCQDMCAIJAQtEZWxldGVFbnRyeQEJAQlpc3N1ZXJLZXkBBQdvZmZlcklkBQNuaWwBaQENY2FuY2VsU2VsbGluZwEIYXNzZXRTdHIECG93bmVyU3RyCQEMdHJ5R2V0U3RyaW5nAQkBCG93bmVyS2V5AQUIYXNzZXRTdHIEBW93bmVyBAckbWF0Y2gwCQCmCAEFCG93bmVyU3RyAwkAAQIFByRtYXRjaDACB0FkZHJlc3MEAWEFByRtYXRjaDAFAWEJAAIBAhVBZGRyZXNzIHBhcnNpbmcgZXJyb3IDCQECIT0CBQhvd25lclN0cgkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzCQACAQI1VGhlIGNhbGxpbmcgYWRkcmVzcyBpcyBub3QgdGhlIG93bmVyIG9mIHRoZSBORlQgdG9rZW4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEJANkEAQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCHByaWNlS2V5AQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCG93bmVyS2V5AQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCWlzc3VlcktleQEFCGFzc2V0U3RyCQDMCAIJAQtEZWxldGVFbnRyeQEJAQduYW1lS2V5AQUIYXNzZXRTdHIJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBDmRlc2NyaXB0aW9uS2V5AQUIYXNzZXRTdHIFA25pbAFpAQpzd2FwQ2FuY2VsAQdvZmZlcklkBApvd25lck9mZmVyCQEMdHJ5R2V0U3RyaW5nAQkArAICCQEIb3duZXJLZXkBBQdvZmZlcklkAgRTd2FwBAVwcmljZQkBDHRyeUdldFN0cmluZwEJAQhwcmljZUtleQEFB29mZmVySWQDCQECIT0CBQpvd25lck9mZmVyCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMJAAIBAjVUaGUgY2FsbGluZyBhZGRyZXNzIGlzIG5vdCB0aGUgb3duZXIgb2YgdGhlIE5GVCB0b2tlbgQJbGlzdEFzc2V0CQC1CQIFB29mZmVySWQCAV8ECWxpc3RQcmljZQkAtQkCBQVwcmljZQIBXwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQpvd25lck9mZmVyCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUJbGlzdFByaWNlAAEJANkEAQkAkQMCBQlsaXN0QXNzZXQAAQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQpvd25lck9mZmVyCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUJbGlzdFByaWNlAAIFBHVuaXQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQEIcHJpY2VLZXkBBQdvZmZlcklkAgRTd2FwCQDMCAIJAQtEZWxldGVFbnRyeQEJAKwCAgkBCG93bmVyS2V5AQUHb2ZmZXJJZAIEU3dhcAkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAQlpc3N1ZXJLZXkBBQdvZmZlcklkAgRTd2FwBQNuaWwBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5U1Th6w==",
    "height": 2310918,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: ENBy7Jsp7aU3nrrqEjVnSuaFoxbYNwWUqvPTxZzAGkgf
Next: AvhTPQUPw7NrFkpBBsufkENh4fni7GvsPgNZMjfv6ucN

Diff: 
Old New Differences
393 393          else {
394 394              let al = split(ah, "_")
395 395              let am = split(t, "_")
396 - [ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[0]), fromBase58String(al[0])), ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[1]), unit), DeleteEntry((a(ah) + "Swap")), DeleteEntry((c(ah) + "Swap")), DeleteEntry((d(ah) + "Swap"))]
396 + [ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[1]), fromBase58String(al[1])), ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[2]), unit), DeleteEntry((a(ah) + "Swap")), DeleteEntry((c(ah) + "Swap")), DeleteEntry((d(ah) + "Swap"))]
397 397              }
398 398      }
399 399  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  func a (b) = (b + "_price")
5 5  
6 6  
7 7  func c (b) = (b + "_owner")
8 8  
9 9  
10 10  func d (b) = (b + "_issuer")
11 11  
12 12  
13 13  func e (b) = (b + "_name")
14 14  
15 15  
16 16  func f (b) = (b + "_description")
17 17  
18 18  
19 19  func g (b) = (b + "_assetBuy")
20 20  
21 21  
22 22  func h (b) = (b + "_offer")
23 23  
24 24  
25 25  func i (b) = (b + "_offer")
26 26  
27 27  
28 28  func j (k) = {
29 29      let l = {
30 30          let m = getInteger(this, k)
31 31          if ($isInstanceOf(m, "Int"))
32 32              then {
33 33                  let n = m
34 34                  n
35 35                  }
36 36              else 0
37 37          }
38 38      l
39 39      }
40 40  
41 41  
42 42  func o (k) = {
43 43      let l = {
44 44          let m = getString(this, k)
45 45          if ($isInstanceOf(m, "String"))
46 46              then {
47 47                  let n = m
48 48                  n
49 49                  }
50 50              else ""
51 51          }
52 52      l
53 53      }
54 54  
55 55  
56 56  func p (k) = {
57 57      let l = {
58 58          let m = getBoolean(this, k)
59 59          if ($isInstanceOf(m, "Boolean"))
60 60              then {
61 61                  let n = m
62 62                  n
63 63                  }
64 64              else false
65 65          }
66 66      l
67 67      }
68 68  
69 69  
70 70  func q (r,s,t) = if ((size(r.payments) == 0))
71 71      then throw("Payment not attached")
72 72      else {
73 73          let u = value(r.payments[0])
74 74          let l = {
75 75              let m = u.assetId
76 76              if ($isInstanceOf(m, "ByteVector"))
77 77                  then {
78 78                      let v = m
79 79                      if ((toBase58String(v) == s))
80 80                          then (u.amount >= t)
81 81                          else false
82 82                      }
83 83                  else if ($isInstanceOf(m, "Unit"))
84 84                      then {
85 85                          let w = m
86 86                          (u.amount >= t)
87 87                          }
88 88                      else throw("Match error")
89 89              }
90 90          l
91 91          }
92 92  
93 93  
94 94  func x (y,z) = {
95 95      let A = {
96 96          let m = z.assetId
97 97          if ($isInstanceOf(m, "ByteVector"))
98 98              then {
99 99                  let n = m
100 100                  n
101 101                  }
102 102              else if ($isInstanceOf(m, "Unit"))
103 103                  then {
104 104                      let n = m
105 105                      base58'2CsAf'
106 106                      }
107 107                  else throw("Match error")
108 108          }
109 109      let b = {
110 110          let m = assetInfo(A)
111 111          if ($isInstanceOf(m, "Asset"))
112 112              then {
113 113                  let n = m
114 114                  toBase58String(n.issuer.bytes)
115 115                  }
116 116              else if ($isInstanceOf(m, "Unit"))
117 117                  then {
118 118                      let w = m
119 119                      "WAVES"
120 120                      }
121 121                  else throw("Match error")
122 122          }
123 123      if (p(b))
124 124          then y
125 125          else false
126 126      }
127 127  
128 128  
129 129  func B (y,z) = {
130 130      let A = {
131 131          let m = z.assetId
132 132          if ($isInstanceOf(m, "ByteVector"))
133 133              then {
134 134                  let n = m
135 135                  toBase58String(n)
136 136                  }
137 137              else if ($isInstanceOf(m, "Unit"))
138 138                  then {
139 139                      let n = m
140 140                      "WAVES"
141 141                      }
142 142                  else throw("Match error")
143 143          }
144 144      ((y + "_") + A)
145 145      }
146 146  
147 147  
148 148  func C (y,z) = {
149 149      let t = toString(z.amount)
150 150      ((y + "_") + t)
151 151      }
152 152  
153 153  
154 154  func D (y,z) = {
155 155      let A = {
156 156          let m = z.assetId
157 157          if ($isInstanceOf(m, "ByteVector"))
158 158              then {
159 159                  let n = m
160 160                  n
161 161                  }
162 162              else if ($isInstanceOf(m, "Unit"))
163 163                  then {
164 164                      let n = m
165 165                      base58'2CsAf'
166 166                      }
167 167                  else throw("Match error")
168 168          }
169 169      let E = {
170 170          let m = assetInfo(A)
171 171          if ($isInstanceOf(m, "Asset"))
172 172              then {
173 173                  let n = m
174 174                  toBase58String(n.issuer.bytes)
175 175                  }
176 176              else if ($isInstanceOf(m, "Unit"))
177 177                  then {
178 178                      let n = m
179 179                      "WAVES"
180 180                      }
181 181                  else throw("Match error")
182 182          }
183 183      ((y + "_") + E)
184 184      }
185 185  
186 186  
187 187  func F (y,G) = {
188 188      let H = {
189 189          let m = addressFromString(G._1)
190 190          if ($isInstanceOf(m, "Address"))
191 191              then {
192 192                  let n = m
193 193                  n
194 194                  }
195 195              else if ($isInstanceOf(m, "Unit"))
196 196                  then {
197 197                      let n = m
198 198                      this
199 199                      }
200 200                  else throw("Match error")
201 201          }
202 202      if ((G._3 != "WAVES"))
203 203          then (y :+ ScriptTransfer(H, G._2, fromBase58String(G._3)))
204 204          else (y :+ ScriptTransfer(H, G._2, unit))
205 205      }
206 206  
207 207  
208 208  @Callable(r)
209 209  func offerForSale (I,t) = if (!(if (p(g(I)))
210 210      then (t > 0)
211 211      else false))
212 212      then throw("Sale Asset incorrect")
213 213      else {
214 214          let J = value(r.payments[0])
215 215          let v = {
216 216              let m = J.assetId
217 217              if ($isInstanceOf(m, "ByteVector"))
218 218                  then {
219 219                      let K = m
220 220                      K
221 221                      }
222 222                  else if ($isInstanceOf(m, "Unit"))
223 223                      then {
224 224                          let L = m
225 225                          throw("Asset is not NFT")
226 226                          }
227 227                      else throw("Match error")
228 228              }
229 229          let M = toBase58String(v)
230 230          let b = {
231 231              let m = assetInfo(v)
232 232              if ($isInstanceOf(m, "Asset"))
233 233                  then {
234 234                      let N = m
235 235                      N
236 236                      }
237 237                  else throw("Error getting information about asset")
238 238              }
239 239          if (if (if ((b.quantity != 1))
240 240              then (b.decimals != 0)
241 241              else false)
242 242              then b.reissuable
243 243              else false)
244 244              then throw("Asset is not NFT")
245 245              else [IntegerEntry(a(M), t), StringEntry(c(M), toBase58String(r.caller.bytes)), StringEntry(d(M), toBase58String(b.issuer.bytes)), StringEntry(e(M), b.name), StringEntry(f(M), b.description), StringEntry(h(M), I)]
246 246          }
247 247  
248 248  
249 249  
250 250  @Callable(r)
251 251  func offerForSwap (I) = {
252 252      let O = size(r.payments)
253 253      let y = {
254 254          let P = r.payments
255 255          let Q = size(P)
256 256          let R = true
257 257          func S (T,U) =         if ((U >= Q))
258 258              then T
259 259              else x(T, P[U])
260 260  
261 261          func V (T,U) =         if ((U >= Q))
262 262              then T
263 263              else throw("List size exceeds 2")
264 264  
265 265          V(S(S(R, 0), 1), 2)
266 266          }
267 267      if (!(y))
268 268          then throw("Payments incorrect")
269 269          else if ((j("commission") > r.payments[1].amount))
270 270              then throw("No minimum commission")
271 271              else {
272 272                  let W = {
273 273                      let P = r.payments
274 274                      let Q = size(P)
275 275                      let R = "Swap"
276 276                      func X (T,U) =                     if ((U >= Q))
277 277                          then T
278 278                          else B(T, P[U])
279 279  
280 280                      func Y (T,U) =                     if ((U >= Q))
281 281                          then T
282 282                          else throw("List size exceeds 2")
283 283  
284 284                      Y(X(X(R, 0), 1), 2)
285 285                      }
286 286                  let E = {
287 287                      let P = r.payments
288 288                      let Q = size(P)
289 289                      let R = "Swap"
290 290                      func Z (T,U) =                     if ((U >= Q))
291 291                          then T
292 292                          else D(T, P[U])
293 293  
294 294                      func aa (T,U) =                     if ((U >= Q))
295 295                          then T
296 296                          else throw("List size exceeds 2")
297 297  
298 298                      aa(Z(Z(R, 0), 1), 2)
299 299                      }
300 300                  let t = {
301 301                      let P = r.payments
302 302                      let Q = size(P)
303 303                      let R = "Swap"
304 304                      func ab (T,U) =                     if ((U >= Q))
305 305                          then T
306 306                          else C(T, P[U])
307 307  
308 308                      func ac (T,U) =                     if ((U >= Q))
309 309                          then T
310 310                          else throw("List size exceeds 2")
311 311  
312 312                      ac(ab(ab(R, 0), 1), 2)
313 313                      }
314 314  [StringEntry((a(W) + "Swap"), t), StringEntry((c(W) + "Swap"), toBase58String(r.caller.bytes)), StringEntry((d(W) + "Swap"), E), StringEntry((h(W) + "Swap"), I)]
315 315                  }
316 316      }
317 317  
318 318  
319 319  
320 320  @Callable(r)
321 321  func buy (ad) = {
322 322      let t = j(a(ad))
323 323      let s = o(h(ad))
324 324      let ae = o(c(ad))
325 325      let af = {
326 326          let m = addressFromString(ae)
327 327          if ($isInstanceOf(m, "Address"))
328 328              then {
329 329                  let N = m
330 330                  N
331 331                  }
332 332              else throw("Address parsing error")
333 333          }
334 334      if (!(q(r, s, t)))
335 335          then throw("Wrong payment amount or asset")
336 336          else if ((ae == toBase58String(r.caller.bytes)))
337 337              then throw("Owner cannot buy his NTF")
338 338              else if ((t == 0))
339 339                  then throw("This NFT is not for sale")
340 340                  else {
341 341                      let ag = ((t / 100) * 5)
342 342  [ScriptTransfer(r.caller, 1, fromBase58String(ad)), ScriptTransfer(af, (t - ag), unit), DeleteEntry(a(ad)), DeleteEntry(c(ad)), DeleteEntry(d(ad)), DeleteEntry(e(ad)), DeleteEntry(f(ad)), DeleteEntry(h(ad))]
343 343                      }
344 344      }
345 345  
346 346  
347 347  
348 348  @Callable(r)
349 349  func swapDone (ah) = {
350 350      let t = o(a(ah))
351 351      let ai = o(h(ah))
352 352      let aj = o(c(ah))
353 353      let ak = o(c(ah))
354 354      if ((ak != toBase58String(r.caller.bytes)))
355 355          then throw("The calling address is not the owner of the NFT token")
356 356          else if ((t == ""))
357 357              then throw("This NFT is not for sale")
358 358              else {
359 359                  let ag = j("commission")
360 360                  let al = split(ah, "_")
361 361                  let am = split(t, "_")
362 362  [ScriptTransfer(addressFromStringValue(ak), parseIntValue(am[0]), fromBase58String(al[0])), ScriptTransfer(addressFromStringValue(ak), (parseIntValue(am[1]) - ag), unit), ScriptTransfer(addressFromStringValue(aj), 1, fromBase58String(o(ah))), DeleteEntry(a(al[0])), DeleteEntry(c(al[0])), DeleteEntry(d(al[0])), DeleteEntry(e(al[0])), DeleteEntry(f(al[0])), DeleteEntry(a(ah)), DeleteEntry(c(ah)), DeleteEntry(d(ah))]
363 363                  }
364 364      }
365 365  
366 366  
367 367  
368 368  @Callable(r)
369 369  func cancelSelling (ad) = {
370 370      let ae = o(c(ad))
371 371      let af = {
372 372          let m = addressFromString(ae)
373 373          if ($isInstanceOf(m, "Address"))
374 374              then {
375 375                  let N = m
376 376                  N
377 377                  }
378 378              else throw("Address parsing error")
379 379          }
380 380      if ((ae != toBase58String(r.caller.bytes)))
381 381          then throw("The calling address is not the owner of the NFT token")
382 382          else [ScriptTransfer(r.caller, 1, fromBase58String(ad)), DeleteEntry(a(ad)), DeleteEntry(c(ad)), DeleteEntry(d(ad)), DeleteEntry(e(ad)), DeleteEntry(f(ad))]
383 383      }
384 384  
385 385  
386 386  
387 387  @Callable(r)
388 388  func swapCancel (ah) = {
389 389      let aj = o((c(ah) + "Swap"))
390 390      let t = o(a(ah))
391 391      if ((aj != toBase58String(r.caller.bytes)))
392 392          then throw("The calling address is not the owner of the NFT token")
393 393          else {
394 394              let al = split(ah, "_")
395 395              let am = split(t, "_")
396 - [ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[0]), fromBase58String(al[0])), ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[1]), unit), DeleteEntry((a(ah) + "Swap")), DeleteEntry((c(ah) + "Swap")), DeleteEntry((d(ah) + "Swap"))]
396 + [ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[1]), fromBase58String(al[1])), ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[2]), unit), DeleteEntry((a(ah) + "Swap")), DeleteEntry((c(ah) + "Swap")), DeleteEntry((d(ah) + "Swap"))]
397 397              }
398 398      }
399 399  
400 400  
401 401  @Verifier(an)
402 402  func ao () = sigVerify(an.bodyBytes, an.proofs[0], an.senderPublicKey)
403 403

Old	New		Differences
393	393		else {
394	394		let al = split(ah, "_")
395	395		let am = split(t, "_")
396		-	[ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[0]), fromBase58String(al[0])), ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[1]), unit), DeleteEntry((a(ah) + "Swap")), DeleteEntry((c(ah) + "Swap")), DeleteEntry((d(ah) + "Swap"))]
	396	+	[ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[1]), fromBase58String(al[1])), ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[2]), unit), DeleteEntry((a(ah) + "Swap")), DeleteEntry((c(ah) + "Swap")), DeleteEntry((d(ah) + "Swap"))]
397	397		}
398	398		}
399	399

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		func a (b) = (b + "_price")
5	5
6	6
7	7		func c (b) = (b + "_owner")
8	8
9	9
10	10		func d (b) = (b + "_issuer")
11	11
12	12
13	13		func e (b) = (b + "_name")
14	14
15	15
16	16		func f (b) = (b + "_description")
17	17
18	18
19	19		func g (b) = (b + "_assetBuy")
20	20
21	21
22	22		func h (b) = (b + "_offer")
23	23
24	24
25	25		func i (b) = (b + "_offer")
26	26
27	27
28	28		func j (k) = {
29	29		let l = {
30	30		let m = getInteger(this, k)
31	31		if ($isInstanceOf(m, "Int"))
32	32		then {
33	33		let n = m
34	34		n
35	35		}
36	36		else 0
37	37		}
38	38		l
39	39		}
40	40
41	41
42	42		func o (k) = {
43	43		let l = {
44	44		let m = getString(this, k)
45	45		if ($isInstanceOf(m, "String"))
46	46		then {
47	47		let n = m
48	48		n
49	49		}
50	50		else ""
51	51		}
52	52		l
53	53		}
54	54
55	55
56	56		func p (k) = {
57	57		let l = {
58	58		let m = getBoolean(this, k)
59	59		if ($isInstanceOf(m, "Boolean"))
60	60		then {
61	61		let n = m
62	62		n
63	63		}
64	64		else false
65	65		}
66	66		l
67	67		}
68	68
69	69
70	70		func q (r,s,t) = if ((size(r.payments) == 0))
71	71		then throw("Payment not attached")
72	72		else {
73	73		let u = value(r.payments[0])
74	74		let l = {
75	75		let m = u.assetId
76	76		if ($isInstanceOf(m, "ByteVector"))
77	77		then {
78	78		let v = m
79	79		if ((toBase58String(v) == s))
80	80		then (u.amount >= t)
81	81		else false
82	82		}
83	83		else if ($isInstanceOf(m, "Unit"))
84	84		then {
85	85		let w = m
86	86		(u.amount >= t)
87	87		}
88	88		else throw("Match error")
89	89		}
90	90		l
91	91		}
92	92
93	93
94	94		func x (y,z) = {
95	95		let A = {
96	96		let m = z.assetId
97	97		if ($isInstanceOf(m, "ByteVector"))
98	98		then {
99	99		let n = m
100	100		n
101	101		}
102	102		else if ($isInstanceOf(m, "Unit"))
103	103		then {
104	104		let n = m
105	105		base58'2CsAf'
106	106		}
107	107		else throw("Match error")
108	108		}
109	109		let b = {
110	110		let m = assetInfo(A)
111	111		if ($isInstanceOf(m, "Asset"))
112	112		then {
113	113		let n = m
114	114		toBase58String(n.issuer.bytes)
115	115		}
116	116		else if ($isInstanceOf(m, "Unit"))
117	117		then {
118	118		let w = m
119	119		"WAVES"
120	120		}
121	121		else throw("Match error")
122	122		}
123	123		if (p(b))
124	124		then y
125	125		else false
126	126		}
127	127
128	128
129	129		func B (y,z) = {
130	130		let A = {
131	131		let m = z.assetId
132	132		if ($isInstanceOf(m, "ByteVector"))
133	133		then {
134	134		let n = m
135	135		toBase58String(n)
136	136		}
137	137		else if ($isInstanceOf(m, "Unit"))
138	138		then {
139	139		let n = m
140	140		"WAVES"
141	141		}
142	142		else throw("Match error")
143	143		}
144	144		((y + "_") + A)
145	145		}
146	146
147	147
148	148		func C (y,z) = {
149	149		let t = toString(z.amount)
150	150		((y + "_") + t)
151	151		}
152	152
153	153
154	154		func D (y,z) = {
155	155		let A = {
156	156		let m = z.assetId
157	157		if ($isInstanceOf(m, "ByteVector"))
158	158		then {
159	159		let n = m
160	160		n
161	161		}
162	162		else if ($isInstanceOf(m, "Unit"))
163	163		then {
164	164		let n = m
165	165		base58'2CsAf'
166	166		}
167	167		else throw("Match error")
168	168		}
169	169		let E = {
170	170		let m = assetInfo(A)
171	171		if ($isInstanceOf(m, "Asset"))
172	172		then {
173	173		let n = m
174	174		toBase58String(n.issuer.bytes)
175	175		}
176	176		else if ($isInstanceOf(m, "Unit"))
177	177		then {
178	178		let n = m
179	179		"WAVES"
180	180		}
181	181		else throw("Match error")
182	182		}
183	183		((y + "_") + E)
184	184		}
185	185
186	186
187	187		func F (y,G) = {
188	188		let H = {
189	189		let m = addressFromString(G._1)
190	190		if ($isInstanceOf(m, "Address"))
191	191		then {
192	192		let n = m
193	193		n
194	194		}
195	195		else if ($isInstanceOf(m, "Unit"))
196	196		then {
197	197		let n = m
198	198		this
199	199		}
200	200		else throw("Match error")
201	201		}
202	202		if ((G._3 != "WAVES"))
203	203		then (y :+ ScriptTransfer(H, G._2, fromBase58String(G._3)))
204	204		else (y :+ ScriptTransfer(H, G._2, unit))
205	205		}
206	206
207	207
208	208		@Callable(r)
209	209		func offerForSale (I,t) = if (!(if (p(g(I)))
210	210		then (t > 0)
211	211		else false))
212	212		then throw("Sale Asset incorrect")
213	213		else {
214	214		let J = value(r.payments[0])
215	215		let v = {
216	216		let m = J.assetId
217	217		if ($isInstanceOf(m, "ByteVector"))
218	218		then {
219	219		let K = m
220	220		K
221	221		}
222	222		else if ($isInstanceOf(m, "Unit"))
223	223		then {
224	224		let L = m
225	225		throw("Asset is not NFT")
226	226		}
227	227		else throw("Match error")
228	228		}
229	229		let M = toBase58String(v)
230	230		let b = {
231	231		let m = assetInfo(v)
232	232		if ($isInstanceOf(m, "Asset"))
233	233		then {
234	234		let N = m
235	235		N
236	236		}
237	237		else throw("Error getting information about asset")
238	238		}
239	239		if (if (if ((b.quantity != 1))
240	240		then (b.decimals != 0)
241	241		else false)
242	242		then b.reissuable
243	243		else false)
244	244		then throw("Asset is not NFT")
245	245		else [IntegerEntry(a(M), t), StringEntry(c(M), toBase58String(r.caller.bytes)), StringEntry(d(M), toBase58String(b.issuer.bytes)), StringEntry(e(M), b.name), StringEntry(f(M), b.description), StringEntry(h(M), I)]
246	246		}
247	247
248	248
249	249
250	250		@Callable(r)
251	251		func offerForSwap (I) = {
252	252		let O = size(r.payments)
253	253		let y = {
254	254		let P = r.payments
255	255		let Q = size(P)
256	256		let R = true
257	257		func S (T,U) = if ((U >= Q))
258	258		then T
259	259		else x(T, P[U])
260	260
261	261		func V (T,U) = if ((U >= Q))
262	262		then T
263	263		else throw("List size exceeds 2")
264	264
265	265		V(S(S(R, 0), 1), 2)
266	266		}
267	267		if (!(y))
268	268		then throw("Payments incorrect")
269	269		else if ((j("commission") > r.payments[1].amount))
270	270		then throw("No minimum commission")
271	271		else {
272	272		let W = {
273	273		let P = r.payments
274	274		let Q = size(P)
275	275		let R = "Swap"
276	276		func X (T,U) = if ((U >= Q))
277	277		then T
278	278		else B(T, P[U])
279	279
280	280		func Y (T,U) = if ((U >= Q))
281	281		then T
282	282		else throw("List size exceeds 2")
283	283
284	284		Y(X(X(R, 0), 1), 2)
285	285		}
286	286		let E = {
287	287		let P = r.payments
288	288		let Q = size(P)
289	289		let R = "Swap"
290	290		func Z (T,U) = if ((U >= Q))
291	291		then T
292	292		else D(T, P[U])
293	293
294	294		func aa (T,U) = if ((U >= Q))
295	295		then T
296	296		else throw("List size exceeds 2")
297	297
298	298		aa(Z(Z(R, 0), 1), 2)
299	299		}
300	300		let t = {
301	301		let P = r.payments
302	302		let Q = size(P)
303	303		let R = "Swap"
304	304		func ab (T,U) = if ((U >= Q))
305	305		then T
306	306		else C(T, P[U])
307	307
308	308		func ac (T,U) = if ((U >= Q))
309	309		then T
310	310		else throw("List size exceeds 2")
311	311
312	312		ac(ab(ab(R, 0), 1), 2)
313	313		}
314	314		[StringEntry((a(W) + "Swap"), t), StringEntry((c(W) + "Swap"), toBase58String(r.caller.bytes)), StringEntry((d(W) + "Swap"), E), StringEntry((h(W) + "Swap"), I)]
315	315		}
316	316		}
317	317
318	318
319	319
320	320		@Callable(r)
321	321		func buy (ad) = {
322	322		let t = j(a(ad))
323	323		let s = o(h(ad))
324	324		let ae = o(c(ad))
325	325		let af = {
326	326		let m = addressFromString(ae)
327	327		if ($isInstanceOf(m, "Address"))
328	328		then {
329	329		let N = m
330	330		N
331	331		}
332	332		else throw("Address parsing error")
333	333		}
334	334		if (!(q(r, s, t)))
335	335		then throw("Wrong payment amount or asset")
336	336		else if ((ae == toBase58String(r.caller.bytes)))
337	337		then throw("Owner cannot buy his NTF")
338	338		else if ((t == 0))
339	339		then throw("This NFT is not for sale")
340	340		else {
341	341		let ag = ((t / 100) * 5)
342	342		[ScriptTransfer(r.caller, 1, fromBase58String(ad)), ScriptTransfer(af, (t - ag), unit), DeleteEntry(a(ad)), DeleteEntry(c(ad)), DeleteEntry(d(ad)), DeleteEntry(e(ad)), DeleteEntry(f(ad)), DeleteEntry(h(ad))]
343	343		}
344	344		}
345	345
346	346
347	347
348	348		@Callable(r)
349	349		func swapDone (ah) = {
350	350		let t = o(a(ah))
351	351		let ai = o(h(ah))
352	352		let aj = o(c(ah))
353	353		let ak = o(c(ah))
354	354		if ((ak != toBase58String(r.caller.bytes)))
355	355		then throw("The calling address is not the owner of the NFT token")
356	356		else if ((t == ""))
357	357		then throw("This NFT is not for sale")
358	358		else {
359	359		let ag = j("commission")
360	360		let al = split(ah, "_")
361	361		let am = split(t, "_")
362	362		[ScriptTransfer(addressFromStringValue(ak), parseIntValue(am[0]), fromBase58String(al[0])), ScriptTransfer(addressFromStringValue(ak), (parseIntValue(am[1]) - ag), unit), ScriptTransfer(addressFromStringValue(aj), 1, fromBase58String(o(ah))), DeleteEntry(a(al[0])), DeleteEntry(c(al[0])), DeleteEntry(d(al[0])), DeleteEntry(e(al[0])), DeleteEntry(f(al[0])), DeleteEntry(a(ah)), DeleteEntry(c(ah)), DeleteEntry(d(ah))]
363	363		}
364	364		}
365	365
366	366
367	367
368	368		@Callable(r)
369	369		func cancelSelling (ad) = {
370	370		let ae = o(c(ad))
371	371		let af = {
372	372		let m = addressFromString(ae)
373	373		if ($isInstanceOf(m, "Address"))
374	374		then {
375	375		let N = m
376	376		N
377	377		}
378	378		else throw("Address parsing error")
379	379		}
380	380		if ((ae != toBase58String(r.caller.bytes)))
381	381		then throw("The calling address is not the owner of the NFT token")
382	382		else [ScriptTransfer(r.caller, 1, fromBase58String(ad)), DeleteEntry(a(ad)), DeleteEntry(c(ad)), DeleteEntry(d(ad)), DeleteEntry(e(ad)), DeleteEntry(f(ad))]
383	383		}
384	384
385	385
386	386
387	387		@Callable(r)
388	388		func swapCancel (ah) = {
389	389		let aj = o((c(ah) + "Swap"))
390	390		let t = o(a(ah))
391	391		if ((aj != toBase58String(r.caller.bytes)))
392	392		then throw("The calling address is not the owner of the NFT token")
393	393		else {
394	394		let al = split(ah, "_")
395	395		let am = split(t, "_")
396		-	[ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[0]), fromBase58String(al[0])), ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[1]), unit), DeleteEntry((a(ah) + "Swap")), DeleteEntry((c(ah) + "Swap")), DeleteEntry((d(ah) + "Swap"))]
	396	+	[ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[1]), fromBase58String(al[1])), ScriptTransfer(addressFromStringValue(aj), parseIntValue(am[2]), unit), DeleteEntry((a(ah) + "Swap")), DeleteEntry((c(ah) + "Swap")), DeleteEntry((d(ah) + "Swap"))]
397	397		}
398	398		}
399	399
400	400
401	401		@Verifier(an)
402	402		func ao () = sigVerify(an.bodyBytes, an.proofs[0], an.senderPublicKey)
403	403

github/deemru/w8io/169f3d6 
47.55 ms ◑