w8 · tx · 3Pw···ub4

tx · 3PwZqzn3xZFctFC4DgRbycxDjW7Y8rc4tGcDYwA9Fub4

3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6:  -0.00700000 Waves

2022.08.03 17:00 [3233920] smart account 3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6 > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "3PwZqzn3xZFctFC4DgRbycxDjW7Y8rc4tGcDYwA9Fub4",
    "fee": 700000,
    "feeAssetId": null,
    "timestamp": 1659535319723,
    "version": 2,
    "chainId": 87,
    "sender": "3P36HH7i6BBuuNp7FHQd6WX8gzfogi778i6",
    "senderPublicKey": "3xRzVfzGz2mW1Y3XAqQwVN4RiiWSgAHpLFmaF24hhfY9",
    "proofs": [
        "4kvLr1nUZsTwSYD6ziG8zxm2qrMwBZKaBfWTfb6ZQgDU1PT5h1At6YWucSioM5vh4UAzp8KmeseN5i6fTQFtGxjy"
    ],
    "script": "base64:BgIVCAISAwoBCBIECgIICBIECgIIARIAFwEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCB2FkZHJlc3MDa2V5BAckbWF0Y2gwCQCdCAIFB2FkZHJlc3MFA2tleQMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWEFByRtYXRjaDAFAWECAAEVdHJ5R2V0SW50ZWdlckV4dGVybmFsAgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAmggCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABDHRyeUdldFN0cmluZwEDa2V5CQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCBQR0aGlzBQNrZXkBCWdldE9yYWNsZQAJAQdBZGRyZXNzAQkA2QQBCQEMdHJ5R2V0U3RyaW5nAQIUc3RhdGljX29yYWNsZUFkZHJlc3MBD2dldFNwaWNlQXNzZXRJZAAJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACE3N0YXRpY19zcGljZUFzc2V0SWQBEWdldEJyZWVkZXJBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhVzdGF0aWNfYnJlZWRlckFkZHJlc3MADURVQ0tMSU5HUFJJQ0UAgMivoCUAFnBlcmNlbnRHcm93dGhQcmVjaXNpb24AgICE/qbe4REAFWV4aXN0aW5nRHVja1ByZWNpc2lvbgCAgOmDsd4WABZLR2xvYmFsSXNzdWVkVGltZXN0YW1wAhdnbG9iYWxfaXNzdWVkX3RpbWVzdGFtcAEMa2V5VG90YWxGZWVkAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgVfZmVlZAEba2V5RHVja2xpbmdGZWRMYXN0VGltZXN0YW1wAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgpfZmVkTGFzdFRzARBrZXlEdWNrbGluZ0xldmVsAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAgZfbGV2ZWwBEGtleUR1Y2tsaW5nR3Jvd24BCmR1Y2tsaW5nSWQJAKwCAgkArAICAglkdWNrbGluZ18FCmR1Y2tsaW5nSWQCBl9ncm93bgESa2V5U3RhcnRQZXJjZW50YWdlAQpkdWNrbGluZ0lkCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAhBfc3RhcnRQZXJjZW50YWdlAQhrZXlPd25lcgEKZHVja2xpbmdJZAkArAICCQCsAgICCWR1Y2tsaW5nXwUKZHVja2xpbmdJZAIGX293bmVyAQ10cnlHZXRJbnRlZ2VyAQNrZXkEA3ZhbAQHJG1hdGNoMAkAmggCBQR0aGlzBQNrZXkDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAAFA3ZhbAEHZ2V0Qm9vbAEDa2V5BAckbWF0Y2gwCQCbCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgdCb29sZWFuBAFiBQckbWF0Y2gwBQFiBwEVZ2V0RHVja2xpbmdQZXJjZW50YWdlAQpkdWNrbGluZ0lkBBJwZXJjZW50YWdlRHVja2xpbmcJAQ10cnlHZXRJbnRlZ2VyAQkBEmtleVN0YXJ0UGVyY2VudGFnZQEFCmR1Y2tsaW5nSWQEBGJhc2UDCQECIT0CBRJwZXJjZW50YWdlRHVja2xpbmcAAAUScGVyY2VudGFnZUR1Y2tsaW5nABQJALYCAQkAaAIFBGJhc2UFFWV4aXN0aW5nRHVja1ByZWNpc2lvbgEVZ2V0Q3VycmVudExldmVsQmlnSW50AQpkdWNrbGluZ0lkBAprRHVja0xldmVsCQEQa2V5RHVja2xpbmdMZXZlbAEFCmR1Y2tsaW5nSWQEByRtYXRjaDAJAKIIAQUKa0R1Y2tMZXZlbAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAXMFByRtYXRjaDAJAKcDAQUBcwQHJG1hdGNoMQkAoAgBCQCsAgIJAKwCAgIJZHVja2xpbmdfBQpkdWNrbGluZ0lkAhFfaXNzdWVkQnlGZWVkQ2FsbAMJAAECBQckbWF0Y2gxAgdCb29sZWFuBAFiBQckbWF0Y2gxAwkAAAIFAWIGCQC2AgEAAAkBFWdldER1Y2tsaW5nUGVyY2VudGFnZQEFCmR1Y2tsaW5nSWQJARVnZXREdWNrbGluZ1BlcmNlbnRhZ2UBBQpkdWNrbGluZ0lkARNnZXRMYXN0RmVkVGltZXN0YW1wAQpkdWNrbGluZ0lkBBBsYXN0RmVkVGltZXN0YW1wCQENdHJ5R2V0SW50ZWdlcgEJARtrZXlEdWNrbGluZ0ZlZExhc3RUaW1lc3RhbXABBQpkdWNrbGluZ0lkAwkAZgIFEGxhc3RGZWRUaW1lc3RhbXAAAAUQbGFzdEZlZFRpbWVzdGFtcAgFCWxhc3RCbG9jawl0aW1lc3RhbXABGWNhbGN1bGF0ZU5ld0R1Y2tsaW5nTGV2ZWwCCmR1Y2tsaW5nSWQNcGF5bWVudEFtb3VudAQJY3VycmVudFRzCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAQXbGFzdEZlZFRpbWVzdGFtcENoZWNrZWQJARNnZXRMYXN0RmVkVGltZXN0YW1wAQUKZHVja2xpbmdJZAQHZmVkRGlmZgkAZQIFCWN1cnJlbnRUcwUXbGFzdEZlZFRpbWVzdGFtcENoZWNrZWQEB3BlbmFsdHkJALYCAQAABAZncm93dGgJALwCAwkAtgIBBQ1wYXltZW50QW1vdW50CQC2AgEFFnBlcmNlbnRHcm93dGhQcmVjaXNpb24JALYCAQUNRFVDS0xJTkdQUklDRQQMY3VycmVudExldmVsCQEVZ2V0Q3VycmVudExldmVsQmlnSW50AQUKZHVja2xpbmdJZAQIbmV3TGV2ZWwJALcCAgkAuAICBQxjdXJyZW50TGV2ZWwFB3BlbmFsdHkFBmdyb3d0aAQGcmVzdWx0AwkAvwICCQC2AgEAAAUIbmV3TGV2ZWwJAKYDAQUGZ3Jvd3RoCQCmAwEFCG5ld0xldmVsCQCUCgIFBnJlc3VsdAkAzAgCCQCsAgICDWN1cnJlbnRMZXZlbD0JAKYDAQUMY3VycmVudExldmVsCQDMCAIJAKwCAgIJbmV3TGV2ZWw9CQCmAwEFCG5ld0xldmVsCQDMCAIJAKwCAgIHZ3Jvd3RoPQkApgMBBQZncm93dGgJAMwIAgkArAICAghwZW5hbHR5PQkApgMBBQdwZW5hbHR5CQDMCAIJAKwCAgIKbGFzdEZlZFRzPQkApAMBBRdsYXN0RmVkVGltZXN0YW1wQ2hlY2tlZAkAzAgCCQCsAgICCGZlZERpZmY9CQCkAwEFB2ZlZERpZmYFA25pbAEFYXNJbnQBBXZhbHVlBAckbWF0Y2gwBQV2YWx1ZQMJAAECBQckbWF0Y2gwAgNJbnQEA2ludAUHJG1hdGNoMAUDaW50CQACAQIeQkFJOiB3cm9uZyB0eXBlLCBleHBlY3RlZDogSW50BAFpAQ9jb25maWd1cmVPcmFjbGUBBm9yYWNsZQMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECD0JDTzogYWRtaW4gb25seQkAzAgCCQELU3RyaW5nRW50cnkCAhRzdGF0aWNfb3JhY2xlQWRkcmVzcwUGb3JhY2xlBQNuaWwBaQENaXNzdWVEdWNrbGluZwIHYWRkcmVzcwd0eElkU3RyAwkBAiE9AggFAWkGY2FsbGVyCQERZ2V0QnJlZWRlckFkZHJlc3MACQACAQIjQklGRDogWW91IGNhbid0IGlzc3VlIGZyZWUgZHVja2xpbmcEBWFzc2V0CQDDCAcCEEJBQlktMTExMTExMTEtSFoCAAABAAAHBQR1bml0BQZoZWlnaHQEB2Fzc2V0SWQJALgIAQUFYXNzZXQJAJQKAgkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIJAKwCAgkArAICBQdhZGRyZXNzAgFfBQd0eElkU3RyAgNfZGkJANgEAQUHYXNzZXRJZAkAzAgCCQEMSW50ZWdlckVudHJ5AgIMc3RhdHNfYW1vdW50CQBkAgkBDXRyeUdldEludGVnZXIBAgxzdGF0c19hbW91bnQAAQkAzAgCCQEMQm9vbGVhbkVudHJ5AgkArAICCQCsAgICCWR1Y2tsaW5nXwkA2AQBBQdhc3NldElkAhFfaXNzdWVkQnlGZWVkQ2FsbAkAAAIIBQFpBmNhbGxlcgUEdGhpcwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBEmtleVN0YXJ0UGVyY2VudGFnZQEJANgEAQUHYXNzZXRJZAAACQDMCAIJAQtTdHJpbmdFbnRyeQIJAQhrZXlPd25lcgEJANgEAQUHYXNzZXRJZAUHYWRkcmVzcwkAzAgCBQVhc3NldAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQEFdmFsdWUBCQCmCAEFB2FkZHJlc3MAAQUHYXNzZXRJZAUDbmlsCQDYBAEFB2Fzc2V0SWQBaQEMZmVlZER1Y2tsaW5nAgpkdWNrbGluZ0lkDW1heEZlZWRBbW91bnQEDWFkZHJlc3NTdHJpbmcJAKUIAQgFAWkGY2FsbGVyBA5yZWFsRHVja2xpbmdJZAMDCQECIT0CCQCQAwEIBQFpCHBheW1lbnRzAAEGCQECIT0CCAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQJAQ9nZXRTcGljZUFzc2V0SWQACQACAQIuQkZEOiBCYWQgcGF5bWVudCBhdHRhY2hlZCAoYXNzZXRbc10gb3IgYW1vdW50KQMJAQdnZXRCb29sAQkBEGtleUR1Y2tsaW5nR3Jvd24BBQpkdWNrbGluZ0lkCQACAQIeQkZEOiBEdWNrbGluZyBpcyBhbHJlYWR5IGdyb3duAwkAAAIFCmR1Y2tsaW5nSWQCAAkAAgECI0JGRDogUGxlYXNlIGhhdGNoIGEgZHVja2xpbmcgZmlyc3QhBA1kdWNrbGluZ093bmVyCQEMdHJ5R2V0U3RyaW5nAQkBCGtleU93bmVyAQUKZHVja2xpbmdJZAQPZHVja2xpbmdJZENoZWNrCQEFdmFsdWUBCQDsBwEJANkEAQUKZHVja2xpbmdJZAMJAQIhPQIJAPAHAggFAWkGY2FsbGVyCAUPZHVja2xpbmdJZENoZWNrAmlkAAEJAAIBAilCRkQ6IFlvdSdyZSBub3QgdGhlIG93bmVyIG9mIHRoZSBkdWNrbGluZwMJAQIhPQIFDWR1Y2tsaW5nT3duZXIJAKUIAQgFAWkGY2FsbGVyCQACAQI+QkZEOiBZb3UgY2FuIG9ubHkgZmVlZCBkdWNrbGluZ3MgdGhhdCB5b3Ugd29uL2JvdWdodCB5b3Vyc2VsZiEDCQECIT0CCAUPZHVja2xpbmdJZENoZWNrBmlzc3VlcgUEdGhpcwkAAgECJEJGRDogQ2FudCBmaW5kIGR1Y2tsaW5nIHdpdGggc3VjaCBpZAQQZHVja2xpbmdJZFN0cmluZwkA2AQBCAUPZHVja2xpbmdJZENoZWNrAmlkBRBkdWNrbGluZ0lkU3RyaW5nBBJrRHVja2xpbmdMYXN0RmVkVHMJARtrZXlEdWNrbGluZ0ZlZExhc3RUaW1lc3RhbXABBQpkdWNrbGluZ0lkBA5jdXJyZW50UGF5bWVudAgJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAZhbW91bnQECWtOZXdMZXZlbAkBEGtleUR1Y2tsaW5nTGV2ZWwBBQ5yZWFsRHVja2xpbmdJZAQKa1RvdGFsRmVlZAkBDGtleVRvdGFsRmVlZAEFDnJlYWxEdWNrbGluZ0lkBAl0b3RhbEZlZWQJAQ10cnlHZXRJbnRlZ2VyAQUKa1RvdGFsRmVlZAQMa0ZlZWRUeFN0YXRzCQCsAgIJAKwCAgkArAICAglkdWNrbGluZ18FDnJlYWxEdWNrbGluZ0lkAgZfc3RhdF8JAKQDAQgFCWxhc3RCbG9jawl0aW1lc3RhbXADCQBmAgUOY3VycmVudFBheW1lbnQFDW1heEZlZWRBbW91bnQJAAIBCQCsAgICP0JGRDogQ2Fubm90IGZlZWQgZHVja2xpbmcgZm9yIHN1Y2ggYW1vdW50LCBtYXggZmVlZCBhbW91bnQgaXM6IAkApAMBBQ1tYXhGZWVkQW1vdW50BBBjYWxjdWxhdGVSZXN1bHRzCQEZY2FsY3VsYXRlTmV3RHVja2xpbmdMZXZlbAIFDnJlYWxEdWNrbGluZ0lkBQ5jdXJyZW50UGF5bWVudAkAzAgCCQEMSW50ZWdlckVudHJ5AgUSa0R1Y2tsaW5nTGFzdEZlZFRzCAUJbGFzdEJsb2NrCXRpbWVzdGFtcAkAzAgCCQEMSW50ZWdlckVudHJ5AgUKa1RvdGFsRmVlZAkAZAIFCXRvdGFsRmVlZAUOY3VycmVudFBheW1lbnQJAMwIAgkBDEludGVnZXJFbnRyeQIFDGtGZWVkVHhTdGF0cwUOY3VycmVudFBheW1lbnQJAMwIAgkBC1N0cmluZ0VudHJ5AgUJa05ld0xldmVsCAUQY2FsY3VsYXRlUmVzdWx0cwJfMQkAzAgCCQELU3RyaW5nRW50cnkCCQCsAgIFDGtGZWVkVHhTdGF0cwIGX2RlYnVnCQC5CQIIBRBjYWxjdWxhdGVSZXN1bHRzAl8yAgE7BQNuaWwBaQEUdHVybkR1Y2tsaW5nSW50b0R1Y2sAAwkBAiE9AggFAWkGY2FsbGVyCQERZ2V0QnJlZWRlckFkZHJlc3MACQACAQIdQklGRDogWW91IGNhbid0IHR1cm4gZHVja2xpbmcEB2FkZHJlc3MJAKUIAQgFAWkGY2FsbGVyBAR0eElkCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQEFGxhc3RJc3N1ZWREdWNrbGluZ1RzCQENdHJ5R2V0SW50ZWdlcgEFFktHbG9iYWxJc3N1ZWRUaW1lc3RhbXAEC2ZpdmVNaW5Jbk1zCQBoAgkAaAIAAQA8AOgHBAh0aW1lRGlmZgkAZQIIBQlsYXN0QmxvY2sJdGltZXN0YW1wCQBkAgUUbGFzdElzc3VlZER1Y2tsaW5nVHMFC2ZpdmVNaW5Jbk1zAwMJAGYCBRRsYXN0SXNzdWVkRHVja2xpbmdUcwAACQBmAgAABQh0aW1lRGlmZgcJAAIBCQCsAgIJAKwCAgJCQlREOiBDYW4gaXNzdWUgZHVja2xpbmdzIG9ubHkgb25jZSBwZXIgMSBtaW51dGVzLCBwbGVhc2Ugd2FpdCBmb3IgCQCkAwEJAGsDBQh0aW1lRGlmZgABAOgHAgUgc2VjLgMJAQIhPQIJAJADAQgFAWkIcGF5bWVudHMAAQkAAgECLkJURDogQmFkIHBheW1lbnQgYXR0YWNoZWQgKGFzc2V0W3NdIG9yIGFtb3VudCkEA3BtdAkBBXZhbHVlAQkA7AcBCQEFdmFsdWUBCAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwAAB2Fzc2V0SWQDCQC/AgIJALYCAQBkCQEVZ2V0Q3VycmVudExldmVsQmlnSW50AQkA2AQBCAUDcG10AmlkCQACAQIhQlREOiBEdWNrbGluZyBpcyBub3QgZ3Jvd24geWV0Li4uAwkBAiE9AggFA3BtdAZpc3N1ZXIFBHRoaXMJAAIBAipCVEQ6IENhbiB1c2Ugb25seSBkdWNrbGluZ3MgZnJvbSB0aGlzIGRBcHAEDmtEdWNrbGluZ0dyb3duCQEQa2V5RHVja2xpbmdHcm93bgEJANgEAQgFA3BtdAJpZAkAlAoCCQDMCAIJAQxCb29sZWFuRW50cnkCBQ5rRHVja2xpbmdHcm93bgYJAMwIAgkBDEludGVnZXJFbnRyeQIFFktHbG9iYWxJc3N1ZWRUaW1lc3RhbXAIBQlsYXN0QmxvY2sJdGltZXN0YW1wBQNuaWwJANgEAQgFA3BtdAJpZAECdHgBBnZlcmlmeQAJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAIBQJ0eA9zZW5kZXJQdWJsaWNLZXk7KEXV",
    "height": 3233920,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 94s2jbMxs2QsUNypmaN81QWiZyQZ2RHRY9ieY5nCrYmc
