w8 · tx · ARV···7mw

tx · ARVkJQw7QJHX9tXyCTS6rfB2Qwk9g6UwfWK61iUKE7mw

3P9REuLBnYBafDqtEu6hfzs2Rv2haSU158y:  -0.02100000 Waves

2022.08.10 10:57 [3243592] smart account 3P9REuLBnYBafDqtEu6hfzs2Rv2haSU158y > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "ARVkJQw7QJHX9tXyCTS6rfB2Qwk9g6UwfWK61iUKE7mw",
    "fee": 2100000,
    "feeAssetId": null,
    "timestamp": 1660118354751,
    "version": 2,
    "chainId": 87,
    "sender": "3P9REuLBnYBafDqtEu6hfzs2Rv2haSU158y",
    "senderPublicKey": "4o7Wphn2swW4DxuPY7UcT6YpsZniEMnDH818h1pC3BeX",
    "proofs": [
        "4kk5Ks4xUTXrANexYDbdaREfjUDGXSA71nG5kpj4X9VaPUWjVGJ2D9xxaxp7eKhu5VRffQ6K2Q28L8uKTSqjDMXi"
    ],
    "script": "base64:BgI7CAISAwoBCBIICgYCAQEBCAESAwoBCBIDCgEIEgUKAwIIARIAEgQKAggIEgMKAQgSBAoCCAgSBAoCCAgsABBkZWxheUZvckhhdGNoaW5nAAIAD0hhdGNoaW5nU3RhcnRlZAIQQlJFRURJTkdfU1RBUlRFRAAQSGF0Y2hpbmdGaW5pc2hlZAIRQlJFRURJTkdfRklOSVNIRUQBFHRyeUdldFN0cmluZ0V4dGVybmFsAgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAnQgCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFhBQckbWF0Y2gwBQFhAgABFXRyeUdldEludGVnZXJFeHRlcm5hbAIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJoIAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAAAQx0cnlHZXRTdHJpbmcBA2tleQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgUEdGhpcwUDa2V5AQlnZXRPcmFjbGUACQEHQWRkcmVzcwEJANkEAQkBDHRyeUdldFN0cmluZwECFHN0YXRpY19vcmFjbGVBZGRyZXNzARNnZXRJbmN1YmF0b3JBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhdzdGF0aWNfaW5jdWJhdG9yQWRkcmVzcwERZ2V0UmViaXJ0aEFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFXN0YXRpY19yZWJpcnRoQWRkcmVzcwEPZ2V0SXRlbXNBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhNzdGF0aWNfaXRlbXNBZGRyZXNzAQ1nZXRFZ2dBc3NldElkAAkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIRc3RhdGljX2VnZ0Fzc2V0SWQBGmdldEJhYnlEdWNrQnJlZWRpbmdBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAh5zdGF0aWNfYmFieUR1Y2tCcmVlZGluZ0FkZHJlc3MBEGdldER1Y2tsaW5nUHJpY2UACQEVdHJ5R2V0SW50ZWdlckV4dGVybmFsAgkBCWdldE9yYWNsZQACFHN0YXRpY19kdWNrbGluZ1ByaWNlAA1NYXhHZW5lcmF0aW9uAAcAC0dlbmVyYXRpb25zCQDMCAICAUcJAMwIAgIBSAkAzAgCAgFJCQDMCAICAUsJAMwIAgIBTAkAzAgCAgFNCQDMCAICAU4JAMwIAgIBTwUDbmlsARNnZXRQcm9jZXNzU3RhdHVzS2V5AgdhZGRyZXNzBHR4SWQJAKwCAgkArAICCQCsAgIFB2FkZHJlc3MCAV8JANgEAQUEdHhJZAIHX3N0YXR1cwEOZ2V0RHVja2xpbmdLZXkCB2FkZHJlc3MEdHhJZAkArAICCQCsAgIJAKwCAgUHYWRkcmVzcwIBXwkA2AQBBQR0eElkAglfZHVja2xpbmcBGWdldFByb2Nlc3NGaW5pc2hIZWlnaHRLZXkCB2FkZHJlc3MEdHhJZAkArAICCQCsAgIJAKwCAgUHYWRkcmVzcwIBXwkA2AQBBQR0eElkAgNfZmgBEGdldER1Y2tQYXJlbnRLZXkCBHR4SWQJcGFyZW50TnVtCQCsAgIJAKwCAgkArAICAgdpbml0dHhfCQDYBAEFBHR4SWQCB19wYXJlbnQJAKQDAQUJcGFyZW50TnVtAQxnZXREdWNrSWRLZXkCB2FkZHJlc3MEdHhJZAkArAICCQCsAgIJAKwCAgUHYWRkcmVzcwIBXwkA2AQBBQR0eElkAgNfZGkBD2dldER1Y2tTdGF0c0tleQEJZ2VuU3RyaW5nCQCsAgIJAKwCAgIGc3RhdHNfBQlnZW5TdHJpbmcCB19hbW91bnQBDXRyeUdldEludGVnZXIBA2tleQQDdmFsBAckbWF0Y2gwCQCaCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgNJbnQEAWIFByRtYXRjaDAFAWIAAAUDdmFsARNkZXRlcm1pbmVHZW5lcmF0aW9uAgJnMQJnMgQGZ0luZGV4CQCWAwEJAMwIAgkBBXZhbHVlAQkAzwgCBQtHZW5lcmF0aW9ucwUCZzEJAMwIAgkBBXZhbHVlAQkAzwgCBQtHZW5lcmF0aW9ucwUCZzIFA25pbAkAkQMCBQtHZW5lcmF0aW9ucwkAZAIFBmdJbmRleAABAQ9nZXRSYW5kb21OdW1iZXIECHZhcmlhbnRzBHR4SWQUaGF0Y2hpbmdGaW5pc2hIZWlnaHQGb2Zmc2V0BA9yYW5kb21TZWVkQmxvY2sJAQV2YWx1ZQEJAO0HAQkAZQIFFGhhdGNoaW5nRmluaXNoSGVpZ2h0AAEECnJhbmRvbUhhc2gJANQWAQkAywECBQR0eElkCQEFdmFsdWUBCAUPcmFuZG9tU2VlZEJsb2NrA3ZyZgkAagIJALIJAgUKcmFuZG9tSGFzaAUGb2Zmc2V0BQh2YXJpYW50cwEMZ2V0UmFuZG9tR2VuCQRnZW4xBGdlbjIEc3RlcAR0eElkFGhhdGNoaW5nRmluaXNoSGVpZ2h0DmdlbmVGcm9tUGFyZW50C2dlbmVQb3N0aW9uDnNwZWNpZmlxdWVHZW5lFnNwZWNpZmlxdWVHZW5lUG9zaXRpb24DAwkBAiE9AgUOZ2VuZUZyb21QYXJlbnQAAAkAAAIFC2dlbmVQb3N0aW9uBQRzdGVwBwMJAAACBQ5nZW5lRnJvbVBhcmVudAABBQRnZW4xAwkAAAIFDmdlbmVGcm9tUGFyZW50AAIFBGdlbjIJAAIBAiBQYXJlbnQgZWl0aGVyIG5lZWRzIHRvIGJlIDEgb3IgMgMDCQECIT0CBQ5zcGVjaWZpcXVlR2VuZQIACQAAAgUWc3BlY2lmaXF1ZUdlbmVQb3NpdGlvbgUEc3RlcAcFDnNwZWNpZmlxdWVHZW5lBAlyYW5kb21OdW0JAQ9nZXRSYW5kb21OdW1iZXIEAAIFBHR4SWQFFGhhdGNoaW5nRmluaXNoSGVpZ2h0BQRzdGVwBANnZW4DCQAAAgUJcmFuZG9tTnVtAAAFBGdlbjEFBGdlbjIFA2dlbgEVY2hlY2tBc3NldEluSW5jdWJhdG9yAQdhc3NldElkBAZyZXN1bHQEByRtYXRjaDAJAJ0IAgkBE2dldEluY3ViYXRvckFkZHJlc3MABQdhc3NldElkAwkAAQIFByRtYXRjaDACBlN0cmluZwQBYgUHJG1hdGNoMAYHBAdyZXN1bHQyBAckbWF0Y2gwCQCdCAIFBHRoaXMFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFjBQckbWF0Y2gwBgcDBQZyZXN1bHQGBQdyZXN1bHQyAQxjYW5CZUJyZWVkZWQCCGFzc2V0MUlkCGFzc2V0MklkBAlhc3NldDFHZW4JALUJAggJAQV2YWx1ZQEJAOwHAQUIYXNzZXQxSWQEbmFtZQIABAlhc3NldDJHZW4JALUJAggJAQV2YWx1ZQEJAOwHAQUIYXNzZXQySWQEbmFtZQIAAwkAZwIJAQV2YWx1ZQEJAM8IAgULR2VuZXJhdGlvbnMJAJEDAgUJYXNzZXQxR2VuAA4FDU1heEdlbmVyYXRpb24JAKwCAgkArAICAil5b3UgY2FuIG9ubHkgYnJlZWQgZHVja3Mgd2l0aCBnZW5lcmF0aW9uIAkAkQMCBQtHZW5lcmF0aW9ucwUNTWF4R2VuZXJhdGlvbgIKIGFuZCBsb3dlcgMJAGcCCQEFdmFsdWUBCQDPCAIFC0dlbmVyYXRpb25zCQCRAwIFCWFzc2V0MkdlbgAOBQ1NYXhHZW5lcmF0aW9uCQCsAgIJAKwCAgIpeW91IGNhbiBvbmx5IGJyZWVkIGR1Y2tzIHdpdGggZ2VuZXJhdGlvbiAJAJEDAgULR2VuZXJhdGlvbnMFDU1heEdlbmVyYXRpb24CCiBhbmQgbG93ZXICBHRydWUBCWlzU3ltYm9sQQILYWNjdW11bGF0ZWQDc3ltAwkAAAIFA3N5bQIBQQkAZAIFC2FjY3VtdWxhdGVkAAEJAGQCBQthY2N1bXVsYXRlZAAAAQlpc1N5bWJvbEICC2FjY3VtdWxhdGVkA3N5bQMJAAACBQNzeW0CAUIJAGQCBQthY2N1bXVsYXRlZAABCQBkAgULYWNjdW11bGF0ZWQAAAEJaXNTeW1ib2xDAgthY2N1bXVsYXRlZANzeW0DCQAAAgUDc3ltAgFDCQBkAgULYWNjdW11bGF0ZWQAAQkAZAIFC2FjY3VtdWxhdGVkAAABCWlzU3ltYm9sRAILYWNjdW11bGF0ZWQDc3ltAwkAAAIFA3N5bQIBRAkAZAIFC2FjY3VtdWxhdGVkAAEJAGQCBQthY2N1bXVsYXRlZAAAAQlpc1N5bWJvbEUCC2FjY3VtdWxhdGVkA3N5bQMJAAACBQNzeW0CAUUJAGQCBQthY2N1bXVsYXRlZAABCQBkAgULYWNjdW11bGF0ZWQAAAEJaXNTeW1ib2xGAgthY2N1bXVsYXRlZANzeW0DCQAAAgUDc3ltAgFGCQBkAgULYWNjdW11bGF0ZWQAAQkAZAIFC2FjY3VtdWxhdGVkAAABCWlzU3ltYm9sRwILYWNjdW11bGF0ZWQDc3ltAwkAAAIFA3N5bQIBRwkAZAIFC2FjY3VtdWxhdGVkAAEJAGQCBQthY2N1bXVsYXRlZAAAAQlpc1N5bWJvbEgCC2FjY3VtdWxhdGVkA3N5bQMJAAACBQNzeW0CAUgJAGQCBQthY2N1bXVsYXRlZAABCQBkAgULYWNjdW11bGF0ZWQAAAEJaXNTeW1ib2xJAgthY2N1bXVsYXRlZANzeW0DCQAAAgUDc3ltAgFJCQBkAgULYWNjdW11bGF0ZWQAAQkAZAIFC2FjY3VtdWxhdGVkAAABCWlzU3ltYm9sSwILYWNjdW11bGF0ZWQDc3ltAwkAAAIFA3N5bQIBSwkAZAIFC2FjY3VtdWxhdGVkAAEJAGQCBQthY2N1bXVsYXRlZAAAAQlpc1N5bWJvbFMCC2FjY3VtdWxhdGVkA3N5bQMJAAACBQNzeW0CAVMJAGQCBQthY2N1bXVsYXRlZAABCQBkAgULYWNjdW11bGF0ZWQAAAEJaXNTeW1ib2xUAgthY2N1bXVsYXRlZANzeW0DCQAAAgUDc3ltAgFUCQBkAgULYWNjdW11bGF0ZWQAAQkAZAIFC2FjY3VtdWxhdGVkAAABEGdldEFtb3VudE9yQ2xlYXIBBmFtb3VudAMJAQhjb250YWlucwIFBmFtb3VudAIBMAIABQZhbW91bnQBCGFzU3RyaW5nAQV2YWx1ZQQHJG1hdGNoMAUFdmFsdWUDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAZzdHJpbmcFByRtYXRjaDAFBnN0cmluZwkAAgECHHdyb25nIHR5cGUsIGV4cGVjdGVkOiBTdHJpbmcBBWFzSW50AQV2YWx1ZQQHJG1hdGNoMAUFdmFsdWUDCQABAgUHJG1hdGNoMAIDSW50BANpbnQFByRtYXRjaDAFA2ludAkAAgECGXdyb25nIHR5cGUsIGV4cGVjdGVkOiBJbnQBEmNvbXBvc2VHZW5lcmljRGF0YQQHZHVja0dlbglkdWNrSWRLZXkHYXNzZXRJZAVhc3NldAQHZmFybUdlbgkBCGFzU3RyaW5nAQkA/AcEBQR0aGlzAg5nZXRHZW5Gcm9tTmFtZQkAzAgCBQdkdWNrR2VuBQNuaWwFA25pbAMJAAACBQdmYXJtR2VuBQdmYXJtR2VuBAZhbW91bnQJAQ10cnlHZXRJbnRlZ2VyAQkBD2dldER1Y2tTdGF0c0tleQEFB2R1Y2tHZW4ECHF1YW50aXR5CQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgZzdGF0c18FB2Zhcm1HZW4CCV9xdWFudGl0eQkAzAgCCQELU3RyaW5nRW50cnkCBQlkdWNrSWRLZXkJANgEAQUHYXNzZXRJZAkAzAgCCQELU3RyaW5nRW50cnkCCQDYBAEFB2Fzc2V0SWQFCWR1Y2tJZEtleQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBD2dldER1Y2tTdGF0c0tleQEFB2R1Y2tHZW4JAGQCBQZhbW91bnQAAQkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICBnN0YXRzXwUHZmFybUdlbgIJX3F1YW50aXR5CQBkAgUIcXVhbnRpdHkAAQkAzAgCBQVhc3NldAUDbmlsCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAQ9maW5pc2hEdWNrSGF0Y2gDB3R4SWRTdHIFb3duZXIPZHVja0dlbmVzU3RyaW5nBAR0eElkCQDZBAEFB3R4SWRTdHIEEHByb2Nlc3NTdGF0dXNLZXkJARNnZXRQcm9jZXNzU3RhdHVzS2V5AgUFb3duZXIFBHR4SWQECWR1Y2tJZEtleQkBDGdldER1Y2tJZEtleQIFBW93bmVyBQR0eElkBA9wcm9jZXNzVHhTdGF0dXMJARFAZXh0ck5hdGl2ZSgxMDUzKQIFBHRoaXMFEHByb2Nlc3NTdGF0dXNLZXkED2ZpbmlzaEhlaWdodEtleQkBGWdldFByb2Nlc3NGaW5pc2hIZWlnaHRLZXkCBQVvd25lcgUEdHhJZAQTcHJvY2Vzc0ZpbmlzaEhlaWdodAkBEUBleHRyTmF0aXZlKDEwNTApAgUEdGhpcwUPZmluaXNoSGVpZ2h0S2V5AwkAAAIFD3Byb2Nlc3NUeFN0YXR1cwUQSGF0Y2hpbmdGaW5pc2hlZAQGZHVja0lkCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzCQEMZ2V0RHVja0lkS2V5AgUFb3duZXIFBHR4SWQJAAIBCQCsAgICQFRoZSBkdWNrIHdhcyBicmVlZGVkIGFuZCBjbGFpbWVkIGFscmVhZHksIGhlcmUgaXMgdGhlIGZvbG93aW5nOiAFBmR1Y2tJZAMJAGYCBRNwcm9jZXNzRmluaXNoSGVpZ2h0BQZoZWlnaHQJAAIBCQCsAgIJAKwCAgkArAICCQCsAgICHUJyZWVkaW5nIGlzIG5vdCBmaW5pc2hlZCB5ZXQgCQCkAwEJAGUCBRNwcm9jZXNzRmluaXNoSGVpZ2h0BQZoZWlnaHQCJyBibG9ja3MgcmVtYWluaW5nLCBpdCB3aWxsIHRha2UgYXJvdW5kIAkApAMBCQBlAgUTcHJvY2Vzc0ZpbmlzaEhlaWdodAUGaGVpZ2h0AgggbWludXRlcwQHZHVja0dlbgMJAAACBQ9kdWNrR2VuZXNTdHJpbmcCAAkBCGFzU3RyaW5nAQkA/AcEBQR0aGlzAgxnZW5lcmF0ZUR1Y2sJAMwIAgUEdHhJZAkAzAgCBRNwcm9jZXNzRmluaXNoSGVpZ2h0CQDMCAIAAAkAzAgCAAAJAMwIAgIACQDMCAIAAAUDbmlsBQNuaWwFD2R1Y2tHZW5lc1N0cmluZwMJAAACBQdkdWNrR2VuBQdkdWNrR2VuBAtkZXNjcmlwdGlvbgkArAICCQCsAgICDnsiZ2Vub3R5cGUiOiAiBQdkdWNrR2VuAhkiLCAiY3Jvc3NicmVlZGluZyI6IHRydWV9BAVhc3NldAkAwwgHBQdkdWNrR2VuBQtkZXNjcmlwdGlvbgABAAAHBQR1bml0BRNwcm9jZXNzRmluaXNoSGVpZ2h0BAdhc3NldElkCQC4CAEFBWFzc2V0BAlwYXJlbnQxSWQJAQx0cnlHZXRTdHJpbmcBCQEQZ2V0RHVja1BhcmVudEtleQIFBHR4SWQAAQQJcGFyZW50MklkCQEMdHJ5R2V0U3RyaW5nAQkBEGdldER1Y2tQYXJlbnRLZXkCBQR0eElkAAIJAM4IAgkBEmNvbXBvc2VHZW5lcmljRGF0YQQFB2R1Y2tHZW4FCWR1Y2tJZEtleQUHYXNzZXRJZAUFYXNzZXQJAMwIAgkBC1N0cmluZ0VudHJ5AgUQcHJvY2Vzc1N0YXR1c0tleQUQSGF0Y2hpbmdGaW5pc2hlZAkAzAgCCQEOU2NyaXB0VHJhbnNmZXIDCQERQGV4dHJOYXRpdmUoMTA2MikBBQVvd25lcgABBQdhc3NldElkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4KAWkBD2NvbmZpZ3VyZU9yYWNsZQEGb3JhY2xlAwkBAiE9AggFAWkGY2FsbGVyBQR0aGlzCQACAQIKYWRtaW4gb25seQkAzAgCCQELU3RyaW5nRW50cnkCAhRzdGF0aWNfb3JhY2xlQWRkcmVzcwUGb3JhY2xlBQNuaWwBaQEMZ2VuZXJhdGVEdWNrBgR0eElkFGhhdGNoaW5nRmluaXNoSGVpZ2h0DmdlbmVGcm9tUGFyZW50C2dlbmVQb3N0aW9uDnNwZWNpZmlxdWVHZW5lFnNwZWNpZmlxdWVHZW5lUG9zaXRpb24EC2NvbG9yUmFuZG9tCQEPZ2V0UmFuZG9tTnVtYmVyBAAEBQR0eElkBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAALBAVjb2xvcgMJAAACBQtjb2xvclJhbmRvbQAAAgFZAwkAAAIFC2NvbG9yUmFuZG9tAAECAUcDCQAAAgULY29sb3JSYW5kb20AAgIBQgIBUgQJcGFyZW50MUlkCQDZBAEJAQx0cnlHZXRTdHJpbmcBCQEQZ2V0RHVja1BhcmVudEtleQIFBHR4SWQAAQQJcGFyZW50MklkCQDZBAEJAQx0cnlHZXRTdHJpbmcBCQEQZ2V0RHVja1BhcmVudEtleQIFBHR4SWQAAgQKcGFyZW50MUdlbgkAtQkCCAkBBXZhbHVlAQkA7AcBBQlwYXJlbnQxSWQEbmFtZQIABApwYXJlbnQyR2VuCQC1CQIICQEFdmFsdWUBCQDsBwEFCXBhcmVudDJJZARuYW1lAgAEA2dlbgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgICBURVQ0stCQEMZ2V0UmFuZG9tR2VuCQkAkQMCBQpwYXJlbnQxR2VuAAUJAJEDAgUKcGFyZW50MkdlbgAFAAAFBHR4SWQFFGhhdGNoaW5nRmluaXNoSGVpZ2h0BQ5nZW5lRnJvbVBhcmVudAULZ2VuZVBvc3Rpb24FDnNwZWNpZmlxdWVHZW5lBRZzcGVjaWZpcXVlR2VuZVBvc2l0aW9uCQEMZ2V0UmFuZG9tR2VuCQkAkQMCBQpwYXJlbnQxR2VuAAYJAJEDAgUKcGFyZW50MkdlbgAGAAEFBHR4SWQFFGhhdGNoaW5nRmluaXNoSGVpZ2h0BQ5nZW5lRnJvbVBhcmVudAULZ2VuZVBvc3Rpb24FDnNwZWNpZmlxdWVHZW5lBRZzcGVjaWZpcXVlR2VuZVBvc2l0aW9uCQEMZ2V0UmFuZG9tR2VuCQkAkQMCBQpwYXJlbnQxR2VuAAcJAJEDAgUKcGFyZW50MkdlbgAHAAIFBHR4SWQFFGhhdGNoaW5nRmluaXNoSGVpZ2h0BQ5nZW5lRnJvbVBhcmVudAULZ2VuZVBvc3Rpb24FDnNwZWNpZmlxdWVHZW5lBRZzcGVjaWZpcXVlR2VuZVBvc2l0aW9uCQEMZ2V0UmFuZG9tR2VuCQkAkQMCBQpwYXJlbnQxR2VuAAgJAJEDAgUKcGFyZW50MkdlbgAIAAMFBHR4SWQFFGhhdGNoaW5nRmluaXNoSGVpZ2h0BQ5nZW5lRnJvbVBhcmVudAULZ2VuZVBvc3Rpb24FDnNwZWNpZmlxdWVHZW5lBRZzcGVjaWZpcXVlR2VuZVBvc2l0aW9uCQEMZ2V0UmFuZG9tR2VuCQkAkQMCBQpwYXJlbnQxR2VuAAkJAJEDAgUKcGFyZW50MkdlbgAJAAQFBHR4SWQFFGhhdGNoaW5nRmluaXNoSGVpZ2h0BQ5nZW5lRnJvbVBhcmVudAULZ2VuZVBvc3Rpb24FDnNwZWNpZmlxdWVHZW5lBRZzcGVjaWZpcXVlR2VuZVBvc2l0aW9uCQEMZ2V0UmFuZG9tR2VuCQkAkQMCBQpwYXJlbnQxR2VuAAoJAJEDAgUKcGFyZW50MkdlbgAKAAUFBHR4SWQFFGhhdGNoaW5nRmluaXNoSGVpZ2h0BQ5nZW5lRnJvbVBhcmVudAULZ2VuZVBvc3Rpb24FDnNwZWNpZmlxdWVHZW5lBRZzcGVjaWZpcXVlR2VuZVBvc2l0aW9uCQEMZ2V0UmFuZG9tR2VuCQkAkQMCBQpwYXJlbnQxR2VuAAsJAJEDAgUKcGFyZW50MkdlbgALAAYFBHR4SWQFFGhhdGNoaW5nRmluaXNoSGVpZ2h0BQ5nZW5lRnJvbVBhcmVudAULZ2VuZVBvc3Rpb24FDnNwZWNpZmlxdWVHZW5lBRZzcGVjaWZpcXVlR2VuZVBvc2l0aW9uCQEMZ2V0UmFuZG9tR2VuCQkAkQMCBQpwYXJlbnQxR2VuAAwJAJEDAgUKcGFyZW50MkdlbgAMAAcFBHR4SWQFFGhhdGNoaW5nRmluaXNoSGVpZ2h0BQ5nZW5lRnJvbVBhcmVudAULZ2VuZVBvc3Rpb24FDnNwZWNpZmlxdWVHZW5lBRZzcGVjaWZpcXVlR2VuZVBvc2l0aW9uAgEtCQETZGV0ZXJtaW5lR2VuZXJhdGlvbgIJAJEDAgUKcGFyZW50MUdlbgAOCQCRAwIFCnBhcmVudDJHZW4ADgUFY29sb3IJAJQKAgUDbmlsBQNnZW4BaQEOZ2V0R2VuRnJvbU5hbWUBCWFzc2V0TmFtZQQIZ2Vub3R5cGUJALUJAgkAswICCQCwAgIFCWFzc2V0TmFtZQAFAAMCAAQKZ2VuZXJhdGlvbgkAkQMCCQC1CQIFCWFzc2V0TmFtZQIAAA4EA2dlbgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQEQZ2V0QW1vdW50T3JDbGVhcgEJAKwCAgkApAMBCgACJGwFCGdlbm90eXBlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlpc1N5bWJvbEECBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjBfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDgJAQUkZjBfMgIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIJAQUkZjBfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAgFBCQEQZ2V0QW1vdW50T3JDbGVhcgEJAKwCAgkApAMBCgACJGwFCGdlbm90eXBlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYxXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlpc1N5bWJvbEICBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDgJAQUkZjFfMgIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIJAQUkZjFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAgFCCQEQZ2V0QW1vdW50T3JDbGVhcgEJAKwCAgkApAMBCgACJGwFCGdlbm90eXBlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYyXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlpc1N5bWJvbEMCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjJfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDgJAQUkZjJfMgIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIJAQUkZjJfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAgFDCQEQZ2V0QW1vdW50T3JDbGVhcgEJAKwCAgkApAMBCgACJGwFCGdlbm90eXBlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGYzXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlpc1N5bWJvbEQCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjNfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDgJAQUkZjNfMgIJAQUkZjNfMQIJAQUkZjNfMQIJAQUkZjNfMQIJAQUkZjNfMQIJAQUkZjNfMQIJAQUkZjNfMQIJAQUkZjNfMQIJAQUkZjNfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAgFECQEQZ2V0QW1vdW50T3JDbGVhcgEJAKwCAgkApAMBCgACJGwFCGdlbm90eXBlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGY0XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlpc1N5bWJvbEUCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjRfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDgJAQUkZjRfMgIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIJAQUkZjRfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAgFFCQEQZ2V0QW1vdW50T3JDbGVhcgEJAKwCAgkApAMBCgACJGwFCGdlbm90eXBlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGY1XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlpc1N5bWJvbEYCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjVfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDgJAQUkZjVfMgIJAQUkZjVfMQIJAQUkZjVfMQIJAQUkZjVfMQIJAQUkZjVfMQIJAQUkZjVfMQIJAQUkZjVfMQIJAQUkZjVfMQIJAQUkZjVfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAgFGCQEQZ2V0QW1vdW50T3JDbGVhcgEJAKwCAgkApAMBCgACJGwFCGdlbm90eXBlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGY2XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlpc1N5bWJvbEcCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjZfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDgJAQUkZjZfMgIJAQUkZjZfMQIJAQUkZjZfMQIJAQUkZjZfMQIJAQUkZjZfMQIJAQUkZjZfMQIJAQUkZjZfMQIJAQUkZjZfMQIJAQUkZjZfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAgFHCQEQZ2V0QW1vdW50T3JDbGVhcgEJAKwCAgkApAMBCgACJGwFCGdlbm90eXBlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGY3XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlpc1N5bWJvbEgCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjdfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDgJAQUkZjdfMgIJAQUkZjdfMQIJAQUkZjdfMQIJAQUkZjdfMQIJAQUkZjdfMQIJAQUkZjdfMQIJAQUkZjdfMQIJAQUkZjdfMQIJAQUkZjdfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAgFICQEQZ2V0QW1vdW50T3JDbGVhcgEJAKwCAgkApAMBCgACJGwFCGdlbm90eXBlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGY4XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlpc1N5bWJvbEkCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjhfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDgJAQUkZjhfMgIJAQUkZjhfMQIJAQUkZjhfMQIJAQUkZjhfMQIJAQUkZjhfMQIJAQUkZjhfMQIJAQUkZjhfMQIJAQUkZjhfMQIJAQUkZjhfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAgFJCQEQZ2V0QW1vdW50T3JDbGVhcgEJAKwCAgkApAMBCgACJGwFCGdlbm90eXBlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEFJGY5XzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlpc1N5bWJvbEsCBQIkYQkAkQMCBQIkbAUCJGkKAQUkZjlfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDgJAQUkZjlfMgIJAQUkZjlfMQIJAQUkZjlfMQIJAQUkZjlfMQIJAQUkZjlfMQIJAQUkZjlfMQIJAQUkZjlfMQIJAQUkZjlfMQIJAQUkZjlfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAgFLCQEQZ2V0QW1vdW50T3JDbGVhcgEJAKwCAgkApAMBCgACJGwFCGdlbm90eXBlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEGJGYxMF8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJaXNTeW1ib2xTAgUCJGEJAJEDAgUCJGwFAiRpCgEGJGYxMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOAkBBiRmMTBfMgIJAQYkZjEwXzECCQEGJGYxMF8xAgkBBiRmMTBfMQIJAQYkZjEwXzECCQEGJGYxMF8xAgkBBiRmMTBfMQIJAQYkZjEwXzECCQEGJGYxMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgCAVMJARBnZXRBbW91bnRPckNsZWFyAQkArAICCQCkAwEKAAIkbAUIZ2Vub3R5cGUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQYkZjExXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlpc1N5bWJvbFQCBQIkYQkAkQMCBQIkbAUCJGkKAQYkZjExXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA4CQEGJGYxMV8yAgkBBiRmMTFfMQIJAQYkZjExXzECCQEGJGYxMV8xAgkBBiRmMTFfMQIJAQYkZjExXzECCQEGJGYxMV8xAgkBBiRmMTFfMQIJAQYkZjExXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAIBVAIBLQUKZ2VuZXJhdGlvbgkAlAoCBQNuaWwFA2dlbgFpARZ2YWxpZGF0ZUFuZEdldENoaWxkcmVuAQdhc3NldElkAwkBASEBCQEVY2hlY2tBc3NldEluSW5jdWJhdG9yAQUHYXNzZXRJZAkAAgEJAKwCAgkArAICAiVZb3UgbmVlZCB0byBhdHRhY2ggYSB2YWxpZCBORlQtZHVjay4gBQdhc3NldElkAgwgaXMgaW52YWxpZCEECGNoaWxkcmVuCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgZhc3NldF8FB2Fzc2V0SWQCCV9jaGlsZHJlbgkAlAoCBQNuaWwFCGNoaWxkcmVuAWkBFmNyZWF0ZUR1Y2tTcGVjaWFsR2VuZXMDB2FkZHJlc3MHZHVja0dlbghjaGlsZHJlbgMDCQECIT0CCAUBaQZjYWxsZXIJAQ9nZXRJdGVtc0FkZHJlc3MACQECIT0CCAUBaQZjYWxsZXIFBHRoaXMHCQACAQITYWRtaW4gb3IgaXRlbXMgb25seQQEdHhJZAgFAWkNdHJhbnNhY3Rpb25JZAQLZGVzY3JpcHRpb24JAKwCAgkArAICAg57Imdlbm90eXBlIjogIgUHZHVja0dlbgIZIiwgImNyb3NzYnJlZWRpbmciOiB0cnVlfQQFYXNzZXQJAMIIBQUHZHVja0dlbgULZGVzY3JpcHRpb24AAQAABwQHYXNzZXRJZAkAuAgBBQVhc3NldAQJZHVja0lkS2V5CQEMZ2V0RHVja0lkS2V5AgkApQgBCAUBaQZjYWxsZXIFBHR4SWQEB2Zhcm1HZW4JAQhhc1N0cmluZwEJAPwHBAUEdGhpcwIOZ2V0R2VuRnJvbU5hbWUJAMwIAgUHZHVja0dlbgUDbmlsBQNuaWwDCQAAAgUHZmFybUdlbgUHZmFybUdlbgkAzggCCQESY29tcG9zZUdlbmVyaWNEYXRhBAUHZHVja0dlbgUJZHVja0lkS2V5BQdhc3NldElkBQVhc3NldAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICBmFzc2V0XwkA2AQBBQdhc3NldElkAglfY2hpbGRyZW4FCGNoaWxkcmVuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQUHYWRkcmVzcwABBQdhc3NldElkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQERc3RhcnREdWNrQnJlZWRpbmcABAxmaXJzdFBheW1lbnQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQNc2Vjb25kUGF5bWVudAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwABBAx0aGlyZFBheW1lbnQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAgQMZmlyc3RBc3NldElkCQDYBAEJAQV2YWx1ZQEIBQxmaXJzdFBheW1lbnQHYXNzZXRJZAQNc2Vjb25kQXNzZXRJZAkA2AQBCQEFdmFsdWUBCAUNc2Vjb25kUGF5bWVudAdhc3NldElkBAx0aGlyZEFzc2V0SWQJAQV2YWx1ZQEIBQx0aGlyZFBheW1lbnQHYXNzZXRJZAMDCQECIT0CCAUMZmlyc3RQYXltZW50BmFtb3VudAABBgkBAiE9AggFDXNlY29uZFBheW1lbnQGYW1vdW50AAEJAAIBAhNORlQgaXMgbm90IGF0dGFjaGVkAwkBAiE9AgUMdGhpcmRBc3NldElkCQENZ2V0RWdnQXNzZXRJZAAJAAIBAhpCU0RCOiB3cm9uZyBwYXltZW50IGFkZGVkIQMJAQIhPQIIBQx0aGlyZFBheW1lbnQGYW1vdW50CQEQZ2V0RHVja2xpbmdQcmljZQAJAAIBAh9CU0RCOiBub3QgZW5vdWdoIHBheW1lbnQgYWRkZWQhBAljaGlsZHJlbjEJAQVhc0ludAEJAPwHBAUEdGhpcwIWdmFsaWRhdGVBbmRHZXRDaGlsZHJlbgkAzAgCBQxmaXJzdEFzc2V0SWQFA25pbAUDbmlsAwkAAAIFCWNoaWxkcmVuMQUJY2hpbGRyZW4xBAljaGlsZHJlbjIJAQVhc0ludAEJAPwHBAUEdGhpcwIWdmFsaWRhdGVBbmRHZXRDaGlsZHJlbgkAzAgCBQ1zZWNvbmRBc3NldElkBQNuaWwFA25pbAMJAAACBQljaGlsZHJlbjIFCWNoaWxkcmVuMgMDCQBmAgUJY2hpbGRyZW4xAAAGCQBmAgUJY2hpbGRyZW4yAAAJAAIBAjxPbmUgZHVjayBjYW4gYmUgdXNlZCBmb3IgYnJlZWRpbmcgb25seSBvbmNlIGluIGl0cyBsaWZldGltZS4EDWJyZWVkZWRTdGF0dXMJAQxjYW5CZUJyZWVkZWQCCQDZBAEFDGZpcnN0QXNzZXRJZAkA2QQBBQ1zZWNvbmRBc3NldElkAwkBAiE9AgUNYnJlZWRlZFN0YXR1cwIEdHJ1ZQkAAgEJAKwCAgIfVGhlc2UgZHVja3MgY2Fubm90IGJlIGJyZWVkZWQ6IAUNYnJlZWRlZFN0YXR1cwQLZHVja2xpbmdHZW4JAQhhc1N0cmluZwEJAPwHBAkBGmdldEJhYnlEdWNrQnJlZWRpbmdBZGRyZXNzAAINaXNzdWVEdWNrbGluZwkAzAgCCQClCAEIBQFpBmNhbGxlcgkAzAgCCQDYBAEIBQFpDXRyYW5zYWN0aW9uSWQFA25pbAUDbmlsAwkAAAIFC2R1Y2tsaW5nR2VuBQtkdWNrbGluZ0dlbgkAzAgCCQELU3RyaW5nRW50cnkCCQEQZ2V0RHVja1BhcmVudEtleQIIBQFpDXRyYW5zYWN0aW9uSWQAAQUMZmlyc3RBc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJARBnZXREdWNrUGFyZW50S2V5AggFAWkNdHJhbnNhY3Rpb25JZAACBQ1zZWNvbmRBc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJARNnZXRQcm9jZXNzU3RhdHVzS2V5AgkApQgBCAUBaQZjYWxsZXIIBQFpDXRyYW5zYWN0aW9uSWQFD0hhdGNoaW5nU3RhcnRlZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGWdldFByb2Nlc3NGaW5pc2hIZWlnaHRLZXkCCQClCAEIBQFpBmNhbGxlcggFAWkNdHJhbnNhY3Rpb25JZAkAZAIFBmhlaWdodAUQZGVsYXlGb3JIYXRjaGluZwkAzAgCCQELU3RyaW5nRW50cnkCCQEOZ2V0RHVja2xpbmdLZXkCCQClCAEIBQFpBmNhbGxlcggFAWkNdHJhbnNhY3Rpb25JZAULZHVja2xpbmdHZW4JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgZhc3NldF8FDGZpcnN0QXNzZXRJZAIJX2NoaWxkcmVuAAEJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgZhc3NldF8FDXNlY29uZEFzc2V0SWQCCV9jaGlsZHJlbgABCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABCQEFdmFsdWUBCAUMZmlyc3RQYXltZW50B2Fzc2V0SWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEJAQV2YWx1ZQEIBQ1zZWNvbmRQYXltZW50B2Fzc2V0SWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARdmaW5pc2hEdWNrSGF0Y2hpbmdJdGVtcwIHdHhJZFN0cg9kdWNrR2VuZXNTdHJpbmcDAwkBAiE9AggFAWkGY2FsbGVyCQEPZ2V0SXRlbXNBZGRyZXNzAAkBAiE9AgUPZHVja0dlbmVzU3RyaW5nAgAHCQACAQIhT25seSBpdGVtcyBjYW4gY3JlYXRlIGZpeGVkIGdlbmVzBAVvd25lcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEDmR1Y2tsaW5nRmluaXNoCQEIYXNTdHJpbmcBCQD8BwQJARpnZXRCYWJ5RHVja0JyZWVkaW5nQWRkcmVzcwACFHR1cm5EdWNrbGluZ0ludG9EdWNrBQNuaWwIBQFpCHBheW1lbnRzAwkAAAIFDmR1Y2tsaW5nRmluaXNoBQ5kdWNrbGluZ0ZpbmlzaAQOZHVja2xpbmdMaW5rZWQJAQx0cnlHZXRTdHJpbmcBCQEOZ2V0RHVja2xpbmdLZXkCBQVvd25lcgkA2QQBBQd0eElkU3RyAwkBAiE9AgUOZHVja2xpbmdMaW5rZWQFDmR1Y2tsaW5nRmluaXNoCQACAQIjUGxlYXNlIGF0dGFjaCB0aGUgY29ycmVjdCBkdWNrbGluZyEJAQ9maW5pc2hEdWNrSGF0Y2gDBQd0eElkU3RyBQVvd25lcgUPZHVja0dlbmVzU3RyaW5nCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBEmZpbmlzaER1Y2tIYXRjaGluZwEHdHhJZFN0cgQFb3duZXIJAKUIAQgFAWkGY2FsbGVyBA5kdWNrbGluZ0ZpbmlzaAkBCGFzU3RyaW5nAQkA/AcECQEaZ2V0QmFieUR1Y2tCcmVlZGluZ0FkZHJlc3MAAhR0dXJuRHVja2xpbmdJbnRvRHVjawUDbmlsCAUBaQhwYXltZW50cwMJAAACBQ5kdWNrbGluZ0ZpbmlzaAUOZHVja2xpbmdGaW5pc2gEDmR1Y2tsaW5nTGlua2VkCQEMdHJ5R2V0U3RyaW5nAQkBDmdldER1Y2tsaW5nS2V5AgUFb3duZXIJANkEAQUHdHhJZFN0cgMJAQIhPQIFDmR1Y2tsaW5nTGlua2VkBQ5kdWNrbGluZ0ZpbmlzaAkAAgECI1BsZWFzZSBhdHRhY2ggdGhlIGNvcnJlY3QgZHVja2xpbmchCQEPZmluaXNoRHVja0hhdGNoAwUHdHhJZFN0cgUFb3duZXICAAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARdmaW5pc2hEdWNrSGF0Y2hpbmdBZG1pbgIHdHhJZFN0cgVvd25lcgMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECH0JGREg6IE9ubHkgYWRtaW5zIGNhbiBydW4gdGhpcyEJAQ9maW5pc2hEdWNrSGF0Y2gDBQd0eElkU3RyBQVvd25lcgIAAWkBDHJlZHVjZVJhcml0eQIHYXNzZXRJZAdmYXJtR2VuBAVhc3NldAkA2QQBBQdhc3NldElkAwMDCQECIT0CCAUBaQZjYWxsZXIJAQ9nZXRJdGVtc0FkZHJlc3MACQECIT0CCAUBaQZjYWxsZXIJARFnZXRSZWJpcnRoQWRkcmVzcwAHCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMHCQACAQIcYWRtaW4sIGl0ZW1zIG9yIHJlYmlydGggb25seQQHZHVja0dlbggJAQV2YWx1ZQEJAOwHAQUFYXNzZXQEbmFtZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBD2dldER1Y2tTdGF0c0tleQEFB2R1Y2tHZW4JAGUCCQENdHJ5R2V0SW50ZWdlcgEJAQ9nZXREdWNrU3RhdHNLZXkBBQdkdWNrR2VuAAEJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgZzdGF0c18FB2Zhcm1HZW4CCV9xdWFudGl0eQkAZQIJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICBnN0YXRzXwUHZmFybUdlbgIJX3F1YW50aXR5AAEFA25pbADS5v45",
    "height": 3243592,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 4jeWmArZCBTVC6uKRmPSWda2yXxurpfKJxauYssXnPE1
