# (Share) Script for eAthena

Sumber: https://nyit-nyit.net/threads/share-script-for-eathena.37488/
Forum: Ragnarok (RO) Emulator
Dibuat: 2007-02-28 oleh ferry_gukguk
Balasan: 24, dilihat: 26182

## Post pertama

Share disini script yang kamu punya..

Dilarang tanya-jawab pada thread ini, jika Anda melakukannya, Warning menanti anda..

Merged !

**Script :: NPC Buffer**

Posted by ChengFei
28 Feb 2007, 06:28 PM

Nich2 gua bagi2 pengalaman gua soalnya gua punya PS sendiri buat temen2 sekolah sendiri gitu.. jadinya maennya sama temen2 sendiri

nich gua kasih paket aja ye.. ada assump dan laen2

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>prontera.gat,155,186,5 script Healer#h1-1::Healer 742,{

percentheal 100,10;
skilleffect 29,0;
sc_start SC_INCREASEAGI,2400000,10;
skilleffect 34,0;
sc_start SC_BLESSING,2400000,10;
skilleffect 66,0;
sc_start SC_IMPOSITIO ,2400000,10;
skilleffect 361,0;
sc_start SC_ASSUMPTIO,2400000,10;
}

morocc.gat,159,96,5 duplicate(Healer) Healer#h1-2 742
ayothaya.gat,155,111,5 duplicate(Healer) Healer#h1-3 742
geffen.gat,121,61,5 duplicate(Healer) Healer#h1-4 742
umbala.gat,94,162,5 duplicate(Healer) Healer#h1-5 742
payon.gat,180,105,5 duplicate(Healer) Healer#h1-6 742
alberta.gat,185,144,5 duplicate(Healer) Healer#h1-7 742
aldebaran.gat,134,123,5 duplicate(Healer) Healer#h1-8 742
izlude.gat,125,118,5 duplicate(Healer) Healer#h1-9 742
xmas.gat,149,136,5 duplicate(Healer) Healer#h1-10 742
comodo.gat,188,162,5 duplicate(Healer) Healer#h1-11 742
amatsu.gat,200,80,5 duplicate(Healer) Healer#h1-12 742
gonryun.gat,164,130,5 duplicate(Healer) Healer#h1-13 742
yuno.gat,152,186,5 duplicate(Healer) Healer#h1-14 742
niflheim.gat,188,180,5 duplicate(Healer) Healer#h1-15 742
louyang.gat,225,103,5 duplicate(Healer) Healer#h1-16 742
pvp_y_8-2,126,117,5 duplicate(Healer) Healer#h1-16 742</div>

copy aja di notepad yang di custom terus heal.txt paste semua di situ. ( otomatis click langsung paket tanpa bicara apapun )

## Balasan

### kuro, 2007-02-28

**Script :: NPC Healer**

```
prontera.gat,161,181,4 script Buffer 821,{
set @effect, 1; 
set @heal, 1; 

sc_start 32, 240000, 10; // Increase Agi
sc_start 30, 240000, 10; // Blessing

if(@effect == 1) skilleffect 29,0; // Increase Agi
if(@effect == 1) skilleffect 34,0; // Blessing

if(@heal == 1) percentheal 100,100;
}
```

### charles789, 2007-02-28

**Script :: NPC Special Helper**

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>
prontera.gat,145,186,4 script Special Helper 864,{
set $prices,10000;
mes "[Special Helper]";
mes "Hello there. Do you need help?";
mes "Need Help to clone yourself or to summon monster to assist you?";
next;
mes "[Valhalla RO Special Helper]";
mes "Please choose one of this two option. Choose wisely.";
mes "You only allowed to choose one of this two options:";
next;
set @helper,select("Slave Clone Option","Summon Option","Quit");
switch(@helper)
{
case 1: callfunc "Slave Clone";
break;
case 2: callfunc "Summon Option";
break;
case 3: close;
}
}
function script Slave Clone {
set $@play$,strcharinfo(0);
mes "[Special Helper]";
if(zeny < $prices){
mes "You don't have enough zeny to pay for my service";
mes "You need at least ^ff0000"+$prices+"^000000 for this service.";
close;
}else if(@clone ==1){
mes "[Special Helper]";
mes "You only allowed to have this clone once until you log off";
emotion 4;
close;
}else if(@summon==1){
mes "[Special Helper]";
mes "I already told you, you only allowed to choose one of the two options";
emotion 4;
close;
}else{
set zeny,zeny - $prices;
atcommand strcharinfo(0)+":@slaveclone "+$@play$+"";
emotion 21;
set @clone,1;
close;
}
}
function script Summon Option {
if(zeny <$prices){
mes "You don't have enough zeny to pay for my service";
mes "You need at least ^ff0000"+$prices+"^000000 for this service.";
emotion 4;
close;
}else if(@summon ==1){
mes "[Special Helper]";
mes "You are not allowed to summon twice.";
emotion 4;
close;
}else if(@clone ==1){
mes "[Special Helper]";
mes "I already told you, you only allowed to choose one of the two options";
emotion 4;
close;
}else{
callfunc "Summon Now Lol";

}
}
function script Summon Now Lol {
mes "[Special Helper]";
mes "Please input monsters name or id you desire me to summon for you";
mes "Choose wisely";
input @summon$;
if(@summon$ == "1708"){
callfunc "Cannot Summon";
}else if(@summon$ == "Thanatos"){
callfunc "Cannot Summon";
}else if(@summon$ == "THANATOS"){
callfunc "Cannot Summon";
}else if(@summon$ == "thanatos"){
callfunc "Cannot Summon";
}else{
atcommand strcharinfo(0)+":@summon "+@summon$+"";
set zeny,zeny - $prices;
emotion 21;
set @summon,1;
close;
}
}
function script Cannot Summon {
mes "[Special Helper]";
mes "You cannot summon this kind of monster";
close;
}
</div>

### VodkaMartini, 2007-05-23

**Script :: NPC Baby JobChanger**

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>
//=====eAthena Script===============================
// Baby Jobchanger
//=====By======================================
// Leviathin
//=====Current Version==============================
// 1.0
//=====Compatible With:==============================
// eAthena Version SVN-R1968 and up
//=====Description=================================
// Fully working Compact Baby jobchanger rather than 3 NPC's.
//=====Additional Comments:===========================
// I like Pie?
//=============================================
// 
ayothaya.gat,144,113,5 script Baby Jobchanger 116,{
set @npcname$,"[ ^CC00CCBaby Jobchanger^000000 ]";
if (class == 4023) goto L_Acceptable;
if (Class == 4024) goto L_Acceptable;
if (class == 4025) goto L_Acceptable;
if (class == 4026) goto L_Acceptable;
if (class == 4027) goto L_Acceptable;
if (class == 4028) goto L_Acceptable;
if (class == 4029) goto L_Acceptable;
if (class == 4030) goto L_Acceptable;
if (class == 4031) goto L_Acceptable;
if (class == 4032) goto L_Acceptable;
if (class == 4033) goto L_Acceptable;
if (class == 4034) goto L_Acceptable;
if (class == 4035) goto L_Acceptable;
if (class == 4036) goto L_Acceptable;
if (class == 4037) goto L_Acceptable;
if (class == 4038) goto L_Acceptable;
if (class == 4039) goto L_Acceptable;
if (class == 4040) goto L_Acceptable;
if (class == 4041) goto L_Acceptable;
if (class == 4042) goto L_Acceptable;
if (class == 4043) goto L_Acceptable;
if (class == 4044) goto L_Acceptable;
if (class == 4045) goto L_Acceptable;
if (Class == 0) goto L_WantBabyNovice;
mes @npcname$;
mes "I'm sorry but I cannot assist you, you.. you... Big Olf!";
close;
L_WantBabyNovice:
mes @npcname$;
mes "Hello " +strcharinfo(0)+ ", would you like to become a baby novice?";
next;
menu "Yes",L_ConfirmJlvl,"No Thanks",L_Decline;
close;

L_ConfirmJlvl:
if (JobLevel < 10) goto L_LackJlevel;
jobchange 4023;
mes @npcname$;
mes "Okay! Congratulations " +strcharinfo(0)+ ", you are now a Baby Novice!";
//get main gauche
close;

L_SuperBaby:
if (JobLevel < 10) goto L_LackJlevel;
jobchange 4045;
mes @npcname$;
mes "Okay! Congratulations " +strcharinfo(0)+ ", you are now a Super Baby!";
//get Main gauche
close;

L_LackJlevel:
mes @npcname$;
mes "I'm sorry, but the value of your job level is insufficient sweetheart.";
close;

L_Acceptable:
if (class == 4023) goto L_Job1;
if (Class == 4024) goto L_Job2;
if (Class == 4025) goto L_Job2;
if (Class == 4026) goto L_Job2;
if (Class == 4027) goto L_Job2;
if (Class == 4028) goto L_Job2;
if (Class == 4029) goto L_Job2;
if (Class == 4030) goto L_Job3;
if (Class == 4031) goto L_Job3;
if (Class == 4032) goto L_Job3;
if (Class == 4033) goto L_Job3;
if (Class == 4034) goto L_Job3;
if (Class == 4035) goto L_Job3;
if (Class == 4036) goto L_Job3;
if (Class == 4037) goto L_Job3;
if (Class == 4038) goto L_Job3;
if (Class == 4039) goto L_Job3;
if (Class == 4040) goto L_Job3;
if (Class == 4041) goto L_Job3;
if (Class == 4042) goto L_Job3;
if (Class == 4043) goto L_Job3;
if (Class == 4044) goto L_Job3;
if (Class == 4045) goto L_Job3;

L_Job1:
mes @npcname$;
mes "Hello " +strcharinfo(0)+ ".";
next;
mes @npcname$;
mes "Would you like to change into First Class Baby?";
next;
menu "Yes",L_FirstC,"Cancel",L_Cancel;
close;
L_FirstC:
menu "Baby Swordsman",L_BabyS,
"Baby Mage",L_BabyM,
"Baby Archer",L_BabyArch,
"Baby Acolyte",L_BabyAco,
"Baby Merchant",L_BabyMerch,
"Baby Thief",L_BabyThief,
"Super Baby!",L_SuperBaby;
close;
L_BabyS:
if (JobLevel < 10) goto L_LackJlevel;
jobchange 4024;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Swordsman!";
close;

L_BabyM:
if (JobLevel < 10) goto L_LackJlevel;
jobchange 4025;
mes #npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Mage!";
close;

L_BabyArch:
if (JobLevel < 10) goto L_LackJlevel;
jobchange 4026;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Archer!";
close;

L_BabyAco:
if (JobLevel < 10) goto L_LackJlevel;
jobchange 4027;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Acolyte!";
close;

L_BabyMerch:
if (JobLevel < 10) goto L_LackJlevel;
jobchange 4028;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Merchant!";
close;

L_BabyThief:
if (JobLevel < 10) goto L_LackJlevel;
jobchange 4029;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Thief!";
close;

L_Job2:
mes @npcname$;
mes "Hello " +strcharinfo(0)+ ".";
next;
mes @npcname$;
mes "Would you like to change into Second Class Baby?";
next;
menu "Yes",L_SecondC,"Cancel",L_Cancel;
close;
L_SecondC:
if (Class == 4024) goto L_BabyKnight;
if (Class == 4025) goto L_BabyMagician;
if (Class == 4026) goto L_BabyHunter;
if (Class == 4027) goto L_BabyAcoChoice;
if (Class == 4028) goto L_BabyMerchChoice;
if (Class == 4029) goto L_BabySinStalk;
//
L_BabyKnight:
if (JobLevel < 40) goto L_LackJlevel;
mes @npcname$;
mes "I see that you are a Baby Swordsman...";
next;
mes @npcname$;
mes "Would you like to turn into a Baby Knight, or Crusader?";
next;
menu "Knight",L_BabyKn,"Crusader",L_Sader;
close;
L_BabyKn:
jobchange 4030;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Knight!";
close;

L_Sader:
jobchange 4037;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Crusader!";
close;
//
L_BabyMagician:
if (JobLevel < 40) goto L_LackJlevel;
mes @npcname$;
mes "I see that you are a Baby Mage...";
next;
mes @npcname$;
mes "Would you like to turn into a Baby Wizard, or Sage?";
next;
menu "Wizard",L_Wiz,"Sage",L_Sage;
close;
L_Wiz:
jobchange 4032;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Wizard!";
close;

L_Sage:
jobchange 4039;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Sage!";
close;
//
L_BabyHunter:
if (JobLevel < 40) goto L_LackJlevel;
mes @npcname$;
mes "I see that you are a Baby Archer...";
next;
mes @npcname$;
mes "Would you like to turn into a Baby Hunter, or Bard/Dancer?";
next;
menu "Hunter",L_Hun,"Bard/Dancer",L_BardDeceiph;
close;
L_Hun:
jobchange 4034;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Hunter!";
close;

L_BardDeceiph:
if (Sex == 1) goto L_Bard;
jobchange 4043;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Dancer!";
close;

L_Bard:
jobchange 4042;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Bard!";
close;

L_BabyAcoChoice:
if (JobLevel < 40) goto L_LackJlevel;
mes @npcname$;
mes "I see that you are a Baby Acolyte...";
next;
mes @npcname$;
mes "Would you like to turn into a Baby Priest, or Monk?";
next;
menu "Priest",L_Priest,"Monk",L_Monk;
close;
L_Priest:
jobchange 4031;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Priest!";
close;

L_Monk:
jobchange 4038;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Monk!";
close;

L_BabyMerchChoice:
if (JobLevel < 40) goto L_LackJlevel;
mes @npcname$;
mes "I see that you are a Baby Merchant...";
next;
mes @npcname$;
mes "Would you like to turn into a Baby Blacksmith, or Alchemist?";
next;
menu "Blacksmith",L_Hammerfall,"Alchemist",L_Alch;
close;
L_Hammerfall:
jobchange 4033;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Blacksmith!";
close;

L_Alch:
jobchange 4041;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Alchemist!";
close;

L_BabySinStalk:
if (JobLevel < 40) goto L_LackJlevel;
mes @npcname$;
mes "I see that you are a Baby Thief...";
next;
mes @npcname$;
mes "Would you like to turn into a Baby Assassin, or Rogue?";
next;
menu "Assassin",L_sin,"Rogue",L_rogue;
close;
L_sin:
jobchange 4035;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Assassin!";
close;

L_rogue:
jobchange 4040;
mes @npcname$;
mes "Excellent " +strcharinfo(0)+ ", you are now a Baby Rogue!";
close;

L_Job3:
mes @npcname$;
mes "I'm sorry, but you are too advanced for me to help you any longer!";
close;
}</div>

