tx · BZ3PP3WqgXPGrzD2bDKWkS9nVTeV1osr3QqabG7QENrj

3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq:  -0.01000000 Waves

2022.11.29 08:01 [2337945] smart account 3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "BZ3PP3WqgXPGrzD2bDKWkS9nVTeV1osr3QqabG7QENrj",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1669698104974,
    "version": 2,
    "chainId": 84,
    "sender": "3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq",
    "senderPublicKey": "H6UqxUDcJamDRg1uykVcWMn4zhAMTV7i1nfPq1moLWmJ",
    "proofs": [
        "3HrA16eSEX4th1e6oM6F69qqD11SvhfpkFQc4mZ9w8NqpXGwJ3keVVU5VV46o99UfGNexzMmTKrHCTsePYEmkR94"
    ],
    "script": "base64:BgI6CAISCwoJCAgICAgBCAgIEgMKAQgSAwoBARIDCgEBEgUKAwEICBIDCgEIEgMKAQgSAwoBCBIECgIIASYACXNlcGFyYXRvcgIBXwAIa0F1Y3Rpb24CB2F1Y3Rpb24ABWtTZWxsAgRzZWxsAAhrVHJ1c3RlZAIHdHJ1c3RlZAAGa1ByaWNlAgVwcmljZQEKZ2V0U2xvdEtleQIGcHJlZml4BW5mdElkCQCsAgIJAKwCAgUGcHJlZml4BQlzZXBhcmF0b3IJANgEAQUFbmZ0SWQBC2dldFByaWNlS2V5AQVuZnRJZAkArAICCQCsAgIFBmtQcmljZQUJc2VwYXJhdG9yCQDYBAEFBW5mdElkAQpnZXRTZWxsS2V5AQVuZnRJZAkArAICCQCsAgIFBWtTZWxsBQlzZXBhcmF0b3IJANgEAQUFbmZ0SWQBDWdldEF1Y3Rpb25LZXkBBW5mdElkCQCsAgIJAKwCAgUIa0F1Y3Rpb24FCXNlcGFyYXRvcgkA2AQBBQVuZnRJZAENZ2V0VHJ1c3RlZEtleQEGaXNzdWVyCQCsAgIJAKwCAgUIa1RydXN0ZWQFCXNlcGFyYXRvcgkApQgBBQZpc3N1ZXIBCWFkZFRvTGlzdAIFYWNjdW0JbmV4dFZhbHVlCQDOCAIFBWFjY3VtCQDMCAIFCW5leHRWYWx1ZQUDbmlsAQpqb2luU3RyaW5nAQZwYXJhbXMEBmxlbmd0aAkAkAMBBQZwYXJhbXMDCQAAAgUGbGVuZ3RoAAAJAAIBAg1FbXB0eSAgcGFyYW1zAwkAAAIFBmxlbmd0aAABCQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDEJAQUkZjBfMgIJAQUkZjBfMQIFBSRhY2MwAAAAAQUJc2VwYXJhdG9yAwkAAAIFBmxlbmd0aAACCQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDIJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACBQlzZXBhcmF0b3IDCQAAAgUGbGVuZ3RoAAMJALkJAgoAAiRsBQZwYXJhbXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWFkZFRvTGlzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMwkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwUJc2VwYXJhdG9yAwkAAAIFBmxlbmd0aAAECQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDQJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAUJc2VwYXJhdG9yAwkAAAIFBmxlbmd0aAAFCQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDUJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFBQlzZXBhcmF0b3IJAAIBAiFNYXggbnVtYmVyIG9mIHBhcmFtZXRlcnMgZXhjZWVkZWQBDnBhcnNlQXNBdWN0aW9uAQdkZXRhaWxzBANyZXMJALUJAgUHZGV0YWlscwUJc2VwYXJhdG9yCQCXCgUJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUDcmVzAAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNyZXMAAQkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA3JlcwACCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDcmVzAAMJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNyZXMABAELcGFyc2VBc1NlbGwBB2RldGFpbHMEA3JlcwkAtQkCBQdkZXRhaWxzBQlzZXBhcmF0b3IJAJQKAgkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQNyZXMAAAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA3JlcwABAQpqb2luU3RydWN0AQZwYXJhbXMEByRtYXRjaDAFBnBhcmFtcwMJAAECBQckbWF0Y2gwAh4oQWRkcmVzcywgSW50LCBTdHJpbmcsIFN0cmluZykEB2F1Y3Rpb24FByRtYXRjaDAJAQpqb2luU3RyaW5nAQkAzAgCCQClCAEIBQdhdWN0aW9uAl8xCQDMCAIJAKQDAQgFB2F1Y3Rpb24CXzIJAMwIAggFB2F1Y3Rpb24CXzMJAMwIAggFB2F1Y3Rpb24CXzQFA25pbAMJAAECBQckbWF0Y2gwAg4oQWRkcmVzcywgSW50KQQEc2VsbAUHJG1hdGNoMAkBCmpvaW5TdHJpbmcBCQDMCAIJAKUIAQgFBHNlbGwCXzEJAMwIAgkApAMBCAUEc2VsbAJfMgUDbmlsCQACAQITV3JvbmcgcGFyYW1zIHR1cHBsZQEKc2V0QXVjdGlvbgUGc2VsbGVyBW5mdElkCnN0YXJ0UHJpY2UFc3RhcnQDZW5kCQELU3RyaW5nRW50cnkCCQENZ2V0QXVjdGlvbktleQEFBW5mdElkCQEKam9pblN0cnVjdAEJAJYKBAUGc2VsbGVyBQpzdGFydFByaWNlBQVzdGFydAUDZW5kAQdzZXRTZWxsAwVuZnRJZAZjZWxsZXIFcHJpY2UJAQtTdHJpbmdFbnRyeQIJAQpnZXRTZWxsS2V5AQUFbmZ0SWQJAQpqb2luU3RydWN0AQkAlAoCBQZjZWxsZXIFBXByaWNlAQpnZXRBdWN0aW9uAQVuZnRJZAkBBXZhbHVlAQkAnQgCBQR0aGlzCQENZ2V0QXVjdGlvbktleQEFBW5mdElkAQdnZXRTZWxsAQVuZnRJZAkBBXZhbHVlAQkAnQgCBQR0aGlzCQEKZ2V0U2VsbEtleQEFBW5mdElkARhjYWxjUHJpY2VBdEN1cnJlbnRNb21lbnQCB2Fzc2V0SWQGbW9tZW50BAdkZXRhaWxzCQEKZ2V0QXVjdGlvbgEFB2Fzc2V0SWQECyR0MDI3NTUyODU5CQEOcGFyc2VBc0F1Y3Rpb24BBQdkZXRhaWxzBAZzZWxsZXIIBQskdDAyNzU1Mjg1OQJfMQQPc3RhcnRQcmljZVZhbHVlCAULJHQwMjc1NTI4NTkCXzIEDWVuZFByaWNlVmFsdWUIBQskdDAyNzU1Mjg1OQJfMwQQc3RhcnRQZXJpb2RWYWx1ZQgFCyR0MDI3NTUyODU5Al80BA5lbmRQZXJpb2RWYWx1ZQgFCyR0MDI3NTUyODU5Al81AwkAZwIFBm1vbWVudAUOZW5kUGVyaW9kVmFsdWUJAJQKAgUGc2VsbGVyBQ1lbmRQcmljZVZhbHVlBApkZWx0YVByaWNlCQBlAgUPc3RhcnRQcmljZVZhbHVlBQ1lbmRQcmljZVZhbHVlBAZwZXJpb2QJAGUCBQ5lbmRQZXJpb2RWYWx1ZQUQc3RhcnRQZXJpb2RWYWx1ZQQHc3BlbmRlZAkAZQIFBm1vbWVudAUQc3RhcnRQZXJpb2RWYWx1ZQkAlAoCBQZzZWxsZXIJAGUCBQ9zdGFydFByaWNlVmFsdWUJAGsDBQdzcGVuZGVkBQpkZWx0YVByaWNlBQZwZXJpb2QBBWlzTmZ0AQdhc3NldElkBAckbWF0Y2gwCQDsBwEFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIFQXNzZXQEBXRva2VuBQckbWF0Y2gwAwMJAAACCAUFdG9rZW4IZGVjaW1hbHMAAAkAAAIIBQV0b2tlbghxdWFudGl0eQABBwkAAAIIBQV0b2tlbgpyZWlzc3VhYmxlBwcHAQxpc1RydXN0ZWROZnQBB2Fzc2V0SWQEBmlzc3VlcggJAQV2YWx1ZQEJAOwHAQUHYXNzZXRJZAZpc3N1ZXIJAQt2YWx1ZU9yRWxzZQIJAJsIAgUEdGhpcwkBDWdldFRydXN0ZWRLZXkBBQZpc3N1ZXIHAQtpc1NlbGxFeGlzdAEHYXNzZXRJZAkBCWlzRGVmaW5lZAEJAJ0IAgUEdGhpcwkBCmdldFNlbGxLZXkBBQdhc3NldElkAQ5pc0F1Y3Rpb25FeGlzdAEHYXNzZXRJZAkBCWlzRGVmaW5lZAEJAJ0IAgUEdGhpcwkBDWdldEF1Y3Rpb25LZXkBBQdhc3NldElkARJpc0NvcnJlY3RTZWxsUHJpY2UBBXByaWNlCQBmAgUFcHJpY2UAAAEWaXNDb3JyZWN0QXVjdGlvblByaWNlcwIKc3RhcnRQcmljZQhlbmRQcmljZQkAZgIFCnN0YXJ0UHJpY2UFCGVuZFByaWNlAQdpc0FkbWluAQZjYWxsZXIJAAACBQZjYWxsZXIFBHRoaXMBDWlzVmFsaWRDYWxsZXICBmNhbGxlcgZzZWxsZXIDCQAAAgUGY2FsbGVyBQR0aGlzBgkAAAIFBmNhbGxlcgUGc2VsbGVyAQ5pc0F1Y3Rpb25FbmRlZAIDbm93A2VuZAkAZgIFA25vdwUDZW5kAQ1pc0Vub3VnaEZ1bmRzAgdwYXltZW50EmN1cnJlbnRNb21lbnRQcmljZQkAZwIFB3BheW1lbnQFEmN1cnJlbnRNb21lbnRQcmljZQEHaXNXYXdlcwEHYXNzZXRJZAkAAAIFB2Fzc2V0SWQFBHVuaXQBDGlzQ29ycmVjdE5mdAEFbmZ0SWQDCQEBIQEJAQVpc05mdAEFBW5mdElkCQACAQIQVG9rZW4gaXMgbm90IE5mdAMJAQtpc1NlbGxFeGlzdAEFBW5mdElkCQACAQITU2VsbCBhbHJlYWR5IGV4aXN0cwMJAQ5pc0F1Y3Rpb25FeGlzdAEFBW5mdElkCQACAQIWQXVjdGlvbiBhbHJlYWR5IGV4aXN0cwUEdW5pdAERaXNDb3JyZWN0UGF5bWVudHMDDHBheW1lbnRBc3NldA1wYXltZW50QW1vdW50BXByaWNlAwkBASEBCQEHaXNXYXdlcwEFDHBheW1lbnRBc3NldAkAAgECGFBheW1lbnQgbXVzdCBiZSBhdCBXQVZFUwMJAQEhAQkBDWlzRW5vdWdoRnVuZHMCBQ1wYXltZW50QW1vdW50BQVwcmljZQkAAgECEE5vdCBlbm91Z2ggZnVuZHMFBHVuaXQBB2NhbGNGZWUAAAABDmNhbGNUcnVzdGVkRmVlAAAAARJyZXN1bHRGdW5kc0Ftb3VudHMDCWlzVHJ1c3RlZA1wYXltZW50QW1vdW50C2FjdHVhbFByaWNlAwUJaXNUcnVzdGVkCQCUCgIJAGUCBQthY3R1YWxQcmljZQkBDmNhbGNUcnVzdGVkRmVlAAkAZQIFDXBheW1lbnRBbW91bnQFC2FjdHVhbFByaWNlCQCUCgIJAGUCBQthY3R1YWxQcmljZQkBB2NhbGNGZWUACQBlAgUNcGF5bWVudEFtb3VudAULYWN0dWFsUHJpY2UBB2dldFNsb3QBBW5mdElkAwkBC2lzU2VsbEV4aXN0AQUFbmZ0SWQJAJQKAgUFa1NlbGwJAQdnZXRTZWxsAQUFbmZ0SWQDCQEOaXNBdWN0aW9uRXhpc3QBBQVuZnRJZAkAlAoCBQhrQXVjdGlvbgkBCmdldEF1Y3Rpb24BBQVuZnRJZAkAAgECElNsb3QgZG9lc25gdCBleGlzdAAEa0J1eQIDYnV5CQFpAQhpc3N1ZU5mdAkIbmZ0X25hbWUJbmZ0X293bmVyD25mdF9kQXBwQWRkcmVzcwhuZnRfdHlwZQhuZnRfdGFncxFuZnRfc2VsbGluZ19wcmljZQ9uZnRfZGVzY3JpcHRpb24KbmZ0X29uU2VsbAhuZnRfZGF0YQQIbmV3VG9rZW4JAMIIBQUIbmZ0X25hbWUFD25mdF9kZXNjcmlwdGlvbgABAAAHBAdpc3N1ZUlkCQC4CAEFCG5ld1Rva2VuBAR0eElkCAUBaQ10cmFuc2FjdGlvbklkCQDMCAIFCG5ld1Rva2VuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdpc3N1ZUlkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIFT3duZXIJAKUIAQgFAWkGY2FsbGVyCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIIbmZ0X3R5cGUFCG5mdF90eXBlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIIbmZ0X3RhZ3MFCG5mdF90YWdzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIPbmZ0X2RBcHBBZGRyZXNzBQ9uZnRfZEFwcEFkZHJlc3MJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIRbmZ0X3NlbGxpbmdfcHJpY2UFEW5mdF9zZWxsaW5nX3ByaWNlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIKbmZ0X29uU2VsbAUKbmZ0X29uU2VsbAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICCG5mdF9kYXRhBQhuZnRfZGF0YQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQR0eElkBQlzZXBhcmF0b3ICCWlzc3VlX25mdAkA2AQBBQdpc3N1ZUlkBQNuaWwBaQEGYnV5TkZUAQVuZnRJRAQHYXNzZXRJZAkA2QQBBQVuZnRJRAQGYW1vdW50CQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQFcHJpY2UJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQCsAgIJAKwCAgUGa1ByaWNlBQlzZXBhcmF0b3IFBW5mdElEAh5UaGVyZSBpcyBubyBwcmljZSBmb3IgdGhpcyBORlQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJARFAZXh0ck5hdGl2ZSgxMDU4KQEJAKwCAgkArAICBQVuZnRJRAUJc2VwYXJhdG9yAgVPd25lcgIITm8gb3duZXIDCQECIT0CCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQFBHVuaXQJAAIBAgxQYXkgaW4gd2F2ZXMDCQBmAgkBDXBhcnNlSW50VmFsdWUBBQVwcmljZQUGYW1vdW50CQACAQIPSW52YWxpZCBwYXltZW50CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdhc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQV2YWx1ZQEJAKYIAQUFb3duZXIJAQ1wYXJzZUludFZhbHVlAQUFcHJpY2UFBHVuaXQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKUIAQgFAWkGY2FsbGVyBQlzZXBhcmF0b3IFBGtCdXkJAKwCAgkArAICBQVuZnRJRAUJc2VwYXJhdG9yCQCkAwEFBmFtb3VudAUDbmlsAWkBB3NlbGxORlQBBXByaWNlBAskdDA3MzU3NzQ0MgkAlAoCCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAZ0b2tlbjAIBQskdDA3MzU3NzQ0MgJfMQQHYW1vdW50MAgFCyR0MDczNTc3NDQyAl8yAwkBASEBCQEFaXNOZnQBBQZ0b2tlbjAJAAIBAhBUb2tlbiBpcyBub3QgTkZUCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICBQZrUHJpY2UFCXNlcGFyYXRvcgkA2AQBCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAKQDAQUFcHJpY2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKUIAQgFAWkGY2FsbGVyBQlzZXBhcmF0b3IFBWtTZWxsCQCsAgIJAKwCAgkA2AQBBQZ0b2tlbjAFCXNlcGFyYXRvcgkApAMBBQdhbW91bnQwBQNuaWwBaQEHYWRkU2VsbAEFcHJpY2UEBW5mdElkCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAQxpc0NvcnJlY3ROZnQBBQVuZnRJZAMJAQEhAQkBEmlzQ29ycmVjdFNlbGxQcmljZQEFBXByaWNlCQACAQIRUHJpY2UgbXVzdCBiZSA+IDAJAMwIAgkBB3NldFNlbGwDBQVuZnRJZAgFAWkGY2FsbGVyBQVwcmljZQUDbmlsAWkBCmFkZEF1Y3Rpb24DCnN0YXJ0UHJpY2UFc3RhcnQDZW5kBAVuZnRJZAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCQELdmFsdWVPckVsc2UCCQEMaXNDb3JyZWN0TmZ0AQUFbmZ0SWQJAMwIAgkBCnNldEF1Y3Rpb24FCAUBaQZjYWxsZXIFBW5mdElkBQpzdGFydFByaWNlBQVzdGFydAUDZW5kCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFBW5mdElkBQlzZXBhcmF0b3ICCW5mdF9vd25lcgkApQgBCAUBaQZjYWxsZXIFA25pbAFpAQtidXlGcm9tU2xvdAEFbmZ0SWQECyR0MDgzNjI4NDUxCQCUCgIICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQEDHBheW1lbnRBc3NldAgFCyR0MDgzNjI4NDUxAl8xBA1wYXltZW50QW1vdW50CAULJHQwODM2Mjg0NTECXzIEB2Fzc2V0SWQJANkEAQUFbmZ0SWQECyR0MDg0OTU4NTMzCQEHZ2V0U2xvdAEFB2Fzc2V0SWQEBHR5cGUIBQskdDA4NDk1ODUzMwJfMQQHZGV0YWlscwgFCyR0MDg0OTU4NTMzAl8yBAdiYXNlUmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdhc3NldElkCQDMCAIJAQtEZWxldGVFbnRyeQEJAQpnZXRTbG90S2V5AgUEdHlwZQUHYXNzZXRJZAUDbmlsAwkAAAIFBHR5cGUFBWtTZWxsBAskdDA4Njc1ODcyMgkBC3BhcnNlQXNTZWxsAQUHZGV0YWlscwQGc2VsbGVyCAULJHQwODY3NTg3MjICXzEECnByaWNlVmFsdWUIBQskdDA4Njc1ODcyMgJfMgkBC3ZhbHVlT3JFbHNlAgkBEWlzQ29ycmVjdFBheW1lbnRzAwUMcGF5bWVudEFzc2V0BQ1wYXltZW50QW1vdW50BQpwcmljZVZhbHVlBAskdDA4ODA3ODkwOQkBEnJlc3VsdEZ1bmRzQW1vdW50cwMJAQxpc1RydXN0ZWROZnQBBQdhc3NldElkBQ1wYXltZW50QW1vdW50BQpwcmljZVZhbHVlBAxzZWxsZXJBbW91bnQIBQskdDA4ODA3ODkwOQJfMQQLYnV5ZXJBbW91bnQIBQskdDA4ODA3ODkwOQJfMgQKdXBkYXRlZFJlcwkAzggCBQdiYXNlUmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBnNlbGxlcgUMc2VsbGVyQW1vdW50BQR1bml0BQNuaWwDCQBmAgULYnV5ZXJBbW91bnQAAAkAzggCBQp1cGRhdGVkUmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgULYnV5ZXJBbW91bnQFBHVuaXQFA25pbAUKdXBkYXRlZFJlcwQLJHQwOTEyNjkxOTUJARhjYWxjUHJpY2VBdEN1cnJlbnRNb21lbnQCBQdhc3NldElkBQZoZWlnaHQEBnNlbGxlcggFCyR0MDkxMjY5MTk1Al8xBAthY3R1YWxQcmljZQgFCyR0MDkxMjY5MTk1Al8yCQELdmFsdWVPckVsc2UCCQERaXNDb3JyZWN0UGF5bWVudHMDBQxwYXltZW50QXNzZXQFDXBheW1lbnRBbW91bnQFC2FjdHVhbFByaWNlBAskdDA5MjgxOTM4NAkBEnJlc3VsdEZ1bmRzQW1vdW50cwMJAQxpc1RydXN0ZWROZnQBBQdhc3NldElkBQ1wYXltZW50QW1vdW50BQthY3R1YWxQcmljZQQMc2VsbGVyQW1vdW50CAULJHQwOTI4MTkzODQCXzEEC2J1eWVyQW1vdW50CAULJHQwOTI4MTkzODQCXzIECnVwZGF0ZWRSZXMJAM4IAgUHYmFzZVJlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQZzZWxsZXIFDHNlbGxlckFtb3VudAUEdW5pdAUDbmlsAwkAZgIFC2J1eWVyQW1vdW50AAAJAM4IAgUKdXBkYXRlZFJlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFC2J1eWVyQW1vdW50BQR1bml0BQNuaWwFCnVwZGF0ZWRSZXMBaQELZGVjbGluZVNsb3QBBW5mdElkBAdhc3NldElkCQDZBAEFBW5mdElkBAskdDA5Njg1OTcyMwkBB2dldFNsb3QBBQdhc3NldElkBAR0eXBlCAULJHQwOTY4NTk3MjMCXzEEB2RldGFpbHMIBQskdDA5Njg1OTcyMwJfMgQHYmFzZVJlcwkAzAgCCQELRGVsZXRlRW50cnkBCQEKZ2V0U2xvdEtleQIFBHR5cGUFB2Fzc2V0SWQFA25pbAMJAAACBQR0eXBlBQVrU2VsbAQLJHQwOTgxNTk4NjIJAQtwYXJzZUFzU2VsbAEFB2RldGFpbHMEBnNlbGxlcggFCyR0MDk4MTU5ODYyAl8xBApwcmljZVZhbHVlCAULJHQwOTgxNTk4NjICXzIDCQEBIQEJAQ1pc1ZhbGlkQ2FsbGVyAggFAWkGY2FsbGVyBQZzZWxsZXIJAAIBAg5JbnZhbGlkIGNhbGxlcgkAzggCBQdiYXNlUmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBnNlbGxlcgABBQdhc3NldElkBQNuaWwEDSR0MDEwMDA3MTAxMTEJAQ5wYXJzZUFzQXVjdGlvbgEFB2RldGFpbHMEBnNlbGxlcggFDSR0MDEwMDA3MTAxMTECXzEED3N0YXJ0UHJpY2VWYWx1ZQgFDSR0MDEwMDA3MTAxMTECXzIEDWVuZFByaWNlVmFsdWUIBQ0kdDAxMDAwNzEwMTExAl8zBBBzdGFydFBlcmlvZFZhbHVlCAUNJHQwMTAwMDcxMDExMQJfNAQOZW5kUGVyaW9kVmFsdWUIBQ0kdDAxMDAwNzEwMTExAl81AwkBASEBCQENaXNWYWxpZENhbGxlcgIIBQFpBmNhbGxlcgUGc2VsbGVyCQACAQIOSW52YWxpZCBjYWxsZXIDCQEBIQEJAQ5pc0F1Y3Rpb25FbmRlZAIFBmhlaWdodAUOZW5kUGVyaW9kVmFsdWUJAAIBAhdXYWl0IGZvciBlbmQgb2YgYXVjdGlvbgkAzggCBQdiYXNlUmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBnNlbGxlcgABBQdhc3NldElkBQNuaWwBaQEQc2V0VHJ1c3RlZElzc3VlcgELdHJ1c3RlZEFkZHIDCQEBIQEJAQdpc0FkbWluAQgFAWkGY2FsbGVyCQACAQIKT25seSBhZG1pbgkAzAgCCQEMQm9vbGVhbkVudHJ5AgkBDWdldFRydXN0ZWRLZXkBCQERQGV4dHJOYXRpdmUoMTA2MikBBQt0cnVzdGVkQWRkcgYFA25pbAFpARdnZXRQcmljZUF0Q3VycmVudE1vbWVudAIFbmZ0SWQGbW9tZW50BAdhc3NldElkCQDZBAEFBW5mdElkBA0kdDAxMDY1MjEwNzE1CQEYY2FsY1ByaWNlQXRDdXJyZW50TW9tZW50AgUHYXNzZXRJZAUGbW9tZW50BAZzZWxsZXIIBQ0kdDAxMDY1MjEwNzE1Al8xBAVwcmljZQgFDSR0MDEwNjUyMTA3MTUCXzIJAMwIAgkBDEludGVnZXJFbnRyeQIJAQtnZXRQcmljZUtleQEFB2Fzc2V0SWQFBXByaWNlBQNuaWwAICHk1Q==",
    "height": 2337945,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3DJYfYXjGaYEaChEXLTRiJvFQ4eTvJD62CecqGsHstXk
