w8 · tx · Fdb···D4a

tx · FdbLj3hTTWzUErB2gmyGjZhYHMe7D8iLhXr2cdSQCD4a

3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv:  -0.01400000 Waves

2021.06.17 12:39 [2638937] smart account 3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "FdbLj3hTTWzUErB2gmyGjZhYHMe7D8iLhXr2cdSQCD4a",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1623922802418,
    "version": 2,
    "chainId": 87,
    "sender": "3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv",
    "senderPublicKey": "EBHsV7TQYm4qS2V7iZXEXwcbUdEYQyCSLEdY2AMvLPns",
    "proofs": [
        "2rz5SjK8tHeLmsuTnbb5pabg4Q5w5LFV1bY2tYnr81zJ7jHx9UGFG5CBPHrSxbGZz4REGuga2f3jmksHoarX7j32"
    ],
    "script": "base64:AAIEAAAAAAAAAAkIAhIAEgMKAQgAAAAPAAAAAAtlZ2dzQXNzZXRJZAEAAAAg/3lHUFRQ2H0cVfQRQOylRzGkGFxs14FX0INpTMC9l/AAAAAAEGRlbGF5Rm9ySGF0Y2hpbmcAAAAAAAAAAAIAAAAAE2Rpc2NvdW50Q29lZmZpY2llbnQAAAAAAAAAAAoAAAAAC3R5cGVzQW1vdW50AAAAAAAAAAAFAAAAAA9IYXRjaGluZ1N0YXJ0ZWQCAAAAEEhBVENISU5HX1NUQVJURUQAAAAAEEhhdGNoaW5nRmluaXNoZWQCAAAAEUhBVENISU5HX0ZJTklTSEVEAQAAABRnZXRIYXRjaGluZ1N0YXR1c0tleQAAAAIAAAAHYWRkcmVzcwAAAAR0eElkCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAdhZGRyZXNzAgAAAAFfCQACWAAAAAEFAAAABHR4SWQCAAAAB19zdGF0dXMBAAAAGmdldEhhdGNoaW5nRmluaXNoSGVpZ2h0S2V5AAAAAgAAAAdhZGRyZXNzAAAABHR4SWQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAAB2FkZHJlc3MCAAAAAV8JAAJYAAAAAQUAAAAEdHhJZAIAAAADX2ZoAQAAAAxnZXREdWNrSWRLZXkAAAACAAAAB2FkZHJlc3MAAAAEdHhJZAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAHYWRkcmVzcwIAAAABXwkAAlgAAAABBQAAAAR0eElkAgAAAANfZGkBAAAAD2dldER1Y2tTdGF0c0tleQAAAAEAAAAJZ2VuU3RyaW5nCQABLAAAAAIJAAEsAAAAAgIAAAAGc3RhdHNfBQAAAAlnZW5TdHJpbmcCAAAAB19hbW91bnQBAAAADXRyeUdldEludGVnZXIAAAABAAAAA2tleQQAAAADdmFsBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFiBQAAAAckbWF0Y2gwBQAAAAFiAAAAAAAAAAAABQAAAAN2YWwBAAAAD2dldFJhbmRvbU51bWJlcgAAAAQAAAAIdmFyaWFudHMAAAAEdHhJZAAAABRoYXRjaGluZ0ZpbmlzaEhlaWdodAAAAAZvZmZzZXQEAAAAD3JhbmRvbVNlZWRCbG9jawkBAAAABXZhbHVlAAAAAQkAA+0AAAABCQAAZQAAAAIFAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0AAAAAAAAAAABBAAAAApyYW5kb21IYXNoCQAB9wAAAAEJAADLAAAAAgUAAAAEdHhJZAkBAAAABXZhbHVlAAAAAQgFAAAAD3JhbmRvbVNlZWRCbG9jawAAAAN2cmYJAABqAAAAAgkABLIAAAACBQAAAApyYW5kb21IYXNoCQAAaAAAAAIFAAAABm9mZnNldAAAAAAAAAAACAUAAAAIdmFyaWFudHMBAAAADXdhc1VuaXF1ZUJvcm4AAAABAAAAA2dlbgkBAAAADXRyeUdldEludGVnZXIAAAABCQEAAAAPZ2V0RHVja1N0YXRzS2V5AAAAAQUAAAADZ2VuAQAAAA1nZXRSYW5kb21OYW1lAAAAAgAAAAR0eElkAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0BAAAAA1qYWNrcG90UmFuZG9tCQEAAAAPZ2V0UmFuZG9tTnVtYmVyAAAABAAAAAAAAAAB9AUAAAAEdHhJZAUAAAAUaGF0Y2hpbmdGaW5pc2hIZWlnaHQAAAAAAAAAAAADAwkAAAAAAAACBQAAAA1qYWNrcG90UmFuZG9tAAAAAAAAAAABCQAAAAAAAAIJAQAAAA13YXNVbmlxdWVCb3JuAAAAAQIAAAAQRFVDSy1XV1dXV1dXVy1KVQAAAAAAAAAAAAcJAAUUAAAAAgIAAAAQRFVDSy1XV1dXV1dXVy1KVQIAAAAEOFctSgQAAAAKdHlwZVJhbmRvbQkBAAAAD2dldFJhbmRvbU51bWJlcgAAAAQFAAAAC3R5cGVzQW1vdW50BQAAAAR0eElkBQAAABRoYXRjaGluZ0ZpbmlzaEhlaWdodAAAAAAAAAAAAAQAAAALY29sb3JSYW5kb20JAQAAAA9nZXRSYW5kb21OdW1iZXIAAAAEAAAAAAAAAAAEBQAAAAR0eElkBQAAABRoYXRjaGluZ0ZpbmlzaEhlaWdodAAAAAAAAAAAAQQAAAAFY29sb3IDCQAAAAAAAAIFAAAAC2NvbG9yUmFuZG9tAAAAAAAAAAAAAgAAAAFZAwkAAAAAAAACBQAAAAtjb2xvclJhbmRvbQAAAAAAAAAAAQIAAAABRwMJAAAAAAAAAgUAAAALY29sb3JSYW5kb20AAAAAAAAAAAICAAAAAUICAAAAAVIDCQAAAAAAAAIFAAAACnR5cGVSYW5kb20AAAAAAAAAAAAJAAUUAAAAAgkAASwAAAACAgAAAA9EVUNLLUVFRUVFRUVFLUcFAAAABWNvbG9yAgAAAAQ4RS1HAwkAAAAAAAACBQAAAAp0eXBlUmFuZG9tAAAAAAAAAAABCQAFFAAAAAIJAAEsAAAAAgIAAAAPRFVDSy1CQkJCQkJCQi1HBQAAAAVjb2xvcgIAAAAEOEItRwMJAAAAAAAAAgUAAAAKdHlwZVJhbmRvbQAAAAAAAAAAAgkABRQAAAACCQABLAAAAAICAAAAD0RVQ0stQ0NDQ0NDQ0MtRwUAAAAFY29sb3ICAAAABDhDLUcDCQAAAAAAAAIFAAAACnR5cGVSYW5kb20AAAAAAAAAAAMJAAUUAAAAAgkAASwAAAACAgAAAA9EVUNLLURERERERERELUcFAAAABWNvbG9yAgAAAAQ4RC1HCQAFFAAAAAIJAAEsAAAAAgIAAAAPRFVDSy1BQUFBQUFBQS1HBQAAAAVjb2xvcgIAAAAEOEEtRwEAAAAVY291bnRFZ2dzTmVlZGVkQW1vdW50AAAAAQAAABB0b3RhbER1Y2tzQW1vdW50BAAAAAFuBQAAABB0b3RhbER1Y2tzQW1vdW50BAAAAAFnBQAAABNkaXNjb3VudENvZWZmaWNpZW50BAAAAAF0BQAAAAt0eXBlc0Ftb3VudAQAAAAFcHJpY2UJAABsAAAABgkAAGQAAAACAAAAAAAAAABkCQAAaQAAAAIJAABoAAAAAgUAAAABbgUAAAABZwkAAGgAAAACAAAAAAAAAAAKBQAAAAF0AAAAAAAAAAACAAAAAAAAAAAFAAAAAAAAAAABAAAAAAAAAAACBQAAAARET1dOBQAAAAVwcmljZQAAAAIAAAABaQEAAAARc3RhcnREdWNrSGF0Y2hpbmcAAAAABAAAABB0b3RhbER1Y2tzQW1vdW50CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAECAAAADGR1Y2tzX2Ftb3VudAQAAAAKZWdnc05lZWRlZAkBAAAAFWNvdW50RWdnc05lZWRlZEFtb3VudAAAAAEFAAAAEHRvdGFsRHVja3NBbW91bnQEAAAADGZpcnN0UGF5bWVudAkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAMJAQAAAAIhPQAAAAIIBQAAAAxmaXJzdFBheW1lbnQAAAAHYXNzZXRJZAUAAAALZWdnc0Fzc2V0SWQJAAACAAAAAQkAASwAAAACAgAAADxZb3UgY2FuIGF0dGFjaCBvbmx5IEVHRyB0b2tlbnMgd2l0aCB0aGUgZm9sbG93aW5nIGFzc2V0IGlkOiAJAAJYAAAAAQUAAAALZWdnc0Fzc2V0SWQDCQAAZgAAAAIFAAAACmVnZ3NOZWVkZWQIBQAAAAxmaXJzdFBheW1lbnQAAAAGYW1vdW50CQAAAgAAAAEJAAEsAAAAAgIAAABEVG8gaGF0Y2ggYSBkdWNrIHlvdSBjdXJyZW50bHkgbmVlZCB0aGUgZm9sbG93aW5nIGFtb3VudCBvZiBFR0dsZXRzOiAJAAGkAAAAAQUAAAAKZWdnc05lZWRlZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQEAAAAUZ2V0SGF0Y2hpbmdTdGF0dXNLZXkAAAACCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcggFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAUAAAAPSGF0Y2hpbmdTdGFydGVkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAAaZ2V0SGF0Y2hpbmdGaW5pc2hIZWlnaHRLZXkAAAACCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcggFAAAAAWkAAAANdHJhbnNhY3Rpb25JZAkAAGQAAAACBQAAAAZoZWlnaHQFAAAAEGRlbGF5Rm9ySGF0Y2hpbmcJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAADGR1Y2tzX2Ftb3VudAkAAGQAAAACBQAAABB0b3RhbER1Y2tzQW1vdW50AAAAAAAAAAABCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABBkdWNrc19sYXN0X3ByaWNlBQAAAAplZ2dzTmVlZGVkCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgkAAGUAAAACCAUAAAAMZmlyc3RQYXltZW50AAAABmFtb3VudAUAAAAKZWdnc05lZWRlZAUAAAALZWdnc0Fzc2V0SWQFAAAAA25pbAAAAAFpAQAAABJmaW5pc2hEdWNrSGF0Y2hpbmcAAAABAAAAB3R4SWRTdHIEAAAABHR4SWQJAAJZAAAAAQUAAAAHdHhJZFN0cgQAAAARaGF0Y2hpbmdTdGF0dXNLZXkJAQAAABRnZXRIYXRjaGluZ1N0YXR1c0tleQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBQAAAAR0eElkBAAAAA9maW5pc2hIZWlnaHRLZXkJAQAAABpnZXRIYXRjaGluZ0ZpbmlzaEhlaWdodEtleQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBQAAAAR0eElkBAAAAAlkdWNrSWRLZXkJAQAAAAxnZXREdWNrSWRLZXkAAAACCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAAEdHhJZAQAAAAQaGF0Y2hpbmdUeFN0YXR1cwkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwUAAAARaGF0Y2hpbmdTdGF0dXNLZXkEAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAA9maW5pc2hIZWlnaHRLZXkDCQAAAAAAAAIFAAAAEGhhdGNoaW5nVHhTdGF0dXMFAAAAEEhhdGNoaW5nRmluaXNoZWQEAAAABmR1Y2tJZAkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkBAAAADGdldER1Y2tJZEtleQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBQAAAAR0eElkCQAAAgAAAAEJAAEsAAAAAgIAAABAVGhlIGR1Y2sgd2FzIGhhdGNoZWQgYW5kIGNsYWltZWQgYWxyZWFkeSwgaGVyZSBpcyB0aGUgZm9sb3dpbmc6IAUAAAAGZHVja0lkAwkAAGYAAAACBQAAABRoYXRjaGluZ0ZpbmlzaEhlaWdodAUAAAAGaGVpZ2h0CQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAdSGF0Y2hpbmcgaXMgbm90IGZpbmlzaGVkIHlldCAJAAGkAAAAAQkAAGUAAAACBQAAABRoYXRjaGluZ0ZpbmlzaEhlaWdodAUAAAAGaGVpZ2h0AgAAACcgYmxvY2tzIHJlbWFpbmluZywgaXQgd2lsbCB0YWtlIGFyb3VuZCAJAAGkAAAAAQkAAGUAAAACBQAAABRoYXRjaGluZ0ZpbmlzaEhlaWdodAUAAAAGaGVpZ2h0AgAAAAggbWludXRlcwQAAAALJHQwNDM2OTQ0MzUJAQAAAA1nZXRSYW5kb21OYW1lAAAAAgUAAAAEdHhJZAUAAAAUaGF0Y2hpbmdGaW5pc2hIZWlnaHQEAAAAB2R1Y2tHZW4IBQAAAAskdDA0MzY5NDQzNQAAAAJfMQQAAAAHZmFybUdlbggFAAAACyR0MDQzNjk0NDM1AAAAAl8yBAAAAAtkZXNjcmlwdGlvbgkAASwAAAACCQABLAAAAAICAAAADnsiZ2Vub3R5cGUiOiAiBQAAAAdkdWNrR2VuAgAAABkiLCAiY3Jvc3NicmVlZGluZyI6IHRydWV9BAAAAAVhc3NldAkABEMAAAAHBQAAAAdkdWNrR2VuBQAAAAtkZXNjcmlwdGlvbgAAAAAAAAAAAQAAAAAAAAAAAAcFAAAABHVuaXQFAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0BAAAAAdhc3NldElkCQAEOAAAAAEFAAAABWFzc2V0BAAAAAZhbW91bnQJAABkAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABCQEAAAAPZ2V0RHVja1N0YXRzS2V5AAAAAQUAAAAHZHVja0dlbgAAAAAAAAAAAQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAABFoYXRjaGluZ1N0YXR1c0tleQUAAAAQSGF0Y2hpbmdGaW5pc2hlZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAlkdWNrSWRLZXkJAAJYAAAAAQUAAAAHYXNzZXRJZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQACWAAAAAEFAAAAB2Fzc2V0SWQFAAAACWR1Y2tJZEtleQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAD2dldER1Y2tTdGF0c0tleQAAAAEFAAAAB2R1Y2tHZW4FAAAABmFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAABnN0YXRzXwUAAAAHZmFybUdlbgIAAAAJX3F1YW50aXR5CQAAZAAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAABnN0YXRzXwUAAAAHZmFybUdlbgIAAAAJX3F1YW50aXR5AAAAAAAAAAABCQAETAAAAAIFAAAABWFzc2V0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgAAAAAAAAAAAQUAAAAHYXNzZXRJZAUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXl7OCP/",
    "height": 2638937,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: AppAmZRBh3VKeJrfMsYHny9fNWT1frt9AV9qMMC4X8Vv
