tx · 6wZwVQ3xP2qJtrwQA8vgwnNM2xW81yR4j3aVSUPQgVLX

3N85YW6NZ9pLYvSdt1ASMQTGxvncnU1vUNx:  -0.10000000 Waves

2022.11.29 09:41 [2338050] smart account 3N85YW6NZ9pLYvSdt1ASMQTGxvncnU1vUNx > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "6wZwVQ3xP2qJtrwQA8vgwnNM2xW81yR4j3aVSUPQgVLX",
    "fee": 10000000,
    "feeAssetId": null,
    "timestamp": 1669704117236,
    "version": 2,
    "chainId": 84,
    "sender": "3N85YW6NZ9pLYvSdt1ASMQTGxvncnU1vUNx",
    "senderPublicKey": "EKZmHJ5bK3qKKgRdq8rAamt9qrDbVMLARzRqXoQW258v",
    "proofs": [
        "521DA7oBRyj797TNgXJizr8FWhRdzEEhTS9MAqfDYEdEGBSrHcwMUGScT5zMnFpwqdTfX48Dij2zoUhQJb1ySjvr"
    ],
    "script": "base64:BgJACAISCwoJCAgICAgBCAgIEgQKAggIEgMKAQgSAwoBARIDCgEBEgUKAwEICBIDCgEIEgMKAQgSAwoBCBIECgIIAScACXNlcGFyYXRvcgIBXwAIa0F1Y3Rpb24CB2F1Y3Rpb24ABWtTZWxsAgRzZWxsAAhrVHJ1c3RlZAIHdHJ1c3RlZAAGa1ByaWNlAgVwcmljZQEKZ2V0U2xvdEtleQIGcHJlZml4BW5mdElkCQCsAgIJAKwCAgUGcHJlZml4BQlzZXBhcmF0b3IJANgEAQUFbmZ0SWQBC2dldFByaWNlS2V5AQVuZnRJZAkArAICCQCsAgIFBmtQcmljZQUJc2VwYXJhdG9yCQDYBAEFBW5mdElkAQpnZXRTZWxsS2V5AQVuZnRJZAkArAICCQCsAgIFBWtTZWxsBQlzZXBhcmF0b3IJANgEAQUFbmZ0SWQBDWdldEF1Y3Rpb25LZXkBBW5mdElkCQCsAgIJAKwCAgUIa0F1Y3Rpb24FCXNlcGFyYXRvcgkA2AQBBQVuZnRJZAENZ2V0VHJ1c3RlZEtleQEGaXNzdWVyCQCsAgIJAKwCAgUIa1RydXN0ZWQFCXNlcGFyYXRvcgkApQgBBQZpc3N1ZXIBCWFkZFRvTGlzdAIFYWNjdW0JbmV4dFZhbHVlCQDOCAIFBWFjY3VtCQDMCAIFCW5leHRWYWx1ZQUDbmlsAQpqb2luU3RyaW5nAQZwYXJhbXMEBmxlbmd0aAkAkAMBBQZwYXJhbXMDCQAAAgUGbGVuZ3RoAAAJAAIBAg1FbXB0eSAgcGFyYW1zAwkAAAIFBmxlbmd0aAABCQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDEJAQUkZjBfMgIJAQUkZjBfMQIFBSRhY2MwAAAAAQUJc2VwYXJhdG9yAwkAAAIFBmxlbmd0aAACCQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACBQlzZXBhcmF0b3IDCQAAAgUGbGVuZ3RoAAMJALkJAgoAAiRsBQZwYXJhbXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWFkZFRvTGlzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMwkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwUJc2VwYXJhdG9yAwkAAAIFBmxlbmd0aAAECQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDQJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAUJc2VwYXJhdG9yAwkAAAIFBmxlbmd0aAAFCQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFBQlzZXBhcmF0b3IJAAIBAiFNYXggbnVtYmVyIG9mIHBhcmFtZXRlcnMgZXhjZWVkZWQBDnBhcnNlQXNBdWN0aW9uAQdkZXRhaWxzBANyZXMJALUJAgUHZGV0YWlscwUJc2VwYXJhdG9yCQCXCgUJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUDcmVzAAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNyZXMAAQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA3JlcwACCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDcmVzAAMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNyZXMABAELcGFyc2VBc1NlbGwBB2RldGFpbHMEA3JlcwkAtQkCBQdkZXRhaWxzBQlzZXBhcmF0b3IJAJQKAgkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQNyZXMAAAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA3JlcwABAQpqb2luU3RydWN0AQZwYXJhbXMEByRtYXRjaDAFBnBhcmFtcwMJAAECBQckbWF0Y2gwAh4oQWRkcmVzcywgSW50LCBTdHJpbmcsIFN0cmluZykEB2F1Y3Rpb24FByRtYXRjaDAJAQpqb2luU3RyaW5nAQkAzAgCCQClCAEIBQdhdWN0aW9uAl8xCQDMCAIJAKQDAQgFB2F1Y3Rpb24CXzIJAMwIAggFB2F1Y3Rpb24CXzMJAMwIAggFB2F1Y3Rpb24CXzQFA25pbAMJAAECBQckbWF0Y2gwAg4oQWRkcmVzcywgSW50KQQEc2VsbAUHJG1hdGNoMAkBCmpvaW5TdHJpbmcBCQDMCAIJAKUIAQgFBHNlbGwCXzEJAMwIAgkApAMBCAUEc2VsbAJfMgUDbmlsCQACAQITV3JvbmcgcGFyYW1zIHR1cHBsZQEKc2V0QXVjdGlvbgUGc2VsbGVyBW5mdElkCnN0YXJ0UHJpY2UFc3RhcnQDZW5kCQELU3RyaW5nRW50cnkCCQENZ2V0QXVjdGlvbktleQEFBW5mdElkCQEKam9pblN0cnVjdAEJAJYKBAUGc2VsbGVyBQpzdGFydFByaWNlBQVzdGFydAUDZW5kAQdzZXRTZWxsAwVuZnRJZAZjZWxsZXIFcHJpY2UJAQtTdHJpbmdFbnRyeQIJAQpnZXRTZWxsS2V5AQUFbmZ0SWQJAQpqb2luU3RydWN0AQkAlAoCBQZjZWxsZXIFBXByaWNlAQpnZXRBdWN0aW9uAQVuZnRJZAkBBXZhbHVlAQkAnQgCBQR0aGlzCQENZ2V0QXVjdGlvbktleQEFBW5mdElkAQdnZXRTZWxsAQVuZnRJZAkBBXZhbHVlAQkAnQgCBQR0aGlzCQEKZ2V0U2VsbEtleQEFBW5mdElkARhjYWxjUHJpY2VBdEN1cnJlbnRNb21lbnQCB2Fzc2V0SWQGbW9tZW50BAdkZXRhaWxzCQEKZ2V0QXVjdGlvbgEFB2Fzc2V0SWQECyR0MDI3NTUyODU5CQEOcGFyc2VBc0F1Y3Rpb24BBQdkZXRhaWxzBAZzZWxsZXIIBQskdDAyNzU1Mjg1OQJfMQQPc3RhcnRQcmljZVZhbHVlCAULJHQwMjc1NTI4NTkCXzIEDWVuZFByaWNlVmFsdWUIBQskdDAyNzU1Mjg1OQJfMwQQc3RhcnRQZXJpb2RWYWx1ZQgFCyR0MDI3NTUyODU5Al80BA5lbmRQZXJpb2RWYWx1ZQgFCyR0MDI3NTUyODU5Al81AwkAZwIFBm1vbWVudAUOZW5kUGVyaW9kVmFsdWUJAJQKAgUGc2VsbGVyBQ1lbmRQcmljZVZhbHVlBApkZWx0YVByaWNlCQBlAgUPc3RhcnRQcmljZVZhbHVlBQ1lbmRQcmljZVZhbHVlBAZwZXJpb2QJAGUCBQ5lbmRQZXJpb2RWYWx1ZQUQc3RhcnRQZXJpb2RWYWx1ZQQHc3BlbmRlZAkAZQIFBm1vbWVudAUQc3RhcnRQZXJpb2RWYWx1ZQkAlAoCBQZzZWxsZXIJAGUCBQ9zdGFydFByaWNlVmFsdWUJAGsDBQdzcGVuZGVkBQpkZWx0YVByaWNlBQZwZXJpb2QBBWlzTmZ0AQdhc3NldElkBAckbWF0Y2gwCQDsBwEFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIFQXNzZXQEBXRva2VuBQckbWF0Y2gwAwMJAAACCAUFdG9rZW4IZGVjaW1hbHMAAAkAAAIIBQV0b2tlbghxdWFudGl0eQABBwkAAAIIBQV0b2tlbgpyZWlzc3VhYmxlBwcHAQxpc1RydXN0ZWROZnQBB2Fzc2V0SWQEBmlzc3VlcggJAQV2YWx1ZQEJAOwHAQUHYXNzZXRJZAZpc3N1ZXIJAQt2YWx1ZU9yRWxzZQIJAJsIAgUEdGhpcwkBDWdldFRydXN0ZWRLZXkBBQZpc3N1ZXIHAQtpc1NlbGxFeGlzdAEHYXNzZXRJZAkBCWlzRGVmaW5lZAEJAJ0IAgUEdGhpcwkBCmdldFNlbGxLZXkBBQdhc3NldElkAQ5pc0F1Y3Rpb25FeGlzdAEHYXNzZXRJZAkBCWlzRGVmaW5lZAEJAJ0IAgUEdGhpcwkBDWdldEF1Y3Rpb25LZXkBBQdhc3NldElkARJpc0NvcnJlY3RTZWxsUHJpY2UBBXByaWNlCQBmAgUFcHJpY2UAAAEWaXNDb3JyZWN0QXVjdGlvblByaWNlcwIKc3RhcnRQcmljZQhlbmRQcmljZQkAZgIFCnN0YXJ0UHJpY2UFCGVuZFByaWNlAQdpc0FkbWluAQZjYWxsZXIJAAACBQZjYWxsZXIFBHRoaXMBDWlzVmFsaWRDYWxsZXICBmNhbGxlcgZzZWxsZXIDCQAAAgUGY2FsbGVyBQR0aGlzBgkAAAIFBmNhbGxlcgUGc2VsbGVyAQ5pc0F1Y3Rpb25FbmRlZAIDbm93A2VuZAkAZgIFA25vdwUDZW5kAQ1pc0Vub3VnaEZ1bmRzAgdwYXltZW50EmN1cnJlbnRNb21lbnRQcmljZQkAZwIFB3BheW1lbnQFEmN1cnJlbnRNb21lbnRQcmljZQEHaXNXYXdlcwEHYXNzZXRJZAkAAAIFB2Fzc2V0SWQFBHVuaXQBDGlzQ29ycmVjdE5mdAEFbmZ0SWQDCQEBIQEJAQVpc05mdAEFBW5mdElkCQACAQIQVG9rZW4gaXMgbm90IE5mdAMJAQtpc1NlbGxFeGlzdAEFBW5mdElkCQACAQITU2VsbCBhbHJlYWR5IGV4aXN0cwMJAQ5pc0F1Y3Rpb25FeGlzdAEFBW5mdElkCQACAQIWQXVjdGlvbiBhbHJlYWR5IGV4aXN0cwUEdW5pdAERaXNDb3JyZWN0UGF5bWVudHMDDHBheW1lbnRBc3NldA1wYXltZW50QW1vdW50BXByaWNlAwkBASEBCQEHaXNXYXdlcwEFDHBheW1lbnRBc3NldAkAAgECGFBheW1lbnQgbXVzdCBiZSBhdCBXQVZFUwMJAQEhAQkBDWlzRW5vdWdoRnVuZHMCBQ1wYXltZW50QW1vdW50BQVwcmljZQkAAgECEE5vdCBlbm91Z2ggZnVuZHMFBHVuaXQBB2NhbGNGZWUAAAABDmNhbGNUcnVzdGVkRmVlAAAAARJyZXN1bHRGdW5kc0Ftb3VudHMDCWlzVHJ1c3RlZA1wYXltZW50QW1vdW50C2FjdHVhbFByaWNlAwUJaXNUcnVzdGVkCQCUCgIJAGUCBQthY3R1YWxQcmljZQkBDmNhbGNUcnVzdGVkRmVlAAkAZQIFDXBheW1lbnRBbW91bnQFC2FjdHVhbFByaWNlCQCUCgIJAGUCBQthY3R1YWxQcmljZQkBB2NhbGNGZWUACQBlAgUNcGF5bWVudEFtb3VudAULYWN0dWFsUHJpY2UBB2dldFNsb3QBBW5mdElkAwkBC2lzU2VsbEV4aXN0AQUFbmZ0SWQJAJQKAgUFa1NlbGwJAQdnZXRTZWxsAQUFbmZ0SWQDCQEOaXNBdWN0aW9uRXhpc3QBBQVuZnRJZAkAlAoCBQhrQXVjdGlvbgkBCmdldEF1Y3Rpb24BBQVuZnRJZAkAAgECElNsb3QgZG9lc25gdCBleGlzdAAEa0J1eQIDYnV5AAtBU0lNSV9UT0tFTgEgyfO3KK1nQRdNMgY1dCxkhGzviOKkmyfHFOqpH9CNn1QKAWkBCWNyZWF0ZU5mdAkIbmZ0X25hbWUJbmZ0X293bmVyD25mdF9kQXBwQWRkcmVzcwhuZnRfdHlwZQhuZnRfdGFncxFuZnRfc2VsbGluZ19wcmljZQ9uZnRfZGVzY3JpcHRpb24KbmZ0X29uU2VsbAhuZnRfZGF0YQQIbmV3VG9rZW4JAMIIBQUIbmZ0X25hbWUFD25mdF9kZXNjcmlwdGlvbgABAAAHBAdpc3N1ZUlkCQC4CAEFCG5ld1Rva2VuCQDMCAIFCG5ld1Rva2VuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdpc3N1ZUlkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIFT3duZXIJAKUIAQgFAWkGY2FsbGVyCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIIbmZ0X3R5cGUFCG5mdF90eXBlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIIbmZ0X3RhZ3MFCG5mdF90YWdzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIPbmZ0X2RBcHBBZGRyZXNzBQ9uZnRfZEFwcEFkZHJlc3MJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIRbmZ0X3NlbGxpbmdfcHJpY2UFEW5mdF9zZWxsaW5nX3ByaWNlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIKbmZ0X29uU2VsbAUKbmZ0X29uU2VsbAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICCG5mdF9kYXRhBQhuZnRfZGF0YQUDbmlsAWkBCGlzc3VlTmZ0AgRuYW1lBG1ldGEECG5ld1Rva2VuCQDCCAUFBG5hbWUFBG1ldGEAAQAABwQHaXNzdWVJZAkAuAgBBQhuZXdUb2tlbgkAzAgCBQhuZXdUb2tlbgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQUHaXNzdWVJZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICBU93bmVyCQClCAEIBQFpBmNhbGxlcgUDbmlsAWkBBmJ1eU5GVAEFbmZ0SUQEB2Fzc2V0SWQJANkEAQUFbmZ0SUQEBmFtb3VudAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQEB2Ftb3VudDEJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAEGYW1vdW50BAVwcmljZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJAKwCAgkArAICBQZrUHJpY2UFCXNlcGFyYXRvcgUFbmZ0SUQCHlRoZXJlIGlzIG5vIHByaWNlIGZvciB0aGlzIE5GVAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkBEUBleHRyTmF0aXZlKDEwNTgpAQkArAICCQCsAgIFBW5mdElEBQlzZXBhcmF0b3ICBU93bmVyAghObyBvd25lcgMJAQIhPQIICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUEdW5pdAkAAgECDFBheSBpbiB3YXZlcwMJAQIhPQIICQCRAwIIBQFpCHBheW1lbnRzAAEHYXNzZXRJZAULQVNJTUlfVE9LRU4JAAIBAgxQYXkgaW4gQVNJTUkDCQBmAgkBDXBhcnNlSW50VmFsdWUBBQVwcmljZQUGYW1vdW50CQACAQIVSW52YWxpZCBwYXltZW50IFdBVkVTCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdhc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQV2YWx1ZQEJAKYIAQUFb3duZXIJAQ1wYXJzZUludFZhbHVlAQUFcHJpY2UFBHVuaXQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKUIAQgFAWkGY2FsbGVyBQlzZXBhcmF0b3IFBGtCdXkJAKwCAgkArAICBQVuZnRJRAUJc2VwYXJhdG9yCQCkAwEFBmFtb3VudAUDbmlsAWkBB3NlbGxORlQBBXByaWNlBAskdDA3NDExNzQ5NgkAlAoCCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAZ0b2tlbjAIBQskdDA3NDExNzQ5NgJfMQQHYW1vdW50MAgFCyR0MDc0MTE3NDk2Al8yAwkBASEBCQEFaXNOZnQBBQZ0b2tlbjAJAAIBAhBUb2tlbiBpcyBub3QgTkZUCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICBQZrUHJpY2UFCXNlcGFyYXRvcgkA2AQBCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAKQDAQUFcHJpY2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKUIAQgFAWkGY2FsbGVyBQlzZXBhcmF0b3IFBWtTZWxsCQCsAgIJAKwCAgkA2AQBBQZ0b2tlbjAFCXNlcGFyYXRvcgkApAMBBQdhbW91bnQwBQNuaWwBaQEHYWRkU2VsbAEFcHJpY2UEBW5mdElkCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAQxpc0NvcnJlY3ROZnQBBQVuZnRJZAMJAQEhAQkBEmlzQ29ycmVjdFNlbGxQcmljZQEFBXByaWNlCQACAQIRUHJpY2UgbXVzdCBiZSA+IDAJAMwIAgkBB3NldFNlbGwDBQVuZnRJZAgFAWkGY2FsbGVyBQVwcmljZQUDbmlsAWkBCmFkZEF1Y3Rpb24DCnN0YXJ0UHJpY2UFc3RhcnQDZW5kBAVuZnRJZAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCQELdmFsdWVPckVsc2UCCQEMaXNDb3JyZWN0TmZ0AQUFbmZ0SWQJAMwIAgkBCnNldEF1Y3Rpb24FCAUBaQZjYWxsZXIFBW5mdElkBQpzdGFydFByaWNlBQVzdGFydAUDZW5kCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFBW5mdElkBQlzZXBhcmF0b3ICCW5mdF9vd25lcgkApQgBCAUBaQZjYWxsZXIFA25pbAFpAQtidXlGcm9tU2xvdAEFbmZ0SWQECyR0MDg0MTY4NTA1CQCUCgIICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQEDHBheW1lbnRBc3NldAgFCyR0MDg0MTY4NTA1Al8xBA1wYXltZW50QW1vdW50CAULJHQwODQxNjg1MDUCXzIEB2Fzc2V0SWQJANkEAQUFbmZ0SWQECyR0MDg1NDk4NTg3CQEHZ2V0U2xvdAEFB2Fzc2V0SWQEBHR5cGUIBQskdDA4NTQ5ODU4NwJfMQQHZGV0YWlscwgFCyR0MDg1NDk4NTg3Al8yBAdiYXNlUmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdhc3NldElkCQDMCAIJAQtEZWxldGVFbnRyeQEJAQpnZXRTbG90S2V5AgUEdHlwZQUHYXNzZXRJZAUDbmlsAwkAAAIFBHR5cGUFBWtTZWxsBAskdDA4NzI5ODc3NgkBC3BhcnNlQXNTZWxsAQUHZGV0YWlscwQGc2VsbGVyCAULJHQwODcyOTg3NzYCXzEECnByaWNlVmFsdWUIBQskdDA4NzI5ODc3NgJfMgkBC3ZhbHVlT3JFbHNlAgkBEWlzQ29ycmVjdFBheW1lbnRzAwUMcGF5bWVudEFzc2V0BQ1wYXltZW50QW1vdW50BQpwcmljZVZhbHVlBAskdDA4ODYxODk2MwkBEnJlc3VsdEZ1bmRzQW1vdW50cwMJAQxpc1RydXN0ZWROZnQBBQdhc3NldElkBQ1wYXltZW50QW1vdW50BQpwcmljZVZhbHVlBAxzZWxsZXJBbW91bnQIBQskdDA4ODYxODk2MwJfMQQLYnV5ZXJBbW91bnQIBQskdDA4ODYxODk2MwJfMgQKdXBkYXRlZFJlcwkAzggCBQdiYXNlUmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBnNlbGxlcgUMc2VsbGVyQW1vdW50BQR1bml0BQNuaWwDCQBmAgULYnV5ZXJBbW91bnQAAAkAzggCBQp1cGRhdGVkUmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgULYnV5ZXJBbW91bnQFBHVuaXQFA25pbAUKdXBkYXRlZFJlcwQLJHQwOTE4MDkyNDkJARhjYWxjUHJpY2VBdEN1cnJlbnRNb21lbnQCBQdhc3NldElkBQZoZWlnaHQEBnNlbGxlcggFCyR0MDkxODA5MjQ5Al8xBAthY3R1YWxQcmljZQgFCyR0MDkxODA5MjQ5Al8yCQELdmFsdWVPckVsc2UCCQERaXNDb3JyZWN0UGF5bWVudHMDBQxwYXltZW50QXNzZXQFDXBheW1lbnRBbW91bnQFC2FjdHVhbFByaWNlBAskdDA5MzM1OTQzOAkBEnJlc3VsdEZ1bmRzQW1vdW50cwMJAQxpc1RydXN0ZWROZnQBBQdhc3NldElkBQ1wYXltZW50QW1vdW50BQthY3R1YWxQcmljZQQMc2VsbGVyQW1vdW50CAULJHQwOTMzNTk0MzgCXzEEC2J1eWVyQW1vdW50CAULJHQwOTMzNTk0MzgCXzIECnVwZGF0ZWRSZXMJAM4IAgUHYmFzZVJlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQZzZWxsZXIFDHNlbGxlckFtb3VudAUEdW5pdAUDbmlsAwkAZgIFC2J1eWVyQW1vdW50AAAJAM4IAgUKdXBkYXRlZFJlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFC2J1eWVyQW1vdW50BQR1bml0BQNuaWwFCnVwZGF0ZWRSZXMBaQELZGVjbGluZVNsb3QBBW5mdElkBAdhc3NldElkCQDZBAEFBW5mdElkBAskdDA5NzM5OTc3NwkBB2dldFNsb3QBBQdhc3NldElkBAR0eXBlCAULJHQwOTczOTk3NzcCXzEEB2RldGFpbHMIBQskdDA5NzM5OTc3NwJfMgQHYmFzZVJlcwkAzAgCCQELRGVsZXRlRW50cnkBCQEKZ2V0U2xvdEtleQIFBHR5cGUFB2Fzc2V0SWQFA25pbAMJAAACBQR0eXBlBQVrU2VsbAQLJHQwOTg2OTk5MTYJAQtwYXJzZUFzU2VsbAEFB2RldGFpbHMEBnNlbGxlcggFCyR0MDk4Njk5OTE2Al8xBApwcmljZVZhbHVlCAULJHQwOTg2OTk5MTYCXzIDCQEBIQEJAQ1pc1ZhbGlkQ2FsbGVyAggFAWkGY2FsbGVyBQZzZWxsZXIJAAIBAg5JbnZhbGlkIGNhbGxlcgkAzggCBQdiYXNlUmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBnNlbGxlcgABBQdhc3NldElkBQNuaWwEDSR0MDEwMDYxMTAxNjUJAQ5wYXJzZUFzQXVjdGlvbgEFB2RldGFpbHMEBnNlbGxlcggFDSR0MDEwMDYxMTAxNjUCXzEED3N0YXJ0UHJpY2VWYWx1ZQgFDSR0MDEwMDYxMTAxNjUCXzIEDWVuZFByaWNlVmFsdWUIBQ0kdDAxMDA2MTEwMTY1Al8zBBBzdGFydFBlcmlvZFZhbHVlCAUNJHQwMTAwNjExMDE2NQJfNAQOZW5kUGVyaW9kVmFsdWUIBQ0kdDAxMDA2MTEwMTY1Al81AwkBASEBCQENaXNWYWxpZENhbGxlcgIIBQFpBmNhbGxlcgUGc2VsbGVyCQACAQIOSW52YWxpZCBjYWxsZXIDCQEBIQEJAQ5pc0F1Y3Rpb25FbmRlZAIFBmhlaWdodAUOZW5kUGVyaW9kVmFsdWUJAAIBAhdXYWl0IGZvciBlbmQgb2YgYXVjdGlvbgkAzggCBQdiYXNlUmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBnNlbGxlcgABBQdhc3NldElkBQNuaWwBaQEQc2V0VHJ1c3RlZElzc3VlcgELdHJ1c3RlZEFkZHIDCQEBIQEJAQdpc0FkbWluAQgFAWkGY2FsbGVyCQACAQIKT25seSBhZG1pbgkAzAgCCQEMQm9vbGVhbkVudHJ5AgkBDWdldFRydXN0ZWRLZXkBCQERQGV4dHJOYXRpdmUoMTA2MikBBQt0cnVzdGVkQWRkcgYFA25pbAFpARdnZXRQcmljZUF0Q3VycmVudE1vbWVudAIFbmZ0SWQGbW9tZW50BAdhc3NldElkCQDZBAEFBW5mdElkBA0kdDAxMDcwNjEwNzY5CQEYY2FsY1ByaWNlQXRDdXJyZW50TW9tZW50AgUHYXNzZXRJZAUGbW9tZW50BAZzZWxsZXIIBQ0kdDAxMDcwNjEwNzY5Al8xBAVwcmljZQgFDSR0MDEwNzA2MTA3NjkCXzIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQtnZXRQcmljZUtleQEFB2Fzc2V0SWQFBXByaWNlBQNuaWwAT06XRQ==",
    "height": 2338050,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: CES7DBx3A2z1LWiT7nAZae1MLsstDkiPCuPiWyAXzsD5
