tx · EFxA8ZY9Q9meM2rg9yAUBgRz9hJYggVNqub7GWvYZD8p

3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6:  -0.01000000 Waves

2022.10.07 10:23 [3327069] smart account 3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "EFxA8ZY9Q9meM2rg9yAUBgRz9hJYggVNqub7GWvYZD8p",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1665127465551,
    "version": 2,
    "chainId": 87,
    "sender": "3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6",
    "senderPublicKey": "3xRzVfzGz2mW1Y3XAqQwVN4RiiWSgAHpLFmaF24hhfY9",
    "proofs": [
        "5eioHPnHZW8PhRzDFZtHdyH7NebJNPjpMiGHnSfLgGc3N2XZcx32rdztutT2JnrH2nLiaDmzQWJT7uaExQys5ozm"
    ],
    "script": "base64:BgIUCAISAwoBCBIECgIICBIDCgEIEgAWARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJ0IAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACBlN0cmluZwQBYQUHJG1hdGNoMAUBYQIAAQ5rZXlCbGFja2xpc3RlZAEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIMX2JsYWNrbGlzdGVkARV0cnlHZXRJbnRlZ2VyRXh0ZXJuYWwCB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCaCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAEMdHJ5R2V0U3RyaW5nAQNrZXkJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIFBHRoaXMFA2tleQEJZ2V0T3JhY2xlAAkBB0FkZHJlc3MBCQDZBAEJAQx0cnlHZXRTdHJpbmcBAhRzdGF0aWNfb3JhY2xlQWRkcmVzcwEPZ2V0U3BpY2VBc3NldElkAAkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAITc3RhdGljX3NwaWNlQXNzZXRJZAERZ2V0QnJlZWRlckFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFXN0YXRpY19icmVlZGVyQWRkcmVzcwANRFVDS0xJTkdQUklDRQCAyK+gJQAWS0dsb2JhbElzc3VlZFRpbWVzdGFtcAIXZ2xvYmFsX2lzc3VlZF90aW1lc3RhbXABDGtleVRvdGFsRmVlZAEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIFX2ZlZWQBG2tleUR1Y2tsaW5nRmVkTGFzdFRpbWVzdGFtcAEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIKX2ZlZExhc3RUcwEQa2V5RHVja2xpbmdMZXZlbAEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIGX2xldmVsARBrZXlEdWNrbGluZ0dyb3duAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgZfZ3Jvd24BEmtleVN0YXJ0UGVyY2VudGFnZQEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIQX3N0YXJ0UGVyY2VudGFnZQEIa2V5T3duZXIBCmR1Y2tsaW5nSWQJAKwCAgkArAICAglkdWNrbGluZ18FCmR1Y2tsaW5nSWQCBl9vd25lcgENdHJ5R2V0SW50ZWdlcgEDa2V5BAN2YWwEByRtYXRjaDAJAJoIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAABQN2YWwBB2dldEJvb2wBA2tleQQHJG1hdGNoMAkAmwgCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIHQm9vbGVhbgQBYgUHJG1hdGNoMAUBYgcBEmdldEN1cnJlbnRMZXZlbEludAEKZHVja2xpbmdJZAQKa0R1Y2tMZXZlbAkBEGtleUR1Y2tsaW5nTGV2ZWwBBQpkdWNrbGluZ0lkBAckbWF0Y2gwCQCiCAEFCmtEdWNrTGV2ZWwDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFzBQckbWF0Y2gwCQENcGFyc2VJbnRWYWx1ZQEFAXMDCQABAgUHJG1hdGNoMAIEVW5pdAQBdQUHJG1hdGNoMAAACQACAQIdQkdDTEJJOiBXZWlyZCB2YWx1ZSBkZXRlY3RlZCEBE2dldExhc3RGZWRUaW1lc3RhbXABCmR1Y2tsaW5nSWQEEGxhc3RGZWRUaW1lc3RhbXAJAQ10cnlHZXRJbnRlZ2VyAQkBG2tleUR1Y2tsaW5nRmVkTGFzdFRpbWVzdGFtcAEFCmR1Y2tsaW5nSWQDCQBmAgUQbGFzdEZlZFRpbWVzdGFtcAAABRBsYXN0RmVkVGltZXN0YW1wCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAEZY2FsY3VsYXRlTmV3RHVja2xpbmdMZXZlbAIKZHVja2xpbmdJZA1wYXltZW50QW1vdW50BAljdXJyZW50VHMIBQlsYXN0QmxvY2sJdGltZXN0YW1wBBdsYXN0RmVkVGltZXN0YW1wQ2hlY2tlZAkBE2dldExhc3RGZWRUaW1lc3RhbXABBQpkdWNrbGluZ0lkBAdmZWREaWZmCQBlAgUJY3VycmVudFRzBRdsYXN0RmVkVGltZXN0YW1wQ2hlY2tlZAQGZ3Jvd3RoBQ1wYXltZW50QW1vdW50BAxjdXJyZW50TGV2ZWwJARJnZXRDdXJyZW50TGV2ZWxJbnQBBQpkdWNrbGluZ0lkBAhuZXdMZXZlbAkAZAIFDGN1cnJlbnRMZXZlbAUNcGF5bWVudEFtb3VudAMJAGYCBQhuZXdMZXZlbAUNRFVDS0xJTkdQUklDRQkAAgEJAKwCAgkArAICAjNCQ05ETDogWW91IGFyZSBmZWVkaW5nIHlvdXIgZHVja2xpbmcgdG8gbXVjaCEgT25seSAJAKQDAQkAZQIFDURVQ0tMSU5HUFJJQ0UFDGN1cnJlbnRMZXZlbAIHbmVlZGVkIQQGcmVzdWx0CQCkAwEFCG5ld0xldmVsCQCUCgIFBnJlc3VsdAkAzAgCCQCsAgICDWN1cnJlbnRMZXZlbD0JAKQDAQUMY3VycmVudExldmVsCQDMCAIJAKwCAgIJbmV3TGV2ZWw9CQCkAwEFCG5ld0xldmVsCQDMCAIJAKwCAgIHZ3Jvd3RoPQkApAMBBQZncm93dGgJAMwIAgkArAICAgpsYXN0RmVkVHM9CQCkAwEFF2xhc3RGZWRUaW1lc3RhbXBDaGVja2VkCQDMCAIJAKwCAgIIZmVkRGlmZj0JAKQDAQUHZmVkRGlmZgUDbmlsAQVhc0ludAEFdmFsdWUEByRtYXRjaDAFBXZhbHVlAwkAAQIFByRtYXRjaDACA0ludAQDaW50BQckbWF0Y2gwBQNpbnQJAAIBAh5CQUk6IHdyb25nIHR5cGUsIGV4cGVjdGVkOiBJbnQBDXRyeUdldEJvb2xlYW4BA2tleQQHJG1hdGNoMAkAoAgBBQNrZXkDCQABAgUHJG1hdGNoMAIHQm9vbGVhbgQBYgUHJG1hdGNoMAUBYgcEAWkBD2NvbmZpZ3VyZU9yYWNsZQEGb3JhY2xlAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIPQkNPOiBhZG1pbiBvbmx5CQDMCAIJAQtTdHJpbmdFbnRyeQICFHN0YXRpY19vcmFjbGVBZGRyZXNzBQZvcmFjbGUFA25pbAFpAQ1pc3N1ZUR1Y2tsaW5nAgdhZGRyZXNzB3R4SWRTdHIDCQECIT0CCAUBaQZjYWxsZXIJARFnZXRCcmVlZGVyQWRkcmVzcwAJAAIBAiJCSUQ6IFlvdSBjYW4ndCBpc3N1ZSBmcmVlIGR1Y2tsaW5nBAVhc3NldAkAwwgHAhBCQUJZLTExMTExMTExLUhaAgAAAQAABwUEdW5pdAUGaGVpZ2h0BAdhc3NldElkCQC4CAEFBWFzc2V0CQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgUHYWRkcmVzcwIBXwUHdHhJZFN0cgIDX2RpCQDYBAEFB2Fzc2V0SWQJAMwIAgkBDEludGVnZXJFbnRyeQICDHN0YXRzX2Ftb3VudAkAZAIJAQ10cnlHZXRJbnRlZ2VyAQIMc3RhdHNfYW1vdW50AAEJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgkArAICAglkdWNrbGluZ18JANgEAQUHYXNzZXRJZAIRX2lzc3VlZEJ5RmVlZENhbGwJAAACCAUBaQZjYWxsZXIFBHRoaXMJAMwIAgkBDEludGVnZXJFbnRyeQIJARJrZXlTdGFydFBlcmNlbnRhZ2UBCQDYBAEFB2Fzc2V0SWQAAAkAzAgCCQELU3RyaW5nRW50cnkCCQEIa2V5T3duZXIBCQDYBAEFB2Fzc2V0SWQFB2FkZHJlc3MJAMwIAgUFYXNzZXQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBBXZhbHVlAQkApggBBQdhZGRyZXNzAAEFB2Fzc2V0SWQFA25pbAkA2AQBBQdhc3NldElkAWkBDGZlZWREdWNrbGluZwEKZHVja2xpbmdJZAQNYWRkcmVzc1N0cmluZwkApQgBCAUBaQZjYWxsZXIEDnJlYWxEdWNrbGluZ0lkAwMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQYJAQIhPQIICQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAkBD2dldFNwaWNlQXNzZXRJZAAJAAIBAi5CRkQ6IEJhZCBwYXltZW50IGF0dGFjaGVkIChhc3NldFtzXSBvciBhbW91bnQpBAtibGFja0xpc3RlZAkBDXRyeUdldEJvb2xlYW4BCQEOa2V5QmxhY2tsaXN0ZWQBBQpkdWNrbGluZ0lkAwULYmxhY2tMaXN0ZWQJAAIBAidCRkQ6IENhbiBub3QgZmVlZCBibGFja2xpc3RlZCBkdWNrbGluZyEDCQEHZ2V0Qm9vbAEJARBrZXlEdWNrbGluZ0dyb3duAQUKZHVja2xpbmdJZAkAAgECHkJGRDogRHVja2xpbmcgaXMgYWxyZWFkeSBncm93bgMJAAACBQpkdWNrbGluZ0lkAgAJAAIBAiNCRkQ6IFBsZWFzZSBoYXRjaCBhIGR1Y2tsaW5nIGZpcnN0IQQNZHVja2xpbmdPd25lcgkBDHRyeUdldFN0cmluZwEJAQhrZXlPd25lcgEFCmR1Y2tsaW5nSWQED2R1Y2tsaW5nSWRDaGVjawkBBXZhbHVlAQkA7AcBCQDZBAEFCmR1Y2tsaW5nSWQDCQECIT0CCQDwBwIIBQFpBmNhbGxlcggFD2R1Y2tsaW5nSWRDaGVjawJpZAABCQACAQIpQkZEOiBZb3UncmUgbm90IHRoZSBvd25lciBvZiB0aGUgZHVja2xpbmcDCQECIT0CBQ1kdWNrbGluZ093bmVyCQClCAEIBQFpBmNhbGxlcgkAAgECPkJGRDogWW91IGNhbiBvbmx5IGZlZWQgZHVja2xpbmdzIHRoYXQgeW91IHdvbi9ib3VnaHQgeW91cnNlbGYhAwkBAiE9AggFD2R1Y2tsaW5nSWRDaGVjawZpc3N1ZXIFBHRoaXMJAAIBAiRCRkQ6IENhbnQgZmluZCBkdWNrbGluZyB3aXRoIHN1Y2ggaWQEEGR1Y2tsaW5nSWRTdHJpbmcJANgEAQgFD2R1Y2tsaW5nSWRDaGVjawJpZAUQZHVja2xpbmdJZFN0cmluZwQSa0R1Y2tsaW5nTGFzdEZlZFRzCQEba2V5RHVja2xpbmdGZWRMYXN0VGltZXN0YW1wAQUKZHVja2xpbmdJZAQOY3VycmVudFBheW1lbnQICQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAlrTmV3TGV2ZWwJARBrZXlEdWNrbGluZ0xldmVsAQUOcmVhbER1Y2tsaW5nSWQECmtUb3RhbEZlZWQJAQxrZXlUb3RhbEZlZWQBBQ5yZWFsRHVja2xpbmdJZAQJdG90YWxGZWVkCQENdHJ5R2V0SW50ZWdlcgEFCmtUb3RhbEZlZWQEDGtGZWVkVHhTdGF0cwkArAICCQCsAgIJAKwCAgIJZHVja2xpbmdfBQ5yZWFsRHVja2xpbmdJZAIGX3N0YXRfCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wBBBjYWxjdWxhdGVSZXN1bHRzCQEZY2FsY3VsYXRlTmV3RHVja2xpbmdMZXZlbAIFDnJlYWxEdWNrbGluZ0lkBQ5jdXJyZW50UGF5bWVudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUSa0R1Y2tsaW5nTGFzdEZlZFRzCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgUKa1RvdGFsRmVlZAkAZAIFCXRvdGFsRmVlZAUOY3VycmVudFBheW1lbnQJAMwIAgkBDEludGVnZXJFbnRyeQIFDGtGZWVkVHhTdGF0cwUOY3VycmVudFBheW1lbnQJAMwIAgkBC1N0cmluZ0VudHJ5AgUJa05ld0xldmVsCAUQY2FsY3VsYXRlUmVzdWx0cwJfMQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFDGtGZWVkVHhTdGF0cwIGX2RlYnVnCQC5CQIIBRBjYWxjdWxhdGVSZXN1bHRzAl8yAgE7BQNuaWwBaQEUdHVybkR1Y2tsaW5nSW50b0R1Y2sAAwkBAiE9AggFAWkGY2FsbGVyCQERZ2V0QnJlZWRlckFkZHJlc3MACQACAQIeQlRESVQ6IFlvdSBjYW4ndCB0dXJuIGR1Y2tsaW5nBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgQEdHhJZAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkBBRsYXN0SXNzdWVkRHVja2xpbmdUcwkBDXRyeUdldEludGVnZXIBBRZLR2xvYmFsSXNzdWVkVGltZXN0YW1wBAtmaXZlTWluSW5NcwkAaAIJAGgCAAEAPADoBwQIdGltZURpZmYJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAZAIFFGxhc3RJc3N1ZWREdWNrbGluZ1RzBQtmaXZlTWluSW5NcwMDCQBmAgUUbGFzdElzc3VlZER1Y2tsaW5nVHMAAAkAZgIAAAUIdGltZURpZmYHCQACAQkArAICCQCsAgICREJURElUOiBDYW4gaXNzdWUgZHVja2xpbmdzIG9ubHkgb25jZSBwZXIgMSBtaW51dGVzLCBwbGVhc2Ugd2FpdCBmb3IgCQCkAwEJAGsDBQh0aW1lRGlmZgABAOgHAgUgc2VjLgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECMEJURElUOiBCYWQgcGF5bWVudCBhdHRhY2hlZCAoYXNzZXRbc10gb3IgYW1vdW50KQQDcG10CQEFdmFsdWUBCQDsBwEJAQV2YWx1ZQEICQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAHYXNzZXRJZAMJAGYCBQ1EVUNLTElOR1BSSUNFCQESZ2V0Q3VycmVudExldmVsSW50AQkA2AQBCAUDcG10AmlkCQACAQkArAICCQCsAgIJAKwCAgIjQlRESVQ6IER1Y2tsaW5nIGlzIG5vdCBncm93biB5ZXQuLi4JAKQDAQkBEmdldEN1cnJlbnRMZXZlbEludAEJANgEAQgFA3BtdAJpZAIBIAkApAMBBQ1EVUNLTElOR1BSSUNFAwkBAiE9AggFA3BtdAZpc3N1ZXIFBHRoaXMJAAIBAixCVERJVDogQ2FuIHVzZSBvbmx5IGR1Y2tsaW5ncyBmcm9tIHRoaXMgZEFwcAQOa0R1Y2tsaW5nR3Jvd24JARBrZXlEdWNrbGluZ0dyb3duAQkA2AQBCAUDcG10AmlkCQCUCgIJAMwIAgkBDEJvb2xlYW5FbnRyeQIFDmtEdWNrbGluZ0dyb3duBgkAzAgCCQEMSW50ZWdlckVudHJ5AgUWS0dsb2JhbElzc3VlZFRpbWVzdGFtcAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFA25pbAkA2AQBCAUDcG10AmlkAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleUoc91s=",
    "height": 3327069,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 5HpXcaWVjXEzwbZmmPFuCKkJ1oPtvLzVuFU6QDhVEWv1
