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
307
307
 
@Callable(i)
308
308
 
func addAuction (startPrice,start,end) = {
309
309
 
    let nftId = value(i.payments[0].assetId)
310
-
    let auction = $Tuple4(i.caller, startPrice, start, end)
311
-
    valueOrElse(isCorrectNft(nftId), [StringEntry(getAuctionKey(nftId), joinString([toString(auction._1), toString(auction._2), auction._3, auction._4])), StringEntry(((toBase58String(nftId) + separator) + "nft_owner"), toString(i.caller))])
310
+
    let price = toString(startPrice)
311
+
    let auction = $Tuple4(i.caller, price, start, end)
312
+
    valueOrElse(isCorrectNft(nftId), [StringEntry(getAuctionKey(nftId), joinString([toString(auction._1), auction._2, auction._3, auction._4])), StringEntry(((toBase58String(nftId) + separator) + "nft_owner"), toString(i.caller))])
312
313
 
    }
313
314
 
314
315
 
315
316
 
316
317
 
@Callable(i)
317
318
 
func buyFromSlot (nftId) = {
318
-
    let $t085208609 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
319
-
    let paymentAsset = $t085208609._1
320
-
    let paymentAmount = $t085208609._2
319
+
    let $t085408629 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
320
+
    let paymentAsset = $t085408629._1
321
+
    let paymentAmount = $t085408629._2
321
322
 
    let assetId = fromBase58String(nftId)
322
-
    let $t086538691 = getSlot(assetId)
323
-
    let type = $t086538691._1
324
-
    let details = $t086538691._2
323
+
    let $t086738711 = getSlot(assetId)
324
+
    let type = $t086738711._1
325
+
    let details = $t086738711._2
325
326
 
    let baseRes = [ScriptTransfer(i.caller, 1, assetId), DeleteEntry(getSlotKey(type, assetId))]
326
327
 
    if ((type == kSell))
327
328
 
        then {
328
-
            let $t088338880 = parseAsSell(details)
329
-
            let seller = $t088338880._1
330
-
            let priceValue = $t088338880._2
329
+
            let $t088538900 = parseAsSell(details)
330
+
            let seller = $t088538900._1
331
+
            let priceValue = $t088538900._2
331
332
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, priceValue), {
332
-
                let $t089659067 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
333
-
                let sellerAmount = $t089659067._1
334
-
                let buyerAmount = $t089659067._2
333
+
                let $t089859087 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
334
+
                let sellerAmount = $t089859087._1
335
+
                let buyerAmount = $t089859087._2
335
336
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
336
337
 
                if ((buyerAmount > 0))
337
338
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
339
340
 
                })
340
341
 
            }
