tx · P1mg9iU18PQsWQo9jedBhmeK3kw52X5oPGb8uyKnhW3

3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv:  -0.01400000 Waves

2021.12.16 23:52 [2902292] smart account 3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv > SELF 0.00000000 Waves

{
    "type": 13,
    "id": "P1mg9iU18PQsWQo9jedBhmeK3kw52X5oPGb8uyKnhW3",
    "fee": 1400000,
    "feeAssetId": null,
    "timestamp": 1639688052924,
    "version": 2,
    "chainId": 87,
    "sender": "3PEktVux2RhchSN63DsDo4b4mz4QqzKSeDv",
    "senderPublicKey": "EBHsV7TQYm4qS2V7iZXEXwcbUdEYQyCSLEdY2AMvLPns",
    "proofs": [
        "KonU5w8nEdvrb2cY6kvS7GiGrNyWMnCsW14fVUzmtLFsm7mUM3q9ebkem372daW5c6C281LrkMZ2bDSCJdWDZt7"
    ],
    "script": "base64:AAIFAAAAAAAABQAIAhIDCgEIEgMKAQgSBAoCCAgSBQoDCAgIEgQKAggIGg0KAUESCHZhcmlhbnRzGhkKAUISFGhhdGNoaW5nRmluaXNoSGVpZ2h0GgsKAUMSBm9mZnNldBoUCgFEEg9yYW5kb21TZWVkQmxvY2saDwoBRRIKcmFuZG9tSGFzaBoSCgFGEg13YXNVbmlxdWVCb3JuGggKAUcSA2dlbhoSCgFIEg1nZXRSYW5kb21OYW1lGhIKAUkSDWphY2twb3RSYW5kb20aDwoBShIKdHlwZVJhbmRvbRoQCgFLEgtjb2xvclJhbmRvbRoKCgFMEgVjb2xvchoaCgFNEhVjb3VudEVnZ3NOZWVkZWRBbW91bnQaFQoBThIQdG90YWxEdWNrc0Ftb3VudBoGCgFPEgFuGgYKAVASAWcaBgoBURIBdBoKCgFSEgVwcmljZRoGCgFTEgFpGhMKAVQSDnJlZmVyZXJBZGRyZXNzGg8KAVUSCmVnZ3NOZWVkZWQaEQoBVhIMZmlyc3RQYXltZW50GgwKAVcSB3Jlc3VsdHMaEgoBWBINcmVmZXJlclJld2FyZBoMCgFZEgdyZWZDYWxsGgwKAVoSB3R4SWRTdHIaEAoBYRILZWdnc0Fzc2V0SWQaFwoCYWESEWhhdGNoaW5nU3RhdHVzS2V5GhUKAmFiEg9maW5pc2hIZWlnaHRLZXkaDwoCYWMSCWR1Y2tJZEtleRoSCgJhZBIMZHVja0Zyb21CYWJ5GhYKAmFlEhBoYXRjaGluZ1R4U3RhdHVzGgwKAmFmEgZkdWNrSWQaEQoCYWcSCyR0MDU2OTU1NzYxGg0KAmFoEgdkdWNrR2VuGg0KAmFpEgdmYXJtR2VuGhEKAmFqEgtkZXNjcmlwdGlvbhoLCgJhaxIFYXNzZXQaDQoCYWwSB2Fzc2V0SWQaDAoCYW0SBmFtb3VudBoRCgJhbhILJHQwNzAxNDcwOTkaEQoCYW8SCyR0MDg1NTI4NjA0GgoKAmFwEgRmR2VuGgwKAmFxEgZsZXR0ZXIaCAoCYXISAnR4GgwKAmFzEgZ2ZXJpZnkaFQoBYhIQZGVsYXlGb3JIYXRjaGluZxoYCgFjEhNkaXNjb3VudENvZWZmaWNpZW50GhAKAWQSC3R5cGVzQW1vdW50GhcKAWUSEnJlZkNvbnRyYWN0QWRkcmVzcxoSCgFmEg1SZWZlcmVyUmV3YXJkGhQKAWcSD0hhdGNoaW5nU3RhcnRlZBoVCgFoEhBIYXRjaGluZ0ZpbmlzaGVkGhMKAWkSDnJlYmlydGhBZGRyZXNzGhUKAWoSEGJhYnlEdWNrc0FkZHJlc3MaFQoBaxIQc3dvcFByb21vQWRkcmVzcxoNCgFsEghpc0xvY2tlZBoSCgFtEg1tYXN0ZXJBZGRyZXNzGgwKAW4SByRtYXRjaDAaBgoBbxIBYhoZCgFwEhRnZXRIYXRjaGluZ1N0YXR1c0tleRoMCgFxEgdhZGRyZXNzGgkKAXISBHR4SWQaHwoBcxIaZ2V0SGF0Y2hpbmdGaW5pc2hIZWlnaHRLZXkaEQoBdBIMZ2V0RHVja0lkS2V5GhQKAXUSD2dldER1Y2tTdGF0c0tleRoOCgF2EglnZW5TdHJpbmcaEgoBdxINdHJ5R2V0SW50ZWdlchoICgF4EgNrZXkaCAoBeRIDdmFsGhQKAXoSD2dldFJhbmRvbU51bWJlcgAAABUAAAAAAWEBAAAAIKOff08jclHRLOIhkmKITQwL8+oiboHVr/wLkxfObbHJAAAAAAFiAAAAAAAAAAACAAAAAAFjAAAAAAAAAAAKAAAAAAFkAAAAAAAAAAAJAAAAAAFlAQAAABoBV0m6fUK8n7ARhcHKmKrWNO3wC83v6MPupQAAAAABZgAAAAAAAAAABQAAAAABZwIAAAAQSEFUQ0hJTkdfU1RBUlRFRAAAAAABaAIAAAARSEFUQ0hJTkdfRklOSVNIRUQAAAAAAWkBAAAAGgFXcJF11J7rej4f+WQAMMjcRl1cmkTfdcL3AAAAAAFqAQAAABoBV8Ojy0cB56CV4OATyb11mwHzZyaGT+sCkQAAAAABawEAAAAaAVc2IwmK40CqaJf6VFlQ1S0Iv+/6dyb8Ez4BAAAAAWwAAAAABAAAAAFtCQEAAAAHQWRkcmVzcwAAAAEBAAAAGgFXiLIGIfCAykGiMgAjHv+piSJIOd1wFskJBAAAAAFuCQAEGgAAAAIFAAAAAW0CAAAAB2VnZ2xvY2sDCQAAAQAAAAIFAAAAAW4CAAAAA0ludAQAAAABbwUAAAABbgUAAAABbwAAAAAAAAAAAAEAAAABcAAAAAIAAAABcQAAAAFyCQABLAAAAAIJAAEsAAAAAgkAASwAAAACBQAAAAFxAgAAAAFfCQACWAAAAAEFAAAAAXICAAAAB19zdGF0dXMBAAAAAXMAAAACAAAAAXEAAAABcgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAABcQIAAAABXwkAAlgAAAABBQAAAAFyAgAAAANfZmgBAAAAAXQAAAACAAAAAXEAAAABcgkAASwAAAACCQABLAAAAAIJAAEsAAAAAgUAAAABcQIAAAABXwkAAlgAAAABBQAAAAFyAgAAAANfZGkBAAAAAXUAAAABAAAAAXYJAAEsAAAAAgkAASwAAAACAgAAAAZzdGF0c18FAAAAAXYCAAAAB19hbW91bnQBAAAAAXcAAAABAAAAAXgEAAAAAXkEAAAAAW4JAAQaAAAAAgUAAAAEdGhpcwUAAAABeAMJAAABAAAAAgUAAAABbgIAAAADSW50BAAAAAFvBQAAAAFuBQAAAAFvAAAAAAAAAAAABQAAAAF5AQAAAAF6AAAABAAAAAFBAAAAAXIAAAABQgAAAAFDBAAAAAFECQEAAAAFdmFsdWUAAAABCQAD7QAAAAEJAABlAAAAAgUAAAABQgAAAAAAAAAAAQQAAAABRQkAAfcAAAABCQAAywAAAAIFAAAAAXIJAQAAAAV2YWx1ZQAAAAEIBQAAAAFEAAAAA3ZyZgkAAGoAAAACCQAEsgAAAAIFAAAAAUUJAABoAAAAAgUAAAABQwAAAAAAAAAACAUAAAABQQEAAAABRgAAAAEAAAABRwkBAAAAAXcAAAABCQEAAAABdQAAAAEFAAAAAUcBAAAAAUgAAAACAAAAAXIAAAABQgQAAAABSQkBAAAAAXoAAAAEAAAAAAAAAAH0BQAAAAFyBQAAAAFCAAAAAAAAAAAAAwMJAAAAAAAAAgUAAAABSQAAAAAAAAAAbwkAAAAAAAACCQEAAAABRgAAAAECAAAAEERVQ0stV1dXV1dXV00tSlUAAAAAAAAAAAAHCQAFFAAAAAICAAAAEERVQ0stV1dXV1dXV00tSlUCAAAABDhXLUoEAAAAAUoJAQAAAAF6AAAABAAAAAAAAAAABAUAAAABcgUAAAABQgAAAAAAAAAAAAQAAAABSwkBAAAAAXoAAAAEAAAAAAAAAAAEBQAAAAFyBQAAAAFCAAAAAAAAAAABBAAAAAFMAwkAAAAAAAACBQAAAAFLAAAAAAAAAAAAAgAAAAFZAwkAAAAAAAACBQAAAAFLAAAAAAAAAAABAgAAAAFHAwkAAAAAAAACBQAAAAFLAAAAAAAAAAACAgAAAAFCAgAAAAFSAwkAAAAAAAACBQAAAAFKAAAAAAAAAAAACQAFFAAAAAIJAAEsAAAAAgIAAAAPRFVDSy1GRkZGRkZGRi1HBQAAAAFMAgAAAAQ4Ri1HAwkAAAAAAAACBQAAAAFKAAAAAAAAAAABCQAFFAAAAAIJAAEsAAAAAgIAAAAPRFVDSy1ISEhISEhISC1HBQAAAAFMAgAAAAQ4SC1HAwkAAAAAAAACBQAAAAFKAAAAAAAAAAACCQAFFAAAAAIJAAEsAAAAAgIAAAAPRFVDSy1HR0dHR0dHRy1HBQAAAAFMAgAAAAQ4Ry1HCQAFFAAAAAIJAAEsAAAAAgIAAAAPRFVDSy1JSUlJSUlJSS1HBQAAAAFMAgAAAAQ4SS1HAQAAAAFNAAAAAQAAAAFOBAAAAAFPBQAAAAFOBAAAAAFQBQAAAAFjBAAAAAFRBQAAAAFkBAAAAAFSCQAAbAAAAAYJAABkAAAAAgAAAAAAAAAAZAkAAGkAAAACCQAAaAAAAAIFAAAAAU8FAAAAAVAJAABoAAAAAgAAAAAAAAAACgUAAAABUQAAAAAAAAAAAgAAAAAAAAAABQAAAAAAAAAAAQAAAAAAAAAAAgUAAAAERE9XTgkAAGgAAAACBQAAAAFSAAAAAAAAD0JAAAAABQAAAAFTAQAAABFzdGFydER1Y2tIYXRjaGluZwAAAAEAAAABVAMJAABmAAAAAgkBAAAAAWwAAAAAAAAAAAAAAAAACQAAAgAAAAECAAAAJUVHRyBvcGVyYXRpb25zIGFyZSB0ZW1wb3JhcmlseSBsb2NrZWQEAAAAAU4JAQAAAAF3AAAAAQIAAAAMZHVja3NfYW1vdW50BAAAAAFVCQEAAAABTQAAAAEFAAAAAU4EAAAAAVYJAQAAAAV2YWx1ZQAAAAEJAAGRAAAAAggFAAAAAVMAAAAIcGF5bWVudHMAAAAAAAAAAAAEAAAAAVcJAARMAAAAAgkBAAAAC1N0cmluZ0VudHJ5AAAAAgkBAAAAAXAAAAACCQAEJQAAAAEIBQAAAAFTAAAADG9yaWdpbkNhbGxlcggFAAAAAVMAAAANdHJhbnNhY3Rpb25JZAUAAAABZwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAAXMAAAACCQAEJQAAAAEIBQAAAAFTAAAADG9yaWdpbkNhbGxlcggFAAAAAVMAAAANdHJhbnNhY3Rpb25JZAkAAGQAAAACBQAAAAZoZWlnaHQFAAAAAWIJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAADGR1Y2tzX2Ftb3VudAkAAGQAAAACBQAAAAFOAAAAAAAAAAABCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAABBkdWNrc19sYXN0X3ByaWNlCQAAaQAAAAIFAAAAAVUAAAAAAAAPQkAFAAAAA25pbAMJAAAAAAAAAggFAAAAAVMAAAAGY2FsbGVyCQEAAAAHQWRkcmVzcwAAAAEFAAAAAWoJAAROAAAAAgUAAAABVwkABEwAAAACCQEAAAAMQm9vbGVhbkVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAACWhhdGNoaW5nXwkAAlgAAAABCAUAAAABUwAAAA10cmFuc2FjdGlvbklkAgAAAAlfYmFieUR1Y2sGBQAAAANuaWwDCQAAAAAAAAIIBQAAAAFTAAAABmNhbGxlcgkBAAAAB0FkZHJlc3MAAAABBQAAAAFrCQAETgAAAAIFAAAAAVcJAARMAAAAAgkBAAAADEJvb2xlYW5FbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAloYXRjaGluZ18JAAJYAAAAAQgFAAAAAVMAAAANdHJhbnNhY3Rpb25JZAIAAAAGX3Byb21vBgUAAAADbmlsAwkBAAAAAiE9AAAAAggFAAAAAVYAAAAHYXNzZXRJZAUAAAABYQkAAAIAAAABCQABLAAAAAICAAAAPFlvdSBjYW4gYXR0YWNoIG9ubHkgRUdHIHRva2VucyB3aXRoIHRoZSBmb2xsb3dpbmcgYXNzZXQgaWQ6IAkAAlgAAAABBQAAAAFhAwkAAGYAAAACBQAAAAFVCAUAAAABVgAAAAZhbW91bnQJAAACAAAAAQkAASwAAAACAgAAAERUbyBoYXRjaCBhIGR1Y2sgeW91IGN1cnJlbnRseSBuZWVkIHRoZSBmb2xsb3dpbmcgYW1vdW50IG9mIEVHR2xldHM6IAkAAaQAAAABBQAAAAFVBAAAAAFYCQAAawAAAAMFAAAAAVUFAAAAAWYAAAAAAAAAAGQEAAAAAVkJAAP8AAAABAkBAAAAB0FkZHJlc3MAAAABBQAAAAFlAgAAAApyZWZQYXltZW50CQAETAAAAAIFAAAAAVQFAAAAA25pbAkABEwAAAACCQEAAAAPQXR0YWNoZWRQYXltZW50AAAAAgUAAAABYQUAAAABWAUAAAADbmlsAwkAAAAAAAACBQAAAAFZBQAAAAFZCQAETgAAAAIFAAAAAVcJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAVMAAAAGY2FsbGVyCQAAZQAAAAIIBQAAAAFWAAAABmFtb3VudAUAAAABVQUAAAABYQUAAAADbmlsCQAAAgAAAAECAAAAJFN0cmljdCB2YWx1ZSBpcyBub3QgZXF1YWwgdG8gaXRzZWxmLgAAAAFTAQAAABJmaW5pc2hEdWNrSGF0Y2hpbmcAAAABAAAAAVoEAAAAAXIJAAJZAAAAAQUAAAABWgQAAAACYWEJAQAAAAFwAAAAAgkABCUAAAABCAUAAAABUwAAAAZjYWxsZXIFAAAAAXIEAAAAAmFiCQEAAAABcwAAAAIJAAQlAAAAAQgFAAAAAVMAAAAGY2FsbGVyBQAAAAFyBAAAAAJhYwkBAAAAAXQAAAACCQAEJQAAAAEIBQAAAAFTAAAABmNhbGxlcgUAAAABcgQAAAACYWQEAAAAAW4JAAQgAAAAAQkAASwAAAACCQABLAAAAAICAAAACWhhdGNoaW5nXwUAAAABWgIAAAAJX2JhYnlEdWNrAwkAAAEAAAACBQAAAAFuAgAAAAdCb29sZWFuBAAAAAFRBQAAAAFuBQAAAAFRBwQAAAACYWUJAQAAABFAZXh0ck5hdGl2ZSgxMDUzKQAAAAIFAAAABHRoaXMFAAAAAmFhBAAAAAFCCQEAAAARQGV4dHJOYXRpdmUoMTA1MCkAAAACBQAAAAR0aGlzBQAAAAJhYgMJAAAAAAAAAgUAAAACYWUFAAAAAWgEAAAAAmFmCQEAAAARQGV4dHJOYXRpdmUoMTA1MykAAAACBQAAAAR0aGlzCQEAAAABdAAAAAIJAAQlAAAAAQgFAAAAAVMAAAAGY2FsbGVyBQAAAAFyCQAAAgAAAAEJAAEsAAAAAgIAAABAVGhlIGR1Y2sgd2FzIGhhdGNoZWQgYW5kIGNsYWltZWQgYWxyZWFkeSwgaGVyZSBpcyB0aGUgZm9sb3dpbmc6IAUAAAACYWYDCQAAZgAAAAIFAAAAAUIFAAAABmhlaWdodAkAAAIAAAABCQABLAAAAAIJAAEsAAAAAgkAASwAAAACCQABLAAAAAICAAAAHUhhdGNoaW5nIGlzIG5vdCBmaW5pc2hlZCB5ZXQgCQABpAAAAAEJAABlAAAAAgUAAAABQgUAAAAGaGVpZ2h0AgAAACcgYmxvY2tzIHJlbWFpbmluZywgaXQgd2lsbCB0YWtlIGFyb3VuZCAJAAGkAAAAAQkAAGUAAAACBQAAAAFCBQAAAAZoZWlnaHQCAAAACCBtaW51dGVzBAAAAAJhZwkBAAAAAUgAAAACBQAAAAFyBQAAAAFCBAAAAAJhaAgFAAAAAmFnAAAAAl8xBAAAAAJhaQgFAAAAAmFnAAAAAl8yBAAAAAJhagkAASwAAAACCQABLAAAAAICAAAADnsiZ2Vub3R5cGUiOiAiBQAAAAJhaAIAAAAZIiwgImNyb3NzYnJlZWRpbmciOiB0cnVlfQQAAAACYWsJAARDAAAABwUAAAACYWgFAAAAAmFqAAAAAAAAAAABAAAAAAAAAAAABwUAAAAEdW5pdAUAAAABQgQAAAACYWwJAAQ4AAAAAQUAAAACYWsEAAAAAmFtCQAAZAAAAAIJAQAAAAF3AAAAAQkBAAAAAXUAAAABBQAAAAJhaAAAAAAAAAAAAQkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAJhYQUAAAABaAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAJhYwkAAlgAAAABBQAAAAJhbAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQACWAAAAAEFAAAAAmFsBQAAAAJhYwkABEwAAAACCQEAAAAMQm9vbGVhbkVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAABWR1Y2tfCQACWAAAAAEFAAAAAmFsAgAAAAZfZ3Jvd24FAAAAAmFkCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAABdQAAAAEFAAAAAmFoBQAAAAJhbQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAABnN0YXRzXwUAAAACYWkCAAAACV9xdWFudGl0eQkAAGQAAAACCQEAAAABdwAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAZzdGF0c18FAAAAAmFpAgAAAAlfcXVhbnRpdHkAAAAAAAAAAAEJAARMAAAAAgUAAAACYWsJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwgFAAAAAVMAAAAGY2FsbGVyAAAAAAAAAAABBQAAAAJhbAUAAAADbmlsAAAAAVMBAAAADWlzc3VlRnJlZUR1Y2sAAAACAAAAAXEAAAABWgMJAQAAAAIhPQAAAAIIBQAAAAFTAAAABmNhbGxlcgkBAAAAB0FkZHJlc3MAAAABBQAAAAFpCQAAAgAAAAECAAAAGnJlYmlydGggb3IgYmFieSBkdWNrcyBvbmx5BAAAAAFyCQACWQAAAAEFAAAAAVoEAAAAAmFhCQEAAAABcAAAAAIFAAAAAXEFAAAAAXIEAAAAAmFiCQEAAAABcwAAAAIFAAAAAXEFAAAAAXIEAAAAAU4JAQAAAAF3AAAAAQIAAAAMZHVja3NfYW1vdW50BAAAAAFVCQEAAAABTQAAAAEFAAAAAU4EAAAAAmFuCQEAAAABSAAAAAIFAAAAAXIJAABkAAAAAgkBAAAABXZhbHVlAAAAAQkAA+kAAAABBQAAAAFyAAAAAAAAAAABBAAAAAJhaAgFAAAAAmFuAAAAAl8xBAAAAAJhaQgFAAAAAmFuAAAAAl8yBAAAAAJhagkAASwAAAACCQABLAAAAAICAAAADnsiZ2Vub3R5cGUiOiAiBQAAAAJhaAIAAAAZIiwgImNyb3NzYnJlZWRpbmciOiB0cnVlfQQAAAACYWsJAARDAAAABwUAAAACYWgFAAAAAmFqAAAAAAAAAAABAAAAAAAAAAAABwUAAAAEdW5pdAUAAAAGaGVpZ2h0BAAAAAJhbAkABDgAAAABBQAAAAJhawQAAAACYW0JAABkAAAAAgkBAAAAAXcAAAABCQEAAAABdQAAAAEFAAAAAmFoAAAAAAAAAAABBAAAAAJhYwkBAAAAAXQAAAACBQAAAAFxBQAAAAFyCQAFFAAAAAIJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAQAAAAFzAAAAAgUAAAABcQUAAAABcgUAAAAGaGVpZ2h0CQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACAgAAAAxkdWNrc19hbW91bnQJAABkAAAAAgUAAAABTgAAAAAAAAAAAQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAQZHVja3NfbGFzdF9wcmljZQkAAGkAAAACBQAAAAFVAAAAAAAAD0JACQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAAmFhBQAAAAFoCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIFAAAAAmFjCQACWAAAAAEFAAAAAmFsCQAETAAAAAIJAQAAAAtTdHJpbmdFbnRyeQAAAAIJAAJYAAAAAQUAAAACYWwFAAAAAmFjCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAABdQAAAAEFAAAAAmFoBQAAAAJhbQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAABnN0YXRzXwUAAAACYWkCAAAACV9xdWFudGl0eQkAAGQAAAACCQEAAAABdwAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAZzdGF0c18FAAAAAmFpAgAAAAlfcXVhbnRpdHkAAAAAAAAAAAEJAARMAAAAAgUAAAACYWsJAARMAAAAAgkBAAAADlNjcmlwdFRyYW5zZmVyAAAAAwkBAAAABXZhbHVlAAAAAQkABCYAAAABBQAAAAFxAAAAAAAAAAABBQAAAAJhbAUAAAADbmlsCQACWAAAAAEFAAAAAmFsAAAAAVMBAAAADGlzc3VlSmFja3BvdAAAAAMAAAABcQAAAAFaAAAAAUcDAwkBAAAAAiE9AAAAAggFAAAAAVMAAAAGY2FsbGVyCQEAAAAHQWRkcmVzcwAAAAEFAAAAAWkJAQAAAAIhPQAAAAIIBQAAAAFTAAAABmNhbGxlcgUAAAAEdGhpcwcJAAACAAAAAQIAAAAVYWRtaW4gb3IgcmViaXJ0aCBvbmx5BAAAAAFyCQACWQAAAAEFAAAAAVoEAAAAAmFhCQEAAAABcAAAAAIFAAAAAXEFAAAAAXIEAAAAAmFiCQEAAAABcwAAAAIFAAAAAXEFAAAAAXIEAAAAAU4JAQAAAAF3AAAAAQIAAAAMZHVja3NfYW1vdW50BAAAAAFVCQEAAAABTQAAAAEFAAAAAU4EAAAAAmFvCQAFFAAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAVEVUNLLQUAAAABRwIAAAADLUpVAgAAAAQ4Vy1KBAAAAAJhaAgFAAAAAmFvAAAAAl8xBAAAAAJhaQgFAAAAAmFvAAAAAl8yBAAAAAJhagkAASwAAAACCQABLAAAAAICAAAADnsiZ2Vub3R5cGUiOiAiBQAAAAJhaAIAAAAZIiwgImNyb3NzYnJlZWRpbmciOiB0cnVlfQQAAAACYWsJAARDAAAABwUAAAACYWgFAAAAAmFqAAAAAAAAAAABAAAAAAAAAAAABwUAAAAEdW5pdAUAAAAGaGVpZ2h0BAAAAAJhbAkABDgAAAABBQAAAAJhawQAAAACYWMJAQAAAAF0AAAAAgUAAAABcQUAAAABcgkABRQAAAACCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAABcwAAAAIFAAAAAXEFAAAAAXIFAAAABmhlaWdodAkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgIAAAAMZHVja3NfYW1vdW50CQAAZAAAAAIFAAAAAU4AAAAAAAAAAAEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAICAAAAEGR1Y2tzX2xhc3RfcHJpY2UJAABpAAAAAgUAAAABVQAAAAAAAA9CQAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAJhYQUAAAABaAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACBQAAAAJhYwkAAlgAAAABBQAAAAJhbAkABEwAAAACCQEAAAALU3RyaW5nRW50cnkAAAACCQACWAAAAAEFAAAAAmFsBQAAAAJhYwkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkBAAAAAXUAAAABBQAAAAJhaAkAAGQAAAACCQEAAAABdwAAAAEJAQAAAAF1AAAAAQUAAAACYWgAAAAAAAAAAAEJAARMAAAAAgkBAAAADEludGVnZXJFbnRyeQAAAAIJAAEsAAAAAgkAASwAAAACAgAAAAZzdGF0c18FAAAAAmFpAgAAAAlfcXVhbnRpdHkJAABkAAAAAgkBAAAAAXcAAAABCQABLAAAAAIJAAEsAAAAAgIAAAAGc3RhdHNfBQAAAAJhaQIAAAAJX3F1YW50aXR5AAAAAAAAAAABCQAETAAAAAIFAAAAAmFrCQAETAAAAAIJAQAAAA5TY3JpcHRUcmFuc2ZlcgAAAAMJAQAAAAV2YWx1ZQAAAAEJAAQmAAAAAQUAAAABcQAAAAAAAAAAAQUAAAACYWwFAAAAA25pbAkAAlgAAAABBQAAAAJhbAAAAAFTAQAAAAxyZWR1Y2VSYXJpdHkAAAACAAAAAmFsAAAAAmFwBAAAAAJhawkAAlkAAAABBQAAAAJhbAMDCQEAAAACIT0AAAACCAUAAAABUwAAAAZjYWxsZXIJAQAAAAdBZGRyZXNzAAAAAQUAAAABaQkBAAAAAiE9AAAAAggFAAAAAVMAAAAGY2FsbGVyBQAAAAR0aGlzBwkAAAIAAAABAgAAABVhZG1pbiBvciByZWJpcnRoIG9ubHkEAAAAAmFoCAkBAAAABXZhbHVlAAAAAQkAA+wAAAABBQAAAAJhawAAAARuYW1lBAAAAAJhcQkBAAAACXRha2VSaWdodAAAAAIJAAEvAAAAAgUAAAACYWgAAAAAAAAAAAYAAAAAAAAAAAEEAAAAAmFpCQABLAAAAAIJAAEsAAAAAgIAAAABOAUAAAACYXECAAAAAi1HCQAETAAAAAIJAQAAAAxJbnRlZ2VyRW50cnkAAAACCQEAAAABdQAAAAEFAAAAAmFoCQAAZQAAAAIJAQAAAAF3AAAAAQkBAAAAAXUAAAABBQAAAAJhaAAAAAAAAAAAAQkABEwAAAACCQEAAAAMSW50ZWdlckVudHJ5AAAAAgkAASwAAAACCQABLAAAAAICAAAABnN0YXRzXwUAAAACYWkCAAAACV9xdWFudGl0eQkAAGUAAAACCQEAAAABdwAAAAEJAAEsAAAAAgkAASwAAAACAgAAAAZzdGF0c18FAAAAAmFpAgAAAAlfcXVhbnRpdHkAAAAAAAAAAAEFAAAAA25pbAAAAAEAAAACYXIBAAAAAmFzAAAAAAkAAfQAAAADCAUAAAACYXIAAAAJYm9keUJ5dGVzCQABkQAAAAIIBQAAAAJhcgAAAAZwcm9vZnMAAAAAAAAAAAAIBQAAAAJhcgAAAA9zZW5kZXJQdWJsaWNLZXnSPnen",
    "height": 2902292,
    "applicationStatus": "succeeded",
    "spentComplexity": 0
}

