tx · CrpCHarKnzB2617uESkN533DtWyNssfRDcvPJvx2ADpS

3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq:  -0.50000000 Waves

2022.11.30 18:00 [2339984] smart account 3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "CrpCHarKnzB2617uESkN533DtWyNssfRDcvPJvx2ADpS",
    "fee": 50000000,
    "feeAssetId": null,
    "timestamp": 1669820435922,
    "version": 2,
    "chainId": 84,
    "sender": "3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq",
    "senderPublicKey": "H6UqxUDcJamDRg1uykVcWMn4zhAMTV7i1nfPq1moLWmJ",
    "proofs": [
        "2FWPfDUByKCPxZWLMW4SMLo2bZFh1aASSJKVsAWaCkg3DHuWNv7BN4GKh8W8mfKusv9ajwj1Qr47STeLUqPvMVuX"
    ],
    "script": "base64:BgJRCAISBgoECAgBARIAEgQKAggIEgsKCQgICAgIAQgICBIECgIICBIECgIICBIDCgEIEgMKAQESBQoDAQgIEgMKAQgSAwoBCBIDCgEIEgQKAggBJwAJc2VwYXJhdG9yAgFfAAhrQXVjdGlvbgIHYXVjdGlvbgAFa1NlbGwCBHNlbGwACGtUcnVzdGVkAgd0cnVzdGVkAAZrUHJpY2UCBXByaWNlAQpnZXRTbG90S2V5AgZwcmVmaXgFbmZ0SWQJAKwCAgkArAICBQZwcmVmaXgFCXNlcGFyYXRvcgkA2AQBBQVuZnRJZAELZ2V0UHJpY2VLZXkBBW5mdElkCQCsAgIJAKwCAgUGa1ByaWNlBQlzZXBhcmF0b3IJANgEAQUFbmZ0SWQBCmdldFNlbGxLZXkBBW5mdElkCQCsAgIJAKwCAgUFa1NlbGwFCXNlcGFyYXRvcgkA2AQBBQVuZnRJZAENZ2V0QXVjdGlvbktleQEFbmZ0SWQJAKwCAgkArAICBQhrQXVjdGlvbgUJc2VwYXJhdG9yCQDYBAEFBW5mdElkAQ1nZXRUcnVzdGVkS2V5AQZpc3N1ZXIJAKwCAgkArAICBQhrVHJ1c3RlZAUJc2VwYXJhdG9yCQClCAEFBmlzc3VlcgEJYWRkVG9MaXN0AgVhY2N1bQluZXh0VmFsdWUJAM4IAgUFYWNjdW0JAMwIAgUJbmV4dFZhbHVlBQNuaWwBCmpvaW5TdHJpbmcBBnBhcmFtcwQGbGVuZ3RoCQCQAwEFBnBhcmFtcwMJAAACBQZsZW5ndGgAAAkAAgECDUVtcHR5ICBwYXJhbXMDCQAAAgUGbGVuZ3RoAAEJALkJAgoAAiRsBQZwYXJhbXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWFkZFRvTGlzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMQkBBSRmMF8yAgkBBSRmMF8xAgUFJGFjYzAAAAABBQlzZXBhcmF0b3IDCQAAAgUGbGVuZ3RoAAIJALkJAgoAAiRsBQZwYXJhbXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWFkZFRvTGlzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgMgkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIFCXNlcGFyYXRvcgMJAAACBQZsZW5ndGgAAwkAuQkCCgACJGwFBnBhcmFtcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJYWRkVG9MaXN0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyAzCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADBQlzZXBhcmF0b3IDCQAAAgUGbGVuZ3RoAAQJALkJAgoAAiRsBQZwYXJhbXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWFkZFRvTGlzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEBQlzZXBhcmF0b3IDCQAAAgUGbGVuZ3RoAAUJALkJAgoAAiRsBQZwYXJhbXMKAAIkcwkAkAMBBQIkbAoABSRhY2MwBQNuaWwKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWFkZFRvTGlzdAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgNQkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUFCXNlcGFyYXRvcgkAAgECIU1heCBudW1iZXIgb2YgcGFyYW1ldGVycyBleGNlZWRlZAEOcGFyc2VBc0F1Y3Rpb24BB2RldGFpbHMEA3JlcwkAtQkCBQdkZXRhaWxzBQlzZXBhcmF0b3IJAJcKBQkBEUBleHRyTmF0aXZlKDEwNjIpAQkAkQMCBQNyZXMAAAkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA3JlcwABCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDcmVzAAIJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNyZXMAAwkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA3JlcwAEAQtwYXJzZUFzU2VsbAEHZGV0YWlscwQDcmVzCQC1CQIFB2RldGFpbHMFCXNlcGFyYXRvcgkAlAoCCQERQGV4dHJOYXRpdmUoMTA2MikBCQCRAwIFA3JlcwAACQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDcmVzAAEBCmpvaW5TdHJ1Y3QBBnBhcmFtcwQHJG1hdGNoMAUGcGFyYW1zAwkAAQIFByRtYXRjaDACHihBZGRyZXNzLCBJbnQsIFN0cmluZywgU3RyaW5nKQQHYXVjdGlvbgUHJG1hdGNoMAkBCmpvaW5TdHJpbmcBCQDMCAIJAKUIAQgFB2F1Y3Rpb24CXzEJAMwIAgkApAMBCAUHYXVjdGlvbgJfMgkAzAgCCAUHYXVjdGlvbgJfMwkAzAgCCAUHYXVjdGlvbgJfNAUDbmlsAwkAAQIFByRtYXRjaDACDihBZGRyZXNzLCBJbnQpBARzZWxsBQckbWF0Y2gwCQEKam9pblN0cmluZwEJAMwIAgkApQgBCAUEc2VsbAJfMQkAzAgCCQCkAwEIBQRzZWxsAl8yBQNuaWwJAAIBAhNXcm9uZyBwYXJhbXMgdHVwcGxlAQpzZXRBdWN0aW9uBQZzZWxsZXIFbmZ0SWQKc3RhcnRQcmljZQVzdGFydANlbmQJAQtTdHJpbmdFbnRyeQIJAQ1nZXRBdWN0aW9uS2V5AQUFbmZ0SWQJAQpqb2luU3RydWN0AQkAlgoEBQZzZWxsZXIFCnN0YXJ0UHJpY2UFBXN0YXJ0BQNlbmQBB3NldFNlbGwDBW5mdElkBmNlbGxlcgVwcmljZQkBC1N0cmluZ0VudHJ5AgkBCmdldFNlbGxLZXkBBQVuZnRJZAkBCmpvaW5TdHJ1Y3QBCQCUCgIFBmNlbGxlcgUFcHJpY2UBCmdldEF1Y3Rpb24BBW5mdElkCQEFdmFsdWUBCQCdCAIFBHRoaXMJAQ1nZXRBdWN0aW9uS2V5AQUFbmZ0SWQBB2dldFNlbGwBBW5mdElkCQEFdmFsdWUBCQCdCAIFBHRoaXMJAQpnZXRTZWxsS2V5AQUFbmZ0SWQBGGNhbGNQcmljZUF0Q3VycmVudE1vbWVudAIHYXNzZXRJZAZtb21lbnQEB2RldGFpbHMJAQpnZXRBdWN0aW9uAQUHYXNzZXRJZAQLJHQwMjc1NTI4NTkJAQ5wYXJzZUFzQXVjdGlvbgEFB2RldGFpbHMEBnNlbGxlcggFCyR0MDI3NTUyODU5Al8xBA9zdGFydFByaWNlVmFsdWUIBQskdDAyNzU1Mjg1OQJfMgQNZW5kUHJpY2VWYWx1ZQgFCyR0MDI3NTUyODU5Al8zBBBzdGFydFBlcmlvZFZhbHVlCAULJHQwMjc1NTI4NTkCXzQEDmVuZFBlcmlvZFZhbHVlCAULJHQwMjc1NTI4NTkCXzUDCQBnAgUGbW9tZW50BQ5lbmRQZXJpb2RWYWx1ZQkAlAoCBQZzZWxsZXIFDWVuZFByaWNlVmFsdWUECmRlbHRhUHJpY2UJAGUCBQ9zdGFydFByaWNlVmFsdWUFDWVuZFByaWNlVmFsdWUEBnBlcmlvZAkAZQIFDmVuZFBlcmlvZFZhbHVlBRBzdGFydFBlcmlvZFZhbHVlBAdzcGVuZGVkCQBlAgUGbW9tZW50BRBzdGFydFBlcmlvZFZhbHVlCQCUCgIFBnNlbGxlcgkAZQIFD3N0YXJ0UHJpY2VWYWx1ZQkAawMFB3NwZW5kZWQFCmRlbHRhUHJpY2UFBnBlcmlvZAEFaXNOZnQBB2Fzc2V0SWQEByRtYXRjaDAJAOwHAQUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgVBc3NldAQFdG9rZW4FByRtYXRjaDADAwkAAAIIBQV0b2tlbghkZWNpbWFscwAACQAAAggFBXRva2VuCHF1YW50aXR5AAEHCQAAAggFBXRva2VuCnJlaXNzdWFibGUHBwcBDGlzVHJ1c3RlZE5mdAEHYXNzZXRJZAQGaXNzdWVyCAkBBXZhbHVlAQkA7AcBBQdhc3NldElkBmlzc3VlcgkBC3ZhbHVlT3JFbHNlAgkAmwgCBQR0aGlzCQENZ2V0VHJ1c3RlZEtleQEFBmlzc3VlcgcBC2lzU2VsbEV4aXN0AQdhc3NldElkCQEJaXNEZWZpbmVkAQkAnQgCBQR0aGlzCQEKZ2V0U2VsbEtleQEFB2Fzc2V0SWQBDmlzQXVjdGlvbkV4aXN0AQdhc3NldElkCQEJaXNEZWZpbmVkAQkAnQgCBQR0aGlzCQENZ2V0QXVjdGlvbktleQEFB2Fzc2V0SWQBEmlzQ29ycmVjdFNlbGxQcmljZQEFcHJpY2UJAGYCBQVwcmljZQAAARZpc0NvcnJlY3RBdWN0aW9uUHJpY2VzAgpzdGFydFByaWNlCGVuZFByaWNlCQBmAgUKc3RhcnRQcmljZQUIZW5kUHJpY2UBB2lzQWRtaW4BBmNhbGxlcgkAAAIFBmNhbGxlcgUEdGhpcwENaXNWYWxpZENhbGxlcgIGY2FsbGVyBnNlbGxlcgMJAAACBQZjYWxsZXIFBHRoaXMGCQAAAgUGY2FsbGVyBQZzZWxsZXIBDmlzQXVjdGlvbkVuZGVkAgNub3cDZW5kCQBmAgUDbm93BQNlbmQBDWlzRW5vdWdoRnVuZHMCB3BheW1lbnQSY3VycmVudE1vbWVudFByaWNlCQBnAgUHcGF5bWVudAUSY3VycmVudE1vbWVudFByaWNlAQdpc1dhd2VzAQdhc3NldElkCQAAAgUHYXNzZXRJZAUEdW5pdAEMaXNDb3JyZWN0TmZ0AQVuZnRJZAMJAQEhAQkBBWlzTmZ0AQUFbmZ0SWQJAAIBAhBUb2tlbiBpcyBub3QgTmZ0AwkBC2lzU2VsbEV4aXN0AQUFbmZ0SWQJAAIBAhNTZWxsIGFscmVhZHkgZXhpc3RzAwkBDmlzQXVjdGlvbkV4aXN0AQUFbmZ0SWQJAAIBAhZBdWN0aW9uIGFscmVhZHkgZXhpc3RzBQR1bml0ARFpc0NvcnJlY3RQYXltZW50cwMMcGF5bWVudEFzc2V0DXBheW1lbnRBbW91bnQFcHJpY2UDCQEBIQEJAQdpc1dhd2VzAQUMcGF5bWVudEFzc2V0CQACAQIYUGF5bWVudCBtdXN0IGJlIGF0IFdBVkVTAwkBASEBCQENaXNFbm91Z2hGdW5kcwIFDXBheW1lbnRBbW91bnQFBXByaWNlCQACAQIQTm90IGVub3VnaCBmdW5kcwUEdW5pdAEHY2FsY0ZlZQAAAAEOY2FsY1RydXN0ZWRGZWUAAAABEnJlc3VsdEZ1bmRzQW1vdW50cwMJaXNUcnVzdGVkDXBheW1lbnRBbW91bnQLYWN0dWFsUHJpY2UDBQlpc1RydXN0ZWQJAJQKAgkAZQIFC2FjdHVhbFByaWNlCQEOY2FsY1RydXN0ZWRGZWUACQBlAgUNcGF5bWVudEFtb3VudAULYWN0dWFsUHJpY2UJAJQKAgkAZQIFC2FjdHVhbFByaWNlCQEHY2FsY0ZlZQAJAGUCBQ1wYXltZW50QW1vdW50BQthY3R1YWxQcmljZQEHZ2V0U2xvdAEFbmZ0SWQDCQELaXNTZWxsRXhpc3QBBQVuZnRJZAkAlAoCBQVrU2VsbAkBB2dldFNlbGwBBQVuZnRJZAMJAQ5pc0F1Y3Rpb25FeGlzdAEFBW5mdElkCQCUCgIFCGtBdWN0aW9uCQEKZ2V0QXVjdGlvbgEFBW5mdElkCQACAQISU2xvdCBkb2VzbmB0IGV4aXN0AARrQnV5AgNidXkABGtCaWQCA2JpZA0BaQEIcGxhY2VCaWQEBW5mdElkCW5mdF9vd25lcgltaW5fcHJpY2UJYmlkX3ByaWNlBAdhc3NldElkCQDZBAEFBW5mdElkBAZhbW91bnQJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AwkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQR1bml0CQACAQIMUGF5IGluIHdhdmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgUGYW1vdW50BQR1bml0CQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQClCAEIBQFpBmNhbGxlcgUJc2VwYXJhdG9yBQRrQmlkCQCsAgIJAKwCAgUFbmZ0SWQFCXNlcGFyYXRvcgkApAMBBQZhbW91bnQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKUIAQgFAWkGY2FsbGVyBQlzZXBhcmF0b3ICCW5mdF9vd25lcgUJbmZ0X293bmVyCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkApQgBCAUBaQZjYWxsZXIFCXNlcGFyYXRvcgIJbWluX3ByaWNlBQltaW5fcHJpY2UJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQClCAEIBQFpBmNhbGxlcgUJc2VwYXJhdG9yAgliaWRfcHJpY2UFCWJpZF9wcmljZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkApQgBCAUBaQZjYWxsZXIFCXNlcGFyYXRvcgIFbmZ0SWQFBW5mdElkBQNuaWwBaQEDcGF5AAQGYW1vdW50CQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAMJAQIhPQIICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUEdW5pdAkAAgECDFBheSBpbiB3YXZlcwUDbmlsAWkBCmNvbmZpcm1CaWQCBW5mdElkC3VzZXJBZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQICCmJpZF93aW5uZXIFC3VzZXJBZGRyZXNzBQNuaWwBaQEJY3JlYXRlTmZ0CQhuZnRfbmFtZQluZnRfb3duZXIPbmZ0X2RBcHBBZGRyZXNzCG5mdF90eXBlCG5mdF90YWdzEW5mdF9zZWxsaW5nX3ByaWNlD25mdF9kZXNjcmlwdGlvbgpuZnRfb25TZWxsCG5mdF9kYXRhBAhuZXdUb2tlbgkAwggFBQhuZnRfbmFtZQUPbmZ0X2Rlc2NyaXB0aW9uAAEAAAcEB2lzc3VlSWQJALgIAQUIbmV3VG9rZW4EBHR4SWQIBQFpDXRyYW5zYWN0aW9uSWQJAMwIAgUIbmV3VG9rZW4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEFB2lzc3VlSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJANgEAQUHaXNzdWVJZAUJc2VwYXJhdG9yAgVPd25lcgkApQgBCAUBaQZjYWxsZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJANgEAQUHaXNzdWVJZAUJc2VwYXJhdG9yAghuZnRfdHlwZQUIbmZ0X3R5cGUJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJANgEAQUHaXNzdWVJZAUJc2VwYXJhdG9yAghuZnRfdGFncwUIbmZ0X3RhZ3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJANgEAQUHaXNzdWVJZAUJc2VwYXJhdG9yAg9uZnRfZEFwcEFkZHJlc3MFD25mdF9kQXBwQWRkcmVzcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgIJANgEAQUHaXNzdWVJZAUJc2VwYXJhdG9yAhFuZnRfc2VsbGluZ19wcmljZQURbmZ0X3NlbGxpbmdfcHJpY2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJANgEAQUHaXNzdWVJZAUJc2VwYXJhdG9yAgpuZnRfb25TZWxsBQpuZnRfb25TZWxsCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIIbmZ0X2RhdGEFCG5mdF9kYXRhCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFBHR4SWQFCXNlcGFyYXRvcgIJaXNzdWVfbmZ0CQDYBAEFB2lzc3VlSWQFA25pbAFpAQhpc3N1ZU5mdAIEbmFtZQRtZXRhBAhuZXdUb2tlbgkAwggFBQRuYW1lBQRtZXRhAAEAAAcEB2lzc3VlSWQJALgIAQUIbmV3VG9rZW4JAMwIAgUIbmV3VG9rZW4JAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEFB2lzc3VlSWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJANgEAQUHaXNzdWVJZAUJc2VwYXJhdG9yAgVPd25lcgkApQgBCAUBaQZjYWxsZXIFA25pbAFpAQZidXlORlQCBW5mdElEEWN1cnJlbnRfbmZ0X293bmVyBAdhc3NldElkCQDZBAEFBW5mdElEBAZhbW91bnQJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BBBjaGVja093bmVySXNTYW1lBAckbWF0Y2gwCQCdCAIFBHRoaXMJAKwCAgkArAICAgRuZnRfBRFjdXJyZW50X25mdF9vd25lcgIGX293bmVyAwkAAQIFByRtYXRjaDACBlN0cmluZwQBYQUHJG1hdGNoMAUBYQcEBXByaWNlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkArAICCQCsAgIFBmtQcmljZQUJc2VwYXJhdG9yBQVuZnRJRAIeVGhlcmUgaXMgbm8gcHJpY2UgZm9yIHRoaXMgTkZUBAVvd25lcgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQERQGV4dHJOYXRpdmUoMTA1OCkBCQCsAgIJAKwCAgUFbmZ0SUQFCXNlcGFyYXRvcgIFT3duZXICCE5vIG93bmVyAwkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQR1bml0CQACAQIMUGF5IGluIHdhdmVzAwkAZgIJAQ1wYXJzZUludFZhbHVlAQUFcHJpY2UFBmFtb3VudAkAAgECD0ludmFsaWQgcGF5bWVudAMJAAACBRBjaGVja093bmVySXNTYW1lCQClCAEIBQFpBmNhbGxlcgkAAgECIU93bmVyIG9mIE5GVCBub3QgYWJsZSB0byBwdXJjaGFzZQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQUHYXNzZXRJZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQEHQWRkcmVzcwEJANkEAQUFb3duZXIJAQ1wYXJzZUludFZhbHVlAQUFcHJpY2UFBHVuaXQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKUIAQgFAWkGY2FsbGVyBQlzZXBhcmF0b3IFBGtCdXkJAKwCAgkArAICBQVuZnRJRAUJc2VwYXJhdG9yCQCkAwEFBmFtb3VudAkAzAgCCQELRGVsZXRlRW50cnkBCQCsAgIJAKwCAgIEbmZ0XwURY3VycmVudF9uZnRfb3duZXICBl9vd25lcgUDbmlsAWkBB3NlbGxORlQBBXByaWNlBAZzZWxsZXIICAUBaQZjYWxsZXIFYnl0ZXMECyR0MDg3MzU4ODIwCQCUCgIJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQEBnRva2VuMAgFCyR0MDg3MzU4ODIwAl8xBAdhbW91bnQwCAULJHQwODczNTg4MjACXzIDCQEBIQEJAQVpc05mdAEFBnRva2VuMAkAAgECEFRva2VuIGlzIG5vdCBORlQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgICBG5mdF8JANgEAQUGc2VsbGVyAgZfb3duZXIJANgEAQUGc2VsbGVyCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICBQZrUHJpY2UFCXNlcGFyYXRvcgkA2AQBCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQFBXByaWNlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQClCAEIBQFpBmNhbGxlcgUJc2VwYXJhdG9yBQVrU2VsbAkArAICCQCsAgIJANgEAQUGdG9rZW4wBQlzZXBhcmF0b3IJAKQDAQUHYW1vdW50MAUDbmlsAWkBB2FkZFNlbGwBBXByaWNlBAVuZnRJZAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCQELdmFsdWVPckVsc2UCCQEMaXNDb3JyZWN0TmZ0AQUFbmZ0SWQDCQEBIQEJARJpc0NvcnJlY3RTZWxsUHJpY2UBBQVwcmljZQkAAgECEVByaWNlIG11c3QgYmUgPiAwCQDMCAIJAQdzZXRTZWxsAwUFbmZ0SWQIBQFpBmNhbGxlcgUFcHJpY2UFA25pbAFpAQphZGRBdWN0aW9uAwpzdGFydFByaWNlBXN0YXJ0A2VuZAQFbmZ0SWQJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAkBC3ZhbHVlT3JFbHNlAgkBDGlzQ29ycmVjdE5mdAEFBW5mdElkCQDMCAIJAQpzZXRBdWN0aW9uBQgFAWkGY2FsbGVyBQVuZnRJZAUKc3RhcnRQcmljZQUFc3RhcnQFA2VuZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQVuZnRJZAUJc2VwYXJhdG9yAgluZnRfb3duZXIJAKUIAQgFAWkGY2FsbGVyBQNuaWwBaQELYnV5RnJvbVNsb3QBBW5mdElkBAskdDA5ODE1OTkwNAkAlAoCCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAxwYXltZW50QXNzZXQIBQskdDA5ODE1OTkwNAJfMQQNcGF5bWVudEFtb3VudAgFCyR0MDk4MTU5OTA0Al8yBAdhc3NldElkCQDZBAEFBW5mdElkBAskdDA5OTQ4OTk4NgkBB2dldFNsb3QBBQdhc3NldElkBAR0eXBlCAULJHQwOTk0ODk5ODYCXzEEB2RldGFpbHMIBQskdDA5OTQ4OTk4NgJfMgQHYmFzZVJlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQUHYXNzZXRJZAkAzAgCCQELRGVsZXRlRW50cnkBCQEKZ2V0U2xvdEtleQIFBHR5cGUFB2Fzc2V0SWQFA25pbAMJAAACBQR0eXBlBQVrU2VsbAQNJHQwMTAxMjgxMDE3NQkBC3BhcnNlQXNTZWxsAQUHZGV0YWlscwQGc2VsbGVyCAUNJHQwMTAxMjgxMDE3NQJfMQQKcHJpY2VWYWx1ZQgFDSR0MDEwMTI4MTAxNzUCXzIJAQt2YWx1ZU9yRWxzZQIJARFpc0NvcnJlY3RQYXltZW50cwMFDHBheW1lbnRBc3NldAUNcGF5bWVudEFtb3VudAUKcHJpY2VWYWx1ZQQNJHQwMTAyNjAxMDM2MgkBEnJlc3VsdEZ1bmRzQW1vdW50cwMJAQxpc1RydXN0ZWROZnQBBQdhc3NldElkBQ1wYXltZW50QW1vdW50BQpwcmljZVZhbHVlBAxzZWxsZXJBbW91bnQIBQ0kdDAxMDI2MDEwMzYyAl8xBAtidXllckFtb3VudAgFDSR0MDEwMjYwMTAzNjICXzIECnVwZGF0ZWRSZXMJAM4IAgUHYmFzZVJlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQZzZWxsZXIFDHNlbGxlckFtb3VudAUEdW5pdAUDbmlsAwkAZgIFC2J1eWVyQW1vdW50AAAJAM4IAgUKdXBkYXRlZFJlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIFC2J1eWVyQW1vdW50BQR1bml0BQNuaWwFCnVwZGF0ZWRSZXMEDSR0MDEwNTc5MTA2NDgJARhjYWxjUHJpY2VBdEN1cnJlbnRNb21lbnQCBQdhc3NldElkBQZoZWlnaHQEBnNlbGxlcggFDSR0MDEwNTc5MTA2NDgCXzEEC2FjdHVhbFByaWNlCAUNJHQwMTA1NzkxMDY0OAJfMgkBC3ZhbHVlT3JFbHNlAgkBEWlzQ29ycmVjdFBheW1lbnRzAwUMcGF5bWVudEFzc2V0BQ1wYXltZW50QW1vdW50BQthY3R1YWxQcmljZQQNJHQwMTA3MzQxMDgzNwkBEnJlc3VsdEZ1bmRzQW1vdW50cwMJAQxpc1RydXN0ZWROZnQBBQdhc3NldElkBQ1wYXltZW50QW1vdW50BQthY3R1YWxQcmljZQQMc2VsbGVyQW1vdW50CAUNJHQwMTA3MzQxMDgzNwJfMQQLYnV5ZXJBbW91bnQIBQ0kdDAxMDczNDEwODM3Al8yBAp1cGRhdGVkUmVzCQDOCAIFB2Jhc2VSZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUGc2VsbGVyBQxzZWxsZXJBbW91bnQFBHVuaXQFA25pbAMJAGYCBQtidXllckFtb3VudAAACQDOCAIFCnVwZGF0ZWRSZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQtidXllckFtb3VudAUEdW5pdAUDbmlsBQp1cGRhdGVkUmVzAWkBC2RlY2xpbmVTbG90AQVuZnRJZAQHYXNzZXRJZAkA2QQBBQVuZnRJZAQNJHQwMTExMzgxMTE3NgkBB2dldFNsb3QBBQdhc3NldElkBAR0eXBlCAUNJHQwMTExMzgxMTE3NgJfMQQHZGV0YWlscwgFDSR0MDExMTM4MTExNzYCXzIEB2Jhc2VSZXMJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCmdldFNsb3RLZXkCBQR0eXBlBQdhc3NldElkBQNuaWwDCQAAAgUEdHlwZQUFa1NlbGwEDSR0MDExMjY4MTEzMTUJAQtwYXJzZUFzU2VsbAEFB2RldGFpbHMEBnNlbGxlcggFDSR0MDExMjY4MTEzMTUCXzEECnByaWNlVmFsdWUIBQ0kdDAxMTI2ODExMzE1Al8yAwkBASEBCQENaXNWYWxpZENhbGxlcgIIBQFpBmNhbGxlcgUGc2VsbGVyCQACAQIOSW52YWxpZCBjYWxsZXIJAM4IAgUHYmFzZVJlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQZzZWxsZXIAAQUHYXNzZXRJZAUDbmlsBA0kdDAxMTQ2MDExNTY0CQEOcGFyc2VBc0F1Y3Rpb24BBQdkZXRhaWxzBAZzZWxsZXIIBQ0kdDAxMTQ2MDExNTY0Al8xBA9zdGFydFByaWNlVmFsdWUIBQ0kdDAxMTQ2MDExNTY0Al8yBA1lbmRQcmljZVZhbHVlCAUNJHQwMTE0NjAxMTU2NAJfMwQQc3RhcnRQZXJpb2RWYWx1ZQgFDSR0MDExNDYwMTE1NjQCXzQEDmVuZFBlcmlvZFZhbHVlCAUNJHQwMTE0NjAxMTU2NAJfNQMJAQEhAQkBDWlzVmFsaWRDYWxsZXICCAUBaQZjYWxsZXIFBnNlbGxlcgkAAgECDkludmFsaWQgY2FsbGVyAwkBASEBCQEOaXNBdWN0aW9uRW5kZWQCBQZoZWlnaHQFDmVuZFBlcmlvZFZhbHVlCQACAQIXV2FpdCBmb3IgZW5kIG9mIGF1Y3Rpb24JAM4IAgUHYmFzZVJlcwkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDBQZzZWxsZXIAAQUHYXNzZXRJZAUDbmlsAWkBEHNldFRydXN0ZWRJc3N1ZXIBC3RydXN0ZWRBZGRyAwkBASEBCQEHaXNBZG1pbgEIBQFpBmNhbGxlcgkAAgECCk9ubHkgYWRtaW4JAMwIAgkBDEJvb2xlYW5FbnRyeQIJAQ1nZXRUcnVzdGVkS2V5AQkBEUBleHRyTmF0aXZlKDEwNjIpAQULdHJ1c3RlZEFkZHIGBQNuaWwBaQEXZ2V0UHJpY2VBdEN1cnJlbnRNb21lbnQCBW5mdElkBm1vbWVudAQHYXNzZXRJZAkA2QQBBQVuZnRJZAQNJHQwMTIxMDUxMjE2OAkBGGNhbGNQcmljZUF0Q3VycmVudE1vbWVudAIFB2Fzc2V0SWQFBm1vbWVudAQGc2VsbGVyCAUNJHQwMTIxMDUxMjE2OAJfMQQFcHJpY2UIBQ0kdDAxMjEwNTEyMTY4Al8yCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQELZ2V0UHJpY2VLZXkBBQdhc3NldElkBQVwcmljZQUDbmlsAFp9fdc=",
    "height": 2339984,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 51ejEGTX2BSxy2fnA1vAtVzS69fN6uvaQNGa5GeVQ2KS