Next: HbRmnPBBSR1Ek8f9YHvXKcvmBboETj7QTdf9bqenYqgu

Diff: 
Old New Differences
51 51      if (if ((jackpotRandom == 1))
52 52          then (wasUniqueBorn("DUCK-WWWWWWWW-JU") == 0)
53 53          else false)
54 -         then "DUCK-WWWWWWWW-JU"
54 +         then $Tuple2("DUCK-WWWWWWWW-JU", "8W-J")
55 55          else {
56 56              let typeRandom = getRandomNumber(typesAmount, txId, hatchingFinishHeight, 0)
57 57              let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 1)
63 63                          then "B"
64 64                          else "R"
65 65              if ((typeRandom == 0))
66 -                 then ("DUCK-EEEEEEEE-G" + color)
66 +                 then $Tuple2(("DUCK-EEEEEEEE-G" + color), "8E-G")
67 67                  else if ((typeRandom == 1))
68 -                     then ("DUCK-BBBBBBBB-G" + color)
68 +                     then $Tuple2(("DUCK-BBBBBBBB-G" + color), "8B-G")
69 69                      else if ((typeRandom == 2))
70 -                         then ("DUCK-CCCCCCCC-G" + color)
70 +                         then $Tuple2(("DUCK-CCCCCCCC-G" + color), "8C-G")
71 71                          else if ((typeRandom == 3))
72 -                             then ("DUCK-DDDDDDDD-G" + color)
73 -                             else ("DUCK-AAAAAAAA-G" + color)
72 +                             then $Tuple2(("DUCK-DDDDDDDD-G" + color), "8D-G")
73 +                             else $Tuple2(("DUCK-AAAAAAAA-G" + color), "8A-G")
74 74              }
75 75      }
76 76  
114 114          else if ((hatchingFinishHeight > height))
115 115              then throw((((("Hatching is not finished yet " + toString((hatchingFinishHeight - height))) + " blocks remaining, it will take around ") + toString((hatchingFinishHeight - height))) + " minutes"))
116 116              else {
117 -                 let duckGen = getRandomName(txId, hatchingFinishHeight)
117 +                 let $t043694435 = getRandomName(txId, hatchingFinishHeight)
118 +                 let duckGen = $t043694435._1
119 +                 let farmGen = $t043694435._2
118 120                  let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
119 121                  let asset = Issue(duckGen, description, 1, 0, false, unit, hatchingFinishHeight)
120 122                  let assetId = calculateAssetId(asset)
121 123                  let amount = (tryGetInteger(getDuckStatsKey(duckGen)) + 1)
122 - [StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), amount), asset, ScriptTransfer(i.caller, 1, assetId)]
124 + [StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), amount), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) + 1)), asset, ScriptTransfer(i.caller, 1, assetId)]
123 125                  }
124 126      }
125 127  
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 4 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let eggsAssetId = base58'JCGDtrVy64cCJ1wCKfCaiNQMnyYwii71TbE5QeAHfxgF'
5 5  
6 6  let delayForHatching = 2
7 7  
8 8  let discountCoefficient = 10
9 9  
10 10  let typesAmount = 5
11 11  
12 12  let HatchingStarted = "HATCHING_STARTED"
13 13  
14 14  let HatchingFinished = "HATCHING_FINISHED"
15 15  
16 16  func getHatchingStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
17 17  
18 18  
19 19  func getHatchingFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
20 20  
21 21  
22 22  func getDuckIdKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_di")
23 23  
24 24  
25 25  func getDuckStatsKey (genString) = (("stats_" + genString) + "_amount")
26 26  
27 27  
28 28  func tryGetInteger (key) = {
29 29      let val =     match getInteger(this, key) {
30 30          case b: Int => 
31 31              b
32 32          case _ => 
33 33              0
34 34      }
35 35      val
36 36      }
37 37  
38 38  
39 39  func getRandomNumber (variants,txId,hatchingFinishHeight,offset) = {
40 40      let randomSeedBlock = value(blockInfoByHeight((hatchingFinishHeight - 1)))
41 41      let randomHash = sha256((txId + value(randomSeedBlock.vrf)))
42 42      (toInt(randomHash, (offset * 8)) % variants)
43 43      }
44 44  
45 45  
46 46  func wasUniqueBorn (gen) = tryGetInteger(getDuckStatsKey(gen))
47 47  
48 48  
49 49  func getRandomName (txId,hatchingFinishHeight) = {
50 50      let jackpotRandom = getRandomNumber(500, txId, hatchingFinishHeight, 0)
51 51      if (if ((jackpotRandom == 1))
52 52          then (wasUniqueBorn("DUCK-WWWWWWWW-JU") == 0)
53 53          else false)
54 -         then "DUCK-WWWWWWWW-JU"
54 +         then $Tuple2("DUCK-WWWWWWWW-JU", "8W-J")
55 55          else {
56 56              let typeRandom = getRandomNumber(typesAmount, txId, hatchingFinishHeight, 0)
57 57              let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 1)
58 58              let color = if ((colorRandom == 0))
59 59                  then "Y"
60 60                  else if ((colorRandom == 1))
61 61                      then "G"
62 62                      else if ((colorRandom == 2))
63 63                          then "B"
64 64                          else "R"
65 65              if ((typeRandom == 0))
66 -                 then ("DUCK-EEEEEEEE-G" + color)
66 +                 then $Tuple2(("DUCK-EEEEEEEE-G" + color), "8E-G")
67 67                  else if ((typeRandom == 1))
68 -                     then ("DUCK-BBBBBBBB-G" + color)
68 +                     then $Tuple2(("DUCK-BBBBBBBB-G" + color), "8B-G")
69 69                      else if ((typeRandom == 2))
70 -                         then ("DUCK-CCCCCCCC-G" + color)
70 +                         then $Tuple2(("DUCK-CCCCCCCC-G" + color), "8C-G")
71 71                          else if ((typeRandom == 3))
72 -                             then ("DUCK-DDDDDDDD-G" + color)
73 -                             else ("DUCK-AAAAAAAA-G" + color)
72 +                             then $Tuple2(("DUCK-DDDDDDDD-G" + color), "8D-G")
73 +                             else $Tuple2(("DUCK-AAAAAAAA-G" + color), "8A-G")
74 74              }
75 75      }
76 76  
77 77  
78 78  func countEggsNeededAmount (totalDucksAmount) = {
79 79      let n = totalDucksAmount
80 80      let g = discountCoefficient
81 81      let t = typesAmount
82 82      let price = pow((100 + ((n * g) / (10 * t))), 2, 5, 1, 2, DOWN)
83 83      price
84 84      }
85 85  
86 86  
87 87  @Callable(i)
88 88  func startDuckHatching () = {
89 89      let totalDucksAmount = tryGetInteger("ducks_amount")
90 90      let eggsNeeded = countEggsNeededAmount(totalDucksAmount)
91 91      let firstPayment = value(i.payments[0])
92 92      if ((firstPayment.assetId != eggsAssetId))
93 93          then throw(("You can attach only EGG tokens with the following asset id: " + toBase58String(eggsAssetId)))
94 94          else if ((eggsNeeded > firstPayment.amount))
95 95              then throw(("To hatch a duck you currently need the following amount of EGGlets: " + toString(eggsNeeded)))
96 96              else [StringEntry(getHatchingStatusKey(toString(i.caller), i.transactionId), HatchingStarted), IntegerEntry(getHatchingFinishHeightKey(toString(i.caller), i.transactionId), (height + delayForHatching)), IntegerEntry("ducks_amount", (totalDucksAmount + 1)), IntegerEntry("ducks_last_price", eggsNeeded), ScriptTransfer(i.caller, (firstPayment.amount - eggsNeeded), eggsAssetId)]
97 97      }
98 98  
99 99  
100 100  
101 101  @Callable(i)
102 102  func finishDuckHatching (txIdStr) = {
103 103      let txId = fromBase58String(txIdStr)
104 104      let hatchingStatusKey = getHatchingStatusKey(toString(i.caller), txId)
105 105      let finishHeightKey = getHatchingFinishHeightKey(toString(i.caller), txId)
106 106      let duckIdKey = getDuckIdKey(toString(i.caller), txId)
107 107      let hatchingTxStatus = getStringValue(this, hatchingStatusKey)
108 108      let hatchingFinishHeight = getIntegerValue(this, finishHeightKey)
109 109      if ((hatchingTxStatus == HatchingFinished))
110 110          then {
111 111              let duckId = getStringValue(this, getDuckIdKey(toString(i.caller), txId))
112 112              throw(("The duck was hatched and claimed already, here is the folowing: " + duckId))
113 113              }
114 114          else if ((hatchingFinishHeight > height))
115 115              then throw((((("Hatching is not finished yet " + toString((hatchingFinishHeight - height))) + " blocks remaining, it will take around ") + toString((hatchingFinishHeight - height))) + " minutes"))
116 116              else {
117 -                 let duckGen = getRandomName(txId, hatchingFinishHeight)
117 +                 let $t043694435 = getRandomName(txId, hatchingFinishHeight)
118 +                 let duckGen = $t043694435._1
119 +                 let farmGen = $t043694435._2
118 120                  let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
119 121                  let asset = Issue(duckGen, description, 1, 0, false, unit, hatchingFinishHeight)
120 122                  let assetId = calculateAssetId(asset)
121 123                  let amount = (tryGetInteger(getDuckStatsKey(duckGen)) + 1)
122 - [StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), amount), asset, ScriptTransfer(i.caller, 1, assetId)]
124 + [StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), amount), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) + 1)), asset, ScriptTransfer(i.caller, 1, assetId)]
123 125                  }
124 126      }
125 127  
126 128  
127 129  @Verifier(tx)
128 130  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
129 131