Next: 7wSwmytDe35EPZrk7WMFbgv1qvKzycRenMBW1WgeZyG9

Diff: 
Old New Differences
214 214                              then throw("BTD: Can use only ducklings from this dApp")
215 215                              else {
216 216                                  let kDucklingGrown = keyDucklingGrown(toBase58String(pmt.id))
217 - [BooleanEntry(kDucklingGrown, true), IntegerEntry(KGlobalIssuedTimestamp, lastBlock.timestamp)]
217 +                                 $Tuple2([BooleanEntry(kDucklingGrown, true), IntegerEntry(KGlobalIssuedTimestamp, lastBlock.timestamp)], toBase58String(pmt.id))
218 218                                  }
219 219                      }
220 220          }
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 144      then throw("BIFD: You can't issue free duckling")
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 - [BooleanEntry(kDucklingGrown, true), IntegerEntry(KGlobalIssuedTimestamp, lastBlock.timestamp)]
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
214	214		then throw("BTD: Can use only ducklings from this dApp")
215	215		else {
216	216		let kDucklingGrown = keyDucklingGrown(toBase58String(pmt.id))
217		-	[BooleanEntry(kDucklingGrown, true), IntegerEntry(KGlobalIssuedTimestamp, lastBlock.timestamp)]
	217	+	$Tuple2([BooleanEntry(kDucklingGrown, true), IntegerEntry(KGlobalIssuedTimestamp, lastBlock.timestamp)], toBase58String(pmt.id))
218	218		}
219	219		}
220	220		}

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	144		then throw("BIFD: You can't issue free duckling")
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		-	[BooleanEntry(kDucklingGrown, true), IntegerEntry(KGlobalIssuedTimestamp, lastBlock.timestamp)]
	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 
49.15 ms ◑