Support NPC

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

mes "[Support]";
mes "What do you want to do?";
L_Main:
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;
		}
						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;
									}
								}
	}