w8 · tx · 6aX···PWi

tx · 6aXhFJmkdNEgwh1q496gE6GJs8pCEaZXakbYrywb4PWi

3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv:  -0.01700000 Waves

2023.05.24 14:59 [3657506] smart account 3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "6aXhFJmkdNEgwh1q496gE6GJs8pCEaZXakbYrywb4PWi",
    "fee": 1700000,
    "feeAssetId": null,
    "timestamp": 1684929594052,
    "version": 2,
    "chainId": 87,
    "sender": "3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv",
    "senderPublicKey": "EBHsV7TQYm4qS2V7iZXEXwcbUdEYQyCSLEdY2AMvLPns",
    "proofs": [
        "ZRYKAhADXtLZVSkK3QGvqiEADQusX5kJxjf4itZugKMTJi1ESKSzviJNHv6txA46jyDfDZuWEXwjM7aiu5vhFzP",
        "3UEXxGio84cyMdehKu2YoziWCP7a4bHLYTDCH9SFiGtvq5jwZa1FBF2vFmmG191SE6Lc6nFTvAqgD8ZVEo7DEFzd"
    ],
    "script": "base64:BgJACAISAwoBCBIDCgEBEgMKAQESAwoBCBIDCgEIEgMKAQgSBAoCCAgSBQoDCAgIEgUKAwgICBIECgIICBIECgIICB8BFHRyeUdldFN0cmluZ0V4dGVybmFsAgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAnQgCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFhBQckbWF0Y2gwBQFhAgABDHRyeUdldFN0cmluZwEDa2V5CQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCBQR0aGlzBQNrZXkBCWdldE9yYWNsZQAJAQdBZGRyZXNzAQkA2QQBCQEMdHJ5R2V0U3RyaW5nAQIUc3RhdGljX29yYWNsZUFkZHJlc3MBDWdldEVnZ0Fzc2V0SWQACQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhFzdGF0aWNfZWdnQXNzZXRJZAERZ2V0UmViaXJ0aEFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFXN0YXRpY19yZWJpcnRoQWRkcmVzcwETZ2V0U3dvcFByb21vQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIXc3RhdGljX3N3b3BQcm9tb0FkZHJlc3MBEmdldEJhYnlEdWNrQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIWc3RhdGljX2JhYnlEdWNrQWRkcmVzcwEVZ2V0UmVmQ29udHJhY3RBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhlzdGF0aWNfcmVmQ29udHJhY3RBZGRyZXNzARFnZXRDb3Vwb25zQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIVc3RhdGljX2NvdXBvbnNBZGRyZXNzAQ5nZXRCdXJuQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAISc3RhdGljX2J1cm5BZGRyZXNzABBkZWxheUZvckhhdGNoaW5nAAIAC3R5cGVzQW1vdW50AAoADVJlZmVyZXJSZXdhcmQABQAPSGF0Y2hpbmdTdGFydGVkAhBIQVRDSElOR19TVEFSVEVEABBIYXRjaGluZ0ZpbmlzaGVkAhFIQVRDSElOR19GSU5JU0hFRAEIaXNMb2NrZWQABA1tYXN0ZXJBZGRyZXNzCQEHQWRkcmVzcwEBGgFXiLIGIfCAykGiMgAjHv+piSJIOd1wFskJBAckbWF0Y2gwCQCaCAIFDW1hc3RlckFkZHJlc3MCB2VnZ2xvY2sDCQABAgUHJG1hdGNoMAIDSW50BAFiBQckbWF0Y2gwBQFiAAABFGdldEhhdGNoaW5nU3RhdHVzS2V5AgdhZGRyZXNzBHR4SWQJAKwCAgkArAICCQCsAgIFB2FkZHJlc3MCAV8JANgEAQUEdHhJZAIHX3N0YXR1cwEaZ2V0SGF0Y2hpbmdGaW5pc2hIZWlnaHRLZXkCB2FkZHJlc3MEdHhJZAkArAICCQCsAgIJAKwCAgUHYWRkcmVzcwIBXwkA2AQBBQR0eElkAgNfZmgBDGdldER1Y2tJZEtleQIHYWRkcmVzcwR0eElkCQCsAgIJAKwCAgkArAICBQdhZGRyZXNzAgFfCQDYBAEFBHR4SWQCA19kaQEPZ2V0RHVja1N0YXRzS2V5AQlnZW5TdHJpbmcJAKwCAgkArAICAgZzdGF0c18FCWdlblN0cmluZwIHX2Ftb3VudAENdHJ5R2V0SW50ZWdlcgEDa2V5BAN2YWwEByRtYXRjaDAJAJoIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAABQN2YWwAE2Rpc2NvdW50Q29lZmZpY2llbnQJAQ10cnlHZXRJbnRlZ2VyAQITZGlzY291bnRDb2VmZmljaWVudAAPc2FsZUNvZWZmaWNpZW50CQENdHJ5R2V0SW50ZWdlcgECD3NhbGVDb2VmZmljaWVudAEPZ2V0UmFuZG9tTnVtYmVyBAh2YXJpYW50cwR0eElkFGhhdGNoaW5nRmluaXNoSGVpZ2h0Bm9mZnNldAQPcmFuZG9tU2VlZEJsb2NrCQEFdmFsdWUBCQDtBwEJAGUCBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAABBApyYW5kb21IYXNoCQD3AwEJAMsBAgkAywECAQcTAv2Md8TRBQR0eElkCQEFdmFsdWUBCAUPcmFuZG9tU2VlZEJsb2NrA3ZyZgkAagIJALIJAgUKcmFuZG9tSGFzaAUGb2Zmc2V0BQh2YXJpYW50cwENd2FzVW5pcXVlQm9ybgEDZ2VuCQENdHJ5R2V0SW50ZWdlcgEJAQ9nZXREdWNrU3RhdHNLZXkBBQNnZW4BDWdldFJhbmRvbU5hbWUCBHR4SWQUaGF0Y2hpbmdGaW5pc2hIZWlnaHQEDWphY2twb3RSYW5kb20JAQ9nZXRSYW5kb21OdW1iZXIEAGQFBHR4SWQFFGhhdGNoaW5nRmluaXNoSGVpZ2h0AAQEBWVudHJ5CQEMSW50ZWdlckVudHJ5AgITbGFzdF9qYWNrcG90X3JhbmRvbQUNamFja3BvdFJhbmRvbQMDCQAAAgUNamFja3BvdFJhbmRvbQAzCQAAAgkBDXdhc1VuaXF1ZUJvcm4BAhBEVUNLLVdXV1dJTkFMLUpVAAAHCQCVCgMCEERVQ0stV1dXV0lOQUwtSlUCDDFBMUkxTDFONFctSgUFZW50cnkDAwkAAAIFDWphY2twb3RSYW5kb20AEwkAAAIJAQ13YXNVbmlxdWVCb3JuAQIQRFVDSy1XV1dDTE9XTi1KVQAABwkAlQoDAhBEVUNLLVdXV0NMT1dOLUpVAgwxQzFMMU4xTzRXLUoFBWVudHJ5AwMJAAACBQ1qYWNrcG90UmFuZG9tAB0JAAACCQENd2FzVW5pcXVlQm9ybgECEERVQ0stV1dERVRFQ1QtSlUAAAcJAJUKAwIQRFVDSy1XV0RFVEVDVC1KVQIMMUMxRDJFMlQyVy1KBQVlbnRyeQMDCQAAAgUNamFja3BvdFJhbmRvbQAnCQAAAgkBDXdhc1VuaXF1ZUJvcm4BAhBEVUNLLVdXV0FETUlOLUpVAAAHCQCVCgMCEERVQ0stV1dXQURNSU4tSlUCDjFBMUQxSTFNMU4zVy1KBQVlbnRyeQMDCQAAAgUNamFja3BvdFJhbmRvbQAJCQAAAgkBDXdhc1VuaXF1ZUJvcm4BAhBEVUNLLVdXV1dGQVJNLUpVAAAHCQCVCgMCEERVQ0stV1dXV0ZBUk0tSlUCDDFBMUYxTTFSNFctSgUFZW50cnkECnR5cGVSYW5kb20JAQ9nZXRSYW5kb21OdW1iZXIEAAQFBHR4SWQFFGhhdGNoaW5nRmluaXNoSGVpZ2h0AAUEC2NvbG9yUmFuZG9tCQEPZ2V0UmFuZG9tTnVtYmVyBAAEBQR0eElkBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAAGBAVjb2xvcgMJAAACBQtjb2xvclJhbmRvbQAAAgFZAwkAAAIFC2NvbG9yUmFuZG9tAAECAUcDCQAAAgULY29sb3JSYW5kb20AAgIBQgIBUgMJAAACBQp0eXBlUmFuZG9tAAAJAJUKAwkArAICAg9EVUNLLUxMTExMTExMLUcFBWNvbG9yAgQ4TC1HBQVlbnRyeQMJAAACBQp0eXBlUmFuZG9tAAEJAJUKAwkArAICAg9EVUNLLU1NTU1NTU1NLUcFBWNvbG9yAgQ4TS1HBQVlbnRyeQMJAAACBQp0eXBlUmFuZG9tAAIJAJUKAwkArAICAg9EVUNLLU5OTk5OTk5OLUcFBWNvbG9yAgQ4Ti1HBQVlbnRyeQkAlQoDCQCsAgICD0RVQ0stT09PT09PT08tRwUFY29sb3ICCzhPT09PT09PTy1HBQVlbnRyeQEVY291bnRFZ2dzTmVlZGVkQW1vdW50ARB0b3RhbER1Y2tzQW1vdW50BAFuBRB0b3RhbER1Y2tzQW1vdW50BAFnBRNkaXNjb3VudENvZWZmaWNpZW50BAFzBQ9zYWxlQ29lZmZpY2llbnQEAXQFC3R5cGVzQW1vdW50BAVwcmljZQkAbAYJAGQCAGQJAGkCCQBoAgUBbgUBZwkAaAIACgUBdAACAAUAAQACBQRET1dOAwkAAAIFD3NhbGVDb2VmZmljaWVudAAACQBoAgUFcHJpY2UAwIQ9CQBoAgkAaQIJAGgCBQVwcmljZQDAhD0AZAkAZQIAZAUPc2FsZUNvZWZmaWNpZW50AQVhc0ludAEFdmFsdWUEByRtYXRjaDAFBXZhbHVlAwkAAQIFByRtYXRjaDACA0ludAQDaW50BQckbWF0Y2gwBQNpbnQJAAIBAh5JQUk6IHdyb25nIHR5cGUsIGV4cGVjdGVkOiBJbnQBFmZpbmlzaEhhdGNoaW5nSW50ZXJuYWwCB3R4SWRTdHIFb3duZXIEBHR4SWQJANkEAQUHdHhJZFN0cgQRaGF0Y2hpbmdTdGF0dXNLZXkJARRnZXRIYXRjaGluZ1N0YXR1c0tleQIFBW93bmVyBQR0eElkBA9maW5pc2hIZWlnaHRLZXkJARpnZXRIYXRjaGluZ0ZpbmlzaEhlaWdodEtleQIFBW93bmVyBQR0eElkBAlkdWNrSWRLZXkJAQxnZXREdWNrSWRLZXkCBQVvd25lcgUEdHhJZAQMZHVja0Zyb21CYWJ5BAckbWF0Y2gwCQCgCAEJAKwCAgkArAICAgloYXRjaGluZ18FB3R4SWRTdHICCV9iYWJ5RHVjawMJAAECBQckbWF0Y2gwAgdCb29sZWFuBAF0BQckbWF0Y2gwBQF0BwQQaGF0Y2hpbmdUeFN0YXR1cwkBEUBleHRyTmF0aXZlKDEwNTMpAgUEdGhpcwURaGF0Y2hpbmdTdGF0dXNLZXkEFGhhdGNoaW5nRmluaXNoSGVpZ2h0CQERQGV4dHJOYXRpdmUoMTA1MCkCBQR0aGlzBQ9maW5pc2hIZWlnaHRLZXkDCQAAAgUQaGF0Y2hpbmdUeFN0YXR1cwUQSGF0Y2hpbmdGaW5pc2hlZAQGZHVja0lkCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzCQEMZ2V0RHVja0lkS2V5AgUFb3duZXIFBHR4SWQJAAIBCQCsAgICRklGREg6IFRoZSBkdWNrIHdhcyBoYXRjaGVkIGFuZCBjbGFpbWVkIGFscmVhZHksIGhlcmUgaXMgdGhlIGZvbG93aW5nOiAFBmR1Y2tJZAMJAGYCBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAUGaGVpZ2h0CQACAQkArAICCQCsAgIJAKwCAgkArAICAh1IYXRjaGluZyBpcyBub3QgZmluaXNoZWQgeWV0IAkApAMBCQBlAgUUaGF0Y2hpbmdGaW5pc2hIZWlnaHQFBmhlaWdodAInIGJsb2NrcyByZW1haW5pbmcsIGl0IHdpbGwgdGFrZSBhcm91bmQgCQCkAwEJAGUCBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAUGaGVpZ2h0AgggbWludXRlcwQLJHQwNjA1MDYxMzYJAQ1nZXRSYW5kb21OYW1lAgUEdHhJZAUUaGF0Y2hpbmdGaW5pc2hIZWlnaHQEB2R1Y2tHZW4IBQskdDA2MDUwNjEzNgJfMQQHZmFybUdlbggFCyR0MDYwNTA2MTM2Al8yBBJqYWNrcG90UmFuZG9tRW50cnkIBQskdDA2MDUwNjEzNgJfMwQLZGVzY3JpcHRpb24JAKwCAgkArAICAg57Imdlbm90eXBlIjogIgUHZHVja0dlbgIZIiwgImNyb3NzYnJlZWRpbmciOiB0cnVlfQQFYXNzZXQJAMMIBwUHZHVja0dlbgULZGVzY3JpcHRpb24AAQAABwUEdW5pdAUUaGF0Y2hpbmdGaW5pc2hIZWlnaHQEB2Fzc2V0SWQJALgIAQUFYXNzZXQEBmFtb3VudAkAZAIJAQ10cnlHZXRJbnRlZ2VyAQkBD2dldER1Y2tTdGF0c0tleQEFB2R1Y2tHZW4AAQkAzAgCCQELU3RyaW5nRW50cnkCBRFoYXRjaGluZ1N0YXR1c0tleQUQSGF0Y2hpbmdGaW5pc2hlZAkAzAgCCQELU3RyaW5nRW50cnkCBQlkdWNrSWRLZXkJANgEAQUHYXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQDYBAEFB2Fzc2V0SWQFCWR1Y2tJZEtleQkAzAgCCQEMQm9vbGVhbkVudHJ5AgkArAICCQCsAgICBWR1Y2tfCQDYBAEFB2Fzc2V0SWQCBl9ncm93bgUMZHVja0Zyb21CYWJ5CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEPZ2V0RHVja1N0YXRzS2V5AQUHZHVja0dlbgUGYW1vdW50CQDMCAIFEmphY2twb3RSYW5kb21FbnRyeQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICBnN0YXRzXwUHZmFybUdlbgIJX3F1YW50aXR5CQBkAgkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIGc3RhdHNfBQdmYXJtR2VuAglfcXVhbnRpdHkAAQkAzAgCBQVhc3NldAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQEHQWRkcmVzcwEJANkEAQUFb3duZXIAAQUHYXNzZXRJZAUDbmlsAQdnZXRCb29sAQNrZXkEByRtYXRjaDAJAJsIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACB0Jvb2xlYW4EAWIFByRtYXRjaDAFAWIHAQlpc1Rlc3RFbnYACQEHZ2V0Qm9vbAECB1RFU1RFTlYLAWkBD2NvbmZpZ3VyZU9yYWNsZQEGb3JhY2xlAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIPSUNVOiBhZG1pbiBvbmx5CQDMCAIJAQtTdHJpbmdFbnRyeQICFHN0YXRpY19vcmFjbGVBZGRyZXNzBQZvcmFjbGUFA25pbAFpAQtzZXREaXNjb3VudAEDdmFsAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIPSVNEOiBhZG1pbl9vbmx5CQDMCAIJAQxJbnRlZ2VyRW50cnkCAhNkaXNjb3VudENvZWZmaWNpZW50BQN2YWwFA25pbAFpAQdzZXRTYWxlAQN2YWwDCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMJAAIBAg9JU1M6IGFkbWluX29ubHkJAMwIAgkBDEludGVnZXJFbnRyeQICD3NhbGVDb2VmZmljaWVudAUDdmFsBQNuaWwBaQERc3RhcnREdWNrSGF0Y2hpbmcBDnJlZmVyZXJBZGRyZXNzAwkBAiE9AgkBEmdldEJhYnlEdWNrQWRkcmVzcwAIBQFpBmNhbGxlcgkAAgECPElTREhGQTogRnJvbSBub3cgb24gdGhpcyBpcyBvbmx5IHBvc3NpYmxlIHRocm91Z2ggZHVja2xpbmdzIQMJAGYCCQEIaXNMb2NrZWQAAAAJAAIBAitJU0RIOiBFR0cgb3BlcmF0aW9ucyBhcmUgdGVtcG9yYXJpbHkgbG9ja2VkBBB0b3RhbER1Y2tzQW1vdW50CQENdHJ5R2V0SW50ZWdlcgECDGR1Y2tzX2Ftb3VudAQKZWdnc05lZWRlZAkBFWNvdW50RWdnc05lZWRlZEFtb3VudAEFEHRvdGFsRHVja3NBbW91bnQJAMwIAgkBC1N0cmluZ0VudHJ5AgkBFGdldEhhdGNoaW5nU3RhdHVzS2V5AgkApQgBCAUBaQxvcmlnaW5DYWxsZXIIBQFpDXRyYW5zYWN0aW9uSWQFD0hhdGNoaW5nU3RhcnRlZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGmdldEhhdGNoaW5nRmluaXNoSGVpZ2h0S2V5AgkApQgBCAUBaQxvcmlnaW5DYWxsZXIIBQFpDXRyYW5zYWN0aW9uSWQJAGQCBQZoZWlnaHQFEGRlbGF5Rm9ySGF0Y2hpbmcJAMwIAgkBDEludGVnZXJFbnRyeQICDGR1Y2tzX2Ftb3VudAkAZAIFEHRvdGFsRHVja3NBbW91bnQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgIQZHVja3NfbGFzdF9wcmljZQkAaQIFCmVnZ3NOZWVkZWQAwIQ9CQDMCAIJAQxCb29sZWFuRW50cnkCCQCsAgIJAKwCAgIJaGF0Y2hpbmdfCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQCCV9iYWJ5RHVjawYFA25pbAFpARtzdGFydER1Y2tIYXRjaGluZ0ZvckFkZHJlc3MBB2FkZHJlc3MDCQBmAgkBCGlzTG9ja2VkAAAACQACAQItSVNESEZBOiBFR0cgb3BlcmF0aW9ucyBhcmUgdGVtcG9yYXJpbHkgbG9ja2VkAwMJAQIhPQIIBQFpBmNhbGxlcgkBE2dldFN3b3BQcm9tb0FkZHJlc3MACQECIT0CCAUBaQZjYWxsZXIFBHRoaXMHCQACAQIZSVNESEZBOiBQZXJtaXNzaW9uIGRlbmllZAQQdG90YWxEdWNrc0Ftb3VudAkBDXRyeUdldEludGVnZXIBAgxkdWNrc19hbW91bnQECmVnZ3NOZWVkZWQJARVjb3VudEVnZ3NOZWVkZWRBbW91bnQBBRB0b3RhbER1Y2tzQW1vdW50CQDMCAIJAQtTdHJpbmdFbnRyeQIJARRnZXRIYXRjaGluZ1N0YXR1c0tleQIFB2FkZHJlc3MIBQFpDXRyYW5zYWN0aW9uSWQFD0hhdGNoaW5nU3RhcnRlZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGmdldEhhdGNoaW5nRmluaXNoSGVpZ2h0S2V5AgUHYWRkcmVzcwgFAWkNdHJhbnNhY3Rpb25JZAkAZAIFBmhlaWdodAUQZGVsYXlGb3JIYXRjaGluZwkAzAgCCQEMSW50ZWdlckVudHJ5AgIMZHVja3NfYW1vdW50CQBkAgUQdG90YWxEdWNrc0Ftb3VudAABCQDMCAIJAQxJbnRlZ2VyRW50cnkCAhBkdWNrc19sYXN0X3ByaWNlCQBpAgUKZWdnc05lZWRlZADAhD0JAMwIAgkBDEJvb2xlYW5FbnRyeQIJAKwCAgkArAICAgloYXRjaGluZ18JANgEAQgFAWkNdHJhbnNhY3Rpb25JZAIGX3Byb21vBgUDbmlsAWkBEmZpbmlzaER1Y2tIYXRjaGluZwEHdHhJZFN0cgQFb3duZXIJAKUIAQgFAWkMb3JpZ2luQ2FsbGVyCQEWZmluaXNoSGF0Y2hpbmdJbnRlcm5hbAIFB3R4SWRTdHIFBW93bmVyAWkBDWlzc3VlRnJlZUR1Y2sCB2FkZHJlc3MHdHhJZFN0cgMJAQIhPQIIBQFpBmNhbGxlcgkBEWdldFJlYmlydGhBZGRyZXNzAAkAAgECEklTRkQ6IHJlYmlydGggb25seQQEdHhJZAkA2QQBBQd0eElkU3RyBBFoYXRjaGluZ1N0YXR1c0tleQkBFGdldEhhdGNoaW5nU3RhdHVzS2V5AgUHYWRkcmVzcwUEdHhJZAQPZmluaXNoSGVpZ2h0S2V5CQEaZ2V0SGF0Y2hpbmdGaW5pc2hIZWlnaHRLZXkCBQdhZGRyZXNzBQR0eElkBBB0b3RhbER1Y2tzQW1vdW50CQENdHJ5R2V0SW50ZWdlcgECDGR1Y2tzX2Ftb3VudAQKZWdnc05lZWRlZAkBFWNvdW50RWdnc05lZWRlZEFtb3VudAEFEHRvdGFsRHVja3NBbW91bnQEDCR0MDk5MTkxMDA4MQkBDWdldFJhbmRvbU5hbWUCBQR0eElkCQBkAgkBE3ZhbHVlT3JFcnJvck1lc3NhZ2UCCQDpBwEFBHR4SWQJAKwCAgkArAICBQd0eElkU3RyAgsgbm90IGZvdW5kIAkA2AQBBQR0eElkAAEEB2R1Y2tHZW4IBQwkdDA5OTE5MTAwODECXzEEB2Zhcm1HZW4IBQwkdDA5OTE5MTAwODECXzIEEmphY2twb3RSYW5kb21FbnRyeQgFDCR0MDk5MTkxMDA4MQJfMwQLZGVzY3JpcHRpb24JAKwCAgkArAICAg57Imdlbm90eXBlIjogIgUHZHVja0dlbgIZIiwgImNyb3NzYnJlZWRpbmciOiB0cnVlfQQFYXNzZXQJAMMIBwUHZHVja0dlbgULZGVzY3JpcHRpb24AAQAABwUEdW5pdAUGaGVpZ2h0BAdhc3NldElkCQC4CAEFBWFzc2V0BAZhbW91bnQJAGQCCQENdHJ5R2V0SW50ZWdlcgEJAQ9nZXREdWNrU3RhdHNLZXkBBQdkdWNrR2VuAAEECWR1Y2tJZEtleQkBDGdldER1Y2tJZEtleQIFB2FkZHJlc3MFBHR4SWQJAJQKAgkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGmdldEhhdGNoaW5nRmluaXNoSGVpZ2h0S2V5AgUHYWRkcmVzcwUEdHhJZAUGaGVpZ2h0CQDMCAIJAQxJbnRlZ2VyRW50cnkCAgxkdWNrc19hbW91bnQJAGQCBRB0b3RhbER1Y2tzQW1vdW50AAEJAMwIAgkBDEludGVnZXJFbnRyeQICEGR1Y2tzX2xhc3RfcHJpY2UJAGkCBQplZ2dzTmVlZGVkAMCEPQkAzAgCBRJqYWNrcG90UmFuZG9tRW50cnkJAMwIAgkBC1N0cmluZ0VudHJ5AgURaGF0Y2hpbmdTdGF0dXNLZXkFEEhhdGNoaW5nRmluaXNoZWQJAMwIAgkBC1N0cmluZ0VudHJ5AgUJZHVja0lkS2V5CQDYBAEFB2Fzc2V0SWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkA2AQBBQdhc3NldElkBQlkdWNrSWRLZXkJAMwIAgkBDEludGVnZXJFbnRyeQIJAQ9nZXREdWNrU3RhdHNLZXkBBQdkdWNrR2VuBQZhbW91bnQJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgZzdGF0c18FB2Zhcm1HZW4CCV9xdWFudGl0eQkAZAIJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICBnN0YXRzXwUHZmFybUdlbgIJX3F1YW50aXR5AAEJAMwIAgUFYXNzZXQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwkBBXZhbHVlAQkApggBBQdhZGRyZXNzAAEFB2Fzc2V0SWQFA25pbAkA2AQBBQdhc3NldElkAWkBGWlzc3VlRnJlZUR1Y2tEZWZpbmVkR2VuZXMDB2FkZHJlc3MHdHhJZFN0cgVnZW5lcwMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECE0lJRkRERzogQWRtaW4gb25seSEEBHR4SWQJANkEAQUHdHhJZFN0cgQRaGF0Y2hpbmdTdGF0dXNLZXkJARRnZXRIYXRjaGluZ1N0YXR1c0tleQIFB2FkZHJlc3MFBHR4SWQED2ZpbmlzaEhlaWdodEtleQkBGmdldEhhdGNoaW5nRmluaXNoSGVpZ2h0S2V5AgUHYWRkcmVzcwUEdHhJZAQQdG90YWxEdWNrc0Ftb3VudAkBDXRyeUdldEludGVnZXIBAgxkdWNrc19hbW91bnQECmVnZ3NOZWVkZWQJARVjb3VudEVnZ3NOZWVkZWRBbW91bnQBBRB0b3RhbER1Y2tzQW1vdW50BAtjb2xvclJhbmRvbQkBD2dldFJhbmRvbU51bWJlcgQABAUEdHhJZAUGaGVpZ2h0AAYEBWNvbG9yAwkAAAIFC2NvbG9yUmFuZG9tAAACAVkDCQAAAgULY29sb3JSYW5kb20AAQIBRwMJAAACBQtjb2xvclJhbmRvbQACAgFCAgFSBA0kdDAxMTczNzExODE0CQCUCgIJAKwCAgkArAICCQCsAgICBURVQ0stBQVnZW5lcwICLUcFBWNvbG9yCQCsAgIJAKwCAgIBOAkArwICBQVnZW5lcwABAgItRwQHZHVja0dlbggFDSR0MDExNzM3MTE4MTQCXzEEB2Zhcm1HZW4IBQ0kdDAxMTczNzExODE0Al8yBAtkZXNjcmlwdGlvbgkArAICCQCsAgICDnsiZ2Vub3R5cGUiOiAiBQdkdWNrR2VuAhkiLCAiY3Jvc3NicmVlZGluZyI6IHRydWV9BAVhc3NldAkAwwgHBQdkdWNrR2VuBQtkZXNjcmlwdGlvbgABAAAHBQR1bml0BQZoZWlnaHQEB2Fzc2V0SWQJALgIAQUFYXNzZXQEBmFtb3VudAkAZAIJAQ10cnlHZXRJbnRlZ2VyAQkBD2dldER1Y2tTdGF0c0tleQEFB2R1Y2tHZW4AAQQJZHVja0lkS2V5CQEMZ2V0RHVja0lkS2V5AgUHYWRkcmVzcwUEdHhJZAkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEaZ2V0SGF0Y2hpbmdGaW5pc2hIZWlnaHRLZXkCBQdhZGRyZXNzBQR0eElkBQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQICDGR1Y2tzX2Ftb3VudAkAZAIFEHRvdGFsRHVja3NBbW91bnQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgIQZHVja3NfbGFzdF9wcmljZQkAaQIFCmVnZ3NOZWVkZWQAwIQ9CQDMCAIJAQtTdHJpbmdFbnRyeQIFEWhhdGNoaW5nU3RhdHVzS2V5BRBIYXRjaGluZ0ZpbmlzaGVkCQDMCAIJAQtTdHJpbmdFbnRyeQIFCWR1Y2tJZEtleQkA2AQBBQdhc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJANgEAQUHYXNzZXRJZAUJZHVja0lkS2V5CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEPZ2V0RHVja1N0YXRzS2V5AQUHZHVja0dlbgUGYW1vdW50CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQCsAgIJAKwCAgIGc3RhdHNfBQdmYXJtR2VuAglfcXVhbnRpdHkJAGQCCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgZzdGF0c18FB2Zhcm1HZW4CCV9xdWFudGl0eQABCQDMCAIFBWFzc2V0CQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQV2YWx1ZQEJAKYIAQUHYWRkcmVzcwABBQdhc3NldElkBQNuaWwJANgEAQUHYXNzZXRJZAFpAQxpc3N1ZUphY2twb3QDB2FkZHJlc3MHdHhJZFN0cgNnZW4DAwkBAiE9AggFAWkGY2FsbGVyCQERZ2V0UmViaXJ0aEFkZHJlc3MACQECIT0CCAUBaQZjYWxsZXIFBHRoaXMHCQACAQIaSVNKOiBhZG1pbiBvciByZWJpcnRoIG9ubHkEBHR4SWQJANkEAQUHdHhJZFN0cgQRaGF0Y2hpbmdTdGF0dXNLZXkJARRnZXRIYXRjaGluZ1N0YXR1c0tleQIFB2FkZHJlc3MFBHR4SWQED2ZpbmlzaEhlaWdodEtleQkBGmdldEhhdGNoaW5nRmluaXNoSGVpZ2h0S2V5AgUHYWRkcmVzcwUEdHhJZAQQdG90YWxEdWNrc0Ftb3VudAkBDXRyeUdldEludGVnZXIBAgxkdWNrc19hbW91bnQECmVnZ3NOZWVkZWQJARVjb3VudEVnZ3NOZWVkZWRBbW91bnQBBRB0b3RhbER1Y2tzQW1vdW50BA0kdDAxMzI2MzEzMzE1CQCUCgIJAKwCAgkArAICAgVEVUNLLQUDZ2VuAgMtSlUCBDhXLUoEB2R1Y2tHZW4IBQ0kdDAxMzI2MzEzMzE1Al8xBAdmYXJtR2VuCAUNJHQwMTMyNjMxMzMxNQJfMgQLZGVzY3JpcHRpb24JAKwCAgkArAICAg57Imdlbm90eXBlIjogIgUHZHVja0dlbgIZIiwgImNyb3NzYnJlZWRpbmciOiB0cnVlfQQFYXNzZXQJAMMIBwUHZHVja0dlbgULZGVzY3JpcHRpb24AAQAABwUEdW5pdAUGaGVpZ2h0BAdhc3NldElkCQC4CAEFBWFzc2V0BAlkdWNrSWRLZXkJAQxnZXREdWNrSWRLZXkCBQdhZGRyZXNzBQR0eElkBBN2YWx1ZUR1Y2tJZEtleUV4aXRzCQEMdHJ5R2V0U3RyaW5nAQUJZHVja0lkS2V5AwkBAiE9AgUTdmFsdWVEdWNrSWRLZXlFeGl0cwIACQACAQkArAICCQCsAgICKUlTSjogWW91IHdpbGwgb3ZlcnJpZGUgZm9sbG93aW5nIGR1Y2tJZCA6BQlkdWNrSWRLZXkCJCBtYWtlIHN1cmUgdGhhdCB5b3VyIHR4SWQgaXMgdW5pcXVlIQkAlAoCCQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEaZ2V0SGF0Y2hpbmdGaW5pc2hIZWlnaHRLZXkCBQdhZGRyZXNzBQR0eElkBQZoZWlnaHQJAMwIAgkBDEludGVnZXJFbnRyeQICDGR1Y2tzX2Ftb3VudAkAZAIFEHRvdGFsRHVja3NBbW91bnQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgIQZHVja3NfbGFzdF9wcmljZQkAaQIFCmVnZ3NOZWVkZWQAwIQ9CQDMCAIJAQtTdHJpbmdFbnRyeQIFEWhhdGNoaW5nU3RhdHVzS2V5BRBIYXRjaGluZ0ZpbmlzaGVkCQDMCAIJAQtTdHJpbmdFbnRyeQIFCWR1Y2tJZEtleQkA2AQBBQdhc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJANgEAQUHYXNzZXRJZAUJZHVja0lkS2V5CQDMCAIJAQxJbnRlZ2VyRW50cnkCCQEPZ2V0RHVja1N0YXRzS2V5AQUHZHVja0dlbgkAZAIJAQ10cnlHZXRJbnRlZ2VyAQkBD2dldER1Y2tTdGF0c0tleQEFB2R1Y2tHZW4AAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICBnN0YXRzXwUHZmFybUdlbgIJX3F1YW50aXR5CQBkAgkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIGc3RhdHNfBQdmYXJtR2VuAglfcXVhbnRpdHkAAQkAzAgCBQVhc3NldAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQEFdmFsdWUBCQCmCAEFB2FkZHJlc3MAAQUHYXNzZXRJZAUDbmlsCQDYBAEFB2Fzc2V0SWQBaQEMcmVkdWNlUmFyaXR5Agdhc3NldElkBGZHZW4EBWFzc2V0CQDZBAEFB2Fzc2V0SWQDAwkBAiE9AggFAWkGY2FsbGVyCQERZ2V0UmViaXJ0aEFkZHJlc3MACQECIT0CCAUBaQZjYWxsZXIFBHRoaXMHCQACAQIaSVJSOiBhZG1pbiBvciByZWJpcnRoIG9ubHkEB2R1Y2tHZW4ICQEFdmFsdWUBCQDsBwEFBWFzc2V0BG5hbWUEBmxldHRlcgkAsgICCQCvAgIFB2R1Y2tHZW4ABgABBAdmYXJtR2VuCQCsAgIJAKwCAgIBOAUGbGV0dGVyAgItRwkAzAgCCQEMSW50ZWdlckVudHJ5AgkBD2dldER1Y2tTdGF0c0tleQEFB2R1Y2tHZW4JAGUCCQENdHJ5R2V0SW50ZWdlcgEJAQ9nZXREdWNrU3RhdHNLZXkBBQdkdWNrR2VuAAEJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgZzdGF0c18FB2Zhcm1HZW4CCV9xdWFudGl0eQkAZQIJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICBnN0YXRzXwUHZmFybUdlbgIJX3F1YW50aXR5AAEFA25pbAFpARdmaW5pc2hEdWNrSGF0Y2hpbmdBZG1pbgIHdHhJZFN0cgVvd25lcgMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECIElGREhBOiBPbmx5IGFkbWlucyBjYW4gcnVuIHRoaXMhCQEWZmluaXNoSGF0Y2hpbmdJbnRlcm5hbAIFB3R4SWRTdHIFBW93bmVyAQJ0eAEGdmVyaWZ5AAMJAQlpc1Rlc3RFbnYACQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAACAUCdHgPc2VuZGVyUHVibGljS2V5BAlmaXJzdFVzZXIBIN7WxlHkUxbQZYDrAZoqC9D3l1H6HHaRfpuOBkN3F70lBApzZWNvbmRVc2VyASDBbN+O7dONc4+Lovn6iQ/0dc1EG1RyUqO0nNJWpC3gdQQJdGhpcmRVc2VyASDnW/SOqtL5SZ5uhCa4+X4f3GeofdwruNTqe83yaArBJQQPZmlyc3RVc2VyU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUJZmlyc3RVc2VyAAEDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwABBQlmaXJzdFVzZXIAAQMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAIFCWZpcnN0VXNlcgABAAAEEHNlY29uZFVzZXJTaWduZWQDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwAABQpzZWNvbmRVc2VyAAEDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwABBQpzZWNvbmRVc2VyAAEDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwACBQpzZWNvbmRVc2VyAAEAAAQPdGhpcmRVc2VyU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUJdGhpcmRVc2VyAAEDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwABBQl0aGlyZFVzZXIAAQMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAIFCXRoaXJkVXNlcgABAAAED3NpZ25hdHVyZXNDb3VudAkAZAIJAGQCBQ9maXJzdFVzZXJTaWduZWQFEHNlY29uZFVzZXJTaWduZWQFD3RoaXJkVXNlclNpZ25lZAQHJG1hdGNoMAUCdHgJAGcCBQ9zaWduYXR1cmVzQ291bnQAAtfgXMc=",
    "height": 3657506,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: HpGzJX2oEmVC6RisuFE4uFJMTBXJBL6fEf5Dz3xmp88g