Next: 6BNL4m6vDzz4hDnKZLAR9m2DUQKwkXd8f7HfKrDM33Ty

Diff: 
Old
New
Differences
249
249
 
let kBuy = "buy"
250
250
 
251
251
 
@Callable(i)
252
-
func createNft (nft_name,nft_owner,nft_dAppAddress,nft_type,nft_tags,nft_selling_price,nft_description,nft_onSell,nft_data) = {
252
+
func issueNft (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
275
275
 
276
276
 
@Callable(i)
277
277
 
func sellNFT (price) = {
278
-
    let $t073587443 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
279
-
    let token0 = $t073587443._1
280
-
    let amount0 = $t073587443._2
278
+
    let $t073577442 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
279
+
    let token0 = $t073577442._1
280
+
    let amount0 = $t073577442._2
281
281
 
    if (!(isNft(token0)))
282
282
 
        then throw("Token is not NFT")
283
283
 
        else [StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), toString(price)), StringEntry(((toString(i.caller) + separator) + kSell), ((toBase58String(token0) + separator) + toString(amount0)))]
305
305
 
306
306
 
@Callable(i)
307
307
 
func buyFromSlot (nftId) = {
308
-
    let $t083638452 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
309
-
    let paymentAsset = $t083638452._1
310
-
    let paymentAmount = $t083638452._2
308
+
    let $t083628451 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
309
+
    let paymentAsset = $t083628451._1
310
+
    let paymentAmount = $t083628451._2
311
311
 
    let assetId = fromBase58String(nftId)
312
-
    let $t084968534 = getSlot(assetId)
313
-
    let type = $t084968534._1
314
-
    let details = $t084968534._2
312
+
    let $t084958533 = getSlot(assetId)
313
+
    let type = $t084958533._1
314
+
    let details = $t084958533._2
315
315
 
    let baseRes = [ScriptTransfer(i.caller, 1, assetId), DeleteEntry(getSlotKey(type, assetId))]
316
316
 
    if ((type == kSell))
317
317
 
        then {
318
-
            let $t086768723 = parseAsSell(details)
319
-
            let seller = $t086768723._1
320
-
            let priceValue = $t086768723._2
318
+
            let $t086758722 = parseAsSell(details)
319
+
            let seller = $t086758722._1
320
+
            let priceValue = $t086758722._2
321
321
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, priceValue), {
322
-
                let $t088088910 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
323
-
                let sellerAmount = $t088088910._1
324
-
                let buyerAmount = $t088088910._2
322
+
                let $t088078909 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
323
+
                let sellerAmount = $t088078909._1
324
+
                let buyerAmount = $t088078909._2
325
325
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
326
326
 
                if ((buyerAmount > 0))
327
327
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
329
329
 
                })
330
330
 
            }
