Jaburak

Goodjob! Keep it up!

Recolor of Wandering Minstrel Hat can be found here; http://rathena.org/board/files/file/2800-item-recolor-collection/

Like this? http://rathena.org/board/topic/79130-v20basic-premium-system/ Basic premium system dont have vip buff npc, but it's easy to make one for it.

Works fine in my test server. o_o

Here try this; // -- Script by Emistry, // -- 100% Success Per Refine NPC. // -- Cost 10 Poring Coins [ Default ] moc_para01,25,23,4 script Safe Refine 100% 826,{ set @npcname$,"[^FF0000 الحداد المحترف^000000 ]"; set @items,7227; // Item ID set @amount,15; // Amount E_Refiner: mes @npcname$; mes "اي أدا تريد أن تطورهة ؟ "; mes " "; mes "تكلف : ^FF0000"+@amount+" "+getitemname(@items)+"^000000"; mes "من أجل ^FF0000100% نجاح^000000 التطويرة الواحدة"; dispbottom "أقصي تطوير ألي + 10"; next; switch(select((getequiprefinerycnt(EQI_HEAD_TOP) == 10 || getequipisenableref(EQI_HEAD_TOP) == 0)?"":"قبعة [ ^0000FF"+getequipname(EQI_HEAD_TOP)+"^000000 ]", // Case 1: (getequiprefinerycnt(EQI_ARMOR) == 10 || getequipisenableref(EQI_ARMOR) == 0)?"":"درع صدر [ ^0000FF"+getequipname(EQI_ARMOR)+"^000000 ]", // Case 2: (getequiprefinerycnt(EQI_HAND_L) == 10 || getequipisenableref(EQI_HAND_L) == 0)?"":"اليد اليسري [ ^0000FF"+getequipname(EQI_HAND_L)+"^000000 ]", // Case 3: (getequiprefinerycnt(EQI_HAND_R) == 10 || getequipisenableref(EQI_HAND_R) == 0)?"":"اليد اليمني [ ^0000FF"+getequipname(EQI_HAND_R)+"^000000 ]", // Case 4: (getequiprefinerycnt(EQI_GARMENT) == 10 || getequipisenableref(EQI_GARMENT) == 0)?"":"الوشاح [ ^0000FF"+getequipname(EQI_GARMENT)+"^000000 ]", // Case 5: (getequiprefinerycnt(EQI_SHOES) == 10 || getequipisenableref(EQI_SHOES) == 0)?"":"خذاء [ ^0000FF"+getequipname(EQI_SHOES)+"^000000 ]", // Case 6: (getequiprefinerycnt(EQI_ACC_L) == 10 || getequipisenableref(EQI_SHOES) == 0)?"":"خذاء [ ^0000FF"+getequipname(EQI_ACC_L)+"^000000 ]", // Case 7: (getequiprefinerycnt(EQI_ACC_R) == 10 || getequipisenableref(EQI_SHOES) == 0)?"":"خذاء [ ^0000FF"+getequipname(EQI_ACC_R)+"^000000 ]", // Case 8: "^RR0000ألغاء^000000")) { Case 1: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين .."; successrefitem EQI_HEAD_TOP; delitem @items,@amount; next; goto E_Refiner; Case 2: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين .."; successrefitem EQI_ARMOR; delitem @items,@amount; next; goto E_Refiner; Case 3: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين.."; successrefitem EQI_HAND_L; delitem @items,@amount; next; goto E_Refiner; Case 4: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين .."; successrefitem EQI_HAND_R; delitem @items,@amount; next; goto E_Refiner; Case 5: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 to use my services.."; close; } mes "تين تين تين ..."; successrefitem EQI_GARMENT; delitem @items,@amount; next; goto E_Refiner; Case 6: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين ..."; successrefitem EQI_SHOES; delitem @items,@amount; next; goto E_Refiner; Case 7: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين ..."; successrefitem EQI_ACC_L; delitem @items,@amount; next; goto E_Refiner; Case 8: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين ..."; successrefitem EQI_ACC_R; delitem @items,@amount; next; goto E_Refiner; Case 9: mes @npcname$; mes "تعال مجددا عندما تغير رئيك"; close; } }

