Jump to content

caizercafe

Members
 View Profile  See their activity

  • Posts

    62

  • Joined

  • Last visited

 Content Type 

Posts posted by caizercafe

    NEWBIE but want to LEARN !

    in General Support

    Posted

    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

    [Tutorial] How to Create Ragnarok Offline 2013 client [Tutorial]

    in Client-side Support

    Posted

    @caizercafe thank you but I already  did it packet version is 45 and fix mmo.h 's date.

     

    where can I get this YYYY-MM-DDaRagexe_patched.exe <<-- file?

     

    before I got 2013-08-07 somewhere but I  don't know where was it ( if I could get other date's  I might make RO World)

     

    sorry and thank you read my Rep

     

     

    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...  /ok

    Patulong po sa server add item drops to monster

    in Tulong para sa Script at Database

    Posted · Edited by caizercafe

     Longcut version  /ok

    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

    Change Trans Job appearance to 3rd job Appearance

    in Script Requests

    Posted

    A little trick, you can use 'eaclass' commands to save yourself a lot of work:

    set .@job, roclass(eaclass()|EAJL_THIRD);
if (.@job)
	changebase .@job;
    That line will work for all classes; read more about it in trunk/doc/ea_job_system.txt.

    Not sure about the mounts.

     

     

    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.

    [Tutorial] How to Create Ragnarok Offline 2013 client [Tutorial]

    in Client-side Support

    Posted

     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

    Tanong lang about drops.conf

    in Tulong para sa Server

    Posted 

    //      ______  __    __                                 
//     /\  _  \/\ \__/\ \                                
//   __\ \ \L\ \ \ ,_\ \ \___      __    ___      __     
// /'__`\ \  __ \ \ \/\ \  _ `\  /'__`\/' _ `\  /'__`\   
///\  __/\ \ \/\ \ \ \_\ \ \ \ \/\  __//\ \/\ \/\ \L\.\_ 
//\ \____\\ \_\ \_\ \__\\ \_\ \_\ \____\ \_\ \_\ \__/.\_\
// \/____/ \/_/\/_/\/__/ \/_/\/_/\/____/\/_/\/_/\/__/\/_/
//  _   _   _   _   _   _   _     _   _   _   _   _   _
// / \ / \ / \ / \ / \ / \ / \   / \ / \ / \ / \ / \ / \ 
//( e | n | g | l | i | s | h ) ( A | t | h | e | n | a )
// \_/ \_/ \_/ \_/ \_/ \_/ \_/   \_/ \_/ \_/ \_/ \_/ \_/
//
//--------------------------------------------------------------
// eAthena Battle Configuration File
// Originally Translated by Peter Kieser <[email protected]>
// Made in to plainer English by Ancyker
//--------------------------------------------------------------
// Note 1: Value is a config switch (on/off, yes/no or 1/0)
// Note 2: Value is in percents (100 means 100%)
//--------------------------------------------------------------

// If an item is dropped, does it go stright into the users inventory? (Note 1)
item_auto_get: no

// How long does it take for an item to disappear from the floor after it is dropped? (in miliseconds)
flooritem_lifetime: 60000

// Grace time during which only the person who did the most damage to a monster can get the item? (in milliseconds)
item_first_get_time: 3000

// Grace time during which only the first and second person who did the most damage to a monster can get the item? (in milliseconds)
// (Takes effect after item_first_get_time elapses)
item_second_get_time: 1000

// Grace time during which only the first, second and third person who did the most damage to a monster can get the item? (in milliseconds)
// (Takes effect after the item_second_get_time elapses)
item_third_get_time: 1000

// Grace time to apply to MvP reward items when the Most Valuable Player can't get the prize item and it drops on the ground? (in milliseconds)
mvp_item_first_get_time: 10000

// Grace time for the first and second MvP so they can get the item? (in milliseconds)
// (Takes effect after mvp_item_first_get_time elapses)
mvp_item_second_get_time: 10000

// Grace time for the first, second and third MvP so they can get the item? (in milliseconds)
// (Takes effect after mvp_item_second_get_time elapses)
mvp_item_third_get_time: 2000

// Item drop rates (Note 2)

// The rate the common items are dropped (Items that are in the ETC tab, besides card)
item_rate_common: 950000
item_rate_common_boss: 950000
item_drop_common_min: 1
item_drop_common_max: 10000

// The rate healing items are dropped (items that restore HP or SP)
item_rate_heal: 850000
item_rate_heal_boss: 850000
item_drop_heal_min: 1
item_drop_heal_max: 10000

// The rate at which usable items (in the item tab) other then healing items are dropped.
item_rate_use: 950000
item_rate_use_boss: 850000
item_drop_use_min: 1
item_drop_use_max: 10000

// The rate at which equipment is dropped.
item_rate_equip: 850000
item_rate_equip_boss: 850000
item_drop_equip_min: 1
item_drop_equip_max: 10000