View: original | compacted
Prev: 6UxuCdgARVLkaNNDqw8XMpThF2i2QNGaixtM1Xxvtohq
Next: 8Soj76UavzfKk18ouZzdoYRJyok6VxcYCVW8ECvAZofP

Diff: 
Old
New
Differences
21
21
 
22
22
 
let j = base58'3PKmLiGEfqLWMC1H9xhzqvAZKUXfFm8uoeg'
23
23
 
24
-
func k () = {
25
-
    let l = Address(base58'3PEPftf2kWZDmAaWBjs6BUJa9957kiA2PkU')
26
-
    let m = getInteger(l, "egglock")
27
-
    if ($isInstanceOf(m, "Int"))
24
+
let k = base58'3P6s9C39Ak5FAQ3F5VapYJ3ULxgbsAReXWD'
25
+
26
+
func l () = {
27
+
    let m = Address(base58'3PEPftf2kWZDmAaWBjs6BUJa9957kiA2PkU')
28
+
    let n = getInteger(m, "egglock")
29
+
    if ($isInstanceOf(n, "Int"))
28
30
 
        then {
29
-
            let n = m
30
-
            n
31
+
            let o = n
32
+
            o
31
33
 
            }
32
34
 
        else 0
33
35
 
    }
34
36
 
35
37
 
36
-
func o (p,q) = (((p + "_") + toBase58String(q)) + "_status")
38
+
func p (q,r) = (((q + "_") + toBase58String(r)) + "_status")
37
39
 
38
40
 
39
-
func r (p,q) = (((p + "_") + toBase58String(q)) + "_fh")
41
+
func s (q,r) = (((q + "_") + toBase58String(r)) + "_fh")
40
42
 
41
43
 
42
-
func s (p,q) = (((p + "_") + toBase58String(q)) + "_di")
44
+
func t (q,r) = (((q + "_") + toBase58String(r)) + "_di")
43
45
 
44
46
 
45
-
func t (u) = (("stats_" + u) + "_amount")
47
+
func u (v) = (("stats_" + v) + "_amount")
46
48
 
47
49
 
48
-
func v (w) = {
49
-
    let x = {
50
-
        let m = getInteger(this, w)
51
-
        if ($isInstanceOf(m, "Int"))
50
+
func w (x) = {
51
+
    let y = {
52
+
        let n = getInteger(this, x)
53
+
        if ($isInstanceOf(n, "Int"))
52
54
 
            then {
53
-
                let n = m
54
-
                n
55
+
                let o = n
56
+
                o
55
57
 
                }
56
58
 
            else 0
57
59
 
        }
58
-
    x
60
+
    y
59
61
 
    }
60
62
 
61
63
 
62
-
func y (z,q,A,B) = {
63
-
    let C = value(blockInfoByHeight((A - 1)))
64
-
    let D = sha256((q + value(C.vrf)))
65
-
    (toInt(D, (B * 8)) % z)
64
+
func z (A,r,B,C) = {
65
+
    let D = value(blockInfoByHeight((B - 1)))
66
+
    let E = sha256((r + value(D.vrf)))
67
+
    (toInt(E, (C * 8)) % A)
66
68
 
    }
67
69
 
68
70
 
69
-
func E (F) = v(t(F))
71
+
func F (G) = w(u(G))
70
72
 
71
73
 
72
-
func G (q,A) = {
73
-
    let H = y(500, q, A, 0)
74
-
    if (if ((H == 111))
75
-
        then (E("DUCK-WWWWWWWM-JU") == 0)
74
+
func H (r,B) = {
75
+
    let I = z(500, r, B, 0)
76
+
    if (if ((I == 111))
77
+
        then (F("DUCK-WWWWWWWM-JU") == 0)
76
78
 
        else false)
77
79
 
        then $Tuple2("DUCK-WWWWWWWM-JU", "8W-J")
78
80
 
        else {
79
-
            let I = y(4, q, A, 0)
80
-
            let J = y(4, q, A, 1)
81
-
            let K = if ((J == 0))
81
+
            let J = z(4, r, B, 0)
82
+
            let K = z(4, r, B, 1)
83
+
            let L = if ((K == 0))
82
84
 
                then "Y"
83
-
                else if ((J == 1))
85
+
                else if ((K == 1))
84
86
 
                    then "G"
85
-
                    else if ((J == 2))
87
+
                    else if ((K == 2))
86
88
 
                        then "B"
87
89
 
                        else "R"
88
-
            if ((I == 0))
89
-
                then $Tuple2(("DUCK-FFFFFFFF-G" + K), "8F-G")
90
-
                else if ((I == 1))
91
-
                    then $Tuple2(("DUCK-HHHHHHHH-G" + K), "8H-G")
92
-
                    else if ((I == 2))
93
-
                        then $Tuple2(("DUCK-GGGGGGGG-G" + K), "8G-G")
94
-
                        else $Tuple2(("DUCK-IIIIIIII-G" + K), "8I-G")
90
+
            if ((J == 0))
91
+
                then $Tuple2(("DUCK-FFFFFFFF-G" + L), "8F-G")
92
+
                else if ((J == 1))
93
+
                    then $Tuple2(("DUCK-HHHHHHHH-G" + L), "8H-G")
94
+
                    else if ((J == 2))
95
+
                        then $Tuple2(("DUCK-GGGGGGGG-G" + L), "8G-G")
96
+
                        else $Tuple2(("DUCK-IIIIIIII-G" + L), "8I-G")
95
97
 
            }
96
98
 
    }
97
99
 
98
100
 
99
-
func L (M) = {
100
-
    let N = M
101
-
    let O = c
102
-
    let P = d
103
-
    let Q = pow((100 + ((N * O) / (10 * P))), 2, 5, 1, 2, DOWN)
104
-
    (Q * 1000000)
101
+
func M (N) = {
102
+
    let O = N
103
+
    let P = c
104
+
    let Q = d
105
+
    let R = pow((100 + ((O * P) / (10 * Q))), 2, 5, 1, 2, DOWN)
106
+
    (R * 1000000)
105
107
 
    }
106
108
 
107
109
 
108
-
@Callable(R)
109
-
func startDuckHatching (S) = if ((k() > 0))
110
+
@Callable(S)
111
+
func startDuckHatching (T) = if ((l() > 0))
110
112
 
    then throw("EGG operations are temporarily locked")
111
113
 
    else {
112
-
        let T = if ((R.caller == Address(j)))
113
-
            then true
114
-
            else false
115
-
        let M = v("ducks_amount")
116
-
        let U = L(M)
117
-
        let V = value(R.payments[0])
118
-
        let W = [StringEntry(o(toString(R.originCaller), R.transactionId), g), IntegerEntry(r(toString(R.originCaller), R.transactionId), (height + b)), IntegerEntry("ducks_amount", (M + 1)), IntegerEntry("ducks_last_price", (U / 1000000))]
119
-
        if (T)
120
-
            then (W ++ [BooleanEntry((("hatching_" + toBase58String(R.transactionId)) + "_babyDuck"), true)])
121
-
            else if ((V.assetId != a))
122
-
                then throw(("You can attach only EGG tokens with the following asset id: " + toBase58String(a)))
123
-
                else if ((U > V.amount))
124
-
                    then throw(("To hatch a duck you currently need the following amount of EGGlets: " + toString(U)))
125
-
                    else {
126
-
                        let X = fraction(U, f, 100)
127
-
                        let Y = invoke(Address(e), "refPayment", [S], [AttachedPayment(a, X)])
128
-
                        if ((Y == Y))
129
-
                            then (W ++ [ScriptTransfer(R.caller, (V.amount - U), a)])
130
-
                            else throw("Strict value is not equal to itself.")
131
-
                        }
114
+
        let N = w("ducks_amount")
115
+
        let U = M(N)
116
+
        let V = value(S.payments[0])
117
+
        let W = [StringEntry(p(toString(S.originCaller), S.transactionId), g), IntegerEntry(s(toString(S.originCaller), S.transactionId), (height + b)), IntegerEntry("ducks_amount", (N + 1)), IntegerEntry("ducks_last_price", (U / 1000000))]
118
+
        if ((S.caller == Address(j)))
119
+
            then (W ++ [BooleanEntry((("hatching_" + toBase58String(S.transactionId)) + "_babyDuck"), true)])
120
+
            else if ((S.caller == Address(k)))
121
+
                then (W ++ [BooleanEntry((("hatching_" + toBase58String(S.transactionId)) + "_promo"), true)])
122
+
                else if ((V.assetId != a))
123
+
                    then throw(("You can attach only EGG tokens with the following asset id: " + toBase58String(a)))
124
+
                    else if ((U > V.amount))
125
+
                        then throw(("To hatch a duck you currently need the following amount of EGGlets: " + toString(U)))
126
+
                        else {
127
+
                            let X = fraction(U, f, 100)
128
+
                            let Y = invoke(Address(e), "refPayment", [T], [AttachedPayment(a, X)])
129
+
                            if ((Y == Y))
130
+
                                then (W ++ [ScriptTransfer(S.caller, (V.amount - U), a)])
131
+
                                else throw("Strict value is not equal to itself.")
132
+
                            }
132
133
 
        }
133
134
 
134
135
 
135
136
 
136
-
@Callable(R)
137
+
@Callable(S)
137
138
 
func finishDuckHatching (Z) = {
138
-
    let q = fromBase58String(Z)
139
-
    let aa = o(toString(R.caller), q)
140
-
    let ab = r(toString(R.caller), q)
141
-
    let ac = s(toString(R.caller), q)
139
+
    let r = fromBase58String(Z)
140
+
    let aa = p(toString(S.caller), r)
141
+
    let ab = s(toString(S.caller), r)
142
+
    let ac = t(toString(S.caller), r)
142
143
 
    let ad = {
143
-
        let m = getBoolean((("hatching_" + Z) + "_babyDuck"))
144
-
        if ($isInstanceOf(m, "Boolean"))
144
+
        let n = getBoolean((("hatching_" + Z) + "_babyDuck"))
145
+
        if ($isInstanceOf(n, "Boolean"))
145
146
 
            then {
146
-
                let P = m
147
-
                P
147
+
                let Q = n
148
+
                Q
148
149
 
                }
149
150
 
            else false
150
151
 
        }
151
152
 
    let ae = getStringValue(this, aa)
152
-
    let A = getIntegerValue(this, ab)
153
+
    let B = getIntegerValue(this, ab)
153
154
 
    if ((ae == h))
154
155
 
        then {
155
-
            let af = getStringValue(this, s(toString(R.caller), q))
156
+
            let af = getStringValue(this, t(toString(S.caller), r))
156
157
 
            throw(("The duck was hatched and claimed already, here is the folowing: " + af))
157
158
 
            }
158
-
        else if ((A > height))
159
-
            then throw((((("Hatching is not finished yet " + toString((A - height))) + " blocks remaining, it will take around ") + toString((A - height))) + " minutes"))
159
+
        else if ((B > height))
160
+
            then throw((((("Hatching is not finished yet " + toString((B - height))) + " blocks remaining, it will take around ") + toString((B - height))) + " minutes"))
160
161
 
            else {
161
-
                let ag = G(q, A)
162
+
                let ag = H(r, B)
162
163
 
                let ah = ag._1
163
164
 
                let ai = ag._2
164
165
 
                let aj = (("{\"genotype\": \"" + ah) + "\", \"crossbreeding\": true}")
165
-
                let ak = Issue(ah, aj, 1, 0, false, unit, A)
166
+
                let ak = Issue(ah, aj, 1, 0, false, unit, B)
166
167
 
                let al = calculateAssetId(ak)
167
-
                let am = (v(t(ah)) + 1)
168
-
[StringEntry(aa, h), StringEntry(ac, toBase58String(al)), StringEntry(toBase58String(al), ac), BooleanEntry((("duck_" + toBase58String(al)) + "_grown"), ad), IntegerEntry(t(ah), am), IntegerEntry((("stats_" + ai) + "_quantity"), (v((("stats_" + ai) + "_quantity")) + 1)), ak, ScriptTransfer(R.caller, 1, al)]
168
+
                let am = (w(u(ah)) + 1)
169
+
[StringEntry(aa, h), StringEntry(ac, toBase58String(al)), StringEntry(toBase58String(al), ac), BooleanEntry((("duck_" + toBase58String(al)) + "_grown"), ad), IntegerEntry(u(ah), am), IntegerEntry((("stats_" + ai) + "_quantity"), (w((("stats_" + ai) + "_quantity")) + 1)), ak, ScriptTransfer(S.caller, 1, al)]
169
170
 
                }
170
171
 
    }
171
172
 
172
173
 
173
174
 
174
-
@Callable(R)
175
-
func issueFreeDuck (p,Z) = if ((R.caller != Address(i)))
175
+
@Callable(S)
176
+
func issueFreeDuck (q,Z) = if ((S.caller != Address(i)))
176
177
 
    then throw("rebirth or baby ducks only")
177
178
 
    else {
178
-
        let q = fromBase58String(Z)
179
-
        let aa = o(p, q)
180
-
        let ab = r(p, q)
181
-
        let M = v("ducks_amount")
182
-
        let U = L(M)
183
-
        let an = G(q, (value(transactionHeightById(q)) + 1))
179
+
        let r = fromBase58String(Z)
180
+
        let aa = p(q, r)
181
+
        let ab = s(q, r)
182
+
        let N = w("ducks_amount")
183
+
        let U = M(N)
184
+
        let an = H(r, (value(transactionHeightById(r)) + 1))
184
185
 
        let ah = an._1
185
186
 
        let ai = an._2
186
187
 
        let aj = (("{\"genotype\": \"" + ah) + "\", \"crossbreeding\": true}")
187
188
 
        let ak = Issue(ah, aj, 1, 0, false, unit, height)
188
189
 
        let al = calculateAssetId(ak)
189
-
        let am = (v(t(ah)) + 1)
190
-
        let ac = s(p, q)
191
-
        $Tuple2([IntegerEntry(r(p, q), height), IntegerEntry("ducks_amount", (M + 1)), IntegerEntry("ducks_last_price", (U / 1000000)), StringEntry(aa, h), StringEntry(ac, toBase58String(al)), StringEntry(toBase58String(al), ac), IntegerEntry(t(ah), am), IntegerEntry((("stats_" + ai) + "_quantity"), (v((("stats_" + ai) + "_quantity")) + 1)), ak, ScriptTransfer(value(addressFromString(p)), 1, al)], toBase58String(al))
190
+
        let am = (w(u(ah)) + 1)
191
+
        let ac = t(q, r)
192
+
        $Tuple2([IntegerEntry(s(q, r), height), IntegerEntry("ducks_amount", (N + 1)), IntegerEntry("ducks_last_price", (U / 1000000)), StringEntry(aa, h), StringEntry(ac, toBase58String(al)), StringEntry(toBase58String(al), ac), IntegerEntry(u(ah), am), IntegerEntry((("stats_" + ai) + "_quantity"), (w((("stats_" + ai) + "_quantity")) + 1)), ak, ScriptTransfer(value(addressFromString(q)), 1, al)], toBase58String(al))
192
193
 
        }
193
194
 
194
195
 
195
196
 
196
-
@Callable(R)
197
-
func issueJackpot (p,Z,F) = if (if ((R.caller != Address(i)))
198
-
    then (R.caller != this)
197
+
@Callable(S)
198
+
func issueJackpot (q,Z,G) = if (if ((S.caller != Address(i)))
199
+
    then (S.caller != this)
199
200
 
    else false)
200
201
 
    then throw("admin or rebirth only")
201
202
 
    else {
202
-
        let q = fromBase58String(Z)
203
-
        let aa = o(p, q)
204
-
        let ab = r(p, q)
205
-
        let M = v("ducks_amount")
206
-
        let U = L(M)
207
-
        let ao = $Tuple2((("DUCK-" + F) + "-JU"), "8W-J")
203
+
        let r = fromBase58String(Z)
204
+
        let aa = p(q, r)
205
+
        let ab = s(q, r)
206
+
        let N = w("ducks_amount")
207
+
        let U = M(N)
208
+
        let ao = $Tuple2((("DUCK-" + G) + "-JU"), "8W-J")
208
209
 
        let ah = ao._1
209
210
 
        let ai = ao._2
210
211
 
        let aj = (("{\"genotype\": \"" + ah) + "\", \"crossbreeding\": true}")
211
212
 
        let ak = Issue(ah, aj, 1, 0, false, unit, height)
212
213
 
        let al = calculateAssetId(ak)
213
-
        let ac = s(p, q)
214
-
        $Tuple2([IntegerEntry(r(p, q), height), IntegerEntry("ducks_amount", (M + 1)), IntegerEntry("ducks_last_price", (U / 1000000)), StringEntry(aa, h), StringEntry(ac, toBase58String(al)), StringEntry(toBase58String(al), ac), IntegerEntry(t(ah), (v(t(ah)) + 1)), IntegerEntry((("stats_" + ai) + "_quantity"), (v((("stats_" + ai) + "_quantity")) + 1)), ak, ScriptTransfer(value(addressFromString(p)), 1, al)], toBase58String(al))
214
+
        let ac = t(q, r)
215
+
        $Tuple2([IntegerEntry(s(q, r), height), IntegerEntry("ducks_amount", (N + 1)), IntegerEntry("ducks_last_price", (U / 1000000)), StringEntry(aa, h), StringEntry(ac, toBase58String(al)), StringEntry(toBase58String(al), ac), IntegerEntry(u(ah), (w(u(ah)) + 1)), IntegerEntry((("stats_" + ai) + "_quantity"), (w((("stats_" + ai) + "_quantity")) + 1)), ak, ScriptTransfer(value(addressFromString(q)), 1, al)], toBase58String(al))
215
216
 
        }
216
217
 
217
218
 
218
219
 
219
-
@Callable(R)
220
+
@Callable(S)
220
221
 
func reduceRarity (al,ap) = {
221
222
 
    let ak = fromBase58String(al)
222
-
    if (if ((R.caller != Address(i)))
223
-
        then (R.caller != this)
223
+
    if (if ((S.caller != Address(i)))
224
+
        then (S.caller != this)
224
225
 
        else false)
225
226
 
        then throw("admin or rebirth only")
226
227
 
        else {
227
228
 
            let ah = value(assetInfo(ak)).name
228
229
 
            let aq = takeRight(take(ah, 6), 1)
229
230
 
            let ai = (("8" + aq) + "-G")
230
-
[IntegerEntry(t(ah), (v(t(ah)) - 1)), IntegerEntry((("stats_" + ai) + "_quantity"), (v((("stats_" + ai) + "_quantity")) - 1))]
231
+
[IntegerEntry(u(ah), (w(u(ah)) - 1)), IntegerEntry((("stats_" + ai) + "_quantity"), (w((("stats_" + ai) + "_quantity")) - 1))]
231
232
 
            }
232
233
 
    }
233
234
 

Full: 
Old
New
Differences
1
1
 
{-# STDLIB_VERSION 5 #-}
2
2
 
{-# SCRIPT_TYPE ACCOUNT #-}
3
3
 
{-# CONTENT_TYPE DAPP #-}
4
4
 
let a = base58'C1iWsKGqLwjHUndiQ7iXpdmPum9PeCDFfyXBdJJosDRS'
5
5
 
6
6
 
let b = 2
7
7
 
8
8
 
let c = 10
9
9
 
10
10
 
let d = 9
11
11
 
12
12
 
let e = base58'3P8ejTkfRpz9WqCwCuihesNXU5k3zmFFfVe'
13
13
 
14
14
 
let f = 5
15
15
 
16
16
 
let g = "HATCHING_STARTED"
17
17
 
18
18
 
let h = "HATCHING_FINISHED"
19
19
 
20
20
 
let i = base58'3PCC6fVHNa6289DTDmcUo3RuLaFmteZZsmQ'
21
21
 
22
22
 
let j = base58'3PKmLiGEfqLWMC1H9xhzqvAZKUXfFm8uoeg'
23
23
 
24
-
func k () = {
25
-
    let l = Address(base58'3PEPftf2kWZDmAaWBjs6BUJa9957kiA2PkU')
26
-
    let m = getInteger(l, "egglock")
27
-
    if ($isInstanceOf(m, "Int"))
24
+
let k = base58'3P6s9C39Ak5FAQ3F5VapYJ3ULxgbsAReXWD'
25
+
26
+
func l () = {
27
+
    let m = Address(base58'3PEPftf2kWZDmAaWBjs6BUJa9957kiA2PkU')
28
+
    let n = getInteger(m, "egglock")
29
+
    if ($isInstanceOf(n, "Int"))
28
30
 
        then {
29
-
            let n = m
30
-
            n
31
+
            let o = n
32
+
            o
31
33
 
            }
32
34
 
        else 0
33
35
 
    }
34
36
 
35
37
 
36
-
func o (p,q) = (((p + "_") + toBase58String(q)) + "_status")
38
+
func p (q,r) = (((q + "_") + toBase58String(r)) + "_status")
37
39
 
38
40
 
39
-
func r (p,q) = (((p + "_") + toBase58String(q)) + "_fh")
41
+
func s (q,r) = (((q + "_") + toBase58String(r)) + "_fh")
40
42
 
41
43
 
42
-
func s (p,q) = (((p + "_") + toBase58String(q)) + "_di")
44
+
func t (q,r) = (((q + "_") + toBase58String(r)) + "_di")
43
45
 
44
46
 
45
-
func t (u) = (("stats_" + u) + "_amount")
47
+
func u (v) = (("stats_" + v) + "_amount")
46
48
 
47
49
 
48
-
func v (w) = {
49
-
    let x = {
50
-
        let m = getInteger(this, w)
51
-
        if ($isInstanceOf(m, "Int"))
50
+
func w (x) = {
51
+
    let y = {
52
+
        let n = getInteger(this, x)
53
+
        if ($isInstanceOf(n, "Int"))
52
54
 
            then {
53
-
                let n = m
54
-
                n
55
+
                let o = n
56
+
                o
55
57
 
                }
56
58
 
            else 0
57
59
 
        }
58
-
    x
60
+
    y
59
61
 
    }
60
62
 
61
63
 
62
-
func y (z,q,A,B) = {
63
-
    let C = value(blockInfoByHeight((A - 1)))
64
-
    let D = sha256((q + value(C.vrf)))
65
-
    (toInt(D, (B * 8)) % z)
64
+
func z (A,r,B,C) = {
65
+
    let D = value(blockInfoByHeight((B - 1)))
66
+
    let E = sha256((r + value(D.vrf)))
67
+
    (toInt(E, (C * 8)) % A)
66
68
 
    }
67
69
 
68
70
 
69
-
func E (F) = v(t(F))
71
+
func F (G) = w(u(G))
70
72
 
71
73
 
72
-
func G (q,A) = {
73
-
    let H = y(500, q, A, 0)
74
-
    if (if ((H == 111))
75
-
        then (E("DUCK-WWWWWWWM-JU") == 0)
74
+
func H (r,B) = {
75
+
    let I = z(500, r, B, 0)
76
+
    if (if ((I == 111))
77
+
        then (F("DUCK-WWWWWWWM-JU") == 0)
76
78
 
        else false)
77
79
 
        then $Tuple2("DUCK-WWWWWWWM-JU", "8W-J")
78
80
 
        else {
79
-
            let I = y(4, q, A, 0)
80
-
            let J = y(4, q, A, 1)
81
-
            let K = if ((J == 0))
81
+
            let J = z(4, r, B, 0)
82
+
            let K = z(4, r, B, 1)
83
+
            let L = if ((K == 0))
82
84
 
                then "Y"
83
-
                else if ((J == 1))
85
+
                else if ((K == 1))
84
86
 
                    then "G"
85
-
                    else if ((J == 2))
87
+
                    else if ((K == 2))
86
88
 
                        then "B"
87
89
 
                        else "R"
88
-
            if ((I == 0))
89
-
                then $Tuple2(("DUCK-FFFFFFFF-G" + K), "8F-G")
90
-
                else if ((I == 1))
91
-
                    then $Tuple2(("DUCK-HHHHHHHH-G" + K), "8H-G")
92
-
                    else if ((I == 2))
93
-
                        then $Tuple2(("DUCK-GGGGGGGG-G" + K), "8G-G")
94
-
                        else $Tuple2(("DUCK-IIIIIIII-G" + K), "8I-G")
90
+
            if ((J == 0))
91
+
                then $Tuple2(("DUCK-FFFFFFFF-G" + L), "8F-G")
92
+
                else if ((J == 1))
93
+
                    then $Tuple2(("DUCK-HHHHHHHH-G" + L), "8H-G")
94
+
                    else if ((J == 2))
95
+
                        then $Tuple2(("DUCK-GGGGGGGG-G" + L), "8G-G")
96
+
                        else $Tuple2(("DUCK-IIIIIIII-G" + L), "8I-G")
95
97
 
            }
96
98
 
    }
97
99
 
98
100
 
99
-
func L (M) = {
100
-
    let N = M
101
-
    let O = c
102
-
    let P = d
103
-
    let Q = pow((100 + ((N * O) / (10 * P))), 2, 5, 1, 2, DOWN)
104
-
    (Q * 1000000)
101
+
func M (N) = {
102
+
    let O = N
103
+
    let P = c
104
+
    let Q = d
105
+
    let R = pow((100 + ((O * P) / (10 * Q))), 2, 5, 1, 2, DOWN)
106
+
    (R * 1000000)
105
107
 
    }
106
108
 
107
109
 
108
-
@Callable(R)
109
-
func startDuckHatching (S) = if ((k() > 0))
110
+
@Callable(S)
111
+
func startDuckHatching (T) = if ((l() > 0))
110
112
 
    then throw("EGG operations are temporarily locked")
111
113
 
    else {
112
-
        let T = if ((R.caller == Address(j)))
113
-
            then true
114
-
            else false
115
-
        let M = v("ducks_amount")
116
-
        let U = L(M)
117
-
        let V = value(R.payments[0])
118
-
        let W = [StringEntry(o(toString(R.originCaller), R.transactionId), g), IntegerEntry(r(toString(R.originCaller), R.transactionId), (height + b)), IntegerEntry("ducks_amount", (M + 1)), IntegerEntry("ducks_last_price", (U / 1000000))]
119
-
        if (T)
120
-
            then (W ++ [BooleanEntry((("hatching_" + toBase58String(R.transactionId)) + "_babyDuck"), true)])
121
-
            else if ((V.assetId != a))
122
-
                then throw(("You can attach only EGG tokens with the following asset id: " + toBase58String(a)))
123
-
                else if ((U > V.amount))
124
-
                    then throw(("To hatch a duck you currently need the following amount of EGGlets: " + toString(U)))
125
-
                    else {
126
-
                        let X = fraction(U, f, 100)
127
-
                        let Y = invoke(Address(e), "refPayment", [S], [AttachedPayment(a, X)])
128
-
                        if ((Y == Y))
129
-
                            then (W ++ [ScriptTransfer(R.caller, (V.amount - U), a)])
130
-
                            else throw("Strict value is not equal to itself.")
131
-
                        }
114
+
        let N = w("ducks_amount")
115
+
        let U = M(N)
116
+
        let V = value(S.payments[0])
117
+
        let W = [StringEntry(p(toString(S.originCaller), S.transactionId), g), IntegerEntry(s(toString(S.originCaller), S.transactionId), (height + b)), IntegerEntry("ducks_amount", (N + 1)), IntegerEntry("ducks_last_price", (U / 1000000))]
118
+
        if ((S.caller == Address(j)))
119
+
            then (W ++ [BooleanEntry((("hatching_" + toBase58String(S.transactionId)) + "_babyDuck"), true)])
120
+
            else if ((S.caller == Address(k)))
121
+
                then (W ++ [BooleanEntry((("hatching_" + toBase58String(S.transactionId)) + "_promo"), true)])
122
+
                else if ((V.assetId != a))
123
+
                    then throw(("You can attach only EGG tokens with the following asset id: " + toBase58String(a)))
124
+
                    else if ((U > V.amount))
125
+
                        then throw(("To hatch a duck you currently need the following amount of EGGlets: " + toString(U)))
126
+
                        else {
127
+
                            let X = fraction(U, f, 100)
128
+
                            let Y = invoke(Address(e), "refPayment", [T], [AttachedPayment(a, X)])
129
+
                            if ((Y == Y))
130
+
                                then (W ++ [ScriptTransfer(S.caller, (V.amount - U), a)])
131
+
                                else throw("Strict value is not equal to itself.")
132
+
                            }
132
133
 
        }
133
134
 
134
135
 
135
136
 
136
-
@Callable(R)
137
+
@Callable(S)
137
138
 
func finishDuckHatching (Z) = {
138
-
    let q = fromBase58String(Z)
139
-
    let aa = o(toString(R.caller), q)
140
-
    let ab = r(toString(R.caller), q)
141
-
    let ac = s(toString(R.caller), q)
139
+
    let r = fromBase58String(Z)
140
+
    let aa = p(toString(S.caller), r)
141
+
    let ab = s(toString(S.caller), r)
142
+
    let ac = t(toString(S.caller), r)
142
143
 
    let ad = {
143
-
        let m = getBoolean((("hatching_" + Z) + "_babyDuck"))
144
-
        if ($isInstanceOf(m, "Boolean"))
144
+
        let n = getBoolean((("hatching_" + Z) + "_babyDuck"))
145
+
        if ($isInstanceOf(n, "Boolean"))
145
146
 
            then {
146
-
                let P = m
147
-
                P
147
+
                let Q = n
148
+
                Q
148
149
 
                }
149
150
 
            else false
150
151
 
        }
151
152
 
    let ae = getStringValue(this, aa)
152
-
    let A = getIntegerValue(this, ab)
153
+
    let B = getIntegerValue(this, ab)
153
154
 
    if ((ae == h))
154
155
 
        then {
155
-
            let af = getStringValue(this, s(toString(R.caller), q))
156
+
            let af = getStringValue(this, t(toString(S.caller), r))
156
157
 
            throw(("The duck was hatched and claimed already, here is the folowing: " + af))
157
158
 
            }
158
-
        else if ((A > height))
159
-
            then throw((((("Hatching is not finished yet " + toString((A - height))) + " blocks remaining, it will take around ") + toString((A - height))) + " minutes"))
159
+
        else if ((B > height))
160
+
            then throw((((("Hatching is not finished yet " + toString((B - height))) + " blocks remaining, it will take around ") + toString((B - height))) + " minutes"))
160
161
 
            else {
161
-
                let ag = G(q, A)
162
+
                let ag = H(r, B)
162
163
 
                let ah = ag._1
163
164
 
                let ai = ag._2
164
165
 
                let aj = (("{\"genotype\": \"" + ah) + "\", \"crossbreeding\": true}")
165
-
                let ak = Issue(ah, aj, 1, 0, false, unit, A)
166
+
                let ak = Issue(ah, aj, 1, 0, false, unit, B)
166
167
 
                let al = calculateAssetId(ak)
167
-
                let am = (v(t(ah)) + 1)
168
-
[StringEntry(aa, h), StringEntry(ac, toBase58String(al)), StringEntry(toBase58String(al), ac), BooleanEntry((("duck_" + toBase58String(al)) + "_grown"), ad), IntegerEntry(t(ah), am), IntegerEntry((("stats_" + ai) + "_quantity"), (v((("stats_" + ai) + "_quantity")) + 1)), ak, ScriptTransfer(R.caller, 1, al)]
168
+
                let am = (w(u(ah)) + 1)
169
+
[StringEntry(aa, h), StringEntry(ac, toBase58String(al)), StringEntry(toBase58String(al), ac), BooleanEntry((("duck_" + toBase58String(al)) + "_grown"), ad), IntegerEntry(u(ah), am), IntegerEntry((("stats_" + ai) + "_quantity"), (w((("stats_" + ai) + "_quantity")) + 1)), ak, ScriptTransfer(S.caller, 1, al)]
169
170
 
                }
170
171
 
    }
171
172
 
172
173
 
173
174
 
174
-
@Callable(R)
175
-
func issueFreeDuck (p,Z) = if ((R.caller != Address(i)))
175
+
@Callable(S)
176
+
func issueFreeDuck (q,Z) = if ((S.caller != Address(i)))
176
177
 
    then throw("rebirth or baby ducks only")
177
178
 
    else {
178
-
        let q = fromBase58String(Z)
179
-
        let aa = o(p, q)
180
-
        let ab = r(p, q)
181
-
        let M = v("ducks_amount")
182
-
        let U = L(M)
183
-
        let an = G(q, (value(transactionHeightById(q)) + 1))
179
+
        let r = fromBase58String(Z)
180
+
        let aa = p(q, r)
181
+
        let ab = s(q, r)
182
+
        let N = w("ducks_amount")
183
+
        let U = M(N)
184
+
        let an = H(r, (value(transactionHeightById(r)) + 1))
184
185
 
        let ah = an._1
185
186
 
        let ai = an._2
186
187
 
        let aj = (("{\"genotype\": \"" + ah) + "\", \"crossbreeding\": true}")
187
188
 
        let ak = Issue(ah, aj, 1, 0, false, unit, height)
188
189
 
        let al = calculateAssetId(ak)
189
-
        let am = (v(t(ah)) + 1)
190
-
        let ac = s(p, q)
191
-
        $Tuple2([IntegerEntry(r(p, q), height), IntegerEntry("ducks_amount", (M + 1)), IntegerEntry("ducks_last_price", (U / 1000000)), StringEntry(aa, h), StringEntry(ac, toBase58String(al)), StringEntry(toBase58String(al), ac), IntegerEntry(t(ah), am), IntegerEntry((("stats_" + ai) + "_quantity"), (v((("stats_" + ai) + "_quantity")) + 1)), ak, ScriptTransfer(value(addressFromString(p)), 1, al)], toBase58String(al))
190
+
        let am = (w(u(ah)) + 1)
191
+
        let ac = t(q, r)
192
+
        $Tuple2([IntegerEntry(s(q, r), height), IntegerEntry("ducks_amount", (N + 1)), IntegerEntry("ducks_last_price", (U / 1000000)), StringEntry(aa, h), StringEntry(ac, toBase58String(al)), StringEntry(toBase58String(al), ac), IntegerEntry(u(ah), am), IntegerEntry((("stats_" + ai) + "_quantity"), (w((("stats_" + ai) + "_quantity")) + 1)), ak, ScriptTransfer(value(addressFromString(q)), 1, al)], toBase58String(al))
192
193
 
        }
193
194
 
194
195
 
195
196
 
196
-
@Callable(R)
197
-
func issueJackpot (p,Z,F) = if (if ((R.caller != Address(i)))
198
-
    then (R.caller != this)
197
+
@Callable(S)
198
+
func issueJackpot (q,Z,G) = if (if ((S.caller != Address(i)))
199
+
    then (S.caller != this)
199
200
 
    else false)
200
201
 
    then throw("admin or rebirth only")
201
202
 
    else {
202
-
        let q = fromBase58String(Z)
203
-
        let aa = o(p, q)
204
-
        let ab = r(p, q)
205
-
        let M = v("ducks_amount")
206
-
        let U = L(M)
207
-
        let ao = $Tuple2((("DUCK-" + F) + "-JU"), "8W-J")
203
+
        let r = fromBase58String(Z)
204
+
        let aa = p(q, r)
205
+
        let ab = s(q, r)
206
+
        let N = w("ducks_amount")
207
+
        let U = M(N)
208
+
        let ao = $Tuple2((("DUCK-" + G) + "-JU"), "8W-J")
208
209
 
        let ah = ao._1
209
210
 
        let ai = ao._2
210
211
 
        let aj = (("{\"genotype\": \"" + ah) + "\", \"crossbreeding\": true}")
211
212
 
        let ak = Issue(ah, aj, 1, 0, false, unit, height)
212
213
 
        let al = calculateAssetId(ak)
213
-
        let ac = s(p, q)
214
-
        $Tuple2([IntegerEntry(r(p, q), height), IntegerEntry("ducks_amount", (M + 1)), IntegerEntry("ducks_last_price", (U / 1000000)), StringEntry(aa, h), StringEntry(ac, toBase58String(al)), StringEntry(toBase58String(al), ac), IntegerEntry(t(ah), (v(t(ah)) + 1)), IntegerEntry((("stats_" + ai) + "_quantity"), (v((("stats_" + ai) + "_quantity")) + 1)), ak, ScriptTransfer(value(addressFromString(p)), 1, al)], toBase58String(al))
214
+
        let ac = t(q, r)
215
+
        $Tuple2([IntegerEntry(s(q, r), height), IntegerEntry("ducks_amount", (N + 1)), IntegerEntry("ducks_last_price", (U / 1000000)), StringEntry(aa, h), StringEntry(ac, toBase58String(al)), StringEntry(toBase58String(al), ac), IntegerEntry(u(ah), (w(u(ah)) + 1)), IntegerEntry((("stats_" + ai) + "_quantity"), (w((("stats_" + ai) + "_quantity")) + 1)), ak, ScriptTransfer(value(addressFromString(q)), 1, al)], toBase58String(al))
215
216
 
        }
216
217
 
217
218
 
218
219
 
219
-
@Callable(R)
220
+
@Callable(S)
220
221
 
func reduceRarity (al,ap) = {
221
222
 
    let ak = fromBase58String(al)
222
-
    if (if ((R.caller != Address(i)))
223
-
        then (R.caller != this)
223
+
    if (if ((S.caller != Address(i)))
224
+
        then (S.caller != this)
224
225
 
        else false)
225
226
 
        then throw("admin or rebirth only")
226
227
 
        else {
227
228
 
            let ah = value(assetInfo(ak)).name
228
229
 
            let aq = takeRight(take(ah, 6), 1)
229
230
 
            let ai = (("8" + aq) + "-G")
230
-
[IntegerEntry(t(ah), (v(t(ah)) - 1)), IntegerEntry((("stats_" + ai) + "_quantity"), (v((("stats_" + ai) + "_quantity")) - 1))]
231
+
[IntegerEntry(u(ah), (w(u(ah)) - 1)), IntegerEntry((("stats_" + ai) + "_quantity"), (w((("stats_" + ai) + "_quantity")) - 1))]
231
232
 
            }
232
233
 
    }
233
234
 
234
235
 
235
236
 
@Verifier(ar)
236
237
 
func as () = sigVerify(ar.bodyBytes, ar.proofs[0], ar.senderPublicKey)
237
238
 

github/deemru/w8io/3ef1775 
94.39 ms ◑