w8 · tx · EWD···9yy

tx · EWD4PHWUFdr3FsswiLSSCeXuzpbeGD9c5GaEpAhFD9yy

3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6:  -0.01000000 Waves

2022.08.11 11:38 [3245077] smart account 3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "EWD4PHWUFdr3FsswiLSSCeXuzpbeGD9c5GaEpAhFD9yy",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1660207131772,
    "version": 2,
    "chainId": 87,
    "sender": "3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6",
    "senderPublicKey": "3xRzVfzGz2mW1Y3XAqQwVN4RiiWSgAHpLFmaF24hhfY9",
    "proofs": [
        "3bd1qSyeM85UsYnnPQQCrrquGQWtCkyKiLLFaKF7k74iwtEvQWeW23NYPwYRLjWkjZSP9SgejkP6FLMY6326JNm9"
    ],
    "script": "base64:BgIUCAISAwoBCBIECgIICBIDCgEIEgAUARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJ0IAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYQUHJG1hdGNoMAUBYQIAARV0cnlHZXRJbnRlZ2VyRXh0ZXJuYWwCB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCaCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAEMdHJ5R2V0U3RyaW5nAQNrZXkJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIFBHRoaXMFA2tleQEJZ2V0T3JhY2xlAAkBB0FkZHJlc3MBCQDZBAEJAQx0cnlHZXRTdHJpbmcBAhRzdGF0aWNfb3JhY2xlQWRkcmVzcwEPZ2V0U3BpY2VBc3NldElkAAkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAITc3RhdGljX3NwaWNlQXNzZXRJZAERZ2V0QnJlZWRlckFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFXN0YXRpY19icmVlZGVyQWRkcmVzcwANRFVDS0xJTkdQUklDRQCAoJSljR0AFktHbG9iYWxJc3N1ZWRUaW1lc3RhbXACF2dsb2JhbF9pc3N1ZWRfdGltZXN0YW1wAQxrZXlUb3RhbEZlZWQBCmR1Y2tsaW5nSWQJAKwCAgkArAICAglkdWNrbGluZ18FCmR1Y2tsaW5nSWQCBV9mZWVkARtrZXlEdWNrbGluZ0ZlZExhc3RUaW1lc3RhbXABCmR1Y2tsaW5nSWQJAKwCAgkArAICAglkdWNrbGluZ18FCmR1Y2tsaW5nSWQCCl9mZWRMYXN0VHMBEGtleUR1Y2tsaW5nTGV2ZWwBCmR1Y2tsaW5nSWQJAKwCAgkArAICAglkdWNrbGluZ18FCmR1Y2tsaW5nSWQCBl9sZXZlbAEQa2V5RHVja2xpbmdHcm93bgEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIGX2dyb3duARJrZXlTdGFydFBlcmNlbnRhZ2UBCmR1Y2tsaW5nSWQJAKwCAgkArAICAglkdWNrbGluZ18FCmR1Y2tsaW5nSWQCEF9zdGFydFBlcmNlbnRhZ2UBCGtleU93bmVyAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgZfb3duZXIBDXRyeUdldEludGVnZXIBA2tleQQDdmFsBAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAUDdmFsAQdnZXRCb29sAQNrZXkEByRtYXRjaDAJAJsIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACB0Jvb2xlYW4EAWIFByRtYXRjaDAFAWIHARJnZXRDdXJyZW50TGV2ZWxJbnQBCmR1Y2tsaW5nSWQECmtEdWNrTGV2ZWwJARBrZXlEdWNrbGluZ0xldmVsAQUKZHVja2xpbmdJZAQHJG1hdGNoMAkAoggBBQprRHVja0xldmVsAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkBDXBhcnNlSW50VmFsdWUBBQFzAwkAAQIFByRtYXRjaDACBFVuaXQEAXUFByRtYXRjaDAAAAkAAgECHUJHQ0xCSTogV2VpcmQgdmFsdWUgZGV0ZWN0ZWQhARNnZXRMYXN0RmVkVGltZXN0YW1wAQpkdWNrbGluZ0lkBBBsYXN0RmVkVGltZXN0YW1wCQENdHJ5R2V0SW50ZWdlcgEJARtrZXlEdWNrbGluZ0ZlZExhc3RUaW1lc3RhbXABBQpkdWNrbGluZ0lkAwkAZgIFEGxhc3RGZWRUaW1lc3RhbXAAAAUQbGFzdEZlZFRpbWVzdGFtcAgFCWxhc3RCbG9jawl0aW1lc3RhbXABGWNhbGN1bGF0ZU5ld0R1Y2tsaW5nTGV2ZWwCCmR1Y2tsaW5nSWQNcGF5bWVudEFtb3VudAQJY3VycmVudFRzCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQXbGFzdEZlZFRpbWVzdGFtcENoZWNrZWQJARNnZXRMYXN0RmVkVGltZXN0YW1wAQUKZHVja2xpbmdJZAQHZmVkRGlmZgkAZQIFCWN1cnJlbnRUcwUXbGFzdEZlZFRpbWVzdGFtcENoZWNrZWQEBmdyb3d0aAUNcGF5bWVudEFtb3VudAQMY3VycmVudExldmVsCQESZ2V0Q3VycmVudExldmVsSW50AQUKZHVja2xpbmdJZAQIbmV3TGV2ZWwJAGQCBQxjdXJyZW50TGV2ZWwFDXBheW1lbnRBbW91bnQDCQBnAgUIbmV3TGV2ZWwFDURVQ0tMSU5HUFJJQ0UJAAIBCQCsAgIJAKwCAgIyQ0JEQjogWW91IGFyZSBmZWVkaW5nIHlvdXIgZHVja2xpbmcgdG8gbXVjaCEgT25seSAJAKQDAQkAZQIFDURVQ0tMSU5HUFJJQ0UFDGN1cnJlbnRMZXZlbAIHbmVlZGVkIQQGcmVzdWx0CQCkAwEFCG5ld0xldmVsCQCUCgIFBnJlc3VsdAkAzAgCCQCsAgICDWN1cnJlbnRMZXZlbD0JAKQDAQUMY3VycmVudExldmVsCQDMCAIJAKwCAgIJbmV3TGV2ZWw9CQCkAwEFCG5ld0xldmVsCQDMCAIJAKwCAgIHZ3Jvd3RoPQkApAMBBQZncm93dGgJAMwIAgkArAICAgpsYXN0RmVkVHM9CQCkAwEFF2xhc3RGZWRUaW1lc3RhbXBDaGVja2VkCQDMCAIJAKwCAgIIZmVkRGlmZj0JAKQDAQUHZmVkRGlmZgUDbmlsAQVhc0ludAEFdmFsdWUEByRtYXRjaDAFBXZhbHVlAwkAAQIFByRtYXRjaDACA0ludAQDaW50BQckbWF0Y2gwBQNpbnQJAAIBAh5CQUk6IHdyb25nIHR5cGUsIGV4cGVjdGVkOiBJbnQEAWkBD2NvbmZpZ3VyZU9yYWNsZQEGb3JhY2xlAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIPQkNPOiBhZG1pbiBvbmx5CQDMCAIJAQtTdHJpbmdFbnRyeQICFHN0YXRpY19vcmFjbGVBZGRyZXNzBQZvcmFjbGUFA25pbAFpAQ1pc3N1ZUR1Y2tsaW5nAgdhZGRyZXNzB3R4SWRTdHIDCQECIT0CCAUBaQZjYWxsZXIJARFnZXRCcmVlZGVyQWRkcmVzcwAJAAIBAiNCSUZEOiBZb3UgY2FuJ3QgaXNzdWUgZnJlZSBkdWNrbGluZwQFYXNzZXQJAMMIBwIQQkFCWS0xMTExMTExMS1IWgIAAAEAAAcFBHVuaXQFBmhlaWdodAQHYXNzZXRJZAkAuAgBBQVhc3NldAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgIFB2FkZHJlc3MCAV8FB3R4SWRTdHICA19kaQkA2AQBBQdhc3NldElkCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgxzdGF0c19hbW91bnQJAGQCCQENdHJ5R2V0SW50ZWdlcgECDHN0YXRzX2Ftb3VudAABCQDMCAIJAQxCb29sZWFuRW50cnkCCQCsAgIJAKwCAgIJZHVja2xpbmdfCQDYBAEFB2Fzc2V0SWQCEV9pc3N1ZWRCeUZlZWRDYWxsCQAAAggFAWkGY2FsbGVyBQR0aGlzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESa2V5U3RhcnRQZXJjZW50YWdlAQkA2AQBBQdhc3NldElkAAAJAMwIAgkBC1N0cmluZ0VudHJ5AgkBCGtleU93bmVyAQkA2AQBBQdhc3NldElkBQdhZGRyZXNzCQDMCAIFBWFzc2V0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQV2YWx1ZQEJAKYIAQUHYWRkcmVzcwABBQdhc3NldElkBQNuaWwJANgEAQUHYXNzZXRJZAFpAQxmZWVkRHVja2xpbmcBCmR1Y2tsaW5nSWQEDWFkZHJlc3NTdHJpbmcJAKUIAQgFAWkGY2FsbGVyBA5yZWFsRHVja2xpbmdJZAMDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEGCQECIT0CCAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAQ9nZXRTcGljZUFzc2V0SWQACQACAQIuQkZEOiBCYWQgcGF5bWVudCBhdHRhY2hlZCAoYXNzZXRbc10gb3IgYW1vdW50KQMJAQdnZXRCb29sAQkBEGtleUR1Y2tsaW5nR3Jvd24BBQpkdWNrbGluZ0lkCQACAQIeQkZEOiBEdWNrbGluZyBpcyBhbHJlYWR5IGdyb3duAwkAAAIFCmR1Y2tsaW5nSWQCAAkAAgECI0JGRDogUGxlYXNlIGhhdGNoIGEgZHVja2xpbmcgZmlyc3QhBA1kdWNrbGluZ093bmVyCQEMdHJ5R2V0U3RyaW5nAQkBCGtleU93bmVyAQUKZHVja2xpbmdJZAQPZHVja2xpbmdJZENoZWNrCQEFdmFsdWUBCQDsBwEJANkEAQUKZHVja2xpbmdJZAMJAQIhPQIJAPAHAggFAWkGY2FsbGVyCAUPZHVja2xpbmdJZENoZWNrAmlkAAEJAAIBAilCRkQ6IFlvdSdyZSBub3QgdGhlIG93bmVyIG9mIHRoZSBkdWNrbGluZwMJAQIhPQIFDWR1Y2tsaW5nT3duZXIJAKUIAQgFAWkGY2FsbGVyCQACAQI+QkZEOiBZb3UgY2FuIG9ubHkgZmVlZCBkdWNrbGluZ3MgdGhhdCB5b3Ugd29uL2JvdWdodCB5b3Vyc2VsZiEDCQECIT0CCAUPZHVja2xpbmdJZENoZWNrBmlzc3VlcgUEdGhpcwkAAgECJEJGRDogQ2FudCBmaW5kIGR1Y2tsaW5nIHdpdGggc3VjaCBpZAQQZHVja2xpbmdJZFN0cmluZwkA2AQBCAUPZHVja2xpbmdJZENoZWNrAmlkBRBkdWNrbGluZ0lkU3RyaW5nBBJrRHVja2xpbmdMYXN0RmVkVHMJARtrZXlEdWNrbGluZ0ZlZExhc3RUaW1lc3RhbXABBQpkdWNrbGluZ0lkBA5jdXJyZW50UGF5bWVudAgJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQECWtOZXdMZXZlbAkBEGtleUR1Y2tsaW5nTGV2ZWwBBQ5yZWFsRHVja2xpbmdJZAQKa1RvdGFsRmVlZAkBDGtleVRvdGFsRmVlZAEFDnJlYWxEdWNrbGluZ0lkBAl0b3RhbEZlZWQJAQ10cnlHZXRJbnRlZ2VyAQUKa1RvdGFsRmVlZAQMa0ZlZWRUeFN0YXRzCQCsAgIJAKwCAgkArAICAglkdWNrbGluZ18FDnJlYWxEdWNrbGluZ0lkAgZfc3RhdF8JAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXAEEGNhbGN1bGF0ZVJlc3VsdHMJARljYWxjdWxhdGVOZXdEdWNrbGluZ0xldmVsAgUOcmVhbER1Y2tsaW5nSWQFDmN1cnJlbnRQYXltZW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBRJrRHVja2xpbmdMYXN0RmVkVHMIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQDMCAIJAQxJbnRlZ2VyRW50cnkCBQprVG90YWxGZWVkCQBkAgUJdG90YWxGZWVkBQ5jdXJyZW50UGF5bWVudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUMa0ZlZWRUeFN0YXRzBQ5jdXJyZW50UGF5bWVudAkAzAgCCQELU3RyaW5nRW50cnkCBQlrTmV3TGV2ZWwIBRBjYWxjdWxhdGVSZXN1bHRzAl8xCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgUMa0ZlZWRUeFN0YXRzAgZfZGVidWcJALkJAggFEGNhbGN1bGF0ZVJlc3VsdHMCXzICATsFA25pbAFpARR0dXJuRHVja2xpbmdJbnRvRHVjawADCQECIT0CCAUBaQZjYWxsZXIJARFnZXRCcmVlZGVyQWRkcmVzcwAJAAIBAh1CSUZEOiBZb3UgY2FuJ3QgdHVybiBkdWNrbGluZwQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEBHR4SWQJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAQUbGFzdElzc3VlZER1Y2tsaW5nVHMJAQ10cnlHZXRJbnRlZ2VyAQUWS0dsb2JhbElzc3VlZFRpbWVzdGFtcAQLZml2ZU1pbkluTXMJAGgCCQBoAgABADwA6AcECHRpbWVEaWZmCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAJAGQCBRRsYXN0SXNzdWVkRHVja2xpbmdUcwULZml2ZU1pbkluTXMDAwkAZgIFFGxhc3RJc3N1ZWREdWNrbGluZ1RzAAAJAGYCAAAFCHRpbWVEaWZmBwkAAgEJAKwCAgkArAICAkJCVEQ6IENhbiBpc3N1ZSBkdWNrbGluZ3Mgb25seSBvbmNlIHBlciAxIG1pbnV0ZXMsIHBsZWFzZSB3YWl0IGZvciAJAKQDAQkAawMFCHRpbWVEaWZmAAEA6AcCBSBzZWMuAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABCQACAQIuQlREOiBCYWQgcGF5bWVudCBhdHRhY2hlZCAoYXNzZXRbc10gb3IgYW1vdW50KQQDcG10CQEFdmFsdWUBCQDsBwEJAQV2YWx1ZQEICQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAMJAGYCBQ1EVUNLTElOR1BSSUNFCQESZ2V0Q3VycmVudExldmVsSW50AQkA2AQBCAUDcG10AmlkCQACAQIhQlREOiBEdWNrbGluZyBpcyBub3QgZ3Jvd24geWV0Li4uAwkBAiE9AggFA3BtdAZpc3N1ZXIFBHRoaXMJAAIBAipCVEQ6IENhbiB1c2Ugb25seSBkdWNrbGluZ3MgZnJvbSB0aGlzIGRBcHAEDmtEdWNrbGluZ0dyb3duCQEQa2V5RHVja2xpbmdHcm93bgEJANgEAQgFA3BtdAJpZAkAlAoCCQDMCAIJAQxCb29sZWFuRW50cnkCBQ5rRHVja2xpbmdHcm93bgYJAMwIAgkBDEludGVnZXJFbnRyeQIFFktHbG9iYWxJc3N1ZWRUaW1lc3RhbXAIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQNuaWwJANgEAQgFA3BtdAJpZAECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXnKTxSH",
    "height": 3245077,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 7JByiCnT4eQHMio6XAXjaeqe22Ayd6JjRMFrQGZcmUAn