Next: 4VUqYAADzkwhBGQrmTWFgovMSCEHqndmqogSgdJwqPcX

Diff: 
Old
New
Differences
321
321
 
@Callable(i)
322
322
 
func sellNFT (price) = {
323
323
 
    let seller = i.caller.bytes
324
-
    let $t087328817 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
325
-
    let token0 = $t087328817._1
326
-
    let amount0 = $t087328817._2
324
+
    let $t087358820 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
325
+
    let token0 = $t087358820._1
326
+
    let amount0 = $t087358820._2
327
327
 
    if (!(isNft(token0)))
328
328
 
        then throw("Token is not NFT")
329
-
        else [StringEntry((("nft_" + toBase58String(seller)) + "_owner"), toBase58String(seller)), StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), toString(price)), StringEntry(((toString(i.caller) + separator) + kSell), ((toBase58String(token0) + separator) + toString(amount0)))]
329
+
        else [StringEntry((("nft_" + toBase58String(seller)) + "_owner"), toBase58String(seller)), StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), price), StringEntry(((toString(i.caller) + separator) + kSell), ((toBase58String(token0) + separator) + toString(amount0)))]
330
330
 
    }
331
331
 
332
332
 
351
351
 
352
352
 
@Callable(i)
353
353
 
func buyFromSlot (nftId) = {
354
-
    let $t098239912 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
355
-
    let paymentAsset = $t098239912._1
356
-
    let paymentAmount = $t098239912._2
354
+
    let $t098159904 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
355
+
    let paymentAsset = $t098159904._1
356
+
    let paymentAmount = $t098159904._2
357
357
 
    let assetId = fromBase58String(nftId)
358
-
    let $t099569994 = getSlot(assetId)
359
-
    let type = $t099569994._1
360
-
    let details = $t099569994._2
358
+
    let $t099489986 = getSlot(assetId)
359
+
    let type = $t099489986._1
360
+
    let details = $t099489986._2
361
361
 
    let baseRes = [ScriptTransfer(i.caller, 1, assetId), DeleteEntry(getSlotKey(type, assetId))]
362
362
 
    if ((type == kSell))
363
363
 
        then {
364
-
            let $t01013610183 = parseAsSell(details)
365
-
            let seller = $t01013610183._1
366
-
            let priceValue = $t01013610183._2
364
+
            let $t01012810175 = parseAsSell(details)
365
+
            let seller = $t01012810175._1
366
+
            let priceValue = $t01012810175._2
367
367
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, priceValue), {
368
-
                let $t01026810370 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
369
-
                let sellerAmount = $t01026810370._1
370
-
                let buyerAmount = $t01026810370._2
368
+
                let $t01026010362 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
369
+
                let sellerAmount = $t01026010362._1
370
+
                let buyerAmount = $t01026010362._2
371
371
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
372
372
 
                if ((buyerAmount > 0))
373
373
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
375
375
 
                })
