tx · CgxpdVKq2T2bns6HGiuT9Yzqspt3USduzXmh294ziSbU

3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6:  -0.01000000 Waves

2023.01.19 15:31 [3477327] smart account 3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "CgxpdVKq2T2bns6HGiuT9Yzqspt3USduzXmh294ziSbU",
    "fee": 1000000,
    "feeAssetId": null,
    "timestamp": 1674131520466,
    "version": 2,
    "chainId": 87,
    "sender": "3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6",
    "senderPublicKey": "3xRzVfzGz2mW1Y3XAqQwVN4RiiWSgAHpLFmaF24hhfY9",
    "proofs": [
        "2LPMEJS8KKtaQhY7hKVPn1oiuevu7tn8SAEnjRR9qsmzMbFsDzw8iVFR7zeDH6aXK3NYVeiVTQYwNgq5Byb6o5hh"
    ],
    "script": "base64:BgIWCAISAwoBCBIGCgQICAEIEgMKAQgSABgBFHRyeUdldFN0cmluZ0V4dGVybmFsAgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAnQgCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFhBQckbWF0Y2gwBQFhAgABDmtleUJsYWNrbGlzdGVkAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgxfYmxhY2tsaXN0ZWQBFXRyeUdldEludGVnZXJFeHRlcm5hbAIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJoIAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAAAQx0cnlHZXRTdHJpbmcBA2tleQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgUEdGhpcwUDa2V5AQlnZXRPcmFjbGUACQEHQWRkcmVzcwEJANkEAQkBDHRyeUdldFN0cmluZwECFHN0YXRpY19vcmFjbGVBZGRyZXNzAQ9nZXRTcGljZUFzc2V0SWQACQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhNzdGF0aWNfc3BpY2VBc3NldElkARFnZXRCcmVlZGVyQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIVc3RhdGljX2JyZWVkZXJBZGRyZXNzABZLR2xvYmFsSXNzdWVkVGltZXN0YW1wAhdnbG9iYWxfaXNzdWVkX3RpbWVzdGFtcAEMa2V5VG90YWxGZWVkAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgVfZmVlZAEGa2V5R2VuAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgRfZ2VuAQ1rZXlGZWVkTmVlZGVkAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgtfZmVlZE5lZWRlZAEQZ2V0RHVja2xpbmdQcmljZQEKZHVja2xpbmdJZAQDa2V5CQENa2V5RmVlZE5lZWRlZAEFCmR1Y2tsaW5nSWQEByRtYXRjaDAJAJoIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAkAaAIFAWIAgMLXLwCAoNnmHQEba2V5RHVja2xpbmdGZWRMYXN0VGltZXN0YW1wAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgpfZmVkTGFzdFRzARBrZXlEdWNrbGluZ0xldmVsAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgZfbGV2ZWwBEGtleUR1Y2tsaW5nR3Jvd24BCmR1Y2tsaW5nSWQJAKwCAgkArAICAglkdWNrbGluZ18FCmR1Y2tsaW5nSWQCBl9ncm93bgESa2V5U3RhcnRQZXJjZW50YWdlAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAhBfc3RhcnRQZXJjZW50YWdlAQhrZXlPd25lcgEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIGX293bmVyAQ10cnlHZXRJbnRlZ2VyAQNrZXkEA3ZhbAQHJG1hdGNoMAkAmggCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAAFA3ZhbAEHZ2V0Qm9vbAEDa2V5BAckbWF0Y2gwCQCbCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgdCb29sZWFuBAFiBQckbWF0Y2gwBQFiBwESZ2V0Q3VycmVudExldmVsSW50AQpkdWNrbGluZ0lkBAprRHVja0xldmVsCQEQa2V5RHVja2xpbmdMZXZlbAEFCmR1Y2tsaW5nSWQEByRtYXRjaDAJAKIIAQUKa0R1Y2tMZXZlbAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJAQ1wYXJzZUludFZhbHVlAQUBcwMJAAECBQckbWF0Y2gwAgRVbml0BAF1BQckbWF0Y2gwAAAJAAIBAh1CR0NMQkk6IFdlaXJkIHZhbHVlIGRldGVjdGVkIQETZ2V0TGFzdEZlZFRpbWVzdGFtcAEKZHVja2xpbmdJZAQQbGFzdEZlZFRpbWVzdGFtcAkBDXRyeUdldEludGVnZXIBCQEba2V5RHVja2xpbmdGZWRMYXN0VGltZXN0YW1wAQUKZHVja2xpbmdJZAMJAGYCBRBsYXN0RmVkVGltZXN0YW1wAAAFEGxhc3RGZWRUaW1lc3RhbXAIBQlsYXN0QmxvY2sJdGltZXN0YW1wARljYWxjdWxhdGVOZXdEdWNrbGluZ0xldmVsAgpkdWNrbGluZ0lkDXBheW1lbnRBbW91bnQECWN1cnJlbnRUcwgFCWxhc3RCbG9jawl0aW1lc3RhbXAEF2xhc3RGZWRUaW1lc3RhbXBDaGVja2VkCQETZ2V0TGFzdEZlZFRpbWVzdGFtcAEFCmR1Y2tsaW5nSWQEB2ZlZERpZmYJAGUCBQljdXJyZW50VHMFF2xhc3RGZWRUaW1lc3RhbXBDaGVja2VkBAZncm93dGgFDXBheW1lbnRBbW91bnQEDGN1cnJlbnRMZXZlbAkBEmdldEN1cnJlbnRMZXZlbEludAEFCmR1Y2tsaW5nSWQECG5ld0xldmVsCQBkAgUMY3VycmVudExldmVsBQ1wYXltZW50QW1vdW50AwkAZgIFCG5ld0xldmVsCQEQZ2V0RHVja2xpbmdQcmljZQEFCmR1Y2tsaW5nSWQJAAIBCQCsAgIJAKwCAgIzQkNOREw6IFlvdSBhcmUgZmVlZGluZyB5b3VyIGR1Y2tsaW5nIHRvIG11Y2ghIE9ubHkgCQCkAwEJAGUCCQEQZ2V0RHVja2xpbmdQcmljZQEFCmR1Y2tsaW5nSWQFDGN1cnJlbnRMZXZlbAIHbmVlZGVkIQQGcmVzdWx0CQCkAwEFCG5ld0xldmVsCQCUCgIFBnJlc3VsdAkAzAgCCQCsAgICDWN1cnJlbnRMZXZlbD0JAKQDAQUMY3VycmVudExldmVsCQDMCAIJAKwCAgIJbmV3TGV2ZWw9CQCkAwEFCG5ld0xldmVsCQDMCAIJAKwCAgIHZ3Jvd3RoPQkApAMBBQZncm93dGgJAMwIAgkArAICAgpsYXN0RmVkVHM9CQCkAwEFF2xhc3RGZWRUaW1lc3RhbXBDaGVja2VkCQDMCAIJAKwCAgIIZmVkRGlmZj0JAKQDAQUHZmVkRGlmZgUDbmlsAQVhc0ludAEFdmFsdWUEByRtYXRjaDAFBXZhbHVlAwkAAQIFByRtYXRjaDACA0ludAQDaW50BQckbWF0Y2gwBQNpbnQJAAIBAh5CQUk6IHdyb25nIHR5cGUsIGV4cGVjdGVkOiBJbnQBDXRyeUdldEJvb2xlYW4BA2tleQQHJG1hdGNoMAkAoAgBBQNrZXkDCQABAgUHJG1hdGNoMAIHQm9vbGVhbgQBYgUHJG1hdGNoMAUBYgcEAWkBD2NvbmZpZ3VyZU9yYWNsZQEGb3JhY2xlAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIPQkNPOiBhZG1pbiBvbmx5CQDMCAIJAQtTdHJpbmdFbnRyeQICFHN0YXRpY19vcmFjbGVBZGRyZXNzBQZvcmFjbGUFA25pbAFpAQ1pc3N1ZUR1Y2tsaW5nBAdhZGRyZXNzB3R4SWRTdHILc3BpY2VBbW91bnQDZ2VuAwkBAiE9AggFAWkGY2FsbGVyCQERZ2V0QnJlZWRlckFkZHJlc3MACQACAQIiQklEOiBZb3UgY2FuJ3QgaXNzdWUgZnJlZSBkdWNrbGluZwQFYXNzZXQJAMMIBwIQQkFCWS0xMTExMTExMS1IWgIAAAEAAAcFBHVuaXQFBmhlaWdodAQHYXNzZXRJZAkAuAgBBQVhc3NldAkAlAoCCQDMCAIJAQtTdHJpbmdFbnRyeQIJAKwCAgkArAICCQCsAgIFB2FkZHJlc3MCAV8FB3R4SWRTdHICA19kaQkA2AQBBQdhc3NldElkCQDMCAIJAQxJbnRlZ2VyRW50cnkCAgxzdGF0c19hbW91bnQJAGQCCQENdHJ5R2V0SW50ZWdlcgECDHN0YXRzX2Ftb3VudAABCQDMCAIJAQxCb29sZWFuRW50cnkCCQCsAgIJAKwCAgIJZHVja2xpbmdfCQDYBAEFB2Fzc2V0SWQCEV9pc3N1ZWRCeUZlZWRDYWxsCQAAAggFAWkGY2FsbGVyBQR0aGlzCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQESa2V5U3RhcnRQZXJjZW50YWdlAQkA2AQBBQdhc3NldElkAAAJAMwIAgkBC1N0cmluZ0VudHJ5AgkBCGtleU93bmVyAQkA2AQBBQdhc3NldElkBQdhZGRyZXNzCQDMCAIJAQtTdHJpbmdFbnRyeQIJAQZrZXlHZW4BCQDYBAEFB2Fzc2V0SWQFA2dlbgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBDWtleUZlZWROZWVkZWQBCQDYBAEFB2Fzc2V0SWQFC3NwaWNlQW1vdW50CQDMCAIFBWFzc2V0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQV2YWx1ZQEJAKYIAQUHYWRkcmVzcwABBQdhc3NldElkBQNuaWwJANgEAQUHYXNzZXRJZAFpAQxmZWVkRHVja2xpbmcBCmR1Y2tsaW5nSWQEDWFkZHJlc3NTdHJpbmcJAKUIAQgFAWkGY2FsbGVyBA5yZWFsRHVja2xpbmdJZAMDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEGCQECIT0CCAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAQ9nZXRTcGljZUFzc2V0SWQACQACAQIuQkZEOiBCYWQgcGF5bWVudCBhdHRhY2hlZCAoYXNzZXRbc10gb3IgYW1vdW50KQQLYmxhY2tMaXN0ZWQJAQ10cnlHZXRCb29sZWFuAQkBDmtleUJsYWNrbGlzdGVkAQUKZHVja2xpbmdJZAMFC2JsYWNrTGlzdGVkCQACAQInQkZEOiBDYW4gbm90IGZlZWQgYmxhY2tsaXN0ZWQgZHVja2xpbmchAwkBB2dldEJvb2wBCQEQa2V5RHVja2xpbmdHcm93bgEFCmR1Y2tsaW5nSWQJAAIBAh5CRkQ6IER1Y2tsaW5nIGlzIGFscmVhZHkgZ3Jvd24DCQAAAgUKZHVja2xpbmdJZAIACQACAQIjQkZEOiBQbGVhc2UgaGF0Y2ggYSBkdWNrbGluZyBmaXJzdCEEDWR1Y2tsaW5nT3duZXIJAQx0cnlHZXRTdHJpbmcBCQEIa2V5T3duZXIBBQpkdWNrbGluZ0lkBA9kdWNrbGluZ0lkQ2hlY2sJAQV2YWx1ZQEJAOwHAQkA2QQBBQpkdWNrbGluZ0lkAwkBAiE9AgkA8AcCCAUBaQZjYWxsZXIIBQ9kdWNrbGluZ0lkQ2hlY2sCaWQAAQkAAgECKUJGRDogWW91J3JlIG5vdCB0aGUgb3duZXIgb2YgdGhlIGR1Y2tsaW5nAwkBAiE9AgUNZHVja2xpbmdPd25lcgkApQgBCAUBaQZjYWxsZXIJAAIBAj5CRkQ6IFlvdSBjYW4gb25seSBmZWVkIGR1Y2tsaW5ncyB0aGF0IHlvdSB3b24vYm91Z2h0IHlvdXJzZWxmIQMJAQIhPQIIBQ9kdWNrbGluZ0lkQ2hlY2sGaXNzdWVyBQR0aGlzCQACAQIkQkZEOiBDYW50IGZpbmQgZHVja2xpbmcgd2l0aCBzdWNoIGlkBBBkdWNrbGluZ0lkU3RyaW5nCQDYBAEIBQ9kdWNrbGluZ0lkQ2hlY2sCaWQFEGR1Y2tsaW5nSWRTdHJpbmcEEmtEdWNrbGluZ0xhc3RGZWRUcwkBG2tleUR1Y2tsaW5nRmVkTGFzdFRpbWVzdGFtcAEFCmR1Y2tsaW5nSWQEDmN1cnJlbnRQYXltZW50CAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAQJa05ld0xldmVsCQEQa2V5RHVja2xpbmdMZXZlbAEFDnJlYWxEdWNrbGluZ0lkBAprVG90YWxGZWVkCQEMa2V5VG90YWxGZWVkAQUOcmVhbER1Y2tsaW5nSWQECXRvdGFsRmVlZAkBDXRyeUdldEludGVnZXIBBQprVG90YWxGZWVkBAxrRmVlZFR4U3RhdHMJAKwCAgkArAICCQCsAgICCWR1Y2tsaW5nXwUOcmVhbER1Y2tsaW5nSWQCBl9zdGF0XwkApAMBCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQQY2FsY3VsYXRlUmVzdWx0cwkBGWNhbGN1bGF0ZU5ld0R1Y2tsaW5nTGV2ZWwCBQ5yZWFsRHVja2xpbmdJZAUOY3VycmVudFBheW1lbnQJAMwIAgkBDEludGVnZXJFbnRyeQIFEmtEdWNrbGluZ0xhc3RGZWRUcwgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIFCmtUb3RhbEZlZWQJAGQCBQl0b3RhbEZlZWQFDmN1cnJlbnRQYXltZW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQxrRmVlZFR4U3RhdHMFDmN1cnJlbnRQYXltZW50CQDMCAIJAQtTdHJpbmdFbnRyeQIFCWtOZXdMZXZlbAgFEGNhbGN1bGF0ZVJlc3VsdHMCXzEJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQxrRmVlZFR4U3RhdHMCBl9kZWJ1ZwkAuQkCCAUQY2FsY3VsYXRlUmVzdWx0cwJfMgIBOwUDbmlsAWkBFHR1cm5EdWNrbGluZ0ludG9EdWNrAAMJAQIhPQIIBQFpBmNhbGxlcgkBEWdldEJyZWVkZXJBZGRyZXNzAAkAAgECHkJURElUOiBZb3UgY2FuJ3QgdHVybiBkdWNrbGluZwQHYWRkcmVzcwkApQgBCAUBaQZjYWxsZXIEBHR4SWQJANgEAQgFAWkNdHJhbnNhY3Rpb25JZAQUbGFzdElzc3VlZER1Y2tsaW5nVHMJAQ10cnlHZXRJbnRlZ2VyAQUWS0dsb2JhbElzc3VlZFRpbWVzdGFtcAQLZml2ZU1pbkluTXMJAGgCCQBoAgABADwA6AcECHRpbWVEaWZmCQBlAggFCWxhc3RCbG9jawl0aW1lc3RhbXAJAGQCBRRsYXN0SXNzdWVkRHVja2xpbmdUcwULZml2ZU1pbkluTXMDAwkAZgIFFGxhc3RJc3N1ZWREdWNrbGluZ1RzAAAJAGYCAAAFCHRpbWVEaWZmBwkAAgEJAKwCAgkArAICAkRCVERJVDogQ2FuIGlzc3VlIGR1Y2tsaW5ncyBvbmx5IG9uY2UgcGVyIDEgbWludXRlcywgcGxlYXNlIHdhaXQgZm9yIAkApAMBCQBrAwUIdGltZURpZmYAAQDoBwIFIHNlYy4DCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAjBCVERJVDogQmFkIHBheW1lbnQgYXR0YWNoZWQgKGFzc2V0W3NdIG9yIGFtb3VudCkDCQECIT0CCAkAkQMCCAUBaQhwYXltZW50cwAABmFtb3VudAABCQACAQIbQlRESVQ6IFBsZWFzZSBhdHRhY2ggYSBuZnQhBANwbXQJAQV2YWx1ZQEJAOwHAQkBBXZhbHVlAQgJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkBAVwcmljZQkBEGdldER1Y2tsaW5nUHJpY2UBCQDYBAEIBQNwbXQCaWQDCQBmAgUFcHJpY2UJARJnZXRDdXJyZW50TGV2ZWxJbnQBCQDYBAEIBQNwbXQCaWQJAAIBCQCsAgIJAKwCAgkArAICAiNCVERJVDogRHVja2xpbmcgaXMgbm90IGdyb3duIHlldC4uLgkApAMBCQESZ2V0Q3VycmVudExldmVsSW50AQkA2AQBCAUDcG10AmlkAgEgCQCkAwEFBXByaWNlAwkBAiE9AggFA3BtdAZpc3N1ZXIFBHRoaXMJAAIBAixCVERJVDogQ2FuIHVzZSBvbmx5IGR1Y2tsaW5ncyBmcm9tIHRoaXMgZEFwcAQOa0R1Y2tsaW5nR3Jvd24JARBrZXlEdWNrbGluZ0dyb3duAQkA2AQBCAUDcG10AmlkCQCUCgIJAMwIAgkBDEJvb2xlYW5FbnRyeQIFDmtEdWNrbGluZ0dyb3duBgkAzAgCCQEMSW50ZWdlckVudHJ5AgUWS0dsb2JhbElzc3VlZFRpbWVzdGFtcAgFCWxhc3RCbG9jawl0aW1lc3RhbXAFA25pbAkA2AQBCAUDcG10AmlkAQJ0eAEGdmVyaWZ5AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tledAFpWk=",
    "height": 3477327,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: EFxA8ZY9Q9meM2rg9yAUBgRz9hJYggVNqub7GWvYZD8p
