w8 · tx · HVS···UEY

tx · HVSF1PzT5dhtLTYnTkeeKFRjhmvsWSQnQrwMtnwwPUEY

3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6:  -0.00600000 Waves

2022.08.11 12:12 [3245108] smart account 3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HVSF1PzT5dhtLTYnTkeeKFRjhmvsWSQnQrwMtnwwPUEY",
    "fee": 600000,
    "feeAssetId": null,
    "timestamp": 1660209195546,
    "version": 2,
    "chainId": 87,
    "sender": "3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6",
    "senderPublicKey": "3xRzVfzGz2mW1Y3XAqQwVN4RiiWSgAHpLFmaF24hhfY9",
    "proofs": [
        "3dbMi3JsfikQZy8sGoizpn3z7u9yuvGQEb2491EmfNttKZLFmjJ6dxAiDDgjrCgzEjnRNoEWVYEv2p11dkK4ZFVD"
    ],
    "script": "base64:BgIUCAISAwoBCBIECgIICBIDCgEIEgAWARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJ0IAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYQUHJG1hdGNoMAUBYQIAAQ5rZXlCbGFja2xpc3RlZAEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIMX2JsYWNrbGlzdGVkARV0cnlHZXRJbnRlZ2VyRXh0ZXJuYWwCB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCaCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAEMdHJ5R2V0U3RyaW5nAQNrZXkJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIFBHRoaXMFA2tleQEJZ2V0T3JhY2xlAAkBB0FkZHJlc3MBCQDZBAEJAQx0cnlHZXRTdHJpbmcBAhRzdGF0aWNfb3JhY2xlQWRkcmVzcwEPZ2V0U3BpY2VBc3NldElkAAkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAITc3RhdGljX3NwaWNlQXNzZXRJZAERZ2V0QnJlZWRlckFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFXN0YXRpY19icmVlZGVyQWRkcmVzcwANRFVDS0xJTkdQUklDRQCAyK+gJQAWS0dsb2JhbElzc3VlZFRpbWVzdGFtcAIXZ2xvYmFsX2lzc3VlZF90aW1lc3RhbXABDGtleVRvdGFsRmVlZAEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIFX2ZlZWQBG2tleUR1Y2tsaW5nRmVkTGFzdFRpbWVzdGFtcAEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIKX2ZlZExhc3RUcwEQa2V5RHVja2xpbmdMZXZlbAEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIGX2xldmVsARBrZXlEdWNrbGluZ0dyb3duAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgZfZ3Jvd24BEmtleVN0YXJ0UGVyY2VudGFnZQEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIQX3N0YXJ0UGVyY2VudGFnZQEIa2V5T3duZXIBCmR1Y2tsaW5nSWQJAKwCAgkArAICAglkdWNrbGluZ18FCmR1Y2tsaW5nSWQCBl9vd25lcgENdHJ5R2V0SW50ZWdlcgEDa2V5BAN2YWwEByRtYXRjaDAJAJoIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAABQN2YWwBB2dldEJvb2wBA2tleQQHJG1hdGNoMAkAmwgCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIHQm9vbGVhbgQBYgUHJG1hdGNoMAUBYgcBEmdldEN1cnJlbnRMZXZlbEludAEKZHVja2xpbmdJZAQKa0R1Y2tMZXZlbAkBEGtleUR1Y2tsaW5nTGV2ZWwBBQpkdWNrbGluZ0lkBAckbWF0Y2gwCQCiCAEFCmtEdWNrTGV2ZWwDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQENcGFyc2VJbnRWYWx1ZQEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAQBdQUHJG1hdGNoMAAACQACAQIdQkdDTEJJOiBXZWlyZCB2YWx1ZSBkZXRlY3RlZCEBE2dldExhc3RGZWRUaW1lc3RhbXABCmR1Y2tsaW5nSWQEEGxhc3RGZWRUaW1lc3RhbXAJAQ10cnlHZXRJbnRlZ2VyAQkBG2tleUR1Y2tsaW5nRmVkTGFzdFRpbWVzdGFtcAEFCmR1Y2tsaW5nSWQDCQBmAgUQbGFzdEZlZFRpbWVzdGFtcAAABRBsYXN0RmVkVGltZXN0YW1wCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAEZY2FsY3VsYXRlTmV3RHVja2xpbmdMZXZlbAIKZHVja2xpbmdJZA1wYXltZW50QW1vdW50BAljdXJyZW50VHMIBQlsYXN0QmxvY2sJdGltZXN0YW1wBBdsYXN0RmVkVGltZXN0YW1wQ2hlY2tlZAkBE2dldExhc3RGZWRUaW1lc3RhbXABBQpkdWNrbGluZ0lkBAdmZWREaWZmCQBlAgUJY3VycmVudFRzBRdsYXN0RmVkVGltZXN0YW1wQ2hlY2tlZAQGZ3Jvd3RoBQ1wYXltZW50QW1vdW50BAxjdXJyZW50TGV2ZWwJARJnZXRDdXJyZW50TGV2ZWxJbnQBBQpkdWNrbGluZ0lkBAhuZXdMZXZlbAkAZAIFDGN1cnJlbnRMZXZlbAUNcGF5bWVudEFtb3VudAMJAGYCBQhuZXdMZXZlbAUNRFVDS0xJTkdQUklDRQkAAgEJAKwCAgkArAICAjJDQkRCOiBZb3UgYXJlIGZlZWRpbmcgeW91ciBkdWNrbGluZyB0byBtdWNoISBPbmx5IAkApAMBCQBlAgUNRFVDS0xJTkdQUklDRQUMY3VycmVudExldmVsAgduZWVkZWQhBAZyZXN1bHQJAKQDAQUIbmV3TGV2ZWwJAJQKAgUGcmVzdWx0CQDMCAIJAKwCAgINY3VycmVudExldmVsPQkApAMBBQxjdXJyZW50TGV2ZWwJAMwIAgkArAICAgluZXdMZXZlbD0JAKQDAQUIbmV3TGV2ZWwJAMwIAgkArAICAgdncm93dGg9CQCkAwEFBmdyb3d0aAkAzAgCCQCsAgICCmxhc3RGZWRUcz0JAKQDAQUXbGFzdEZlZFRpbWVzdGFtcENoZWNrZWQJAMwIAgkArAICAghmZWREaWZmPQkApAMBBQdmZWREaWZmBQNuaWwBBWFzSW50AQV2YWx1ZQQHJG1hdGNoMAUFdmFsdWUDCQABAgUHJG1hdGNoMAIDSW50BANpbnQFByRtYXRjaDAFA2ludAkAAgECHkJBSTogd3JvbmcgdHlwZSwgZXhwZWN0ZWQ6IEludAENdHJ5R2V0Qm9vbGVhbgEDa2V5BAckbWF0Y2gwCQCgCAEFA2tleQMJAAECBQckbWF0Y2gwAgdCb29sZWFuBAFiBQckbWF0Y2gwBQFiBwQBaQEPY29uZmlndXJlT3JhY2xlAQZvcmFjbGUDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAg9CQ086IGFkbWluIG9ubHkJAMwIAgkBC1N0cmluZ0VudHJ5AgIUc3RhdGljX29yYWNsZUFkZHJlc3MFBm9yYWNsZQUDbmlsAWkBDWlzc3VlRHVja2xpbmcCB2FkZHJlc3MHdHhJZFN0cgMJAQIhPQIIBQFpBmNhbGxlcgkBEWdldEJyZWVkZXJBZGRyZXNzAAkAAgECI0JJRkQ6IFlvdSBjYW4ndCBpc3N1ZSBmcmVlIGR1Y2tsaW5nBAVhc3NldAkAwwgHAhBCQUJZLTExMTExMTExLUhaAgAAAQAABwUEdW5pdAUGaGVpZ2h0BAdhc3NldElkCQC4CAEFBWFzc2V0CQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgUHYWRkcmVzcwIBXwUHdHhJZFN0cgIDX2RpCQDYBAEFB2Fzc2V0SWQJAMwIAgkBDEludGVnZXJFbnRyeQICDHN0YXRzX2Ftb3VudAkAZAIJAQ10cnlHZXRJbnRlZ2VyAQIMc3RhdHNfYW1vdW50AAEJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgkArAICAglkdWNrbGluZ18JANgEAQUHYXNzZXRJZAIRX2lzc3VlZEJ5RmVlZENhbGwJAAACCAUBaQZjYWxsZXIFBHRoaXMJAMwIAgkBDEludGVnZXJFbnRyeQIJARJrZXlTdGFydFBlcmNlbnRhZ2UBCQDYBAEFB2Fzc2V0SWQAAAkAzAgCCQELU3RyaW5nRW50cnkCCQEIa2V5T3duZXIBCQDYBAEFB2Fzc2V0SWQFB2FkZHJlc3MJAMwIAgUFYXNzZXQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBBXZhbHVlAQkApggBBQdhZGRyZXNzAAEFB2Fzc2V0SWQFA25pbAkA2AQBBQdhc3NldElkAWkBDGZlZWREdWNrbGluZwEKZHVja2xpbmdJZAQNYWRkcmVzc1N0cmluZwkApQgBCAUBaQZjYWxsZXIEDnJlYWxEdWNrbGluZ0lkAwMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQYJAQIhPQIICQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAkBD2dldFNwaWNlQXNzZXRJZAAJAAIBAi5CRkQ6IEJhZCBwYXltZW50IGF0dGFjaGVkIChhc3NldFtzXSBvciBhbW91bnQpBAtibGFja0xpc3RlZAkBDXRyeUdldEJvb2xlYW4BCQEOa2V5QmxhY2tsaXN0ZWQBBQpkdWNrbGluZ0lkAwULYmxhY2tMaXN0ZWQJAAIBAidCRkQ6IENhbiBub3QgZmVlZCBibGFja2xpc3RlZCBkdWNrbGluZyEDCQEHZ2V0Qm9vbAEJARBrZXlEdWNrbGluZ0dyb3duAQUKZHVja2xpbmdJZAkAAgECHkJGRDogRHVja2xpbmcgaXMgYWxyZWFkeSBncm93bgMJAAACBQpkdWNrbGluZ0lkAgAJAAIBAiNCRkQ6IFBsZWFzZSBoYXRjaCBhIGR1Y2tsaW5nIGZpcnN0IQQNZHVja2xpbmdPd25lcgkBDHRyeUdldFN0cmluZwEJAQhrZXlPd25lcgEFCmR1Y2tsaW5nSWQED2R1Y2tsaW5nSWRDaGVjawkBBXZhbHVlAQkA7AcBCQDZBAEFCmR1Y2tsaW5nSWQDCQECIT0CCQDwBwIIBQFpBmNhbGxlcggFD2R1Y2tsaW5nSWRDaGVjawJpZAABCQACAQIpQkZEOiBZb3UncmUgbm90IHRoZSBvd25lciBvZiB0aGUgZHVja2xpbmcDCQECIT0CBQ1kdWNrbGluZ093bmVyCQClCAEIBQFpBmNhbGxlcgkAAgECPkJGRDogWW91IGNhbiBvbmx5IGZlZWQgZHVja2xpbmdzIHRoYXQgeW91IHdvbi9ib3VnaHQgeW91cnNlbGYhAwkBAiE9AggFD2R1Y2tsaW5nSWRDaGVjawZpc3N1ZXIFBHRoaXMJAAIBAiRCRkQ6IENhbnQgZmluZCBkdWNrbGluZyB3aXRoIHN1Y2ggaWQEEGR1Y2tsaW5nSWRTdHJpbmcJANgEAQgFD2R1Y2tsaW5nSWRDaGVjawJpZAUQZHVja2xpbmdJZFN0cmluZwQSa0R1Y2tsaW5nTGFzdEZlZFRzCQEba2V5RHVja2xpbmdGZWRMYXN0VGltZXN0YW1wAQUKZHVja2xpbmdJZAQOY3VycmVudFBheW1lbnQICQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAlrTmV3TGV2ZWwJARBrZXlEdWNrbGluZ0xldmVsAQUOcmVhbER1Y2tsaW5nSWQECmtUb3RhbEZlZWQJAQxrZXlUb3RhbEZlZWQBBQ5yZWFsRHVja2xpbmdJZAQJdG90YWxGZWVkCQENdHJ5R2V0SW50ZWdlcgEFCmtUb3RhbEZlZWQEDGtGZWVkVHhTdGF0cwkArAICCQCsAgIJAKwCAgIJZHVja2xpbmdfBQ5yZWFsRHVja2xpbmdJZAIGX3N0YXRfCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wBBBjYWxjdWxhdGVSZXN1bHRzCQEZY2FsY3VsYXRlTmV3RHVja2xpbmdMZXZlbAIFDnJlYWxEdWNrbGluZ0lkBQ5jdXJyZW50UGF5bWVudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUSa0R1Y2tsaW5nTGFzdEZlZFRzCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgUKa1RvdGFsRmVlZAkAZAIFCXRvdGFsRmVlZAUOY3VycmVudFBheW1lbnQJAMwIAgkBDEludGVnZXJFbnRyeQIFDGtGZWVkVHhTdGF0cwUOY3VycmVudFBheW1lbnQJAMwIAgkBC1N0cmluZ0VudHJ5AgUJa05ld0xldmVsCAUQY2FsY3VsYXRlUmVzdWx0cwJfMQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFDGtGZWVkVHhTdGF0cwIGX2RlYnVnCQC5CQIIBRBjYWxjdWxhdGVSZXN1bHRzAl8yAgE7BQNuaWwBaQEUdHVybkR1Y2tsaW5nSW50b0R1Y2sAAwkBAiE9AggFAWkGY2FsbGVyCQERZ2V0QnJlZWRlckFkZHJlc3MACQACAQIdQklGRDogWW91IGNhbid0IHR1cm4gZHVja2xpbmcEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyBAR0eElkCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQEFGxhc3RJc3N1ZWREdWNrbGluZ1RzCQENdHJ5R2V0SW50ZWdlcgEFFktHbG9iYWxJc3N1ZWRUaW1lc3RhbXAEC2ZpdmVNaW5Jbk1zCQBoAgkAaAIAAQA8AOgHBAh0aW1lRGlmZgkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQBkAgUUbGFzdElzc3VlZER1Y2tsaW5nVHMFC2ZpdmVNaW5Jbk1zAwMJAGYCBRRsYXN0SXNzdWVkRHVja2xpbmdUcwAACQBmAgAABQh0aW1lRGlmZgcJAAIBCQCsAgIJAKwCAgJCQlREOiBDYW4gaXNzdWUgZHVja2xpbmdzIG9ubHkgb25jZSBwZXIgMSBtaW51dGVzLCBwbGVhc2Ugd2FpdCBmb3IgCQCkAwEJAGsDBQh0aW1lRGlmZgABAOgHAgUgc2VjLgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECLkJURDogQmFkIHBheW1lbnQgYXR0YWNoZWQgKGFzc2V0W3NdIG9yIGFtb3VudCkEA3BtdAkBBXZhbHVlAQkA7AcBCQEFdmFsdWUBCAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQDCQBmAgUNRFVDS0xJTkdQUklDRQkBEmdldEN1cnJlbnRMZXZlbEludAEJANgEAQgFA3BtdAJpZAkAAgEJAKwCAgkArAICCQCsAgICIUJURDogRHVja2xpbmcgaXMgbm90IGdyb3duIHlldC4uLgkApAMBCQESZ2V0Q3VycmVudExldmVsSW50AQkA2AQBCAUDcG10AmlkAgEgCQCkAwEFDURVQ0tMSU5HUFJJQ0UDCQECIT0CCAUDcG10Bmlzc3VlcgUEdGhpcwkAAgECKkJURDogQ2FuIHVzZSBvbmx5IGR1Y2tsaW5ncyBmcm9tIHRoaXMgZEFwcAQOa0R1Y2tsaW5nR3Jvd24JARBrZXlEdWNrbGluZ0dyb3duAQkA2AQBCAUDcG10AmlkCQCUCgIJAMwIAgkBDEJvb2xlYW5FbnRyeQIFDmtEdWNrbGluZ0dyb3duBgkAzAgCCQEMSW50ZWdlckVudHJ5AgUWS0dsb2JhbElzc3VlZFRpbWVzdGFtcAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFA25pbAkA2AQBCAUDcG10AmlkAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleaMIkQk=",
    "height": 3245108,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 8yBjF3VRkWQqDtpTjt99pio6iv498FABJHEPRsK3mjVS
Next: 9UucCZm2RobSgxz8zYjLzGz4wUmhKW3PYF516sUWvKab

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

Old	New		Differences
101	101		let growth = paymentAmount
102	102		let currentLevel = getCurrentLevelInt(ducklingId)
103	103		let newLevel = (currentLevel + paymentAmount)
104		-	if ((newLevel >= DUCKLINGPRICE))
	104	+	if ((newLevel > DUCKLINGPRICE))
105	105		then throw((("CBDB: You are feeding your duckling to much! Only " + toString((DUCKLINGPRICE - currentLevel))) + "needed!"))
106	106		else {
107	107		let result = toString(newLevel)

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

github/deemru/w8io/3ef1775 
34.56 ms ◑