376
376
 
            }
377
377
 
        else {
378
-
            let $t01058710656 = calcPriceAtCurrentMoment(assetId, height)
379
-
            let seller = $t01058710656._1
380
-
            let actualPrice = $t01058710656._2
378
+
            let $t01057910648 = calcPriceAtCurrentMoment(assetId, height)
379
+
            let seller = $t01057910648._1
380
+
            let actualPrice = $t01057910648._2
381
381
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, actualPrice), {
382
-
                let $t01074210845 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
383
-
                let sellerAmount = $t01074210845._1
384
-
                let buyerAmount = $t01074210845._2
382
+
                let $t01073410837 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
383
+
                let sellerAmount = $t01073410837._1
384
+
                let buyerAmount = $t01073410837._2
385
385
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
386
386
 
                if ((buyerAmount > 0))
387
387
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
395
395
 
@Callable(i)
396
396
 
func declineSlot (nftId) = {
397
397
 
    let assetId = fromBase58String(nftId)
398
-
    let $t01114611184 = getSlot(assetId)
399
-
    let type = $t01114611184._1
400
-
    let details = $t01114611184._2
398
+
    let $t01113811176 = getSlot(assetId)
399
+
    let type = $t01113811176._1
400
+
    let details = $t01113811176._2
401
401
 
    let baseRes = [DeleteEntry(getSlotKey(type, assetId))]
402
402
 
    if ((type == kSell))
403
403
 
        then {
404
-
            let $t01127611323 = parseAsSell(details)
405
-
            let seller = $t01127611323._1
406
-
            let priceValue = $t01127611323._2
404
+
            let $t01126811315 = parseAsSell(details)
405
+
            let seller = $t01126811315._1
406
+
            let priceValue = $t01126811315._2
407
407
 
            if (!(isValidCaller(i.caller, seller)))
408
408
 
                then throw("Invalid caller")
409
409
 
                else (baseRes ++ [ScriptTransfer(seller, 1, assetId)])
410
410
 
            }
411
411
 
        else {
412
-
            let $t01146811572 = parseAsAuction(details)
413
-
            let seller = $t01146811572._1
414
-
            let startPriceValue = $t01146811572._2
415
-
            let endPriceValue = $t01146811572._3
416
-
            let startPeriodValue = $t01146811572._4
417
-
            let endPeriodValue = $t01146811572._5
412
+
            let $t01146011564 = parseAsAuction(details)
413
+
            let seller = $t01146011564._1
414
+
            let startPriceValue = $t01146011564._2
415
+
            let endPriceValue = $t01146011564._3
416
+
            let startPeriodValue = $t01146011564._4
417
+
            let endPeriodValue = $t01146011564._5
418
418
 
            if (!(isValidCaller(i.caller, seller)))
419
419
 
                then throw("Invalid caller")
420
420
 
                else if (!(isAuctionEnded(height, endPeriodValue)))
435
435
 
@Callable(i)
436
436
 
func getPriceAtCurrentMoment (nftId,moment) = {
437
437
 
    let assetId = fromBase58String(nftId)
438
-
    let $t01211312176 = calcPriceAtCurrentMoment(assetId, moment)
439
-
    let seller = $t01211312176._1
440
-
    let price = $t01211312176._2
438
+
    let $t01210512168 = calcPriceAtCurrentMoment(assetId, moment)
439
+
    let seller = $t01210512168._1
440
+
    let price = $t01210512168._2
441
441
 
[IntegerEntry(getPriceKey(assetId), price)]
442
442
 
    }
443
443
 

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
 
let kBid = "bid"
252
252
 
253
253
 
@Callable(i)
254
254
 
func placeBid (nftId,nft_owner,min_price,bid_price) = {
255
255
 
    let assetId = fromBase58String(nftId)
256
256
 
    let amount = value(i.payments[0].amount)
257
257
 
    if ((i.payments[0].assetId != unit))
258
258
 
        then throw("Pay in waves")
259
259
 
        else [ScriptTransfer(i.caller, amount, unit), StringEntry(((toString(i.caller) + separator) + kBid), ((nftId + separator) + toString(amount))), StringEntry(((toString(i.caller) + separator) + "nft_owner"), nft_owner), IntegerEntry(((toString(i.caller) + separator) + "min_price"), min_price), IntegerEntry(((toString(i.caller) + separator) + "bid_price"), bid_price), StringEntry(((toString(i.caller) + separator) + "nftId"), nftId)]
260
260
 
    }
261
261
 
262
262
 
263
263
 
264
264
 
@Callable(i)
265
265
 
func pay () = {
266
266
 
    let amount = value(i.payments[0].amount)
267
267
 
    if ((i.payments[0].assetId != unit))
268
268
 
        then throw("Pay in waves")
269
269
 
        else nil
270
270
 
    }
271
271
 
272
272
 
273
273
 
274
274
 
@Callable(i)
275
275
 
func confirmBid (nftId,userAddress) = [StringEntry("bid_winner", userAddress)]
276
276
 
277
277
 
278
278
 
279
279
 
@Callable(i)
280
280
 
func createNft (nft_name,nft_owner,nft_dAppAddress,nft_type,nft_tags,nft_selling_price,nft_description,nft_onSell,nft_data) = {
281
281
 
    let newToken = Issue(nft_name, nft_description, 1, 0, false)
282
282
 
    let issueId = calculateAssetId(newToken)
283
283
 
    let txId = i.transactionId
284
284
 
[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))]
285
285
 
    }
286
286
 
287
287
 
288
288
 
289
289
 
@Callable(i)
290
290
 
func issueNft (name,meta) = {
291
291
 
    let newToken = Issue(name, meta, 1, 0, false)
292
292
 
    let issueId = calculateAssetId(newToken)
293
293
 
[newToken, ScriptTransfer(i.caller, 1, issueId), StringEntry(((toBase58String(issueId) + separator) + "Owner"), toString(i.caller))]
294
294
 
    }
295
295
 
296
296
 
297
297
 
298
298
 
@Callable(i)
299
299
 
func buyNFT (nftID,current_nft_owner) = {
300
300
 
    let assetId = fromBase58String(nftID)
301
301
 
    let amount = value(i.payments[0].amount)
302
302
 
    let checkOwnerIsSame =     match getString(this, (("nft_" + current_nft_owner) + "_owner")) {
303
303
 
        case a: String => 
304
304
 
            a
305
305
 
        case _ => 
306
306
 
            false
307
307
 
    }
308
308
 
    let price = valueOrErrorMessage(getString(((kPrice + separator) + nftID)), "There is no price for this NFT")
309
309
 
    let owner = valueOrErrorMessage(getStringValue(((nftID + separator) + "Owner")), "No owner")
310
310
 
    if ((i.payments[0].assetId != unit))
311
311
 
        then throw("Pay in waves")
312
312
 
        else if ((parseIntValue(price) > amount))
313
313
 
            then throw("Invalid payment")
314
314
 
            else if ((checkOwnerIsSame == toString(i.caller)))
315
315
 
                then throw("Owner of NFT not able to purchase")
316
316
 
                else [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(Address(fromBase58String(owner)), parseIntValue(price), unit), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount))), DeleteEntry((("nft_" + current_nft_owner) + "_owner"))]
