caizercafe

thats the tutorial of Cassiel his example is 2013-08-07Ragexe.exe If you want to create your first offline server, make sure to follow each steps. still the same process if you use 2013-08-07Ragexe.exe just edit your version on clientinfo.xml example: 2013-07-03aRagexe.exe = version 38 2013-07-17aRagexe.exe = version 44 2013-08-07Ragexe.exe = version 45 and also edit here Server\trunk\src\common\mmo.h must be the same date of your ragexe #define PACKETVER YYYYMMDD example #define PACKETVER 20130717

Another Guide: Link

I agree with Dynasty. download it here: Link

Refer to this topic: Link or to this topic: Link

try to remove toasty warper, just try

Is this what you are looking for? -> http://k3dt.eu/Ragexe/unpacked/ -> http://k3dt.eu/Ragexe/unpacked/Diffs/ heres the Patcher for these two above -> http://www.mediafire.com/download/fibc47gzvdshp8o/xDiffPatcher.zip Make sure to download the same date...

Go to src/config/renewal.c and disable this #define RENEWAL to // #define RENEWAL or this #define RENEWAL_ASPD to // #define RENEWAL_ASPD

Try mo palitan yung "qshop" ng ibang word, example "rshop", example: Quest Shop 1 mo "qshop" Quest Shop 2 mo "rshop" at dito yan mag uumpisa prontera,145,170,6 script Quest Shop#1 998,{ callfunc "qshop"; } highlight mo yung qshop then replace all mo via notepad++ try mo lang paps

Longcut version 1213,HIGH_ORC,High Orc,High Orc,81,4193,1,1099,1158,1,389,439,101,45,75,16,40,31,69,20,10,12,2,7,43,0x3695,150,1500,500,1000,0,0,0,0,0,0,0,7002,2500,1304,10,999,90,931,7500,912,1300,756,196,508,900,607,5000,0,0,4322,1 Paste this into your db/mob_db2.txt 607 = Ygg 5000 = droprate ======================================================================== on the other hand, make sure you put // on re/mob_db.txt and pre-re/mob_db.txt ex. //1213,HIGH_ORC,High Orc,High Orc,81,4193,1,1099,1158,1,389,439,101,45,75,16,40,31,69,20,10,12,2,7,43,0x3695,150,1500,500,1000,0,0,0,0,0,0,0,7002,2500,1304,10,999,90,931,7500,912,1300,756,196,508,900,607,5000,0,0,4322,1

Read this guide.

Also this guide http://rathena.org/board/topic/83136-adding-custom-items-renewal/

thanks for sharing icariz

Hi Master Euphy, i have this code of yours, {},{ changebase roclass(eaclass()|EAJL_THIRD); },{ changebase Class; } i tested this on the other class and its working fine, it can change Lord Knight to Rune Knight. but on the other hand, i tested this on Ninja to become Kagerou or Oboro but it doesnt work.

find your version in folder Server\trunk\db\packet_db.txt <?xml version="1.0" encoding="euc-kr" ?> <clientinfo> <servicetype>korea</servicetype> <servertype>primary</servertype> <connection> <display>Ragnarok</display> <balloon>Ragnarok</balloon> <desc>Ragnarok</desc> <address>Put your IP Address here</address> <port>6900</port> <version>Your Client Version</version> <langtype>0</langtype> <registrationweb></registrationweb> <aid> <admin></admin> <yellow></yellow> </aid> </connection> </clientinfo> Open folder Server\trunk\src\common and right-click mmo.h choose edit via notepad or notepad++ #define PACKETVER 20130807 Your Packet 2013-08-07 0x369,7,actionrequest,2:6 0x083C,10,useskilltoid,2:4:6 0x437,5,walktoxy,2 0x035F,6,ticksend,2 0x202,5,changedir,2:4 0x70000,6,takeitem,2 0x362,6,dropitem,2:4 0x07EC,8,movetokafra,2:4 0x364,8,movefromkafra,2:4 0x438,10,useskilltopos,2:4:6:8 0x366,90,useskilltoposinfo,2:4:6:8:10 0x096A,6,getcharnamerequest,2 0x368,6,solvecharname,2 0x838,12,searchstoreinfolistitemclick,2:6:10 0x835,2,searchstoreinfonextpage,0 0x819,-1,searchstoreinfo,2:4:5:9:13:14:15 0x811,-1,reqtradebuyingstore,2:4:8:12 0x360,6,reqclickbuyingstore,2 0x817,2,reqclosebuyingstore,0 0x815,-1,reqopenbuyingstore,2:4:8:9:89 0x365,18,bookingregreq,2:4:6 // 0x363,8 CZ_JOIN_BATTLE_FIELD 0x281,-1,itemlistwindowselected,2:4:8:12 0x022D,19,wanttoconnection,2:6:10:14:18 0x802,26,partyinvite2,2 // 0x436,4 CZ_GANGSI_RANK 0x023B,26,friendslistadd,2 0x361,5,hommenu,2:4 0x887,36,storagepassword,2:4:20