Next: 2mCFut6EJa2ja5LtdA1NriPdeEHnKu8EJsLmiyTDGYp1

Diff: 
Old New Differences
262 262                          let assetId = calculateAssetId(asset)
263 263                          let parent1Id = tryGetString(getDuckParentKey(txId, 1))
264 264                          let parent2Id = tryGetString(getDuckParentKey(txId, 2))
265 -                         (composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [StringEntry(processStatusKey, HatchingFinished), IntegerEntry((("asset_" + parent1Id) + "_children"), 1), IntegerEntry((("asset_" + parent2Id) + "_children"), 1), ScriptTransfer(addressFromStringValue(owner), 1, assetId), ScriptTransfer(addressFromStringValue(owner), 1, fromBase58String(parent1Id)), ScriptTransfer(addressFromStringValue(owner), 1, fromBase58String(parent2Id))])
265 +                         (composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [StringEntry(processStatusKey, HatchingFinished), ScriptTransfer(addressFromStringValue(owner), 1, assetId)])
266 266                          }
267 267                      else throw("Strict value is not equal to itself.")
268 268                  }
524 524                                              else {
525 525                                                  let ducklingGen = asString(invoke(getBabyDuckBreedingAddress(), "issueDuckling", [toString(i.caller), toBase58String(i.transactionId)], nil))
526 526                                                  if ((ducklingGen == ducklingGen))
527 -                                                     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)]
527 +                                                     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))]
528 528                                                      else throw("Strict value is not equal to itself.")
529 529                                                  }
530 530                                          }
Full: 
Old New Differences
1 1  {-# STDLIB_VERSION 6 #-}
2 2  {-# SCRIPT_TYPE ACCOUNT #-}
3 3  {-# CONTENT_TYPE DAPP #-}
4 4  let delayForHatching = 2
5 5  
6 6  let HatchingStarted = "BREEDING_STARTED"
7 7  
8 8  let HatchingFinished = "BREEDING_FINISHED"
9 9  
10 10  func tryGetStringExternal (address,key) = match getString(address, key) {
11 11      case a: String => 
12 12          a
13 13      case _ => 
14 14          ""
15 15  }
16 16  
17 17  
18 18  func tryGetIntegerExternal (address,key) = match getInteger(address, key) {
19 19      case b: Int => 
20 20          b
21 21      case _ => 
22 22          0
23 23  }
24 24  
25 25  
26 26  func tryGetString (key) = tryGetStringExternal(this, key)
27 27  
28 28  
29 29  func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
30 30  
31 31  
32 32  func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_incubatorAddress")))
33 33  
34 34  
35 35  func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))
36 36  
37 37  
38 38  func getItemsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_itemsAddress")))
39 39  
40 40  
41 41  func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), "static_eggAssetId"))
42 42  
43 43  
44 44  func getBabyDuckBreedingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_babyDuckBreedingAddress")))
45 45  
46 46  
47 47  func getDucklingPrice () = tryGetIntegerExternal(getOracle(), "static_ducklingPrice")
48 48  
49 49  
50 50  let MaxGeneration = 7
51 51  
52 52  let Generations = ["G", "H", "I", "K", "L", "M", "N", "O"]
53 53  
54 54  func getProcessStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
55 55  
56 56  
57 57  func getDucklingKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_duckling")
58 58  
59 59  
60 60  func getProcessFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
61 61  
62 62  
63 63  func getDuckParentKey (txId,parentNum) = ((("inittx_" + toBase58String(txId)) + "_parent") + toString(parentNum))
64 64  
65 65  
66 66  func getDuckIdKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_di")
67 67  
68 68  
69 69  func getDuckStatsKey (genString) = (("stats_" + genString) + "_amount")
70 70  
71 71  
72 72  func tryGetInteger (key) = {
73 73      let val =     match getInteger(this, key) {
74 74          case b: Int => 
75 75              b
76 76          case _ => 
77 77              0
78 78      }
79 79      val
80 80      }
81 81  
82 82  
83 83  func determineGeneration (g1,g2) = {
84 84      let gIndex = max([value(indexOf(Generations, g1)), value(indexOf(Generations, g2))])
85 85  Generations[(gIndex + 1)]
86 86      }
87 87  
88 88  
89 89  func getRandomNumber (variants,txId,hatchingFinishHeight,offset) = {
90 90      let randomSeedBlock = value(blockInfoByHeight((hatchingFinishHeight - 1)))
91 91      let randomHash = sha256_16Kb((txId + value(randomSeedBlock.vrf)))
92 92      (toInt(randomHash, offset) % variants)
93 93      }
94 94  
95 95  
96 96  func getRandomGen (gen1,gen2,step,txId,hatchingFinishHeight,geneFromParent,genePostion,specifiqueGene,specifiqueGenePosition) = if (if ((geneFromParent != 0))
97 97      then (genePostion == step)
98 98      else false)
99 99      then if ((geneFromParent == 1))
100 100          then gen1
101 101          else if ((geneFromParent == 2))
102 102              then gen2
103 103              else throw("Parent either needs to be 1 or 2")
104 104      else if (if ((specifiqueGene != ""))
105 105          then (specifiqueGenePosition == step)
106 106          else false)
107 107          then specifiqueGene
108 108          else {
109 109              let randomNum = getRandomNumber(2, txId, hatchingFinishHeight, step)
110 110              let gen = if ((randomNum == 0))
111 111                  then gen1
112 112                  else gen2
113 113              gen
114 114              }
115 115  
116 116  
117 117  func checkAssetInIncubator (assetId) = {
118 118      let result =     match getString(getIncubatorAddress(), assetId) {
119 119          case b: String => 
120 120              true
121 121          case _ => 
122 122              false
123 123      }
124 124      let result2 =     match getString(this, assetId) {
125 125          case c: String => 
126 126              true
127 127          case _ => 
128 128              false
129 129      }
130 130      if (result)
131 131          then true
132 132          else result2
133 133      }
134 134  
135 135  
136 136  func canBeBreeded (asset1Id,asset2Id) = {
137 137      let asset1Gen = split(value(assetInfo(asset1Id)).name, "")
138 138      let asset2Gen = split(value(assetInfo(asset2Id)).name, "")
139 139      if ((value(indexOf(Generations, asset1Gen[14])) >= MaxGeneration))
140 140          then (("you can only breed ducks with generation " + Generations[MaxGeneration]) + " and lower")
141 141          else if ((value(indexOf(Generations, asset2Gen[14])) >= MaxGeneration))
142 142              then (("you can only breed ducks with generation " + Generations[MaxGeneration]) + " and lower")
143 143              else "true"
144 144      }
145 145  
146 146  
147 147  func isSymbolA (accumulated,sym) = if ((sym == "A"))
148 148      then (accumulated + 1)
149 149      else (accumulated + 0)
150 150  
151 151  
152 152  func isSymbolB (accumulated,sym) = if ((sym == "B"))
153 153      then (accumulated + 1)
154 154      else (accumulated + 0)
155 155  
156 156  
157 157  func isSymbolC (accumulated,sym) = if ((sym == "C"))
158 158      then (accumulated + 1)
159 159      else (accumulated + 0)
160 160  
161 161  
162 162  func isSymbolD (accumulated,sym) = if ((sym == "D"))
163 163      then (accumulated + 1)
164 164      else (accumulated + 0)
165 165  
166 166  
167 167  func isSymbolE (accumulated,sym) = if ((sym == "E"))
168 168      then (accumulated + 1)
169 169      else (accumulated + 0)
170 170  
171 171  
172 172  func isSymbolF (accumulated,sym) = if ((sym == "F"))
173 173      then (accumulated + 1)
174 174      else (accumulated + 0)
175 175  
176 176  
177 177  func isSymbolG (accumulated,sym) = if ((sym == "G"))
178 178      then (accumulated + 1)
179 179      else (accumulated + 0)
180 180  
181 181  
182 182  func isSymbolH (accumulated,sym) = if ((sym == "H"))
183 183      then (accumulated + 1)
184 184      else (accumulated + 0)
185 185  
186 186  
187 187  func isSymbolI (accumulated,sym) = if ((sym == "I"))
188 188      then (accumulated + 1)
189 189      else (accumulated + 0)
190 190  
191 191  
192 192  func isSymbolK (accumulated,sym) = if ((sym == "K"))
193 193      then (accumulated + 1)
194 194      else (accumulated + 0)
195 195  
196 196  
197 197  func isSymbolS (accumulated,sym) = if ((sym == "S"))
198 198      then (accumulated + 1)
199 199      else (accumulated + 0)
200 200  
201 201  
202 202  func isSymbolT (accumulated,sym) = if ((sym == "T"))
203 203      then (accumulated + 1)
204 204      else (accumulated + 0)
205 205  
206 206  
207 207  func getAmountOrClear (amount) = if (contains(amount, "0"))
208 208      then ""
209 209      else amount
210 210  
211 211  
212 212  func asString (value) = match value {
213 213      case string: String => 
214 214          string
215 215      case _ => 
216 216          throw("wrong type, expected: String")
217 217  }
218 218  
219 219  
220 220  func asInt (value) = match value {
221 221      case int: Int => 
222 222          int
223 223      case _ => 
224 224          throw("wrong type, expected: Int")
225 225  }
226 226  
227 227  
228 228  func composeGenericData (duckGen,duckIdKey,assetId,asset) = {
229 229      let farmGen = asString(invoke(this, "getGenFromName", [duckGen], nil))
230 230      if ((farmGen == farmGen))
231 231          then {
232 232              let amount = tryGetInteger(getDuckStatsKey(duckGen))
233 233              let quantity = tryGetInteger((("stats_" + farmGen) + "_quantity"))
234 234  [StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), (amount + 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (quantity + 1)), asset]
235 235              }
236 236          else throw("Strict value is not equal to itself.")
237 237      }
238 238  
239 239  
240 240  func finishDuckHatch (txIdStr,owner,duckGenesString) = {
241 241      let txId = fromBase58String(txIdStr)
242 242      let processStatusKey = getProcessStatusKey(owner, txId)
243 243      let duckIdKey = getDuckIdKey(owner, txId)
244 244      let processTxStatus = getStringValue(this, processStatusKey)
245 245      let finishHeightKey = getProcessFinishHeightKey(owner, txId)
246 246      let processFinishHeight = getIntegerValue(this, finishHeightKey)
247 247      if ((processTxStatus == HatchingFinished))
248 248          then {
249 249              let duckId = getStringValue(this, getDuckIdKey(owner, txId))
250 250              throw(("The duck was breeded and claimed already, here is the folowing: " + duckId))
251 251              }
252 252          else if ((processFinishHeight > height))
253 253              then throw((((("Breeding is not finished yet " + toString((processFinishHeight - height))) + " blocks remaining, it will take around ") + toString((processFinishHeight - height))) + " minutes"))
254 254              else {
255 255                  let duckGen = if ((duckGenesString == ""))
256 256                      then asString(invoke(this, "generateDuck", [txId, processFinishHeight, 0, 0, "", 0], nil))
257 257                      else duckGenesString
258 258                  if ((duckGen == duckGen))
259 259                      then {
260 260                          let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
261 261                          let asset = Issue(duckGen, description, 1, 0, false, unit, processFinishHeight)
262 262                          let assetId = calculateAssetId(asset)
263 263                          let parent1Id = tryGetString(getDuckParentKey(txId, 1))
264 264                          let parent2Id = tryGetString(getDuckParentKey(txId, 2))
265 -                         (composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [StringEntry(processStatusKey, HatchingFinished), IntegerEntry((("asset_" + parent1Id) + "_children"), 1), IntegerEntry((("asset_" + parent2Id) + "_children"), 1), ScriptTransfer(addressFromStringValue(owner), 1, assetId), ScriptTransfer(addressFromStringValue(owner), 1, fromBase58String(parent1Id)), ScriptTransfer(addressFromStringValue(owner), 1, fromBase58String(parent2Id))])
265 +                         (composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [StringEntry(processStatusKey, HatchingFinished), ScriptTransfer(addressFromStringValue(owner), 1, assetId)])
266 266                          }
267 267                      else throw("Strict value is not equal to itself.")
268 268                  }
269 269      }
270 270  
271 271  
272 272  @Callable(i)
273 273  func configureOracle (oracle) = if ((i.caller != this))
274 274      then throw("admin only")
275 275      else [StringEntry("static_oracleAddress", oracle)]
276 276  
277 277  
278 278  
279 279  @Callable(i)
280 280  func generateDuck (txId,hatchingFinishHeight,geneFromParent,genePostion,specifiqueGene,specifiqueGenePosition) = {
281 281      let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 11)
282 282      let color = if ((colorRandom == 0))
283 283          then "Y"
284 284          else if ((colorRandom == 1))
285 285              then "G"
286 286              else if ((colorRandom == 2))
287 287                  then "B"
288 288                  else "R"
289 289      let parent1Id = fromBase58String(tryGetString(getDuckParentKey(txId, 1)))
290 290      let parent2Id = fromBase58String(tryGetString(getDuckParentKey(txId, 2)))
291 291      let parent1Gen = split(value(assetInfo(parent1Id)).name, "")
292 292      let parent2Gen = split(value(assetInfo(parent2Id)).name, "")
293 293      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)
294 294      $Tuple2(nil, gen)
295 295      }
296 296  
297 297  
298 298  
299 299  @Callable(i)
300 300  func getGenFromName (assetName) = {
301 301      let genotype = split(dropRight(drop(assetName, 5), 3), "")
302 302      let generation = split(assetName, "")[14]
303 303      let gen = (((((((((((((getAmountOrClear((toString({
304 304          let $l = genotype
305 305          let $s = size($l)
306 306          let $acc0 = 0
307 307          func $f0_1 ($a,$i) =         if (($i >= $s))
308 308              then $a
309 309              else isSymbolA($a, $l[$i])
310 310  
311 311          func $f0_2 ($a,$i) =         if (($i >= $s))
312 312              then $a
313 313              else throw("List size exceeds 8")
314 314  
315 315          $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)
316 316          }) + "A")) + getAmountOrClear((toString({
317 317          let $l = genotype
318 318          let $s = size($l)
319 319          let $acc0 = 0
320 320          func $f1_1 ($a,$i) =         if (($i >= $s))
321 321              then $a
322 322              else isSymbolB($a, $l[$i])
323 323  
324 324          func $f1_2 ($a,$i) =         if (($i >= $s))
325 325              then $a
326 326              else throw("List size exceeds 8")
327 327  
328 328          $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)
329 329          }) + "B"))) + getAmountOrClear((toString({
330 330          let $l = genotype
331 331          let $s = size($l)
332 332          let $acc0 = 0
333 333          func $f2_1 ($a,$i) =         if (($i >= $s))
334 334              then $a
335 335              else isSymbolC($a, $l[$i])
336 336  
337 337          func $f2_2 ($a,$i) =         if (($i >= $s))
338 338              then $a
339 339              else throw("List size exceeds 8")
340 340  
341 341          $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)
342 342          }) + "C"))) + getAmountOrClear((toString({
343 343          let $l = genotype
344 344          let $s = size($l)
345 345          let $acc0 = 0
346 346          func $f3_1 ($a,$i) =         if (($i >= $s))
347 347              then $a
348 348              else isSymbolD($a, $l[$i])
349 349  
350 350          func $f3_2 ($a,$i) =         if (($i >= $s))
351 351              then $a
352 352              else throw("List size exceeds 8")
353 353  
354 354          $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)
355 355          }) + "D"))) + getAmountOrClear((toString({
356 356          let $l = genotype
357 357          let $s = size($l)
358 358          let $acc0 = 0
359 359          func $f4_1 ($a,$i) =         if (($i >= $s))
360 360              then $a
361 361              else isSymbolE($a, $l[$i])
362 362  
363 363          func $f4_2 ($a,$i) =         if (($i >= $s))
364 364              then $a
365 365              else throw("List size exceeds 8")
366 366  
367 367          $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)
368 368          }) + "E"))) + getAmountOrClear((toString({
369 369          let $l = genotype
370 370          let $s = size($l)
371 371          let $acc0 = 0
372 372          func $f5_1 ($a,$i) =         if (($i >= $s))
373 373              then $a
374 374              else isSymbolF($a, $l[$i])
375 375  
376 376          func $f5_2 ($a,$i) =         if (($i >= $s))
377 377              then $a
378 378              else throw("List size exceeds 8")
379 379  
380 380          $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)
381 381          }) + "F"))) + getAmountOrClear((toString({
382 382          let $l = genotype
383 383          let $s = size($l)
384 384          let $acc0 = 0
385 385          func $f6_1 ($a,$i) =         if (($i >= $s))
386 386              then $a
387 387              else isSymbolG($a, $l[$i])
388 388  
389 389          func $f6_2 ($a,$i) =         if (($i >= $s))
390 390              then $a
391 391              else throw("List size exceeds 8")
392 392  
393 393          $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)
394 394          }) + "G"))) + getAmountOrClear((toString({
395 395          let $l = genotype
396 396          let $s = size($l)
397 397          let $acc0 = 0
398 398          func $f7_1 ($a,$i) =         if (($i >= $s))
399 399              then $a
400 400              else isSymbolH($a, $l[$i])
401 401  
402 402          func $f7_2 ($a,$i) =         if (($i >= $s))
403 403              then $a
404 404              else throw("List size exceeds 8")
405 405  
406 406          $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)
407 407          }) + "H"))) + getAmountOrClear((toString({
408 408          let $l = genotype
409 409          let $s = size($l)
410 410          let $acc0 = 0
411 411          func $f8_1 ($a,$i) =         if (($i >= $s))
412 412              then $a
413 413              else isSymbolI($a, $l[$i])
414 414  
415 415          func $f8_2 ($a,$i) =         if (($i >= $s))
416 416              then $a
417 417              else throw("List size exceeds 8")
418 418  
419 419          $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)
420 420          }) + "I"))) + getAmountOrClear((toString({
421 421          let $l = genotype
422 422          let $s = size($l)
423 423          let $acc0 = 0
424 424          func $f9_1 ($a,$i) =         if (($i >= $s))
425 425              then $a
426 426              else isSymbolK($a, $l[$i])
427 427  
428 428          func $f9_2 ($a,$i) =         if (($i >= $s))
429 429              then $a
430 430              else throw("List size exceeds 8")
431 431  
432 432          $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)
433 433          }) + "K"))) + getAmountOrClear((toString({
434 434          let $l = genotype
435 435          let $s = size($l)
436 436          let $acc0 = 0
437 437          func $f10_1 ($a,$i) =         if (($i >= $s))
438 438              then $a
439 439              else isSymbolS($a, $l[$i])
440 440  
441 441          func $f10_2 ($a,$i) =         if (($i >= $s))
442 442              then $a
443 443              else throw("List size exceeds 8")
444 444  
445 445          $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)
446 446          }) + "S"))) + getAmountOrClear((toString({
447 447          let $l = genotype
448 448          let $s = size($l)
449 449          let $acc0 = 0
450 450          func $f11_1 ($a,$i) =         if (($i >= $s))
451 451              then $a
452 452              else isSymbolT($a, $l[$i])
453 453  
454 454          func $f11_2 ($a,$i) =         if (($i >= $s))
455 455              then $a
456 456              else throw("List size exceeds 8")
457 457  
458 458          $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)
459 459          }) + "T"))) + "-") + generation)
460 460      $Tuple2(nil, gen)
461 461      }
462 462  
463 463  
464 464  
465 465  @Callable(i)
466 466  func validateAndGetChildren (assetId) = if (!(checkAssetInIncubator(assetId)))
467 467      then throw((("You need to attach a valid NFT-duck. " + assetId) + " is invalid!"))
468 468      else {
469 469          let children = tryGetInteger((("asset_" + assetId) + "_children"))
470 470          $Tuple2(nil, children)
471 471          }
472 472  
473 473  
474 474  
475 475  @Callable(i)
476 476  func createDuckSpecialGenes (address,duckGen,children) = if (if ((i.caller != getItemsAddress()))
477 477      then (i.caller != this)
478 478      else false)
479 479      then throw("admin or items only")
480 480      else {
481 481          let txId = i.transactionId
482 482          let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
483 483          let asset = Issue(duckGen, description, 1, 0, false)
484 484          let assetId = calculateAssetId(asset)
485 485          let duckIdKey = getDuckIdKey(toString(i.caller), txId)
486 486          let farmGen = asString(invoke(this, "getGenFromName", [duckGen], nil))
487 487          if ((farmGen == farmGen))
488 488              then (composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [IntegerEntry((("asset_" + toBase58String(assetId)) + "_children"), children), ScriptTransfer(Address(address), 1, assetId)])
489 489              else throw("Strict value is not equal to itself.")
490 490          }
491 491  
492 492  
493 493  
494 494  @Callable(i)
495 495  func startDuckBreeding () = {
496 496      let firstPayment = value(i.payments[0])
497 497      let secondPayment = value(i.payments[1])
498 498      let thirdPayment = value(i.payments[2])
499 499      let firstAssetId = toBase58String(value(firstPayment.assetId))
500 500      let secondAssetId = toBase58String(value(secondPayment.assetId))
501 501      let thirdAssetId = value(thirdPayment.assetId)
502 502      if (if ((firstPayment.amount != 1))
503 503          then true
504 504          else (secondPayment.amount != 1))
505 505          then throw("NFT is not attached")
506 506          else if ((thirdAssetId != getEggAssetId()))
507 507              then throw("BSDB: wrong payment added!")
508 508              else if ((thirdPayment.amount != getDucklingPrice()))
509 509                  then throw("BSDB: not enough payment added!")
510 510                  else {
511 511                      let children1 = asInt(invoke(this, "validateAndGetChildren", [firstAssetId], nil))
512 512                      if ((children1 == children1))
513 513                          then {
514 514                              let children2 = asInt(invoke(this, "validateAndGetChildren", [secondAssetId], nil))
515 515                              if ((children2 == children2))
516 516                                  then if (if ((children1 > 0))
517 517                                      then true
518 518                                      else (children2 > 0))
519 519                                      then throw("One duck can be used for breeding only once in its lifetime.")
520 520                                      else {
521 521                                          let breededStatus = canBeBreeded(fromBase58String(firstAssetId), fromBase58String(secondAssetId))
522 522                                          if ((breededStatus != "true"))
523 523                                              then throw(("These ducks cannot be breeded: " + breededStatus))
524 524                                              else {
525 525                                                  let ducklingGen = asString(invoke(getBabyDuckBreedingAddress(), "issueDuckling", [toString(i.caller), toBase58String(i.transactionId)], nil))
526 526                                                  if ((ducklingGen == ducklingGen))
527 -                                                     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)]
527 +                                                     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))]
528 528                                                      else throw("Strict value is not equal to itself.")
529 529                                                  }
530 530                                          }
531 531                                  else throw("Strict value is not equal to itself.")
532 532                              }
533 533                          else throw("Strict value is not equal to itself.")
534 534                      }
535 535      }
536 536  
537 537  
538 538  
539 539  @Callable(i)
540 540  func finishDuckHatchingItems (txIdStr,duckGenesString) = if (if ((i.caller != getItemsAddress()))
541 541      then (duckGenesString != "")
542 542      else false)
543 543      then throw("Only items can create fixed genes")
544 544      else {
545 545          let owner = toString(i.originCaller)
546 546          let ducklingFinish = asString(invoke(getBabyDuckBreedingAddress(), "turnDucklingIntoDuck", nil, i.payments))
547 547          if ((ducklingFinish == ducklingFinish))
548 548              then {
549 549                  let ducklingLinked = tryGetString(getDucklingKey(owner, fromBase58String(txIdStr)))
550 550                  if ((ducklingLinked != ducklingFinish))
551 551                      then throw("Please attach the correct duckling!")
552 552                      else finishDuckHatch(txIdStr, owner, duckGenesString)
553 553                  }
554 554              else throw("Strict value is not equal to itself.")
555 555          }
556 556  
557 557  
558 558  
559 559  @Callable(i)
560 560  func finishDuckHatching (txIdStr) = {
561 561      let owner = toString(i.caller)
562 562      let ducklingFinish = asString(invoke(getBabyDuckBreedingAddress(), "turnDucklingIntoDuck", nil, i.payments))
563 563      if ((ducklingFinish == ducklingFinish))
564 564          then {
565 565              let ducklingLinked = tryGetString(getDucklingKey(owner, fromBase58String(txIdStr)))
566 566              if ((ducklingLinked != ducklingFinish))
567 567                  then throw("Please attach the correct duckling!")
568 568                  else finishDuckHatch(txIdStr, owner, "")
569 569              }
570 570          else throw("Strict value is not equal to itself.")
571 571      }
572 572  
573 573  
574 574  
575 575  @Callable(i)
576 576  func finishDuckHatchingAdmin (txIdStr,owner) = if ((i.caller != this))
577 577      then throw("BFDH: Only admins can run this!")
578 578      else finishDuckHatch(txIdStr, owner, "")
579 579  
580 580  
581 581  
582 582  @Callable(i)
583 583  func reduceRarity (assetId,farmGen) = {
584 584      let asset = fromBase58String(assetId)
585 585      if (if (if ((i.caller != getItemsAddress()))
586 586          then (i.caller != getRebirthAddress())
587 587          else false)
588 588          then (i.caller != this)
589 589          else false)
590 590          then throw("admin, items or rebirth only")
591 591          else {
592 592              let duckGen = value(assetInfo(asset)).name
593 593  [IntegerEntry(getDuckStatsKey(duckGen), (tryGetInteger(getDuckStatsKey(duckGen)) - 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) - 1))]
594 594              }
595 595      }
596 596  
597 597

