Support NPC (Genuine's)

//Made by Karul
//Edited by Genuine
prontera,137,228,5      script  Support NPC     94,{

mes "[Support]";
mes "What do you want to do?";
L_Main:
set @menu, rand(1,2);
if ( @menu == 1){
        switch(select("I want to feel divine punishment:Request Help")){
                case 1:
                                next;
                                mes "[Support]";
                                mes "Good Day~";
                                next;
                                atcommand "@nuke "+strcharinfo(0)+"";
                                close;
                case 2:
                                next;
                                mes "[Support]";
                                mes "What do you want to report?";
                                menu    "Bug",L_Bug,"Question",L_Question,"Hacker",L_Hacker;
                }
        }
        else{
                switch(select("Request Help:I want to feel divine punishment")){
                case 1:
                                next;
                                mes "[Support]";
                                mes "What do you want to report?";
                                menu    "Bug",L_Bug,"Question",L_Question,"Hacker",L_Hacker;
                case 2:
                                next;
                                mes "[Support]";
                                mes "Good Day~";
                                next;
                                atcommand "@nuke "+strcharinfo(0)+"";
                                close;
                }
        }
L_Bug:
        next;
        mes "[Support]";
        mes "A bug you say... Please by VERY specific about this";
        input @question$;
        close2;
        if(@question$ == "cancel")
        {
                next;
                goto L_Main;
        }
        else
        {
                mes "Are you sure this is your request?";
                mes "'^000088"+@question$+"^000000'";
                if(select("Yes, send it please:Wait. Let me retype it")==2)goto L_Bug;
                {
                        mes "Alright I will send it";
                        atcommand "@request Bug: "+@question$+"";
                        next;
                        mes "Your message was sent";
                        close;
                }
        }

L_Question:
        next;
        mes "[Support]";
        mes "A question you say... Please by VERY specific about this";
        input @question2$;
        close2;
        if(@question2$ == "cancel")
        {
        next;
        goto L_Main;
        }
        else
        {
                mes "Are you sure this is your question?";
                mes "'^000088"+@question2$+"^000000'";
                if(select("Yes, send it please:Wait. Let me retype it")==2) goto L_Question;
                {
                        mes "Alright I will send it";
                        atcommand "@request Question: "+@question2$+"";
                        next;
                        mes "Your message was sent";
                        close;
                }
        }
L_Hacker:
        next;
        mes "[Support]";
        mes "A Hacker you say... Please by VERY specific about this";
        input @question3$;
        close2;
        if(@question3$ == "cancel")
        {
                next;
                goto L_Main;
        }
        else
        {
                mes "Are you sure this is your request?";
                mes "'^000088"+@question3$+"^000000'";
                if(select("Yes, send it please:Wait. Let me retype it")==2)goto L_Hacker;
                {
                        mes "Alright I will send it";
                        atcommand "@request Hacker: "+@question3$+"";
                        next;
                        mes "Your message was sent";
                        close;
                }
        }
}