// The rate at which cards are dropped
item_rate_card: 850000
item_rate_card_boss: 850000
item_drop_card_min: 1
item_drop_card_max: 10000

// The rate adjustment for the MVP items that the MVP gets directly in their inventory
item_rate_mvp: 850000
item_drop_mvp_min: 1
item_drop_mvp_max: 10000

// The rate adjustment for card-granted item drops.
item_rate_adddrop: 850000
item_drop_add_min: 1
item_drop_add_max: 10000

// Rate adjustment for Treasure Box drops (these override all other modifiers)
item_rate_treasure: 100000
item_drop_treasure_min: 1
item_drop_treasure_max: 10000

// Use logarithmic drops? (Note 1)
// Logarithmic drops scale drop rates in a non-linear fashion using the equation 
// Droprate(x,y) = x * (5 - log(x)) ^ (ln(y) / ln(5))
// Where x is the original drop rate and y is the drop_rate modifier (the previously mentioned item_rate* variables)
// Use the following table for an idea of how the rate will affect drop rates when logarithmic drops are used:
// Y: Original Drop Rate
// X: Rate drop modifier (eg: item_rate_equip)
//  X\Y | 0.01 0.02  0.05  0.10  0.20  0.50  1.00  2.00  5.00 10.00 20.00
// -----+---------------------------------------------------------------
//   50 | 0.01 0.01  0.03  0.06  0.11  0.30  0.62  1.30  3.49  7.42 15.92
//  100 | 0.01 0.02  0.05  0.10  0.20  0.50  1.00  2.00  5.00 10.00 20.00
//  200 | 0.02 0.04  0.09  0.18  0.35  0.84  1.61  3.07  7.16 13.48 25.13
//  500 | 0.05 0.09  0.22  0.40  0.74  1.65  3.00  5.40 11.51 20.00 33.98
// 1000 | 0.10 0.18  0.40  0.73  1.30  2.76  4.82  8.28 16.47 26.96 42.69
// 2000 | 0.20 0.36  0.76  1.32  2.28  4.62  7.73 12.70 23.58 36.33 53.64
// 5000 | 0.50 0.86  1.73  2.91  4.81  9.11 14.45 22.34 37.90 53.91 72.53
//10000 | 1.00 1.67  3.25  5.28  8.44 15.24 23.19 34.26 54.57 72.67 91.13
//20000 | 2.00 3.26  6.09  9.59 14.83 25.49 37.21 52.55 77.70 97.95  100%
//50000 | 5.00 7.87 13.98 21.12 31.23 50.31 69.56 92.48  100%  100%  100%
item_logarithmic_drops: no

// Can the monster's drop rate become 0? (Note 1)
// Default: no (as in official servers).
drop_rate0item: no

// Makes your LUK value affect drop rates on an absolute basis.
// Setting to 100 means each luk adds 0.01% chance to find items
// (regardless of item's base drop rate).
drops_by_luk: 0

// Makes your LUK value affect drop rates on a relative basis.
// Setting to 100 means each luk adds 1% chance to find items
// (So at 100 luk, everything will have double chance of dropping).
drops_by_luk2: 0

// The rate of monsters dropping ores by the skill Ore Discovery (Default is 100)
finding_ore_rate: 100

// Whether or not Marine Spheres and Floras summoned by Alchemist drop items?
// This setting has three available values:
// 0: Nothing drops.
// 1: Only marine spheres drop items.
// 2: All alchemist summons drop items.
alchemist_summon_reward: 1

// Make broadcast ** Player1 won Pupa's Pupa Card (chance 0.01%) ***
// Note: It also announces STEAL skill usage with rare items
// 0 = don't show announces at all
// 1 = show announces for 0.01% drop chance items
// 333 = show announces for 3.33% or lower drop chance items
// 10000 = show announces for all items
rare_drop_announce: 0

    lahat yung iba 50% ayaw tumaas, tas di pa nag ddrop ng napaka tagal. ginwa ko na din disable renewal drop. wala din eh

     

     

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

    .lub to .lua someone know?

    in Database Releases

    Posted

    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

    • Upvote 1

    Enchanter that can enchant 1st to 4th slot

    in Script Requests

    Posted

     

     

    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!

     

    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)

    Enchanter that can enchant 1st to 4th slot

    in Script Requests

    Posted · Edited by caizercafe

     

    sorry for the post.

    can i know, how to change directly to the 2nd slot until 4th slot only?

    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!

    Help on inserting cards

    in Scripting Support

    Posted · Edited by caizercafe

    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! 

     

    Help about Max Level Ranking

    in Scripting Support

    Posted

    delete this part 

            if($Rank$ != "") {
            mes "No one reached the maximum level yet";
            close;
        }

    and plz tell me what happen

     

    It solved my problem! thanks!  /thx   /thx   /thx

     

    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

×
×
  • Create New...