### ferry_gukguk, 2007-07-22

**Script :: Login Event AntiBot**
Hampir sama kaya yg ada di slayer RO

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>prontera.gat,0,0,0 (tab) script (tab) PCLoginEvent (tab) -1, {
mes "";
mes "Maaf, mengganggu sebentar...";
next;
mes "";
mes "Tolong masukkan angka berikut";
next;
set $@Number, rand(100000,99999);

mes "";
mes ""+$@Number+"";
next;
input @Num;
if (@Num == $@Number) goto ex_benar;
mes "";
mes "Maaf, kamu telah memasukkan angka yang salah";
mes "Kamu bisa dicurigai sebagai bot!";
next;
mes "Silahkan Login kembali dan coba lagi!!";
}

ex_benar:
mes "";
mes "Baiklah, kamu benar memasukkan angkanya!";
mes "Silahkan bermain";
close;</div>

Fungsinya :
1. Saat kamu login, message akan muncul

```
mes "";
mes "Maaf, mengganggu sebentar...";
```

2. Random Number, menentukan angka yang akan dipilih

```
set $@Number, rand(100000,99999);
```

3. Jika salah memasukkan angka 

```
mes "";
mes "Maaf, kamu telah memasukkan angka yang salah";
mes "Kamu bisa dicurigai sebagai bot!";
next;
mes "Silahkan Login kembali dan coba lagi!!";
```

tanpa tanda **close;**, karena jika ada tanda close, otomatis akan menutup pembicaraan dan player bisa bermain,
jika tanpa tanda **close**, memaksakan untuk relogin karena tidak bisa melakukan apa-apa dan tidak keluar tombol close sama sekali...

4. Jika benar

```
mes "";
mes "Baiklah, kamu benar memasukkan angkanya!";
mes "Silahkan bermain";
close;
```

dengan tanda **close;** agar player bisa bergerak,

Tambahan :
1. Pada Bagian ini :

```
set $@Number, rand(100000,99999);
```

bisa diganti sesuai keinginan...

### ferry_gukguk, 2008-05-16

Share my NPC Collection!!

**Kafra Staff + SQL (By FerryGukguk)**
Fitur :
1. KafraQuest (Headgear, Weapon) akan segera diupdate
2. Delivery Item (Segera Hadir)
3. Layanan Messages (Segera Hadir)
4. Periksa Point
5. Layanan Homunculus
6. Daftar Gold Account (Segera Hadir)

Keterangan :
1. KafraQuest
Layanan **KafraQuest**, sesuai dgn namanya, menyediakan layanan Quest. Sayang, baru ada 70 Quest Headgear dgn system **Query Database MySQL**

2. Delivery Item
Layanan **Delivery Item**, sesuai dgn namanya, menyediakan layanan Mengirim Item ke seseorang. Sayang, belum diperbaharui

3. Layanan Message
Layanan **Message**, memungkinkan Pemain bisa mengirim pesan ke Pemain lain

4. Periksa Point
Layanan **Periksa Point**, memungkinkan Pemain me-akumulasi Point untuk menukarkannya dengan item-item yang unik

5. Layanan Homunculus
**Layanan Homunculus**, memungkinkan Alchemist dan Biochemist memiliki Skill Homunculus tanpa perlu Quest di Lighthalzen

6. Daftar Gold Account
Layanan **Gold Account**, memungkinkan Player untuk Upgrade dari Premium Account menjadi Gold Account dan mendapatkan Fasilitas yang lebih banyak.

(Sorry bnyk yg blom Update..)

Cara Menggunakan
1. Download File Ini (ada di dalam attachment) :
- KafraStaff.txt
- KafraHeadgearQuest.sql

2. Simpan **KafraStaff.txt** di folder eAthena kamu
3. Jangan lupa, Query-kan **KafraHeadgearQuest.sql** di MySQL, simpan di Database **blackcp**

Kalo ada yg kurang ngerti, tanya aja y..

### VodkaMartini, 2008-05-17

**Script :: NPC EDP Manager**

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>
//Script EDP by VodkaMartini (Nyit-Nyit.NET, Indoro-Reborn.CO.NR)
// 2008-5-18 (v2)
prontera.gat,164,152,3 script EDP Manager 730,{
mes "EDP Manager";
mes "Hi, saya adalah NPC EDP Manager!";
mes "Saya akan memberikan satu set bahan";
mes "pembuat EDP apabila kamu memberi";
mes "Uang Sejumlah ^0080C0100,000z^000000";
next;
mes "EDP Manager";
mes "Setiap ^0080C0100,000z^000000 akan ditukar dengan:";
mes "^0080C0Berserk Potion x 1^000000";
mes "^0080C0Empty Bottle x 1^000000";
mes "^0080C0Venom Canine x 1^000000";
mes "^0080C0Bee Sting x 1^000000";
mes "^0080C0Cactus Needle x 1^000000";
mes "^0080C0Karvodailnirol x 1^000000";
mes "^0080C0Poison Spore x 1^000000";
goto insert;
insert:
if(Zeny < 100000) goto cancel;
next;
mes "EDP Manager";
mes "Berapa Set Bahan EDP yang kamu mau?";
input @total;
next;
mes "EDP Manager";
mes "Benar yang kamu masukan adalah "+ @total +" Set ?";
menu "Ya",yes,"Salah",insert,"Batal",exit;
yes:
if(Zeny < @total*100000) goto cancel;
getitem 657,@total;
getitem 713,@total;
getitem 937,@total;
getitem 939,@total;
getitem 952,@total;
getitem 972,@total;
getitem 7033,@total;
set Zeny, Zeny-@total*100000;
next;
mes "EDP Manager";
mes "Semoga Beruntung!";
close;
cancel:
next;
mes "EDP Manager";
mes "Kamu jangan nipu saya ya!";
mes "Duitmu kurang tau!";
close;
exit:
next;
mes "EDP Manager";
mes "Kalo masih mau, saya ada di sini!";
close;
}</div>

### secreal, 2008-06-02

**Script :: NPC Advance Warper**

