w8 · tx · 9i6···6Ta

tx · 9i6ygQvUQUJemRTpVawdSWR7QFt9tecJkgFLn7us76Ta

3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq:  -0.50000000 Waves

2022.11.30 12:35 [2339671] smart account 3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "9i6ygQvUQUJemRTpVawdSWR7QFt9tecJkgFLn7us76Ta",
    "fee": 50000000,
    "feeAssetId": null,
    "timestamp": 1669800979862,
    "version": 2,
    "chainId": 84,
    "sender": "3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq",
    "senderPublicKey": "H6UqxUDcJamDRg1uykVcWMn4zhAMTV7i1nfPq1moLWmJ",
    "proofs": [
        "2K8swthQ92d7kRJWn4MsRwPyS3zRKNfvBKur69awNNmgY5rRigtaFyd54jaGQZ37ccwEFb3TkjvCWxmbSDfqAfGW"
    ],
    "script": "base64:BgJNCAISCwoJCAgICAgBCAgIEgQKAggIEgMKAQgSAwoBARIDCgEBEgUKAwgICBIDCgEIEgMKAQgSAwoBCBIECgIIARIGCgQICAEBEgMKAQgoAAlzZXBhcmF0b3ICAV8ACGtBdWN0aW9uAgdhdWN0aW9uAAVrU2VsbAIEc2VsbAAIa1RydXN0ZWQCB3RydXN0ZWQABmtQcmljZQIFcHJpY2UBCmdldFNsb3RLZXkCBnByZWZpeAVuZnRJZAkArAICCQCsAgIFBnByZWZpeAUJc2VwYXJhdG9yCQDYBAEFBW5mdElkAQtnZXRQcmljZUtleQEFbmZ0SWQJAKwCAgkArAICBQZrUHJpY2UFCXNlcGFyYXRvcgkA2AQBBQVuZnRJZAEKZ2V0U2VsbEtleQEFbmZ0SWQJAKwCAgkArAICBQVrU2VsbAUJc2VwYXJhdG9yCQDYBAEFBW5mdElkAQ1nZXRBdWN0aW9uS2V5AQVuZnRJZAkArAICCQCsAgIFCGtBdWN0aW9uBQlzZXBhcmF0b3IJANgEAQUFbmZ0SWQBDWdldFRydXN0ZWRLZXkBBmlzc3VlcgkArAICCQCsAgIFCGtUcnVzdGVkBQlzZXBhcmF0b3IJAKUIAQUGaXNzdWVyAQlhZGRUb0xpc3QCBWFjY3VtCW5leHRWYWx1ZQkAzggCBQVhY2N1bQkAzAgCBQluZXh0VmFsdWUFA25pbAEKam9pblN0cmluZwEGcGFyYW1zBAZsZW5ndGgJAJADAQUGcGFyYW1zAwkAAAIFBmxlbmd0aAAACQACAQINRW1wdHkgIHBhcmFtcwMJAAACBQZsZW5ndGgAAQkAuQkCCgACJGwFBnBhcmFtcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJYWRkVG9MaXN0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyAxCQEFJGYwXzICCQEFJGYwXzECBQUkYWNjMAAAAAEFCXNlcGFyYXRvcgMJAAACBQZsZW5ndGgAAgkAuQkCCgACJGwFBnBhcmFtcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJYWRkVG9MaXN0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyAyCQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgUJc2VwYXJhdG9yAwkAAAIFBmxlbmd0aAADCQC5CQIKAAIkbAUGcGFyYW1zCgACJHMJAJADAQUCJGwKAAUkYWNjMAUDbmlsCgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlhZGRUb0xpc3QCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDMJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMFCXNlcGFyYXRvcgMJAAACBQZsZW5ndGgABAkAuQkCCgACJGwFBnBhcmFtcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJYWRkVG9MaXN0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA0CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQFCXNlcGFyYXRvcgMJAAACBQZsZW5ndGgABQkAuQkCCgACJGwFBnBhcmFtcwoAAiRzCQCQAwEFAiRsCgAFJGFjYzAFA25pbAoBBSRmMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJYWRkVG9MaXN0AgUCJGEJAJEDAgUCJGwFAiRpCgEFJGYwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA1CQEFJGYwXzICCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECCQEFJGYwXzECBQUkYWNjMAAAAAEAAgADAAQABQUJc2VwYXJhdG9yCQACAQIhTWF4IG51bWJlciBvZiBwYXJhbWV0ZXJzIGV4Y2VlZGVkAQ5wYXJzZUFzQXVjdGlvbgEHZGV0YWlscwQDcmVzCQC1CQIFB2RldGFpbHMFCXNlcGFyYXRvcgkAlwoFCQERQGV4dHJOYXRpdmUoMTA2MikBCQCRAwIFA3JlcwAACQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDcmVzAAEJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNyZXMAAgkBDXBhcnNlSW50VmFsdWUBCQCRAwIFA3JlcwADCQENcGFyc2VJbnRWYWx1ZQEJAJEDAgUDcmVzAAQBC3BhcnNlQXNTZWxsAQdkZXRhaWxzBANyZXMJALUJAgUHZGV0YWlscwUJc2VwYXJhdG9yCQCUCgIJARFAZXh0ck5hdGl2ZSgxMDYyKQEJAJEDAgUDcmVzAAAJAQ1wYXJzZUludFZhbHVlAQkAkQMCBQNyZXMAAQEKam9pblN0cnVjdAEGcGFyYW1zBAckbWF0Y2gwBQZwYXJhbXMDCQABAgUHJG1hdGNoMAIeKEFkZHJlc3MsIEludCwgU3RyaW5nLCBTdHJpbmcpBAdhdWN0aW9uBQckbWF0Y2gwCQEKam9pblN0cmluZwEJAMwIAgkApQgBCAUHYXVjdGlvbgJfMQkAzAgCCQCkAwEIBQdhdWN0aW9uAl8yCQDMCAIIBQdhdWN0aW9uAl8zCQDMCAIIBQdhdWN0aW9uAl80BQNuaWwDCQABAgUHJG1hdGNoMAIOKEFkZHJlc3MsIEludCkEBHNlbGwFByRtYXRjaDAJAQpqb2luU3RyaW5nAQkAzAgCCQClCAEIBQRzZWxsAl8xCQDMCAIJAKQDAQgFBHNlbGwCXzIFA25pbAkAAgECE1dyb25nIHBhcmFtcyB0dXBwbGUBCnNldEF1Y3Rpb24FBnNlbGxlcgVuZnRJZApzdGFydFByaWNlBXN0YXJ0A2VuZAkBC1N0cmluZ0VudHJ5AgkBDWdldEF1Y3Rpb25LZXkBBQVuZnRJZAkBCmpvaW5TdHJ1Y3QBCQCWCgQFBnNlbGxlcgUKc3RhcnRQcmljZQUFc3RhcnQFA2VuZAEHc2V0U2VsbAMFbmZ0SWQGY2VsbGVyBXByaWNlCQELU3RyaW5nRW50cnkCCQEKZ2V0U2VsbEtleQEFBW5mdElkCQEKam9pblN0cnVjdAEJAJQKAgUGY2VsbGVyBQVwcmljZQEKZ2V0QXVjdGlvbgEFbmZ0SWQJAQV2YWx1ZQEJAJ0IAgUEdGhpcwkBDWdldEF1Y3Rpb25LZXkBBQVuZnRJZAEHZ2V0U2VsbAEFbmZ0SWQJAQV2YWx1ZQEJAJ0IAgUEdGhpcwkBCmdldFNlbGxLZXkBBQVuZnRJZAEYY2FsY1ByaWNlQXRDdXJyZW50TW9tZW50Agdhc3NldElkBm1vbWVudAQHZGV0YWlscwkBCmdldEF1Y3Rpb24BBQdhc3NldElkBAskdDAyNzU1Mjg1OQkBDnBhcnNlQXNBdWN0aW9uAQUHZGV0YWlscwQGc2VsbGVyCAULJHQwMjc1NTI4NTkCXzEED3N0YXJ0UHJpY2VWYWx1ZQgFCyR0MDI3NTUyODU5Al8yBA1lbmRQcmljZVZhbHVlCAULJHQwMjc1NTI4NTkCXzMEEHN0YXJ0UGVyaW9kVmFsdWUIBQskdDAyNzU1Mjg1OQJfNAQOZW5kUGVyaW9kVmFsdWUIBQskdDAyNzU1Mjg1OQJfNQMJAGcCBQZtb21lbnQFDmVuZFBlcmlvZFZhbHVlCQCUCgIFBnNlbGxlcgUNZW5kUHJpY2VWYWx1ZQQKZGVsdGFQcmljZQkAZQIFD3N0YXJ0UHJpY2VWYWx1ZQUNZW5kUHJpY2VWYWx1ZQQGcGVyaW9kCQBlAgUOZW5kUGVyaW9kVmFsdWUFEHN0YXJ0UGVyaW9kVmFsdWUEB3NwZW5kZWQJAGUCBQZtb21lbnQFEHN0YXJ0UGVyaW9kVmFsdWUJAJQKAgUGc2VsbGVyCQBlAgUPc3RhcnRQcmljZVZhbHVlCQBrAwUHc3BlbmRlZAUKZGVsdGFQcmljZQUGcGVyaW9kAQVpc05mdAEHYXNzZXRJZAQHJG1hdGNoMAkA7AcBBQdhc3NldElkAwkAAQIFByRtYXRjaDACBUFzc2V0BAV0b2tlbgUHJG1hdGNoMAMDCQAAAggFBXRva2VuCGRlY2ltYWxzAAAJAAACCAUFdG9rZW4IcXVhbnRpdHkAAQcJAAACCAUFdG9rZW4KcmVpc3N1YWJsZQcHBwEMaXNUcnVzdGVkTmZ0AQdhc3NldElkBAZpc3N1ZXIICQEFdmFsdWUBCQDsBwEFB2Fzc2V0SWQGaXNzdWVyCQELdmFsdWVPckVsc2UCCQCbCAIFBHRoaXMJAQ1nZXRUcnVzdGVkS2V5AQUGaXNzdWVyBwELaXNTZWxsRXhpc3QBB2Fzc2V0SWQJAQlpc0RlZmluZWQBCQCdCAIFBHRoaXMJAQpnZXRTZWxsS2V5AQUHYXNzZXRJZAEOaXNBdWN0aW9uRXhpc3QBB2Fzc2V0SWQJAQlpc0RlZmluZWQBCQCdCAIFBHRoaXMJAQ1nZXRBdWN0aW9uS2V5AQUHYXNzZXRJZAESaXNDb3JyZWN0U2VsbFByaWNlAQVwcmljZQkAZgIFBXByaWNlAAABFmlzQ29ycmVjdEF1Y3Rpb25QcmljZXMCCnN0YXJ0UHJpY2UIZW5kUHJpY2UJAGYCBQpzdGFydFByaWNlBQhlbmRQcmljZQEHaXNBZG1pbgEGY2FsbGVyCQAAAgUGY2FsbGVyBQR0aGlzAQ1pc1ZhbGlkQ2FsbGVyAgZjYWxsZXIGc2VsbGVyAwkAAAIFBmNhbGxlcgUEdGhpcwYJAAACBQZjYWxsZXIFBnNlbGxlcgEOaXNBdWN0aW9uRW5kZWQCA25vdwNlbmQJAGYCBQNub3cFA2VuZAENaXNFbm91Z2hGdW5kcwIHcGF5bWVudBJjdXJyZW50TW9tZW50UHJpY2UJAGcCBQdwYXltZW50BRJjdXJyZW50TW9tZW50UHJpY2UBB2lzV2F3ZXMBB2Fzc2V0SWQJAAACBQdhc3NldElkBQR1bml0AQxpc0NvcnJlY3ROZnQBBW5mdElkAwkBASEBCQEFaXNOZnQBBQVuZnRJZAkAAgECEFRva2VuIGlzIG5vdCBOZnQDCQELaXNTZWxsRXhpc3QBBQVuZnRJZAkAAgECE1NlbGwgYWxyZWFkeSBleGlzdHMDCQEOaXNBdWN0aW9uRXhpc3QBBQVuZnRJZAkAAgECFkF1Y3Rpb24gYWxyZWFkeSBleGlzdHMFBHVuaXQBEWlzQ29ycmVjdFBheW1lbnRzAwxwYXltZW50QXNzZXQNcGF5bWVudEFtb3VudAVwcmljZQMJAQEhAQkBB2lzV2F3ZXMBBQxwYXltZW50QXNzZXQJAAIBAhhQYXltZW50IG11c3QgYmUgYXQgV0FWRVMDCQEBIQEJAQ1pc0Vub3VnaEZ1bmRzAgUNcGF5bWVudEFtb3VudAUFcHJpY2UJAAIBAhBOb3QgZW5vdWdoIGZ1bmRzBQR1bml0AQdjYWxjRmVlAAAAAQ5jYWxjVHJ1c3RlZEZlZQAAAAEScmVzdWx0RnVuZHNBbW91bnRzAwlpc1RydXN0ZWQNcGF5bWVudEFtb3VudAthY3R1YWxQcmljZQMFCWlzVHJ1c3RlZAkAlAoCCQBlAgULYWN0dWFsUHJpY2UJAQ5jYWxjVHJ1c3RlZEZlZQAJAGUCBQ1wYXltZW50QW1vdW50BQthY3R1YWxQcmljZQkAlAoCCQBlAgULYWN0dWFsUHJpY2UJAQdjYWxjRmVlAAkAZQIFDXBheW1lbnRBbW91bnQFC2FjdHVhbFByaWNlAQdnZXRTbG90AQVuZnRJZAMJAQtpc1NlbGxFeGlzdAEFBW5mdElkCQCUCgIFBWtTZWxsCQEHZ2V0U2VsbAEFBW5mdElkAwkBDmlzQXVjdGlvbkV4aXN0AQUFbmZ0SWQJAJQKAgUIa0F1Y3Rpb24JAQpnZXRBdWN0aW9uAQUFbmZ0SWQJAAIBAhJTbG90IGRvZXNuYHQgZXhpc3QABGtCdXkCA2J1eQAMc3RhdHVzRm9yTkZUCQCWCgQCBE9QRU4CBkNMT1NFRAIIUkVXQVJERUQCCENBTkNFTEVEAAtkQXBwQWRkcmVzcwEaAVRKuE9s3sLak+30julKNvjVT3+V1VVbXaAMAWkBCWNyZWF0ZU5GVAkIbmZ0X25hbWUJbmZ0X293bmVyD25mdF9kQXBwQWRkcmVzcwhuZnRfdHlwZQhuZnRfdGFncxFuZnRfc2VsbGluZ19wcmljZQ9uZnRfZGVzY3JpcHRpb24KbmZ0X29uU2VsbAhuZnRfZGF0YQQIbmV3VG9rZW4JAMIIBQUIbmZ0X25hbWUFD25mdF9kZXNjcmlwdGlvbgABAAAHBAdpc3N1ZUlkCQC4CAEFCG5ld1Rva2VuBAR0eElkCAUBaQ10cmFuc2FjdGlvbklkCQDMCAIFCG5ld1Rva2VuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdpc3N1ZUlkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIFT3duZXIJAKUIAQgFAWkGY2FsbGVyCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIIbmZ0X3R5cGUFCG5mdF90eXBlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIIbmZ0X3RhZ3MFCG5mdF90YWdzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIPbmZ0X2RBcHBBZGRyZXNzBQ9uZnRfZEFwcEFkZHJlc3MJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIRbmZ0X3NlbGxpbmdfcHJpY2UFEW5mdF9zZWxsaW5nX3ByaWNlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIKbmZ0X29uU2VsbAUKbmZ0X29uU2VsbAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICCG5mdF9kYXRhBQhuZnRfZGF0YQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQR0eElkBQlzZXBhcmF0b3ICCWlzc3VlX25mdAkA2AQBBQdpc3N1ZUlkBQNuaWwBaQEIaXNzdWVOZnQCBG5hbWUEbWV0YQQIbmV3VG9rZW4JAMIIBQUEbmFtZQUEbWV0YQABAAAHBAdpc3N1ZUlkCQC4CAEFCG5ld1Rva2VuCQDMCAIFCG5ld1Rva2VuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdpc3N1ZUlkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFB2lzc3VlSWQFCXNlcGFyYXRvcgIFT3duZXIJAKUIAQgFAWkGY2FsbGVyBQNuaWwBaQEGYnV5TkZUAQVuZnRJRAQHYXNzZXRJZAkA2QQBBQVuZnRJRAQGYW1vdW50CQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQFcHJpY2UJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkAoggBCQCsAgIJAKwCAgUGa1ByaWNlBQlzZXBhcmF0b3IFBW5mdElEAh5UaGVyZSBpcyBubyBwcmljZSBmb3IgdGhpcyBORlQEBW93bmVyCQETdmFsdWVPckVycm9yTWVzc2FnZQIJARFAZXh0ck5hdGl2ZSgxMDU4KQEJAKwCAgkArAICBQVuZnRJRAUJc2VwYXJhdG9yAgVPd25lcgIITm8gb3duZXIDCQECIT0CCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQFBHVuaXQJAAIBAgxQYXkgaW4gd2F2ZXMDCQBmAgkBDXBhcnNlSW50VmFsdWUBBQVwcmljZQUGYW1vdW50CQACAQIPSW52YWxpZCBwYXltZW50CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdhc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQV2YWx1ZQEJAKYIAQUFb3duZXIJAQ1wYXJzZUludFZhbHVlAQUFcHJpY2UFBHVuaXQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKUIAQgFAWkGY2FsbGVyBQlzZXBhcmF0b3IFBGtCdXkJAKwCAgkArAICBQVuZnRJRAUJc2VwYXJhdG9yCQCkAwEFBmFtb3VudAUDbmlsAWkBB3NlbGxORlQBBXByaWNlBAskdDA3NDYyNzU0NwkAlAoCCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAZ0b2tlbjAIBQskdDA3NDYyNzU0NwJfMQQHYW1vdW50MAgFCyR0MDc0NjI3NTQ3Al8yAwkBASEBCQEFaXNOZnQBBQZ0b2tlbjAJAAIBAhBUb2tlbiBpcyBub3QgTkZUCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICBQZrUHJpY2UFCXNlcGFyYXRvcgkA2AQBCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAKQDAQUFcHJpY2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKUIAQgFAWkGY2FsbGVyBQlzZXBhcmF0b3IFBWtTZWxsCQCsAgIJAKwCAgkA2AQBBQZ0b2tlbjAFCXNlcGFyYXRvcgkApAMBBQdhbW91bnQwBQNuaWwBaQEHYWRkU2VsbAEFcHJpY2UEBW5mdElkCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAQt2YWx1ZU9yRWxzZQIJAQxpc0NvcnJlY3ROZnQBBQVuZnRJZAMJAQEhAQkBEmlzQ29ycmVjdFNlbGxQcmljZQEFBXByaWNlCQACAQIRUHJpY2UgbXVzdCBiZSA+IDAJAMwIAgkBB3NldFNlbGwDBQVuZnRJZAgFAWkGY2FsbGVyBQVwcmljZQUDbmlsAWkBCmFkZEF1Y3Rpb24DCnN0YXJ0UHJpY2UFc3RhcnQDZW5kBAVuZnRJZAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBAVwcmljZQkBBXZhbHVlAQUKc3RhcnRQcmljZQQHYXVjdGlvbgkAlgoECAUBaQZjYWxsZXIFBXByaWNlBQVzdGFydAUDZW5kBAZjYWxsZXIICAUBaQZjYWxsZXIFYnl0ZXMJAQt2YWx1ZU9yRWxzZQIJAQxpc0NvcnJlY3ROZnQBBQVuZnRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQVuZnRJZAIRX25mdF9zdGFydF9wcmljZV8JANgEAQUGY2FsbGVyCQEFdmFsdWUBBQpzdGFydFByaWNlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQDYBAEFBW5mdElkAhhfbmZ0X3N0YXJ0X2F1Y3Rpb25fZGF0ZV8JANgEAQUGY2FsbGVyCQEFdmFsdWUBBQVzdGFydAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQVuZnRJZAIWX25mdF9lbmRfYXVjdGlvbl9kYXRlXwkA2AQBBQZjYWxsZXIJAQV2YWx1ZQEFA2VuZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQVuZnRJZAUJc2VwYXJhdG9yAgpuZnRfb3duZXJfCQClCAEIBQFpBmNhbGxlcgUDbmlsAWkBC2J1eUZyb21TbG90AQVuZnRJZAQLJHQwODk1NDkwNDMJAJQKAggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQMcGF5bWVudEFzc2V0CAULJHQwODk1NDkwNDMCXzEEDXBheW1lbnRBbW91bnQIBQskdDA4OTU0OTA0MwJfMgQHYXNzZXRJZAkA2QQBBQVuZnRJZAQLJHQwOTA4NzkxMjUJAQdnZXRTbG90AQUHYXNzZXRJZAQEdHlwZQgFCyR0MDkwODc5MTI1Al8xBAdkZXRhaWxzCAULJHQwOTA4NzkxMjUCXzIEB2Jhc2VSZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEFB2Fzc2V0SWQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkBCmdldFNsb3RLZXkCBQR0eXBlBQdhc3NldElkBQNuaWwDCQAAAgUEdHlwZQUFa1NlbGwECyR0MDkyNjc5MzE0CQELcGFyc2VBc1NlbGwBBQdkZXRhaWxzBAZzZWxsZXIIBQskdDA5MjY3OTMxNAJfMQQKcHJpY2VWYWx1ZQgFCyR0MDkyNjc5MzE0Al8yCQELdmFsdWVPckVsc2UCCQERaXNDb3JyZWN0UGF5bWVudHMDBQxwYXltZW50QXNzZXQFDXBheW1lbnRBbW91bnQFCnByaWNlVmFsdWUECyR0MDkzOTk5NTAxCQEScmVzdWx0RnVuZHNBbW91bnRzAwkBDGlzVHJ1c3RlZE5mdAEFB2Fzc2V0SWQFDXBheW1lbnRBbW91bnQFCnByaWNlVmFsdWUEDHNlbGxlckFtb3VudAgFCyR0MDkzOTk5NTAxAl8xBAtidXllckFtb3VudAgFCyR0MDkzOTk5NTAxAl8yBAp1cGRhdGVkUmVzCQDOCAIFB2Jhc2VSZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUGc2VsbGVyBQxzZWxsZXJBbW91bnQFBHVuaXQFA25pbAMJAGYCBQtidXllckFtb3VudAAACQDOCAIFCnVwZGF0ZWRSZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyBQtidXllckFtb3VudAUEdW5pdAUDbmlsBQp1cGRhdGVkUmVzBAskdDA5NzE4OTc4NwkBGGNhbGNQcmljZUF0Q3VycmVudE1vbWVudAIFB2Fzc2V0SWQFBmhlaWdodAQGc2VsbGVyCAULJHQwOTcxODk3ODcCXzEEC2FjdHVhbFByaWNlCAULJHQwOTcxODk3ODcCXzIJAQt2YWx1ZU9yRWxzZQIJARFpc0NvcnJlY3RQYXltZW50cwMFDHBheW1lbnRBc3NldAUNcGF5bWVudEFtb3VudAULYWN0dWFsUHJpY2UECyR0MDk4NzM5OTc2CQEScmVzdWx0RnVuZHNBbW91bnRzAwkBDGlzVHJ1c3RlZE5mdAEFB2Fzc2V0SWQFDXBheW1lbnRBbW91bnQFC2FjdHVhbFByaWNlBAxzZWxsZXJBbW91bnQIBQskdDA5ODczOTk3NgJfMQQLYnV5ZXJBbW91bnQIBQskdDA5ODczOTk3NgJfMgQKdXBkYXRlZFJlcwkAzggCBQdiYXNlUmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMFBnNlbGxlcgUMc2VsbGVyQW1vdW50BQR1bml0BQNuaWwDCQBmAgULYnV5ZXJBbW91bnQAAAkAzggCBQp1cGRhdGVkUmVzCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgULYnV5ZXJBbW91bnQFBHVuaXQFA25pbAUKdXBkYXRlZFJlcwFpAQtkZWNsaW5lU2xvdAEFbmZ0SWQEB2Fzc2V0SWQJANkEAQUFbmZ0SWQEDSR0MDEwMjc3MTAzMTUJAQdnZXRTbG90AQUHYXNzZXRJZAQEdHlwZQgFDSR0MDEwMjc3MTAzMTUCXzEEB2RldGFpbHMIBQ0kdDAxMDI3NzEwMzE1Al8yBAdiYXNlUmVzCQDMCAIJAQtEZWxldGVFbnRyeQEJAQpnZXRTbG90S2V5AgUEdHlwZQUHYXNzZXRJZAUDbmlsAwkAAAIFBHR5cGUFBWtTZWxsBA0kdDAxMDQwNzEwNDU0CQELcGFyc2VBc1NlbGwBBQdkZXRhaWxzBAZzZWxsZXIIBQ0kdDAxMDQwNzEwNDU0Al8xBApwcmljZVZhbHVlCAUNJHQwMTA0MDcxMDQ1NAJfMgMJAQEhAQkBDWlzVmFsaWRDYWxsZXICCAUBaQZjYWxsZXIFBnNlbGxlcgkAAgECDkludmFsaWQgY2FsbGVyCQDOCAIFB2Jhc2VSZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUGc2VsbGVyAAEFB2Fzc2V0SWQFA25pbAQNJHQwMTA1OTkxMDcwMwkBDnBhcnNlQXNBdWN0aW9uAQUHZGV0YWlscwQGc2VsbGVyCAUNJHQwMTA1OTkxMDcwMwJfMQQPc3RhcnRQcmljZVZhbHVlCAUNJHQwMTA1OTkxMDcwMwJfMgQNZW5kUHJpY2VWYWx1ZQgFDSR0MDEwNTk5MTA3MDMCXzMEEHN0YXJ0UGVyaW9kVmFsdWUIBQ0kdDAxMDU5OTEwNzAzAl80BA5lbmRQZXJpb2RWYWx1ZQgFDSR0MDEwNTk5MTA3MDMCXzUDCQEBIQEJAQ1pc1ZhbGlkQ2FsbGVyAggFAWkGY2FsbGVyBQZzZWxsZXIJAAIBAg5JbnZhbGlkIGNhbGxlcgMJAQEhAQkBDmlzQXVjdGlvbkVuZGVkAgUGaGVpZ2h0BQ5lbmRQZXJpb2RWYWx1ZQkAAgECF1dhaXQgZm9yIGVuZCBvZiBhdWN0aW9uCQDOCAIFB2Jhc2VSZXMJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwUGc2VsbGVyAAEFB2Fzc2V0SWQFA25pbAFpARBzZXRUcnVzdGVkSXNzdWVyAQt0cnVzdGVkQWRkcgMJAQEhAQkBB2lzQWRtaW4BCAUBaQZjYWxsZXIJAAIBAgpPbmx5IGFkbWluCQDMCAIJAQxCb29sZWFuRW50cnkCCQENZ2V0VHJ1c3RlZEtleQEJARFAZXh0ck5hdGl2ZSgxMDYyKQEFC3RydXN0ZWRBZGRyBgUDbmlsAWkBF2dldFByaWNlQXRDdXJyZW50TW9tZW50AgVuZnRJZAZtb21lbnQEB2Fzc2V0SWQJANkEAQUFbmZ0SWQEDSR0MDExMjQ0MTEzMDcJARhjYWxjUHJpY2VBdEN1cnJlbnRNb21lbnQCBQdhc3NldElkBQZtb21lbnQEBnNlbGxlcggFDSR0MDExMjQ0MTEzMDcCXzEEBXByaWNlCAUNJHQwMTEyNDQxMTMwNwJfMgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBC2dldFByaWNlS2V5AQUHYXNzZXRJZAUFcHJpY2UFA25pbAFpAQhwbGFjZUJpZAQFbmZ0SWQJbmZ0X293bmVyCW1pbl9wcmljZQliaWRfcHJpY2UEBmNhbGxlcggFAWkGY2FsbGVyBAdhc3NldElkCQDZBAEFBW5mdElkBAZhbW91bnQJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AwkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQR1bml0CQACAQIMUGF5IGluIHdhdmVzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgICB25mdF9pZF8FBW5mdElkAgFfCQDYBAEIBQZjYWxsZXIFYnl0ZXMFBW5mdElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgICCm5mdF9vd25lcl8FBW5mdElkAgFfCQDYBAEIBQZjYWxsZXIFYnl0ZXMFCW5mdF9vd25lcgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkArAICAgxiaWRkaW5nX2Zvcl8FBW5mdElkAgRfYnlfCQDYBAEIBQZjYWxsZXIFYnl0ZXMJAKwCAgkArAICBQVuZnRJZAIBXwkA2AQBCAUGY2FsbGVyBWJ5dGVzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgICDm1pbl9wcmljZV9mb3JfBQVuZnRJZAIEX2J5XwkA2AQBCAUGY2FsbGVyBWJ5dGVzCQCkAwEFCW1pbl9wcmljZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkArAICAg1iaWRfcHJpY2VfZm9yBQVuZnRJZAIEX2J5XwkA2AQBCAUGY2FsbGVyBWJ5dGVzCQCkAwEFCWJpZF9wcmljZQUDbmlsAWkBCmFjZXB0T2ZmZXIBB21lc3NhZ2UJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAIDC1y8FBHVuaXQFA25pbADUuCQ7",
    "height": 2339671,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 2da6GYLK2yF3pPRrSDiU4J7TWGVxCEFJ2ARn121HNjqZ
Next: qms39qG5dBFvXbJQBFouCP9nWzaDcua6Z5qFDuspG47

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

Old	New		Differences
323	323		let P = value(K)
324	324		let G = $Tuple4(aH.caller, P, L, M)
325	325		let am = aH.caller.bytes
326		-	valueOrElse(au(h), [StringEntry(((toBase58String(h) + "_nft_start_price") + toBase58String(am)), value(K)), StringEntry(((toBase58String(h) + "_nft_start_auction_date") + toBase58String(am)), L), StringEntry(((toBase58String(h) + "_nft_end_auction_date") + toBase58String(am)), M), StringEntry(((toBase58String(h) + a) + "nft_owner"), toString(aH.caller))])
	326	+	valueOrElse(au(h), [StringEntry(((toBase58String(h) + "_nft_start_price_") + toBase58String(am)), value(K)), StringEntry(((toBase58String(h) + "_nft_start_auction_date_") + toBase58String(am)), value(L)), StringEntry(((toBase58String(h) + "_nft_end_auction_date_") + toBase58String(am)), value(M)), StringEntry(((toBase58String(h) + a) + "nft_owner_"), toString(aH.caller))])
327	327		}
328	328
329	329

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

github/deemru/w8io/169f3d6 
63.59 ms ◑