Next: CQpDCC4ud46YsG5CFNfv2V1WT2zdxGx6YxMFNNFjHS4L

Diff: 
Old New Differences
75 75      match getString(kDuckLevel) {
76 76          case s: String => 
77 77              parseIntValue(s)
78 +         case u: Unit => 
79 +             0
78 80          case _ => 
79 81              throw("BGCLBI: Weird value detected!")
80 82      }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  func tryGetStringExternal (address,key) = match getString(address, key) {
5 5      case a: String => 
6 6          a
7 7      case _ => 
8 8          ""
9 9  }
10 10  
11 11  
12 12  func tryGetIntegerExternal (address,key) = match getInteger(address, key) {
13 13      case b: Int => 
14 14          b
15 15      case _ => 
16 16          0
17 17  }
18 18  
19 19  
20 20  func tryGetString (key) = tryGetStringExternal(this, key)
21 21  
22 22  
23 23  func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
24 24  
25 25  
26 26  func getSpiceAssetId () = fromBase58String(tryGetStringExternal(getOracle(), "static_spiceAssetId"))
27 27  
28 28  
29 29  func getBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_breederAddress")))
30 30  
31 31  
32 32  let DUCKLINGPRICE = 1000000000000
33 33  
34 34  let KGlobalIssuedTimestamp = "global_issued_timestamp"
35 35  
36 36  func keyTotalFeed (ducklingId) = (("duckling_" + ducklingId) + "_feed")
37 37  
38 38  
39 39  func keyDucklingFedLastTimestamp (ducklingId) = (("duckling_" + ducklingId) + "_fedLastTs")
40 40  
41 41  
42 42  func keyDucklingLevel (ducklingId) = (("duckling_" + ducklingId) + "_level")
43 43  
44 44  
45 45  func keyDucklingGrown (ducklingId) = (("duckling_" + ducklingId) + "_grown")
46 46  
47 47  
48 48  func keyStartPercentage (ducklingId) = (("duckling_" + ducklingId) + "_startPercentage")
49 49  
50 50  
51 51  func keyOwner (ducklingId) = (("duckling_" + ducklingId) + "_owner")
52 52  
53 53  
54 54  func tryGetInteger (key) = {
55 55      let val =     match getInteger(this, key) {
56 56          case b: Int => 
57 57              b
58 58          case _ => 
59 59              0
60 60      }
61 61      val
62 62      }
63 63  
64 64  
65 65  func getBool (key) = match getBoolean(this, key) {
66 66      case b: Boolean => 
67 67          b
68 68      case _ => 
69 69          false
70 70  }
71 71  
72 72  
73 73  func getCurrentLevelInt (ducklingId) = {
74 74      let kDuckLevel = keyDucklingLevel(ducklingId)
75 75      match getString(kDuckLevel) {
76 76          case s: String => 
77 77              parseIntValue(s)
78 +         case u: Unit => 
79 +             0
78 80          case _ => 
79 81              throw("BGCLBI: Weird value detected!")
80 82      }
81 83      }
82 84  
83 85  
84 86  func getLastFedTimestamp (ducklingId) = {
85 87      let lastFedTimestamp = tryGetInteger(keyDucklingFedLastTimestamp(ducklingId))
86 88      if ((lastFedTimestamp > 0))
87 89          then lastFedTimestamp
88 90          else lastBlock.timestamp
89 91      }
90 92  
91 93  
92 94  func calculateNewDucklingLevel (ducklingId,paymentAmount) = {
93 95      let currentTs = lastBlock.timestamp
94 96      let lastFedTimestampChecked = getLastFedTimestamp(ducklingId)
95 97      let fedDiff = (currentTs - lastFedTimestampChecked)
96 98      let growth = paymentAmount
97 99      let currentLevel = getCurrentLevelInt(ducklingId)
98 100      let newLevel = (currentLevel + paymentAmount)
99 101      if ((newLevel >= DUCKLINGPRICE))
100 102          then throw((("CBDB: You are feeding your duckling to much! Only " + toString((DUCKLINGPRICE - currentLevel))) + "needed!"))
101 103          else {
102 104              let result = toString(newLevel)
103 105              $Tuple2(result, [("currentLevel=" + toString(currentLevel)), ("newLevel=" + toString(newLevel)), ("growth=" + toString(growth)), ("lastFedTs=" + toString(lastFedTimestampChecked)), ("fedDiff=" + toString(fedDiff))])
104 106              }
105 107      }
106 108  
107 109  
108 110  func asInt (value) = match value {
109 111      case int: Int => 
110 112          int
111 113      case _ => 
112 114          throw("BAI: wrong type, expected: Int")
113 115  }
114 116  
115 117  
116 118  @Callable(i)
117 119  func configureOracle (oracle) = if ((i.caller != this))
118 120      then throw("BCO: admin only")
119 121      else [StringEntry("static_oracleAddress", oracle)]
120 122  
121 123  
122 124  
123 125  @Callable(i)
124 126  func issueDuckling (address,txIdStr) = if ((i.caller != getBreederAddress()))
125 127      then throw("BIFD: You can't issue free duckling")
126 128      else {
127 129          let asset = Issue("BABY-11111111-HZ", "", 1, 0, false, unit, height)
128 130          let assetId = calculateAssetId(asset)
129 131          $Tuple2([StringEntry((((address + "_") + txIdStr) + "_di"), toBase58String(assetId)), IntegerEntry("stats_amount", (tryGetInteger("stats_amount") + 1)), BooleanEntry((("duckling_" + toBase58String(assetId)) + "_issuedByFeedCall"), (i.caller == this)), IntegerEntry(keyStartPercentage(toBase58String(assetId)), 0), StringEntry(keyOwner(toBase58String(assetId)), address), asset, ScriptTransfer(value(addressFromString(address)), 1, assetId)], toBase58String(assetId))
130 132          }
131 133  
132 134  
133 135  
134 136  @Callable(i)
135 137  func feedDuckling (ducklingId) = {
136 138      let addressString = toString(i.caller)
137 139      let realDucklingId = if (if ((size(i.payments) != 1))
138 140          then true
139 141          else (value(i.payments[0]).assetId != getSpiceAssetId()))
140 142          then throw("BFD: Bad payment attached (asset[s] or amount)")
141 143          else if (getBool(keyDucklingGrown(ducklingId)))
142 144              then throw("BFD: Duckling is already grown")
143 145              else if ((ducklingId == ""))
144 146                  then throw("BFD: Please hatch a duckling first!")
145 147                  else {
146 148                      let ducklingOwner = tryGetString(keyOwner(ducklingId))
147 149                      let ducklingIdCheck = value(assetInfo(fromBase58String(ducklingId)))
148 150                      if ((assetBalance(i.caller, ducklingIdCheck.id) != 1))
149 151                          then throw("BFD: You're not the owner of the duckling")
150 152                          else if ((ducklingOwner != toString(i.caller)))
151 153                              then throw("BFD: You can only feed ducklings that you won/bought yourself!")
152 154                              else if ((ducklingIdCheck.issuer != this))
153 155                                  then throw("BFD: Cant find duckling with such id")
154 156                                  else {
155 157                                      let ducklingIdString = toBase58String(ducklingIdCheck.id)
156 158                                      ducklingIdString
157 159                                      }
158 160                      }
159 161      let kDucklingLastFedTs = keyDucklingFedLastTimestamp(ducklingId)
160 162      let currentPayment = value(i.payments[0]).amount
161 163      let kNewLevel = keyDucklingLevel(realDucklingId)
162 164      let kTotalFeed = keyTotalFeed(realDucklingId)
163 165      let totalFeed = tryGetInteger(kTotalFeed)
164 166      let kFeedTxStats = ((("duckling_" + realDucklingId) + "_stat_") + toString(lastBlock.timestamp))
165 167      let calculateResults = calculateNewDucklingLevel(realDucklingId, currentPayment)
166 168  [IntegerEntry(kDucklingLastFedTs, lastBlock.timestamp), IntegerEntry(kTotalFeed, (totalFeed + currentPayment)), IntegerEntry(kFeedTxStats, currentPayment), StringEntry(kNewLevel, calculateResults._1), StringEntry((kFeedTxStats + "_debug"), makeString(calculateResults._2, ";"))]
167 169      }
168 170  
169 171  
170 172  
171 173  @Callable(i)
172 174  func turnDucklingIntoDuck () = if ((i.caller != getBreederAddress()))
173 175      then throw("BIFD: You can't turn duckling")
174 176      else {
175 177          let address = toString(i.caller)
176 178          let txId = toBase58String(i.transactionId)
177 179          let lastIssuedDucklingTs = tryGetInteger(KGlobalIssuedTimestamp)
178 180          let fiveMinInMs = ((1 * 60) * 1000)
179 181          let timeDiff = (lastBlock.timestamp - (lastIssuedDucklingTs + fiveMinInMs))
180 182          if (if ((lastIssuedDucklingTs > 0))
181 183              then (0 > timeDiff)
182 184              else false)
183 185              then throw((("BTD: Can issue ducklings only once per 1 minutes, please wait for " + toString(fraction(timeDiff, 1, 1000))) + " sec."))
184 186              else if ((size(i.payments) != 1))
185 187                  then throw("BTD: Bad payment attached (asset[s] or amount)")
186 188                  else {
187 189                      let pmt = value(assetInfo(value(value(i.payments[0]).assetId)))
188 190                      if ((DUCKLINGPRICE > getCurrentLevelInt(toBase58String(pmt.id))))
189 191                          then throw("BTD: Duckling is not grown yet...")
190 192                          else if ((pmt.issuer != this))
191 193                              then throw("BTD: Can use only ducklings from this dApp")
192 194                              else {
193 195                                  let kDucklingGrown = keyDucklingGrown(toBase58String(pmt.id))
194 196                                  $Tuple2([BooleanEntry(kDucklingGrown, true), IntegerEntry(KGlobalIssuedTimestamp, lastBlock.timestamp)], toBase58String(pmt.id))
195 197                                  }
196 198                      }
197 199          }
198 200  
199 201  
200 202  @Verifier(tx)
201 203  func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
202 204