Next: 5eVcrvHAFRFm2QWyqGCiNrTpknVMpbxjxUQjWydaFn5V

Diff: 
Old
New
Differences
248
248
 
249
249
 
let kBuy = "buy"
250
250
 
251
+
let ASIMI_TOKEN = base58'EbLVSrAi6vS3AkLwBinzZCvAXP2yYiFJEzj1MBVHcwZ5'
252
+
251
253
 
@Callable(i)
252
254
 
func createNft (nft_name,nft_owner,nft_dAppAddress,nft_type,nft_tags,nft_selling_price,nft_description,nft_onSell,nft_data) = {
253
255
 
    let newToken = Issue(nft_name, nft_description, 1, 0, false)
270
272
 
func buyNFT (nftID) = {
271
273
 
    let assetId = fromBase58String(nftID)
272
274
 
    let amount = value(i.payments[0].amount)
275
+
    let amount1 = value(i.payments[1].amount)
273
276
 
    let price = valueOrErrorMessage(getString(((kPrice + separator) + nftID)), "There is no price for this NFT")
274
277
 
    let owner = valueOrErrorMessage(getStringValue(((nftID + separator) + "Owner")), "No owner")
275
278
 
    if ((i.payments[0].assetId != unit))
276
279
 
        then throw("Pay in waves")
277
-
        else if ((parseIntValue(price) > amount))
278
-
            then throw("Invalid payment")
279
-
            else [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(value(addressFromString(owner)), parseIntValue(price), unit), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount)))]
