Guest User

Untitled

a guest
May 23rd, 2018
94
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.54 KB | None | 0 0
  1. //Karul
  2. //ExcaliburRO
  3. prontera,137,228,5 script Support NPC 94,{
  4.  
  5. mes "[Support]";
  6. mes "What do you want to do?";
  7. L_Main:
  8. switch(select("I want to feel divine punishment:Request Help")) {
  9. case 1:
  10. next;
  11. mes "[Support]";
  12. mes "Good Day~";
  13. next;
  14. atcommand "@nuke "+strcharinfo(0)+"";
  15. close;
  16. case 2:
  17. next;
  18. mes "[Support]";
  19. mes "What do you want to report?";
  20. menu "Bug",L_Bug,"Question",L_Question,"Hacker",L_Hacker;
  21. }
  22. L_Bug:
  23. next;
  24. mes "[Support]";
  25. mes "A bug you say... Please by VERY specific about this";
  26. input @question$;
  27. close2;
  28. if(@question$ == "cancel")
  29. {
  30. next;
  31. goto L_Main;
  32. }
  33. else
  34. {
  35. mes "Are you sure this is your request?";
  36. mes "'^000088"+@question$+"^000000'";
  37. if(select("Yes, send it please:Wait. Let me retype it")==2)goto L_Bug;
  38. {
  39. mes "Alright I will send it";
  40. atcommand "@request Bug: "+@question$+"";
  41. next;
  42. mes "Your message was sent";
  43. close;
  44. }
  45. }
  46.  
  47. L_Question:
  48. next;
  49. mes "[Support]";
  50. mes "A question you say... Please by VERY specific about this";
  51. input @question2$;
  52. close2;
  53. if(@question2$ == "cancel")
  54. {
  55. next;
  56. goto L_Main;
  57. }
  58. else
  59. {
  60. mes "Are you sure this is your question?";
  61. mes "'^000088"+@question2$+"^000000'";
  62. if(select("Yes, send it please:Wait. Let me retype it")==2) goto L_Question;
  63. {
  64. mes "Alright I will send it";
  65. atcommand "@request Question: "+@question2$+"";
  66. next;
  67. mes "Your message was sent";
  68. close;
  69. }
  70. }
  71. L_Hacker:
  72. next;
  73. mes "[Support]";
  74. mes "A Hacker you say... Please by VERY specific about this";
  75. input @question3$;
  76. close2;
  77. if(@question3$ == "cancel")
  78. {
  79. next;
  80. goto L_Main;
  81. }
  82. else
  83. {
  84. mes "Are you sure this is your request?";
  85. mes "'^000088"+@question3$+"^000000'";
  86. if(select("Yes, send it please:Wait. Let me retype it")==2)goto L_Hacker;
  87. {
  88. mes "Alright I will send it";
  89. atcommand "@request Hacker: "+@question3$+"";
  90. next;
  91. mes "Your message was sent";
  92. close;
  93. }
  94. }
  95. }
Add Comment
Please, Sign In to add comment