317
317
 
    }
318
318
 
319
319
 
320
320
 
321
321
 
@Callable(i)
322
322
 
func sellNFT (price) = {
323
323
 
    let seller = i.caller.bytes
324
-
    let $t087328817 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
325
-
    let token0 = $t087328817._1
326
-
    let amount0 = $t087328817._2
324
+
    let $t087358820 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
325
+
    let token0 = $t087358820._1
326
+
    let amount0 = $t087358820._2
327
327
 
    if (!(isNft(token0)))
328
328
 
        then throw("Token is not NFT")
329
-
        else [StringEntry((("nft_" + toBase58String(seller)) + "_owner"), toBase58String(seller)), StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), toString(price)), StringEntry(((toString(i.caller) + separator) + kSell), ((toBase58String(token0) + separator) + toString(amount0)))]
329
+
        else [StringEntry((("nft_" + toBase58String(seller)) + "_owner"), toBase58String(seller)), StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), price), StringEntry(((toString(i.caller) + separator) + kSell), ((toBase58String(token0) + separator) + toString(amount0)))]
330
330
 
    }
331
331
 
332
332
 
333
333
 
334
334
 
@Callable(i)
335
335
 
func addSell (price) = {
336
336
 
    let nftId = value(i.payments[0].assetId)
337
337
 
    valueOrElse(isCorrectNft(nftId), if (!(isCorrectSellPrice(price)))
338
338
 
        then throw("Price must be > 0")
339
339
 
        else [setSell(nftId, i.caller, price)])
340
340
 
    }