**[Advance warper](http://www.eathena.ws/board/npc-Advanced-Warper-t188450.html)**

### BloodyRO, 2008-06-03

Sekedar share Script karya gw ^^

**Script :: NPC Rate**

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>
prontera,160,190,5 script Rate Changer 100,{
mes "[Rate Changer]";
if ( getgmlevel() < 99 ) {
mes "Base EXP rate : "+ getbattleflag("base_exp_rate")/100 +"X";
mes "Job EXP rate : "+ getbattleflag("job_exp_rate")/100 +"X";
close;
}
do {
mes "Halo GM, Rate Sekarang adalah: ";
mes "Base EXP rate : "+ getbattleflag("base_exp_rate")/100 +"X";
mes "Job EXP rate : "+ getbattleflag("job_exp_rate")/100 +"X";
next;
switch( select("Mengubah Base ExP","Mengubah Job ExP","Tidak") ) {
case 1:
case 2:
set .@menu, @menu;
mes "[Rate Changer]";
mes "Masukkan Rate";
next;
input .@num;
if ( .@num <= 0 ) break;
mes "[Rate Changer]";
mes "Apakah yakin "+ .@num +" ?";
next;
if ( select("Yes:No") == 2 ) break;
setbattleflag (.@menu==1)?"base_exp_rate":"job_exp_rate", .@num *100;
atcommand "@reloadmobdb";
break;
default:
mes "Service Berfungsi Silahkan kembali kapan-kapan.";
close;
}
} while (1);
}</div>

**Script :: NPC Megacoter**

```
prontera,150,179,5 script Megacoter 744,{

mes "[^FF0000 Megacoter ^000000]";
mes "Halo, ^0000FF"+strcharinfo(0)+"^000000";
mes "Kamu mau berteriak dengan Megaphone?";
menu "iya",y,"enggak",v;
y:
mes "[^FF0000 Megacoter ^000000]";
mes "Ketik yang ingin kamu ucapkan";
input @mensagem$;
announce ""+strcharinfo(0)+" Berkata '"+@mensagem$+"' ",bc_all,0xD20000;
close;

v:
close;
}
```

Jangan lupa ..

thx,

Credit by me .. :D

### mupan, 2008-06-03

**Script :: NPC Quest Megingjard Custom**

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>
turbo_room,111,139,5 script GODLIKE 86,{
mes "[Si Ganteng]";
mes "Apa kamu ingin membuat megingjard?";
menu "MAU !!!",Meging,"tukang ngibul!",Dada;
close;
Dada:
mes "Wew Sialan!! gw ban ne!!";
Meging:
if(MG_QUEST1 == 1) goto Mobster;
if(MG_QUEST2 == 1) goto Mobster;
mes "[Si Ganteng]";
mes "Sebenarnya si gw gaq bisa buatin lw megingjard";
mes "tapi gw tau Npc yg bisa ngebuatnya dengan cepat!";
next;
mes "[Si Ganteng]";
mes "Gw si sebenarnya mau ngasi tau...";
mes "Tapi perut gw keroncongan ni..";
mes "Beliin gw makanan donk, yang banyak ya!";
next;
if(CAKE == 1) goto Minum;
mes "[Si Ganteng]";
mes "2 buah Traditional Rice Cake, kayanya cukup koq buat perut saya";
if(countitem(555)<2) goto Gakckp;
delitem 555,2;
set CAKE,1;
mes "Ah kenyang nya ~~";
goto Minum;
close;

Minum:
mes "Lho? minum nya mana?";
mes "Ambilkan aku 20 Tropical sograt donk!";
next;
mes "[Si Ganteng]";
if(countitem(12112)<20) goto Gakckp;
delitem 12112,20;
set MG_QUEST1,1;
mes "Ah makasih, makasih!";
next;
mes "[Si Ganteng]";
mes "Oke, sekarang saya akan memberitahukan kamu tempat untuk membuat megingjard!";
next;
mes "[Si Ganteng]";
mes "Dengarkan baik baik karena tidak akan diulang";
goto Mobster;
close;

Mobster:
mes "Pergilah ke Field dimana Monster pencuri yang berbentuk manusia berada";
mes "lalu pergilah ke arah jam 9, disana kamu akan bertemu dengan NPC itu";
mes "Saya telah mengirimkan Surat padanya, Berhati hati lah";
close;

cmd_fild02,43,301,5 script Mobster 1313,{
if(MG_QUEST1 == 1) goto Meging2;
if(MG_QUEST2 == 1) goto Master;
mes "";
mes "Hmm, ada perlu apa datang kesini?";
close;
Meging2:
mes "";
mes strcharinfo(0)+", Jadi seperti ini ya orang yg diceritakan Justian";
next;
mes "";
mes "Aku tahu kamu pasti ingin membuat Megingjard bukan?";
mes "Sebenarnya bukan saya yang membuatnya..";
next;
mes "";
mes "tetapi saya biasanya mendapat titipan Megingjard untuk dijual";
next;
mes "";
mes "Tapi sayang hari ini kamu kurang beruntung";
mes "Kemarin, barang barang saya dicuri oleh Mobster yang lain!!";
next;
mes "";
mes "Jadi saya hanya dapat memberitahukan kamu dimana harus membuatnya";
mes "dengan persyaratan sebagai berikut:";
next;
mes "";
mes "500,000,000 zeny agar aku dapat berdagang kembali";
mes "50 Maya purple Card agar aku dapat mengetahui jika ada yang mau mencuri lagi";
if(countitem(4198)<50 ||Zeny<500000000) goto Gakckp;
delitem 4198,50;
set Zeny,Zeny-500000000;
set MG_QUEST2,1;
set MG_QUEST1,0;
mes "Wah, terima kasih banyak. Sekarang dengarkan baik baik.";
goto Master;
close;
Master:
mes "";
mes "Pergilah ke tha_t12";
mes "Dia berada di tengah tengah map";
close;

tha_t12,130,51,5 script MASTER 63,{
if(MG_QUEST2 == 1) goto Meging3;
mes "";
mes "Hmm, ada perlu apa datang kesini?";
close;
Meging3:
mes "[MASTER of GODLY ITEM]";
mes "Ohh, jadi kamu orang yang diceritakan oleh MOBSTER..";
next;
mes "Baiklah, saya tahu kamu telah melewati perjalanan yang sangat panjang.";
next;
mes "Kalau begitu kita langsung saja membuat Godly Item Megingjard ini.";
mes "Bahan bahan yang kamu butuhkan untuk membuat Megingjard adalah:";
next;
mes "20 Randgris Card";
mes "10 Golden Thief Bug Card";
mes "1 buah Valkyrie Helm";
mes "dan 300,000,000 zeny untuk menggunakan jasa saya";
next;
if(countitem(4407)<20 ||countitem(4128)<10 ||countitem(5171)<1 ||Zeny<300000000) goto Gakckp;
delitem 4407,20;
delitem 4128,10;
delitem 5171,1;
set MG_QUEST2,0;
set Zeny,Zeny-300000000;
getitem 2629,1;
announce strcharinfo(0)+", telah berhasil membuat Megingjard!!",8;
mes "Wah, akhirnya sudah selesai!!";
mes "Ini,dia Megingjard mu";
close;
Gakckp:
mes "?? mana barang yang saya minta! pergi sana, cpet!!";
close;
}
</div>

### mupan, 2008-06-08

**Script :: NPC Where are You**

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>
prontera,146,163,5 script Where are u? 70,{
mes "[Where are u?]";
mes "Halo aku dapat mewarp kamu menuju ke tempat org yang kamu tulis..";
mes "Biaya nya adalah 10,000,000 zeny";
mes "kami tidak dapat warp kamu ke tempat GM";
next;
mes "Kamu harus benar benar yakin Player tersebut Online";
mes "dan juga kamu tidak boleh salah tulis nama";
menu "Mau!!",-,"wew, gaq ada duit >_<",Duit;
if(Zeny<10000000) goto Gakckp;
input @name$;
//if (@name$=="King" ||@name$=="Administrator" || @name$=="aurora") goto Gakblh;
set Zeny,Zeny-10000000;
atcommand strcharinfo(0) + "@goto "+@name$;
close;

Gakblh:
mes "[Where are u?]";
mes "Player tersebut tidak dapat diikuti";
close;

Duit:
mes "[Where are u?]";
mes "Kembalilah lain kali..";
close;

Gakckp:
mes "[Where are u?]";
mes "Kamu tidak memiliki cukup uang..";
close;
}
</div>

Fitur nya agar player dpt menuju ke tempat player lain dengan diketik. bold= id GM agar tdk bs diikuti

### BloodyRO, 2008-06-09

**Script :: NPC Jadwal Euro 2008**

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>prontera,161,175,0 script Jadwal euro 2008 837,{
set @NPCName$, "[^047CDFEuro 2008^000000]";
mes @NPCName$;
mes "Disini aku ngasih jadwal buat pertandinga Euro 2008";
next;
mes @NPCName$;
mes "Group A:";
mes "7 Juni di Basel Swiss vs Republik Ceska";
mes "7 Juni di Jenewa Portugal vs Turki";
mes "11 Juni di Basel Swiss vs Turki";
mes "11 Juni di Geneva Republik Ceska vs Portugal";
mes "15 Juni di Basel Swiss vs Portugal";
mes "15 Juni di Geneva Turki vs Republik Ceska";
next;
mes @NPCName$;
mes "Group B:";
mes "8 Juni di Wina Austria v Kroasia";
mes "8 Juni di Klagenfurt Jerman vs Polandia";
mes "12 Juni di Klagenfurt Kroasia vs Jerman";
mes "12 Juni di Wina Austria vs Polandia";
mes "16 Juni di Klagenfurt Polandia vs Kroasia";
mes "16 Juni di Wina Austria vs Jerman";
next;
mes @NPCName$;
mes "Group C:";
mes "9 Juni di Zurich Rumania vs Prancis";
mes "9 Juni di Berne Belanda vs Italia";
mes "13 Juni di Zurich Italia vs Rumania";
mes "13 Juni di Berne Belanda vs Prancis";
mes "13 Juni di Zurich Prancis vs Italia";
mes "17 Juni di Berne Belanda vs Rumania";
next;
mes @NPCName$;
mes "Group D:";
mes "10 Juni di Innsbruck Spanyol vs Rusia";
mes "10 Juni di Salzburg Yunani vs Swedia";
mes "14 Juni di Innsbruck Swedia vs Spanyol";
mes "14 Juni di Salzburg Yunani vs Rusia";
mes "18 Juni di Salzburg Yunani vs Spanyol";
mes "18 Juni di Innsbruck Rusia vs Swedia";
next;

mes @NPCName$;
mes "selesai juga akhirnya";
mes "Untuk perempat final,semifinal,dan final akan di update jika waktunya tlah tiba.";
close;
}
//============================================================
//===== Emo Angel & Benjo Script maker ===========================
//============================================================</div>

NPC Spesial dari gw n emo ..

Thx to emo ..
Fixed by me ..

### BloodyRO, 2008-06-16

**Script :: NPC Beelzebub Quest**

Check : www.ragnarok.co.id

** Required : Version 12+ **

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>
//========= NPC : Lita =======================================
//======= Desc : Berzebub Quest ==============================
//============ Created by : Hilmy ============================
//========== Please Don't Remove Copyright ===================
//======== 16 June 2008 ======================================

veins,76,158,4 script Lita 756,{
set @npc$,"^00ade6^000000";

mes @npc$;
mes "Halo, Saya Lita.";
mes "Tahukah kamu tentang Berzebub?";
next;
mes @npc$;
mes "^FF0000Berzebub^000000 adalah sebuah monster Boss Jaman dahulu,";
mes "yang telah lama mati berbentuk Lebah";
mes "Apakah kamu mau membantu saya?";
next;
menu "Bantu apa?",hmm,"Batal",use;
use:
mes @npc$;
mes "Selamat Tinggal";
close;

hmm:
mes @npc$;
mes "Jika kamu mau, Hadiah jika kamu berhasil adalah :";
mes "^FF00001 Berzebub Card^000000";
next;
menu "Mauu..mau..",oke,"Batal",use;

oke:
mes @npc$;
mes "Tolong bawakan saya Item-item ini:";
mes "^0000ff500 buah Broken Farming Untensil^000000";
mes "^0000ff50 buah Torn Magic Book^000000";
mes "^0000ff5 buah Opal^000000";
mes "dan ^0000ff1 buah Four Leaf Clover^000000";
next;
menu "Oke..saya bawa..",lanjut,"Batal",use;

lanjut:
mes @npc$;
mes "Oke, Saya check item kamu dulu";
next;
if (countitem (7753) < 500) goto L_enough;
if (countitem (7117) < 50) goto L_enough;
if (countitem (727) < 5) goto L_enough;
if (countitem (706) < 1) goto L_enough;
mes "Hmm, Kamu saya akan buatkan";
delitem 7753,500;
delitem 7117,50;
delitem 727,5;
delitem 706,1;
getitem 4145,1;
next;
mes "Terima kasih, Sudah membantu saya !";
close;

L_enough:
mes @npc$;
mes "Maaf, Item yang kamu bawa kurang atau salah";
mes "Cek kembali itemnya..";
close;
}</div>

### Tristian1st, 2008-06-23

**Script :: NPC Police v.12 +**

Polisi versi 12+

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>
//Created by PoringRO 
//Version : 1.0
//Description : Antibot 12+
prontera,0,0,0 script Polisi -1,{
OnPCLoginEvent:
mes "";
mes "Maaf, mengganggu sebentar...";
next;
mes "";
mes "Tolong masukkan angka berikut";
next;
set @Number,rand(100,999);
mes "";
mes ""+@Number+"";
next;
input @Num;
if (@Num != @Number) goto ex_salah;
mes "";
mes "Baiklah, kamu benar memasukkan angkanya!";
mes "Silahkan bermain";
close;

ex_salah:
mes "";
mes "Maaf, kamu telah memasukkan angka yang salah";
mes "Kamu bisa dicurigai sebagai bot!";
next;
mes "Silahkan Login kembali dan coba lagi!!";

}</div>

Ditunggu makasinya ^_^

### mupan, 2008-07-16

**Script :: Disguiser Room Size-Monster-Item**

Sory klo masih ada bug nya
- [Disguise Room IndoWebster](http://www.indowebster.com/Disguise_Room_Eathena.html)
- [Disguise Room Rapid Share](http://rapidshare.com/files/130089128/Disguise_room.rar.html)

### adanijmc, 2008-08-02

**Script :: NPC Farid Pikun**

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>
//Compiled script will go here as you make it.
//Script Generated by Athena Script Creation Utility by PKGINGO

prontera.gat,165,160,7 script Farid Pikun 748,{
mes "[Farid Pikun]";
mes "duh pala ku gatal banget";
mes "kemarin aku sudah membeli obatnya";
mes "tapi emang dasar aku ini pikun, aku lupa membawanya pulang";
next;
mes "[Farid Pikun]";
mes "maukah kamu membantu ku mencari bahan-bahannya ?";
menu "apakah barang ini yg kau cari ?",SEP,
"Apa guna nya untukku",EXP,"sorry... ga ada waktu",GA;
SEP:
mes "[Farid Pikun]";
mes "wah kamu memang baik hati";
mes "sekarang sesuai janjiku kan ku berikan kamu hadiah";
mes "kulihat dulu barang-mu";
next;
if(countitem(938)<50||countitem(909)<100||countitem(969)<5||countitem(1057)<10) goto DODOL;
delitem 938,50;
delitem 909,100;
delitem 969,5;
delitem 1057,10;
mes "[Farid Pikun]";
mes "waw ternyata kamu benar-benar membawanya !";
mes "sesuai janji .. kamu akan mendapatkan hadiah";
next;
mes "[Farid Pikun]";
mes "kepala ku tidak akan gatal lagi, terima kasih anak muda";
mes "ini hadiah yang kujanjikan jangan terkejut yah";
mes "hadiah untuk mu supaya kamu juga tidak gatal-gatal";
next;
mes "[Farid Pikun]";
mes "sekarang waktunya kumandi, dadah";
mes "terima kasih .. kembalilah";
mes "jika kamu menginginkan ^F00000anti gatal^000000 itu lagi";
getitem 5147,1;
close;
DODOL:
mes "[Farid Pikun]";
mes "oala bahan-bahannya masih kurang ... T_T";
mes "cepatlah kembali aku tak tahan T_T";
close;
EXP:
mes "[Farid Pikun]";
mes "aku akan memberikanmu hadiah yang menarik"; 
mes "jika kamu bisa menyelesaikan tugas ini";
next;
mes "apakah kamu mau menerima tugas dariku ?";
menu "okeh",OKEH,"ga ah",GA;
OKEH: 
mes "[Farid Pikun]";
mes "baiklah bawakan aku"; 
mes "50 Sticky Mucus, 100 Jellopy, 5 Gold, dan 10 Moth Dust";
close;
GA:
mes "[Farid Pikun]";
mes "baiklah aku tidak akan memaksamu";
close;
}
</div>

### tunggonkeren, 2008-08-12

**Script :: NPC Gordik Family Quest**

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>//============= Script ======================================= 
//= Gordik Family Quest
//===== By: ================================================== 
//= TunggonDonk aka Parmantots
//===== Compatible With: ===================================== 
//= eAthena SVN
//===== Comment: ========================================= 
//= Kalo ketemu bug kasi tau ya.
//============================================================
//============================================================
morocc,165,32,3 script Pengemis 847,{
if (pengemis==1) goto makasi;
mes "";
mes "Pak/Bu, saya lapar..";
mes "saya belum makan selama 10 hari";
mes "saya minta sedikit makanan saja";
menu "nanya",nanya,"Sebodo amat dah",Bodo,"kasi",kasi;

nanya:
mes "["+strcharinfo(0)+"]";
mes "mau makan apa?";
next;
mes "";
mes "kalo bisa si ^362ED6 Bomber Steak ^000000";
mes "1 cukuplah";
next;
mes "["+strcharinfo(0)+"]";
mes "tunggu bentar ya.";
next;
mes "";
mes "OK, makasi ya.";
close;

Bodo:
mes "["+strcharinfo(0)+"]";
mes "emang cuma lu doang yg perlu makan?";
mes "gua juga!";
next;
mes "";
mes "ya sudahlah";
emotion e_sob;
close;

kasi:
mes "["+strcharinfo(0)+"]";
mes "nih";
next;
if (countitem(12043)<1) goto nipu;
delitem 12043,1;
mes "";
mes "makasi banyak ya";
emotion e_thx;
next;
mes "";
mes "nih ganti dari makanan yang kamu kasih";
mes "biarpun kayanya gk cukup untuk";
mes "kebaikan kamu kepadaku.^0080C0*ngobok kantong*^000000";
next;
getitem 1073,1;
mes "";
mes "saya tidak tahu itu untuk apa";
mes "kemarin saya memungutnya dari tepi jalan di Alberta,";
mes "semoga berguna";
mes "sekali lagi terima kasih ya.";
emotion e_thx;
set pengemis,1;
close;

makasi:
mes "";
mes "Terimakasih karena kamu";
mes "telah meyelamatkan aku";
close;

nipu:
mes "";
mes "ya sudahlah kalo memang";
mes "niatmu menipuku, aku";
mes "sudah biasa diperlakuan";
mes "seperti itu kok";
emotion e_sob;
next;
mes "";
mes "have a nice day";
close;
}

//============================================
//============================================
alberta,40,46,6 script Bella 729,{
if (bella==1) goto balik;
if (bella==2) goto telat;
if (bella==3) goto tolong;
mes "";
mes "GAWAT! GAWAT! gimana ni!!";
emotion e_swt2;
menu "Ada apa ya?",nanya,"Ih pegi aja deh",gk;

gk:
mes "";
mes "*sob*";
emotion e_sob;
close;

nanya:
mes "";
mes "Tiket rekomendasi untuk";
mes "menjadi merchant yang diberikan";
mes "ayahku hilang *sob*";
emotion e_sob;
mes "gimana nih...";
next;
mes "["+strcharinfo(0)+"]";
mes "wiw, jadi gimana dong?";
next;
mes "";
mes "ya apa bole buat";
mes "pulang kampung dan tunggu";
mes "dimarain ama orangtua *sob*";
emotion e_sob;
menu "bantu",bantu,"Bukan urusan gue",gk;

bantu:
mes "["+strcharinfo(0)+"]";
mes "eh dik, jangan nyerah dulu donk";
mes "sini kk bantu";
mes "mang jatohnya di mana?";
next;
mes "";
mes "di pinggir pintu merchant guild kayanya";
mes "*sob*";
next;
mes "["+strcharinfo(0)+"]";
mes "bentar ya.";
set bella,1;
close;

balik:
mes "";
mes "Udah???? Mana-mana, sini kuliat dulu!!";
menu "Nih",kasi,"ehehe lom kok",serius;

serius:
mes "";
mes "swt deh";
emotion e_swt;
close;

kasi:
if (countitem(1073)<1) goto gk;
delitem 1073,1;
mes "";
mes "waw! makasi kk!";
next;
mes "umm, bole minta tolong lg gk kak?";
emotion e_shy;
menu "boleh aja",bole,"gk ah",males;

bole:
mes "";
mes "anterin surat ke ibuku yang";
mes "ada di veins dong";
menu "boleh-boleh",boleh,"males",males;

males:
mes "";
mes "oh, yawda de";
mes "nih sebagai ganti waktu buat";
mes "nyari Tiket.";
getitem 573,2;
set bella,2;
emotion e_thx;
close;

boleh:
mes "";
mes "tunggu bentar ya";
mes "^362ED6*Buka tas*^000000";
mes "nih";
getitem 7490,1;
mes "tolong ya";
set bella,3;
close;

telat:
mes "";
mes "makasi ya";
close;

tolong:
mes "";
mes "tolong anterin ya";
mes "di Veins lho!";
close;
}

//============================================
//============================================
veins,197,163,6 script Elli 53,{
if (elli==1) goto selamat_jalan;
if (elli==3) goto selamat_jalan;
if (elli==2) goto kembali;
if (countitem(7490)<1) goto gk;
mes "";
mes "Oh, akhirnya!";
mes "Apakah kamu yang membawa surat";
mes "dari anakku Bella?";
next;
mes "["+strcharinfo(0)+"]";
mes "Btul, ini suratnya";
next;
mes "^362ED6*Ngasi surat ke emaknya*^000000";
delitem 7490,1;
next;
mes "memangnya surat apa sih?";
next;
mes "";
mes "bentar ya, saya baca dulu";
next;
mes "^362ED6Baca pelan-pelan^000000";
next;
mes "";
mes "oh, ternyata anakku menanyakan kabarku";
mes "dan memberitahukan bahwa ada";
mes "seseorang yang baik hati";
mes "yang mau membantunya mencarikan";
mes "tiketnya yang hilang";
mes "apakah itu anda?";
emotion e_what;
menu "Ya",ya,"Bukan",bukan;

gk:
mes "";
mes "maaf, jangan ganggu saya,";
mes "saya sedang menunggu surat";
mes "dari seseorang";
close;

bukan:
mes "";
mes "oh, saya pikir anda yang telah";
mes "menolongnya.";
next;
mes "";
mes "pastilah anda lapar setelah seharian berjalan";
mes "tunggu sebentar ya, saya";
mes "ambilkan sesuatu untuk dimakan.";
next;
mes "^362ED6Jalan ke dapur...^000000";
next;
mes "";
mes "ini dimakan dulu selagi hangat";
getitem 583,1;
getitem 599,10;
next;
mes "";
mes "selamat jalan, semoga selamat";
mes "di perjalanan.";
set elli,1;
close;

selamat_jalan:
mes "";
mes "selamat jalan, semoga selamat";
mes "di perjalanan.";
close;

ya:
mes "";
mes "Terimakasih karena telah";
mes "menolong anakku.";
mes "sebenarnya keadaanku sekarang tidak";
mes "begitu baik ^362ED6*uhuk*^000000";
next;
mes "sepertinya aku masuk angin";
mes "bisa tolong belikan obat gk?";
menu "Bisa",bisa,"Lagi ada keperluan lain",keperluan;

keperluan:
mes "";
mes "Oh, kalau begitu aku tidak bisa";
mes "memaksamu.";
next;
mes "";
mes "ini sedikit hadiah dariku";
mes "karena telah membantu anakku";
getitem 583,1;
getitem 599,10;
next;
mes "";
mes "selamat jalan, semoga selamat";
mes "di perjalanan.";
set elli,1;
close;

bisa:
mes "";
mes "baiklah, aku memerlukan:";
mes "Reptile tongue x3";
mes "Immortal Heart x3";
mes "Bear's Footskin x3";
mes "dan";
mes "Tiger's Footskin x1";
next;
mes "kalau sudah dapat kembali lagi ya";
set elli,2;
close;

kembali:
mes "";
mes "Ah, akhirnya kamu kembali juga";
menu "Berikan",beri;

beri:
if(countitem(903)<3 || countitem(929)<3 || countitem(948)<3 || countitem(1030)<1) goto kurang;
mes "";
mes "yup, semuanya lengkap.";
delitem 903,3;
delitem 929,3;
delitem 948,3;
delitem 1030,1;
next;
mes "dengan ini aku bisa segera sembuh.";
mes "ini sedikit hadiah dariku...";
next;
getitem 969,5;
mes "["+strcharinfo(0)+"]";
mes "GILEEE, banyak amad Bu!!!!";
mes "Ga salah ni????";
next;
mes "";
mes "Ga ko, kesehatan itu jauh lebih";
mes "penting daripada harta.";
mes "Jadi itu gk seberapa dibanding";
mes "obat ini.";
set elli,3;
close;

kurang:
mes "";
mes "maaf, sepertinya ada yang kurang";
mes "coba cek deh";
close;
}
</div>

**Script :: NPC Enriched Elu & Enriched Ori Trader**

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>//============= Script ======================================= 
//= Enriched elu & ori Trader
//===== By: ================================================== 
//= TunggonDonk aka Parmantots
//===== Compatible With: ===================================== 
//= eAthena SVN
//============================================================
payon.gat,172,142,6 script Penukaran 730,{
mes "";
mes "Hi, saya dapat menukarkan 10 buah oridecon";
mes "dan 15 buah elunium menjadi masing-masing";
mes "1 buah enriched oridecon dan 1 buah";
mes "enriched elunium.";
mes "apakah kamu mau menukarkan milikmu?";
next;
menu "ya",ya,"tidak",cancel;

ya:
mes "";
mes "apa yang ingin kamu tukar?";
next;
menu "Oridecon",oridecon,"Elunium",elunium;

oridecon:
mes "";
mes "baiklah, berapa jumlah yang kamu mau?";
goto insert;

insert:
input @total;
next;
mes "";
mes "Benar yang kamu masukkan adalah "+ @total +"buah ?";
next;
menu "ya",yes,"tidak",insert,"batal",cancel;

yes:
if (countitem(984)<@total*10) goto kurang;
delitem 984,@total*10;
getitem 7620,@total;
next;
mes "";
mes "Semoga beruntung.";
close;

elunium:
mes "";
mes "baiklah, berapa jumlah yang kamu mau?";
goto insert_2;

insert_2:
input @total;
next;
mes "";
mes "Benar yang kamu masukkan adalah "+ @total +"buah ?";
next;
menu "ya",yes_2,"tidak",insert,"batal",cancel;

yes_2:
if (countitem(985)<@total*15) goto kurang;
delitem 985,@total*15;
getitem 7619,@total;
next;
mes "";
mes "Semoga beruntung.";
close;

kurang:
mes "";
mes "Silakan kembali lagi jika";
mes "bahan2 yg diperlukan sudah ada.";
close;

cancel:
mes "";
mes "Silakan kembali, jika ingin";
mes "menukar.";
close;
}</div>

### VodkaMartini, 2008-09-29

**Script :: NPC WoE Setup**
<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>
//WoE Setup.
//Modified by VodkaMartini

//senin 16:00 s/d 17:00 = prontera (valkyrie)
//rabu 16:00 s/d 17:00 = geffen (britoniah)
//kamis 15:00 s/d 16:00 = aldebaran (luina)
//sabtu 20:00 s/d 21:00 = payon (greenwood)

- script Agit_Event -1,{
end;

OnClock1600: //start time for Pront & Geffen
OnClock1700: //end time Pront & Geffen
OnClock1500: //start time for Alde
OnClock1600: //end time for Alde
OnClock2000: //start time for Pay
OnClock2100: //end time for Pay
OnAgitInit:

// starting time checks
if(gettime(4)==1) && gettime(3)<16) goto L_Valk;
if(gettime(4)==3) && gettime(3)<16) goto L_Brit;
if(gettime(4)==4) && gettime(3)<15) goto L_Luin;
if(gettime(4)==6) && gettime(3)<20) goto L_Green;
end;

// end time checks
if(gettime(4)==1) && gettime(3)<17) goto L_End;
if(gettime(4)==3) && gettime(3)<17) goto L_End;
if(gettime(4)==4) && gettime(3)<16) goto L_End;
if(gettime(4)==6) && gettime(3)<21) goto L_End;
end;