Next: AVgGxFdnk9Yr3xZ9xox1zKM9m7BcVYhaU6HySPPXtFSo

Diff: 

OldNewDifferences
3232 func getBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_breederAddress")))
3333 
3434 
35-let DUCKLINGPRICE = 10000000000
36-
3735 let KGlobalIssuedTimestamp = "global_issued_timestamp"
3836 
3937 func keyTotalFeed (ducklingId) = (("duckling_" + ducklingId) + "_feed")
38+
39+
40+func keyGen (ducklingId) = (("duckling_" + ducklingId) + "_gen")
41+
42+
43+func keyFeedNeeded (ducklingId) = (("duckling_" + ducklingId) + "_feedNeeded")
44+
45+
46+func getDucklingPrice (ducklingId) = {
47+    let key = keyFeedNeeded(ducklingId)
48+    match getInteger(this, key) {
49+        case b: Int => 
50+            (b * 100000000)
51+        case _ => 
52+            8000000000
53+    }
54+    }
4055 
4156 
4257 func keyDucklingFedLastTimestamp (ducklingId) = (("duckling_" + ducklingId) + "_fedLastTs")
101116     let growth = paymentAmount
102117     let currentLevel = getCurrentLevelInt(ducklingId)
103118     let newLevel = (currentLevel + paymentAmount)
104-    if ((newLevel > DUCKLINGPRICE))
105-        then throw((("BCNDL: You are feeding your duckling to much! Only " + toString((DUCKLINGPRICE - currentLevel))) + "needed!"))
119+    if ((newLevel > getDucklingPrice(ducklingId)))
120+        then throw((("BCNDL: You are feeding your duckling to much! Only " + toString((getDucklingPrice(ducklingId) - currentLevel))) + "needed!"))
106121         else {
107122             let result = toString(newLevel)
108123             $Tuple2(result, [("currentLevel=" + toString(currentLevel)), ("newLevel=" + toString(newLevel)), ("growth=" + toString(growth)), ("lastFedTs=" + toString(lastFedTimestampChecked)), ("fedDiff=" + toString(fedDiff))])
134149 
135150 
136151 @Callable(i)
137-func issueDuckling (address,txIdStr) = if ((i.caller != getBreederAddress()))
152+func issueDuckling (address,txIdStr,spiceAmount,gen) = if ((i.caller != getBreederAddress()))
138153     then throw("BID: You can't issue free duckling")
139154     else {
140155         let asset = Issue("BABY-11111111-HZ", "", 1, 0, false, unit, height)
141156         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))
157+        $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), StringEntry(keyGen(toBase58String(assetId)), gen), IntegerEntry(keyFeedNeeded(toBase58String(assetId)), spiceAmount), asset, ScriptTransfer(value(addressFromString(address)), 1, assetId)], toBase58String(assetId))
143158         }
144159 
145160 
201216             then throw((("BTDIT: Can issue ducklings only once per 1 minutes, please wait for " + toString(fraction(timeDiff, 1, 1000))) + " sec."))
202217             else if ((size(i.payments) != 1))
203218                 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-                    }
219+                else if ((i.payments[0].amount != 1))
220+                    then throw("BTDIT: Please attach a nft!")
221+                    else {
222+                        let pmt = value(assetInfo(value(value(i.payments[0]).assetId)))
223+                        let price = getDucklingPrice(toBase58String(pmt.id))
224+                        if ((price > getCurrentLevelInt(toBase58String(pmt.id))))
225+                            then throw(((("BTDIT: Duckling is not grown yet..." + toString(getCurrentLevelInt(toBase58String(pmt.id)))) + " ") + toString(price)))
226+                            else if ((pmt.issuer != this))
227+                                then throw("BTDIT: Can use only ducklings from this dApp")
228+                                else {
229+                                    let kDucklingGrown = keyDucklingGrown(toBase58String(pmt.id))
230+                                    $Tuple2([BooleanEntry(kDucklingGrown, true), IntegerEntry(KGlobalIssuedTimestamp, lastBlock.timestamp)], toBase58String(pmt.id))
231+                                    }
232+                        }
215233         }
216234 
217235 