341
341
 
342
342
 
343
343
 
344
344
 
@Callable(i)
345
345
 
func addAuction (startPrice,start,end) = {
346
346
 
    let nftId = value(i.payments[0].assetId)
347
347
 
    valueOrElse(isCorrectNft(nftId), [setAuction(i.caller, nftId, startPrice, start, end), StringEntry(((toBase58String(nftId) + separator) + "nft_owner"), toString(i.caller))])
348
348
 
    }
349
349
 
350
350
 
351
351
 
352
352
 
@Callable(i)
353
353
 
func buyFromSlot (nftId) = {
354
-
    let $t098239912 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
355
-
    let paymentAsset = $t098239912._1
356
-
    let paymentAmount = $t098239912._2
354
+
    let $t098159904 = $Tuple2(i.payments[0].assetId, value(i.payments[0].amount))
355
+
    let paymentAsset = $t098159904._1
356
+
    let paymentAmount = $t098159904._2
357
357
 
    let assetId = fromBase58String(nftId)
358
-
    let $t099569994 = getSlot(assetId)
359
-
    let type = $t099569994._1
360
-
    let details = $t099569994._2
358
+
    let $t099489986 = getSlot(assetId)
359
+
    let type = $t099489986._1
360
+
    let details = $t099489986._2
361
361
 
    let baseRes = [ScriptTransfer(i.caller, 1, assetId), DeleteEntry(getSlotKey(type, assetId))]
362
362
 
    if ((type == kSell))
363
363
 
        then {
364
-
            let $t01013610183 = parseAsSell(details)
365
-
            let seller = $t01013610183._1
366
-
            let priceValue = $t01013610183._2
364
+
            let $t01012810175 = parseAsSell(details)
365
+
            let seller = $t01012810175._1
366
+
            let priceValue = $t01012810175._2
367
367
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, priceValue), {
368
-
                let $t01026810370 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
369
-
                let sellerAmount = $t01026810370._1
370
-
                let buyerAmount = $t01026810370._2
368
+
                let $t01026010362 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, priceValue)
369
+
                let sellerAmount = $t01026010362._1
370
+
                let buyerAmount = $t01026010362._2
371
371
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
372
372
 
                if ((buyerAmount > 0))
373
373
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
374
374
 
                    else updatedRes
375
375
 
                })
