w8 · tx · 5nJ···rUY

tx · 5nJ9FgoQV5Aoi6igAdMW4Q2mpjy2BfEBNTZ8n42EnrUY

3N85YW6NZ9pLYvSdt1ASMQTGxvncnU1vUNx:  -0.01000000 Waves

2022.11.30 16:10 [2339884] smart account 3N85YW6NZ9pLYvSdt1ASMQTGxvncnU1vUNx > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "5nJ9FgoQV5Aoi6igAdMW4Q2mpjy2BfEBNTZ8n42EnrUY",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1669813850940,
    "version": 2,
    "chainId": 84,
    "sender": "3N85YW6NZ9pLYvSdt1ASMQTGxvncnU1vUNx",
    "senderPublicKey": "EKZmHJ5bK3qKKgRdq8rAamt9qrDbVMLARzRqXoQW258v",
    "proofs": [
        "1Rgv8kqwyVVDM7Ba8awzGjnJWsHwDnwe9ohPWGBVdFboeDGys5a9uFfLh8bSzuFyFWVRthg9GV5oYWjmqpBxyPL"
    ],
    "script": "base64:BgJACAISCwoJCAgICAgBCAgIEgQKAggIEgMKAQgSAwoBARIDCgEBEgUKAwEICBIDCgEIEgMKAQgSAwoBCBIECgIIASYACXNlcGFyYXRvcgIBXwAIa0F1Y3Rpb24CB2F1Y3Rpb24ABWtTZWxsAgRzZWxsAAhrVHJ1c3RlZAIHdHJ1c3RlZAAGa1ByaWNlAgVwcmljZQEKZ2V0U2xvdEtleQIGcHJlZml4BW5mdElkCQCsAgIJAKwCAgUGcHJlZml4BQlzZXBhcmF0b3IJANgEAQUFbmZ0SWQBC2dldFByaWNlS2V5AQVuZnRJZAkArAICCQCsAgIFBmtQcmljZQUJc2VwYXJhdG9yCQDYBAEFBW5mdElkAQpnZXRTZWxsS2V5AQVuZnRJZAkArAICCQCsAgIFBWtTZWxsBQlzZXBhcmF0b3IJANgEAQUFbmZ0SWQBDWdldEF1Y3Rpb25LZXkBBW5mdElkCQCsAgIJAKwCAgUIa0F1Y3Rpb24FCXNlcGFyYXRvcgkA2AQBBQVuZnRJZAENZ2V0VHJ1c3RlZEtleQEGaXNzdWVyCQCsAgIJAKwCAgUIa1RydXN0ZWQFCXNlcGFyYXRvcgkApQgBBQZpc3N1ZXIBCWFkZFRvTGlzdAIFYWNjdW0JbmV4dFZhbHVlCQDOCAIFBWFjY3VtCQDMCAIFCW5leHRWYWx1ZQUDbmlsAQpqb2luU3RyaW5nAQZwYXJhbXMEBmxlbmd0aAkAkAMBBQZwYXJhbXMDCQAAAgUGbGVuZ3RoAAAJAAIBAg1FbXB0eSAgcGFyYW1zAwkAAAIFBmxlbmd0aAABCQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDEJAQUkZjBfMgIJAQUkZjBfMQIFBSRhY2MwAAAAAQUJc2VwYXJhdG9yAwkAAAIFBmxlbmd0aAACCQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACBQlzZXBhcmF0b3IDCQAAAgUGbGVuZ3RoAAMJALkJAgoAAiRsBQZwYXJhbXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWFkZFRvTGlzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMwkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwUJc2VwYXJhdG9yAwkAAAIFBmxlbmd0aAAECQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDQJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAUJc2VwYXJhdG9yAwkAAAIFBmxlbmd0aAAFCQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFBQlzZXBhcmF0b3IJAAIBAiFNYXggbnVtYmVyIG9mIHBhcmFtZXRlcnMgZXhjZWVkZWQBDnBhcnNlQXNBdWN0aW9uAQdkZXRhaWxzBANyZXMJALUJAgUHZGV0YWlscwUJc2VwYXJhdG9yCQCXCgUJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUDcmVzAAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNyZXMAAQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA3JlcwACCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDcmVzAAMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNyZXMABAELcGFyc2VBc1NlbGwBB2RldGFpbHMEA3JlcwkAtQkCBQdkZXRhaWxzBQlzZXBhcmF0b3IJAJQKAgkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQNyZXMAAAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA3JlcwABAQpqb2luU3RydWN0AQZwYXJhbXMEByRtYXRjaDAFBnBhcmFtcwMJAAECBQckbWF0Y2gwAh4oQWRkcmVzcywgSW50LCBTdHJpbmcsIFN0cmluZykEB2F1Y3Rpb24FByRtYXRjaDAJAQpqb2luU3RyaW5nAQkAzAgCCQClCAEIBQdhdWN0aW9uAl8xCQDMCAIJAKQDAQgFB2F1Y3Rpb24CXzIJAMwIAggFB2F1Y3Rpb24CXzMJAMwIAggFB2F1Y3Rpb24CXzQFA25pbAMJAAECBQckbWF0Y2gwAg4oQWRkcmVzcywgSW50KQQEc2VsbAUHJG1hdGNoMAkBCmpvaW5TdHJpbmcBCQDMCAIJAKUIAQgFBHNlbGwCXzEJAMwIAgkApAMBCAUEc2VsbAJfMgUDbmlsCQACAQITV3JvbmcgcGFyYW1zIHR1cHBsZQEKc2V0QXVjdGlvbgUGc2VsbGVyBW5mdElkCnN0YXJ0UHJpY2UFc3RhcnQDZW5kCQELU3RyaW5nRW50cnkCCQENZ2V0QXVjdGlvbktleQEFBW5mdElkCQEKam9pblN0cnVjdAEJAJYKBAUGc2VsbGVyBQpzdGFydFByaWNlBQVzdGFydAUDZW5kAQdzZXRTZWxsAwVuZnRJZAZjZWxsZXIFcHJpY2UJAQtTdHJpbmdFbnRyeQIJAQpnZXRTZWxsS2V5AQUFbmZ0SWQJAQpqb2luU3RydWN0AQkAlAoCBQZjZWxsZXIFBXByaWNlAQpnZXRBdWN0aW9uAQVuZnRJZAkBBXZhbHVlAQkAnQgCBQR0aGlzCQENZ2V0QXVjdGlvbktleQEFBW5mdElkAQdnZXRTZWxsAQVuZnRJZAkBBXZhbHVlAQkAnQgCBQR0aGlzCQEKZ2V0U2VsbEtleQEFBW5mdElkARhjYWxjUHJpY2VBdEN1cnJlbnRNb21lbnQCB2Fzc2V0SWQGbW9tZW50BAdkZXRhaWxzCQEKZ2V0QXVjdGlvbgEFB2Fzc2V0SWQECyR0MDI3NTUyODU5CQEOcGFyc2VBc0F1Y3Rpb24BBQdkZXRhaWxzBAZzZWxsZXIIBQskdDAyNzU1Mjg1OQJfMQQPc3RhcnRQcmljZVZhbHVlCAULJHQwMjc1NTI4NTkCXzIEDWVuZFByaWNlVmFsdWUIBQskdDAyNzU1Mjg1OQJfMwQQc3RhcnRQZXJpb2RWYWx1ZQgFCyR0MDI3NTUyODU5Al80BA5lbmRQZXJpb2RWYWx1ZQgFCyR0MDI3NTUyODU5Al81AwkAZwIFBm1vbWVudAUOZW5kUGVyaW9kVmFsdWUJAJQKAgUGc2VsbGVyBQ1lbmRQcmljZVZhbHVlBApkZWx0YVByaWNlCQBlAgUPc3RhcnRQcmljZVZhbHVlBQ1lbmRQcmljZVZhbHVlBAZwZXJpb2QJAGUCBQ5lbmRQZXJpb2RWYWx1ZQUQc3RhcnRQZXJpb2RWYWx1ZQQHc3BlbmRlZAkAZQIFBm1vbWVudAUQc3RhcnRQZXJpb2RWYWx1ZQkAlAoCBQZzZWxsZXIJAGUCBQ9zdGFydFByaWNlVmFsdWUJAGsDBQdzcGVuZGVkBQpkZWx0YVByaWNlBQZwZXJpb2QBBWlzTmZ0AQdhc3NldElkBAckbWF0Y2gwCQDsBwEFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIFQXNzZXQEBXRva2VuBQckbWF0Y2gwAwMJAAACCAUFdG9rZW4IZGVjaW1hbHMAAAkAAAIIBQV0b2tlbghxdWFudGl0eQABBwkAAAIIBQV0b2tlbgpyZWlzc3VhYmxlBwcHAQxpc1RydXN0ZWROZnQBB2Fzc2V0SWQEBmlzc3VlcggJAQV2YWx1ZQEJAOwHAQUHYXNzZXRJZAZpc3N1ZXIJAQt2YWx1ZU9yRWxzZQIJAJsIAgUEdGhpcwkBDWdldFRydXN0ZWRLZXkBBQZpc3N1ZXIHAQtpc1NlbGxFeGlzdAEHYXNzZXRJZAkBCWlzRGVmaW5lZAEJAJ0IAgUEdGhpcwkBCmdldFNlbGxLZXkBBQdhc3NldElkAQ5pc0F1Y3Rpb25FeGlzdAEHYXNzZXRJZAkBCWlzRGVmaW5lZAEJAJ0IAgUEdGhpcwkBDWdldEF1Y3Rpb25LZXkBBQdhc3NldElkARJpc0NvcnJlY3RTZWxsUHJpY2UBBXByaWNlCQBmAgUFcHJpY2UAAAEWaXNDb3JyZWN0QXVjdGlvblByaWNlcwIKc3RhcnRQcmljZQhlbmRQcmljZQkAZgIFCnN0YXJ0UHJpY2UFCGVuZFByaWNlAQdpc0FkbWluAQZjYWxsZXIJAAACBQZjYWxsZXIFBHRoaXMBDWlzVmFsaWRDYWxsZXICBmNhbGxlcgZzZWxsZXIDCQAAAgUGY2FsbGVyBQR0aGlzBgkAAAIFBmNhbGxlcgUGc2VsbGVyAQ5pc0F1Y3Rpb25FbmRlZAIDbm93A2VuZAkAZgIFA25vdwUDZW5kAQ1pc0Vub3VnaEZ1bmRzAgdwYXltZW50EmN1cnJlbnRNb21lbnRQcmljZQkAZwIFB3BheW1lbnQFEmN1cnJlbnRNb21lbnRQcmljZQEHaXNXYXdlcwEHYXNzZXRJZAkAAAIFB2Fzc2V0SWQFBHVuaXQBDGlzQ29ycmVjdE5mdAEFbmZ0SWQDCQEBIQEJAQVpc05mdAEFBW5mdElkCQACAQIQVG9rZW4gaXMgbm90IE5mdAMJAQtpc1NlbGxFeGlzdAEFBW5mdElkCQACAQITU2VsbCBhbHJlYWR5IGV4aXN0cwMJAQ5pc0F1Y3Rpb25FeGlzdAEFBW5mdElkCQACAQIWQXVjdGlvbiBhbHJlYWR5IGV4aXN0cwUEdW5pdAERaXNDb3JyZWN0UGF5bWVudHMDDHBheW1lbnRBc3NldA1wYXltZW50QW1vdW50BXByaWNlAwkBASEBCQEHaXNXYXdlcwEFDHBheW1lbnRBc3NldAkAAgECGFBheW1lbnQgbXVzdCBiZSBhdCBXQVZFUwMJAQEhAQkBDWlzRW5vdWdoRnVuZHMCBQ1wYXltZW50QW1vdW50BQVwcmljZQkAAgECEE5vdCBlbm91Z2ggZnVuZHMFBHVuaXQBB2NhbGNGZWUAAAABDmNhbGNUcnVzdGVkRmVlAAAAARJyZXN1bHRGdW5kc0Ftb3VudHMDCWlzVHJ1c3RlZA1wYXltZW50QW1vdW50C2FjdHVhbFByaWNlAwUJaXNUcnVzdGVkCQCUCgIJAGUCBQthY3R1YWxQcmljZQkBDmNhbGNUcnVzdGVkRmVlAAkAZQIFDXBheW1lbnRBbW91bnQFC2FjdHVhbFByaWNlCQCUCgIJAGUCBQthY3R1YWxQcmljZQkBB2NhbGNGZWUACQBlAgUNcGF5bWVudEFtb3VudAULYWN0dWFsUHJpY2UBB2dldFNsb3QBBW5mdElkAwkBC2lzU2VsbEV4aXN0AQUFbmZ0SWQJAJQKAgUFa1NlbGwJAQdnZXRTZWxsAQUFbmZ0SWQDCQEOaXNBdWN0aW9uRXhpc3QBBQVuZnRJZAkAlAoCBQhrQXVjdGlvbgkBCmdldEF1Y3Rpb24BBQVuZnRJZAkAAgECElNsb3QgZG9lc25gdCBleGlzdAAEa0J1eQIDYnV5CgFpAQljcmVhdGVOZnQJCG5mdF9uYW1lCW5mdF9vd25lcg9uZnRfZEFwcEFkZHJlc3MIbmZ0X3R5cGUIbmZ0X3RhZ3MRbmZ0X3NlbGxpbmdfcHJpY2UPbmZ0X2Rlc2NyaXB0aW9uCm5mdF9vblNlbGwIbmZ0X2RhdGEECG5ld1Rva2VuCQDCCAUFCG5mdF9uYW1lBQ9uZnRfZGVzY3JpcHRpb24AAQAABwQHaXNzdWVJZAkAuAgBBQhuZXdUb2tlbgkAzAgCBQhuZXdUb2tlbgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQUHaXNzdWVJZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICBU93bmVyCQClCAEIBQFpBmNhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICCG5mdF90eXBlBQhuZnRfdHlwZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICCG5mdF90YWdzBQhuZnRfdGFncwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICD25mdF9kQXBwQWRkcmVzcwUPbmZ0X2RBcHBBZGRyZXNzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICEW5mdF9zZWxsaW5nX3ByaWNlBRFuZnRfc2VsbGluZ19wcmljZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICCm5mdF9vblNlbGwFCm5mdF9vblNlbGwJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJANgEAQUHaXNzdWVJZAUJc2VwYXJhdG9yAghuZnRfZGF0YQUIbmZ0X2RhdGEFA25pbAFpAQhpc3N1ZU5mdAIEbmFtZQRtZXRhBAhuZXdUb2tlbgkAwggFBQRuYW1lBQRtZXRhAAEAAAcEB2lzc3VlSWQJALgIAQUIbmV3VG9rZW4JAMwIAgUIbmV3VG9rZW4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEFB2lzc3VlSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJANgEAQUHaXNzdWVJZAUJc2VwYXJhdG9yAgVPd25lcgkApQgBCAUBaQZjYWxsZXIFA25pbAFpAQZidXlORlQBBW5mdElEBAdhc3NldElkCQDZBAEFBW5mdElEBAZhbW91bnQJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAVwcmljZQkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQCiCAEJAKwCAgkArAICBQZrUHJpY2UFCXNlcGFyYXRvcgUFbmZ0SUQCHlRoZXJlIGlzIG5vIHByaWNlIGZvciB0aGlzIE5GVAQFb3duZXIJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkBEUBleHRyTmF0aXZlKDEwNTgpAQkArAICCQCsAgIFBW5mdElEBQlzZXBhcmF0b3ICBU93bmVyAghObyBvd25lcgMJAQIhPQIICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUEdW5pdAkAAgECDFBheSBpbiB3YXZlcwMJAGYCCQENcGFyc2VJbnRWYWx1ZQEFBXByaWNlBQZhbW91bnQJAAIBAg9JbnZhbGlkIHBheW1lbnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEFB2Fzc2V0SWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBBXZhbHVlAQkApggBBQVvd25lcgkBDXBhcnNlSW50VmFsdWUBBQVwcmljZQUEdW5pdAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkApQgBCAUBaQZjYWxsZXIFCXNlcGFyYXRvcgUEa0J1eQkArAICCQCsAgIFBW5mdElEBQlzZXBhcmF0b3IJAKQDAQUGYW1vdW50BQNuaWwBaQEHc2VsbE5GVAEFcHJpY2UECyR0MDcyMTQ3Mjk5CQCUCgIJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQEBnRva2VuMAgFCyR0MDcyMTQ3Mjk5Al8xBAdhbW91bnQwCAULJHQwNzIxNDcyOTkCXzIDCQEBIQEJAQVpc05mdAEFBnRva2VuMAkAAgECEFRva2VuIGlzIG5vdCBORlQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIFBmtQcmljZQUJc2VwYXJhdG9yCQDYBAEJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAkApAMBBQVwcmljZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkApQgBCAUBaQZjYWxsZXIFCXNlcGFyYXRvcgUFa1NlbGwJAKwCAgkArAICCQDYBAEFBnRva2VuMAUJc2VwYXJhdG9yCQCkAwEFB2Ftb3VudDAFA25pbAFpAQdhZGRTZWxsAQVwcmljZQQFbmZ0SWQJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkBDGlzQ29ycmVjdE5mdAEFBW5mdElkAwkBASEBCQESaXNDb3JyZWN0U2VsbFByaWNlAQUFcHJpY2UJAAIBAhFQcmljZSBtdXN0IGJlID4gMAkAzAgCCQEHc2V0U2VsbAMFBW5mdElkCAUBaQZjYWxsZXIFBXByaWNlBQNuaWwBaQEKYWRkQXVjdGlvbgMKc3RhcnRQcmljZQVzdGFydANlbmQEBW5mdElkCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAQxpc0NvcnJlY3ROZnQBBQVuZnRJZAkAzAgCCQEKc2V0QXVjdGlvbgUIBQFpBmNhbGxlcgUFbmZ0SWQFCnN0YXJ0UHJpY2UFBXN0YXJ0BQNlbmQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJANgEAQUFbmZ0SWQFCXNlcGFyYXRvcgIJbmZ0X293bmVyCQClCAEIBQFpBmNhbGxlcgUDbmlsAWkBC2J1eUZyb21TbG90AQVuZnRJZAQLJHQwODIxOTgzMDgJAJQKAggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQMcGF5bWVudEFzc2V0CAULJHQwODIxOTgzMDgCXzEEDXBheW1lbnRBbW91bnQIBQskdDA4MjE5ODMwOAJfMgQHYXNzZXRJZAkA2QQBBQVuZnRJZAQLJHQwODM1MjgzOTAJAQdnZXRTbG90AQUHYXNzZXRJZAQEdHlwZQgFCyR0MDgzNTI4MzkwAl8xBAdkZXRhaWxzCAULJHQwODM1MjgzOTACXzIEB2Jhc2VSZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEFB2Fzc2V0SWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCmdldFNsb3RLZXkCBQR0eXBlBQdhc3NldElkBQNuaWwDCQAAAgUEdHlwZQUFa1NlbGwECyR0MDg1MzI4NTc5CQELcGFyc2VBc1NlbGwBBQdkZXRhaWxzBAZzZWxsZXIIBQskdDA4NTMyODU3OQJfMQQKcHJpY2VWYWx1ZQgFCyR0MDg1MzI4NTc5Al8yCQELdmFsdWVPckVsc2UCCQERaXNDb3JyZWN0UGF5bWVudHMDBQxwYXltZW50QXNzZXQFDXBheW1lbnRBbW91bnQFCnByaWNlVmFsdWUECyR0MDg2NjQ4NzY2CQEScmVzdWx0RnVuZHNBbW91bnRzAwkBDGlzVHJ1c3RlZE5mdAEFB2Fzc2V0SWQFDXBheW1lbnRBbW91bnQFCnByaWNlVmFsdWUEDHNlbGxlckFtb3VudAgFCyR0MDg2NjQ4NzY2Al8xBAtidXllckFtb3VudAgFCyR0MDg2NjQ4NzY2Al8yBAp1cGRhdGVkUmVzCQDOCAIFB2Jhc2VSZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUGc2VsbGVyBQxzZWxsZXJBbW91bnQFBHVuaXQFA25pbAMJAGYCBQtidXllckFtb3VudAAACQDOCAIFCnVwZGF0ZWRSZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQtidXllckFtb3VudAUEdW5pdAUDbmlsBQp1cGRhdGVkUmVzBAskdDA4OTgzOTA1MgkBGGNhbGNQcmljZUF0Q3VycmVudE1vbWVudAIFB2Fzc2V0SWQFBmhlaWdodAQGc2VsbGVyCAULJHQwODk4MzkwNTICXzEEC2FjdHVhbFByaWNlCAULJHQwODk4MzkwNTICXzIJAQt2YWx1ZU9yRWxzZQIJARFpc0NvcnJlY3RQYXltZW50cwMFDHBheW1lbnRBc3NldAUNcGF5bWVudEFtb3VudAULYWN0dWFsUHJpY2UECyR0MDkxMzg5MjQxCQEScmVzdWx0RnVuZHNBbW91bnRzAwkBDGlzVHJ1c3RlZE5mdAEFB2Fzc2V0SWQFDXBheW1lbnRBbW91bnQFC2FjdHVhbFByaWNlBAxzZWxsZXJBbW91bnQIBQskdDA5MTM4OTI0MQJfMQQLYnV5ZXJBbW91bnQIBQskdDA5MTM4OTI0MQJfMgQKdXBkYXRlZFJlcwkAzggCBQdiYXNlUmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBnNlbGxlcgUMc2VsbGVyQW1vdW50BQR1bml0BQNuaWwDCQBmAgULYnV5ZXJBbW91bnQAAAkAzggCBQp1cGRhdGVkUmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgULYnV5ZXJBbW91bnQFBHVuaXQFA25pbAUKdXBkYXRlZFJlcwFpAQtkZWNsaW5lU2xvdAEFbmZ0SWQEB2Fzc2V0SWQJANkEAQUFbmZ0SWQECyR0MDk1NDI5NTgwCQEHZ2V0U2xvdAEFB2Fzc2V0SWQEBHR5cGUIBQskdDA5NTQyOTU4MAJfMQQHZGV0YWlscwgFCyR0MDk1NDI5NTgwAl8yBAdiYXNlUmVzCQDMCAIJAQtEZWxldGVFbnRyeQEJAQpnZXRTbG90S2V5AgUEdHlwZQUHYXNzZXRJZAUDbmlsAwkAAAIFBHR5cGUFBWtTZWxsBAskdDA5NjcyOTcxOQkBC3BhcnNlQXNTZWxsAQUHZGV0YWlscwQGc2VsbGVyCAULJHQwOTY3Mjk3MTkCXzEECnByaWNlVmFsdWUIBQskdDA5NjcyOTcxOQJfMgMJAQEhAQkBDWlzVmFsaWRDYWxsZXICCAUBaQZjYWxsZXIFBnNlbGxlcgkAAgECDkludmFsaWQgY2FsbGVyCQDOCAIFB2Jhc2VSZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUGc2VsbGVyAAEFB2Fzc2V0SWQFA25pbAQLJHQwOTg2NDk5NjgJAQ5wYXJzZUFzQXVjdGlvbgEFB2RldGFpbHMEBnNlbGxlcggFCyR0MDk4NjQ5OTY4Al8xBA9zdGFydFByaWNlVmFsdWUIBQskdDA5ODY0OTk2OAJfMgQNZW5kUHJpY2VWYWx1ZQgFCyR0MDk4NjQ5OTY4Al8zBBBzdGFydFBlcmlvZFZhbHVlCAULJHQwOTg2NDk5NjgCXzQEDmVuZFBlcmlvZFZhbHVlCAULJHQwOTg2NDk5NjgCXzUDCQEBIQEJAQ1pc1ZhbGlkQ2FsbGVyAggFAWkGY2FsbGVyBQZzZWxsZXIJAAIBAg5JbnZhbGlkIGNhbGxlcgMJAQEhAQkBDmlzQXVjdGlvbkVuZGVkAgUGaGVpZ2h0BQ5lbmRQZXJpb2RWYWx1ZQkAAgECF1dhaXQgZm9yIGVuZCBvZiBhdWN0aW9uCQDOCAIFB2Jhc2VSZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUGc2VsbGVyAAEFB2Fzc2V0SWQFA25pbAFpARBzZXRUcnVzdGVkSXNzdWVyAQt0cnVzdGVkQWRkcgMJAQEhAQkBB2lzQWRtaW4BCAUBaQZjYWxsZXIJAAIBAgpPbmx5IGFkbWluCQDMCAIJAQxCb29sZWFuRW50cnkCCQENZ2V0VHJ1c3RlZEtleQEJARFAZXh0ck5hdGl2ZSgxMDYyKQEFC3RydXN0ZWRBZGRyBgUDbmlsAWkBF2dldFByaWNlQXRDdXJyZW50TW9tZW50AgVuZnRJZAZtb21lbnQEB2Fzc2V0SWQJANkEAQUFbmZ0SWQEDSR0MDEwNTA5MTA1NzIJARhjYWxjUHJpY2VBdEN1cnJlbnRNb21lbnQCBQdhc3NldElkBQZtb21lbnQEBnNlbGxlcggFDSR0MDEwNTA5MTA1NzICXzEEBXByaWNlCAUNJHQwMTA1MDkxMDU3MgJfMgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBC2dldFByaWNlS2V5AQUHYXNzZXRJZAUFcHJpY2UFA25pbAAw0k2G",
    "height": 2339884,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3FmzTTgiFBo8bg4UdSFkdUuKCK2o8SA6JsuwQ8yfPGMC
