Advertisement
Guest User

Untitled

a guest
Jul 28th, 2013
96
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.89 KB | None | 0 0
  1. prontera,x,y,z script Bug & Feedback 999,{
  2. if(getgmlevel > 0) goto GMmenu;
  3. mes "Hello, you can report any bug and give feedbacks to me";
  4. menu "Feedback",menu_f,"Bug Report",menu_b;
  5.  
  6. menu_f:
  7. set @type$,"Feedback";
  8. goto menu_last;
  9.  
  10. menu_b:
  11. set @type$,"Bug Report";
  12. goto menu_last;
  13.  
  14. menu_last:
  15. next;
  16. mes "Write your "+@type$+".";
  17. input @feedback$;
  18. next;
  19. mes "This is your "+@type$+" : ";
  20. mes "----------------------";
  21. mes @feedback$;
  22. mes "----------------------";
  23. next;
  24. mes "Are you sure this is the right one ?";
  25. menu "Yes",fb_y,"No",fb_n;
  26.  
  27. fb_y:
  28. next;
  29. //Simple Check (easily bypassed)
  30. mes "Please authorize whether you're a BOT";
  31. set @num1,rand(0,999);
  32. set @num2,rand(0,999);
  33. mes "^FF0000"+@num1+"^000000 + ^0000FF"+@num2+"^000000 = ?";
  34. input @num3;
  35. if (@num3 != (@num1+@num2)) { end; }
  36. query_sql "INSERT INTO `feedback` (`report`,`type`,`submitter`) VALUES (`"+@feedback$+"`,`"+@type$+"`,`"+strcharinfo(0)+"`)";
  37. next;
  38. mes "We have successfully taken your feedback";
  39. end;
  40.  
  41. fb_n:
  42. end;
  43.  
  44. GMMenu:
  45. mes "What can I do for you sir ?";
  46. menu "Check Bug Report",gm_bug,"Check Feedbacks",gm_feed,"Delete Logs",gm_delete,"Nothing",gm_close;
  47.  
  48. gm_bug:
  49. query_sql "SELECT `id`, `report`, `submitter` FROM `f_b_report` WHERE type='Bug Report'", @id, @report$, @submitter$";
  50. for(set @i, 0; @i < getarraysize(@id); set @i, @i+1)
  51. {
  52. mes "From: ^FF0000Player^000000 ^0000FF"+@submitter$[@i]+"^000000";
  53. mes "Type: Bug Report";
  54. mes "Report: "+"@report$[@i]+".";
  55. mes "********************************";
  56. }
  57. next;
  58. goto GMMenu;
  59.  
  60. gm_feed:
  61. query_sql "SELECT `id`, `report`, `submitter` FROM `f_b_report` WHERE type='Feedback'", @id, @report$, @submitter$";
  62. for(set @i, 0; @i < getarraysize(@bug_id); set @i, @i+1)
  63. {
  64. mes "From: ^FF0000Player^000000 ^0000FF"+@submitter$[@i]+"^000000";
  65. mes "Type: Feedback";
  66. mes "Report: "+"@report$[@i]+".";
  67. mes "********************************";
  68. }
  69. next;
  70. goto GMMenu;
  71.  
  72. gm_delete:
  73. next;
  74. mes "Type the ID of the Reports you want to delete";
  75. mes "Input 000 to end";
  76. query_sql "SELECT `id`, `type`, `report`, `submitter` FROM `f_b_report` WHERE type='Feedback'", @id, @type$, @report$, @submitter$";
  77. for(set @i, 0; @i < getarraysize(@bug_id); set @i, @i+1)
  78. {
  79. mes "From: ^FF0000Player^000000 ^0000FF"+@submitter$[@i]+"^000000";
  80. mes "Type: "+@type$+".";
  81. mes "Report: "+substr(@report$[@i], 1, 20)+".....";
  82. mes "********************************";
  83. }
  84. input @gm_del;
  85. if (@gm_del == 000) end;
  86. query_sql "DELETE from `f_b_report` WHERE id='"+@gm_del+"";
  87. goto gm_delete;
  88.  
  89. gm_close:
  90. end;
  91.  
  92.  
  93. OnInit:
  94. if($bugfeedbacksql == 1) end;
  95. query_sql "CREATE TABLE `f_b_report` (`id` int(9) NOT NULL DEFAULT '0',`type` varchar(11) NOT NULL, `report` varchar(100) NOT NULL,`submitter` varchar(30) NOT NULL,PRIMARY KEY (`id`)) ENGINE=MyISAM;";
  96. set $bugfeedbacksql,1;
  97. end;
  98.  
  99. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement