Avicus-Report-Tool

gistfile1.txt

    UNSET(Avicus);
    UNSET(run);
DO;
    IFCONTAINS(%SERVER%,avic.us);
        SET(Avicus);
        SET(run);
    ENDIF;
    IFMATCHES(%SERVER%,"(tm\.|event\.|dev\.)");
        UNSET(Avicus);
        UNSET(run);
    ENDIF;
    IF(run);
        IF(MODE = 1);
            IF(HEALTH = 0);
                SET(active);
                SET(respawn);
            ELSE;
                IF(respawn);
                    UNSET(active);
                    UNSET(respawn);
                ENDIF;
            ENDIF;
            IF(active);
            ELSE;
                IF(MODE = 0);
                    STOP(reportloader);
                ENDIF;
                SETSLOTITEM(tripwire_hook,1,1);
                SETSLOTITEM(stick,3,1);
                SETSLOTITEM(book,4,1);
                SETSLOTITEM(redstone_torch,5,1);
                SLOT(1);
                UNSET(run);
                STOP(report);
                SET(active);
            ENDIF;
            SET(active);
        ELSEIF(MODE = 0);
            IF(active);
                UNSET(active);
            ELSE;
            ENDIF;
            STOP(reportloader);
        ENDIF;
    ENDIF;
WHILE(run);
IF(Avicus);
ELSE;
    STOP(reportloader);
