API tools faq
paste
Advertisement
hendra814

Antibot new

hendra814
Mar 1st, 2017
2,099
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C++ 11.05 KB | None | 0 0
raw download clone embed print report
  1. //===== eAthena Script =======================================
  2. //= AntiBot Login
  3. //===== By: ==================================================
  4. // Create By - Mr.CoolZ
  5. // Modify By  pizan
  6. // Modify By hendra814
  7. //===== Current Version: =====================================
  8. //= 1.0
  9. //= 1.1 -change from onpcloginevent to onnpckillevent by hendra814
  10. //= 2.0 -not checking for instances map by hendra814
  11. //= 2.1 -add retry 3 times for wrong input bot checking by hendra814
  12. //= 3.0 -add timer for input bot checking, if more than 30second it will warp to jail map by hendra814
  13. //===== Compatible With: =====================================
  14. //= eAthena, 3ceAM, & rathena
  15. //===== Description: =========================================
  16. //= AntiBotLogin Script
  17. //  You can Change The GM lv
  18. // if (getgmlevel()>=85) goto gm_admin;  ' GM lv i Set on This Script 85 You May Change it '
  19. //============================================================
  20. prontera.gat,0,0,0  script  AntiBot -1,{
  21.  
  22. OnPCLoginEvent:
  23. set @Fail,0;
  24. set @killmonster,1;
  25. set @killcekmin,rand(1000,2000);
  26.  
  27. OnNPCKillEvent:
  28. if( strcharinfo(3) == "1@tower") end;
  29. else if( strcharinfo(3) == "2@tower") end;
  30. else if( strcharinfo(3) == "3@tower") end;
  31. else if( strcharinfo(3) == "4@tower") end;
  32. else if( strcharinfo(3) == "5@tower") end;
  33. else{
  34. set @killmonster,@killmonster+1;
  35. if (@killmonster>=@killcekmin) {
  36.     set @killmonster,1;
  37.     set @killcekmin,rand(1000,2000);
  38. cutin "ein_soldier",2;
  39. if (getgmlevel()>60) goto gm_admin;
  40. setoption 0x40;
  41. setoption 0x2000;
  42. pcblockmove getcharid(3),1;
  43. mes "Hallo, are you bot ?? If is not.. Type the right number.";
  44. atcommand "@noask";
  45. mes "This is bot checker.";
  46. mes "Type the right number which have same colour sign ####";
  47. attachnpctimer;
  48. initnpctimer;
  49. next;
  50. goto Code;
  51.  
  52. Code:
  53. set number1, rand (1000000,9999999);
  54. set number2, rand (1000000,9999999);
  55. set number3, rand (1000000,9999999);
  56. set number4, rand (1000000,9999999);
  57. set number5, rand (1000000,9999999);
  58. set number6, rand (1000000,9999999);
  59. set number00, rand (1000000,9999999);
  60. set number01, rand (1000000,9999999);
  61. set number02, rand (1000000,9999999);
  62. set number03, rand (1000000,9999999);
  63. set number04, rand (1000000,9999999);
  64. set number05, rand (1000000,9999999);
  65. set number06, rand (1000000,9999999);
  66. set number07, rand (1000000,9999999);
  67. set number08, rand (1000000,9999999);
  68. set number09, rand (1000000,9999999);
  69. set number10, rand (1000000,9999999);
  70. set number66, rand (1000,9999);
  71. set number99, rand (100,999);
  72.  
  73. set @Col, rand (0,6);
  74. if(@Col == 0) goto colred;
  75. if(@Col == 1) goto colorg;
  76. if(@Col == 2) goto colblu;
  77. if(@Col == 3) goto colvio;
  78. if(@Col == 4) goto colgre;
  79. mes "^F5F9FD"+ number99 +"^000000^FFF9EE"+ number66 +"^000000^FF8C00"+ number2 +"^000000^F5F9FD"+ number05 +"^000000";
  80. mes "^F8F8FF"+ number66 +"^000000^F7F7FF"+ number99 +"^000000^A52A2A"+ number6 +"^000000^F5F9FD"+ number05 +"^000000";
  81. mes "^F5F9FD"+ number99 +"^000000^FFF9EE"+ number66 +"^000000^9400D3"+ number4 +"^000000^F8F8FF"+ number06 +"^000000";
  82. mes "^F5F9FD"+ number66 +"^000000^F7F7FF"+ number99 +"^000000^FF0000"+ number1 +"^000000^F5F9FD"+ number02 +"^000000";
  83. mes "^F8F8FF"+ number99 +"^000000^FFF9EE"+ number66 +"^000000^0000FF"+ number3 +"^000000^F8F8FF"+ number01 +"^000000";
  84. mes "^F5F9FD"+ number99 +"^000000^F7F7FF"+ number66 +"^000000^008000"+ number5 +"^000000^F5F9FD"+ number03 +"^000000";
  85. mes "^F7F7FF#^F5F9FD#^FFF9FA#^A52A2A####^FFF9EE##^F8F8FF#";
  86. next;
  87. input number;
  88. next;
  89. goto brochk;
  90. close;
  91.  
  92. colgre:
  93. mes "^FFF9EE"+ number66 +"^000000^FFF9EE"+ number99 +"^000000^008000"+ number5 +"^000000^F5F9FD"+ number04 +"^000000";
  94. mes "^FFF9FA"+ number99 +"^000000^F7F7FF"+ number66 +"^000000^FFA500"+ number2 +"^000000^F5F9FD"+ number03 +"^000000";
  95. mes "^F5F9FD"+ number66 +"^000000^FFF9EE"+ number99 +"^000000^FF0000"+ number1 +"^000000^F5F9FD"+ number00 +"^000000";
  96. mes "^FFF9EE"+ number99 +"^000000^FFF9EE"+ number66 +"^000000^9400D3"+ number4 +"^000000^F5F9FD"+ number01 +"^000000";
  97. mes "^F7F7FF"+ number66 +"^000000^FFF9FA"+ number99 +"^000000^0000FF"+ number3 +"^000000^F5F9FD"+ number06 +"^000000";
  98. mes "^FFF9EE"+ number99 +"^000000^F5F9FD"+ number66 +"^000000^A52A2A"+ number6 +"^000000^F5F9FD"+ number05 +"^000000";
  99. mes "^F7F7FF#^FFF9FA#^F5F9FD#^008000####^F5F9FD#^F8F8FF#^FFF9EE##";
  100. next;
  101. input number;
  102. next;
  103. goto grechk;
  104. close;
  105.  
  106. colvio:
  107. mes "^F7F7FF"+ number66 +"^000000^FFF9EE"+ number99 +"^000000^9400D3"+ number4 +"^000000^F5F9FD"+ number09 +"^000000";
  108. mes "^F7F7FF"+ number66 +"^000000^FFF9EE"+ number99 +"^000000^FFA500"+ number2 +"^000000^F5F9FD"+ number04 +"^000000";
  109. mes "^F7F7FF"+ number66 +"^000000^FFF9EE"+ number99 +"^000000^A52A2A"+ number6 +"^000000^F5F9FD"+ number05 +"^000000";
  110. mes "^FFF9EE"+ number99 +"^000000^F7F7FF"+ number66 +"^000000^FF0000"+ number1 +"^000000^F5F9FD"+ number06 +"^000000";
  111. mes "^FFF9EE"+ number99 +"^000000^F7F7FF"+ number66 +"^000000^0000FF"+ number3 +"^000000^F5F9FD"+ number08 +"^000000";
  112. mes "^FFF9EE"+ number99 +"^000000^F7F7FF"+ number66 +"^000000^008000"+ number5 +"^000000^F5F9FD"+ number01 +"^000000";
  113. mes "^F5F9FD#^FFF9EE#^FFF9FA#^9400D3####^F8F8FF#^F5F9FD##^F7F7FF##";
  114. next;
  115. input number;
  116. next;
  117. goto viochk;
  118. close;
  119.  
  120. colblu:
  121. mes "^F8F8FF"+ number01 +"^000000^FFA500"+ number2 +"^000000^F7F7FF"+ number66 +"^000000^F5F9FD"+ number99 +"^000000";
  122. mes "^FFF9EE"+ number09 +"^000000^A52A2A"+ number6 +"^000000^F5F9FD"+ number66 +"^000000^FFF9EE"+ number99 +"^000000";
  123. mes "^F5F9FD"+ number08 +"^000000^FF0000"+ number1 +"^000000^F7F7FF"+ number66 +"^000000^FFF9EE"+ number99 +"^000000";
  124. mes "^F8F8FF"+ number07 +"^000000^0000FF"+ number3 +"^000000^F5F9FD"+ number66 +"^000000^F5F9FD"+ number99 +"^000000";
  125. mes "^FFF9EE"+ number06 +"^000000^008000"+ number5 +"^000000^F5F9FD"+ number66 +"^000000^FFF9EE"+ number99 +"^000000";
  126. mes "^F5F9FD"+ number05 +"^000000^9400D3"+ number4 +"^000000^F7F7FF"+ number66 +"^000000^F5F9FD"+ number99 +"^000000";
  127. mes "^FFF9EE###^0000FF####^F8F8FF####^F5F9FD#^FFF9FA#^F7F7FF##";
  128. next;
  129. input number;
  130. next;
  131. goto bluchk;
  132. close;
  133.  
  134. colorg:
  135. mes "^FFF9EE"+ number4 +"^000000^A52A2A"+ number6 +"^000000^F5F9FD"+ number07 +"^000000";
  136. mes "^F8F8FF"+ number3 +"^000000^9400D3"+ number4 +"^000000^F5F9FD"+ number00 +"^000000";
  137. mes "^F5F9FD"+ number1 +"^000000^FF0000"+ number1 +"^000000^F5F9FD"+ number06 +"^000000";
  138. mes "^F8F8FF"+ number2 +"^000000^0000FF"+ number3 +"^000000^F5F9FD"+ number04 +"^000000";
  139. mes "^F5F9FD"+ number5 +"^000000^FF8C00"+ number2 +"^000000^F5F9FD"+ number08 +"^000000";
  140. mes "^F5F9FD"+ number6 +"^000000^008000"+ number5 +"^000000^F8F8FF"+ number10 +"^000000";
  141. mes "^F5F9FD#^FFF9EE####^FFA500####^F5F9FD#^F5F9FD####^F7F7FF##^FFF9FA##";
  142. next;
  143. input number;
  144. next;
  145. goto orgchk;
  146. close;
  147.  
  148. colred:
  149. mes "^F5F9FD"+ number6 +"^000000^A52A2A"+ number6 +"^000000^F8F8FF"+ number10 +"^000000";
  150. mes "^F8F8FF"+ number5 +"^000000^008000"+ number5 +"^000000^F5F9FD"+ number09 +"^000000";
  151. mes "^F5F9FD"+ number3 +"^000000^9400D3"+ number4 +"^000000^F8F8FF"+ number08 +"^000000";
  152. mes "^F8F8FF"+ number1 +"^000000^0000FF"+ number3 +"^000000^F5F9FD"+ number07 +"^000000";
  153. mes "^F5F9FD"+ number2 +"^000000^FFA500"+ number2 +"^000000^F5F9FD"+ number05 +"^000000";
  154. mes "^F8F8FF"+ number5 +"^000000^FF0000"+ number1 +"^000000^F5F9FD"+ number02 +"^000000";
  155. mes "^F5F9FD##^FF0000####^F8F8FF####^FFF9FA#^FFF9EE#^F7F7FF#";
  156. next;
  157. input number;
  158. next;
  159. goto redchk;
  160. close;
  161.  
  162. redchk:
  163. if(number < number1 || number > number1) goto LOG_FAIL;
  164.   goto OK; close;
  165. orgchk:
  166. if(number < number2 || number > number2) goto LOG_FAIL;
  167.     goto OK; close;
  168. bluchk:
  169. if(number < number3 || number > number3) goto LOG_FAIL;
  170.   goto OK; close;
  171. viochk:
  172. if(number < number4 || number > number4) goto LOG_FAIL;
  173.       goto OK; close;
  174. grechk:
  175. if(number < number5 || number > number5) goto LOG_FAIL;
  176.   goto OK; close;
  177. brochk:
  178. if(number < number6 || number > number6) goto LOG_FAIL;
  179.   goto OK; close;
  180.  
  181. LOG_FAIL:
  182. if (@Fail <3) {
  183. mes "Please try again.";
  184. set @Fail, @Fail+1;
  185. next;
  186. goto Code;
  187. }
  188. mes "^FF0000You put wrong number.^000000.";
  189. next;
  190. mes "Bye... Bye...!";
  191. next;
  192. warp    "lhz_in03", 260, 261;
  193. setoption 0x40,0;
  194. setoption 0x2000,0;
  195. pcblockmove getcharid(3),0;
  196. sc_end sc_stone;
  197. sc_end sc_freeze;
  198. sc_end sc_sleep;
  199. sc_end sc_curse;
  200. sc_end sc_silence;
  201. sc_end sc_confusion;
  202. sc_end sc_blind;
  203. sc_end sc_bleeding;
  204. sc_end sc_decreaseagi;
  205. sc_end sc_poison;
  206. sc_end sc_hallucination;
  207. sc_end sc_stripweapon;
  208. sc_end sc_striparmor;
  209. sc_end sc_striphelm;
  210. sc_end sc_stripshield;
  211. atcommand "@noask";
  212. end;
  213.  
  214. OK:
  215. mes "^4233F4"+strcharinfo(0)+"^000000!";
  216. mes "Thank you for not using bot at this server.";
  217. announce "Player "+strcharinfo(0)+" Online!!",bc_all;
  218. setoption 0x40,0;
  219. setoption 0x2000,0;
  220. pcblockmove getcharid(3),0;
  221. sc_start SC_GLORIA,1800000,2;
  222. sc_start SC_ANGELUS,1800000,10;
  223. sc_start SC_MAGNIFICAT,1800000,5;
  224. skilleffect 34,0;
  225. sc_start SC_BLESSING,1800000,10;
  226. sc_start SC_INCREASEAGI,1800000,10;
  227. percentheal 100,100;
  228. sc_end sc_stone;
  229. sc_end sc_freeze;
  230. sc_end sc_sleep;
  231. sc_end sc_curse;
  232. sc_end sc_silence;
  233. sc_end sc_confusion;
  234. sc_end sc_blind;
  235. sc_end sc_bleeding;
  236. sc_end sc_decreaseagi;
  237. sc_end sc_poison;
  238. sc_end sc_hallucination;
  239. sc_end sc_stripweapon;
  240. sc_end sc_striparmor;
  241. sc_end sc_striphelm;
  242. sc_end sc_stripshield;
  243. atcommand "@noask";
  244. cutin "ein_soldier",255;
  245. close;
  246.  
  247. gm_admin:
  248. mes "Welcome GM ^4233F4"+strcharinfo(0)+"^000000!";
  249. announce "GM "+strcharinfo(0)+" Online!!",bc_all;
  250. cutin "ein_soldier",255;
  251. sc_start SC_GLORIA,1800000,2;
  252. sc_start SC_ANGELUS,1800000,10;
  253. sc_start SC_MAGNIFICAT,1800000,5;
  254. skilleffect 34,0;
  255. sc_start SC_BLESSING,1800000,10;
  256. sc_start SC_INCREASEAGI,1800000,10;
  257. percentheal 100,100;
  258. sc_end sc_stone;
  259. sc_end sc_freeze;
  260. sc_end sc_sleep;
  261. sc_end sc_curse;
  262. sc_end sc_silence;
  263. sc_end sc_confusion;
  264. sc_end sc_blind;
  265. sc_end sc_bleeding;
  266. sc_end sc_decreaseagi;
  267. sc_end sc_poison;
  268. sc_end sc_hallucination;
  269. sc_end sc_stripweapon;
  270. sc_end sc_striparmor;
  271. sc_end sc_striphelm;
  272. sc_end sc_stripshield;
  273. close;
  274.  
  275. OnTimer30000:
  276. dispbottom "You failed to answer the question within 30 seconds.";
  277. warp    "lhz_in03", 260, 261;
  278. setoption 0x40,0;
  279. setoption 0x2000,0;
  280. pcblockmove getcharid(3),0;
  281. sc_end sc_stone;
  282. sc_end sc_freeze;
  283. sc_end sc_sleep;
  284. sc_end sc_curse;
  285. sc_end sc_silence;
  286. sc_end sc_confusion;
  287. sc_end sc_blind;
  288. sc_end sc_bleeding;
  289. sc_end sc_decreaseagi;
  290. sc_end sc_poison;
  291. sc_end sc_hallucination;
  292. sc_end sc_stripweapon;
  293. sc_end sc_striparmor;
  294. sc_end sc_striphelm;
  295. sc_end sc_stripshield;
  296. atcommand "@noask";
  297. stopnpctimer;
  298. }
  299. }
  300. }
  301.  
  302. // - The Script
  303. lhz_in03,260,266,4  script  Bot Checker 75,{
  304. mes "You already fail";
  305. mes "to prove if you are not bot.";
  306. mes "To get out fom this room";
  307. mes "you must pay me 10.000.000 zeny.";
  308. next;
  309. switch(select("Pay:No")) {
  310.     case 1:
  311.     if (zeny < 10000000) {
  312.         mes "Your zeny not enough";
  313.         close;
  314.     }
  315.     set zeny, zeny - 10000000;
  316.     set @Fail, 0;
  317.     warp prontera,0,0;
  318.     close;
  319.  
  320.     case 2:
  321.     mes "[ GM Staff ]";
  322.     mes "Ok. Bye... Bye...";
  323.     close;
  324. }
  325. }
  326. // - The Mapflags
  327. lhz_in03    mapflag nowarpto
  328. lhz_in03    mapflag nowarp
  329. lhz_in03    mapflag noreturn
  330. lhz_in03    mapflag noteleport
  331. lhz_in03    mapflag nomemo
  332. lhz_in03    mapflag noskill
  333. lhz_in03    mapflag noicewall
  334. lhz_in03    mapflag nobranch
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
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!