Old	New		Differences
75	75		match getString(kDuckLevel) {
76	76		case s: String =>
77	77		parseIntValue(s)
	78	+	case u: Unit =>
	79	+	0
78	80		case _ =>
79	81		throw("BGCLBI: Weird value detected!")
80	82		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		func tryGetStringExternal (address,key) = match getString(address, key) {
5	5		case a: String =>
6	6		a
7	7		case _ =>
8	8		""
9	9		}
10	10
11	11
12	12		func tryGetIntegerExternal (address,key) = match getInteger(address, key) {
13	13		case b: Int =>
14	14		b
15	15		case _ =>
16	16		0
17	17		}
18	18
19	19
20	20		func tryGetString (key) = tryGetStringExternal(this, key)
21	21
22	22
23	23		func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
24	24
25	25
26	26		func getSpiceAssetId () = fromBase58String(tryGetStringExternal(getOracle(), "static_spiceAssetId"))
27	27
28	28
29	29		func getBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_breederAddress")))
30	30
31	31
32	32		let DUCKLINGPRICE = 1000000000000
33	33
34	34		let KGlobalIssuedTimestamp = "global_issued_timestamp"
35	35
36	36		func keyTotalFeed (ducklingId) = (("duckling_" + ducklingId) + "_feed")
37	37
38	38
39	39		func keyDucklingFedLastTimestamp (ducklingId) = (("duckling_" + ducklingId) + "_fedLastTs")
40	40
41	41
42	42		func keyDucklingLevel (ducklingId) = (("duckling_" + ducklingId) + "_level")
43	43
44	44
45	45		func keyDucklingGrown (ducklingId) = (("duckling_" + ducklingId) + "_grown")
46	46
47	47
48	48		func keyStartPercentage (ducklingId) = (("duckling_" + ducklingId) + "_startPercentage")
49	49
50	50
51	51		func keyOwner (ducklingId) = (("duckling_" + ducklingId) + "_owner")
52	52
53	53
54	54		func tryGetInteger (key) = {
55	55		let val = match getInteger(this, key) {
56	56		case b: Int =>
57	57		b
58	58		case _ =>
59	59		0
60	60		}
61	61		val
62	62		}
63	63
64	64
65	65		func getBool (key) = match getBoolean(this, key) {
66	66		case b: Boolean =>
67	67		b
68	68		case _ =>
69	69		false
70	70		}
71	71
72	72
73	73		func getCurrentLevelInt (ducklingId) = {
74	74		let kDuckLevel = keyDucklingLevel(ducklingId)
75	75		match getString(kDuckLevel) {
76	76		case s: String =>
77	77		parseIntValue(s)
	78	+	case u: Unit =>
	79	+	0
78	80		case _ =>
79	81		throw("BGCLBI: Weird value detected!")
80	82		}
81	83		}
82	84
83	85
84	86		func getLastFedTimestamp (ducklingId) = {
85	87		let lastFedTimestamp = tryGetInteger(keyDucklingFedLastTimestamp(ducklingId))
86	88		if ((lastFedTimestamp > 0))
87	89		then lastFedTimestamp
88	90		else lastBlock.timestamp
89	91		}
90	92
91	93
92	94		func calculateNewDucklingLevel (ducklingId,paymentAmount) = {
93	95		let currentTs = lastBlock.timestamp
94	96		let lastFedTimestampChecked = getLastFedTimestamp(ducklingId)
95	97		let fedDiff = (currentTs - lastFedTimestampChecked)
96	98		let growth = paymentAmount
97	99		let currentLevel = getCurrentLevelInt(ducklingId)
98	100		let newLevel = (currentLevel + paymentAmount)
99	101		if ((newLevel >= DUCKLINGPRICE))
100	102		then throw((("CBDB: You are feeding your duckling to much! Only " + toString((DUCKLINGPRICE - currentLevel))) + "needed!"))
101	103		else {
102	104		let result = toString(newLevel)
103	105		$Tuple2(result, [("currentLevel=" + toString(currentLevel)), ("newLevel=" + toString(newLevel)), ("growth=" + toString(growth)), ("lastFedTs=" + toString(lastFedTimestampChecked)), ("fedDiff=" + toString(fedDiff))])
104	106		}
105	107		}
106	108
107	109
108	110		func asInt (value) = match value {
109	111		case int: Int =>
110	112		int
111	113		case _ =>
112	114		throw("BAI: wrong type, expected: Int")
113	115		}
114	116
115	117
116	118		@Callable(i)
117	119		func configureOracle (oracle) = if ((i.caller != this))
118	120		then throw("BCO: admin only")
119	121		else [StringEntry("static_oracleAddress", oracle)]
120	122
121	123
122	124
123	125		@Callable(i)
124	126		func issueDuckling (address,txIdStr) = if ((i.caller != getBreederAddress()))
125	127		then throw("BIFD: You can't issue free duckling")
126	128		else {
127	129		let asset = Issue("BABY-11111111-HZ", "", 1, 0, false, unit, height)
128	130		let assetId = calculateAssetId(asset)
129	131		$Tuple2([StringEntry((((address + "_") + txIdStr) + "_di"), toBase58String(assetId)), IntegerEntry("stats_amount", (tryGetInteger("stats_amount") + 1)), BooleanEntry((("duckling_" + toBase58String(assetId)) + "_issuedByFeedCall"), (i.caller == this)), IntegerEntry(keyStartPercentage(toBase58String(assetId)), 0), StringEntry(keyOwner(toBase58String(assetId)), address), asset, ScriptTransfer(value(addressFromString(address)), 1, assetId)], toBase58String(assetId))
130	132		}
131	133
132	134
133	135
134	136		@Callable(i)
135	137		func feedDuckling (ducklingId) = {
136	138		let addressString = toString(i.caller)
137	139		let realDucklingId = if (if ((size(i.payments) != 1))
138	140		then true
139	141		else (value(i.payments[0]).assetId != getSpiceAssetId()))
140	142		then throw("BFD: Bad payment attached (asset[s] or amount)")
141	143		else if (getBool(keyDucklingGrown(ducklingId)))
142	144		then throw("BFD: Duckling is already grown")
143	145		else if ((ducklingId == ""))
144	146		then throw("BFD: Please hatch a duckling first!")
145	147		else {
146	148		let ducklingOwner = tryGetString(keyOwner(ducklingId))
147	149		let ducklingIdCheck = value(assetInfo(fromBase58String(ducklingId)))
148	150		if ((assetBalance(i.caller, ducklingIdCheck.id) != 1))
149	151		then throw("BFD: You're not the owner of the duckling")
150	152		else if ((ducklingOwner != toString(i.caller)))
151	153		then throw("BFD: You can only feed ducklings that you won/bought yourself!")
152	154		else if ((ducklingIdCheck.issuer != this))
153	155		then throw("BFD: Cant find duckling with such id")
154	156		else {
155	157		let ducklingIdString = toBase58String(ducklingIdCheck.id)
156	158		ducklingIdString
157	159		}
158	160		}
159	161		let kDucklingLastFedTs = keyDucklingFedLastTimestamp(ducklingId)
160	162		let currentPayment = value(i.payments[0]).amount
161	163		let kNewLevel = keyDucklingLevel(realDucklingId)
162	164		let kTotalFeed = keyTotalFeed(realDucklingId)
163	165		let totalFeed = tryGetInteger(kTotalFeed)
164	166		let kFeedTxStats = ((("duckling_" + realDucklingId) + "_stat_") + toString(lastBlock.timestamp))
165	167		let calculateResults = calculateNewDucklingLevel(realDucklingId, currentPayment)
166	168		[IntegerEntry(kDucklingLastFedTs, lastBlock.timestamp), IntegerEntry(kTotalFeed, (totalFeed + currentPayment)), IntegerEntry(kFeedTxStats, currentPayment), StringEntry(kNewLevel, calculateResults._1), StringEntry((kFeedTxStats + "_debug"), makeString(calculateResults._2, ";"))]
167	169		}
168	170
169	171
170	172
171	173		@Callable(i)
172	174		func turnDucklingIntoDuck () = if ((i.caller != getBreederAddress()))
173	175		then throw("BIFD: You can't turn duckling")
174	176		else {
175	177		let address = toString(i.caller)
176	178		let txId = toBase58String(i.transactionId)
177	179		let lastIssuedDucklingTs = tryGetInteger(KGlobalIssuedTimestamp)
178	180		let fiveMinInMs = ((1 * 60) * 1000)
179	181		let timeDiff = (lastBlock.timestamp - (lastIssuedDucklingTs + fiveMinInMs))
180	182		if (if ((lastIssuedDucklingTs > 0))
181	183		then (0 > timeDiff)
182	184		else false)
183	185		then throw((("BTD: Can issue ducklings only once per 1 minutes, please wait for " + toString(fraction(timeDiff, 1, 1000))) + " sec."))
184	186		else if ((size(i.payments) != 1))
185	187		then throw("BTD: Bad payment attached (asset[s] or amount)")
186	188		else {
187	189		let pmt = value(assetInfo(value(value(i.payments[0]).assetId)))
188	190		if ((DUCKLINGPRICE > getCurrentLevelInt(toBase58String(pmt.id))))
189	191		then throw("BTD: Duckling is not grown yet...")
190	192		else if ((pmt.issuer != this))
191	193		then throw("BTD: Can use only ducklings from this dApp")
192	194		else {
193	195		let kDucklingGrown = keyDucklingGrown(toBase58String(pmt.id))
194	196		$Tuple2([BooleanEntry(kDucklingGrown, true), IntegerEntry(KGlobalIssuedTimestamp, lastBlock.timestamp)], toBase58String(pmt.id))
195	197		}
196	198		}
197	199		}
198	200
199	201
200	202		@Verifier(tx)
201	203		func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
202	204

github/deemru/w8io/3ef1775 
38.95 ms ◑