w8 · tx · 14Q···aDV

tx · 14Q7qmh7iZwUCVAxwpysZf7kWP5xVXmmehVhBrFDiaDV

3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq:  -0.50000000 Waves

2022.11.29 14:58 [2338349] smart account 3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "14Q7qmh7iZwUCVAxwpysZf7kWP5xVXmmehVhBrFDiaDV",
    "fee": 50000000,
    "feeAssetId": null,
    "timestamp": 1669723131738,
    "version": 2,
    "chainId": 84,
    "sender": "3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq",
    "senderPublicKey": "H6UqxUDcJamDRg1uykVcWMn4zhAMTV7i1nfPq1moLWmJ",
    "proofs": [
        "36iFJLr8DaZbc7iXvMsueWgESsL7BMR1SQebwzH2MnoMd7WQ17A5yaDFDVejKB8jokCJ1qUJcDJB12sCTukAXkQX"
    ],
    "script": "base64:BgJACAISCwoJCAgICAgBCAgIEgQKAggIEgMKAQgSAwoBARIDCgEBEgUKAwEICBIDCgEIEgMKAQgSAwoBCBIECgIIASYACXNlcGFyYXRvcgIBXwAIa0F1Y3Rpb24CB2F1Y3Rpb24ABWtTZWxsAgRzZWxsAAhrVHJ1c3RlZAIHdHJ1c3RlZAAGa1ByaWNlAgVwcmljZQEKZ2V0U2xvdEtleQIGcHJlZml4BW5mdElkCQCsAgIJAKwCAgUGcHJlZml4BQlzZXBhcmF0b3IJANgEAQUFbmZ0SWQBC2dldFByaWNlS2V5AQVuZnRJZAkArAICCQCsAgIFBmtQcmljZQUJc2VwYXJhdG9yCQDYBAEFBW5mdElkAQpnZXRTZWxsS2V5AQVuZnRJZAkArAICCQCsAgIFBWtTZWxsBQlzZXBhcmF0b3IJANgEAQUFbmZ0SWQBDWdldEF1Y3Rpb25LZXkBBW5mdElkCQCsAgIJAKwCAgUIa0F1Y3Rpb24FCXNlcGFyYXRvcgkA2AQBBQVuZnRJZAENZ2V0VHJ1c3RlZEtleQEGaXNzdWVyCQCsAgIJAKwCAgUIa1RydXN0ZWQFCXNlcGFyYXRvcgkApQgBBQZpc3N1ZXIBCWFkZFRvTGlzdAIFYWNjdW0JbmV4dFZhbHVlCQDOCAIFBWFjY3VtCQDMCAIFCW5leHRWYWx1ZQUDbmlsAQpqb2luU3RyaW5nAQZwYXJhbXMEBmxlbmd0aAkAkAMBBQZwYXJhbXMDCQAAAgUGbGVuZ3RoAAAJAAIBAg1FbXB0eSAgcGFyYW1zAwkAAAIFBmxlbmd0aAABCQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDEJAQUkZjBfMgIJAQUkZjBfMQIFBSRhY2MwAAAAAQUJc2VwYXJhdG9yAwkAAAIFBmxlbmd0aAACCQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACBQlzZXBhcmF0b3IDCQAAAgUGbGVuZ3RoAAMJALkJAgoAAiRsBQZwYXJhbXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWFkZFRvTGlzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMwkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwUJc2VwYXJhdG9yAwkAAAIFBmxlbmd0aAAECQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDQJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAUJc2VwYXJhdG9yAwkAAAIFBmxlbmd0aAAFCQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFBQlzZXBhcmF0b3IJAAIBAiFNYXggbnVtYmVyIG9mIHBhcmFtZXRlcnMgZXhjZWVkZWQBDnBhcnNlQXNBdWN0aW9uAQdkZXRhaWxzBANyZXMJALUJAgUHZGV0YWlscwUJc2VwYXJhdG9yCQCXCgUJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUDcmVzAAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNyZXMAAQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA3JlcwACCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDcmVzAAMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNyZXMABAELcGFyc2VBc1NlbGwBB2RldGFpbHMEA3JlcwkAtQkCBQdkZXRhaWxzBQlzZXBhcmF0b3IJAJQKAgkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQNyZXMAAAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA3JlcwABAQpqb2luU3RydWN0AQZwYXJhbXMEByRtYXRjaDAFBnBhcmFtcwMJAAECBQckbWF0Y2gwAh4oQWRkcmVzcywgSW50LCBTdHJpbmcsIFN0cmluZykEB2F1Y3Rpb24FByRtYXRjaDAJAQpqb2luU3RyaW5nAQkAzAgCCQClCAEIBQdhdWN0aW9uAl8xCQDMCAIJAKQDAQgFB2F1Y3Rpb24CXzIJAMwIAggFB2F1Y3Rpb24CXzMJAMwIAggFB2F1Y3Rpb24CXzQFA25pbAMJAAECBQckbWF0Y2gwAg4oQWRkcmVzcywgSW50KQQEc2VsbAUHJG1hdGNoMAkBCmpvaW5TdHJpbmcBCQDMCAIJAKUIAQgFBHNlbGwCXzEJAMwIAgkApAMBCAUEc2VsbAJfMgUDbmlsCQACAQITV3JvbmcgcGFyYW1zIHR1cHBsZQEKc2V0QXVjdGlvbgUGc2VsbGVyBW5mdElkCnN0YXJ0UHJpY2UFc3RhcnQDZW5kCQELU3RyaW5nRW50cnkCCQENZ2V0QXVjdGlvbktleQEFBW5mdElkCQEKam9pblN0cnVjdAEJAJYKBAUGc2VsbGVyBQpzdGFydFByaWNlBQVzdGFydAUDZW5kAQdzZXRTZWxsAwVuZnRJZAZjZWxsZXIFcHJpY2UJAQtTdHJpbmdFbnRyeQIJAQpnZXRTZWxsS2V5AQUFbmZ0SWQJAQpqb2luU3RydWN0AQkAlAoCBQZjZWxsZXIFBXByaWNlAQpnZXRBdWN0aW9uAQVuZnRJZAkBBXZhbHVlAQkAnQgCBQR0aGlzCQENZ2V0QXVjdGlvbktleQEFBW5mdElkAQdnZXRTZWxsAQVuZnRJZAkBBXZhbHVlAQkAnQgCBQR0aGlzCQEKZ2V0U2VsbEtleQEFBW5mdElkARhjYWxjUHJpY2VBdEN1cnJlbnRNb21lbnQCB2Fzc2V0SWQGbW9tZW50BAdkZXRhaWxzCQEKZ2V0QXVjdGlvbgEFB2Fzc2V0SWQECyR0MDI3NTUyODU5CQEOcGFyc2VBc0F1Y3Rpb24BBQdkZXRhaWxzBAZzZWxsZXIIBQskdDAyNzU1Mjg1OQJfMQQPc3RhcnRQcmljZVZhbHVlCAULJHQwMjc1NTI4NTkCXzIEDWVuZFByaWNlVmFsdWUIBQskdDAyNzU1Mjg1OQJfMwQQc3RhcnRQZXJpb2RWYWx1ZQgFCyR0MDI3NTUyODU5Al80BA5lbmRQZXJpb2RWYWx1ZQgFCyR0MDI3NTUyODU5Al81AwkAZwIFBm1vbWVudAUOZW5kUGVyaW9kVmFsdWUJAJQKAgUGc2VsbGVyBQ1lbmRQcmljZVZhbHVlBApkZWx0YVByaWNlCQBlAgUPc3RhcnRQcmljZVZhbHVlBQ1lbmRQcmljZVZhbHVlBAZwZXJpb2QJAGUCBQ5lbmRQZXJpb2RWYWx1ZQUQc3RhcnRQZXJpb2RWYWx1ZQQHc3BlbmRlZAkAZQIFBm1vbWVudAUQc3RhcnRQZXJpb2RWYWx1ZQkAlAoCBQZzZWxsZXIJAGUCBQ9zdGFydFByaWNlVmFsdWUJAGsDBQdzcGVuZGVkBQpkZWx0YVByaWNlBQZwZXJpb2QBBWlzTmZ0AQdhc3NldElkBAckbWF0Y2gwCQDsBwEFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIFQXNzZXQEBXRva2VuBQckbWF0Y2gwAwMJAAACCAUFdG9rZW4IZGVjaW1hbHMAAAkAAAIIBQV0b2tlbghxdWFudGl0eQABBwkAAAIIBQV0b2tlbgpyZWlzc3VhYmxlBwcHAQxpc1RydXN0ZWROZnQBB2Fzc2V0SWQEBmlzc3VlcggJAQV2YWx1ZQEJAOwHAQUHYXNzZXRJZAZpc3N1ZXIJAQt2YWx1ZU9yRWxzZQIJAJsIAgUEdGhpcwkBDWdldFRydXN0ZWRLZXkBBQZpc3N1ZXIHAQtpc1NlbGxFeGlzdAEHYXNzZXRJZAkBCWlzRGVmaW5lZAEJAJ0IAgUEdGhpcwkBCmdldFNlbGxLZXkBBQdhc3NldElkAQ5pc0F1Y3Rpb25FeGlzdAEHYXNzZXRJZAkBCWlzRGVmaW5lZAEJAJ0IAgUEdGhpcwkBDWdldEF1Y3Rpb25LZXkBBQdhc3NldElkARJpc0NvcnJlY3RTZWxsUHJpY2UBBXByaWNlCQBmAgUFcHJpY2UAAAEWaXNDb3JyZWN0QXVjdGlvblByaWNlcwIKc3RhcnRQcmljZQhlbmRQcmljZQkAZgIFCnN0YXJ0UHJpY2UFCGVuZFByaWNlAQdpc0FkbWluAQZjYWxsZXIJAAACBQZjYWxsZXIFBHRoaXMBDWlzVmFsaWRDYWxsZXICBmNhbGxlcgZzZWxsZXIDCQAAAgUGY2FsbGVyBQR0aGlzBgkAAAIFBmNhbGxlcgUGc2VsbGVyAQ5pc0F1Y3Rpb25FbmRlZAIDbm93A2VuZAkAZgIFA25vdwUDZW5kAQ1pc0Vub3VnaEZ1bmRzAgdwYXltZW50EmN1cnJlbnRNb21lbnRQcmljZQkAZwIFB3BheW1lbnQFEmN1cnJlbnRNb21lbnRQcmljZQEHaXNXYXdlcwEHYXNzZXRJZAkAAAIFB2Fzc2V0SWQFBHVuaXQBDGlzQ29ycmVjdE5mdAEFbmZ0SWQDCQEBIQEJAQVpc05mdAEFBW5mdElkCQACAQIQVG9rZW4gaXMgbm90IE5mdAMJAQtpc1NlbGxFeGlzdAEFBW5mdElkCQACAQITU2VsbCBhbHJlYWR5IGV4aXN0cwMJAQ5pc0F1Y3Rpb25FeGlzdAEFBW5mdElkCQACAQIWQXVjdGlvbiBhbHJlYWR5IGV4aXN0cwUEdW5pdAERaXNDb3JyZWN0UGF5bWVudHMDDHBheW1lbnRBc3NldA1wYXltZW50QW1vdW50BXByaWNlAwkBASEBCQEHaXNXYXdlcwEFDHBheW1lbnRBc3NldAkAAgECGFBheW1lbnQgbXVzdCBiZSBhdCBXQVZFUwMJAQEhAQkBDWlzRW5vdWdoRnVuZHMCBQ1wYXltZW50QW1vdW50BQVwcmljZQkAAgECEE5vdCBlbm91Z2ggZnVuZHMFBHVuaXQBB2NhbGNGZWUAAAABDmNhbGNUcnVzdGVkRmVlAAAAARJyZXN1bHRGdW5kc0Ftb3VudHMDCWlzVHJ1c3RlZA1wYXltZW50QW1vdW50C2FjdHVhbFByaWNlAwUJaXNUcnVzdGVkCQCUCgIJAGUCBQthY3R1YWxQcmljZQkBDmNhbGNUcnVzdGVkRmVlAAkAZQIFDXBheW1lbnRBbW91bnQFC2FjdHVhbFByaWNlCQCUCgIJAGUCBQthY3R1YWxQcmljZQkBB2NhbGNGZWUACQBlAgUNcGF5bWVudEFtb3VudAULYWN0dWFsUHJpY2UBB2dldFNsb3QBBW5mdElkAwkBC2lzU2VsbEV4aXN0AQUFbmZ0SWQJAJQKAgUFa1NlbGwJAQdnZXRTZWxsAQUFbmZ0SWQDCQEOaXNBdWN0aW9uRXhpc3QBBQVuZnRJZAkAlAoCBQhrQXVjdGlvbgkBCmdldEF1Y3Rpb24BBQVuZnRJZAkAAgECElNsb3QgZG9lc25gdCBleGlzdAAEa0J1eQIDYnV5CgFpAQljcmVhdGVORlQJCG5mdF9uYW1lCW5mdF9vd25lcg9uZnRfZEFwcEFkZHJlc3MIbmZ0X3R5cGUIbmZ0X3RhZ3MRbmZ0X3NlbGxpbmdfcHJpY2UPbmZ0X2Rlc2NyaXB0aW9uCm5mdF9vblNlbGwIbmZ0X2RhdGEECG5ld1Rva2VuCQDCCAUFCG5mdF9uYW1lBQ9uZnRfZGVzY3JpcHRpb24AAQAABwQHaXNzdWVJZAkAuAgBBQhuZXdUb2tlbgQEdHhJZAgFAWkNdHJhbnNhY3Rpb25JZAkAzAgCBQhuZXdUb2tlbgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQUHaXNzdWVJZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICBU93bmVyCQClCAEIBQFpBmNhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICCG5mdF90eXBlBQhuZnRfdHlwZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICCG5mdF90YWdzBQhuZnRfdGFncwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICD25mdF9kQXBwQWRkcmVzcwUPbmZ0X2RBcHBBZGRyZXNzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICEW5mdF9zZWxsaW5nX3ByaWNlBRFuZnRfc2VsbGluZ19wcmljZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICCm5mdF9vblNlbGwFCm5mdF9vblNlbGwJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJANgEAQUHaXNzdWVJZAUJc2VwYXJhdG9yAghuZnRfZGF0YQUIbmZ0X2RhdGEJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJANgEAQUEdHhJZAUJc2VwYXJhdG9yAglpc3N1ZV9uZnQJANgEAQUHaXNzdWVJZAUDbmlsAWkBCGlzc3VlTmZ0AgRuYW1lBG1ldGEECG5ld1Rva2VuCQDCCAUFBG5hbWUFBG1ldGEAAQAABwQHaXNzdWVJZAkAuAgBBQhuZXdUb2tlbgkAzAgCBQhuZXdUb2tlbgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQUHaXNzdWVJZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICBU93bmVyCQClCAEIBQFpBmNhbGxlcgUDbmlsAWkBBmJ1eU5GVAEFbmZ0SUQEB2Fzc2V0SWQJANkEAQUFbmZ0SUQEBmFtb3VudAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQEBXByaWNlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkArAICCQCsAgIFBmtQcmljZQUJc2VwYXJhdG9yBQVuZnRJRAIeVGhlcmUgaXMgbm8gcHJpY2UgZm9yIHRoaXMgTkZUBAVvd25lcgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQERQGV4dHJOYXRpdmUoMTA1OCkBCQCsAgIJAKwCAgUFbmZ0SUQFCXNlcGFyYXRvcgIFT3duZXICCE5vIG93bmVyAwkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQR1bml0CQACAQIMUGF5IGluIHdhdmVzAwkAZgIJAQ1wYXJzZUludFZhbHVlAQUFcHJpY2UFBmFtb3VudAkAAgECD0ludmFsaWQgcGF5bWVudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQUHYXNzZXRJZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQEFdmFsdWUBCQCmCAEFBW93bmVyCQENcGFyc2VJbnRWYWx1ZQEFBXByaWNlBQR1bml0CQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQClCAEIBQFpBmNhbGxlcgUJc2VwYXJhdG9yBQRrQnV5CQCsAgIJAKwCAgUFbmZ0SUQFCXNlcGFyYXRvcgkApAMBBQZhbW91bnQFA25pbAFpAQdzZWxsTkZUAQVwcmljZQQLJHQwNzM0MTc0MjYJAJQKAgkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQGdG9rZW4wCAULJHQwNzM0MTc0MjYCXzEEB2Ftb3VudDAIBQskdDA3MzQxNzQyNgJfMgMJAQEhAQkBBWlzTmZ0AQUGdG9rZW4wCQACAQIQVG9rZW4gaXMgbm90IE5GVAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgUGa1ByaWNlBQlzZXBhcmF0b3IJANgEAQkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCQCkAwEFBXByaWNlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQClCAEIBQFpBmNhbGxlcgUJc2VwYXJhdG9yBQVrU2VsbAkArAICCQCsAgIJANgEAQUGdG9rZW4wBQlzZXBhcmF0b3IJAKQDAQUHYW1vdW50MAUDbmlsAWkBB2FkZFNlbGwBBXByaWNlBAVuZnRJZAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCQELdmFsdWVPckVsc2UCCQEMaXNDb3JyZWN0TmZ0AQUFbmZ0SWQDCQEBIQEJARJpc0NvcnJlY3RTZWxsUHJpY2UBBQVwcmljZQkAAgECEVByaWNlIG11c3QgYmUgPiAwCQDMCAIJAQdzZXRTZWxsAwUFbmZ0SWQIBQFpBmNhbGxlcgUFcHJpY2UFA25pbAFpAQphZGRBdWN0aW9uAwpzdGFydFByaWNlBXN0YXJ0A2VuZAQFbmZ0SWQJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAQFcHJpY2UJAKQDAQUKc3RhcnRQcmljZQQHYXVjdGlvbgkAlgoECAUBaQZjYWxsZXIFBXByaWNlBQVzdGFydAUDZW5kCQELdmFsdWVPckVsc2UCCQEMaXNDb3JyZWN0TmZ0AQUFbmZ0SWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBDWdldEF1Y3Rpb25LZXkBBQVuZnRJZAkBCmpvaW5TdHJpbmcBCQDMCAIJAKUIAQgFB2F1Y3Rpb24CXzEJAMwIAggFB2F1Y3Rpb24CXzIJAMwIAggFB2F1Y3Rpb24CXzMJAMwIAggFB2F1Y3Rpb24CXzQFA25pbAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQVuZnRJZAUJc2VwYXJhdG9yAgluZnRfb3duZXIJAKUIAQgFAWkGY2FsbGVyBQNuaWwBaQELYnV5RnJvbVNsb3QBBW5mdElkBAskdDA4NTQwODYyOQkAlAoCCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAxwYXltZW50QXNzZXQIBQskdDA4NTQwODYyOQJfMQQNcGF5bWVudEFtb3VudAgFCyR0MDg1NDA4NjI5Al8yBAdhc3NldElkCQDZBAEFBW5mdElkBAskdDA4NjczODcxMQkBB2dldFNsb3QBBQdhc3NldElkBAR0eXBlCAULJHQwODY3Mzg3MTECXzEEB2RldGFpbHMIBQskdDA4NjczODcxMQJfMgQHYmFzZVJlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQUHYXNzZXRJZAkAzAgCCQELRGVsZXRlRW50cnkBCQEKZ2V0U2xvdEtleQIFBHR5cGUFB2Fzc2V0SWQFA25pbAMJAAACBQR0eXBlBQVrU2VsbAQLJHQwODg1Mzg5MDAJAQtwYXJzZUFzU2VsbAEFB2RldGFpbHMEBnNlbGxlcggFCyR0MDg4NTM4OTAwAl8xBApwcmljZVZhbHVlCAULJHQwODg1Mzg5MDACXzIJAQt2YWx1ZU9yRWxzZQIJARFpc0NvcnJlY3RQYXltZW50cwMFDHBheW1lbnRBc3NldAUNcGF5bWVudEFtb3VudAUKcHJpY2VWYWx1ZQQLJHQwODk4NTkwODcJARJyZXN1bHRGdW5kc0Ftb3VudHMDCQEMaXNUcnVzdGVkTmZ0AQUHYXNzZXRJZAUNcGF5bWVudEFtb3VudAUKcHJpY2VWYWx1ZQQMc2VsbGVyQW1vdW50CAULJHQwODk4NTkwODcCXzEEC2J1eWVyQW1vdW50CAULJHQwODk4NTkwODcCXzIECnVwZGF0ZWRSZXMJAM4IAgUHYmFzZVJlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQZzZWxsZXIFDHNlbGxlckFtb3VudAUEdW5pdAUDbmlsAwkAZgIFC2J1eWVyQW1vdW50AAAJAM4IAgUKdXBkYXRlZFJlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFC2J1eWVyQW1vdW50BQR1bml0BQNuaWwFCnVwZGF0ZWRSZXMECyR0MDkzMDQ5MzczCQEYY2FsY1ByaWNlQXRDdXJyZW50TW9tZW50AgUHYXNzZXRJZAUGaGVpZ2h0BAZzZWxsZXIIBQskdDA5MzA0OTM3MwJfMQQLYWN0dWFsUHJpY2UIBQskdDA5MzA0OTM3MwJfMgkBC3ZhbHVlT3JFbHNlAgkBEWlzQ29ycmVjdFBheW1lbnRzAwUMcGF5bWVudEFzc2V0BQ1wYXltZW50QW1vdW50BQthY3R1YWxQcmljZQQLJHQwOTQ1OTk1NjIJARJyZXN1bHRGdW5kc0Ftb3VudHMDCQEMaXNUcnVzdGVkTmZ0AQUHYXNzZXRJZAUNcGF5bWVudEFtb3VudAULYWN0dWFsUHJpY2UEDHNlbGxlckFtb3VudAgFCyR0MDk0NTk5NTYyAl8xBAtidXllckFtb3VudAgFCyR0MDk0NTk5NTYyAl8yBAp1cGRhdGVkUmVzCQDOCAIFB2Jhc2VSZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUGc2VsbGVyBQxzZWxsZXJBbW91bnQFBHVuaXQFA25pbAMJAGYCBQtidXllckFtb3VudAAACQDOCAIFCnVwZGF0ZWRSZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQtidXllckFtb3VudAUEdW5pdAUDbmlsBQp1cGRhdGVkUmVzAWkBC2RlY2xpbmVTbG90AQVuZnRJZAQHYXNzZXRJZAkA2QQBBQVuZnRJZAQLJHQwOTg2Mzk5MDEJAQdnZXRTbG90AQUHYXNzZXRJZAQEdHlwZQgFCyR0MDk4NjM5OTAxAl8xBAdkZXRhaWxzCAULJHQwOTg2Mzk5MDECXzIEB2Jhc2VSZXMJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCmdldFNsb3RLZXkCBQR0eXBlBQdhc3NldElkBQNuaWwDCQAAAgUEdHlwZQUFa1NlbGwEDCR0MDk5OTMxMDA0MAkBC3BhcnNlQXNTZWxsAQUHZGV0YWlscwQGc2VsbGVyCAUMJHQwOTk5MzEwMDQwAl8xBApwcmljZVZhbHVlCAUMJHQwOTk5MzEwMDQwAl8yAwkBASEBCQENaXNWYWxpZENhbGxlcgIIBQFpBmNhbGxlcgUGc2VsbGVyCQACAQIOSW52YWxpZCBjYWxsZXIJAM4IAgUHYmFzZVJlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQZzZWxsZXIAAQUHYXNzZXRJZAUDbmlsBA0kdDAxMDE4NTEwMjg5CQEOcGFyc2VBc0F1Y3Rpb24BBQdkZXRhaWxzBAZzZWxsZXIIBQ0kdDAxMDE4NTEwMjg5Al8xBA9zdGFydFByaWNlVmFsdWUIBQ0kdDAxMDE4NTEwMjg5Al8yBA1lbmRQcmljZVZhbHVlCAUNJHQwMTAxODUxMDI4OQJfMwQQc3RhcnRQZXJpb2RWYWx1ZQgFDSR0MDEwMTg1MTAyODkCXzQEDmVuZFBlcmlvZFZhbHVlCAUNJHQwMTAxODUxMDI4OQJfNQMJAQEhAQkBDWlzVmFsaWRDYWxsZXICCAUBaQZjYWxsZXIFBnNlbGxlcgkAAgECDkludmFsaWQgY2FsbGVyAwkBASEBCQEOaXNBdWN0aW9uRW5kZWQCBQZoZWlnaHQFDmVuZFBlcmlvZFZhbHVlCQACAQIXV2FpdCBmb3IgZW5kIG9mIGF1Y3Rpb24JAM4IAgUHYmFzZVJlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQZzZWxsZXIAAQUHYXNzZXRJZAUDbmlsAWkBEHNldFRydXN0ZWRJc3N1ZXIBC3RydXN0ZWRBZGRyAwkBASEBCQEHaXNBZG1pbgEIBQFpBmNhbGxlcgkAAgECCk9ubHkgYWRtaW4JAMwIAgkBDEJvb2xlYW5FbnRyeQIJAQ1nZXRUcnVzdGVkS2V5AQkBEUBleHRyTmF0aXZlKDEwNjIpAQULdHJ1c3RlZEFkZHIGBQNuaWwBaQEXZ2V0UHJpY2VBdEN1cnJlbnRNb21lbnQCBW5mdElkBm1vbWVudAQHYXNzZXRJZAkA2QQBBQVuZnRJZAQNJHQwMTA4MzAxMDg5MwkBGGNhbGNQcmljZUF0Q3VycmVudE1vbWVudAIFB2Fzc2V0SWQFBm1vbWVudAQGc2VsbGVyCAUNJHQwMTA4MzAxMDg5MwJfMQQFcHJpY2UIBQ0kdDAxMDgzMDEwODkzAl8yCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQELZ2V0UHJpY2VLZXkBBQdhc3NldElkBQVwcmljZQUDbmlsALloLT8=",
    "height": 2338349,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 5DK43zoTAqjFYvtxY9MV6jxc3tGMbLn5TcUK8DKAkimG