L_Valk:
if (!agitcheck()) {
Announce "War of Emperium Telah Dimulai Untuk sektor Valkyrie (Prontera)!",8;
AgitStart;
}
callsub S_DisplayOwners;
enablenpc "prtg01";
enablenpc "prtg02-1";
enablenpc "prtg03-1";
enablenpc "prtg04-1";
enablenpc "prtg05-1";

maprespawnguildid "prtg_cas01",0,7;
maprespawnguildid "prtg_cas02",0,7;
maprespawnguildid "prtg_cas03",0,7;
maprespawnguildid "prtg_cas04",0,7;
maprespawnguildid "prtg_cas05",0,7;

disablenpc "aldg01";
disablenpc "aldg02";
disablenpc "aldg03";
disablenpc "aldg04";
disablenpc "aldg05";

disablenpc "gefg01";
disablenpc "gefg02";
disablenpc "gefg03";
disablenpc "gefg04";
disablenpc "gefg05";
disablenpc "gefg06";
disablenpc "gefg07";
disablenpc "gefg08";
disablenpc "gefg09";
disablenpc "gefg09-1";

disablenpc "payg01";
disablenpc "payg02";
disablenpc "payg03";
disablenpc "payg04";
disablenpc "payg05";

disablenpc "naldg01";
disablenpc "ngefg01";
disablenpc "npayg01";
disablenpc "nprtg01";
end;

