tx · 4wyTQGYjc35Lk1F7ji8B4VPDZmCPYdE3RresCHv7d9EV

3N1y6kVT6VXz9mGb7seF2wAQ2dMKG1ojx2H:  -0.02800000 Waves

2025.03.11 21:01 [3539712] smart account 3N1y6kVT6VXz9mGb7seF2wAQ2dMKG1ojx2H > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "4wyTQGYjc35Lk1F7ji8B4VPDZmCPYdE3RresCHv7d9EV",
    "fee": 2800000,
    "feeAssetId": null,
    "timestamp": 1741716088851,
    "version": 2,
    "chainId": 84,
    "sender": "3N1y6kVT6VXz9mGb7seF2wAQ2dMKG1ojx2H",
    "senderPublicKey": "9FrLvB7eP1itpJSbUFE9wJLDmuZtznJN56dMTAfc29br",
    "proofs": [
        "mFL8RW3wTkyp7ezfvYbPmZr7boJCJtUGjgq4Y82TsGDPWM7wTsw7871asEGSw9QT3HDDxgxPsUQCrtvj7kjJAMK"
    ],
    "script": "base64:AAIFAAAAAAAAACYIAhIDCgEIEgMKAQgSABIECgIICBIAEgQKAggBEgMKAQgSAwoBCAAAADgBAAAAD2dldFJldmVuZXVUeXBlcwAAAAAJAARMAAAAAgIAAAADRUdHCQAETAAAAAICAAAABVNQSUNFCQAETAAAAAICAAAABFZFR0cJAARMAAAAAgIAAAAERkVFRAUAAAADbmlsAAAAAAVTY2FsZQAAAAAABfXhAAEAAAAUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwAAAACAAAAB2FkZHJlc3MAAAADa2V5BAAAAAckbWF0Y2gwCQAEHQAAAAIFAAAAB2FkZHJlc3MFAAAAA2tleQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFhBQAAAAckbWF0Y2gwBQAAAAFhAgAAAAABAAAAB2dldEJvb2wAAAABAAAAA2tleQQAAAAHJG1hdGNoMAkABBsAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAB0Jvb2xlYW4EAAAAAWIFAAAAByRtYXRjaDAFAAAAAWIHAQAAAAlpc1Rlc3RFbnYAAAAACQEAAAAHZ2V0Qm9vbAAAAAECAAAAB1RFU1RFTlYBAAAAIHN0YXRpY0tleV9tdXRhbnRJbmN1YmF0b3JBZGRyZXNzAAAAAAIAAAAdc3RhdGljX211dGFudEluY3ViYXRvckFkZHJlc3MBAAAAF3N0YXRpY0tleV9vcmFjbGVBZGRyZXNzAAAAAAIAAAAUc3RhdGljX29yYWNsZUFkZHJlc3MBAAAAF3N0YXRpY0tleV9mZWVBZ2dyZWdhdG9yAAAAAAIAAAAUc3RhdGljX2ZlZUFnZ3JlZ2F0b3IBAAAAG3N0YXRpY0tleV9hY2NCb29zdGVyQWRkcmVzcwAAAAACAAAAGHN0YXRpY19hY2NCb29zdGVyQWRkcmVzcwEAAAAVc3RhdGljS2V5X211dGFyaXVtRmVlAAAAAAIAAAASc3RhdGljX211dGFyaXVtRmVlAQAAABlzdGF0aWNLZXlfYmFieUR1Y2tBZGRyZXNzAAAAAAIAAAAWc3RhdGljX2JhYnlEdWNrQWRkcmVzcwEAAAAYc3RhdGljS2V5X2NvdXBvbnNBZGRyZXNzAAAAAAIAAAAVc3RhdGljX2NvdXBvbnNBZGRyZXNzAQAAABZzdGF0aWNLZXlfc3BpY2VBc3NldElkAAAAAAIAAAATc3RhdGljX3NwaWNlQXNzZXRJZAEAAAAUc3RhdGljS2V5X2VnZ0Fzc2V0SWQAAAAAAgAAABFzdGF0aWNfZWdnQXNzZXRJZAEAAAAcc3RhdGljS2V5X3JlZkNvbnRyYWN0QWRkcmVzcwAAAAACAAAAGXN0YXRpY19yZWZDb250cmFjdEFkZHJlc3MBAAAAFXN0YXRpY0tleV9idXJuQWRkcmVzcwAAAAACAAAAEnN0YXRpY19idXJuQWRkcmVzcwEAAAAWc3RhdGljS2V5X2l0ZW1zQWRkcmVzcwAAAAACAAAAE3N0YXRpY19pdGVtc0FkZHJlc3MBAAAAEHJld2FyZENsYWltZWRLZXkAAAADAAAAB2FkZHJlc3MAAAAFYXNzZXQAAAALcmV2ZW5ldVR5cGUJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAAHYWRkcmVzcwIAAAAHX2Fzc2V0XwUAAAAFYXNzZXQCAAAACV9jbGFpbWVkXwUAAAALcmV2ZW5ldVR5cGUBAAAADnRvdGFsU3Rha2VkS2V5AAAAAQAAAAtyZXZlbmV1VHlwZQkAASwAAAACAgAAAA10b3RhbF9zdGFrZWRfBQAAAAtyZXZlbmV1VHlwZQEAAAASdG90YWxTdGFrZWRVc2VyS2V5AAAAAgAAAAdhZGRyZXNzAAAAC3JldmVuZXVUeXBlCQABLAAAAAICAAAADXRvdGFsX3N0YWtlZF8FAAAAB2FkZHJlc3MBAAAAFWtleUdsb2JhbExhc3RJbnRlcmVzdAAAAAEAAAALcmV2ZW5ldVR5cGUJAAEsAAAAAgIAAAAaZ2xvYmFsX2xhc3RDaGVja19pbnRlcmVzdF8FAAAAC3JldmVuZXVUeXBlAQAAABRrZXlMYXN0Q2hlY2tJbnRlcmVzdAAAAAMAAAAHYWRkcmVzcwAAAAVhc3NldAAAAAtyZXZlbmV1VHlwZQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGFkZHJlc3NfBQAAAAdhZGRyZXNzAgAAAAdfYXNzZXRfBQAAAAVhc3NldAIAAAATX2xhc3RDaGVja0ludGVyZXN0XwUAAAALcmV2ZW5ldVR5cGUBAAAAD2tleUdsb2JhbEVhcm5lZAAAAAEAAAALcmV2ZW5ldVR5cGUJAAEsAAAAAgIAAAAQZ2xvYmFsX2Vhcm5pbmdzXwUAAAALcmV2ZW5ldVR5cGUBAAAAEnN0YXRpY0tleV9leHRyYUZlZQAAAAACAAAAD3N0YXRpY19leHRyYUZlZQEAAAARYXNzZXRGYXJtaW5nUG93ZXIAAAACAAAAB2FkZHJlc3MAAAAFYXNzZXQJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIYWRkcmVzc18FAAAAB2FkZHJlc3MCAAAAB19hc3NldF8FAAAABWFzc2V0AgAAAA1fZmFybWluZ1Bvd2VyAQAAABpzdGF0aWNLZXlfd2VhcmFibGVzQWRkcmVzcwAAAAACAAAAF3N0YXRpY193ZWFyYWJsZXNBZGRyZXNzAQAAAAx0cnlHZXRTdHJpbmcAAAABAAAAA2tleQkBAAAAFHRyeUdldFN0cmluZ0V4dGVybmFsAAAAAgUAAAAEdGhpcwUAAAADa2V5AQAAAAlnZXRPcmFjbGUAAAAACQEAAAAHQWRkcmVzcwAAAAEJAAJZAAAAAQkBAAAADHRyeUdldFN0cmluZwAAAAEJAQAAABdzdGF0aWNLZXlfb3JhY2xlQWRkcmVzcwAAAAABAAAAF2dldE11dGFudEJyZWVkZXJBZGRyZXNzAAAAAAkBAAAAB0FkZHJlc3MAAAABCQACWQAAAAEJAQAAABR0cnlHZXRTdHJpbmdFeHRlcm5hbAAAAAIJAQAAAAlnZXRPcmFjbGUAAAAACQEAAAAgc3RhdGljS2V5X211dGFudEluY3ViYXRvckFkZHJlc3MAAAAAAQAAABBnZXRGZWVBZ2dyZWdhdG9yAAAAAAkBAAAAB0FkZHJlc3MAAAABCQACWQAAAAEJAQAAABR0cnlHZXRTdHJpbmdFeHRlcm5hbAAAAAIJAQAAAAlnZXRPcmFjbGUAAAAACQEAAAAXc3RhdGljS2V5X2ZlZUFnZ3JlZ2F0b3IAAAAAAQAAABRnZXRBY2NCb29zdGVyQWRkcmVzcwAAAAAJAQAAAAdBZGRyZXNzAAAAAQkAAlkAAAABCQEAAAAUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwAAAACCQEAAAAJZ2V0T3JhY2xlAAAAAAkBAAAAG3N0YXRpY0tleV9hY2NCb29zdGVyQWRkcmVzcwAAAAABAAAAEmdldEJhYnlkdWNrQWRkcmVzcwAAAAAJAQAAAAdBZGRyZXNzAAAAAQkAAlkAAAABCQEAAAAUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwAAAACCQEAAAAJZ2V0T3JhY2xlAAAAAAkBAAAAGXN0YXRpY0tleV9iYWJ5RHVja0FkZHJlc3MAAAAAAQAAABFnZXRDb3Vwb25zQWRkcmVzcwAAAAAJAQAAAAdBZGRyZXNzAAAAAQkAAlkAAAABCQEAAAAUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwAAAACCQEAAAAJZ2V0T3JhY2xlAAAAAAkBAAAAGHN0YXRpY0tleV9jb3Vwb25zQWRkcmVzcwAAAAABAAAAD2dldFNwaWNlQXNzZXRJZAAAAAAJAAJZAAAAAQkBAAAAFHRyeUdldFN0cmluZ0V4dGVybmFsAAAAAgkBAAAACWdldE9yYWNsZQAAAAAJAQAAABZzdGF0aWNLZXlfc3BpY2VBc3NldElkAAAAAAEAAAANZ2V0RWdnQXNzZXRJZAAAAAAJAAJZAAAAAQkBAAAAFHRyeUdldFN0cmluZ0V4dGVybmFsAAAAAgkBAAAACWdldE9yYWNsZQAAAAAJAQAAABRzdGF0aWNLZXlfZWdnQXNzZXRJZAAAAAABAAAAFWdldFJlZkNvbnRyYWN0QWRkcmVzcwAAAAAJAQAAAAdBZGRyZXNzAAAAAQkAAlkAAAABCQEAAAAUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwAAAACCQEAAAAJZ2V0T3JhY2xlAAAAAAkBAAAAHHN0YXRpY0tleV9yZWZDb250cmFjdEFkZHJlc3MAAAAAAQAAAA5nZXRCdXJuQWRkcmVzcwAAAAAJAQAAAAdBZGRyZXNzAAAAAQkAAlkAAAABCQEAAAAUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwAAAACCQEAAAAJZ2V0T3JhY2xlAAAAAAkBAAAAFXN0YXRpY0tleV9idXJuQWRkcmVzcwAAAAABAAAAD2dldEl0ZW1zQWRkcmVzcwAAAAAJAQAAAAdBZGRyZXNzAAAAAQkAAlkAAAABCQEAAAAUdHJ5R2V0U3RyaW5nRXh0ZXJuYWwAAAACCQEAAAAJZ2V0T3JhY2xlAAAAAAkBAAAAFnN0YXRpY0tleV9pdGVtc0FkZHJlc3MAAAAAAQAAABNnZXRXZWFyYWJsZXNBZGRyZXNzAAAAAAkBAAAAB0FkZHJlc3MAAAABCQACWQAAAAEJAQAAABR0cnlHZXRTdHJpbmdFeHRlcm5hbAAAAAIJAQAAAAlnZXRPcmFjbGUAAAAACQEAAAAac3RhdGljS2V5X3dlYXJhYmxlc0FkZHJlc3MAAAAAAQAAAAphc0ludFR1cGxlAAAAAQAAAAV2YWx1ZQQAAAAHJG1hdGNoMAUAAAAFdmFsdWUDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAACihJbnQsIEludCkEAAAAA2ludAUAAAAHJG1hdGNoMAUAAAADaW50CQAAAgAAAAECAAAAJEZBSTogd3JvbmcgdHlwZSwgZXhwZWN0ZWQ6IChJbnQsSW50KQEAAAAJYXNCb29sZWFuAAAAAQAAAAV2YWx1ZQQAAAAHJG1hdGNoMAUAAAAFdmFsdWUDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAB0Jvb2xlYW4EAAAAB2Jvb2xlYW4FAAAAByRtYXRjaDAFAAAAB2Jvb2xlYW4JAAACAAAAAQIAAAAiRkFCOiB3cm9uZyB0eXBlLCBleHBlY3RlZDogQm9vbGVhbgEAAAAFYXNJbnQAAAABAAAABXZhbHVlBAAAAAckbWF0Y2gwBQAAAAV2YWx1ZQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAADSW50BAAAAANpbnQFAAAAByRtYXRjaDAFAAAAA2ludAkAAAIAAAABAgAAAB5GQUk6IHdyb25nIHR5cGUsIGV4cGVjdGVkOiBJbnQBAAAACGFzUmFyaXR5AAAAAQAAAAV2YWx1ZQQAAAAHJG1hdGNoMAUAAAAFdmFsdWUDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAADShTdHJpbmcsIEludCkEAAAAC3N0ckludFR1cGxlBQAAAAckbWF0Y2gwBQAAAAtzdHJJbnRUdXBsZQkAAAIAAAABAgAAACZCQUk6IHdyb25nIHR5cGUsIGV4cGVjdGVkOiBzdHJJbnRUdXBsZQEAAAAIYXNTdHJpbmcAAAABAAAABXZhbHVlBAAAAAckbWF0Y2gwBQAAAAV2YWx1ZQMJAAABAAAAAgUAAAAHJG1hdGNoMAIAAAAGU3RyaW5nBAAAAAFzBQAAAAckbWF0Y2gwBQAAAAFzAwkAAAEAAAACBQAAAAckbWF0Y2gwAgAAAANJbnQEAAAAAXMFAAAAByRtYXRjaDAJAAACAAAAAQIAAAAmd3JvbmcgdHlwZSwgZXhwZWN0ZWQ6IFN0cmluZywgZ290OiBJbnQDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAABFVuaXQEAAAAAXMFAAAAByRtYXRjaDAJAAACAAAAAQIAAAAnd3JvbmcgdHlwZSwgZXhwZWN0ZWQ6IFN0cmluZywgZ290OiBVbml0CQAAAgAAAAECAAAAHHdyb25nIHR5cGUsIGV4cGVjdGVkOiBTdHJpbmcBAAAADXRyeUdldEludGVnZXIAAAABAAAAA2tleQQAAAAHJG1hdGNoMAkABBoAAAACBQAAAAR0aGlzBQAAAANrZXkDCQAAAQAAAAIFAAAAByRtYXRjaDACAAAAA0ludAQAAAABYgUAAAAHJG1hdGNoMAUAAAABYgAAAAAAAAAAAAEAAAAWY2hlY2tBZGRpdGlvbmFsUGF5bWVudAAAAAEAAAAHcGF5bWVudAMJAQAAAAlpc0RlZmluZWQAAAABCAUAAAAHcGF5bWVudAAAAAdhc3NldElkCQAAAgAAAAECAAAAGUZDQVA6IFBsZWFzZSBhdHRhY2ggd2F2ZXMEAAAACWZlZUFtb3VudAkBAAAAEUBleHRyTmF0aXZlKDEwNTApAAAAAgkBAAAACWdldE9yYWNsZQAAAAAJAQAAABJzdGF0aWNLZXlfZXh0cmFGZWUAAAAAAwkBAAAAAiE9AAAAAggFAAAAB3BheW1lbnQAAAAGYW1vdW50BQAAAAlmZWVBbW91bnQJAAACAAAAAQkAASwAAAACCQABLAAAAAICAAAAHEZDQVA6IFBsZWFzZSBhdHRhY2ggZXhhY3RseSAJAAGkAAAAAQUAAAAJZmVlQW1vdW50AgAAABMgYW1vdW50IG9mIHdhdmVsZXRzCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABBnZXRGZWVBZ2dyZWdhdG9yAAAAAAUAAAAJZmVlQW1vdW50BQAAAAR1bml0BQAAAANuaWwBAAAAEGRldGVybWluZUNsYXNzZXMAAAABAAAACWFzc2V0TmFtZQQAAAAIZ2Vub3R5cGUJAAS1AAAAAgkBAAAACWRyb3BSaWdodAAAAAIJAAEwAAAAAgUAAAAJYXNzZXROYW1lAAAAAAAAAAAFAAAAAAAAAAADAgAAAAAEAAAAB2NsYXNzZXMJAARMAAAAAgkAAZEAAAACBQAAAAhnZW5vdHlwZQAAAAAAAAAAAAkABEwAAAACCQABkQAAAAIFAAAACGdlbm90eXBlAAAAAAAAAAACCQAETAAAAAIJAAGRAAAAAgUAAAAIZ2Vub3R5cGUAAAAAAAAAAAQJAARMAAAAAgkAAZEAAAACBQAAAAhnZW5vdHlwZQAAAAAAAAAABgkABEwAAAACCQABkQAAAAIFAAAACGdlbm90eXBlAAAAAAAAAAAICQAETAAAAAIJAAGRAAAAAgUAAAAIZ2Vub3R5cGUAAAAAAAAAAAoJAARMAAAAAgkAAZEAAAACBQAAAAhnZW5vdHlwZQAAAAAAAAAADAkABEwAAAACCQABkQAAAAIFAAAACGdlbm90eXBlAAAAAAAAAAAOBQAAAANuaWwJAAUUAAAAAgkBAAAAD2NvbnRhaW5zRWxlbWVudAAAAAIFAAAAB2NsYXNzZXMCAAAAAVQJAQAAAA9jb250YWluc0VsZW1lbnQAAAACBQAAAAdjbGFzc2VzAgAAAAFEAQAAABNjYWxjdWxhdGVQZXJjaFByaWNlAAAAAQAAAAdhZGRyZXNzBAAAABFoYXNBcnRlZmFjdFN0YWtlZAkBAAAAFHRyeUdldFN0cmluZ0V4dGVybmFsAAAAAgkBAAAAFGdldEFjY0Jvb3N0ZXJBZGRyZXNzAAAAAAkAASwAAAACCQABLAAAAAICAAAAC0FSVC1YTUlTVExfBQAAAAdhZGRyZXNzAgAAAAZfb3duZXIEAAAACnBlcmNoUHJpY2UJAQAAABFAZXh0ck5hdGl2ZSgxMDUwKQAAAAIJAQAAAAlnZXRPcmFjbGUAAAAACQEAAAAVc3RhdGljS2V5X211dGFyaXVtRmVlAAAAAAMJAAAAAAAAAgUAAAARaGFzQXJ0ZWZhY3RTdGFrZWQCAAAAAAUAAAAKcGVyY2hQcmljZQkAAGgAAAACCQAAaQAAAAIFAAAACnBlcmNoUHJpY2UAAAAAAAAAAAoAAAAAAAAAAAkBAAAAEnVwZGF0ZUZhcm1pbmdQb3dlcgAAAAMAAAAHYWRkcmVzcwAAAAVhc3NldAAAAAtyZXZlbmV1VHlwZQQAAAALdG90YWxTdGFrZWQJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkBAAAADnRvdGFsU3Rha2VkS2V5AAAAAQUAAAALcmV2ZW5ldVR5cGUEAAAAD3RvdGFsU3Rha2VkVXNlcgkBAAAADXRyeUdldEludGVnZXIAAAABCQEAAAASdG90YWxTdGFrZWRVc2VyS2V5AAAAAgUAAAAHYWRkcmVzcwUAAAALcmV2ZW5ldVR5cGUEAAAACWN1cnJlbnRGUAkBAAAADXRyeUdldEludGVnZXIAAAABCQEAAAARYXNzZXRGYXJtaW5nUG93ZXIAAAACBQAAAAdhZGRyZXNzBQAAAAVhc3NldAQAAAAFbmV3RlAJAQAAAAphc0ludFR1cGxlAAAAAQkAA/wAAAAEBQAAAAR0aGlzAgAAABJjYWxjdWxhdGVGYXJtUG93ZXIJAARMAAAAAgUAAAAFYXNzZXQFAAAAA25pbAUAAAADbmlsAwkBAAAAAiE9AAAAAgUAAAAJY3VycmVudEZQAAAAAAAAAAAACQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAAOdG90YWxTdGFrZWRLZXkAAAABBQAAAAtyZXZlbmV1VHlwZQkAAGQAAAACCQAAZQAAAAIFAAAAC3RvdGFsU3Rha2VkBQAAAAljdXJyZW50RlAIBQAAAAVuZXdGUAAAAAJfMQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAEnRvdGFsU3Rha2VkVXNlcktleQAAAAIFAAAAB2FkZHJlc3MFAAAAC3JldmVuZXVUeXBlCQAAZAAAAAIJAABlAAAAAgUAAAAPdG90YWxTdGFrZWRVc2VyBQAAAAljdXJyZW50RlAIBQAAAAVuZXdGUAAAAAJfMQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAEWFzc2V0RmFybWluZ1Bvd2VyAAAAAgUAAAAHYWRkcmVzcwUAAAAFYXNzZXQIBQAAAAVuZXdGUAAAAAJfMQUAAAADbmlsBQAAAANuaWwBAAAAEmNsYWltU3Rha2luZ1Jlc3VsdAAAAAQAAAAHYWRkcmVzcwAAAAdhc3NldElkAAAABnJlY2FsYwAAAAtyZXZlbmV1VHlwZQQAAAAPY3VycmVudEludGVyZXN0CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAQAAABVrZXlHbG9iYWxMYXN0SW50ZXJlc3QAAAABBQAAAAtyZXZlbmV1VHlwZQQAAAARbGFzdENoZWNrSW50ZXJlc3QJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkBAAAAFGtleUxhc3RDaGVja0ludGVyZXN0AAAAAwUAAAAHYWRkcmVzcwUAAAAHYXNzZXRJZAUAAAALcmV2ZW5ldVR5cGUEAAAADHN0YWtlZEFtb3VudAkBAAAADXRyeUdldEludGVnZXIAAAABCQEAAAARYXNzZXRGYXJtaW5nUG93ZXIAAAACBQAAAAdhZGRyZXNzBQAAAAdhc3NldElkBAAAAAhmcFVwZGF0ZQMFAAAABnJlY2FsYwkBAAAAEnVwZGF0ZUZhcm1pbmdQb3dlcgAAAAMFAAAAB2FkZHJlc3MFAAAAB2Fzc2V0SWQFAAAAC3JldmVuZXVUeXBlBQAAAANuaWwDCQAAAAAAAAIFAAAACGZwVXBkYXRlBQAAAAhmcFVwZGF0ZQQAAAAGcmV3YXJkAwkAAGYAAAACBQAAABFsYXN0Q2hlY2tJbnRlcmVzdAAAAAAAAAAAAAkAAGsAAAADCQAAZQAAAAIFAAAAD2N1cnJlbnRJbnRlcmVzdAUAAAARbGFzdENoZWNrSW50ZXJlc3QFAAAADHN0YWtlZEFtb3VudAUAAAAFU2NhbGUAAAAAAAAAAAAEAAAADnNwZWNpZmlxdWVLZXlzAwkAAAAAAAACBQAAAAtyZXZlbmV1VHlwZQIAAAAFU1BJQ0UJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAAEUBleHRyTmF0aXZlKDEwNjIpAAAAAQUAAAAHYWRkcmVzcwUAAAAGcmV3YXJkCQEAAAAPZ2V0U3BpY2VBc3NldElkAAAAAAUAAAADbmlsAwkAAAAAAAACBQAAAAtyZXZlbmV1VHlwZQIAAAADRUdHCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAABFAZXh0ck5hdGl2ZSgxMDYyKQAAAAEFAAAAB2FkZHJlc3MFAAAABnJld2FyZAkBAAAADWdldEVnZ0Fzc2V0SWQAAAAABQAAAANuaWwDCQAAAAAAAAIFAAAAC3JldmVuZXVUeXBlAgAAAARGRUVEBAAAAAxpbnZva2VSZXN1bHQDCQAAZgAAAAIFAAAABnJld2FyZAAAAAAAAAAAAAkAA/wAAAAECQEAAAAUZ2V0QWNjQm9vc3RlckFkZHJlc3MAAAAAAgAAAAxhZGRGZWVkTGltaXQJAARMAAAAAgUAAAAGcmV3YXJkCQAETAAAAAIFAAAAB2FkZHJlc3MFAAAAA25pbAUAAAADbmlsBQAAAAR1bml0AwkAAAAAAAACBQAAAAxpbnZva2VSZXN1bHQFAAAADGludm9rZVJlc3VsdAUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgMJAAAAAAAAAgUAAAALcmV2ZW5ldVR5cGUCAAAABFZFR0cEAAAADGludm9rZVJlc3VsdAMJAABmAAAAAgUAAAAGcmV3YXJkAAAAAAAAAAAACQAD/AAAAAQJAQAAABFnZXRDb3Vwb25zQWRkcmVzcwAAAAACAAAAEWFkZENvdXBvbnNGYXJtaW5nCQAETAAAAAIFAAAAB2FkZHJlc3MJAARMAAAAAgUAAAAGcmV3YXJkBQAAAANuaWwFAAAAA25pbAUAAAAEdW5pdAMJAAAAAAAAAgUAAAAMaW52b2tlUmVzdWx0BQAAAAxpbnZva2VSZXN1bHQFAAAAA25pbAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAATVW5rbm93biByZXZlbmV1VHlwZQkABE4AAAACCQAETgAAAAIJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAABRrZXlMYXN0Q2hlY2tJbnRlcmVzdAAAAAMFAAAAB2FkZHJlc3MFAAAAB2Fzc2V0SWQFAAAAC3JldmVuZXVUeXBlBQAAAA9jdXJyZW50SW50ZXJlc3QJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAABByZXdhcmRDbGFpbWVkS2V5AAAAAwUAAAAHYWRkcmVzcwUAAAAHYXNzZXRJZAUAAAALcmV2ZW5ldVR5cGUJAABkAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABCQEAAAAQcmV3YXJkQ2xhaW1lZEtleQAAAAMFAAAAB2FkZHJlc3MFAAAAB2Fzc2V0SWQFAAAAC3JldmVuZXVUeXBlBQAAAAZyZXdhcmQFAAAAA25pbAUAAAAIZnBVcGRhdGUFAAAADnNwZWNpZmlxdWVLZXlzCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgEAAAASc2V0S2V5c1JldmVuZXVUeXBlAAAABAAAAAdhZGRyZXNzAAAAB2Fzc2V0SWQAAAALcmV2ZW5ldVR5cGUAAAACZnAJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAAA50b3RhbFN0YWtlZEtleQAAAAEFAAAAC3JldmVuZXVUeXBlCQAAZAAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkBAAAADnRvdGFsU3Rha2VkS2V5AAAAAQUAAAALcmV2ZW5ldVR5cGUFAAAAAmZwCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAASdG90YWxTdGFrZWRVc2VyS2V5AAAAAgUAAAAHYWRkcmVzcwUAAAALcmV2ZW5ldVR5cGUJAABkAAAAAgkBAAAADXRyeUdldEludGVnZXIAAAABCQEAAAASdG90YWxTdGFrZWRVc2VyS2V5AAAAAgUAAAAHYWRkcmVzcwUAAAALcmV2ZW5ldVR5cGUFAAAAAmZwBQAAAANuaWwBAAAAFXVwZGF0ZUtleXNSZXZlbmV1VHlwZQAAAAQAAAAHYWRkcmVzcwAAAAdhc3NldElkAAAAC3JldmVuZXVUeXBlAAAAAmZwCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAAOdG90YWxTdGFrZWRLZXkAAAABBQAAAAtyZXZlbmV1VHlwZQkAAGUAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAQAAAA50b3RhbFN0YWtlZEtleQAAAAEFAAAAC3JldmVuZXVUeXBlBQAAAAJmcAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAEnRvdGFsU3Rha2VkVXNlcktleQAAAAIFAAAAB2FkZHJlc3MFAAAAC3JldmVuZXVUeXBlCQAAZQAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkBAAAAEnRvdGFsU3Rha2VkVXNlcktleQAAAAIFAAAAB2FkZHJlc3MFAAAAC3JldmVuZXVUeXBlBQAAAAJmcAUAAAADbmlsAQAAABpkZXRlck1pbmVDbGFzc0FuZENsYWltVHlwZQAAAAQAAAAHYWRkcmVzcwAAAAdhc3NldElkAAAACWFzc2V0TmFtZQAAAAZyZWNhbGMEAAAACyR0MDg2ODI4NzI2CQEAAAAQZGV0ZXJtaW5lQ2xhc3NlcwAAAAEFAAAACWFzc2V0TmFtZQQAAAADaXNUCAUAAAALJHQwODY4Mjg3MjYAAAACXzEEAAAAA2lzRAgFAAAACyR0MDg2ODI4NzI2AAAAAl8yBAAAAAV0S2V5cwMFAAAAA2lzVAkABE4AAAACCQEAAAASY2xhaW1TdGFraW5nUmVzdWx0AAAABAUAAAAHYWRkcmVzcwUAAAAHYXNzZXRJZAUAAAAGcmVjYWxjAgAAAAVTUElDRQkBAAAAEmNsYWltU3Rha2luZ1Jlc3VsdAAAAAQFAAAAB2FkZHJlc3MFAAAAB2Fzc2V0SWQFAAAABnJlY2FsYwIAAAAERkVFRAUAAAADbmlsBAAAAAVkS2V5cwMFAAAAA2lzRAkABE4AAAACCQEAAAASY2xhaW1TdGFraW5nUmVzdWx0AAAABAUAAAAHYWRkcmVzcwUAAAAHYXNzZXRJZAUAAAAGcmVjYWxjAgAAAANFR0cJAQAAABJjbGFpbVN0YWtpbmdSZXN1bHQAAAAEBQAAAAdhZGRyZXNzBQAAAAdhc3NldElkBQAAAAZyZWNhbGMCAAAABFZFR0cFAAAAA25pbAkABE4AAAACBQAAAAV0S2V5cwUAAAAFZEtleXMBAAAAGGRldGVyTWluZUNsYXNzQW5kU2V0VHlwZQAAAAQAAAAHYWRkcmVzcwAAAAdhc3NldElkAAAAAmZwAAAACWFzc2V0TmFtZQQAAAALJHQwOTE1NzkyMDEJAQAAABBkZXRlcm1pbmVDbGFzc2VzAAAAAQUAAAAJYXNzZXROYW1lBAAAAANpc1QIBQAAAAskdDA5MTU3OTIwMQAAAAJfMQQAAAADaXNECAUAAAALJHQwOTE1NzkyMDEAAAACXzIEAAAABXRLZXlzAwUAAAADaXNUCQAETgAAAAIJAQAAABJzZXRLZXlzUmV2ZW5ldVR5cGUAAAAEBQAAAAdhZGRyZXNzBQAAAAdhc3NldElkAgAAAAVTUElDRQUAAAACZnAJAQAAABJzZXRLZXlzUmV2ZW5ldVR5cGUAAAAEBQAAAAdhZGRyZXNzBQAAAAdhc3NldElkAgAAAARGRUVEBQAAAAJmcAUAAAADbmlsBAAAAAVkS2V5cwMFAAAAA2lzRAkABE4AAAACCQEAAAASc2V0S2V5c1JldmVuZXVUeXBlAAAABAUAAAAHYWRkcmVzcwUAAAAHYXNzZXRJZAIAAAADRUdHBQAAAAJmcAkBAAAAEnNldEtleXNSZXZlbmV1VHlwZQAAAAQFAAAAB2FkZHJlc3MFAAAAB2Fzc2V0SWQCAAAABFZFR0cFAAAAAmZwBQAAAANuaWwJAAROAAAAAgUAAAAFdEtleXMFAAAABWRLZXlzAQAAABtkZXRlck1pbmVDbGFzc0FuZFVwZGF0ZVR5cGUAAAAEAAAAB2FkZHJlc3MAAAAHYXNzZXRJZAAAAAJmcAAAAAlhc3NldE5hbWUEAAAACyR0MDk2MjE5NjY1CQEAAAAQZGV0ZXJtaW5lQ2xhc3NlcwAAAAEFAAAACWFzc2V0TmFtZQQAAAADaXNUCAUAAAALJHQwOTYyMTk2NjUAAAACXzEEAAAAA2lzRAgFAAAACyR0MDk2MjE5NjY1AAAAAl8yBAAAAAV0S2V5cwMFAAAAA2lzVAkABE4AAAACCQEAAAAVdXBkYXRlS2V5c1JldmVuZXVUeXBlAAAABAUAAAAHYWRkcmVzcwUAAAAHYXNzZXRJZAIAAAAFU1BJQ0UFAAAAAmZwCQEAAAAVdXBkYXRlS2V5c1JldmVuZXVUeXBlAAAABAUAAAAHYWRkcmVzcwUAAAAHYXNzZXRJZAIAAAAERkVFRAUAAAACZnAFAAAAA25pbAQAAAAFZEtleXMDBQAAAANpc0QJAAROAAAAAgkBAAAAFXVwZGF0ZUtleXNSZXZlbmV1VHlwZQAAAAQFAAAAB2FkZHJlc3MFAAAAB2Fzc2V0SWQCAAAAA0VHRwUAAAACZnAJAQAAABV1cGRhdGVLZXlzUmV2ZW5ldVR5cGUAAAAEBQAAAAdhZGRyZXNzBQAAAAdhc3NldElkAgAAAARWRUdHBQAAAAJmcAUAAAADbmlsCQAETgAAAAIFAAAABXRLZXlzBQAAAAVkS2V5cwEAAAASaGFuZGxlU3Rha2luZ1RvcFVwAAAAAgAAAAZhbW91bnQAAAALcmV2ZW5ldVR5cGUEAAAAD2N1cnJlbnRJbnRlcmVzdAkBAAAADXRyeUdldEludGVnZXIAAAABCQEAAAAVa2V5R2xvYmFsTGFzdEludGVyZXN0AAAAAQUAAAALcmV2ZW5ldVR5cGUEAAAAEXRvdGFsU3Rha2VkQW1vdW50CQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAQAAAA50b3RhbFN0YWtlZEtleQAAAAEFAAAAC3JldmVuZXVUeXBlBAAAAA1pbnRlcmVzdERlbHRhAwkAAGYAAAACBQAAABF0b3RhbFN0YWtlZEFtb3VudAAAAAAAAAAAAAkAAGsAAAADBQAAAAZhbW91bnQFAAAABVNjYWxlBQAAABF0b3RhbFN0YWtlZEFtb3VudAAAAAAAAAAAAAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAD2tleUdsb2JhbEVhcm5lZAAAAAEFAAAAC3JldmVuZXVUeXBlCQAAZAAAAAIJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQkBAAAAD2tleUdsb2JhbEVhcm5lZAAAAAEFAAAAC3JldmVuZXVUeXBlBQAAAAZhbW91bnQJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAABVrZXlHbG9iYWxMYXN0SW50ZXJlc3QAAAABBQAAAAtyZXZlbmV1VHlwZQkAAGQAAAACBQAAAA9jdXJyZW50SW50ZXJlc3QFAAAADWludGVyZXN0RGVsdGEFAAAAA25pbAAAAAgAAAABaQEAAAAPY29uZmlndXJlT3JhY2xlAAAAAQAAAAZvcmFjbGUDCQEAAAACIT0AAAACCAUAAAABaQAAAAZjYWxsZXIFAAAABHRoaXMJAAACAAAAAQIAAAAPQUNPOiBhZG1pbiBvbmx5CQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAICAAAAFHN0YXRpY19vcmFjbGVBZGRyZXNzBQAAAAZvcmFjbGUFAAAAA25pbAAAAAFpAQAAABJjYWxjdWxhdGVGYXJtUG93ZXIAAAABAAAAB2Fzc2V0SWQDCQEAAAABIQAAAAEJAAAAAAAAAggJAQAAAAV2YWx1ZQAAAAEJAAPsAAAAAQkAAlkAAAABBQAAAAdhc3NldElkAAAABmlzc3VlcgkBAAAAF2dldE11dGFudEJyZWVkZXJBZGRyZXNzAAAAAAkAAAIAAAABAgAAACdUaGlzIGRvZXMgbm90IHNlZW0gbGlrZSBhIHZhbGlkIE11dGFudCEEAAAACWFzc2V0TmFtZQgJAQAAAAV2YWx1ZQAAAAEJAAPsAAAAAQkAAlkAAAABBQAAAAdhc3NldElkAAAAC2Rlc2NyaXB0aW9uBAAAAA5hc1Jhcml0eVJlc3VsdAkBAAAACGFzUmFyaXR5AAAAAQkAA/wAAAAECQEAAAAXZ2V0TXV0YW50QnJlZWRlckFkZHJlc3MAAAAAAgAAAAlnZXRSYXJpdHkJAARMAAAAAgUAAAAJYXNzZXROYW1lBQAAAANuaWwFAAAAA25pbAMJAAAAAAAAAgUAAAAOYXNSYXJpdHlSZXN1bHQFAAAADmFzUmFyaXR5UmVzdWx0BAAAAAp0b3RhbEdlbmVzCQAAaQAAAAIJAAGQAAAAAQkABLUAAAACCQEAAAAJZHJvcFJpZ2h0AAAAAggFAAAADmFzUmFyaXR5UmVzdWx0AAAAAl8xAAAAAAAAAAACAgAAAAAAAAAAAAAAAAIEAAAABXBvd2VyCQAAbAAAAAYAAAAAAAAAAA8AAAAAAAAAAAEFAAAACnRvdGFsR2VuZXMAAAAAAAAAAAAAAAAAAAAAAAIFAAAABERPV04EAAAACm11bHRpcGxpZXIJAABpAAAAAgkAAGgAAAACCQAAZQAAAAIFAAAABmhlaWdodAAAAAAAADk4cAAAAAAAAAAAZAkAAGgAAAACCQAAaAAAAAIJAABoAAAAAgAAAAAAAAAAPAAAAAAAAAAAGAAAAAAAAAAAHgAAAAAAAAAAAwQAAAAJYmFzZVBvd2VyCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgUAAAAHYXNzZXRJZAIAAAAKX2Jhc2VQb3dlcgQAAAAKZmluYWxQb3dlcgMJAABmAAAAAgUAAAAJYmFzZVBvd2VyAAAAAAAAAAAABQAAAAliYXNlUG93ZXIJAABpAAAAAgkAAGgAAAACBQAAAAVwb3dlcgUAAAAKbXVsdGlwbGllcgAAAAAAAAAAZAQAAAAQZmluYWxQb3dlclJhcml0eQkAAGkAAAACCQAAaAAAAAIFAAAACmZpbmFsUG93ZXIIBQAAAA5hc1Jhcml0eVJlc3VsdAAAAAJfMgAAAAAAAAAAZAQAAAAJZmFybUJvb3N0AAAAAAAAAAAAAwkAAAAAAAACBQAAAAlmYXJtQm9vc3QFAAAACWZhcm1Cb29zdAQAAAAOd2VhcmFibGVkQm9vc3QJAQAAAAVhc0ludAAAAAEJAAP8AAAABAkBAAAAE2dldFdlYXJhYmxlc0FkZHJlc3MAAAAAAgAAABZjYWxjdWxhdGVXZWFyYmxlc0Jvb3N0CQAETAAAAAIFAAAAB2Fzc2V0SWQFAAAAA25pbAUAAAADbmlsAwkAAAAAAAACBQAAAA53ZWFyYWJsZWRCb29zdAUAAAAOd2VhcmFibGVkQm9vc3QEAAAAFWZpbmFsUG93ZXJSYXJpdHlCb29zdAkAAGQAAAACCQAAZAAAAAIFAAAAEGZpbmFsUG93ZXJSYXJpdHkJAABpAAAAAgkAAGgAAAACBQAAABBmaW5hbFBvd2VyUmFyaXR5BQAAAAlmYXJtQm9vc3QAAAAAAAAAAGQJAABpAAAAAgkAAGgAAAACBQAAABBmaW5hbFBvd2VyUmFyaXR5BQAAAA53ZWFyYWJsZWRCb29zdAAAAAAAAAAD6AkABRQAAAACBQAAAANuaWwJAAUUAAAAAgUAAAAVZmluYWxQb3dlclJhcml0eUJvb3N0BQAAAApmaW5hbFBvd2VyCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuAAAAAWkBAAAAD3JlZGVlbU11dHVhcml1bQAAAAAEAAAADHZhbGlkUGF5bWVudAkBAAAAFmNoZWNrQWRkaXRpb25hbFBheW1lbnQAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAABAwkBAAAAASEAAAABAwkAAAAAAAACCQABkAAAAAEIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAACCQAAAAAAAAIICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAAAAAAAAAAAAQcJAAACAAAAAQIAAAAPSW52YWxpZCBwYXltZW50BAAAAAdhc3NldElkCQEAAAAFdmFsdWUAAAABCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAdhc3NldElkBAAAAAxhcnRlZmFjdE5hbWUJAQAAAAhhc1N0cmluZwAAAAEJAAP8AAAABAkBAAAAD2dldEl0ZW1zQWRkcmVzcwAAAAACAAAAFGNoZWNrQXJ0ZWZhY3REZXRhaWxzCQAETAAAAAIJAAJYAAAAAQUAAAAHYXNzZXRJZAUAAAADbmlsBQAAAANuaWwDCQAAAAAAAAIFAAAADGFydGVmYWN0TmFtZQUAAAAMYXJ0ZWZhY3ROYW1lAwkBAAAAASEAAAABCQEAAAAIY29udGFpbnMAAAACBQAAAAxhcnRlZmFjdE5hbWUCAAAADUFSVC1NVVRBUklVTS0JAAACAAAAAQIAAAAvWW91IGNhbid0IHVzZSB0aGlzIGFydGFmZWN0IHRvIHJlZGVlbSBtdXRhcml1bSEEAAAABWNvbG9yCQEAAAAJdGFrZVJpZ2h0AAAAAgUAAAAMYXJ0ZWZhY3ROYW1lAAAAAAAAAAABBAAAAA5wZXJjaEFtb3VudEtleQkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIYWRkcmVzc18JAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyAgAAABNfbXV0YXJpdW1BdmFpbGFibGVfBQAAAAVjb2xvcgQAAAALcGVyY2hBbW91bnQJAQAAAA10cnlHZXRJbnRlZ2VyAAAAAQUAAAAOcGVyY2hBbW91bnRLZXkJAAROAAAAAgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgUAAAAOcGVyY2hBbW91bnRLZXkJAABkAAAAAgUAAAALcGVyY2hBbW91bnQAAAAAAAAAAAEJAARMAAAAAgkBAAAABEJ1cm4AAAACBQAAAAdhc3NldElkAAAAAAAAAAABBQAAAANuaWwFAAAADHZhbGlkUGF5bWVudAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAABaQEAAAAMYnV5TXV0dWFyaXVtAAAAAgAAAAVjb2xvcgAAAA5yZWZlcmVyQWRkcmVzcwQAAAAMdmFsaWRQYXltZW50CQEAAAAWY2hlY2tBZGRpdGlvbmFsUGF5bWVudAAAAAEJAAGRAAAAAggFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAADCQAAAAAAAAIFAAAADHZhbGlkUGF5bWVudAUAAAAMdmFsaWRQYXltZW50AwkBAAAAAiE9AAAAAgkABE8AAAACCQAETAAAAAICAAAAAUQJAARMAAAAAgIAAAABRwUAAAADbmlsBQAAAAVjb2xvcgUAAAAEdW5pdAkAAAIAAAABAgAAAB15b3UgY2FuIG5vdCBidXkgdGhpcyBNdXRhcml1bQMJAAAAAAAAAgkABE8AAAACCQAETAAAAAICAAAAAUEJAARMAAAAAgIAAAABQgkABEwAAAACAgAAAAFDBQAAAANuaWwFAAAABWNvbG9yBQAAAAR1bml0CQAAAgAAAAECAAAAHnlvdSBuZWVkIHRvIHNldCBjb2xvciBwcm9wZXJseQQAAAAKZXhhY3RQcmljZQkBAAAAE2NhbGN1bGF0ZVBlcmNoUHJpY2UAAAABCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgQAAAAJbGVmdFRvUGF5AwkAAAAAAAACCAUAAAABaQAAAAxvcmlnaW5DYWxsZXIIBQAAAAFpAAAABmNhbGxlcgQAAAATYW1vdW50UGFpZEJ5Q291cG9ucwkBAAAABWFzSW50AAAAAQkAA/wAAAAECQEAAAARZ2V0Q291cG9uc0FkZHJlc3MAAAAAAgAAAAp1c2VDb3Vwb25zCQAETAAAAAIFAAAACmV4YWN0UHJpY2UFAAAAA25pbAUAAAADbmlsAwkAAAAAAAACBQAAABNhbW91bnRQYWlkQnlDb3Vwb25zBQAAABNhbW91bnRQYWlkQnlDb3Vwb25zCQAAZQAAAAIFAAAACmV4YWN0UHJpY2UFAAAAE2Ftb3VudFBhaWRCeUNvdXBvbnMJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuBQAAAApleGFjdFByaWNlBAAAAAdwYXltZW50AwkBAAAAAiE9AAAAAgUAAAAJbGVmdFRvUGF5AAAAAAAAAAAAAwkBAAAAAiE9AAAAAgkAAZAAAAABCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAgkAAAIAAAABAgAAAB1Zb3UgbmVlZCB0byBhdHRhY2ggMiBwYXltZW50cwQAAAAMZmlyc3RQYXltZW50CQEAAAAFdmFsdWUAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAABAwkBAAAAAiE9AAAAAggFAAAADGZpcnN0UGF5bWVudAAAAAdhc3NldElkCQEAAAANZ2V0RWdnQXNzZXRJZAAAAAAJAAACAAAAAQkAASwAAAACAgAAAEFGQlA6IFlvdSBjYW4gYXR0YWNoIG9ubHkgRUdHIHRva2VucyB3aXRoIHRoZSBmb2xsb3dpbmcgYXNzZXQgaWQ6IAkAAlgAAAABCQEAAAANZ2V0RWdnQXNzZXRJZAAAAAADCQEAAAACIT0AAAACCAUAAAAMZmlyc3RQYXltZW50AAAABmFtb3VudAUAAAAJbGVmdFRvUGF5CQAAAgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAASEZCUDogVG8gYnV5IGEgcGVyY2ggeW91IGN1cnJlbnRseSBuZWVkIHRoZSBmb2xsb3dpbmcgYW1vdW50IG9mIEVHR2xldHM6IAkAAaQAAAABBQAAAAlsZWZ0VG9QYXkCAAAAASAJAAQlAAAAAQgFAAAAAWkAAAAGY2FsbGVyBAAAABVyZWZlcmVyUmV3YXJkRm9yUGVyY2gJAABrAAAAAwUAAAAJbGVmdFRvUGF5AAAAAAAAAAAFAAAAAAAAAABkBAAAAAdyZWZDYWxsCQEAAAAJYXNCb29sZWFuAAAAAQkAA/wAAAAECQEAAAAVZ2V0UmVmQ29udHJhY3RBZGRyZXNzAAAAAAIAAAAKcmVmUGF5bWVudAkABEwAAAACBQAAAA5yZWZlcmVyQWRkcmVzcwUAAAADbmlsCQAETAAAAAIJAQAAAA9BdHRhY2hlZFBheW1lbnQAAAACCQEAAAANZ2V0RWdnQXNzZXRJZAAAAAAFAAAAFXJlZmVyZXJSZXdhcmRGb3JQZXJjaAUAAAADbmlsAwkAAAAAAAACBQAAAAdyZWZDYWxsBQAAAAdyZWZDYWxsBAAAAAZ0b0J1cm4DBQAAAAdyZWZDYWxsCQAAZQAAAAIFAAAACWxlZnRUb1BheQUAAAAVcmVmZXJlclJld2FyZEZvclBlcmNoBQAAAAlsZWZ0VG9QYXkEAAAACGJ1cm5DYWxsCQAD/AAAAAQJAQAAAA5nZXRCdXJuQWRkcmVzcwAAAAACAAAAFGJ1cm5BdHRhY2hlZFBheW1lbnRzBQAAAANuaWwJAARMAAAAAgkBAAAAD0F0dGFjaGVkUGF5bWVudAAAAAIJAQAAAA1nZXRFZ2dBc3NldElkAAAAAAUAAAAGdG9CdXJuBQAAAANuaWwDCQAAAAAAAAIFAAAACGJ1cm5DYWxsBQAAAAhidXJuQ2FsbAUAAAAJbGVmdFRvUGF5CQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAAAAAAAAAADCQAAAAAAAAIFAAAAB3BheW1lbnQFAAAAB3BheW1lbnQEAAAADnBlcmNoQW1vdW50S2V5CQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhhZGRyZXNzXwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXICAAAAE19tdXRhcml1bUF2YWlsYWJsZV8FAAAABWNvbG9yBAAAAAtwZXJjaEFtb3VudAkBAAAADXRyeUdldEludGVnZXIAAAABBQAAAA5wZXJjaEFtb3VudEtleQkABE4AAAACCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACBQAAAA5wZXJjaEFtb3VudEtleQkAAGQAAAACBQAAAAtwZXJjaEFtb3VudAAAAAAAAAAAAQUAAAADbmlsBQAAAAx2YWxpZFBheW1lbnQJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFpAQAAAAhzdGFrZU5GVAAAAAAEAAAADHZhbGlkUGF5bWVudAkBAAAAFmNoZWNrQWRkaXRpb25hbFBheW1lbnQAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAwkAAAAAAAACBQAAAAx2YWxpZFBheW1lbnQFAAAADHZhbGlkUGF5bWVudAQAAAADcG10CQEAAAAFdmFsdWUAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAABBAAAAAdhc3NldElkCQEAAAAFdmFsdWUAAAABCAUAAAADcG10AAAAB2Fzc2V0SWQEAAAACWFzc2V0TmFtZQkBAAAABXZhbHVlAAAAAQgJAQAAAAV2YWx1ZQAAAAEJAAPsAAAAAQUAAAAHYXNzZXRJZAAAAAtkZXNjcmlwdGlvbgQAAAAHYWRkcmVzcwkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIEAAAABWNvbG9yCQEAAAAJdGFrZVJpZ2h0AAAAAgUAAAAJYXNzZXROYW1lAAAAAAAAAAABBAAAABBhdmFpbGFibGVQZXJjaGVzCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGFkZHJlc3NfBQAAAAdhZGRyZXNzAgAAABNfbXV0YXJpdW1BdmFpbGFibGVfBQAAAAVjb2xvcgQAAAAHcGVyY2hlcwMJAABnAAAAAgAAAAAAAAAAAAUAAAAQYXZhaWxhYmxlUGVyY2hlcwkAAAIAAAABCQABLAAAAAICAAAAI25vIHBlcmNoZXMgYXZhaWxhYmxlIGZvciB0aGUgY29sb3IgBQAAAAVjb2xvcgkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIYWRkcmVzc18FAAAAB2FkZHJlc3MCAAAAE19tdXRhcml1bUF2YWlsYWJsZV8FAAAABWNvbG9yCQAAZQAAAAIFAAAAEGF2YWlsYWJsZVBlcmNoZXMAAAAAAAAAAAEJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAhhZGRyZXNzXwUAAAAHYWRkcmVzcwIAAAAHX2Fzc2V0XwkAAlgAAAABBQAAAAdhc3NldElkAgAAAAtfcGVyY2hDb2xvcgUAAAAFY29sb3IFAAAAA25pbAMJAQAAAAIhPQAAAAIIBQAAAANwbXQAAAAGYW1vdW50AAAAAAAAAAABCQAAAgAAAAECAAAAE05GVCBpcyBub3QgYXR0YWNoZWQEAAAADGZhcm1pbmdQb3dlcgkBAAAACmFzSW50VHVwbGUAAAABCQAD/AAAAAQFAAAABHRoaXMCAAAAEmNhbGN1bGF0ZUZhcm1Qb3dlcgkABEwAAAACCQACWAAAAAEFAAAAB2Fzc2V0SWQFAAAAA25pbAUAAAADbmlsAwkAAAAAAAACBQAAAAxmYXJtaW5nUG93ZXIFAAAADGZhcm1pbmdQb3dlcgQAAAAGcmVzdWx0CQEAAAAaZGV0ZXJNaW5lQ2xhc3NBbmRDbGFpbVR5cGUAAAAEBQAAAAdhZGRyZXNzCQACWAAAAAEFAAAAB2Fzc2V0SWQFAAAACWFzc2V0TmFtZQcDCQAAAAAAAAIFAAAABnJlc3VsdAUAAAAGcmVzdWx0CQAETgAAAAIJAAROAAAAAgkABE4AAAACCQAETgAAAAIJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkAASwAAAACCQACWAAAAAEFAAAAB2Fzc2V0SWQCAAAABl9vd25lcgUAAAAHYWRkcmVzcwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQACWAAAAAEFAAAAB2Fzc2V0SWQCAAAACl9iYXNlUG93ZXIIBQAAAAxmYXJtaW5nUG93ZXIAAAACXzIJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAABFhc3NldEZhcm1pbmdQb3dlcgAAAAIFAAAAB2FkZHJlc3MJAAJYAAAAAQUAAAAHYXNzZXRJZAgFAAAADGZhcm1pbmdQb3dlcgAAAAJfMgUAAAADbmlsCQEAAAAYZGV0ZXJNaW5lQ2xhc3NBbmRTZXRUeXBlAAAABAUAAAAHYWRkcmVzcwUAAAAHYXNzZXRJZAgFAAAADGZhcm1pbmdQb3dlcgAAAAJfMgUAAAAJYXNzZXROYW1lBQAAAAx2YWxpZFBheW1lbnQFAAAAB3BlcmNoZXMFAAAABnJlc3VsdAkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4JAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFpAQAAAAt0b3BVcFJld2FyZAAAAAIAAAALcmV2ZW5ldVR5cGUAAAAGYW1vdW50AwkAAAAAAAACBQAAAAtyZXZlbmV1VHlwZQIAAAAFU1BJQ0UDCQEAAAACIT0AAAACCAkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAAAAAdhc3NldElkCQEAAAAPZ2V0U3BpY2VBc3NldElkAAAAAAkAAAIAAAABAgAAABRQbGVhc2UgYXR0YWNoIHNwaWNlIQkBAAAAEmhhbmRsZVN0YWtpbmdUb3BVcAAAAAIICQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAAAABmFtb3VudAUAAAALcmV2ZW5ldVR5cGUDCQAAAAAAAAIFAAAAC3JldmVuZXVUeXBlAgAAAANFR0cEAAAADGZpcnN0UGF5bWVudAkBAAAABXZhbHVlAAAAAQkAAZEAAAACCAUAAAABaQAAAAhwYXltZW50cwAAAAAAAAAAAAMJAQAAAAIhPQAAAAIIBQAAAAxmaXJzdFBheW1lbnQAAAAHYXNzZXRJZAkBAAAADWdldEVnZ0Fzc2V0SWQAAAAACQAAAgAAAAEJAAEsAAAAAgIAAABBRkJQOiBZb3UgY2FuIGF0dGFjaCBvbmx5IEVHRyB0b2tlbnMgd2l0aCB0aGUgZm9sbG93aW5nIGFzc2V0IGlkOiAJAAJYAAAAAQkBAAAADWdldEVnZ0Fzc2V0SWQAAAAACQEAAAASaGFuZGxlU3Rha2luZ1RvcFVwAAAAAggFAAAADGZpcnN0UGF5bWVudAAAAAZhbW91bnQFAAAAC3JldmVuZXVUeXBlAwkAAAAAAAACBQAAAAtyZXZlbmV1VHlwZQIAAAAERkVFRAMJAQAAAAIhPQAAAAIIBQAAAAFpAAAABmNhbGxlcgkBAAAAFGdldEFjY0Jvb3N0ZXJBZGRyZXNzAAAAAAkAAAIAAAABAgAAAChWRlRVUDogT25seSBhY2NCb29zdGVyRGFwcCBjYW4gZG8gdG9wdXAhCQEAAAASaGFuZGxlU3Rha2luZ1RvcFVwAAAAAgUAAAAGYW1vdW50BQAAAAtyZXZlbmV1VHlwZQMJAAAAAAAAAgUAAAALcmV2ZW5ldVR5cGUCAAAABFZFR0cDCQEAAAACIT0AAAACCAUAAAABaQAAAAZjYWxsZXIJAQAAABFnZXRDb3Vwb25zQWRkcmVzcwAAAAAJAAACAAAAAQIAAAAlVkZUVVA6IE9ubHkgY291cG9uc2RhcHAgY2FuIGRvIHRvcHVwIQkBAAAAEmhhbmRsZVN0YWtpbmdUb3BVcAAAAAIFAAAABmFtb3VudAUAAAALcmV2ZW5ldVR5cGUJAAACAAAAAQIAAAATVW5rbm93biByZXZlbmV1VHlwZQAAAAFpAQAAAAp1bnN0YWtlTkZUAAAAAQAAAAdhc3NldElkBAAAAAdhZGRyZXNzCQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgMJAQAAAAIhPQAAAAIJAQAAAAx0cnlHZXRTdHJpbmcAAAABCQABLAAAAAIFAAAAB2Fzc2V0SWQCAAAABl9vd25lcgkABCUAAAABCAUAAAABaQAAAAZjYWxsZXIJAAACAAAAAQIAAAAZWW91IGRvbid0IG93biB0aGlzIGR1Y2shIQQAAAAJYXNzZXROYW1lCQEAAAAFdmFsdWUAAAABCAkBAAAABXZhbHVlAAAAAQkAA+wAAAABCQACWQAAAAEFAAAAB2Fzc2V0SWQAAAALZGVzY3JpcHRpb24EAAAABnJlc3VsdAkBAAAAGmRldGVyTWluZUNsYXNzQW5kQ2xhaW1UeXBlAAAABAUAAAAHYWRkcmVzcwUAAAAHYXNzZXRJZAUAAAAJYXNzZXROYW1lBwMJAAAAAAAAAgUAAAAGcmVzdWx0BQAAAAZyZXN1bHQEAAAADHZhbGlkUGF5bWVudAkBAAAAFmNoZWNrQWRkaXRpb25hbFBheW1lbnQAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAwkAAAAAAAACBQAAAAx2YWxpZFBheW1lbnQFAAAADHZhbGlkUGF5bWVudAQAAAAFY29sb3IJAQAAAAx0cnlHZXRTdHJpbmcAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGFkZHJlc3NfBQAAAAdhZGRyZXNzAgAAAAdfYXNzZXRfBQAAAAdhc3NldElkAgAAAAtfcGVyY2hDb2xvcgQAAAAHYXNzZXRGUAkBAAAADXRyeUdldEludGVnZXIAAAABCQEAAAARYXNzZXRGYXJtaW5nUG93ZXIAAAACBQAAAAdhZGRyZXNzBQAAAAdhc3NldElkAwkAAAAAAAACBQAAAAdhc3NldEZQBQAAAAdhc3NldEZQBAAAAAp1cGRhdGVLZXlzCQEAAAAbZGV0ZXJNaW5lQ2xhc3NBbmRVcGRhdGVUeXBlAAAABAUAAAAHYWRkcmVzcwkAAlkAAAABBQAAAAdhc3NldElkBQAAAAdhc3NldEZQBQAAAAlhc3NldE5hbWUJAAROAAAAAgkABE4AAAACCQAETgAAAAIJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGFkZHJlc3NfBQAAAAdhZGRyZXNzAgAAABNfbXV0YXJpdW1BdmFpbGFibGVfBQAAAAVjb2xvcgkAAGQAAAACCQEAAAANdHJ5R2V0SW50ZWdlcgAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAACGFkZHJlc3NfBQAAAAdhZGRyZXNzAgAAABNfbXV0YXJpdW1BdmFpbGFibGVfBQAAAAVjb2xvcgAAAAAAAAAAAQkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABCQABLAAAAAIFAAAAB2Fzc2V0SWQCAAAABl9vd25lcgkABEwAAAACCQEAAAALRGVsZXRlRW50cnkAAAABCQEAAAARYXNzZXRGYXJtaW5nUG93ZXIAAAACBQAAAAdhZGRyZXNzBQAAAAdhc3NldElkCQAETAAAAAIJAQAAAAtEZWxldGVFbnRyeQAAAAEJAAEsAAAAAgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgIAAAAIYWRkcmVzc18FAAAAB2FkZHJlc3MCAAAAB19hc3NldF8FAAAAB2Fzc2V0SWQCAAAAC19wZXJjaENvbG9yCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAAAdBZGRyZXNzAAAAAQkAAlkAAAABBQAAAAdhZGRyZXNzAAAAAAAAAAABCQACWQAAAAEFAAAAB2Fzc2V0SWQFAAAAA25pbAUAAAAKdXBkYXRlS2V5cwUAAAAMdmFsaWRQYXltZW50BQAAAAZyZXN1bHQJAAACAAAAAQIAAAAkU3RyaWN0IHZhbHVlIGlzIG5vdCBlcXVhbCB0byBpdHNlbGYuCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgkAAAIAAAABAgAAACRTdHJpY3QgdmFsdWUgaXMgbm90IGVxdWFsIHRvIGl0c2VsZi4AAAABaQEAAAALY2xhaW1SZXdhcmQAAAABAAAAB2Fzc2V0SWQEAAAADHZhbGlkUGF5bWVudAkBAAAAFmNoZWNrQWRkaXRpb25hbFBheW1lbnQAAAABCQABkQAAAAIIBQAAAAFpAAAACHBheW1lbnRzAAAAAAAAAAAAAwkAAAAAAAACBQAAAAx2YWxpZFBheW1lbnQFAAAADHZhbGlkUGF5bWVudAQAAAAJYXNzZXROYW1lCQEAAAAFdmFsdWUAAAABCAkBAAAABXZhbHVlAAAAAQkAA+wAAAABCQACWQAAAAEFAAAAB2Fzc2V0SWQAAAALZGVzY3JpcHRpb24DCQAAZgAAAAIJAAGQAAAAAQgFAAAAAWkAAAAIcGF5bWVudHMAAAAAAAAAAAEJAAACAAAAAQIAAAAfUGxlYXNlIGRvbid0IGFkZCBleHRyYSBwYXltZW50cwkABE4AAAACCQEAAAAaZGV0ZXJNaW5lQ2xhc3NBbmRDbGFpbVR5cGUAAAAECQAEJQAAAAEIBQAAAAFpAAAABmNhbGxlcgUAAAAHYXNzZXRJZAUAAAAJYXNzZXROYW1lBgUAAAAMdmFsaWRQYXltZW50CQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAEAAAACdHgBAAAABnZlcmlmeQAAAAADCQEAAAAJaXNUZXN0RW52AAAAAAkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAJ0eAAAAA9zZW5kZXJQdWJsaWNLZXkEAAAACWZpcnN0VXNlcgEAAAAgURzk/Wb/EmnS8VoUnzuy4vQ7f8HLaCeiNF5sONdX3W0EAAAACnNlY29uZFVzZXIBAAAAIFxyDkuu8SFPZuYZRfpqorHtsTYpWV8ZzMyw4U1BiGp9BAAAAAl0aGlyZFVzZXIBAAAAIKCvkeUteUNhYTISrY65+hhZUZ0tU0k2w9Cj96hgGTtOBAAAAA9maXJzdFVzZXJTaWduZWQDCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAUAAAAJZmlyc3RVc2VyAAAAAAAAAAABAwkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAEFAAAACWZpcnN0VXNlcgAAAAAAAAAAAQMJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAACBQAAAAlmaXJzdFVzZXIAAAAAAAAAAAEAAAAAAAAAAAAEAAAAEHNlY29uZFVzZXJTaWduZWQDCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAAUAAAAKc2Vjb25kVXNlcgAAAAAAAAAAAQMJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAABBQAAAApzZWNvbmRVc2VyAAAAAAAAAAABAwkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAIFAAAACnNlY29uZFVzZXIAAAAAAAAAAAEAAAAAAAAAAAAEAAAAD3RoaXJkVXNlclNpZ25lZAMJAAH0AAAAAwgFAAAAAnR4AAAACWJvZHlCeXRlcwkAAZEAAAACCAUAAAACdHgAAAAGcHJvb2ZzAAAAAAAAAAAABQAAAAl0aGlyZFVzZXIAAAAAAAAAAAEDCQAB9AAAAAMIBQAAAAJ0eAAAAAlib2R5Qnl0ZXMJAAGRAAAAAggFAAAAAnR4AAAABnByb29mcwAAAAAAAAAAAQUAAAAJdGhpcmRVc2VyAAAAAAAAAAABAwkAAfQAAAADCAUAAAACdHgAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJ0eAAAAAZwcm9vZnMAAAAAAAAAAAIFAAAACXRoaXJkVXNlcgAAAAAAAAAAAQAAAAAAAAAAAAQAAAAPc2lnbmF0dXJlc0NvdW50CQAAZAAAAAIJAABkAAAAAgUAAAAPZmlyc3RVc2VyU2lnbmVkBQAAABBzZWNvbmRVc2VyU2lnbmVkBQAAAA90aGlyZFVzZXJTaWduZWQEAAAAByRtYXRjaDAFAAAAAnR4CQAAZwAAAAIFAAAAD3NpZ25hdHVyZXNDb3VudAAAAAAAAAAAAdoXcqw=",
    "height": 3539712,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: DM5AkBTCA1iS5M9QJpTFkagR6abvTQQdkTLVkjJD4JSq