Old	New		Differences
51	51		if (if ((jackpotRandom == 1))
52	52		then (wasUniqueBorn("DUCK-WWWWWWWW-JU") == 0)
53	53		else false)
54		-	then "DUCK-WWWWWWWW-JU"
	54	+	then $Tuple2("DUCK-WWWWWWWW-JU", "8W-J")
55	55		else {
56	56		let typeRandom = getRandomNumber(typesAmount, txId, hatchingFinishHeight, 0)
57	57		let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 1)

63	63		then "B"
64	64		else "R"
65	65		if ((typeRandom == 0))
66		-	then ("DUCK-EEEEEEEE-G" + color)
	66	+	then $Tuple2(("DUCK-EEEEEEEE-G" + color), "8E-G")
67	67		else if ((typeRandom == 1))
68		-	then ("DUCK-BBBBBBBB-G" + color)
	68	+	then $Tuple2(("DUCK-BBBBBBBB-G" + color), "8B-G")
69	69		else if ((typeRandom == 2))
70		-	then ("DUCK-CCCCCCCC-G" + color)
	70	+	then $Tuple2(("DUCK-CCCCCCCC-G" + color), "8C-G")
71	71		else if ((typeRandom == 3))
72		-	then ("DUCK-DDDDDDDD-G" + color)
73		-	else ("DUCK-AAAAAAAA-G" + color)
	72	+	then $Tuple2(("DUCK-DDDDDDDD-G" + color), "8D-G")
	73	+	else $Tuple2(("DUCK-AAAAAAAA-G" + color), "8A-G")