Full: 

OldNewDifferences
11 {-# STDLIB_VERSION 6 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
44 func tryGetStringExternal (address,key) = match getString(address, key) {
55     case a: String => 
66         a
77     case _ => 
88         ""
99 }
1010 
1111 
1212 func keyBlacklisted (ducklingId) = (("duckling_" + ducklingId) + "_blacklisted")
1313 
1414 
1515 func tryGetIntegerExternal (address,key) = match getInteger(address, key) {
1616     case b: Int => 
1717         b
1818     case _ => 
1919         0
2020 }
2121 
2222 
2323 func tryGetString (key) = tryGetStringExternal(this, key)
2424 
2525 
2626 func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
2727 
2828 
2929 func getSpiceAssetId () = fromBase58String(tryGetStringExternal(getOracle(), "static_spiceAssetId"))
3030 
3131 
3232 func getBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_breederAddress")))
3333 
3434 
35-let DUCKLINGPRICE = 10000000000
36-
3735 let KGlobalIssuedTimestamp = "global_issued_timestamp"
3836 
3937 func keyTotalFeed (ducklingId) = (("duckling_" + ducklingId) + "_feed")
38+
39+
40+func keyGen (ducklingId) = (("duckling_" + ducklingId) + "_gen")
41+
42+
43+func keyFeedNeeded (ducklingId) = (("duckling_" + ducklingId) + "_feedNeeded")
44+
45+
46+func getDucklingPrice (ducklingId) = {
47+    let key = keyFeedNeeded(ducklingId)
48+    match getInteger(this, key) {
49+        case b: Int => 
50+            (b * 100000000)
51+        case _ => 
52+            8000000000
53+    }
54+    }
4055 
4156 
4257 func keyDucklingFedLastTimestamp (ducklingId) = (("duckling_" + ducklingId) + "_fedLastTs")
4358 
4459 
4560 func keyDucklingLevel (ducklingId) = (("duckling_" + ducklingId) + "_level")
4661 
4762 
4863 func keyDucklingGrown (ducklingId) = (("duckling_" + ducklingId) + "_grown")
4964 
5065 
5166 func keyStartPercentage (ducklingId) = (("duckling_" + ducklingId) + "_startPercentage")
5267 
5368 
5469 func keyOwner (ducklingId) = (("duckling_" + ducklingId) + "_owner")
5570 
5671 
5772 func tryGetInteger (key) = {
5873     let val =     match getInteger(this, key) {
5974         case b: Int => 
6075             b
6176         case _ => 
6277             0
6378     }
6479     val
6580     }
6681 
6782 
6883 func getBool (key) = match getBoolean(this, key) {
6984     case b: Boolean => 
7085         b
7186     case _ => 
7287         false
7388 }
7489 
7590 
7691 func getCurrentLevelInt (ducklingId) = {
7792     let kDuckLevel = keyDucklingLevel(ducklingId)
7893     match getString(kDuckLevel) {
7994         case s: String => 
8095             parseIntValue(s)
8196         case u: Unit => 
8297             0
8398         case _ => 
8499             throw("BGCLBI: Weird value detected!")
85100     }
86101     }
87102 
88103 
89104 func getLastFedTimestamp (ducklingId) = {
90105     let lastFedTimestamp = tryGetInteger(keyDucklingFedLastTimestamp(ducklingId))
91106     if ((lastFedTimestamp > 0))
92107         then lastFedTimestamp
93108         else lastBlock.timestamp
94109     }
95110 
96111 
97112 func calculateNewDucklingLevel (ducklingId,paymentAmount) = {
98113     let currentTs = lastBlock.timestamp
99114     let lastFedTimestampChecked = getLastFedTimestamp(ducklingId)
100115     let fedDiff = (currentTs - lastFedTimestampChecked)
101116     let growth = paymentAmount
102117     let currentLevel = getCurrentLevelInt(ducklingId)
103118     let newLevel = (currentLevel + paymentAmount)
104-    if ((newLevel > DUCKLINGPRICE))
105-        then throw((("BCNDL: You are feeding your duckling to much! Only " + toString((DUCKLINGPRICE - currentLevel))) + "needed!"))
119+    if ((newLevel > getDucklingPrice(ducklingId)))
120+        then throw((("BCNDL: You are feeding your duckling to much! Only " + toString((getDucklingPrice(ducklingId) - currentLevel))) + "needed!"))
106121         else {
107122             let result = toString(newLevel)
108123             $Tuple2(result, [("currentLevel=" + toString(currentLevel)), ("newLevel=" + toString(newLevel)), ("growth=" + toString(growth)), ("lastFedTs=" + toString(lastFedTimestampChecked)), ("fedDiff=" + toString(fedDiff))])
109124             }
110125     }
111126 
112127 
113128 func asInt (value) = match value {
114129     case int: Int => 
115130         int
116131     case _ => 
117132         throw("BAI: wrong type, expected: Int")
118133 }
119134 
120135 
121136 func tryGetBoolean (key) = match getBoolean(key) {
122137     case b: Boolean => 
123138         b
124139     case _ => 
125140         false
126141 }
127142 
128143 
129144 @Callable(i)
130145 func configureOracle (oracle) = if ((i.caller != this))
131146     then throw("BCO: admin only")
132147     else [StringEntry("static_oracleAddress", oracle)]
133148 
134149 
135150 
136151 @Callable(i)
137-func issueDuckling (address,txIdStr) = if ((i.caller != getBreederAddress()))
152+func issueDuckling (address,txIdStr,spiceAmount,gen) = if ((i.caller != getBreederAddress()))
138153     then throw("BID: You can't issue free duckling")
139154     else {
140155         let asset = Issue("BABY-11111111-HZ", "", 1, 0, false, unit, height)
141156         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))
157+        $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), StringEntry(keyGen(toBase58String(assetId)), gen), IntegerEntry(keyFeedNeeded(toBase58String(assetId)), spiceAmount), asset, ScriptTransfer(value(addressFromString(address)), 1, assetId)], toBase58String(assetId))
143158         }
144159 
145160 
146161 
147162 @Callable(i)
148163 func feedDuckling (ducklingId) = {
149164     let addressString = toString(i.caller)
150165     let realDucklingId = if (if ((size(i.payments) != 1))
151166         then true
152167         else (value(i.payments[0]).assetId != getSpiceAssetId()))
153168         then throw("BFD: Bad payment attached (asset[s] or amount)")
154169         else {
155170             let blackListed = tryGetBoolean(keyBlacklisted(ducklingId))
156171             if (blackListed)
157172                 then throw("BFD: Can not feed blacklisted duckling!")
158173                 else if (getBool(keyDucklingGrown(ducklingId)))
159174                     then throw("BFD: Duckling is already grown")
160175                     else if ((ducklingId == ""))
161176                         then throw("BFD: Please hatch a duckling first!")
162177                         else {
163178                             let ducklingOwner = tryGetString(keyOwner(ducklingId))
164179                             let ducklingIdCheck = value(assetInfo(fromBase58String(ducklingId)))
165180                             if ((assetBalance(i.caller, ducklingIdCheck.id) != 1))
166181                                 then throw("BFD: You're not the owner of the duckling")
167182                                 else if ((ducklingOwner != toString(i.caller)))
168183                                     then throw("BFD: You can only feed ducklings that you won/bought yourself!")
169184                                     else if ((ducklingIdCheck.issuer != this))
170185                                         then throw("BFD: Cant find duckling with such id")
171186                                         else {
172187                                             let ducklingIdString = toBase58String(ducklingIdCheck.id)
173188                                             ducklingIdString
174189                                             }
175190                             }
176191             }
177192     let kDucklingLastFedTs = keyDucklingFedLastTimestamp(ducklingId)
178193     let currentPayment = value(i.payments[0]).amount
179194     let kNewLevel = keyDucklingLevel(realDucklingId)
180195     let kTotalFeed = keyTotalFeed(realDucklingId)
181196     let totalFeed = tryGetInteger(kTotalFeed)
182197     let kFeedTxStats = ((("duckling_" + realDucklingId) + "_stat_") + toString(lastBlock.timestamp))
183198     let calculateResults = calculateNewDucklingLevel(realDucklingId, currentPayment)
184199 [IntegerEntry(kDucklingLastFedTs, lastBlock.timestamp), IntegerEntry(kTotalFeed, (totalFeed + currentPayment)), IntegerEntry(kFeedTxStats, currentPayment), StringEntry(kNewLevel, calculateResults._1), StringEntry((kFeedTxStats + "_debug"), makeString(calculateResults._2, ";"))]
185200     }
186201 
187202 
188203 
189204 @Callable(i)
190205 func turnDucklingIntoDuck () = if ((i.caller != getBreederAddress()))
191206     then throw("BTDIT: You can't turn duckling")
192207     else {
193208         let address = toString(i.caller)
194209         let txId = toBase58String(i.transactionId)
195210         let lastIssuedDucklingTs = tryGetInteger(KGlobalIssuedTimestamp)
196211         let fiveMinInMs = ((1 * 60) * 1000)
197212         let timeDiff = (lastBlock.timestamp - (lastIssuedDucklingTs + fiveMinInMs))
198213         if (if ((lastIssuedDucklingTs > 0))
199214             then (0 > timeDiff)
200215             else false)
201216             then throw((("BTDIT: Can issue ducklings only once per 1 minutes, please wait for " + toString(fraction(timeDiff, 1, 1000))) + " sec."))
202217             else if ((size(i.payments) != 1))
203218                 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-                    }
219+                else if ((i.payments[0].amount != 1))
220+                    then throw("BTDIT: Please attach a nft!")
221+                    else {
222+                        let pmt = value(assetInfo(value(value(i.payments[0]).assetId)))
223+                        let price = getDucklingPrice(toBase58String(pmt.id))
224+                        if ((price > getCurrentLevelInt(toBase58String(pmt.id))))
225+                            then throw(((("BTDIT: Duckling is not grown yet..." + toString(getCurrentLevelInt(toBase58String(pmt.id)))) + " ") + toString(price)))
226+                            else if ((pmt.issuer != this))
227+                                then throw("BTDIT: Can use only ducklings from this dApp")
228+                                else {
229+                                    let kDucklingGrown = keyDucklingGrown(toBase58String(pmt.id))
230+                                    $Tuple2([BooleanEntry(kDucklingGrown, true), IntegerEntry(KGlobalIssuedTimestamp, lastBlock.timestamp)], toBase58String(pmt.id))
231+                                    }
232+                        }
215233         }
216234 
217235 
218236 @Verifier(tx)
219237 func verify () = sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
220238 
github/deemru/w8io/3ef1775 
43.97 ms ◑