VodkaMartini
1 SMP
Script :: AntiBot Bergambar Version 1.4
by VodkaMartini
NYIT-NYIT CODE
Gambar + SFX : (di config bisa enable/disable SFX) bug lapor saja...
Download
Update:
= Add copyright
= Penyempurnaan system
= Penggantian bahasa.
Known Bug:
= Kurang Spasi pada bagian "@ban 30mn "+strcharinfo(0)+""; [Fixed]
= Unfreeze Error [Fixed - Uncomplete]
= UnFreeze [Fixed]
Next Plan:
= Available in any map not only login + Jail NPC.
Note:
tolong copyright jangan di remove.
by VodkaMartini
NYIT-NYIT CODE
Kode:
//===== eAthena Script =======================================
//= AntiBot with Picture
//===== By: ==================================================
//= VodkaMartini
//===== Current Version: =====================================
//= 1.4
//===== Compatible With: =====================================
//= eAthena TXT & SQL (Revision 12k+)
//===== Description: =========================================
//= Antibot with Picture pops when Login.
//===== Additional Comments: =================================
//= 1.4 Removed Copyright script SFX due to not working. [VodkaMartini]
//= 1.3 Changed script lang & structure
//= Added sound effect for copyright script
//= Changed some variables and names [VodkaMartini]
//= 1.2 Fixed, Unfreeze Error [VodkaMartini]
//= 1.1 Pre-Test Bug Fix Unfreeze Error [VodkaMartini]
//= 1.01 Bug Fix typo & Add Copyright Announcer [VodkaMartini]
//= 1.0 First Version Open Beta [VodkaMartini]
//============================================================
//------------------------------------------ Police AntiBot Part ---------------------------------------
- script AntiBot -1,{
OnPCLoginEvent:
set $@sound,1; // Enable SFX = 1 - Disable SFX = 0
set chance,0; // Don't change this part
set msgchance,3; // Chance to answer (default = 3)
set @Number,rand(100,999);
set @DIG1, @Number / 100;
set @DIG2, (@Number - (@DIG1 * 100)) / 10;
set @DIG3, @Number - (@DIG1 * 100) - (@DIG2 * 10);
goto start;
start:
set @Cutin$,"mets_alpha.bmp"; //Cutin Fat Guy.
set $npcname$,"[^FF0000AntiBot Police^000000]"; //NPC Name
cutin @Cutin$,2;
if ($@sound == 1) soundeffect "siren2.wav",0;
mes ""+$npcname$+"";
mes "Sorry for disturbing you...";
sc_start SC_FREEZE,60000000,10;
next;
mes ""+$npcname$+"";
mes "Please insert these number, you have "+msgchance+" chances.";
next;
cutin "bkd" + @DIG1 + ".bmp",0;next;
cutin "bkd" + @DIG2 + ".bmp",1;next;
cutin "bkd" + @DIG3 + ".bmp",2;next;
input @Num;
if (@Num != @Number) goto ex_false;
if (@Num == @Number) goto play;
ex_false:
set @Number,rand(100,999);
set @DIG1, @Number / 100;
set @DIG2, (@Number - (@DIG1 * 100)) / 10;
set @DIG3, @Number - (@DIG1 * 100) - (@DIG2 * 10);
set chance,chance+1;
set msgchance,msgchance-1;
if (chance == 3) goto jail;
mes ""+$npcname$+"";
mes "You have "+msgchance+" more chance(s) left.";
next;
cutin "bkd" + @DIG1 + ".bmp",0;next;
cutin "bkd" + @DIG2 + ".bmp",1;next;
cutin "bkd" + @DIG3 + ".bmp",2;next;
input @Num;
if (@Num != @Number) goto ex_false;
if (@Num == @Number) goto play;
play:
mes ""+$npcname$+"";
mes "Okay, you inserted the right number!";
mes "Enjoy your time here.";
sc_end SC_FREEZE;
atcommand "@refresh";
close;
jail:
if ($@sound == 1) soundeffect "arm2.wav",0;
mes ""+$npcname$+"";
mes "You are arrested because";
mes "you can't answer the number given.";
//ban for 30 min (mn = min, h = hour, d = day.)
atcommand strcharinfo(0) + "@ban 30mn "+strcharinfo(0)+"";
//uncomment this part for permanent put it on jail.
//atcommand "@jail "+strcharinfo(0)+"";
announce ""+strcharinfo(0)+" Has Been Banned For 30 Mins For Using Illegal Programme!",bc_all,0xFF0000;
end;
}
//------------------- Copyright Script -----------------
//= Don't Remove This is Copyright part.
//------------------------------------------------------
- script Announcer -1,{
OnMinute00:
announce "Powered by VodkaMartini's AntiBot. Copyright 2008. All Rights Reserved.",bc_blue|bc_all;
end;
OnMinute01:
announce "If you like this AntiBot, get it @ www.nyit-nyit.net - Ragnarok Emulator Section.",bc_blue|bc_all;
end;
}Download
Update:
= Add copyright
= Penyempurnaan system
= Penggantian bahasa.
Known Bug:
= Kurang Spasi pada bagian "@ban 30mn "+strcharinfo(0)+""; [Fixed]
= Unfreeze Error [Fixed - Uncomplete]
= UnFreeze [Fixed]
Next Plan:
= Available in any map not only login + Jail NPC.
Note:
tolong copyright jangan di remove.
Last edited by a moderator:
