w8 · tx · EXs···SBi

tx · EXsWBXX9GWyHZczge55umrZGXdbPGVt5pUUm2fVKwSBi

3P6TwNU39Ykkbeqhn5TE4a2736xsA1vXemM:  -0.01400000 Waves

2021.06.26 04:01 [2651414] smart account 3P6TwNU39Ykkbeqhn5TE4a2736xsA1vXemM > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "EXsWBXX9GWyHZczge55umrZGXdbPGVt5pUUm2fVKwSBi",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1624669280628,
    "version": 2,
    "chainId": 87,
    "sender": "3P6TwNU39Ykkbeqhn5TE4a2736xsA1vXemM",
    "senderPublicKey": "2u37SmDDZX3Ry9sDnA1umgjYSVQ51faPMAXtooDpx6yw",
    "proofs": [
        "2TQcgJJCTgE6pcVTmvZn4BaSrkbFJhHqr1FEGvCyeVdZAZL2V3vEWt3FJtaoKUbUeQ83mU3oA1JBjkX9ybh1iTeH"
    ],
    "script": "base64:AAIFAAAAAAAAAAwIAhIDCgEIEgMKAQgAAAAQAAAAAAtlZ2dzQXNzZXRJZAEAAAAgPBi728BFgsdN7s3MYoV7jRRmignfuR0fiQY8vjU+wlYAAAAAEGRlbGF5Rm9ySGF0Y2hpbmcAAAAAAAAAAAAAAAAAE2Rpc2NvdW50Q29lZmZpY2llbnQAAAAAAAAAAAoAAAAAC3R5cGVzQW1vdW50AAAAAAAAAAAGAAAAABJyZWZDb250cmFjdEFkZHJlc3MBAAAAGgFXoJWHaFIS+neTXowyvvYUIY9fLjbMmBsgAAAAAA9IYXRjaGluZ1N0YXJ0ZWQCAAAAEEhBVENISU5HX1NUQVJURUQAAAAAEEhhdGNoaW5nRmluaXNoZWQCAAAAEUhBVENISU5HX0ZJTklTSEVEAQAAABRnZXRIYXRjaGluZ1N0YXR1c0tleQAAAAIAAAAHYWRkcmVzcwAAAAR0eElkCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAdhZGRyZXNzAgAAAAFfCQACWAAAAAEFAAAABHR4SWQCAAAAB19zdGF0dXMBAAAAGmdldEhhdGNoaW5nRmluaXNoSGVpZ2h0S2V5AAAAAgAAAAdhZGRyZXNzAAAABHR4SWQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAAB2FkZHJlc3MCAAAAAV8JAAJYAAAAAQUAAAAEdHhJZAIAAAADX2ZoAQAAAAxnZXREdWNrSWRLZXkAAAACAAAAB2FkZHJlc3MAAAAEdHhJZAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAHYWRkcmVzcwIAAAABXwkAAlgAAAABBQAAAAR0eElkAgAAAANfZGkBAAAAD2dldER1Y2tTdGF0c0tleQAAAAEAAAAJZ2VuU3RyaW5nCQABLAAAAAIJAAEsAAAAAgIAAAAGc3RhdHNfBQAAAAlnZW5TdHJpbmcCAAAAB19hbW91bnQBAAAADXRyeUdldEludGVnZXIAAAABAAAAA2tleQQAAAADdmFsBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFiBQAAAAckbWF0Y2gwBQAAAAFiAAAAAAAAAAAABQAAAAN2YWwBAAAAD2dldFJhbmRvbU51bWJlcgAAAAQAAAAIdmFyaWFudHMAAAAEdHhJZAAAABRoYXRjaGluZ0ZpbmlzaEhlaWdodAAAAAZvZmZzZXQEAAAAD3JhbmRvbVNlZWRCbG9jawkBAAAABXZhbHVlAAAAAQkAA+0AAAABCQAAZQAAAAIFAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0AAAAAAAAAAABBAAAAApyYW5kb21IYXNoCQAB9wAAAAEJAADLAAAAAgUAAAAEdHhJZAkBAAAABXZhbHVlAAAAAQgFAAAAD3JhbmRvbVNlZWRCbG9jawAAAAN2cmYJAABqAAAAAgkABLIAAAACBQAAAApyYW5kb21IYXNoCQAAaAAAAAIFAAAABm9mZnNldAAAAAAAAAAACAUAAAAIdmFyaWFudHMBAAAADXdhc1VuaXF1ZUJvcm4AAAABAAAAA2dlbgkBAAAADXRyeUdldEludGVnZXIAAAABCQEAAAAPZ2V0RHVja1N0YXRzS2V5AAAAAQUAAAADZ2VuAQAAAA1nZXRSYW5kb21OYW1lAAAAAgAAAAR0eElkAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0BAAAAA1qYWNrcG90UmFuZG9tCQEAAAAPZ2V0UmFuZG9tTnVtYmVyAAAABAAAAAAAAAAB9AUAAAAEdHhJZAUAAAAUaGF0Y2hpbmdGaW5pc2hIZWlnaHQAAAAAAAAAAAADAwkAAAAAAAACBQAAAA1qYWNrcG90UmFuZG9tAAAAAAAAAAABCQAAAAAAAAIJAQAAAA13YXNVbmlxdWVCb3JuAAAAAQIAAAAQRFVDSy1XV1dXV1dXVy1KVQAAAAAAAAAAAAcJAAUUAAAAAgIAAAAQRFVDSy1XV1dXV1dXVy1KVQIAAAAEOFctSgQAAAAKdHlwZVJhbmRvbQkBAAAAD2dldFJhbmRvbU51bWJlcgAAAAQAAAAAAAAAAAQFAAAABHR4SWQFAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0AAAAAAAAAAAABAAAAAtjb2xvclJhbmRvbQkBAAAAD2dldFJhbmRvbU51bWJlcgAAAAQAAAAAAAAAAAQFAAAABHR4SWQFAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0AAAAAAAAAAABBAAAAAVjb2xvcgMJAAAAAAAAAgUAAAALY29sb3JSYW5kb20AAAAAAAAAAAACAAAAAVkDCQAAAAAAAAIFAAAAC2NvbG9yUmFuZG9tAAAAAAAAAAABAgAAAAFHAwkAAAAAAAACBQAAAAtjb2xvclJhbmRvbQAAAAAAAAAAAgIAAAABQgIAAAABUgMJAAAAAAAAAgUAAAAKdHlwZVJhbmRvbQAAAAAAAAAAAAkABRQAAAACCQABLAAAAAICAAAAD0RVQ0stRkZGRkZGRkYtRwUAAAAFY29sb3ICAAAABDhGLUcDCQAAAAAAAAIFAAAACnR5cGVSYW5kb20AAAAAAAAAAAEJAAUUAAAAAgkAASwAAAACAgAAAA9EVUNLLURERERERERELUcFAAAABWNvbG9yAgAAAAQ4RC1HAwkAAAAAAAACBQAAAAp0eXBlUmFuZG9tAAAAAAAAAAACCQAFFAAAAAIJAAEsAAAAAgIAAAAPRFVDSy1DQ0NDQ0NDQy1HBQAAAAVjb2xvcgIAAAAEOEMtRwkABRQAAAACCQABLAAAAAICAAAAD0RVQ0stRUVFRUVFRUUtRwUAAAAFY29sb3ICAAAABDhFLUcBAAAAFWNvdW50RWdnc05lZWRlZEFtb3VudAAAAAEAAAAQdG90YWxEdWNrc0Ftb3VudAQAAAABbgUAAAAQdG90YWxEdWNrc0Ftb3VudAQAAAABZwUAAAATZGlzY291bnRDb2VmZmljaWVudAQAAAABdAUAAAALdHlwZXNBbW91bnQEAAAABXByaWNlCQAAbAAAAAYJAABkAAAAAgAAAAAAAAAAZAkAAGkAAAACCQAAaAAAAAIFAAAAAW4FAAAAAWcJAABoAAAAAgAAAAAAAAAACgUAAAABdAAAAAAAAAAAAgAAAAAAAAAABQAAAAAAAAAAAQAAAAAAAAAAAgUAAAAERE9XTgUAAAAFcHJpY2UAAAACAAAAAWkBAAAAEXN0YXJ0RHVja0hhdGNoaW5nAAAAAQAAAAZyZWZLZXkEAAAAEHRvdGFsRHVja3NBbW91bnQJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQIAAAAMZHVja3NfYW1vdW50BAAAAAplZ2dzTmVlZGVkCQEAAAAVY291bnRFZ2dzTmVlZGVkQW1vdW50AAAAAQUAAAAQdG90YWxEdWNrc0Ftb3VudAQAAAAMZmlyc3RQYXltZW50CQEAAAAFdmFsdWUAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAwkBAAAAAiE9AAAAAggFAAAADGZpcnN0UGF5bWVudAAAAAdhc3NldElkBQAAAAtlZ2dzQXNzZXRJZAkAAAIAAAABCQABLAAAAAICAAAAPFlvdSBjYW4gYXR0YWNoIG9ubHkgRUdHIHRva2VucyB3aXRoIHRoZSBmb2xsb3dpbmcgYXNzZXQgaWQ6IAkAAlgAAAABBQAAAAtlZ2dzQXNzZXRJZAMJAABmAAAAAgUAAAAKZWdnc05lZWRlZAgFAAAADGZpcnN0UGF5bWVudAAAAAZhbW91bnQJAAACAAAAAQkAASwAAAACAgAAAERUbyBoYXRjaCBhIGR1Y2sgeW91IGN1cnJlbnRseSBuZWVkIHRoZSBmb2xsb3dpbmcgYW1vdW50IG9mIEVHR2xldHM6IAkAAaQAAAABBQAAAAplZ2dzTmVlZGVkBAAAAAdyZWZDYWxsCQAD/AAAAAQJAQAAAAdBZGRyZXNzAAAAAQUAAAAScmVmQ29udHJhY3RBZGRyZXNzAgAAAAphZGRSZWZlcmFsCQAETAAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyCQAETAAAAAIFAAAABnJlZktleQUAAAADbmlsCQAETAAAAAIJAQAAAA9BdHRhY2hlZFBheW1lbnQAAAACBQAAAAtlZ2dzQXNzZXRJZAAAAAAAAAAAAQUAAAADbmlsAwkAAAAAAAACBQAAAAdyZWZDYWxsBQAAAAdyZWZDYWxsCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAABRnZXRIYXRjaGluZ1N0YXR1c0tleQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyCAUAAAABaQAAAA10cmFuc2FjdGlvbklkBQAAAA9IYXRjaGluZ1N0YXJ0ZWQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAABpnZXRIYXRjaGluZ0ZpbmlzaEhlaWdodEtleQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyCAUAAAABaQAAAA10cmFuc2FjdGlvbklkCQAAZAAAAAIFAAAABmhlaWdodAUAAAAQZGVsYXlGb3JIYXRjaGluZwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAMZHVja3NfYW1vdW50CQAAZAAAAAIFAAAAEHRvdGFsRHVja3NBbW91bnQAAAAAAAAAAAEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAEGR1Y2tzX2xhc3RfcHJpY2UFAAAACmVnZ3NOZWVkZWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyCQAAZQAAAAIIBQAAAAxmaXJzdFBheW1lbnQAAAAGYW1vdW50BQAAAAplZ2dzTmVlZGVkBQAAAAtlZ2dzQXNzZXRJZAUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFpAQAAABJmaW5pc2hEdWNrSGF0Y2hpbmcAAAABAAAAB3R4SWRTdHIEAAAABHR4SWQJAAJZAAAAAQUAAAAHdHhJZFN0cgQAAAARaGF0Y2hpbmdTdGF0dXNLZXkJAQAAABRnZXRIYXRjaGluZ1N0YXR1c0tleQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBQAAAAR0eElkBAAAAA9maW5pc2hIZWlnaHRLZXkJAQAAABpnZXRIYXRjaGluZ0ZpbmlzaEhlaWdodEtleQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBQAAAAR0eElkBAAAAAlkdWNrSWRLZXkJAQAAAAxnZXREdWNrSWRLZXkAAAACCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAAEdHhJZAQAAAAQaGF0Y2hpbmdUeFN0YXR1cwkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwUAAAARaGF0Y2hpbmdTdGF0dXNLZXkEAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAA9maW5pc2hIZWlnaHRLZXkDCQAAAAAAAAIFAAAAEGhhdGNoaW5nVHhTdGF0dXMFAAAAEEhhdGNoaW5nRmluaXNoZWQEAAAABmR1Y2tJZAkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkBAAAADGdldER1Y2tJZEtleQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBQAAAAR0eElkCQAAAgAAAAEJAAEsAAAAAgIAAABAVGhlIGR1Y2sgd2FzIGhhdGNoZWQgYW5kIGNsYWltZWQgYWxyZWFkeSwgaGVyZSBpcyB0aGUgZm9sb3dpbmc6IAUAAAAGZHVja0lkAwkAAGYAAAACBQAAABRoYXRjaGluZ0ZpbmlzaEhlaWdodAUAAAAGaGVpZ2h0CQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAdSGF0Y2hpbmcgaXMgbm90IGZpbmlzaGVkIHlldCAJAAGkAAAAAQkAAGUAAAACBQAAABRoYXRjaGluZ0ZpbmlzaEhlaWdodAUAAAAGaGVpZ2h0AgAAACcgYmxvY2tzIHJlbWFpbmluZywgaXQgd2lsbCB0YWtlIGFyb3VuZCAJAAGkAAAAAQkAAGUAAAACBQAAABRoYXRjaGluZ0ZpbmlzaEhlaWdodAUAAAAGaGVpZ2h0AgAAAAggbWludXRlcwQAAAALJHQwNDUxNDQ1ODAJAQAAAA1nZXRSYW5kb21OYW1lAAAAAgUAAAAEdHhJZAUAAAAUaGF0Y2hpbmdGaW5pc2hIZWlnaHQEAAAAB2R1Y2tHZW4IBQAAAAskdDA0NTE0NDU4MAAAAAJfMQQAAAAHZmFybUdlbggFAAAACyR0MDQ1MTQ0NTgwAAAAAl8yBAAAAAtkZXNjcmlwdGlvbgkAASwAAAACCQABLAAAAAICAAAADnsiZ2Vub3R5cGUiOiAiBQAAAAdkdWNrR2VuAgAAABkiLCAiY3Jvc3NicmVlZGluZyI6IHRydWV9BAAAAAVhc3NldAkABEMAAAAHBQAAAAdkdWNrR2VuBQAAAAtkZXNjcmlwdGlvbgAAAAAAAAAAAQAAAAAAAAAAAAcFAAAABHVuaXQFAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0BAAAAAdhc3NldElkCQAEOAAAAAEFAAAABWFzc2V0BAAAAAZhbW91bnQJAABkAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABCQEAAAAPZ2V0RHVja1N0YXRzS2V5AAAAAQUAAAAHZHVja0dlbgAAAAAAAAAAAQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAABFoYXRjaGluZ1N0YXR1c0tleQUAAAAQSGF0Y2hpbmdGaW5pc2hlZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAlkdWNrSWRLZXkJAAJYAAAAAQUAAAAHYXNzZXRJZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQACWAAAAAEFAAAAB2Fzc2V0SWQFAAAACWR1Y2tJZEtleQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAD2dldER1Y2tTdGF0c0tleQAAAAEFAAAAB2R1Y2tHZW4FAAAABmFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAABnN0YXRzXwUAAAAHZmFybUdlbgIAAAAJX3F1YW50aXR5CQAAZAAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAABnN0YXRzXwUAAAAHZmFybUdlbgIAAAAJX3F1YW50aXR5AAAAAAAAAAABCQAETAAAAAIFAAAABWFzc2V0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgAAAAAAAAAAAQUAAAAHYXNzZXRJZAUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXmA+Sp+",
    "height": 2651414,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: FPQcSf6vVSRP1ebyuEKevoeVusJXrvBoY64WMmVc3mwF