341
342
 
        else {
342
-
            let $t092849353 = calcPriceAtCurrentMoment(assetId, height)
343
-
            let seller = $t092849353._1
344
-
            let actualPrice = $t092849353._2
343
+
            let $t093049373 = calcPriceAtCurrentMoment(assetId, height)
344
+
            let seller = $t093049373._1
345
+
            let actualPrice = $t093049373._2
345
346
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, actualPrice), {
346
-
                let $t094399542 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
347
-
                let sellerAmount = $t094399542._1
348
-
                let buyerAmount = $t094399542._2
347
+
                let $t094599562 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
348
+
                let sellerAmount = $t094599562._1
349
+
                let buyerAmount = $t094599562._2
349
350
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
350
351
 
                if ((buyerAmount > 0))
351
352
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
359
360
 
@Callable(i)
360
361
 
func declineSlot (nftId) = {
361
362
 
    let assetId = fromBase58String(nftId)
362
-
    let $t098439881 = getSlot(assetId)
363
-
    let type = $t098439881._1
364
-
    let details = $t098439881._2
363
+
    let $t098639901 = getSlot(assetId)
364
+
    let type = $t098639901._1
365
+
    let details = $t098639901._2
365
366
 
    let baseRes = [DeleteEntry(getSlotKey(type, assetId))]
366
367
 
    if ((type == kSell))
367
368
 
        then {
368
-
            let $t0997310020 = parseAsSell(details)
369
-
            let seller = $t0997310020._1
370
-
            let priceValue = $t0997310020._2
369
+
            let $t0999310040 = parseAsSell(details)
370
+
            let seller = $t0999310040._1
371
+
            let priceValue = $t0999310040._2
371
372
 
            if (!(isValidCaller(i.caller, seller)))
372
373
 
                then throw("Invalid caller")
373
374
 
                else (baseRes ++ [ScriptTransfer(seller, 1, assetId)])
374
375
 
            }
375
376
 
        else {
376
-
            let $t01016510269 = parseAsAuction(details)
377
-
            let seller = $t01016510269._1
378
-
            let startPriceValue = $t01016510269._2
379
-
            let endPriceValue = $t01016510269._3
380
-
            let startPeriodValue = $t01016510269._4
381
-
            let endPeriodValue = $t01016510269._5
377
+
            let $t01018510289 = parseAsAuction(details)
378
+
            let seller = $t01018510289._1
379
+
            let startPriceValue = $t01018510289._2
380
+
            let endPriceValue = $t01018510289._3
381
+
            let startPeriodValue = $t01018510289._4
382
+
            let endPeriodValue = $t01018510289._5
382
383
 
            if (!(isValidCaller(i.caller, seller)))
383
384
 
                then throw("Invalid caller")
384
385
 
                else if (!(isAuctionEnded(height, endPeriodValue)))
399
400
 
@Callable(i)
400
401
 
func getPriceAtCurrentMoment (nftId,moment) = {
401
402
 
    let assetId = fromBase58String(nftId)
402
-
    let $t01081010873 = calcPriceAtCurrentMoment(assetId, moment)
403
-
    let seller = $t01081010873._1
404
-
    let price = $t01081010873._2
403
+
    let $t01083010893 = calcPriceAtCurrentMoment(assetId, moment)
404
+
    let seller = $t01083010893._1
405
+
    let price = $t01083010893._2
405
406
 
[IntegerEntry(getPriceKey(assetId), price)]
406
407
 
    }
407
408
 

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
251
 
@Callable(i)
252
252
 
func createNFT (nft_name,nft_owner,nft_dAppAddress,nft_type,nft_tags,nft_selling_price,nft_description,nft_onSell,nft_data) = {
253
253
 
    let newToken = Issue(nft_name, nft_description, 1, 0, false)
254
254
 
    let issueId = calculateAssetId(newToken)
255
255
 
    let txId = i.transactionId
256
256
 
[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), StringEntry(((toBase58String(txId) + separator) + "issue_nft"), toBase58String(issueId))]
257
257
 
    }
258
258
 
259
259
 
260
260
 
261
261
 
@Callable(i)
262
262
 
func issueNft (name,meta) = {
263
263
 
    let newToken = Issue(name, meta, 1, 0, false)
264
264
 
    let issueId = calculateAssetId(newToken)
265
265
 
[newToken, ScriptTransfer(i.caller, 1, issueId), StringEntry(((toBase58String(issueId) + separator) + "Owner"), toString(i.caller))]
266
266
 
    }
267
267
 
268
268
 
269
269
 
270
270
 
@Callable(i)
271
271
 
func buyNFT (nftID) = {
272
272
 
    let assetId = fromBase58String(nftID)
273
273
 
    let amount = value(i.payments[0].amount)
274
274
 
    let price = valueOrErrorMessage(getString(((kPrice + separator) + nftID)), "There is no price for this NFT")
275
275
 
    let owner = valueOrErrorMessage(getStringValue(((nftID + separator) + "Owner")), "No owner")
276
276
 
    if ((i.payments[0].assetId != unit))
277
277
 
        then throw("Pay in waves")
278
278
 
        else if ((parseIntValue(price) > amount))
279
279
 
            then throw("Invalid payment")
280
280
 
            else [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(value(addressFromString(owner)), parseIntValue(price), unit), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount)))]
281
281
 
    }