Old	New		Differences
262	262		let assetId = calculateAssetId(asset)
263	263		let parent1Id = tryGetString(getDuckParentKey(txId, 1))
264	264		let parent2Id = tryGetString(getDuckParentKey(txId, 2))
265		-	(composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [StringEntry(processStatusKey, HatchingFinished), ~~IntegerEntry((("asset_" + parent1Id) + "_children"), 1), IntegerEntry((("asset_" + parent2Id) + "_children"), 1),~~ ScriptTransfer(addressFromStringValue(owner), 1, assetId)~~, ScriptTransfer(addressFromStringValue(owner), 1, fromBase58String(parent1Id)), ScriptTransfer(addressFromStringValue(owner), 1, fromBase58String(parent2Id))~~])
	265	+	(composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [StringEntry(processStatusKey, HatchingFinished), ScriptTransfer(addressFromStringValue(owner), 1, assetId)])
266	266		}
267	267		else throw("Strict value is not equal to itself.")
268	268		}

524	524		else {
525	525		let ducklingGen = asString(invoke(getBabyDuckBreedingAddress(), "issueDuckling", [toString(i.caller), toBase58String(i.transactionId)], nil))
526	526		if ((ducklingGen == ducklingGen))
527		-	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)]
	527	+	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))]
528	528		else throw("Strict value is not equal to itself.")
529	529		}
530	530		}