280
+
        else if ((i.payments[1].assetId != ASIMI_TOKEN))
281
+
            then throw("Pay in ASIMI")
282
+
            else if ((parseIntValue(price) > amount))
283
+
                then throw("Invalid payment WAVES")
284
+
                else [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(value(addressFromString(owner)), parseIntValue(price), unit), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount)))]
280
285
 
    }
281
286
 
282
287
 
283
288
 
284
289
 
@Callable(i)
285
290
 
func sellNFT (price) = {
286
-
    let $t072147299 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
287
-
    let token0 = $t072147299._1
288
-
    let amount0 = $t072147299._2
291
+
    let $t074117496 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
292
+
    let token0 = $t074117496._1
293
+
    let amount0 = $t074117496._2
289
294
 
    if (!(isNft(token0)))
290
295
 
        then throw("Token is not NFT")
291
296
 
        else [StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), toString(price)), StringEntry(((toString(i.caller) + separator) + kSell), ((toBase58String(token0) + separator) + toString(amount0)))]
313
318
 
314
319
 
@Callable(i)
315
320
 
func buyFromSlot (nftId) = {
316
-
    let $t082198308 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
317
-
    let paymentAsset = $t082198308._1
318
-
    let paymentAmount = $t082198308._2
321
+
    let $t084168505 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
322
+
    let paymentAsset = $t084168505._1
323
+
    let paymentAmount = $t084168505._2
319
324
 
    let assetId = fromBase58String(nftId)
320
-
    let $t083528390 = getSlot(assetId)
321
-
    let type = $t083528390._1
322
-
    let details = $t083528390._2
325
+
    let $t085498587 = getSlot(assetId)
326
+
    let type = $t085498587._1
327
+
    let details = $t085498587._2
323
328
 
    let baseRes = [ScriptTransfer(i.caller, 1, assetId), DeleteEntry(getSlotKey(type, assetId))]
324
329
 
    if ((type == kSell))
325
330
 
        then {
326
-
            let $t085328579 = parseAsSell(details)
327
-
            let seller = $t085328579._1
328
-
            let priceValue = $t085328579._2
331
+
            let $t087298776 = parseAsSell(details)
332
+
            let seller = $t087298776._1
333
+
            let priceValue = $t087298776._2
329
334
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, priceValue), {
330
-
                let $t086648766 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
331
-
                let sellerAmount = $t086648766._1
332
-
                let buyerAmount = $t086648766._2
335
+
                let $t088618963 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
336
+
                let sellerAmount = $t088618963._1
337
+
                let buyerAmount = $t088618963._2
333
338
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
334
339
 
                if ((buyerAmount > 0))
335
340
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
337
342
 
                })
