tx · FwyuTxCZkfQhSQsY4NBzVjtYMNv3TDStTam7PUP5Sqnp

3N72SETEKtTuaA3YNVYWgVEmXKrRrZYXHGo:  -0.01000000 Waves

2022.11.16 15:59 [2319704] smart account 3N72SETEKtTuaA3YNVYWgVEmXKrRrZYXHGo > SELF 0.00000000 Waves

{ "type": 13, "id": "FwyuTxCZkfQhSQsY4NBzVjtYMNv3TDStTam7PUP5Sqnp", "fee": 1000000, "feeAssetId": null, "timestamp": 1668603290171, "version": 2, "chainId": 84, "sender": "3N72SETEKtTuaA3YNVYWgVEmXKrRrZYXHGo", "senderPublicKey": "Kwu4LYBMntApXv8t7csxV23Kvc3tvak26wMKK56tA4V", "proofs": [ "zpXahszK5fnYhUAHfgEMenx9iqrbVpjZQQGayqYsbNKME6GefFaWV5kzxyy9k47ajsGbKLgoAgnXcmfPzkn2Tft" ], "script": "base64:BgIQCAISBQoDCAgBEgMKAQgSAAUACXNlcGFyYXRvcgIBXwAEa0J1eQIDYnV5AAVrU2VsbAIEc2VsbAAGa1ByaWNlAgVwcmljZQEFaXNOZnQBB2Fzc2V0SWQEByRtYXRjaDAJAOwHAQUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgVBc3NldAQFdG9rZW4FByRtYXRjaDADAwkAAAIIBQV0b2tlbghkZWNpbWFscwAACQAAAggFBXRva2VuCHF1YW50aXR5AAEHCQAAAggFBXRva2VuCnJlaXNzdWFibGUHBwcDAWkBCGlzc3VlTmZ0AwRuYW1lBG1ldGEFcHJpY2UECG5ld1Rva2VuCQDCCAUFBG5hbWUFBG1ldGEAAQAABwQHaXNzdWVJZAkAuAgBBQhuZXdUb2tlbgkAzAgCBQhuZXdUb2tlbgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgUGa1ByaWNlBQlzZXBhcmF0b3IJANgEAQUHaXNzdWVJZAkApAMBBQVwcmljZQUDbmlsAWkBBmJ1eU5GVAEFbmZ0SUQEB2Fzc2V0SWQJANkEAQUFbmZ0SUQEBmFtb3VudAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQEBXByaWNlCQETdmFsdWVPckVycm9yTWVzc2FnZQIJAKIIAQkArAICCQCsAgIFBmtQcmljZQUJc2VwYXJhdG9yBQVuZnRJRAIeVGhlcmUgaXMgbm8gcHJpY2UgZm9yIHRoaXMgbmZ0AwkBAiE9AggJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBQR1bml0CQACAQIMcGF5IGluIHdhdmVzAwkAZgIJAQ1wYXJzZUludFZhbHVlAQUFcHJpY2UFBmFtb3VudAkAAgECD0ludmFsaWQgcGF5bWVudAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIAAQUHYXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkApQgBCAUBaQZjYWxsZXIFCXNlcGFyYXRvcgUEa0J1eQkArAICCQCsAgIFBW5mdElEBQlzZXBhcmF0b3IJAKQDAQUGYW1vdW50BQNuaWwBaQEHc2VsbE5GVAAECyR0MDExNzMxMjU4CQCUCgIJAQV2YWx1ZQEICQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAkBBXZhbHVlAQgJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQEBnRva2VuMAgFCyR0MDExNzMxMjU4Al8xBAdhbW91bnQwCAULJHQwMTE3MzEyNTgCXzIEBXByaWNlCQERQGV4dHJOYXRpdmUoMTA1OCkBCQCsAgIJAKwCAgUGa1ByaWNlBQlzZXBhcmF0b3IJARN2YWx1ZU9yRXJyb3JNZXNzYWdlAgkA2AQBBQZ0b2tlbjACHlRoZXJlIGlzIG5vIHByaWNlIGZvciB0aGlzIG5mdAMJAQEhAQkBBWlzTmZ0AQUGdG9rZW4wCQACAQIQVG9rZW4gaXMgbm90IE5GVAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCAUBaQZjYWxsZXIJAQ1wYXJzZUludFZhbHVlAQUFcHJpY2UFBHVuaXQJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKUIAQgFAWkGY2FsbGVyBQlzZXBhcmF0b3IFBWtTZWxsCQCsAgIJAKwCAgkA2AQBBQZ0b2tlbjAFCXNlcGFyYXRvcgkApAMBBQdhbW91bnQwBQNuaWwAuZt8xw==", "height": 2319704, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: A12bMRMab78VriVJji5js5gfuY1FtAP6XVsSSCrafqFg Next: AwyeGhAnjwWEQSCm4p4Gw7pyY8cDc3XMXjq5WL8dGQcQ Diff:
OldNewDifferences
2525
2626
2727 @Callable(i)
28-func issueNft (j,k,l,m,n,o,p,q) = {
29- let r = Issue(j, p, 1, 0, false)
30- let s = calculateAssetId(r)
31-[r, ScriptTransfer(i.caller, 1, s), StringEntry(((toBase58String(s) + a) + "nft_owner"), toString(i.caller)), StringEntry(((toBase58String(s) + a) + "nft_type"), m), StringEntry(((toBase58String(s) + a) + "nft_tags"), n), StringEntry(((toBase58String(s) + a) + "nft_dAppAddress"), l), IntegerEntry(((toBase58String(s) + a) + "nft_selling_price"), o), StringEntry(((toBase58String(s) + a) + "nft_data"), q), StringEntry(((toBase58String(s) + a) + "issueNftToUser"), toBase16String(s))]
28+func issueNft (j,k,l) = {
29+ let m = Issue(j, k, 1, 0, false)
30+ let n = calculateAssetId(m)
31+[m, StringEntry(((d + a) + toBase58String(n)), toString(l))]
32+ }
33+
34+
35+
36+@Callable(i)
37+func buyNFT (o) = {
38+ let f = fromBase58String(o)
39+ let p = value(i.payments[0].amount)
40+ let l = valueOrErrorMessage(getString(((d + a) + o)), "There is no price for this nft")
41+ if ((i.payments[0].assetId != unit))
42+ then throw("pay in waves")
43+ else if ((parseIntValue(l) > p))
44+ then throw("Invalid payment")
45+ else [ScriptTransfer(i.caller, 1, f), StringEntry(((toString(i.caller) + a) + b), ((o + a) + toString(p)))]
46+ }
47+
48+
49+
50+@Callable(i)
51+func sellNFT () = {
52+ let q = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
53+ let r = q._1
54+ let s = q._2
55+ let l = getStringValue(((d + a) + valueOrErrorMessage(toBase58String(r), "There is no price for this nft")))
56+ if (!(e(r)))
57+ then throw("Token is not NFT")
58+ else [ScriptTransfer(i.caller, parseIntValue(l), unit), StringEntry(((toString(i.caller) + a) + c), ((toBase58String(r) + a) + toString(s)))]
3259 }
3360
3461
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 let a = "_"
55
66 let b = "buy"
77
88 let c = "sell"
99
1010 let d = "price"
1111
1212 func e (f) = {
1313 let g = assetInfo(f)
1414 if ($isInstanceOf(g, "Asset"))
1515 then {
1616 let h = g
1717 if (if ((h.decimals == 0))
1818 then (h.quantity == 1)
1919 else false)
2020 then (h.reissuable == false)
2121 else false
2222 }
2323 else false
2424 }
2525
2626
2727 @Callable(i)
28-func issueNft (j,k,l,m,n,o,p,q) = {
29- let r = Issue(j, p, 1, 0, false)
30- let s = calculateAssetId(r)
31-[r, ScriptTransfer(i.caller, 1, s), StringEntry(((toBase58String(s) + a) + "nft_owner"), toString(i.caller)), StringEntry(((toBase58String(s) + a) + "nft_type"), m), StringEntry(((toBase58String(s) + a) + "nft_tags"), n), StringEntry(((toBase58String(s) + a) + "nft_dAppAddress"), l), IntegerEntry(((toBase58String(s) + a) + "nft_selling_price"), o), StringEntry(((toBase58String(s) + a) + "nft_data"), q), StringEntry(((toBase58String(s) + a) + "issueNftToUser"), toBase16String(s))]
28+func issueNft (j,k,l) = {
29+ let m = Issue(j, k, 1, 0, false)
30+ let n = calculateAssetId(m)
31+[m, StringEntry(((d + a) + toBase58String(n)), toString(l))]
32+ }
33+
34+
35+
36+@Callable(i)
37+func buyNFT (o) = {
38+ let f = fromBase58String(o)
39+ let p = value(i.payments[0].amount)
40+ let l = valueOrErrorMessage(getString(((d + a) + o)), "There is no price for this nft")
41+ if ((i.payments[0].assetId != unit))
42+ then throw("pay in waves")
43+ else if ((parseIntValue(l) > p))
44+ then throw("Invalid payment")
45+ else [ScriptTransfer(i.caller, 1, f), StringEntry(((toString(i.caller) + a) + b), ((o + a) + toString(p)))]
46+ }
47+
48+
49+
50+@Callable(i)
51+func sellNFT () = {
52+ let q = $Tuple2(value(i.payments[0].assetId), value(i.payments[0].amount))
53+ let r = q._1
54+ let s = q._2
55+ let l = getStringValue(((d + a) + valueOrErrorMessage(toBase58String(r), "There is no price for this nft")))
56+ if (!(e(r)))
57+ then throw("Token is not NFT")
58+ else [ScriptTransfer(i.caller, parseIntValue(l), unit), StringEntry(((toString(i.caller) + a) + c), ((toBase58String(r) + a) + toString(s)))]
3259 }
3360
3461

github/deemru/w8io/873ac7e 
21.59 ms