w8 · tx

2021.06.29 16:49 [2656489] smart account 3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7zLEybnVi5hJEdxmDb5Yfi3Cic7cxP1GvT7Gv1ynj1sj",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1624974588269,
    "version": 2,
    "chainId": 87,
    "sender": "3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv",
    "senderPublicKey": "EBHsV7TQYm4qS2V7iZXEXwcbUdEYQyCSLEdY2AMvLPns",
    "proofs": [
        "2fYt8qZ2aCy1pY4WNXZfe54wLuk5X42DXqryUzXb9w7FXDGN5GWtEhHrgictX6fpwNq2HiVcfYonqVKhRfbNtW9U"
    ],
    "script": "base64:AAIFAAAAAAAAAAwIAhIDCgEIEgMKAQgAAAARAAAAAAtlZ2dzQXNzZXRJZAEAAAAg/3lHUFRQ2H0cVfQRQOylRzGkGFxs14FX0INpTMC9l/AAAAAAEGRlbGF5Rm9ySGF0Y2hpbmcAAAAAAAAAAAIAAAAAE2Rpc2NvdW50Q29lZmZpY2llbnQAAAAAAAAAAAoAAAAAC3R5cGVzQW1vdW50AAAAAAAAAAAGAAAAABJyZWZDb250cmFjdEFkZHJlc3MBAAAAGgFXSbp9QryfsBGFwcqYqtY07fALze/ow+6lAAAAAA1SZWZlcmVyUmV3YXJkAAAAAAAAAAAFAAAAAA9IYXRjaGluZ1N0YXJ0ZWQCAAAAEEhBVENISU5HX1NUQVJURUQAAAAAEEhhdGNoaW5nRmluaXNoZWQCAAAAEUhBVENISU5HX0ZJTklTSEVEAQAAABRnZXRIYXRjaGluZ1N0YXR1c0tleQAAAAIAAAAHYWRkcmVzcwAAAAR0eElkCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAdhZGRyZXNzAgAAAAFfCQACWAAAAAEFAAAABHR4SWQCAAAAB19zdGF0dXMBAAAAGmdldEhhdGNoaW5nRmluaXNoSGVpZ2h0S2V5AAAAAgAAAAdhZGRyZXNzAAAABHR4SWQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIFAAAAB2FkZHJlc3MCAAAAAV8JAAJYAAAAAQUAAAAEdHhJZAIAAAADX2ZoAQAAAAxnZXREdWNrSWRLZXkAAAACAAAAB2FkZHJlc3MAAAAEdHhJZAkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAHYWRkcmVzcwIAAAABXwkAAlgAAAABBQAAAAR0eElkAgAAAANfZGkBAAAAD2dldER1Y2tTdGF0c0tleQAAAAEAAAAJZ2VuU3RyaW5nCQABLAAAAAIJAAEsAAAAAgIAAAAGc3RhdHNfBQAAAAlnZW5TdHJpbmcCAAAAB19hbW91bnQBAAAADXRyeUdldEludGVnZXIAAAABAAAAA2tleQQAAAADdmFsBAAAAAckbWF0Y2gwCQAEGgAAAAIFAAAABHRoaXMFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAAFiBQAAAAckbWF0Y2gwBQAAAAFiAAAAAAAAAAAABQAAAAN2YWwBAAAAD2dldFJhbmRvbU51bWJlcgAAAAQAAAAIdmFyaWFudHMAAAAEdHhJZAAAABRoYXRjaGluZ0ZpbmlzaEhlaWdodAAAAAZvZmZzZXQEAAAAD3JhbmRvbVNlZWRCbG9jawkBAAAABXZhbHVlAAAAAQkAA+0AAAABCQAAZQAAAAIFAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0AAAAAAAAAAABBAAAAApyYW5kb21IYXNoCQAB9wAAAAEJAADLAAAAAgUAAAAEdHhJZAkBAAAABXZhbHVlAAAAAQgFAAAAD3JhbmRvbVNlZWRCbG9jawAAAAN2cmYJAABqAAAAAgkABLIAAAACBQAAAApyYW5kb21IYXNoCQAAaAAAAAIFAAAABm9mZnNldAAAAAAAAAAACAUAAAAIdmFyaWFudHMBAAAADXdhc1VuaXF1ZUJvcm4AAAABAAAAA2dlbgkBAAAADXRyeUdldEludGVnZXIAAAABCQEAAAAPZ2V0RHVja1N0YXRzS2V5AAAAAQUAAAADZ2VuAQAAAA1nZXRSYW5kb21OYW1lAAAAAgAAAAR0eElkAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0BAAAAA1qYWNrcG90UmFuZG9tCQEAAAAPZ2V0UmFuZG9tTnVtYmVyAAAABAAAAAAAAAAB9AUAAAAEdHhJZAUAAAAUaGF0Y2hpbmdGaW5pc2hIZWlnaHQAAAAAAAAAAAADAwkAAAAAAAACBQAAAA1qYWNrcG90UmFuZG9tAAAAAAAAAAABCQAAAAAAAAIJAQAAAA13YXNVbmlxdWVCb3JuAAAAAQIAAAAQRFVDSy1XV1dXV1dXVy1KVQAAAAAAAAAAAAcJAAUUAAAAAgIAAAAQRFVDSy1XV1dXV1dXVy1KVQIAAAAEOFctSgQAAAAKdHlwZVJhbmRvbQkBAAAAD2dldFJhbmRvbU51bWJlcgAAAAQAAAAAAAAAAAQFAAAABHR4SWQFAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0AAAAAAAAAAAABAAAAAtjb2xvclJhbmRvbQkBAAAAD2dldFJhbmRvbU51bWJlcgAAAAQAAAAAAAAAAAQFAAAABHR4SWQFAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0AAAAAAAAAAABBAAAAAVjb2xvcgMJAAAAAAAAAgUAAAALY29sb3JSYW5kb20AAAAAAAAAAAACAAAAAVkDCQAAAAAAAAIFAAAAC2NvbG9yUmFuZG9tAAAAAAAAAAABAgAAAAFHAwkAAAAAAAACBQAAAAtjb2xvclJhbmRvbQAAAAAAAAAAAgIAAAABQgIAAAABUgMJAAAAAAAAAgUAAAAKdHlwZVJhbmRvbQAAAAAAAAAAAAkABRQAAAACCQABLAAAAAICAAAAD0RVQ0stRkZGRkZGRkYtRwUAAAAFY29sb3ICAAAABDhGLUcDCQAAAAAAAAIFAAAACnR5cGVSYW5kb20AAAAAAAAAAAEJAAUUAAAAAgkAASwAAAACAgAAAA9EVUNLLURERERERERELUcFAAAABWNvbG9yAgAAAAQ4RC1HAwkAAAAAAAACBQAAAAp0eXBlUmFuZG9tAAAAAAAAAAACCQAFFAAAAAIJAAEsAAAAAgIAAAAPRFVDSy1DQ0NDQ0NDQy1HBQAAAAVjb2xvcgIAAAAEOEMtRwkABRQAAAACCQABLAAAAAICAAAAD0RVQ0stRUVFRUVFRUUtRwUAAAAFY29sb3ICAAAABDhFLUcBAAAAFWNvdW50RWdnc05lZWRlZEFtb3VudAAAAAEAAAAQdG90YWxEdWNrc0Ftb3VudAQAAAABbgUAAAAQdG90YWxEdWNrc0Ftb3VudAQAAAABZwUAAAATZGlzY291bnRDb2VmZmljaWVudAQAAAABdAUAAAALdHlwZXNBbW91bnQEAAAABXByaWNlCQAAbAAAAAYJAABkAAAAAgAAAAAAAAAAZAkAAGkAAAACCQAAaAAAAAIFAAAAAW4FAAAAAWcJAABoAAAAAgAAAAAAAAAACgUAAAABdAAAAAAAAAAAAgAAAAAAAAAABQAAAAAAAAAAAQAAAAAAAAAAAgUAAAAERE9XTgUAAAAFcHJpY2UAAAACAAAAAWkBAAAAEXN0YXJ0RHVja0hhdGNoaW5nAAAAAQAAAA5yZWZlcmVyQWRkcmVzcwQAAAAQdG90YWxEdWNrc0Ftb3VudAkBAAAADXRyeUdldEludGVnZXIAAAABAgAAAAxkdWNrc19hbW91bnQEAAAACmVnZ3NOZWVkZWQJAQAAABVjb3VudEVnZ3NOZWVkZWRBbW91bnQAAAABBQAAABB0b3RhbER1Y2tzQW1vdW50BAAAAAxmaXJzdFBheW1lbnQJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAADCQEAAAACIT0AAAACCAUAAAAMZmlyc3RQYXltZW50AAAAB2Fzc2V0SWQFAAAAC2VnZ3NBc3NldElkCQAAAgAAAAEJAAEsAAAAAgIAAAA8WW91IGNhbiBhdHRhY2ggb25seSBFR0cgdG9rZW5zIHdpdGggdGhlIGZvbGxvd2luZyBhc3NldCBpZDogCQACWAAAAAEFAAAAC2VnZ3NBc3NldElkAwkAAGYAAAACBQAAAAplZ2dzTmVlZGVkCAUAAAAMZmlyc3RQYXltZW50AAAABmFtb3VudAkAAAIAAAABCQABLAAAAAICAAAARFRvIGhhdGNoIGEgZHVjayB5b3UgY3VycmVudGx5IG5lZWQgdGhlIGZvbGxvd2luZyBhbW91bnQgb2YgRUdHbGV0czogCQABpAAAAAEFAAAACmVnZ3NOZWVkZWQEAAAADXJlZmVyZXJSZXdhcmQJAABoAAAAAgkAAGkAAAACCAUAAAAMZmlyc3RQYXltZW50AAAABmFtb3VudAAAAAAAAAAAZAUAAAANUmVmZXJlclJld2FyZAQAAAAHcmVmQ2FsbAkAA/wAAAAECQEAAAAHQWRkcmVzcwAAAAEFAAAAEnJlZkNvbnRyYWN0QWRkcmVzcwIAAAAKYWRkUmVmZXJhbAkABEwAAAACBQAAAA5yZWZlcmVyQWRkcmVzcwUAAAADbmlsCQAETAAAAAIJAQAAAA9BdHRhY2hlZFBheW1lbnQAAAACBQAAAAtlZ2dzQXNzZXRJZAUAAAANcmVmZXJlclJld2FyZAUAAAADbmlsAwkAAAAAAAACBQAAAAdyZWZDYWxsBQAAAAdyZWZDYWxsCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAQAAABRnZXRIYXRjaGluZ1N0YXR1c0tleQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyCAUAAAABaQAAAA10cmFuc2FjdGlvbklkBQAAAA9IYXRjaGluZ1N0YXJ0ZWQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAABpnZXRIYXRjaGluZ0ZpbmlzaEhlaWdodEtleQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyCAUAAAABaQAAAA10cmFuc2FjdGlvbklkCQAAZAAAAAIFAAAABmhlaWdodAUAAAAQZGVsYXlGb3JIYXRjaGluZwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAMZHVja3NfYW1vdW50CQAAZAAAAAIFAAAAEHRvdGFsRHVja3NBbW91bnQAAAAAAAAAAAEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAEGR1Y2tzX2xhc3RfcHJpY2UFAAAACmVnZ3NOZWVkZWQJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAWkAAAAGY2FsbGVyCQAAZQAAAAIIBQAAAAxmaXJzdFBheW1lbnQAAAAGYW1vdW50BQAAAAplZ2dzTmVlZGVkBQAAAAtlZ2dzQXNzZXRJZAUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFpAQAAABJmaW5pc2hEdWNrSGF0Y2hpbmcAAAABAAAAB3R4SWRTdHIEAAAABHR4SWQJAAJZAAAAAQUAAAAHdHhJZFN0cgQAAAARaGF0Y2hpbmdTdGF0dXNLZXkJAQAAABRnZXRIYXRjaGluZ1N0YXR1c0tleQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBQAAAAR0eElkBAAAAA9maW5pc2hIZWlnaHRLZXkJAQAAABpnZXRIYXRjaGluZ0ZpbmlzaEhlaWdodEtleQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBQAAAAR0eElkBAAAAAlkdWNrSWRLZXkJAQAAAAxnZXREdWNrSWRLZXkAAAACCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAAEdHhJZAQAAAAQaGF0Y2hpbmdUeFN0YXR1cwkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwUAAAARaGF0Y2hpbmdTdGF0dXNLZXkEAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0CQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAA9maW5pc2hIZWlnaHRLZXkDCQAAAAAAAAIFAAAAEGhhdGNoaW5nVHhTdGF0dXMFAAAAEEhhdGNoaW5nRmluaXNoZWQEAAAABmR1Y2tJZAkBAAAAEUBleHRyTmF0aXZlKDEwNTMpAAAAAgUAAAAEdGhpcwkBAAAADGdldER1Y2tJZEtleQAAAAIJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBQAAAAR0eElkCQAAAgAAAAEJAAEsAAAAAgIAAABAVGhlIGR1Y2sgd2FzIGhhdGNoZWQgYW5kIGNsYWltZWQgYWxyZWFkeSwgaGVyZSBpcyB0aGUgZm9sb3dpbmc6IAUAAAAGZHVja0lkAwkAAGYAAAACBQAAABRoYXRjaGluZ0ZpbmlzaEhlaWdodAUAAAAGaGVpZ2h0CQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAdSGF0Y2hpbmcgaXMgbm90IGZpbmlzaGVkIHlldCAJAAGkAAAAAQkAAGUAAAACBQAAABRoYXRjaGluZ0ZpbmlzaEhlaWdodAUAAAAGaGVpZ2h0AgAAACcgYmxvY2tzIHJlbWFpbmluZywgaXQgd2lsbCB0YWtlIGFyb3VuZCAJAAGkAAAAAQkAAGUAAAACBQAAABRoYXRjaGluZ0ZpbmlzaEhlaWdodAUAAAAGaGVpZ2h0AgAAAAggbWludXRlcwQAAAALJHQwNDYyNTQ2OTEJAQAAAA1nZXRSYW5kb21OYW1lAAAAAgUAAAAEdHhJZAUAAAAUaGF0Y2hpbmdGaW5pc2hIZWlnaHQEAAAAB2R1Y2tHZW4IBQAAAAskdDA0NjI1NDY5MQAAAAJfMQQAAAAHZmFybUdlbggFAAAACyR0MDQ2MjU0NjkxAAAAAl8yBAAAAAtkZXNjcmlwdGlvbgkAASwAAAACCQABLAAAAAICAAAADnsiZ2Vub3R5cGUiOiAiBQAAAAdkdWNrR2VuAgAAABkiLCAiY3Jvc3NicmVlZGluZyI6IHRydWV9BAAAAAVhc3NldAkABEMAAAAHBQAAAAdkdWNrR2VuBQAAAAtkZXNjcmlwdGlvbgAAAAAAAAAAAQAAAAAAAAAAAAcFAAAABHVuaXQFAAAAFGhhdGNoaW5nRmluaXNoSGVpZ2h0BAAAAAdhc3NldElkCQAEOAAAAAEFAAAABWFzc2V0BAAAAAZhbW91bnQJAABkAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABCQEAAAAPZ2V0RHVja1N0YXRzS2V5AAAAAQUAAAAHZHVja0dlbgAAAAAAAAAAAQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAABFoYXRjaGluZ1N0YXR1c0tleQUAAAAQSGF0Y2hpbmdGaW5pc2hlZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAlkdWNrSWRLZXkJAAJYAAAAAQUAAAAHYXNzZXRJZAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQACWAAAAAEFAAAAB2Fzc2V0SWQFAAAACWR1Y2tJZEtleQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAD2dldER1Y2tTdGF0c0tleQAAAAEFAAAAB2R1Y2tHZW4FAAAABmFtb3VudAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAABnN0YXRzXwUAAAAHZmFybUdlbgIAAAAJX3F1YW50aXR5CQAAZAAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkAASwAAAACCQABLAAAAAICAAAABnN0YXRzXwUAAAAHZmFybUdlbgIAAAAJX3F1YW50aXR5AAAAAAAAAAABCQAETAAAAAIFAAAABWFzc2V0CQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMIBQAAAAFpAAAABmNhbGxlcgAAAAAAAAAAAQUAAAAHYXNzZXRJZAUAAAADbmlsAAAAAQAAAAJ0eAEAAAAGdmVyaWZ5AAAAAAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXkrdpJt",
    "height": 2656489,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: CXAQE2sUzziUugnuDdd1QgowME2WvwuKftAau73VSrzV