Next: DsQ8qPkofuT8qBZssjzLqmjBBiXJYod9DR9YrreKER7B

Diff: 
Old New Differences
316 316  @Callable(aF)
317 317  func addAuction (K,L,M) = {
318 318      let h = value(aF.payments[0].assetId)
319 -     let G = $Tuple4(aF.caller, K, L, M)
320 -     valueOrElse(au(h), [StringEntry(k(h), q([toString(G._1), toString(G._2), G._3, G._4])), StringEntry(((toBase58String(h) + a) + "nft_owner"), toString(aF.caller))])
319 +     let P = toString(K)
320 +     let G = $Tuple4(aF.caller, P, L, M)
321 +     valueOrElse(au(h), [StringEntry(k(h), q([toString(G._1), G._2, G._3, G._4])), StringEntry(((toBase58String(h) + a) + "nft_owner"), toString(aF.caller))])
321 322      }
322 323  
323 324  
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      let aR = aF.transactionId
265 265  [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), StringEntry(((toBase58String(aR) + a) + "issue_nft"), toBase58String(aQ))]
266 266      }
267 267  
268 268  
269 269  
270 270  @Callable(aF)
271 271  func issueNft (aS,aT) = {
272 272      let aP = Issue(aS, aT, 1, 0, false)
273 273      let aQ = calculateAssetId(aP)
274 274  [aP, ScriptTransfer(aF.caller, 1, aQ), StringEntry(((toBase58String(aQ) + a) + "Owner"), toString(aF.caller))]
275 275      }
276 276  
277 277  
278 278  
279 279  @Callable(aF)
280 280  func buyNFT (aU) = {
281 281      let T = fromBase58String(aU)
282 282      let aV = value(aF.payments[0].amount)
283 283      let P = valueOrErrorMessage(getString(((e + a) + aU)), "There is no price for this NFT")
284 284      let aW = valueOrErrorMessage(getStringValue(((aU + a) + "Owner")), "No owner")
285 285      if ((aF.payments[0].assetId != unit))
286 286          then throw("Pay in waves")
287 287          else if ((parseIntValue(P) > aV))
288 288              then throw("Invalid payment")
289 289              else [ScriptTransfer(aF.caller, 1, T), ScriptTransfer(value(addressFromString(aW)), parseIntValue(P), unit), StringEntry(((toString(aF.caller) + a) + aE), ((aU + a) + toString(aV)))]
290 290      }
291 291  
292 292  
293 293  
294 294  @Callable(aF)
295 295  func sellNFT (P) = {
296 296      let aX = $Tuple2(value(aF.payments[0].assetId), value(aF.payments[0].amount))
297 297      let aY = aX._1
298 298      let aZ = aX._2
299 299      if (!(ad(aY)))
300 300          then throw("Token is not NFT")
301 301          else [StringEntry(((e + a) + toBase58String(value(aF.payments[0].assetId))), toString(P)), StringEntry(((toString(aF.caller) + a) + c), ((toBase58String(aY) + a) + toString(aZ)))]
302 302      }
303 303  
304 304  
305 305  
306 306  @Callable(aF)
307 307  func addSell (P) = {
308 308      let h = value(aF.payments[0].assetId)
309 309      valueOrElse(au(h), if (!(ai(P)))
310 310          then throw("Price must be > 0")
311 311          else [N(h, aF.caller, P)])
312 312      }
313 313  
314 314  
315 315  
316 316  @Callable(aF)
317 317  func addAuction (K,L,M) = {
318 318      let h = value(aF.payments[0].assetId)
319 -     let G = $Tuple4(aF.caller, K, L, M)
320 -     valueOrElse(au(h), [StringEntry(k(h), q([toString(G._1), toString(G._2), G._3, G._4])), StringEntry(((toBase58String(h) + a) + "nft_owner"), toString(aF.caller))])
319 +     let P = toString(K)
320 +     let G = $Tuple4(aF.caller, P, L, M)
321 +     valueOrElse(au(h), [StringEntry(k(h), q([toString(G._1), G._2, G._3, G._4])), StringEntry(((toBase58String(h) + a) + "nft_owner"), toString(aF.caller))])
321 322      }
322 323  
323 324  
324 325  
325 326  @Callable(aF)
326 327  func buyFromSlot (h) = {
327 328      let ba = $Tuple2(aF.payments[0].assetId, value(aF.payments[0].amount))
328 329      let aw = ba._1
329 330      let ax = ba._2
330 331      let T = fromBase58String(h)
331 332      let bb = aD(T)
332 333      let bc = bb._1
333 334      let B = bb._2
334 335      let bd = [ScriptTransfer(aF.caller, 1, T), DeleteEntry(f(bc, T))]
335 336      if ((bc == c))
336 337          then {
337 338              let be = D(B)
338 339              let J = be._1
339 340              let bf = be._2
340 341              valueOrElse(av(aw, ax, bf), {
341 342                  let bg = aA(af(T), ax, bf)
342 343                  let bh = bg._1
343 344                  let bi = bg._2
344 345                  let bj = (bd ++ [ScriptTransfer(J, bh, unit)])
345 346                  if ((bi > 0))
346 347                      then (bj ++ [ScriptTransfer(aF.caller, bi, unit)])
347 348                      else bj
348 349                  })
349 350              }
350 351          else {
351 352              let bk = S(T, height)
352 353              let J = bk._1
353 354              let aC = bk._2
354 355              valueOrElse(av(aw, ax, aC), {
355 356                  let bl = aA(af(T), ax, aC)
356 357                  let bh = bl._1
357 358                  let bi = bl._2
358 359                  let bj = (bd ++ [ScriptTransfer(J, bh, unit)])
359 360                  if ((bi > 0))
360 361                      then (bj ++ [ScriptTransfer(aF.caller, bi, unit)])
361 362                      else bj
362 363                  })
363 364              }
364 365      }
365 366  
366 367  
367 368  
368 369  @Callable(aF)
369 370  func declineSlot (h) = {
370 371      let T = fromBase58String(h)
371 372      let bm = aD(T)
372 373      let bc = bm._1
373 374      let B = bm._2
374 375      let bd = [DeleteEntry(f(bc, T))]
375 376      if ((bc == c))
376 377          then {
377 378              let bn = D(B)
378 379              let J = bn._1
379 380              let bf = bn._2
380 381              if (!(an(aF.caller, J)))
381 382                  then throw("Invalid caller")
382 383                  else (bd ++ [ScriptTransfer(J, 1, T)])
383 384              }
384 385          else {
385 386              let bo = A(B)
386 387              let J = bo._1
387 388              let W = bo._2
388 389              let X = bo._3
389 390              let Y = bo._4
390 391              let Z = bo._5
391 392              if (!(an(aF.caller, J)))
392 393                  then throw("Invalid caller")
393 394                  else if (!(ao(height, Z)))
394 395                      then throw("Wait for end of auction")
395 396                      else (bd ++ [ScriptTransfer(J, 1, T)])
396 397              }
397 398      }
398 399  
399 400  
400 401  
401 402  @Callable(aF)
402 403  func setTrustedIssuer (bp) = if (!(al(aF.caller)))
403 404      then throw("Only admin")
404 405      else [BooleanEntry(l(addressFromStringValue(bp)), true)]
405 406  
406 407  
407 408  
408 409  @Callable(aF)
409 410  func getPriceAtCurrentMoment (h,U) = {
410 411      let T = fromBase58String(h)
411 412      let bq = S(T, U)
412 413      let J = bq._1
413 414      let P = bq._2
414 415  [IntegerEntry(i(T), P)]
415 416      }
416 417  
417 418