Next: none

Diff: 

OldNewDifferences
1-{-# STDLIB_VERSION 6 #-}
1+{-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-func basePriceSpice () = 1000000000
4+func getReveneuTypes () = ["EGG", "SPICE", "VEGG", "FEED"]
55 
66 
7-func basePriceEgg () = 200000000
8-
9-
10-func delayForHatching () = 2
11-
12-
13-func hatchingStarted () = "BREEDING_STARTED"
14-
15-
16-func hatchingFinished () = "BREEDING_FINISHED"
17-
18-
19-func staticKey_eggAssetId () = "static_eggAssetId"
20-
21-
22-func staticKey_spiceAssetId () = "static_spiceAssetId"
23-
24-
25-func staticKey_duckBreederAddress () = "static_breederAddress"
26-
27-
28-func staticKey_turtleBreederAddress () = "static_turtleBreederAddress"
29-
30-
31-func staticKey_oracleAddress () = "static_oracleAddress"
32-
33-
34-func staticKey_extraFee () = "static_extraFee"
35-
36-
37-func staticKey_feeAggregator () = "static_feeAggregator"
38-
39-
40-func staticKey_burnAddress () = "static_burnAddress"
41-
42-
43-func staticKey_turtleStakingAddress () = "static_turtleStakingAddress"
44-
45-
46-func staticKey_canineBreederAddress () = "static_canineBreederAddress"
47-
48-
49-func staticKey_felineBreederAddress () = "static_felineBreederAddress"
50-
51-
52-func staticKey_eagleBreederAddress () = "static_eagleBreederAddress"
53-
54-
55-func getStatsKey_amount () = "stats_amount"
56-
57-
58-func getStatsKey (genString) = (("stats_" + genString) + "_amount")
59-
60-
61-func getChildren (assetId) = (("asset_" + assetId) + "_children")
62-
63-
64-func getParentKey (txId,parentNum) = ((("inittx_" + toBase58String(txId)) + "_parent") + toString(parentNum))
65-
66-
67-func getProcessStatusKey (address,txId) = (((address + "_") + txId) + "_status")
68-
69-
70-func getProcessFinishHeightKey (address,txId) = (((address + "_") + txId) + "_fh")
71-
72-
73-func getIdKey (address,txId) = (((address + "_") + txId) + "_di")
74-
7+let Scale = 100000000
758 
769 func tryGetStringExternal (address,key) = match getString(address, key) {
7710     case a: String => 
7912     case _ => 
8013         ""
8114 }
82-
83-
84-func tryGetString (key) = tryGetStringExternal(this, key)
85-
86-
87-func tryGetInteger (key) = {
88-    let val =     match getInteger(this, key) {
89-        case b: Int => 
90-            b
91-        case _ => 
92-            0
93-    }
94-    val
95-    }
96-
97-
98-func getOracle () = Address(fromBase58String(tryGetString(staticKey_oracleAddress())))
99-
100-
101-func getTurtleBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleBreederAddress())))
102-
103-
104-func getDuckBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_duckBreederAddress())))
105-
106-
107-func getEagleBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_eagleBreederAddress())))
108-
109-
110-func getCanineBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_canineBreederAddress())))
111-
112-
113-func getFelineBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_felineBreederAddress())))
114-
115-
116-func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_eggAssetId()))
117-
118-
119-func getSpiceAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_spiceAssetId()))
120-
121-
122-func getFeeAggregator () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_feeAggregator())))
123-
124-
125-func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_burnAddress())))
126-
127-
128-func getTurtleStakingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleStakingAddress())))
129-
130-
131-func getAllowedMutants () = [getTurtleBreederAddress(), getDuckBreederAddress()]
132-
133-
134-func calcPriceInAsset (baseAmount) = (baseAmount + (((baseAmount * (tryGetInteger(getStatsKey_amount()) + 1)) / 1000) / size(getAllowedMutants())))
13515 
13616 
13717 func getBool (key) = match getBoolean(this, key) {
14525 func isTestEnv () = getBool("TESTENV")
14626 
14727 
148-func getRandomNumber (variants,txId,hatchingFinishHeight,offset) = {
149-    let randomSeedBlock = value(blockInfoByHeight((hatchingFinishHeight - 1)))
150-    let randomHash = sha256_16Kb((txId + value(randomSeedBlock.vrf)))
151-    (toInt(randomHash, offset) % variants)
28+func staticKey_mutantIncubatorAddress () = "static_mutantIncubatorAddress"
29+
30+
31+func staticKey_oracleAddress () = "static_oracleAddress"
32+
33+
34+func staticKey_feeAggregator () = "static_feeAggregator"
35+
36+
37+func staticKey_accBoosterAddress () = "static_accBoosterAddress"
38+
39+
40+func staticKey_mutariumFee () = "static_mutariumFee"
41+
42+
43+func staticKey_babyDuckAddress () = "static_babyDuckAddress"
44+
45+
46+func staticKey_couponsAddress () = "static_couponsAddress"
47+
48+
49+func staticKey_spiceAssetId () = "static_spiceAssetId"
50+
51+
52+func staticKey_eggAssetId () = "static_eggAssetId"
53+
54+
55+func staticKey_refContractAddress () = "static_refContractAddress"
56+
57+
58+func staticKey_burnAddress () = "static_burnAddress"
59+
60+
61+func staticKey_itemsAddress () = "static_itemsAddress"
62+
63+
64+func rewardClaimedKey (address,asset,reveneuType) = ((((address + "_asset_") + asset) + "_claimed_") + reveneuType)
65+
66+
67+func totalStakedKey (reveneuType) = ("total_staked_" + reveneuType)
68+
69+
70+func totalStakedUserKey (address,reveneuType) = ("total_staked_" + address)
71+
72+
73+func keyGlobalLastInterest (reveneuType) = ("global_lastCheck_interest_" + reveneuType)
74+
75+
76+func keyLastCheckInterest (address,asset,reveneuType) = ((((("address_" + address) + "_asset_") + asset) + "_lastCheckInterest_") + reveneuType)
77+
78+
79+func keyGlobalEarned (reveneuType) = ("global_earnings_" + reveneuType)
80+
81+
82+func staticKey_extraFee () = "static_extraFee"
83+
84+
85+func assetFarmingPower (address,asset) = (((("address_" + address) + "_asset_") + asset) + "_farmingPower")
86+
87+
88+func staticKey_wearablesAddress () = "static_wearablesAddress"
89+
90+
91+func tryGetString (key) = tryGetStringExternal(this, key)
92+
93+
94+func getOracle () = Address(fromBase58String(tryGetString(staticKey_oracleAddress())))
95+
96+
97+func getMutantBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_mutantIncubatorAddress())))
98+
99+
100+func getFeeAggregator () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_feeAggregator())))
101+
102+
103+func getAccBoosterAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_accBoosterAddress())))
104+
105+
106+func getBabyduckAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_babyDuckAddress())))
107+
108+
109+func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_couponsAddress())))
110+
111+
112+func getSpiceAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_spiceAssetId()))
113+
114+
115+func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_eggAssetId()))
116+
117+
118+func getRefContractAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_refContractAddress())))
119+
120+
121+func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_burnAddress())))
122+
123+
124+func getItemsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_itemsAddress())))
125+
126+
127+func getWearablesAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_wearablesAddress())))
128+
129+
130+func asIntTuple (value) = match value {
131+    case int: (Int, Int) => 
132+        int
133+    case _ => 
134+        throw("FAI: wrong type, expected: (Int,Int)")
135+}
136+
137+
138+func asBoolean (value) = match value {
139+    case boolean: Boolean => 
140+        boolean
141+    case _ => 
142+        throw("FAB: wrong type, expected: Boolean")
143+}
144+
145+
146+func asInt (value) = match value {
147+    case int: Int => 
148+        int
149+    case _ => 
150+        throw("FAI: wrong type, expected: Int")
151+}
152+
153+
154+func asRarity (value) = match value {
155+    case strIntTuple: (String, Int) => 
156+        strIntTuple
157+    case _ => 
158+        throw("BAI: wrong type, expected: strIntTuple")
159+}
160+
161+
162+func asString (value) = match value {
163+    case s: String => 
164+        s
165+    case s: Int => 
166+        throw("wrong type, expected: String, got: Int")
167+    case s: Unit => 
168+        throw("wrong type, expected: String, got: Unit")
169+    case _ => 
170+        throw("wrong type, expected: String")
171+}
172+
173+
174+func tryGetInteger (key) = match getInteger(this, key) {
175+    case b: Int => 
176+        b
177+    case _ => 
178+        0
179+}
180+
181+
182+func checkAdditionalPayment (payment) = if (isDefined(payment.assetId))
183+    then throw("FCAP: Please attach waves")
184+    else {
185+        let feeAmount = getIntegerValue(getOracle(), staticKey_extraFee())
186+        if ((payment.amount != feeAmount))
187+            then throw((("FCAP: Please attach exactly " + toString(feeAmount)) + " amount of wavelets"))
188+            else [ScriptTransfer(getFeeAggregator(), feeAmount, unit)]
189+        }
190+
191+
192+func determineClasses (assetName) = {
193+    let genotype = split(dropRight(drop(assetName, 5), 3), "")
194+    let classes = [genotype[0], genotype[2], genotype[4], genotype[6], genotype[8], genotype[10], genotype[12], genotype[14]]
195+    $Tuple2(containsElement(classes, "T"), containsElement(classes, "D"))
152196     }
153197 
154198 
155-func getRandomGen (gen1,gen2,step,txId,hatchingFinishHeight) = {
156-    let randomNum = getRandomNumber(2, txId, hatchingFinishHeight, step)
157-    let gen = if ((randomNum == 0))
158-        then gen1
159-        else gen2
160-    gen
199+func calculatePerchPrice (address) = {
200+    let hasArtefactStaked = tryGetStringExternal(getAccBoosterAddress(), (("ART-XMISTL_" + address) + "_owner"))
201+    let perchPrice = getIntegerValue(getOracle(), staticKey_mutariumFee())
202+    if ((hasArtefactStaked == ""))
203+        then perchPrice
204+        else ((perchPrice / 10) * 9)
161205     }
162206 
163207 
164-func generate (txId,finishHeight,parent1Id,parent2Id) = {
165-    let colorRandom = getRandomNumber(100, txId, finishHeight, 11)
166-    let color = if ((26 > colorRandom))
167-        then "A"
168-        else if ((48 > colorRandom))
169-            then "B"
170-            else if ((70 > colorRandom))
171-                then "C"
172-                else if ((90 > colorRandom))
173-                    then "D"
174-                    else "G"
175-    let parent1Gen = split(value(assetInfo(parent1Id)).name, "")
176-    let parent2Gen = split(value(assetInfo(parent2Id)).name, "")
177-    let gen = (((((((((("MTNT-" + getRandomGen((parent1Gen[0] + parent1Gen[5]), (parent2Gen[0] + parent2Gen[5]), 0, txId, finishHeight)) + getRandomGen((parent1Gen[0] + parent1Gen[6]), (parent2Gen[0] + parent2Gen[6]), 1, txId, finishHeight)) + getRandomGen((parent1Gen[0] + parent1Gen[7]), (parent2Gen[0] + parent2Gen[7]), 2, txId, finishHeight)) + getRandomGen((parent1Gen[0] + parent1Gen[8]), (parent2Gen[0] + parent2Gen[8]), 3, txId, finishHeight)) + getRandomGen((parent1Gen[0] + parent1Gen[9]), (parent2Gen[0] + parent2Gen[9]), 4, txId, finishHeight)) + getRandomGen((parent1Gen[0] + parent1Gen[10]), (parent2Gen[0] + parent2Gen[10]), 5, txId, finishHeight)) + getRandomGen((parent1Gen[0] + parent1Gen[11]), (parent2Gen[0] + parent2Gen[11]), 6, txId, finishHeight)) + getRandomGen((parent1Gen[0] + parent1Gen[12]), (parent2Gen[0] + parent2Gen[12]), 7, txId, finishHeight)) + "-G") + color)
178-    gen
208+func updateFarmingPower (address,asset,reveneuType) = {
209+    let totalStaked = tryGetInteger(totalStakedKey(reveneuType))
210+    let totalStakedUser = tryGetInteger(totalStakedUserKey(address, reveneuType))
211+    let currentFP = tryGetInteger(assetFarmingPower(address, asset))
212+    let newFP = asIntTuple(invoke(this, "calculateFarmPower", [asset], nil))
213+    if ((currentFP != 0))
214+        then [IntegerEntry(totalStakedKey(reveneuType), ((totalStaked - currentFP) + newFP._1)), IntegerEntry(totalStakedUserKey(address, reveneuType), ((totalStakedUser - currentFP) + newFP._1)), IntegerEntry(assetFarmingPower(address, asset), newFP._1)]
215+        else nil
179216     }
180217 
181218 
182-func isSymbol (acc,sym) = if ((sym == acc._2))
183-    then $Tuple2((acc._1 + 1), acc._2)
184-    else $Tuple2((acc._1 + 0), acc._2)
185-
186-
187-func getAmountOrClear (amount) = if (contains(amount, "0"))
188-    then ""
189-    else amount
190-
191-
192-func charList () = ["A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z"]
193-
194-
195-func getRarityFromName (name) = {
196-    let color = takeRight(name, 1)
197-    let genotype = split(dropRight(drop(name, 5), 3), "")
198-    let genetics = [genotype[1], genotype[3], genotype[5], genotype[7], genotype[9], genotype[11], genotype[13], genotype[15]]
199-    func composeString (acc,char) =     {
200-        let charCount = {
201-            let $l = genetics
202-            let $s = size($l)
203-            let $acc0 = $Tuple2(0, char)
204-            func $f0_1 ($a,$i) =             if (($i >= $s))
205-                then $a
206-                else isSymbol($a, $l[$i])
207-
208-            func $f0_2 ($a,$i) =             if (($i >= $s))
209-                then $a
210-                else throw("List size exceeds 8")
211-
212-            $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)
213-            }
214-        (acc + getAmountOrClear((toString(charCount._1) + char)))
215-        }
216-
217-    (({
218-        let $l = charList()
219-        let $s = size($l)
220-        let $acc0 = ""
221-        func $f0_1 ($a,$i) =         if (($i >= $s))
222-            then $a
223-            else composeString($a, $l[$i])
224-
225-        func $f0_2 ($a,$i) =         if (($i >= $s))
226-            then $a
227-            else throw("List size exceeds 26")
228-
229-        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26)
230-        } + "-") + color)
231-    }
232-
233-
234-func nrOfTypeGenes (gen) = {
235-    let genotype = split(dropRight(drop(gen, 5), 3), "")
236-    let parts1 = (genotype[0] + genotype[1])
237-    let parts2 = (genotype[2] + genotype[3])
238-    let parts3 = (genotype[4] + genotype[5])
239-    let parts4 = (genotype[6] + genotype[7])
240-    let parts5 = (genotype[8] + genotype[9])
241-    let parts6 = (genotype[10] + genotype[11])
242-    let parts7 = (genotype[12] + genotype[13])
243-    let parts8 = (genotype[14] + genotype[15])
244-    let parts = [parts1, parts2, parts3, parts4, parts5, parts6, parts7, parts8]
245-    func sortPartsByType (acc,part) =     {
246-        let splitParts = split(part, "")
247-        if ((splitParts[0] == "T"))
248-            then $Tuple5((acc._1 :+ splitParts[1]), acc._2, acc._3, acc._4, acc._5)
249-            else if ((splitParts[0] == "D"))
250-                then $Tuple5(acc._1, (acc._2 :+ splitParts[1]), acc._3, acc._4, acc._5)
251-                else if ((splitParts[0] == "F"))
252-                    then $Tuple5(acc._1, acc._2, (acc._3 :+ splitParts[1]), acc._4, acc._5)
253-                    else if ((splitParts[0] == "C"))
254-                        then $Tuple5(acc._1, acc._2, acc._3, (acc._4 :+ splitParts[1]), acc._5)
255-                        else if ((splitParts[0] == "E"))
256-                            then $Tuple5(acc._1, acc._2, acc._3, acc._4, (acc._5 :+ splitParts[1]))
257-                            else throw("UNKNOWN TYPE")
258-        }
259-
260-    let result = {
261-        let $l = parts
262-        let $s = size($l)
263-        let $acc0 = $Tuple5(nil, nil, nil, nil, nil)
264-        func $f0_1 ($a,$i) =         if (($i >= $s))
265-            then $a
266-            else sortPartsByType($a, $l[$i])
267-
268-        func $f0_2 ($a,$i) =         if (($i >= $s))
269-            then $a
270-            else throw("List size exceeds 8")
271-
272-        $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)
273-        }
274-    if ((result == result))
219+func claimStakingResult (address,assetId,recalc,reveneuType) = {
220+    let currentInterest = tryGetInteger(keyGlobalLastInterest(reveneuType))
221+    let lastCheckInterest = tryGetInteger(keyLastCheckInterest(address, assetId, reveneuType))
222+    let stakedAmount = tryGetInteger(assetFarmingPower(address, assetId))
223+    let fpUpdate = if (recalc)
224+        then updateFarmingPower(address, assetId, reveneuType)
225+        else nil
226+    if ((fpUpdate == fpUpdate))
275227         then {
276-            func composeStringTurtle (acc,char) =             {
277-                let charCount = {
278-                    let $l = result._1
279-                    let $s = size($l)
280-                    let $acc0 = $Tuple2(0, char)
281-                    func $f1_1 ($a,$i) =                     if (($i >= $s))
282-                        then $a
283-                        else isSymbol($a, $l[$i])
284-
285-                    func $f1_2 ($a,$i) =                     if (($i >= $s))
286-                        then $a
287-                        else throw("List size exceeds 8")
288-
289-                    $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)
290-                    }
291-                (acc + getAmountOrClear((toString(charCount._1) + char)))
292-                }
293-
294-            func composeStringDuck (acc,char) =             {
295-                let charCount = {
296-                    let $l = result._2
297-                    let $s = size($l)
298-                    let $acc0 = $Tuple2(0, char)
299-                    func $f1_1 ($a,$i) =                     if (($i >= $s))
300-                        then $a
301-                        else isSymbol($a, $l[$i])
302-
303-                    func $f1_2 ($a,$i) =                     if (($i >= $s))
304-                        then $a
305-                        else throw("List size exceeds 8")
306-
307-                    $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)
308-                    }
309-                (acc + getAmountOrClear((toString(charCount._1) + char)))
310-                }
311-
312-            func composeStringCat (acc,char) =             {
313-                let charCount = {
314-                    let $l = result._3
315-                    let $s = size($l)
316-                    let $acc0 = $Tuple2(0, char)
317-                    func $f1_1 ($a,$i) =                     if (($i >= $s))
318-                        then $a
319-                        else isSymbol($a, $l[$i])
320-
321-                    func $f1_2 ($a,$i) =                     if (($i >= $s))
322-                        then $a
323-                        else throw("List size exceeds 8")
324-
325-                    $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)
326-                    }
327-                (acc + getAmountOrClear((toString(charCount._1) + char)))
328-                }
329-
330-            func composeStringDog (acc,char) =             {
331-                let charCount = {
332-                    let $l = result._4
333-                    let $s = size($l)
334-                    let $acc0 = $Tuple2(0, char)
335-                    func $f1_1 ($a,$i) =                     if (($i >= $s))
336-                        then $a
337-                        else isSymbol($a, $l[$i])
338-
339-                    func $f1_2 ($a,$i) =                     if (($i >= $s))
340-                        then $a
341-                        else throw("List size exceeds 8")
342-
343-                    $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)
344-                    }
345-                (acc + getAmountOrClear((toString(charCount._1) + char)))
346-                }
347-
348-            func composeStringEagle (acc,char) =             {
349-                let charCount = {
350-                    let $l = result._4
351-                    let $s = size($l)
352-                    let $acc0 = $Tuple2(0, char)
353-                    func $f1_1 ($a,$i) =                     if (($i >= $s))
354-                        then $a
355-                        else isSymbol($a, $l[$i])
356-
357-                    func $f1_2 ($a,$i) =                     if (($i >= $s))
358-                        then $a
359-                        else throw("List size exceeds 8")
360-
361-                    $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)
362-                    }
363-                (acc + getAmountOrClear((toString(charCount._1) + char)))
364-                }
365-
366-            let turtleGens = {
367-                let $l = charList()
368-                let $s = size($l)
369-                let $acc0 = ""
370-                func $f1_1 ($a,$i) =                 if (($i >= $s))
371-                    then $a
372-                    else composeStringTurtle($a, $l[$i])
373-
374-                func $f1_2 ($a,$i) =                 if (($i >= $s))
375-                    then $a
376-                    else throw("List size exceeds 26")
377-
378-                $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($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), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26)
379-                }
380-            let duckGens = {
381-                let $l = charList()
382-                let $s = size($l)
383-                let $acc0 = ""
384-                func $f2_1 ($a,$i) =                 if (($i >= $s))
385-                    then $a
386-                    else composeStringDuck($a, $l[$i])
387-
388-                func $f2_2 ($a,$i) =                 if (($i >= $s))
389-                    then $a
390-                    else throw("List size exceeds 26")
391-
392-                $f2_2($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($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), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26)
393-                }
394-            let catGens = {
395-                let $l = charList()
396-                let $s = size($l)
397-                let $acc0 = ""
398-                func $f3_1 ($a,$i) =                 if (($i >= $s))
399-                    then $a
400-                    else composeStringCat($a, $l[$i])
401-
402-                func $f3_2 ($a,$i) =                 if (($i >= $s))
403-                    then $a
404-                    else throw("List size exceeds 26")
405-
406-                $f3_2($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($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), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26)
407-                }
408-            let hondGens = {
409-                let $l = charList()
410-                let $s = size($l)
411-                let $acc0 = ""
412-                func $f4_1 ($a,$i) =                 if (($i >= $s))
413-                    then $a
414-                    else composeStringDog($a, $l[$i])
415-
416-                func $f4_2 ($a,$i) =                 if (($i >= $s))
417-                    then $a
418-                    else throw("List size exceeds 26")
419-
420-                $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($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), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26)
421-                }
422-            let eagleGens = {
423-                let $l = charList()
424-                let $s = size($l)
425-                let $acc0 = ""
426-                func $f5_1 ($a,$i) =                 if (($i >= $s))
427-                    then $a
428-                    else composeStringEagle($a, $l[$i])
429-
430-                func $f5_2 ($a,$i) =                 if (($i >= $s))
431-                    then $a
432-                    else throw("List size exceeds 26")
433-
434-                $f5_2($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($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), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26)
435-                }
436-            let finishedTurtleGens = if ((turtleGens == ""))
437-                then ""
438-                else (("T:" + turtleGens) + "_")
439-            let finishedDuckGens = if ((duckGens == ""))
440-                then ""
441-                else (("D:" + duckGens) + "_")
442-            let finishedCatGens = if ((catGens == ""))
443-                then ""
444-                else (("F:" + catGens) + "_")
445-            let finishedHondGens = if ((hondGens == ""))
446-                then ""
447-                else (("C:" + hondGens) + "_")
448-            let finishedEagleGens = if ((eagleGens == ""))
449-                then ""
450-                else (("E:" + hondGens) + "_")
451-            $Tuple2([StringEntry("DEBUG_TURTLE", turtleGens), StringEntry("DEBUG_DUCK", duckGens), StringEntry("DEBUG_CAT", catGens), StringEntry("DEBUG_HOND", hondGens), StringEntry("DEBUG_EAGLE", eagleGens)], ((((finishedTurtleGens + finishedDuckGens) + finishedCatGens) + hondGens) + eagleGens))
228+            let reward = if ((lastCheckInterest > 0))
229+                then fraction((currentInterest - lastCheckInterest), stakedAmount, Scale)
230+                else 0
231+            let specifiqueKeys = if ((reveneuType == "SPICE"))
232+                then [ScriptTransfer(addressFromStringValue(address), reward, getSpiceAssetId())]
233+                else if ((reveneuType == "EGG"))
234+                    then [ScriptTransfer(addressFromStringValue(address), reward, getEggAssetId())]
235+                    else if ((reveneuType == "FEED"))
236+                        then {
237+                            let invokeResult = if ((reward > 0))
238+                                then invoke(getAccBoosterAddress(), "addFeedLimit", [reward, address], nil)
239+                                else unit
240+                            if ((invokeResult == invokeResult))
241+                                then nil
242+                                else throw("Strict value is not equal to itself.")
243+                            }
244+                        else if ((reveneuType == "VEGG"))
245+                            then {
246+                                let invokeResult = if ((reward > 0))
247+                                    then invoke(getCouponsAddress(), "addCouponsFarming", [address, reward], nil)
248+                                    else unit
249+                                if ((invokeResult == invokeResult))
250+                                    then nil
251+                                    else throw("Strict value is not equal to itself.")
252+                                }
253+                            else throw("Unknown reveneuType")
254+            (([IntegerEntry(keyLastCheckInterest(address, assetId, reveneuType), currentInterest), IntegerEntry(rewardClaimedKey(address, assetId, reveneuType), (tryGetInteger(rewardClaimedKey(address, assetId, reveneuType)) + reward))] ++ fpUpdate) ++ specifiqueKeys)
452255             }
453256         else throw("Strict value is not equal to itself.")
454257     }
455258 
456259 
457-func validateIfMutantFailed (rarity) = if ((3 > size(split(rarity, ":"))))
458-    then true
459-    else false
260+func setKeysReveneuType (address,assetId,reveneuType,fp) = [IntegerEntry(totalStakedKey(reveneuType), (tryGetInteger(totalStakedKey(reveneuType)) + fp)), IntegerEntry(totalStakedUserKey(address, reveneuType), (tryGetInteger(totalStakedUserKey(address, reveneuType)) + fp))]
460261 
461262 
462-func finishHatchingInternal (txId,owner) = {
463-    let processStatusKey = getProcessStatusKey(owner, txId)
464-    let finishHeightKey = getProcessFinishHeightKey(owner, txId)
465-    let IdKey = getIdKey(owner, txId)
466-    let processTxStatus = getStringValue(this, processStatusKey)
467-    let processFinishHeight = getIntegerValue(this, finishHeightKey)
468-    if ((processTxStatus == hatchingFinished()))
469-        then {
470-            let Id = getStringValue(this, getIdKey(owner, txId))
471-            throw(("The MUTANT was breeded and claimed already, here is the folowing: " + Id))
472-            }
473-        else if ((processFinishHeight > height))
474-            then throw((((("Breeding is not finished yet " + toString((processFinishHeight - height))) + " blocks remaining, it will take around ") + toString((processFinishHeight - height))) + " minutes"))
475-            else {
476-                let parent1Id = tryGetString(getParentKey(fromBase58String(txId), 1))
477-                let parent2Id = tryGetString(getParentKey(fromBase58String(txId), 2))
478-                let parent1IdBytes = fromBase58String(parent1Id)
479-                let parent2IdBytes = fromBase58String(parent2Id)
480-                let gen = generate(fromBase58String(txId), processFinishHeight, parent1IdBytes, parent2IdBytes)
481-                let farmGen = nrOfTypeGenes(gen)
482-                let rarityFromName = getRarityFromName(gen)
483-                let amountGen = (tryGetInteger(getStatsKey(gen)) + 1)
484-                let amount = (tryGetInteger(getStatsKey_amount()) + 1)
485-                let asset = Issue(("MTNT-" + toString(amount)), gen, 1, 0, false, unit, processFinishHeight)
486-                let assetId = calculateAssetId(asset)
487-                let quantity = tryGetInteger((("stats_" + farmGen._2) + "_quantity"))
488-                let rarity = tryGetInteger((("stats_" + rarityFromName) + "_rarity"))
489-                let ownerAsAddress = addressFromStringValue(owner)
490-                let failed = validateIfMutantFailed(farmGen._2)
491-                let transferOrBurn = if (failed)
492-                    then Burn(assetId, 1)
493-                    else ScriptTransfer(ownerAsAddress, 1, assetId)
494-                let transferOrBurnParent1 = if ((getRandomNumber(10, fromBase58String(txId), processFinishHeight, 2) == 5))
495-                    then Burn(parent1IdBytes, 1)
496-                    else ScriptTransfer(ownerAsAddress, 1, parent1IdBytes)
497-                let transferOrBurnParent2 = if ((getRandomNumber(10, fromBase58String(txId), processFinishHeight, 3) == 5))
498-                    then Burn(parent2IdBytes, 1)
499-                    else ScriptTransfer(ownerAsAddress, 1, parent2IdBytes)
500-[StringEntry(processStatusKey, hatchingFinished()), StringEntry(IdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), IdKey), IntegerEntry(getStatsKey(gen), amountGen), IntegerEntry(getStatsKey_amount(), amount), IntegerEntry((("stats_" + farmGen._2) + "_quantity"), (quantity + 1)), IntegerEntry((("stats_" + rarityFromName) + "_rarity"), (rarity + 1)), IntegerEntry((("asset_" + parent1Id) + "_children"), 1), IntegerEntry((("asset_" + parent2Id) + "_children"), 1), asset, transferOrBurn, transferOrBurnParent1, transferOrBurnParent2]
501-                }
263+func updateKeysReveneuType (address,assetId,reveneuType,fp) = [IntegerEntry(totalStakedKey(reveneuType), (tryGetInteger(totalStakedKey(reveneuType)) - fp)), IntegerEntry(totalStakedUserKey(address, reveneuType), (tryGetInteger(totalStakedUserKey(address, reveneuType)) - fp))]
264+
265+
266+func deterMineClassAndClaimType (address,assetId,assetName,recalc) = {
267+    let $t086828726 = determineClasses(assetName)
268+    let isT = $t086828726._1
269+    let isD = $t086828726._2
270+    let tKeys = if (isT)
271+        then (claimStakingResult(address, assetId, recalc, "SPICE") ++ claimStakingResult(address, assetId, recalc, "FEED"))
272+        else nil
273+    let dKeys = if (isD)
274+        then (claimStakingResult(address, assetId, recalc, "EGG") ++ claimStakingResult(address, assetId, recalc, "VEGG"))
275+        else nil
276+    (tKeys ++ dKeys)
502277     }
503278 
504279 
505-func checkAdditionalPayment (payment) = if (isDefined(payment.assetId))
506-    then throw("BCAP: Please attach waves")
507-    else {
508-        let feeAmount = getIntegerValue(getOracle(), staticKey_extraFee())
509-        if ((payment.amount != feeAmount))
510-            then throw((("BCAP: Please attach exactly " + toString(feeAmount)) + " amount of wavelets"))
511-            else [ScriptTransfer(getFeeAggregator(), feeAmount, unit)]
512-        }
280+func deterMineClassAndSetType (address,assetId,fp,assetName) = {
281+    let $t091579201 = determineClasses(assetName)
282+    let isT = $t091579201._1
283+    let isD = $t091579201._2
284+    let tKeys = if (isT)
285+        then (setKeysReveneuType(address, assetId, "SPICE", fp) ++ setKeysReveneuType(address, assetId, "FEED", fp))
286+        else nil
287+    let dKeys = if (isD)
288+        then (setKeysReveneuType(address, assetId, "EGG", fp) ++ setKeysReveneuType(address, assetId, "VEGG", fp))
289+        else nil
290+    (tKeys ++ dKeys)
291+    }
513292 
514293 
515-func checkTypeAndValidObstinate (info) = {
516-    let splitted = split(info.name, "")
517-    let type = splitted[0]
518-    let gen = splitted[14]
519-    if ((gen != "O"))
520-        then throw("MCTAVO: Only obstinates can be turned into mutants")
521-        else {
522-            let breederSc = if ((type == "T"))
523-                then getTurtleBreederAddress()
524-                else if ((type == "D"))
525-                    then getDuckBreederAddress()
526-                    else if ((type == "C"))
527-                        then getCanineBreederAddress()
528-                        else if ((type == "F"))
529-                            then getFelineBreederAddress()
530-                            else if ((type == "E"))
531-                                then getEagleBreederAddress()
532-                                else throw("MCTAVO: Invalid type")
533-            if ((breederSc != info.issuer))
534-                then throw("MCTAVO: Only obstinates from the breeder contract can be turned into mutants")
535-                else if ((tryGetStringExternal(breederSc, toBase58String(info.id)) == ""))
536-                    then throw("MCTAVO: Invalid nft")
537-                    else if ((tryGetInteger(getChildren(toBase58String(info.id))) == 1))
538-                        then throw("MCTAVO: NFT already used")
539-                        else type
540-            }
294+func deterMineClassAndUpdateType (address,assetId,fp,assetName) = {
295+    let $t096219665 = determineClasses(assetName)
296+    let isT = $t096219665._1
297+    let isD = $t096219665._2
298+    let tKeys = if (isT)
299+        then (updateKeysReveneuType(address, assetId, "SPICE", fp) ++ updateKeysReveneuType(address, assetId, "FEED", fp))
300+        else nil
301+    let dKeys = if (isD)
302+        then (updateKeysReveneuType(address, assetId, "EGG", fp) ++ updateKeysReveneuType(address, assetId, "VEGG", fp))
303+        else nil
304+    (tKeys ++ dKeys)
305+    }
306+
307+
308+func handleStakingTopUp (amount,reveneuType) = {
309+    let currentInterest = tryGetInteger(keyGlobalLastInterest(reveneuType))
310+    let totalStakedAmount = tryGetInteger(totalStakedKey(reveneuType))
311+    let interestDelta = if ((totalStakedAmount > 0))
312+        then fraction(amount, Scale, totalStakedAmount)
313+        else 0
314+[IntegerEntry(keyGlobalEarned(reveneuType), (tryGetInteger(keyGlobalEarned(reveneuType)) + amount)), IntegerEntry(keyGlobalLastInterest(reveneuType), (currentInterest + interestDelta))]
541315     }
542316 
543317 
544318 @Callable(i)
545319 func configureOracle (oracle) = if ((i.caller != this))
546-    then throw("ICU: admin only")
320+    then throw("ACO: admin only")
547321     else [StringEntry("static_oracleAddress", oracle)]
548322 
549323 
550324 
551325 @Callable(i)
552-func startMutantHatching (refererAddress) = if ((size(i.payments) != 5))
553-    then throw("MSMH: 5 payments required")
554-    else if ((i.payments[0].amount != 1))
555-        then throw("MSMH: 1st payment must be an NFT")
556-        else if ((i.payments[1].amount != 1))
557-            then throw("MSMH: 2nd payment must be an NFT")
558-            else {
559-                let validPayment = checkAdditionalPayment(i.payments[2])
560-                if ((validPayment == validPayment))
561-                    then if (if ((i.payments[3].assetId != getSpiceAssetId()))
562-                        then true
563-                        else (i.payments[3].amount != calcPriceInAsset(basePriceSpice())))
564-                        then throw("MSMH: 4th payment must be in spice")
565-                        else if (if ((i.payments[4].assetId != getEggAssetId()))
566-                            then true
567-                            else (i.payments[4].amount != calcPriceInAsset(basePriceEgg())))
568-                            then throw("MSMH: 5th payment must be in egg")
569-                            else {
570-                                let nft1 = value(assetInfo(value(i.payments[0].assetId)))
571-                                let nft2 = value(assetInfo(value(i.payments[1].assetId)))
572-                                let type1 = checkTypeAndValidObstinate(nft1)
573-                                let type2 = checkTypeAndValidObstinate(nft2)
574-                                let burnCall = invoke(getBurnAddress(), "burnAttachedPayments", nil, [AttachedPayment(getEggAssetId(), assetBalance(this, getEggAssetId()))])
575-                                if ((burnCall == burnCall))
576-                                    then {
577-                                        let topup = invoke(getTurtleStakingAddress(), "topUpReward", nil, [AttachedPayment(getSpiceAssetId(), (assetBalance(this, getSpiceAssetId()) / 5))])
578-                                        if ((topup == topup))
579-                                            then if ((type1 == type2))
580-                                                then throw("MSMH: NFTs can not be of the same type")
581-                                                else ([StringEntry(getParentKey(i.transactionId, 1), toBase58String(nft1.id)), StringEntry(getParentKey(i.transactionId, 2), toBase58String(nft2.id)), StringEntry(getProcessStatusKey(toString(i.caller), toBase58String(i.transactionId)), hatchingStarted()), IntegerEntry(getProcessFinishHeightKey(toString(i.caller), toBase58String(i.transactionId)), (height + delayForHatching())), Burn(getSpiceAssetId(), assetBalance(this, getSpiceAssetId()))] ++ validPayment)
582-                                            else throw("Strict value is not equal to itself.")
583-                                        }
584-                                    else throw("Strict value is not equal to itself.")
326+func calculateFarmPower (assetId) = if (!((value(assetInfo(fromBase58String(assetId))).issuer == getMutantBreederAddress())))
327+    then throw("This does not seem like a valid Mutant!")
328+    else {
329+        let assetName = value(assetInfo(fromBase58String(assetId))).description
330+        let asRarityResult = asRarity(invoke(getMutantBreederAddress(), "getRarity", [assetName], nil))
331+        if ((asRarityResult == asRarityResult))
332+            then {
333+                let totalGenes = (size(split(dropRight(asRarityResult._1, 2), "")) / 2)
334+                let power = pow(15, 1, totalGenes, 0, 2, DOWN)
335+                let multiplier = (((height - 3750000) * 100) / (((60 * 24) * 30) * 3))
336+                let basePower = tryGetInteger((assetId + "_basePower"))
337+                let finalPower = if ((basePower > 0))
338+                    then basePower
339+                    else ((power * multiplier) / 100)
340+                let finalPowerRarity = ((finalPower * asRarityResult._2) / 100)
341+                let farmBoost = 0
342+                if ((farmBoost == farmBoost))
343+                    then {
344+                        let wearabledBoost = asInt(invoke(getWearablesAddress(), "calculateWearblesBoost", [assetId], nil))
345+                        if ((wearabledBoost == wearabledBoost))
346+                            then {
347+                                let finalPowerRarityBoost = ((finalPowerRarity + ((finalPowerRarity * farmBoost) / 100)) + ((finalPowerRarity * wearabledBoost) / 1000))
348+                                $Tuple2(nil, $Tuple2(finalPowerRarityBoost, finalPower))
585349                                 }
350+                            else throw("Strict value is not equal to itself.")
351+                        }
586352                     else throw("Strict value is not equal to itself.")
587353                 }
354+            else throw("Strict value is not equal to itself.")
355+        }
588356 
589357 
590358 
591359 @Callable(i)
592-func finishMutantHatching (txIdStr) = {
593-    let owner = toString(i.originCaller)
594-    if ((size(i.payments) != 1))
595-        then throw("MFMH: Wrong amount of payments!")
360+func redeemMutuarium () = {
361+    let validPayment = checkAdditionalPayment(i.payments[1])
362+    if (!(if ((size(i.payments) == 2))
363+        then (i.payments[0].amount == 1)
364+        else false))
365+        then throw("Invalid payment")
596366         else {
597-            let feeValidate = checkAdditionalPayment(i.payments[0])
598-            if ((feeValidate == feeValidate))
599-                then (finishHatchingInternal(txIdStr, owner) ++ feeValidate)
367+            let assetId = value(i.payments[0].assetId)
368+            let artefactName = asString(invoke(getItemsAddress(), "checkArtefactDetails", [toBase58String(assetId)], nil))
369+            if ((artefactName == artefactName))
370+                then if (!(contains(artefactName, "ART-MUTARIUM-")))
371+                    then throw("You can't use this artafect to redeem mutarium!")
372+                    else {
373+                        let color = takeRight(artefactName, 1)
374+                        let perchAmountKey = ((("address_" + toString(i.caller)) + "_mutariumAvailable_") + color)
375+                        let perchAmount = tryGetInteger(perchAmountKey)
376+                        ([IntegerEntry(perchAmountKey, (perchAmount + 1)), Burn(assetId, 1)] ++ validPayment)
377+                        }
600378                 else throw("Strict value is not equal to itself.")
601379             }
602380     }
604382 
605383 
606384 @Callable(i)
607-func getRarity (genotype) = {
608-    let rarityFromName = getRarityFromName(genotype)
609-    let quantity = valueOrErrorMessage(tryGetInteger((("stats_" + rarityFromName) + "_rarity")), (("stats_" + rarityFromName) + "_rarity"))
610-    let power = pow((10000 / quantity), 4, 5, 1, 2, FLOOR)
611-    let rarity = if ((power > 0))
612-        then power
613-        else 2
614-    $Tuple2(nil, $Tuple2(rarityFromName, rarity))
385+func buyMutuarium (color,refererAddress) = {
386+    let validPayment = checkAdditionalPayment(i.payments[0])
387+    if ((validPayment == validPayment))
388+        then if ((indexOf(["D", "G"], color) != unit))
389+            then throw("you can not buy this Mutarium")
390+            else if ((indexOf(["A", "B", "C"], color) == unit))
391+                then throw("you need to set color properly")
392+                else {
393+                    let exactPrice = calculatePerchPrice(toString(i.caller))
394+                    let leftToPay = if ((i.originCaller == i.caller))
395+                        then {
396+                            let amountPaidByCoupons = asInt(invoke(getCouponsAddress(), "useCoupons", [exactPrice], nil))
397+                            if ((amountPaidByCoupons == amountPaidByCoupons))
398+                                then (exactPrice - amountPaidByCoupons)
399+                                else throw("Strict value is not equal to itself.")
400+                            }
401+                        else exactPrice
402+                    let payment = if ((leftToPay != 0))
403+                        then if ((size(i.payments) != 2))
404+                            then throw("You need to attach 2 payments")
405+                            else {
406+                                let firstPayment = value(i.payments[1])
407+                                if ((firstPayment.assetId != getEggAssetId()))
408+                                    then throw(("FBP: You can attach only EGG tokens with the following asset id: " + toBase58String(getEggAssetId())))
409+                                    else if ((firstPayment.amount != leftToPay))
410+                                        then throw(((("FBP: To buy a perch you currently need the following amount of EGGlets: " + toString(leftToPay)) + " ") + toString(i.caller)))
411+                                        else {
412+                                            let refererRewardForPerch = fraction(leftToPay, 5, 100)
413+                                            let refCall = asBoolean(invoke(getRefContractAddress(), "refPayment", [refererAddress], [AttachedPayment(getEggAssetId(), refererRewardForPerch)]))
414+                                            if ((refCall == refCall))
415+                                                then {
416+                                                    let toBurn = if (refCall)
417+                                                        then (leftToPay - refererRewardForPerch)
418+                                                        else leftToPay
419+                                                    let burnCall = invoke(getBurnAddress(), "burnAttachedPayments", nil, [AttachedPayment(getEggAssetId(), toBurn)])
420+                                                    if ((burnCall == burnCall))
421+                                                        then leftToPay
422+                                                        else throw("Strict value is not equal to itself.")
423+                                                    }
424+                                                else throw("Strict value is not equal to itself.")
425+                                            }
426+                                }
427+                        else 0
428+                    if ((payment == payment))
429+                        then {
430+                            let perchAmountKey = ((("address_" + toString(i.caller)) + "_mutariumAvailable_") + color)
431+                            let perchAmount = tryGetInteger(perchAmountKey)
432+                            ([IntegerEntry(perchAmountKey, (perchAmount + 1))] ++ validPayment)
433+                            }
434+                        else throw("Strict value is not equal to itself.")
435+                    }
436+        else throw("Strict value is not equal to itself.")
615437     }
616438 
617439 
618440 
619441 @Callable(i)
620-func reduceRarity (assetId,fGen) = throw("MRR: Not implemented")
442+func stakeNFT () = {
443+    let validPayment = checkAdditionalPayment(i.payments[0])
444+    if ((validPayment == validPayment))
445+        then {
446+            let pmt = value(i.payments[1])
447+            let assetId = value(pmt.assetId)
448+            let assetName = value(value(assetInfo(assetId)).description)
449+            let address = toString(i.caller)
450+            let color = takeRight(assetName, 1)
451+            let availablePerches = tryGetInteger(((("address_" + address) + "_mutariumAvailable_") + color))
452+            let perches = if ((0 >= availablePerches))
453+                then throw(("no perches available for the color " + color))
454+                else [IntegerEntry(((("address_" + address) + "_mutariumAvailable_") + color), (availablePerches - 1)), StringEntry((((("address_" + address) + "_asset_") + toBase58String(assetId)) + "_perchColor"), color)]
455+            if ((pmt.amount != 1))
456+                then throw("NFT is not attached")
457+                else {
458+                    let farmingPower = asIntTuple(invoke(this, "calculateFarmPower", [toBase58String(assetId)], nil))
459+                    if ((farmingPower == farmingPower))
460+                        then {
461+                            let result = deterMineClassAndClaimType(address, toBase58String(assetId), assetName, false)
462+                            if ((result == result))
463+                                then (((([StringEntry((toBase58String(assetId) + "_owner"), address), IntegerEntry((toBase58String(assetId) + "_basePower"), farmingPower._2), IntegerEntry(assetFarmingPower(address, toBase58String(assetId)), farmingPower._2)] ++ deterMineClassAndSetType(address, assetId, farmingPower._2, assetName)) ++ validPayment) ++ perches) ++ result)
464+                                else throw("Strict value is not equal to itself.")
465+                            }
466+                        else throw("Strict value is not equal to itself.")
467+                    }
468+            }
469+        else throw("Strict value is not equal to itself.")
470+    }
471+
472+
473+
474+@Callable(i)
475+func topUpReward (reveneuType,amount) = if ((reveneuType == "SPICE"))
476+    then if ((i.payments[0].assetId != getSpiceAssetId()))
477+        then throw("Please attach spice!")
478+        else handleStakingTopUp(i.payments[0].amount, reveneuType)
479+    else if ((reveneuType == "EGG"))
480+        then {
481+            let firstPayment = value(i.payments[0])
482+            if ((firstPayment.assetId != getEggAssetId()))
483+                then throw(("FBP: You can attach only EGG tokens with the following asset id: " + toBase58String(getEggAssetId())))
484+                else handleStakingTopUp(firstPayment.amount, reveneuType)
485+            }
486+        else if ((reveneuType == "FEED"))
487+            then if ((i.caller != getAccBoosterAddress()))
488+                then throw("VFTUP: Only accBoosterDapp can do topup!")
489+                else handleStakingTopUp(amount, reveneuType)
490+            else if ((reveneuType == "VEGG"))
491+                then if ((i.caller != getCouponsAddress()))
492+                    then throw("VFTUP: Only couponsdapp can do topup!")
493+                    else handleStakingTopUp(amount, reveneuType)
494+                else throw("Unknown reveneuType")
495+
496+
497+
498+@Callable(i)
499+func unstakeNFT (assetId) = {
500+    let address = toString(i.caller)
501+    if ((tryGetString((assetId + "_owner")) != toString(i.caller)))
502+        then throw("You don't own this duck!!")
503+        else {
504+            let assetName = value(value(assetInfo(fromBase58String(assetId))).description)
505+            let result = deterMineClassAndClaimType(address, assetId, assetName, false)
506+            if ((result == result))
507+                then {
508+                    let validPayment = checkAdditionalPayment(i.payments[0])
509+                    if ((validPayment == validPayment))
510+                        then {
511+                            let color = tryGetString((((("address_" + address) + "_asset_") + assetId) + "_perchColor"))
512+                            let assetFP = tryGetInteger(assetFarmingPower(address, assetId))
513+                            if ((assetFP == assetFP))
514+                                then {
515+                                    let updateKeys = deterMineClassAndUpdateType(address, fromBase58String(assetId), assetFP, assetName)
516+                                    ((([IntegerEntry(((("address_" + address) + "_mutariumAvailable_") + color), (tryGetInteger(((("address_" + address) + "_mutariumAvailable_") + color)) + 1)), DeleteEntry((assetId + "_owner")), DeleteEntry(assetFarmingPower(address, assetId)), DeleteEntry((((("address_" + address) + "_asset_") + assetId) + "_perchColor")), ScriptTransfer(Address(fromBase58String(address)), 1, fromBase58String(assetId))] ++ updateKeys) ++ validPayment) ++ result)
517+                                    }
518+                                else throw("Strict value is not equal to itself.")
519+                            }
520+                        else throw("Strict value is not equal to itself.")
521+                    }
522+                else throw("Strict value is not equal to itself.")
523+            }
524+    }
525+
526+
527+
528+@Callable(i)
529+func claimReward (assetId) = {
530+    let validPayment = checkAdditionalPayment(i.payments[0])
531+    if ((validPayment == validPayment))
532+        then {
533+            let assetName = value(value(assetInfo(fromBase58String(assetId))).description)
534+            if ((size(i.payments) > 1))
535+                then throw("Please don't add extra payments")
536+                else (deterMineClassAndClaimType(toString(i.caller), assetId, assetName, true) ++ validPayment)
537+            }
538+        else throw("Strict value is not equal to itself.")
539+    }
621540 
622541 
623542 @Verifier(tx)

Full: 

OldNewDifferences
1-{-# STDLIB_VERSION 6 #-}
1+{-# STDLIB_VERSION 5 #-}
22 {-# SCRIPT_TYPE ACCOUNT #-}
33 {-# CONTENT_TYPE DAPP #-}
4-func basePriceSpice () = 1000000000
4+func getReveneuTypes () = ["EGG", "SPICE", "VEGG", "FEED"]
55 
66 
7-func basePriceEgg () = 200000000
8-
9-
10-func delayForHatching () = 2
11-
12-
13-func hatchingStarted () = "BREEDING_STARTED"
14-
15-
16-func hatchingFinished () = "BREEDING_FINISHED"
17-
18-
19-func staticKey_eggAssetId () = "static_eggAssetId"
20-
21-
22-func staticKey_spiceAssetId () = "static_spiceAssetId"
23-
24-
25-func staticKey_duckBreederAddress () = "static_breederAddress"
26-
27-
28-func staticKey_turtleBreederAddress () = "static_turtleBreederAddress"
29-
30-
31-func staticKey_oracleAddress () = "static_oracleAddress"
32-
33-
34-func staticKey_extraFee () = "static_extraFee"
35-
36-
37-func staticKey_feeAggregator () = "static_feeAggregator"
38-
39-
40-func staticKey_burnAddress () = "static_burnAddress"
41-
42-
43-func staticKey_turtleStakingAddress () = "static_turtleStakingAddress"
44-
45-
46-func staticKey_canineBreederAddress () = "static_canineBreederAddress"
47-
48-
49-func staticKey_felineBreederAddress () = "static_felineBreederAddress"
50-
51-
52-func staticKey_eagleBreederAddress () = "static_eagleBreederAddress"
53-
54-
55-func getStatsKey_amount () = "stats_amount"
56-
57-
58-func getStatsKey (genString) = (("stats_" + genString) + "_amount")
59-
60-
61-func getChildren (assetId) = (("asset_" + assetId) + "_children")
62-
63-
64-func getParentKey (txId,parentNum) = ((("inittx_" + toBase58String(txId)) + "_parent") + toString(parentNum))
65-
66-
67-func getProcessStatusKey (address,txId) = (((address + "_") + txId) + "_status")
68-
69-
70-func getProcessFinishHeightKey (address,txId) = (((address + "_") + txId) + "_fh")
71-
72-
73-func getIdKey (address,txId) = (((address + "_") + txId) + "_di")
74-
7+let Scale = 100000000
758 
769 func tryGetStringExternal (address,key) = match getString(address, key) {
7710     case a: String => 
7811         a
7912     case _ => 
8013         ""
8114 }
82-
83-
84-func tryGetString (key) = tryGetStringExternal(this, key)
85-
86-
87-func tryGetInteger (key) = {
88-    let val =     match getInteger(this, key) {
89-        case b: Int => 
90-            b
91-        case _ => 
92-            0
93-    }
94-    val
95-    }
96-
97-
98-func getOracle () = Address(fromBase58String(tryGetString(staticKey_oracleAddress())))
99-
100-
101-func getTurtleBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleBreederAddress())))
102-
103-
104-func getDuckBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_duckBreederAddress())))
105-
106-
107-func getEagleBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_eagleBreederAddress())))
108-
109-
110-func getCanineBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_canineBreederAddress())))
111-
112-
113-func getFelineBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_felineBreederAddress())))
114-
115-
116-func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_eggAssetId()))
117-
118-
119-func getSpiceAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_spiceAssetId()))
120-
121-
122-func getFeeAggregator () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_feeAggregator())))
123-
124-
125-func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_burnAddress())))
126-
127-
128-func getTurtleStakingAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_turtleStakingAddress())))
129-
130-
131-func getAllowedMutants () = [getTurtleBreederAddress(), getDuckBreederAddress()]
132-
133-
134-func calcPriceInAsset (baseAmount) = (baseAmount + (((baseAmount * (tryGetInteger(getStatsKey_amount()) + 1)) / 1000) / size(getAllowedMutants())))
13515 
13616 
13717 func getBool (key) = match getBoolean(this, key) {
13818     case b: Boolean => 
13919         b
14020     case _ => 
14121         false
14222 }
14323 
14424 
14525 func isTestEnv () = getBool("TESTENV")
14626 
14727 
148-func getRandomNumber (variants,txId,hatchingFinishHeight,offset) = {
149-    let randomSeedBlock = value(blockInfoByHeight((hatchingFinishHeight - 1)))
150-    let randomHash = sha256_16Kb((txId + value(randomSeedBlock.vrf)))
151-    (toInt(randomHash, offset) % variants)
28+func staticKey_mutantIncubatorAddress () = "static_mutantIncubatorAddress"
29+
30+
31+func staticKey_oracleAddress () = "static_oracleAddress"
32+
33+
34+func staticKey_feeAggregator () = "static_feeAggregator"
35+
36+
37+func staticKey_accBoosterAddress () = "static_accBoosterAddress"
38+
39+
40+func staticKey_mutariumFee () = "static_mutariumFee"
41+
42+
43+func staticKey_babyDuckAddress () = "static_babyDuckAddress"
44+
45+
46+func staticKey_couponsAddress () = "static_couponsAddress"
47+
48+
49+func staticKey_spiceAssetId () = "static_spiceAssetId"
50+
51+
52+func staticKey_eggAssetId () = "static_eggAssetId"
53+
54+
55+func staticKey_refContractAddress () = "static_refContractAddress"
56+
57+
58+func staticKey_burnAddress () = "static_burnAddress"
59+
60+
61+func staticKey_itemsAddress () = "static_itemsAddress"
62+
63+
64+func rewardClaimedKey (address,asset,reveneuType) = ((((address + "_asset_") + asset) + "_claimed_") + reveneuType)
65+
66+
67+func totalStakedKey (reveneuType) = ("total_staked_" + reveneuType)
68+
69+
70+func totalStakedUserKey (address,reveneuType) = ("total_staked_" + address)
71+
72+
73+func keyGlobalLastInterest (reveneuType) = ("global_lastCheck_interest_" + reveneuType)
74+
75+
76+func keyLastCheckInterest (address,asset,reveneuType) = ((((("address_" + address) + "_asset_") + asset) + "_lastCheckInterest_") + reveneuType)
77+
78+
79+func keyGlobalEarned (reveneuType) = ("global_earnings_" + reveneuType)
80+
81+
82+func staticKey_extraFee () = "static_extraFee"
83+
84+
85+func assetFarmingPower (address,asset) = (((("address_" + address) + "_asset_") + asset) + "_farmingPower")
86+
87+
88+func staticKey_wearablesAddress () = "static_wearablesAddress"
89+
90+
91+func tryGetString (key) = tryGetStringExternal(this, key)
92+
93+
94+func getOracle () = Address(fromBase58String(tryGetString(staticKey_oracleAddress())))
95+
96+
97+func getMutantBreederAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_mutantIncubatorAddress())))
98+
99+
100+func getFeeAggregator () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_feeAggregator())))
101+
102+
103+func getAccBoosterAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_accBoosterAddress())))
104+
105+
106+func getBabyduckAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_babyDuckAddress())))
107+
108+
109+func getCouponsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_couponsAddress())))
110+
111+
112+func getSpiceAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_spiceAssetId()))
113+
114+
115+func getEggAssetId () = fromBase58String(tryGetStringExternal(getOracle(), staticKey_eggAssetId()))
116+
117+
118+func getRefContractAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_refContractAddress())))
119+
120+
121+func getBurnAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_burnAddress())))
122+
123+
124+func getItemsAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_itemsAddress())))
125+
126+
127+func getWearablesAddress () = Address(fromBase58String(tryGetStringExternal(getOracle(), staticKey_wearablesAddress())))
128+
129+
130+func asIntTuple (value) = match value {
131+    case int: (Int, Int) => 
132+        int
133+    case _ => 
134+        throw("FAI: wrong type, expected: (Int,Int)")
135+}
136+
137+
138+func asBoolean (value) = match value {
139+    case boolean: Boolean => 
140+        boolean
141+    case _ => 
142+        throw("FAB: wrong type, expected: Boolean")
143+}
144+
145+
146+func asInt (value) = match value {
147+    case int: Int => 
148+        int
149+    case _ => 
150+        throw("FAI: wrong type, expected: Int")
151+}
152+
153+
154+func asRarity (value) = match value {
155+    case strIntTuple: (String, Int) => 
156+        strIntTuple
157+    case _ => 
158+        throw("BAI: wrong type, expected: strIntTuple")
159+}
160+
161+
162+func asString (value) = match value {
163+    case s: String => 
164+        s
165+    case s: Int => 
166+        throw("wrong type, expected: String, got: Int")
167+    case s: Unit => 
168+        throw("wrong type, expected: String, got: Unit")
169+    case _ => 
170+        throw("wrong type, expected: String")
171+}
172+
173+
174+func tryGetInteger (key) = match getInteger(this, key) {
175+    case b: Int => 
176+        b
177+    case _ => 
178+        0
179+}
180+
181+
182+func checkAdditionalPayment (payment) = if (isDefined(payment.assetId))
183+    then throw("FCAP: Please attach waves")
184+    else {
185+        let feeAmount = getIntegerValue(getOracle(), staticKey_extraFee())
186+        if ((payment.amount != feeAmount))
187+            then throw((("FCAP: Please attach exactly " + toString(feeAmount)) + " amount of wavelets"))
188+            else [ScriptTransfer(getFeeAggregator(), feeAmount, unit)]
189+        }
190+
191+
192+func determineClasses (assetName) = {
193+    let genotype = split(dropRight(drop(assetName, 5), 3), "")
194+    let classes = [genotype[0], genotype[2], genotype[4], genotype[6], genotype[8], genotype[10], genotype[12], genotype[14]]
195+    $Tuple2(containsElement(classes, "T"), containsElement(classes, "D"))
152196     }
153197 
154198 
155-func getRandomGen (gen1,gen2,step,txId,hatchingFinishHeight) = {
156-    let randomNum = getRandomNumber(2, txId, hatchingFinishHeight, step)
157-    let gen = if ((randomNum == 0))
158-        then gen1
159-        else gen2
160-    gen
199+func calculatePerchPrice (address) = {
200+    let hasArtefactStaked = tryGetStringExternal(getAccBoosterAddress(), (("ART-XMISTL_" + address) + "_owner"))
201+    let perchPrice = getIntegerValue(getOracle(), staticKey_mutariumFee())
202+    if ((hasArtefactStaked == ""))
203+        then perchPrice
204+        else ((perchPrice / 10) * 9)
161205     }
162206 
163207 
164-func generate (txId,finishHeight,parent1Id,parent2Id) = {
165-    let colorRandom = getRandomNumber(100, txId, finishHeight, 11)
166-    let color = if ((26 > colorRandom))
167-        then "A"
168-        else if ((48 > colorRandom))
169-            then "B"
170-            else if ((70 > colorRandom))
171-                then "C"
172-                else if ((90 > colorRandom))
173-                    then "D"
174-                    else "G"
175-    let parent1Gen = split(value(assetInfo(parent1Id)).name, "")
176-    let parent2Gen = split(value(assetInfo(parent2Id)).name, "")
177-    let gen = (((((((((("MTNT-" + getRandomGen((parent1Gen[0] + parent1Gen[5]), (parent2Gen[0] + parent2Gen[5]), 0, txId, finishHeight)) + getRandomGen((parent1Gen[0] + parent1Gen[6]), (parent2Gen[0] + parent2Gen[6]), 1, txId, finishHeight)) + getRandomGen((parent1Gen[0] + parent1Gen[7]), (parent2Gen[0] + parent2Gen[7]), 2, txId, finishHeight)) + getRandomGen((parent1Gen[0] + parent1Gen[8]), (parent2Gen[0] + parent2Gen[8]), 3, txId, finishHeight)) + getRandomGen((parent1Gen[0] + parent1Gen[9]), (parent2Gen[0] + parent2Gen[9]), 4, txId, finishHeight)) + getRandomGen((parent1Gen[0] + parent1Gen[10]), (parent2Gen[0] + parent2Gen[10]), 5, txId, finishHeight)) + getRandomGen((parent1Gen[0] + parent1Gen[11]), (parent2Gen[0] + parent2Gen[11]), 6, txId, finishHeight)) + getRandomGen((parent1Gen[0] + parent1Gen[12]), (parent2Gen[0] + parent2Gen[12]), 7, txId, finishHeight)) + "-G") + color)
178-    gen
208+func updateFarmingPower (address,asset,reveneuType) = {
209+    let totalStaked = tryGetInteger(totalStakedKey(reveneuType))
210+    let totalStakedUser = tryGetInteger(totalStakedUserKey(address, reveneuType))
211+    let currentFP = tryGetInteger(assetFarmingPower(address, asset))
212+    let newFP = asIntTuple(invoke(this, "calculateFarmPower", [asset], nil))
213+    if ((currentFP != 0))
214+        then [IntegerEntry(totalStakedKey(reveneuType), ((totalStaked - currentFP) + newFP._1)), IntegerEntry(totalStakedUserKey(address, reveneuType), ((totalStakedUser - currentFP) + newFP._1)), IntegerEntry(assetFarmingPower(address, asset), newFP._1)]
215+        else nil
179216     }
180217 
181218 
182-func isSymbol (acc,sym) = if ((sym == acc._2))
183-    then $Tuple2((acc._1 + 1), acc._2)
184-    else $Tuple2((acc._1 + 0), acc._2)
185-
186-
187-func getAmountOrClear (amount) = if (contains(amount, "0"))
188-    then ""
189-    else amount
190-
191-
192-func charList () = ["A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z"]
193-
194-
195-func getRarityFromName (name) = {
196-    let color = takeRight(name, 1)
197-    let genotype = split(dropRight(drop(name, 5), 3), "")
198-    let genetics = [genotype[1], genotype[3], genotype[5], genotype[7], genotype[9], genotype[11], genotype[13], genotype[15]]
199-    func composeString (acc,char) =     {
200-        let charCount = {
201-            let $l = genetics
202-            let $s = size($l)
203-            let $acc0 = $Tuple2(0, char)
204-            func $f0_1 ($a,$i) =             if (($i >= $s))
205-                then $a
206-                else isSymbol($a, $l[$i])
207-
208-            func $f0_2 ($a,$i) =             if (($i >= $s))
209-                then $a
210-                else throw("List size exceeds 8")
211-
212-            $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)
213-            }
214-        (acc + getAmountOrClear((toString(charCount._1) + char)))
215-        }
216-
217-    (({
218-        let $l = charList()
219-        let $s = size($l)
220-        let $acc0 = ""
221-        func $f0_1 ($a,$i) =         if (($i >= $s))
222-            then $a
223-            else composeString($a, $l[$i])
224-
225-        func $f0_2 ($a,$i) =         if (($i >= $s))
226-            then $a
227-            else throw("List size exceeds 26")
228-
229-        $f0_2($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($f0_1($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), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26)
230-        } + "-") + color)
231-    }
232-
233-
234-func nrOfTypeGenes (gen) = {
235-    let genotype = split(dropRight(drop(gen, 5), 3), "")
236-    let parts1 = (genotype[0] + genotype[1])
237-    let parts2 = (genotype[2] + genotype[3])
238-    let parts3 = (genotype[4] + genotype[5])
239-    let parts4 = (genotype[6] + genotype[7])
240-    let parts5 = (genotype[8] + genotype[9])
241-    let parts6 = (genotype[10] + genotype[11])
242-    let parts7 = (genotype[12] + genotype[13])
243-    let parts8 = (genotype[14] + genotype[15])
244-    let parts = [parts1, parts2, parts3, parts4, parts5, parts6, parts7, parts8]
245-    func sortPartsByType (acc,part) =     {
246-        let splitParts = split(part, "")
247-        if ((splitParts[0] == "T"))
248-            then $Tuple5((acc._1 :+ splitParts[1]), acc._2, acc._3, acc._4, acc._5)
249-            else if ((splitParts[0] == "D"))
250-                then $Tuple5(acc._1, (acc._2 :+ splitParts[1]), acc._3, acc._4, acc._5)
251-                else if ((splitParts[0] == "F"))
252-                    then $Tuple5(acc._1, acc._2, (acc._3 :+ splitParts[1]), acc._4, acc._5)
253-                    else if ((splitParts[0] == "C"))
254-                        then $Tuple5(acc._1, acc._2, acc._3, (acc._4 :+ splitParts[1]), acc._5)
255-                        else if ((splitParts[0] == "E"))
256-                            then $Tuple5(acc._1, acc._2, acc._3, acc._4, (acc._5 :+ splitParts[1]))
257-                            else throw("UNKNOWN TYPE")
258-        }
259-
260-    let result = {
261-        let $l = parts
262-        let $s = size($l)
263-        let $acc0 = $Tuple5(nil, nil, nil, nil, nil)
264-        func $f0_1 ($a,$i) =         if (($i >= $s))
265-            then $a
266-            else sortPartsByType($a, $l[$i])
267-
268-        func $f0_2 ($a,$i) =         if (($i >= $s))
269-            then $a
270-            else throw("List size exceeds 8")
271-
272-        $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)
273-        }
274-    if ((result == result))
219+func claimStakingResult (address,assetId,recalc,reveneuType) = {
220+    let currentInterest = tryGetInteger(keyGlobalLastInterest(reveneuType))
221+    let lastCheckInterest = tryGetInteger(keyLastCheckInterest(address, assetId, reveneuType))
222+    let stakedAmount = tryGetInteger(assetFarmingPower(address, assetId))
223+    let fpUpdate = if (recalc)
224+        then updateFarmingPower(address, assetId, reveneuType)
225+        else nil
226+    if ((fpUpdate == fpUpdate))
275227         then {
276-            func composeStringTurtle (acc,char) =             {
277-                let charCount = {
278-                    let $l = result._1
279-                    let $s = size($l)
280-                    let $acc0 = $Tuple2(0, char)
281-                    func $f1_1 ($a,$i) =                     if (($i >= $s))
282-                        then $a
283-                        else isSymbol($a, $l[$i])
284-
285-                    func $f1_2 ($a,$i) =                     if (($i >= $s))
286-                        then $a
287-                        else throw("List size exceeds 8")
288-
289-                    $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)
290-                    }
291-                (acc + getAmountOrClear((toString(charCount._1) + char)))
292-                }
293-
294-            func composeStringDuck (acc,char) =             {
295-                let charCount = {
296-                    let $l = result._2
297-                    let $s = size($l)
298-                    let $acc0 = $Tuple2(0, char)
299-                    func $f1_1 ($a,$i) =                     if (($i >= $s))
300-                        then $a
301-                        else isSymbol($a, $l[$i])
302-
303-                    func $f1_2 ($a,$i) =                     if (($i >= $s))
304-                        then $a
305-                        else throw("List size exceeds 8")
306-
307-                    $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)
308-                    }
309-                (acc + getAmountOrClear((toString(charCount._1) + char)))
310-                }
311-
312-            func composeStringCat (acc,char) =             {
313-                let charCount = {
314-                    let $l = result._3
315-                    let $s = size($l)
316-                    let $acc0 = $Tuple2(0, char)
317-                    func $f1_1 ($a,$i) =                     if (($i >= $s))
318-                        then $a
319-                        else isSymbol($a, $l[$i])
320-
321-                    func $f1_2 ($a,$i) =                     if (($i >= $s))
322-                        then $a
323-                        else throw("List size exceeds 8")
324-
325-                    $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)
326-                    }
327-                (acc + getAmountOrClear((toString(charCount._1) + char)))
328-                }
329-
330-            func composeStringDog (acc,char) =             {
331-                let charCount = {
332-                    let $l = result._4
333-                    let $s = size($l)
334-                    let $acc0 = $Tuple2(0, char)
335-                    func $f1_1 ($a,$i) =                     if (($i >= $s))
336-                        then $a
337-                        else isSymbol($a, $l[$i])
338-
339-                    func $f1_2 ($a,$i) =                     if (($i >= $s))
340-                        then $a
341-                        else throw("List size exceeds 8")
342-
343-                    $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)
344-                    }
345-                (acc + getAmountOrClear((toString(charCount._1) + char)))
346-                }
347-
348-            func composeStringEagle (acc,char) =             {
349-                let charCount = {
350-                    let $l = result._4
351-                    let $s = size($l)
352-                    let $acc0 = $Tuple2(0, char)
353-                    func $f1_1 ($a,$i) =                     if (($i >= $s))
354-                        then $a
355-                        else isSymbol($a, $l[$i])
356-
357-                    func $f1_2 ($a,$i) =                     if (($i >= $s))
358-                        then $a
359-                        else throw("List size exceeds 8")
360-
361-                    $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)
362-                    }
363-                (acc + getAmountOrClear((toString(charCount._1) + char)))
364-                }
365-
366-            let turtleGens = {
367-                let $l = charList()
368-                let $s = size($l)
369-                let $acc0 = ""
370-                func $f1_1 ($a,$i) =                 if (($i >= $s))
371-                    then $a
372-                    else composeStringTurtle($a, $l[$i])
373-
374-                func $f1_2 ($a,$i) =                 if (($i >= $s))
375-                    then $a
376-                    else throw("List size exceeds 26")
377-
378-                $f1_2($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($f1_1($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), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26)
379-                }
380-            let duckGens = {
381-                let $l = charList()
382-                let $s = size($l)
383-                let $acc0 = ""
384-                func $f2_1 ($a,$i) =                 if (($i >= $s))
385-                    then $a
386-                    else composeStringDuck($a, $l[$i])
387-
388-                func $f2_2 ($a,$i) =                 if (($i >= $s))
389-                    then $a
390-                    else throw("List size exceeds 26")
391-
392-                $f2_2($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($f2_1($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), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26)
393-                }
394-            let catGens = {
395-                let $l = charList()
396-                let $s = size($l)
397-                let $acc0 = ""
398-                func $f3_1 ($a,$i) =                 if (($i >= $s))
399-                    then $a
400-                    else composeStringCat($a, $l[$i])
401-
402-                func $f3_2 ($a,$i) =                 if (($i >= $s))
403-                    then $a
404-                    else throw("List size exceeds 26")
405-
406-                $f3_2($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($f3_1($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), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26)
407-                }
408-            let hondGens = {
409-                let $l = charList()
410-                let $s = size($l)
411-                let $acc0 = ""
412-                func $f4_1 ($a,$i) =                 if (($i >= $s))
413-                    then $a
414-                    else composeStringDog($a, $l[$i])
415-
416-                func $f4_2 ($a,$i) =                 if (($i >= $s))
417-                    then $a
418-                    else throw("List size exceeds 26")
419-
420-                $f4_2($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($f4_1($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), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26)
421-                }
422-            let eagleGens = {
423-                let $l = charList()
424-                let $s = size($l)
425-                let $acc0 = ""
426-                func $f5_1 ($a,$i) =                 if (($i >= $s))
427-                    then $a
428-                    else composeStringEagle($a, $l[$i])
429-
430-                func $f5_2 ($a,$i) =                 if (($i >= $s))
431-                    then $a
432-                    else throw("List size exceeds 26")
433-
434-                $f5_2($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($f5_1($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), 9), 10), 11), 12), 13), 14), 15), 16), 17), 18), 19), 20), 21), 22), 23), 24), 25), 26)
435-                }
436-            let finishedTurtleGens = if ((turtleGens == ""))
437-                then ""
438-                else (("T:" + turtleGens) + "_")
439-            let finishedDuckGens = if ((duckGens == ""))
440-                then ""
441-                else (("D:" + duckGens) + "_")
442-            let finishedCatGens = if ((catGens == ""))
443-                then ""
444-                else (("F:" + catGens) + "_")
445-            let finishedHondGens = if ((hondGens == ""))
446-                then ""
447-                else (("C:" + hondGens) + "_")
448-            let finishedEagleGens = if ((eagleGens == ""))
449-                then ""
450-                else (("E:" + hondGens) + "_")
451-            $Tuple2([StringEntry("DEBUG_TURTLE", turtleGens), StringEntry("DEBUG_DUCK", duckGens), StringEntry("DEBUG_CAT", catGens), StringEntry("DEBUG_HOND", hondGens), StringEntry("DEBUG_EAGLE", eagleGens)], ((((finishedTurtleGens + finishedDuckGens) + finishedCatGens) + hondGens) + eagleGens))
228+            let reward = if ((lastCheckInterest > 0))
229+                then fraction((currentInterest - lastCheckInterest), stakedAmount, Scale)
230+                else 0
231+            let specifiqueKeys = if ((reveneuType == "SPICE"))
232+                then [ScriptTransfer(addressFromStringValue(address), reward, getSpiceAssetId())]
233+                else if ((reveneuType == "EGG"))
234+                    then [ScriptTransfer(addressFromStringValue(address), reward, getEggAssetId())]
235+                    else if ((reveneuType == "FEED"))
236+                        then {
237+                            let invokeResult = if ((reward > 0))
238+                                then invoke(getAccBoosterAddress(), "addFeedLimit", [reward, address], nil)
239+                                else unit
240+                            if ((invokeResult == invokeResult))
241+                                then nil
242+                                else throw("Strict value is not equal to itself.")
243+                            }
244+                        else if ((reveneuType == "VEGG"))
245+                            then {
246+                                let invokeResult = if ((reward > 0))
247+                                    then invoke(getCouponsAddress(), "addCouponsFarming", [address, reward], nil)
248+                                    else unit
249+                                if ((invokeResult == invokeResult))
250+                                    then nil
251+                                    else throw("Strict value is not equal to itself.")
252+                                }
253+                            else throw("Unknown reveneuType")
254+            (([IntegerEntry(keyLastCheckInterest(address, assetId, reveneuType), currentInterest), IntegerEntry(rewardClaimedKey(address, assetId, reveneuType), (tryGetInteger(rewardClaimedKey(address, assetId, reveneuType)) + reward))] ++ fpUpdate) ++ specifiqueKeys)
452255             }
453256         else throw("Strict value is not equal to itself.")
454257     }
455258 
456259 
457-func validateIfMutantFailed (rarity) = if ((3 > size(split(rarity, ":"))))
458-    then true
459-    else false
260+func setKeysReveneuType (address,assetId,reveneuType,fp) = [IntegerEntry(totalStakedKey(reveneuType), (tryGetInteger(totalStakedKey(reveneuType)) + fp)), IntegerEntry(totalStakedUserKey(address, reveneuType), (tryGetInteger(totalStakedUserKey(address, reveneuType)) + fp))]
460261 
461262 
462-func finishHatchingInternal (txId,owner) = {
463-    let processStatusKey = getProcessStatusKey(owner, txId)
464-    let finishHeightKey = getProcessFinishHeightKey(owner, txId)
465-    let IdKey = getIdKey(owner, txId)
466-    let processTxStatus = getStringValue(this, processStatusKey)
467-    let processFinishHeight = getIntegerValue(this, finishHeightKey)
468-    if ((processTxStatus == hatchingFinished()))
469-        then {
470-            let Id = getStringValue(this, getIdKey(owner, txId))
471-            throw(("The MUTANT was breeded and claimed already, here is the folowing: " + Id))
472-            }
473-        else if ((processFinishHeight > height))
474-            then throw((((("Breeding is not finished yet " + toString((processFinishHeight - height))) + " blocks remaining, it will take around ") + toString((processFinishHeight - height))) + " minutes"))
475-            else {
476-                let parent1Id = tryGetString(getParentKey(fromBase58String(txId), 1))
477-                let parent2Id = tryGetString(getParentKey(fromBase58String(txId), 2))
478-                let parent1IdBytes = fromBase58String(parent1Id)
479-                let parent2IdBytes = fromBase58String(parent2Id)
480-                let gen = generate(fromBase58String(txId), processFinishHeight, parent1IdBytes, parent2IdBytes)
481-                let farmGen = nrOfTypeGenes(gen)
482-                let rarityFromName = getRarityFromName(gen)
483-                let amountGen = (tryGetInteger(getStatsKey(gen)) + 1)
484-                let amount = (tryGetInteger(getStatsKey_amount()) + 1)
485-                let asset = Issue(("MTNT-" + toString(amount)), gen, 1, 0, false, unit, processFinishHeight)
486-                let assetId = calculateAssetId(asset)
487-                let quantity = tryGetInteger((("stats_" + farmGen._2) + "_quantity"))
488-                let rarity = tryGetInteger((("stats_" + rarityFromName) + "_rarity"))
489-                let ownerAsAddress = addressFromStringValue(owner)
490-                let failed = validateIfMutantFailed(farmGen._2)
491-                let transferOrBurn = if (failed)
492-                    then Burn(assetId, 1)
493-                    else ScriptTransfer(ownerAsAddress, 1, assetId)
494-                let transferOrBurnParent1 = if ((getRandomNumber(10, fromBase58String(txId), processFinishHeight, 2) == 5))
495-                    then Burn(parent1IdBytes, 1)
496-                    else ScriptTransfer(ownerAsAddress, 1, parent1IdBytes)
497-                let transferOrBurnParent2 = if ((getRandomNumber(10, fromBase58String(txId), processFinishHeight, 3) == 5))
498-                    then Burn(parent2IdBytes, 1)
499-                    else ScriptTransfer(ownerAsAddress, 1, parent2IdBytes)
500-[StringEntry(processStatusKey, hatchingFinished()), StringEntry(IdKey, toBase58String(assetId)), StringEntry(toBase58String(assetId), IdKey), IntegerEntry(getStatsKey(gen), amountGen), IntegerEntry(getStatsKey_amount(), amount), IntegerEntry((("stats_" + farmGen._2) + "_quantity"), (quantity + 1)), IntegerEntry((("stats_" + rarityFromName) + "_rarity"), (rarity + 1)), IntegerEntry((("asset_" + parent1Id) + "_children"), 1), IntegerEntry((("asset_" + parent2Id) + "_children"), 1), asset, transferOrBurn, transferOrBurnParent1, transferOrBurnParent2]
501-                }
263+func updateKeysReveneuType (address,assetId,reveneuType,fp) = [IntegerEntry(totalStakedKey(reveneuType), (tryGetInteger(totalStakedKey(reveneuType)) - fp)), IntegerEntry(totalStakedUserKey(address, reveneuType), (tryGetInteger(totalStakedUserKey(address, reveneuType)) - fp))]
264+
265+
266+func deterMineClassAndClaimType (address,assetId,assetName,recalc) = {
267+    let $t086828726 = determineClasses(assetName)
268+    let isT = $t086828726._1
269+    let isD = $t086828726._2
270+    let tKeys = if (isT)
271+        then (claimStakingResult(address, assetId, recalc, "SPICE") ++ claimStakingResult(address, assetId, recalc, "FEED"))
272+        else nil
273+    let dKeys = if (isD)
274+        then (claimStakingResult(address, assetId, recalc, "EGG") ++ claimStakingResult(address, assetId, recalc, "VEGG"))
275+        else nil
276+    (tKeys ++ dKeys)
502277     }
503278 
504279 
505-func checkAdditionalPayment (payment) = if (isDefined(payment.assetId))
506-    then throw("BCAP: Please attach waves")
507-    else {
508-        let feeAmount = getIntegerValue(getOracle(), staticKey_extraFee())
509-        if ((payment.amount != feeAmount))
510-            then throw((("BCAP: Please attach exactly " + toString(feeAmount)) + " amount of wavelets"))
511-            else [ScriptTransfer(getFeeAggregator(), feeAmount, unit)]
512-        }
280+func deterMineClassAndSetType (address,assetId,fp,assetName) = {
281+    let $t091579201 = determineClasses(assetName)
282+    let isT = $t091579201._1
283+    let isD = $t091579201._2
284+    let tKeys = if (isT)
285+        then (setKeysReveneuType(address, assetId, "SPICE", fp) ++ setKeysReveneuType(address, assetId, "FEED", fp))
286+        else nil
287+    let dKeys = if (isD)
288+        then (setKeysReveneuType(address, assetId, "EGG", fp) ++ setKeysReveneuType(address, assetId, "VEGG", fp))
289+        else nil
290+    (tKeys ++ dKeys)
291+    }
513292 
514293 
515-func checkTypeAndValidObstinate (info) = {
516-    let splitted = split(info.name, "")
517-    let type = splitted[0]
518-    let gen = splitted[14]
519-    if ((gen != "O"))
520-        then throw("MCTAVO: Only obstinates can be turned into mutants")
521-        else {
522-            let breederSc = if ((type == "T"))
523-                then getTurtleBreederAddress()
524-                else if ((type == "D"))
525-                    then getDuckBreederAddress()
526-                    else if ((type == "C"))
527-                        then getCanineBreederAddress()
528-                        else if ((type == "F"))
529-                            then getFelineBreederAddress()
530-                            else if ((type == "E"))
531-                                then getEagleBreederAddress()
532-                                else throw("MCTAVO: Invalid type")
533-            if ((breederSc != info.issuer))
534-                then throw("MCTAVO: Only obstinates from the breeder contract can be turned into mutants")
535-                else if ((tryGetStringExternal(breederSc, toBase58String(info.id)) == ""))
536-                    then throw("MCTAVO: Invalid nft")
537-                    else if ((tryGetInteger(getChildren(toBase58String(info.id))) == 1))
538-                        then throw("MCTAVO: NFT already used")
539-                        else type
540-            }
294+func deterMineClassAndUpdateType (address,assetId,fp,assetName) = {
295+    let $t096219665 = determineClasses(assetName)
296+    let isT = $t096219665._1
297+    let isD = $t096219665._2
298+    let tKeys = if (isT)
299+        then (updateKeysReveneuType(address, assetId, "SPICE", fp) ++ updateKeysReveneuType(address, assetId, "FEED", fp))
300+        else nil
301+    let dKeys = if (isD)
302+        then (updateKeysReveneuType(address, assetId, "EGG", fp) ++ updateKeysReveneuType(address, assetId, "VEGG", fp))
303+        else nil
304+    (tKeys ++ dKeys)
305+    }
306+
307+
308+func handleStakingTopUp (amount,reveneuType) = {
309+    let currentInterest = tryGetInteger(keyGlobalLastInterest(reveneuType))
310+    let totalStakedAmount = tryGetInteger(totalStakedKey(reveneuType))
311+    let interestDelta = if ((totalStakedAmount > 0))
312+        then fraction(amount, Scale, totalStakedAmount)
313+        else 0
314+[IntegerEntry(keyGlobalEarned(reveneuType), (tryGetInteger(keyGlobalEarned(reveneuType)) + amount)), IntegerEntry(keyGlobalLastInterest(reveneuType), (currentInterest + interestDelta))]
541315     }
542316 
543317 
544318 @Callable(i)
545319 func configureOracle (oracle) = if ((i.caller != this))
546-    then throw("ICU: admin only")
320+    then throw("ACO: admin only")
547321     else [StringEntry("static_oracleAddress", oracle)]
548322 
549323 
550324 
551325 @Callable(i)
552-func startMutantHatching (refererAddress) = if ((size(i.payments) != 5))
553-    then throw("MSMH: 5 payments required")
554-    else if ((i.payments[0].amount != 1))
555-        then throw("MSMH: 1st payment must be an NFT")
556-        else if ((i.payments[1].amount != 1))
557-            then throw("MSMH: 2nd payment must be an NFT")
558-            else {
559-                let validPayment = checkAdditionalPayment(i.payments[2])
560-                if ((validPayment == validPayment))
561-                    then if (if ((i.payments[3].assetId != getSpiceAssetId()))
562-                        then true
563-                        else (i.payments[3].amount != calcPriceInAsset(basePriceSpice())))
564-                        then throw("MSMH: 4th payment must be in spice")
565-                        else if (if ((i.payments[4].assetId != getEggAssetId()))
566-                            then true
567-                            else (i.payments[4].amount != calcPriceInAsset(basePriceEgg())))
568-                            then throw("MSMH: 5th payment must be in egg")
569-                            else {
570-                                let nft1 = value(assetInfo(value(i.payments[0].assetId)))
571-                                let nft2 = value(assetInfo(value(i.payments[1].assetId)))
572-                                let type1 = checkTypeAndValidObstinate(nft1)
573-                                let type2 = checkTypeAndValidObstinate(nft2)
574-                                let burnCall = invoke(getBurnAddress(), "burnAttachedPayments", nil, [AttachedPayment(getEggAssetId(), assetBalance(this, getEggAssetId()))])
575-                                if ((burnCall == burnCall))
576-                                    then {
577-                                        let topup = invoke(getTurtleStakingAddress(), "topUpReward", nil, [AttachedPayment(getSpiceAssetId(), (assetBalance(this, getSpiceAssetId()) / 5))])
578-                                        if ((topup == topup))
579-                                            then if ((type1 == type2))
580-                                                then throw("MSMH: NFTs can not be of the same type")
581-                                                else ([StringEntry(getParentKey(i.transactionId, 1), toBase58String(nft1.id)), StringEntry(getParentKey(i.transactionId, 2), toBase58String(nft2.id)), StringEntry(getProcessStatusKey(toString(i.caller), toBase58String(i.transactionId)), hatchingStarted()), IntegerEntry(getProcessFinishHeightKey(toString(i.caller), toBase58String(i.transactionId)), (height + delayForHatching())), Burn(getSpiceAssetId(), assetBalance(this, getSpiceAssetId()))] ++ validPayment)
582-                                            else throw("Strict value is not equal to itself.")
583-                                        }
584-                                    else throw("Strict value is not equal to itself.")
326+func calculateFarmPower (assetId) = if (!((value(assetInfo(fromBase58String(assetId))).issuer == getMutantBreederAddress())))
327+    then throw("This does not seem like a valid Mutant!")
328+    else {
329+        let assetName = value(assetInfo(fromBase58String(assetId))).description
330+        let asRarityResult = asRarity(invoke(getMutantBreederAddress(), "getRarity", [assetName], nil))
331+        if ((asRarityResult == asRarityResult))
332+            then {
333+                let totalGenes = (size(split(dropRight(asRarityResult._1, 2), "")) / 2)
334+                let power = pow(15, 1, totalGenes, 0, 2, DOWN)
335+                let multiplier = (((height - 3750000) * 100) / (((60 * 24) * 30) * 3))
336+                let basePower = tryGetInteger((assetId + "_basePower"))
337+                let finalPower = if ((basePower > 0))
338+                    then basePower
339+                    else ((power * multiplier) / 100)
340+                let finalPowerRarity = ((finalPower * asRarityResult._2) / 100)
341+                let farmBoost = 0
342+                if ((farmBoost == farmBoost))
343+                    then {
344+                        let wearabledBoost = asInt(invoke(getWearablesAddress(), "calculateWearblesBoost", [assetId], nil))
345+                        if ((wearabledBoost == wearabledBoost))
346+                            then {
347+                                let finalPowerRarityBoost = ((finalPowerRarity + ((finalPowerRarity * farmBoost) / 100)) + ((finalPowerRarity * wearabledBoost) / 1000))
348+                                $Tuple2(nil, $Tuple2(finalPowerRarityBoost, finalPower))
585349                                 }
350+                            else throw("Strict value is not equal to itself.")
351+                        }
586352                     else throw("Strict value is not equal to itself.")
587353                 }
354+            else throw("Strict value is not equal to itself.")
355+        }
588356 
589357 
590358 
591359 @Callable(i)
592-func finishMutantHatching (txIdStr) = {
593-    let owner = toString(i.originCaller)
594-    if ((size(i.payments) != 1))
595-        then throw("MFMH: Wrong amount of payments!")
360+func redeemMutuarium () = {
361+    let validPayment = checkAdditionalPayment(i.payments[1])
362+    if (!(if ((size(i.payments) == 2))
363+        then (i.payments[0].amount == 1)
364+        else false))
365+        then throw("Invalid payment")
596366         else {
597-            let feeValidate = checkAdditionalPayment(i.payments[0])
598-            if ((feeValidate == feeValidate))
599-                then (finishHatchingInternal(txIdStr, owner) ++ feeValidate)
367+            let assetId = value(i.payments[0].assetId)
368+            let artefactName = asString(invoke(getItemsAddress(), "checkArtefactDetails", [toBase58String(assetId)], nil))
369+            if ((artefactName == artefactName))
370+                then if (!(contains(artefactName, "ART-MUTARIUM-")))
371+                    then throw("You can't use this artafect to redeem mutarium!")
372+                    else {
373+                        let color = takeRight(artefactName, 1)
374+                        let perchAmountKey = ((("address_" + toString(i.caller)) + "_mutariumAvailable_") + color)
375+                        let perchAmount = tryGetInteger(perchAmountKey)
376+                        ([IntegerEntry(perchAmountKey, (perchAmount + 1)), Burn(assetId, 1)] ++ validPayment)
377+                        }
600378                 else throw("Strict value is not equal to itself.")
601379             }
602380     }
603381 
604382 
605383 
606384 @Callable(i)
607-func getRarity (genotype) = {
608-    let rarityFromName = getRarityFromName(genotype)
609-    let quantity = valueOrErrorMessage(tryGetInteger((("stats_" + rarityFromName) + "_rarity")), (("stats_" + rarityFromName) + "_rarity"))
610-    let power = pow((10000 / quantity), 4, 5, 1, 2, FLOOR)
611-    let rarity = if ((power > 0))
612-        then power
613-        else 2
614-    $Tuple2(nil, $Tuple2(rarityFromName, rarity))
385+func buyMutuarium (color,refererAddress) = {
386+    let validPayment = checkAdditionalPayment(i.payments[0])
387+    if ((validPayment == validPayment))
388+        then if ((indexOf(["D", "G"], color) != unit))
389+            then throw("you can not buy this Mutarium")
390+            else if ((indexOf(["A", "B", "C"], color) == unit))
391+                then throw("you need to set color properly")
392+                else {
393+                    let exactPrice = calculatePerchPrice(toString(i.caller))
394+                    let leftToPay = if ((i.originCaller == i.caller))
395+                        then {
396+                            let amountPaidByCoupons = asInt(invoke(getCouponsAddress(), "useCoupons", [exactPrice], nil))
397+                            if ((amountPaidByCoupons == amountPaidByCoupons))
398+                                then (exactPrice - amountPaidByCoupons)
399+                                else throw("Strict value is not equal to itself.")
400+                            }
401+                        else exactPrice
402+                    let payment = if ((leftToPay != 0))
403+                        then if ((size(i.payments) != 2))
404+                            then throw("You need to attach 2 payments")
405+                            else {
406+                                let firstPayment = value(i.payments[1])
407+                                if ((firstPayment.assetId != getEggAssetId()))
408+                                    then throw(("FBP: You can attach only EGG tokens with the following asset id: " + toBase58String(getEggAssetId())))
409+                                    else if ((firstPayment.amount != leftToPay))
410+                                        then throw(((("FBP: To buy a perch you currently need the following amount of EGGlets: " + toString(leftToPay)) + " ") + toString(i.caller)))
411+                                        else {
412+                                            let refererRewardForPerch = fraction(leftToPay, 5, 100)
413+                                            let refCall = asBoolean(invoke(getRefContractAddress(), "refPayment", [refererAddress], [AttachedPayment(getEggAssetId(), refererRewardForPerch)]))
414+                                            if ((refCall == refCall))
415+                                                then {
416+                                                    let toBurn = if (refCall)
417+                                                        then (leftToPay - refererRewardForPerch)
418+                                                        else leftToPay
419+                                                    let burnCall = invoke(getBurnAddress(), "burnAttachedPayments", nil, [AttachedPayment(getEggAssetId(), toBurn)])
420+                                                    if ((burnCall == burnCall))
421+                                                        then leftToPay
422+                                                        else throw("Strict value is not equal to itself.")
423+                                                    }
424+                                                else throw("Strict value is not equal to itself.")
425+                                            }
426+                                }
427+                        else 0
428+                    if ((payment == payment))
429+                        then {
430+                            let perchAmountKey = ((("address_" + toString(i.caller)) + "_mutariumAvailable_") + color)
431+                            let perchAmount = tryGetInteger(perchAmountKey)
432+                            ([IntegerEntry(perchAmountKey, (perchAmount + 1))] ++ validPayment)
433+                            }
434+                        else throw("Strict value is not equal to itself.")
435+                    }
436+        else throw("Strict value is not equal to itself.")
615437     }
616438 
617439 
618440 
619441 @Callable(i)
620-func reduceRarity (assetId,fGen) = throw("MRR: Not implemented")
442+func stakeNFT () = {
443+    let validPayment = checkAdditionalPayment(i.payments[0])
444+    if ((validPayment == validPayment))
445+        then {
446+            let pmt = value(i.payments[1])
447+            let assetId = value(pmt.assetId)
448+            let assetName = value(value(assetInfo(assetId)).description)
449+            let address = toString(i.caller)
450+            let color = takeRight(assetName, 1)
451+            let availablePerches = tryGetInteger(((("address_" + address) + "_mutariumAvailable_") + color))
452+            let perches = if ((0 >= availablePerches))
453+                then throw(("no perches available for the color " + color))
454+                else [IntegerEntry(((("address_" + address) + "_mutariumAvailable_") + color), (availablePerches - 1)), StringEntry((((("address_" + address) + "_asset_") + toBase58String(assetId)) + "_perchColor"), color)]
455+            if ((pmt.amount != 1))
456+                then throw("NFT is not attached")
457+                else {
458+                    let farmingPower = asIntTuple(invoke(this, "calculateFarmPower", [toBase58String(assetId)], nil))
459+                    if ((farmingPower == farmingPower))
460+                        then {
461+                            let result = deterMineClassAndClaimType(address, toBase58String(assetId), assetName, false)
462+                            if ((result == result))
463+                                then (((([StringEntry((toBase58String(assetId) + "_owner"), address), IntegerEntry((toBase58String(assetId) + "_basePower"), farmingPower._2), IntegerEntry(assetFarmingPower(address, toBase58String(assetId)), farmingPower._2)] ++ deterMineClassAndSetType(address, assetId, farmingPower._2, assetName)) ++ validPayment) ++ perches) ++ result)
464+                                else throw("Strict value is not equal to itself.")
465+                            }
466+                        else throw("Strict value is not equal to itself.")
467+                    }
468+            }
469+        else throw("Strict value is not equal to itself.")
470+    }
471+
472+
473+
474+@Callable(i)
475+func topUpReward (reveneuType,amount) = if ((reveneuType == "SPICE"))
476+    then if ((i.payments[0].assetId != getSpiceAssetId()))
477+        then throw("Please attach spice!")
478+        else handleStakingTopUp(i.payments[0].amount, reveneuType)
479+    else if ((reveneuType == "EGG"))
480+        then {
481+            let firstPayment = value(i.payments[0])
482+            if ((firstPayment.assetId != getEggAssetId()))
483+                then throw(("FBP: You can attach only EGG tokens with the following asset id: " + toBase58String(getEggAssetId())))
484+                else handleStakingTopUp(firstPayment.amount, reveneuType)
485+            }
486+        else if ((reveneuType == "FEED"))
487+            then if ((i.caller != getAccBoosterAddress()))
488+                then throw("VFTUP: Only accBoosterDapp can do topup!")
489+                else handleStakingTopUp(amount, reveneuType)
490+            else if ((reveneuType == "VEGG"))
491+                then if ((i.caller != getCouponsAddress()))
492+                    then throw("VFTUP: Only couponsdapp can do topup!")
493+                    else handleStakingTopUp(amount, reveneuType)
494+                else throw("Unknown reveneuType")
495+
496+
497+
498+@Callable(i)
499+func unstakeNFT (assetId) = {
500+    let address = toString(i.caller)
501+    if ((tryGetString((assetId + "_owner")) != toString(i.caller)))
502+        then throw("You don't own this duck!!")
503+        else {
504+            let assetName = value(value(assetInfo(fromBase58String(assetId))).description)
505+            let result = deterMineClassAndClaimType(address, assetId, assetName, false)
506+            if ((result == result))
507+                then {
508+                    let validPayment = checkAdditionalPayment(i.payments[0])
509+                    if ((validPayment == validPayment))
510+                        then {
511+                            let color = tryGetString((((("address_" + address) + "_asset_") + assetId) + "_perchColor"))
512+                            let assetFP = tryGetInteger(assetFarmingPower(address, assetId))
513+                            if ((assetFP == assetFP))
514+                                then {
515+                                    let updateKeys = deterMineClassAndUpdateType(address, fromBase58String(assetId), assetFP, assetName)
516+                                    ((([IntegerEntry(((("address_" + address) + "_mutariumAvailable_") + color), (tryGetInteger(((("address_" + address) + "_mutariumAvailable_") + color)) + 1)), DeleteEntry((assetId + "_owner")), DeleteEntry(assetFarmingPower(address, assetId)), DeleteEntry((((("address_" + address) + "_asset_") + assetId) + "_perchColor")), ScriptTransfer(Address(fromBase58String(address)), 1, fromBase58String(assetId))] ++ updateKeys) ++ validPayment) ++ result)
517+                                    }
518+                                else throw("Strict value is not equal to itself.")
519+                            }
520+                        else throw("Strict value is not equal to itself.")
521+                    }
522+                else throw("Strict value is not equal to itself.")
523+            }
524+    }
525+
526+
527+
528+@Callable(i)
529+func claimReward (assetId) = {
530+    let validPayment = checkAdditionalPayment(i.payments[0])
531+    if ((validPayment == validPayment))
532+        then {
533+            let assetName = value(value(assetInfo(fromBase58String(assetId))).description)
534+            if ((size(i.payments) > 1))
535+                then throw("Please don't add extra payments")
536+                else (deterMineClassAndClaimType(toString(i.caller), assetId, assetName, true) ++ validPayment)
537+            }
538+        else throw("Strict value is not equal to itself.")
539+    }
621540 
622541 
623542 @Verifier(tx)
624543 func verify () = if (isTestEnv())
625544     then sigVerify(tx.bodyBytes, tx.proofs[0], tx.senderPublicKey)
626545     else {
627546         let firstUser = base58'6TdaXEfhnjYquvPf3yV7MFxt2CbgFmaqsvGwkKfXtKi4'
628547         let secondUser = base58'7DsP2WaMLocbHuUxux7pbXRjTrrZ1TFQPsi5QumS3gr8'
629548         let thirdUser = base58'BpFWP3p3JgYrrP45xfrKzeMcWMEXoinj4FVPPkUiA8D3'
630549         let firstUserSigned = if (sigVerify(tx.bodyBytes, tx.proofs[0], firstUser))
631550             then 1
632551             else if (sigVerify(tx.bodyBytes, tx.proofs[1], firstUser))
633552                 then 1
634553                 else if (sigVerify(tx.bodyBytes, tx.proofs[2], firstUser))
635554                     then 1
636555                     else 0
637556         let secondUserSigned = if (sigVerify(tx.bodyBytes, tx.proofs[0], secondUser))
638557             then 1
639558             else if (sigVerify(tx.bodyBytes, tx.proofs[1], secondUser))
640559                 then 1
641560                 else if (sigVerify(tx.bodyBytes, tx.proofs[2], secondUser))
642561                     then 1
643562                     else 0
644563         let thirdUserSigned = if (sigVerify(tx.bodyBytes, tx.proofs[0], thirdUser))
645564             then 1
646565             else if (sigVerify(tx.bodyBytes, tx.proofs[1], thirdUser))
647566                 then 1
648567                 else if (sigVerify(tx.bodyBytes, tx.proofs[2], thirdUser))
649568                     then 1
650569                     else 0
651570         let signaturesCount = ((firstUserSigned + secondUserSigned) + thirdUserSigned)
652571         match tx {
653572             case _ => 
654573                 (signaturesCount >= 1)
655574         }
656575         }
657576 
github/deemru/w8io/169f3d6 
105.71 ms ◑