Silindi
Bir Kaç Kere U-s Scriptlere Gonderdım Ama Hala Yayınlanmamıs Cok Onceden Yazmıs Oldugum Bır Scp Ilk Denemem Demın Soyle Bır Goz Atıyorduk Scplere Ve Gordum Kullanmak Istedım Ama Daha Cok PvP Serverları Icın Oldugundan Kullanmadım. Butun Hersey Renk Degıstırıyor... Bazı Yerlerınde Hata Olabılır Artık Onlarıda Sız Duzeltırsınız. 56b De Hiç Denemedım Ozmn 55i De Yazmıstım :) Gule Gule Kullanın

//////////////////////////////////////////////
///////////////Scripter By'Tymaron\\\\\\\\\\\\
///////////////////24.02.2005\\\\\\\\\\\\\\\\\
//////////////////////////////////////////////

[ITEMDEF i_gm]
ID=i_robe_gm
NAME=Flash Robe
TYPE=t_eq_script

ON=@Create
ATTR attr_decay

ON=@DClick
EQUIP
RETURN 1

ON=@Equip
flash flashlink
TIMER 1

IF (0<SRC.FINDLAYER(11)> 
SRC.TAG.HaarID=<SRC.FINDLAYER(11).ID> 
SRC.TAG.HaarFarbe=<SRC.FINDLAYER(11).color> 
SRC.FINDLAYER(11).REMOVE 
ELSE 
SRC.TAG.HaarID=0 
ENDIF 

ON=@UnEquip
flash flashend
TIMER -1

IF !(<SRC.TAG.HaarID> == 0) 
SRC.NEWITEM=<src.tag.haarid> 
SRC.ACT.EQUIP 
SRC.FINDLAYER(11).color=<src.tag.HaarFarbe> 
ENDIF 

ON=@Timer
IF !(0<TOPOBJ.ISCHAR>) || (0<TOPOBJ.NPC>)
RETURN 0

ENDIF
TAG.COLOR colors_all
flash flashlayer
TIMER <EVAL &#123;3 5}>
RETURN 1

[FUNCTION flash]

TRYP 0 <ARGS> layer_hand1
TRYP 0 <ARGS> layer_hand2
TRYP 0 <ARGS> layer_shoes
TRYP 0 <ARGS> layer_pants
TRYP 0 <ARGS> layer_shirt
TRYP 0 <ARGS> layer_helm
TRYP 0 <ARGS> layer_gloves
TRYP 0 <ARGS> layer_ring
TRYP 0 <ARGS> layer_light
TRYP 0 <ARGS> layer_collar
TRYP 0 <ARGS> layer_hair
TRYP 0 <ARGS> layer_half_apron
TRYP 0 <ARGS> layer_chest
TRYP 0 <ARGS> layer_wrist
TRYP 0 <ARGS> layer_beard
TRYP 0 <ARGS> layer_tunic
TRYP 0 <ARGS> layer_ears
TRYP 0 <ARGS> layer_arms
TRYP 0 <ARGS> layer_cape
TRYP 0 <ARGS> layer_robe
TRYP 0 <ARGS> layer_skirt
TRYP 0 <ARGS> layer_legs
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>>.ISITEM>)
TRYP 0 CONT.UID.<TAG.<ARGS>>.COLOR <TAG.COLOR>
ENDIF

[FUNCTION flashend]
IF (<CONT.UID.<TAG.<ARGS>>.ISITEM>)
TRYP 0 CONT.UID.<TAG.<ARGS>>.COLOR <TAG.<ARGS>.COLOR>
TRYP 0 TAG.<ARGS>
TRYP 0 TAG.<ARGS>.COLOR
ENDIF
Gereksiz bişey 56b de kasıyordu sanırım bu :no
[function f_renkdegis_nox]
if (<dctag0.degissin> == 1)
local.renk=<r1,1000>
obj=<uid>
obj.findlayer(layer_robe).color=<dlocal.renk>
obj.findlayer(layer_horse).color=<dlocal.renk>
obj.color=<dlocal.renk>
obj.updatex
obj.timerf 3,f_renkdegis_nox
else
src.sysmessage @1153 islem bitti
endif


[ITEMDEF i_parlak_robe]
ID=i_robe_gm
NAME=Flash Robe
weight=2


ON=@Create
ATTR attr_decay
on=@equip
src.ctag.degissin=1
f_renkdegis
return 0
on=@unequip
src.ctag.degissin=
return 0

böyle daha güzel oldu sanırsam.
Silindi
Expert
5.3
boosterx : Gereksiz bişey 56b de kasıyordu sanırım bu :no
:ates
Ne kızıon be eline saglık güsel olmuş. :ters
Silindi
Apprentice
7
Senın Yuzunden Unuttum Saol Noxier'cim Ama Isteyen Kullanır

Üye Ol veya Giriş Yap

Bu forum başlığına mesaj atmak istiyorsanız hemen üye olun veya giriş yapın.