w8 · tx · 2Q7···1ZL

tx · 2Q7gK7vm9X6q5tjD4n5i3V2NLuDy75ao4DgLN91871ZL

3N9cKCHp6ZLMgz7rRgF8Q8DEt8zbtd1Ht7F:  -0.01000000 Waves

2023.01.16 08:21 [2407073] smart account 3N9cKCHp6ZLMgz7rRgF8Q8DEt8zbtd1Ht7F > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "2Q7gK7vm9X6q5tjD4n5i3V2NLuDy75ao4DgLN91871ZL",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1673846593061,
    "version": 2,
    "chainId": 84,
    "sender": "3N9cKCHp6ZLMgz7rRgF8Q8DEt8zbtd1Ht7F",
    "senderPublicKey": "3V22YUj3GF4AeBxdWx8rgGdG4groE4W6P2s4sAkshe7R",
    "proofs": [
        "2fWTBWhyNnDyvzjZ1uy855NWqKr7S8r1m27scDkMvktfMgFYJJjsZratn7PRc7EgR9sC3DNdj8VynsMGiPf3syLc"
    ],
    "script": "base64:BgJGCAISCwoJCAgICAgBCAgIEgMKAQgSBAoCCAgSBgoECAgIARIGCgQICAgIEgUKAwgIARIDCgEIEgMKAQgSBAoCCAgSAwoBCAkACXNlcGFyYXRvcgIBXwAEa0J1eQIDYnV5AAZrUHJpY2UCBXByaWNlAAVrU2VsbAIEc2VsbAASbWF4QXVjdGlvbkR1cmF0aW9uAAcABGtCaWQCA2JpZAAMc3RhdHVzRm9yTkZUCQCWCgQCBE9QRU4CBkNMT1NFRAIIUkVXQVJERUQCCENBTkNFTEVEAAtkQXBwQWRkcmVzcwEaAVRKuE9s3sLak+30julKNvjVT3+V1VVbXaABBWlzTmZ0AQdhc3NldElkBAckbWF0Y2gwCQDsBwEFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIFQXNzZXQEBXRva2VuBQckbWF0Y2gwAwMJAAACCAUFdG9rZW4IZGVjaW1hbHMAAAkAAAIIBQV0b2tlbghxdWFudGl0eQABBwkAAAIIBQV0b2tlbgpyZWlzc3VhYmxlBwcHCgFpAQljcmVhdGVOZnQJCG5mdF9uYW1lCW5mdF9vd25lcg9uZnRfZEFwcEFkZHJlc3MIbmZ0X3R5cGUIbmZ0X3RhZ3MRbmZ0X3NlbGxpbmdfcHJpY2UPbmZ0X2Rlc2NyaXB0aW9uCm5mdF9vblNlbGwIbmZ0X2RhdGEECG5ld1Rva2VuCQDCCAUFCG5mdF9uYW1lBQ9uZnRfZGVzY3JpcHRpb24AAQAABwQHaXNzdWVJZAkAuAgBBQhuZXdUb2tlbgQEdHhJZAgFAWkNdHJhbnNhY3Rpb25JZAkAzAgCBQhuZXdUb2tlbgkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQUHaXNzdWVJZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICBU93bmVyCQClCAEIBQFpBmNhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICCG5mdF90eXBlBQhuZnRfdHlwZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICCG5mdF90YWdzBQhuZnRfdGFncwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICD25mdF9kQXBwQWRkcmVzcwUPbmZ0X2RBcHBBZGRyZXNzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICEW5mdF9zZWxsaW5nX3ByaWNlBRFuZnRfc2VsbGluZ19wcmljZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkA2AQBBQdpc3N1ZUlkBQlzZXBhcmF0b3ICCm5mdF9vblNlbGwFCm5mdF9vblNlbGwJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJANgEAQUHaXNzdWVJZAUJc2VwYXJhdG9yAghuZnRfZGF0YQUIbmZ0X2RhdGEJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJANgEAQUEdHhJZAUJc2VwYXJhdG9yAglpc3N1ZV9uZnQJANgEAQUHaXNzdWVJZAUDbmlsAWkBB3NlbGxORlQBBXByaWNlBAR0eElkCAUBaQ10cmFuc2FjdGlvbklkBAZzZWxsZXIICAUBaQZjYWxsZXIFYnl0ZXMECyR0MDE3OTIxODc3CQCUCgIJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQEBnRva2VuMAgFCyR0MDE3OTIxODc3Al8xBAdhbW91bnQwCAULJHQwMTc5MjE4NzcCXzIDCQEBIQEJAQVpc05mdAEFBnRva2VuMAkAAgECEFRva2VuIGlzIG5vdCBORlQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIFBmtQcmljZQUJc2VwYXJhdG9yCQDYBAEJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAUFcHJpY2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKUIAQgFAWkGY2FsbGVyBQlzZXBhcmF0b3IFBWtTZWxsCQCsAgIJAKwCAgkA2AQBBQZ0b2tlbjAFCXNlcGFyYXRvcgkApAMBBQdhbW91bnQwBQNuaWwBaQEGYnV5TkZUAgVuZnRJRBFjdXJyZW50X25mdF9vd25lcgQHYXNzZXRJZAkA2QQBBQVuZnRJRAQGYW1vdW50CQEFdmFsdWUBCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQQY2hlY2tPd25lcklzU2FtZQQHJG1hdGNoMAkAnQgCBQR0aGlzCQCsAgIJAKwCAgIEbmZ0XwURY3VycmVudF9uZnRfb3duZXICBl9vd25lcgMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWEFByRtYXRjaDAFAWEHBAVwcmljZQkBEUBleHRyTmF0aXZlKDEwNTgpAQkArAICCQCsAgIJAKwCAgkArAICBQZrUHJpY2UFCXNlcGFyYXRvcgUFbmZ0SUQCAV8FEWN1cnJlbnRfbmZ0X293bmVyAwkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQR1bml0CQACAQIMUGF5IGluIHdhdmVzAwkAAAIFEWN1cnJlbnRfbmZ0X293bmVyCQClCAEIBQFpBmNhbGxlcgkAAgECKWN1cnJlbnQgT3duZXIgb2YgTkZUIG5vdCBhYmxlIHRvIHB1cmNoYXNlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABBQdhc3NldElkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQkA2QQBBRFjdXJyZW50X25mdF9vd25lcgUGYW1vdW50BQR1bml0CQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQClCAEIBQFpBmNhbGxlcgUJc2VwYXJhdG9yBQRrQnV5CQCsAgIJAKwCAgUFbmZ0SUQFCXNlcGFyYXRvcgkApAMBBQZhbW91bnQJAMwIAgkBC0RlbGV0ZUVudHJ5AQkArAICCQCsAgICBG5mdF8FEWN1cnJlbnRfbmZ0X293bmVyAgZfb3duZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgICBG5mdF8FEWN1cnJlbnRfbmZ0X293bmVyAgZfb3duZXIJAKUIAQgFAWkGY2FsbGVyCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICBQVuZnRJRAUJc2VwYXJhdG9yAgZfb3duZXIJAKUIAQgFAWkGY2FsbGVyBQNuaWwBaQEKYWRkQXVjdGlvbgQFc3RhcnQDZW5kCnN0YXJ0UHJpY2UIZHVyYXRpb24EBHR4SWQJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAQFbmZ0SWQJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAQFcHJpY2UJAQV2YWx1ZQEFCnN0YXJ0UHJpY2UECWVuZEhlaWdodAkAZAIIBQlsYXN0QmxvY2sGaGVpZ2h0BQhkdXJhdGlvbgQGY2FsbGVyCAgFAWkGY2FsbGVyBWJ5dGVzBBFjaGVja05mdEF1Y3Rpb25lZAQHJG1hdGNoMAkAnQgCBQR0aGlzCQCsAgIJAKwCAgkArAICCQDYBAEFBW5mdElkBQlzZXBhcmF0b3ICC25mdF9zdGF0dXNfCQDYBAEFBmNhbGxlcgMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWEFByRtYXRjaDAGBwMJAAACCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQFBHVuaXQJAAIBAhBORlQgbm90IGF0dGFjaGVkAwkAAAIFEWNoZWNrTmZ0QXVjdGlvbmVkBgkAAgECF0FscmVhZHkgaW4gYXVjdGlvbiBsaXN0AwkAZgIFCGR1cmF0aW9uBRJtYXhBdWN0aW9uRHVyYXRpb24JAAIBCQCsAgICNkR1cmF0aW9uIGlzIHRvbyBsb25nLiBNdXN0IGJlIGxlc3MgdGhhbiBvciBlcXVhbCB0byA3IAkApAMBBRJtYXhBdWN0aW9uRHVyYXRpb24JAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIFBHR4SWQCGF9uZnRfc3RhcnRfYXVjdGlvbl9kYXRlXwkA2AQBBQZjYWxsZXIFBXN0YXJ0CQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICBQR0eElkAhZfbmZ0X2VuZF9hdWN0aW9uX2RhdGVfCQDYBAEFBmNhbGxlcgUDZW5kCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUEdHhJZAIQX25mdF9zdGFydF9wcmljZQUKc3RhcnRQcmljZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBHR4SWQCCl9uZnRfb3duZXIJAKUIAQgFAWkGY2FsbGVyCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUEdHhJZAIPX25mdF9vbl9hdWN0aW9uCQDYBAEFBW5mdElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUEdHhJZAIQX3ByZXZpb3VzX2JpZGRlcgIEbm9uZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBHR4SWQCDF9oaWdoZXN0X2JpZAIBMAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBHR4SWQCDl93aW5uZXJfb2ZfbmZ0AgEwCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUEdHhJZAINX2JpZGRlcl9jb3VudAIBMAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBHR4SWQCC19uZnRfc3RhdHVzAgRPUEVOBQNuaWwBaQEIcGxhY2VCaWQECWF1Y3Rpb25JZAVuZnRJZAluZnRfb3duZXIJYmlkX3ByaWNlBAR0eElkCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQEBmNhbGxlcggIBQFpBmNhbGxlcgVieXRlcwQHYXNzZXRJZAkA2QQBBQVuZnRJZAQPY3VycmVudEJpZFByaWNlCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQVZ2V0TGFzdFdpbm5lckJpZFByaWNlCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzCQCsAgIFCWF1Y3Rpb25JZAIMX2hpZ2hlc3RfYmlkBBhnZXRQcmV2aW91c0JpZGRlckFkZHJlc3MJAJ0IAgUEdGhpcwkArAICBQlhdWN0aW9uSWQCEF9wcmV2aW91c19iaWRkZXIED2N1cnJlbnRCaWRDb3VudAkBEUBleHRyTmF0aXZlKDEwNTMpAgUEdGhpcwkArAICBQlhdWN0aW9uSWQCDV9iaWRkZXJfY291bnQEFGdldExhc3RXaW5uZXJBZGRyZXNzCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzCQCsAgIFCWF1Y3Rpb25JZAIOX3dpbm5lcl9vZl9uZnQEEWNoZWNrTmZ0QXVjdGlvbmVkCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzCQCsAgIFCWF1Y3Rpb25JZAILX25mdF9zdGF0dXMDCQECIT0CCAkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQFBHVuaXQJAAIBAgxQYXkgaW4gd2F2ZXMDCQECIT0CBRFjaGVja05mdEF1Y3Rpb25lZAIET1BFTgkAAgECFE5vdCBvcGVuIGZvciBhdWN0aW9uAwkAZwIJAQ1wYXJzZUludFZhbHVlAQUVZ2V0TGFzdFdpbm5lckJpZFByaWNlBQ9jdXJyZW50QmlkUHJpY2UJAAIBAiVCaWQgaXMgbGVzcyB0aGVuIHN0YXJ0aW5nL2hpZ2hlc3QgQmlkAwkAAAIFFWdldExhc3RXaW5uZXJCaWRQcmljZQIBMAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFCWF1Y3Rpb25JZAIMX2hpZ2hlc3RfYmlkCQCkAwEFD2N1cnJlbnRCaWRQcmljZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFCWF1Y3Rpb25JZAIOX3dpbm5lcl9vZl9uZnQJANgEAQgIBQFpBmNhbGxlcgVieXRlcwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFCWF1Y3Rpb25JZAINX2JpZGRlcl9jb3VudAkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBBQ9jdXJyZW50QmlkQ291bnQAAQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFCWF1Y3Rpb25JZAIHX25mdF9pZAkA2AQBBQdhc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUJYXVjdGlvbklkAgpfbmZ0X293bmVyBQluZnRfb3duZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgUEdHhJZAIBXwUJYXVjdGlvbklkAgxfaGlnaGVzdF9iaWQJAKQDAQUPY3VycmVudEJpZFByaWNlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgIFBHR4SWQCAV8FCWF1Y3Rpb25JZAIHX3dpbm5lcgkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgIFBHR4SWQCAV8FCWF1Y3Rpb25JZAINX2JpZGRlcl9jb3VudAkApAMBCQBkAgkBDXBhcnNlSW50VmFsdWUBBQ9jdXJyZW50QmlkQ291bnQAAQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkArAICBQR0eElkAgFfBQlhdWN0aW9uSWQCB19uZnRfaWQJANgEAQUHYXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkArAICBQR0eElkAgFfBQlhdWN0aW9uSWQCCl9uZnRfb3duZXIFCW5mdF9vd25lcgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBHR4SWQCD19iaWRfZm9yX25mdF9ieQkA2AQBBQZjYWxsZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQR0eElkAhBfYmlkX3ByaWNlX3BsYWNlBQliaWRfcHJpY2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQR0eElkAiZfcHJldmlvdXNfYmlkX2Ftb3VudF9yZWZ1bmRfdG9fYWRkcmVzcwUUZ2V0TGFzdFdpbm5lckFkZHJlc3MJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQR0eElkAhtfcHJldm9pdXNfYmlkX2Ftb3VudF9yZWZ1bmQFFWdldExhc3RXaW5uZXJCaWRQcmljZQUDbmlsCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUJYXVjdGlvbklkAgxfaGlnaGVzdF9iaWQJAKQDAQUPY3VycmVudEJpZFByaWNlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUJYXVjdGlvbklkAg5fd2lubmVyX29mX25mdAkA2AQBCAgFAWkGY2FsbGVyBWJ5dGVzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUJYXVjdGlvbklkAg1fYmlkZGVyX2NvdW50CQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEFD2N1cnJlbnRCaWRDb3VudAABCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUJYXVjdGlvbklkAgdfbmZ0X2lkCQDYBAEFB2Fzc2V0SWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQlhdWN0aW9uSWQCCl9uZnRfb3duZXIFCW5mdF9vd25lcgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkArAICBQR0eElkAgFfBQlhdWN0aW9uSWQCDF9oaWdoZXN0X2JpZAkApAMBBQ9jdXJyZW50QmlkUHJpY2UJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgUEdHhJZAIBXwUJYXVjdGlvbklkAgdfd2lubmVyCQDYBAEICAUBaQZjYWxsZXIFYnl0ZXMJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgUEdHhJZAIBXwUJYXVjdGlvbklkAg1fYmlkZGVyX2NvdW50CQCkAwEJAGQCCQENcGFyc2VJbnRWYWx1ZQEFD2N1cnJlbnRCaWRDb3VudAABCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgIFBHR4SWQCAV8FCWF1Y3Rpb25JZAIHX25mdF9pZAkA2AQBBQdhc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgIFBHR4SWQCAV8FCWF1Y3Rpb25JZAIKX25mdF9vd25lcgUJbmZ0X293bmVyCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUEdHhJZAIPX2JpZF9mb3JfbmZ0X2J5CQDYBAEFBmNhbGxlcgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBHR4SWQCEF9iaWRfcHJpY2VfcGxhY2UFCWJpZF9wcmljZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBHR4SWQCJl9wcmV2aW91c19iaWRfYW1vdW50X3JlZnVuZF90b19hZGRyZXNzBRRnZXRMYXN0V2lubmVyQWRkcmVzcwkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBHR4SWQCG19wcmV2b2l1c19iaWRfYW1vdW50X3JlZnVuZAUVZ2V0TGFzdFdpbm5lckJpZFByaWNlCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQkA2QQBBRRnZXRMYXN0V2lubmVyQWRkcmVzcwkBDXBhcnNlSW50VmFsdWUBBRVnZXRMYXN0V2lubmVyQmlkUHJpY2UFBHVuaXQFA25pbAFpAQ5hY2NlcHRCaWRPZmZlcgMJYXVjdGlvbklkBW5mdElkFGJpZF9hbW91bnRfZnJvbV91c2VyBAR0eElkCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQEBmNhbGxlcggIBQFpBmNhbGxlcgVieXRlcwQHYXNzZXRJZAkA2QQBBQVuZnRJZAQSZ2V0TmZ0V2lubmluZ1ByaWNlCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzCQCsAgIFCWF1Y3Rpb25JZAIMX2hpZ2hlc3RfYmlkBBBnZXRBdWN0aW9uV2lubmVyCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzCQCsAgIFCWF1Y3Rpb25JZAIOX3dpbm5lcl9vZl9uZnQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBB0FkZHJlc3MBBQZjYWxsZXIJAQ1wYXJzZUludFZhbHVlAQUSZ2V0TmZ0V2lubmluZ1ByaWNlBQR1bml0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQkA2QQBBRBnZXRBdWN0aW9uV2lubmVyAAEFB2Fzc2V0SWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQR0eElkAhVfYW1vdW50X3BhaWRfdG9fb3duZXIFEmdldE5mdFdpbm5pbmdQcmljZQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFBHR4SWQCEF9uZnRfdHJhbnNmZXJfdG8FEGdldEF1Y3Rpb25XaW5uZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQR0eElkAgtfbmZ0X3N0YXR1cwIIUkVXQVJERUQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQlhdWN0aW9uSWQCFV9hbW91bnRfcGFpZF90b19vd25lcgUSZ2V0TmZ0V2lubmluZ1ByaWNlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUJYXVjdGlvbklkAhBfbmZ0X3RyYW5zZmVyX3RvBRBnZXRBdWN0aW9uV2lubmVyCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUJYXVjdGlvbklkAgtfbmZ0X3N0YXR1cwIIUkVXQVJERUQFA25pbAFpAQ1jYW5jZWxBdWN0aW9uAQlhdWN0aW9uSWQEBHR4SWQJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAQGY2FsbGVyCAgFAWkGY2FsbGVyBWJ5dGVzBA1hdWN0aW9uU3RhdHVzCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzCQCsAgIFCWF1Y3Rpb25JZAILX25mdF9zdGF0dXMEDWJpZGRpbmdXaW5uZXIJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMJAKwCAgUJYXVjdGlvbklkAg5fd2lubmVyX29mX25mdAQIbmZ0T3duZXIJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMJAKwCAgUJYXVjdGlvbklkAgpfbmZ0X293bmVyBAVuZnRJZAkBEUBleHRyTmF0aXZlKDEwNTMpAgUEdGhpcwkArAICBQlhdWN0aW9uSWQCD19uZnRfb25fYXVjdGlvbgQMYmlkZGluZ1ByaWNlCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzCQCsAgIFCWF1Y3Rpb25JZAIMX2hpZ2hlc3RfYmlkAwkAAAIFDWJpZGRpbmdXaW5uZXICATAJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIFBHR4SWQFCWF1Y3Rpb25JZAILX25mdF9zdGF0dXMCCENBTkNFTEVECQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQkA2QQBBQhuZnRPd25lcgABCQDZBAEFBW5mdElkBQNuaWwJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQlhdWN0aW9uSWQCC19uZnRfc3RhdHVzAghDQU5DRUxFRAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFCWF1Y3Rpb25JZAImX3ByZXZpb3VzX2JpZF9hbW91bnRfcmVmdW5kX3RvX2FkZHJlc3MFDWJpZGRpbmdXaW5uZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQlhdWN0aW9uSWQCG19wcmV2b2l1c19iaWRfYW1vdW50X3JlZnVuZAUMYmlkZGluZ1ByaWNlCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUEdHhJZAILX25mdF9zdGF0dXMCCENBTkNFTEVECQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUEdHhJZAImX3ByZXZpb3VzX2JpZF9hbW91bnRfcmVmdW5kX3RvX2FkZHJlc3MFDWJpZGRpbmdXaW5uZXIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQR0eElkAhtfcHJldm9pdXNfYmlkX2Ftb3VudF9yZWZ1bmQFDGJpZGRpbmdQcmljZQkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQEHQWRkcmVzcwEJANkEAQUIbmZ0T3duZXIAAQkA2QQBBQVuZnRJZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQEHQWRkcmVzcwEJANkEAQUNYmlkZGluZ1dpbm5lcgkBDXBhcnNlSW50VmFsdWUBBQxiaWRkaW5nUHJpY2UFBHVuaXQFA25pbAFpAQt3aXRoZHJhd0JpZAEHYmlkVHhJZAQGY2FsbGVyCAgFAWkGY2FsbGVyBWJ5dGVzBAhiaWRQcmljZQkBEUBleHRyTmF0aXZlKDEwNTMpAgUEdGhpcwkArAICBQdiaWRUeElkAgxfaGlnaGVzdF9iaWQECGFzQmlkZGVyCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzCQCsAgIFB2JpZFR4SWQCB193aW5uZXIECWJpZEZvck5GVAkBEUBleHRyTmF0aXZlKDEwNTMpAgUEdGhpcwkArAICBQdiaWRUeElkAgdfbmZ0X2lkAwkBAiE9AgkA2AQBBQZjYWxsZXIFCGFzQmlkZGVyCQACAQIGTm8gYmlkCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUHYmlkVHhJZAIIX25mdF9iaWQCCFdJVEhEUkFXCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUHYmlkVHhJZAIHX25mdF9pZAUJYmlkRm9yTkZUCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUHYmlkVHhJZAIcX2JpZGRpbmdfcHJpY2VfcmVmdW5kX2Ftb3VudAUIYmlkUHJpY2UJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyCQENcGFyc2VJbnRWYWx1ZQEFCGJpZFByaWNlBQR1bml0BQNuaWwBaQESbWFudWFsRnVuZFRyYW5zZmVyAg1yZWNlcGllbnRBZGRyB21lc3NhZ2UEBmNhbGxlcggIBQFpBmNhbGxlcgVieXRlcwQHcmVjaXZlcgkA2QQBBQ1yZWNlcGllbnRBZGRyBAZhbW91bnQICQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50AwkAAAIJAKQDAQUGYW1vdW50AgAJAAIBAiBQYXltZW50IGlzIG5vdCBhdHRhY2hlZCBvciBlbXB0eQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQDYBAEFBmNhbGxlcgIJX3RyYW5zZmVyBQZhbW91bnQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQDYBAEFBmNhbGxlcgIMX3RyYW5zZmVyX3RvBQ1yZWNlcGllbnRBZGRyCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQUHcmVjaXZlcgUGYW1vdW50BQR1bml0BQNuaWwBaQEHdGVzdEJpZAEEZGF0YQkAzAgCCQELU3RyaW5nRW50cnkCAjhFOGtrRkJZQ3k0NEpKYXE2cEFaNktpenN1UmVzaTVVS05oYkQxV05ad2hoWV9oaWdoZXN0X2JpZAIBMAUDbmlsABlFCQo=",
    "height": 2407073,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: CTwq3RdChjFffNym1ep2wBhrMrjH3W5HavQMHc13LHdA