ENDIF;
UNSET(lock);
UNSET(&lockname);
DO;
IF(MODE = 1);
    SET(run);
    IF(LMOUSE);
        IF(holdingclick);
        ELSE;
            IF(GUI = "NONE");
                SET(holdingclick);
                SET(click);
            ENDIF;
        ENDIF;
        IF(click);
            IF(ITEM = "air");
                IF(CTRL);
                    WAIT(50ms);
                    SETSLOTITEM(compass,0,1);
                    SETSLOTITEM(tripwire_hook,1,1);
                    SETSLOTITEM(stick,3,1);
                    SETSLOTITEM(book,4,1);
                    SETSLOTITEM(redstone_torch,5,1);
                    SLOT(1);
                    LOG("&7Refreshed hotbar");
                ENDIF;
            ENDIF;
            IF(ITEM = "tripwire_hook");
                IF(HIT = "PLAYER");
                    IF(lock);
                        IF(CTRL);
                            LOG("&7Unlocked &cfrom &6&l%&lockname%");
                            UNSET(lock);
                            UNSET(&lockname);
                            STRIP(&hitname,%HITNAME%);
                            SET(&lockname,%&hitname%);
                            LOG("&7Locked &aonto &6&l%&lockname%");
                            SET(lock);
                        ELSE;
                            ECHO("/tp %&lockname%");
                        ENDIF;
                    ELSEIF(CTRL);
                        PROMPT(&tpto,"$$u","Select a user to teleport to","","DummyTeleport");
                        IFMATCHES(%&tpto%,"DummyTeleport");
                            LOG("&7No player selected");
                        ELSE;
                            SET(&lockname,%&tpto%);
                            LOG("&7Locked &aonto &6&l%&lockname%");
                            SET(lock);
                            ECHO("/tp %&tpto%");
                        ENDIF;
                    ELSEIF;
                        STRIP(&hitname,%HITNAME%);
                        SET(&lockname,%&hitname%);
                        LOG("&7Locked &aonto &6&l%&lockname%");
                        SET(lock);
                    ENDIF;
                ELSE;
                    IF(lock);
                        IF(CTRL);
                            LOG("&7Unlocked &cfrom &6&l%&lockname%");
                            UNSET(lock);
                            UNSET(&lockname);
                        ELSE;
                            ECHO("/tp %&lockname%");
                        ENDIF;
                    ELSEIF(CTRL);
                        PROMPT(&tpto,"$$u","Select a user to teleport to","","DummyTeleport");
                        IFMATCHES(%&tpto%,"DummyTeleport");
                            LOG("&7No player selected");
                        ELSE;
                            SET(&lockname,%&tpto%);
                            LOG("&7Locked &aonto &6&l%&lockname%");
                            SET(lock);
                            ECHO("/tp %&tpto%");
                        ENDIF;
                    ENDIF;
                ENDIF;
            ENDIF;
            IF(ITEM = "stick");
                IF(HIT = "PLAYER");
                    STRIP(&hitname,%HITNAME%);
                    PROMPT(&reason,"$$[[Type here]]", "Report %&hitname% for what?", true, "DummyReason");
                    IFMATCHES(%&reason%,"DummyReason");
                        LOG("&7No reason given");
                    ELSE;
                        PROMPT(&confirm,"$$[[Yes,No]]", "Confirm and report %&hitname% for %&reason%?", true, "DummyConfirm");
                        IFMATCHES(%&confirm,"DummyConfirm");
                            LOG("&7Not confirmed");
                        ELSEIF(&confirm = "No");
                            LOG("&7Cancelled");
                        ELSEIF(&confirm = "Yes");
                            LOG("&f[&6R&f] &3&lYou&r&e reported &3%&hitname%&e: &f%&reason%");
                            ECHO("/report %&hitname% %&reason%");
                        ELSE;
                            LOG("&7Aborted");
                        ENDIF;
                    ENDIF;
                ELSE;
                    IF(CTRL);
                        PROMPT(&player,"$$u","Select a user to report",true,"DummyPlayer");
                        IFCONTAINS(%&player%,"DummyPlayer");
                            LOG("&7No player selected");
                        ELSE;
                            PROMPT(&reason,"$$[[Type here]]", "Report %&player% for what?", true, "DummyReason");
                            IFMATCHES(%&reason%,"DummyReason");
                                LOG("&7No reason given");
                            ELSE;
                                PROMPT(&confirm,"$$[[Yes,No]]", "Confirm and report %&player% for %&reason%?", true, "DummyConfirm");
                                IFMATCHES(%&confirm%,"DummyConfirm");
                                    LOG("&7Not confirmed");
                                ELSEIF(&confirm = "No");
                                    LOG("&7Cancelled");
                                ELSEIF(&confirm = "Yes");
                                    LOG("&f[&6R&f] &3&lYou&r&e reported &3%&player%&e: &f%&reason%");
                                    ECHO("/report %&player% %&reason%");
                                ELSE;
                                    LOG("&7Aborted");
                                ENDIF;
                            ENDIF;
                        ENDIF;
                    ELSEIF(lock)
                        PROMPT(&reason,"$$[[Type here]]", "Report %&lockname% for what?", true, "DummyReason");
                        IFMATCHES(%&reason%,"DummyReason");
                            LOG("&7No reason given");
                        ELSE;
                            PROMPT(&confirm,"$$[[Yes,No]]", "Confirm and report %&lockname% for %&reason%?", true, "DummyConfirm");
                            IFMATCHES(%&confirm%,"DummyConfirm");
                                LOG("&7Not confirmed");
                            ELSEIF(&confirm = "No");
                                LOG("&7Cancelled");
                            ELSEIF(&confirm = "Yes");
                                LOG("&f[&6R&f] &3&lYou&r&e reported &3%&lockname%&e: &f%&reason%");
                                ECHO("/report %&lockname% %&reason%");
                                //UNSET(lock);
                                //UNSET(&lockname);
                            ELSE;
                                LOG("&7Aborted");
                            ENDIF;
                        ENDIF;
                    ENDIF;
                ENDIF;
            ENDIF;
            IF(ITEM = "book");
                IF(HIT = "PLAYER");
                    STRIP(&hitname,%HITNAME%);
                    ECHO("/lookup %&hitname%");
                ELSE;
                    IF(lock);
                        IF(CTRL);
                            ECHO("/seen %&lockname%");
                        ELSE;
                            ECHO("/lookup @%&lockname%"); 
                        ENDIF;
                    ELSE;
                    ENDIF;
                ENDIF;
            ENDIF;
            IF(ITEM = "redstone_torch");
                LOG("&fFullbright &a&lActive!");
                GAMMA(200);
                SETSLOTITEM(torch,5,1);
            ELSEIF(ITEM = "torch");
                LOG("&fFullbright &c&lInactive!");
                GAMMA(0);
                SETSLOTITEM(redstone_torch,5,1);
            ENDIF;
            UNSET(click);
        ENDIF;
    ELSE;
        UNSET(holdingclick);
    ENDIF;
    IF(RMOUSE);
        IF(rholdingclick);
        ELSE;
            IF(GUI = "NONE");
                SET(rholdingclick);
                SET(rclick);
            ENDIF;
        ENDIF;
        IF(rclick);
            UNSET(rclick);
        ENDIF;
    ELSE;
        UNSET(rholdingclick);
    ENDIF;
ELSEIF;
    UNSET(run);
ENDIF;
IF(MODE = 0);
    STOP(reportloader)
ENDIF;
WHILE(Avicus);