w8 · tx · HTg···ch5

tx · HTgDzzvBeBZjLwhBGywYGcG9LnDsRLfPkiSx43v4nch5

3P9REuLBnYBafDqtEu6hfzs2Rv2haSU158y:  -0.02400000 Waves

2023.03.25 21:58 [3571507] smart account 3P9REuLBnYBafDqtEu6hfzs2Rv2haSU158y > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "HTgDzzvBeBZjLwhBGywYGcG9LnDsRLfPkiSx43v4nch5",
    "fee": 2400000,
    "feeAssetId": null,
    "timestamp": 1679770701136,
    "version": 2,
    "chainId": 87,
    "sender": "3P9REuLBnYBafDqtEu6hfzs2Rv2haSU158y",
    "senderPublicKey": "4o7Wphn2swW4DxuPY7UcT6YpsZniEMnDH818h1pC3BeX",
    "proofs": [
        "2orXYuEoi1g9QQWK4gEN514imphjxRjnb11hKBasyUdJtwSdrfGgymaDW63Feje7twCq46oXwYaBGL3gxCPTkKRs"
    ],
    "script": "base64:BgI+CAISAwoBCBIICgYCAQEBCAESAwoBCBIDCgEIEgUKAwIIARIDCgEIEgQKAggIEgMKAQgSBAoCCAgSBAoCCAgzABBkZWxheUZvckhhdGNoaW5nAAIAD0hhdGNoaW5nU3RhcnRlZAIQQlJFRURJTkdfU1RBUlRFRAAQSGF0Y2hpbmdGaW5pc2hlZAIRQlJFRURJTkdfRklOSVNIRUQBFHRyeUdldFN0cmluZ0V4dGVybmFsAgdhZGRyZXNzA2tleQQHJG1hdGNoMAkAnQgCBQdhZGRyZXNzBQNrZXkDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFhBQckbWF0Y2gwBQFhAgABFXRyeUdldEludGVnZXJFeHRlcm5hbAIHYWRkcmVzcwNrZXkEByRtYXRjaDAJAJoIAgUHYWRkcmVzcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAAAQx0cnlHZXRTdHJpbmcBA2tleQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgUEdGhpcwUDa2V5AQlnZXRPcmFjbGUACQEHQWRkcmVzcwEJANkEAQkBDHRyeUdldFN0cmluZwECFHN0YXRpY19vcmFjbGVBZGRyZXNzARNnZXRJbmN1YmF0b3JBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhdzdGF0aWNfaW5jdWJhdG9yQWRkcmVzcwERZ2V0UmViaXJ0aEFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACFXN0YXRpY19yZWJpcnRoQWRkcmVzcwEPZ2V0SXRlbXNBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAhNzdGF0aWNfaXRlbXNBZGRyZXNzAQ1nZXRFZ2dBc3NldElkAAkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIRc3RhdGljX2VnZ0Fzc2V0SWQBGmdldEJhYnlEdWNrQnJlZWRpbmdBZGRyZXNzAAkBB0FkZHJlc3MBCQDZBAEJARR0cnlHZXRTdHJpbmdFeHRlcm5hbAIJAQlnZXRPcmFjbGUAAh5zdGF0aWNfYmFieUR1Y2tCcmVlZGluZ0FkZHJlc3MBEGdldER1Y2tsaW5nUHJpY2UACQEVdHJ5R2V0SW50ZWdlckV4dGVybmFsAgkBCWdldE9yYWNsZQACFHN0YXRpY19kdWNrbGluZ1ByaWNlARFnZXRDb3Vwb25zQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAIVc3RhdGljX2NvdXBvbnNBZGRyZXNzAQ5nZXRCdXJuQWRkcmVzcwAJAQdBZGRyZXNzAQkA2QQBCQEUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwCCQEJZ2V0T3JhY2xlAAISc3RhdGljX2J1cm5BZGRyZXNzARVnZXRSZWZDb250cmFjdEFkZHJlc3MACQEHQWRkcmVzcwEJANkEAQkBFHRyeUdldFN0cmluZ0V4dGVybmFsAgkBCWdldE9yYWNsZQACGXN0YXRpY19yZWZDb250cmFjdEFkZHJlc3MADU1heEdlbmVyYXRpb24ABwALR2VuZXJhdGlvbnMJAMwIAgIBRwkAzAgCAgFICQDMCAICAUkJAMwIAgIBSwkAzAgCAgFMCQDMCAICAU0JAMwIAgIBTgkAzAgCAgFPBQNuaWwBE2dldFByb2Nlc3NTdGF0dXNLZXkCB2FkZHJlc3MEdHhJZAkArAICCQCsAgIJAKwCAgUHYWRkcmVzcwIBXwkA2AQBBQR0eElkAgdfc3RhdHVzAQ5nZXREdWNrbGluZ0tleQIHYWRkcmVzcwR0eElkCQCsAgIJAKwCAgkArAICBQdhZGRyZXNzAgFfCQDYBAEFBHR4SWQCCV9kdWNrbGluZwEZZ2V0UHJvY2Vzc0ZpbmlzaEhlaWdodEtleQIHYWRkcmVzcwR0eElkCQCsAgIJAKwCAgkArAICBQdhZGRyZXNzAgFfCQDYBAEFBHR4SWQCA19maAEQZ2V0RHVja1BhcmVudEtleQIEdHhJZAlwYXJlbnROdW0JAKwCAgkArAICCQCsAgICB2luaXR0eF8JANgEAQUEdHhJZAIHX3BhcmVudAkApAMBBQlwYXJlbnROdW0BDGdldER1Y2tJZEtleQIHYWRkcmVzcwR0eElkCQCsAgIJAKwCAgkArAICBQdhZGRyZXNzAgFfCQDYBAEFBHR4SWQCA19kaQEPZ2V0RHVja1N0YXRzS2V5AQlnZW5TdHJpbmcJAKwCAgkArAICAgZzdGF0c18FCWdlblN0cmluZwIHX2Ftb3VudAENdHJ5R2V0SW50ZWdlcgEDa2V5BAN2YWwEByRtYXRjaDAJAJoIAgUEdGhpcwUDa2V5AwkAAQIFByRtYXRjaDACA0ludAQBYgUHJG1hdGNoMAUBYgAABQN2YWwBE2RldGVybWluZUdlbmVyYXRpb24CAmcxAmcyBAZnSW5kZXgJAJYDAQkAzAgCCQEFdmFsdWUBCQDPCAIFC0dlbmVyYXRpb25zBQJnMQkAzAgCCQEFdmFsdWUBCQDPCAIFC0dlbmVyYXRpb25zBQJnMgUDbmlsCQCRAwIFC0dlbmVyYXRpb25zCQBkAgUGZ0luZGV4AAEBD2dldFJhbmRvbU51bWJlcgQIdmFyaWFudHMEdHhJZBRoYXRjaGluZ0ZpbmlzaEhlaWdodAZvZmZzZXQED3JhbmRvbVNlZWRCbG9jawkBBXZhbHVlAQkA7QcBCQBlAgUUaGF0Y2hpbmdGaW5pc2hIZWlnaHQAAQQKcmFuZG9tSGFzaAkA1BYBCQDLAQIFBHR4SWQJAQV2YWx1ZQEIBQ9yYW5kb21TZWVkQmxvY2sDdnJmCQBqAgkAsgkCBQpyYW5kb21IYXNoBQZvZmZzZXQFCHZhcmlhbnRzAQxnZXRSYW5kb21HZW4JBGdlbjEEZ2VuMgRzdGVwBHR4SWQUaGF0Y2hpbmdGaW5pc2hIZWlnaHQOZ2VuZUZyb21QYXJlbnQLZ2VuZVBvc3Rpb24Oc3BlY2lmaXF1ZUdlbmUWc3BlY2lmaXF1ZUdlbmVQb3NpdGlvbgMDCQECIT0CBQ5nZW5lRnJvbVBhcmVudAAACQAAAgULZ2VuZVBvc3Rpb24FBHN0ZXAHAwkAAAIFDmdlbmVGcm9tUGFyZW50AAEFBGdlbjEDCQAAAgUOZ2VuZUZyb21QYXJlbnQAAgUEZ2VuMgkAAgECIFBhcmVudCBlaXRoZXIgbmVlZHMgdG8gYmUgMSBvciAyAwMJAQIhPQIFDnNwZWNpZmlxdWVHZW5lAgAJAAACBRZzcGVjaWZpcXVlR2VuZVBvc2l0aW9uBQRzdGVwBwUOc3BlY2lmaXF1ZUdlbmUECXJhbmRvbU51bQkBD2dldFJhbmRvbU51bWJlcgQAAgUEdHhJZAUUaGF0Y2hpbmdGaW5pc2hIZWlnaHQFBHN0ZXAEA2dlbgMJAAACBQlyYW5kb21OdW0AAAUEZ2VuMQUEZ2VuMgUDZ2VuARVjaGVja0Fzc2V0SW5JbmN1YmF0b3IBB2Fzc2V0SWQEBnJlc3VsdAQHJG1hdGNoMAkAnQgCCQETZ2V0SW5jdWJhdG9yQWRkcmVzcwAFB2Fzc2V0SWQDCQABAgUHJG1hdGNoMAIGU3RyaW5nBAFiBQckbWF0Y2gwBgcEB3Jlc3VsdDIEByRtYXRjaDAJAJ0IAgUEdGhpcwUHYXNzZXRJZAMJAAECBQckbWF0Y2gwAgZTdHJpbmcEAWMFByRtYXRjaDAGBwMFBnJlc3VsdAYFB3Jlc3VsdDIBDGNhbkJlQnJlZWRlZAIIYXNzZXQxSWQIYXNzZXQySWQECWFzc2V0MUdlbgkAtQkCCAkBBXZhbHVlAQkA7AcBBQhhc3NldDFJZARuYW1lAgAECWFzc2V0MkdlbgkAtQkCCAkBBXZhbHVlAQkA7AcBBQhhc3NldDJJZARuYW1lAgADCQBnAgkBBXZhbHVlAQkAzwgCBQtHZW5lcmF0aW9ucwkAkQMCBQlhc3NldDFHZW4ADgUNTWF4R2VuZXJhdGlvbgkArAICCQCsAgICKXlvdSBjYW4gb25seSBicmVlZCBkdWNrcyB3aXRoIGdlbmVyYXRpb24gCQCRAwIFC0dlbmVyYXRpb25zBQ1NYXhHZW5lcmF0aW9uAgogYW5kIGxvd2VyAwkAZwIJAQV2YWx1ZQEJAM8IAgULR2VuZXJhdGlvbnMJAJEDAgUJYXNzZXQyR2VuAA4FDU1heEdlbmVyYXRpb24JAKwCAgkArAICAil5b3UgY2FuIG9ubHkgYnJlZWQgZHVja3Mgd2l0aCBnZW5lcmF0aW9uIAkAkQMCBQtHZW5lcmF0aW9ucwUNTWF4R2VuZXJhdGlvbgIKIGFuZCBsb3dlcgIEdHJ1ZQEJaXNTeW1ib2xBAgthY2N1bXVsYXRlZANzeW0DCQAAAgUDc3ltAgFBCQBkAgULYWNjdW11bGF0ZWQAAQkAZAIFC2FjY3VtdWxhdGVkAAABCWlzU3ltYm9sQgILYWNjdW11bGF0ZWQDc3ltAwkAAAIFA3N5bQIBQgkAZAIFC2FjY3VtdWxhdGVkAAEJAGQCBQthY2N1bXVsYXRlZAAAAQlpc1N5bWJvbEMCC2FjY3VtdWxhdGVkA3N5bQMJAAACBQNzeW0CAUMJAGQCBQthY2N1bXVsYXRlZAABCQBkAgULYWNjdW11bGF0ZWQAAAEJaXNTeW1ib2xEAgthY2N1bXVsYXRlZANzeW0DCQAAAgUDc3ltAgFECQBkAgULYWNjdW11bGF0ZWQAAQkAZAIFC2FjY3VtdWxhdGVkAAABCWlzU3ltYm9sRQILYWNjdW11bGF0ZWQDc3ltAwkAAAIFA3N5bQIBRQkAZAIFC2FjY3VtdWxhdGVkAAEJAGQCBQthY2N1bXVsYXRlZAAAAQlpc1N5bWJvbEYCC2FjY3VtdWxhdGVkA3N5bQMJAAACBQNzeW0CAUYJAGQCBQthY2N1bXVsYXRlZAABCQBkAgULYWNjdW11bGF0ZWQAAAEJaXNTeW1ib2xHAgthY2N1bXVsYXRlZANzeW0DCQAAAgUDc3ltAgFHCQBkAgULYWNjdW11bGF0ZWQAAQkAZAIFC2FjY3VtdWxhdGVkAAABCWlzU3ltYm9sSAILYWNjdW11bGF0ZWQDc3ltAwkAAAIFA3N5bQIBSAkAZAIFC2FjY3VtdWxhdGVkAAEJAGQCBQthY2N1bXVsYXRlZAAAAQlpc1N5bWJvbEkCC2FjY3VtdWxhdGVkA3N5bQMJAAACBQNzeW0CAUkJAGQCBQthY2N1bXVsYXRlZAABCQBkAgULYWNjdW11bGF0ZWQAAAEJaXNTeW1ib2xLAgthY2N1bXVsYXRlZANzeW0DCQAAAgUDc3ltAgFLCQBkAgULYWNjdW11bGF0ZWQAAQkAZAIFC2FjY3VtdWxhdGVkAAABCWlzU3ltYm9sTAILYWNjdW11bGF0ZWQDc3ltAwkAAAIFA3N5bQIBTAkAZAIFC2FjY3VtdWxhdGVkAAEJAGQCBQthY2N1bXVsYXRlZAAAAQlpc1N5bWJvbE0CC2FjY3VtdWxhdGVkA3N5bQMJAAACBQNzeW0CAU0JAGQCBQthY2N1bXVsYXRlZAABCQBkAgULYWNjdW11bGF0ZWQAAAEJaXNTeW1ib2xTAgthY2N1bXVsYXRlZANzeW0DCQAAAgUDc3ltAgFTCQBkAgULYWNjdW11bGF0ZWQAAQkAZAIFC2FjY3VtdWxhdGVkAAABCWlzU3ltYm9sVAILYWNjdW11bGF0ZWQDc3ltAwkAAAIFA3N5bQIBVAkAZAIFC2FjY3VtdWxhdGVkAAEJAGQCBQthY2N1bXVsYXRlZAAAARBnZXRBbW91bnRPckNsZWFyAQZhbW91bnQDCQEIY29udGFpbnMCBQZhbW91bnQCATACAAUGYW1vdW50AQhhc1N0cmluZwEFdmFsdWUEByRtYXRjaDAFBXZhbHVlAwkAAQIFByRtYXRjaDACBlN0cmluZwQGc3RyaW5nBQckbWF0Y2gwBQZzdHJpbmcJAAIBAhx3cm9uZyB0eXBlLCBleHBlY3RlZDogU3RyaW5nAQVhc0ludAEFdmFsdWUEByRtYXRjaDAFBXZhbHVlAwkAAQIFByRtYXRjaDACA0ludAQDaW50BQckbWF0Y2gwBQNpbnQJAAIBAhl3cm9uZyB0eXBlLCBleHBlY3RlZDogSW50ARJjb21wb3NlR2VuZXJpY0RhdGEEB2R1Y2tHZW4JZHVja0lkS2V5B2Fzc2V0SWQFYXNzZXQEB2Zhcm1HZW4JAQhhc1N0cmluZwEJAPwHBAUEdGhpcwIOZ2V0R2VuRnJvbU5hbWUJAMwIAgUHZHVja0dlbgUDbmlsBQNuaWwDCQAAAgUHZmFybUdlbgUHZmFybUdlbgQGYW1vdW50CQENdHJ5R2V0SW50ZWdlcgEJAQ9nZXREdWNrU3RhdHNLZXkBBQdkdWNrR2VuBAhxdWFudGl0eQkBDXRyeUdldEludGVnZXIBCQCsAgIJAKwCAgIGc3RhdHNfBQdmYXJtR2VuAglfcXVhbnRpdHkJAMwIAgkBC1N0cmluZ0VudHJ5AgUJZHVja0lkS2V5CQDYBAEFB2Fzc2V0SWQJAMwIAgkBC1N0cmluZ0VudHJ5AgkA2AQBBQdhc3NldElkBQlkdWNrSWRLZXkJAMwIAgkBDEludGVnZXJFbnRyeQIJAQ9nZXREdWNrU3RhdHNLZXkBBQdkdWNrR2VuCQBkAgUGYW1vdW50AAEJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgZzdGF0c18FB2Zhcm1HZW4CCV9xdWFudGl0eQkAZAIFCHF1YW50aXR5AAEJAMwIAgUFYXNzZXQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEPZmluaXNoRHVja0hhdGNoAwd0eElkU3RyBW93bmVyD2R1Y2tHZW5lc1N0cmluZwQEdHhJZAkA2QQBBQd0eElkU3RyBBBwcm9jZXNzU3RhdHVzS2V5CQETZ2V0UHJvY2Vzc1N0YXR1c0tleQIFBW93bmVyBQR0eElkBAlkdWNrSWRLZXkJAQxnZXREdWNrSWRLZXkCBQVvd25lcgUEdHhJZAQPcHJvY2Vzc1R4U3RhdHVzCQERQGV4dHJOYXRpdmUoMTA1MykCBQR0aGlzBRBwcm9jZXNzU3RhdHVzS2V5BA9maW5pc2hIZWlnaHRLZXkJARlnZXRQcm9jZXNzRmluaXNoSGVpZ2h0S2V5AgUFb3duZXIFBHR4SWQEE3Byb2Nlc3NGaW5pc2hIZWlnaHQJARFAZXh0ck5hdGl2ZSgxMDUwKQIFBHRoaXMFD2ZpbmlzaEhlaWdodEtleQMJAAACBQ9wcm9jZXNzVHhTdGF0dXMFEEhhdGNoaW5nRmluaXNoZWQEBmR1Y2tJZAkBEUBleHRyTmF0aXZlKDEwNTMpAgUEdGhpcwkBDGdldER1Y2tJZEtleQIFBW93bmVyBQR0eElkCQACAQkArAICAkBUaGUgZHVjayB3YXMgYnJlZWRlZCBhbmQgY2xhaW1lZCBhbHJlYWR5LCBoZXJlIGlzIHRoZSBmb2xvd2luZzogBQZkdWNrSWQDCQBmAgUTcHJvY2Vzc0ZpbmlzaEhlaWdodAUGaGVpZ2h0CQACAQkArAICCQCsAgIJAKwCAgkArAICAh1CcmVlZGluZyBpcyBub3QgZmluaXNoZWQgeWV0IAkApAMBCQBlAgUTcHJvY2Vzc0ZpbmlzaEhlaWdodAUGaGVpZ2h0AicgYmxvY2tzIHJlbWFpbmluZywgaXQgd2lsbCB0YWtlIGFyb3VuZCAJAKQDAQkAZQIFE3Byb2Nlc3NGaW5pc2hIZWlnaHQFBmhlaWdodAIIIG1pbnV0ZXMEB2R1Y2tHZW4DCQAAAgUPZHVja0dlbmVzU3RyaW5nAgAJAQhhc1N0cmluZwEJAPwHBAUEdGhpcwIMZ2VuZXJhdGVEdWNrCQDMCAIFBHR4SWQJAMwIAgUTcHJvY2Vzc0ZpbmlzaEhlaWdodAkAzAgCAAAJAMwIAgAACQDMCAICAAkAzAgCAAAFA25pbAUDbmlsBQ9kdWNrR2VuZXNTdHJpbmcDCQAAAgUHZHVja0dlbgUHZHVja0dlbgQLZGVzY3JpcHRpb24JAKwCAgkArAICAg57Imdlbm90eXBlIjogIgUHZHVja0dlbgIZIiwgImNyb3NzYnJlZWRpbmciOiB0cnVlfQQFYXNzZXQJAMMIBwUHZHVja0dlbgULZGVzY3JpcHRpb24AAQAABwUEdW5pdAUTcHJvY2Vzc0ZpbmlzaEhlaWdodAQHYXNzZXRJZAkAuAgBBQVhc3NldAkAzggCCQESY29tcG9zZUdlbmVyaWNEYXRhBAUHZHVja0dlbgUJZHVja0lkS2V5BQdhc3NldElkBQVhc3NldAkAzAgCCQELU3RyaW5nRW50cnkCBRBwcm9jZXNzU3RhdHVzS2V5BRBIYXRjaGluZ0ZpbmlzaGVkCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJARFAZXh0ck5hdGl2ZSgxMDYyKQEFBW93bmVyAAEFB2Fzc2V0SWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEHZ2V0Qm9vbAEDa2V5BAckbWF0Y2gwCQCbCAIFBHRoaXMFA2tleQMJAAECBQckbWF0Y2gwAgdCb29sZWFuBAFiBQckbWF0Y2gwBQFiBwEJaXNUZXN0RW52AAkBB2dldEJvb2wBAgdURVNURU5WCgFpAQ9jb25maWd1cmVPcmFjbGUBBm9yYWNsZQMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECCmFkbWluIG9ubHkJAMwIAgkBC1N0cmluZ0VudHJ5AgIUc3RhdGljX29yYWNsZUFkZHJlc3MFBm9yYWNsZQUDbmlsAWkBDGdlbmVyYXRlRHVjawYEdHhJZBRoYXRjaGluZ0ZpbmlzaEhlaWdodA5nZW5lRnJvbVBhcmVudAtnZW5lUG9zdGlvbg5zcGVjaWZpcXVlR2VuZRZzcGVjaWZpcXVlR2VuZVBvc2l0aW9uBAtjb2xvclJhbmRvbQkBD2dldFJhbmRvbU51bWJlcgQABAUEdHhJZAUUaGF0Y2hpbmdGaW5pc2hIZWlnaHQACwQFY29sb3IDCQAAAgULY29sb3JSYW5kb20AAAIBWQMJAAACBQtjb2xvclJhbmRvbQABAgFHAwkAAAIFC2NvbG9yUmFuZG9tAAICAUICAVIECXBhcmVudDFJZAkA2QQBCQEMdHJ5R2V0U3RyaW5nAQkBEGdldER1Y2tQYXJlbnRLZXkCBQR0eElkAAEECXBhcmVudDJJZAkA2QQBCQEMdHJ5R2V0U3RyaW5nAQkBEGdldER1Y2tQYXJlbnRLZXkCBQR0eElkAAIECnBhcmVudDFHZW4JALUJAggJAQV2YWx1ZQEJAOwHAQUJcGFyZW50MUlkBG5hbWUCAAQKcGFyZW50MkdlbgkAtQkCCAkBBXZhbHVlAQkA7AcBBQlwYXJlbnQySWQEbmFtZQIABANnZW4JAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICAgVEVUNLLQkBDGdldFJhbmRvbUdlbgkJAJEDAgUKcGFyZW50MUdlbgAFCQCRAwIFCnBhcmVudDJHZW4ABQAABQR0eElkBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAUOZ2VuZUZyb21QYXJlbnQFC2dlbmVQb3N0aW9uBQ5zcGVjaWZpcXVlR2VuZQUWc3BlY2lmaXF1ZUdlbmVQb3NpdGlvbgkBDGdldFJhbmRvbUdlbgkJAJEDAgUKcGFyZW50MUdlbgAGCQCRAwIFCnBhcmVudDJHZW4ABgABBQR0eElkBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAUOZ2VuZUZyb21QYXJlbnQFC2dlbmVQb3N0aW9uBQ5zcGVjaWZpcXVlR2VuZQUWc3BlY2lmaXF1ZUdlbmVQb3NpdGlvbgkBDGdldFJhbmRvbUdlbgkJAJEDAgUKcGFyZW50MUdlbgAHCQCRAwIFCnBhcmVudDJHZW4ABwACBQR0eElkBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAUOZ2VuZUZyb21QYXJlbnQFC2dlbmVQb3N0aW9uBQ5zcGVjaWZpcXVlR2VuZQUWc3BlY2lmaXF1ZUdlbmVQb3NpdGlvbgkBDGdldFJhbmRvbUdlbgkJAJEDAgUKcGFyZW50MUdlbgAICQCRAwIFCnBhcmVudDJHZW4ACAADBQR0eElkBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAUOZ2VuZUZyb21QYXJlbnQFC2dlbmVQb3N0aW9uBQ5zcGVjaWZpcXVlR2VuZQUWc3BlY2lmaXF1ZUdlbmVQb3NpdGlvbgkBDGdldFJhbmRvbUdlbgkJAJEDAgUKcGFyZW50MUdlbgAJCQCRAwIFCnBhcmVudDJHZW4ACQAEBQR0eElkBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAUOZ2VuZUZyb21QYXJlbnQFC2dlbmVQb3N0aW9uBQ5zcGVjaWZpcXVlR2VuZQUWc3BlY2lmaXF1ZUdlbmVQb3NpdGlvbgkBDGdldFJhbmRvbUdlbgkJAJEDAgUKcGFyZW50MUdlbgAKCQCRAwIFCnBhcmVudDJHZW4ACgAFBQR0eElkBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAUOZ2VuZUZyb21QYXJlbnQFC2dlbmVQb3N0aW9uBQ5zcGVjaWZpcXVlR2VuZQUWc3BlY2lmaXF1ZUdlbmVQb3NpdGlvbgkBDGdldFJhbmRvbUdlbgkJAJEDAgUKcGFyZW50MUdlbgALCQCRAwIFCnBhcmVudDJHZW4ACwAGBQR0eElkBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAUOZ2VuZUZyb21QYXJlbnQFC2dlbmVQb3N0aW9uBQ5zcGVjaWZpcXVlR2VuZQUWc3BlY2lmaXF1ZUdlbmVQb3NpdGlvbgkBDGdldFJhbmRvbUdlbgkJAJEDAgUKcGFyZW50MUdlbgAMCQCRAwIFCnBhcmVudDJHZW4ADAAHBQR0eElkBRRoYXRjaGluZ0ZpbmlzaEhlaWdodAUOZ2VuZUZyb21QYXJlbnQFC2dlbmVQb3N0aW9uBQ5zcGVjaWZpcXVlR2VuZQUWc3BlY2lmaXF1ZUdlbmVQb3NpdGlvbgIBLQkBE2RldGVybWluZUdlbmVyYXRpb24CCQCRAwIFCnBhcmVudDFHZW4ADgkAkQMCBQpwYXJlbnQyR2VuAA4FBWNvbG9yCQCUCgIFA25pbAUDZ2VuAWkBDmdldEdlbkZyb21OYW1lAQlhc3NldE5hbWUECGdlbm90eXBlCQC1CQIJALMCAgkAsAICBQlhc3NldE5hbWUABQADAgAECmdlbmVyYXRpb24JAJEDAgkAtQkCBQlhc3NldE5hbWUCAAAOBANnZW4JAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJAKwCAgkArAICCQCsAgIJARBnZXRBbW91bnRPckNsZWFyAQkArAICCQCkAwEKAAIkbAUIZ2Vub3R5cGUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjBfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWlzU3ltYm9sQQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOAkBBSRmMF8yAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgkBBSRmMF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgCAUEJARBnZXRBbW91bnRPckNsZWFyAQkArAICCQCkAwEKAAIkbAUIZ2Vub3R5cGUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjFfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWlzU3ltYm9sQgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOAkBBSRmMV8yAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgkBBSRmMV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgCAUIJARBnZXRBbW91bnRPckNsZWFyAQkArAICCQCkAwEKAAIkbAUIZ2Vub3R5cGUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjJfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWlzU3ltYm9sQwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmMl8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOAkBBSRmMl8yAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgkBBSRmMl8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgCAUMJARBnZXRBbW91bnRPckNsZWFyAQkArAICCQCkAwEKAAIkbAUIZ2Vub3R5cGUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjNfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWlzU3ltYm9sRAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmM18yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOAkBBSRmM18yAgkBBSRmM18xAgkBBSRmM18xAgkBBSRmM18xAgkBBSRmM18xAgkBBSRmM18xAgkBBSRmM18xAgkBBSRmM18xAgkBBSRmM18xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgCAUQJARBnZXRBbW91bnRPckNsZWFyAQkArAICCQCkAwEKAAIkbAUIZ2Vub3R5cGUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjRfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWlzU3ltYm9sRQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmNF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOAkBBSRmNF8yAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgkBBSRmNF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgCAUUJARBnZXRBbW91bnRPckNsZWFyAQkArAICCQCkAwEKAAIkbAUIZ2Vub3R5cGUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjVfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWlzU3ltYm9sRgIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmNV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOAkBBSRmNV8yAgkBBSRmNV8xAgkBBSRmNV8xAgkBBSRmNV8xAgkBBSRmNV8xAgkBBSRmNV8xAgkBBSRmNV8xAgkBBSRmNV8xAgkBBSRmNV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgCAUYJARBnZXRBbW91bnRPckNsZWFyAQkArAICCQCkAwEKAAIkbAUIZ2Vub3R5cGUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjZfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWlzU3ltYm9sRwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmNl8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOAkBBSRmNl8yAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgkBBSRmNl8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgCAUcJARBnZXRBbW91bnRPckNsZWFyAQkArAICCQCkAwEKAAIkbAUIZ2Vub3R5cGUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjdfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWlzU3ltYm9sSAIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmN18yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOAkBBSRmN18yAgkBBSRmN18xAgkBBSRmN18xAgkBBSRmN18xAgkBBSRmN18xAgkBBSRmN18xAgkBBSRmN18xAgkBBSRmN18xAgkBBSRmN18xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgCAUgJARBnZXRBbW91bnRPckNsZWFyAQkArAICCQCkAwEKAAIkbAUIZ2Vub3R5cGUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjhfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWlzU3ltYm9sSQIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmOF8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOAkBBSRmOF8yAgkBBSRmOF8xAgkBBSRmOF8xAgkBBSRmOF8xAgkBBSRmOF8xAgkBBSRmOF8xAgkBBSRmOF8xAgkBBSRmOF8xAgkBBSRmOF8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgCAUkJARBnZXRBbW91bnRPckNsZWFyAQkArAICCQCkAwEKAAIkbAUIZ2Vub3R5cGUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQUkZjlfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWlzU3ltYm9sSwIFAiRhCQCRAwIFAiRsBQIkaQoBBSRmOV8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOAkBBSRmOV8yAgkBBSRmOV8xAgkBBSRmOV8xAgkBBSRmOV8xAgkBBSRmOV8xAgkBBSRmOV8xAgkBBSRmOV8xAgkBBSRmOV8xAgkBBSRmOV8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgCAUsJARBnZXRBbW91bnRPckNsZWFyAQkArAICCQCkAwEKAAIkbAUIZ2Vub3R5cGUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQYkZjEwXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlpc1N5bWJvbEwCBQIkYQkAkQMCBQIkbAUCJGkKAQYkZjEwXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA4CQEGJGYxMF8yAgkBBiRmMTBfMQIJAQYkZjEwXzECCQEGJGYxMF8xAgkBBiRmMTBfMQIJAQYkZjEwXzECCQEGJGYxMF8xAgkBBiRmMTBfMQIJAQYkZjEwXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAIBTAkBEGdldEFtb3VudE9yQ2xlYXIBCQCsAgIJAKQDAQoAAiRsBQhnZW5vdHlwZQoAAiRzCQCQAwEFAiRsCgAFJGFjYzAAAAoBBiRmMTFfMQICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkBCWlzU3ltYm9sTQIFAiRhCQCRAwIFAiRsBQIkaQoBBiRmMTFfMgICJGECJGkDCQBnAgUCJGkFAiRzBQIkYQkAAgECE0xpc3Qgc2l6ZSBleGNlZWRzIDgJAQYkZjExXzICCQEGJGYxMV8xAgkBBiRmMTFfMQIJAQYkZjExXzECCQEGJGYxMV8xAgkBBiRmMTFfMQIJAQYkZjExXzECCQEGJGYxMV8xAgkBBiRmMTFfMQIFBSRhY2MwAAAAAQACAAMABAAFAAYABwAIAgFNCQEQZ2V0QW1vdW50T3JDbGVhcgEJAKwCAgkApAMBCgACJGwFCGdlbm90eXBlCgACJHMJAJADAQUCJGwKAAUkYWNjMAAACgEGJGYxMl8xAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQEJaXNTeW1ib2xTAgUCJGEJAJEDAgUCJGwFAiRpCgEGJGYxMl8yAgIkYQIkaQMJAGcCBQIkaQUCJHMFAiRhCQACAQITTGlzdCBzaXplIGV4Y2VlZHMgOAkBBiRmMTJfMgIJAQYkZjEyXzECCQEGJGYxMl8xAgkBBiRmMTJfMQIJAQYkZjEyXzECCQEGJGYxMl8xAgkBBiRmMTJfMQIJAQYkZjEyXzECCQEGJGYxMl8xAgUFJGFjYzAAAAABAAIAAwAEAAUABgAHAAgCAVMJARBnZXRBbW91bnRPckNsZWFyAQkArAICCQCkAwEKAAIkbAUIZ2Vub3R5cGUKAAIkcwkAkAMBBQIkbAoABSRhY2MwAAAKAQYkZjEzXzECAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAQlpc1N5bWJvbFQCBQIkYQkAkQMCBQIkbAUCJGkKAQYkZjEzXzICAiRhAiRpAwkAZwIFAiRpBQIkcwUCJGEJAAIBAhNMaXN0IHNpemUgZXhjZWVkcyA4CQEGJGYxM18yAgkBBiRmMTNfMQIJAQYkZjEzXzECCQEGJGYxM18xAgkBBiRmMTNfMQIJAQYkZjEzXzECCQEGJGYxM18xAgkBBiRmMTNfMQIJAQYkZjEzXzECBQUkYWNjMAAAAAEAAgADAAQABQAGAAcACAIBVAIBLQUKZ2VuZXJhdGlvbgkAlAoCBQNuaWwFA2dlbgFpARZ2YWxpZGF0ZUFuZEdldENoaWxkcmVuAQdhc3NldElkAwkBASEBCQEVY2hlY2tBc3NldEluSW5jdWJhdG9yAQUHYXNzZXRJZAkAAgEJAKwCAgkArAICAiVZb3UgbmVlZCB0byBhdHRhY2ggYSB2YWxpZCBORlQtZHVjay4gBQdhc3NldElkAgwgaXMgaW52YWxpZCEECGNoaWxkcmVuCQENdHJ5R2V0SW50ZWdlcgEJAKwCAgkArAICAgZhc3NldF8FB2Fzc2V0SWQCCV9jaGlsZHJlbgkAlAoCBQNuaWwFCGNoaWxkcmVuAWkBFmNyZWF0ZUR1Y2tTcGVjaWFsR2VuZXMDB2FkZHJlc3MHZHVja0dlbghjaGlsZHJlbgMDCQECIT0CCAUBaQZjYWxsZXIJAQ9nZXRJdGVtc0FkZHJlc3MACQECIT0CCAUBaQZjYWxsZXIFBHRoaXMHCQACAQITYWRtaW4gb3IgaXRlbXMgb25seQQEdHhJZAgFAWkNdHJhbnNhY3Rpb25JZAQLZGVzY3JpcHRpb24JAKwCAgkArAICAg57Imdlbm90eXBlIjogIgUHZHVja0dlbgIZIiwgImNyb3NzYnJlZWRpbmciOiB0cnVlfQQFYXNzZXQJAMIIBQUHZHVja0dlbgULZGVzY3JpcHRpb24AAQAABwQHYXNzZXRJZAkAuAgBBQVhc3NldAQJZHVja0lkS2V5CQEMZ2V0RHVja0lkS2V5AgkApQgBCAUBaQZjYWxsZXIFBHR4SWQEB2Zhcm1HZW4JAQhhc1N0cmluZwEJAPwHBAUEdGhpcwIOZ2V0R2VuRnJvbU5hbWUJAMwIAgUHZHVja0dlbgUDbmlsBQNuaWwDCQAAAgUHZmFybUdlbgUHZmFybUdlbgkAzggCCQESY29tcG9zZUdlbmVyaWNEYXRhBAUHZHVja0dlbgUJZHVja0lkS2V5BQdhc3NldElkBQVhc3NldAkAzAgCCQEMSW50ZWdlckVudHJ5AgkArAICCQCsAgICBmFzc2V0XwkA2AQBBQdhc3NldElkAglfY2hpbGRyZW4FCGNoaWxkcmVuCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMJAQdBZGRyZXNzAQUHYWRkcmVzcwABBQdhc3NldElkBQNuaWwJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4BaQERc3RhcnREdWNrQnJlZWRpbmcBDnJlZmVyZXJBZGRyZXNzBAxmaXJzdFBheW1lbnQJAQV2YWx1ZQEJAJEDAggFAWkIcGF5bWVudHMAAAQNc2Vjb25kUGF5bWVudAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwABBAxmaXJzdEFzc2V0SWQJANgEAQkBBXZhbHVlAQgFDGZpcnN0UGF5bWVudAdhc3NldElkBA1zZWNvbmRBc3NldElkCQDYBAEJAQV2YWx1ZQEIBQ1zZWNvbmRQYXltZW50B2Fzc2V0SWQDAwkBAiE9AggFDGZpcnN0UGF5bWVudAZhbW91bnQAAQYJAQIhPQIIBQ1zZWNvbmRQYXltZW50BmFtb3VudAABCQACAQITTkZUIGlzIG5vdCBhdHRhY2hlZAQTYW1vdW50UGFpZEJ5Q291cG9ucwkBBWFzSW50AQkA/AcECQERZ2V0Q291cG9uc0FkZHJlc3MAAgp1c2VDb3Vwb25zCQDMCAIJARBnZXREdWNrbGluZ1ByaWNlAAUDbmlsBQNuaWwDCQAAAgUTYW1vdW50UGFpZEJ5Q291cG9ucwUTYW1vdW50UGFpZEJ5Q291cG9ucwQJbGVmdFRvUGF5CQBlAgkBEGdldER1Y2tsaW5nUHJpY2UABRNhbW91bnRQYWlkQnlDb3Vwb25zBAdwYXltZW50AwkBAiE9AgUJbGVmdFRvUGF5AAAEDHRoaXJkUGF5bWVudAkBBXZhbHVlAQkAkQMCCAUBaQhwYXltZW50cwACAwkBAiE9AggFDHRoaXJkUGF5bWVudAdhc3NldElkCQENZ2V0RWdnQXNzZXRJZAAJAAIBCQCsAgICQkJTREI6IFlvdSBjYW4gYXR0YWNoIG9ubHkgRUdHIHRva2VucyB3aXRoIHRoZSBmb2xsb3dpbmcgYXNzZXQgaWQ6IAkA2AQBCQENZ2V0RWdnQXNzZXRJZAADCQECIT0CCAUMdGhpcmRQYXltZW50BmFtb3VudAUJbGVmdFRvUGF5CQACAQkArAICAkNCU0RCOiBUbyBicmVlZCB5b3UgY3VycmVudGx5IG5lZWQgdGhlIGZvbGxvd2luZyBhbW91bnQgb2YgRUdHbGV0czogCQCkAwEFCWxlZnRUb1BheQQVcmVmZXJlclJld2FyZEZvclBlcmNoCQBrAwUJbGVmdFRvUGF5AAUAZAQHcmVmQ2FsbAkA/AcECQEVZ2V0UmVmQ29udHJhY3RBZGRyZXNzAAIKcmVmUGF5bWVudAkAzAgCBQ5yZWZlcmVyQWRkcmVzcwUDbmlsCQDMCAIJAQ9BdHRhY2hlZFBheW1lbnQCCQENZ2V0RWdnQXNzZXRJZAAFFXJlZmVyZXJSZXdhcmRGb3JQZXJjaAUDbmlsAwkAAAIFB3JlZkNhbGwFB3JlZkNhbGwECGJ1cm5DYWxsCQD8BwQJAQ5nZXRCdXJuQWRkcmVzcwACFGJ1cm5BdHRhY2hlZFBheW1lbnRzBQNuaWwJAMwIAgkBD0F0dGFjaGVkUGF5bWVudAIJAQ1nZXRFZ2dBc3NldElkAAkAZQIFCWxlZnRUb1BheQUVcmVmZXJlclJld2FyZEZvclBlcmNoBQNuaWwDCQAAAgUIYnVybkNhbGwFCGJ1cm5DYWxsBQlsZWZ0VG9QYXkJAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAIBAiRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAMJAAACBQdwYXltZW50BQdwYXltZW50BAljaGlsZHJlbjEJAQVhc0ludAEJAPwHBAUEdGhpcwIWdmFsaWRhdGVBbmRHZXRDaGlsZHJlbgkAzAgCBQxmaXJzdEFzc2V0SWQFA25pbAUDbmlsAwkAAAIFCWNoaWxkcmVuMQUJY2hpbGRyZW4xBAljaGlsZHJlbjIJAQVhc0ludAEJAPwHBAUEdGhpcwIWdmFsaWRhdGVBbmRHZXRDaGlsZHJlbgkAzAgCBQ1zZWNvbmRBc3NldElkBQNuaWwFA25pbAMJAAACBQljaGlsZHJlbjIFCWNoaWxkcmVuMgMDCQBmAgUJY2hpbGRyZW4xAAAGCQBmAgUJY2hpbGRyZW4yAAAJAAIBAjxPbmUgZHVjayBjYW4gYmUgdXNlZCBmb3IgYnJlZWRpbmcgb25seSBvbmNlIGluIGl0cyBsaWZldGltZS4EDWJyZWVkZWRTdGF0dXMJAQxjYW5CZUJyZWVkZWQCCQDZBAEFDGZpcnN0QXNzZXRJZAkA2QQBBQ1zZWNvbmRBc3NldElkAwkBAiE9AgUNYnJlZWRlZFN0YXR1cwIEdHJ1ZQkAAgEJAKwCAgIfVGhlc2UgZHVja3MgY2Fubm90IGJlIGJyZWVkZWQ6IAUNYnJlZWRlZFN0YXR1cwQKcGFyZW50MUdlbgkAtQkCCAkBBXZhbHVlAQkA7AcBCQEFdmFsdWUBCAUMZmlyc3RQYXltZW50B2Fzc2V0SWQEbmFtZQIABApwYXJlbnQyR2VuCQC1CQIICQEFdmFsdWUBCQDsBwEJAQV2YWx1ZQEIBQ1zZWNvbmRQYXltZW50B2Fzc2V0SWQEbmFtZQIABARuZXdHCQETZGV0ZXJtaW5lR2VuZXJhdGlvbgIJAJEDAgUKcGFyZW50MUdlbgAOCQCRAwIFCnBhcmVudDJHZW4ADgQLc3BpY2VBbW91bnQJAGgCCQBkAgkBBXZhbHVlAQkAzwgCBQtHZW5lcmF0aW9ucwUEbmV3RwABAAoEC2R1Y2tsaW5nR2VuCQEIYXNTdHJpbmcBCQD8BwQJARpnZXRCYWJ5RHVja0JyZWVkaW5nQWRkcmVzcwACDWlzc3VlRHVja2xpbmcJAMwIAgkApQgBCAUBaQZjYWxsZXIJAMwIAgkA2AQBCAUBaQ10cmFuc2FjdGlvbklkCQDMCAIFC3NwaWNlQW1vdW50CQDMCAIFBG5ld0cFA25pbAUDbmlsAwkAAAIFC2R1Y2tsaW5nR2VuBQtkdWNrbGluZ0dlbgkAzAgCCQELU3RyaW5nRW50cnkCCQEQZ2V0RHVja1BhcmVudEtleQIIBQFpDXRyYW5zYWN0aW9uSWQAAQUMZmlyc3RBc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJARBnZXREdWNrUGFyZW50S2V5AggFAWkNdHJhbnNhY3Rpb25JZAACBQ1zZWNvbmRBc3NldElkCQDMCAIJAQtTdHJpbmdFbnRyeQIJARNnZXRQcm9jZXNzU3RhdHVzS2V5AgkApQgBCAUBaQZjYWxsZXIIBQFpDXRyYW5zYWN0aW9uSWQFD0hhdGNoaW5nU3RhcnRlZAkAzAgCCQEMSW50ZWdlckVudHJ5AgkBGWdldFByb2Nlc3NGaW5pc2hIZWlnaHRLZXkCCQClCAEIBQFpBmNhbGxlcggFAWkNdHJhbnNhY3Rpb25JZAkAZAIFBmhlaWdodAUQZGVsYXlGb3JIYXRjaGluZwkAzAgCCQELU3RyaW5nRW50cnkCCQEOZ2V0RHVja2xpbmdLZXkCCQClCAEIBQFpBmNhbGxlcggFAWkNdHJhbnNhY3Rpb25JZAULZHVja2xpbmdHZW4JAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgZhc3NldF8FDGZpcnN0QXNzZXRJZAIJX2NoaWxkcmVuAAEJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgZhc3NldF8FDXNlY29uZEFzc2V0SWQCCV9jaGlsZHJlbgABCQDMCAIJAQ5TY3JpcHRUcmFuc2ZlcgMIBQFpBmNhbGxlcgABCQEFdmFsdWUBCAUMZmlyc3RQYXltZW50B2Fzc2V0SWQJAMwIAgkBDlNjcmlwdFRyYW5zZmVyAwgFAWkGY2FsbGVyAAEJAQV2YWx1ZQEIBQ1zZWNvbmRQYXltZW50B2Fzc2V0SWQFA25pbAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARdmaW5pc2hEdWNrSGF0Y2hpbmdJdGVtcwIHdHhJZFN0cg9kdWNrR2VuZXNTdHJpbmcDAwkBAiE9AggFAWkGY2FsbGVyCQEPZ2V0SXRlbXNBZGRyZXNzAAkBAiE9AgUPZHVja0dlbmVzU3RyaW5nAgAHCQACAQIhT25seSBpdGVtcyBjYW4gY3JlYXRlIGZpeGVkIGdlbmVzBAVvd25lcgkApQgBCAUBaQxvcmlnaW5DYWxsZXIEDmR1Y2tsaW5nRmluaXNoCQEIYXNTdHJpbmcBCQD8BwQJARpnZXRCYWJ5RHVja0JyZWVkaW5nQWRkcmVzcwACFHR1cm5EdWNrbGluZ0ludG9EdWNrBQNuaWwIBQFpCHBheW1lbnRzAwkAAAIFDmR1Y2tsaW5nRmluaXNoBQ5kdWNrbGluZ0ZpbmlzaAQOZHVja2xpbmdMaW5rZWQJAQx0cnlHZXRTdHJpbmcBCQEOZ2V0RHVja2xpbmdLZXkCBQVvd25lcgkA2QQBBQd0eElkU3RyAwkBAiE9AgUOZHVja2xpbmdMaW5rZWQFDmR1Y2tsaW5nRmluaXNoCQACAQIjUGxlYXNlIGF0dGFjaCB0aGUgY29ycmVjdCBkdWNrbGluZyEJAQ9maW5pc2hEdWNrSGF0Y2gDBQd0eElkU3RyBQVvd25lcgUPZHVja0dlbmVzU3RyaW5nCQACAQIkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAWkBEmZpbmlzaER1Y2tIYXRjaGluZwEHdHhJZFN0cgQFb3duZXIJAKUIAQgFAWkGY2FsbGVyBA5kdWNrbGluZ0ZpbmlzaAkBCGFzU3RyaW5nAQkA/AcECQEaZ2V0QmFieUR1Y2tCcmVlZGluZ0FkZHJlc3MAAhR0dXJuRHVja2xpbmdJbnRvRHVjawUDbmlsCAUBaQhwYXltZW50cwMJAAACBQ5kdWNrbGluZ0ZpbmlzaAUOZHVja2xpbmdGaW5pc2gEDmR1Y2tsaW5nTGlua2VkCQEMdHJ5R2V0U3RyaW5nAQkBDmdldER1Y2tsaW5nS2V5AgUFb3duZXIJANkEAQUHdHhJZFN0cgMJAQIhPQIFDmR1Y2tsaW5nTGlua2VkBQ5kdWNrbGluZ0ZpbmlzaAkAAgECI1BsZWFzZSBhdHRhY2ggdGhlIGNvcnJlY3QgZHVja2xpbmchCQEPZmluaXNoRHVja0hhdGNoAwUHdHhJZFN0cgUFb3duZXICAAkAAgECJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgFpARdmaW5pc2hEdWNrSGF0Y2hpbmdBZG1pbgIHdHhJZFN0cgVvd25lcgMJAQIhPQIIBQFpBmNhbGxlcgUEdGhpcwkAAgECH0JGREg6IE9ubHkgYWRtaW5zIGNhbiBydW4gdGhpcyEJAQ9maW5pc2hEdWNrSGF0Y2gDBQd0eElkU3RyBQVvd25lcgIAAWkBDHJlZHVjZVJhcml0eQIHYXNzZXRJZAdmYXJtR2VuBAVhc3NldAkA2QQBBQdhc3NldElkAwMDCQECIT0CCAUBaQZjYWxsZXIJAQ9nZXRJdGVtc0FkZHJlc3MACQECIT0CCAUBaQZjYWxsZXIJARFnZXRSZWJpcnRoQWRkcmVzcwAHCQECIT0CCAUBaQZjYWxsZXIFBHRoaXMHCQACAQIcYWRtaW4sIGl0ZW1zIG9yIHJlYmlydGggb25seQQHZHVja0dlbggJAQV2YWx1ZQEJAOwHAQUFYXNzZXQEbmFtZQkAzAgCCQEMSW50ZWdlckVudHJ5AgkBD2dldER1Y2tTdGF0c0tleQEFB2R1Y2tHZW4JAGUCCQENdHJ5R2V0SW50ZWdlcgEJAQ9nZXREdWNrU3RhdHNLZXkBBQdkdWNrR2VuAAEJAMwIAgkBDEludGVnZXJFbnRyeQIJAKwCAgkArAICAgZzdGF0c18FB2Zhcm1HZW4CCV9xdWFudGl0eQkAZQIJAQ10cnlHZXRJbnRlZ2VyAQkArAICCQCsAgICBnN0YXRzXwUHZmFybUdlbgIJX3F1YW50aXR5AAEFA25pbAECdHgBBnZlcmlmeQADCQEJaXNUZXN0RW52AAkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAgFAnR4D3NlbmRlclB1YmxpY0tleQQJZmlyc3RVc2VyASDe1sZR5FMW0GWA6wGaKgvQ95dR+hx2kX6bjgZDdxe9JQQKc2Vjb25kVXNlcgEgwWzfju3TjXOPi6L5+okP9HXNRBtUclKjtJzSVqQt4HUECXRoaXJkVXNlcgEg51v0jqrS+UmeboQmuPl+H9xnqH3cK7jU6nvN8mgKwSUED2ZpcnN0VXNlclNpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFCWZpcnN0VXNlcgABAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAQUJZmlyc3RVc2VyAAEDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwACBQlmaXJzdFVzZXIAAQAABBBzZWNvbmRVc2VyU2lnbmVkAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAAUKc2Vjb25kVXNlcgABAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAQUKc2Vjb25kVXNlcgABAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAgUKc2Vjb25kVXNlcgABAAAED3RoaXJkVXNlclNpZ25lZAMJAPQDAwgFAnR4CWJvZHlCeXRlcwkAkQMCCAUCdHgGcHJvb2ZzAAAFCXRoaXJkVXNlcgABAwkA9AMDCAUCdHgJYm9keUJ5dGVzCQCRAwIIBQJ0eAZwcm9vZnMAAQUJdGhpcmRVc2VyAAEDCQD0AwMIBQJ0eAlib2R5Qnl0ZXMJAJEDAggFAnR4BnByb29mcwACBQl0aGlyZFVzZXIAAQAABA9zaWduYXR1cmVzQ291bnQJAGQCCQBkAgUPZmlyc3RVc2VyU2lnbmVkBRBzZWNvbmRVc2VyU2lnbmVkBQ90aGlyZFVzZXJTaWduZWQEByRtYXRjaDAFAnR4CQBnAgUPc2lnbmF0dXJlc0NvdW50AAKixGAE",
    "height": 3571507,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: BUpqf6ZhJz2udpD2AVtoQkDSM4EGnAS3y7y9TxToxtWY