Next: CgxpdVKq2T2bns6HGiuT9Yzqspt3USduzXmh294ziSbU

Diff: 
Old
New
Differences
9
9
 
}
10
10
 
11
11
 
12
+
func keyBlacklisted (ducklingId) = (("duckling_" + ducklingId) + "_blacklisted")
13
+
14
+
12
15
 
func tryGetIntegerExternal (address,key) = match getInteger(address, key) {
13
16
 
    case b: Int => 
14
17
 
        b
15
18
 
    case _ => 
16
19
 
        0
17
-
}
18
-
19
-
20
-
func tryGetBoolean (key) = match getBoolean(key) {
21
-
    case b: Boolean => 
22
-
        b
23
-
    case _ => 
24
-
        false
25
20
 
}
26
21
 
27
22
 
31
26
 
func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
32
27
 
33
28
 
34
-
func getDucklingPrice () = tryGetIntegerExternal(getOracle(), "static_ducklingPrice")
35
-
36
-
37
-
func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), "static_eggAssetId"))
38
-
39
-
40
29
 
func getSpiceAssetId () = fromBase58String(tryGetStringExternal(getOracle(), "static_spiceAssetId"))
41
30
 
42
31
 
43
-
func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))
32
+
func getBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_breederAddress")))
44
33
 