338
343
 
            }
339
344
 
        else {
340
-
            let $t089839052 = calcPriceAtCurrentMoment(assetId, height)
341
-
            let seller = $t089839052._1
342
-
            let actualPrice = $t089839052._2
345
+
            let $t091809249 = calcPriceAtCurrentMoment(assetId, height)
346
+
            let seller = $t091809249._1
347
+
            let actualPrice = $t091809249._2
343
348
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, actualPrice), {
344
-
                let $t091389241 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
345
-
                let sellerAmount = $t091389241._1
346
-
                let buyerAmount = $t091389241._2
349
+
                let $t093359438 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
350
+
                let sellerAmount = $t093359438._1
351
+
                let buyerAmount = $t093359438._2
347
352
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
348
353
 
                if ((buyerAmount > 0))
349
354
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
357
362
 
@Callable(i)
358
363
 
func declineSlot (nftId) = {
359
364
 
    let assetId = fromBase58String(nftId)
360
-
    let $t095429580 = getSlot(assetId)
361
-
    let type = $t095429580._1
362
-
    let details = $t095429580._2
365
+
    let $t097399777 = getSlot(assetId)
366
+
    let type = $t097399777._1
367
+
    let details = $t097399777._2
363
368
 
    let baseRes = [DeleteEntry(getSlotKey(type, assetId))]
364
369
 
    if ((type == kSell))
365
370
 
        then {
366
-
            let $t096729719 = parseAsSell(details)
367
-
            let seller = $t096729719._1
368
-
            let priceValue = $t096729719._2
371
+
            let $t098699916 = parseAsSell(details)
372
+
            let seller = $t098699916._1
373
+
            let priceValue = $t098699916._2
369
374
 
            if (!(isValidCaller(i.caller, seller)))
370
375
 
                then throw("Invalid caller")
371
376
 
                else (baseRes ++ [ScriptTransfer(seller, 1, assetId)])
372
377
 
            }
373
378
 
        else {
374
-
            let $t098649968 = parseAsAuction(details)
375
-
            let seller = $t098649968._1
376
-
            let startPriceValue = $t098649968._2
377
-
            let endPriceValue = $t098649968._3
378
-
            let startPeriodValue = $t098649968._4
379
-
            let endPeriodValue = $t098649968._5
379
+
            let $t01006110165 = parseAsAuction(details)
380
+
            let seller = $t01006110165._1
381
+
            let startPriceValue = $t01006110165._2
382
+
            let endPriceValue = $t01006110165._3
383
+
            let startPeriodValue = $t01006110165._4
384
+
            let endPeriodValue = $t01006110165._5
380
385
 
            if (!(isValidCaller(i.caller, seller)))
381
386
 
                then throw("Invalid caller")
382
387
 
                else if (!(isAuctionEnded(height, endPeriodValue)))
397
402
 
@Callable(i)
398
403
 
func getPriceAtCurrentMoment (nftId,moment) = {
399
404
 
    let assetId = fromBase58String(nftId)
400
-
    let $t01050910572 = calcPriceAtCurrentMoment(assetId, moment)
401
-
    let seller = $t01050910572._1
402
-
    let price = $t01050910572._2
405
+
    let $t01070610769 = calcPriceAtCurrentMoment(assetId, moment)
406
+
    let seller = $t01070610769._1
407
+
    let price = $t01070610769._2
403
408
 
[IntegerEntry(getPriceKey(assetId), price)]
404
409
 
    }
405
410
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 6 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let separator = "_"
5
5
 
6
6
 
let kAuction = "auction"
7
7
 
8
8
 
let kSell = "sell"
9
9
 
10
10
 
let kTrusted = "trusted"
11
11
 
12
12
 
let kPrice = "price"
13
13
 
14
14
 
func getSlotKey (prefix,nftId) = ((prefix + separator) + toBase58String(nftId))
15
15
 
16
16
 
17
17
 
func getPriceKey (nftId) = ((kPrice + separator) + toBase58String(nftId))
18
18
 
19
19
 
20
20
 
func getSellKey (nftId) = ((kSell + separator) + toBase58String(nftId))
21
21
 
22
22
 
23
23
 
func getAuctionKey (nftId) = ((kAuction + separator) + toBase58String(nftId))
24
24
 
25
25
 
26
26
 
func getTrustedKey (issuer) = ((kTrusted + separator) + toString(issuer))
27
27
 
28
28
 
29
29
 
func addToList (accum,nextValue) = (accum ++ [nextValue])
30
30
 
31
31
 
32
32
 
func joinString (params) = {
33
33
 
    let length = size(params)
34
34
 
    if ((length == 0))
35
35
 
        then throw("Empty  params")
36
36
 
        else if ((length == 1))
37
37
 
            then makeString({
38
38
 
                let $l = params
39
39
 
                let $s = size($l)
40
40
 
                let $acc0 = nil
41
41
 
                func $f0_1 ($a,$i) =                 if (($i >= $s))
42
42
 
                    then $a
43
43
 
                    else addToList($a, $l[$i])
44
44
 
45
45
 
                func $f0_2 ($a,$i) =                 if (($i >= $s))
46
46
 
                    then $a
47
47
 
                    else throw("List size exceeds 1")
48
48
 
49
49
 
                $f0_2($f0_1($acc0, 0), 1)
50
50
 
                }, separator)
51
51
 
            else if ((length == 2))
52
52
 
                then makeString({
53
53
 
                    let $l = params
54
54
 
                    let $s = size($l)
55
55
 
                    let $acc0 = nil
56
56
 
                    func $f0_1 ($a,$i) =                     if (($i >= $s))
57
57
 
                        then $a
58
58
 
                        else addToList($a, $l[$i])
59
59
 
60
60
 
                    func $f0_2 ($a,$i) =                     if (($i >= $s))
61
61
 
                        then $a
62
62
 
                        else throw("List size exceeds 2")
63
63
 
64
64
 
                    $f0_2($f0_1($f0_1($acc0, 0), 1), 2)
65
65
 
                    }, separator)
66
66
 
                else if ((length == 3))
67
67
 
                    then makeString({
68
68
 
                        let $l = params
69
69
 
                        let $s = size($l)
70
70
 
                        let $acc0 = nil
71
71
 
                        func $f0_1 ($a,$i) =                         if (($i >= $s))
72
72
 
                            then $a
73
73
 
                            else addToList($a, $l[$i])
74
74
 
75
75
 
                        func $f0_2 ($a,$i) =                         if (($i >= $s))
76
76
 
                            then $a
77
77
 
                            else throw("List size exceeds 3")
78
78
 
79
79
 
                        $f0_2($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3)
80
80
 
                        }, separator)
81
81
 
                    else if ((length == 4))
82
82
 
                        then makeString({
83
83
 
                            let $l = params
84
84
 
                            let $s = size($l)
85
85
 
                            let $acc0 = nil
86
86
 
                            func $f0_1 ($a,$i) =                             if (($i >= $s))
87
87
 
                                then $a
88
88
 
                                else addToList($a, $l[$i])
89
89
 
90
90
 
                            func $f0_2 ($a,$i) =                             if (($i >= $s))
91
91
 
                                then $a
92
92
 
                                else throw("List size exceeds 4")
93
93
 
94
94
 
                            $f0_2($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4)
95
95
 
                            }, separator)
96
96
 
                        else if ((length == 5))
97
97
 
                            then makeString({
98
98
 
                                let $l = params
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 addToList($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 5")
108
108
 
109
109
 
                                $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5)
110
110
 
                                }, separator)
111
111
 
                            else throw("Max number of parameters exceeded")
112
112
 
    }
113
113
 
114
114
 
115
115
 
func parseAsAuction (details) = {
116
116
 
    let res = split(details, separator)
117
117
 
    $Tuple5(addressFromStringValue(res[0]), parseIntValue(res[1]), parseIntValue(res[2]), parseIntValue(res[3]), parseIntValue(res[4]))
118
118
 
    }
119
119
 
120
120
 
121
121
 
func parseAsSell (details) = {
122
122
 
    let res = split(details, separator)
123
123
 
    $Tuple2(addressFromStringValue(res[0]), parseIntValue(res[1]))
124
124
 
    }
125
125
 
126
126
 
127
127
 
func joinStruct (params) = match params {
128
128
 
    case auction: (Address, Int, String, String) => 
129
129
 
        joinString([toString(auction._1), toString(auction._2), auction._3, auction._4])
130
130
 
    case sell: (Address, Int) => 
131
131
 
        joinString([toString(sell._1), toString(sell._2)])
132
132
 
    case _ => 
133
133
 
        throw("Wrong params tupple")
134
134
 
}
135
135
 
136
136
 
137
137
 
func setAuction (seller,nftId,startPrice,start,end) = StringEntry(getAuctionKey(nftId), joinStruct($Tuple4(seller, startPrice, start, end)))
138
138
 
139
139
 
140
140
 
func setSell (nftId,celler,price) = StringEntry(getSellKey(nftId), joinStruct($Tuple2(celler, price)))
141
141
 
142
142
 
143
143
 
func getAuction (nftId) = value(getString(this, getAuctionKey(nftId)))
144
144
 
145
145
 
146
146
 
func getSell (nftId) = value(getString(this, getSellKey(nftId)))
147
147
 
148
148
 
149
149
 
func calcPriceAtCurrentMoment (assetId,moment) = {
150
150
 
    let details = getAuction(assetId)
151
151
 
    let $t027552859 = parseAsAuction(details)
152
152
 
    let seller = $t027552859._1
153
153
 
    let startPriceValue = $t027552859._2
154
154
 
    let endPriceValue = $t027552859._3
155
155
 
    let startPeriodValue = $t027552859._4
156
156
 
    let endPeriodValue = $t027552859._5
157
157
 
    if ((moment >= endPeriodValue))
158
158
 
        then $Tuple2(seller, endPriceValue)
159
159
 
        else {
160
160
 
            let deltaPrice = (startPriceValue - endPriceValue)
161
161
 
            let period = (endPeriodValue - startPeriodValue)
162
162
 
            let spended = (moment - startPeriodValue)
163
163
 
            $Tuple2(seller, (startPriceValue - fraction(spended, deltaPrice, period)))
164
164
 
            }
165
165
 
    }
166
166
 
167
167
 
168
168
 
func isNft (assetId) = match assetInfo(assetId) {
169
169
 
    case token: Asset => 
170
170
 
        if (if ((token.decimals == 0))
171
171
 
            then (token.quantity == 1)
172
172
 
            else false)
173
173
 
            then (token.reissuable == false)
174
174
 
            else false
175
175
 
    case _ => 
176
176
 
        false
177
177
 
}
178
178
 
179
179
 
180
180
 
func isTrustedNft (assetId) = {
181
181
 
    let issuer = value(assetInfo(assetId)).issuer
182
182
 
    valueOrElse(getBoolean(this, getTrustedKey(issuer)), false)
183
183
 
    }
184
184
 
185
185
 
186
186
 
func isSellExist (assetId) = isDefined(getString(this, getSellKey(assetId)))
187
187
 
188
188
 
189
189
 
func isAuctionExist (assetId) = isDefined(getString(this, getAuctionKey(assetId)))
190
190
 
191
191
 
192
192
 
func isCorrectSellPrice (price) = (price > 0)
193
193
 
194
194
 
195
195
 
func isCorrectAuctionPrices (startPrice,endPrice) = (startPrice > endPrice)
196
196
 
197
197
 
198
198
 
func isAdmin (caller) = (caller == this)
199
199
 
200
200
 
201
201
 
func isValidCaller (caller,seller) = if ((caller == this))
202
202
 
    then true
203
203
 
    else (caller == seller)
204
204
 
205
205
 
206
206
 
func isAuctionEnded (now,end) = (now > end)
207
207
 
208
208
 
209
209
 
func isEnoughFunds (payment,currentMomentPrice) = (payment >= currentMomentPrice)
210
210
 
211
211
 
212
212
 
func isWawes (assetId) = (assetId == unit)
213
213
 
214
214
 
215
215
 
func isCorrectNft (nftId) = if (!(isNft(nftId)))
216
216
 
    then throw("Token is not Nft")
217
217
 
    else if (isSellExist(nftId))
218
218
 
        then throw("Sell already exists")
219
219
 
        else if (isAuctionExist(nftId))
220
220
 
            then throw("Auction already exists")
221
221
 
            else unit
222
222
 
223
223
 
224
224
 
func isCorrectPayments (paymentAsset,paymentAmount,price) = if (!(isWawes(paymentAsset)))
225
225
 
    then throw("Payment must be at WAVES")
226
226
 
    else if (!(isEnoughFunds(paymentAmount, price)))
227
227
 
        then throw("Not enough funds")
228
228
 
        else unit
229
229
 
230
230
 
231
231
 
func calcFee () = 0
232
232
 
233
233
 
234
234
 
func calcTrustedFee () = 0
235
235
 
236
236
 
237
237
 
func resultFundsAmounts (isTrusted,paymentAmount,actualPrice) = if (isTrusted)
238
238
 
    then $Tuple2((actualPrice - calcTrustedFee()), (paymentAmount - actualPrice))
239
239
 
    else $Tuple2((actualPrice - calcFee()), (paymentAmount - actualPrice))
240
240
 
241
241
 
242
242
 
func getSlot (nftId) = if (isSellExist(nftId))
243
243
 
    then $Tuple2(kSell, getSell(nftId))
244
244
 
    else if (isAuctionExist(nftId))
245
245
 
        then $Tuple2(kAuction, getAuction(nftId))
246
246
 
        else throw("Slot doesn`t exist")
247
247
 
248
248
 
249
249
 
let kBuy = "buy"
250
250
 
251
+
let ASIMI_TOKEN = base58'EbLVSrAi6vS3AkLwBinzZCvAXP2yYiFJEzj1MBVHcwZ5'
252
+
251
253
 
@Callable(i)
252
254
 
func createNft (nft_name,nft_owner,nft_dAppAddress,nft_type,nft_tags,nft_selling_price,nft_description,nft_onSell,nft_data) = {
253
255
 
    let newToken = Issue(nft_name, nft_description, 1, 0, false)
254
256
 
    let issueId = calculateAssetId(newToken)
255
257
 
[newToken, ScriptTransfer(i.caller, 1, issueId), StringEntry(((toBase58String(issueId) + separator) + "Owner"), toString(i.caller)), StringEntry(((toBase58String(issueId) + separator) + "nft_type"), nft_type), StringEntry(((toBase58String(issueId) + separator) + "nft_tags"), nft_tags), StringEntry(((toBase58String(issueId) + separator) + "nft_dAppAddress"), nft_dAppAddress), IntegerEntry(((toBase58String(issueId) + separator) + "nft_selling_price"), nft_selling_price), StringEntry(((toBase58String(issueId) + separator) + "nft_onSell"), nft_onSell), StringEntry(((toBase58String(issueId) + separator) + "nft_data"), nft_data)]
256
258
 
    }
257
259
 
258
260
 
259
261
 
260
262
 
@Callable(i)
261
263
 
func issueNft (name,meta) = {
262
264
 
    let newToken = Issue(name, meta, 1, 0, false)
263
265
 
    let issueId = calculateAssetId(newToken)
264
266
 
[newToken, ScriptTransfer(i.caller, 1, issueId), StringEntry(((toBase58String(issueId) + separator) + "Owner"), toString(i.caller))]
265
267
 
    }
266
268
 
267
269
 
268
270
 
269
271
 
@Callable(i)
270
272
 
func buyNFT (nftID) = {
271
273
 
    let assetId = fromBase58String(nftID)
272
274
 
    let amount = value(i.payments[0].amount)
275
+
    let amount1 = value(i.payments[1].amount)
273
276
 
    let price = valueOrErrorMessage(getString(((kPrice + separator) + nftID)), "There is no price for this NFT")
274
277
 
    let owner = valueOrErrorMessage(getStringValue(((nftID + separator) + "Owner")), "No owner")
275
278
 
    if ((i.payments[0].assetId != unit))
276
279
 
        then throw("Pay in waves")
277
-
        else if ((parseIntValue(price) > amount))
278
-
            then throw("Invalid payment")
279
-
            else [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(value(addressFromString(owner)), parseIntValue(price), unit), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount)))]
280
+
        else if ((i.payments[1].assetId != ASIMI_TOKEN))
281
+
            then throw("Pay in ASIMI")
282
+
            else if ((parseIntValue(price) > amount))
283
+
                then throw("Invalid payment WAVES")
284
+
                else [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(value(addressFromString(owner)), parseIntValue(price), unit), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount)))]