282
282
 
283
283
 
284
284
 
285
285
 
@Callable(i)
286
286
 
func sellNFT (price) = {
287
287
 
    let $t073417426 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
288
288
 
    let token0 = $t073417426._1
289
289
 
    let amount0 = $t073417426._2
290
290
 
    if (!(isNft(token0)))
291
291
 
        then throw("Token is not NFT")
292
292
 
        else [StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), toString(price)), StringEntry(((toString(i.caller) + separator) + kSell), ((toBase58String(token0) + separator) + toString(amount0)))]
293
293
 
    }
294
294
 
295
295
 
296
296
 
297
297
 
@Callable(i)
298
298
 
func addSell (price) = {
299
299
 
    let nftId = value(i.payments[0].assetId)
300
300
 
    valueOrElse(isCorrectNft(nftId), if (!(isCorrectSellPrice(price)))
301
301
 
        then throw("Price must be > 0")
302
302
 
        else [setSell(nftId, i.caller, price)])
303
303
 
    }
304
304
 
305
305
 
306
306
 
307
307
 
@Callable(i)
308
308
 
func addAuction (startPrice,start,end) = {
309
309
 
    let nftId = value(i.payments[0].assetId)
310
-
    let auction = $Tuple4(i.caller, startPrice, start, end)
311
-
    valueOrElse(isCorrectNft(nftId), [StringEntry(getAuctionKey(nftId), joinString([toString(auction._1), toString(auction._2), auction._3, auction._4])), StringEntry(((toBase58String(nftId) + separator) + "nft_owner"), toString(i.caller))])
310
+
    let price = toString(startPrice)
311
+
    let auction = $Tuple4(i.caller, price, start, end)
312
+
    valueOrElse(isCorrectNft(nftId), [StringEntry(getAuctionKey(nftId), joinString([toString(auction._1), auction._2, auction._3, auction._4])), StringEntry(((toBase58String(nftId) + separator) + "nft_owner"), toString(i.caller))])
312
313
 
    }
313
314
 
314
315
 
315
316
 
316
317
 
@Callable(i)
317
318
 
func buyFromSlot (nftId) = {
318
-
    let $t085208609 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
319
-
    let paymentAsset = $t085208609._1
320
-
    let paymentAmount = $t085208609._2
319
+
    let $t085408629 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
320
+
    let paymentAsset = $t085408629._1
321
+
    let paymentAmount = $t085408629._2
321
322
 
    let assetId = fromBase58String(nftId)
322
-
    let $t086538691 = getSlot(assetId)
323
-
    let type = $t086538691._1
324
-
    let details = $t086538691._2
323
+
    let $t086738711 = getSlot(assetId)
324
+
    let type = $t086738711._1
325
+
    let details = $t086738711._2
325
326
 
    let baseRes = [ScriptTransfer(i.caller, 1, assetId), DeleteEntry(getSlotKey(type, assetId))]
326
327
 
    if ((type == kSell))
327
328
 
        then {
328
-
            let $t088338880 = parseAsSell(details)
329
-
            let seller = $t088338880._1
330
-
            let priceValue = $t088338880._2
329
+
            let $t088538900 = parseAsSell(details)
330
+
            let seller = $t088538900._1
331
+
            let priceValue = $t088538900._2
331
332
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, priceValue), {
332
-
                let $t089659067 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
333
-
                let sellerAmount = $t089659067._1
334
-
                let buyerAmount = $t089659067._2
333
+
                let $t089859087 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
334
+
                let sellerAmount = $t089859087._1
335
+
                let buyerAmount = $t089859087._2
335
336
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
336
337
 
                if ((buyerAmount > 0))
337
338
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
338
339
 
                    else updatedRes
339
340
 
                })
340
341
 
            }