L_Brit:
if (!agitcheck()) {
Announce "War of Emperium Telah Dimulai Untuk sektor Britoniah (Geffen)!",8;
AgitStart;
}
callsub S_DisplayOwners;
enablenpc "gefg01";
enablenpc "gefg02";
enablenpc "gefg03";
enablenpc "gefg04";
enablenpc "gefg05";
enablenpc "gefg06";
enablenpc "gefg07";
enablenpc "gefg08";
enablenpc "gefg09";
enablenpc "gefg09-1";
maprespawnguildid "gefg_cas01",0,7;
maprespawnguildid "gefg_cas02",0,7;
maprespawnguildid "gefg_cas03",0,7;
maprespawnguildid "gefg_cas04",0,7;
maprespawnguildid "gefg_cas05",0,7;

disablenpc "prtg01";
disablenpc "prtg02-1";
disablenpc "prtg03-1";
disablenpc "prtg04-1";
disablenpc "prtg05-1";

disablenpc "aldg01";
disablenpc "aldg02";
disablenpc "aldg03";
disablenpc "aldg04";
disablenpc "aldg05";

disablenpc "payg01";
disablenpc "payg02";
disablenpc "payg03";
disablenpc "payg04";
disablenpc "payg05";

disablenpc "naldg01";
disablenpc "ngefg01";
disablenpc "npayg01";
disablenpc "nprtg01";
end;

L_Luin:
if (!agitcheck()) {
Announce "War of Emperium Telah Dimulai Untuk sektor Luina (Aldebaran)!",8;
AgitStart;
}
callsub S_DisplayOwners;
enablenpc "aldg01";
enablenpc "aldg02";
enablenpc "aldg03";
enablenpc "aldg04";
enablenpc "aldg05";
maprespawnguildid "aldeg_cas01",0,7;
maprespawnguildid "aldeg_cas02",0,7;
maprespawnguildid "aldeg_cas03",0,7;
maprespawnguildid "aldeg_cas04",0,7;
maprespawnguildid "aldeg_cas05",0,7;

disablenpc "prtg01";
disablenpc "prtg02-1";
disablenpc "prtg03-1";
disablenpc "prtg04-1";
disablenpc "prtg05-1";

disablenpc "gefg01";
disablenpc "gefg02";
disablenpc "gefg03";
disablenpc "gefg04";
disablenpc "gefg05";
disablenpc "gefg06";
disablenpc "gefg07";
disablenpc "gefg08";
disablenpc "gefg09";
disablenpc "gefg09-1";

disablenpc "payg01";
disablenpc "payg02";
disablenpc "payg03";
disablenpc "payg04";
disablenpc "payg05";

disablenpc "naldg01";
disablenpc "ngefg01";
disablenpc "npayg01";
disablenpc "nprtg01";
end;

L_Green:
if (!agitcheck()) {
Announce "War of Emperium Telah Dimulai Untuk sektor Greenwood (Payon)!",8;
AgitStart;
}
callsub S_DisplayOwners;
enablenpc "payg01";
enablenpc "payg02";
enablenpc "payg03";
enablenpc "payg04";
enablenpc "payg05";
maprespawnguildid "payg_cas01",0,7;
maprespawnguildid "payg_cas02",0,7;
maprespawnguildid "payg_cas03",0,7;
maprespawnguildid "payg_cas04",0,7;
maprespawnguildid "payg_cas05",0,7;

disablenpc "aldg01";
disablenpc "aldg02";
disablenpc "aldg03";
disablenpc "aldg04";
disablenpc "aldg05";

disablenpc "prtg01";
disablenpc "prtg02-1";
disablenpc "prtg03-1";
disablenpc "prtg04-1";
disablenpc "prtg05-1";

disablenpc "gefg01";
disablenpc "gefg02";
disablenpc "gefg03";
disablenpc "gefg04";
disablenpc "gefg05";
disablenpc "gefg06";
disablenpc "gefg07";
disablenpc "gefg08";
disablenpc "gefg09";
disablenpc "gefg09-1";

disablenpc "naldg01";
disablenpc "ngefg01";
disablenpc "npayg01";
disablenpc "nprtg01";
end;

L_End:
if (agitcheck()) {
Announce "War of Emperium Telah Berakhir!",8;
AgitEnd;
}
callsub S_DisplayOwners;
end;

S_DisplayOwners:
setarray .@maps$,"aldeg_cas01","aldeg_cas02","aldeg_cas03","aldeg_cas04","aldeg_cas05";
setarray .@maps$,"gefg_cas01","gefg_cas02","gefg_cas03","gefg_cas04","gefg_cas05";
setarray .@maps$,"payg_cas01","payg_cas02","payg_cas03","payg_cas04","payg_cas05";
setarray .@maps$,"prtg_cas01","prtg_cas02","prtg_cas03","prtg_cas04","prtg_cas05";
for( set .@i, 0; .@i <= 19; set .@i, .@i+1 ) {
if (GetCastleData(.@maps$[.@i],1)) {
Announce "[" + GetCastleName(.@maps$[.@i]) + "] Telah Dikuasai Oleh [" + GetGuildName(GetCastleData(.@maps$[.@i],1)) + "] guild.",bc_all;
}
else {
Announce "[" + GetCastleName(.@maps$[.@i]) + "] Tidak Dikuasai Siapapun.",bc_all;
} 
}
end;
}