280
285
 
    }
281
286
 
282
287
 
283
288
 
284
289
 
@Callable(i)
285
290
 
func sellNFT (price) = {
286
-
    let $t072147299 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
287
-
    let token0 = $t072147299._1
288
-
    let amount0 = $t072147299._2
291
+
    let $t074117496 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
292
+
    let token0 = $t074117496._1
293
+
    let amount0 = $t074117496._2
289
294
 
    if (!(isNft(token0)))
290
295
 
        then throw("Token is not NFT")
291
296
 
        else [StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), toString(price)), StringEntry(((toString(i.caller) + separator) + kSell), ((toBase58String(token0) + separator) + toString(amount0)))]
292
297
 
    }
293
298
 
294
299
 
295
300
 
296
301
 
@Callable(i)
297
302
 
func addSell (price) = {
298
303
 
    let nftId = value(i.payments[0].assetId)
299
304
 
    valueOrElse(isCorrectNft(nftId), if (!(isCorrectSellPrice(price)))
300
305
 
        then throw("Price must be > 0")
301
306
 
        else [setSell(nftId, i.caller, price)])
302
307
 
    }
303
308
 
304
309
 
305
310
 
306
311
 
@Callable(i)
307
312
 
func addAuction (startPrice,start,end) = {
308
313
 
    let nftId = value(i.payments[0].assetId)
309
314
 
    valueOrElse(isCorrectNft(nftId), [setAuction(i.caller, nftId, startPrice, start, end), StringEntry(((toBase58String(nftId) + separator) + "nft_owner"), toString(i.caller))])
310
315
 
    }
