w8 · tx · Crp···DpS

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

Old	New		Differences
338	338		let bg = be._2
339	339		if (!(ad(bf)))
340	340		then throw("Token is not NFT")
341		-	else [StringEntry((("nft_" + toBase58String(J)) + "_owner"), toBase58String(J)), StringEntry(((e + a) + toBase58String(value(aG.payments[0].assetId))), ~~toString(~~P)), StringEntry(((toString(aG.caller) + a) + c), ((toBase58String(bf) + a) + toString(bg)))]
	341	+	else [StringEntry((("nft_" + toBase58String(J)) + "_owner"), toBase58String(J)), StringEntry(((e + a) + toBase58String(value(aG.payments[0].assetId))), P), StringEntry(((toString(aG.caller) + a) + c), ((toBase58String(bf) + a) + toString(bg)))]
342	342		}
343	343
344	344

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

github/deemru/w8io/873ac7e 
61.14 ms ◑