Next: D1QdQg268z6pKTFUZYPkNwXciHXjipJtYTz2EFbTsAyA

Diff: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 - let delayForHatching = 2
5 - 
6 - let HatchingStarted = "BREEDING_STARTED"
7 - 
8 - let HatchingFinished = "BREEDING_FINISHED"
9 - 
10 4  func tryGetStringExternal (address,key) = match getString(address, key) {
11 5      case a: String => 
12 6          a
15 9  }
16 10  
17 11  
18 - func tryGetIntegerExternal (address,key) = match getInteger(address, key) {
19 -     case b: Int => 
20 -         b
21 -     case _ => 
22 -         0
23 - }
24 - 
25 - 
26 12  func tryGetString (key) = tryGetStringExternal(this, key)
27 13  
28 14  
29 - func staticKey_oracleAddress () = "static_oracleAddress"
15 + func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
30 16  
31 17  
32 - func staticKey_incubatorAddress () = "static_incubatorAddress"
18 + func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), "static_eggAssetId"))
33 19  
34 20  
35 - func staticKey_rebirthAddress () = "static_rebirthAddress"
21 + func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))
36 22  
37 23  
38 - func staticKey_itemsAddress () = "static_itemsAddress"
24 + func getSwopPromoAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_swopPromoAddress")))
39 25  
40 26  
41 - func staticKey_eggAssetId () = "static_eggAssetId"
27 + func getBabyDuckAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_babyDuckAddress")))
42 28  
43 29  
44 - func staticKey_babyDuckBreedingAddress () = "static_babyDuckBreedingAddress"
30 + func getRefContractAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_refContractAddress")))
45 31  
46 32  
47 - func staticKey_ducklingPrice () = "static_ducklingPrice"
33 + func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_couponsAddress")))
48 34  
49 35  
50 - func staticKey_couponsAddress () = "static_couponsAddress"
36 + func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_burnAddress")))
51 37  
52 38  
53 - func staticKey_burnAddress () = "static_burnAddress"
39 + let delayForHatching = 2
40 + 
41 + let typesAmount = 10
42 + 
43 + let RefererReward = 5
44 + 
45 + let HatchingStarted = "HATCHING_STARTED"
46 + 
47 + let HatchingFinished = "HATCHING_FINISHED"
48 + 
49 + func isLocked () = {
50 +     let masterAddress = Address(base58'3PEPftf2kWZDmAaWBjs6BUJa9957kiA2PkU')
51 +     match getInteger(masterAddress, "egglock") {
52 +         case b: Int => 
53 +             b
54 +         case _ => 
55 +             0
56 +     }
57 +     }
54 58  
55 59  
56 - func staticKey_refContractAddress () = "static_refContractAddress"
60 + func getHatchingStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
57 61  
58 62  
59 - func staticKey_extraFee () = "static_extraFee"
60 - 
61 - 
62 - func staticKey_feeAggregator () = "static_feeAggregator"
63 - 
64 - 
65 - func getOracle () = Address(fromBase58String(tryGetString(staticKey_oracleAddress())))
66 - 
67 - 
68 - func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_incubatorAddress())))
69 - 
70 - 
71 - func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_rebirthAddress())))
72 - 
73 - 
74 - func getItemsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_itemsAddress())))
75 - 
76 - 
77 - func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_eggAssetId()))
78 - 
79 - 
80 - func getBabyDuckBreedingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_babyDuckBreedingAddress())))
81 - 
82 - 
83 - func getDucklingPrice () = tryGetIntegerExternal(getOracle(), staticKey_ducklingPrice())
84 - 
85 - 
86 - func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_couponsAddress())))
87 - 
88 - 
89 - func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_burnAddress())))
90 - 
91 - 
92 - func getRefContractAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_refContractAddress())))
93 - 
94 - 
95 - func getFeeAggregator () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_feeAggregator())))
96 - 
97 - 
98 - func checkAdditionalPayment (payment) = if (isDefined(payment.assetId))
99 -     then throw("BCAP: Please attach waves")
100 -     else {
101 -         let feeAmount = getIntegerValue(getOracle(), staticKey_extraFee())
102 -         if ((payment.amount != feeAmount))
103 -             then throw((("BCAP: Please attach exactly " + toString(feeAmount)) + " amount of wavelets"))
104 -             else [ScriptTransfer(getFeeAggregator(), feeAmount, unit)]
105 -         }
106 - 
107 - 
108 - let MaxGeneration = 7
109 - 
110 - let Generations = ["G", "H", "I", "K", "L", "M", "N", "O"]
111 - 
112 - func getProcessStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
113 - 
114 - 
115 - func getDucklingKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_duckling")
116 - 
117 - 
118 - func getProcessFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
119 - 
120 - 
121 - func getDuckParentKey (txId,parentNum) = ((("inittx_" + toBase58String(txId)) + "_parent") + toString(parentNum))
63 + func getHatchingFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
122 64  
123 65  
124 66  func getDuckIdKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_di")
138 80      }
139 81  
140 82  
141 - func determineGeneration (g1,g2) = {
142 -     let gIndex = max([value(indexOf(Generations, g1)), value(indexOf(Generations, g2))])
143 - Generations[(gIndex + 1)]
144 -     }
83 + let discountCoefficient = tryGetInteger("discountCoefficient")
145 84  
85 + let saleCoefficient = tryGetInteger("saleCoefficient")
146 86  
147 87  func getRandomNumber (variants,txId,hatchingFinishHeight,offset) = {
148 88      let randomSeedBlock = value(blockInfoByHeight((hatchingFinishHeight - 1)))
149 -     let randomHash = sha256_16Kb((txId + value(randomSeedBlock.vrf)))
89 +     let randomHash = sha256(((base58'incubator' + txId) + value(randomSeedBlock.vrf)))
150 90      (toInt(randomHash, offset) % variants)
151 91      }
152 92  
153 93  
154 - func getRandomGen (gen1,gen2,step,txId,hatchingFinishHeight,geneFromParent,genePostion,specifiqueGene,specifiqueGenePosition) = if (if ((geneFromParent != 0))
155 -     then (genePostion == step)
156 -     else false)
157 -     then if ((geneFromParent == 1))
158 -         then gen1
159 -         else if ((geneFromParent == 2))
160 -             then gen2
161 -             else throw("Parent either needs to be 1 or 2")
162 -     else if (if ((specifiqueGene != ""))
163 -         then (specifiqueGenePosition == step)
164 -         else false)
165 -         then specifiqueGene
166 -         else {
167 -             let randomNum = getRandomNumber(2, txId, hatchingFinishHeight, step)
168 -             let gen = if ((randomNum == 0))
169 -                 then gen1
170 -                 else gen2
171 -             gen
172 -             }
94 + func wasUniqueBorn (gen) = tryGetInteger(getDuckStatsKey(gen))
173 95  
174 96  
175 - func checkAssetInIncubator (assetId) = {
176 -     let result =     match getString(getIncubatorAddress(), assetId) {
177 -         case b: String => 
178 -             true
179 -         case _ => 
180 -             false
181 -     }
182 -     let result2 =     match getString(this, assetId) {
183 -         case c: String => 
184 -             true
185 -         case _ => 
186 -             false
187 -     }
188 -     if (result)
189 -         then true
190 -         else result2
97 + func getRandomName (txId,hatchingFinishHeight) = {
98 +     let jackpotRandom = getRandomNumber(100, txId, hatchingFinishHeight, 4)
99 +     let entry = IntegerEntry("last_jackpot_random", jackpotRandom)
100 +     if (if ((jackpotRandom == 51))
101 +         then (wasUniqueBorn("DUCK-WWWWINAL-JU") == 0)
102 +         else false)
103 +         then $Tuple3("DUCK-WWWWINAL-JU", "1A1I1L1N4W-J", entry)
104 +         else if (if ((jackpotRandom == 19))
105 +             then (wasUniqueBorn("DUCK-WWWCLOWN-JU") == 0)
106 +             else false)
107 +             then $Tuple3("DUCK-WWWCLOWN-JU", "1C1L1N1O4W-J", entry)
108 +             else if (if ((jackpotRandom == 29))
109 +                 then (wasUniqueBorn("DUCK-WWDETECT-JU") == 0)
110 +                 else false)
111 +                 then $Tuple3("DUCK-WWDETECT-JU", "1C1D2E2T2W-J", entry)
112 +                 else if (if ((jackpotRandom == 39))
113 +                     then (wasUniqueBorn("DUCK-WWWADMIN-JU") == 0)
114 +                     else false)
115 +                     then $Tuple3("DUCK-WWWADMIN-JU", "1A1D1I1M1N3W-J", entry)
116 +                     else if (if ((jackpotRandom == 9))
117 +                         then (wasUniqueBorn("DUCK-WWWWFARM-JU") == 0)
118 +                         else false)
119 +                         then $Tuple3("DUCK-WWWWFARM-JU", "1A1F1M1R4W-J", entry)
120 +                         else {
121 +                             let typeRandom = getRandomNumber(4, txId, hatchingFinishHeight, 5)
122 +                             let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 6)
123 +                             let color = if ((colorRandom == 0))
124 +                                 then "Y"
125 +                                 else if ((colorRandom == 1))
126 +                                     then "G"
127 +                                     else if ((colorRandom == 2))
128 +                                         then "B"
129 +                                         else "R"
130 +                             if ((typeRandom == 0))
131 +                                 then $Tuple3(("DUCK-LLLLLLLL-G" + color), "8L-G", entry)
132 +                                 else if ((typeRandom == 1))
133 +                                     then $Tuple3(("DUCK-MMMMMMMM-G" + color), "8M-G", entry)
134 +                                     else if ((typeRandom == 2))
135 +                                         then $Tuple3(("DUCK-NNNNNNNN-G" + color), "8N-G", entry)
136 +                                         else $Tuple3(("DUCK-OOOOOOOO-G" + color), "8OOOOOOOO-G", entry)
137 +                             }
191 138      }
192 139  
193 140  
194 - func canBeBreeded (asset1Id,asset2Id) = {
195 -     let asset1Gen = split(value(assetInfo(asset1Id)).name, "")
196 -     let asset2Gen = split(value(assetInfo(asset2Id)).name, "")
197 -     if ((value(indexOf(Generations, asset1Gen[14])) >= MaxGeneration))
198 -         then (("you can only breed ducks with generation " + Generations[MaxGeneration]) + " and lower")
199 -         else if ((value(indexOf(Generations, asset2Gen[14])) >= MaxGeneration))
200 -             then (("you can only breed ducks with generation " + Generations[MaxGeneration]) + " and lower")
201 -             else "true"
141 + func countEggsNeededAmount (totalDucksAmount) = {
142 +     let n = totalDucksAmount
143 +     let g = discountCoefficient
144 +     let s = saleCoefficient
145 +     let t = typesAmount
146 +     let price = pow((100 + ((n * g) / (10 * t))), 2, 5, 1, 2, DOWN)
147 +     if ((saleCoefficient == 0))
148 +         then (price * 1000000)
149 +         else (((price * 1000000) / 100) * (100 - saleCoefficient))
202 150      }
203 - 
204 - 
205 - func isSymbolA (accumulated,sym) = if ((sym == "A"))
206 -     then (accumulated + 1)
207 -     else (accumulated + 0)
208 - 
209 - 
210 - func isSymbolB (accumulated,sym) = if ((sym == "B"))
211 -     then (accumulated + 1)
212 -     else (accumulated + 0)
213 - 
214 - 
215 - func isSymbolC (accumulated,sym) = if ((sym == "C"))
216 -     then (accumulated + 1)
217 -     else (accumulated + 0)
218 - 
219 - 
220 - func isSymbolD (accumulated,sym) = if ((sym == "D"))
221 -     then (accumulated + 1)
222 -     else (accumulated + 0)
223 - 
224 - 
225 - func isSymbolE (accumulated,sym) = if ((sym == "E"))
226 -     then (accumulated + 1)
227 -     else (accumulated + 0)
228 - 
229 - 
230 - func isSymbolF (accumulated,sym) = if ((sym == "F"))
231 -     then (accumulated + 1)
232 -     else (accumulated + 0)
233 - 
234 - 
235 - func isSymbolG (accumulated,sym) = if ((sym == "G"))
236 -     then (accumulated + 1)
237 -     else (accumulated + 0)
238 - 
239 - 
240 - func isSymbolH (accumulated,sym) = if ((sym == "H"))
241 -     then (accumulated + 1)
242 -     else (accumulated + 0)
243 - 
244 - 
245 - func isSymbolI (accumulated,sym) = if ((sym == "I"))
246 -     then (accumulated + 1)
247 -     else (accumulated + 0)
248 - 
249 - 
250 - func isSymbolK (accumulated,sym) = if ((sym == "K"))
251 -     then (accumulated + 1)
252 -     else (accumulated + 0)
253 - 
254 - 
255 - func isSymbolL (accumulated,sym) = if ((sym == "L"))
256 -     then (accumulated + 1)
257 -     else (accumulated + 0)
258 - 
259 - 
260 - func isSymbolM (accumulated,sym) = if ((sym == "M"))
261 -     then (accumulated + 1)
262 -     else (accumulated + 0)
263 - 
264 - 
265 - func isSymbolN (accumulated,sym) = if ((sym == "N"))
266 -     then (accumulated + 1)
267 -     else (accumulated + 0)
268 - 
269 - 
270 - func isSymbolO (accumulated,sym) = if ((sym == "O"))
271 -     then (accumulated + 1)
272 -     else (accumulated + 0)
273 - 
274 - 
275 - func isSymbolS (accumulated,sym) = if ((sym == "S"))
276 -     then (accumulated + 1)
277 -     else (accumulated + 0)
278 - 
279 - 
280 - func isSymbolT (accumulated,sym) = if ((sym == "T"))
281 -     then (accumulated + 1)
282 -     else (accumulated + 0)
283 - 
284 - 
285 - func getAmountOrClear (amount) = if (contains(amount, "0"))
286 -     then ""
287 -     else amount
288 - 
289 - 
290 - func asString (value) = match value {
291 -     case string: String => 
292 -         string
293 -     case _ => 
294 -         throw("wrong type, expected: String")
295 - }
296 151  
297 152  
298 153  func asInt (value) = match value {
299 154      case int: Int => 
300 155          int
301 156      case _ => 
302 -         throw("wrong type, expected: Int")
157 +         throw("IAI: wrong type, expected: Int")
303 158  }
304 159  
305 160  
306 - func composeGenericData (duckGen,duckIdKey,assetId,asset) = {
307 -     let farmGen = asString(invoke(this, "getGenFromName", [duckGen], nil))
308 -     if ((farmGen == farmGen))
309 -         then {
310 -             let amount = tryGetInteger(getDuckStatsKey(duckGen))
311 -             let quantity = tryGetInteger((("stats_" + farmGen) + "_quantity"))
312 - [StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), (amount + 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (quantity + 1)), asset]
313 -             }
314 -         else throw("Strict value is not equal to itself.")
161 + func finishHatchingInternal (txIdStr,owner) = {
162 +     let txId = fromBase58String(txIdStr)
163 +     let hatchingStatusKey = getHatchingStatusKey(owner, txId)
164 +     let finishHeightKey = getHatchingFinishHeightKey(owner, txId)
165 +     let duckIdKey = getDuckIdKey(owner, txId)
166 +     let duckFromBaby =     match getBoolean((("hatching_" + txIdStr) + "_babyDuck")) {
167 +         case t: Boolean => 
168 +             t
169 +         case _ => 
170 +             false
315 171      }
316 - 
317 - 
318 - func finishDuckHatch (txIdStr,owner,duckGenesString) = {
319 -     let txId = fromBase58String(txIdStr)
320 -     let processStatusKey = getProcessStatusKey(owner, txId)
321 -     let duckIdKey = getDuckIdKey(owner, txId)
322 -     let processTxStatus = getStringValue(this, processStatusKey)
323 -     let finishHeightKey = getProcessFinishHeightKey(owner, txId)
324 -     let processFinishHeight = getIntegerValue(this, finishHeightKey)
325 -     if ((processTxStatus == HatchingFinished))
172 +     let hatchingTxStatus = getStringValue(this, hatchingStatusKey)
173 +     let hatchingFinishHeight = getIntegerValue(this, finishHeightKey)
174 +     if ((hatchingTxStatus == HatchingFinished))
326 175          then {
327 176              let duckId = getStringValue(this, getDuckIdKey(owner, txId))
328 -             throw(("The duck was breeded and claimed already, here is the folowing: " + duckId))
177 +             throw(("IFDH: The duck was hatched and claimed already, here is the folowing: " + duckId))
329 178              }
330 -         else if ((processFinishHeight > height))
331 -             then throw((((("Breeding is not finished yet " + toString((processFinishHeight - height))) + " blocks remaining, it will take around ") + toString((processFinishHeight - height))) + " minutes"))
179 +         else if ((hatchingFinishHeight > height))
180 +             then throw((((("Hatching is not finished yet " + toString((hatchingFinishHeight - height))) + " blocks remaining, it will take around ") + toString((hatchingFinishHeight - height))) + " minutes"))
332 181              else {
333 -                 let duckGen = if ((duckGenesString == ""))
334 -                     then asString(invoke(this, "generateDuck", [txId, processFinishHeight, 0, 0, "", 0], nil))
335 -                     else duckGenesString
336 -                 if ((duckGen == duckGen))
337 -                     then {
338 -                         let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
339 -                         let asset = Issue(duckGen, description, 1, 0, false, unit, processFinishHeight)
340 -                         let assetId = calculateAssetId(asset)
341 -                         (composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [StringEntry(processStatusKey, HatchingFinished), ScriptTransfer(addressFromStringValue(owner), 1, assetId)])
342 -                         }
343 -                     else throw("Strict value is not equal to itself.")
182 +                 let $t060506136 = getRandomName(txId, hatchingFinishHeight)
183 +                 let duckGen = $t060506136._1
184 +                 let farmGen = $t060506136._2
185 +                 let jackpotRandomEntry = $t060506136._3
186 +                 let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
187 +                 let asset = Issue(duckGen, description, 1, 0, false, unit, hatchingFinishHeight)
188 +                 let assetId = calculateAssetId(asset)
189 +                 let amount = (tryGetInteger(getDuckStatsKey(duckGen)) + 1)
190 + [StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), BooleanEntry((("duck_" + toBase58String(assetId)) + "_grown"), duckFromBaby), IntegerEntry(getDuckStatsKey(duckGen), amount), jackpotRandomEntry, IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) + 1)), asset, ScriptTransfer(Address(fromBase58String(owner)), 1, assetId)]
344 191                  }
345 192      }
346 193  
358 205  
359 206  @Callable(i)
360 207  func configureOracle (oracle) = if ((i.caller != this))
361 -     then throw("admin only")
208 +     then throw("ICU: admin only")
362 209      else [StringEntry("static_oracleAddress", oracle)]
363 210  
364 211  
365 212  
366 213  @Callable(i)
367 - func generateDuck (txId,hatchingFinishHeight,geneFromParent,genePostion,specifiqueGene,specifiqueGenePosition) = {
368 -     let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 11)
369 -     let color = if ((colorRandom == 0))
370 -         then "Y"
371 -         else if ((colorRandom == 1))
372 -             then "G"
373 -             else if ((colorRandom == 2))
374 -                 then "B"
375 -                 else "R"
376 -     let parent1Id = fromBase58String(tryGetString(getDuckParentKey(txId, 1)))
377 -     let parent2Id = fromBase58String(tryGetString(getDuckParentKey(txId, 2)))
378 -     let parent1Gen = split(value(assetInfo(parent1Id)).name, "")
379 -     let parent2Gen = split(value(assetInfo(parent2Id)).name, "")
380 -     let gen = ((((((((((("DUCK-" + getRandomGen(parent1Gen[5], parent2Gen[5], 0, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[6], parent2Gen[6], 1, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[7], parent2Gen[7], 2, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[8], parent2Gen[8], 3, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[9], parent2Gen[9], 4, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[10], parent2Gen[10], 5, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[11], parent2Gen[11], 6, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[12], parent2Gen[12], 7, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + "-") + determineGeneration(parent1Gen[14], parent2Gen[14])) + color)
381 -     $Tuple2(nil, gen)
214 + func setDiscount (val) = if ((i.caller != this))
215 +     then throw("ISD: admin_only")
216 +     else [IntegerEntry("discountCoefficient", val)]
217 + 
218 + 
219 + 
220 + @Callable(i)
221 + func setSale (val) = if ((i.caller != this))
222 +     then throw("ISS: admin_only")
223 +     else [IntegerEntry("saleCoefficient", val)]
224 + 
225 + 
226 + 
227 + @Callable(i)
228 + func startDuckHatching (refererAddress) = if ((getBabyDuckAddress() != i.caller))
229 +     then throw("ISDHFA: From now on this is only possible through ducklings!")
230 +     else if ((isLocked() > 0))
231 +         then throw("ISDH: EGG operations are temporarily locked")
232 +         else {
233 +             let totalDucksAmount = tryGetInteger("ducks_amount")
234 +             let eggsNeeded = countEggsNeededAmount(totalDucksAmount)
235 + [StringEntry(getHatchingStatusKey(toString(i.originCaller), i.transactionId), HatchingStarted), IntegerEntry(getHatchingFinishHeightKey(toString(i.originCaller), i.transactionId), (height + delayForHatching)), IntegerEntry("ducks_amount", (totalDucksAmount + 1)), IntegerEntry("ducks_last_price", (eggsNeeded / 1000000)), BooleanEntry((("hatching_" + toBase58String(i.transactionId)) + "_babyDuck"), true)]
236 +             }
237 + 
238 + 
239 + 
240 + @Callable(i)
241 + func startDuckHatchingForAddress (address) = if ((isLocked() > 0))
242 +     then throw("ISDHFA: EGG operations are temporarily locked")
243 +     else if (if ((i.caller != getSwopPromoAddress()))
244 +         then (i.caller != this)
245 +         else false)
246 +         then throw("ISDHFA: Permission denied")
247 +         else {
248 +             let totalDucksAmount = tryGetInteger("ducks_amount")
249 +             let eggsNeeded = countEggsNeededAmount(totalDucksAmount)
250 + [StringEntry(getHatchingStatusKey(address, i.transactionId), HatchingStarted), IntegerEntry(getHatchingFinishHeightKey(address, i.transactionId), (height + delayForHatching)), IntegerEntry("ducks_amount", (totalDucksAmount + 1)), IntegerEntry("ducks_last_price", (eggsNeeded / 1000000)), BooleanEntry((("hatching_" + toBase58String(i.transactionId)) + "_promo"), true)]
251 +             }
252 + 
253 + 
254 + 
255 + @Callable(i)
256 + func finishDuckHatching (txIdStr) = {
257 +     let owner = toString(i.originCaller)
258 +     finishHatchingInternal(txIdStr, owner)
382 259      }
383 260  
384 261  
385 262  
386 263  @Callable(i)
387 - func getGenFromName (assetName) = {
388 -     let genotype = split(dropRight(drop(assetName, 5), 3), "")
389 -     let generation = split(assetName, "")[14]
390 -     let gen = (((((((((((((((((getAmountOrClear((toString({
391 -         let $l = genotype
392 -         let $s = size($l)
393 -         let $acc0 = 0
394 -         func $f0_1 ($a,$i) =         if (($i >= $s))
395 -             then $a
396 -             else isSymbolA($a, $l[$i])
397 - 
398 -         func $f0_2 ($a,$i) =         if (($i >= $s))
399 -             then $a
400 -             else throw("List size exceeds 8")
401 - 
402 -         $f0_2($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)
403 -         }) + "A")) + getAmountOrClear((toString({
404 -         let $l = genotype
405 -         let $s = size($l)
406 -         let $acc0 = 0
407 -         func $f1_1 ($a,$i) =         if (($i >= $s))
408 -             then $a
409 -             else isSymbolB($a, $l[$i])
410 - 
411 -         func $f1_2 ($a,$i) =         if (($i >= $s))
412 -             then $a
413 -             else throw("List size exceeds 8")
414 - 
415 -         $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
416 -         }) + "B"))) + getAmountOrClear((toString({
417 -         let $l = genotype
418 -         let $s = size($l)
419 -         let $acc0 = 0
420 -         func $f2_1 ($a,$i) =         if (($i >= $s))
421 -             then $a
422 -             else isSymbolC($a, $l[$i])
423 - 
424 -         func $f2_2 ($a,$i) =         if (($i >= $s))
425 -             then $a
426 -             else throw("List size exceeds 8")
427 - 
428 -         $f2_2($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
429 -         }) + "C"))) + getAmountOrClear((toString({
430 -         let $l = genotype
431 -         let $s = size($l)
432 -         let $acc0 = 0
433 -         func $f3_1 ($a,$i) =         if (($i >= $s))
434 -             then $a
435 -             else isSymbolD($a, $l[$i])
436 - 
437 -         func $f3_2 ($a,$i) =         if (($i >= $s))
438 -             then $a
439 -             else throw("List size exceeds 8")
440 - 
441 -         $f3_2($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
442 -         }) + "D"))) + getAmountOrClear((toString({
443 -         let $l = genotype
444 -         let $s = size($l)
445 -         let $acc0 = 0
446 -         func $f4_1 ($a,$i) =         if (($i >= $s))
447 -             then $a
448 -             else isSymbolE($a, $l[$i])
449 - 
450 -         func $f4_2 ($a,$i) =         if (($i >= $s))
451 -             then $a
452 -             else throw("List size exceeds 8")
453 - 
454 -         $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
455 -         }) + "E"))) + getAmountOrClear((toString({
456 -         let $l = genotype
457 -         let $s = size($l)
458 -         let $acc0 = 0
459 -         func $f5_1 ($a,$i) =         if (($i >= $s))
460 -             then $a
461 -             else isSymbolF($a, $l[$i])
462 - 
463 -         func $f5_2 ($a,$i) =         if (($i >= $s))
464 -             then $a
465 -             else throw("List size exceeds 8")
466 - 
467 -         $f5_2($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
468 -         }) + "F"))) + getAmountOrClear((toString({
469 -         let $l = genotype
470 -         let $s = size($l)
471 -         let $acc0 = 0
472 -         func $f6_1 ($a,$i) =         if (($i >= $s))
473 -             then $a
474 -             else isSymbolG($a, $l[$i])
475 - 
476 -         func $f6_2 ($a,$i) =         if (($i >= $s))
477 -             then $a
478 -             else throw("List size exceeds 8")
479 - 
480 -         $f6_2($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
481 -         }) + "G"))) + getAmountOrClear((toString({
482 -         let $l = genotype
483 -         let $s = size($l)
484 -         let $acc0 = 0
485 -         func $f7_1 ($a,$i) =         if (($i >= $s))
486 -             then $a
487 -             else isSymbolH($a, $l[$i])
488 - 
489 -         func $f7_2 ($a,$i) =         if (($i >= $s))
490 -             then $a
491 -             else throw("List size exceeds 8")
492 - 
493 -         $f7_2($f7_1($f7_1($f7_1($f7_1($f7_1($f7_1($f7_1($f7_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
494 -         }) + "H"))) + getAmountOrClear((toString({
495 -         let $l = genotype
496 -         let $s = size($l)
497 -         let $acc0 = 0
498 -         func $f8_1 ($a,$i) =         if (($i >= $s))
499 -             then $a
500 -             else isSymbolI($a, $l[$i])
501 - 
502 -         func $f8_2 ($a,$i) =         if (($i >= $s))
503 -             then $a
504 -             else throw("List size exceeds 8")
505 - 
506 -         $f8_2($f8_1($f8_1($f8_1($f8_1($f8_1($f8_1($f8_1($f8_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
507 -         }) + "I"))) + getAmountOrClear((toString({
508 -         let $l = genotype
509 -         let $s = size($l)
510 -         let $acc0 = 0
511 -         func $f9_1 ($a,$i) =         if (($i >= $s))
512 -             then $a
513 -             else isSymbolK($a, $l[$i])
514 - 
515 -         func $f9_2 ($a,$i) =         if (($i >= $s))
516 -             then $a
517 -             else throw("List size exceeds 8")
518 - 
519 -         $f9_2($f9_1($f9_1($f9_1($f9_1($f9_1($f9_1($f9_1($f9_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
520 -         }) + "K"))) + getAmountOrClear((toString({
521 -         let $l = genotype
522 -         let $s = size($l)
523 -         let $acc0 = 0
524 -         func $f10_1 ($a,$i) =         if (($i >= $s))
525 -             then $a
526 -             else isSymbolL($a, $l[$i])
527 - 
528 -         func $f10_2 ($a,$i) =         if (($i >= $s))
529 -             then $a
530 -             else throw("List size exceeds 8")
531 - 
532 -         $f10_2($f10_1($f10_1($f10_1($f10_1($f10_1($f10_1($f10_1($f10_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
533 -         }) + "L"))) + getAmountOrClear((toString({
534 -         let $l = genotype
535 -         let $s = size($l)
536 -         let $acc0 = 0
537 -         func $f11_1 ($a,$i) =         if (($i >= $s))
538 -             then $a
539 -             else isSymbolM($a, $l[$i])
540 - 
541 -         func $f11_2 ($a,$i) =         if (($i >= $s))
542 -             then $a
543 -             else throw("List size exceeds 8")
544 - 
545 -         $f11_2($f11_1($f11_1($f11_1($f11_1($f11_1($f11_1($f11_1($f11_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
546 -         }) + "M"))) + getAmountOrClear((toString({
547 -         let $l = genotype
548 -         let $s = size($l)
549 -         let $acc0 = 0
550 -         func $f12_1 ($a,$i) =         if (($i >= $s))
551 -             then $a
552 -             else isSymbolM($a, $l[$i])
553 - 
554 -         func $f12_2 ($a,$i) =         if (($i >= $s))
555 -             then $a
556 -             else throw("List size exceeds 8")
557 - 
558 -         $f12_2($f12_1($f12_1($f12_1($f12_1($f12_1($f12_1($f12_1($f12_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
559 -         }) + "N"))) + getAmountOrClear((toString({
560 -         let $l = genotype
561 -         let $s = size($l)
562 -         let $acc0 = 0
563 -         func $f13_1 ($a,$i) =         if (($i >= $s))
564 -             then $a
565 -             else isSymbolM($a, $l[$i])
566 - 
567 -         func $f13_2 ($a,$i) =         if (($i >= $s))
568 -             then $a
569 -             else throw("List size exceeds 8")
570 - 
571 -         $f13_2($f13_1($f13_1($f13_1($f13_1($f13_1($f13_1($f13_1($f13_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
572 -         }) + "O"))) + getAmountOrClear((toString({
573 -         let $l = genotype
574 -         let $s = size($l)
575 -         let $acc0 = 0
576 -         func $f14_1 ($a,$i) =         if (($i >= $s))
577 -             then $a
578 -             else isSymbolS($a, $l[$i])
579 - 
580 -         func $f14_2 ($a,$i) =         if (($i >= $s))
581 -             then $a
582 -             else throw("List size exceeds 8")
583 - 
584 -         $f14_2($f14_1($f14_1($f14_1($f14_1($f14_1($f14_1($f14_1($f14_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
585 -         }) + "S"))) + getAmountOrClear((toString({
586 -         let $l = genotype
587 -         let $s = size($l)
588 -         let $acc0 = 0
589 -         func $f15_1 ($a,$i) =         if (($i >= $s))
590 -             then $a
591 -             else isSymbolT($a, $l[$i])
592 - 
593 -         func $f15_2 ($a,$i) =         if (($i >= $s))
594 -             then $a
595 -             else throw("List size exceeds 8")
596 - 
597 -         $f15_2($f15_1($f15_1($f15_1($f15_1($f15_1($f15_1($f15_1($f15_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
598 -         }) + "T"))) + "-") + generation)
599 -     $Tuple2(nil, gen)
600 -     }
601 - 
602 - 
603 - 
604 - @Callable(i)
605 - func validateAndGetChildren (assetId) = if (!(checkAssetInIncubator(assetId)))
606 -     then throw((("You need to attach a valid NFT-duck. " + assetId) + " is invalid!"))
264 + func issueFreeDuck (address,txIdStr) = if ((i.caller != getRebirthAddress()))
265 +     then throw("ISFD: rebirth only")
607 266      else {
608 -         let children = tryGetInteger((("asset_" + assetId) + "_children"))
609 -         $Tuple2(nil, children)
267 +         let txId = fromBase58String(txIdStr)
268 +         let hatchingStatusKey = getHatchingStatusKey(address, txId)
269 +         let finishHeightKey = getHatchingFinishHeightKey(address, txId)
270 +         let totalDucksAmount = tryGetInteger("ducks_amount")
271 +         let eggsNeeded = countEggsNeededAmount(totalDucksAmount)
272 +         let $t0991910081 = getRandomName(txId, (valueOrErrorMessage(transactionHeightById(txId), ((txIdStr + " not found ") + toBase58String(txId))) + 1))
273 +         let duckGen = $t0991910081._1
274 +         let farmGen = $t0991910081._2
275 +         let jackpotRandomEntry = $t0991910081._3
276 +         let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
277 +         let asset = Issue(duckGen, description, 1, 0, false, unit, height)
278 +         let assetId = calculateAssetId(asset)
279 +         let amount = (tryGetInteger(getDuckStatsKey(duckGen)) + 1)
280 +         let duckIdKey = getDuckIdKey(address, txId)
281 +         $Tuple2([IntegerEntry(getHatchingFinishHeightKey(address, txId), height), IntegerEntry("ducks_amount", (totalDucksAmount + 1)), IntegerEntry("ducks_last_price", (eggsNeeded / 1000000)), jackpotRandomEntry, StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), amount), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) + 1)), asset, ScriptTransfer(value(addressFromString(address)), 1, assetId)], toBase58String(assetId))
610 282          }
611 283  
612 284  
613 285  
614 286  @Callable(i)
615 - func createDuckSpecialGenes (address,duckGen,children) = if (if ((i.caller != getItemsAddress()))
616 -     then (i.caller != this)
617 -     else false)
618 -     then throw("admin or items only")
287 + func issueFreeDuckDefinedGenes (address,txIdStr,genes) = if ((i.caller != this))
288 +     then throw("IIFDDG: Admin only!")
619 289      else {
620 -         let txId = i.transactionId
290 +         let txId = fromBase58String(txIdStr)
291 +         let hatchingStatusKey = getHatchingStatusKey(address, txId)
292 +         let finishHeightKey = getHatchingFinishHeightKey(address, txId)
293 +         let totalDucksAmount = tryGetInteger("ducks_amount")
294 +         let eggsNeeded = countEggsNeededAmount(totalDucksAmount)
295 +         let colorRandom = getRandomNumber(4, txId, height, 6)
296 +         let color = if ((colorRandom == 0))
297 +             then "Y"
298 +             else if ((colorRandom == 1))
299 +                 then "G"
300 +                 else if ((colorRandom == 2))
301 +                     then "B"
302 +                     else "R"
303 +         let $t01173711814 = $Tuple2(((("DUCK-" + genes) + "-G") + color), (("8" + take(genes, 1)) + "-G"))
304 +         let duckGen = $t01173711814._1
305 +         let farmGen = $t01173711814._2
621 306          let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
622 -         let asset = Issue(duckGen, description, 1, 0, false)
307 +         let asset = Issue(duckGen, description, 1, 0, false, unit, height)
623 308          let assetId = calculateAssetId(asset)
624 -         let duckIdKey = getDuckIdKey(toString(i.caller), txId)
625 -         let farmGen = asString(invoke(this, "getGenFromName", [duckGen], nil))
626 -         if ((farmGen == farmGen))
627 -             then (composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [IntegerEntry((("asset_" + toBase58String(assetId)) + "_children"), children), ScriptTransfer(Address(address), 1, assetId)])
628 -             else throw("Strict value is not equal to itself.")
309 +         let amount = (tryGetInteger(getDuckStatsKey(duckGen)) + 1)
310 +         let duckIdKey = getDuckIdKey(address, txId)
311 +         $Tuple2([IntegerEntry(getHatchingFinishHeightKey(address, txId), height), IntegerEntry("ducks_amount", (totalDucksAmount + 1)), IntegerEntry("ducks_last_price", (eggsNeeded / 1000000)), StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), amount), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) + 1)), asset, ScriptTransfer(value(addressFromString(address)), 1, assetId)], toBase58String(assetId))
629 312          }
630 313  
631 314  
632 315  
633 316  @Callable(i)
634 - func startDuckBreeding (refererAddress) = {
635 -     let firstPayment = value(i.payments[0])
636 -     let secondPayment = value(i.payments[1])
637 -     let validPayment = checkAdditionalPayment(i.payments[2])
638 -     if ((validPayment == validPayment))
639 -         then {
640 -             let firstAssetId = toBase58String(value(firstPayment.assetId))
641 -             let secondAssetId = toBase58String(value(secondPayment.assetId))
642 -             if (if ((firstPayment.amount != 1))
643 -                 then true
644 -                 else (secondPayment.amount != 1))
645 -                 then throw("NFT is not attached")
646 -                 else {
647 -                     let amountPaidByCoupons = asInt(invoke(getCouponsAddress(), "useCoupons", [getDucklingPrice()], nil))
648 -                     if ((amountPaidByCoupons == amountPaidByCoupons))
649 -                         then {
650 -                             let leftToPay = (getDucklingPrice() - amountPaidByCoupons)
651 -                             let payment = if ((leftToPay != 0))
652 -                                 then {
653 -                                     let thirdPayment = value(i.payments[3])
654 -                                     if ((thirdPayment.assetId != getEggAssetId()))
655 -                                         then throw(("BSDB: You can attach only EGG tokens with the following asset id: " + toBase58String(getEggAssetId())))
656 -                                         else if ((thirdPayment.amount != leftToPay))
657 -                                             then throw(("BSDB: To breed you currently need the following amount of EGGlets: " + toString(leftToPay)))
658 -                                             else {
659 -                                                 let refererRewardForPerch = fraction(leftToPay, 5, 100)
660 -                                                 let refCall = invoke(getRefContractAddress(), "refPayment", [refererAddress], [AttachedPayment(getEggAssetId(), refererRewardForPerch)])
661 -                                                 if ((refCall == refCall))
662 -                                                     then {
663 -                                                         let burnCall = invoke(getBurnAddress(), "burnAttachedPayments", nil, [AttachedPayment(getEggAssetId(), (leftToPay - refererRewardForPerch))])
664 -                                                         if ((burnCall == burnCall))
665 -                                                             then leftToPay
666 -                                                             else throw("Strict value is not equal to itself.")
667 -                                                         }
668 -                                                     else throw("Strict value is not equal to itself.")
669 -                                                 }
670 -                                     }
671 -                                 else 0
672 -                             if ((payment == payment))
673 -                                 then {
674 -                                     let children1 = asInt(invoke(this, "validateAndGetChildren", [firstAssetId], nil))
675 -                                     if ((children1 == children1))
676 -                                         then {
677 -                                             let children2 = asInt(invoke(this, "validateAndGetChildren", [secondAssetId], nil))
678 -                                             if ((children2 == children2))
679 -                                                 then if (if ((children1 > 0))
680 -                                                     then true
681 -                                                     else (children2 > 0))
682 -                                                     then throw("One duck can be used for breeding only once in its lifetime.")
683 -                                                     else {
684 -                                                         let breededStatus = canBeBreeded(fromBase58String(firstAssetId), fromBase58String(secondAssetId))
685 -                                                         if ((breededStatus != "true"))
686 -                                                             then throw(("These ducks cannot be breeded: " + breededStatus))
687 -                                                             else {
688 -                                                                 let parent1Gen = split(value(assetInfo(value(firstPayment.assetId))).name, "")
689 -                                                                 let parent2Gen = split(value(assetInfo(value(secondPayment.assetId))).name, "")
690 -                                                                 let newG = determineGeneration(parent1Gen[14], parent2Gen[14])
691 -                                                                 let spiceAmount = ((value(indexOf(Generations, newG)) + 1) * 10)
692 -                                                                 let ducklingGen = asString(invoke(getBabyDuckBreedingAddress(), "issueDuckling", [toString(i.caller), toBase58String(i.transactionId), spiceAmount, newG], nil))
693 -                                                                 if ((ducklingGen == ducklingGen))
694 -                                                                     then ([StringEntry(getDuckParentKey(i.transactionId, 1), firstAssetId), StringEntry(getDuckParentKey(i.transactionId, 2), secondAssetId), StringEntry(getProcessStatusKey(toString(i.caller), i.transactionId), HatchingStarted), IntegerEntry(getProcessFinishHeightKey(toString(i.caller), i.transactionId), (height + delayForHatching)), StringEntry(getDucklingKey(toString(i.caller), i.transactionId), ducklingGen), IntegerEntry((("asset_" + firstAssetId) + "_children"), 1), IntegerEntry((("asset_" + secondAssetId) + "_children"), 1), ScriptTransfer(i.caller, 1, value(firstPayment.assetId)), ScriptTransfer(i.caller, 1, value(secondPayment.assetId))] ++ validPayment)
695 -                                                                     else throw("Strict value is not equal to itself.")
696 -                                                                 }
697 -                                                         }
698 -                                                 else throw("Strict value is not equal to itself.")
699 -                                             }
700 -                                         else throw("Strict value is not equal to itself.")
701 -                                     }
702 -                                 else throw("Strict value is not equal to itself.")
703 -                             }
704 -                         else throw("Strict value is not equal to itself.")
705 -                     }
706 -             }
707 -         else throw("Strict value is not equal to itself.")
708 -     }
709 - 
710 - 
711 - 
712 - @Callable(i)
713 - func finishDuckHatchingItems (txIdStr,duckGenesString) = if (if ((i.caller != getItemsAddress()))
714 -     then (duckGenesString != "")
317 + func issueJackpot (address,txIdStr,gen) = if (if ((i.caller != getRebirthAddress()))
318 +     then (i.caller != this)
715 319      else false)
716 -     then throw("Only items can create fixed genes")
320 +     then throw("ISJ: admin or rebirth only")
717 321      else {
718 -         let owner = toString(i.originCaller)
719 -         let ducklingFinish = asString(invoke(getBabyDuckBreedingAddress(), "turnDucklingIntoDuck", nil, i.payments))
720 -         if ((ducklingFinish == ducklingFinish))
721 -             then {
722 -                 let ducklingLinked = tryGetString(getDucklingKey(owner, fromBase58String(txIdStr)))
723 -                 if ((ducklingLinked != ducklingFinish))
724 -                     then throw("Please attach the correct duckling!")
725 -                     else finishDuckHatch(txIdStr, owner, duckGenesString)
726 -                 }
727 -             else throw("Strict value is not equal to itself.")
322 +         let txId = fromBase58String(txIdStr)
323 +         let hatchingStatusKey = getHatchingStatusKey(address, txId)
324 +         let finishHeightKey = getHatchingFinishHeightKey(address, txId)
325 +         let totalDucksAmount = tryGetInteger("ducks_amount")
326 +         let eggsNeeded = countEggsNeededAmount(totalDucksAmount)
327 +         let $t01326313315 = $Tuple2((("DUCK-" + gen) + "-JU"), "8W-J")
328 +         let duckGen = $t01326313315._1
329 +         let farmGen = $t01326313315._2
330 +         let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
331 +         let asset = Issue(duckGen, description, 1, 0, false, unit, height)
332 +         let assetId = calculateAssetId(asset)
333 +         let duckIdKey = getDuckIdKey(address, txId)
334 +         let valueDuckIdKeyExits = tryGetString(duckIdKey)
335 +         if ((valueDuckIdKeyExits != ""))
336 +             then throw((("ISJ: You will override following duckId :" + duckIdKey) + " make sure that your txId is unique!"))
337 +             else $Tuple2([IntegerEntry(getHatchingFinishHeightKey(address, txId), height), IntegerEntry("ducks_amount", (totalDucksAmount + 1)), IntegerEntry("ducks_last_price", (eggsNeeded / 1000000)), StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), (tryGetInteger(getDuckStatsKey(duckGen)) + 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) + 1)), asset, ScriptTransfer(value(addressFromString(address)), 1, assetId)], toBase58String(assetId))
728 338          }
729 339  
730 340  
731 341  
732 342  @Callable(i)
733 - func finishDuckHatching (txIdStr) = {
734 -     let owner = toString(i.caller)
735 -     let ducklingFinish = asString(invoke(getBabyDuckBreedingAddress(), "turnDucklingIntoDuck", nil, i.payments))
736 -     if ((ducklingFinish == ducklingFinish))
737 -         then {
738 -             let ducklingLinked = tryGetString(getDucklingKey(owner, fromBase58String(txIdStr)))
739 -             if ((ducklingLinked != ducklingFinish))
740 -                 then throw("Please attach the correct duckling!")
741 -                 else finishDuckHatch(txIdStr, owner, "")
343 + func reduceRarity (assetId,fGen) = {
344 +     let asset = fromBase58String(assetId)
345 +     if (if ((i.caller != getRebirthAddress()))
346 +         then (i.caller != this)
347 +         else false)
348 +         then throw("IRR: admin or rebirth only")
349 +         else {
350 +             let duckGen = value(assetInfo(asset)).name
351 +             let letter = takeRight(take(duckGen, 6), 1)
352 +             let farmGen = (("8" + letter) + "-G")
353 + [IntegerEntry(getDuckStatsKey(duckGen), (tryGetInteger(getDuckStatsKey(duckGen)) - 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) - 1))]
742 354              }
743 -         else throw("Strict value is not equal to itself.")
744 355      }
745 356  
746 357  
747 358  
748 359  @Callable(i)
749 360  func finishDuckHatchingAdmin (txIdStr,owner) = if ((i.caller != this))
750 -     then throw("BFDH: Only admins can run this!")
751 -     else finishDuckHatch(txIdStr, owner, "")
752 - 
753 - 
754 - 
755 - @Callable(i)
756 - func reduceRarity (assetId,farmGen) = {
757 -     let asset = fromBase58String(assetId)
758 -     if (if (if ((i.caller != getItemsAddress()))
759 -         then (i.caller != getRebirthAddress())
760 -         else false)
761 -         then (i.caller != this)
762 -         else false)
763 -         then throw("admin, items or rebirth only")
764 -         else {
765 -             let duckGen = value(assetInfo(asset)).name
766 - [IntegerEntry(getDuckStatsKey(duckGen), (tryGetInteger(getDuckStatsKey(duckGen)) - 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) - 1))]
767 -             }
768 -     }
361 +     then throw("IFDHA: Only admins can run this!")
362 +     else finishHatchingInternal(txIdStr, owner)
769 363  
770 364  
771 365  @Verifier(tx)
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 - let delayForHatching = 2
5 - 
6 - let HatchingStarted = "BREEDING_STARTED"
7 - 
8 - let HatchingFinished = "BREEDING_FINISHED"
9 - 
10 4  func tryGetStringExternal (address,key) = match getString(address, key) {
11 5      case a: String => 
12 6          a
13 7      case _ => 
14 8          ""
15 9  }
16 10  
17 11  
18 - func tryGetIntegerExternal (address,key) = match getInteger(address, key) {
19 -     case b: Int => 
20 -         b
21 -     case _ => 
22 -         0
23 - }
24 - 
25 - 
26 12  func tryGetString (key) = tryGetStringExternal(this, key)
27 13  
28 14  
29 - func staticKey_oracleAddress () = "static_oracleAddress"
15 + func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
30 16  
31 17  
32 - func staticKey_incubatorAddress () = "static_incubatorAddress"
18 + func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), "static_eggAssetId"))
33 19  
34 20  
35 - func staticKey_rebirthAddress () = "static_rebirthAddress"
21 + func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))
36 22  
37 23  
38 - func staticKey_itemsAddress () = "static_itemsAddress"
24 + func getSwopPromoAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_swopPromoAddress")))
39 25  
40 26  
41 - func staticKey_eggAssetId () = "static_eggAssetId"
27 + func getBabyDuckAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_babyDuckAddress")))
42 28  
43 29  
44 - func staticKey_babyDuckBreedingAddress () = "static_babyDuckBreedingAddress"
30 + func getRefContractAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_refContractAddress")))
45 31  
46 32  
47 - func staticKey_ducklingPrice () = "static_ducklingPrice"
33 + func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_couponsAddress")))
48 34  
49 35  
50 - func staticKey_couponsAddress () = "static_couponsAddress"
36 + func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_burnAddress")))
51 37  
52 38  
53 - func staticKey_burnAddress () = "static_burnAddress"
39 + let delayForHatching = 2
40 + 
41 + let typesAmount = 10
42 + 
43 + let RefererReward = 5
44 + 
45 + let HatchingStarted = "HATCHING_STARTED"
46 + 
47 + let HatchingFinished = "HATCHING_FINISHED"
48 + 
49 + func isLocked () = {
50 +     let masterAddress = Address(base58'3PEPftf2kWZDmAaWBjs6BUJa9957kiA2PkU')
51 +     match getInteger(masterAddress, "egglock") {
52 +         case b: Int => 
53 +             b
54 +         case _ => 
55 +             0
56 +     }
57 +     }
54 58  
55 59  
56 - func staticKey_refContractAddress () = "static_refContractAddress"
60 + func getHatchingStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
57 61  
58 62  
59 - func staticKey_extraFee () = "static_extraFee"
60 - 
61 - 
62 - func staticKey_feeAggregator () = "static_feeAggregator"
63 - 
64 - 
65 - func getOracle () = Address(fromBase58String(tryGetString(staticKey_oracleAddress())))
66 - 
67 - 
68 - func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_incubatorAddress())))
69 - 
70 - 
71 - func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_rebirthAddress())))
72 - 
73 - 
74 - func getItemsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_itemsAddress())))
75 - 
76 - 
77 - func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_eggAssetId()))
78 - 
79 - 
80 - func getBabyDuckBreedingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_babyDuckBreedingAddress())))
81 - 
82 - 
83 - func getDucklingPrice () = tryGetIntegerExternal(getOracle(), staticKey_ducklingPrice())
84 - 
85 - 
86 - func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_couponsAddress())))
87 - 
88 - 
89 - func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_burnAddress())))
90 - 
91 - 
92 - func getRefContractAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_refContractAddress())))
93 - 
94 - 
95 - func getFeeAggregator () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_feeAggregator())))
96 - 
97 - 
98 - func checkAdditionalPayment (payment) = if (isDefined(payment.assetId))
99 -     then throw("BCAP: Please attach waves")
100 -     else {
101 -         let feeAmount = getIntegerValue(getOracle(), staticKey_extraFee())
102 -         if ((payment.amount != feeAmount))
103 -             then throw((("BCAP: Please attach exactly " + toString(feeAmount)) + " amount of wavelets"))
104 -             else [ScriptTransfer(getFeeAggregator(), feeAmount, unit)]
105 -         }
106 - 
107 - 
108 - let MaxGeneration = 7
109 - 
110 - let Generations = ["G", "H", "I", "K", "L", "M", "N", "O"]
111 - 
112 - func getProcessStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
113 - 
114 - 
115 - func getDucklingKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_duckling")
116 - 
117 - 
118 - func getProcessFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
119 - 
120 - 
121 - func getDuckParentKey (txId,parentNum) = ((("inittx_" + toBase58String(txId)) + "_parent") + toString(parentNum))
63 + func getHatchingFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
122 64  
123 65  
124 66  func getDuckIdKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_di")
125 67  
126 68  
127 69  func getDuckStatsKey (genString) = (("stats_" + genString) + "_amount")
128 70  
129 71  
130 72  func tryGetInteger (key) = {
131 73      let val =     match getInteger(this, key) {
132 74          case b: Int => 
133 75              b
134 76          case _ => 
135 77              0
136 78      }
137 79      val
138 80      }
139 81  
140 82  
141 - func determineGeneration (g1,g2) = {
142 -     let gIndex = max([value(indexOf(Generations, g1)), value(indexOf(Generations, g2))])
143 - Generations[(gIndex + 1)]
144 -     }
83 + let discountCoefficient = tryGetInteger("discountCoefficient")
145 84  
85 + let saleCoefficient = tryGetInteger("saleCoefficient")
146 86  
147 87  func getRandomNumber (variants,txId,hatchingFinishHeight,offset) = {
148 88      let randomSeedBlock = value(blockInfoByHeight((hatchingFinishHeight - 1)))
149 -     let randomHash = sha256_16Kb((txId + value(randomSeedBlock.vrf)))
89 +     let randomHash = sha256(((base58'incubator' + txId) + value(randomSeedBlock.vrf)))
150 90      (toInt(randomHash, offset) % variants)
151 91      }
152 92  
153 93  
154 - func getRandomGen (gen1,gen2,step,txId,hatchingFinishHeight,geneFromParent,genePostion,specifiqueGene,specifiqueGenePosition) = if (if ((geneFromParent != 0))
155 -     then (genePostion == step)
156 -     else false)
157 -     then if ((geneFromParent == 1))
158 -         then gen1
159 -         else if ((geneFromParent == 2))
160 -             then gen2
161 -             else throw("Parent either needs to be 1 or 2")
162 -     else if (if ((specifiqueGene != ""))
163 -         then (specifiqueGenePosition == step)
164 -         else false)
165 -         then specifiqueGene
166 -         else {
167 -             let randomNum = getRandomNumber(2, txId, hatchingFinishHeight, step)
168 -             let gen = if ((randomNum == 0))
169 -                 then gen1
170 -                 else gen2
171 -             gen
172 -             }
94 + func wasUniqueBorn (gen) = tryGetInteger(getDuckStatsKey(gen))
173 95  
174 96  
175 - func checkAssetInIncubator (assetId) = {
176 -     let result =     match getString(getIncubatorAddress(), assetId) {
177 -         case b: String => 
178 -             true
179 -         case _ => 
180 -             false
181 -     }
182 -     let result2 =     match getString(this, assetId) {
183 -         case c: String => 
184 -             true
185 -         case _ => 
186 -             false
187 -     }
188 -     if (result)
189 -         then true
190 -         else result2
97 + func getRandomName (txId,hatchingFinishHeight) = {
98 +     let jackpotRandom = getRandomNumber(100, txId, hatchingFinishHeight, 4)
99 +     let entry = IntegerEntry("last_jackpot_random", jackpotRandom)
100 +     if (if ((jackpotRandom == 51))
101 +         then (wasUniqueBorn("DUCK-WWWWINAL-JU") == 0)
102 +         else false)
103 +         then $Tuple3("DUCK-WWWWINAL-JU", "1A1I1L1N4W-J", entry)
104 +         else if (if ((jackpotRandom == 19))
105 +             then (wasUniqueBorn("DUCK-WWWCLOWN-JU") == 0)
106 +             else false)
107 +             then $Tuple3("DUCK-WWWCLOWN-JU", "1C1L1N1O4W-J", entry)
108 +             else if (if ((jackpotRandom == 29))
109 +                 then (wasUniqueBorn("DUCK-WWDETECT-JU") == 0)
110 +                 else false)
111 +                 then $Tuple3("DUCK-WWDETECT-JU", "1C1D2E2T2W-J", entry)
112 +                 else if (if ((jackpotRandom == 39))
113 +                     then (wasUniqueBorn("DUCK-WWWADMIN-JU") == 0)
114 +                     else false)
115 +                     then $Tuple3("DUCK-WWWADMIN-JU", "1A1D1I1M1N3W-J", entry)
116 +                     else if (if ((jackpotRandom == 9))
117 +                         then (wasUniqueBorn("DUCK-WWWWFARM-JU") == 0)
118 +                         else false)
119 +                         then $Tuple3("DUCK-WWWWFARM-JU", "1A1F1M1R4W-J", entry)
120 +                         else {
121 +                             let typeRandom = getRandomNumber(4, txId, hatchingFinishHeight, 5)
122 +                             let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 6)
123 +                             let color = if ((colorRandom == 0))
124 +                                 then "Y"
125 +                                 else if ((colorRandom == 1))
126 +                                     then "G"
127 +                                     else if ((colorRandom == 2))
128 +                                         then "B"
129 +                                         else "R"
130 +                             if ((typeRandom == 0))
131 +                                 then $Tuple3(("DUCK-LLLLLLLL-G" + color), "8L-G", entry)
132 +                                 else if ((typeRandom == 1))
133 +                                     then $Tuple3(("DUCK-MMMMMMMM-G" + color), "8M-G", entry)
134 +                                     else if ((typeRandom == 2))
135 +                                         then $Tuple3(("DUCK-NNNNNNNN-G" + color), "8N-G", entry)
136 +                                         else $Tuple3(("DUCK-OOOOOOOO-G" + color), "8OOOOOOOO-G", entry)
137 +                             }
191 138      }
192 139  
193 140  
194 - func canBeBreeded (asset1Id,asset2Id) = {
195 -     let asset1Gen = split(value(assetInfo(asset1Id)).name, "")
196 -     let asset2Gen = split(value(assetInfo(asset2Id)).name, "")
197 -     if ((value(indexOf(Generations, asset1Gen[14])) >= MaxGeneration))
198 -         then (("you can only breed ducks with generation " + Generations[MaxGeneration]) + " and lower")
199 -         else if ((value(indexOf(Generations, asset2Gen[14])) >= MaxGeneration))
200 -             then (("you can only breed ducks with generation " + Generations[MaxGeneration]) + " and lower")
201 -             else "true"
141 + func countEggsNeededAmount (totalDucksAmount) = {
142 +     let n = totalDucksAmount
143 +     let g = discountCoefficient
144 +     let s = saleCoefficient
145 +     let t = typesAmount
146 +     let price = pow((100 + ((n * g) / (10 * t))), 2, 5, 1, 2, DOWN)
147 +     if ((saleCoefficient == 0))
148 +         then (price * 1000000)
149 +         else (((price * 1000000) / 100) * (100 - saleCoefficient))
202 150      }
203 - 
204 - 
205 - func isSymbolA (accumulated,sym) = if ((sym == "A"))
206 -     then (accumulated + 1)
207 -     else (accumulated + 0)
208 - 
209 - 
210 - func isSymbolB (accumulated,sym) = if ((sym == "B"))
211 -     then (accumulated + 1)
212 -     else (accumulated + 0)
213 - 
214 - 
215 - func isSymbolC (accumulated,sym) = if ((sym == "C"))
216 -     then (accumulated + 1)
217 -     else (accumulated + 0)
218 - 
219 - 
220 - func isSymbolD (accumulated,sym) = if ((sym == "D"))
221 -     then (accumulated + 1)
222 -     else (accumulated + 0)
223 - 
224 - 
225 - func isSymbolE (accumulated,sym) = if ((sym == "E"))
226 -     then (accumulated + 1)
227 -     else (accumulated + 0)
228 - 
229 - 
230 - func isSymbolF (accumulated,sym) = if ((sym == "F"))
231 -     then (accumulated + 1)
232 -     else (accumulated + 0)
233 - 
234 - 
235 - func isSymbolG (accumulated,sym) = if ((sym == "G"))
236 -     then (accumulated + 1)
237 -     else (accumulated + 0)
238 - 
239 - 
240 - func isSymbolH (accumulated,sym) = if ((sym == "H"))
241 -     then (accumulated + 1)
242 -     else (accumulated + 0)
243 - 
244 - 
245 - func isSymbolI (accumulated,sym) = if ((sym == "I"))
246 -     then (accumulated + 1)
247 -     else (accumulated + 0)
248 - 
249 - 
250 - func isSymbolK (accumulated,sym) = if ((sym == "K"))
251 -     then (accumulated + 1)
252 -     else (accumulated + 0)
253 - 
254 - 
255 - func isSymbolL (accumulated,sym) = if ((sym == "L"))
256 -     then (accumulated + 1)
257 -     else (accumulated + 0)
258 - 
259 - 
260 - func isSymbolM (accumulated,sym) = if ((sym == "M"))
261 -     then (accumulated + 1)
262 -     else (accumulated + 0)
263 - 
264 - 
265 - func isSymbolN (accumulated,sym) = if ((sym == "N"))
266 -     then (accumulated + 1)
267 -     else (accumulated + 0)
268 - 
269 - 
270 - func isSymbolO (accumulated,sym) = if ((sym == "O"))
271 -     then (accumulated + 1)
272 -     else (accumulated + 0)
273 - 
274 - 
275 - func isSymbolS (accumulated,sym) = if ((sym == "S"))
276 -     then (accumulated + 1)
277 -     else (accumulated + 0)
278 - 
279 - 
280 - func isSymbolT (accumulated,sym) = if ((sym == "T"))
281 -     then (accumulated + 1)
282 -     else (accumulated + 0)
283 - 
284 - 
285 - func getAmountOrClear (amount) = if (contains(amount, "0"))
286 -     then ""
287 -     else amount
288 - 
289 - 
290 - func asString (value) = match value {
291 -     case string: String => 
292 -         string
293 -     case _ => 
294 -         throw("wrong type, expected: String")
295 - }
296 151  
297 152  
298 153  func asInt (value) = match value {
299 154      case int: Int => 
300 155          int
301 156      case _ => 
302 -         throw("wrong type, expected: Int")
157 +         throw("IAI: wrong type, expected: Int")
303 158  }
304 159  
305 160  
306 - func composeGenericData (duckGen,duckIdKey,assetId,asset) = {
307 -     let farmGen = asString(invoke(this, "getGenFromName", [duckGen], nil))
308 -     if ((farmGen == farmGen))
309 -         then {
310 -             let amount = tryGetInteger(getDuckStatsKey(duckGen))
311 -             let quantity = tryGetInteger((("stats_" + farmGen) + "_quantity"))
312 - [StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), (amount + 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (quantity + 1)), asset]
313 -             }
314 -         else throw("Strict value is not equal to itself.")
161 + func finishHatchingInternal (txIdStr,owner) = {
162 +     let txId = fromBase58String(txIdStr)
163 +     let hatchingStatusKey = getHatchingStatusKey(owner, txId)
164 +     let finishHeightKey = getHatchingFinishHeightKey(owner, txId)
165 +     let duckIdKey = getDuckIdKey(owner, txId)
166 +     let duckFromBaby =     match getBoolean((("hatching_" + txIdStr) + "_babyDuck")) {
167 +         case t: Boolean => 
168 +             t
169 +         case _ => 
170 +             false
315 171      }
316 - 
317 - 
318 - func finishDuckHatch (txIdStr,owner,duckGenesString) = {
319 -     let txId = fromBase58String(txIdStr)
320 -     let processStatusKey = getProcessStatusKey(owner, txId)
321 -     let duckIdKey = getDuckIdKey(owner, txId)
322 -     let processTxStatus = getStringValue(this, processStatusKey)
323 -     let finishHeightKey = getProcessFinishHeightKey(owner, txId)
324 -     let processFinishHeight = getIntegerValue(this, finishHeightKey)
325 -     if ((processTxStatus == HatchingFinished))
172 +     let hatchingTxStatus = getStringValue(this, hatchingStatusKey)
173 +     let hatchingFinishHeight = getIntegerValue(this, finishHeightKey)
174 +     if ((hatchingTxStatus == HatchingFinished))
326 175          then {
327 176              let duckId = getStringValue(this, getDuckIdKey(owner, txId))
328 -             throw(("The duck was breeded and claimed already, here is the folowing: " + duckId))
177 +             throw(("IFDH: The duck was hatched and claimed already, here is the folowing: " + duckId))
329 178              }
330 -         else if ((processFinishHeight > height))
331 -             then throw((((("Breeding is not finished yet " + toString((processFinishHeight - height))) + " blocks remaining, it will take around ") + toString((processFinishHeight - height))) + " minutes"))
179 +         else if ((hatchingFinishHeight > height))
180 +             then throw((((("Hatching is not finished yet " + toString((hatchingFinishHeight - height))) + " blocks remaining, it will take around ") + toString((hatchingFinishHeight - height))) + " minutes"))
332 181              else {
333 -                 let duckGen = if ((duckGenesString == ""))
334 -                     then asString(invoke(this, "generateDuck", [txId, processFinishHeight, 0, 0, "", 0], nil))
335 -                     else duckGenesString
336 -                 if ((duckGen == duckGen))
337 -                     then {
338 -                         let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
339 -                         let asset = Issue(duckGen, description, 1, 0, false, unit, processFinishHeight)
340 -                         let assetId = calculateAssetId(asset)
341 -                         (composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [StringEntry(processStatusKey, HatchingFinished), ScriptTransfer(addressFromStringValue(owner), 1, assetId)])
342 -                         }
343 -                     else throw("Strict value is not equal to itself.")
182 +                 let $t060506136 = getRandomName(txId, hatchingFinishHeight)
183 +                 let duckGen = $t060506136._1
184 +                 let farmGen = $t060506136._2
185 +                 let jackpotRandomEntry = $t060506136._3
186 +                 let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
187 +                 let asset = Issue(duckGen, description, 1, 0, false, unit, hatchingFinishHeight)
188 +                 let assetId = calculateAssetId(asset)
189 +                 let amount = (tryGetInteger(getDuckStatsKey(duckGen)) + 1)
190 + [StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), BooleanEntry((("duck_" + toBase58String(assetId)) + "_grown"), duckFromBaby), IntegerEntry(getDuckStatsKey(duckGen), amount), jackpotRandomEntry, IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) + 1)), asset, ScriptTransfer(Address(fromBase58String(owner)), 1, assetId)]
344 191                  }
345 192      }
346 193  
347 194  
348 195  func getBool (key) = match getBoolean(this, key) {
349 196      case b: Boolean => 
350 197          b
351 198      case _ => 
352 199          false
353 200  }
354 201  
355 202  
356 203  func isTestEnv () = getBool("TESTENV")
357 204  
358 205  
359 206  @Callable(i)
360 207  func configureOracle (oracle) = if ((i.caller != this))
361 -     then throw("admin only")
208 +     then throw("ICU: admin only")
362 209      else [StringEntry("static_oracleAddress", oracle)]
363 210  
364 211  
365 212  
366 213  @Callable(i)
367 - func generateDuck (txId,hatchingFinishHeight,geneFromParent,genePostion,specifiqueGene,specifiqueGenePosition) = {
368 -     let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 11)
369 -     let color = if ((colorRandom == 0))
370 -         then "Y"
371 -         else if ((colorRandom == 1))
372 -             then "G"
373 -             else if ((colorRandom == 2))
374 -                 then "B"
375 -                 else "R"
376 -     let parent1Id = fromBase58String(tryGetString(getDuckParentKey(txId, 1)))
377 -     let parent2Id = fromBase58String(tryGetString(getDuckParentKey(txId, 2)))
378 -     let parent1Gen = split(value(assetInfo(parent1Id)).name, "")
379 -     let parent2Gen = split(value(assetInfo(parent2Id)).name, "")
380 -     let gen = ((((((((((("DUCK-" + getRandomGen(parent1Gen[5], parent2Gen[5], 0, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[6], parent2Gen[6], 1, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[7], parent2Gen[7], 2, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[8], parent2Gen[8], 3, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[9], parent2Gen[9], 4, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[10], parent2Gen[10], 5, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[11], parent2Gen[11], 6, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[12], parent2Gen[12], 7, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + "-") + determineGeneration(parent1Gen[14], parent2Gen[14])) + color)
381 -     $Tuple2(nil, gen)
214 + func setDiscount (val) = if ((i.caller != this))
215 +     then throw("ISD: admin_only")
216 +     else [IntegerEntry("discountCoefficient", val)]
217 + 
218 + 
219 + 
220 + @Callable(i)
221 + func setSale (val) = if ((i.caller != this))
222 +     then throw("ISS: admin_only")
223 +     else [IntegerEntry("saleCoefficient", val)]
224 + 
225 + 
226 + 
227 + @Callable(i)
228 + func startDuckHatching (refererAddress) = if ((getBabyDuckAddress() != i.caller))
229 +     then throw("ISDHFA: From now on this is only possible through ducklings!")
230 +     else if ((isLocked() > 0))
231 +         then throw("ISDH: EGG operations are temporarily locked")
232 +         else {
233 +             let totalDucksAmount = tryGetInteger("ducks_amount")
234 +             let eggsNeeded = countEggsNeededAmount(totalDucksAmount)
235 + [StringEntry(getHatchingStatusKey(toString(i.originCaller), i.transactionId), HatchingStarted), IntegerEntry(getHatchingFinishHeightKey(toString(i.originCaller), i.transactionId), (height + delayForHatching)), IntegerEntry("ducks_amount", (totalDucksAmount + 1)), IntegerEntry("ducks_last_price", (eggsNeeded / 1000000)), BooleanEntry((("hatching_" + toBase58String(i.transactionId)) + "_babyDuck"), true)]
236 +             }
237 + 
238 + 
239 + 
240 + @Callable(i)
241 + func startDuckHatchingForAddress (address) = if ((isLocked() > 0))
242 +     then throw("ISDHFA: EGG operations are temporarily locked")
243 +     else if (if ((i.caller != getSwopPromoAddress()))
244 +         then (i.caller != this)
245 +         else false)
246 +         then throw("ISDHFA: Permission denied")
247 +         else {
248 +             let totalDucksAmount = tryGetInteger("ducks_amount")
249 +             let eggsNeeded = countEggsNeededAmount(totalDucksAmount)
250 + [StringEntry(getHatchingStatusKey(address, i.transactionId), HatchingStarted), IntegerEntry(getHatchingFinishHeightKey(address, i.transactionId), (height + delayForHatching)), IntegerEntry("ducks_amount", (totalDucksAmount + 1)), IntegerEntry("ducks_last_price", (eggsNeeded / 1000000)), BooleanEntry((("hatching_" + toBase58String(i.transactionId)) + "_promo"), true)]
251 +             }
252 + 
253 + 
254 + 
255 + @Callable(i)
256 + func finishDuckHatching (txIdStr) = {
257 +     let owner = toString(i.originCaller)
258 +     finishHatchingInternal(txIdStr, owner)
382 259      }
383 260  
384 261  
385 262  
386 263  @Callable(i)
387 - func getGenFromName (assetName) = {
388 -     let genotype = split(dropRight(drop(assetName, 5), 3), "")
389 -     let generation = split(assetName, "")[14]
390 -     let gen = (((((((((((((((((getAmountOrClear((toString({
391 -         let $l = genotype
392 -         let $s = size($l)
393 -         let $acc0 = 0
394 -         func $f0_1 ($a,$i) =         if (($i >= $s))
395 -             then $a
396 -             else isSymbolA($a, $l[$i])
397 - 
398 -         func $f0_2 ($a,$i) =         if (($i >= $s))
399 -             then $a
400 -             else throw("List size exceeds 8")
401 - 
402 -         $f0_2($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)
403 -         }) + "A")) + getAmountOrClear((toString({
404 -         let $l = genotype
405 -         let $s = size($l)
406 -         let $acc0 = 0
407 -         func $f1_1 ($a,$i) =         if (($i >= $s))
408 -             then $a
409 -             else isSymbolB($a, $l[$i])
410 - 
411 -         func $f1_2 ($a,$i) =         if (($i >= $s))
412 -             then $a
413 -             else throw("List size exceeds 8")
414 - 
415 -         $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
416 -         }) + "B"))) + getAmountOrClear((toString({
417 -         let $l = genotype
418 -         let $s = size($l)
419 -         let $acc0 = 0
420 -         func $f2_1 ($a,$i) =         if (($i >= $s))
421 -             then $a
422 -             else isSymbolC($a, $l[$i])
423 - 
424 -         func $f2_2 ($a,$i) =         if (($i >= $s))
425 -             then $a
426 -             else throw("List size exceeds 8")
427 - 
428 -         $f2_2($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
429 -         }) + "C"))) + getAmountOrClear((toString({
430 -         let $l = genotype
431 -         let $s = size($l)
432 -         let $acc0 = 0
433 -         func $f3_1 ($a,$i) =         if (($i >= $s))
434 -             then $a
435 -             else isSymbolD($a, $l[$i])
436 - 
437 -         func $f3_2 ($a,$i) =         if (($i >= $s))
438 -             then $a
439 -             else throw("List size exceeds 8")
440 - 
441 -         $f3_2($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
442 -         }) + "D"))) + getAmountOrClear((toString({
443 -         let $l = genotype
444 -         let $s = size($l)
445 -         let $acc0 = 0
446 -         func $f4_1 ($a,$i) =         if (($i >= $s))
447 -             then $a
448 -             else isSymbolE($a, $l[$i])
449 - 
450 -         func $f4_2 ($a,$i) =         if (($i >= $s))
451 -             then $a
452 -             else throw("List size exceeds 8")
453 - 
454 -         $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
455 -         }) + "E"))) + getAmountOrClear((toString({
456 -         let $l = genotype
457 -         let $s = size($l)
458 -         let $acc0 = 0
459 -         func $f5_1 ($a,$i) =         if (($i >= $s))
460 -             then $a
461 -             else isSymbolF($a, $l[$i])
462 - 
463 -         func $f5_2 ($a,$i) =         if (($i >= $s))
464 -             then $a
465 -             else throw("List size exceeds 8")
466 - 
467 -         $f5_2($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
468 -         }) + "F"))) + getAmountOrClear((toString({
469 -         let $l = genotype
470 -         let $s = size($l)
471 -         let $acc0 = 0
472 -         func $f6_1 ($a,$i) =         if (($i >= $s))
473 -             then $a
474 -             else isSymbolG($a, $l[$i])
475 - 
476 -         func $f6_2 ($a,$i) =         if (($i >= $s))
477 -             then $a
478 -             else throw("List size exceeds 8")
479 - 
480 -         $f6_2($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($f6_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
481 -         }) + "G"))) + getAmountOrClear((toString({
482 -         let $l = genotype
483 -         let $s = size($l)
484 -         let $acc0 = 0
485 -         func $f7_1 ($a,$i) =         if (($i >= $s))
486 -             then $a
487 -             else isSymbolH($a, $l[$i])
488 - 
489 -         func $f7_2 ($a,$i) =         if (($i >= $s))
490 -             then $a
491 -             else throw("List size exceeds 8")
492 - 
493 -         $f7_2($f7_1($f7_1($f7_1($f7_1($f7_1($f7_1($f7_1($f7_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
494 -         }) + "H"))) + getAmountOrClear((toString({
495 -         let $l = genotype
496 -         let $s = size($l)
497 -         let $acc0 = 0
498 -         func $f8_1 ($a,$i) =         if (($i >= $s))
499 -             then $a
500 -             else isSymbolI($a, $l[$i])
501 - 
502 -         func $f8_2 ($a,$i) =         if (($i >= $s))
503 -             then $a
504 -             else throw("List size exceeds 8")
505 - 
506 -         $f8_2($f8_1($f8_1($f8_1($f8_1($f8_1($f8_1($f8_1($f8_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
507 -         }) + "I"))) + getAmountOrClear((toString({
508 -         let $l = genotype
509 -         let $s = size($l)
510 -         let $acc0 = 0
511 -         func $f9_1 ($a,$i) =         if (($i >= $s))
512 -             then $a
513 -             else isSymbolK($a, $l[$i])
514 - 
515 -         func $f9_2 ($a,$i) =         if (($i >= $s))
516 -             then $a
517 -             else throw("List size exceeds 8")
518 - 
519 -         $f9_2($f9_1($f9_1($f9_1($f9_1($f9_1($f9_1($f9_1($f9_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
520 -         }) + "K"))) + getAmountOrClear((toString({
521 -         let $l = genotype
522 -         let $s = size($l)
523 -         let $acc0 = 0
524 -         func $f10_1 ($a,$i) =         if (($i >= $s))
525 -             then $a
526 -             else isSymbolL($a, $l[$i])
527 - 
528 -         func $f10_2 ($a,$i) =         if (($i >= $s))
529 -             then $a
530 -             else throw("List size exceeds 8")
531 - 
532 -         $f10_2($f10_1($f10_1($f10_1($f10_1($f10_1($f10_1($f10_1($f10_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
533 -         }) + "L"))) + getAmountOrClear((toString({
534 -         let $l = genotype
535 -         let $s = size($l)
536 -         let $acc0 = 0
537 -         func $f11_1 ($a,$i) =         if (($i >= $s))
538 -             then $a
539 -             else isSymbolM($a, $l[$i])
540 - 
541 -         func $f11_2 ($a,$i) =         if (($i >= $s))
542 -             then $a
543 -             else throw("List size exceeds 8")
544 - 
545 -         $f11_2($f11_1($f11_1($f11_1($f11_1($f11_1($f11_1($f11_1($f11_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
546 -         }) + "M"))) + getAmountOrClear((toString({
547 -         let $l = genotype
548 -         let $s = size($l)
549 -         let $acc0 = 0
550 -         func $f12_1 ($a,$i) =         if (($i >= $s))
551 -             then $a
552 -             else isSymbolM($a, $l[$i])
553 - 
554 -         func $f12_2 ($a,$i) =         if (($i >= $s))
555 -             then $a
556 -             else throw("List size exceeds 8")
557 - 
558 -         $f12_2($f12_1($f12_1($f12_1($f12_1($f12_1($f12_1($f12_1($f12_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
559 -         }) + "N"))) + getAmountOrClear((toString({
560 -         let $l = genotype
561 -         let $s = size($l)
562 -         let $acc0 = 0
563 -         func $f13_1 ($a,$i) =         if (($i >= $s))
564 -             then $a
565 -             else isSymbolM($a, $l[$i])
566 - 
567 -         func $f13_2 ($a,$i) =         if (($i >= $s))
568 -             then $a
569 -             else throw("List size exceeds 8")
570 - 
571 -         $f13_2($f13_1($f13_1($f13_1($f13_1($f13_1($f13_1($f13_1($f13_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
572 -         }) + "O"))) + getAmountOrClear((toString({
573 -         let $l = genotype
574 -         let $s = size($l)
575 -         let $acc0 = 0
576 -         func $f14_1 ($a,$i) =         if (($i >= $s))
577 -             then $a
578 -             else isSymbolS($a, $l[$i])
579 - 
580 -         func $f14_2 ($a,$i) =         if (($i >= $s))
581 -             then $a
582 -             else throw("List size exceeds 8")
583 - 
584 -         $f14_2($f14_1($f14_1($f14_1($f14_1($f14_1($f14_1($f14_1($f14_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
585 -         }) + "S"))) + getAmountOrClear((toString({
586 -         let $l = genotype
587 -         let $s = size($l)
588 -         let $acc0 = 0
589 -         func $f15_1 ($a,$i) =         if (($i >= $s))
590 -             then $a
591 -             else isSymbolT($a, $l[$i])
592 - 
593 -         func $f15_2 ($a,$i) =         if (($i >= $s))
594 -             then $a
595 -             else throw("List size exceeds 8")
596 - 
597 -         $f15_2($f15_1($f15_1($f15_1($f15_1($f15_1($f15_1($f15_1($f15_1($acc0, 0), 1), 2), 3), 4), 5), 6), 7), 8)
598 -         }) + "T"))) + "-") + generation)
599 -     $Tuple2(nil, gen)
600 -     }
601 - 
602 - 
603 - 
604 - @Callable(i)
605 - func validateAndGetChildren (assetId) = if (!(checkAssetInIncubator(assetId)))
606 -     then throw((("You need to attach a valid NFT-duck. " + assetId) + " is invalid!"))
264 + func issueFreeDuck (address,txIdStr) = if ((i.caller != getRebirthAddress()))
265 +     then throw("ISFD: rebirth only")
607 266      else {
608 -         let children = tryGetInteger((("asset_" + assetId) + "_children"))
609 -         $Tuple2(nil, children)
267 +         let txId = fromBase58String(txIdStr)
268 +         let hatchingStatusKey = getHatchingStatusKey(address, txId)
269 +         let finishHeightKey = getHatchingFinishHeightKey(address, txId)
270 +         let totalDucksAmount = tryGetInteger("ducks_amount")
271 +         let eggsNeeded = countEggsNeededAmount(totalDucksAmount)
272 +         let $t0991910081 = getRandomName(txId, (valueOrErrorMessage(transactionHeightById(txId), ((txIdStr + " not found ") + toBase58String(txId))) + 1))
273 +         let duckGen = $t0991910081._1
274 +         let farmGen = $t0991910081._2
275 +         let jackpotRandomEntry = $t0991910081._3
276 +         let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
277 +         let asset = Issue(duckGen, description, 1, 0, false, unit, height)
278 +         let assetId = calculateAssetId(asset)
279 +         let amount = (tryGetInteger(getDuckStatsKey(duckGen)) + 1)
280 +         let duckIdKey = getDuckIdKey(address, txId)
281 +         $Tuple2([IntegerEntry(getHatchingFinishHeightKey(address, txId), height), IntegerEntry("ducks_amount", (totalDucksAmount + 1)), IntegerEntry("ducks_last_price", (eggsNeeded / 1000000)), jackpotRandomEntry, StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), amount), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) + 1)), asset, ScriptTransfer(value(addressFromString(address)), 1, assetId)], toBase58String(assetId))
610 282          }
611 283  
612 284  
613 285  
614 286  @Callable(i)
615 - func createDuckSpecialGenes (address,duckGen,children) = if (if ((i.caller != getItemsAddress()))
616 -     then (i.caller != this)
617 -     else false)
618 -     then throw("admin or items only")
287 + func issueFreeDuckDefinedGenes (address,txIdStr,genes) = if ((i.caller != this))
288 +     then throw("IIFDDG: Admin only!")
619 289      else {
620 -         let txId = i.transactionId
290 +         let txId = fromBase58String(txIdStr)
291 +         let hatchingStatusKey = getHatchingStatusKey(address, txId)
292 +         let finishHeightKey = getHatchingFinishHeightKey(address, txId)
293 +         let totalDucksAmount = tryGetInteger("ducks_amount")
294 +         let eggsNeeded = countEggsNeededAmount(totalDucksAmount)
295 +         let colorRandom = getRandomNumber(4, txId, height, 6)
296 +         let color = if ((colorRandom == 0))
297 +             then "Y"
298 +             else if ((colorRandom == 1))
299 +                 then "G"
300 +                 else if ((colorRandom == 2))
301 +                     then "B"
302 +                     else "R"
303 +         let $t01173711814 = $Tuple2(((("DUCK-" + genes) + "-G") + color), (("8" + take(genes, 1)) + "-G"))
304 +         let duckGen = $t01173711814._1
305 +         let farmGen = $t01173711814._2
621 306          let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
622 -         let asset = Issue(duckGen, description, 1, 0, false)
307 +         let asset = Issue(duckGen, description, 1, 0, false, unit, height)
623 308          let assetId = calculateAssetId(asset)
624 -         let duckIdKey = getDuckIdKey(toString(i.caller), txId)
625 -         let farmGen = asString(invoke(this, "getGenFromName", [duckGen], nil))
626 -         if ((farmGen == farmGen))
627 -             then (composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [IntegerEntry((("asset_" + toBase58String(assetId)) + "_children"), children), ScriptTransfer(Address(address), 1, assetId)])
628 -             else throw("Strict value is not equal to itself.")
309 +         let amount = (tryGetInteger(getDuckStatsKey(duckGen)) + 1)
310 +         let duckIdKey = getDuckIdKey(address, txId)
311 +         $Tuple2([IntegerEntry(getHatchingFinishHeightKey(address, txId), height), IntegerEntry("ducks_amount", (totalDucksAmount + 1)), IntegerEntry("ducks_last_price", (eggsNeeded / 1000000)), StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), amount), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) + 1)), asset, ScriptTransfer(value(addressFromString(address)), 1, assetId)], toBase58String(assetId))
629 312          }
630 313  
631 314  
632 315  
633 316  @Callable(i)
634 - func startDuckBreeding (refererAddress) = {
635 -     let firstPayment = value(i.payments[0])
636 -     let secondPayment = value(i.payments[1])
637 -     let validPayment = checkAdditionalPayment(i.payments[2])
638 -     if ((validPayment == validPayment))
639 -         then {
640 -             let firstAssetId = toBase58String(value(firstPayment.assetId))
641 -             let secondAssetId = toBase58String(value(secondPayment.assetId))
642 -             if (if ((firstPayment.amount != 1))
643 -                 then true
644 -                 else (secondPayment.amount != 1))
645 -                 then throw("NFT is not attached")
646 -                 else {
647 -                     let amountPaidByCoupons = asInt(invoke(getCouponsAddress(), "useCoupons", [getDucklingPrice()], nil))
648 -                     if ((amountPaidByCoupons == amountPaidByCoupons))
649 -                         then {
650 -                             let leftToPay = (getDucklingPrice() - amountPaidByCoupons)
651 -                             let payment = if ((leftToPay != 0))
652 -                                 then {
653 -                                     let thirdPayment = value(i.payments[3])
654 -                                     if ((thirdPayment.assetId != getEggAssetId()))
655 -                                         then throw(("BSDB: You can attach only EGG tokens with the following asset id: " + toBase58String(getEggAssetId())))
656 -                                         else if ((thirdPayment.amount != leftToPay))
657 -                                             then throw(("BSDB: To breed you currently need the following amount of EGGlets: " + toString(leftToPay)))
658 -                                             else {
659 -                                                 let refererRewardForPerch = fraction(leftToPay, 5, 100)
660 -                                                 let refCall = invoke(getRefContractAddress(), "refPayment", [refererAddress], [AttachedPayment(getEggAssetId(), refererRewardForPerch)])
661 -                                                 if ((refCall == refCall))
662 -                                                     then {
663 -                                                         let burnCall = invoke(getBurnAddress(), "burnAttachedPayments", nil, [AttachedPayment(getEggAssetId(), (leftToPay - refererRewardForPerch))])
664 -                                                         if ((burnCall == burnCall))
665 -                                                             then leftToPay
666 -                                                             else throw("Strict value is not equal to itself.")
667 -                                                         }
668 -                                                     else throw("Strict value is not equal to itself.")
669 -                                                 }
670 -                                     }
671 -                                 else 0
672 -                             if ((payment == payment))
673 -                                 then {
674 -                                     let children1 = asInt(invoke(this, "validateAndGetChildren", [firstAssetId], nil))
675 -                                     if ((children1 == children1))
676 -                                         then {
677 -                                             let children2 = asInt(invoke(this, "validateAndGetChildren", [secondAssetId], nil))
678 -                                             if ((children2 == children2))
679 -                                                 then if (if ((children1 > 0))
680 -                                                     then true
681 -                                                     else (children2 > 0))
682 -                                                     then throw("One duck can be used for breeding only once in its lifetime.")
683 -                                                     else {
684 -                                                         let breededStatus = canBeBreeded(fromBase58String(firstAssetId), fromBase58String(secondAssetId))
685 -                                                         if ((breededStatus != "true"))
686 -                                                             then throw(("These ducks cannot be breeded: " + breededStatus))
687 -                                                             else {
688 -                                                                 let parent1Gen = split(value(assetInfo(value(firstPayment.assetId))).name, "")
689 -                                                                 let parent2Gen = split(value(assetInfo(value(secondPayment.assetId))).name, "")
690 -                                                                 let newG = determineGeneration(parent1Gen[14], parent2Gen[14])
691 -                                                                 let spiceAmount = ((value(indexOf(Generations, newG)) + 1) * 10)
692 -                                                                 let ducklingGen = asString(invoke(getBabyDuckBreedingAddress(), "issueDuckling", [toString(i.caller), toBase58String(i.transactionId), spiceAmount, newG], nil))
693 -                                                                 if ((ducklingGen == ducklingGen))
694 -                                                                     then ([StringEntry(getDuckParentKey(i.transactionId, 1), firstAssetId), StringEntry(getDuckParentKey(i.transactionId, 2), secondAssetId), StringEntry(getProcessStatusKey(toString(i.caller), i.transactionId), HatchingStarted), IntegerEntry(getProcessFinishHeightKey(toString(i.caller), i.transactionId), (height + delayForHatching)), StringEntry(getDucklingKey(toString(i.caller), i.transactionId), ducklingGen), IntegerEntry((("asset_" + firstAssetId) + "_children"), 1), IntegerEntry((("asset_" + secondAssetId) + "_children"), 1), ScriptTransfer(i.caller, 1, value(firstPayment.assetId)), ScriptTransfer(i.caller, 1, value(secondPayment.assetId))] ++ validPayment)
695 -                                                                     else throw("Strict value is not equal to itself.")
696 -                                                                 }
697 -                                                         }
698 -                                                 else throw("Strict value is not equal to itself.")
699 -                                             }
700 -                                         else throw("Strict value is not equal to itself.")
701 -                                     }
702 -                                 else throw("Strict value is not equal to itself.")
703 -                             }
704 -                         else throw("Strict value is not equal to itself.")
705 -                     }
706 -             }
707 -         else throw("Strict value is not equal to itself.")
708 -     }
709 - 
710 - 
711 - 
712 - @Callable(i)
713 - func finishDuckHatchingItems (txIdStr,duckGenesString) = if (if ((i.caller != getItemsAddress()))
714 -     then (duckGenesString != "")
317 + func issueJackpot (address,txIdStr,gen) = if (if ((i.caller != getRebirthAddress()))
318 +     then (i.caller != this)
715 319      else false)
716 -     then throw("Only items can create fixed genes")
320 +     then throw("ISJ: admin or rebirth only")
717 321      else {
718 -         let owner = toString(i.originCaller)
719 -         let ducklingFinish = asString(invoke(getBabyDuckBreedingAddress(), "turnDucklingIntoDuck", nil, i.payments))
720 -         if ((ducklingFinish == ducklingFinish))
721 -             then {
722 -                 let ducklingLinked = tryGetString(getDucklingKey(owner, fromBase58String(txIdStr)))
723 -                 if ((ducklingLinked != ducklingFinish))
724 -                     then throw("Please attach the correct duckling!")
725 -                     else finishDuckHatch(txIdStr, owner, duckGenesString)
726 -                 }
727 -             else throw("Strict value is not equal to itself.")
322 +         let txId = fromBase58String(txIdStr)
323 +         let hatchingStatusKey = getHatchingStatusKey(address, txId)
324 +         let finishHeightKey = getHatchingFinishHeightKey(address, txId)
325 +         let totalDucksAmount = tryGetInteger("ducks_amount")
326 +         let eggsNeeded = countEggsNeededAmount(totalDucksAmount)
327 +         let $t01326313315 = $Tuple2((("DUCK-" + gen) + "-JU"), "8W-J")
328 +         let duckGen = $t01326313315._1
329 +         let farmGen = $t01326313315._2
330 +         let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
331 +         let asset = Issue(duckGen, description, 1, 0, false, unit, height)
332 +         let assetId = calculateAssetId(asset)
333 +         let duckIdKey = getDuckIdKey(address, txId)
334 +         let valueDuckIdKeyExits = tryGetString(duckIdKey)
335 +         if ((valueDuckIdKeyExits != ""))
336 +             then throw((("ISJ: You will override following duckId :" + duckIdKey) + " make sure that your txId is unique!"))
337 +             else $Tuple2([IntegerEntry(getHatchingFinishHeightKey(address, txId), height), IntegerEntry("ducks_amount", (totalDucksAmount + 1)), IntegerEntry("ducks_last_price", (eggsNeeded / 1000000)), StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), (tryGetInteger(getDuckStatsKey(duckGen)) + 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) + 1)), asset, ScriptTransfer(value(addressFromString(address)), 1, assetId)], toBase58String(assetId))
728 338          }
729 339  
730 340  
731 341  
732 342  @Callable(i)
733 - func finishDuckHatching (txIdStr) = {
734 -     let owner = toString(i.caller)
735 -     let ducklingFinish = asString(invoke(getBabyDuckBreedingAddress(), "turnDucklingIntoDuck", nil, i.payments))
736 -     if ((ducklingFinish == ducklingFinish))
737 -         then {
738 -             let ducklingLinked = tryGetString(getDucklingKey(owner, fromBase58String(txIdStr)))
739 -             if ((ducklingLinked != ducklingFinish))
740 -                 then throw("Please attach the correct duckling!")
741 -                 else finishDuckHatch(txIdStr, owner, "")
343 + func reduceRarity (assetId,fGen) = {
344 +     let asset = fromBase58String(assetId)
345 +     if (if ((i.caller != getRebirthAddress()))
346 +         then (i.caller != this)
347 +         else false)
348 +         then throw("IRR: admin or rebirth only")
349 +         else {
350 +             let duckGen = value(assetInfo(asset)).name
351 +             let letter = takeRight(take(duckGen, 6), 1)
352 +             let farmGen = (("8" + letter) + "-G")
353 + [IntegerEntry(getDuckStatsKey(duckGen), (tryGetInteger(getDuckStatsKey(duckGen)) - 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) - 1))]
742 354              }
743 -         else throw("Strict value is not equal to itself.")
744 355      }
745 356  
746 357  
747 358  
748 359  @Callable(i)
749 360  func finishDuckHatchingAdmin (txIdStr,owner) = if ((i.caller != this))
750 -     then throw("BFDH: Only admins can run this!")
751 -     else finishDuckHatch(txIdStr, owner, "")
752 - 
753 - 
754 - 
755 - @Callable(i)
756 - func reduceRarity (assetId,farmGen) = {
757 -     let asset = fromBase58String(assetId)
758 -     if (if (if ((i.caller != getItemsAddress()))
759 -         then (i.caller != getRebirthAddress())
760 -         else false)
761 -         then (i.caller != this)
762 -         else false)
763 -         then throw("admin, items or rebirth only")
764 -         else {
765 -             let duckGen = value(assetInfo(asset)).name
766 - [IntegerEntry(getDuckStatsKey(duckGen), (tryGetInteger(getDuckStatsKey(duckGen)) - 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) - 1))]
767 -             }
768 -     }
361 +     then throw("IFDHA: Only admins can run this!")
362 +     else finishHatchingInternal(txIdStr, owner)
769 363  
770 364  
771 365  @Verifier(tx)
772 366  func verify () = if (isTestEnv())
773 367      then sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
774 368      else {
775 369          let firstUser = base58'FzsTVRXqD46KW5yj6qGNVrsouvWjpCQvD1446A96iGt4'
776 370          let secondUser = base58'E23yUg8eun5nXB1nZRDf7RTyRADKxQhGNXdpTYonEvtU'
777 371          let thirdUser = base58'Ga8WEBTPXbHuoXRD355mQ6ms8PsM2RFYKeA1mEP32CFe'
778 372          let firstUserSigned = if (sigVerify(tx.bodyBytes, tx.proofs[0], firstUser))
779 373              then 1
780 374              else if (sigVerify(tx.bodyBytes, tx.proofs[1], firstUser))
781 375                  then 1
782 376                  else if (sigVerify(tx.bodyBytes, tx.proofs[2], firstUser))
783 377                      then 1
784 378                      else 0
785 379          let secondUserSigned = if (sigVerify(tx.bodyBytes, tx.proofs[0], secondUser))
786 380              then 1
787 381              else if (sigVerify(tx.bodyBytes, tx.proofs[1], secondUser))
788 382                  then 1
789 383                  else if (sigVerify(tx.bodyBytes, tx.proofs[2], secondUser))
790 384                      then 1
791 385                      else 0
792 386          let thirdUserSigned = if (sigVerify(tx.bodyBytes, tx.proofs[0], thirdUser))
793 387              then 1
794 388              else if (sigVerify(tx.bodyBytes, tx.proofs[1], thirdUser))
795 389                  then 1
796 390                  else if (sigVerify(tx.bodyBytes, tx.proofs[2], thirdUser))
797 391                      then 1
798 392                      else 0
799 393          let signaturesCount = ((firstUserSigned + secondUserSigned) + thirdUserSigned)
800 394          match tx {
801 395              case _ => 
802 396                  (signaturesCount >= 2)
803 397          }
804 398          }
805 399

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let delayForHatching = 2
5		-
6		-	let HatchingStarted = "BREEDING_STARTED"
7		-
8		-	let HatchingFinished = "BREEDING_FINISHED"
9		-
10	4		func tryGetStringExternal (address,key) = match getString(address, key) {
11	5		case a: String =>
12	6		a

15	9		}
16	10
17	11
18		-	func tryGetIntegerExternal (address,key) = match getInteger(address, key) {
19		-	case b: Int =>
20		-	b
21		-	case _ =>
22		-	0
23		-	}
24		-
25		-
26	12		func tryGetString (key) = tryGetStringExternal(this, key)
27	13
28	14
29		-	func ~~staticKey_oracleAddress~~ () = "static_oracleAddress"
	15	+	func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
30	16
31	17
32		-	func ~~staticKey_incubatorAddress~~ () = "static_~~incubatorAddress~~"
	18	+	func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), "static_eggAssetId"))
33	19
34	20
35		-	func ~~staticKey_rebirthAddress~~ () = "static_rebirthAddress"
	21	+	func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))
36	22
37	23
38		-	func ~~staticKey_itemsAddress~~ () = "static_~~itemsAddress~~"
	24	+	func getSwopPromoAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_swopPromoAddress")))
39	25
40	26
41		-	func ~~staticKey_eggAssetId~~ () = "static_~~eggAssetId~~"
	27	+	func getBabyDuckAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_babyDuckAddress")))
42	28
43	29
44		-	func ~~staticKey_babyDuckBreedingAddress~~ () = "static_~~babyDuckBreedingAddress~~"
	30	+	func getRefContractAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_refContractAddress")))
45	31
46	32
47		-	func ~~staticKey_ducklingPrice~~ () = "static_~~ducklingPrice~~"
	33	+	func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_couponsAddress")))
48	34
49	35
50		-	func ~~staticKey_couponsAddress~~ () = "static_~~couponsAddress~~"
	36	+	func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_burnAddress")))
51	37
52	38
53		-	func staticKey_burnAddress () = "static_burnAddress"
	39	+	let delayForHatching = 2
	40	+
	41	+	let typesAmount = 10
	42	+
	43	+	let RefererReward = 5
	44	+
	45	+	let HatchingStarted = "HATCHING_STARTED"
	46	+
	47	+	let HatchingFinished = "HATCHING_FINISHED"
	48	+
	49	+	func isLocked () = {
	50	+	let masterAddress = Address(base58'3PEPftf2kWZDmAaWBjs6BUJa9957kiA2PkU')
	51	+	match getInteger(masterAddress, "egglock") {
	52	+	case b: Int =>
	53	+	b
	54	+	case _ =>
	55	+	0
	56	+	}
	57	+	}
54	58
55	59
56		-	func ~~staticKey_refContractAddress~~ () = "~~static~~_~~refContractAddress~~"
	60	+	func getHatchingStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
57	61
58	62
59		-	func staticKey_extraFee () = "static_extraFee"
60		-
61		-
62		-	func staticKey_feeAggregator () = "static_feeAggregator"
63		-
64		-
65		-	func getOracle () = Address(fromBase58String(tryGetString(staticKey_oracleAddress())))
66		-
67		-
68		-	func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_incubatorAddress())))
69		-
70		-
71		-	func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_rebirthAddress())))
72		-
73		-
74		-	func getItemsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_itemsAddress())))
75		-
76		-
77		-	func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_eggAssetId()))
78		-
79		-
80		-	func getBabyDuckBreedingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_babyDuckBreedingAddress())))
81		-
82		-
83		-	func getDucklingPrice () = tryGetIntegerExternal(getOracle(), staticKey_ducklingPrice())
84		-
85		-
86		-	func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_couponsAddress())))
87		-
88		-
89		-	func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_burnAddress())))
90		-
91		-
92		-	func getRefContractAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_refContractAddress())))
93		-
94		-
95		-	func getFeeAggregator () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_feeAggregator())))
96		-
97		-
98		-	func checkAdditionalPayment (payment) = if (isDefined(payment.assetId))
99		-	then throw("BCAP: Please attach waves")
100		-	else {
101		-	let feeAmount = getIntegerValue(getOracle(), staticKey_extraFee())
102		-	if ((payment.amount != feeAmount))
103		-	then throw((("BCAP: Please attach exactly " + toString(feeAmount)) + " amount of wavelets"))
104		-	else [ScriptTransfer(getFeeAggregator(), feeAmount, unit)]
105		-	}
106		-
107		-
108		-	let MaxGeneration = 7
109		-
110		-	let Generations = ["G", "H", "I", "K", "L", "M", "N", "O"]
111		-
112		-	func getProcessStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
113		-
114		-
115		-	func getDucklingKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_duckling")
116		-
117		-
118		-	func getProcessFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
119		-
120		-
121		-	func getDuckParentKey (txId,parentNum) = ((("inittx_" + toBase58String(txId)) + "_parent") + toString(parentNum))
	63	+	func getHatchingFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
122	64
123	65
124	66		func getDuckIdKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_di")

138	80		}
139	81
140	82
141		-	func determineGeneration (g1,g2) = {
142		-	let gIndex = max([value(indexOf(Generations, g1)), value(indexOf(Generations, g2))])
143		-	Generations[(gIndex + 1)]
144		-	}
	83	+	let discountCoefficient = tryGetInteger("discountCoefficient")
145	84
	85	+	let saleCoefficient = tryGetInteger("saleCoefficient")
146	86
147	87		func getRandomNumber (variants,txId,hatchingFinishHeight,offset) = {
148	88		let randomSeedBlock = value(blockInfoByHeight((hatchingFinishHeight - 1)))
149		-	let randomHash = sha256~~_16Kb~~((txId + value(randomSeedBlock.vrf)))
	89	+	let randomHash = sha256(((base58'incubator' + txId) + value(randomSeedBlock.vrf)))
150	90		(toInt(randomHash, offset) % variants)
151	91		}
152	92
153	93
154		-	func getRandomGen (gen1,gen2,step,txId,hatchingFinishHeight,geneFromParent,genePostion,specifiqueGene,specifiqueGenePosition) = if (if ((geneFromParent != 0))
155		-	then (genePostion == step)
156		-	else false)
157		-	then if ((geneFromParent == 1))
158		-	then gen1
159		-	else if ((geneFromParent == 2))
160		-	then gen2
161		-	else throw("Parent either needs to be 1 or 2")
162		-	else if (if ((specifiqueGene != ""))
163		-	then (specifiqueGenePosition == step)
164		-	else false)
165		-	then specifiqueGene
166		-	else {
167		-	let randomNum = getRandomNumber(2, txId, hatchingFinishHeight, step)
168		-	let gen = if ((randomNum == 0))
169		-	then gen1
170		-	else gen2
171		-	gen
172		-	}
	94	+	func wasUniqueBorn (gen) = tryGetInteger(getDuckStatsKey(gen))
173	95
174	96
175		-	func checkAssetInIncubator (assetId) = {
176		-	let result = match getString(getIncubatorAddress(), assetId) {
177		-	case b: String =>
178		-	true
179		-	case _ =>
180		-	false
181		-	}
182		-	let result2 = match getString(this, assetId) {
183		-	case c: String =>
184		-	true
185		-	case _ =>
186		-	false
187		-	}
188		-	if (result)
189		-	then true
190		-	else result2
	97	+	func getRandomName (txId,hatchingFinishHeight) = {
	98	+	let jackpotRandom = getRandomNumber(100, txId, hatchingFinishHeight, 4)
	99	+	let entry = IntegerEntry("last_jackpot_random", jackpotRandom)
	100	+	if (if ((jackpotRandom == 51))
	101	+	then (wasUniqueBorn("DUCK-WWWWINAL-JU") == 0)
	102	+	else false)
	103	+	then $Tuple3("DUCK-WWWWINAL-JU", "1A1I1L1N4W-J", entry)
	104	+	else if (if ((jackpotRandom == 19))
	105	+	then (wasUniqueBorn("DUCK-WWWCLOWN-JU") == 0)
	106	+	else false)
	107	+	then $Tuple3("DUCK-WWWCLOWN-JU", "1C1L1N1O4W-J", entry)
	108	+	else if (if ((jackpotRandom == 29))
	109	+	then (wasUniqueBorn("DUCK-WWDETECT-JU") == 0)
	110	+	else false)
	111	+	then $Tuple3("DUCK-WWDETECT-JU", "1C1D2E2T2W-J", entry)
	112	+	else if (if ((jackpotRandom == 39))
	113	+	then (wasUniqueBorn("DUCK-WWWADMIN-JU") == 0)
	114	+	else false)
	115	+	then $Tuple3("DUCK-WWWADMIN-JU", "1A1D1I1M1N3W-J", entry)
	116	+	else if (if ((jackpotRandom == 9))
	117	+	then (wasUniqueBorn("DUCK-WWWWFARM-JU") == 0)
	118	+	else false)
	119	+	then $Tuple3("DUCK-WWWWFARM-JU", "1A1F1M1R4W-J", entry)
	120	+	else {
	121	+	let typeRandom = getRandomNumber(4, txId, hatchingFinishHeight, 5)
	122	+	let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 6)
	123	+	let color = if ((colorRandom == 0))
	124	+	then "Y"
	125	+	else if ((colorRandom == 1))
	126	+	then "G"
	127	+	else if ((colorRandom == 2))
	128	+	then "B"
	129	+	else "R"
	130	+	if ((typeRandom == 0))
	131	+	then $Tuple3(("DUCK-LLLLLLLL-G" + color), "8L-G", entry)
	132	+	else if ((typeRandom == 1))
	133	+	then $Tuple3(("DUCK-MMMMMMMM-G" + color), "8M-G", entry)
	134	+	else if ((typeRandom == 2))
	135	+	then $Tuple3(("DUCK-NNNNNNNN-G" + color), "8N-G", entry)
	136	+	else $Tuple3(("DUCK-OOOOOOOO-G" + color), "8OOOOOOOO-G", entry)
	137	+	}
191	138		}
192	139
193	140
194		-	func canBeBreeded (asset1Id,asset2Id) = {
195		-	let asset1Gen = split(value(assetInfo(asset1Id)).name, "")
196		-	let asset2Gen = split(value(assetInfo(asset2Id)).name, "")
197		-	if ((value(indexOf(Generations, asset1Gen[14])) >= MaxGeneration))
198		-	then (("you can only breed ducks with generation " + Generations[MaxGeneration]) + " and lower")
199		-	else if ((value(indexOf(Generations, asset2Gen[14])) >= MaxGeneration))
200		-	then (("you can only breed ducks with generation " + Generations[MaxGeneration]) + " and lower")
201		-	else "true"
	141	+	func countEggsNeededAmount (totalDucksAmount) = {
	142	+	let n = totalDucksAmount
	143	+	let g = discountCoefficient
	144	+	let s = saleCoefficient
	145	+	let t = typesAmount
	146	+	let price = pow((100 + ((n * g) / (10 * t))), 2, 5, 1, 2, DOWN)
	147	+	if ((saleCoefficient == 0))
	148	+	then (price * 1000000)
	149	+	else (((price * 1000000) / 100) * (100 - saleCoefficient))
202	150		}
203		-
204		-
205		-	func isSymbolA (accumulated,sym) = if ((sym == "A"))
206		-	then (accumulated + 1)
207		-	else (accumulated + 0)
208		-
209		-
210		-	func isSymbolB (accumulated,sym) = if ((sym == "B"))
211		-	then (accumulated + 1)
212		-	else (accumulated + 0)
213		-
214		-
215		-	func isSymbolC (accumulated,sym) = if ((sym == "C"))
216		-	then (accumulated + 1)
217		-	else (accumulated + 0)
218		-
219		-
220		-	func isSymbolD (accumulated,sym) = if ((sym == "D"))
221		-	then (accumulated + 1)
222		-	else (accumulated + 0)
223		-
224		-
225		-	func isSymbolE (accumulated,sym) = if ((sym == "E"))
226		-	then (accumulated + 1)
227		-	else (accumulated + 0)
228		-
229		-
230		-	func isSymbolF (accumulated,sym) = if ((sym == "F"))
231		-	then (accumulated + 1)
232		-	else (accumulated + 0)
233		-
234		-
235		-	func isSymbolG (accumulated,sym) = if ((sym == "G"))
236		-	then (accumulated + 1)
237		-	else (accumulated + 0)
238		-
239		-
240		-	func isSymbolH (accumulated,sym) = if ((sym == "H"))
241		-	then (accumulated + 1)
242		-	else (accumulated + 0)
243		-
244		-
245		-	func isSymbolI (accumulated,sym) = if ((sym == "I"))
246		-	then (accumulated + 1)
247		-	else (accumulated + 0)
248		-
249		-
250		-	func isSymbolK (accumulated,sym) = if ((sym == "K"))
251		-	then (accumulated + 1)
252		-	else (accumulated + 0)
253		-
254		-
255		-	func isSymbolL (accumulated,sym) = if ((sym == "L"))
256		-	then (accumulated + 1)
257		-	else (accumulated + 0)
258		-
259		-
260		-	func isSymbolM (accumulated,sym) = if ((sym == "M"))
261		-	then (accumulated + 1)
262		-	else (accumulated + 0)
263		-
264		-
265		-	func isSymbolN (accumulated,sym) = if ((sym == "N"))
266		-	then (accumulated + 1)
267		-	else (accumulated + 0)
268		-
269		-
270		-	func isSymbolO (accumulated,sym) = if ((sym == "O"))
271		-	then (accumulated + 1)
272		-	else (accumulated + 0)
273		-
274		-
275		-	func isSymbolS (accumulated,sym) = if ((sym == "S"))
276		-	then (accumulated + 1)
277		-	else (accumulated + 0)
278		-
279		-
280		-	func isSymbolT (accumulated,sym) = if ((sym == "T"))
281		-	then (accumulated + 1)
282		-	else (accumulated + 0)
283		-
284		-
285		-	func getAmountOrClear (amount) = if (contains(amount, "0"))
286		-	then ""
287		-	else amount
288		-
289		-
290		-	func asString (value) = match value {
291		-	case string: String =>
292		-	string
293		-	case _ =>
294		-	throw("wrong type, expected: String")
295		-	}
296	151
297	152
298	153		func asInt (value) = match value {
299	154		case int: Int =>
300	155		int
301	156		case _ =>
302		-	throw("wrong type, expected: Int")
	157	+	throw("IAI: wrong type, expected: Int")
303	158		}
304	159
305	160
306		-	func composeGenericData (duckGen,duckIdKey,assetId,asset) = {
307		-	let farmGen = asString(invoke(this, "getGenFromName", [duckGen], nil))
308		-	if ((farmGen == farmGen))
309		-	then {
310		-	let amount = tryGetInteger(getDuckStatsKey(duckGen))
311		-	let quantity = tryGetInteger((("stats_" + farmGen) + "_quantity"))
312		-	[StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), (amount + 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (quantity + 1)), asset]
313		-	}
314		-	else throw("Strict value is not equal to itself.")
	161	+	func finishHatchingInternal (txIdStr,owner) = {
	162	+	let txId = fromBase58String(txIdStr)
	163	+	let hatchingStatusKey = getHatchingStatusKey(owner, txId)
	164	+	let finishHeightKey = getHatchingFinishHeightKey(owner, txId)
	165	+	let duckIdKey = getDuckIdKey(owner, txId)
	166	+	let duckFromBaby = match getBoolean((("hatching_" + txIdStr) + "_babyDuck")) {
	167	+	case t: Boolean =>
	168	+	t
	169	+	case _ =>
	170	+	false
315	171		}
316		-
317		-
318		-	func finishDuckHatch (txIdStr,owner,duckGenesString) = {
319		-	let txId = fromBase58String(txIdStr)
320		-	let processStatusKey = getProcessStatusKey(owner, txId)
321		-	let duckIdKey = getDuckIdKey(owner, txId)
322		-	let processTxStatus = getStringValue(this, processStatusKey)
323		-	let finishHeightKey = getProcessFinishHeightKey(owner, txId)
324		-	let processFinishHeight = getIntegerValue(this, finishHeightKey)
325		-	if ((processTxStatus == HatchingFinished))
	172	+	let hatchingTxStatus = getStringValue(this, hatchingStatusKey)
	173	+	let hatchingFinishHeight = getIntegerValue(this, finishHeightKey)
	174	+	if ((hatchingTxStatus == HatchingFinished))
326	175		then {
327	176		let duckId = getStringValue(this, getDuckIdKey(owner, txId))
328		-	throw(("The duck was ~~breeded~~ and claimed already, here is the folowing: " + duckId))
	177	+	throw(("IFDH: The duck was hatched and claimed already, here is the folowing: " + duckId))
329	178		}
330		-	else if ((~~processFinishHeight~~ > height))
331		-	then throw((((("~~Breeding~~ is not finished yet " + toString((~~processFinishHeight~~ - height))) + " blocks remaining, it will take around ") + toString((~~processFinishHeight~~ - height))) + " minutes"))
	179	+	else if ((hatchingFinishHeight > height))
	180	+	then throw((((("Hatching is not finished yet " + toString((hatchingFinishHeight - height))) + " blocks remaining, it will take around ") + toString((hatchingFinishHeight - height))) + " minutes"))
332	181		else {
333		-	let duckGen = if ((duckGenesString == ""))
334		-	then asString(invoke(this, "generateDuck", [txId, processFinishHeight, 0, 0, "", 0], nil))
335		-	else duckGenesString
336		-	if ((duckGen == duckGen))
337		-	then {
338		-	let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
339		-	let asset = Issue(duckGen, description, 1, 0, false, unit, processFinishHeight)
340		-	let assetId = calculateAssetId(asset)
341		-	(composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [StringEntry(processStatusKey, HatchingFinished), ScriptTransfer(addressFromStringValue(owner), 1, assetId)])
342		-	}
343		-	else throw("Strict value is not equal to itself.")
	182	+	let $t060506136 = getRandomName(txId, hatchingFinishHeight)
	183	+	let duckGen = $t060506136._1
	184	+	let farmGen = $t060506136._2
	185	+	let jackpotRandomEntry = $t060506136._3
	186	+	let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
	187	+	let asset = Issue(duckGen, description, 1, 0, false, unit, hatchingFinishHeight)
	188	+	let assetId = calculateAssetId(asset)
	189	+	let amount = (tryGetInteger(getDuckStatsKey(duckGen)) + 1)
	190	+	[StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), BooleanEntry((("duck_" + toBase58String(assetId)) + "_grown"), duckFromBaby), IntegerEntry(getDuckStatsKey(duckGen), amount), jackpotRandomEntry, IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) + 1)), asset, ScriptTransfer(Address(fromBase58String(owner)), 1, assetId)]
344	191		}
345	192		}
346	193

358	205
359	206		@Callable(i)
360	207		func configureOracle (oracle) = if ((i.caller != this))
361		-	then throw("admin only")
	208	+	then throw("ICU: admin only")
362	209		else [StringEntry("static_oracleAddress", oracle)]
363	210
364	211
365	212
366	213		@Callable(i)
367		-	func generateDuck (txId,hatchingFinishHeight,geneFromParent,genePostion,specifiqueGene,specifiqueGenePosition) = {
368		-	let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 11)
369		-	let color = if ((colorRandom == 0))
370		-	then "Y"
371		-	else if ((colorRandom == 1))
372		-	then "G"
373		-	else if ((colorRandom == 2))
374		-	then "B"
375		-	else "R"
376		-	let parent1Id = fromBase58String(tryGetString(getDuckParentKey(txId, 1)))
377		-	let parent2Id = fromBase58String(tryGetString(getDuckParentKey(txId, 2)))
378		-	let parent1Gen = split(value(assetInfo(parent1Id)).name, "")
379		-	let parent2Gen = split(value(assetInfo(parent2Id)).name, "")
380		-	let gen = ((((((((((("DUCK-" + getRandomGen(parent1Gen[5], parent2Gen[5], 0, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[6], parent2Gen[6], 1, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[7], parent2Gen[7], 2, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[8], parent2Gen[8], 3, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[9], parent2Gen[9], 4, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[10], parent2Gen[10], 5, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[11], parent2Gen[11], 6, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[12], parent2Gen[12], 7, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + "-") + determineGeneration(parent1Gen[14], parent2Gen[14])) + color)
381		-	$Tuple2(nil, gen)
	214	+	func setDiscount (val) = if ((i.caller != this))
	215	+	then throw("ISD: admin_only")
	216	+	else [IntegerEntry("discountCoefficient", val)]
	217	+
	218	+
	219	+
	220	+	@Callable(i)
	221	+	func setSale (val) = if ((i.caller != this))
	222	+	then throw("ISS: admin_only")
	223	+	else [IntegerEntry("saleCoefficient", val)]
	224	+
	225	+
	226	+
	227	+	@Callable(i)
	228	+	func startDuckHatching (refererAddress) = if ((getBabyDuckAddress() != i.caller))
	229	+	then throw("ISDHFA: From now on this is only possible through ducklings!")
	230	+	else if ((isLocked() > 0))
	231	+	then throw("ISDH: EGG operations are temporarily locked")
	232	+	else {
	233	+	let totalDucksAmount = tryGetInteger("ducks_amount")
	234	+	let eggsNeeded = countEggsNeededAmount(totalDucksAmount)
	235	+	[StringEntry(getHatchingStatusKey(toString(i.originCaller), i.transactionId), HatchingStarted), IntegerEntry(getHatchingFinishHeightKey(toString(i.originCaller), i.transactionId), (height + delayForHatching)), IntegerEntry("ducks_amount", (totalDucksAmount + 1)), IntegerEntry("ducks_last_price", (eggsNeeded / 1000000)), BooleanEntry((("hatching_" + toBase58String(i.transactionId)) + "_babyDuck"), true)]
	236	+	}
	237	+
	238	+
	239	+
	240	+	@Callable(i)
	241	+	func startDuckHatchingForAddress (address) = if ((isLocked() > 0))
	242	+	then throw("ISDHFA: EGG operations are temporarily locked")
	243	+	else if (if ((i.caller != getSwopPromoAddress()))
	244	+	then (i.caller != this)
	245	+	else false)

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4		-	let delayForHatching = 2
5		-
6		-	let HatchingStarted = "BREEDING_STARTED"
7		-
8		-	let HatchingFinished = "BREEDING_FINISHED"
9		-
10	4		func tryGetStringExternal (address,key) = match getString(address, key) {
11	5		case a: String =>
12	6		a
13	7		case _ =>
14	8		""
15	9		}
16	10
17	11
18		-	func tryGetIntegerExternal (address,key) = match getInteger(address, key) {
19		-	case b: Int =>
20		-	b
21		-	case _ =>
22		-	0
23		-	}
24		-
25		-
26	12		func tryGetString (key) = tryGetStringExternal(this, key)
27	13
28	14
29		-	func ~~staticKey_oracleAddress~~ () = "static_oracleAddress"
	15	+	func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
30	16
31	17
32		-	func ~~staticKey_incubatorAddress~~ () = "static_~~incubatorAddress~~"
	18	+	func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), "static_eggAssetId"))
33	19
34	20
35		-	func ~~staticKey_rebirthAddress~~ () = "static_rebirthAddress"
	21	+	func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))
36	22
37	23
38		-	func ~~staticKey_itemsAddress~~ () = "static_~~itemsAddress~~"
	24	+	func getSwopPromoAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_swopPromoAddress")))
39	25
40	26
41		-	func ~~staticKey_eggAssetId~~ () = "static_~~eggAssetId~~"
	27	+	func getBabyDuckAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_babyDuckAddress")))
42	28
43	29
44		-	func ~~staticKey_babyDuckBreedingAddress~~ () = "static_~~babyDuckBreedingAddress~~"
	30	+	func getRefContractAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_refContractAddress")))
45	31
46	32
47		-	func ~~staticKey_ducklingPrice~~ () = "static_~~ducklingPrice~~"
	33	+	func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_couponsAddress")))
48	34
49	35
50		-	func ~~staticKey_couponsAddress~~ () = "static_~~couponsAddress~~"
	36	+	func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_burnAddress")))
51	37
52	38
53		-	func staticKey_burnAddress () = "static_burnAddress"
	39	+	let delayForHatching = 2
	40	+
	41	+	let typesAmount = 10
	42	+
	43	+	let RefererReward = 5
	44	+
	45	+	let HatchingStarted = "HATCHING_STARTED"
	46	+
	47	+	let HatchingFinished = "HATCHING_FINISHED"
	48	+
	49	+	func isLocked () = {
	50	+	let masterAddress = Address(base58'3PEPftf2kWZDmAaWBjs6BUJa9957kiA2PkU')
	51	+	match getInteger(masterAddress, "egglock") {
	52	+	case b: Int =>
	53	+	b
	54	+	case _ =>
	55	+	0
	56	+	}
	57	+	}
54	58
55	59
56		-	func ~~staticKey_refContractAddress~~ () = "~~static~~_~~refContractAddress~~"
	60	+	func getHatchingStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
57	61
58	62
59		-	func staticKey_extraFee () = "static_extraFee"
60		-
61		-
62		-	func staticKey_feeAggregator () = "static_feeAggregator"
63		-
64		-
65		-	func getOracle () = Address(fromBase58String(tryGetString(staticKey_oracleAddress())))
66		-
67		-
68		-	func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_incubatorAddress())))
69		-
70		-
71		-	func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_rebirthAddress())))
72		-
73		-
74		-	func getItemsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_itemsAddress())))
75		-
76		-
77		-	func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_eggAssetId()))
78		-
79		-
80		-	func getBabyDuckBreedingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_babyDuckBreedingAddress())))
81		-
82		-
83		-	func getDucklingPrice () = tryGetIntegerExternal(getOracle(), staticKey_ducklingPrice())
84		-
85		-
86		-	func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_couponsAddress())))
87		-
88		-
89		-	func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_burnAddress())))
90		-
91		-
92		-	func getRefContractAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_refContractAddress())))
93		-
94		-
95		-	func getFeeAggregator () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_feeAggregator())))
96		-
97		-
98		-	func checkAdditionalPayment (payment) = if (isDefined(payment.assetId))
99		-	then throw("BCAP: Please attach waves")
100		-	else {
101		-	let feeAmount = getIntegerValue(getOracle(), staticKey_extraFee())
102		-	if ((payment.amount != feeAmount))
103		-	then throw((("BCAP: Please attach exactly " + toString(feeAmount)) + " amount of wavelets"))
104		-	else [ScriptTransfer(getFeeAggregator(), feeAmount, unit)]
105		-	}
106		-
107		-
108		-	let MaxGeneration = 7
109		-
110		-	let Generations = ["G", "H", "I", "K", "L", "M", "N", "O"]
111		-
112		-	func getProcessStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
113		-
114		-
115		-	func getDucklingKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_duckling")
116		-
117		-
118		-	func getProcessFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
119		-
120		-
121		-	func getDuckParentKey (txId,parentNum) = ((("inittx_" + toBase58String(txId)) + "_parent") + toString(parentNum))
	63	+	func getHatchingFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
122	64
123	65
124	66		func getDuckIdKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_di")
125	67
126	68
127	69		func getDuckStatsKey (genString) = (("stats_" + genString) + "_amount")
128	70
129	71
130	72		func tryGetInteger (key) = {
131	73		let val = match getInteger(this, key) {
132	74		case b: Int =>
133	75		b
134	76		case _ =>
135	77		0
136	78		}
137	79		val
138	80		}
139	81
140	82
141		-	func determineGeneration (g1,g2) = {
142		-	let gIndex = max([value(indexOf(Generations, g1)), value(indexOf(Generations, g2))])
143		-	Generations[(gIndex + 1)]
144		-	}
	83	+	let discountCoefficient = tryGetInteger("discountCoefficient")
145	84
	85	+	let saleCoefficient = tryGetInteger("saleCoefficient")
146	86
147	87		func getRandomNumber (variants,txId,hatchingFinishHeight,offset) = {
148	88		let randomSeedBlock = value(blockInfoByHeight((hatchingFinishHeight - 1)))
149		-	let randomHash = sha256~~_16Kb~~((txId + value(randomSeedBlock.vrf)))
	89	+	let randomHash = sha256(((base58'incubator' + txId) + value(randomSeedBlock.vrf)))
150	90		(toInt(randomHash, offset) % variants)
151	91		}
152	92
153	93
154		-	func getRandomGen (gen1,gen2,step,txId,hatchingFinishHeight,geneFromParent,genePostion,specifiqueGene,specifiqueGenePosition) = if (if ((geneFromParent != 0))
155		-	then (genePostion == step)
156		-	else false)
157		-	then if ((geneFromParent == 1))
158		-	then gen1
159		-	else if ((geneFromParent == 2))
160		-	then gen2
161		-	else throw("Parent either needs to be 1 or 2")
162		-	else if (if ((specifiqueGene != ""))
163		-	then (specifiqueGenePosition == step)
164		-	else false)
165		-	then specifiqueGene
166		-	else {
167		-	let randomNum = getRandomNumber(2, txId, hatchingFinishHeight, step)
168		-	let gen = if ((randomNum == 0))
169		-	then gen1
170		-	else gen2
171		-	gen
172		-	}
	94	+	func wasUniqueBorn (gen) = tryGetInteger(getDuckStatsKey(gen))
173	95
174	96
175		-	func checkAssetInIncubator (assetId) = {
176		-	let result = match getString(getIncubatorAddress(), assetId) {
177		-	case b: String =>
178		-	true
179		-	case _ =>
180		-	false
181		-	}
182		-	let result2 = match getString(this, assetId) {
183		-	case c: String =>
184		-	true
185		-	case _ =>
186		-	false
187		-	}
188		-	if (result)
189		-	then true
190		-	else result2
	97	+	func getRandomName (txId,hatchingFinishHeight) = {
	98	+	let jackpotRandom = getRandomNumber(100, txId, hatchingFinishHeight, 4)
	99	+	let entry = IntegerEntry("last_jackpot_random", jackpotRandom)
	100	+	if (if ((jackpotRandom == 51))
	101	+	then (wasUniqueBorn("DUCK-WWWWINAL-JU") == 0)
	102	+	else false)
	103	+	then $Tuple3("DUCK-WWWWINAL-JU", "1A1I1L1N4W-J", entry)
	104	+	else if (if ((jackpotRandom == 19))
	105	+	then (wasUniqueBorn("DUCK-WWWCLOWN-JU") == 0)
	106	+	else false)
	107	+	then $Tuple3("DUCK-WWWCLOWN-JU", "1C1L1N1O4W-J", entry)
	108	+	else if (if ((jackpotRandom == 29))
	109	+	then (wasUniqueBorn("DUCK-WWDETECT-JU") == 0)
	110	+	else false)
	111	+	then $Tuple3("DUCK-WWDETECT-JU", "1C1D2E2T2W-J", entry)
	112	+	else if (if ((jackpotRandom == 39))
	113	+	then (wasUniqueBorn("DUCK-WWWADMIN-JU") == 0)
	114	+	else false)
	115	+	then $Tuple3("DUCK-WWWADMIN-JU", "1A1D1I1M1N3W-J", entry)
	116	+	else if (if ((jackpotRandom == 9))
	117	+	then (wasUniqueBorn("DUCK-WWWWFARM-JU") == 0)
	118	+	else false)
	119	+	then $Tuple3("DUCK-WWWWFARM-JU", "1A1F1M1R4W-J", entry)
	120	+	else {
	121	+	let typeRandom = getRandomNumber(4, txId, hatchingFinishHeight, 5)
	122	+	let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 6)
	123	+	let color = if ((colorRandom == 0))
	124	+	then "Y"
	125	+	else if ((colorRandom == 1))
	126	+	then "G"
	127	+	else if ((colorRandom == 2))
	128	+	then "B"
	129	+	else "R"
	130	+	if ((typeRandom == 0))
	131	+	then $Tuple3(("DUCK-LLLLLLLL-G" + color), "8L-G", entry)
	132	+	else if ((typeRandom == 1))
	133	+	then $Tuple3(("DUCK-MMMMMMMM-G" + color), "8M-G", entry)
	134	+	else if ((typeRandom == 2))
	135	+	then $Tuple3(("DUCK-NNNNNNNN-G" + color), "8N-G", entry)
	136	+	else $Tuple3(("DUCK-OOOOOOOO-G" + color), "8OOOOOOOO-G", entry)
	137	+	}
191	138		}
192	139
193	140
194		-	func canBeBreeded (asset1Id,asset2Id) = {
195		-	let asset1Gen = split(value(assetInfo(asset1Id)).name, "")
196		-	let asset2Gen = split(value(assetInfo(asset2Id)).name, "")
197		-	if ((value(indexOf(Generations, asset1Gen[14])) >= MaxGeneration))
198		-	then (("you can only breed ducks with generation " + Generations[MaxGeneration]) + " and lower")
199		-	else if ((value(indexOf(Generations, asset2Gen[14])) >= MaxGeneration))
200		-	then (("you can only breed ducks with generation " + Generations[MaxGeneration]) + " and lower")
201		-	else "true"
	141	+	func countEggsNeededAmount (totalDucksAmount) = {
	142	+	let n = totalDucksAmount
	143	+	let g = discountCoefficient
	144	+	let s = saleCoefficient
	145	+	let t = typesAmount
	146	+	let price = pow((100 + ((n * g) / (10 * t))), 2, 5, 1, 2, DOWN)
	147	+	if ((saleCoefficient == 0))
	148	+	then (price * 1000000)
	149	+	else (((price * 1000000) / 100) * (100 - saleCoefficient))
202	150		}
203		-
204		-
205		-	func isSymbolA (accumulated,sym) = if ((sym == "A"))
206		-	then (accumulated + 1)
207		-	else (accumulated + 0)
208		-
209		-
210		-	func isSymbolB (accumulated,sym) = if ((sym == "B"))
211		-	then (accumulated + 1)
212		-	else (accumulated + 0)
213		-
214		-
215		-	func isSymbolC (accumulated,sym) = if ((sym == "C"))
216		-	then (accumulated + 1)
217		-	else (accumulated + 0)
218		-
219		-
220		-	func isSymbolD (accumulated,sym) = if ((sym == "D"))
221		-	then (accumulated + 1)
222		-	else (accumulated + 0)
223		-
224		-
225		-	func isSymbolE (accumulated,sym) = if ((sym == "E"))
226		-	then (accumulated + 1)
227		-	else (accumulated + 0)
228		-
229		-
230		-	func isSymbolF (accumulated,sym) = if ((sym == "F"))
231		-	then (accumulated + 1)
232		-	else (accumulated + 0)
233		-
234		-
235		-	func isSymbolG (accumulated,sym) = if ((sym == "G"))
236		-	then (accumulated + 1)
237		-	else (accumulated + 0)
238		-
239		-
240		-	func isSymbolH (accumulated,sym) = if ((sym == "H"))
241		-	then (accumulated + 1)
242		-	else (accumulated + 0)
243		-
244		-
245		-	func isSymbolI (accumulated,sym) = if ((sym == "I"))
246		-	then (accumulated + 1)
247		-	else (accumulated + 0)
248		-
249		-
250		-	func isSymbolK (accumulated,sym) = if ((sym == "K"))
251		-	then (accumulated + 1)
252		-	else (accumulated + 0)
253		-
254		-
255		-	func isSymbolL (accumulated,sym) = if ((sym == "L"))
256		-	then (accumulated + 1)
257		-	else (accumulated + 0)
258		-
259		-
260		-	func isSymbolM (accumulated,sym) = if ((sym == "M"))
261		-	then (accumulated + 1)
262		-	else (accumulated + 0)
263		-
264		-
265		-	func isSymbolN (accumulated,sym) = if ((sym == "N"))
266		-	then (accumulated + 1)
267		-	else (accumulated + 0)
268		-
269		-
270		-	func isSymbolO (accumulated,sym) = if ((sym == "O"))
271		-	then (accumulated + 1)
272		-	else (accumulated + 0)
273		-
274		-
275		-	func isSymbolS (accumulated,sym) = if ((sym == "S"))
276		-	then (accumulated + 1)
277		-	else (accumulated + 0)
278		-
279		-
280		-	func isSymbolT (accumulated,sym) = if ((sym == "T"))
281		-	then (accumulated + 1)
282		-	else (accumulated + 0)
283		-
284		-
285		-	func getAmountOrClear (amount) = if (contains(amount, "0"))
286		-	then ""
287		-	else amount
288		-
289		-
290		-	func asString (value) = match value {
291		-	case string: String =>
292		-	string
293		-	case _ =>
294		-	throw("wrong type, expected: String")
295		-	}
296	151
297	152
298	153		func asInt (value) = match value {
299	154		case int: Int =>
300	155		int
301	156		case _ =>
302		-	throw("wrong type, expected: Int")
	157	+	throw("IAI: wrong type, expected: Int")
303	158		}
304	159
305	160
306		-	func composeGenericData (duckGen,duckIdKey,assetId,asset) = {
307		-	let farmGen = asString(invoke(this, "getGenFromName", [duckGen], nil))
308		-	if ((farmGen == farmGen))
309		-	then {
310		-	let amount = tryGetInteger(getDuckStatsKey(duckGen))
311		-	let quantity = tryGetInteger((("stats_" + farmGen) + "_quantity"))
312		-	[StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), (amount + 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (quantity + 1)), asset]
313		-	}
314		-	else throw("Strict value is not equal to itself.")
	161	+	func finishHatchingInternal (txIdStr,owner) = {
	162	+	let txId = fromBase58String(txIdStr)
	163	+	let hatchingStatusKey = getHatchingStatusKey(owner, txId)
	164	+	let finishHeightKey = getHatchingFinishHeightKey(owner, txId)
	165	+	let duckIdKey = getDuckIdKey(owner, txId)
	166	+	let duckFromBaby = match getBoolean((("hatching_" + txIdStr) + "_babyDuck")) {
	167	+	case t: Boolean =>
	168	+	t
	169	+	case _ =>
	170	+	false
315	171		}
316		-
317		-
318		-	func finishDuckHatch (txIdStr,owner,duckGenesString) = {
319		-	let txId = fromBase58String(txIdStr)
320		-	let processStatusKey = getProcessStatusKey(owner, txId)
321		-	let duckIdKey = getDuckIdKey(owner, txId)
322		-	let processTxStatus = getStringValue(this, processStatusKey)
323		-	let finishHeightKey = getProcessFinishHeightKey(owner, txId)
324		-	let processFinishHeight = getIntegerValue(this, finishHeightKey)
325		-	if ((processTxStatus == HatchingFinished))
	172	+	let hatchingTxStatus = getStringValue(this, hatchingStatusKey)
	173	+	let hatchingFinishHeight = getIntegerValue(this, finishHeightKey)
	174	+	if ((hatchingTxStatus == HatchingFinished))
326	175		then {
327	176		let duckId = getStringValue(this, getDuckIdKey(owner, txId))
328		-	throw(("The duck was ~~breeded~~ and claimed already, here is the folowing: " + duckId))
	177	+	throw(("IFDH: The duck was hatched and claimed already, here is the folowing: " + duckId))
329	178		}
330		-	else if ((~~processFinishHeight~~ > height))
331		-	then throw((((("~~Breeding~~ is not finished yet " + toString((~~processFinishHeight~~ - height))) + " blocks remaining, it will take around ") + toString((~~processFinishHeight~~ - height))) + " minutes"))
	179	+	else if ((hatchingFinishHeight > height))
	180	+	then throw((((("Hatching is not finished yet " + toString((hatchingFinishHeight - height))) + " blocks remaining, it will take around ") + toString((hatchingFinishHeight - height))) + " minutes"))
332	181		else {
333		-	let duckGen = if ((duckGenesString == ""))
334		-	then asString(invoke(this, "generateDuck", [txId, processFinishHeight, 0, 0, "", 0], nil))
335		-	else duckGenesString
336		-	if ((duckGen == duckGen))
337		-	then {
338		-	let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
339		-	let asset = Issue(duckGen, description, 1, 0, false, unit, processFinishHeight)
340		-	let assetId = calculateAssetId(asset)
341		-	(composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [StringEntry(processStatusKey, HatchingFinished), ScriptTransfer(addressFromStringValue(owner), 1, assetId)])
342		-	}
343		-	else throw("Strict value is not equal to itself.")
	182	+	let $t060506136 = getRandomName(txId, hatchingFinishHeight)
	183	+	let duckGen = $t060506136._1
	184	+	let farmGen = $t060506136._2
	185	+	let jackpotRandomEntry = $t060506136._3
	186	+	let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
	187	+	let asset = Issue(duckGen, description, 1, 0, false, unit, hatchingFinishHeight)
	188	+	let assetId = calculateAssetId(asset)
	189	+	let amount = (tryGetInteger(getDuckStatsKey(duckGen)) + 1)
	190	+	[StringEntry(hatchingStatusKey, HatchingFinished), StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), BooleanEntry((("duck_" + toBase58String(assetId)) + "_grown"), duckFromBaby), IntegerEntry(getDuckStatsKey(duckGen), amount), jackpotRandomEntry, IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) + 1)), asset, ScriptTransfer(Address(fromBase58String(owner)), 1, assetId)]
344	191		}
345	192		}
346	193
347	194
348	195		func getBool (key) = match getBoolean(this, key) {
349	196		case b: Boolean =>
350	197		b
351	198		case _ =>
352	199		false
353	200		}
354	201
355	202
356	203		func isTestEnv () = getBool("TESTENV")
357	204
358	205
359	206		@Callable(i)
360	207		func configureOracle (oracle) = if ((i.caller != this))
361		-	then throw("admin only")
	208	+	then throw("ICU: admin only")
362	209		else [StringEntry("static_oracleAddress", oracle)]
363	210
364	211
365	212
366	213		@Callable(i)
367		-	func generateDuck (txId,hatchingFinishHeight,geneFromParent,genePostion,specifiqueGene,specifiqueGenePosition) = {
368		-	let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 11)
369		-	let color = if ((colorRandom == 0))
370		-	then "Y"
371		-	else if ((colorRandom == 1))
372		-	then "G"
373		-	else if ((colorRandom == 2))
374		-	then "B"
375		-	else "R"
376		-	let parent1Id = fromBase58String(tryGetString(getDuckParentKey(txId, 1)))
377		-	let parent2Id = fromBase58String(tryGetString(getDuckParentKey(txId, 2)))
378		-	let parent1Gen = split(value(assetInfo(parent1Id)).name, "")
379		-	let parent2Gen = split(value(assetInfo(parent2Id)).name, "")
380		-	let gen = ((((((((((("DUCK-" + getRandomGen(parent1Gen[5], parent2Gen[5], 0, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[6], parent2Gen[6], 1, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[7], parent2Gen[7], 2, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[8], parent2Gen[8], 3, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[9], parent2Gen[9], 4, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[10], parent2Gen[10], 5, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[11], parent2Gen[11], 6, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + getRandomGen(parent1Gen[12], parent2Gen[12], 7, txId, hatchingFinishHeight, geneFromParent, genePostion, specifiqueGene, specifiqueGenePosition)) + "-") + determineGeneration(parent1Gen[14], parent2Gen[14])) + color)
381		-	$Tuple2(nil, gen)
	214	+	func setDiscount (val) = if ((i.caller != this))
	215	+	then throw("ISD: admin_only")
	216	+	else [IntegerEntry("discountCoefficient", val)]
	217	+
	218	+
	219	+
	220	+	@Callable(i)
	221	+	func setSale (val) = if ((i.caller != this))
	222	+	then throw("ISS: admin_only")

github/deemru/w8io/6500d08 
90.64 ms ◑