// -- Script by Emistry, // -- 100% Success Per Refine NPC. // -- Cost 10 Poring Coins [ Default ] moc_para01,25,23,4 script Safe Refine 100% 826,{ set @npcname$,"[^FF0000 الحداد المحترف^000000 ]"; set @items,7227; // Item ID set @amount,15; // Amount E_Refiner: mes @npcname$; mes "اي أدا تريد أن تطورهة ؟ "; mes " "; mes "تكلف : ^FF0000"+@amount+" "+getitemname(@items)+"^000000"; mes "من أجل ^FF0000100% نجاح^000000 التطويرة الواحدة"; dispbottom "أقصي تطوير ألي + 10"; next; switch(select((getequiprefinerycnt(EQI_HEAD_TOP) == 10 || getequipisenableref(EQI_HEAD_TOP) == 0)?"":"قبعة [ ^0000FF"+getequipname(EQI_HEAD_TOP)+"^000000 ]", // Case 1: (getequiprefinerycnt(EQI_ARMOR) == 10 || getequipisenableref(EQI_ARMOR) == 0)?"":"درع صدر [ ^0000FF"+getequipname(EQI_ARMOR)+"^000000 ]", // Case 2: (getequiprefinerycnt(EQI_HAND_L) == 10 || getequipisenableref(EQI_HAND_L) == 0)?"":"اليد اليسري [ ^0000FF"+getequipname(EQI_HAND_L)+"^000000 ]", // Case 3: (getequiprefinerycnt(EQI_HAND_R) == 10 || getequipisenableref(EQI_HAND_R) == 0)?"":"اليد اليمني [ ^0000FF"+getequipname(EQI_HAND_R)+"^000000 ]", // Case 4: (getequiprefinerycnt(EQI_GARMENT) == 10 || getequipisenableref(EQI_GARMENT) == 0)?"":"الوشاح [ ^0000FF"+getequipname(EQI_GARMENT)+"^000000 ]", // Case 5: (getequiprefinerycnt(EQI_SHOES) == 10 || getequipisenableref(EQI_SHOES) == 0)?"":"خذاء [ ^0000FF"+getequipname(EQI_SHOES)+"^000000 ]", // Case 6: (getequiprefinerycnt(EQI_ACC_L) == 10 || getequipisenableref(EQI_SHOES) == 0)?"":"خذاء [ ^0000FF"+getequipname(EQI_ACC_L)+"^000000 ]", // Case 7: (getequiprefinerycnt(EQI_ACC_R) == 10 || getequipisenableref(EQI_SHOES) == 0)?"":"خذاء [ ^0000FF"+getequipname(EQI_ACC_R)+"^000000 ]", // Case 8: "^RR0000ألغاء^000000")) { Case 1: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين .."; successrefitem EQI_HEAD_TOP; delitem @items,@amount; next; goto E_Refiner; Case 2: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين .."; successrefitem EQI_ARMOR; delitem @items,@amount; next; goto E_Refiner; Case 3: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين.."; successrefitem EQI_HAND_L; delitem @items,@amount; next; goto E_Refiner; Case 4: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين .."; successrefitem EQI_HAND_R; delitem @items,@amount; next; goto E_Refiner; Case 5: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 to use my services.."; close; } mes "تين تين تين ..."; successrefitem EQI_GARMENT; delitem @items,@amount; next; goto E_Refiner; Case 6: mes @npcname$; if ( countitem(@items) < @amount){ mes @npcname$; mes "علي الاقل يجب ان يكون معك ^FF0000"+@amount+" "+getitemname(@items)+"^000000 لتستعمل خدماتي"; close; } mes "تين تين تين ..."; successrefitem EQI_SHOES; delitem @items,@amount; next; goto E_Refiner; Case 7: mes @npcname$; mes "تعال مجددا عندما تغير رئيك"; close; } }

Check your db/packet_db.txt

data\idnum2itemdesctable.txt

Why don't you try to contact them? https://harmonize.it/contact

Saw one from eAthena, but I don't know if it works in rAthena. Just try this; http://www.eathena.ws/board/index.php?showtopic=272608

Link is currently unavailable.

I can't see anything wrong with your line.

Конечно rAthena теперь находится вверху эмулятором Ragnarok. Вы можете скачать последнюю версию здесь. http://svn.rathena.org/svn/rathena/trunk/

Just try it first then tell me if there's still an errors.