74	74		}
75	75		}
76	76

114	114		else if ((hatchingFinishHeight > height))
115	115		then throw((((("Hatching is not finished yet " + toString((hatchingFinishHeight - height))) + " blocks remaining, it will take around ") + toString((hatchingFinishHeight - height))) + " minutes"))
116	116		else {
117		-	let duckGen = getRandomName(txId, hatchingFinishHeight)
	117	+	let $t043694435 = getRandomName(txId, hatchingFinishHeight)
	118	+	let duckGen = $t043694435._1
	119	+	let farmGen = $t043694435._2
118	120		let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
119	121		let asset = Issue(duckGen, description, 1, 0, false, unit, hatchingFinishHeight)
120	122		let assetId = calculateAssetId(asset)
121	123		let amount = (tryGetInteger(getDuckStatsKey(duckGen)) + 1)
122		-	[StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), amount), asset, ScriptTransfer(i.caller, 1, assetId)]
	124	+	[StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), amount), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) + 1)), asset, ScriptTransfer(i.caller, 1, assetId)]
123	125		}
124	126		}
125	127

Old	New		Differences
1	1		{-# STDLIB_VERSION 4 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let eggsAssetId = base58'JCGDtrVy64cCJ1wCKfCaiNQMnyYwii71TbE5QeAHfxgF'
5	5
6	6		let delayForHatching = 2
7	7
8	8		let discountCoefficient = 10
9	9
10	10		let typesAmount = 5
11	11
12	12		let HatchingStarted = "HATCHING_STARTED"
13	13
14	14		let HatchingFinished = "HATCHING_FINISHED"
15	15
16	16		func getHatchingStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
17	17
18	18
19	19		func getHatchingFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
20	20
21	21
22	22		func getDuckIdKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_di")
23	23
24	24
25	25		func getDuckStatsKey (genString) = (("stats_" + genString) + "_amount")
26	26
27	27
28	28		func tryGetInteger (key) = {
29	29		let val = match getInteger(this, key) {
30	30		case b: Int =>
31	31		b
32	32		case _ =>
33	33		0
34	34		}
35	35		val
36	36		}
37	37
38	38
39	39		func getRandomNumber (variants,txId,hatchingFinishHeight,offset) = {
40	40		let randomSeedBlock = value(blockInfoByHeight((hatchingFinishHeight - 1)))
41	41		let randomHash = sha256((txId + value(randomSeedBlock.vrf)))
42	42		(toInt(randomHash, (offset * 8)) % variants)
43	43		}
44	44
45	45
46	46		func wasUniqueBorn (gen) = tryGetInteger(getDuckStatsKey(gen))
47	47
48	48
49	49		func getRandomName (txId,hatchingFinishHeight) = {
50	50		let jackpotRandom = getRandomNumber(500, txId, hatchingFinishHeight, 0)
51	51		if (if ((jackpotRandom == 1))
52	52		then (wasUniqueBorn("DUCK-WWWWWWWW-JU") == 0)
53	53		else false)
54		-	then "DUCK-WWWWWWWW-JU"
	54	+	then $Tuple2("DUCK-WWWWWWWW-JU", "8W-J")
55	55		else {
56	56		let typeRandom = getRandomNumber(typesAmount, txId, hatchingFinishHeight, 0)
57	57		let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 1)
58	58		let color = if ((colorRandom == 0))
59	59		then "Y"
60	60		else if ((colorRandom == 1))
61	61		then "G"
62	62		else if ((colorRandom == 2))
63	63		then "B"
64	64		else "R"
65	65		if ((typeRandom == 0))
66		-	then ("DUCK-EEEEEEEE-G" + color)
	66	+	then $Tuple2(("DUCK-EEEEEEEE-G" + color), "8E-G")
67	67		else if ((typeRandom == 1))
68		-	then ("DUCK-BBBBBBBB-G" + color)
	68	+	then $Tuple2(("DUCK-BBBBBBBB-G" + color), "8B-G")
69	69		else if ((typeRandom == 2))
70		-	then ("DUCK-CCCCCCCC-G" + color)
	70	+	then $Tuple2(("DUCK-CCCCCCCC-G" + color), "8C-G")
71	71		else if ((typeRandom == 3))
72		-	then ("DUCK-DDDDDDDD-G" + color)
73		-	else ("DUCK-AAAAAAAA-G" + color)
	72	+	then $Tuple2(("DUCK-DDDDDDDD-G" + color), "8D-G")
	73	+	else $Tuple2(("DUCK-AAAAAAAA-G" + color), "8A-G")
74	74		}
75	75		}
76	76
77	77
78	78		func countEggsNeededAmount (totalDucksAmount) = {
79	79		let n = totalDucksAmount
80	80		let g = discountCoefficient
81	81		let t = typesAmount
82	82		let price = pow((100 + ((n * g) / (10 * t))), 2, 5, 1, 2, DOWN)
83	83		price
84	84		}
85	85
86	86
87	87		@Callable(i)
88	88		func startDuckHatching () = {
89	89		let totalDucksAmount = tryGetInteger("ducks_amount")
90	90		let eggsNeeded = countEggsNeededAmount(totalDucksAmount)
91	91		let firstPayment = value(i.payments[0])
92	92		if ((firstPayment.assetId != eggsAssetId))
93	93		then throw(("You can attach only EGG tokens with the following asset id: " + toBase58String(eggsAssetId)))
94	94		else if ((eggsNeeded > firstPayment.amount))
95	95		then throw(("To hatch a duck you currently need the following amount of EGGlets: " + toString(eggsNeeded)))
96	96		else [StringEntry(getHatchingStatusKey(toString(i.caller), i.transactionId), HatchingStarted), IntegerEntry(getHatchingFinishHeightKey(toString(i.caller), i.transactionId), (height + delayForHatching)), IntegerEntry("ducks_amount", (totalDucksAmount + 1)), IntegerEntry("ducks_last_price", eggsNeeded), ScriptTransfer(i.caller, (firstPayment.amount - eggsNeeded), eggsAssetId)]
97	97		}
98	98
99	99
100	100
101	101		@Callable(i)
102	102		func finishDuckHatching (txIdStr) = {
103	103		let txId = fromBase58String(txIdStr)
104	104		let hatchingStatusKey = getHatchingStatusKey(toString(i.caller), txId)
105	105		let finishHeightKey = getHatchingFinishHeightKey(toString(i.caller), txId)
106	106		let duckIdKey = getDuckIdKey(toString(i.caller), txId)
107	107		let hatchingTxStatus = getStringValue(this, hatchingStatusKey)
108	108		let hatchingFinishHeight = getIntegerValue(this, finishHeightKey)
109	109		if ((hatchingTxStatus == HatchingFinished))
110	110		then {
111	111		let duckId = getStringValue(this, getDuckIdKey(toString(i.caller), txId))
112	112		throw(("The duck was hatched and claimed already, here is the folowing: " + duckId))
113	113		}
114	114		else if ((hatchingFinishHeight > height))
115	115		then throw((((("Hatching is not finished yet " + toString((hatchingFinishHeight - height))) + " blocks remaining, it will take around ") + toString((hatchingFinishHeight - height))) + " minutes"))
116	116		else {
117		-	let duckGen = getRandomName(txId, hatchingFinishHeight)
	117	+	let $t043694435 = getRandomName(txId, hatchingFinishHeight)
	118	+	let duckGen = $t043694435._1
	119	+	let farmGen = $t043694435._2
118	120		let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
119	121		let asset = Issue(duckGen, description, 1, 0, false, unit, hatchingFinishHeight)
120	122		let assetId = calculateAssetId(asset)
121	123		let amount = (tryGetInteger(getDuckStatsKey(duckGen)) + 1)
122		-	[StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), amount), asset, ScriptTransfer(i.caller, 1, assetId)]
	124	+	[StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), amount), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) + 1)), asset, ScriptTransfer(i.caller, 1, assetId)]
123	125		}
124	126		}
125	127
126	128
127	129		@Verifier(tx)
128	130		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
129	131

github/deemru/w8io/6500d08 
47.87 ms ◑