Next: A7hAEKysdz2AfZVAAbhLaJCjhGKuXFc9zuC71ensjasA

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  func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_couponsAddress")))
51 51  
52 52  
53 53  func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_burnAddress")))
54 54  
55 55  
56 56  func getRefContractAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), "static_refContractAddress")))
57 57  
58 58  
59 59  let MaxGeneration = 7
60 60  
61 61  let Generations = ["G", "H", "I", "K", "L", "M", "N", "O"]
62 62  
63 63  func getProcessStatusKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_status")
64 64  
65 65  
66 66  func getDucklingKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_duckling")
67 67  
68 68  
69 69  func getProcessFinishHeightKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_fh")
70 70  
71 71  
72 72  func getDuckParentKey (txId,parentNum) = ((("inittx_" + toBase58String(txId)) + "_parent") + toString(parentNum))
73 73  
74 74  
75 75  func getDuckIdKey (address,txId) = (((address + "_") + toBase58String(txId)) + "_di")
76 76  
77 77  
78 78  func getDuckStatsKey (genString) = (("stats_" + genString) + "_amount")
79 79  
80 80  
81 81  func tryGetInteger (key) = {
82 82      let val =     match getInteger(this, key) {
83 83          case b: Int => 
84 84              b
85 85          case _ => 
86 86              0
87 87      }
88 88      val
89 89      }
90 90  
91 91  
92 92  func determineGeneration (g1,g2) = {
93 93      let gIndex = max([value(indexOf(Generations, g1)), value(indexOf(Generations, g2))])
94 94  Generations[(gIndex + 1)]
95 95      }
96 96  
97 97  
98 98  func getRandomNumber (variants,txId,hatchingFinishHeight,offset) = {
99 99      let randomSeedBlock = value(blockInfoByHeight((hatchingFinishHeight - 1)))
100 100      let randomHash = sha256_16Kb((txId + value(randomSeedBlock.vrf)))
101 101      (toInt(randomHash, offset) % variants)
102 102      }
103 103  
104 104  
105 105  func getRandomGen (gen1,gen2,step,txId,hatchingFinishHeight,geneFromParent,genePostion,specifiqueGene,specifiqueGenePosition) = if (if ((geneFromParent != 0))
106 106      then (genePostion == step)
107 107      else false)
108 108      then if ((geneFromParent == 1))
109 109          then gen1
110 110          else if ((geneFromParent == 2))
111 111              then gen2
112 112              else throw("Parent either needs to be 1 or 2")
113 113      else if (if ((specifiqueGene != ""))
114 114          then (specifiqueGenePosition == step)
115 115          else false)
116 116          then specifiqueGene
117 117          else {
118 118              let randomNum = getRandomNumber(2, txId, hatchingFinishHeight, step)
119 119              let gen = if ((randomNum == 0))
120 120                  then gen1
121 121                  else gen2
122 122              gen
123 123              }
124 124  
125 125  
126 126  func checkAssetInIncubator (assetId) = {
127 127      let result =     match getString(getIncubatorAddress(), assetId) {
128 128          case b: String => 
129 129              true
130 130          case _ => 
131 131              false
132 132      }
133 133      let result2 =     match getString(this, assetId) {
134 134          case c: String => 
135 135              true
136 136          case _ => 
137 137              false
138 138      }
139 139      if (result)
140 140          then true
141 141          else result2
142 142      }
143 143  
144 144  
145 145  func canBeBreeded (asset1Id,asset2Id) = {
146 146      let asset1Gen = split(value(assetInfo(asset1Id)).name, "")
147 147      let asset2Gen = split(value(assetInfo(asset2Id)).name, "")
148 148      if ((value(indexOf(Generations, asset1Gen[14])) >= MaxGeneration))
149 149          then (("you can only breed ducks with generation " + Generations[MaxGeneration]) + " and lower")
150 150          else if ((value(indexOf(Generations, asset2Gen[14])) >= MaxGeneration))
151 151              then (("you can only breed ducks with generation " + Generations[MaxGeneration]) + " and lower")
152 152              else "true"
153 153      }
154 154  
155 155  
156 156  func isSymbolA (accumulated,sym) = if ((sym == "A"))
157 157      then (accumulated + 1)
158 158      else (accumulated + 0)
159 159  
160 160  
161 161  func isSymbolB (accumulated,sym) = if ((sym == "B"))
162 162      then (accumulated + 1)
163 163      else (accumulated + 0)
164 164  
165 165  
166 166  func isSymbolC (accumulated,sym) = if ((sym == "C"))
167 167      then (accumulated + 1)
168 168      else (accumulated + 0)
169 169  
170 170  
171 171  func isSymbolD (accumulated,sym) = if ((sym == "D"))
172 172      then (accumulated + 1)
173 173      else (accumulated + 0)
174 174  
175 175  
176 176  func isSymbolE (accumulated,sym) = if ((sym == "E"))
177 177      then (accumulated + 1)
178 178      else (accumulated + 0)
179 179  
180 180  
181 181  func isSymbolF (accumulated,sym) = if ((sym == "F"))
182 182      then (accumulated + 1)
183 183      else (accumulated + 0)
184 184  
185 185  
186 186  func isSymbolG (accumulated,sym) = if ((sym == "G"))
187 187      then (accumulated + 1)
188 188      else (accumulated + 0)
189 189  
190 190  
191 191  func isSymbolH (accumulated,sym) = if ((sym == "H"))
192 192      then (accumulated + 1)
193 193      else (accumulated + 0)
194 194  
195 195  
196 196  func isSymbolI (accumulated,sym) = if ((sym == "I"))
197 197      then (accumulated + 1)
198 198      else (accumulated + 0)
199 199  
200 200  
201 201  func isSymbolK (accumulated,sym) = if ((sym == "K"))
202 202      then (accumulated + 1)
203 203      else (accumulated + 0)
204 204  
205 205  
206 206  func isSymbolL (accumulated,sym) = if ((sym == "L"))
207 207      then (accumulated + 1)
208 208      else (accumulated + 0)
209 209  
210 210  
211 211  func isSymbolM (accumulated,sym) = if ((sym == "M"))
212 212      then (accumulated + 1)
213 213      else (accumulated + 0)
214 214  
215 215  
216 216  func isSymbolS (accumulated,sym) = if ((sym == "S"))
217 217      then (accumulated + 1)
218 218      else (accumulated + 0)
219 219  
220 220  
221 221  func isSymbolT (accumulated,sym) = if ((sym == "T"))
222 222      then (accumulated + 1)
223 223      else (accumulated + 0)
224 224  
225 225  
226 226  func getAmountOrClear (amount) = if (contains(amount, "0"))
227 227      then ""
228 228      else amount
229 229  
230 230  
231 231  func asString (value) = match value {
232 232      case string: String => 
233 233          string
234 234      case _ => 
235 235          throw("wrong type, expected: String")
236 236  }
237 237  
238 238  
239 239  func asInt (value) = match value {
240 240      case int: Int => 
241 241          int
242 242      case _ => 
243 243          throw("wrong type, expected: Int")
244 244  }
245 245  
246 246  
247 247  func composeGenericData (duckGen,duckIdKey,assetId,asset) = {
248 248      let farmGen = asString(invoke(this, "getGenFromName", [duckGen], nil))
249 249      if ((farmGen == farmGen))
250 250          then {
251 251              let amount = tryGetInteger(getDuckStatsKey(duckGen))
252 252              let quantity = tryGetInteger((("stats_" + farmGen) + "_quantity"))
253 253  [StringEntry(duckIdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), duckIdKey), IntegerEntry(getDuckStatsKey(duckGen), (amount + 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (quantity + 1)), asset]
254 254              }
255 255          else throw("Strict value is not equal to itself.")
256 256      }
257 257  
258 258  
259 259  func finishDuckHatch (txIdStr,owner,duckGenesString) = {
260 260      let txId = fromBase58String(txIdStr)
261 261      let processStatusKey = getProcessStatusKey(owner, txId)
262 262      let duckIdKey = getDuckIdKey(owner, txId)
263 263      let processTxStatus = getStringValue(this, processStatusKey)
264 264      let finishHeightKey = getProcessFinishHeightKey(owner, txId)
265 265      let processFinishHeight = getIntegerValue(this, finishHeightKey)
266 266      if ((processTxStatus == HatchingFinished))
267 267          then {
268 268              let duckId = getStringValue(this, getDuckIdKey(owner, txId))
269 269              throw(("The duck was breeded and claimed already, here is the folowing: " + duckId))
270 270              }
271 271          else if ((processFinishHeight > height))
272 272              then throw((((("Breeding is not finished yet " + toString((processFinishHeight - height))) + " blocks remaining, it will take around ") + toString((processFinishHeight - height))) + " minutes"))
273 273              else {
274 274                  let duckGen = if ((duckGenesString == ""))
275 275                      then asString(invoke(this, "generateDuck", [txId, processFinishHeight, 0, 0, "", 0], nil))
276 276                      else duckGenesString
277 277                  if ((duckGen == duckGen))
278 278                      then {
279 279                          let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
280 280                          let asset = Issue(duckGen, description, 1, 0, false, unit, processFinishHeight)
281 281                          let assetId = calculateAssetId(asset)
282 282                          (composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [StringEntry(processStatusKey, HatchingFinished), ScriptTransfer(addressFromStringValue(owner), 1, assetId)])
283 283                          }
284 284                      else throw("Strict value is not equal to itself.")
285 285                  }
286 286      }
287 287  
288 288  
289 289  func getBool (key) = match getBoolean(this, key) {
290 290      case b: Boolean => 
291 291          b
292 292      case _ => 
293 293          false
294 294  }
295 295  
296 296  
297 297  func isTestEnv () = getBool("TESTENV")
298 298  
299 299  
300 300  @Callable(i)
301 301  func configureOracle (oracle) = if ((i.caller != this))
302 302      then throw("admin only")
303 303      else [StringEntry("static_oracleAddress", oracle)]
304 304  
305 305  
306 306  
307 307  @Callable(i)
308 308  func generateDuck (txId,hatchingFinishHeight,geneFromParent,genePostion,specifiqueGene,specifiqueGenePosition) = {
309 309      let colorRandom = getRandomNumber(4, txId, hatchingFinishHeight, 11)
310 310      let color = if ((colorRandom == 0))
311 311          then "Y"
312 312          else if ((colorRandom == 1))
313 313              then "G"
314 314              else if ((colorRandom == 2))
315 315                  then "B"
316 316                  else "R"
317 317      let parent1Id = fromBase58String(tryGetString(getDuckParentKey(txId, 1)))
318 318      let parent2Id = fromBase58String(tryGetString(getDuckParentKey(txId, 2)))
319 319      let parent1Gen = split(value(assetInfo(parent1Id)).name, "")
320 320      let parent2Gen = split(value(assetInfo(parent2Id)).name, "")
321 321      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)
322 322      $Tuple2(nil, gen)
323 323      }
324 324  
325 325  
326 326  
327 327  @Callable(i)
328 328  func getGenFromName (assetName) = {
329 329      let genotype = split(dropRight(drop(assetName, 5), 3), "")
330 330      let generation = split(assetName, "")[14]
331 331      let gen = (((((((((((((((getAmountOrClear((toString({
332 332          let $l = genotype
333 333          let $s = size($l)
334 334          let $acc0 = 0
335 335          func $f0_1 ($a,$i) =         if (($i >= $s))
336 336              then $a
337 337              else isSymbolA($a, $l[$i])
338 338  
339 339          func $f0_2 ($a,$i) =         if (($i >= $s))
340 340              then $a
341 341              else throw("List size exceeds 8")
342 342  
343 343          $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)
344 344          }) + "A")) + getAmountOrClear((toString({
345 345          let $l = genotype
346 346          let $s = size($l)
347 347          let $acc0 = 0
348 348          func $f1_1 ($a,$i) =         if (($i >= $s))
349 349              then $a
350 350              else isSymbolB($a, $l[$i])
351 351  
352 352          func $f1_2 ($a,$i) =         if (($i >= $s))
353 353              then $a
354 354              else throw("List size exceeds 8")
355 355  
356 356          $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)
357 357          }) + "B"))) + getAmountOrClear((toString({
358 358          let $l = genotype
359 359          let $s = size($l)
360 360          let $acc0 = 0
361 361          func $f2_1 ($a,$i) =         if (($i >= $s))
362 362              then $a
363 363              else isSymbolC($a, $l[$i])
364 364  
365 365          func $f2_2 ($a,$i) =         if (($i >= $s))
366 366              then $a
367 367              else throw("List size exceeds 8")
368 368  
369 369          $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)
370 370          }) + "C"))) + getAmountOrClear((toString({
371 371          let $l = genotype
372 372          let $s = size($l)
373 373          let $acc0 = 0
374 374          func $f3_1 ($a,$i) =         if (($i >= $s))
375 375              then $a
376 376              else isSymbolD($a, $l[$i])
377 377  
378 378          func $f3_2 ($a,$i) =         if (($i >= $s))
379 379              then $a
380 380              else throw("List size exceeds 8")
381 381  
382 382          $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)
383 383          }) + "D"))) + getAmountOrClear((toString({
384 384          let $l = genotype
385 385          let $s = size($l)
386 386          let $acc0 = 0
387 387          func $f4_1 ($a,$i) =         if (($i >= $s))
388 388              then $a
389 389              else isSymbolE($a, $l[$i])
390 390  
391 391          func $f4_2 ($a,$i) =         if (($i >= $s))
392 392              then $a
393 393              else throw("List size exceeds 8")
394 394  
395 395          $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)
396 396          }) + "E"))) + getAmountOrClear((toString({
397 397          let $l = genotype
398 398          let $s = size($l)
399 399          let $acc0 = 0
400 400          func $f5_1 ($a,$i) =         if (($i >= $s))
401 401              then $a
402 402              else isSymbolF($a, $l[$i])
403 403  
404 404          func $f5_2 ($a,$i) =         if (($i >= $s))
405 405              then $a
406 406              else throw("List size exceeds 8")
407 407  
408 408          $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)
409 409          }) + "F"))) + getAmountOrClear((toString({
410 410          let $l = genotype
411 411          let $s = size($l)
412 412          let $acc0 = 0
413 413          func $f6_1 ($a,$i) =         if (($i >= $s))
414 414              then $a
415 415              else isSymbolG($a, $l[$i])
416 416  
417 417          func $f6_2 ($a,$i) =         if (($i >= $s))
418 418              then $a
419 419              else throw("List size exceeds 8")
420 420  
421 421          $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)
422 422          }) + "G"))) + getAmountOrClear((toString({
423 423          let $l = genotype
424 424          let $s = size($l)
425 425          let $acc0 = 0
426 426          func $f7_1 ($a,$i) =         if (($i >= $s))
427 427              then $a
428 428              else isSymbolH($a, $l[$i])
429 429  
430 430          func $f7_2 ($a,$i) =         if (($i >= $s))
431 431              then $a
432 432              else throw("List size exceeds 8")
433 433  
434 434          $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)
435 435          }) + "H"))) + getAmountOrClear((toString({
436 436          let $l = genotype
437 437          let $s = size($l)
438 438          let $acc0 = 0
439 439          func $f8_1 ($a,$i) =         if (($i >= $s))
440 440              then $a
441 441              else isSymbolI($a, $l[$i])
442 442  
443 443          func $f8_2 ($a,$i) =         if (($i >= $s))
444 444              then $a
445 445              else throw("List size exceeds 8")
446 446  
447 447          $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)
448 448          }) + "I"))) + getAmountOrClear((toString({
449 449          let $l = genotype
450 450          let $s = size($l)
451 451          let $acc0 = 0
452 452          func $f9_1 ($a,$i) =         if (($i >= $s))
453 453              then $a
454 454              else isSymbolK($a, $l[$i])
455 455  
456 456          func $f9_2 ($a,$i) =         if (($i >= $s))
457 457              then $a
458 458              else throw("List size exceeds 8")
459 459  
460 460          $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)
461 461          }) + "K"))) + getAmountOrClear((toString({
462 462          let $l = genotype
463 463          let $s = size($l)
464 464          let $acc0 = 0
465 465          func $f10_1 ($a,$i) =         if (($i >= $s))
466 466              then $a
467 467              else isSymbolL($a, $l[$i])
468 468  
469 469          func $f10_2 ($a,$i) =         if (($i >= $s))
470 470              then $a
471 471              else throw("List size exceeds 8")
472 472  
473 473          $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)
474 474          }) + "L"))) + getAmountOrClear((toString({
475 475          let $l = genotype
476 476          let $s = size($l)
477 477          let $acc0 = 0
478 478          func $f11_1 ($a,$i) =         if (($i >= $s))
479 479              then $a
480 480              else isSymbolM($a, $l[$i])
481 481  
482 482          func $f11_2 ($a,$i) =         if (($i >= $s))
483 483              then $a
484 484              else throw("List size exceeds 8")
485 485  
486 486          $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)
487 487          }) + "M"))) + getAmountOrClear((toString({
488 488          let $l = genotype
489 489          let $s = size($l)
490 490          let $acc0 = 0
491 491          func $f12_1 ($a,$i) =         if (($i >= $s))
492 492              then $a
493 493              else isSymbolS($a, $l[$i])
494 494  
495 495          func $f12_2 ($a,$i) =         if (($i >= $s))
496 496              then $a
497 497              else throw("List size exceeds 8")
498 498  
499 499          $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)
500 500          }) + "S"))) + getAmountOrClear((toString({
501 501          let $l = genotype
502 502          let $s = size($l)
503 503          let $acc0 = 0
504 504          func $f13_1 ($a,$i) =         if (($i >= $s))
505 505              then $a
506 506              else isSymbolT($a, $l[$i])
507 507  
508 508          func $f13_2 ($a,$i) =         if (($i >= $s))
509 509              then $a
510 510              else throw("List size exceeds 8")
511 511  
512 512          $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)
513 513          }) + "T"))) + "-") + generation)
514 514      $Tuple2(nil, gen)
515 515      }
516 516  
517 517  
518 518  
519 519  @Callable(i)
520 520  func validateAndGetChildren (assetId) = if (!(checkAssetInIncubator(assetId)))
521 521      then throw((("You need to attach a valid NFT-duck. " + assetId) + " is invalid!"))
522 522      else {
523 523          let children = tryGetInteger((("asset_" + assetId) + "_children"))
524 524          $Tuple2(nil, children)
525 525          }
526 526  
527 527  
528 528  
529 529  @Callable(i)
530 530  func createDuckSpecialGenes (address,duckGen,children) = if (if ((i.caller != getItemsAddress()))
531 531      then (i.caller != this)
532 532      else false)
533 533      then throw("admin or items only")
534 534      else {
535 535          let txId = i.transactionId
536 536          let description = (("{\"genotype\": \"" + duckGen) + "\", \"crossbreeding\": true}")
537 537          let asset = Issue(duckGen, description, 1, 0, false)
538 538          let assetId = calculateAssetId(asset)
539 539          let duckIdKey = getDuckIdKey(toString(i.caller), txId)
540 540          let farmGen = asString(invoke(this, "getGenFromName", [duckGen], nil))
541 541          if ((farmGen == farmGen))
542 542              then (composeGenericData(duckGen, duckIdKey, assetId, asset) ++ [IntegerEntry((("asset_" + toBase58String(assetId)) + "_children"), children), ScriptTransfer(Address(address), 1, assetId)])
543 543              else throw("Strict value is not equal to itself.")
544 544          }
545 545  
546 546  
547 547  
548 548  @Callable(i)
549 549  func startDuckBreeding (refererAddress) = {
550 550      let firstPayment = value(i.payments[0])
551 551      let secondPayment = value(i.payments[1])
552 552      let firstAssetId = toBase58String(value(firstPayment.assetId))
553 553      let secondAssetId = toBase58String(value(secondPayment.assetId))
554 554      if (if ((firstPayment.amount != 1))
555 555          then true
556 556          else (secondPayment.amount != 1))
557 557          then throw("NFT is not attached")
558 558          else {
559 559              let amountPaidByCoupons = asInt(invoke(getCouponsAddress(), "useCoupons", [getDucklingPrice()], nil))
560 560              if ((amountPaidByCoupons == amountPaidByCoupons))
561 561                  then {
562 562                      let leftToPay = (getDucklingPrice() - amountPaidByCoupons)
563 563                      let payment = if ((leftToPay != 0))
564 564                          then {
565 565                              let thirdPayment = value(i.payments[2])
566 566                              if ((thirdPayment.assetId != getEggAssetId()))
567 567                                  then throw(("BSDB: You can attach only EGG tokens with the following asset id: " + toBase58String(getEggAssetId())))
568 568                                  else if ((thirdPayment.amount != leftToPay))
569 569                                      then throw(("BSDB: To breed you currently need the following amount of EGGlets: " + toString(leftToPay)))
570 570                                      else {
571 571                                          let refererRewardForPerch = fraction(leftToPay, 5, 100)
572 572                                          let refCall = invoke(getRefContractAddress(), "refPayment", [refererAddress], [AttachedPayment(getEggAssetId(), refererRewardForPerch)])
573 573                                          if ((refCall == refCall))
574 574                                              then {
575 575                                                  let burnCall = invoke(getBurnAddress(), "burnAttachedPayments", nil, [AttachedPayment(getEggAssetId(), (leftToPay - refererRewardForPerch))])
576 576                                                  if ((burnCall == burnCall))
577 577                                                      then leftToPay
578 578                                                      else throw("Strict value is not equal to itself.")
579 579                                                  }
580 580                                              else throw("Strict value is not equal to itself.")
581 581                                          }
582 582                              }
583 583                          else 0
584 584                      if ((payment == payment))
585 585                          then {
586 586                              let children1 = asInt(invoke(this, "validateAndGetChildren", [firstAssetId], nil))
587 587                              if ((children1 == children1))
588 588                                  then {
589 589                                      let children2 = asInt(invoke(this, "validateAndGetChildren", [secondAssetId], nil))
590 590                                      if ((children2 == children2))
591 591                                          then if (if ((children1 > 0))
592 592                                              then true
593 593                                              else (children2 > 0))
594 594                                              then throw("One duck can be used for breeding only once in its lifetime.")
595 595                                              else {
596 596                                                  let breededStatus = canBeBreeded(fromBase58String(firstAssetId), fromBase58String(secondAssetId))
597 597                                                  if ((breededStatus != "true"))
598 598                                                      then throw(("These ducks cannot be breeded: " + breededStatus))
599 599                                                      else {
600 600                                                          let parent1Gen = split(value(assetInfo(value(firstPayment.assetId))).name, "")
601 601                                                          let parent2Gen = split(value(assetInfo(value(secondPayment.assetId))).name, "")
602 602                                                          let newG = determineGeneration(parent1Gen[14], parent2Gen[14])
603 603                                                          let spiceAmount = ((value(indexOf(Generations, newG)) + 1) * 10)
604 604                                                          let ducklingGen = asString(invoke(getBabyDuckBreedingAddress(), "issueDuckling", [toString(i.caller), toBase58String(i.transactionId), spiceAmount, newG], nil))
605 605                                                          if ((ducklingGen == ducklingGen))
606 606                                                              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))]
607 607                                                              else throw("Strict value is not equal to itself.")
608 608                                                          }
609 609                                                  }
610 610                                          else throw("Strict value is not equal to itself.")
611 611                                      }
612 612                                  else throw("Strict value is not equal to itself.")
613 613                              }
614 614                          else throw("Strict value is not equal to itself.")
615 615                      }
616 616                  else throw("Strict value is not equal to itself.")
617 617              }
618 618      }
619 619  
620 620  
621 621  
622 622  @Callable(i)
623 623  func finishDuckHatchingItems (txIdStr,duckGenesString) = if (if ((i.caller != getItemsAddress()))
624 624      then (duckGenesString != "")
625 625      else false)
626 626      then throw("Only items can create fixed genes")
627 627      else {
628 628          let owner = toString(i.originCaller)
629 629          let ducklingFinish = asString(invoke(getBabyDuckBreedingAddress(), "turnDucklingIntoDuck", nil, i.payments))
630 630          if ((ducklingFinish == ducklingFinish))
631 631              then {
632 632                  let ducklingLinked = tryGetString(getDucklingKey(owner, fromBase58String(txIdStr)))
633 633                  if ((ducklingLinked != ducklingFinish))
634 634                      then throw("Please attach the correct duckling!")
635 635                      else finishDuckHatch(txIdStr, owner, duckGenesString)
636 636                  }
637 637              else throw("Strict value is not equal to itself.")
638 638          }
639 639  
640 640  
641 641  
642 642  @Callable(i)
643 643  func finishDuckHatching (txIdStr) = {
644 644      let owner = toString(i.caller)
645 645      let ducklingFinish = asString(invoke(getBabyDuckBreedingAddress(), "turnDucklingIntoDuck", nil, i.payments))
646 646      if ((ducklingFinish == ducklingFinish))
647 647          then {
648 648              let ducklingLinked = tryGetString(getDucklingKey(owner, fromBase58String(txIdStr)))
649 649              if ((ducklingLinked != ducklingFinish))
650 650                  then throw("Please attach the correct duckling!")
651 651                  else finishDuckHatch(txIdStr, owner, "")
652 652              }
653 653          else throw("Strict value is not equal to itself.")
654 654      }
655 655  
656 656  
657 657  
658 658  @Callable(i)
659 659  func finishDuckHatchingAdmin (txIdStr,owner) = if ((i.caller != this))
660 660      then throw("BFDH: Only admins can run this!")
661 661      else finishDuckHatch(txIdStr, owner, "")
662 662  
663 663  
664 664  
665 665  @Callable(i)
666 666  func reduceRarity (assetId,farmGen) = {
667 667      let asset = fromBase58String(assetId)
668 668      if (if (if ((i.caller != getItemsAddress()))
669 669          then (i.caller != getRebirthAddress())
670 670          else false)
671 671          then (i.caller != this)
672 672          else false)
673 673          then throw("admin, items or rebirth only")
674 674          else {
675 675              let duckGen = value(assetInfo(asset)).name
676 676  [IntegerEntry(getDuckStatsKey(duckGen), (tryGetInteger(getDuckStatsKey(duckGen)) - 1)), IntegerEntry((("stats_" + farmGen) + "_quantity"), (tryGetInteger((("stats_" + farmGen) + "_quantity")) - 1))]
677 677              }
678 678      }
679 679  
680 680  
681 681  @Verifier(tx)
682 682  func verify () = if (isTestEnv())
683 683      then sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
684 684      else {
685 685          let firstUser = base58'FzsTVRXqD46KW5yj6qGNVrsouvWjpCQvD1446A96iGt4'
686 686          let secondUser = base58'E23yUg8eun5nXB1nZRDf7RTyRADKxQhGNXdpTYonEvtU'
687 687          let thirdUser = base58'Ga8WEBTPXbHuoXRD355mQ6ms8PsM2RFYKeA1mEP32CFe'
688 688          let firstUserSigned = if (sigVerify(tx.bodyBytes, tx.proofs[0], firstUser))
689 689              then 1
690 690              else if (sigVerify(tx.bodyBytes, tx.proofs[1], firstUser))
691 691                  then 1
692 692                  else if (sigVerify(tx.bodyBytes, tx.proofs[2], firstUser))
693 693                      then 1
694 694                      else 0
695 695          let secondUserSigned = if (sigVerify(tx.bodyBytes, tx.proofs[0], secondUser))
696 696              then 1
697 697              else if (sigVerify(tx.bodyBytes, tx.proofs[1], secondUser))
698 698                  then 1
699 699                  else if (sigVerify(tx.bodyBytes, tx.proofs[2], secondUser))
700 700                      then 1
701 701                      else 0
702 702          let thirdUserSigned = if (sigVerify(tx.bodyBytes, tx.proofs[0], thirdUser))
703 703              then 1
704 704              else if (sigVerify(tx.bodyBytes, tx.proofs[1], thirdUser))
705 705                  then 1
706 706                  else if (sigVerify(tx.bodyBytes, tx.proofs[2], thirdUser))
707 707                      then 1
708 708                      else 0
709 709          let signaturesCount = ((firstUserSigned + secondUserSigned) + thirdUserSigned)
710 710          match tx {
711 711              case _ => 
712 712                  (signaturesCount >= 2)
713 713          }
714 714          }
715 715

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

github/deemru/w8io/6500d08 
78.65 ms ◑