311
316
 
312
317
 
313
318
 
314
319
 
@Callable(i)
315
320
 
func buyFromSlot (nftId) = {
316
-
    let $t082198308 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
317
-
    let paymentAsset = $t082198308._1
318
-
    let paymentAmount = $t082198308._2
321
+
    let $t084168505 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
322
+
    let paymentAsset = $t084168505._1
323
+
    let paymentAmount = $t084168505._2
319
324
 
    let assetId = fromBase58String(nftId)
320
-
    let $t083528390 = getSlot(assetId)
321
-
    let type = $t083528390._1
322
-
    let details = $t083528390._2
325
+
    let $t085498587 = getSlot(assetId)
326
+
    let type = $t085498587._1
327
+
    let details = $t085498587._2
323
328
 
    let baseRes = [ScriptTransfer(i.caller, 1, assetId), DeleteEntry(getSlotKey(type, assetId))]
324
329
 
    if ((type == kSell))
325
330
 
        then {
326
-
            let $t085328579 = parseAsSell(details)
327
-
            let seller = $t085328579._1
328
-
            let priceValue = $t085328579._2
331
+
            let $t087298776 = parseAsSell(details)
332
+
            let seller = $t087298776._1
333
+
            let priceValue = $t087298776._2
329
334
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, priceValue), {
330
-
                let $t086648766 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
331
-
                let sellerAmount = $t086648766._1
332
-
                let buyerAmount = $t086648766._2
335
+
                let $t088618963 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
336
+
                let sellerAmount = $t088618963._1
337
+
                let buyerAmount = $t088618963._2
333
338
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
334
339
 
                if ((buyerAmount > 0))
335
340
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
336
341
 
                    else updatedRes
337
342
 
                })