341
342
 
        else {
342
-
            let $t092849353 = calcPriceAtCurrentMoment(assetId, height)
343
-
            let seller = $t092849353._1
344
-
            let actualPrice = $t092849353._2
343
+
            let $t093049373 = calcPriceAtCurrentMoment(assetId, height)
344
+
            let seller = $t093049373._1
345
+
            let actualPrice = $t093049373._2
345
346
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, actualPrice), {
346
-
                let $t094399542 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
347
-
                let sellerAmount = $t094399542._1
348
-
                let buyerAmount = $t094399542._2
347
+
                let $t094599562 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
348
+
                let sellerAmount = $t094599562._1
349
+
                let buyerAmount = $t094599562._2
349
350
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
350
351
 
                if ((buyerAmount > 0))
351
352
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
352
353
 
                    else updatedRes
353
354
 
                })
354
355
 
            }
355
356
 
    }
356
357
 
357
358
 
358
359
 
359
360
 
@Callable(i)
360
361
 
func declineSlot (nftId) = {
361
362
 
    let assetId = fromBase58String(nftId)
362
-
    let $t098439881 = getSlot(assetId)
363
-
    let type = $t098439881._1
364
-
    let details = $t098439881._2
363
+
    let $t098639901 = getSlot(assetId)
364
+
    let type = $t098639901._1
365
+
    let details = $t098639901._2
365
366
 
    let baseRes = [DeleteEntry(getSlotKey(type, assetId))]
366
367
 
    if ((type == kSell))
367
368
 
        then {
368
-
            let $t0997310020 = parseAsSell(details)
369
-
            let seller = $t0997310020._1
370
-
            let priceValue = $t0997310020._2
369
+
            let $t0999310040 = parseAsSell(details)
370
+
            let seller = $t0999310040._1
371
+
            let priceValue = $t0999310040._2
371
372
 
            if (!(isValidCaller(i.caller, seller)))
372
373
 
                then throw("Invalid caller")
373
374
 
                else (baseRes ++ [ScriptTransfer(seller, 1, assetId)])
374
375
 
            }
375
376
 
        else {
376
-
            let $t01016510269 = parseAsAuction(details)
377
-
            let seller = $t01016510269._1
378
-
            let startPriceValue = $t01016510269._2
379
-
            let endPriceValue = $t01016510269._3
380
-
            let startPeriodValue = $t01016510269._4
381
-
            let endPeriodValue = $t01016510269._5
377
+
            let $t01018510289 = parseAsAuction(details)
378
+
            let seller = $t01018510289._1
379
+
            let startPriceValue = $t01018510289._2
380
+
            let endPriceValue = $t01018510289._3
381
+
            let startPeriodValue = $t01018510289._4
382
+
            let endPeriodValue = $t01018510289._5
382
383
 
            if (!(isValidCaller(i.caller, seller)))
383
384
 
                then throw("Invalid caller")
384
385
 
                else if (!(isAuctionEnded(height, endPeriodValue)))
385
386
 
                    then throw("Wait for end of auction")
386
387
 
                    else (baseRes ++ [ScriptTransfer(seller, 1, assetId)])
387
388
 
            }
388
389
 
    }
389
390
 
390
391
 
391
392
 
392
393
 
@Callable(i)
393
394
 
func setTrustedIssuer (trustedAddr) = if (!(isAdmin(i.caller)))
394
395
 
    then throw("Only admin")
395
396
 
    else [BooleanEntry(getTrustedKey(addressFromStringValue(trustedAddr)), true)]
396
397
 
397
398
 
398
399
 
399
400
 
@Callable(i)
400
401
 
func getPriceAtCurrentMoment (nftId,moment) = {
401
402
 
    let assetId = fromBase58String(nftId)
402
-
    let $t01081010873 = calcPriceAtCurrentMoment(assetId, moment)
403
-
    let seller = $t01081010873._1
404
-
    let price = $t01081010873._2
403
+
    let $t01083010893 = calcPriceAtCurrentMoment(assetId, moment)
404
+
    let seller = $t01083010893._1
405
+
    let price = $t01083010893._2
405
406
 
[IntegerEntry(getPriceKey(assetId), price)]
406
407
 
    }
407
408
 
408
409
 

github/deemru/w8io/026f985 
56.22 ms ◑