Try this; OnInit: disablenpc "RFYL Event"; end; } prontera,135,167,5 script RFYL Event#GM 899,{ if(getgmlevel() < 60 ) end; mes "Hello there GM " + strcharinfo(0) + " !"; next; set .menu$, select(.gm_menu$); switch( select ("Open RFYL Event:No Thanks")) { case 1: // Run For Your Life next; mes "I will now create warps, announce, & warp you."; close2; warp "g_room1-1",230,368; Announce "There will be a 'Run For Your Life' Event Held!",bc_all; sleep2 2500; enablenpc "RFYL Event"; sleep2 2500; Announce "If you want to join, the warp will be open in Prontera. It will be open for 2 minute!",bc_all; sleep2 30000; Announce "You have only 1 minute left to join the event!",bc_all; sleep2 1000; initnpctimer; goto L_Timer; end; close; case 2: mes "[RFYL Event]"; mes "Come back if you change your mind, See Yah!"; close; } L_Timer: OnTimer00000: Announce "Timer has started!",bc_all; end; OnTimer30000: Announce "Thirty Seconds Have Passed By!",bc_all; sleep2 5000; Announce "Hurry to Prontera if you want to join!",bc_all; end; OnTimer40000: Announce "Twenty seconds left!",bc_all; end; OnTimer50000: Announce "Ten seconds left!",bc_all; end; OnTimer55000: Announce "5!",bc_all; sleep2 1000; Announce "4!",bc_all; sleep2 1000; Announce "3!",bc_all; sleep2 1000; Announce "2!",bc_all; sleep2 1000; Announce "1!",bc_all; sleep2 1000; Announce "The warp is now closed!",bc_all; sleep2 1000; disablenpc "RFYL Event"; stopnpctimer; end; OnInit: setarray .gmevents$,"RFYL?"; for ( set .@i, 0; .@i < getarraysize(.gmevents$); set .@i, .@i +1 ) set .gm_menu$, .gm_menu$ + (.gmevents$[.@i]) +":"; disablenpc "RFYL Event"; end; } prontera,156,171,4 script RFYL Event 811,{ mes "[ Run For Your Life Event ]"; mes "Hello, I'm the Run For Your Life Event Manager. My record says that the defending champion on this event was "+$PPEDefendingChampion$+". Anyways, what do you want to do?"; mes " "; mes "Scripted by: ^777777FlareRO^000000"; next; menu "Join Event Now",PPE_Join,"Nevermind",PPE_nvm; PPE_Join:{ if (gethominfo(2) != "null"){ mes "No homunculus is allowed in this event! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } if (getpetinfo(2) != "null"){ mes "No pet is allowed in this event! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } if (checkcart()){ mes "[ Run For Your Life Event ]"; mes "No cart is allowed! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } if (checkfalcon()){ mes "No falcon is allowed! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } if (checkriding()){ mes "No riding is allowed! Sorry "+strcharinfo(0)+" but you can't join this event!"; close; } mes "[ Run For Your Life Event ]"; mes "Good luck "+strcharinfo(0)+"."; mes " "; mes "Scripted by: ^777777FlareRO^000000"; close2; warp "g_room1-1",230,368; end; } PPE_nvm: mes "[ Run For Your Life Event ]"; mes "Okay. Maybe next time."; mes " "; mes "Scripted by: ^777777FlareRO^000000"; close; }

Can you please show us the script?

OnInit: disablenpc "Event NPC Test"; end; }

Replace: 90002,GM_Shield,GM's Shield,5,,10,1,,10,,4,,0xFFFFFFFE,2,2,32,,65,1,3,{ bonus2 bSubEle,Ele_Water,100; bonus2 bSubEle,Ele_Fire,100; bonus2 bSubEle,Ele_Dark,100; bonus2 bSubEle,Ele_Undead,100; bonus2 bSubEle,Ele_Wind,100; bonus2 bSubEle,Ele_Earth,100; bonus2 bSubEle,Ele_Poison,100; bonus2 bSubEle,Ele_Neutral,100; bonus bMdef,100; if(isequipped(2353,5124)) { bonus bDef,2; bonus bMdef,20; } bonus bAllStats,100; bonus bNearAtkDef,100; bonus bLongAtkDef,100; bonus bMagicAtkDef,100; bonus bMiscAtkDef,100; bonus bNoWeaponDamage,100; bonus bNoMagicDamage,100; },{},{} To: 90002,GM_Shield,GM's Shield,5,,10,1,,10,,4,,0xFFFFFFFE,2,2,32,,65,1,3,{ bonus2 bSubEle,Ele_Water,100; bonus2 bSubEle,Ele_Fire,100; bonus2 bSubEle,Ele_Dark,100; bonus2 bSubEle,Ele_Undead,100; bonus2 bSubEle,Ele_Wind,100; bonus2 bSubEle,Ele_Earth,100; bonus2 bSubEle,Ele_Poison,100; bonus2 bSubEle,Ele_Neutral,100; bonus bMdef,100; bonus bAllStats,100; bonus bNearAtkDef,100; bonus bLongAtkDef,100; bonus bMagicAtkDef,100; bonus bMiscAtkDef,100; bonus bNoWeaponDamage,100; bonus bNoMagicDamage,100; if(isequipped(2353,5124)) { bonus bDef,2; bonus bMdef,20; } },{},{}