Next: ADakz32FmbRV8AwejC9KNZrP2sY69rLPbGkv8SmMVY53

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

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'JCGDtrVy64cCJ1wCKfCaiNQMnyYwii71TbE5QeAHfxgF'

8	8		let discountCoefficient = 10
9	9
10	10		let typesAmount = 6
	11	+
	12	+	let refContractAddress = base58'3P8ejTkfRpz9WqCwCuihesNXU5k3zmFFfVe'
	13	+
	14	+	let RefererReward = 5
11	15
12	16		let HatchingStarted = "HATCHING_STARTED"
13	17

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

91	95		then throw(("You can attach only EGG tokens with the following asset id: " + toBase58String(eggsAssetId)))
92	96		else if ((eggsNeeded > firstPayment.amount))
93	97		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)]
	98	+	else {
	99	+	let refererReward = ((firstPayment.amount / 100) * RefererReward)
	100	+	let refCall = invoke(Address(refContractAddress), "addReferal", [refererAddress], [AttachedPayment(eggsAssetId, refererReward)])
	101	+	if ((refCall == refCall))
	102	+	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)]
	103	+	else throw("Strict value is not equal to itself.")
	104	+	}
95	105		}
96	106
97	107

112	122		else if ((hatchingFinishHeight > height))
113	123		then throw((((("Hatching is not finished yet " + toString((hatchingFinishHeight - height))) + " blocks remaining, it will take around ") + toString((hatchingFinishHeight - height))) + " minutes"))
114	124		else {
115		-	let $~~t042864352~~ = getRandomName(txId, hatchingFinishHeight)
116		-	let duckGen = $~~t042864352~~._1
117		-	let farmGen = $~~t042864352~~._2
	125	+	let $t046254691 = getRandomName(txId, hatchingFinishHeight)
	126	+	let duckGen = $t046254691._1
	127	+	let farmGen = $t046254691._2
118	128		let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
119	129		let asset = Issue(duckGen, description, 1, 0, false, unit, hatchingFinishHeight)
120	130		let assetId = calculateAssetId(asset)

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

github/deemru/w8io/786bc32 
59.52 ms ◑