376
376
 
            }
377
377
 
        else {
378
-
            let $t01058710656 = calcPriceAtCurrentMoment(assetId, height)
379
-
            let seller = $t01058710656._1
380
-
            let actualPrice = $t01058710656._2
378
+
            let $t01057910648 = calcPriceAtCurrentMoment(assetId, height)
379
+
            let seller = $t01057910648._1
380
+
            let actualPrice = $t01057910648._2
381
381
 
            valueOrElse(isCorrectPayments(paymentAsset, paymentAmount, actualPrice), {
382
-
                let $t01074210845 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
383
-
                let sellerAmount = $t01074210845._1
384
-
                let buyerAmount = $t01074210845._2
382
+
                let $t01073410837 = resultFundsAmounts(isTrustedNft(assetId), paymentAmount, actualPrice)
383
+
                let sellerAmount = $t01073410837._1
384
+
                let buyerAmount = $t01073410837._2
385
385
 
                let updatedRes = (baseRes ++ [ScriptTransfer(seller, sellerAmount, unit)])
386
386
 
                if ((buyerAmount > 0))
387
387
 
                    then (updatedRes ++ [ScriptTransfer(i.caller, buyerAmount, unit)])
388
388
 
                    else updatedRes
389
389
 
                })
390
390
 
            }
