tx · 4TBpdaah3Ca4VL5CkEnMRtLV1m5Yf1FwgyKKHropyHBr

3P8rLVnwrTf4k5AB3emuduhZZb1yKcitTHy:  -0.01000000 Waves

2021.11.22 14:48 [2867224] smart account 3P8rLVnwrTf4k5AB3emuduhZZb1yKcitTHy > SELF 0.00000000 Waves

{ "type": 13, "id": "4TBpdaah3Ca4VL5CkEnMRtLV1m5Yf1FwgyKKHropyHBr", "fee": 1000000, "feeAssetId": null, "timestamp": 1637581742902, "version": 2, "chainId": 87, "sender": "3P8rLVnwrTf4k5AB3emuduhZZb1yKcitTHy", "senderPublicKey": "4aJ13sdvf8t499Dzv3TFAGqn866pTDmr8AML7AGjW2iA", "proofs": [ "4ahK8ybqNeCPaGo8Rm5oPD8U4FGnaEe8HczGxZ4AiybzfWczYt5b1MEbzMrkjgrJ8udbLwTFKygL8S5woy7JZCHE" ], "script": "base64:AAIFAAAAAAAAAm4IAhIDCgEIGg8KAmExEgltYXhTdXBwbHkaCwoCYTISBXdhdmVzGhIKAmEzEgxnZXRQdW5rSURLZXkaEwoCYTQSDXRyeUdldEludGVnZXIaCQoCYTUSA2tleRoJCgJhNhIDdmFsGg0KAmE3EgckbWF0Y2gwGhIKAmE4Egx0cnlHZXRTdHJpbmcaEwoCYTkSDXRyeUdldEFkZHJlc3MaCgoCYjESBGFkZHIaEQoCYjISC2dldFR5cGVQdW5rGgsKAmIzEgVpZElOVBoMCgJiNBIGZ2V0VVJMGhUKAmI1Eg9nZXRSYW5kb21OdW1iZXIaDgoCYjYSCHZhcmlhbnRzGgoKAmI3EgR0eElkGhEKAmI4EgtoZWlnaHRCbG9jaxoMCgJiORIGb2Zmc2V0GhUKAmMxEg9yYW5kb21TZWVkQmxvY2saEAoCYzISCnJhbmRvbUhhc2gaFQoCYzMSD2NhbGNXYXZlc05lZWRlZBoWCgJjNBIQdG90YWxQdW5rc1N1cHBseRoJCgJjNRIDcmVmGhQKAmM2Eg5hdmFpbGFibGVQdW5rcxoRCgJjNxILd2F2ZXNOZWVkZWQaEgoCYzgSDGZpcnN0UGF5bWVudBoWCgJjORIQZmlyc3RQYXltZW50Qm9vbBoYCgJkMRISbGlzdEF2YWlsYWJsZVB1bmtzGgoKAmQyEgRyYW5kGgwKAmQzEgZwdW5rSWQaCgoCZDQSBG5hbWUaCgoCZDUSBG1ldGEaCwoCZDYSBWFzc2V0Gg0KAmQ3Egdhc3NldElkGhQKAmQ4Eg5yZWZlcmFsQWRkcmVzcxoMCgJkORIGdmVyaWZ5AAAACgAAAAACYTEAAAAAAAAAA+gAAAAAAmEyAAAAAAAF9eEAAQAAAAJhMwAAAAEAAAACaWQJAAEsAAAAAgIAAAAFcHVua18FAAAAAmlkAQAAAAJhNAAAAAEAAAACYTUEAAAAAmE2BAAAAAJhNwkABBoAAAACBQAAAAR0aGlzBQAAAAJhNQMJAAABAAAAAgUAAAACYTcCAAAAA0ludAQAAAABYgUAAAACYTcFAAAAAWIAAAAAAAAAAAAFAAAAAmE2AQAAAAJhOAAAAAEAAAACYTUEAAAAAmE2BAAAAAJhNwkABB0AAAACBQAAAAR0aGlzBQAAAAJhNQMJAAABAAAAAgUAAAACYTcCAAAABlN0cmluZwQAAAABYgUAAAACYTcFAAAAAWICAAAAAAUAAAACYTYBAAAAAmE5AAAAAQAAAAJiMQQAAAACYTYEAAAAAmE3CQAEJgAAAAEFAAAAAmIxAwkAAAEAAAACBQAAAAJhNwIAAAAHQWRkcmVzcwQAAAABYQUAAAACYTcFAAAAAWEDCQAAAQAAAAIFAAAAAmE3AgAAAARVbml0BAAAAAFhBQAAAAJhNwkBAAAAB0FkZHJlc3MAAAABAQAAABoBVCtIDO9iucTHy0DGlV6ZW7e3Wgj85TCpAgkAAAIAAAABAgAAAAtNYXRjaCBlcnJvcgUAAAACYTYBAAAAAmIyAAAAAQAAAAJpZAQAAAACYjMEAAAAAmE3CQAEtgAAAAEFAAAAAmlkAwkAAAEAAAACBQAAAAJhNwIAAAADSW50BAAAAAFpBQAAAAJhNwUAAAABaQMJAAABAAAAAgUAAAACYTcCAAAABFVuaXQEAAAAAWkFAAAAAmE3AAAAAAAAAAAACQAAAgAAAAECAAAAC01hdGNoIGVycm9yAwkAAAAAAAACBQAAAAJiMwAAAAAAAAAAAAIAAAAKdWx0cmEtcmFyZQMJAABnAAAAAgAAAAAAAAAAKAUAAAACYjMCAAAABHJhcmUCAAAABnVuaXF1ZQEAAAACYjQAAAABAAAAAmlkCQABLAAAAAIJAAEsAAAAAgIAAAAeaHR0cHM6Ly93YXZlc3B1bmtzLmNvbS9wdW5rcy9wBQAAAAJpZAIAAAAELnBuZwEAAAACYjUAAAAEAAAAAmI2AAAAAmI3AAAAAmI4AAAAAmI5BAAAAAJjMQkBAAAABXZhbHVlAAAAAQkAA+0AAAABCQAAZQAAAAIFAAAAAmI4AAAAAAAAAAABBAAAAAJjMgkAC1QAAAABCQAAywAAAAIFAAAAAmI3CQEAAAAFdmFsdWUAAAABCAUAAAACYzEAAAADdnJmCQAAagAAAAIJAASyAAAAAgUAAAACYzIFAAAAAmI5BQAAAAJiNgEAAAACYzMAAAABAAAAAmM0AwkAAAAAAAACBQAAAAJjNAAAAAAAAAAAAAUAAAACYTIJAABoAAAAAgkAAGQAAAACCQAAaQAAAAIFAAAAAmM0AAAAAAAAAABkAAAAAAAAAAABBQAAAAJhMgAAAAEAAAABaQEAAAAEbWludAAAAAEAAAACYzUEAAAAAmM0CQEAAAACYTQAAAABAgAAAAxwdW5rc19zdXBwbHkEAAAAAmM2CQEAAAACYTgAAAABAgAAAA9hdmFpbGFibGVfcHVua3MEAAAAAmM3CQEAAAACYzMAAAABBQAAAAJjNAQAAAACYzgJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAAAmM5BAAAAAJhNwgFAAAAAmM4AAAAB2Fzc2V0SWQDCQAAAQAAAAIFAAAAAmE3AgAAAApCeXRlVmVjdG9yBAAAAAF0BQAAAAJhNwYDCQAAAQAAAAIFAAAAAmE3AgAAAARVbml0BAAAAAF3BQAAAAJhNwcJAAACAAAAAQIAAAALTWF0Y2ggZXJyb3IDCQAAAAAAAAIFAAAAAmM0BQAAAAJhMQkAAAIAAAABAgAAABRBbGwgcHVua3MgYXJlIG1pbnRlZAMJAAAAAAAAAgUAAAACYzYCAAAAAAkAAAIAAAABAgAAABJObyBwdW5rcyBhdmFpbGFibGUDBQAAAAJjOQkAAAIAAAABAgAAACRQYXltZW50IG11c3QgYmUgaW4gV2F2ZXMgdG9rZW5zIG9ubHkDCQAAZgAAAAIFAAAAAmM3CAUAAAACYzgAAAAGYW1vdW50CQAAAgAAAAECAAAAEkluc3VmZmljaWVudCBmdW5kcwQAAAACZDEJAAS1AAAAAgUAAAACYzYCAAAAASwEAAAAAmQyCQEAAAACYjUAAAAECQAAZQAAAAIFAAAAAmExBQAAAAJjNAgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAUAAAAGaGVpZ2h0AAAAAAAAAAAABAAAAAJkMwkAAZEAAAACBQAAAAJkMQUAAAACZDIEAAAAAmQ0CQABLAAAAAICAAAAC1dhdmVzUHVuayAjBQAAAAJkMwQAAAACZDUJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAB3siaWQiOiAFAAAAAmQzAgAAAAssICJ0eXBlIjogIgkBAAAAAmIyAAAAAQUAAAACZDMCAAAACyIsICJ1cmwiOiAiCQEAAAACYjQAAAABBQAAAAJkMwIAAAACIn0EAAAAAmQ2CQAEQwAAAAcFAAAAAmQ0BQAAAAJkNQAAAAAAAAAAAQAAAAAAAAAAAAcFAAAABHVuaXQFAAAABmhlaWdodAQAAAACZDcJAAQ4AAAAAQUAAAACZDYEAAAAAmQ4CQEAAAACYTkAAAABBQAAAAJjNQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAMcHVua3Nfc3VwcGx5CQAAZAAAAAIFAAAAAmM0AAAAAAAAAAABCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAICAAAAD2F2YWlsYWJsZV9wdW5rcwkABLkAAAACCQAEUQAAAAIFAAAAAmQxBQAAAAJkMgIAAAABLAkABEwAAAACBQAAAAJkNgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAACYTMAAAABBQAAAAJkMwkAAlgAAAABBQAAAAJkNwkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQACWAAAAAEFAAAAAmQ3CQEAAAACYTMAAAABBQAAAAJkMwkABEwAAAACCQEAAAAOU2NyaXB0VHJhbnNmZXIAAAADCAUAAAABaQAAAAZjYWxsZXIAAAAAAAAAAAEFAAAAAmQ3CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMFAAAAAmQ4CQAAaQAAAAIIBQAAAAJjOAAAAAZhbW91bnQAAAAAAAAAAAoFAAAABHVuaXQFAAAAA25pbAAAAAEAAAACdHgBAAAAAmQ5AAAAAAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXmqtK61", "height": 2867224, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: none Next: DoGhxxZLkPxiF2am53XxDy7EQjGtha3b1xqHN9hEwiam Full:
OldNewDifferences
1-# no script
1+{-# STDLIB_VERSION 5 #-}
2+{-# SCRIPT_TYPE ACCOUNT #-}
3+{-# CONTENT_TYPE DAPP #-}
4+let maxSupply = 1000
5+
6+let waves = 100000000
7+
8+func getPunkIDKey (id) = ("punk_" + id)
9+
10+
11+func tryGetInteger (key) = {
12+ let val = match getInteger(this, key) {
13+ case b: Int =>
14+ b
15+ case _ =>
16+ 0
17+ }
18+ val
19+ }
20+
21+
22+func tryGetString (key) = {
23+ let val = match getString(this, key) {
24+ case b: String =>
25+ b
26+ case _ =>
27+ ""
28+ }
29+ val
30+ }
31+
32+
33+func tryGetAddress (addr) = {
34+ let val = match addressFromString(addr) {
35+ case a: Address =>
36+ a
37+ case a: Unit =>
38+ Address(base58'3Msrw9Kxa6RgHYQ63sSib9uESmaBU9gH6Gy')
39+ case _ =>
40+ throw("Match error")
41+ }
42+ val
43+ }
44+
45+
46+func getTypePunk (id) = {
47+ let idINT = match parseInt(id) {
48+ case i: Int =>
49+ i
50+ case i: Unit =>
51+ 0
52+ case _ =>
53+ throw("Match error")
54+ }
55+ if ((idINT == 0))
56+ then "ultra-rare"
57+ else if ((40 >= idINT))
58+ then "rare"
59+ else "unique"
60+ }
61+
62+
63+func getURL (id) = (("https://wavespunks.com/punks/p" + id) + ".png")
64+
65+
66+func getRandomNumber (variants,txId,heightBlock,offset) = {
67+ let randomSeedBlock = value(blockInfoByHeight((heightBlock - 1)))
68+ let randomHash = sha256_16Kb((txId + value(randomSeedBlock.vrf)))
69+ (toInt(randomHash, offset) % variants)
70+ }
71+
72+
73+func calcWavesNeeded (totalPunksSupply) = if ((totalPunksSupply == 0))
74+ then waves
75+ else (((totalPunksSupply / 100) + 1) * waves)
76+
77+
78+@Callable(i)
79+func mint (ref) = {
80+ let totalPunksSupply = tryGetInteger("punks_supply")
81+ let availablePunks = tryGetString("available_punks")
82+ let wavesNeeded = calcWavesNeeded(totalPunksSupply)
83+ let firstPayment = value(i.payments[0])
84+ let firstPaymentBool = match firstPayment.assetId {
85+ case t: ByteVector =>
86+ true
87+ case w: Unit =>
88+ false
89+ case _ =>
90+ throw("Match error")
91+ }
92+ if ((totalPunksSupply == maxSupply))
93+ then throw("All punks are minted")
94+ else if ((availablePunks == ""))
95+ then throw("No punks available")
96+ else if (firstPaymentBool)
97+ then throw("Payment must be in Waves tokens only")
98+ else if ((wavesNeeded > firstPayment.amount))
99+ then throw("Insufficient funds")
100+ else {
101+ let listAvailablePunks = split(availablePunks, ",")
102+ let rand = getRandomNumber((maxSupply - totalPunksSupply), i.transactionId, height, 0)
103+ let punkId = listAvailablePunks[rand]
104+ let name = ("WavesPunk #" + punkId)
105+ let meta = (((((("{\"id\": " + punkId) + ", \"type\": \"") + getTypePunk(punkId)) + "\", \"url\": \"") + getURL(punkId)) + "\"}")
106+ let asset = Issue(name, meta, 1, 0, false, unit, height)
107+ let assetId = calculateAssetId(asset)
108+ let referalAddress = tryGetAddress(ref)
109+[IntegerEntry("punks_supply", (totalPunksSupply + 1)), StringEntry("available_punks", makeString(removeByIndex(listAvailablePunks, rand), ",")), asset, StringEntry(getPunkIDKey(punkId), toBase58String(assetId)), StringEntry(toBase58String(assetId), getPunkIDKey(punkId)), ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(referalAddress, (firstPayment.amount / 10), unit)]
110+ }
111+ }
112+
113+
114+@Verifier(tx)
115+func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
116+

github/deemru/w8io/3ef1775 
26.28 ms