45
34
 
46
-
func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_incubatorAddress")))
47
-
48
-
49
-
func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_couponsAddress")))
50
-
51
-
52
-
func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_burnAddress")))
53
-
54
-
55
-
let backendPubKey = fromBase58String(getStringValue(getOracle(), "static_backendPubKey"))
56
-
57
-
let DUCKLINGPRICE = 100000000
58
-
59
-
let percentGrowthPrecision = 10000000000000000
60
-
61
-
let existingDuckPrecision = 100000000000000
35
+
let DUCKLINGPRICE = 10000000000
62
36
 
63
37
 
let KGlobalIssuedTimestamp = "global_issued_timestamp"
64
38
 
65
-
func keyTotalFeed (ducklingId) = (("duckling_" + ducklingId) + "_feed_spice")
39
+
func keyTotalFeed (ducklingId) = (("duckling_" + ducklingId) + "_feed")
66
40
 
67
41
 
68
-
func keyTotalFeedUser (address) = (("user_" + address) + "_feed")
69
-
70
-
71
-
func keyAddressNonce (address) = (("address_" + address) + "_nonce")
42
+
func keyDucklingFedLastTimestamp (ducklingId) = (("duckling_" + ducklingId) + "_fedLastTs")
72
43
 
73
44
 
74
45
 
func keyDucklingLevel (ducklingId) = (("duckling_" + ducklingId) + "_level")
81
52
 
82
53
 
83
54
 
func keyOwner (ducklingId) = (("duckling_" + ducklingId) + "_owner")
84
-
85
-
86
-
func keyBlacklisted (ducklingId) = (("duckling_" + ducklingId) + "_blacklisted")
87
55
 
88
56
 
89
57
 
func tryGetInteger (key) = {
105
73
 
}
106
74
 
107
75
 