Next: 4VQDfia3FXvsRnALxHxcs6ud4n2KL3xsbasZnubJmAHz

Diff: 
Old New Differences
413 413      }
414 414  
415 415  
416 - 
417 - @Callable(aF)
418 - func placeNFT (P) = {
419 -     let bq = $Tuple2(value(aF.payments[0].assetId), value(aF.payments[0].amount))
420 -     let aX = bq._1
421 -     let aY = bq._2
422 -     if (!(ad(aX)))
423 -         then throw("Token is not NFT")
424 -         else [StringEntry(((e + a) + toBase58String(value(aF.payments[0].assetId))), toString(P)), StringEntry(((toString(aF.caller) + a) + c), ((toBase58String(aX) + a) + toString(aY)))]
425 -     }
426 - 
427 - 
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let a = "_"
5 5  
6 6  let b = "auction"
7 7  
8 8  let c = "sell"
9 9  
10 10  let d = "trusted"
11 11  
12 12  let e = "price"
13 13  
14 14  func f (g,h) = ((g + a) + toBase58String(h))
15 15  
16 16  
17 17  func i (h) = ((e + a) + toBase58String(h))
18 18  
19 19  
20 20  func j (h) = ((c + a) + toBase58String(h))
21 21  
22 22  
23 23  func k (h) = ((b + a) + toBase58String(h))
24 24  
25 25  
26 26  func l (m) = ((d + a) + toString(m))
27 27  
28 28  
29 29  func n (o,p) = (o ++ [p])
30 30  
31 31  
32 32  func q (r) = {
33 33      let s = size(r)
34 34      if ((s == 0))
35 35          then throw("Empty  params")
36 36          else if ((s == 1))
37 37              then makeString({
38 38                  let t = r
39 39                  let u = size(t)
40 40                  let v = nil
41 41                  func w (x,y) =                 if ((y >= u))
42 42                      then x
43 43                      else n(x, t[y])
44 44  
45 45                  func z (x,y) =                 if ((y >= u))
46 46                      then x
47 47                      else throw("List size exceeds 1")
48 48  
49 49                  z(w(v, 0), 1)
50 50                  }, a)
51 51              else if ((s == 2))
52 52                  then makeString({
53 53                      let t = r
54 54                      let u = size(t)
55 55                      let v = nil
56 56                      func w (x,y) =                     if ((y >= u))
57 57                          then x
58 58                          else n(x, t[y])
59 59  
60 60                      func z (x,y) =                     if ((y >= u))
61 61                          then x
62 62                          else throw("List size exceeds 2")
63 63  
64 64                      z(w(w(v, 0), 1), 2)
65 65                      }, a)
66 66                  else if ((s == 3))
67 67                      then makeString({
68 68                          let t = r
69 69                          let u = size(t)
70 70                          let v = nil
71 71                          func w (x,y) =                         if ((y >= u))
72 72                              then x
73 73                              else n(x, t[y])
74 74  
75 75                          func z (x,y) =                         if ((y >= u))
76 76                              then x
77 77                              else throw("List size exceeds 3")
78 78  
79 79                          z(w(w(w(v, 0), 1), 2), 3)
80 80                          }, a)
81 81                      else if ((s == 4))
82 82                          then makeString({
83 83                              let t = r
84 84                              let u = size(t)
85 85                              let v = nil
86 86                              func w (x,y) =                             if ((y >= u))
87 87                                  then x
88 88                                  else n(x, t[y])
89 89  
90 90                              func z (x,y) =                             if ((y >= u))
91 91                                  then x
92 92                                  else throw("List size exceeds 4")
93 93  
94 94                              z(w(w(w(w(v, 0), 1), 2), 3), 4)
95 95                              }, a)
96 96                          else if ((s == 5))
97 97                              then makeString({
98 98                                  let t = r
99 99                                  let u = size(t)
100 100                                  let v = nil
101 101                                  func w (x,y) =                                 if ((y >= u))
102 102                                      then x
103 103                                      else n(x, t[y])
104 104  
105 105                                  func z (x,y) =                                 if ((y >= u))
106 106                                      then x
107 107                                      else throw("List size exceeds 5")
108 108  
109 109                                  z(w(w(w(w(w(v, 0), 1), 2), 3), 4), 5)
110 110                                  }, a)
111 111                              else throw("Max number of parameters exceeded")
112 112      }
113 113  
114 114  
115 115  func A (B) = {
116 116      let C = split(B, a)
117 117      $Tuple5(addressFromStringValue(C[0]), parseIntValue(C[1]), parseIntValue(C[2]), parseIntValue(C[3]), parseIntValue(C[4]))
118 118      }
119 119  
120 120  
121 121  func D (B) = {
122 122      let C = split(B, a)
123 123      $Tuple2(addressFromStringValue(C[0]), parseIntValue(C[1]))
124 124      }
125 125  
126 126  
127 127  func E (r) = {
128 128      let F = r
129 129      if ($isInstanceOf(F, "(Address, Int, String, String)"))
130 130          then {
131 131              let G = F
132 132              q([toString(G._1), toString(G._2), G._3, G._4])
133 133              }
134 134          else if ($isInstanceOf(F, "(Address, Int)"))
135 135              then {
136 136                  let H = F
137 137                  q([toString(H._1), toString(H._2)])
138 138                  }
139 139              else throw("Wrong params tupple")
140 140      }
141 141  
142 142  
143 143  func I (J,h,K,L,M) = StringEntry(k(h), E($Tuple4(J, K, L, M)))
144 144  
145 145  
146 146  func N (h,O,P) = StringEntry(j(h), E($Tuple2(O, P)))
147 147  
148 148  
149 149  func Q (h) = value(getString(this, k(h)))
150 150  
151 151  
152 152  func R (h) = value(getString(this, j(h)))
153 153  
154 154  
155 155  func S (T,U) = {
156 156      let B = Q(T)
157 157      let V = A(B)
158 158      let J = V._1
159 159      let W = V._2
160 160      let X = V._3
161 161      let Y = V._4
162 162      let Z = V._5
163 163      if ((U >= Z))
164 164          then $Tuple2(J, X)
165 165          else {
166 166              let aa = (W - X)
167 167              let ab = (Z - Y)
168 168              let ac = (U - Y)
169 169              $Tuple2(J, (W - fraction(ac, aa, ab)))
170 170              }
171 171      }
172 172  
173 173  
174 174  func ad (T) = {
175 175      let F = assetInfo(T)
176 176      if ($isInstanceOf(F, "Asset"))
177 177          then {
178 178              let ae = F
179 179              if (if ((ae.decimals == 0))
180 180                  then (ae.quantity == 1)
181 181                  else false)
182 182                  then (ae.reissuable == false)
183 183                  else false
184 184              }
185 185          else false
186 186      }
187 187  
188 188  
189 189  func af (T) = {
190 190      let m = value(assetInfo(T)).issuer
191 191      valueOrElse(getBoolean(this, l(m)), false)
192 192      }
193 193  
194 194  
195 195  func ag (T) = isDefined(getString(this, j(T)))
196 196  
197 197  
198 198  func ah (T) = isDefined(getString(this, k(T)))
199 199  
200 200  
201 201  func ai (P) = (P > 0)
202 202  
203 203  
204 204  func aj (K,ak) = (K > ak)
205 205  
206 206  
207 207  func al (am) = (am == this)
208 208  
209 209  
210 210  func an (am,J) = if ((am == this))
211 211      then true
212 212      else (am == J)
213 213  
214 214  
215 215  func ao (ap,M) = (ap > M)
216 216  
217 217  
218 218  func aq (ar,as) = (ar >= as)
219 219  
220 220  
221 221  func at (T) = (T == unit)
222 222  
223 223  
224 224  func au (h) = if (!(ad(h)))
225 225      then throw("Token is not Nft")
226 226      else if (ag(h))
227 227          then throw("Sell already exists")
228 228          else if (ah(h))
229 229              then throw("Auction already exists")
230 230              else unit
231 231  
232 232  
233 233  func av (aw,ax,P) = if (!(at(aw)))
234 234      then throw("Payment must be at WAVES")
235 235      else if (!(aq(ax, P)))
236 236          then throw("Not enough funds")
237 237          else unit
238 238  
239 239  
240 240  func ay () = 0
241 241  
242 242  
243 243  func az () = 0
244 244  
245 245  
246 246  func aA (aB,ax,aC) = if (aB)
247 247      then $Tuple2((aC - az()), (ax - aC))
248 248      else $Tuple2((aC - ay()), (ax - aC))
249 249  
250 250  
251 251  func aD (h) = if (ag(h))
252 252      then $Tuple2(c, R(h))
253 253      else if (ah(h))
254 254          then $Tuple2(b, Q(h))
255 255          else throw("Slot doesn`t exist")
256 256  
257 257  
258 258  let aE = "buy"
259 259  
260 260  @Callable(aF)
261 261  func createNft (aG,aH,aI,aJ,aK,aL,aM,aN,aO) = {
262 262      let aP = Issue(aG, aM, 1, 0, false)
263 263      let aQ = calculateAssetId(aP)
264 264  [aP, ScriptTransfer(aF.caller, 1, aQ), StringEntry(((toBase58String(aQ) + a) + "Owner"), toString(aF.caller)), StringEntry(((toBase58String(aQ) + a) + "nft_type"), aJ), StringEntry(((toBase58String(aQ) + a) + "nft_tags"), aK), StringEntry(((toBase58String(aQ) + a) + "nft_dAppAddress"), aI), IntegerEntry(((toBase58String(aQ) + a) + "nft_selling_price"), aL), StringEntry(((toBase58String(aQ) + a) + "nft_onSell"), aN), StringEntry(((toBase58String(aQ) + a) + "nft_data"), aO)]
265 265      }
266 266  
267 267  
268 268  
269 269  @Callable(aF)
270 270  func issueNft (aR,aS) = {
271 271      let aP = Issue(aR, aS, 1, 0, false)
272 272      let aQ = calculateAssetId(aP)
273 273  [aP, ScriptTransfer(aF.caller, 1, aQ), StringEntry(((toBase58String(aQ) + a) + "Owner"), toString(aF.caller))]
274 274      }
275 275  
276 276  
277 277  
278 278  @Callable(aF)
279 279  func buyNFT (aT) = {
280 280      let T = fromBase58String(aT)
281 281      let aU = value(aF.payments[0].amount)
282 282      let P = valueOrErrorMessage(getString(((e + a) + aT)), "There is no price for this NFT")
283 283      let aV = valueOrErrorMessage(getStringValue(((aT + a) + "Owner")), "No owner")
284 284      if ((aF.payments[0].assetId != unit))
285 285          then throw("Pay in waves")
286 286          else if ((parseIntValue(P) > aU))
287 287              then throw("Invalid payment")
288 288              else [ScriptTransfer(aF.caller, 1, T), ScriptTransfer(value(addressFromString(aV)), parseIntValue(P), unit), StringEntry(((toString(aF.caller) + a) + aE), ((aT + a) + toString(aU)))]
289 289      }
290 290  
291 291  
292 292  
293 293  @Callable(aF)
294 294  func sellNFT (P) = {
295 295      let aW = $Tuple2(value(aF.payments[0].assetId), value(aF.payments[0].amount))
296 296      let aX = aW._1
297 297      let aY = aW._2
298 298      if (!(ad(aX)))
299 299          then throw("Token is not NFT")
300 300          else [StringEntry(((e + a) + toBase58String(value(aF.payments[0].assetId))), toString(P)), StringEntry(((toString(aF.caller) + a) + c), ((toBase58String(aX) + a) + toString(aY)))]
301 301      }
302 302  
303 303  
304 304  
305 305  @Callable(aF)
306 306  func addSell (P) = {
307 307      let h = value(aF.payments[0].assetId)
308 308      valueOrElse(au(h), if (!(ai(P)))
309 309          then throw("Price must be > 0")
310 310          else [N(h, aF.caller, P)])
311 311      }
312 312  
313 313  
314 314  
315 315  @Callable(aF)
316 316  func addAuction (K,L,M) = {
317 317      let h = value(aF.payments[0].assetId)
318 318      valueOrElse(au(h), [I(aF.caller, h, K, L, M), StringEntry(((toBase58String(h) + a) + "nft_owner"), toString(aF.caller))])
319 319      }
320 320  
321 321  
322 322  
323 323  @Callable(aF)
324 324  func buyFromSlot (h) = {
325 325      let aZ = $Tuple2(aF.payments[0].assetId, value(aF.payments[0].amount))
326 326      let aw = aZ._1
327 327      let ax = aZ._2
328 328      let T = fromBase58String(h)
329 329      let ba = aD(T)
330 330      let bb = ba._1
331 331      let B = ba._2
332 332      let bc = [ScriptTransfer(aF.caller, 1, T), DeleteEntry(f(bb, T))]
333 333      if ((bb == c))
334 334          then {
335 335              let bd = D(B)
336 336              let J = bd._1
337 337              let be = bd._2
338 338              valueOrElse(av(aw, ax, be), {
339 339                  let bf = aA(af(T), ax, be)
340 340                  let bg = bf._1
341 341                  let bh = bf._2
342 342                  let bi = (bc ++ [ScriptTransfer(J, bg, unit)])
343 343                  if ((bh > 0))
344 344                      then (bi ++ [ScriptTransfer(aF.caller, bh, unit)])
345 345                      else bi
346 346                  })
347 347              }
348 348          else {
349 349              let bj = S(T, height)
350 350              let J = bj._1
351 351              let aC = bj._2
352 352              valueOrElse(av(aw, ax, aC), {
353 353                  let bk = aA(af(T), ax, aC)
354 354                  let bg = bk._1
355 355                  let bh = bk._2
356 356                  let bi = (bc ++ [ScriptTransfer(J, bg, unit)])
357 357                  if ((bh > 0))
358 358                      then (bi ++ [ScriptTransfer(aF.caller, bh, unit)])
359 359                      else bi
360 360                  })
361 361              }
362 362      }
363 363  
364 364  
365 365  
366 366  @Callable(aF)
367 367  func declineSlot (h) = {
368 368      let T = fromBase58String(h)
369 369      let bl = aD(T)
370 370      let bb = bl._1
371 371      let B = bl._2
372 372      let bc = [DeleteEntry(f(bb, T))]
373 373      if ((bb == c))
374 374          then {
375 375              let bm = D(B)
376 376              let J = bm._1
377 377              let be = bm._2
378 378              if (!(an(aF.caller, J)))
379 379                  then throw("Invalid caller")
380 380                  else (bc ++ [ScriptTransfer(J, 1, T)])
381 381              }
382 382          else {
383 383              let bn = A(B)
384 384              let J = bn._1
385 385              let W = bn._2
386 386              let X = bn._3
387 387              let Y = bn._4
388 388              let Z = bn._5
389 389              if (!(an(aF.caller, J)))
390 390                  then throw("Invalid caller")
391 391                  else if (!(ao(height, Z)))
392 392                      then throw("Wait for end of auction")
393 393                      else (bc ++ [ScriptTransfer(J, 1, T)])
394 394              }
395 395      }
396 396  
397 397  
398 398  
399 399  @Callable(aF)
400 400  func setTrustedIssuer (bo) = if (!(al(aF.caller)))
401 401      then throw("Only admin")
402 402      else [BooleanEntry(l(addressFromStringValue(bo)), true)]
403 403  
404 404  
405 405  
406 406  @Callable(aF)
407 407  func getPriceAtCurrentMoment (h,U) = {
408 408      let T = fromBase58String(h)
409 409      let bp = S(T, U)
410 410      let J = bp._1
411 411      let P = bp._2
412 412  [IntegerEntry(i(T), P)]
413 413      }
414 414  
415 415  
416 - 
417 - @Callable(aF)
418 - func placeNFT (P) = {
419 -     let bq = $Tuple2(value(aF.payments[0].assetId), value(aF.payments[0].amount))
420 -     let aX = bq._1
421 -     let aY = bq._2
422 -     if (!(ad(aX)))
423 -         then throw("Token is not NFT")
424 -         else [StringEntry(((e + a) + toBase58String(value(aF.payments[0].assetId))), toString(P)), StringEntry(((toString(aF.caller) + a) + c), ((toBase58String(aX) + a) + toString(aY)))]
425 -     }
426 - 
427 -

Old	New		Differences
413	413		}
414	414
415	415
416		-
417		-	@Callable(aF)
418		-	func placeNFT (P) = {
419		-	let bq = $Tuple2(value(aF.payments[0].assetId), value(aF.payments[0].amount))
420		-	let aX = bq._1
421		-	let aY = bq._2
422		-	if (!(ad(aX)))
423		-	then throw("Token is not NFT")
424		-	else [StringEntry(((e + a) + toBase58String(value(aF.payments[0].assetId))), toString(P)), StringEntry(((toString(aF.caller) + a) + c), ((toBase58String(aX) + a) + toString(aY)))]
425		-	}
426		-
427		-

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let a = "_"
5	5
6	6		let b = "auction"
7	7
8	8		let c = "sell"
9	9
10	10		let d = "trusted"
11	11
12	12		let e = "price"
13	13
14	14		func f (g,h) = ((g + a) + toBase58String(h))
15	15
16	16
17	17		func i (h) = ((e + a) + toBase58String(h))
18	18
19	19
20	20		func j (h) = ((c + a) + toBase58String(h))
21	21
22	22
23	23		func k (h) = ((b + a) + toBase58String(h))
24	24
25	25
26	26		func l (m) = ((d + a) + toString(m))
27	27
28	28
29	29		func n (o,p) = (o ++ [p])
30	30
31	31
32	32		func q (r) = {
33	33		let s = size(r)
34	34		if ((s == 0))
35	35		then throw("Empty params")
36	36		else if ((s == 1))
37	37		then makeString({
38	38		let t = r
39	39		let u = size(t)
40	40		let v = nil
41	41		func w (x,y) = if ((y >= u))
42	42		then x
43	43		else n(x, t[y])
44	44
45	45		func z (x,y) = if ((y >= u))
46	46		then x
47	47		else throw("List size exceeds 1")
48	48
49	49		z(w(v, 0), 1)
50	50		}, a)
51	51		else if ((s == 2))
52	52		then makeString({
53	53		let t = r
54	54		let u = size(t)
55	55		let v = nil
56	56		func w (x,y) = if ((y >= u))
57	57		then x
58	58		else n(x, t[y])
59	59
60	60		func z (x,y) = if ((y >= u))
61	61		then x
62	62		else throw("List size exceeds 2")
63	63
64	64		z(w(w(v, 0), 1), 2)
65	65		}, a)
66	66		else if ((s == 3))
67	67		then makeString({
68	68		let t = r
69	69		let u = size(t)
70	70		let v = nil
71	71		func w (x,y) = if ((y >= u))
72	72		then x
73	73		else n(x, t[y])
74	74
75	75		func z (x,y) = if ((y >= u))
76	76		then x
77	77		else throw("List size exceeds 3")
78	78
79	79		z(w(w(w(v, 0), 1), 2), 3)
80	80		}, a)
81	81		else if ((s == 4))
82	82		then makeString({
83	83		let t = r
84	84		let u = size(t)
85	85		let v = nil
86	86		func w (x,y) = if ((y >= u))
87	87		then x
88	88		else n(x, t[y])
89	89
90	90		func z (x,y) = if ((y >= u))
91	91		then x
92	92		else throw("List size exceeds 4")
93	93
94	94		z(w(w(w(w(v, 0), 1), 2), 3), 4)
95	95		}, a)
96	96		else if ((s == 5))
97	97		then makeString({
98	98		let t = r
99	99		let u = size(t)
100	100		let v = nil
101	101		func w (x,y) = if ((y >= u))
102	102		then x
103	103		else n(x, t[y])
104	104
105	105		func z (x,y) = if ((y >= u))
106	106		then x
107	107		else throw("List size exceeds 5")
108	108
109	109		z(w(w(w(w(w(v, 0), 1), 2), 3), 4), 5)
110	110		}, a)
111	111		else throw("Max number of parameters exceeded")
112	112		}
113	113
114	114
115	115		func A (B) = {
116	116		let C = split(B, a)
117	117		$Tuple5(addressFromStringValue(C[0]), parseIntValue(C[1]), parseIntValue(C[2]), parseIntValue(C[3]), parseIntValue(C[4]))
118	118		}
119	119
120	120
121	121		func D (B) = {
122	122		let C = split(B, a)
123	123		$Tuple2(addressFromStringValue(C[0]), parseIntValue(C[1]))
124	124		}
125	125
126	126
127	127		func E (r) = {
128	128		let F = r
129	129		if ($isInstanceOf(F, "(Address, Int, String, String)"))
130	130		then {
131	131		let G = F
132	132		q([toString(G._1), toString(G._2), G._3, G._4])
133	133		}
134	134		else if ($isInstanceOf(F, "(Address, Int)"))
135	135		then {
136	136		let H = F
137	137		q([toString(H._1), toString(H._2)])
138	138		}
139	139		else throw("Wrong params tupple")
140	140		}
141	141
142	142
143	143		func I (J,h,K,L,M) = StringEntry(k(h), E($Tuple4(J, K, L, M)))
144	144
145	145
146	146		func N (h,O,P) = StringEntry(j(h), E($Tuple2(O, P)))
147	147
148	148
149	149		func Q (h) = value(getString(this, k(h)))
150	150
151	151
152	152		func R (h) = value(getString(this, j(h)))
153	153
154	154
155	155		func S (T,U) = {
156	156		let B = Q(T)
157	157		let V = A(B)
158	158		let J = V._1
159	159		let W = V._2
160	160		let X = V._3
161	161		let Y = V._4
162	162		let Z = V._5
163	163		if ((U >= Z))
164	164		then $Tuple2(J, X)
165	165		else {
166	166		let aa = (W - X)
167	167		let ab = (Z - Y)
168	168		let ac = (U - Y)
169	169		$Tuple2(J, (W - fraction(ac, aa, ab)))
170	170		}
171	171		}
172	172
173	173
174	174		func ad (T) = {
175	175		let F = assetInfo(T)
176	176		if ($isInstanceOf(F, "Asset"))
177	177		then {
178	178		let ae = F
179	179		if (if ((ae.decimals == 0))
180	180		then (ae.quantity == 1)
181	181		else false)
182	182		then (ae.reissuable == false)
183	183		else false
184	184		}
185	185		else false
186	186		}
187	187
188	188
189	189		func af (T) = {
190	190		let m = value(assetInfo(T)).issuer
191	191		valueOrElse(getBoolean(this, l(m)), false)
192	192		}
193	193
194	194
195	195		func ag (T) = isDefined(getString(this, j(T)))
196	196
197	197
198	198		func ah (T) = isDefined(getString(this, k(T)))
199	199
200	200
201	201		func ai (P) = (P > 0)
202	202
203	203
204	204		func aj (K,ak) = (K > ak)
205	205
206	206
207	207		func al (am) = (am == this)
208	208
209	209
210	210		func an (am,J) = if ((am == this))
211	211		then true
212	212		else (am == J)
213	213
214	214
215	215		func ao (ap,M) = (ap > M)
216	216
217	217
218	218		func aq (ar,as) = (ar >= as)
219	219
220	220
221	221		func at (T) = (T == unit)
222	222
223	223
224	224		func au (h) = if (!(ad(h)))
225	225		then throw("Token is not Nft")
226	226		else if (ag(h))
227	227		then throw("Sell already exists")
228	228		else if (ah(h))
229	229		then throw("Auction already exists")
230	230		else unit
231	231
232	232
233	233		func av (aw,ax,P) = if (!(at(aw)))
234	234		then throw("Payment must be at WAVES")
235	235		else if (!(aq(ax, P)))
236	236		then throw("Not enough funds")
237	237		else unit
238	238
239	239
240	240		func ay () = 0
241	241
242	242
243	243		func az () = 0
244	244
245	245
246	246		func aA (aB,ax,aC) = if (aB)
247	247		then $Tuple2((aC - az()), (ax - aC))
248	248		else $Tuple2((aC - ay()), (ax - aC))
249	249
250	250
251	251		func aD (h) = if (ag(h))
252	252		then $Tuple2(c, R(h))
253	253		else if (ah(h))
254	254		then $Tuple2(b, Q(h))
255	255		else throw("Slot doesn`t exist")
256	256
257	257
258	258		let aE = "buy"
259	259
260	260		@Callable(aF)
261	261		func createNft (aG,aH,aI,aJ,aK,aL,aM,aN,aO) = {
262	262		let aP = Issue(aG, aM, 1, 0, false)
263	263		let aQ = calculateAssetId(aP)
264	264		[aP, ScriptTransfer(aF.caller, 1, aQ), StringEntry(((toBase58String(aQ) + a) + "Owner"), toString(aF.caller)), StringEntry(((toBase58String(aQ) + a) + "nft_type"), aJ), StringEntry(((toBase58String(aQ) + a) + "nft_tags"), aK), StringEntry(((toBase58String(aQ) + a) + "nft_dAppAddress"), aI), IntegerEntry(((toBase58String(aQ) + a) + "nft_selling_price"), aL), StringEntry(((toBase58String(aQ) + a) + "nft_onSell"), aN), StringEntry(((toBase58String(aQ) + a) + "nft_data"), aO)]
265	265		}
266	266
267	267
268	268
269	269		@Callable(aF)
270	270		func issueNft (aR,aS) = {
271	271		let aP = Issue(aR, aS, 1, 0, false)
272	272		let aQ = calculateAssetId(aP)
273	273		[aP, ScriptTransfer(aF.caller, 1, aQ), StringEntry(((toBase58String(aQ) + a) + "Owner"), toString(aF.caller))]
274	274		}
275	275
276	276
277	277
278	278		@Callable(aF)
279	279		func buyNFT (aT) = {
280	280		let T = fromBase58String(aT)
281	281		let aU = value(aF.payments[0].amount)
282	282		let P = valueOrErrorMessage(getString(((e + a) + aT)), "There is no price for this NFT")
283	283		let aV = valueOrErrorMessage(getStringValue(((aT + a) + "Owner")), "No owner")
284	284		if ((aF.payments[0].assetId != unit))
285	285		then throw("Pay in waves")
286	286		else if ((parseIntValue(P) > aU))
287	287		then throw("Invalid payment")
288	288		else [ScriptTransfer(aF.caller, 1, T), ScriptTransfer(value(addressFromString(aV)), parseIntValue(P), unit), StringEntry(((toString(aF.caller) + a) + aE), ((aT + a) + toString(aU)))]
289	289		}
290	290
291	291
292	292
293	293		@Callable(aF)
294	294		func sellNFT (P) = {
295	295		let aW = $Tuple2(value(aF.payments[0].assetId), value(aF.payments[0].amount))
296	296		let aX = aW._1
297	297		let aY = aW._2
298	298		if (!(ad(aX)))
299	299		then throw("Token is not NFT")
300	300		else [StringEntry(((e + a) + toBase58String(value(aF.payments[0].assetId))), toString(P)), StringEntry(((toString(aF.caller) + a) + c), ((toBase58String(aX) + a) + toString(aY)))]
301	301		}
302	302
303	303
304	304
305	305		@Callable(aF)
306	306		func addSell (P) = {
307	307		let h = value(aF.payments[0].assetId)
308	308		valueOrElse(au(h), if (!(ai(P)))
309	309		then throw("Price must be > 0")
310	310		else [N(h, aF.caller, P)])
311	311		}
312	312
313	313
314	314
315	315		@Callable(aF)
316	316		func addAuction (K,L,M) = {
317	317		let h = value(aF.payments[0].assetId)
318	318		valueOrElse(au(h), [I(aF.caller, h, K, L, M), StringEntry(((toBase58String(h) + a) + "nft_owner"), toString(aF.caller))])
319	319		}
320	320
321	321
322	322
323	323		@Callable(aF)
324	324		func buyFromSlot (h) = {
325	325		let aZ = $Tuple2(aF.payments[0].assetId, value(aF.payments[0].amount))
326	326		let aw = aZ._1
327	327		let ax = aZ._2
328	328		let T = fromBase58String(h)
329	329		let ba = aD(T)
330	330		let bb = ba._1
331	331		let B = ba._2
332	332		let bc = [ScriptTransfer(aF.caller, 1, T), DeleteEntry(f(bb, T))]
333	333		if ((bb == c))
334	334		then {
335	335		let bd = D(B)
336	336		let J = bd._1
337	337		let be = bd._2
338	338		valueOrElse(av(aw, ax, be), {
339	339		let bf = aA(af(T), ax, be)
340	340		let bg = bf._1
341	341		let bh = bf._2
342	342		let bi = (bc ++ [ScriptTransfer(J, bg, unit)])
343	343		if ((bh > 0))
344	344		then (bi ++ [ScriptTransfer(aF.caller, bh, unit)])
345	345		else bi
346	346		})
347	347		}
348	348		else {
349	349		let bj = S(T, height)
350	350		let J = bj._1
351	351		let aC = bj._2
352	352		valueOrElse(av(aw, ax, aC), {
353	353		let bk = aA(af(T), ax, aC)
354	354		let bg = bk._1
355	355		let bh = bk._2
356	356		let bi = (bc ++ [ScriptTransfer(J, bg, unit)])
357	357		if ((bh > 0))
358	358		then (bi ++ [ScriptTransfer(aF.caller, bh, unit)])
359	359		else bi
360	360		})
361	361		}
362	362		}
363	363
364	364
365	365
366	366		@Callable(aF)
367	367		func declineSlot (h) = {
368	368		let T = fromBase58String(h)
369	369		let bl = aD(T)
370	370		let bb = bl._1
371	371		let B = bl._2
372	372		let bc = [DeleteEntry(f(bb, T))]
373	373		if ((bb == c))
374	374		then {
375	375		let bm = D(B)
376	376		let J = bm._1
377	377		let be = bm._2
378	378		if (!(an(aF.caller, J)))
379	379		then throw("Invalid caller")
380	380		else (bc ++ [ScriptTransfer(J, 1, T)])
381	381		}
382	382		else {
383	383		let bn = A(B)
384	384		let J = bn._1
385	385		let W = bn._2
386	386		let X = bn._3
387	387		let Y = bn._4
388	388		let Z = bn._5
389	389		if (!(an(aF.caller, J)))
390	390		then throw("Invalid caller")
391	391		else if (!(ao(height, Z)))
392	392		then throw("Wait for end of auction")
393	393		else (bc ++ [ScriptTransfer(J, 1, T)])
394	394		}
395	395		}
396	396
397	397
398	398
399	399		@Callable(aF)
400	400		func setTrustedIssuer (bo) = if (!(al(aF.caller)))
401	401		then throw("Only admin")
402	402		else [BooleanEntry(l(addressFromStringValue(bo)), true)]
403	403
404	404
405	405
406	406		@Callable(aF)
407	407		func getPriceAtCurrentMoment (h,U) = {
408	408		let T = fromBase58String(h)
409	409		let bp = S(T, U)
410	410		let J = bp._1
411	411		let P = bp._2
412	412		[IntegerEntry(i(T), P)]
413	413		}
414	414
415	415
416		-
417		-	@Callable(aF)
418		-	func placeNFT (P) = {
419		-	let bq = $Tuple2(value(aF.payments[0].assetId), value(aF.payments[0].amount))
420		-	let aX = bq._1
421		-	let aY = bq._2
422		-	if (!(ad(aX)))
423		-	then throw("Token is not NFT")
424		-	else [StringEntry(((e + a) + toBase58String(value(aF.payments[0].assetId))), toString(P)), StringEntry(((toString(aF.caller) + a) + c), ((toBase58String(aX) + a) + toString(aY)))]
425		-	}
426		-
427		-

github/deemru/w8io/169f3d6 
80.20 ms ◑