Next: 4umUpjt6mGAufUU7LKxsP4r2WSF1FVBi7oi6SAT6y3TU

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

Old	New		Differences
1		-	{-# STDLIB_VERSION 4 #-}
	1	+	{-# STDLIB_VERSION 5 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let eggsAssetId = base58'53bLXGQhnMxAoiWnza2SJQRp7hNQZVHnyrRziLmwdVjb'

8	8		let discountCoefficient = 10
9	9
10	10		let typesAmount = 6
	11	+
	12	+	let refContractAddress = base58'3PGZyyPg7Mx91yaNT8k3MWxSQzuzusMUyzX'
11	13
12	14		let HatchingStarted = "HATCHING_STARTED"
13	15

38	40
39	41		func getRandomNumber (variants,txId,hatchingFinishHeight,offset) = {
40	42		let randomSeedBlock = value(blockInfoByHeight((hatchingFinishHeight - 1)))
41		-	let randomHash = sha256~~_16Kb~~((txId + value(randomSeedBlock.vrf)))
	43	+	let randomHash = sha256((txId + value(randomSeedBlock.vrf)))
42	44		(toInt(randomHash, (offset * 8)) % variants)
43	45		}
44	46

83	85
84	86
85	87		@Callable(i)
86		-	func startDuckHatching () = {
	88	+	func startDuckHatching (refKey) = {
87	89		let totalDucksAmount = tryGetInteger("ducks_amount")
88	90		let eggsNeeded = countEggsNeededAmount(totalDucksAmount)
89	91		let firstPayment = value(i.payments[0])

91	93		then throw(("You can attach only EGG tokens with the following asset id: " + toBase58String(eggsAssetId)))
92	94		else if ((eggsNeeded > firstPayment.amount))
93	95		then throw(("To hatch a duck you currently need the following amount of EGGlets: " + toString(eggsNeeded)))
94		-	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)]
	96	+	else {
	97	+	let refCall = invoke(Address(refContractAddress), "addReferal", [toString(i.caller), refKey], [AttachedPayment(eggsAssetId, 1)])
	98	+	if ((refCall == refCall))
	99	+	then [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)]
	100	+	else throw("Strict value is not equal to itself.")
	101	+	}
95	102		}
96	103
97	104

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

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

github/deemru/w8io/0e76f2f 
50.54 ms ◑