tx · 68qHGDvbafgLBeVBC3LnWUzmgFCQg6j4DaQMERMpxMm7

3P8gsxa1xt1xSjDP4HR728y7o9QQginK2eU:  -0.01400000 Waves

2021.05.07 00:32 [2579014] smart account 3P8gsxa1xt1xSjDP4HR728y7o9QQginK2eU > SELF 0.00000000 Waves

{ "type": 13, "id": "68qHGDvbafgLBeVBC3LnWUzmgFCQg6j4DaQMERMpxMm7", "fee": 1400000, "feeAssetId": null, "timestamp": 1620336762803, "version": 2, "chainId": 87, "sender": "3P8gsxa1xt1xSjDP4HR728y7o9QQginK2eU", "senderPublicKey": "FQcGKT4w9tnuigudoGoUWmGxV6JqMaac6kwNKWaA61uJ", "proofs": [ "2yANZp4XxVEH5CKRNyiRZZD2dBsu9PXPmcAkge8LmSkwcsZVViNkZwZRvk1dbDsnD4wiEKNHnJzYBNUCac5peDLH" ], "script": "base64:AAIEAAAAAAAAACQIAhIFCgMBAQgSAwoBCBIDCgEIEgMKAQgSBAoCCAgSBAoCCAgAAAAEAAAAABBpbmN1YmF0b3JBZGRyZXNzAQAAABoBV1qrzANmKJ33TB0VRVa6NRbRDjt7rZkIfgEAAAANdHJ5R2V0SW50ZWdlcgAAAAEAAAADa2V5BAAAAAN2YWwEAAAAByRtYXRjaDAJAAQaAAAAAgUAAAAEdGhpcwUAAAADa2V5AwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAWIFAAAAByRtYXRjaDAFAAAAAWIAAAAAAAAAAAAFAAAAA3ZhbAEAAAAMdHJ5R2V0U3RyaW5nAAAAAQAAAANrZXkEAAAAA3ZhbAQAAAAHJG1hdGNoMAkABB0AAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABlN0cmluZwQAAAABYgUAAAAHJG1hdGNoMAUAAAABYgIAAAAABQAAAAN2YWwBAAAAEGdldEFzc2V0R2Vub3R5cGUAAAABAAAAB2Fzc2V0SWQEAAAABWFzc2V0BAAAAAckbWF0Y2gwCQAEHQAAAAIJAQAAAAdBZGRyZXNzAAAAAQUAAAAQaW5jdWJhdG9yQWRkcmVzcwkAAlgAAAABBQAAAAdhc3NldElkAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAAZTdHJpbmcEAAAAAWIFAAAAByRtYXRjaDAFAAAAAWICAAAAAAUAAAAFYXNzZXQAAAAGAAAAAWkBAAAAC2luaXRBdWN0aW9uAAAAAwAAAApzdGFydFByaWNlAAAADGluc3RhbnRQcmljZQAAAAtkZXNjcmlwdGlvbgQAAAAJYXVjdGlvbklkCQACWAAAAAEIBQAAAAFpAAAADXRyYW5zYWN0aW9uSWQEAAAAA3BtdAkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAQAAAAHYXNzZXRJZAkBAAAABXZhbHVlAAAAAQgFAAAAA3BtdAAAAAdhc3NldElkBAAAAAVhc3NldAkBAAAAEGdldEFzc2V0R2Vub3R5cGUAAAABBQAAAAdhc3NldElkAwkAAAAAAAACBQAAAAVhc3NldAIAAAAACQAAAgAAAAECAAAAMllvdSBjYW4gb25seSBzZWxsIGFuIE5GVC1kdWNrIGNyZWF0ZWQgaW4gaW5jdWJhdG9yCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhhdWN0aW9uXwUAAAAJYXVjdGlvbklkAgAAAAdfc3RhdHVzAgAAAARvcGVuCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhhdWN0aW9uXwUAAAAJYXVjdGlvbklkAgAAAAlfYXNzZXRHZW4FAAAABWFzc2V0CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhhdWN0aW9uXwUAAAAJYXVjdGlvbklkAgAAAAhfYXNzZXRJZAkAAlgAAAABBQAAAAdhc3NldElkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIYXVjdGlvbl8FAAAACWF1Y3Rpb25JZAIAAAAKX3N0YXJ0ZWRBdAgFAAAACWxhc3RCbG9jawAAAAl0aW1lc3RhbXAJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAACGF1Y3Rpb25fBQAAAAlhdWN0aW9uSWQCAAAABl9vd25lcgkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAACGF1Y3Rpb25fBQAAAAlhdWN0aW9uSWQCAAAADF9kZXNjcmlwdGlvbgUAAAALZGVzY3JpcHRpb24JAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhhdWN0aW9uXwUAAAAJYXVjdGlvbklkAgAAAAtfc3RhcnRQcmljZQUAAAAKc3RhcnRQcmljZQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAACGF1Y3Rpb25fBQAAAAlhdWN0aW9uSWQCAAAADV9pbnN0YW50UHJpY2UFAAAADGluc3RhbnRQcmljZQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGFkZHJlc3NfCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgIAAAAJX2F1Y3Rpb25fBQAAAAlhdWN0aW9uSWQCAAAACl9sb2NrZWRORlQJAAJYAAAAAQUAAAAHYXNzZXRJZAUAAAADbmlsAAAAAWkBAAAADWNhbmNlbEF1Y3Rpb24AAAABAAAACWF1Y3Rpb25JZAQAAAAMYXVjdGlvbk93bmVyCQEAAAAMdHJ5R2V0U3RyaW5nAAAAAQkAASwAAAACCQABLAAAAAICAAAACGF1Y3Rpb25fBQAAAAlhdWN0aW9uSWQCAAAABl9vd25lcgMJAQAAAAIhPQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBQAAAAxhdWN0aW9uT3duZXIJAAACAAAAAQIAAAAdT25seSBhbGxvd2VkIHRvIGF1Y3Rpb24gb3duZXIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAACGF1Y3Rpb25fBQAAAAlhdWN0aW9uSWQCAAAAB19zdGF0dXMCAAAACWNhbmNlbGxlZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGFkZHJlc3NfBQAAAAxhdWN0aW9uT3duZXICAAAACV9hdWN0aW9uXwUAAAAJYXVjdGlvbklkAgAAAApfbG9ja2VkTkZUAgAAAAAJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyAAAAAAAAAAABCQACWQAAAAEJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMJAAEsAAAAAgkAASwAAAACAgAAAAhhdWN0aW9uXwUAAAAJYXVjdGlvbklkAgAAAAhfYXNzZXRJZAUAAAADbmlsAAAAAWkBAAAACmluc3RhbnRCdXkAAAABAAAACWF1Y3Rpb25JZAQAAAADcG10CQEAAAAFdmFsdWUAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAABAAAAAZhbW91bnQIBQAAAANwbXQAAAAGYW1vdW50BAAAAA1hdWN0aW9uU3RhdHVzCQEAAAAMdHJ5R2V0U3RyaW5nAAAAAQkAASwAAAACCQABLAAAAAICAAAACGF1Y3Rpb25fBQAAAAlhdWN0aW9uSWQCAAAAB19zdGF0dXMDCQEAAAACIT0AAAACCAUAAAADcG10AAAAB2Fzc2V0SWQFAAAABHVuaXQJAAACAAAAAQIAAAApQXVjdGlvbiBkb2VzIG9ubHkgc3VwcG9ydCBXQVZFUyBwYXltZW50cy4DCQEAAAACIT0AAAACBQAAAA1hdWN0aW9uU3RhdHVzAgAAAARvcGVuCQAAAgAAAAECAAAAKkF1Y3Rpb24gaXMgY2xvc2VkLiBZb3UgY2Fubm90IHBsYWNlIGEgYmlkLgQAAAAMaW5zdGFudFByaWNlCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAhhdWN0aW9uXwUAAAAJYXVjdGlvbklkAgAAAA1faW5zdGFudFByaWNlAwkAAGYAAAACBQAAAAxpbnN0YW50UHJpY2UFAAAABmFtb3VudAkAAAIAAAABCQABLAAAAAICAAAALkZvciBpbnN0YW50IHB1cmNoYXNlIHlvdSBuZWVkIHRvIHBheSBhdCBsZWFzdCAJAAGkAAAAAQUAAAAMaW5zdGFudFByaWNlBAAAAAxhdWN0aW9uT3duZXIJAQAAAAx0cnlHZXRTdHJpbmcAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAIYXVjdGlvbl8FAAAACWF1Y3Rpb25JZAIAAAAGX293bmVyCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhhdWN0aW9uXwUAAAAJYXVjdGlvbklkAgAAAAdfc3RhdHVzAgAAAAhmaW5pc2hlZAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAACGF1Y3Rpb25fBQAAAAlhdWN0aW9uSWQCAAAAC19maW5hbFByaWNlBQAAAAZhbW91bnQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAMYXVjdGlvbk93bmVyBQAAAAZhbW91bnQFAAAABHVuaXQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyAAAAAAAAAAABCQAEHAAAAAIFAAAABHRoaXMJAAEsAAAAAgkAASwAAAACAgAAAAhhdWN0aW9uXwUAAAAJYXVjdGlvbklkAgAAAAhfYXNzZXRJZAUAAAADbmlsAAAAAWkBAAAACHBsYWNlQmlkAAAAAQAAAAlhdWN0aW9uSWQEAAAAA3BtdAkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAQAAAAGYW1vdW50CAUAAAADcG10AAAABmFtb3VudAQAAAAFYmlkSWQJAAJYAAAAAQgFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAHYXNzZXRJZAUAAAAEdW5pdAkAAAIAAAABAgAAAChBdWN0aW9uIGRvZXMgb25seSBzdXBwb3J0IFdBVkVTIHBheW1lbnRzCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIYXVjdGlvbl8FAAAACWF1Y3Rpb25JZAIAAAAFX2JpZF8FAAAABWJpZElkAgAAAAdfYXV0aG9yCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhhdWN0aW9uXwUAAAAJYXVjdGlvbklkAgAAAAVfYmlkXwUAAAAFYmlkSWQCAAAAB19hbW91bnQFAAAABmFtb3VudAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGF1Y3Rpb25fBQAAAAlhdWN0aW9uSWQCAAAABV9iaWRfBQAAAAViaWRJZAIAAAAHX3N0YXR1cwIAAAAEb3BlbgUAAAADbmlsAAAAAWkBAAAACWNhbmNlbEJpZAAAAAIAAAAJYXVjdGlvbklkAAAABWJpZElkBAAAAANwbXQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAABmFtb3VudAgFAAAAA3BtdAAAAAZhbW91bnQEAAAACWJpZEF1dGhvcgkBAAAADHRyeUdldFN0cmluZwAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIYXVjdGlvbl8FAAAACWF1Y3Rpb25JZAIAAAAFX2JpZF8FAAAABWJpZElkAgAAAAdfYXV0aG9yBAAAAAliaWRBbW91bnQJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhhdWN0aW9uXwUAAAAJYXVjdGlvbklkAgAAAAVfYmlkXwUAAAAFYmlkSWQCAAAAB19hbW91bnQDCQEAAAACIT0AAAACCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAAJYmlkQXV0aG9yCQAAAgAAAAECAAAAHk9ubHkgYWxsb3dlZCB0byB0aGUgYmlkIGF1dGhvcgkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGF1Y3Rpb25fBQAAAAlhdWN0aW9uSWQCAAAABV9iaWRfBQAAAAViaWRJZAIAAAAHX3N0YXR1cwIAAAAJY2FuY2VsbGVkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAJYmlkQW1vdW50BQAAAAR1bml0BQAAAANuaWwAAAABaQEAAAAJYWNjZXB0QmlkAAAAAgAAAAlhdWN0aW9uSWQAAAAFYmlkSWQEAAAADGF1Y3Rpb25Pd25lcgkBAAAADHRyeUdldFN0cmluZwAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAhhdWN0aW9uXwUAAAAJYXVjdGlvbklkAgAAAAZfb3duZXIEAAAACWJpZEF1dGhvcgkBAAAADHRyeUdldFN0cmluZwAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIYXVjdGlvbl8FAAAACWF1Y3Rpb25JZAIAAAAFX2JpZF8FAAAABWJpZElkAgAAAAdfYXV0aG9yBAAAAAliaWRBbW91bnQJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhhdWN0aW9uXwUAAAAJYXVjdGlvbklkAgAAAAVfYmlkXwUAAAAFYmlkSWQCAAAAB19hbW91bnQEAAAACWJpZFN0YXR1cwkBAAAADHRyeUdldFN0cmluZwAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIYXVjdGlvbl8FAAAACWF1Y3Rpb25JZAIAAAAFX2JpZF8FAAAABWJpZElkAgAAAAdfc3RhdHVzBAAAAAdhc3NldElkCQEAAAAMdHJ5R2V0U3RyaW5nAAAAAQkAASwAAAACCQABLAAAAAICAAAACGF1Y3Rpb25fBQAAAAlhdWN0aW9uSWQCAAAACF9hc3NldElkAwkBAAAAAiE9AAAAAgkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIFAAAADGF1Y3Rpb25Pd25lcgkAAAIAAAABAgAAAB1Pbmx5IGFsbG93ZWQgdG8gYXVjdGlvbiBvd25lcgMJAQAAAAIhPQAAAAIFAAAACWJpZFN0YXR1cwIAAAAEb3BlbgkAAAIAAAABAgAAAChCaWQgd2FzIGNhbmNlbGxlZCBhbmQgY2Fubm90IGJlIGFjY2VwdGVkBAAAAAtyZWNvcmRQcmljZQkBAAAADXRyeUdldEludGVnZXIAAAABCQABLAAAAAIFAAAAB2Fzc2V0SWQCAAAADF9yZWNvcmRQcmljZQQAAAAObmV3UmVjb3JkUHJpY2UJAAGWAAAAAQkABEwAAAACBQAAAAtyZWNvcmRQcmljZQkABEwAAAACBQAAAAliaWRBbW91bnQFAAAAA25pbAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIYXVjdGlvbl8FAAAACWF1Y3Rpb25JZAIAAAAHX3N0YXR1cwIAAAAIZmluaXNoZWQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhhdWN0aW9uXwUAAAAJYXVjdGlvbklkAgAAAAtfZmluYWxQcmljZQUAAAAJYmlkQW1vdW50CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQABLAAAAAIFAAAAB2Fzc2V0SWQCAAAADF9yZWNvcmRQcmljZQUAAAAObmV3UmVjb3JkUHJpY2UJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhhZGRyZXNzXwUAAAAMYXVjdGlvbk93bmVyAgAAAAlfYXVjdGlvbl8FAAAACWF1Y3Rpb25JZAIAAAAKX2xvY2tlZE5GVAIAAAAACQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgUAAAAJYmlkQW1vdW50BQAAAAR1bml0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAACWJpZEF1dGhvcgAAAAAAAAAAAQkAAlkAAAABBQAAAAdhc3NldElkBQAAAANuaWwAAAABAAAAAnR4AQAAAAZ2ZXJpZnkAAAAACQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAgFAAAAAnR4AAAAD3NlbmRlclB1YmxpY0tleZqn0A8=", "height": 2579014, "applicationStatus": "succeeded", "spentComplexity": 0 } View: original | compacted Prev: 8zbYk3wntUwswUxMBA7c7287BCRF7Zdevh4WmhRMYPsn Next: 9bk4axpSu3huzmhisSEoAhXcgobZHij8Dc9HxCVKJDaj Diff:
OldNewDifferences
11 {-# STDLIB_VERSION 4 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let delayForHatching = 0
5-
6-let HatchingStarted = "BREEDING_STARTED"
7-
8-let HatchingFinished = "BREEDING_FINISHED"
9-
104 let incubatorAddress = base58'3PACKMArmh4BAEawStYmpcU62aiNTBJKvNh'
11-
12-let generations = ["G", "H", "I", "K", "L"]
13-
14-func getProcessStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
15-
16-
17-func getProcessFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
18-
19-
20-func getDuckParentKey (txId,parentNum) = ((("inittx_" + toBase58String(txId)) + "_parent") + toString(parentNum))
21-
22-
23-func getDuckIdKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_di")
24-
25-
26-func getDuckStatsKey (genString) = (("stats_" + genString) + "_amount")
27-
285
296 func tryGetInteger (key) = {
307 let val = match getInteger(this, key) {
4825 }
4926
5027
51-func getRandomNumber (variants,txId,hatchingFinishHeight,offset) = {
52- let randomSeedBlock = value(blockInfoByHeight(hatchingFinishHeight))
53- (toInt((txId + value(randomSeedBlock.vrf)), offset) % variants)
28+func getAssetGenotype (assetId) = {
29+ let asset = match getString(Address(incubatorAddress), toBase58String(assetId)) {
30+ case b: String =>
31+ b
32+ case _ =>
33+ ""
5434 }
55-
56-
57-func getRandomGen (gen1,gen2,step,txId,hatchingFinishHeight) = {
58- let randomNum = getRandomNumber(2, txId, hatchingFinishHeight, step)
59- let gen = if ((randomNum == 0))
60- then gen1
61- else gen2
62- gen
63- }
64-
65-
66-func generateDuck (txId,hatchingFinishHeight) = {
67- let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 30)
68- let color = if ((colorRandom == 0))
69- then "Y"
70- else if ((colorRandom == 1))
71- then "G"
72- else if ((colorRandom == 2))
73- then "B"
74- else "R"
75- let parent1Id = fromBase58String(tryGetString(getDuckParentKey(txId, 1)))
76- let parent2Id = fromBase58String(tryGetString(getDuckParentKey(txId, 2)))
77- let parent1Gen = split(value(assetInfo(parent1Id)).name, "")
78- let parent2Gen = split(value(assetInfo(parent2Id)).name, "")
79- let gen = (((((((((("DUCK-" + getRandomGen(parent1Gen[5], parent2Gen[5], 0, txId, hatchingFinishHeight)) + getRandomGen(parent1Gen[6], parent2Gen[6], 1, txId, hatchingFinishHeight)) + getRandomGen(parent1Gen[7], parent2Gen[7], 2, txId, hatchingFinishHeight)) + getRandomGen(parent1Gen[8], parent2Gen[8], 3, txId, hatchingFinishHeight)) + getRandomGen(parent1Gen[9], parent2Gen[9], 4, txId, hatchingFinishHeight)) + getRandomGen(parent1Gen[10], parent2Gen[10], 5, txId, hatchingFinishHeight)) + getRandomGen(parent1Gen[11], parent2Gen[12], 6, txId, hatchingFinishHeight)) + getRandomGen(parent1Gen[12], parent2Gen[12], 7, txId, hatchingFinishHeight)) + "-J") + color)
80- gen
81- }
82-
83-
84-func checkAssetInIncubator (assetId) = {
85- let result = match getString(Address(incubatorAddress), toBase58String(assetId)) {
86- case b: String =>
87- true
88- case _ =>
89- false
90- }
91- let result2 = match getString(this, toBase58String(assetId)) {
92- case c: String =>
93- true
94- case _ =>
95- false
96- }
97- if (result)
98- then true
99- else result2
35+ asset
10036 }
10137
10238
10339 @Callable(i)
104-func startDuckBreeding () = {
105- let firstAssetId = value(value(i.payments[0]).assetId)
106- let secondAssetId = value(value(i.payments[1]).assetId)
107- if (!(if (checkAssetInIncubator(firstAssetId))
108- then checkAssetInIncubator(secondAssetId)
109- else false))
110- then throw("You need to attach 2 NFT-ducks.")
111- else [StringEntry(getDuckParentKey(i.transactionId, 1), toBase58String(firstAssetId)), StringEntry(getDuckParentKey(i.transactionId, 2), toBase58String(secondAssetId)), StringEntry(getProcessStatusKey(toString(i.caller), i.transactionId), HatchingStarted), IntegerEntry(getProcessFinishHeightKey(toString(i.caller), i.transactionId), (height + delayForHatching))]
40+func initAuction (startPrice,instantPrice,description) = {
41+ let auctionId = toBase58String(i.transactionId)
42+ let pmt = value(i.payments[0])
43+ let assetId = value(pmt.assetId)
44+ let asset = getAssetGenotype(assetId)
45+ if ((asset == ""))
46+ then throw("You can only sell an NFT-duck created in incubator")
47+ else [StringEntry((("auction_" + auctionId) + "_status"), "open"), StringEntry((("auction_" + auctionId) + "_assetGen"), asset), StringEntry((("auction_" + auctionId) + "_assetId"), toBase58String(assetId)), IntegerEntry((("auction_" + auctionId) + "_startedAt"), lastBlock.timestamp), StringEntry((("auction_" + auctionId) + "_owner"), toString(i.caller)), StringEntry((("auction_" + auctionId) + "_description"), description), IntegerEntry((("auction_" + auctionId) + "_startPrice"), startPrice), IntegerEntry((("auction_" + auctionId) + "_instantPrice"), instantPrice), StringEntry((((("address_" + toString(i.caller)) + "_auction_") + auctionId) + "_lockedNFT"), toBase58String(assetId))]
11248 }
11349
11450
11551
11652 @Callable(i)
117-func finishDuckHatching (txIdStr) = {
118- let txId = fromBase58String(txIdStr)
119- let processStatusKey = getProcessStatusKey(toString(i.caller), txId)
120- let finishHeightKey = getProcessFinishHeightKey(toString(i.caller), txId)
121- let duckIdKey = getDuckIdKey(toString(i.caller), txId)
122- let processTxStatus = getStringValue(this, processStatusKey)
123- let processFinishHeight = getIntegerValue(this, finishHeightKey)
124- if ((processTxStatus == HatchingFinished))
125- then {
126- let duckId = getStringValue(this, getDuckIdKey(toString(i.caller), txId))
127- throw(("The duck was breeded and claimed already, here is the folowing: " + duckId))
128- }
129- else if ((processFinishHeight > height))
130- then throw((((("Breeding is not finished yet " + toString((processFinishHeight - height))) + " blocks remaining, it will take around ") + toString((processFinishHeight - height))) + " minutes"))
53+func cancelAuction (auctionId) = {
54+ let auctionOwner = tryGetString((("auction_" + auctionId) + "_owner"))
55+ if ((toString(i.caller) != auctionOwner))
56+ then throw("Only allowed to auction owner")
57+ else [StringEntry((("auction_" + auctionId) + "_status"), "cancelled"), StringEntry((((("address_" + auctionOwner) + "_auction_") + auctionId) + "_lockedNFT"), ""), ScriptTransfer(i.caller, 1, fromBase58String(getStringValue(this, (("auction_" + auctionId) + "_assetId"))))]
58+ }
59+
60+
61+
62+@Callable(i)
63+func instantBuy (auctionId) = {
64+ let pmt = value(i.payments[0])
65+ let amount = pmt.amount
66+ let auctionStatus = tryGetString((("auction_" + auctionId) + "_status"))
67+ if ((pmt.assetId != unit))
68+ then throw("Auction does only support WAVES payments.")
69+ else if ((auctionStatus != "open"))
70+ then throw("Auction is closed. You cannot place a bid.")
13171 else {
132- let duckGen = generateDuck(txId, processFinishHeight)
133- let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
134- let asset = Issue(duckGen, description, 1, 0, false, unit, processFinishHeight)
135- let assetId = calculateAssetId(asset)
136- let amount = (tryGetInteger(getDuckStatsKey(duckGen)) + 1)
137- let parent1Id = fromBase58String(tryGetString(getDuckParentKey(txId, 1)))
138- let parent2Id = fromBase58String(tryGetString(getDuckParentKey(txId, 2)))
139-[StringEntry(processStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), amount), asset, ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(i.caller, 1, parent1Id), ScriptTransfer(i.caller, 1, parent2Id)]
72+ let instantPrice = tryGetInteger((("auction_" + auctionId) + "_instantPrice"))
73+ if ((instantPrice > amount))
74+ then throw(("For instant purchase you need to pay at least " + toString(instantPrice)))
75+ else {
76+ let auctionOwner = tryGetString((("auction_" + auctionId) + "_owner"))
77+[StringEntry((("auction_" + auctionId) + "_status"), "finished"), IntegerEntry((("auction_" + auctionId) + "_finalPrice"), amount), ScriptTransfer(addressFromStringValue(auctionOwner), amount, unit), ScriptTransfer(i.caller, 1, getBinary(this, (("auction_" + auctionId) + "_assetId")))]
78+ }
79+ }
80+ }
81+
82+
83+
84+@Callable(i)
85+func placeBid (auctionId) = {
86+ let pmt = value(i.payments[0])
87+ let amount = pmt.amount
88+ let bidId = toBase58String(i.transactionId)
89+ if ((pmt.assetId != unit))
90+ then throw("Auction does only support WAVES payments")
91+ else [StringEntry((((("auction_" + auctionId) + "_bid_") + bidId) + "_author"), toString(i.caller)), IntegerEntry((((("auction_" + auctionId) + "_bid_") + bidId) + "_amount"), amount), StringEntry((((("auction_" + auctionId) + "_bid_") + bidId) + "_status"), "open")]
92+ }
93+
94+
95+
96+@Callable(i)
97+func cancelBid (auctionId,bidId) = {
98+ let pmt = value(i.payments[0])
99+ let amount = pmt.amount
100+ let bidAuthor = tryGetString((((("auction_" + auctionId) + "_bid_") + bidId) + "_author"))
101+ let bidAmount = tryGetInteger((((("auction_" + auctionId) + "_bid_") + bidId) + "_amount"))
102+ if ((toString(i.caller) != bidAuthor))
103+ then throw("Only allowed to the bid author")
104+ else [StringEntry((((("auction_" + auctionId) + "_bid_") + bidId) + "_status"), "cancelled"), ScriptTransfer(i.caller, bidAmount, unit)]
105+ }
106+
107+
108+
109+@Callable(i)
110+func acceptBid (auctionId,bidId) = {
111+ let auctionOwner = tryGetString((("auction_" + auctionId) + "_owner"))
112+ let bidAuthor = tryGetString((((("auction_" + auctionId) + "_bid_") + bidId) + "_author"))
113+ let bidAmount = tryGetInteger((((("auction_" + auctionId) + "_bid_") + bidId) + "_amount"))
114+ let bidStatus = tryGetString((((("auction_" + auctionId) + "_bid_") + bidId) + "_status"))
115+ let assetId = tryGetString((("auction_" + auctionId) + "_assetId"))
116+ if ((toString(i.caller) != auctionOwner))
117+ then throw("Only allowed to auction owner")
118+ else if ((bidStatus != "open"))
119+ then throw("Bid was cancelled and cannot be accepted")
120+ else {
121+ let recordPrice = tryGetInteger((assetId + "_recordPrice"))
122+ let newRecordPrice = max([recordPrice, bidAmount])
123+[StringEntry((("auction_" + auctionId) + "_status"), "finished"), IntegerEntry((("auction_" + auctionId) + "_finalPrice"), bidAmount), IntegerEntry((assetId + "_recordPrice"), newRecordPrice), StringEntry((((("address_" + auctionOwner) + "_auction_") + auctionId) + "_lockedNFT"), ""), ScriptTransfer(i.caller, bidAmount, unit), ScriptTransfer(addressFromStringValue(bidAuthor), 1, fromBase58String(assetId))]
140124 }
141125 }
142126
Full:
OldNewDifferences
11 {-# STDLIB_VERSION 4 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-let delayForHatching = 0
5-
6-let HatchingStarted = "BREEDING_STARTED"
7-
8-let HatchingFinished = "BREEDING_FINISHED"
9-
104 let incubatorAddress = base58'3PACKMArmh4BAEawStYmpcU62aiNTBJKvNh'
11-
12-let generations = ["G", "H", "I", "K", "L"]
13-
14-func getProcessStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
15-
16-
17-func getProcessFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
18-
19-
20-func getDuckParentKey (txId,parentNum) = ((("inittx_" + toBase58String(txId)) + "_parent") + toString(parentNum))
21-
22-
23-func getDuckIdKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_di")
24-
25-
26-func getDuckStatsKey (genString) = (("stats_" + genString) + "_amount")
27-
285
296 func tryGetInteger (key) = {
307 let val = match getInteger(this, key) {
318 case b: Int =>
329 b
3310 case _ =>
3411 0
3512 }
3613 val
3714 }
3815
3916
4017 func tryGetString (key) = {
4118 let val = match getString(this, key) {
4219 case b: String =>
4320 b
4421 case _ =>
4522 ""
4623 }
4724 val
4825 }
4926
5027
51-func getRandomNumber (variants,txId,hatchingFinishHeight,offset) = {
52- let randomSeedBlock = value(blockInfoByHeight(hatchingFinishHeight))
53- (toInt((txId + value(randomSeedBlock.vrf)), offset) % variants)
28+func getAssetGenotype (assetId) = {
29+ let asset = match getString(Address(incubatorAddress), toBase58String(assetId)) {
30+ case b: String =>
31+ b
32+ case _ =>
33+ ""
5434 }
55-
56-
57-func getRandomGen (gen1,gen2,step,txId,hatchingFinishHeight) = {
58- let randomNum = getRandomNumber(2, txId, hatchingFinishHeight, step)
59- let gen = if ((randomNum == 0))
60- then gen1
61- else gen2
62- gen
63- }
64-
65-
66-func generateDuck (txId,hatchingFinishHeight) = {
67- let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 30)
68- let color = if ((colorRandom == 0))
69- then "Y"
70- else if ((colorRandom == 1))
71- then "G"
72- else if ((colorRandom == 2))
73- then "B"
74- else "R"
75- let parent1Id = fromBase58String(tryGetString(getDuckParentKey(txId, 1)))
76- let parent2Id = fromBase58String(tryGetString(getDuckParentKey(txId, 2)))
77- let parent1Gen = split(value(assetInfo(parent1Id)).name, "")
78- let parent2Gen = split(value(assetInfo(parent2Id)).name, "")
79- let gen = (((((((((("DUCK-" + getRandomGen(parent1Gen[5], parent2Gen[5], 0, txId, hatchingFinishHeight)) + getRandomGen(parent1Gen[6], parent2Gen[6], 1, txId, hatchingFinishHeight)) + getRandomGen(parent1Gen[7], parent2Gen[7], 2, txId, hatchingFinishHeight)) + getRandomGen(parent1Gen[8], parent2Gen[8], 3, txId, hatchingFinishHeight)) + getRandomGen(parent1Gen[9], parent2Gen[9], 4, txId, hatchingFinishHeight)) + getRandomGen(parent1Gen[10], parent2Gen[10], 5, txId, hatchingFinishHeight)) + getRandomGen(parent1Gen[11], parent2Gen[12], 6, txId, hatchingFinishHeight)) + getRandomGen(parent1Gen[12], parent2Gen[12], 7, txId, hatchingFinishHeight)) + "-J") + color)
80- gen
81- }
82-
83-
84-func checkAssetInIncubator (assetId) = {
85- let result = match getString(Address(incubatorAddress), toBase58String(assetId)) {
86- case b: String =>
87- true
88- case _ =>
89- false
90- }
91- let result2 = match getString(this, toBase58String(assetId)) {
92- case c: String =>
93- true
94- case _ =>
95- false
96- }
97- if (result)
98- then true
99- else result2
35+ asset
10036 }
10137
10238
10339 @Callable(i)
104-func startDuckBreeding () = {
105- let firstAssetId = value(value(i.payments[0]).assetId)
106- let secondAssetId = value(value(i.payments[1]).assetId)
107- if (!(if (checkAssetInIncubator(firstAssetId))
108- then checkAssetInIncubator(secondAssetId)
109- else false))
110- then throw("You need to attach 2 NFT-ducks.")
111- else [StringEntry(getDuckParentKey(i.transactionId, 1), toBase58String(firstAssetId)), StringEntry(getDuckParentKey(i.transactionId, 2), toBase58String(secondAssetId)), StringEntry(getProcessStatusKey(toString(i.caller), i.transactionId), HatchingStarted), IntegerEntry(getProcessFinishHeightKey(toString(i.caller), i.transactionId), (height + delayForHatching))]
40+func initAuction (startPrice,instantPrice,description) = {
41+ let auctionId = toBase58String(i.transactionId)
42+ let pmt = value(i.payments[0])
43+ let assetId = value(pmt.assetId)
44+ let asset = getAssetGenotype(assetId)
45+ if ((asset == ""))
46+ then throw("You can only sell an NFT-duck created in incubator")
47+ else [StringEntry((("auction_" + auctionId) + "_status"), "open"), StringEntry((("auction_" + auctionId) + "_assetGen"), asset), StringEntry((("auction_" + auctionId) + "_assetId"), toBase58String(assetId)), IntegerEntry((("auction_" + auctionId) + "_startedAt"), lastBlock.timestamp), StringEntry((("auction_" + auctionId) + "_owner"), toString(i.caller)), StringEntry((("auction_" + auctionId) + "_description"), description), IntegerEntry((("auction_" + auctionId) + "_startPrice"), startPrice), IntegerEntry((("auction_" + auctionId) + "_instantPrice"), instantPrice), StringEntry((((("address_" + toString(i.caller)) + "_auction_") + auctionId) + "_lockedNFT"), toBase58String(assetId))]
11248 }
11349
11450
11551
11652 @Callable(i)
117-func finishDuckHatching (txIdStr) = {
118- let txId = fromBase58String(txIdStr)
119- let processStatusKey = getProcessStatusKey(toString(i.caller), txId)
120- let finishHeightKey = getProcessFinishHeightKey(toString(i.caller), txId)
121- let duckIdKey = getDuckIdKey(toString(i.caller), txId)
122- let processTxStatus = getStringValue(this, processStatusKey)
123- let processFinishHeight = getIntegerValue(this, finishHeightKey)
124- if ((processTxStatus == HatchingFinished))
125- then {
126- let duckId = getStringValue(this, getDuckIdKey(toString(i.caller), txId))
127- throw(("The duck was breeded and claimed already, here is the folowing: " + duckId))
128- }
129- else if ((processFinishHeight > height))
130- then throw((((("Breeding is not finished yet " + toString((processFinishHeight - height))) + " blocks remaining, it will take around ") + toString((processFinishHeight - height))) + " minutes"))
53+func cancelAuction (auctionId) = {
54+ let auctionOwner = tryGetString((("auction_" + auctionId) + "_owner"))
55+ if ((toString(i.caller) != auctionOwner))
56+ then throw("Only allowed to auction owner")
57+ else [StringEntry((("auction_" + auctionId) + "_status"), "cancelled"), StringEntry((((("address_" + auctionOwner) + "_auction_") + auctionId) + "_lockedNFT"), ""), ScriptTransfer(i.caller, 1, fromBase58String(getStringValue(this, (("auction_" + auctionId) + "_assetId"))))]
58+ }
59+
60+
61+
62+@Callable(i)
63+func instantBuy (auctionId) = {
64+ let pmt = value(i.payments[0])
65+ let amount = pmt.amount
66+ let auctionStatus = tryGetString((("auction_" + auctionId) + "_status"))
67+ if ((pmt.assetId != unit))
68+ then throw("Auction does only support WAVES payments.")
69+ else if ((auctionStatus != "open"))
70+ then throw("Auction is closed. You cannot place a bid.")
13171 else {
132- let duckGen = generateDuck(txId, processFinishHeight)
133- let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
134- let asset = Issue(duckGen, description, 1, 0, false, unit, processFinishHeight)
135- let assetId = calculateAssetId(asset)
136- let amount = (tryGetInteger(getDuckStatsKey(duckGen)) + 1)
137- let parent1Id = fromBase58String(tryGetString(getDuckParentKey(txId, 1)))
138- let parent2Id = fromBase58String(tryGetString(getDuckParentKey(txId, 2)))
139-[StringEntry(processStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), amount), asset, ScriptTransfer(i.caller, 1, assetId), ScriptTransfer(i.caller, 1, parent1Id), ScriptTransfer(i.caller, 1, parent2Id)]
72+ let instantPrice = tryGetInteger((("auction_" + auctionId) + "_instantPrice"))
73+ if ((instantPrice > amount))
74+ then throw(("For instant purchase you need to pay at least " + toString(instantPrice)))
75+ else {
76+ let auctionOwner = tryGetString((("auction_" + auctionId) + "_owner"))
77+[StringEntry((("auction_" + auctionId) + "_status"), "finished"), IntegerEntry((("auction_" + auctionId) + "_finalPrice"), amount), ScriptTransfer(addressFromStringValue(auctionOwner), amount, unit), ScriptTransfer(i.caller, 1, getBinary(this, (("auction_" + auctionId) + "_assetId")))]
78+ }
79+ }
80+ }
81+
82+
83+
84+@Callable(i)
85+func placeBid (auctionId) = {
86+ let pmt = value(i.payments[0])
87+ let amount = pmt.amount
88+ let bidId = toBase58String(i.transactionId)
89+ if ((pmt.assetId != unit))
90+ then throw("Auction does only support WAVES payments")
91+ else [StringEntry((((("auction_" + auctionId) + "_bid_") + bidId) + "_author"), toString(i.caller)), IntegerEntry((((("auction_" + auctionId) + "_bid_") + bidId) + "_amount"), amount), StringEntry((((("auction_" + auctionId) + "_bid_") + bidId) + "_status"), "open")]
92+ }
93+
94+
95+
96+@Callable(i)
97+func cancelBid (auctionId,bidId) = {
98+ let pmt = value(i.payments[0])
99+ let amount = pmt.amount
100+ let bidAuthor = tryGetString((((("auction_" + auctionId) + "_bid_") + bidId) + "_author"))
101+ let bidAmount = tryGetInteger((((("auction_" + auctionId) + "_bid_") + bidId) + "_amount"))
102+ if ((toString(i.caller) != bidAuthor))
103+ then throw("Only allowed to the bid author")
104+ else [StringEntry((((("auction_" + auctionId) + "_bid_") + bidId) + "_status"), "cancelled"), ScriptTransfer(i.caller, bidAmount, unit)]
105+ }
106+
107+
108+
109+@Callable(i)
110+func acceptBid (auctionId,bidId) = {
111+ let auctionOwner = tryGetString((("auction_" + auctionId) + "_owner"))
112+ let bidAuthor = tryGetString((((("auction_" + auctionId) + "_bid_") + bidId) + "_author"))
113+ let bidAmount = tryGetInteger((((("auction_" + auctionId) + "_bid_") + bidId) + "_amount"))
114+ let bidStatus = tryGetString((((("auction_" + auctionId) + "_bid_") + bidId) + "_status"))
115+ let assetId = tryGetString((("auction_" + auctionId) + "_assetId"))
116+ if ((toString(i.caller) != auctionOwner))
117+ then throw("Only allowed to auction owner")
118+ else if ((bidStatus != "open"))
119+ then throw("Bid was cancelled and cannot be accepted")
120+ else {
121+ let recordPrice = tryGetInteger((assetId + "_recordPrice"))
122+ let newRecordPrice = max([recordPrice, bidAmount])
123+[StringEntry((("auction_" + auctionId) + "_status"), "finished"), IntegerEntry((("auction_" + auctionId) + "_finalPrice"), bidAmount), IntegerEntry((assetId + "_recordPrice"), newRecordPrice), StringEntry((((("address_" + auctionOwner) + "_auction_") + auctionId) + "_lockedNFT"), ""), ScriptTransfer(i.caller, bidAmount, unit), ScriptTransfer(addressFromStringValue(bidAuthor), 1, fromBase58String(assetId))]
140124 }
141125 }
142126
143127
144128 @Verifier(tx)
145129 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
146130

github/deemru/w8io/3ef1775 
45.86 ms