//========================================
// Treasure Spawn Time
//========================================
- script TreasSpawn -1,{
end;

OnClock0001:
callfunc "F_GldTreas","aldeg_cas01","A01",$boxNumA01,$@bxA01,$@boxIdA01,1324,114,218,123,227,0;
callfunc "F_GldTreas","aldeg_cas02","A02",$boxNumA02,$@bxA02,$@boxIdA02,1326,130,226,138,235,0;
callfunc "F_GldTreas","aldeg_cas03","A03",$boxNumA03,$@bxA03,$@boxIdA03,1328,220,264,229,273,0;
callfunc "F_GldTreas","aldeg_cas04","A04",$boxNumA04,$@bxA04,$@boxIdA04,1330,80,8,89,17,0;
callfunc "F_GldTreas","aldeg_cas05","A05",$boxNumA05,$@bxA05,$@boxIdA05,1332,58,8,65,15,0;
end;
OnClock0002:
callfunc "F_GldTreas","gefg_cas01","G01",$boxNumG01,$@bxG01,$@boxIdG01,1334,150,108,158,114,0;
callfunc "F_GldTreas","gefg_cas02","G02",$boxNumG02,$@bxG02,$@boxIdG02,1336,136,112,145,118,0;
callfunc "F_GldTreas","gefg_cas03","G03",$boxNumG03,$@bxG03,$@boxIdG03,1338,266,286,275,293,0;
callfunc "F_GldTreas","gefg_cas04","G04",$boxNumG04,$@bxG04,$@boxIdG04,1340,112,114,119,123,0;
callfunc "F_GldTreas","gefg_cas05","G05",$boxNumG05,$@bxG05,$@boxIdG05,1342,140,106,147,113,0;
end;
OnClock0003:
callfunc "F_GldTreas","payg_cas01","Py01",$boxNumPy01,$@bxPy01,$@boxIdPy01,1344,286,4,295,13,0;
callfunc "F_GldTreas","payg_cas02","Py02",$boxNumPy02,$@bxPy02,$@boxIdPy02,1346,140,140,148,149,0;
callfunc "F_GldTreas","payg_cas03","Py03",$boxNumPy03,$@bxPy03,$@boxIdPy03,1348,154,164,162,173,0;
callfunc "F_GldTreas","payg_cas04","Py04",$boxNumPy04,$@bxPy04,$@boxIdPy04,1350,142,44,151,51,0;
callfunc "F_GldTreas","payg_cas05","Py05",$boxNumPy05,$@bxPy05,$@boxIdPy05,1352,152,128,160,135,0;
end;
OnClock0004:
callfunc "F_GldTreas","prtg_cas01","Pt01",$boxNumPt01,$@bxPt01,$@boxIdPt01,1354,6,204,15,213,0;
callfunc "F_GldTreas","prtg_cas02","Pt02",$boxNumPt02,$@bxPt02,$@boxIdPt02,1356,198,224,207,233,0;
callfunc "F_GldTreas","prtg_cas03","Pt03",$boxNumPt03,$@bxPt03,$@boxIdPt03,1358,184,128,193,135,0;
callfunc "F_GldTreas","prtg_cas04","Pt04",$boxNumPt04,$@bxPt04,$@boxIdPt04,1360,266,158,275,167,0;
callfunc "F_GldTreas","prtg_cas05","Pt05",$boxNumPt05,$@bxPt05,$@boxIdPt05,1362,272,174,279,181,0;
end;
OnClock0005:
callfunc "F_GldTreas","nguild_alde","N01",$boxNumN01,$@bxN01,$@boxIdN01,1324,114,218,123,227,0;
callfunc "F_GldTreas","nguild_gef","N02",$boxNumN02,$@bxN02,$@boxIdN02,1334,150,108,158,114,0;
callfunc "F_GldTreas","nguild_pay","N03",$boxNumN03,$@bxN03,$@boxIdN03,1344,286,4,295,13,0;
callfunc "F_GldTreas","nguild_prt","N04",$boxNumN04,$@bxN04,$@boxIdN04,1354,6,204,15,213,0;
end;
}
</div>

### wowo, 2008-09-29

**Script :: NPC Party Warper**