108
-
func getDucklingPercentage (ducklingId) = {
109
-
    let percentageDuckling = tryGetInteger(keyStartPercentage(ducklingId))
110
-
    let base = if ((percentageDuckling != 0))
111
-
        then percentageDuckling
112
-
        else 20
113
-
    toBigInt((base * existingDuckPrecision))
76
+
func getCurrentLevelInt (ducklingId) = {
77
+
    let kDuckLevel = keyDucklingLevel(ducklingId)
78
+
    match getString(kDuckLevel) {
79
+
        case s: String => 
80
+
            parseIntValue(s)
81
+
        case u: Unit => 
82
+
            0
83
+
        case _ => 
84
+
            throw("BGCLBI: Weird value detected!")
85
+
    }
114
86
 
    }
115
87
 
116
88
 
117
-
func getCurrentLevelBigInt (ducklingId) = {
118
-
    let kDuckLevel = keyDucklingLevel(ducklingId)
119
-
    match getString(kDuckLevel) {
120
-
        case s: String => 
121
-
            parseBigIntValue(s)
122
-
        case _ => 
123
-
            match getBoolean((("duckling_" + ducklingId) + "_issuedByFeedCall")) {
124
-
                case b: Boolean => 
125
-
                    if ((b == true))
126
-
                        then toBigInt(0)
127
-
                        else getDucklingPercentage(ducklingId)
128
-
                case _ => 
129
-
                    getDucklingPercentage(ducklingId)
130
-
            }
131
-
    }
89
+
func getLastFedTimestamp (ducklingId) = {
90
+
    let lastFedTimestamp = tryGetInteger(keyDucklingFedLastTimestamp(ducklingId))
91
+
    if ((lastFedTimestamp > 0))
92
+
        then lastFedTimestamp
93
+
        else lastBlock.timestamp
132
94
 
    }
133
95
 
134
96
 
135
97
 
func calculateNewDucklingLevel (ducklingId,paymentAmount) = {
136
98
 
    let currentTs = lastBlock.timestamp
137
-
    let growth = fraction(toBigInt(paymentAmount), toBigInt(percentGrowthPrecision), toBigInt(DUCKLINGPRICE))
138
-
    let currentLevel = getCurrentLevelBigInt(ducklingId)
139
-
    let newLevel = (currentLevel + growth)
140
-
    let result = toString(newLevel)
141
-
    $Tuple2(result, [("currentLevel=" + toString(currentLevel)), ("newLevel=" + toString(newLevel)), ("growth=" + toString(growth))])
99
+
    let lastFedTimestampChecked = getLastFedTimestamp(ducklingId)
100
+
    let fedDiff = (currentTs - lastFedTimestampChecked)
101
+
    let growth = paymentAmount
102
+
    let currentLevel = getCurrentLevelInt(ducklingId)
103
+
    let newLevel = (currentLevel + paymentAmount)
104
+
    if ((newLevel > DUCKLINGPRICE))
105
+
        then throw((("BCNDL: You are feeding your duckling to much! Only " + toString((DUCKLINGPRICE - currentLevel))) + "needed!"))
106
+
        else {
107
+
            let result = toString(newLevel)
108
+
            $Tuple2(result, [("currentLevel=" + toString(currentLevel)), ("newLevel=" + toString(newLevel)), ("growth=" + toString(growth)), ("lastFedTs=" + toString(lastFedTimestampChecked)), ("fedDiff=" + toString(fedDiff))])
109
+
            }
142
110
 
    }
143
-
144
-
145
-
func getBackendProof (maxFeedAmount,userNonce,address) = makeString([toString(maxFeedAmount), toString(userNonce), address], ";")
146
111
 
147
112
 
148
113
 
func asInt (value) = match value {
150
115
 
        int
151
116
 
    case _ => 
152
117
 
        throw("BAI: wrong type, expected: Int")
118
+
}
119
+
120
+
121
+
func tryGetBoolean (key) = match getBoolean(key) {
122
+
    case b: Boolean => 
123
+
        b
124
+
    case _ => 
125
+
        false
153
126
 
}
154
127
 
155
128
 
161
134
 
162
135
 
163
136
 
@Callable(i)
164
-
func buyDuckling () = {
165
-
    let exactPrice = getDucklingPrice()
166
-
    if ((50000000 > exactPrice))
167
-
        then throw("BBD: Invalid price from oracle!")
137
+
func issueDuckling (address,txIdStr) = if ((i.caller != getBreederAddress()))
138
+
    then throw("BID: You can't issue free duckling")
139
+
    else {
140
+
        let asset = Issue("BABY-11111111-HZ", "", 1, 0, false, unit, height)
141
+
        let assetId = calculateAssetId(asset)
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
+
        }
144
+
145
+
146
+
147
+
@Callable(i)
148
+
func feedDuckling (ducklingId) = {
149
+
    let addressString = toString(i.caller)
150
+
    let realDucklingId = if (if ((size(i.payments) != 1))
151
+
        then true
152
+
        else (value(i.payments[0]).assetId != getSpiceAssetId()))
153
+
        then throw("BFD: Bad payment attached (asset[s] or amount)")
168
154
 
        else {
169
-
            let amountPaidByCoupons = asInt(invoke(getCouponsAddress(), "useCoupons", [exactPrice], nil))
170
-
            if ((amountPaidByCoupons == amountPaidByCoupons))
171
-
                then {
172
-
                    let leftToPay = (exactPrice - amountPaidByCoupons)
173
-
                    let payment = if ((leftToPay != 0))
174
-
                        then {
175
-
                            let firstPayment = value(i.payments[0])
176
-
                            if ((firstPayment.assetId != getEggAssetId()))
177
-
                                then throw(("BBD: You can attach only EGG tokens with the following asset id: " + toBase58String(getEggAssetId())))
178
-
                                else if ((firstPayment.amount != leftToPay))
179
-
                                    then throw(("BBD: To buy a perch you currently need the following amount of EGGlets: " + toString(leftToPay)))
180
-
                                    else {
181
-
                                        let burnCall = invoke(getBurnAddress(), "burnAttachedPayments", nil, [AttachedPayment(getEggAssetId(), leftToPay)])
182
-
                                        if ((burnCall == burnCall))
183
-
                                            then leftToPay
184
-
                                            else throw("Strict value is not equal to itself.")
185
-
                                        }
155
+
            let blackListed = tryGetBoolean(keyBlacklisted(ducklingId))
156
+
            if (blackListed)
157
+
                then throw("BFD: Can not feed blacklisted duckling!")
158
+
                else if (getBool(keyDucklingGrown(ducklingId)))
159
+
                    then throw("BFD: Duckling is already grown")
160
+
                    else if ((ducklingId == ""))
161
+
                        then throw("BFD: Please hatch a duckling first!")
162
+
                        else {
163
+
                            let ducklingOwner = tryGetString(keyOwner(ducklingId))
164
+
                            let ducklingIdCheck = value(assetInfo(fromBase58String(ducklingId)))
165
+
                            if ((assetBalance(i.caller, ducklingIdCheck.id) != 1))
166
+
                                then throw("BFD: You're not the owner of the duckling")
167
+
                                else if ((ducklingOwner != toString(i.caller)))
168
+
                                    then throw("BFD: You can only feed ducklings that you won/bought yourself!")
169
+
                                    else if ((ducklingIdCheck.issuer != this))
170
+
                                        then throw("BFD: Cant find duckling with such id")
171
+
                                        else {
172
+
                                            let ducklingIdString = toBase58String(ducklingIdCheck.id)
173
+
                                            ducklingIdString
174
+
                                            }
186
175
 
                            }
187
-
                        else 0
188
-
                    if ((payment == payment))
189
-
                        then {
190
-
                            let ducklingAssetId = invoke(this, "issueFreeDuckling", [toString(i.originCaller), toBase58String(i.transactionId), 0], nil)
191
-
                            if ((ducklingAssetId == ducklingAssetId))
192
-
                                then nil
193
-
                                else throw("Strict value is not equal to itself.")
194
-
                            }
195
-
                        else throw("Strict value is not equal to itself.")
196
-
                    }
197
-
                else throw("Strict value is not equal to itself.")
198
176
 
            }
177
+
    let kDucklingLastFedTs = keyDucklingFedLastTimestamp(ducklingId)
178
+
    let currentPayment = value(i.payments[0]).amount
179
+
    let kNewLevel = keyDucklingLevel(realDucklingId)
180
+
    let kTotalFeed = keyTotalFeed(realDucklingId)
181
+
    let totalFeed = tryGetInteger(kTotalFeed)
182
+
    let kFeedTxStats = ((("duckling_" + realDucklingId) + "_stat_") + toString(lastBlock.timestamp))
183
+
    let calculateResults = calculateNewDucklingLevel(realDucklingId, currentPayment)
184
+
[IntegerEntry(kDucklingLastFedTs, lastBlock.timestamp), IntegerEntry(kTotalFeed, (totalFeed + currentPayment)), IntegerEntry(kFeedTxStats, currentPayment), StringEntry(kNewLevel, calculateResults._1), StringEntry((kFeedTxStats + "_debug"), makeString(calculateResults._2, ";"))]
199
185
 
    }
200
186
 
201
187
 
202
188
 
203
189
 
@Callable(i)
204
-
func issueFreeDuckling (address,txIdStr,percentage) = if (if ((i.caller != this))
205
-
    then (i.caller != getRebirthAddress())
206
-
    else false)
207
-
    then throw("BIFD: You can't issue free duckling")
190
+
func turnDucklingIntoDuck () = if ((i.caller != getBreederAddress()))
191
+
    then throw("BTDIT: You can't turn duckling")
208
192
 
    else {
209
-
        let asset = Issue("BABY-11111111-GZ", "", 1, 0, false, unit, height)
210
-
        let assetId = calculateAssetId(asset)
211
-
        $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)), percentage), StringEntry(keyOwner(toBase58String(assetId)), address), asset, ScriptTransfer(value(addressFromString(address)), 1, assetId)], toBase58String(assetId))
193
+
        let address = toString(i.caller)
194
+
        let txId = toBase58String(i.transactionId)
195
+
        let lastIssuedDucklingTs = tryGetInteger(KGlobalIssuedTimestamp)
196
+
        let fiveMinInMs = ((1 * 60) * 1000)
197
+
        let timeDiff = (lastBlock.timestamp - (lastIssuedDucklingTs + fiveMinInMs))
198
+
        if (if ((lastIssuedDucklingTs > 0))
199
+
            then (0 > timeDiff)
200
+
            else false)
201
+
            then throw((("BTDIT: Can issue ducklings only once per 1 minutes, please wait for " + toString(fraction(timeDiff, 1, 1000))) + " sec."))
202
+
            else if ((size(i.payments) != 1))
203
+
                then throw("BTDIT: Bad payment attached (asset[s] or amount)")
204
+
                else {
205
+
                    let pmt = value(assetInfo(value(value(i.payments[0]).assetId)))
206
+
                    if ((DUCKLINGPRICE > getCurrentLevelInt(toBase58String(pmt.id))))
207
+
                        then throw(((("BTDIT: Duckling is not grown yet..." + toString(getCurrentLevelInt(toBase58String(pmt.id)))) + " ") + toString(DUCKLINGPRICE)))
208
+
                        else if ((pmt.issuer != this))
209
+
                            then throw("BTDIT: Can use only ducklings from this dApp")
210
+
                            else {
211
+
                                let kDucklingGrown = keyDucklingGrown(toBase58String(pmt.id))
212
+
                                $Tuple2([BooleanEntry(kDucklingGrown, true), IntegerEntry(KGlobalIssuedTimestamp, lastBlock.timestamp)], toBase58String(pmt.id))
213
+
                                }
214
+
                    }