Next: 3Znh7af43gNxaDHbfkJguMThMGNi6g85qkXQWZWqHtYx

Diff: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 + let separator = "_"
5 + 
6 + let kBuy = "buy"
7 + 
8 + let kPrice = "price"
9 + 
10 + let kSell = "sell"
11 + 
12 + let maxAuctionDuration = 7
13 + 
14 + let kBid = "bid"
15 + 
16 + let statusForNFT = $Tuple4("OPEN", "CLOSED", "REWARDED", "CANCELED")
17 + 
18 + let dAppAddress = base58'3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq'
19 + 
20 + func isNft (assetId) = match assetInfo(assetId) {
21 +     case token: Asset => 
22 +         if (if ((token.decimals == 0))
23 +             then (token.quantity == 1)
24 +             else false)
25 +             then (token.reissuable == false)
26 +             else false
27 +     case _ => 
28 +         false
29 + }
30 + 
31 + 
32 + @Callable(i)
33 + func createNft (nft_name,nft_owner,nft_dAppAddress,nft_type,nft_tags,nft_selling_price,nft_description,nft_onSell,nft_data) = {
34 +     let newToken = Issue(nft_name, nft_description, 1, 0, false)
35 +     let issueId = calculateAssetId(newToken)
36 +     let txId = i.transactionId
37 + [newToken, ScriptTransfer(i.caller, 1, issueId), StringEntry(((toBase58String(issueId) + separator) + "Owner"), toString(i.caller)), StringEntry(((toBase58String(issueId) + separator) + "nft_type"), nft_type), StringEntry(((toBase58String(issueId) + separator) + "nft_tags"), nft_tags), StringEntry(((toBase58String(issueId) + separator) + "nft_dAppAddress"), nft_dAppAddress), IntegerEntry(((toBase58String(issueId) + separator) + "nft_selling_price"), nft_selling_price), StringEntry(((toBase58String(issueId) + separator) + "nft_onSell"), nft_onSell), StringEntry(((toBase58String(issueId) + separator) + "nft_data"), nft_data), StringEntry(((toBase58String(txId) + separator) + "issue_nft"), toBase58String(issueId))]
38 +     }
39 + 
40 + 
41 + 
42 + @Callable(i)
43 + func sellNFT (price) = {
44 +     let txId = i.transactionId
45 +     let seller = i.caller.bytes
46 +     let $t017921877 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
47 +     let token0 = $t017921877._1
48 +     let amount0 = $t017921877._2
49 +     if (!(isNft(token0)))
50 +         then throw("Token is not NFT")
51 +         else [StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), price), StringEntry(((toString(i.caller) + separator) + kSell), ((toBase58String(token0) + separator) + toString(amount0)))]
52 +     }
53 + 
54 + 
55 + 
56 + @Callable(i)
57 + func buyNFT (nftID,current_nft_owner) = {
58 +     let assetId = fromBase58String(nftID)
59 +     let amount = value(i.payments[0].amount)
60 +     let checkOwnerIsSame =     match getString(this, (("nft_" + current_nft_owner) + "_owner")) {
61 +         case a: String => 
62 +             a
63 +         case _ => 
64 +             false
65 +     }
66 +     let price = getStringValue(((((kPrice + separator) + nftID) + "_") + current_nft_owner))
67 +     if ((i.payments[0].assetId != unit))
68 +         then throw("Pay in waves")
69 +         else if ((current_nft_owner == toString(i.caller)))
70 +             then throw("current Owner of NFT not able to purchase")
71 +             else [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(Address(fromBase58String(current_nft_owner)), amount, unit), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount))), DeleteEntry((("nft_" + current_nft_owner) + "_owner")), StringEntry((("nft_" + current_nft_owner) + "_owner"), toString(i.caller)), StringEntry(((nftID + separator) + "_owner"), toString(i.caller))]
72 +     }
73 + 
74 + 
75 + 
76 + @Callable(i)
77 + func addAuction (start,end,startPrice,duration) = {
78 +     let txId = toBase58String(i.transactionId)
79 +     let nftId = value(i.payments[0].assetId)
80 +     let price = value(startPrice)
81 +     let endHeight = (lastBlock.height + duration)
82 +     let caller = i.caller.bytes
83 +     let checkNftAuctioned =     match getString(this, (((toBase58String(nftId) + separator) + "nft_status_") + toBase58String(caller))) {
84 +         case a: String => 
85 +             true
86 +         case _ => 
87 +             false
88 +     }
89 +     if ((i.payments[0].assetId == unit))
90 +         then throw("NFT not attached")
91 +         else if ((checkNftAuctioned == true))
92 +             then throw("Already in auction list")
93 +             else if ((duration > maxAuctionDuration))
94 +                 then throw(("Duration is too long. Must be less than or equal to 7 " + toString(maxAuctionDuration)))
95 +                 else [StringEntry(((txId + "_nft_start_auction_date_") + toBase58String(caller)), start), StringEntry(((txId + "_nft_end_auction_date_") + toBase58String(caller)), end), StringEntry((txId + "_nft_start_price"), startPrice), StringEntry((txId + "_nft_owner"), toString(i.caller)), StringEntry((txId + "_nft_on_auction"), toBase58String(nftId)), StringEntry((txId + "_previous_bidder"), "none"), StringEntry((txId + "_highest_bid"), "0"), StringEntry((txId + "_winner_of_nft"), "0"), StringEntry((txId + "_bidder_count"), "0"), StringEntry((txId + "_nft_status"), "OPEN")]
96 +     }
97 + 
98 + 
99 + 
100 + @Callable(i)
101 + func placeBid (auctionId,nftId,nft_owner,bid_price) = {
102 +     let txId = toBase58String(i.transactionId)
103 +     let caller = i.caller.bytes
104 +     let assetId = fromBase58String(nftId)
105 +     let currentBidPrice = i.payments[0].amount
106 +     let getLastWinnerBidPrice = getStringValue(this, (auctionId + "_highest_bid"))
107 +     let getPreviousBidderAddress = getString(this, (auctionId + "_previous_bidder"))
108 +     let currentBidCount = getStringValue(this, (auctionId + "_bidder_count"))
109 +     let getLastWinnerAddress = getStringValue(this, (auctionId + "_winner_of_nft"))
110 +     let checkNftAuctioned = getStringValue(this, (auctionId + "_nft_status"))
111 +     if ((i.payments[0].assetId != unit))
112 +         then throw("Pay in waves")
113 +         else if ((checkNftAuctioned != "OPEN"))
114 +             then throw("Not open for auction")
115 +             else if ((parseIntValue(getLastWinnerBidPrice) >= currentBidPrice))
116 +                 then throw("Bid is less then starting/highest Bid")
117 +                 else if ((getLastWinnerBidPrice == "0"))
118 +                     then [StringEntry((auctionId + "_highest_bid"), toString(currentBidPrice)), StringEntry((auctionId + "_winner_of_nft"), toBase58String(i.caller.bytes)), StringEntry((auctionId + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((auctionId + "_nft_id"), toBase58String(assetId)), StringEntry((auctionId + "_nft_owner"), nft_owner), StringEntry((((txId + "_") + auctionId) + "_highest_bid"), toString(currentBidPrice)), StringEntry((((txId + "_") + auctionId) + "_winner"), toBase58String(i.caller.bytes)), StringEntry((((txId + "_") + auctionId) + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((((txId + "_") + auctionId) + "_nft_id"), toBase58String(assetId)), StringEntry((((txId + "_") + auctionId) + "_nft_owner"), nft_owner), StringEntry((txId + "_bid_for_nft_by"), toBase58String(caller)), StringEntry((txId + "_bid_price_place"), bid_price), StringEntry((txId + "_previous_bid_amount_refund_to_address"), getLastWinnerAddress), StringEntry((txId + "_prevoius_bid_amount_refund"), getLastWinnerBidPrice)]
119 +                     else [StringEntry((auctionId + "_highest_bid"), toString(currentBidPrice)), StringEntry((auctionId + "_winner_of_nft"), toBase58String(i.caller.bytes)), StringEntry((auctionId + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((auctionId + "_nft_id"), toBase58String(assetId)), StringEntry((auctionId + "_nft_owner"), nft_owner), StringEntry((((txId + "_") + auctionId) + "_highest_bid"), toString(currentBidPrice)), StringEntry((((txId + "_") + auctionId) + "_winner"), toBase58String(i.caller.bytes)), StringEntry((((txId + "_") + auctionId) + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((((txId + "_") + auctionId) + "_nft_id"), toBase58String(assetId)), StringEntry((((txId + "_") + auctionId) + "_nft_owner"), nft_owner), StringEntry((txId + "_bid_for_nft_by"), toBase58String(caller)), StringEntry((txId + "_bid_price_place"), bid_price), StringEntry((txId + "_previous_bid_amount_refund_to_address"), getLastWinnerAddress), StringEntry((txId + "_prevoius_bid_amount_refund"), getLastWinnerBidPrice), ScriptTransfer(Address(fromBase58String(getLastWinnerAddress)), parseIntValue(getLastWinnerBidPrice), unit)]
120 +     }
121 + 
122 + 
123 + 
124 + @Callable(i)
125 + func acceptBidOffer (auctionId,nftId,bid_amount_from_user) = {
126 +     let txId = toBase58String(i.transactionId)
127 +     let caller = i.caller.bytes
128 +     let assetId = fromBase58String(nftId)
129 +     let getNftWinningPrice = getStringValue(this, (auctionId + "_highest_bid"))
130 +     let getAuctionWinner = getStringValue(this, (auctionId + "_winner_of_nft"))
131 + [ScriptTransfer(Address(caller), parseIntValue(getNftWinningPrice), unit), ScriptTransfer(Address(fromBase58String(getAuctionWinner)), 1, assetId), StringEntry((txId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((txId + "_nft_transfer_to"), getAuctionWinner), StringEntry((txId + "_nft_status"), "REWARDED"), StringEntry((auctionId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((auctionId + "_nft_transfer_to"), getAuctionWinner), StringEntry((auctionId + "_nft_status"), "REWARDED")]
132 +     }
133 + 
134 + 
135 + 
136 + @Callable(i)
137 + func cancelAuction (auctionId) = {
138 +     let txId = toBase58String(i.transactionId)
139 +     let caller = i.caller.bytes
140 +     let auctionStatus = getStringValue(this, (auctionId + "_nft_status"))
141 +     let biddingWinner = getStringValue(this, (auctionId + "_winner_of_nft"))
142 +     let nftOwner = getStringValue(this, (auctionId + "_nft_owner"))
143 +     let nftId = getStringValue(this, (auctionId + "_nft_on_auction"))
144 +     let biddingPrice = getStringValue(this, (auctionId + "_highest_bid"))
145 +     if ((biddingWinner == "0"))
146 +         then [StringEntry(((txId + auctionId) + "_nft_status"), "CANCELED"), ScriptTransfer(Address(fromBase58String(nftOwner)), 1, fromBase58String(nftId))]
147 +         else [StringEntry((auctionId + "_nft_status"), "CANCELED"), StringEntry((auctionId + "_previous_bid_amount_refund_to_address"), biddingWinner), StringEntry((auctionId + "_prevoius_bid_amount_refund"), biddingPrice), StringEntry((txId + "_nft_status"), "CANCELED"), StringEntry((txId + "_previous_bid_amount_refund_to_address"), biddingWinner), StringEntry((txId + "_prevoius_bid_amount_refund"), biddingPrice), ScriptTransfer(Address(fromBase58String(nftOwner)), 1, fromBase58String(nftId)), ScriptTransfer(Address(fromBase58String(biddingWinner)), parseIntValue(biddingPrice), unit)]
148 +     }
149 + 
150 + 
151 + 
152 + @Callable(i)
153 + func withdrawBid (bidTxId) = {
154 +     let caller = i.caller.bytes
155 +     let bidPrice = getStringValue(this, (bidTxId + "_highest_bid"))
156 +     let asBidder = getStringValue(this, (bidTxId + "_winner"))
157 +     let bidForNFT = getStringValue(this, (bidTxId + "_nft_id"))
158 +     if ((toBase58String(caller) != asBidder))
159 +         then throw("No bid")
160 +         else [StringEntry((bidTxId + "_nft_bid"), "WITHDRAW"), StringEntry((bidTxId + "_nft_id"), bidForNFT), StringEntry((bidTxId + "_bidding_price_refund_amount"), bidPrice), ScriptTransfer(i.caller, parseIntValue(bidPrice), unit)]
161 +     }
162 + 
4 163  
5 164  
6 165  @Callable(i)
14 173      }
15 174  
16 175  
176 + 
177 + @Callable(i)
178 + func testBid (data) = [StringEntry("E8kkFBYCy44JJaq6pAZ6KizsuResi5UKNhbD1WNZwhhY_highest_bid", "0")]
179 + 
180 + 
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 + let separator = "_"
5 + 
6 + let kBuy = "buy"
7 + 
8 + let kPrice = "price"
9 + 
10 + let kSell = "sell"
11 + 
12 + let maxAuctionDuration = 7
13 + 
14 + let kBid = "bid"
15 + 
16 + let statusForNFT = $Tuple4("OPEN", "CLOSED", "REWARDED", "CANCELED")
17 + 
18 + let dAppAddress = base58'3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq'
19 + 
20 + func isNft (assetId) = match assetInfo(assetId) {
21 +     case token: Asset => 
22 +         if (if ((token.decimals == 0))
23 +             then (token.quantity == 1)
24 +             else false)
25 +             then (token.reissuable == false)
26 +             else false
27 +     case _ => 
28 +         false
29 + }
30 + 
31 + 
32 + @Callable(i)
33 + func createNft (nft_name,nft_owner,nft_dAppAddress,nft_type,nft_tags,nft_selling_price,nft_description,nft_onSell,nft_data) = {
34 +     let newToken = Issue(nft_name, nft_description, 1, 0, false)
35 +     let issueId = calculateAssetId(newToken)
36 +     let txId = i.transactionId
37 + [newToken, ScriptTransfer(i.caller, 1, issueId), StringEntry(((toBase58String(issueId) + separator) + "Owner"), toString(i.caller)), StringEntry(((toBase58String(issueId) + separator) + "nft_type"), nft_type), StringEntry(((toBase58String(issueId) + separator) + "nft_tags"), nft_tags), StringEntry(((toBase58String(issueId) + separator) + "nft_dAppAddress"), nft_dAppAddress), IntegerEntry(((toBase58String(issueId) + separator) + "nft_selling_price"), nft_selling_price), StringEntry(((toBase58String(issueId) + separator) + "nft_onSell"), nft_onSell), StringEntry(((toBase58String(issueId) + separator) + "nft_data"), nft_data), StringEntry(((toBase58String(txId) + separator) + "issue_nft"), toBase58String(issueId))]
38 +     }
39 + 
40 + 
41 + 
42 + @Callable(i)
43 + func sellNFT (price) = {
44 +     let txId = i.transactionId
45 +     let seller = i.caller.bytes
46 +     let $t017921877 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
47 +     let token0 = $t017921877._1
48 +     let amount0 = $t017921877._2
49 +     if (!(isNft(token0)))
50 +         then throw("Token is not NFT")
51 +         else [StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), price), StringEntry(((toString(i.caller) + separator) + kSell), ((toBase58String(token0) + separator) + toString(amount0)))]
52 +     }
53 + 
54 + 
55 + 
56 + @Callable(i)
57 + func buyNFT (nftID,current_nft_owner) = {
58 +     let assetId = fromBase58String(nftID)
59 +     let amount = value(i.payments[0].amount)
60 +     let checkOwnerIsSame =     match getString(this, (("nft_" + current_nft_owner) + "_owner")) {
61 +         case a: String => 
62 +             a
63 +         case _ => 
64 +             false
65 +     }
66 +     let price = getStringValue(((((kPrice + separator) + nftID) + "_") + current_nft_owner))
67 +     if ((i.payments[0].assetId != unit))
68 +         then throw("Pay in waves")
69 +         else if ((current_nft_owner == toString(i.caller)))
70 +             then throw("current Owner of NFT not able to purchase")
71 +             else [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(Address(fromBase58String(current_nft_owner)), amount, unit), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount))), DeleteEntry((("nft_" + current_nft_owner) + "_owner")), StringEntry((("nft_" + current_nft_owner) + "_owner"), toString(i.caller)), StringEntry(((nftID + separator) + "_owner"), toString(i.caller))]
72 +     }
73 + 
74 + 
75 + 
76 + @Callable(i)
77 + func addAuction (start,end,startPrice,duration) = {
78 +     let txId = toBase58String(i.transactionId)
79 +     let nftId = value(i.payments[0].assetId)
80 +     let price = value(startPrice)
81 +     let endHeight = (lastBlock.height + duration)
82 +     let caller = i.caller.bytes
83 +     let checkNftAuctioned =     match getString(this, (((toBase58String(nftId) + separator) + "nft_status_") + toBase58String(caller))) {
84 +         case a: String => 
85 +             true
86 +         case _ => 
87 +             false
88 +     }
89 +     if ((i.payments[0].assetId == unit))
90 +         then throw("NFT not attached")
91 +         else if ((checkNftAuctioned == true))
92 +             then throw("Already in auction list")
93 +             else if ((duration > maxAuctionDuration))
94 +                 then throw(("Duration is too long. Must be less than or equal to 7 " + toString(maxAuctionDuration)))
95 +                 else [StringEntry(((txId + "_nft_start_auction_date_") + toBase58String(caller)), start), StringEntry(((txId + "_nft_end_auction_date_") + toBase58String(caller)), end), StringEntry((txId + "_nft_start_price"), startPrice), StringEntry((txId + "_nft_owner"), toString(i.caller)), StringEntry((txId + "_nft_on_auction"), toBase58String(nftId)), StringEntry((txId + "_previous_bidder"), "none"), StringEntry((txId + "_highest_bid"), "0"), StringEntry((txId + "_winner_of_nft"), "0"), StringEntry((txId + "_bidder_count"), "0"), StringEntry((txId + "_nft_status"), "OPEN")]
96 +     }
97 + 
98 + 
99 + 
100 + @Callable(i)
101 + func placeBid (auctionId,nftId,nft_owner,bid_price) = {
102 +     let txId = toBase58String(i.transactionId)
103 +     let caller = i.caller.bytes
104 +     let assetId = fromBase58String(nftId)
105 +     let currentBidPrice = i.payments[0].amount
106 +     let getLastWinnerBidPrice = getStringValue(this, (auctionId + "_highest_bid"))
107 +     let getPreviousBidderAddress = getString(this, (auctionId + "_previous_bidder"))
108 +     let currentBidCount = getStringValue(this, (auctionId + "_bidder_count"))
109 +     let getLastWinnerAddress = getStringValue(this, (auctionId + "_winner_of_nft"))
110 +     let checkNftAuctioned = getStringValue(this, (auctionId + "_nft_status"))
111 +     if ((i.payments[0].assetId != unit))
112 +         then throw("Pay in waves")
113 +         else if ((checkNftAuctioned != "OPEN"))
114 +             then throw("Not open for auction")
115 +             else if ((parseIntValue(getLastWinnerBidPrice) >= currentBidPrice))
116 +                 then throw("Bid is less then starting/highest Bid")
117 +                 else if ((getLastWinnerBidPrice == "0"))
118 +                     then [StringEntry((auctionId + "_highest_bid"), toString(currentBidPrice)), StringEntry((auctionId + "_winner_of_nft"), toBase58String(i.caller.bytes)), StringEntry((auctionId + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((auctionId + "_nft_id"), toBase58String(assetId)), StringEntry((auctionId + "_nft_owner"), nft_owner), StringEntry((((txId + "_") + auctionId) + "_highest_bid"), toString(currentBidPrice)), StringEntry((((txId + "_") + auctionId) + "_winner"), toBase58String(i.caller.bytes)), StringEntry((((txId + "_") + auctionId) + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((((txId + "_") + auctionId) + "_nft_id"), toBase58String(assetId)), StringEntry((((txId + "_") + auctionId) + "_nft_owner"), nft_owner), StringEntry((txId + "_bid_for_nft_by"), toBase58String(caller)), StringEntry((txId + "_bid_price_place"), bid_price), StringEntry((txId + "_previous_bid_amount_refund_to_address"), getLastWinnerAddress), StringEntry((txId + "_prevoius_bid_amount_refund"), getLastWinnerBidPrice)]
119 +                     else [StringEntry((auctionId + "_highest_bid"), toString(currentBidPrice)), StringEntry((auctionId + "_winner_of_nft"), toBase58String(i.caller.bytes)), StringEntry((auctionId + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((auctionId + "_nft_id"), toBase58String(assetId)), StringEntry((auctionId + "_nft_owner"), nft_owner), StringEntry((((txId + "_") + auctionId) + "_highest_bid"), toString(currentBidPrice)), StringEntry((((txId + "_") + auctionId) + "_winner"), toBase58String(i.caller.bytes)), StringEntry((((txId + "_") + auctionId) + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((((txId + "_") + auctionId) + "_nft_id"), toBase58String(assetId)), StringEntry((((txId + "_") + auctionId) + "_nft_owner"), nft_owner), StringEntry((txId + "_bid_for_nft_by"), toBase58String(caller)), StringEntry((txId + "_bid_price_place"), bid_price), StringEntry((txId + "_previous_bid_amount_refund_to_address"), getLastWinnerAddress), StringEntry((txId + "_prevoius_bid_amount_refund"), getLastWinnerBidPrice), ScriptTransfer(Address(fromBase58String(getLastWinnerAddress)), parseIntValue(getLastWinnerBidPrice), unit)]
120 +     }
121 + 
122 + 
123 + 
124 + @Callable(i)
125 + func acceptBidOffer (auctionId,nftId,bid_amount_from_user) = {
126 +     let txId = toBase58String(i.transactionId)
127 +     let caller = i.caller.bytes
128 +     let assetId = fromBase58String(nftId)
129 +     let getNftWinningPrice = getStringValue(this, (auctionId + "_highest_bid"))
130 +     let getAuctionWinner = getStringValue(this, (auctionId + "_winner_of_nft"))
131 + [ScriptTransfer(Address(caller), parseIntValue(getNftWinningPrice), unit), ScriptTransfer(Address(fromBase58String(getAuctionWinner)), 1, assetId), StringEntry((txId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((txId + "_nft_transfer_to"), getAuctionWinner), StringEntry((txId + "_nft_status"), "REWARDED"), StringEntry((auctionId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((auctionId + "_nft_transfer_to"), getAuctionWinner), StringEntry((auctionId + "_nft_status"), "REWARDED")]
132 +     }
133 + 
134 + 
135 + 
136 + @Callable(i)
137 + func cancelAuction (auctionId) = {
138 +     let txId = toBase58String(i.transactionId)
139 +     let caller = i.caller.bytes
140 +     let auctionStatus = getStringValue(this, (auctionId + "_nft_status"))
141 +     let biddingWinner = getStringValue(this, (auctionId + "_winner_of_nft"))
142 +     let nftOwner = getStringValue(this, (auctionId + "_nft_owner"))
143 +     let nftId = getStringValue(this, (auctionId + "_nft_on_auction"))
144 +     let biddingPrice = getStringValue(this, (auctionId + "_highest_bid"))
145 +     if ((biddingWinner == "0"))
146 +         then [StringEntry(((txId + auctionId) + "_nft_status"), "CANCELED"), ScriptTransfer(Address(fromBase58String(nftOwner)), 1, fromBase58String(nftId))]
147 +         else [StringEntry((auctionId + "_nft_status"), "CANCELED"), StringEntry((auctionId + "_previous_bid_amount_refund_to_address"), biddingWinner), StringEntry((auctionId + "_prevoius_bid_amount_refund"), biddingPrice), StringEntry((txId + "_nft_status"), "CANCELED"), StringEntry((txId + "_previous_bid_amount_refund_to_address"), biddingWinner), StringEntry((txId + "_prevoius_bid_amount_refund"), biddingPrice), ScriptTransfer(Address(fromBase58String(nftOwner)), 1, fromBase58String(nftId)), ScriptTransfer(Address(fromBase58String(biddingWinner)), parseIntValue(biddingPrice), unit)]
148 +     }
149 + 
150 + 
151 + 
152 + @Callable(i)
153 + func withdrawBid (bidTxId) = {
154 +     let caller = i.caller.bytes
155 +     let bidPrice = getStringValue(this, (bidTxId + "_highest_bid"))
156 +     let asBidder = getStringValue(this, (bidTxId + "_winner"))
157 +     let bidForNFT = getStringValue(this, (bidTxId + "_nft_id"))
158 +     if ((toBase58String(caller) != asBidder))
159 +         then throw("No bid")
160 +         else [StringEntry((bidTxId + "_nft_bid"), "WITHDRAW"), StringEntry((bidTxId + "_nft_id"), bidForNFT), StringEntry((bidTxId + "_bidding_price_refund_amount"), bidPrice), ScriptTransfer(i.caller, parseIntValue(bidPrice), unit)]
161 +     }
162 + 
4 163  
5 164  
6 165  @Callable(i)
7 166  func manualFundTransfer (recepientAddr,message) = {
8 167      let caller = i.caller.bytes
9 168      let reciver = fromBase58String(recepientAddr)
10 169      let amount = i.payments[0].amount
11 170      if ((toString(amount) == ""))
12 171          then throw("Payment is not attached or empty")
13 172          else [IntegerEntry((toBase58String(caller) + "_transfer"), amount), StringEntry((toBase58String(caller) + "_transfer_to"), recepientAddr), ScriptTransfer(Address(reciver), amount, unit)]
14 173      }
15 174  
16 175  
176 + 
177 + @Callable(i)
178 + func testBid (data) = [StringEntry("E8kkFBYCy44JJaq6pAZ6KizsuResi5UKNhbD1WNZwhhY_highest_bid", "0")]
179 + 
180 +

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
	4	+	let separator = "_"
	5	+
	6	+	let kBuy = "buy"
	7	+
	8	+	let kPrice = "price"
	9	+
	10	+	let kSell = "sell"
	11	+
	12	+	let maxAuctionDuration = 7
	13	+
	14	+	let kBid = "bid"
	15	+
	16	+	let statusForNFT = $Tuple4("OPEN", "CLOSED", "REWARDED", "CANCELED")
	17	+
	18	+	let dAppAddress = base58'3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq'
	19	+
	20	+	func isNft (assetId) = match assetInfo(assetId) {
	21	+	case token: Asset =>
	22	+	if (if ((token.decimals == 0))
	23	+	then (token.quantity == 1)
	24	+	else false)
	25	+	then (token.reissuable == false)
	26	+	else false
	27	+	case _ =>
	28	+	false
	29	+	}
	30	+
	31	+
	32	+	@Callable(i)
	33	+	func createNft (nft_name,nft_owner,nft_dAppAddress,nft_type,nft_tags,nft_selling_price,nft_description,nft_onSell,nft_data) = {
	34	+	let newToken = Issue(nft_name, nft_description, 1, 0, false)
	35	+	let issueId = calculateAssetId(newToken)
	36	+	let txId = i.transactionId
	37	+	[newToken, ScriptTransfer(i.caller, 1, issueId), StringEntry(((toBase58String(issueId) + separator) + "Owner"), toString(i.caller)), StringEntry(((toBase58String(issueId) + separator) + "nft_type"), nft_type), StringEntry(((toBase58String(issueId) + separator) + "nft_tags"), nft_tags), StringEntry(((toBase58String(issueId) + separator) + "nft_dAppAddress"), nft_dAppAddress), IntegerEntry(((toBase58String(issueId) + separator) + "nft_selling_price"), nft_selling_price), StringEntry(((toBase58String(issueId) + separator) + "nft_onSell"), nft_onSell), StringEntry(((toBase58String(issueId) + separator) + "nft_data"), nft_data), StringEntry(((toBase58String(txId) + separator) + "issue_nft"), toBase58String(issueId))]
	38	+	}
	39	+
	40	+
	41	+
	42	+	@Callable(i)
	43	+	func sellNFT (price) = {
	44	+	let txId = i.transactionId
	45	+	let seller = i.caller.bytes
	46	+	let $t017921877 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
	47	+	let token0 = $t017921877._1
	48	+	let amount0 = $t017921877._2
	49	+	if (!(isNft(token0)))
	50	+	then throw("Token is not NFT")
	51	+	else [StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), price), StringEntry(((toString(i.caller) + separator) + kSell), ((toBase58String(token0) + separator) + toString(amount0)))]
	52	+	}
	53	+
	54	+
	55	+
	56	+	@Callable(i)
	57	+	func buyNFT (nftID,current_nft_owner) = {
	58	+	let assetId = fromBase58String(nftID)
	59	+	let amount = value(i.payments[0].amount)
	60	+	let checkOwnerIsSame = match getString(this, (("nft_" + current_nft_owner) + "_owner")) {
	61	+	case a: String =>
	62	+	a
	63	+	case _ =>
	64	+	false
	65	+	}
	66	+	let price = getStringValue(((((kPrice + separator) + nftID) + "_") + current_nft_owner))
	67	+	if ((i.payments[0].assetId != unit))
	68	+	then throw("Pay in waves")
	69	+	else if ((current_nft_owner == toString(i.caller)))
	70	+	then throw("current Owner of NFT not able to purchase")
	71	+	else [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(Address(fromBase58String(current_nft_owner)), amount, unit), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount))), DeleteEntry((("nft_" + current_nft_owner) + "_owner")), StringEntry((("nft_" + current_nft_owner) + "_owner"), toString(i.caller)), StringEntry(((nftID + separator) + "_owner"), toString(i.caller))]
	72	+	}
	73	+
	74	+
	75	+
	76	+	@Callable(i)
	77	+	func addAuction (start,end,startPrice,duration) = {
	78	+	let txId = toBase58String(i.transactionId)
	79	+	let nftId = value(i.payments[0].assetId)
	80	+	let price = value(startPrice)
	81	+	let endHeight = (lastBlock.height + duration)
	82	+	let caller = i.caller.bytes
	83	+	let checkNftAuctioned = match getString(this, (((toBase58String(nftId) + separator) + "nft_status_") + toBase58String(caller))) {
	84	+	case a: String =>
	85	+	true
	86	+	case _ =>
	87	+	false
	88	+	}
	89	+	if ((i.payments[0].assetId == unit))
	90	+	then throw("NFT not attached")
	91	+	else if ((checkNftAuctioned == true))
	92	+	then throw("Already in auction list")
	93	+	else if ((duration > maxAuctionDuration))
	94	+	then throw(("Duration is too long. Must be less than or equal to 7 " + toString(maxAuctionDuration)))
	95	+	else [StringEntry(((txId + "_nft_start_auction_date_") + toBase58String(caller)), start), StringEntry(((txId + "_nft_end_auction_date_") + toBase58String(caller)), end), StringEntry((txId + "_nft_start_price"), startPrice), StringEntry((txId + "_nft_owner"), toString(i.caller)), StringEntry((txId + "_nft_on_auction"), toBase58String(nftId)), StringEntry((txId + "_previous_bidder"), "none"), StringEntry((txId + "_highest_bid"), "0"), StringEntry((txId + "_winner_of_nft"), "0"), StringEntry((txId + "_bidder_count"), "0"), StringEntry((txId + "_nft_status"), "OPEN")]
	96	+	}
	97	+
	98	+
	99	+
	100	+	@Callable(i)
	101	+	func placeBid (auctionId,nftId,nft_owner,bid_price) = {
	102	+	let txId = toBase58String(i.transactionId)
	103	+	let caller = i.caller.bytes
	104	+	let assetId = fromBase58String(nftId)
	105	+	let currentBidPrice = i.payments[0].amount
	106	+	let getLastWinnerBidPrice = getStringValue(this, (auctionId + "_highest_bid"))
	107	+	let getPreviousBidderAddress = getString(this, (auctionId + "_previous_bidder"))
	108	+	let currentBidCount = getStringValue(this, (auctionId + "_bidder_count"))
	109	+	let getLastWinnerAddress = getStringValue(this, (auctionId + "_winner_of_nft"))
	110	+	let checkNftAuctioned = getStringValue(this, (auctionId + "_nft_status"))
	111	+	if ((i.payments[0].assetId != unit))
	112	+	then throw("Pay in waves")
	113	+	else if ((checkNftAuctioned != "OPEN"))
	114	+	then throw("Not open for auction")
	115	+	else if ((parseIntValue(getLastWinnerBidPrice) >= currentBidPrice))
	116	+	then throw("Bid is less then starting/highest Bid")
	117	+	else if ((getLastWinnerBidPrice == "0"))
	118	+	then [StringEntry((auctionId + "_highest_bid"), toString(currentBidPrice)), StringEntry((auctionId + "_winner_of_nft"), toBase58String(i.caller.bytes)), StringEntry((auctionId + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((auctionId + "_nft_id"), toBase58String(assetId)), StringEntry((auctionId + "_nft_owner"), nft_owner), StringEntry((((txId + "_") + auctionId) + "_highest_bid"), toString(currentBidPrice)), StringEntry((((txId + "_") + auctionId) + "_winner"), toBase58String(i.caller.bytes)), StringEntry((((txId + "_") + auctionId) + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((((txId + "_") + auctionId) + "_nft_id"), toBase58String(assetId)), StringEntry((((txId + "_") + auctionId) + "_nft_owner"), nft_owner), StringEntry((txId + "_bid_for_nft_by"), toBase58String(caller)), StringEntry((txId + "_bid_price_place"), bid_price), StringEntry((txId + "_previous_bid_amount_refund_to_address"), getLastWinnerAddress), StringEntry((txId + "_prevoius_bid_amount_refund"), getLastWinnerBidPrice)]
	119	+	else [StringEntry((auctionId + "_highest_bid"), toString(currentBidPrice)), StringEntry((auctionId + "_winner_of_nft"), toBase58String(i.caller.bytes)), StringEntry((auctionId + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((auctionId + "_nft_id"), toBase58String(assetId)), StringEntry((auctionId + "_nft_owner"), nft_owner), StringEntry((((txId + "_") + auctionId) + "_highest_bid"), toString(currentBidPrice)), StringEntry((((txId + "_") + auctionId) + "_winner"), toBase58String(i.caller.bytes)), StringEntry((((txId + "_") + auctionId) + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((((txId + "_") + auctionId) + "_nft_id"), toBase58String(assetId)), StringEntry((((txId + "_") + auctionId) + "_nft_owner"), nft_owner), StringEntry((txId + "_bid_for_nft_by"), toBase58String(caller)), StringEntry((txId + "_bid_price_place"), bid_price), StringEntry((txId + "_previous_bid_amount_refund_to_address"), getLastWinnerAddress), StringEntry((txId + "_prevoius_bid_amount_refund"), getLastWinnerBidPrice), ScriptTransfer(Address(fromBase58String(getLastWinnerAddress)), parseIntValue(getLastWinnerBidPrice), unit)]
	120	+	}
	121	+
	122	+
	123	+
	124	+	@Callable(i)
	125	+	func acceptBidOffer (auctionId,nftId,bid_amount_from_user) = {
	126	+	let txId = toBase58String(i.transactionId)
	127	+	let caller = i.caller.bytes
	128	+	let assetId = fromBase58String(nftId)
	129	+	let getNftWinningPrice = getStringValue(this, (auctionId + "_highest_bid"))
	130	+	let getAuctionWinner = getStringValue(this, (auctionId + "_winner_of_nft"))
	131	+	[ScriptTransfer(Address(caller), parseIntValue(getNftWinningPrice), unit), ScriptTransfer(Address(fromBase58String(getAuctionWinner)), 1, assetId), StringEntry((txId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((txId + "_nft_transfer_to"), getAuctionWinner), StringEntry((txId + "_nft_status"), "REWARDED"), StringEntry((auctionId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((auctionId + "_nft_transfer_to"), getAuctionWinner), StringEntry((auctionId + "_nft_status"), "REWARDED")]
	132	+	}
	133	+
	134	+
	135	+
	136	+	@Callable(i)
	137	+	func cancelAuction (auctionId) = {
	138	+	let txId = toBase58String(i.transactionId)
	139	+	let caller = i.caller.bytes
	140	+	let auctionStatus = getStringValue(this, (auctionId + "_nft_status"))
	141	+	let biddingWinner = getStringValue(this, (auctionId + "_winner_of_nft"))
	142	+	let nftOwner = getStringValue(this, (auctionId + "_nft_owner"))
	143	+	let nftId = getStringValue(this, (auctionId + "_nft_on_auction"))
	144	+	let biddingPrice = getStringValue(this, (auctionId + "_highest_bid"))
	145	+	if ((biddingWinner == "0"))
	146	+	then [StringEntry(((txId + auctionId) + "_nft_status"), "CANCELED"), ScriptTransfer(Address(fromBase58String(nftOwner)), 1, fromBase58String(nftId))]
	147	+	else [StringEntry((auctionId + "_nft_status"), "CANCELED"), StringEntry((auctionId + "_previous_bid_amount_refund_to_address"), biddingWinner), StringEntry((auctionId + "_prevoius_bid_amount_refund"), biddingPrice), StringEntry((txId + "_nft_status"), "CANCELED"), StringEntry((txId + "_previous_bid_amount_refund_to_address"), biddingWinner), StringEntry((txId + "_prevoius_bid_amount_refund"), biddingPrice), ScriptTransfer(Address(fromBase58String(nftOwner)), 1, fromBase58String(nftId)), ScriptTransfer(Address(fromBase58String(biddingWinner)), parseIntValue(biddingPrice), unit)]
	148	+	}
	149	+
	150	+
	151	+
	152	+	@Callable(i)
	153	+	func withdrawBid (bidTxId) = {
	154	+	let caller = i.caller.bytes
	155	+	let bidPrice = getStringValue(this, (bidTxId + "_highest_bid"))
	156	+	let asBidder = getStringValue(this, (bidTxId + "_winner"))
	157	+	let bidForNFT = getStringValue(this, (bidTxId + "_nft_id"))
	158	+	if ((toBase58String(caller) != asBidder))
	159	+	then throw("No bid")
	160	+	else [StringEntry((bidTxId + "_nft_bid"), "WITHDRAW"), StringEntry((bidTxId + "_nft_id"), bidForNFT), StringEntry((bidTxId + "_bidding_price_refund_amount"), bidPrice), ScriptTransfer(i.caller, parseIntValue(bidPrice), unit)]
	161	+	}
	162	+
4	163
5	164
6	165		@Callable(i)

14	173		}
15	174
16	175
	176	+
	177	+	@Callable(i)
	178	+	func testBid (data) = [StringEntry("E8kkFBYCy44JJaq6pAZ6KizsuResi5UKNhbD1WNZwhhY_highest_bid", "0")]
	179	+
	180	+

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
	4	+	let separator = "_"
	5	+
	6	+	let kBuy = "buy"
	7	+
	8	+	let kPrice = "price"
	9	+
	10	+	let kSell = "sell"
	11	+
	12	+	let maxAuctionDuration = 7
	13	+
	14	+	let kBid = "bid"
	15	+
	16	+	let statusForNFT = $Tuple4("OPEN", "CLOSED", "REWARDED", "CANCELED")
	17	+
	18	+	let dAppAddress = base58'3MvjAaDYHpS4A5K4CV3kZMMEH9m9JdBSvbq'
	19	+
	20	+	func isNft (assetId) = match assetInfo(assetId) {
	21	+	case token: Asset =>
	22	+	if (if ((token.decimals == 0))
	23	+	then (token.quantity == 1)
	24	+	else false)
	25	+	then (token.reissuable == false)
	26	+	else false
	27	+	case _ =>
	28	+	false
	29	+	}
	30	+
	31	+
	32	+	@Callable(i)
	33	+	func createNft (nft_name,nft_owner,nft_dAppAddress,nft_type,nft_tags,nft_selling_price,nft_description,nft_onSell,nft_data) = {
	34	+	let newToken = Issue(nft_name, nft_description, 1, 0, false)
	35	+	let issueId = calculateAssetId(newToken)
	36	+	let txId = i.transactionId
	37	+	[newToken, ScriptTransfer(i.caller, 1, issueId), StringEntry(((toBase58String(issueId) + separator) + "Owner"), toString(i.caller)), StringEntry(((toBase58String(issueId) + separator) + "nft_type"), nft_type), StringEntry(((toBase58String(issueId) + separator) + "nft_tags"), nft_tags), StringEntry(((toBase58String(issueId) + separator) + "nft_dAppAddress"), nft_dAppAddress), IntegerEntry(((toBase58String(issueId) + separator) + "nft_selling_price"), nft_selling_price), StringEntry(((toBase58String(issueId) + separator) + "nft_onSell"), nft_onSell), StringEntry(((toBase58String(issueId) + separator) + "nft_data"), nft_data), StringEntry(((toBase58String(txId) + separator) + "issue_nft"), toBase58String(issueId))]
	38	+	}
	39	+
	40	+
	41	+
	42	+	@Callable(i)
	43	+	func sellNFT (price) = {
	44	+	let txId = i.transactionId
	45	+	let seller = i.caller.bytes
	46	+	let $t017921877 = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
	47	+	let token0 = $t017921877._1
	48	+	let amount0 = $t017921877._2
	49	+	if (!(isNft(token0)))
	50	+	then throw("Token is not NFT")
	51	+	else [StringEntry(((kPrice + separator) + toBase58String(value(i.payments[0].assetId))), price), StringEntry(((toString(i.caller) + separator) + kSell), ((toBase58String(token0) + separator) + toString(amount0)))]
	52	+	}
	53	+
	54	+
	55	+
	56	+	@Callable(i)
	57	+	func buyNFT (nftID,current_nft_owner) = {
	58	+	let assetId = fromBase58String(nftID)
	59	+	let amount = value(i.payments[0].amount)
	60	+	let checkOwnerIsSame = match getString(this, (("nft_" + current_nft_owner) + "_owner")) {
	61	+	case a: String =>
	62	+	a
	63	+	case _ =>
	64	+	false
	65	+	}
	66	+	let price = getStringValue(((((kPrice + separator) + nftID) + "_") + current_nft_owner))
	67	+	if ((i.payments[0].assetId != unit))
	68	+	then throw("Pay in waves")
	69	+	else if ((current_nft_owner == toString(i.caller)))
	70	+	then throw("current Owner of NFT not able to purchase")
	71	+	else [ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(Address(fromBase58String(current_nft_owner)), amount, unit), StringEntry(((toString(i.caller) + separator) + kBuy), ((nftID + separator) + toString(amount))), DeleteEntry((("nft_" + current_nft_owner) + "_owner")), StringEntry((("nft_" + current_nft_owner) + "_owner"), toString(i.caller)), StringEntry(((nftID + separator) + "_owner"), toString(i.caller))]
	72	+	}
	73	+
	74	+
	75	+
	76	+	@Callable(i)
	77	+	func addAuction (start,end,startPrice,duration) = {
	78	+	let txId = toBase58String(i.transactionId)
	79	+	let nftId = value(i.payments[0].assetId)
	80	+	let price = value(startPrice)
	81	+	let endHeight = (lastBlock.height + duration)
	82	+	let caller = i.caller.bytes
	83	+	let checkNftAuctioned = match getString(this, (((toBase58String(nftId) + separator) + "nft_status_") + toBase58String(caller))) {
	84	+	case a: String =>
	85	+	true
	86	+	case _ =>
	87	+	false
	88	+	}
	89	+	if ((i.payments[0].assetId == unit))
	90	+	then throw("NFT not attached")
	91	+	else if ((checkNftAuctioned == true))
	92	+	then throw("Already in auction list")
	93	+	else if ((duration > maxAuctionDuration))
	94	+	then throw(("Duration is too long. Must be less than or equal to 7 " + toString(maxAuctionDuration)))
	95	+	else [StringEntry(((txId + "_nft_start_auction_date_") + toBase58String(caller)), start), StringEntry(((txId + "_nft_end_auction_date_") + toBase58String(caller)), end), StringEntry((txId + "_nft_start_price"), startPrice), StringEntry((txId + "_nft_owner"), toString(i.caller)), StringEntry((txId + "_nft_on_auction"), toBase58String(nftId)), StringEntry((txId + "_previous_bidder"), "none"), StringEntry((txId + "_highest_bid"), "0"), StringEntry((txId + "_winner_of_nft"), "0"), StringEntry((txId + "_bidder_count"), "0"), StringEntry((txId + "_nft_status"), "OPEN")]
	96	+	}
	97	+
	98	+
	99	+
	100	+	@Callable(i)
	101	+	func placeBid (auctionId,nftId,nft_owner,bid_price) = {
	102	+	let txId = toBase58String(i.transactionId)
	103	+	let caller = i.caller.bytes
	104	+	let assetId = fromBase58String(nftId)
	105	+	let currentBidPrice = i.payments[0].amount
	106	+	let getLastWinnerBidPrice = getStringValue(this, (auctionId + "_highest_bid"))
	107	+	let getPreviousBidderAddress = getString(this, (auctionId + "_previous_bidder"))
	108	+	let currentBidCount = getStringValue(this, (auctionId + "_bidder_count"))
	109	+	let getLastWinnerAddress = getStringValue(this, (auctionId + "_winner_of_nft"))
	110	+	let checkNftAuctioned = getStringValue(this, (auctionId + "_nft_status"))
	111	+	if ((i.payments[0].assetId != unit))
	112	+	then throw("Pay in waves")
	113	+	else if ((checkNftAuctioned != "OPEN"))
	114	+	then throw("Not open for auction")
	115	+	else if ((parseIntValue(getLastWinnerBidPrice) >= currentBidPrice))
	116	+	then throw("Bid is less then starting/highest Bid")
	117	+	else if ((getLastWinnerBidPrice == "0"))
	118	+	then [StringEntry((auctionId + "_highest_bid"), toString(currentBidPrice)), StringEntry((auctionId + "_winner_of_nft"), toBase58String(i.caller.bytes)), StringEntry((auctionId + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((auctionId + "_nft_id"), toBase58String(assetId)), StringEntry((auctionId + "_nft_owner"), nft_owner), StringEntry((((txId + "_") + auctionId) + "_highest_bid"), toString(currentBidPrice)), StringEntry((((txId + "_") + auctionId) + "_winner"), toBase58String(i.caller.bytes)), StringEntry((((txId + "_") + auctionId) + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((((txId + "_") + auctionId) + "_nft_id"), toBase58String(assetId)), StringEntry((((txId + "_") + auctionId) + "_nft_owner"), nft_owner), StringEntry((txId + "_bid_for_nft_by"), toBase58String(caller)), StringEntry((txId + "_bid_price_place"), bid_price), StringEntry((txId + "_previous_bid_amount_refund_to_address"), getLastWinnerAddress), StringEntry((txId + "_prevoius_bid_amount_refund"), getLastWinnerBidPrice)]
	119	+	else [StringEntry((auctionId + "_highest_bid"), toString(currentBidPrice)), StringEntry((auctionId + "_winner_of_nft"), toBase58String(i.caller.bytes)), StringEntry((auctionId + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((auctionId + "_nft_id"), toBase58String(assetId)), StringEntry((auctionId + "_nft_owner"), nft_owner), StringEntry((((txId + "_") + auctionId) + "_highest_bid"), toString(currentBidPrice)), StringEntry((((txId + "_") + auctionId) + "_winner"), toBase58String(i.caller.bytes)), StringEntry((((txId + "_") + auctionId) + "_bidder_count"), toString((parseIntValue(currentBidCount) + 1))), StringEntry((((txId + "_") + auctionId) + "_nft_id"), toBase58String(assetId)), StringEntry((((txId + "_") + auctionId) + "_nft_owner"), nft_owner), StringEntry((txId + "_bid_for_nft_by"), toBase58String(caller)), StringEntry((txId + "_bid_price_place"), bid_price), StringEntry((txId + "_previous_bid_amount_refund_to_address"), getLastWinnerAddress), StringEntry((txId + "_prevoius_bid_amount_refund"), getLastWinnerBidPrice), ScriptTransfer(Address(fromBase58String(getLastWinnerAddress)), parseIntValue(getLastWinnerBidPrice), unit)]
	120	+	}
	121	+
	122	+
	123	+
	124	+	@Callable(i)
	125	+	func acceptBidOffer (auctionId,nftId,bid_amount_from_user) = {
	126	+	let txId = toBase58String(i.transactionId)
	127	+	let caller = i.caller.bytes
	128	+	let assetId = fromBase58String(nftId)
	129	+	let getNftWinningPrice = getStringValue(this, (auctionId + "_highest_bid"))
	130	+	let getAuctionWinner = getStringValue(this, (auctionId + "_winner_of_nft"))
	131	+	[ScriptTransfer(Address(caller), parseIntValue(getNftWinningPrice), unit), ScriptTransfer(Address(fromBase58String(getAuctionWinner)), 1, assetId), StringEntry((txId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((txId + "_nft_transfer_to"), getAuctionWinner), StringEntry((txId + "_nft_status"), "REWARDED"), StringEntry((auctionId + "_amount_paid_to_owner"), getNftWinningPrice), StringEntry((auctionId + "_nft_transfer_to"), getAuctionWinner), StringEntry((auctionId + "_nft_status"), "REWARDED")]
	132	+	}
	133	+
	134	+
	135	+
	136	+	@Callable(i)
	137	+	func cancelAuction (auctionId) = {
	138	+	let txId = toBase58String(i.transactionId)
	139	+	let caller = i.caller.bytes
	140	+	let auctionStatus = getStringValue(this, (auctionId + "_nft_status"))
	141	+	let biddingWinner = getStringValue(this, (auctionId + "_winner_of_nft"))
	142	+	let nftOwner = getStringValue(this, (auctionId + "_nft_owner"))
	143	+	let nftId = getStringValue(this, (auctionId + "_nft_on_auction"))
	144	+	let biddingPrice = getStringValue(this, (auctionId + "_highest_bid"))
	145	+	if ((biddingWinner == "0"))
	146	+	then [StringEntry(((txId + auctionId) + "_nft_status"), "CANCELED"), ScriptTransfer(Address(fromBase58String(nftOwner)), 1, fromBase58String(nftId))]
	147	+	else [StringEntry((auctionId + "_nft_status"), "CANCELED"), StringEntry((auctionId + "_previous_bid_amount_refund_to_address"), biddingWinner), StringEntry((auctionId + "_prevoius_bid_amount_refund"), biddingPrice), StringEntry((txId + "_nft_status"), "CANCELED"), StringEntry((txId + "_previous_bid_amount_refund_to_address"), biddingWinner), StringEntry((txId + "_prevoius_bid_amount_refund"), biddingPrice), ScriptTransfer(Address(fromBase58String(nftOwner)), 1, fromBase58String(nftId)), ScriptTransfer(Address(fromBase58String(biddingWinner)), parseIntValue(biddingPrice), unit)]
	148	+	}
	149	+
	150	+
	151	+
	152	+	@Callable(i)
	153	+	func withdrawBid (bidTxId) = {
	154	+	let caller = i.caller.bytes
	155	+	let bidPrice = getStringValue(this, (bidTxId + "_highest_bid"))
	156	+	let asBidder = getStringValue(this, (bidTxId + "_winner"))
	157	+	let bidForNFT = getStringValue(this, (bidTxId + "_nft_id"))
	158	+	if ((toBase58String(caller) != asBidder))
	159	+	then throw("No bid")
	160	+	else [StringEntry((bidTxId + "_nft_bid"), "WITHDRAW"), StringEntry((bidTxId + "_nft_id"), bidForNFT), StringEntry((bidTxId + "_bidding_price_refund_amount"), bidPrice), ScriptTransfer(i.caller, parseIntValue(bidPrice), unit)]
	161	+	}
	162	+
4	163
5	164
6	165		@Callable(i)
7	166		func manualFundTransfer (recepientAddr,message) = {
8	167		let caller = i.caller.bytes
9	168		let reciver = fromBase58String(recepientAddr)
10	169		let amount = i.payments[0].amount
11	170		if ((toString(amount) == ""))
12	171		then throw("Payment is not attached or empty")
13	172		else [IntegerEntry((toBase58String(caller) + "_transfer"), amount), StringEntry((toBase58String(caller) + "_transfer_to"), recepientAddr), ScriptTransfer(Address(reciver), amount, unit)]
14	173		}
15	174
16	175
	176	+
	177	+	@Callable(i)
	178	+	func testBid (data) = [StringEntry("E8kkFBYCy44JJaq6pAZ6KizsuResi5UKNhbD1WNZwhhY_highest_bid", "0")]
	179	+
	180	+

github/deemru/w8io/169f3d6 
30.57 ms ◑