331
331
 
        else {
332
-
            let $t091279196 = calcPriceAtCurrentMoment(assetId, height)
333
-
            let seller = $t091279196._1
334
-
            let actualPrice = $t091279196._2
332
+
            let $t091269195 = calcPriceAtCurrentMoment(assetId, height)
333
+
            let seller = $t091269195._1
334
+
            let actualPrice = $t091269195._2
335
335
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, actualPrice), {
336
-
                let $t092829385 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
337
-
                let sellerAmount = $t092829385._1
338
-
                let buyerAmount = $t092829385._2
336
+
                let $t092819384 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
337
+
                let sellerAmount = $t092819384._1
338
+
                let buyerAmount = $t092819384._2
339
339
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
340
340
 
                if ((buyerAmount > 0))
341
341
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
349
349
 
@Callable(i)
350
350
 
func declineSlot (nftId) = {
351
351
 
    let assetId = fromBase58String(nftId)
352
-
    let $t096869724 = getSlot(assetId)
353
-
    let type = $t096869724._1
354
-
    let details = $t096869724._2
352
+
    let $t096859723 = getSlot(assetId)
353
+
    let type = $t096859723._1
354
+
    let details = $t096859723._2
355
355
 
    let baseRes = [DeleteEntry(getSlotKey(type, assetId))]
356
356
 
    if ((type == kSell))
357
357
 
        then {
358
-
            let $t098169863 = parseAsSell(details)
359
-
            let seller = $t098169863._1
360
-
            let priceValue = $t098169863._2
358
+
            let $t098159862 = parseAsSell(details)
359
+
            let seller = $t098159862._1
360
+
            let priceValue = $t098159862._2
361
361
 
            if (!(isValidCaller(i.caller, seller)))
362
362
 
                then throw("Invalid caller")
363
363
 
                else (baseRes ++ [ScriptTransfer(seller, 1, assetId)])
364
364
 
            }
365
365
 
        else {
366
-
            let $t01000810112 = parseAsAuction(details)
367
-
            let seller = $t01000810112._1
368
-
            let startPriceValue = $t01000810112._2
369
-
            let endPriceValue = $t01000810112._3
370
-
            let startPeriodValue = $t01000810112._4
371
-
            let endPeriodValue = $t01000810112._5
366
+
            let $t01000710111 = parseAsAuction(details)
367
+
            let seller = $t01000710111._1
368
+
            let startPriceValue = $t01000710111._2
369
+
            let endPriceValue = $t01000710111._3
370
+
            let startPeriodValue = $t01000710111._4
371
+
            let endPeriodValue = $t01000710111._5
372
372
 
            if (!(isValidCaller(i.caller, seller)))
373
373
 
                then throw("Invalid caller")
374
374
 
                else if (!(isAuctionEnded(height, endPeriodValue)))
389
389
 
@Callable(i)
390
390
 
func getPriceAtCurrentMoment (nftId,moment) = {
391
391
 
    let assetId = fromBase58String(nftId)
392
-
    let $t01065310716 = calcPriceAtCurrentMoment(assetId, moment)
393
-
    let seller = $t01065310716._1
394
-
    let price = $t01065310716._2
392
+
    let $t01065210715 = calcPriceAtCurrentMoment(assetId, moment)
393
+
    let seller = $t01065210715._1
394
+
    let price = $t01065210715._2
395
395
 
[IntegerEntry(getPriceKey(assetId), price)]
396
396
 
    }
397
397
 

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
-
func createNft (nft_name,nft_owner,nft_dAppAddress,nft_type,nft_tags,nft_selling_price,nft_description,nft_onSell,nft_data) = {
252
+
func issueNft (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 buyNFT (nftID) = {
263
263
 
    let assetId = fromBase58String(nftID)
264
264
 
    let amount = value(i.payments[0].amount)
265
265
 
    let price = valueOrErrorMessage(getString(((kPrice + separator) + nftID)), "There is no price for this NFT")
266
266
 
    let owner = valueOrErrorMessage(getStringValue(((nftID + separator) + "Owner")), "No owner")
267
267
 
    if ((i.payments[0].assetId != unit))
268
268
 
        then throw("Pay in waves")
269
269
 
        else if ((parseIntValue(price) > amount))
270
270
 
            then throw("Invalid payment")
271
271
 
            else [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(value(addressFromString(owner)), parseIntValue(price), unit), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount)))]
272
272
 
    }
273
273
 
274
274
 
275
275
 
276
276
 
@Callable(i)
277
277
 
func sellNFT (price) = {
278
-
    let $t073587443 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
279
-
    let token0 = $t073587443._1
280
-
    let amount0 = $t073587443._2
278
+
    let $t073577442 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
279
+
    let token0 = $t073577442._1
280
+
    let amount0 = $t073577442._2
281
281
 
    if (!(isNft(token0)))
282
282
 
        then throw("Token is not NFT")
283
283
 
        else [StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), toString(price)), StringEntry(((toString(i.caller) + separator) + kSell), ((toBase58String(token0) + separator) + toString(amount0)))]
284
284
 
    }