212
215
 
        }
213
-
214
-
215
-
216
-
@Callable(i)
217
-
func feedDuckling (ducklingId,backendSignature,maxFeedAmount,userNonce) = {
218
-
    let addressString = toString(i.caller)
219
-
    let backendProof = getBackendProof(maxFeedAmount, userNonce, addressString)
220
-
    let kAddressNonce = keyAddressNonce(addressString)
221
-
    let currentNonce = tryGetInteger(kAddressNonce)
222
-
    let realDucklingId = if (!(sigVerify_8Kb(toBytes(backendProof), fromBase58String(backendSignature), backendPubKey)))
223
-
        then throw("BFD: Invalid proof from backend")
224
-
        else if (if ((size(i.payments) != 1))
225
-
            then true
226
-
            else (value(i.payments[0]).assetId != getSpiceAssetId()))
227
-
            then throw("BFD: Bad payment attached (asset[s] or amount)")
228
-
            else if (getBool(keyDucklingGrown(ducklingId)))
229
-
                then throw("BFD: Duckling is already grown")
230
-
                else if ((userNonce != (currentNonce + 1)))
231
-
                    then throw(((("BFD: User Nonce should be " + toString(currentNonce)) + " + 1, while received ") + toString(userNonce)))
232
-
                    else {
233
-
                        let blackListed = tryGetBoolean(keyBlacklisted(ducklingId))
234
-
                        if (blackListed)
235
-
                            then throw("BFD: Can not feed blacklisted duckling!")
236
-
                            else if ((ducklingId == ""))
237
-
                                then throw("BFD: Please buy a duckling first!")
238
-
                                else {
239
-
                                    let ducklingIdCheck = value(assetInfo(fromBase58String(ducklingId)))
240
-
                                    if ((assetBalance(i.caller, ducklingIdCheck.id) != 1))
241
-
                                        then throw("BFD: You're not the owner of the duckling")
242
-
                                        else if ((ducklingIdCheck.issuer != this))
243
-
                                            then throw("BFD: Cant find duckling with such id")
244
-
                                            else toBase58String(ducklingIdCheck.id)
245
-
                                    }
246
-
                        }
247
-
    let currentPayment = value(i.payments[0]).amount
248
-
    let kNewLevel = keyDucklingLevel(realDucklingId)
249
-
    let kTotalFeed = keyTotalFeed(realDucklingId)
250
-
    let kTotalFeedUser = keyTotalFeedUser(addressString)
251
-
    let totalFeed = tryGetInteger(kTotalFeed)
252
-
    let totalFeedUser = tryGetInteger(kTotalFeedUser)
253
-
    let kFeedTxStats = ((("duckling_" + realDucklingId) + "_stat_") + toString(lastBlock.timestamp))
254
-
    if ((currentPayment > maxFeedAmount))
255
-
        then throw(("BFD: Cannot feed duckling for such amount, max feed amount is: " + toString(maxFeedAmount)))
256
-
        else {
257
-
            let calculateResults = calculateNewDucklingLevel(realDucklingId, (currentPayment / 100))
258
-
            let ducklingOwner = tryGetString(keyOwner(realDucklingId))
259
-
            if ((ducklingOwner != toString(i.caller)))
260
-
                then [BooleanEntry(keyBlacklisted(realDucklingId), true)]
261
-
                else [IntegerEntry(kAddressNonce, (currentNonce + 1)), IntegerEntry(kTotalFeed, (totalFeed + currentPayment)), IntegerEntry(kTotalFeedUser, (totalFeedUser + currentPayment)), IntegerEntry(kFeedTxStats, currentPayment), StringEntry(kNewLevel, calculateResults._1), StringEntry((kFeedTxStats + "_debug"), makeString(calculateResults._2, ";"))]
262
-
            }
263
-
    }
264
-
265
-
266
-
267
-
@Callable(i)
268
-
func fixLevels (ducklingIds) = if (if ((i.callerPublicKey != base58'GDxBbsDRmeY39quNrDsTXKJzFWbQVtjxHseF4ikxZ7n9'))
269
-
    then (i.caller != this)
270
-
    else false)
271
-
    then throw("BFL: Not authorized")
272
-
    else {
273
-
        let ducklingIdsList = value(split(ducklingIds, ","))
274
-
        func handleId (acc,id) =         {
275
-
            let kTotalFeed = keyTotalFeed(id)
276
-
            let totalFeed = tryGetInteger(kTotalFeed)
277
-
            let kNewLevel = keyDucklingLevel(id)
278
-
            let startingLevel =             match getBoolean((("duckling_" + id) + "_issuedByFeedCall")) {
279
-
                case b: Boolean => 
280
-
                    if ((b == true))
281
-
                        then toBigInt(0)
282
-
                        else getDucklingPercentage(id)
283
-
                case _ => 
284
-
                    getDucklingPercentage(id)
285
-
            }
286
-
            let growth = fraction(toBigInt(totalFeed), toBigInt(percentGrowthPrecision), toBigInt(DUCKLINGPRICE))
287
-
            (acc ++ [StringEntry(kNewLevel, toString((startingLevel + growth)))])
288
-
            }
289
-
290
-
        let $l = ducklingIdsList
291
-
        let $s = size($l)
292
-
        let $acc0 = nil
293
-
        func $f0_1 ($a,$i) =         if (($i >= $s))
294
-
            then $a
295
-
            else handleId($a, $l[$i])
296
-
297
-
        func $f0_2 ($a,$i) =         if (($i >= $s))
298
-
            then $a
299
-
            else throw("List size exceeds 20")
300
-
301
-
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
302
-
        }
303
-
304
-
305
-
306
-
@Callable(i)
307
-
func turnDucklingIntoDuck () = {
308
-
    let address = toString(i.caller)
309
-
    let txId = toBase58String(i.transactionId)
310
-
    let lastIssuedDucklingTs = tryGetInteger(KGlobalIssuedTimestamp)
311
-
    let fiveMinInMs = ((5 * 60) * 1000)
312
-
    let timeDiff = (lastBlock.timestamp - (lastIssuedDucklingTs + fiveMinInMs))
313
-
    if (if ((lastIssuedDucklingTs > 0))
314
-
        then (0 > timeDiff)
315
-
        else false)
316
-
        then throw((("BTD: Can issue ducklings only once per 5 minutes, please wait for " + toString(fraction(timeDiff, 1, 1000))) + " sec."))
317
-
        else if ((size(i.payments) != 1))
318
-
            then throw("BTD: Bad payment attached (asset[s] or amount)")
319
-
            else {
320
-
                let pmt = value(assetInfo(value(value(i.payments[0]).assetId)))
321
-
                let blackListed = tryGetBoolean(keyBlacklisted(toBase58String(pmt.id)))
322
-
                if (blackListed)
323
-
                    then throw("BTD: Can not convert blacklisted duckling!")
324
-
                    else if ((toBigInt(percentGrowthPrecision) > getCurrentLevelBigInt(toBase58String(pmt.id))))
325
-
                        then throw("BTD: Duckling is not grown yet...")
326
-
                        else if ((pmt.issuer != this))
327
-
                            then throw("BTD: Can use only ducklings from this dApp")
328
-
                            else {
329
-
                                let call = invoke(getIncubatorAddress(), "startDuckHatching", [""], nil)
330
-
                                if ((call == call))
331
-
                                    then {
332
-
                                        let kDucklingGrown = keyDucklingGrown(toBase58String(pmt.id))
333
-
[BooleanEntry(kDucklingGrown, true), IntegerEntry(KGlobalIssuedTimestamp, lastBlock.timestamp)]
334
-
                                        }
335
-
                                    else throw("Strict value is not equal to itself.")
336
-
                                }
337
-
                }
338
-
    }
339
216
 
340
217
 
341
218
 