Old	New		Differences
1	1		{-# STDLIB_VERSION 6 #-}
2	2		{-# SCRIPT_TYPE ACCOUNT #-}
3	3		{-# CONTENT_TYPE DAPP #-}
4	4		let delayForHatching = 2
5	5
6	6		let HatchingStarted = "BREEDING_STARTED"
7	7
8	8		let HatchingFinished = "BREEDING_FINISHED"
9	9
10	10		func tryGetStringExternal (address,key) = match getString(address, key) {
11	11		case a: String =>
12	12		a
13	13		case _ =>
14	14		""
15	15		}
16	16
17	17
18	18		func tryGetIntegerExternal (address,key) = match getInteger(address, key) {
19	19		case b: Int =>
20	20		b
21	21		case _ =>
22	22		0
23	23		}
24	24
25	25
26	26		func tryGetString (key) = tryGetStringExternal(this, key)
27	27
28	28
29	29		func getOracle () = Address(fromBase58String(tryGetString("static_oracleAddress")))
30	30
31	31
32	32		func getIncubatorAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_incubatorAddress")))
33	33
34	34
35	35		func getRebirthAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_rebirthAddress")))
36	36
37	37
38	38		func getItemsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_itemsAddress")))
39	39
40	40
41	41		func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), "static_eggAssetId"))
42	42
43	43
44	44		func getBabyDuckBreedingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_babyDuckBreedingAddress")))
45	45
46	46
47	47		func getDucklingPrice () = tryGetIntegerExternal(getOracle(), "static_ducklingPrice")
48	48
49	49
50	50		let MaxGeneration = 7
51	51
52	52		let Generations = ["G", "H", "I", "K", "L", "M", "N", "O"]
53	53
54	54		func getProcessStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
55	55
56	56
57	57		func getDucklingKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_duckling")
58	58
59	59
60	60		func getProcessFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
61	61
62	62
63	63		func getDuckParentKey (txId,parentNum) = ((("inittx_" + toBase58String(txId)) + "_parent") + toString(parentNum))
64	64
65	65
66	66		func getDuckIdKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_di")
67	67
68	68
69	69		func getDuckStatsKey (genString) = (("stats_" + genString) + "_amount")
70	70
71	71
72	72		func tryGetInteger (key) = {
73	73		let val = match getInteger(this, key) {
74	74		case b: Int =>
75	75		b
76	76		case _ =>
77	77		0
78	78		}
79	79		val
80	80		}
81	81
82	82
83	83		func determineGeneration (g1,g2) = {
84	84		let gIndex = max([value(indexOf(Generations, g1)), value(indexOf(Generations, g2))])
85	85		Generations[(gIndex + 1)]
86	86		}
87	87
88	88
89	89		func getRandomNumber (variants,txId,hatchingFinishHeight,offset) = {
90	90		let randomSeedBlock = value(blockInfoByHeight((hatchingFinishHeight - 1)))
91	91		let randomHash = sha256_16Kb((txId + value(randomSeedBlock.vrf)))
92	92		(toInt(randomHash, offset) % variants)
93	93		}
94	94
95	95
96	96		func getRandomGen (gen1,gen2,step,txId,hatchingFinishHeight,geneFromParent,genePostion,specifiqueGene,specifiqueGenePosition) = if (if ((geneFromParent != 0))
97	97		then (genePostion == step)
98	98		else false)
99	99		then if ((geneFromParent == 1))
100	100		then gen1
101	101		else if ((geneFromParent == 2))
102	102		then gen2
103	103		else throw("Parent either needs to be 1 or 2")
104	104		else if (if ((specifiqueGene != ""))
105	105		then (specifiqueGenePosition == step)
106	106		else false)
107	107		then specifiqueGene
108	108		else {
109	109		let randomNum = getRandomNumber(2, txId, hatchingFinishHeight, step)
110	110		let gen = if ((randomNum == 0))
111	111		then gen1
112	112		else gen2
113	113		gen
114	114		}
115	115
116	116
117	117		func checkAssetInIncubator (assetId) = {
118	118		let result = match getString(getIncubatorAddress(), assetId) {
119	119		case b: String =>
120	120		true
121	121		case _ =>
122	122		false
123	123		}
124	124		let result2 = match getString(this, assetId) {
125	125		case c: String =>
126	126		true
127	127		case _ =>
128	128		false
129	129		}
130	130		if (result)
131	131		then true
132	132		else result2
133	133		}
134	134
135	135
136	136		func canBeBreeded (asset1Id,asset2Id) = {
137	137		let asset1Gen = split(value(assetInfo(asset1Id)).name, "")
138	138		let asset2Gen = split(value(assetInfo(asset2Id)).name, "")
139	139		if ((value(indexOf(Generations, asset1Gen[14])) >= MaxGeneration))
140	140		then (("you can only breed ducks with generation " + Generations[MaxGeneration]) + " and lower")
141	141		else if ((value(indexOf(Generations, asset2Gen[14])) >= MaxGeneration))
142	142		then (("you can only breed ducks with generation " + Generations[MaxGeneration]) + " and lower")
143	143		else "true"
144	144		}
145	145
146	146
147	147		func isSymbolA (accumulated,sym) = if ((sym == "A"))
148	148		then (accumulated + 1)
149	149		else (accumulated + 0)
150	150
151	151
152	152		func isSymbolB (accumulated,sym) = if ((sym == "B"))
153	153		then (accumulated + 1)
154	154		else (accumulated + 0)
155	155
156	156
157	157		func isSymbolC (accumulated,sym) = if ((sym == "C"))
158	158		then (accumulated + 1)
159	159		else (accumulated + 0)
160	160
161	161
162	162		func isSymbolD (accumulated,sym) = if ((sym == "D"))
163	163		then (accumulated + 1)
164	164		else (accumulated + 0)
165	165
166	166
167	167		func isSymbolE (accumulated,sym) = if ((sym == "E"))
168	168		then (accumulated + 1)
169	169		else (accumulated + 0)
170	170
171	171
172	172		func isSymbolF (accumulated,sym) = if ((sym == "F"))
173	173		then (accumulated + 1)
174	174		else (accumulated + 0)
175	175
176	176
177	177		func isSymbolG (accumulated,sym) = if ((sym == "G"))
178	178		then (accumulated + 1)
179	179		else (accumulated + 0)
180	180
181	181
182	182		func isSymbolH (accumulated,sym) = if ((sym == "H"))
183	183		then (accumulated + 1)
184	184		else (accumulated + 0)
185	185
186	186
187	187		func isSymbolI (accumulated,sym) = if ((sym == "I"))
188	188		then (accumulated + 1)
189	189		else (accumulated + 0)
190	190
191	191
192	192		func isSymbolK (accumulated,sym) = if ((sym == "K"))
193	193		then (accumulated + 1)
194	194		else (accumulated + 0)
195	195
196	196
197	197		func isSymbolS (accumulated,sym) = if ((sym == "S"))
198	198		then (accumulated + 1)
199	199		else (accumulated + 0)
200	200
201	201
202	202		func isSymbolT (accumulated,sym) = if ((sym == "T"))
203	203		then (accumulated + 1)
204	204		else (accumulated + 0)
205	205
206	206
207	207		func getAmountOrClear (amount) = if (contains(amount, "0"))
208	208		then ""
209	209		else amount
210	210
211	211
212	212		func asString (value) = match value {
213	213		case string: String =>
214	214		string
215	215		case _ =>
216	216		throw("wrong type, expected: String")
217	217		}
218	218
219	219
220	220		func asInt (value) = match value {
221	221		case int: Int =>
222	222		int
223	223		case _ =>
224	224		throw("wrong type, expected: Int")
225	225		}
226	226
227	227
228	228		func composeGenericData (duckGen,duckIdKey,assetId,asset) = {
229	229		let farmGen = asString(invoke(this, "getGenFromName", [duckGen], nil))
230	230		if ((farmGen == farmGen))
231	231		then {
232	232		let amount = tryGetInteger(getDuckStatsKey(duckGen))
233	233		let quantity = tryGetInteger((("stats_" + farmGen) + "_quantity"))
234	234		[StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), (amount + 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (quantity + 1)), asset]
235	235		}
236	236		else throw("Strict value is not equal to itself.")
237	237		}
238	238
239	239
240	240		func finishDuckHatch (txIdStr,owner,duckGenesString) = {
241	241		let txId = fromBase58String(txIdStr)
242	242		let processStatusKey = getProcessStatusKey(owner, txId)
243	243		let duckIdKey = getDuckIdKey(owner, txId)
244	244		let processTxStatus = getStringValue(this, processStatusKey)
245	245		let finishHeightKey = getProcessFinishHeightKey(owner, txId)
246	246		let processFinishHeight = getIntegerValue(this, finishHeightKey)
247	247		if ((processTxStatus == HatchingFinished))
248	248		then {
249	249		let duckId = getStringValue(this, getDuckIdKey(owner, txId))
250	250		throw(("The duck was breeded and claimed already, here is the folowing: " + duckId))
251	251		}
252	252		else if ((processFinishHeight > height))
253	253		then throw((((("Breeding is not finished yet " + toString((processFinishHeight - height))) + " blocks remaining, it will take around ") + toString((processFinishHeight - height))) + " minutes"))
254	254		else {
255	255		let duckGen = if ((duckGenesString == ""))
256	256		then asString(invoke(this, "generateDuck", [txId, processFinishHeight, 0, 0, "", 0], nil))
257	257		else duckGenesString
258	258		if ((duckGen == duckGen))
259	259		then {
260	260		let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
261	261		let asset = Issue(duckGen, description, 1, 0, false, unit, processFinishHeight)
262	262		let assetId = calculateAssetId(asset)
263	263		let parent1Id = tryGetString(getDuckParentKey(txId, 1))
264	264		let parent2Id = tryGetString(getDuckParentKey(txId, 2))
265		-	(composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [StringEntry(processStatusKey, HatchingFinished), ~~IntegerEntry((("asset_" + parent1Id) + "_children"), 1), IntegerEntry((("asset_" + parent2Id) + "_children"), 1),~~ ScriptTransfer(addressFromStringValue(owner), 1, assetId)~~, ScriptTransfer(addressFromStringValue(owner), 1, fromBase58String(parent1Id)), ScriptTransfer(addressFromStringValue(owner), 1, fromBase58String(parent2Id))~~])
	265	+	(composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [StringEntry(processStatusKey, HatchingFinished), ScriptTransfer(addressFromStringValue(owner), 1, assetId)])
266	266		}
267	267		else throw("Strict value is not equal to itself.")
268	268		}
269	269		}
270	270
271	271
272	272		@Callable(i)
273	273		func configureOracle (oracle) = if ((i.caller != this))
274	274		then throw("admin only")
275	275		else [StringEntry("static_oracleAddress", oracle)]
276	276
277	277
278	278
279	279		@Callable(i)
280	280		func generateDuck (txId,hatchingFinishHeight,geneFromParent,genePostion,specifiqueGene,specifiqueGenePosition) = {
281	281		let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 11)
282	282		let color = if ((colorRandom == 0))
283	283		then "Y"
284	284		else if ((colorRandom == 1))
285	285		then "G"
286	286		else if ((colorRandom == 2))
287	287		then "B"
288	288		else "R"
289	289		let parent1Id = fromBase58String(tryGetString(getDuckParentKey(txId, 1)))
290	290		let parent2Id = fromBase58String(tryGetString(getDuckParentKey(txId, 2)))
291	291		let parent1Gen = split(value(assetInfo(parent1Id)).name, "")
292	292		let parent2Gen = split(value(assetInfo(parent2Id)).name, "")
293	293		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)
294	294		$Tuple2(nil, gen)
295	295		}
296	296
297	297
298	298
299	299		@Callable(i)
300	300		func getGenFromName (assetName) = {
301	301		let genotype = split(dropRight(drop(assetName, 5), 3), "")
302	302		let generation = split(assetName, "")[14]
303	303		let gen = (((((((((((((getAmountOrClear((toString({
304	304		let $l = genotype
305	305		let $s = size($l)
306	306		let $acc0 = 0
307	307		func $f0_1 ($a,$i) = if (($i >= $s))
308	308		then $a
309	309		else isSymbolA($a, $l[$i])
310	310
311	311		func $f0_2 ($a,$i) = if (($i >= $s))
312	312		then $a
313	313		else throw("List size exceeds 8")
314	314
315	315		$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)
316	316		}) + "A")) + getAmountOrClear((toString({
317	317		let $l = genotype
318	318		let $s = size($l)
319	319		let $acc0 = 0
320	320		func $f1_1 ($a,$i) = if (($i >= $s))
321	321		then $a
322	322		else isSymbolB($a, $l[$i])
323	323
324	324		func $f1_2 ($a,$i) = if (($i >= $s))
325	325		then $a
326	326		else throw("List size exceeds 8")
327	327
328	328		$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)
329	329		}) + "B"))) + getAmountOrClear((toString({
330	330		let $l = genotype
331	331		let $s = size($l)
332	332		let $acc0 = 0
333	333		func $f2_1 ($a,$i) = if (($i >= $s))
334	334		then $a
335	335		else isSymbolC($a, $l[$i])
336	336
337	337		func $f2_2 ($a,$i) = if (($i >= $s))
338	338		then $a
339	339		else throw("List size exceeds 8")
340	340
341	341		$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)
342	342		}) + "C"))) + getAmountOrClear((toString({
343	343		let $l = genotype
344	344		let $s = size($l)
345	345		let $acc0 = 0
346	346		func $f3_1 ($a,$i) = if (($i >= $s))
347	347		then $a
348	348		else isSymbolD($a, $l[$i])
349	349
350	350		func $f3_2 ($a,$i) = if (($i >= $s))
351	351		then $a
352	352		else throw("List size exceeds 8")
353	353
354	354		$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)
355	355		}) + "D"))) + getAmountOrClear((toString({
356	356		let $l = genotype
357	357		let $s = size($l)
358	358		let $acc0 = 0
359	359		func $f4_1 ($a,$i) = if (($i >= $s))
360	360		then $a
361	361		else isSymbolE($a, $l[$i])
362	362
363	363		func $f4_2 ($a,$i) = if (($i >= $s))
364	364		then $a
365	365		else throw("List size exceeds 8")
366	366
367	367		$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)
368	368		}) + "E"))) + getAmountOrClear((toString({
369	369		let $l = genotype
370	370		let $s = size($l)
371	371		let $acc0 = 0
372	372		func $f5_1 ($a,$i) = if (($i >= $s))
373	373		then $a
374	374		else isSymbolF($a, $l[$i])
375	375
376	376		func $f5_2 ($a,$i) = if (($i >= $s))
377	377		then $a
378	378		else throw("List size exceeds 8")
379	379
380	380		$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)
381	381		}) + "F"))) + getAmountOrClear((toString({
382	382		let $l = genotype
383	383		let $s = size($l)
384	384		let $acc0 = 0
385	385		func $f6_1 ($a,$i) = if (($i >= $s))
386	386		then $a
387	387		else isSymbolG($a, $l[$i])
388	388
389	389		func $f6_2 ($a,$i) = if (($i >= $s))
390	390		then $a
391	391		else throw("List size exceeds 8")
392	392
393	393		$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)
394	394		}) + "G"))) + getAmountOrClear((toString({
395	395		let $l = genotype
396	396		let $s = size($l)
397	397		let $acc0 = 0
398	398		func $f7_1 ($a,$i) = if (($i >= $s))
399	399		then $a
400	400		else isSymbolH($a, $l[$i])
401	401
402	402		func $f7_2 ($a,$i) = if (($i >= $s))
403	403		then $a
404	404		else throw("List size exceeds 8")
405	405
406	406		$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)
407	407		}) + "H"))) + getAmountOrClear((toString({
408	408		let $l = genotype
409	409		let $s = size($l)
410	410		let $acc0 = 0
411	411		func $f8_1 ($a,$i) = if (($i >= $s))
412	412		then $a
413	413		else isSymbolI($a, $l[$i])
414	414
415	415		func $f8_2 ($a,$i) = if (($i >= $s))
416	416		then $a
417	417		else throw("List size exceeds 8")
418	418
419	419		$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)
420	420		}) + "I"))) + getAmountOrClear((toString({
421	421		let $l = genotype
422	422		let $s = size($l)
423	423		let $acc0 = 0
424	424		func $f9_1 ($a,$i) = if (($i >= $s))
425	425		then $a
426	426		else isSymbolK($a, $l[$i])
427	427
428	428		func $f9_2 ($a,$i) = if (($i >= $s))
429	429		then $a
430	430		else throw("List size exceeds 8")
431	431
432	432		$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)
433	433		}) + "K"))) + getAmountOrClear((toString({
434	434		let $l = genotype
435	435		let $s = size($l)
436	436		let $acc0 = 0
437	437		func $f10_1 ($a,$i) = if (($i >= $s))
438	438		then $a
439	439		else isSymbolS($a, $l[$i])
440	440
441	441		func $f10_2 ($a,$i) = if (($i >= $s))
442	442		then $a
443	443		else throw("List size exceeds 8")
444	444
445	445		$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)
446	446		}) + "S"))) + getAmountOrClear((toString({
447	447		let $l = genotype
448	448		let $s = size($l)
449	449		let $acc0 = 0
450	450		func $f11_1 ($a,$i) = if (($i >= $s))
451	451		then $a
452	452		else isSymbolT($a, $l[$i])
453	453
454	454		func $f11_2 ($a,$i) = if (($i >= $s))
455	455		then $a
456	456		else throw("List size exceeds 8")
457	457
458	458		$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)
459	459		}) + "T"))) + "-") + generation)
460	460		$Tuple2(nil, gen)
461	461		}
462	462
463	463
464	464
465	465		@Callable(i)
466	466		func validateAndGetChildren (assetId) = if (!(checkAssetInIncubator(assetId)))
467	467		then throw((("You need to attach a valid NFT-duck. " + assetId) + " is invalid!"))
468	468		else {
469	469		let children = tryGetInteger((("asset_" + assetId) + "_children"))
470	470		$Tuple2(nil, children)
471	471		}
472	472
473	473
474	474
475	475		@Callable(i)
476	476		func createDuckSpecialGenes (address,duckGen,children) = if (if ((i.caller != getItemsAddress()))
477	477		then (i.caller != this)
478	478		else false)
479	479		then throw("admin or items only")
480	480		else {
481	481		let txId = i.transactionId
482	482		let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
483	483		let asset = Issue(duckGen, description, 1, 0, false)
484	484		let assetId = calculateAssetId(asset)
485	485		let duckIdKey = getDuckIdKey(toString(i.caller), txId)
486	486		let farmGen = asString(invoke(this, "getGenFromName", [duckGen], nil))
487	487		if ((farmGen == farmGen))
488	488		then (composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [IntegerEntry((("asset_" + toBase58String(assetId)) + "_children"), children), ScriptTransfer(Address(address), 1, assetId)])
489	489		else throw("Strict value is not equal to itself.")
490	490		}
491	491
492	492
493	493
494	494		@Callable(i)
495	495		func startDuckBreeding () = {
496	496		let firstPayment = value(i.payments[0])
497	497		let secondPayment = value(i.payments[1])
498	498		let thirdPayment = value(i.payments[2])
499	499		let firstAssetId = toBase58String(value(firstPayment.assetId))

github/deemru/w8io/3ef1775 
68.42 ms ◑