w8 · tx · 7wS···yG9

tx · 7wSwmytDe35EPZrk7WMFbgv1qvKzycRenMBW1WgeZyG9

3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6:  -0.00700000 Waves

2022.08.03 17:02 [3233921] smart account 3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "7wSwmytDe35EPZrk7WMFbgv1qvKzycRenMBW1WgeZyG9",
    "fee": 700000,
    "feeAssetId": null,
    "timestamp": 1659535346697,
    "version": 2,
    "chainId": 87,
    "sender": "3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6",
    "senderPublicKey": "3xRzVfzGz2mW1Y3XAqQwVN4RiiWSgAHpLFmaF24hhfY9",
    "proofs": [
        "3jVn6ASV78Kt1A6rrAmDBcwSy8HBq1CG3t22BHUrzkcgw2akyzBW7iVC3uX2j7quv4jJ2Ym5TFWPYBHVxgTwnW7i"
    ],
    "script": "base64:BgIVCAISAwoBCBIECgIICBIECgIIARIAFwEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCdCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWEFByRtYXRjaDAFAWECAAEVdHJ5R2V0SW50ZWdlckV4dGVybmFsAgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAmggCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABDHRyeUdldFN0cmluZwEDa2V5CQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCBQR0aGlzBQNrZXkBCWdldE9yYWNsZQAJAQdBZGRyZXNzAQkA2QQBCQEMdHJ5R2V0U3RyaW5nAQIUc3RhdGljX29yYWNsZUFkZHJlc3MBD2dldFNwaWNlQXNzZXRJZAAJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACE3N0YXRpY19zcGljZUFzc2V0SWQBEWdldEJyZWVkZXJBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhVzdGF0aWNfYnJlZWRlckFkZHJlc3MADURVQ0tMSU5HUFJJQ0UAgMivoCUAFnBlcmNlbnRHcm93dGhQcmVjaXNpb24AgICE/qbe4REAFWV4aXN0aW5nRHVja1ByZWNpc2lvbgCAgOmDsd4WABZLR2xvYmFsSXNzdWVkVGltZXN0YW1wAhdnbG9iYWxfaXNzdWVkX3RpbWVzdGFtcAEMa2V5VG90YWxGZWVkAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgVfZmVlZAEba2V5RHVja2xpbmdGZWRMYXN0VGltZXN0YW1wAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgpfZmVkTGFzdFRzARBrZXlEdWNrbGluZ0xldmVsAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgZfbGV2ZWwBEGtleUR1Y2tsaW5nR3Jvd24BCmR1Y2tsaW5nSWQJAKwCAgkArAICAglkdWNrbGluZ18FCmR1Y2tsaW5nSWQCBl9ncm93bgESa2V5U3RhcnRQZXJjZW50YWdlAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAhBfc3RhcnRQZXJjZW50YWdlAQhrZXlPd25lcgEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIGX293bmVyAQ10cnlHZXRJbnRlZ2VyAQNrZXkEA3ZhbAQHJG1hdGNoMAkAmggCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAAFA3ZhbAEHZ2V0Qm9vbAEDa2V5BAckbWF0Y2gwCQCbCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgdCb29sZWFuBAFiBQckbWF0Y2gwBQFiBwEVZ2V0RHVja2xpbmdQZXJjZW50YWdlAQpkdWNrbGluZ0lkBBJwZXJjZW50YWdlRHVja2xpbmcJAQ10cnlHZXRJbnRlZ2VyAQkBEmtleVN0YXJ0UGVyY2VudGFnZQEFCmR1Y2tsaW5nSWQEBGJhc2UDCQECIT0CBRJwZXJjZW50YWdlRHVja2xpbmcAAAUScGVyY2VudGFnZUR1Y2tsaW5nABQJALYCAQkAaAIFBGJhc2UFFWV4aXN0aW5nRHVja1ByZWNpc2lvbgEVZ2V0Q3VycmVudExldmVsQmlnSW50AQpkdWNrbGluZ0lkBAprRHVja0xldmVsCQEQa2V5RHVja2xpbmdMZXZlbAEFCmR1Y2tsaW5nSWQEByRtYXRjaDAJAKIIAQUKa0R1Y2tMZXZlbAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJAKcDAQUBcwQHJG1hdGNoMQkAoAgBCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAhFfaXNzdWVkQnlGZWVkQ2FsbAMJAAECBQckbWF0Y2gxAgdCb29sZWFuBAFiBQckbWF0Y2gxAwkAAAIFAWIGCQC2AgEAAAkBFWdldER1Y2tsaW5nUGVyY2VudGFnZQEFCmR1Y2tsaW5nSWQJARVnZXREdWNrbGluZ1BlcmNlbnRhZ2UBBQpkdWNrbGluZ0lkARNnZXRMYXN0RmVkVGltZXN0YW1wAQpkdWNrbGluZ0lkBBBsYXN0RmVkVGltZXN0YW1wCQENdHJ5R2V0SW50ZWdlcgEJARtrZXlEdWNrbGluZ0ZlZExhc3RUaW1lc3RhbXABBQpkdWNrbGluZ0lkAwkAZgIFEGxhc3RGZWRUaW1lc3RhbXAAAAUQbGFzdEZlZFRpbWVzdGFtcAgFCWxhc3RCbG9jawl0aW1lc3RhbXABGWNhbGN1bGF0ZU5ld0R1Y2tsaW5nTGV2ZWwCCmR1Y2tsaW5nSWQNcGF5bWVudEFtb3VudAQJY3VycmVudFRzCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQXbGFzdEZlZFRpbWVzdGFtcENoZWNrZWQJARNnZXRMYXN0RmVkVGltZXN0YW1wAQUKZHVja2xpbmdJZAQHZmVkRGlmZgkAZQIFCWN1cnJlbnRUcwUXbGFzdEZlZFRpbWVzdGFtcENoZWNrZWQEB3BlbmFsdHkJALYCAQAABAZncm93dGgJALwCAwkAtgIBBQ1wYXltZW50QW1vdW50CQC2AgEFFnBlcmNlbnRHcm93dGhQcmVjaXNpb24JALYCAQUNRFVDS0xJTkdQUklDRQQMY3VycmVudExldmVsCQEVZ2V0Q3VycmVudExldmVsQmlnSW50AQUKZHVja2xpbmdJZAQIbmV3TGV2ZWwJALcCAgkAuAICBQxjdXJyZW50TGV2ZWwFB3BlbmFsdHkFBmdyb3d0aAQGcmVzdWx0AwkAvwICCQC2AgEAAAUIbmV3TGV2ZWwJAKYDAQUGZ3Jvd3RoCQCmAwEFCG5ld0xldmVsCQCUCgIFBnJlc3VsdAkAzAgCCQCsAgICDWN1cnJlbnRMZXZlbD0JAKYDAQUMY3VycmVudExldmVsCQDMCAIJAKwCAgIJbmV3TGV2ZWw9CQCmAwEFCG5ld0xldmVsCQDMCAIJAKwCAgIHZ3Jvd3RoPQkApgMBBQZncm93dGgJAMwIAgkArAICAghwZW5hbHR5PQkApgMBBQdwZW5hbHR5CQDMCAIJAKwCAgIKbGFzdEZlZFRzPQkApAMBBRdsYXN0RmVkVGltZXN0YW1wQ2hlY2tlZAkAzAgCCQCsAgICCGZlZERpZmY9CQCkAwEFB2ZlZERpZmYFA25pbAEFYXNJbnQBBXZhbHVlBAckbWF0Y2gwBQV2YWx1ZQMJAAECBQckbWF0Y2gwAgNJbnQEA2ludAUHJG1hdGNoMAUDaW50CQACAQIeQkFJOiB3cm9uZyB0eXBlLCBleHBlY3RlZDogSW50BAFpAQ9jb25maWd1cmVPcmFjbGUBBm9yYWNsZQMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECD0JDTzogYWRtaW4gb25seQkAzAgCCQELU3RyaW5nRW50cnkCAhRzdGF0aWNfb3JhY2xlQWRkcmVzcwUGb3JhY2xlBQNuaWwBaQENaXNzdWVEdWNrbGluZwIHYWRkcmVzcwd0eElkU3RyAwkBAiE9AggFAWkGY2FsbGVyCQERZ2V0QnJlZWRlckFkZHJlc3MACQACAQkArAICAiRCSUZEOiBZb3UgY2FuJ3QgaXNzdWUgZnJlZSBkdWNrbGluZyAJAKUIAQgFAWkGY2FsbGVyBAVhc3NldAkAwwgHAhBCQUJZLTExMTExMTExLUhaAgAAAQAABwUEdW5pdAUGaGVpZ2h0BAdhc3NldElkCQC4CAEFBWFzc2V0CQCUCgIJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICCQCsAgIJAKwCAgUHYWRkcmVzcwIBXwUHdHhJZFN0cgIDX2RpCQDYBAEFB2Fzc2V0SWQJAMwIAgkBDEludGVnZXJFbnRyeQICDHN0YXRzX2Ftb3VudAkAZAIJAQ10cnlHZXRJbnRlZ2VyAQIMc3RhdHNfYW1vdW50AAEJAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgkArAICAglkdWNrbGluZ18JANgEAQUHYXNzZXRJZAIRX2lzc3VlZEJ5RmVlZENhbGwJAAACCAUBaQZjYWxsZXIFBHRoaXMJAMwIAgkBDEludGVnZXJFbnRyeQIJARJrZXlTdGFydFBlcmNlbnRhZ2UBCQDYBAEFB2Fzc2V0SWQAAAkAzAgCCQELU3RyaW5nRW50cnkCCQEIa2V5T3duZXIBCQDYBAEFB2Fzc2V0SWQFB2FkZHJlc3MJAMwIAgUFYXNzZXQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBBXZhbHVlAQkApggBBQdhZGRyZXNzAAEFB2Fzc2V0SWQFA25pbAkA2AQBBQdhc3NldElkAWkBDGZlZWREdWNrbGluZwIKZHVja2xpbmdJZA1tYXhGZWVkQW1vdW50BA1hZGRyZXNzU3RyaW5nCQClCAEIBQFpBmNhbGxlcgQOcmVhbER1Y2tsaW5nSWQDAwkBAiE9AgkAkAMBCAUBaQhwYXltZW50cwABBgkBAiE9AggJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkCQEPZ2V0U3BpY2VBc3NldElkAAkAAgECLkJGRDogQmFkIHBheW1lbnQgYXR0YWNoZWQgKGFzc2V0W3NdIG9yIGFtb3VudCkDCQEHZ2V0Qm9vbAEJARBrZXlEdWNrbGluZ0dyb3duAQUKZHVja2xpbmdJZAkAAgECHkJGRDogRHVja2xpbmcgaXMgYWxyZWFkeSBncm93bgMJAAACBQpkdWNrbGluZ0lkAgAJAAIBAiNCRkQ6IFBsZWFzZSBoYXRjaCBhIGR1Y2tsaW5nIGZpcnN0IQQNZHVja2xpbmdPd25lcgkBDHRyeUdldFN0cmluZwEJAQhrZXlPd25lcgEFCmR1Y2tsaW5nSWQED2R1Y2tsaW5nSWRDaGVjawkBBXZhbHVlAQkA7AcBCQDZBAEFCmR1Y2tsaW5nSWQDCQECIT0CCQDwBwIIBQFpBmNhbGxlcggFD2R1Y2tsaW5nSWRDaGVjawJpZAABCQACAQIpQkZEOiBZb3UncmUgbm90IHRoZSBvd25lciBvZiB0aGUgZHVja2xpbmcDCQECIT0CBQ1kdWNrbGluZ093bmVyCQClCAEIBQFpBmNhbGxlcgkAAgECPkJGRDogWW91IGNhbiBvbmx5IGZlZWQgZHVja2xpbmdzIHRoYXQgeW91IHdvbi9ib3VnaHQgeW91cnNlbGYhAwkBAiE9AggFD2R1Y2tsaW5nSWRDaGVjawZpc3N1ZXIFBHRoaXMJAAIBAiRCRkQ6IENhbnQgZmluZCBkdWNrbGluZyB3aXRoIHN1Y2ggaWQEEGR1Y2tsaW5nSWRTdHJpbmcJANgEAQgFD2R1Y2tsaW5nSWRDaGVjawJpZAUQZHVja2xpbmdJZFN0cmluZwQSa0R1Y2tsaW5nTGFzdEZlZFRzCQEba2V5RHVja2xpbmdGZWRMYXN0VGltZXN0YW1wAQUKZHVja2xpbmdJZAQOY3VycmVudFBheW1lbnQICQEFdmFsdWUBCQCRAwIIBQFpCHBheW1lbnRzAAAGYW1vdW50BAlrTmV3TGV2ZWwJARBrZXlEdWNrbGluZ0xldmVsAQUOcmVhbER1Y2tsaW5nSWQECmtUb3RhbEZlZWQJAQxrZXlUb3RhbEZlZWQBBQ5yZWFsRHVja2xpbmdJZAQJdG90YWxGZWVkCQENdHJ5R2V0SW50ZWdlcgEFCmtUb3RhbEZlZWQEDGtGZWVkVHhTdGF0cwkArAICCQCsAgIJAKwCAgIJZHVja2xpbmdfBQ5yZWFsRHVja2xpbmdJZAIGX3N0YXRfCQCkAwEIBQlsYXN0QmxvY2sJdGltZXN0YW1wAwkAZgIFDmN1cnJlbnRQYXltZW50BQ1tYXhGZWVkQW1vdW50CQACAQkArAICAj9CRkQ6IENhbm5vdCBmZWVkIGR1Y2tsaW5nIGZvciBzdWNoIGFtb3VudCwgbWF4IGZlZWQgYW1vdW50IGlzOiAJAKQDAQUNbWF4RmVlZEFtb3VudAQQY2FsY3VsYXRlUmVzdWx0cwkBGWNhbGN1bGF0ZU5ld0R1Y2tsaW5nTGV2ZWwCBQ5yZWFsRHVja2xpbmdJZAUOY3VycmVudFBheW1lbnQJAMwIAgkBDEludGVnZXJFbnRyeQIFEmtEdWNrbGluZ0xhc3RGZWRUcwgFCWxhc3RCbG9jawl0aW1lc3RhbXAJAMwIAgkBDEludGVnZXJFbnRyeQIFCmtUb3RhbEZlZWQJAGQCBQl0b3RhbEZlZWQFDmN1cnJlbnRQYXltZW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCBQxrRmVlZFR4U3RhdHMFDmN1cnJlbnRQYXltZW50CQDMCAIJAQtTdHJpbmdFbnRyeQIFCWtOZXdMZXZlbAgFEGNhbGN1bGF0ZVJlc3VsdHMCXzEJAMwIAgkBC1N0cmluZ0VudHJ5AgkArAICBQxrRmVlZFR4U3RhdHMCBl9kZWJ1ZwkAuQkCCAUQY2FsY3VsYXRlUmVzdWx0cwJfMgIBOwUDbmlsAWkBFHR1cm5EdWNrbGluZ0ludG9EdWNrAAMJAQIhPQIIBQFpBmNhbGxlcgkBEWdldEJyZWVkZXJBZGRyZXNzAAkAAgECHUJJRkQ6IFlvdSBjYW4ndCB0dXJuIGR1Y2tsaW5nBAdhZGRyZXNzCQClCAEIBQFpBmNhbGxlcgQEdHhJZAkA2AQBCAUBaQ10cmFuc2FjdGlvbklkBBRsYXN0SXNzdWVkRHVja2xpbmdUcwkBDXRyeUdldEludGVnZXIBBRZLR2xvYmFsSXNzdWVkVGltZXN0YW1wBAtmaXZlTWluSW5NcwkAaAIJAGgCAAEAPADoBwQIdGltZURpZmYJAGUCCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAZAIFFGxhc3RJc3N1ZWREdWNrbGluZ1RzBQtmaXZlTWluSW5NcwMDCQBmAgUUbGFzdElzc3VlZER1Y2tsaW5nVHMAAAkAZgIAAAUIdGltZURpZmYHCQACAQkArAICCQCsAgICQkJURDogQ2FuIGlzc3VlIGR1Y2tsaW5ncyBvbmx5IG9uY2UgcGVyIDEgbWludXRlcywgcGxlYXNlIHdhaXQgZm9yIAkApAMBCQBrAwUIdGltZURpZmYAAQDoBwIFIHNlYy4DCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEJAAIBAi5CVEQ6IEJhZCBwYXltZW50IGF0dGFjaGVkIChhc3NldFtzXSBvciBhbW91bnQpBANwbXQJAQV2YWx1ZQEJAOwHAQkBBXZhbHVlAQgJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAdhc3NldElkAwkAvwICCQC2AgEAZAkBFWdldEN1cnJlbnRMZXZlbEJpZ0ludAEJANgEAQgFA3BtdAJpZAkAAgECIUJURDogRHVja2xpbmcgaXMgbm90IGdyb3duIHlldC4uLgMJAQIhPQIIBQNwbXQGaXNzdWVyBQR0aGlzCQACAQIqQlREOiBDYW4gdXNlIG9ubHkgZHVja2xpbmdzIGZyb20gdGhpcyBkQXBwBA5rRHVja2xpbmdHcm93bgkBEGtleUR1Y2tsaW5nR3Jvd24BCQDYBAEIBQNwbXQCaWQJAJQKAgkAzAgCCQEMQm9vbGVhbkVudHJ5AgUOa0R1Y2tsaW5nR3Jvd24GCQDMCAIJAQxJbnRlZ2VyRW50cnkCBRZLR2xvYmFsSXNzdWVkVGltZXN0YW1wCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAUDbmlsCQDYBAEIBQNwbXQCaWQBAnR4AQZ2ZXJpZnkACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5PhokGA==",
    "height": 3233921,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 3PwZqzn3xZFctFC4DgRbycxDjW7Y8rc4tGcDYwA9Fub4
Next: 4j6YbFZUFgobyW627HKSZ6EBRUWeD87PEYo8eWc7Bg3x

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

Old	New		Differences
141	141
142	142		@Callable(i)
143	143		func issueDuckling (address,txIdStr) = if ((i.caller != getBreederAddress()))
144		-	then throw("BIFD: You can't issue free duckling")
	144	+	then throw(("BIFD: You can't issue free duckling " + toString(i.caller)))
145	145		else {
146	146		let asset = Issue("BABY-11111111-HZ", "", 1, 0, false, unit, height)
147	147		let assetId = calculateAssetId(asset)

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

github/deemru/w8io/3ef1775 
30.43 ms ◑