391
391
 
    }
392
392
 
393
393
 
394
394
 
395
395
 
@Callable(i)
396
396
 
func declineSlot (nftId) = {
397
397
 
    let assetId = fromBase58String(nftId)
398
-
    let $t01114611184 = getSlot(assetId)
399
-
    let type = $t01114611184._1
400
-
    let details = $t01114611184._2
398
+
    let $t01113811176 = getSlot(assetId)
399
+
    let type = $t01113811176._1
400
+
    let details = $t01113811176._2
401
401
 
    let baseRes = [DeleteEntry(getSlotKey(type, assetId))]
402
402
 
    if ((type == kSell))
403
403
 
        then {
404
-
            let $t01127611323 = parseAsSell(details)
405
-
            let seller = $t01127611323._1
406
-
            let priceValue = $t01127611323._2
404
+
            let $t01126811315 = parseAsSell(details)
405
+
            let seller = $t01126811315._1
406
+
            let priceValue = $t01126811315._2
407
407
 
            if (!(isValidCaller(i.caller, seller)))
408
408
 
                then throw("Invalid caller")
409
409
 
                else (baseRes ++ [ScriptTransfer(seller, 1, assetId)])
410
410
 
            }
411
411
 
        else {
412
-
            let $t01146811572 = parseAsAuction(details)
413
-
            let seller = $t01146811572._1
414
-
            let startPriceValue = $t01146811572._2
415
-
            let endPriceValue = $t01146811572._3
416
-
            let startPeriodValue = $t01146811572._4
417
-
            let endPeriodValue = $t01146811572._5
412
+
            let $t01146011564 = parseAsAuction(details)
413
+
            let seller = $t01146011564._1
414
+
            let startPriceValue = $t01146011564._2
415
+
            let endPriceValue = $t01146011564._3
416
+
            let startPeriodValue = $t01146011564._4
417
+
            let endPeriodValue = $t01146011564._5
418
418
 
            if (!(isValidCaller(i.caller, seller)))
419
419
 
                then throw("Invalid caller")
420
420
 
                else if (!(isAuctionEnded(height, endPeriodValue)))
421
421
 
                    then throw("Wait for end of auction")
422
422
 
                    else (baseRes ++ [ScriptTransfer(seller, 1, assetId)])
423
423
 
            }
424
424
 
    }
425
425
 
426
426
 
427
427
 
428
428
 
@Callable(i)
429
429
 
func setTrustedIssuer (trustedAddr) = if (!(isAdmin(i.caller)))
430
430
 
    then throw("Only admin")
431
431
 
    else [BooleanEntry(getTrustedKey(addressFromStringValue(trustedAddr)), true)]
432
432
 
433
433
 
434
434
 
435
435
 
@Callable(i)
436
436
 
func getPriceAtCurrentMoment (nftId,moment) = {
437
437
 
    let assetId = fromBase58String(nftId)
438
-
    let $t01211312176 = calcPriceAtCurrentMoment(assetId, moment)
439
-
    let seller = $t01211312176._1
440
-
    let price = $t01211312176._2
438
+
    let $t01210512168 = calcPriceAtCurrentMoment(assetId, moment)
439
+
    let seller = $t01210512168._1
440
+
    let price = $t01210512168._2
441
441
 
[IntegerEntry(getPriceKey(assetId), price)]
442
442
 
    }
443
443
 
444
444
 

github/deemru/w8io/026f985 
58.70 ms ◑