338
343
 
            }
339
344
 
        else {
340
-
            let $t089839052 = calcPriceAtCurrentMoment(assetId, height)
341
-
            let seller = $t089839052._1
342
-
            let actualPrice = $t089839052._2
345
+
            let $t091809249 = calcPriceAtCurrentMoment(assetId, height)
346
+
            let seller = $t091809249._1
347
+
            let actualPrice = $t091809249._2
343
348
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, actualPrice), {
344
-
                let $t091389241 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
345
-
                let sellerAmount = $t091389241._1
346
-
                let buyerAmount = $t091389241._2
349
+
                let $t093359438 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
350
+
                let sellerAmount = $t093359438._1
351
+
                let buyerAmount = $t093359438._2
347
352
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
348
353
 
                if ((buyerAmount > 0))
349
354
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
350
355
 
                    else updatedRes
351
356
 
                })
352
357
 
            }
353
358
 
    }
354
359
 
355
360
 
356
361
 
357
362
 
@Callable(i)
358
363
 
func declineSlot (nftId) = {
359
364
 
    let assetId = fromBase58String(nftId)
360
-
    let $t095429580 = getSlot(assetId)
361
-
    let type = $t095429580._1
362
-
    let details = $t095429580._2
365
+
    let $t097399777 = getSlot(assetId)
366
+
    let type = $t097399777._1
367
+
    let details = $t097399777._2
363
368
 
    let baseRes = [DeleteEntry(getSlotKey(type, assetId))]
364
369
 
    if ((type == kSell))
365
370
 
        then {
366
-
            let $t096729719 = parseAsSell(details)
367
-
            let seller = $t096729719._1
368
-
            let priceValue = $t096729719._2
371
+
            let $t098699916 = parseAsSell(details)
372
+
            let seller = $t098699916._1
373
+
            let priceValue = $t098699916._2
369
374
 
            if (!(isValidCaller(i.caller, seller)))
370
375
 
                then throw("Invalid caller")
371
376
 
                else (baseRes ++ [ScriptTransfer(seller, 1, assetId)])
372
377
 
            }
373
378
 
        else {
374
-
            let $t098649968 = parseAsAuction(details)
375
-
            let seller = $t098649968._1
376
-
            let startPriceValue = $t098649968._2
377
-
            let endPriceValue = $t098649968._3
378
-
            let startPeriodValue = $t098649968._4
379
-
            let endPeriodValue = $t098649968._5
379
+
            let $t01006110165 = parseAsAuction(details)
380
+
            let seller = $t01006110165._1
381
+
            let startPriceValue = $t01006110165._2
382
+
            let endPriceValue = $t01006110165._3
383
+
            let startPeriodValue = $t01006110165._4
384
+
            let endPeriodValue = $t01006110165._5
380
385
 
            if (!(isValidCaller(i.caller, seller)))
381
386
 
                then throw("Invalid caller")
382
387
 
                else if (!(isAuctionEnded(height, endPeriodValue)))
383
388
 
                    then throw("Wait for end of auction")
384
389
 
                    else (baseRes ++ [ScriptTransfer(seller, 1, assetId)])
385
390
 
            }
386
391
 
    }
387
392
 
388
393
 
389
394
 
390
395
 
@Callable(i)
391
396
 
func setTrustedIssuer (trustedAddr) = if (!(isAdmin(i.caller)))
392
397
 
    then throw("Only admin")
393
398
 
    else [BooleanEntry(getTrustedKey(addressFromStringValue(trustedAddr)), true)]
394
399
 
395
400
 
396
401
 
397
402
 
@Callable(i)
398
403
 
func getPriceAtCurrentMoment (nftId,moment) = {
399
404
 
    let assetId = fromBase58String(nftId)
400
-
    let $t01050910572 = calcPriceAtCurrentMoment(assetId, moment)
401
-
    let seller = $t01050910572._1
402
-
    let price = $t01050910572._2
405
+
    let $t01070610769 = calcPriceAtCurrentMoment(assetId, moment)
406
+
    let seller = $t01070610769._1
407
+
    let price = $t01070610769._2
403
408
 
[IntegerEntry(getPriceKey(assetId), price)]
404
409
 
    }
405
410
 
406
411
 

github/deemru/w8io/026f985 
63.78 ms ◑