Untitled


[function bodyhex]
return "0x<strsub 1 10 <hval <body> & 0ffff>>"

[ITEMDEF i_et_global]
ID=i_pet_horse_brown_dk
NAME=Mount Cloner
TYPE=t_eth

ON=@Create
color=078ff
ATTR=04

on=@DropOn_Char
if (<def0.mount_<argo.bodyhex>>)
 tag.ethid=<argo.baseid>
 name=Mount Cloner (<argo.name>)
 color=<argo.color>
 dispid=<argo.icon>
 update
else
 src.sysmessage That can't be mounted.
endif
return 1

[ITEMDEF i_et_hiryu]
DEFNAME=i_et_dragon
ID=i_pet_hiryu
NAME=Ethereal Hiryu
TYPE=t_eth
tdata1=c_hiryu

ON=@Create
color=078ff
ATTR=04

[ITEMDEF i_et_zostrich]
ID=i_pet_ostard_frenzied_2
NAME=Ethereal Zostrich
TYPE=t_eth
tdata1=c_ostard_zostrich

ON=@Create
color=078ff
ATTR=04


[ITEMDEF i_et_oclock]
ID=i_pet_ostard_desert
NAME=Ethereal Oclock
TYPE=t_eth
tdata1=c_ostard_desert

ON=@Create
color=078ff
ATTR=04


[ITEMDEF i_et_orn]
ID=i_pet_ostard_forest_2
NAME=Ethereal Orn
TYPE=t_eth
tdata1=c_ostard_forest

ON=@Create
color=078ff
ATTR=04


[ITEMDEF i_et_beetle]
ID=i_pet_beetle_fire
NAME=Ethereal Beetle
TYPE=t_eth
tdata1=c_giant_beetle

ON=@Create
color=078ff
ATTR=04


[ITEMDEF i_et_horse]
DEFNAME=i_et_eh
ID=i_pet_horse_brown_dk
NAME=Ethereal Horse
TYPE=t_eth
tdata1=c_horse_brown_dk

ON=@Create
color=078ff
ATTR=04


[ITEMDEF i_et_llama]
ID=i_pet_llama
NAME=Ethereal llama
TYPE=t_eth
tdata1=c_llama

ON=@Create
color=078ff
ATTR=04


[ITEMDEF i_et_bear]
ID=i_pet_bear_polar
NAME=Ethereal Bear
TYPE=t_eth
tdata1=c_bear_polar

ON=@Create
color=078ff
ATTR=04


[ITEMDEF i_et_wolf]
ID=i_pet_wolf
NAME=Ethereal Wolf
TYPE=t_eth
tdata1=c_cu_sidhe

ON=@Create
color=078ff
ATTR=04


[ITEMDEF i_et_kirin]
DEFNAME=i_kirin
ID=i_pet_kirin
NAME=Ethereal Kirin
TYPE=t_eth
tdata1=c_kirin

ON=@Create
color=078ff
//ATTR=04

[ITEMDEF i_et_ridge]
DEFNAME=i_ridgeback
ID=i_pet_ridgeback
NAME=Ethereal Ridgeback
TYPE=t_eth
tdata1=c_ridgeback

ON=@Create
//ATTR=04

[Itemdef i_et_swamp_dragon]
ID=i_pet_dragon_swamp
NAME=Ethereal Swamp Dragon
TYPE=t_eth
tdata1=c_swamp_dragon

ON=@Create
color=078ff
ATTR=04


[Itemdef i_et_swamp_dragon_armored]
ID=i_pet_dragon_swamp
NAME=Ethereal Swamp Dragon Armored
TYPE=t_eth
tdata1=c_armored_swamp_dragon

ON=@Create
color=078ff
ATTR=04


[Itemdef i_et_reptalon]
ID=i_pet_reptalon
NAME=Ethereal Reptalon
TYPE=t_eth
tdata1=c_reptalon

ON=@Create
color=078ff
ATTR=04

[Itemdef i_et_ridgeback_savage]
ID=i_pet_ridgeback
NAME=Ethereal Savage Ridgeback
TYPE=t_eth
tdata1=c_savage_ridgeback

ON=@Create
//ATTR=04

[Itemdef i_et_undead]
ID=i_pet_skeletalmount
NAME=Ethereal Undead Horse
TYPE=t_eth
tdata1=c_skeletal_mount

ON=@Create
//ATTR=04

[Itemdef i_et_unicornio]
ID=i_pet_unicorn
NAME=Ethereal Unicorn
tdata1=c_unicorn
TYPE=t_eth

ON=@Create
//ATTR=04

//[ITEMDEF 03ea7] 		//Mounted animation removed from muls, might work on old/patched game versions
//DEFNAME=I_MT_Vortex
//TYPE=T_EQ_HORSE
//LAYER=25

[typedef t_eth]
on=@Dclick
local.id=<qval <tdata1>?<tdata1>:<tag0.ethid>>
if <local.id>
	IF !((<SRC.Body>==c_man) || (<SRC.Body>==c_woman) || (<SRC.Body>==c_elf_male) || (<SRC.Body>==c_elf_female))
		SRC.SysMessage=<def.tradu_<src.account.tag.lang>_eth_notransform>
		Return 1
	Else
		serv.newnpc=<local.id>
		new.tag.eth=<baseid>
		new.color=<color>
		new.tag.etglobal=<tag.ethid>
		new.tag.color=<color>
		ref1=<new>
		serv.newitem=i_memory
		new.color=memory_ipet
		new.link=<src>
		new.cont=<ref1>
		ref1.mount=<src>
		src.events +e_mounted_eth
		remove
	Endif
else
	src.say a
	serv.log Problems with <uid> (t_eth) no tdata1 nor tag.ethid.
	return 1
ENDIF
return 1

on=@DropOn_Ground
cont=<findlayer.21>
if (<tag0.ethid>)
	dispid=<serv.chardef.<tag.ethid>.icon>
	update
endif
return 1

ON=@AfterClick
local.clickmsghue=0480
local.clickmsgtext=You see a real <name>

[events e_mounted_eth]
ON=@Dismount
events -e_mounted_eth
ref1=<argo>
if (<ref1.tag0.eth>)
	serv.newitem=<ref1.tag.eth>
	new.color=<ref1.color>
	if (<ref1.tag0.etglobal>)
		new.tag.ethid=<ref1.tag.etglobal>
		new.dispid=<ref1.icon>
	endif
	new.cont=<findlayer.21>
	findlayer.25.remove
	return 1
endif
[EOF]