It's normal buddy. If you already set it to drop.conf then it wont drop any items anymore. Just ignore the 0.01% message when using @mobinfo.

Try this; http://rathena.org/board/topic/58222-ghosts-scripts-latest-ghosts-pvp-system-v13/

trunk/db/item_db.txt 4142,Doppelganger_Card,Doppelganger Card,6,,10,10,,,,,,,,2,,,,,{ bonus bAspdRate,10; },{},{} Change bAspdRate,10; to whatever you want.

getpartymember(getcharid(1),2); copyarray .@partyids[0],$@partymembercid[0],$@partymembercount; set .@count, $@partymembercount; for (set .@a, 0; .@a < .@count; set .@a, .@a + 1) { attachrid .@partyids[.@a]; set .@jobs[.@a], Class; // Check Job from other current jobs for (set .@b, 0; .@b < getarraysize(.@jobs); set .@b, .@b + 1) { if (Class == .@jobs[.@b]) { set .@matches, .@matches + 1; } } // Check if this job as too many if (.@matches > 2) { // Too Many of the Same Job } // Less than 2, so reset counter for next player set .@matches, 0; }

Try this; prontera,200,180,4 script Identifier 123,{ getinventorylist; for( set .@i,0; .@i < @inventorylist_count; set .@i, .@i + 1 ) { if ( @inventorylist_identify[.@i] == 1 ) continue; if ( getskilllv(40) == 1 && sp >= 10 ) heal 0,-10; else if ( countitem(611) ) delitem 611,1; else if ( getskilllv(224) && zeny >= ( 100 - ( 5 + 4 * getskilllv(224) ) )* 2/5 ) set zeny, zeny - ( 100 - ( 5 + 4 * getskilllv(224) ) )* 2/5; else if ( getskilllv(37) && zeny >= ( 100 - ( 5 + 2 * getskilllv(37) ) )* 2/5 ) set zeny, zeny - ( 100 - ( 5 + 2 * getskilllv(37) ) )* 2/5; else if ( zeny >= 40 ) set zeny, zeny - 40; else break; delitem2 @inventorylist_id[.@i],1,0,0,0,0,0,0,0; getitem @inventorylist_id[.@i],1; } }

Try this; // --- ARTHistic's Property --- // --- Please visit http://thdesigns.co.nr --- // --- Scripted By: ARTHistic --- // --- Do Not Revomed the Credits --- pvp_n_4-5,104,98,3 script Treasure Box Summoner 906,{ mes "[ Treasure Box Event ]"; mes "Hello, I'm a new mage here in Midgard. Every hour, I tried to cast my summoning spells and there a chance that i can summon a Treasure Box that will give you items once you destroy it. I only cast my spell on main city and I immediately announce to everyone once I perfectly cast my spells. Anyways, I will give you a little hint..."; if( $@tboxevent == 0 ){ mes "I ^ff0000failed^000000 to summoned the Treasure Box last time.^000000"; }else { mes "^I successfully summoned the Treasure Box last time."; } mes " "; mes "Scripted by: ^777777ARTHistic^000000"; close; OnMinute45: announce "مسابقة البحث عن الكنز ستبدء بعد قليل",0; sleep2 5000; announce "تم ارسال صندوق الكنز الي المدينة ابدئو البحث",0; sleep2 1000; monster "prontera.gat",0,0,"Treasure Box",1845,1,"Treasure Box Summoner::OnTBoxKilled"; end; OnTBoxKilled: announce "لقد تم العثور علي الصندوق الكنز و تم تحطيبه , الفائذ هو "+strcharinfo(0)+"!", bc_all; getitem 674, 3; end; }

You posted it twice, if someone knows how to do your request; they will reply asap.