@Verifier(tx)
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
+
func keyBlacklisted (ducklingId) = (("duckling_" + ducklingId) + "_blacklisted")
13
+
14
+
12
15
 
func tryGetIntegerExternal (address,key) = match getInteger(address, key) {
13
16
 
    case b: Int => 
14
17
 
        b
15
18
 
    case _ => 
16
19
 
        0
17
-
}
18
-
19
-
20
-
func tryGetBoolean (key) = match getBoolean(key) {
21
-
    case b: Boolean => 
22
-
        b
23
-
    case _ => 
24
-
        false
25
20
 
}
26
21
 
27
22
 
28
23
 
func tryGetString (key) = tryGetStringExternal(this, key)
29
24
 
30
25
 
31
26
 
func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
32
27
 
33
28
 
34
-
func getDucklingPrice () = tryGetIntegerExternal(getOracle(), "static_ducklingPrice")
35
-
36
-
37
-
func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), "static_eggAssetId"))
38
-
39
-
40
29
 
func getSpiceAssetId () = fromBase58String(tryGetStringExternal(getOracle(), "static_spiceAssetId"))
41
30
 
42
31
 
43
-
func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))
32
+
func getBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_breederAddress")))
44
33
 
45
34
 
46
-
func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_incubatorAddress")))
47
-
48
-
49
-
func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_couponsAddress")))
50
-
51
-
52
-
func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_burnAddress")))
53
-
54
-
55
-
let backendPubKey = fromBase58String(getStringValue(getOracle(), "static_backendPubKey"))
56
-
57
-
let DUCKLINGPRICE = 100000000
58
-
59
-
let percentGrowthPrecision = 10000000000000000
60
-
61
-
let existingDuckPrecision = 100000000000000
35
+
let DUCKLINGPRICE = 10000000000
62
36
 
63
37
 
let KGlobalIssuedTimestamp = "global_issued_timestamp"
64
38
 
65
-
func keyTotalFeed (ducklingId) = (("duckling_" + ducklingId) + "_feed_spice")
39
+
func keyTotalFeed (ducklingId) = (("duckling_" + ducklingId) + "_feed")
66
40
 
67
41
 
68
-
func keyTotalFeedUser (address) = (("user_" + address) + "_feed")
69
-
70
-
71
-
func keyAddressNonce (address) = (("address_" + address) + "_nonce")
42
+
func keyDucklingFedLastTimestamp (ducklingId) = (("duckling_" + ducklingId) + "_fedLastTs")
72
43
 
73
44
 
74
45
 
func keyDucklingLevel (ducklingId) = (("duckling_" + ducklingId) + "_level")
75
46
 
76
47
 
77
48
 
func keyDucklingGrown (ducklingId) = (("duckling_" + ducklingId) + "_grown")
78
49
 
79
50
 
80
51
 
func keyStartPercentage (ducklingId) = (("duckling_" + ducklingId) + "_startPercentage")
81
52
 
82
53
 
83
54
 
func keyOwner (ducklingId) = (("duckling_" + ducklingId) + "_owner")
84
-
85
-
86
-
func keyBlacklisted (ducklingId) = (("duckling_" + ducklingId) + "_blacklisted")
87
55
 
88
56
 
89
57
 
func tryGetInteger (key) = {
90
58
 
    let val =     match getInteger(this, key) {
91
59
 
        case b: Int => 
92
60
 
            b
93
61
 
        case _ => 
94
62
 
            0
95
63
 
    }
96
64
 
    val
97
65
 
    }
98
66
 
99
67
 
100
68
 
func getBool (key) = match getBoolean(this, key) {
101
69
 
    case b: Boolean => 
102
70
 
        b
103
71
 
    case _ => 
104
72
 
        false
105
73
 
}
106
74
 
107
75
 
