[CHARDEF c_chamelon_horse]
DEFNAME=c_chamelon_horse
NAME=Chamelon Horse
ID=c_horse_brown_lt
CAN=MT_WALK|MT_RUN
ON=@CLICK
message @1153,1,1 <str> Str <dex> Dex
MESSAGE @077a <NAME>
src.sysmessage @1153,1,1 Bineğinizin Renginin degismesine yaklasik <timer> saniye var..
Return 1
ON=@Create
str 250
dex 250
int 250
allskills 10000
DORAND 11
color 0868
color 0980
color 0867
color 0866
color 0819
color 0811
color 0812
color 0805
color 07ad
color 077a
color 079e
ENDDO
ATTR 010
TIMER 10
ON=@TIMER
DORAND 11
color 0868
color 0980
color 0867
color 079e
color 0866
color 0819
color 0811
color 0812
color 0805
color 07ad
color 077a
ENDDO
timer 10
return 1
[CHARDEF c_chamelon_horse]
DEFNAME=c_chamelon_horse
NAME=Chamelon Horse
ID=c_horse_brown_lt
CAN=MT_WALK|MT_RUN
ON=@CLICK
message @1153,1,1 <str> Str <dex> Dex
MESSAGE @077a <NAME>
src.sysmessage @1153,1,1 Bineğinizin Renginin degismesine yaklasik <timer> saniye var..
Return 1
ON=@Create
str 250
dex 250
int 250
allskills 10000
on=@dclick
DORAND 11
color 0868
color 0980
color 0867
color 0866
color 0819
color 0811
color 0812
color 0805
color 07ad
color 077a
color 079e
ENDDO
ATTR 010
TIMER 10
ON=@TIMER
DORAND 11
color 0868
color 0980
color 0867
color 079e
color 0866
color 0819
color 0811
color 0812
color 0805
color 07ad
color 077a
ENDDO
timer 10
return 1
[CHARDEF c_chamelon_horse]
DEFNAME=c_chamelon_horse
NAME=Chamelon Horse
ID=c_horse_brown_lt
CAN=MT_WALK|MT_RUN
ON=@CLICK
message @1153,1,1 <str> Str <dex> Dex
MESSAGE @077a <NAME>
src.sysmessage @1153,1,1 Bineğinizin Renginin degismesine yaklasik <timer> saniye var..
Return 1
ON=@Create
str 250
dex 250
int 250
allskills 10000
ATTR attr_decay
ON=@DClick
EQUIP
RETURN 1
ON=@Equip
flash flashlink
TIMER 1
ON=@UnEquip
flash flashend
TIMER -1
ON=@Timer
IF !(0<TOPOBJ.ISCHAR>)
RETURN 0
ENDIF
TAG.COLOR <EVAL {0775 0834}>
flash flashlayer
TIMER <EVAL {1 1}>
RETURN 1
[FUNCTION flash]
TRYP 0 <ARGS> layer_horse
[FUNCTION flashlink]
IF (<SRC.FINDLAYER.<ARGS>>)
TRYP 0 TAG.<ARGS> <SRC.FINDLAYER.<ARGS>.UID>
TRYP 0 TAG.<ARGS>.COLOR <SRC.FINDLAYER.<ARGS>.COLOR>
ENDIF
[FUNCTION flashlayer]
IF (<CONT.UID.<TAG.<ARGS>>.>)
TRYP 0 CONT.UID.<TAG.<ARGS>>.COLOR <TAG.COLOR>
ENDIF
[FUNCTION flashend]
IF (<CONT.UID.<TAG.<ARGS>>.>)
TRYP 0 CONT.UID.<TAG.<ARGS>>.COLOR <TAG.<ARGS>.COLOR>
TRYP 0 TAG.<ARGS>
TRYP 0 TAG.<ARGS>.COLOR
ENDIF
[EOF]
[CHARDEF c_chamelon_horse]
DEFNAME=c_chamelon_horse
NAME=Chamelon Horse
ID=c_horse_brown_lt
CAN=MT_WALK|MT_RUN
ON=@CLICK
message @1153,1,1 <str> Str <dex> Dex
MESSAGE @077a <NAME>
src.sysmessage @1153,1,1 Bineğinizin Renginin degismesine yaklasik <timer> saniye var..
Return 1
ON=@Create
str 250
dex 250
int 250
allskills 10000
ATTR attr_decay
ON=@DClick
EQUIP
RETURN 1
ON=@Equip
flash flashlink
TIMER 1
ON=@UnEquip
flash flashend
TIMER -1
ON=@Timer
IF !(0<TOPOBJ.ISCHAR>)
RETURN 0
ENDIF
TAG.COLOR <EVAL {0775 0834}>
flash flashlayer
TIMER <EVAL {1 1}>
RETURN 1
[FUNCTION flash]
TRYP 0 <ARGS> layer_horse
[FUNCTION flashlink]
IF (<SRC.FINDLAYER.<ARGS>>)
TRYP 0 TAG.<ARGS> <SRC.FINDLAYER.<ARGS>.UID>
TRYP 0 TAG.<ARGS>.COLOR <SRC.FINDLAYER.<ARGS>.COLOR>
ENDIF
[FUNCTION flashlayer]
IF (<CONT.UID.<TAG.<ARGS>>.>)
TRYP 0 CONT.UID.<TAG.<ARGS>>.COLOR <TAG.COLOR>
ENDIF
[FUNCTION flashend]
IF (<CONT.UID.<TAG.<ARGS>>.>)
TRYP 0 CONT.UID.<TAG.<ARGS>>.COLOR <TAG.<ARGS>.COLOR>
TRYP 0 TAG.<ARGS>
TRYP 0 TAG.<ARGS>.COLOR
ENDIF
[EOF]
[CHARDEF c_chamelon_horse]
DEFNAME=c_chamelon_horse
NAME=Chamelon Horse
ID=c_horse_brown_lt
CAN=MT_WALK|MT_RUN
ON=@CLICK
message @1153,1,1 <str> Str <dex> Dex
MESSAGE @077a <NAME>
src.sysmessage @1153,1,1 Bineğinizin Renginin degismesine yaklasik <timer> saniye var..
Return 1
ON=@Create
str 250
dex 250
int 250
allskills 10000
ON=@Equip
DORAND 11
color 0868
color 0980
color 0867
color 0866
color 0819
color 0811
color 0812
color 0805
color 07ad
color 077a
color 079e
ENDDO
ATTR 010
TIMER 10
return 1
ON=@UnEquip
src.sysmessage @60,,1 :.:
return 1
ON=@TIMER
DORAND 11
color 0868
color 0980
color 0867
color 079e
color 0866
color 0819
color 0811
color 0812
color 0805
color 07ad
color 077a
ENDDO
timer 10
return 1
[CHARDEF c_chamelon_horse]
DEFNAME=c_chamelon_horse
NAME=Chamelon Horse
ID=c_horse_brown_lt
CAN=MT_WALK|MT_RUN
ON=@Create
str 250
dex 250
int 250
allskills 10000
item i_timer_chameleon
ON=@CLICK
message @1153,1,1 <str> Str <dex> Dex
MESSAGE @077a <NAME>
src.sysmessage @1153,1,1 Bineğinizin Renginin degismesine yaklasik <timer> saniye var..
Return 1
[itemdef i_timer_chameleon]
id i_eq_script
name Chameleon Timer
on=@create
timer 10
on=@timer
cont.chameleondegis
timer 10
[function chameleondegis]
dorand 10
findid.i_mt_horse_brown_lt.color 0868
findid.i_mt_horse_brown_lt.color 0867
findid.i_mt_horse_brown_lt.color 079e
findid.i_mt_horse_brown_lt.color 0866
findid.i_mt_horse_brown_lt.color 0819
findid.i_mt_horse_brown_lt.color 0811
findid.i_mt_horse_brown_lt.color 0812
findid.i_mt_horse_brown_lt.color 0805
findid.i_mt_horse_brown_lt.color 07ad
findid.i_mt_horse_brown_lt.color 077a
enddo
[CHARDEF c_chamelon_horse]
DEFNAME=c_chamelon_horse
NAME=Chamelon Horse
ID=c_horse_brown_lt
CAN=MT_WALK|MT_RUN
ON=@Create
str 250
dex 250
int 250
allskills 10000
ON=@CLICK
message @1153,1,1 <str> Str <dex> Dex
MESSAGE @077a <NAME>
src.sysmessage @1153,1,1 Bineğinizin Renginin degismesine yaklasik <src.findid.i_timer_chameleon.timer> saniye var..
Return 1
on=@dclick
if (<findid.i_memory.link> == <src.uid>)
src.newitem i_timer_chameleon
new.equip
else
src.sysmessage @08a Error: It's not ur mount
return 1
endif
[itemdef i_timer_chameleon]
id i_eq_script
name Chameleon Timer
on=@equip
timer 10
on=@timer
cont.chameleondegis
timer 10
[function chameleondegis]
dorand 10
findid.i_mt_horse_brown_lt.color 0868
findid.i_mt_horse_brown_lt.color 0867
findid.i_mt_horse_brown_lt.color 079e
findid.i_mt_horse_brown_lt.color 0866
findid.i_mt_horse_brown_lt.color 0819
findid.i_mt_horse_brown_lt.color 0811
findid.i_mt_horse_brown_lt.color 0812
findid.i_mt_horse_brown_lt.color 0805
findid.i_mt_horse_brown_lt.color 07ad
findid.i_mt_horse_brown_lt.color 077a
enddo