[Function Version](http://www.ichimaru-ome.co.uk/partywarper.txt)
[Standalone Version](http://www.ichimaru-ome.co.uk/partywarper2.txt)
linknya suka hidup, suka mati..

Ini Function Version
<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>//|Sections: |//
//|1: Bad Maps. (Maps you are not allowed to warp to) |//
//|2: General Configuration Settings |//
//|3: Script |//
//|-----------------------------------------------------------------------------|//

function script Party_Warp {

//|=====================================================================|//
//| Section 1 |//
//|=====================================================================|//
//| Guide: |//
//| Edit "map.gat" to any map you do not want players warping to. |//
//| Add new maps by adding to the list, remove by deleting. |//
//|=====================================================================|//

setarray $nowarpmaps$, "map.gat", "map2.gat", "map3.gat", "map4.gat", "map5.gat", "map6.gat", "map7.gat", "map8.gat", "map9.gat";

//|=====================================================================|//
//| Section 2 |//
//|=====================================================================|//
//| Guide: |//
//| Edit the numbers between , and ; based on the information given |//
//|=====================================================================|//

set @charge,0; //Change this to 1 to make the NPC charge for this function
set @price,1000; //Change this to whatever amount you want the price to be

//|=====================================================================|//
//| Section 3 |//
//|=====================================================================|//

getpartymember(getcharid(1));
set @partymembercount,$@partymembercount;
copyarray @partymembername$,$@partymembername$,@partymembercount;

mes "[^0000FFWarper^000000]";
mes "Warps using this feature cost ^FF0000"+@price+"^000000 zeny";
mes "Select the member to warp to.";
set @menu$,"";
for (set @i,0; @i < @partymembercount; set @i,@i+1) {
if (@i) set @menu$,@menu$+":";
set @menu$,@menu$+@partymembername$[@i]; 
}
next;
set @selection,select(@menu$)-1;
mes "[^0000FFWarper^000000]";
mes "Warp to "+@partymembername$[@selection]+"?";
if (select("Yes","No") == 2) close;
if (getmapxy(@mapname$,@mapx,@mapy,0,@partymembername$[@selection])!=0) goto L_Notfound;
for (set @i,0; @i < getarraysize($nowarpmaps$); set @i,@i+1) {
if (@mapname$ == $nowarpmaps$[@i]) goto mapfail;
}
if(@charge==1)
{
if(Zeny<@price) goto nozeny;
set Zeny, Zeny - @price;
warp @mapname$,@mapx,@mapy;
close;
} else {
warp @mapname$,@mapx,@mapy;
close;
}
L_Notfound:
next;
mes "[^0000FFWarper^000000]";
mes "That player isn't online";
close;
mapfail:
next;
mes "[^0000FFWarper^000000]";
mes "You cannot warp to that map using this function";
close;
nozeny:
next;
mes "[^0000FFParty Warper^000000]";
mes "You do not have enough zeny";
close;
}</div>

Ini Standalone Version
<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>mapname.gat,xx,yy,0 script Warper xxx,{

//|=====================================================================|//
//| Section 1 |//
//|=====================================================================|//
//| Guide: |//
//| Edit "map.gat" to any map you do not want players warping to. |//
//| Add new maps by adding to the list, remove by deleting. |//
//|=====================================================================|//

setarray $nowarpmaps$, "map.gat", "map2.gat", "map3.gat", "map4.gat", "map5.gat", "map6.gat", "map7.gat", "map8.gat", "map9.gat";

//|=====================================================================|//
//| Section 2 |//
//|=====================================================================|//
//| Guide: |//
//| Edit the numbers between , and ; based on the information given |//
//|=====================================================================|//

set @charge,0; //Change this to 1 to make the NPC charge for this function
set @price,1000; //Change this to whatever amount you want the price to be

//|=====================================================================|//
//| Section 3 |//
//|=====================================================================|//

getpartymember(getcharid(1));
set @partymembercount,$@partymembercount;
copyarray @partymembername$,$@partymembername$,@partymembercount;

mes "[^0000FFParty Warper^000000]";
mes "It costs ^FF0000"+@price+"^000000 zeny to use this warper.";
mes "Select the member to warp to.";
set @menu$,"";
for (set @i,0; @i < @partymembercount; set @i,@i+1) {
if (@i) set @menu$,@menu$+":";
set @menu$,@menu$+@partymembername$[@i]; 
}
next;
set @selection,select(@menu$)-1;
mes "[^0000FFParty Warper^000000]";
mes "Warp to "+@partymembername$[@selection]+"?";
if (select("Yes","No") == 2) close;
if (getmapxy(@mapname$,@mapx,@mapy,0,@partymembername$[@selection])!=0) goto L_Notfound;
for (set @i,0; @i < getarraysize($nowarpmaps$); set @i,@i+1) {
if (@mapname$ == $nowarpmaps$[@i]) goto mapfail;
}
if(@charge==1)
{
if(Zeny<@price) goto nozeny;
set Zeny, Zeny - @price;
warp @mapname$,@mapx,@mapy;
close;
} else {
warp @mapname$,@mapx,@mapy;
close;
}
L_Notfound:
next;
mes "[^0000FFParty Warper^000000]";
mes "That player isn't online";
close;
mapfail:
next;
mes "[^0000FFParty Warper^000000]";
mes "You cannot warp to that map using this function";
close;
nozeny:
next;
mes "[^0000FFParty Warper^000000]";
mes "You do not have enough zeny";
close;
}</div>

### boyyss, 2008-10-17

**Script :: NPC AntiBot v.13++**

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>//===== eAthena Script ==========================================================================
//= Anti Bot
//===== Original By =============================================================================
//= Sangreal
//===== Current Version =========================================================================
//= 1.0
//===== Compatible With =========================================================================
//= eAthena SVN
//===== Description =============================================================================
//= When any GM (Lv. 20+) log in.
//================================================================================
===============

- script 99 -1,{
OnPcLoginEvent:
mes "";
mes "Maaf, mengganggu sebentar...";
if (getgmlevel() >=20) goto ex_admin;
next;
mes "";
mes "Tolong masukkan angka berikut, anda mempunyai kesempatan 3x";
next;
set @Number,rand(100,999);
mes "";
mes ""+@Number+"";
next;
input @Num;
if (@Num != @Number) goto ex_salah;
mes "";
mes "Baiklah, kamu benar memasukkan angkanya!";
mes "Silahkan bermain";
close;

ex_admin:
close;

ex_salah:
mes "";
mes "anda mempunyai 2x kesempatan";
mes "Kamu bisa dicurigai sebagai bot!";
set @Number,rand(100,999);
mes "";
mes ""+@Number+"";
next;
input @Num;
if (@Num != @Number) goto ex_salah1;
mes "";
mes "Baiklah, kamu benar memasukkan angkanya!";
mes "Silahkan bermain";
close;

ex_salah1:
mes "";
mes "anda mempunyai 1x lg kesempatan";
mes "Kamu bisa dicurigai sebagai bot!";
set @Number,rand(100,999);
mes "";
mes ""+@Number+"";
next;
input @Num;
if (@Num != @Number) goto ex_salah3;
mes "";
mes "Baiklah, kamu benar memasukkan angkanya!";
mes "Silahkan bermain";
close;

ex_salah3:
atcommand strcharinfo(0) + "@jail "+ strcharinfo(0) +"";
atcommand strcharinfo(0) + "@kamib Karakter dengan Nickname "+ strcharinfo(0) +" telah dipenjarakan, karna diduga menggunakan program illegal.";
mes "Silahkan menikmati penjara "+ strcharinfo(0) +"!!";
}</div>

### VodkaMartini, 2008-11-06

**Script :: AntiBot Bergambar Version 1.4**

by VodkaMartini

NYIT-NYIT CODE

```

//===== 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. 
//= 1.3 Changed script lang & structure
//= Added sound effect for copyright script
//= Changed some variables and names 
//= 1.2 Fixed, Unfreeze Error 
//= 1.1 Pre-Test Bug Fix Unfreeze Error 
//= 1.01 Bug Fix typo & Add Copyright Announcer 
//= 1.0 First Version Open Beta 
//============================================================

//------------------------------------------ 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;
}
```

Gambar + SFX : (di config bisa enable/disable SFX) bug lapor saja...
(http://www.kitaupload.com/download.php?file=540data.7z)

Update:
= Add copyright
= Penyempurnaan system
= Penggantian bahasa.

Known Bug:
= Kurang Spasi pada bagian **"@ban 30mn "+strcharinfo(0)+"";** 
= Unfreeze Error [Fixed - Uncomplete]
= UnFreeze 

Next Plan:
= Available in any map not only login + Jail NPC.

Note:
tolong copyright jangan di remove.

### Darakin, 2008-11-18

**Script :: NPC AntiBot**

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>prontera.gat,1,1,1 script botcheck -1,{
set @advanced,0;
OnPCLoginEvent:
if (getgmlevel() >=21){close;}
getmapxy @MAPNAME$,@X,@Y,0;
if (@MAPNAME$ == "sec_pri.gat" ){close;}
if (@advanced == 1){
if (getgmlevel() <2){set @gmlvl,1; atcommand strcharinfo(0) + "@adjgmlvl 0 "+strcharinfo(0);}
}
if (getgmlevel() <2){set @gmlvl,1; atcommand strcharinfo(0) + "@adjgmlvl 0 "+strcharinfo(0);}
if (failedbotcheck > 0) goto CNTBOTCHECK;
set failedbotcheck,0;
goto CNTBOTCHECK;
CNTBOTCHECK:
set @continuedcheck,0;
set @mynum,0;
set @newcolor0, rand (100000,200000);
set @newcolor1, rand (0,9);
set @newcolor2, rand (0,9);
set @newcolor3, rand (0,9);
set @newcolor4, rand (0,9);
set @newcolor5, rand (100000,200000);
set @newcolor6, rand (100000,200000);
set @newcolor7, rand (100000,200000);
set @realnum1, rand (1,9);
set @realnum2, rand (0,9);
set @realnum3, rand (0,9);
set @realnum4, rand (0,9);
set @fakenum1, rand (1,9);
set @fakenum2, rand (0,9);
set @fakenum3, rand (0,9);
set @fakenum4, rand (0,9);
set @fakenum5, rand (1,9);
set @fakenum6, rand (0,9);
set @fakenum7, rand (0,9);
set @fakenum8, rand (0,9);
set @fakenum9, rand (1,9);
set @fakenum10, rand (0,9);
set @fakenum11, rand (0,9);
set @fakenum12, rand (0,9);
set @fakenumX1, rand (100,9999);
set @fakenumX2, rand (100,9999);
set @fakenumX3, rand (100,9999);
set @fakenumX4, rand (100,9999);
set @fakenumX5, rand (100,9999);
set @fakenumX6, rand (100,9999);
set @fakenumX7, rand (100,9999);
set @fakenumX8, rand (100,9999);
set @falsenum1, rand (10000,20000);
set @falsenum2, rand (10000,20000);
set @falsenum3, rand (10000,20000);
set @falsenum4, rand (10000,20000);
set @falsenum5, rand (10000,20000);
set @falsenum6, rand (10000,20000);
set @falsenum7, rand (10000,20000);
set @falsenum8, rand (10000,20000);
set @fluffnum1, rand (10,20000);
set @fluffnum2, rand (10,20000);
set @fluffnum3, rand (10,20000);
set @fluffnum4, rand (10,20000);
set @decoycheck, rand (1000,9999);
set @num, (@realnum1*1000)+(@realnum2*100)+(@realnum3*10)+(@realnum4*1);
set @whichcheck, rand (1,16);
if (@whichcheck == 1) goto CHECK1;
if (@whichcheck == 2) goto CHECK2;
if (@whichcheck == 3) goto CHECK3;
if (@whichcheck == 4) goto CHECK4;
if (@whichcheck == 5) goto CHECK5;
if (@whichcheck == 6) goto CHECK6;
if (@whichcheck == 7) goto CHECK7;
if (@whichcheck == 8) goto CHECK8;
if (@whichcheck == 9) goto CHECK9;
if (@whichcheck == 10) goto CHECK10;
if (@whichcheck == 11) goto CHECK11;
if (@whichcheck == 12) goto CHECK12;
if (@whichcheck == 13) goto CHECK13;
if (@whichcheck == 14) goto CHECK14;
if (@whichcheck == 15) goto CHECK15;
if (@whichcheck == 16) goto CHECK16;
CHECK1:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^000000|0000000^"+@newcolor6+"0000^0000000000^"+@newcolor7+"^000000000000000000000000|";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^"+@newcolor0+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|000000000000^"+@newcolor7+"0000^0000000000^"+@newcolor6+"^0000000000000000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK2:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^000000|0000000^"+@newcolor6+"0000^0000000000^"+@newcolor7+"^000000000000000000000000|";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^"+@newcolor0+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|000000000000^"+@newcolor7+"0000^0000000000^"+@newcolor6+"^0000000000000000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK3:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^000000|0000000^"+@newcolor6+"0000^0000000000^"+@newcolor7+"^000000000000000000000000|";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^"+@newcolor0+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|000000000000^"+@newcolor7+"0000^0000000000^"+@newcolor6+"^0000000000000000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK4:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^000000|0000000^"+@newcolor6+"0000^0000000000^"+@newcolor7+"^000000000000000000000000|";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^"+@newcolor0+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|000000000000^"+@newcolor7+"0000^0000000000^"+@newcolor6+"^0000000000000000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK5:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^000000|0000000^"+@newcolor6+"0000^0000000000^"+@newcolor0+"0000^00000000000000000000|";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^000000"+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|000000000000^"+@newcolor0+"0000^0000000000^"+@newcolor6+"0000^000000000000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK6:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^000000|0000000^"+@newcolor0+"0000^0000000000^"+@newcolor7+"0000^00000000000000000000|";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^000000"+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|000000000000^"+@newcolor7+"0000^0000000000^"+@newcolor0+"0000^000000000000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK7:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^000000|0000000^"+@newcolor0+"0000^0000000000^"+@newcolor7+"0000^00000000000000000000|";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^000000"+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|000000000000^"+@newcolor0+"0000^0000000000^"+@newcolor6+"0000^000000000000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK8:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^000000|0000000^"+@newcolor6+"0000^0000000000^"+@newcolor0+"0000^00000000000000000000|";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^000000"+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|000000000000^"+@newcolor7+"0000^0000000000^"+@newcolor0+"0000^000000000000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK9:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^000000"+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|0000000^"+@newcolor6+"0000^0000000000^"+@newcolor0+"0000^00000000000000000000|";
mes "^000000|000000000000^"+@newcolor0+"0000^0000000000^"+@newcolor6+"0000^000000000000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK10:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|0000000^"+@newcolor0+"0000^0000000000^"+@newcolor7+"0000^00000000000000000000|";
mes "^000000|000000000000^"+@newcolor7+"0000^0000000000^"+@newcolor0+"0000^000000000000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^000000"+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK11:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|0000000^"+@newcolor0+"0000^0000000000^"+@newcolor7+"0000^00000000000000000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^000000"+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|000000000000^"+@newcolor0+"0000^0000000000^"+@newcolor6+"0000^000000000000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK12:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^000000"+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|0000000^"+@newcolor6+"0000^0000000000^"+@newcolor0+"0000^00000000000000000000|";
mes "^000000|000000000000^"+@newcolor7+"0000^0000000000^"+@newcolor0+"0000^000000000000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK13:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^000000"+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|0000000^"+@newcolor6+"0000^0000000000^"+@newcolor0+"0000^00000000000000000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|000000000000^"+@newcolor0+"0000^0000000000^"+@newcolor6+"0000^000000000000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK14:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|0000000^"+@newcolor0+"0000^0000000000^"+@newcolor7+"0000^00000000000000000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|000000000000^"+@newcolor7+"0000^0000000000^"+@newcolor0+"0000^000000000000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^000000"+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK15:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|0000000^"+@newcolor0+"0000^0000000000^"+@newcolor7+"0000^00000000000000000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^000000"+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|000000000000^"+@newcolor0+"0000^0000000000^"+@newcolor6+"0000^000000000000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
CHECK16:
mes "^000066[Bot Check]: ^990000Type this number:^000000";
mes "^000000|0000000^"+@newcolor6+"0000^0000000000^"+@newcolor0+"0000^00000000000000000000|";
mes "^F7F7F5"+@fluffnum1+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX3+@falsenum5+"^F"+@newcolor3+"F"+@newcolor2+"F"+@newcolor3+@fakenum4+@fakenum5+@fakenum6+@fakenum7+"^F7F7F5"+@falsenum6+@fakenumX7+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum2+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX4+@falsenum8+"^F"+@newcolor4+"F"+@newcolor1+"F"+@newcolor1+@fakenum9+@fakenum10+@fakenum11+@fakenum12+"^F7F7F5"+@falsenum8+@fakenumX8+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^F7F7F5"+@fluffnum3+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX2+@falsenum3+"^F"+@newcolor2+"F"+@newcolor3+"F"+@newcolor4+@fakenum1+@fakenum2+@fakenum3+@fakenum4+"^F7F7F5"+@falsenum4+@fakenumX6+"^000000^"+@newcolor5+"0"+"^000000|";
mes "^000000|000000000000^"+@newcolor7+"0000^0000000000^"+@newcolor0+"0000^000000000000000|";
mes "^F7F7F5"+@fluffnum4+"^000000|^"+@newcolor5+"0^F7F7F5"+@fakenumX1+@falsenum1+"^F"+@newcolor1+"F"+@newcolor4+"F"+@newcolor2+"^000000"+@realnum1+@realnum2+@realnum3+@realnum4+"^F7F7F5"+@falsenum2+@fakenumX5+"^000000^"+@newcolor5+"0"+"^000000|";
if (@continuedcheck == 0) goto MORE_CHECK;
MORE_CHECK:
goto CONTINUED;
close;
CONTINUED:
input @mynum;
if(@mynum < @num || @mynum > @num) goto LOG_FAIL;
set failedbotcheck, 0;
if (@advanced == 1){
if (getgmlevel() <1){atcommand strcharinfo(0) + "@adjgmlvl 1 "+strcharinfo(0);}
}
close;
end;
LOG_FAIL:
if (@mynum == @decoycheck){goto BANTHEBOT2;};
next;
mes "^000066[Bot Check]:^F7F7F5";
mes "^990000Failed.^F7F7F5";
mes "^990000Press ^F7F7F5";
mes "^990000Choose [Character Select]^F7F7F5";
mes "^990000And Try Again...^F7F7F5";
next;
mes "^000066[Bot Check]:^F7F7F5";
mes "^990000Failed.^F7F7F5";
mes "^990000Press ^F7F7F5";
mes "^990000Choose [Character Select]^F7F7F5";
mes "^990000And Try Again...^F7F7F5";
next;
mes "^000066[Bot Check]:^F7F7F5";
mes "^990000Failed.^F7F7F5";
mes "^990000Press ^F7F7F5";
mes "^990000Choose [Character Select]^F7F7F5";
mes "^990000And Try Again...^F7F7F5";
next;
mes "^000066[Bot Check]:^F7F7F5";
mes "^990000Failed.^F7F7F5";
mes "^990000Press ^F7F7F5";
mes "^990000Choose [Character Select]^F7F7F5";
mes "^990000And Try Again...^F7F7F5";
next;
mes "^000066[Bot Check]:^F7F7F5";
mes "^990000Failed.^F7F7F5";
mes "^990000Press ^F7F7F5";
mes "^990000Choose [Character Select]^F7F7F5";
mes "^990000And Try Again...^F7F7F5";
next;
set failedbotcheck,(failedbotcheck+1);
if (failedbotcheck > 1) goto BANTHEBOT;
atcommand strcharinfo(0) + "@request [Bot Check]: "+strcharinfo(0)+" failed the bot check "+failedbotcheck+" time(s) without success.";
atcommand strcharinfo(0) + "@kick "+strcharinfo(0);
close;
BANTHEBOT:
set failedbotcheck,1;
next;
mes "^000066[Bot Check]:^F7F7F5";
mes "^990000PRESS ENTER FIVE MORE TIMES TO BAN YOURSELF FOR BOTTING.^F7F7F5";
mes "^990000IF YOU'RE NOT A BOT, PRESS ALT+F4 NOW!^F7F7F5";
next;
mes "^000066[Bot Check]:^F7F7F5";
mes "^990000PRESS ENTER FOUR MORE TIMES TO BAN YOURSELF FOR BOTTING.^F7F7F5";
mes "^990000IF YOU'RE NOT A BOT, PRESS ALT+F4 NOW!^F7F7F5";
next;
mes "^000066[Bot Check]:^F7F7F5";
mes "^990000PRESS ENTER THREE MORE TIMES TO BAN YOURSELF FOR BOTTING.^F7F7F5";
mes "^990000IF YOU'RE NOT A BOT, PRESS ALT+F4 NOW!^F7F7F5";
next;
mes "^000066[Bot Check]:^F7F7F5";
mes "^990000PRESS ENTER TWO MORE TIMES TO BAN YOURSELF FOR BOTTING.^F7F7F5";
mes "^990000IF YOU'RE NOT A BOT, PRESS ALT+F4 NOW!^F7F7F5";
next;
mes "^000066[Bot Check]:^F7F7F5";
mes "^990000PRESS ENTER ONE MORE TIME TO BAN YOURSELF FOR BOTTING.^F7F7F5";
mes "^990000IF YOU'RE NOT A BOT, PRESS ALT+F4 NOW!^F7F7F5";
next;
set failedbotcheck,(failedbotcheck+1);
atcommand strcharinfo(0) + "@request [Bot Check]: "+strcharinfo(0)+" failed the bot check "+failedbotcheck+" time(s) without success.";
atcommand strcharinfo(0) + "@request [Bot Check]: "+strcharinfo(0)+" was banned for botting, please record this and report for IP ban.";
mes "Congratulations "+strcharinfo(0)+", you've just been banned for botting and now everyone knows about it. I can't believe you're that stupid.";
atcommand strcharinfo(0) + "@ban 11y "+strcharinfo(0);
}</div>

### boyyss, 2009-03-29

**Script :: NPC PVP Warper**

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>
prontera,157,184,5 script Pvp Warper 758,{
mes "[Pvp Warper]";
mes "Hallo saya adalah Penjaga pintu Pvp";
mes "Apakah anda ingin pergi ke pvp room?";
next;
menu "Mau !",oke,"Tidak",no;
oke:
mes "[Pvp Warper]";
mes "Silahkan Pilih Pvp room yg anda inginkan.";
next;
menu "Room 1 [" + getmapusers("guild_vs1.gat") + " / 222]",room,
"Room 2 [" + getmapusers("guild_vs2.gat") + " / 10]",rooom,
"Room 3 [" + getmapusers("guild_vs3.gat") + " / 10]",roooom;

room:
mes "[Pvp Warper]";
mes "Sebentar dicek dulu";
next;
if (getmapusers("guild_vs1.gat") > 222) goto Lsorry;
warp "guild_vs1",0,0;
close;

rooom:
mes "[Pvp Warper]";
mes "Sebentar dicek dulu";
next;
if (getmapusers("guild_vs2.gat") > 10) goto Lsorry;
warp "guild_vs2",0,0;
close;

roooom:
mes "[Pvp Warper]";
mes "Sebentar dicek dulu";
next;
if (getmapusers("guild_vs3.gat") > 10) goto Lsorry;
warp "guild_vs3",0,0;
close;

Lsorry:
mes "[Pvp Warper]";
mes "Maaf Pvp room yang anda pilih penuh";
mes "Silahkan gunakan Room yang lain";
close;

no:
close;
}

//By FerdyChan
</div>

nanti tinggal rubah2 aja.. :smiley_beer:

### Shinigami96, 2009-03-30

**Script :: Combo Casino Pack**
- - - - - - - - - - - - - - - - -
Author: Zigbigidorlu
Version: 8.05
Revision: 2.05
Release: 5.5.8
Designed for: FaithRO

BLACKJACK original code by: kobra_k88
Modified for the CASINO pack

Version numbers
All my scripts use the Ubuntu version number scheme: It's simply the year and month of release.
Revisions follow a similar pattern: Number of release, followed by day of the month.
The release number is simply the date of the release in the format [M.D.Y].

Features:

- Games Manager -

* Allows purchase of tickets.
* Checks number of tokens/current jackpot.
* Supports checking out.

- Slots -

* Simple display system for reels.
* Collective Jackpot.
* Betting system based on user input.
* Vegas-style odds. (Chart in file)
* Return bet on doubles.

- Blackjack -

* Based on standard Blackjack rules.
* Supports "Doubling Down".
* See file for more details.

Setup:

1. The most obvious step: Download the file, then unzip it.
1a. Alternatively, if downloading NPCs individually, skip the unzip step.
2. Upload NPC files to your server.
3. Modify your "scripts_custom.conf" file to point to your new NPCs.

Customize:

- Game Manager -

To change token purchase/cashout:
* Open GamesManager.txt, and modify "@tokenprice" on line 22. (default: 100)

Changelog:

Slot Machines
- 8.04 rv 1.10 -> 8.05 rv 2.05 -
* Complete rewrite.

Blackjack
- 1.0 -> 8.05 rv 2.05 -
* Modified for CASINO pack.

Downloads di attachment

bukan aku yg buat 

@mod sorry klo kepanjangan

### titoet, 2009-05-22

**Script :: NPC Super Hyper Buffer**

<div class='codetop'>NYIT-NYIT CODE</div><div class='codemain' style='height:300px;white-space:pre;overflow:auto'>
prontera.gat,147,174,6 script Jasa buff 750,{
percentheal 100,100;
skilleffect 234,0; sc_start SC_CP_WEAPON,360000,5;
skilleffect 235,0; sc_start SC_CP_SHIELD,360000,5;
skilleffect 236,0; sc_start SC_CP_ARMOR,360000,5;
skilleffect 237,0; sc_start SC_CP_HELM,360000,5;
skilleffect 249,0; sc_start SC_AUTOGUARD,360000,5;
skilleffect 517,0; sc_start SC_GATLINGFEVER,360000,5;
sc_start SC_TWOHANDQUICKEN,300000,5;
skilleffect 495,0; sc_start SC_ONEHAND,360000,5;
skilleffect 268,0; sc_start SC_STEELBODY,360000,5;
skilleffect 384,0; sc_start SC_MELTDOWN,360000,5;
skilleffect 383,0; sc_start SC_WINDWALK,360000,5;
skilleffect 465,0; sc_start SC_KAITE,360000,7;
skilleffect 464,0; sc_start SC_KAUPE,360000,3;
skilleffect 463,0; sc_start SC_KAAHI,360000,7;
skilleffect 462,0; sc_start SC_KAIZEL,360000,7;
skilleffect 8,0; sc_start SC_ENDURE,360000,10;
skilleffect 33,0; sc_start SC_ANGELUS,360000,10;
skilleffect 45,0; sc_start SC_CONCENTRATE,360000,10;
skilleffect 74,0; sc_start SC_MAGNIFICAT,360000,5;
skilleffect 75,0; sc_start SC_GLORIA,360000,5;
skilleffect 459,0; sc_start SC_ADRENALINE2,360000,1;
skilleffect 66,0; sc_start SC_IMPOSITIO,360000,5;
skilleffect 67,0; sc_start SC_SUFFRAGIUM,360000,3;
skilleffect 34,0; sc_start SC_BLESSING,360000,10;
skilleffect 29,0; sc_start SC_INCREASEAGI,360000,10;
skilleffect 112,0; sc_start SC_WEAPONPERFECTION,360000,10;
skilleffect 113,0; sc_start SC_OVERTHRUST,360000,5;
skilleffect 114,0; sc_start SC_MAXIMIZEPOWER,360000,5;
skilleffect 357,0; sc_start SC_CONCENTRATION,360000,5;
skilleffect 355,0; sc_start SC_AURABLADE,360000,5;
skilleffect 155,0; sc_start SC_LOUD,360000,1;
skilleffect 517,0; sc_start SC_GATLINGFEVER,360000,5;
skilleffect 506,0; sc_start SC_INCREASING,360000,5;
sc_start SC_ASPDPOTION0,360000,0;
sc_start SC_ASPDPOTION1,360000,0;
sc_start SC_ASPDPOTION2,360000,0;
sc_start SC_STRFood,360000,10;
sc_start SC_AGIFood,360000,10;
sc_start SC_VITFood,360000,10;
sc_start SC_INTFood,360000,10;
sc_start SC_DEXFood,360000,10;
sc_start SC_LUKFood,360000,10;
sc_start SC_HitFood,1200000,30;
sc_start SC_FleeFood,1200000,30;
sc_start SC_BATKFood,1200000,10;
sc_start SC_MATKFood,120000,10;
skilleffect 380,0; sc_start SC_TRUESIGHT,360000,5;
skilleffect 361,0; sc_start SC_ASSUMPTIO,360000,5;
skilleffect 66,9; sc_start SC_IMPOSITIO,360000,5;
skilleffect 139,0; sc_start SC_POISONREACT,360000,5;
skilleffect 146,0; sc_start SC_AUTOBERSERK,360000,5;
skilleffect 543,0; sc_start SC_NEN,360000,5;
skilleffect 135,0; sc_start SC_CLOAKING,360000,5;
close;
}
</div>