285
285
 
286
286
 
287
287
 
288
288
 
@Callable(i)
289
289
 
func addSell (price) = {
290
290
 
    let nftId = value(i.payments[0].assetId)
291
291
 
    valueOrElse(isCorrectNft(nftId), if (!(isCorrectSellPrice(price)))
292
292
 
        then throw("Price must be > 0")
293
293
 
        else [setSell(nftId, i.caller, price)])
294
294
 
    }
295
295
 
296
296
 
297
297
 
298
298
 
@Callable(i)
299
299
 
func addAuction (startPrice,start,end) = {
300
300
 
    let nftId = value(i.payments[0].assetId)
301
301
 
    valueOrElse(isCorrectNft(nftId), [setAuction(i.caller, nftId, startPrice, start, end), StringEntry(((toBase58String(nftId) + separator) + "nft_owner"), toString(i.caller))])
302
302
 
    }
303
303
 
304
304
 
305
305
 
306
306
 
@Callable(i)
307
307
 
func buyFromSlot (nftId) = {
308
-
    let $t083638452 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
309
-
    let paymentAsset = $t083638452._1
310
-
    let paymentAmount = $t083638452._2
308
+
    let $t083628451 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
309
+
    let paymentAsset = $t083628451._1
310
+
    let paymentAmount = $t083628451._2
311
311
 
    let assetId = fromBase58String(nftId)
312
-
    let $t084968534 = getSlot(assetId)
313
-
    let type = $t084968534._1
314
-
    let details = $t084968534._2
312
+
    let $t084958533 = getSlot(assetId)
313
+
    let type = $t084958533._1
314
+
    let details = $t084958533._2
315
315
 
    let baseRes = [ScriptTransfer(i.caller, 1, assetId), DeleteEntry(getSlotKey(type, assetId))]
316
316
 
    if ((type == kSell))
317
317
 
        then {
318
-
            let $t086768723 = parseAsSell(details)
319
-
            let seller = $t086768723._1
320
-
            let priceValue = $t086768723._2
318
+
            let $t086758722 = parseAsSell(details)
319
+
            let seller = $t086758722._1
320
+
            let priceValue = $t086758722._2
321
321
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, priceValue), {
322
-
                let $t088088910 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
323
-
                let sellerAmount = $t088088910._1
324
-
                let buyerAmount = $t088088910._2
322
+
                let $t088078909 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
323
+
                let sellerAmount = $t088078909._1
324
+
                let buyerAmount = $t088078909._2
325
325
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
326
326
 
                if ((buyerAmount > 0))
327
327
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
328
328
 
                    else updatedRes
329
329
 
                })
