API tools faq
paste
yuhsing

Untitled

yuhsing
Apr 29th, 2013
75
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 8.27 KB | None | 0 0
raw download clone embed print report
  1.  
  2. // 1.You can reset the player location and equips by just typing the name in the box.
  3. // 2. Search for the information about the player loginname ..password ..email.. last login and last IP
  4. // 3. Search for a ip for example 192.168.1.1 and it will tell how many char or player with that ip
  5. // 4. Logging/Viewing the trade logs history of the player
  6. // 5. Search for an item for example turtle general card it will tell who player got it as well with refine example +10 valk mantue.
  7. // 6. Logging/Viewing all the commands of admins with ip..
  8.  
  9.  
  10. prontera,155,181,5 script Sample 757,{
  11. if( getgmlevel() < 90 ){
  12. mes "Only GM can use.";
  13. }else{
  14. mes "How can i help you ?";
  15. switch( select( "Reset Player Position",
  16. "Search IP",
  17. "Search Item",
  18. "Search Player Account",
  19. "View GM Commands Logs" ) ){
  20. Case 1:
  21. mes "Insert Player name.";
  22. input .@player_name$;
  23. if( isloggedin( getcharid( 3,.@player_name$ ),getcharid( 0,.@player_name$ ) ) ){
  24. warp "SavePoint",0,0;
  25. message .@player_name$,"Position Reset";
  26. }else{
  27. .@player_name$ = escape_sql( .@player_name$ );
  28. query_sql( "UPDATE `char` SET `last_map`=`save_map`,`last_x`=`save_x`,`last_y`=`save_y` WHERE `name` LIKE '"+.@player_name$+"'" );
  29. }
  30. mes "Done";
  31. break;
  32. Case 2:
  33. mes "Insert IP Address.";
  34. input .@ip_address$;
  35. .@ip_address$ = escape_sql( .@ip_address$ );
  36. query_sql( "SELECT `account_id`,`userid`,`user_pass`,`sex`,`email`,`group_id`,`state`,`unban_time`,`logincount`,`lastlogin`,`last_ip`,`birthdate` FROM `login` WHERE `last_ip` LIKE '"+.@ip_address$+"' AND `account_id` >= 2000000 LIMIT 50",.@account_id,.@userid$,.@user_pass$,.@sex$,.@email$,.@group_id,.@state,.@unban_time,.@logincount,.@lastlogin$,.@last_ip$,.@birthdate$ );
  37. .@account_id_size = getarraysize( .@userid$ );
  38. mes "Found "+.@account_id_size+" account with IP of ^0055FF"+.@ip_address$+"^000000.";
  39. if( .@account_id_size ){
  40. do{
  41. next;
  42. .@i = select( implode( .@userid$,":" ) ) - 1;
  43. mes "^0055FFAID : ^777777"+.@account_id[.@i]+"^000000";
  44. mes "^0055FFUserID : ^777777"+.@userid$[.@i]+"^000000";
  45. // mes "^0055FFPassword : ^777777"+.@userid$[.@i]+"^000000";
  46. mes "^0055FFSex : ^777777"+.@sex$[.@i]+" ^0055FFGroup ID : ^777777"+.@group_id[.@i]+"^000000";
  47. mes "^0055FFEmail : ^777777"+.@email$[.@i]+"^000000";
  48. // mes "^0055FFState : ^777777"+.@state[.@i]+"^000000";
  49. if( .@unban_time[.@i] )
  50. mes "^0055FFUnban Time : ^777777"+.@unban_time[.@i]+"^000000";
  51. if( .@logincount[.@i] ){
  52. mes "^0055FFLogin Count : ^777777"+.@logincount[.@i]+"^000000";
  53. mes "^0055FFLast Login : ^777777"+.@lastlogin$[.@i]+"^000000";
  54. mes "^0055FFLast IP : ^777777"+.@last_ip$[.@i]+"^000000";
  55. }
  56. if( .@birthdate$[.@i] != "0000-00-00" )
  57. mes "^0055FFBirthdate : ^777777"+.@birthdate$[.@i]+"^000000";
  58. }while( select( "View Another","Close" ) == 1 );
  59. }
  60. break;
  61. Case 3:
  62. mes "Insert Item name.";
  63. do{
  64. input .@item_id,0,32767;
  65. if( !.@item_id ) close;
  66. }while( getitemname( .@item_id ) == "null" );
  67. if( .@item_id ){
  68. .@max_per_page = 30;
  69. setarray .@sql_table$[0],"inventory","cart_inventory","storage";
  70. .@search_type = select( "Search Inventory","Search Cart","Search Storage" );
  71. do{
  72. next;
  73. switch( .@search_type ){
  74. Case 1:
  75. Case 2:
  76. .@search_by$ = "char_id";
  77. query_sql( "SELECT DISTINCT(`char_id`) FROM `"+.@sql_table$[@menu-1]+"` WHERE `nameid`='"+.@item_id+"' LIMIT "+.@max_per_page+" OFFSET "+.@offset,.@id );
  78. break;
  79. Case 3:
  80. .@search_by$ = "account_id";
  81. query_sql( "SELECT DISTINCT(`account_id`) FROM `"+.@sql_table$[@menu-1]+"` WHERE `nameid`='"+.@item_id+"' LIMIT "+.@max_per_page+" OFFSET "+.@offset,.@id );
  82. default: break;
  83. }
  84. .@id_size = getarraysize( .@id );
  85. mes "Records No. : "+.@offset+" ~ "+( .@offset + .@max_per_page );
  86. mes "Found : "+.@id_size+" Records ^FF0000( "+getitemname( .@item_id )+" )^000000";
  87. for( .@i = 0; .@i < .@id_size; .@i++ ){
  88. .@total = 0;
  89. query_sql( "SELECT SUM(`amount`) FROM `"+.@sql_table$[@menu-1]+"` WHERE `nameid`='"+.@item_id+"' AND `"+.@search_by$+"`='"+.@id[.@i]+"' GROUP BY `"+.@search_by$+"`",.@amount );
  90. query_sql( "SELECT COUNT(`card0`) FROM `"+.@sql_table$[@menu-1]+"` WHERE `card0`='"+.@item_id+"' AND `"+.@search_by$+"`='"+.@id[.@i]+"' GROUP BY `"+.@search_by$+"`",.@card0 );
  91. query_sql( "SELECT COUNT(`card1`) FROM `"+.@sql_table$[@menu-1]+"` WHERE `card1`='"+.@item_id+"' AND `"+.@search_by$+"`='"+.@id[.@i]+"' GROUP BY `"+.@search_by$+"`",.@card1 );
  92. query_sql( "SELECT COUNT(`card2`) FROM `"+.@sql_table$[@menu-1]+"` WHERE `card2`='"+.@item_id+"' AND `"+.@search_by$+"`='"+.@id[.@i]+"' GROUP BY `"+.@search_by$+"`",.@card2 );
  93. query_sql( "SELECT COUNT(`card3`) FROM `"+.@sql_table$[@menu-1]+"` WHERE `card3`='"+.@item_id+"' AND `"+.@search_by$+"`='"+.@id[.@i]+"' GROUP BY `"+.@search_by$+"`",.@card3 );
  94. set .@total,.@total + ( .@amount + .@card0 + .@card1 + .@card2 + .@card3 );
  95. query_sql( "SELECT `name` FROM `char` WHERE `"+.@search_by$+"`='"+.@id[.@i]+"'",.@name$ );
  96. mes "^0055FF"+.@name$+" > ^777777"+.@total+" each^000000";
  97. }
  98. .@offset += .@max_per_page;
  99. deletearray .@id;
  100. }while( select( ( .@id_size < 1 )?"":"Next "+.@max_per_page+" Records.","Close" ) == 1 );
  101. }
  102. break;
  103. Case 4:
  104. mes "Insert Player name.";
  105. input .@player_name$;
  106. .@player_name$ = escape_sql( .@player_name$ );
  107. if( !query_sql( "SELECT `account_id`,`name` FROM `char` WHERE `name` LIKE '%"+.@player_name$+"%'",.@account_id,.@name$ ) ){
  108. mes "Not found.";
  109. }else{
  110. mes "Found "+getarraysize( .@name$ )+" Player with name of ^0055FF"+.@player_name$+"^000000.";
  111. do{
  112. next;
  113. .@i = select( implode( .@name$,":" ) ) - 1;
  114. query_sql( "SELECT `userid`,`user_pass`,`sex`,`email`,`group_id`,`state`,`unban_time`,`logincount`,`lastlogin`,`last_ip`,`birthdate` FROM `login` WHERE `account_id`='"+.@account_id[.@i]+"' LIMIT 1",.@userid$,.@user_pass$,.@sex$,.@email$,.@group_id,.@state,.@unban_time,.@logincount,.@lastlogin$,.@last_ip$,.@birthdate$ );
  115. if( getarraysize( .@userid$ ) ){
  116.  
  117. mes "^0055FFAID : ^777777"+.@account_id[.@i]+"^000000";
  118. mes "^0055FFUserID : ^777777"+.@userid$[.@i]+"^000000";
  119. // mes "^0055FFPassword : ^777777"+.@userid$[.@i]+"^000000";
  120. mes "^0055FFSex : ^777777"+.@sex$[.@i]+" ^0055FFGroup ID : ^777777"+.@group_id[.@i]+"^000000";
  121. mes "^0055FFEmail : ^777777"+.@email$[.@i]+"^000000";
  122. // mes "^0055FFState : ^777777"+.@state[.@i]+"^000000";
  123. if( .@unban_time[.@i] )
  124. mes "^0055FFUnban Time : ^777777"+.@unban_time[.@i]+"^000000";
  125. if( .@logincount[.@i] ){
  126. mes "^0055FFLogin Count : ^777777"+.@logincount[.@i]+"^000000";
  127. mes "^0055FFLast Login : ^777777"+.@lastlogin$[.@i]+"^000000";
  128. mes "^0055FFLast IP : ^777777"+.@last_ip$[.@i]+"^000000";
  129. }
  130. if( .@birthdate$[.@i] != "0000-00-00" )
  131. mes "^0055FFBirthdate : ^777777"+.@birthdate$[.@i]+"^000000";
  132. }
  133. }while( select( "View Another","Close" ) == 1 );
  134. }
  135. break;
  136. Case 5:
  137. mes "Insert Player name.";
  138. input .@player_name$;
  139. .@player_name$ = escape_sql( .@player_name$ );
  140. .@i = query_logsql("SELECT `char_name` FROM `atcommandlog` WHERE `char_name` LIKE '"+.@player_name$+"' LIMIT 1",.@charname$ );
  141. if( !.@i ){
  142. mes "No Record found for player named ^FF0000"+.@player_name$+"^000000.";
  143. }else{
  144. if( select( "Search Command","List All" ) == 1 ){
  145. mes "Input the @Command.";
  146. input .@search$;
  147. }
  148. .@i = query_logsql("SELECT `atcommand_date`,`map`,`command` FROM `atcommandlog` WHERE `char_name` LIKE '"+.@player_name$+"' "+( ( .@search$ == "" )?"":" AND `command` LIKE '%"+.@search$+"%'" )+" ORDER BY `atcommand_date` DESC LIMIT 127",.@date$,.@map$,.@command$ );
  149. if( !.@i ){
  150. mes "No Record found";
  151. }else{
  152. next;
  153. mes "Player : ^0055FF"+.@player_name$+"^000000";
  154. if( .@search$ != "" ) mes "Command : ^0055FF"+.@search$+"^000000";
  155. .@size = getarraysize( .@date$ );
  156. for( .@i = 0; .@i < .@size; .@i++ ){
  157. mes "^FF0000["+.@date$[.@i]+"] ^0055FF"+.@map$[.@i]+"^000000";
  158. mes " > "+.@command$[.@i];
  159. }
  160. }
  161. }
  162. default: break;
  163. }
  164. close;
  165. }
  166. }
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!