Old	New		Differences
316	316		@Callable(aF)
317	317		func addAuction (K,L,M) = {
318	318		let h = value(aF.payments[0].assetId)
319		-	let G = $Tuple4(aF.caller, K, L, M)
320		-	valueOrElse(au(h), [StringEntry(k(h), q([toString(G._1), toString(G._2), G._3, G._4])), StringEntry(((toBase58String(h) + a) + "nft_owner"), toString(aF.caller))])
	319	+	let P = toString(K)
	320	+	let G = $Tuple4(aF.caller, P, L, M)
	321	+	valueOrElse(au(h), [StringEntry(k(h), q([toString(G._1), G._2, G._3, G._4])), StringEntry(((toBase58String(h) + a) + "nft_owner"), toString(aF.caller))])
321	322		}
322	323
323	324

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		let aR = aF.transactionId
265	265		[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), StringEntry(((toBase58String(aR) + a) + "issue_nft"), toBase58String(aQ))]
266	266		}
267	267
268	268
269	269
270	270		@Callable(aF)
271	271		func issueNft (aS,aT) = {
272	272		let aP = Issue(aS, aT, 1, 0, false)
273	273		let aQ = calculateAssetId(aP)
274	274		[aP, ScriptTransfer(aF.caller, 1, aQ), StringEntry(((toBase58String(aQ) + a) + "Owner"), toString(aF.caller))]
275	275		}
276	276
277	277
278	278
279	279		@Callable(aF)
280	280		func buyNFT (aU) = {
281	281		let T = fromBase58String(aU)
282	282		let aV = value(aF.payments[0].amount)
283	283		let P = valueOrErrorMessage(getString(((e + a) + aU)), "There is no price for this NFT")
284	284		let aW = valueOrErrorMessage(getStringValue(((aU + a) + "Owner")), "No owner")
285	285		if ((aF.payments[0].assetId != unit))
286	286		then throw("Pay in waves")
287	287		else if ((parseIntValue(P) > aV))
288	288		then throw("Invalid payment")
289	289		else [ScriptTransfer(aF.caller, 1, T), ScriptTransfer(value(addressFromString(aW)), parseIntValue(P), unit), StringEntry(((toString(aF.caller) + a) + aE), ((aU + a) + toString(aV)))]
290	290		}
291	291
292	292
293	293
294	294		@Callable(aF)
295	295		func sellNFT (P) = {
296	296		let aX = $Tuple2(value(aF.payments[0].assetId), value(aF.payments[0].amount))
297	297		let aY = aX._1
298	298		let aZ = aX._2
299	299		if (!(ad(aY)))
300	300		then throw("Token is not NFT")
301	301		else [StringEntry(((e + a) + toBase58String(value(aF.payments[0].assetId))), toString(P)), StringEntry(((toString(aF.caller) + a) + c), ((toBase58String(aY) + a) + toString(aZ)))]
302	302		}
303	303
304	304
305	305
306	306		@Callable(aF)
307	307		func addSell (P) = {
308	308		let h = value(aF.payments[0].assetId)
309	309		valueOrElse(au(h), if (!(ai(P)))
310	310		then throw("Price must be > 0")
311	311		else [N(h, aF.caller, P)])
312	312		}
313	313
314	314
315	315
316	316		@Callable(aF)
317	317		func addAuction (K,L,M) = {
318	318		let h = value(aF.payments[0].assetId)
319		-	let G = $Tuple4(aF.caller, K, L, M)
320		-	valueOrElse(au(h), [StringEntry(k(h), q([toString(G._1), toString(G._2), G._3, G._4])), StringEntry(((toBase58String(h) + a) + "nft_owner"), toString(aF.caller))])
	319	+	let P = toString(K)
	320	+	let G = $Tuple4(aF.caller, P, L, M)
	321	+	valueOrElse(au(h), [StringEntry(k(h), q([toString(G._1), G._2, G._3, G._4])), StringEntry(((toBase58String(h) + a) + "nft_owner"), toString(aF.caller))])
321	322		}
322	323
323	324
324	325
325	326		@Callable(aF)
326	327		func buyFromSlot (h) = {
327	328		let ba = $Tuple2(aF.payments[0].assetId, value(aF.payments[0].amount))
328	329		let aw = ba._1
329	330		let ax = ba._2
330	331		let T = fromBase58String(h)
331	332		let bb = aD(T)
332	333		let bc = bb._1
333	334		let B = bb._2
334	335		let bd = [ScriptTransfer(aF.caller, 1, T), DeleteEntry(f(bc, T))]
335	336		if ((bc == c))
336	337		then {
337	338		let be = D(B)
338	339		let J = be._1
339	340		let bf = be._2
340	341		valueOrElse(av(aw, ax, bf), {
341	342		let bg = aA(af(T), ax, bf)
342	343		let bh = bg._1
343	344		let bi = bg._2
344	345		let bj = (bd ++ [ScriptTransfer(J, bh, unit)])
345	346		if ((bi > 0))
346	347		then (bj ++ [ScriptTransfer(aF.caller, bi, unit)])
347	348		else bj
348	349		})
349	350		}
350	351		else {
351	352		let bk = S(T, height)
352	353		let J = bk._1
353	354		let aC = bk._2
354	355		valueOrElse(av(aw, ax, aC), {
355	356		let bl = aA(af(T), ax, aC)
356	357		let bh = bl._1
357	358		let bi = bl._2
358	359		let bj = (bd ++ [ScriptTransfer(J, bh, unit)])
359	360		if ((bi > 0))
360	361		then (bj ++ [ScriptTransfer(aF.caller, bi, unit)])
361	362		else bj
362	363		})
363	364		}
364	365		}
365	366
366	367
367	368
368	369		@Callable(aF)
369	370		func declineSlot (h) = {
370	371		let T = fromBase58String(h)
371	372		let bm = aD(T)
372	373		let bc = bm._1
373	374		let B = bm._2
374	375		let bd = [DeleteEntry(f(bc, T))]
375	376		if ((bc == c))
376	377		then {
377	378		let bn = D(B)
378	379		let J = bn._1
379	380		let bf = bn._2
380	381		if (!(an(aF.caller, J)))
381	382		then throw("Invalid caller")
382	383		else (bd ++ [ScriptTransfer(J, 1, T)])
383	384		}
384	385		else {
385	386		let bo = A(B)
386	387		let J = bo._1
387	388		let W = bo._2
388	389		let X = bo._3
389	390		let Y = bo._4
390	391		let Z = bo._5
391	392		if (!(an(aF.caller, J)))
392	393		then throw("Invalid caller")
393	394		else if (!(ao(height, Z)))
394	395		then throw("Wait for end of auction")
395	396		else (bd ++ [ScriptTransfer(J, 1, T)])
396	397		}
397	398		}
398	399
399	400
400	401
401	402		@Callable(aF)
402	403		func setTrustedIssuer (bp) = if (!(al(aF.caller)))
403	404		then throw("Only admin")
404	405		else [BooleanEntry(l(addressFromStringValue(bp)), true)]
405	406
406	407
407	408
408	409		@Callable(aF)
409	410		func getPriceAtCurrentMoment (h,U) = {
410	411		let T = fromBase58String(h)
411	412		let bq = S(T, U)
412	413		let J = bq._1
413	414		let P = bq._2
414	415		[IntegerEntry(i(T), P)]
415	416		}
416	417
417	418

github/deemru/w8io/026f985 
63.98 ms ◑