// ********************************************************************************
// | All Scripts in this file by: Trunks					  |
// | www.majinnet.com/								  |
// | This file may be freely edited for personal use, but may not be distributed  |	
// | in whole or in part, in any format without express written permission from   |
// | Trunks.  									  |
// | E-Mail: MTrunks@saiyan.com   ICQ#: 42340665  Website: Http://majinnet.com/   |
// ********************************************************************************

//---------Being Weapon Dye Stone---------//
[ITEMDEF i_weapondye_stone]
NAME=Weapon Dye Stone [25k]
ID=00edc

ON=@CREATE
TYPE=01
COLOR=0480


ON=@DCLICK
 IF <SRC.RESTEST 25000 i_gold>
 SRC.MENU m_weapon_dye
 ELSE
 SRC.SYSMESSAGE You do not have enough funds to make this transaction.
Return 1 

CATEGORY=Awakening
SUBSECTION=Dye Stones
DESCRIPTION=Weapon Dye Stone

//------Menu Section
[MENU m_weapon_dye]
You can use this stone to dye 1 weapon for 25k.

ON=0 Select a Color From the list below.

ON=0 Ice 
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_ice 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1
ENDIF 


ON=0 Holy 
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_holy
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


ON=0 Snow
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_snow
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1
ENDIF 
  


ON=0 Death 
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_death
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


ON=0 Fire
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_fire
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


ON=0 Metallic Green
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_mg 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


ON=0 Metallic Brown 
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_mb 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


ON=0 Aura Blue 
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_ab 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


ON=0 Forsaken
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_forsaken 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


ON=0 BioHazard
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_biohazard
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 

ON=0 Bone Silver
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_bs 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1  
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 

ON=0 Blood Red
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_br 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 

ON=0 Elven Green
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_eg
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 

ON=0 Silver 
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_silver
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 

ON=0 Charcoal 
IF <SRC.RESTEST 25000 i_gold> 
SRC.NEWITEM=i_ice 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


//----Item Section
[ITEMDEF i_ice] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0480
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1
ENDIF 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 ENDIF 
[ITEMDEF i_holy] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0482
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_snow] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0484
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1  
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_death] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0485
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_fire] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0486
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_mg]
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0487
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1  
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_mb] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0488
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_ab] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0489
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1  
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1  

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_forsaken] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0490
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1  
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_biohazard] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0491
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1  

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_bs] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0492 
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_br] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0493
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_eg] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0494
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_silver] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0495
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_charcoal] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_WEAPON_BOW) | | (<SRC.TARG.TYPE>=t_WEAPON_FENCE) | | (<SRC.TARG.TYPE>=t_WEAPON_SWORD) | | (<SRC.TARG.TYPE>=t_WEAPON_MACE_SHARP)| | (<SRC.TARG.TYPE>=t_WEAPON_MACE) 
SRC.TARG.COLOR=0496
SRC.CONSUME 25000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye WEAPONS with this stone! 
Return 1 
ENDIF 




//------------Begin Armor Dye Stone----------//
[ITEMDEF i_armordye_stone]
NAME=Armor Dye Stone [35k]
ID=00edc

ON=@CREATE
TYPE=01
COLOR=0480


ON=@DCLICK
 IF <SRC.RESTEST 35000 i_gold>
 SRC.MENU m_armor_dye
 ELSE
 SRC.SYSMESSAGE You do not have enough funds to make this transaction.
Return 1 
ENDIF

CATEGORY=Awakening
SUBSECTION=Dye Stones
DESCRIPTION=Armor Dye Stone

//------Menu Section
[MENU m_armor_dye]
You can use this stone to dye armor for 35k.

ON=0 Select a Color From the list below.

ON=0 Ice 
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_ice2 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 



ON=0 Holy 
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_holy2
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


ON=0 Snow
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_snow2
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 
  


ON=0 Death 
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_death2
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


ON=0 Fire
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_fire2
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


ON=0 Metallic Green
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_mg2 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


ON=0 Metallic Brown 
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_mb2 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1  
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


ON=0 Aura Blue 
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_ab2 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1  
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


ON=0 Forsaken
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_forsaken2 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


ON=0 BioHazard
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_biohazard2
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1  
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 

ON=0 Bone Silver
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_bs2 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1  
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 

ON=0 Blood Red
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_br2 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1  
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 

ON=0 Elven Green
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_eg2
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 

ON=0 Silver 
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_silver2
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 

ON=0 Charcoal 
IF <SRC.RESTEST 35000 i_gold> 
SRC.NEWITEM=i_charcoal2 
SRC.ACT.BOUNCE 
SRC.ACT.USE 
Return 1 
ELSE 
SRC.SYSMESSAGE You do not have the proper funds to make this transaction! 
Return 1 
ENDIF 


//----Item Section
[ITEMDEF i_ice2] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the armor to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_ARMOR) 
SRC.TARG.COLOR=0480
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye Armor with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye Armor with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_holy2] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Armor to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_ARMOR) 
SRC.TARG.COLOR=0482
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1
ENDIF 

[ITEMDEF i_snow2] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Armor to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_ARMOR) 
SRC.TARG.COLOR=0484
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1
ELSE 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1
ENDIF 

[ITEMDEF i_death2] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Armor to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_ARMOR) 
SRC.TARG.COLOR=0485
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1  
ELSE 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_fire2] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Armor to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_ARMOR) 
SRC.TARG.COLOR=0486
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_mg2]
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Armor to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_ARMOR) 
SRC.TARG.COLOR=0487
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1  

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_mb2] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Armor to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_ARMOR) 
SRC.TARG.COLOR=0488
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_ab2] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Armor to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_ARMOR) 
SRC.TARG.COLOR=0489
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_forsaken2] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Armor to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_ARMOR) 
SRC.TARG.COLOR=0490
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_biohazard2] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Armor to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_ARMOR) 
SRC.TARG.COLOR=0491
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_bs2] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Armor to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>==10)
SRC.TARG.COLOR=0492 
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_br2] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Armor to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_ARMOR) 
SRC.TARG.COLOR=0493
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1
ELSE 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_eg2] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Weapon to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_ARMOR) 
SRC.TARG.COLOR=0494
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_silver2] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Armor to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_ARMOR) 
SRC.TARG.COLOR=0495
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 
ENDIF 

[ITEMDEF i_charcoal2] 
ID=i_memory 
TYPE=18 

ON=@DCLICK 
TARGET Choose the Armor to color. 

ON=@TARGON_ITEM 
IF (<SRC.TARG.TYPE>=t_ARMOR) 
SRC.TARG.COLOR=0496
SRC.CONSUME 35000 i_gold 
REMOVE // if this does not remove the memory then try SRC.CONSUME=i_??? 
Return 1 
ELSE 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1 

ON=@TARGON_CHAR 
SRC.SYSMESSAGE You can only dye ARMOR with this stone! 
Return 1
ENDIF 