108
-
func getDucklingPercentage (ducklingId) = {
109
-
    let percentageDuckling = tryGetInteger(keyStartPercentage(ducklingId))
110
-
    let base = if ((percentageDuckling != 0))
111
-
        then percentageDuckling
112
-
        else 20
113
-
    toBigInt((base * existingDuckPrecision))
76
+
func getCurrentLevelInt (ducklingId) = {
77
+
    let kDuckLevel = keyDucklingLevel(ducklingId)
78
+
    match getString(kDuckLevel) {
79
+
        case s: String => 
80
+
            parseIntValue(s)
81
+
        case u: Unit => 
82
+
            0
83
+
        case _ => 
84
+
            throw("BGCLBI: Weird value detected!")
85
+
    }
114
86
 
    }
115
87
 
116
88
 
117
-
func getCurrentLevelBigInt (ducklingId) = {
118
-
    let kDuckLevel = keyDucklingLevel(ducklingId)
119
-
    match getString(kDuckLevel) {
120
-
        case s: String => 
121
-
            parseBigIntValue(s)
122
-
        case _ => 
123
-
            match getBoolean((("duckling_" + ducklingId) + "_issuedByFeedCall")) {
124
-
                case b: Boolean => 
125
-
                    if ((b == true))
126
-
                        then toBigInt(0)
127
-
                        else getDucklingPercentage(ducklingId)
128
-
                case _ => 
129
-
                    getDucklingPercentage(ducklingId)
130
-
            }
131
-
    }
89
+
func getLastFedTimestamp (ducklingId) = {
90
+
    let lastFedTimestamp = tryGetInteger(keyDucklingFedLastTimestamp(ducklingId))
91
+
    if ((lastFedTimestamp > 0))
92
+
        then lastFedTimestamp
93
+
        else lastBlock.timestamp
132
94
 
    }
133
95
 
134
96
 
135
97
 
func calculateNewDucklingLevel (ducklingId,paymentAmount) = {
136
98
 
    let currentTs = lastBlock.timestamp
137
-
    let growth = fraction(toBigInt(paymentAmount), toBigInt(percentGrowthPrecision), toBigInt(DUCKLINGPRICE))
138
-
    let currentLevel = getCurrentLevelBigInt(ducklingId)
139
-
    let newLevel = (currentLevel + growth)
140
-
    let result = toString(newLevel)
141
-
    $Tuple2(result, [("currentLevel=" + toString(currentLevel)), ("newLevel=" + toString(newLevel)), ("growth=" + toString(growth))])
99
+
    let lastFedTimestampChecked = getLastFedTimestamp(ducklingId)
100
+
    let fedDiff = (currentTs - lastFedTimestampChecked)
101
+
    let growth = paymentAmount
102
+
    let currentLevel = getCurrentLevelInt(ducklingId)
103
+
    let newLevel = (currentLevel + paymentAmount)
104
+
    if ((newLevel > DUCKLINGPRICE))
105
+
        then throw((("BCNDL: You are feeding your duckling to much! Only " + toString((DUCKLINGPRICE - currentLevel))) + "needed!"))
106
+
        else {
107
+
            let result = toString(newLevel)
108
+
            $Tuple2(result, [("currentLevel=" + toString(currentLevel)), ("newLevel=" + toString(newLevel)), ("growth=" + toString(growth)), ("lastFedTs=" + toString(lastFedTimestampChecked)), ("fedDiff=" + toString(fedDiff))])
109
+
            }
142
110
 
    }
143
-
144
-
145
-
func getBackendProof (maxFeedAmount,userNonce,address) = makeString([toString(maxFeedAmount), toString(userNonce), address], ";")
146
111
 
147
112
 
148
113
 
func asInt (value) = match value {
149
114
 
    case int: Int => 
150
115
 
        int
151
116
 
    case _ => 
152
117
 
        throw("BAI: wrong type, expected: Int")
118
+
}
119
+
120
+
121
+
func tryGetBoolean (key) = match getBoolean(key) {
122
+
    case b: Boolean => 
123
+
        b
124
+
    case _ => 
125
+
        false
153
126
 
}
154
127
 
155
128
 
156
129
 
@Callable(i)
157
130
 
func configureOracle (oracle) = if ((i.caller != this))
158
131
 
    then throw("BCO: admin only")
159
132
 
    else [StringEntry("static_oracleAddress", oracle)]
160
133
 
161
134
 
162
135
 
163
136
 
@Callable(i)
164
-
func buyDuckling () = {
165
-
    let exactPrice = getDucklingPrice()
166
-
    if ((50000000 > exactPrice))
167
-
        then throw("BBD: Invalid price from oracle!")
137
+
func issueDuckling (address,txIdStr) = if ((i.caller != getBreederAddress()))
138
+
    then throw("BID: You can't issue free duckling")
139
+
    else {
140
+
        let asset = Issue("BABY-11111111-HZ", "", 1, 0, false, unit, height)
141
+
        let assetId = calculateAssetId(asset)
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
+
        }
144
+
145
+
146
+
147
+
@Callable(i)
148
+
func feedDuckling (ducklingId) = {
149
+
    let addressString = toString(i.caller)
150
+
    let realDucklingId = if (if ((size(i.payments) != 1))
151
+
        then true
152
+
        else (value(i.payments[0]).assetId != getSpiceAssetId()))
153
+
        then throw("BFD: Bad payment attached (asset[s] or amount)")
168
154
 
        else {
169
-
            let amountPaidByCoupons = asInt(invoke(getCouponsAddress(), "useCoupons", [exactPrice], nil))
170
-
            if ((amountPaidByCoupons == amountPaidByCoupons))
171
-
                then {
172
-
                    let leftToPay = (exactPrice - amountPaidByCoupons)
173
-
                    let payment = if ((leftToPay != 0))
174
-
                        then {
175
-
                            let firstPayment = value(i.payments[0])
176
-
                            if ((firstPayment.assetId != getEggAssetId()))
177
-
                                then throw(("BBD: You can attach only EGG tokens with the following asset id: " + toBase58String(getEggAssetId())))
178
-
                                else if ((firstPayment.amount != leftToPay))
179
-
                                    then throw(("BBD: To buy a perch you currently need the following amount of EGGlets: " + toString(leftToPay)))
180
-
                                    else {
181
-
                                        let burnCall = invoke(getBurnAddress(), "burnAttachedPayments", nil, [AttachedPayment(getEggAssetId(), leftToPay)])
182
-
                                        if ((burnCall == burnCall))
183
-
                                            then leftToPay
184
-
                                            else throw("Strict value is not equal to itself.")
185
-
                                        }
155
+
            let blackListed = tryGetBoolean(keyBlacklisted(ducklingId))
156
+
            if (blackListed)
157
+
                then throw("BFD: Can not feed blacklisted duckling!")
158
+
                else if (getBool(keyDucklingGrown(ducklingId)))
159
+
                    then throw("BFD: Duckling is already grown")
160
+
                    else if ((ducklingId == ""))
161
+
                        then throw("BFD: Please hatch a duckling first!")
162
+
                        else {
163
+
                            let ducklingOwner = tryGetString(keyOwner(ducklingId))
164
+
                            let ducklingIdCheck = value(assetInfo(fromBase58String(ducklingId)))
165
+
                            if ((assetBalance(i.caller, ducklingIdCheck.id) != 1))
166
+
                                then throw("BFD: You're not the owner of the duckling")
167
+
                                else if ((ducklingOwner != toString(i.caller)))
168
+
                                    then throw("BFD: You can only feed ducklings that you won/bought yourself!")
169
+
                                    else if ((ducklingIdCheck.issuer != this))
170
+
                                        then throw("BFD: Cant find duckling with such id")
171
+
                                        else {
172
+
                                            let ducklingIdString = toBase58String(ducklingIdCheck.id)
173
+
                                            ducklingIdString
174
+
                                            }
186
175
 
                            }
187
-
                        else 0
188
-
                    if ((payment == payment))
189
-
                        then {
190
-
                            let ducklingAssetId = invoke(this, "issueFreeDuckling", [toString(i.originCaller), toBase58String(i.transactionId), 0], nil)
191
-
                            if ((ducklingAssetId == ducklingAssetId))
192
-
                                then nil
193
-
                                else throw("Strict value is not equal to itself.")
194
-
                            }
195
-
                        else throw("Strict value is not equal to itself.")
196
-
                    }
197
-
                else throw("Strict value is not equal to itself.")
198
176
 
            }
177
+
    let kDucklingLastFedTs = keyDucklingFedLastTimestamp(ducklingId)
178
+
    let currentPayment = value(i.payments[0]).amount
179
+
    let kNewLevel = keyDucklingLevel(realDucklingId)
180
+
    let kTotalFeed = keyTotalFeed(realDucklingId)
181
+
    let totalFeed = tryGetInteger(kTotalFeed)
182
+
    let kFeedTxStats = ((("duckling_" + realDucklingId) + "_stat_") + toString(lastBlock.timestamp))
183
+
    let calculateResults = calculateNewDucklingLevel(realDucklingId, currentPayment)
184
+
[IntegerEntry(kDucklingLastFedTs, lastBlock.timestamp), IntegerEntry(kTotalFeed, (totalFeed + currentPayment)), IntegerEntry(kFeedTxStats, currentPayment), StringEntry(kNewLevel, calculateResults._1), StringEntry((kFeedTxStats + "_debug"), makeString(calculateResults._2, ";"))]
199
185
 
    }
200
186
 
201
187
 
202
188
 
203
189
 
@Callable(i)
204
-
func issueFreeDuckling (address,txIdStr,percentage) = if (if ((i.caller != this))
205
-
    then (i.caller != getRebirthAddress())
206
-
    else false)
207
-
    then throw("BIFD: You can't issue free duckling")
190
+
func turnDucklingIntoDuck () = if ((i.caller != getBreederAddress()))
191
+
    then throw("BTDIT: You can't turn duckling")
208
192
 
    else {
209
-
        let asset = Issue("BABY-11111111-GZ", "", 1, 0, false, unit, height)
210
-
        let assetId = calculateAssetId(asset)
211
-
        $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)), percentage), StringEntry(keyOwner(toBase58String(assetId)), address), asset, ScriptTransfer(value(addressFromString(address)), 1, assetId)], toBase58String(assetId))
193
+
        let address = toString(i.caller)
194
+
        let txId = toBase58String(i.transactionId)
195
+
        let lastIssuedDucklingTs = tryGetInteger(KGlobalIssuedTimestamp)
196
+
        let fiveMinInMs = ((1 * 60) * 1000)
197
+
        let timeDiff = (lastBlock.timestamp - (lastIssuedDucklingTs + fiveMinInMs))
198
+
        if (if ((lastIssuedDucklingTs > 0))
199
+
            then (0 > timeDiff)
200
+
            else false)
201
+
            then throw((("BTDIT: Can issue ducklings only once per 1 minutes, please wait for " + toString(fraction(timeDiff, 1, 1000))) + " sec."))
202
+
            else if ((size(i.payments) != 1))
203
+
                then throw("BTDIT: Bad payment attached (asset[s] or amount)")
204
+
                else {
205
+
                    let pmt = value(assetInfo(value(value(i.payments[0]).assetId)))
206
+
                    if ((DUCKLINGPRICE > getCurrentLevelInt(toBase58String(pmt.id))))
207
+
                        then throw(((("BTDIT: Duckling is not grown yet..." + toString(getCurrentLevelInt(toBase58String(pmt.id)))) + " ") + toString(DUCKLINGPRICE)))
208
+
                        else if ((pmt.issuer != this))
209
+
                            then throw("BTDIT: Can use only ducklings from this dApp")
210
+
                            else {
211
+
                                let kDucklingGrown = keyDucklingGrown(toBase58String(pmt.id))
212
+
                                $Tuple2([BooleanEntry(kDucklingGrown, true), IntegerEntry(KGlobalIssuedTimestamp, lastBlock.timestamp)], toBase58String(pmt.id))
213
+
                                }
214
+
                    }