una, mag download ka muna ng custom headgear madami dyn sa download section. pag nka DL ka na, meron na yang .spr at .act, ilagay mo lang sa tamang paglagyan dun sa client mo ex. data/sprite at sa data/texture/collection tapos sundan mo tong tutorial na to http://rathena.org/board/topic/83136-adding-custom-items-renewal/

after mo disable renewal drop, ni-recompile mo ba tol?

Open notepad++ Copy this for /r %%x in (*.lub) do ren "%%x" *.lua rmdir /s /q "lub files\chatwndinfo" rmdir /s /q "lub files\optioninfo" del /s *_f.lua del /s *_function.lua pause 5 and paste it on your notepad++ then save it as lubtolua.bat or just save lubtolua if the save as type: is already "batch file" then copy the batch file that you save, and paste inside your folder with lub files then execute it inside your folder

Try to rename the extension name. lub to .lua ex. Filename.lub to Filename.lua Just try

prontera,194,188,4 script Enchant Expert 712,{ mes .npc$; mes "Hello there!"; mes "I can enchant your items,"; mes "for a small fee of "+.pric+"z."; emotion e_no1,0; next; if(select("Yes:No")&2) { mes .npc$; mes "Alright, thanks anyways!"; close; } if(Zeny<.pric) { mes .npc$; mes "I'm sorry you don't have enough Zeny, please come back later."; close; } mes .npc$; mes "Which item would you like to enchant?"; next; while(set(.@a,.@a+1)<=.e_len) { if(getequipid(.@a)>-1) set .@menu$, .@menu$+.eqp$[.@a-1]+"- [^0000FF"+getitemname(getequipid(.@a))+"^000000]:"; else set .@menu$, .@menu$+"^adb4be"+.eqp$[.@a-1]+"- [Empty]^000000:"; } select(.@menu$); set .@eq_loc, @menu; set .@eq_itm, getequipid(.@eq_loc); if(.@eq_itm<0) { mes .npc$; mes "Hmm, I don't think you have anything equipped there."; close; } set .@menu$, ""; set(.@eq,(getiteminfo(.@eq_itm,2)==4?4:.@eq_loc)); for(set(.@b,0);.@b<getarraysize(getd(".itm"+.@eq));set(.@b,.@b+1)) { set(.@items,getd(".itm"+.@eq+"["+.@b+"]")); if(getiteminfo(.@items,2)>-1) if(set(.@c,countitem(.@items))) { set .@menu$, .@menu$+getitemname(.@items)+" x"+.@c+":"; set .@b,.@b+1; set .@item[.@b], .@items; } } if(.@menu$=="") { mes .npc$; mes "Hmm, you don't seem to have any enchantment orbs for that equipment."; close; } mes .npc$; mes "Please, select an enchantment from the menu."; next; select(.@menu$); set .@itm, .@item[@menu]; set .@menu$, ""; set .@a, 0; while((set(.@a,.@a+1)-1)<4) { setd(".@crd"+.@a, getequipcardid(.@eq_loc,.@a-1)); if(getequipcardid(.@eq_loc,.@a-1)) set .@menu$, .@menu$+.@a+.crd_c$[.@a-1]+" Slot- [^a92435"+getitemname(getequipcardid(.@eq_loc,.@a-1))+"^000000]:"; else set .@menu$, .@menu$+.@a+.crd_c$[.@a-1]+" Slot- [^30ad25Empty^000000]:"; } mes .npc$; mes "Select a slot."; next; set(.@slot,select(.@menu$)-1); set .@eqrf, getequiprefinerycnt(.@eq_loc); if(getequipcardid(.@eq_loc,.@slot)) { mes .npc$; mes "Would you like me to remove this card?"; next; if(select("Yes:No")&2) { mes .npc$; mes "Alright, thanks anyways!"; close; } getitem getequipcardid(.@eq_loc,.@slot),1; delitem2 .@eq_itm, 1, 1, .@eqrf, 0, .@crd1, .@crd2, .@crd3, .@crd4; setd(".@crd"+(@menu+1), 0); getitem2 .@eq_itm, 1, 1, .@eqrf, 0, .@crd1, .@crd2, .@crd3, .@crd4; } if(rand(101)>.perc[.@slot]) { mes .npc$; mes "I'm sorry but I've failed you!"; misceffect 155; emotion e_sob,0; set Zeny,Zeny-.pric; close; } set Zeny,Zeny-.pric; delitem .@itm,1; delitem2 .@eq_itm, 1, 1, .@eqrf, 0, .@crd1, .@crd2, .@crd3, .@crd4; setd(".@crd"+(@menu+1), .@itm); getitem2 .@eq_itm, 1, 1, .@eqrf, 0, .@crd1, .@crd2, .@crd3, .@crd4; misceffect .efet; emotion e_no1,0; mes .npc$; mes "All done!"; equip .@eq_itm; close; //NPC Constants OnInit: //=-=-=-=-=-=-=Configuration=-=-=-=-=-=-= set .npc$ , "[^0000FFEnchant Expert^000000]"; // NPC Name set .pric , 1000000; // Price set .efet , 154; // Effect Number setarray .perc , 100,80,50,10; // Percent slot setarray .crd_c$, "st", "nd", "rd", "th"; // Count setarray .itm3 , 4760; // Sheilds setarray .itm2 , 4761; // Armor setarray .itm5 , 4762; // Garment setarray .itm6 , 4763, 4764; // Footgear setarray .itm7 , 4765; // Accessory1 setarray .itm8 , 4766; // Accessory2 setarray .itm4 , 4765; // Weapon setarray .itm10 , 4766; // Low Headgear setarray .itm9 , 4767; // Mid Headgear setarray .itm1 , 4767; // Upper Headgear setarray .eqp$ , "Upper Headgear", "Armor", "Left Hand", "Right Hand", "Garment", "Shoes", "Accessory1", "Accessory2", "Mid Headgear", "Low Headgear"; set .e_len , getarraysize(.eqp$); //=-=-=-=-=-=-=-=-Skorm-=-=-=-=-=-=-=-=-= } Hello again sir Skorm, ive got an error when enchanting on footgear with an item ID of 4764 setarray .itm6 , 4763, 4764; // Footgear Here's the error [Error]: script:delitem: unknown item "0". [Debug]: Source (NPC): Enchant Expert at ayothaya (171,148)

thanks Capuche

Wow! super thank you Skorm!! thanks a lot!

prontera,194,188,4 script Enchant Expert 712,{ mes .npc$; mes "Hello there!"; mes "I can enchant your items,"; mes "for a small fee of "+.pric+"z."; emotion e_no1,0; next; if(select("Yes:No")&2) { mes .npc$; mes "Alright, thanks anyways!"; close; } if(Zeny<.pric) { mes .npc$; mes "I'm sorry you don't have enough Zeny, please come back later."; close; } mes .npc$; mes "Which item would you like to enchant?"; next; while(set(.@a,.@a+1)<=.e_len) { if(getequipid(.@a)>-1) set .@menu$, .@menu$+.eqp$[.@a-1]+"- [^0000FF"+getitemname(getequipid(.@a))+"^000000]:"; else set .@menu$, .@menu$+"^adb4be"+.eqp$[.@a-1]+"- [Empty]^000000:"; } select(.@menu$); set .@eq_loc, @menu; set .@eq_itm, getequipid(.@eq_loc); if(.@eq_itm<0) { mes .npc$; mes "Hmm, I don't think you have anything equipped there."; close; } set .@menu$, ""; set .@a, .en_orb[0]; while((set(.@a,.@a+1)-1)<=.en_orb[1]) if(getiteminfo(.@a-1,2)>-1) if(set(.@c,countitem(.@a-1))) { set .@menu$, .@menu$+getitemname(.@a-1)+" x"+.@c+":"; set .@b,.@b+1; set .@item[.@b], .@a-1; } if(.@menu$=="") { mes .npc$; mes "Hmm, you don't seem to have any enchantment orbs."; close; } mes .npc$; mes "Please, select an enchantment from the menu."; next; select(.@menu$); set .@itm, .@item[@menu]; set .@menu$, ""; set .@a, 0; while((set(.@a,.@a+1))<4) { if(getequipcardid(.@eq_loc,.@a)) set .@menu$, .@menu$+(.@a+1)+.crd_c$[.@a]+" Slot- [^a92435"+getitemname(getequipcardid(.@eq_loc,.@a))+"^000000]:"; else set .@menu$, .@menu$+(.@a+1)+.crd_c$[.@a]+" Slot- [^30ad25Empty^000000]:"; } setarray .@card, getequipcardid(.@eq_loc,0), getequipcardid(.@eq_loc,1), getequipcardid(.@eq_loc,2), getequipcardid(.@eq_loc,3); mes .npc$; mes "Select a slot."; next; set .@men, select(.@menu$); set .@eqrf, getequiprefinerycnt(.@eq_loc); if(getequipcardid(.@eq_loc,@menu)) { mes .npc$; mes "Would you like me to remove this card?"; next; if(select("Yes:No")&2) { mes .npc$; mes "Alright, thanks anyways!"; close; } getitem getequipcardid(.@eq_loc,.@men),1; unequip(.@eq_loc); delitem2 .@eq_itm, 1, 1, .@eqrf, 0, .@card[0], .@card[1], .@card[2], .@card[3]; set .@card[.@men], 0; getitem2 .@eq_itm, 1, 1, .@eqrf, 0, .@card[0], .@card[1], .@card[2], .@card[3]; } if(rand(100)>.perc) { mes .npc$; mes "I'm sorry but I've failed you!"; misceffect 155; emotion e_sob,0; set Zeny,Zeny-.pric; close; } set Zeny,Zeny-.pric; delitem .@itm,1; delitem2 .@eq_itm, 1, 1, .@eqrf, 0, .@card[0], .@card[1], .@card[2], .@card[3]; set .@card[.@men], .@itm; getitem2 .@eq_itm, 1, 1, .@eqrf, 0, .@card[0], .@card[1], .@card[2], .@card[3]; misceffect .efet; emotion e_no1,0; mes .npc$; mes "All done!"; equip .@eq_itm; close; //NPC Constants OnInit: //=-=-=-=-=-=-=Configuration=-=-=-=-=-=-= set .npc$ , "[^0000FFEnchant Expert^000000]"; // NPC Name set .pric , 1000000; // Price set .efet , 154; // Effect Number set .perc , rand(50,80); // Percent setarray .crd_c$, "st", "nd", "rd", "th"; // Count setarray .en_orb, 4700, 4862; // Range of IDs selected for enchanting. setarray .eqp$ , "Upper Headgear", "Armor", "Left Hand", "Right Hand", "Garment", "Shoes", "Accessory1", "Accessory2", "Mid Headgear", "Low Headgear"; set .e_len , getarraysize(.eqp$); //=-=-=-=-=-=-=-=-Skorm-=-=-=-=-=-=-=-=-= } is it possible to make this? Specific ID to a Specific Item. This are the actual ID's: ID 4760 -> is for Shields ID 4761 -> is for Armor ID 4762 -> is for Garment ID 4763 and 4764 -> is for Footgear ID 4765 -> is for Weapon ID 4766 -> is for Lower Headgear ID 4767 -> is for Upper/Middle Headgear There's also a chance to break the equipment's and weapons when enchanting. 1 slot = 100% 2 slot = 80% 3 slot = 50% 4 slot = 10% Thanks in Advance!

hey guys, i need help on this script, prontera,194,188,4 script Enchant Expert 712,{ mes .npc$; mes "Hello there!"; mes "I can enchant your items,"; mes "for a small fee of "+.pric+"z."; emotion e_no1,0; next; if(select("Yes:No")&2) { mes .npc$; mes "Alright, thanks anyways!"; close; } if(Zeny<.pric) { mes .npc$; mes "I'm sorry you don't have enough Zeny, please come back later."; close; } mes .npc$; mes "Which item would you like to enchant?"; next; while(set(.@a,.@a+1)<=.e_len) { if(getequipid(.@a)>-1) set .@menu$, .@menu$+.eqp$[.@a-1]+"- [^0000FF"+getitemname(getequipid(.@a))+"^000000]:"; else set .@menu$, .@menu$+"^adb4be"+.eqp$[.@a-1]+"- [Empty]^000000:"; } select(.@menu$); set .@eq_loc, @menu; set .@eq_itm, getequipid(.@eq_loc); if(.@eq_itm<0) { mes .npc$; mes "Hmm, I don't think you have anything equipped there."; close; } set .@menu$, ""; set .@a, .en_orb[0]; while((set(.@a,.@a+1)-1)<=.en_orb[1]) if(getiteminfo(.@a-1,2)>-1) if(set(.@c,countitem(.@a-1))) { set .@menu$, .@menu$+getitemname(.@a-1)+" x"+.@c+":"; set .@b,.@b+1; set .@item[.@b], .@a-1; } if(.@menu$=="") { mes .npc$; mes "Hmm, you don't seem to have any enchantment orbs."; close; } mes .npc$; mes "Please, select an enchantment from the menu."; next; select(.@menu$); set .@itm, .@item[@menu]; set .@menu$, ""; set .@a, 0; while((set(.@a,.@a+1)-1)<4) { setd(".@crd"+.@a, getequipcardid(.@eq_loc,.@a-1)); if(getequipcardid(.@eq_loc,.@a-1)) set .@menu$, .@menu$+.@a+.crd_c$[.@a-1]+" Slot- [^a92435"+getitemname(getequipcardid(.@eq_loc,.@a-1))+"^000000]:"; else set .@menu$, .@menu$+.@a+.crd_c$[.@a-1]+" Slot- [^30ad25Empty^000000]:"; } mes .npc$; mes "Select a slot."; next; select(.@menu$); set .@eqrf, getequiprefinerycnt(.@eq_loc); if(getequipcardid(.@eq_loc,@menu-1)) { mes .npc$; mes "Would you like me to remove this card?"; next; if(select("Yes:No")&2) { mes .npc$; mes "Alright, thanks anyways!"; close; } getitem getequipcardid(.@eq_loc,@menu-1),1; delitem2 .@eq_itm, 1, 1, .@eqrf, 0, .@crd1, .@crd2, .@crd3, .@crd4; setd(".@crd"+@menu, 0); getitem2 .@eq_itm, 1, 1, .@eqrf, 0, .@crd1, .@crd2, .@crd3, .@crd4; } if(rand(100)>.perc) { mes .npc$; mes "I'm sorry but I've failed you!"; misceffect 155; emotion e_sob,0; set Zeny,Zeny-.pric; close; } set Zeny,Zeny-.pric; delitem .@itm,1; delitem2 .@eq_itm, 1, 1, .@eqrf, 0, .@crd1, .@crd2, .@crd3, .@crd4; setd(".@crd"+@menu, .@itm); getitem2 .@eq_itm, 1, 1, .@eqrf, 0, .@crd1, .@crd2, .@crd3, .@crd4; misceffect .efet; emotion e_no1,0; mes .npc$; mes "All done!"; equip .@eq_itm; close; //NPC Constants OnInit: //=-=-=-=-=-=-=Configuration=-=-=-=-=-=-= set .npc$ , "[^0000FFEnchant Expert^000000]"; // NPC Name set .pric , 1000000; // Price set .efet , 154; // Effect Number set .perc , rand(50,80); // Percent setarray .crd_c$, "st", "nd", "rd", "th"; // Count setarray .en_orb, 4700, 4862; // Range of IDs selected for enchanting. setarray .eqp$ , "Upper Headgear", "Armor", "Left Hand", "Right Hand", "Garment", "Shoes", "Accessory1", "Accessory2", "Mid Headgear", "Low Headgear"; set .e_len , getarraysize(.eqp$); //=-=-=-=-=-=-=-=-Skorm-=-=-=-=-=-=-=-=-= } ALREADY SOLVED!

alright!! thank you Dynasty!! its working fine now!

It solved my problem! thanks! anyway, is theres a way to solve this? it starts with number 0 not number 1 ex. [Caizer] // name of the npc 0 - ahura mazda 1 - centaur 2 - kultuog 3 - nabistak