tx · 4KboUXuq5jS38pW8vYv2jHBiP5iwUUJesVFJUU5LyfoP

3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6:  -0.01000000 Waves

2022.08.07 18:29 [3239738] smart account 3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "4KboUXuq5jS38pW8vYv2jHBiP5iwUUJesVFJUU5LyfoP",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1659886193800,
    "version": 2,
    "chainId": 87,
    "sender": "3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6",
    "senderPublicKey": "3xRzVfzGz2mW1Y3XAqQwVN4RiiWSgAHpLFmaF24hhfY9",
    "proofs": [
        "4bgzdyMs2hfEszzxZupN7BzLdN4hdLwdeStKmFTYewayLUsj3eT8VHpR9v872VKnQweAgzGug9BUAmyZtEuNwAdZ"
    ],
    "script": "base64:BgIUCAISAwoBCBIECgIICBIDCgEIEgAUARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJ0IAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYQUHJG1hdGNoMAUBYQIAARV0cnlHZXRJbnRlZ2VyRXh0ZXJuYWwCB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCaCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAEMdHJ5R2V0U3RyaW5nAQNrZXkJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIFBHRoaXMFA2tleQEJZ2V0T3JhY2xlAAkBB0FkZHJlc3MBCQDZBAEJAQx0cnlHZXRTdHJpbmcBAhRzdGF0aWNfb3JhY2xlQWRkcmVzcwEPZ2V0U3BpY2VBc3NldElkAAkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAITc3RhdGljX3NwaWNlQXNzZXRJZAERZ2V0QnJlZWRlckFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFXN0YXRpY19icmVlZGVyQWRkcmVzcwANRFVDS0xJTkdQUklDRQCAoJSljR0AFktHbG9iYWxJc3N1ZWRUaW1lc3RhbXACF2dsb2JhbF9pc3N1ZWRfdGltZXN0YW1wAQxrZXlUb3RhbEZlZWQBCmR1Y2tsaW5nSWQJAKwCAgkArAICAglkdWNrbGluZ18FCmR1Y2tsaW5nSWQCBV9mZWVkARtrZXlEdWNrbGluZ0ZlZExhc3RUaW1lc3RhbXABCmR1Y2tsaW5nSWQJAKwCAgkArAICAglkdWNrbGluZ18FCmR1Y2tsaW5nSWQCCl9mZWRMYXN0VHMBEGtleUR1Y2tsaW5nTGV2ZWwBCmR1Y2tsaW5nSWQJAKwCAgkArAICAglkdWNrbGluZ18FCmR1Y2tsaW5nSWQCBl9sZXZlbAEQa2V5RHVja2xpbmdHcm93bgEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIGX2dyb3duARJrZXlTdGFydFBlcmNlbnRhZ2UBCmR1Y2tsaW5nSWQJAKwCAgkArAICAglkdWNrbGluZ18FCmR1Y2tsaW5nSWQCEF9zdGFydFBlcmNlbnRhZ2UBCGtleU93bmVyAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgZfb3duZXIBDXRyeUdldEludGVnZXIBA2tleQQDdmFsBAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAUDdmFsAQdnZXRCb29sAQNrZXkEByRtYXRjaDAJAJsIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACB0Jvb2xlYW4EAWIFByRtYXRjaDAFAWIHARJnZXRDdXJyZW50TGV2ZWxJbnQBCmR1Y2tsaW5nSWQECmtEdWNrTGV2ZWwJARBrZXlEdWNrbGluZ0xldmVsAQUKZHVja2xpbmdJZAQHJG1hdGNoMAkAoggBBQprRHVja0xldmVsAwkAAQIFByRtYXRjaDACBlN0cmluZwQBcwUHJG1hdGNoMAkBDXBhcnNlSW50VmFsdWUBBQFzCQACAQIdQkdDTEJJOiBXZWlyZCB2YWx1ZSBkZXRlY3RlZCEBE2dldExhc3RGZWRUaW1lc3RhbXABCmR1Y2tsaW5nSWQEEGxhc3RGZWRUaW1lc3RhbXAJAQ10cnlHZXRJbnRlZ2VyAQkBG2tleUR1Y2tsaW5nRmVkTGFzdFRpbWVzdGFtcAEFCmR1Y2tsaW5nSWQDCQBmAgUQbGFzdEZlZFRpbWVzdGFtcAAABRBsYXN0RmVkVGltZXN0YW1wCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAEZY2FsY3VsYXRlTmV3RHVja2xpbmdMZXZlbAIKZHVja2xpbmdJZA1wYXltZW50QW1vdW50BAljdXJyZW50VHMIBQlsYXN0QmxvY2sJdGltZXN0YW1wBBdsYXN0RmVkVGltZXN0YW1wQ2hlY2tlZAkBE2dldExhc3RGZWRUaW1lc3RhbXABBQpkdWNrbGluZ0lkBAdmZWREaWZmCQBlAgUJY3VycmVudFRzBRdsYXN0RmVkVGltZXN0YW1wQ2hlY2tlZAQGZ3Jvd3RoBQ1wYXltZW50QW1vdW50BAxjdXJyZW50TGV2ZWwJARJnZXRDdXJyZW50TGV2ZWxJbnQBBQpkdWNrbGluZ0lkBAhuZXdMZXZlbAkAZAIFDGN1cnJlbnRMZXZlbAUNcGF5bWVudEFtb3VudAMJAGcCBQhuZXdMZXZlbAUNRFVDS0xJTkdQUklDRQkAAgEJAKwCAgkArAICAjJDQkRCOiBZb3UgYXJlIGZlZWRpbmcgeW91ciBkdWNrbGluZyB0byBtdWNoISBPbmx5IAkApAMBCQBlAgUNRFVDS0xJTkdQUklDRQUMY3VycmVudExldmVsAgduZWVkZWQhBAZyZXN1bHQJAKQDAQUIbmV3TGV2ZWwJAJQKAgUGcmVzdWx0CQDMCAIJAKwCAgINY3VycmVudExldmVsPQkApAMBBQxjdXJyZW50TGV2ZWwJAMwIAgkArAICAgluZXdMZXZlbD0JAKQDAQUIbmV3TGV2ZWwJAMwIAgkArAICAgdncm93dGg9CQCkAwEFBmdyb3d0aAkAzAgCCQCsAgICCmxhc3RGZWRUcz0JAKQDAQUXbGFzdEZlZFRpbWVzdGFtcENoZWNrZWQJAMwIAgkArAICAghmZWREaWZmPQkApAMBBQdmZWREaWZmBQNuaWwBBWFzSW50AQV2YWx1ZQQHJG1hdGNoMAUFdmFsdWUDCQABAgUHJG1hdGNoMAIDSW50BANpbnQFByRtYXRjaDAFA2ludAkAAgECHkJBSTogd3JvbmcgdHlwZSwgZXhwZWN0ZWQ6IEludAQBaQEPY29uZmlndXJlT3JhY2xlAQZvcmFjbGUDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAg9CQ086IGFkbWluIG9ubHkJAMwIAgkBC1N0cmluZ0VudHJ5AgIUc3RhdGljX29yYWNsZUFkZHJlc3MFBm9yYWNsZQUDbmlsAWkBDWlzc3VlRHVja2xpbmcCB2FkZHJlc3MHdHhJZFN0cgMJAQIhPQIIBQFpBmNhbGxlcgkBEWdldEJyZWVkZXJBZGRyZXNzAAkAAgECI0JJRkQ6IFlvdSBjYW4ndCBpc3N1ZSBmcmVlIGR1Y2tsaW5nBAVhc3NldAkAwwgHAhBCQUJZLTExMTExMTExLUhaAgAAAQAABwUEdW5pdAUGaGVpZ2h0BAdhc3NldElkCQC4CAEFBWFzc2V0CQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgUHYWRkcmVzcwIBXwUHdHhJZFN0cgIDX2RpCQDYBAEFB2Fzc2V0SWQJAMwIAgkBDEludGVnZXJFbnRyeQICDHN0YXRzX2Ftb3VudAkAZAIJAQ10cnlHZXRJbnRlZ2VyAQIMc3RhdHNfYW1vdW50AAEJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgkArAICAglkdWNrbGluZ18JANgEAQUHYXNzZXRJZAIRX2lzc3VlZEJ5RmVlZENhbGwJAAACCAUBaQZjYWxsZXIFBHRoaXMJAMwIAgkBDEludGVnZXJFbnRyeQIJARJrZXlTdGFydFBlcmNlbnRhZ2UBCQDYBAEFB2Fzc2V0SWQAAAkAzAgCCQELU3RyaW5nRW50cnkCCQEIa2V5T3duZXIBCQDYBAEFB2Fzc2V0SWQFB2FkZHJlc3MJAMwIAgUFYXNzZXQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBBXZhbHVlAQkApggBBQdhZGRyZXNzAAEFB2Fzc2V0SWQFA25pbAkA2AQBBQdhc3NldElkAWkBDGZlZWREdWNrbGluZwEKZHVja2xpbmdJZAQNYWRkcmVzc1N0cmluZwkApQgBCAUBaQZjYWxsZXIEDnJlYWxEdWNrbGluZ0lkAwMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQYJAQIhPQIICQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAkBD2dldFNwaWNlQXNzZXRJZAAJAAIBAi5CRkQ6IEJhZCBwYXltZW50IGF0dGFjaGVkIChhc3NldFtzXSBvciBhbW91bnQpAwkBB2dldEJvb2wBCQEQa2V5RHVja2xpbmdHcm93bgEFCmR1Y2tsaW5nSWQJAAIBAh5CRkQ6IER1Y2tsaW5nIGlzIGFscmVhZHkgZ3Jvd24DCQAAAgUKZHVja2xpbmdJZAIACQACAQIjQkZEOiBQbGVhc2UgaGF0Y2ggYSBkdWNrbGluZyBmaXJzdCEEDWR1Y2tsaW5nT3duZXIJAQx0cnlHZXRTdHJpbmcBCQEIa2V5T3duZXIBBQpkdWNrbGluZ0lkBA9kdWNrbGluZ0lkQ2hlY2sJAQV2YWx1ZQEJAOwHAQkA2QQBBQpkdWNrbGluZ0lkAwkBAiE9AgkA8AcCCAUBaQZjYWxsZXIIBQ9kdWNrbGluZ0lkQ2hlY2sCaWQAAQkAAgECKUJGRDogWW91J3JlIG5vdCB0aGUgb3duZXIgb2YgdGhlIGR1Y2tsaW5nAwkBAiE9AgUNZHVja2xpbmdPd25lcgkApQgBCAUBaQZjYWxsZXIJAAIBAj5CRkQ6IFlvdSBjYW4gb25seSBmZWVkIGR1Y2tsaW5ncyB0aGF0IHlvdSB3b24vYm91Z2h0IHlvdXJzZWxmIQMJAQIhPQIIBQ9kdWNrbGluZ0lkQ2hlY2sGaXNzdWVyBQR0aGlzCQACAQIkQkZEOiBDYW50IGZpbmQgZHVja2xpbmcgd2l0aCBzdWNoIGlkBBBkdWNrbGluZ0lkU3RyaW5nCQDYBAEIBQ9kdWNrbGluZ0lkQ2hlY2sCaWQFEGR1Y2tsaW5nSWRTdHJpbmcEEmtEdWNrbGluZ0xhc3RGZWRUcwkBG2tleUR1Y2tsaW5nRmVkTGFzdFRpbWVzdGFtcAEFCmR1Y2tsaW5nSWQEDmN1cnJlbnRQYXltZW50CAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQJa05ld0xldmVsCQEQa2V5RHVja2xpbmdMZXZlbAEFDnJlYWxEdWNrbGluZ0lkBAprVG90YWxGZWVkCQEMa2V5VG90YWxGZWVkAQUOcmVhbER1Y2tsaW5nSWQECXRvdGFsRmVlZAkBDXRyeUdldEludGVnZXIBBQprVG90YWxGZWVkBAxrRmVlZFR4U3RhdHMJAKwCAgkArAICCQCsAgICCWR1Y2tsaW5nXwUOcmVhbER1Y2tsaW5nSWQCBl9zdGF0XwkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQQY2FsY3VsYXRlUmVzdWx0cwkBGWNhbGN1bGF0ZU5ld0R1Y2tsaW5nTGV2ZWwCBQ5yZWFsRHVja2xpbmdJZAUOY3VycmVudFBheW1lbnQJAMwIAgkBDEludGVnZXJFbnRyeQIFEmtEdWNrbGluZ0xhc3RGZWRUcwgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIFCmtUb3RhbEZlZWQJAGQCBQl0b3RhbEZlZWQFDmN1cnJlbnRQYXltZW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQxrRmVlZFR4U3RhdHMFDmN1cnJlbnRQYXltZW50CQDMCAIJAQtTdHJpbmdFbnRyeQIFCWtOZXdMZXZlbAgFEGNhbGN1bGF0ZVJlc3VsdHMCXzEJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQxrRmVlZFR4U3RhdHMCBl9kZWJ1ZwkAuQkCCAUQY2FsY3VsYXRlUmVzdWx0cwJfMgIBOwUDbmlsAWkBFHR1cm5EdWNrbGluZ0ludG9EdWNrAAMJAQIhPQIIBQFpBmNhbGxlcgkBEWdldEJyZWVkZXJBZGRyZXNzAAkAAgECHUJJRkQ6IFlvdSBjYW4ndCB0dXJuIGR1Y2tsaW5nBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgQEdHhJZAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkBBRsYXN0SXNzdWVkRHVja2xpbmdUcwkBDXRyeUdldEludGVnZXIBBRZLR2xvYmFsSXNzdWVkVGltZXN0YW1wBAtmaXZlTWluSW5NcwkAaAIJAGgCAAEAPADoBwQIdGltZURpZmYJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAZAIFFGxhc3RJc3N1ZWREdWNrbGluZ1RzBQtmaXZlTWluSW5NcwMDCQBmAgUUbGFzdElzc3VlZER1Y2tsaW5nVHMAAAkAZgIAAAUIdGltZURpZmYHCQACAQkArAICCQCsAgICQkJURDogQ2FuIGlzc3VlIGR1Y2tsaW5ncyBvbmx5IG9uY2UgcGVyIDEgbWludXRlcywgcGxlYXNlIHdhaXQgZm9yIAkApAMBCQBrAwUIdGltZURpZmYAAQDoBwIFIHNlYy4DCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAi5CVEQ6IEJhZCBwYXltZW50IGF0dGFjaGVkIChhc3NldFtzXSBvciBhbW91bnQpBANwbXQJAQV2YWx1ZQEJAOwHAQkBBXZhbHVlAQgJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkAwkAZgIFDURVQ0tMSU5HUFJJQ0UJARJnZXRDdXJyZW50TGV2ZWxJbnQBCQDYBAEIBQNwbXQCaWQJAAIBAiFCVEQ6IER1Y2tsaW5nIGlzIG5vdCBncm93biB5ZXQuLi4DCQECIT0CCAUDcG10Bmlzc3VlcgUEdGhpcwkAAgECKkJURDogQ2FuIHVzZSBvbmx5IGR1Y2tsaW5ncyBmcm9tIHRoaXMgZEFwcAQOa0R1Y2tsaW5nR3Jvd24JARBrZXlEdWNrbGluZ0dyb3duAQkA2AQBCAUDcG10AmlkCQCUCgIJAMwIAgkBDEJvb2xlYW5FbnRyeQIFDmtEdWNrbGluZ0dyb3duBgkAzAgCCQEMSW50ZWdlckVudHJ5AgUWS0dsb2JhbElzc3VlZFRpbWVzdGFtcAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFA25pbAkA2AQBCAUDcG10AmlkAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleWgFTyg=",
    "height": 3239738,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4ynHFynA29tT4qZLxNtm46eUaA6TufWenat3vVswEF3F
Next: 7JByiCnT4eQHMio6XAXjaeqe22Ayd6JjRMFrQGZcmUAn

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

github/deemru/w8io/6500d08 
42.92 ms ◑