330
330
 
            }
331
331
 
        else {
332
-
            let $t091279196 = calcPriceAtCurrentMoment(assetId, height)
333
-
            let seller = $t091279196._1
334
-
            let actualPrice = $t091279196._2
332
+
            let $t091269195 = calcPriceAtCurrentMoment(assetId, height)
333
+
            let seller = $t091269195._1
334
+
            let actualPrice = $t091269195._2
335
335
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, actualPrice), {
336
-
                let $t092829385 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
337
-
                let sellerAmount = $t092829385._1
338
-
                let buyerAmount = $t092829385._2
336
+
                let $t092819384 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
337
+
                let sellerAmount = $t092819384._1
338
+
                let buyerAmount = $t092819384._2
339
339
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
340
340
 
                if ((buyerAmount > 0))
341
341
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
342
342
 
                    else updatedRes
343
343
 
                })
344
344
 
            }
345
345
 
    }
346
346
 
347
347
 
348
348
 
349
349
 
@Callable(i)
350
350
 
func declineSlot (nftId) = {
351
351
 
    let assetId = fromBase58String(nftId)
352
-
    let $t096869724 = getSlot(assetId)
353
-
    let type = $t096869724._1
354
-
    let details = $t096869724._2
352
+
    let $t096859723 = getSlot(assetId)
353
+
    let type = $t096859723._1
354
+
    let details = $t096859723._2
355
355
 
    let baseRes = [DeleteEntry(getSlotKey(type, assetId))]
356
356
 
    if ((type == kSell))
357
357
 
        then {
358
-
            let $t098169863 = parseAsSell(details)
359
-
            let seller = $t098169863._1
360
-
            let priceValue = $t098169863._2
358
+
            let $t098159862 = parseAsSell(details)
359
+
            let seller = $t098159862._1
360
+
            let priceValue = $t098159862._2
361
361
 
            if (!(isValidCaller(i.caller, seller)))
362
362
 
                then throw("Invalid caller")
363
363
 
                else (baseRes ++ [ScriptTransfer(seller, 1, assetId)])
364
364
 
            }
365
365
 
        else {
366
-
            let $t01000810112 = parseAsAuction(details)
367
-
            let seller = $t01000810112._1
368
-
            let startPriceValue = $t01000810112._2
369
-
            let endPriceValue = $t01000810112._3
370
-
            let startPeriodValue = $t01000810112._4
371
-
            let endPeriodValue = $t01000810112._5
366
+
            let $t01000710111 = parseAsAuction(details)
367
+
            let seller = $t01000710111._1
368
+
            let startPriceValue = $t01000710111._2
369
+
            let endPriceValue = $t01000710111._3
370
+
            let startPeriodValue = $t01000710111._4
371
+
            let endPeriodValue = $t01000710111._5
372
372
 
            if (!(isValidCaller(i.caller, seller)))
373
373
 
                then throw("Invalid caller")
374
374
 
                else if (!(isAuctionEnded(height, endPeriodValue)))
375
375
 
                    then throw("Wait for end of auction")
376
376
 
                    else (baseRes ++ [ScriptTransfer(seller, 1, assetId)])
377
377
 
            }
378
378
 
    }
379
379
 
380
380
 
381
381
 
382
382
 
@Callable(i)
383
383
 
func setTrustedIssuer (trustedAddr) = if (!(isAdmin(i.caller)))
384
384
 
    then throw("Only admin")
385
385
 
    else [BooleanEntry(getTrustedKey(addressFromStringValue(trustedAddr)), true)]
386
386
 
387
387
 
388
388
 
389
389
 
@Callable(i)
390
390
 
func getPriceAtCurrentMoment (nftId,moment) = {
391
391
 
    let assetId = fromBase58String(nftId)
392
-
    let $t01065310716 = calcPriceAtCurrentMoment(assetId, moment)
393
-
    let seller = $t01065310716._1
394
-
    let price = $t01065310716._2
392
+
    let $t01065210715 = calcPriceAtCurrentMoment(assetId, moment)
393
+
    let seller = $t01065210715._1
394
+
    let price = $t01065210715._2
395
395
 
[IntegerEntry(getPriceKey(assetId), price)]
396
396
 
    }
397
397
 
398
398
 

github/deemru/w8io/169f3d6 
77.91 ms ◑