212
215
 
        }
213
-
214
-
215
-
216
-
@Callable(i)
217
-
func feedDuckling (ducklingId,backendSignature,maxFeedAmount,userNonce) = {
218
-
    let addressString = toString(i.caller)
219
-
    let backendProof = getBackendProof(maxFeedAmount, userNonce, addressString)
220
-
    let kAddressNonce = keyAddressNonce(addressString)
221
-
    let currentNonce = tryGetInteger(kAddressNonce)
222
-
    let realDucklingId = if (!(sigVerify_8Kb(toBytes(backendProof), fromBase58String(backendSignature), backendPubKey)))
223
-
        then throw("BFD: Invalid proof from backend")
224
-
        else if (if ((size(i.payments) != 1))
225
-
            then true
226
-
            else (value(i.payments[0]).assetId != getSpiceAssetId()))
227
-
            then throw("BFD: Bad payment attached (asset[s] or amount)")
228
-
            else if (getBool(keyDucklingGrown(ducklingId)))
229
-
                then throw("BFD: Duckling is already grown")
230
-
                else if ((userNonce != (currentNonce + 1)))
231
-
                    then throw(((("BFD: User Nonce should be " + toString(currentNonce)) + " + 1, while received ") + toString(userNonce)))
232
-
                    else {
233
-
                        let blackListed = tryGetBoolean(keyBlacklisted(ducklingId))
234
-
                        if (blackListed)
235
-
                            then throw("BFD: Can not feed blacklisted duckling!")
236
-
                            else if ((ducklingId == ""))
237
-
                                then throw("BFD: Please buy a duckling first!")
238
-
                                else {
239
-
                                    let ducklingIdCheck = value(assetInfo(fromBase58String(ducklingId)))
240
-
                                    if ((assetBalance(i.caller, ducklingIdCheck.id) != 1))
241
-
                                        then throw("BFD: You're not the owner of the duckling")
242
-
                                        else if ((ducklingIdCheck.issuer != this))
243
-
                                            then throw("BFD: Cant find duckling with such id")
244
-
                                            else toBase58String(ducklingIdCheck.id)
245
-
                                    }
246
-
                        }
247
-
    let currentPayment = value(i.payments[0]).amount
248
-
    let kNewLevel = keyDucklingLevel(realDucklingId)
249
-
    let kTotalFeed = keyTotalFeed(realDucklingId)
250
-
    let kTotalFeedUser = keyTotalFeedUser(addressString)
251
-
    let totalFeed = tryGetInteger(kTotalFeed)
252
-
    let totalFeedUser = tryGetInteger(kTotalFeedUser)
253
-
    let kFeedTxStats = ((("duckling_" + realDucklingId) + "_stat_") + toString(lastBlock.timestamp))
254
-
    if ((currentPayment > maxFeedAmount))
255
-
        then throw(("BFD: Cannot feed duckling for such amount, max feed amount is: " + toString(maxFeedAmount)))
256
-
        else {
257
-
            let calculateResults = calculateNewDucklingLevel(realDucklingId, (currentPayment / 100))
258
-
            let ducklingOwner = tryGetString(keyOwner(realDucklingId))
259
-
            if ((ducklingOwner != toString(i.caller)))
260
-
                then [BooleanEntry(keyBlacklisted(realDucklingId), true)]
261
-
                else [IntegerEntry(kAddressNonce, (currentNonce + 1)), IntegerEntry(kTotalFeed, (totalFeed + currentPayment)), IntegerEntry(kTotalFeedUser, (totalFeedUser + currentPayment)), IntegerEntry(kFeedTxStats, currentPayment), StringEntry(kNewLevel, calculateResults._1), StringEntry((kFeedTxStats + "_debug"), makeString(calculateResults._2, ";"))]
262
-
            }
263
-
    }
264
-
265
-
266
-
267
-
@Callable(i)
268
-
func fixLevels (ducklingIds) = if (if ((i.callerPublicKey != base58'GDxBbsDRmeY39quNrDsTXKJzFWbQVtjxHseF4ikxZ7n9'))
269
-
    then (i.caller != this)
270
-
    else false)
271
-
    then throw("BFL: Not authorized")
272
-
    else {
273
-
        let ducklingIdsList = value(split(ducklingIds, ","))
274
-
        func handleId (acc,id) =         {
275
-
            let kTotalFeed = keyTotalFeed(id)
276
-
            let totalFeed = tryGetInteger(kTotalFeed)
277
-
            let kNewLevel = keyDucklingLevel(id)
278
-
            let startingLevel =             match getBoolean((("duckling_" + id) + "_issuedByFeedCall")) {
279
-
                case b: Boolean => 
280
-
                    if ((b == true))
281
-
                        then toBigInt(0)
282
-
                        else getDucklingPercentage(id)
283
-
                case _ => 
284
-
                    getDucklingPercentage(id)
285
-
            }
286
-
            let growth = fraction(toBigInt(totalFeed), toBigInt(percentGrowthPrecision), toBigInt(DUCKLINGPRICE))
287
-
            (acc ++ [StringEntry(kNewLevel, toString((startingLevel + growth)))])
288
-
            }
289
-
290
-
        let $l = ducklingIdsList
291
-
        let $s = size($l)
292
-
        let $acc0 = nil
293
-
        func $f0_1 ($a,$i) =         if (($i >= $s))
294
-
            then $a
295
-
            else handleId($a, $l[$i])
296
-
297
-
        func $f0_2 ($a,$i) =         if (($i >= $s))
298
-
            then $a
299
-
            else throw("List size exceeds 20")
300
-
301
-
        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20)
302
-
        }
303
-
304
-
305
-
306
-
@Callable(i)
307
-
func turnDucklingIntoDuck () = {
308
-
    let address = toString(i.caller)
309
-
    let txId = toBase58String(i.transactionId)
310
-
    let lastIssuedDucklingTs = tryGetInteger(KGlobalIssuedTimestamp)
311
-
    let fiveMinInMs = ((5 * 60) * 1000)
312
-
    let timeDiff = (lastBlock.timestamp - (lastIssuedDucklingTs + fiveMinInMs))
313
-
    if (if ((lastIssuedDucklingTs > 0))
314
-
        then (0 > timeDiff)
315
-
        else false)
316
-
        then throw((("BTD: Can issue ducklings only once per 5 minutes, please wait for " + toString(fraction(timeDiff, 1, 1000))) + " sec."))
317
-
        else if ((size(i.payments) != 1))
318
-
            then throw("BTD: Bad payment attached (asset[s] or amount)")
319
-
            else {
320
-
                let pmt = value(assetInfo(value(value(i.payments[0]).assetId)))
321
-
                let blackListed = tryGetBoolean(keyBlacklisted(toBase58String(pmt.id)))
322
-
                if (blackListed)
323
-
                    then throw("BTD: Can not convert blacklisted duckling!")
324
-
                    else if ((toBigInt(percentGrowthPrecision) > getCurrentLevelBigInt(toBase58String(pmt.id))))
325
-
                        then throw("BTD: Duckling is not grown yet...")
326
-
                        else if ((pmt.issuer != this))
327
-
                            then throw("BTD: Can use only ducklings from this dApp")
328
-
                            else {
329
-
                                let call = invoke(getIncubatorAddress(), "startDuckHatching", [""], nil)
330
-
                                if ((call == call))
331
-
                                    then {
332
-
                                        let kDucklingGrown = keyDucklingGrown(toBase58String(pmt.id))
333
-
[BooleanEntry(kDucklingGrown, true), IntegerEntry(KGlobalIssuedTimestamp, lastBlock.timestamp)]
334
-
                                        }
335
-
                                    else throw("Strict value is not equal to itself.")
336
-
                                }
337
-
                }
338
-
    }
339
216
 
340
217
 
341
218
 
@Verifier(tx)
342
219
 
func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
343
220
 

github/deemru/w8io/3ef1775 
64.16 ms ◑