Hesabına erişemeyen eski üyeler Discord üzerinden yardım alabilir.
herkeze hayırlı akşamalr arkadaşlar, Ben hazine scpi buldum bi yerden biraz uğraştım ama sorunu düzeltemedim

Bu kasayı siz acmamıssınız. dio skill de 100 lock anlamadım. yardımcı olurmusunuz lütfen.



[itemdef i_traningchest]
id 0e40
name metal chest
type t_container
DUPELIST=0e41

on=@create
type t_hazinekasa
color 0810
attr 010
morex 7 //calisma kasalari hep 7 olacak
more 0515
morey 985

on=@timer
if (<type>=t_hazinekasa)
else
type t_hazinekasa
color 0810
morex 7
morey 985
more 0515
tag.kilitli 0
endif
timer 60*5
return 1

[typedef t_hazinekasa]
ON=@dclick
if (<type>=t_hazinekasa)
src.sysmessage @0481 Acabilmek icin lockpicking skilline ve lockpicke ihtiyaciniz var.
return 1
else
return 0
endif

ON=@Click
message @0850,,1 [Kilitli]
message @0481 a metal chest
return 1

[ITEMDEF 014fb]
DEFNAME=i_lockpick
TYPE=t_lockpick
DUPELIST=014fc,014fd,014fe
SKILLMAKE=TINKERING 42.1,t_tinker_tools
RESOURCES=2 i_ingot_iron
VALUE=50
WEIGHT=1

CATEGORY=Items by Professions
SUBSECTION=Thief
DESCRIPTION=Lockpick

ON=@TARGON_ITEM
IF (<SRC.TARG.DISTANCE> > 2)
SRC.sysmessage @58,,1x Kasadan cok uzaktasiniz.
RETURN 1
ENDIF

if (<eval <src.targ.tag.kilitli>> == 1)
src.sysmessage @58,,1x Bu kasa kilitli.
return 1
endif

if (<src.targ.dispid> == 0e7e) || (<src.targ.dispid> == i_crate_small)
src.sound=01FF
src.targ.attr=0010
src.sysmessage @58,,1 Kilidi actınız!
src.targ.message @0481 1 dakika icinde silinecek!
src.targ.type t_container
src.targ.color 0
src.targ.timerf 60,remove
src.sayua 0713,6,6,0 * kilidi kırar *
SRC.newnpc 038
src.act.homedist 10
SRC.newnpc 039
src.act.homedist 10
SRC.newnpc 01067
src.act.homedist 10
SRC.newnpc 03
src.act.homedist 10
SRC.newnpc 01a
src.act.homedist 10
SRC.newnpc 03ca
src.act.homedist 10
src.poison 2000
return 1
endif

IF (<SRC.TARG.MOREX>==7)
SRC.SOUND=01FF
SRC.TARG.ATTR=0010
SRC.TARG.MOREY=0
SRC.TARG.MORE=0
SRC.TARG.TYPE=1
SRC.TARG.COLOR=0
SRC.TARG.TIMER=100
src.targ.tag.kilitli 1
SRC.sysmessage @58,,1 Kilidi actınız!
src.consume 1 i_lockpick
IF ( <SRC.LOCKPICKING> < 1000 )
SRC.LOCKPICKING=<SRC.LOCKPICKING>+1
ENDIF
RETURN 1
ENDIF

IF !(<SRC.TARG.MORE>==0515)
	SRC.sysmessage @58,,1x Lockpickleri bunun uzerinde kullanamazsiniz.
	RETURN 1
ENDIF
IF !(<SRC.TARG.morey>==985)
	SRC.sysmessage @58,,1x Bu bir kilitli hazine sandigi degil.
	RETURN 1
ENDIF
IF ( <SRC.LOCKPICKING> < 700 )
	IF RAND(5)==1
		SRC.sysmessage @58,,1x Lockpick'leriniz kırıldı.
		SRC.CONSUME 1 i_lockpick
		SRC.SOUND=0143
		RETURN 1
	ENDIF
ELSE
	IF RAND(10)==1
		SRC.sysmessage @58,,1x Lockpick'leriniz kırıldı.
		SRC.CONSUME 1 i_lockpick
		SRC.SOUND=0143
		RETURN 1
	ENDIF
ELSEIF ( <SRC.LOCKPICKING> < 900 )
	IF RAND(25)==1
		SRC.sysmessage @58,,1x Lockpick'leriniz kırıldı.
		SRC.CONSUME 1 i_lockpick
		SRC.SOUND=0143
		RETURN 1
	ENDIF
ENDIF
IF RAND(5)==1
	SRC.SOUND=0241
	SRC.sysmessage @58,,1 Kilidi acmayı basaramadınız.
	RETURN 1
ENDIF
IF <SRC.TARG.MOREX>==1
	if !(<eval <src.targ.tag.acanuid>> == <src.uid>)
	src.sysmessage @58,,1x Bu kasayı siz acmamıssınız.
	return 1
	endif
	IF (<SRC.LOCKPICKING>>40.0)
		SRC.SOUND=01FF
		//SRC.TARG.ATTR=08010
		SRC.TARG.morey=00
		SRC.TARG.TYPE=1
		SRC.sysmessage @58,,1 Kilidi actiniz.
		src.sayua 0837,6,0,enu * tuzağa yakalanır *
		src.targ.tag.hazinenpc1 1
		src.targ.timerf 60*10,remove
		src.targ.message @07ac 10 dakika sonra silinecek!
		SRC.NEWNPC 038
		src.act.homedist 10
		src.act.events +e_hazinenpc
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.tag.hazinekod1 1
		src.targ.tag.hazinenpc2 1
		SRC.NEWNPC 039
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC 01067
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod3 1
		src.targ.tag.hazinenpc4 1
		SRC.NEWNPC 03
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod4 1
		src.targ.tag.hazinenpc5 1
		SRC.NEWNPC 01a
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod5 1
		src.targ.tag.hazinenpc6 1
		SRC.NEWNPC 03ca
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod6 1
		src.sysmessage @58,,1x Kasayı acabilmek icin yaratıkları kesmelisiniz.
		if rand(3)==1
		src.poison 2000
		endif
		IF RAND(8)==1
		IF ! ( <SRC.LOCKPICKING> > 999 )
		SRC.LOCKPICKING=<SRC.LOCKPICKING>+1
		ENDIF
		ENDIF
		RETURN 1
	ELSE
		SRC.SOUND=0241
		SRC.sysmessage @58,,1x Henuz bu kilidi acacak bilgiye sahip değilsiniz.
		RETURN 1
	ENDIF
ENDIF

IF <SRC.TARG.MOREX>==2
	if !(<eval <src.targ.tag.acanuid>> == <src.uid>)
	src.sysmessage @58,,1x Bu kasayı siz acmamıssınız.
	return 1
	endif
	IF (<SRC.LOCKPICKING>>50.0)
		SRC.SOUND=01FF
		SRC.TARG.morey=00
		SRC.TARG.TYPE=1
		SRC.sysmessage @58,,1 Kilidi actiniz.
		src.sayua 0837,6,0,enu * tuzağa yakalanır *
		src.targ.tag.hazinenpc1 1
		src.targ.timerf 60*10,remove
		src.targ.message @07ac 10 dakika sonra silinecek!
		SRC.NEWNPC 038
		src.act.homedist 10
		src.act.events +e_hazinenpc
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.tag.hazinekod1 1
		src.targ.tag.hazinenpc2 1
		SRC.NEWNPC 039
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC 01067
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod3 1
		src.targ.tag.hazinenpc4 1
		SRC.NEWNPC 03
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod4 1
		src.targ.tag.hazinenpc5 1
		SRC.NEWNPC 01a
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod5 1
		src.targ.tag.hazinenpc6 1
		SRC.NEWNPC 03ca
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod6 1
		src.sysmessage @58,,1x Kasayı acabilmek icin yaratıkları kesmelisiniz.
		if rand(3)==1
			src.poison 2000
		endif
		IF RAND(8)==1
			IF ! ( <SRC.LOCKPICKING> > 999 )
			SRC.LOCKPICKING=<SRC.LOCKPICKING>+1
			ENDIF
		ENDIF
		RETURN 1
	ELSE
		SRC.SOUND=0241
		SRC.sysmessage @58,,1x Henuz bu kilidi acacak bilgiye sahip değilsiniz.
		RETURN 1
	ENDIF
ENDIF

IF <SRC.TARG.MOREX>==3
	if !(<eval <src.targ.tag.acanuid>> == <src.uid>)
	src.sysmessage @58,,1x Bu kasayı siz acmamıssınız.
	return 1
	endif
	IF (<SRC.LOCKPICKING>>60.0)
		SRC.SOUND=01FF
		//SRC.TARG.ATTR=08010
		SRC.TARG.morey=00
		SRC.TARG.TYPE=1
		SRC.sysmessage @58,,1 Kilidi actiniz.
		src.sayua 0837,6,0,enu * tuzağa yakalanır *
		src.targ.tag.hazinenpc1 1
		src.targ.timerf 60*10,remove
		src.targ.message @07ac 10 dakika sonra silinecek!
		SRC.NEWNPC 038
		src.act.homedist 10
		src.act.events +e_hazinenpc
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.tag.hazinekod1 1
		src.targ.tag.hazinenpc2 1
		SRC.NEWNPC 039
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC c_rottin_corpse
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC 01067
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod3 1
		src.targ.tag.hazinenpc4 1
		SRC.NEWNPC c_m_liche_lord
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC 03
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod4 1
		src.targ.tag.hazinenpc5 1
		SRC.NEWNPC 01a
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod5 1
		src.targ.tag.hazinenpc6 1
		SRC.NEWNPC 03ca
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod6 1
		src.sysmessage @58,,1x Kasayı acabilmek icin yaratıkları kesmelisiniz.
		if rand(3)==1
			src.poison 2000
		endif
		IF RAND(8)==1
			IF ! ( <SRC.LOCKPICKING> > 999 )
			SRC.LOCKPICKING=<SRC.LOCKPICKING>+1
			ENDIF
		ENDIF
		RETURN 1
	ELSE
		SRC.SOUND=0241
		SRC.sysmessage @58,,1x Henuz bu kilidi acacak bilgiye sahip değilsiniz.
		RETURN 1
	ENDIF
ENDIF
IF <SRC.TARG.MOREX>==4
	if !(<eval <src.targ.tag.acanuid>> == <src.uid>)
	src.sysmessage @58,,1x Bu kasayı siz acmamıssınız.
	return 1
	endif
	IF (<SRC.LOCKPICKING>>70.0)
		SRC.SOUND=01FF
		//SRC.TARG.ATTR=08010
		SRC.TARG.morey=00
		SRC.TARG.TYPE=1
		SRC.sysmessage @58,,1 Kilidi actiniz.
		src.sayua 0837,6,0,enu * tuzağa yakalanır *
		src.targ.tag.hazinenpc1 1
		src.targ.timerf 60*10,remove
		src.targ.message @07ac 10 dakika sonra silinecek!
		SRC.NEWNPC 038
		src.act.homedist 10
		src.act.events +e_hazinenpc
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.tag.hazinekod1 1
		src.targ.tag.hazinenpc2 1
		SRC.NEWNPC c_rottin_corpse
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC c_rottin_corpse
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC 039
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC 01067
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod3 1
		src.targ.tag.hazinenpc4 1
		SRC.NEWNPC 03
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod4 1
		src.targ.tag.hazinenpc5 1
		SRC.NEWNPC 01a
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod5 1
		src.targ.tag.hazinenpc6 1
		SRC.NEWNPC 03ca
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod6 1
		src.sysmessage @58,,1x Kasayı acabilmek icin yaratıkları kesmelisiniz.
		if rand(3)==1
			src.poison 2000
		endif
		IF RAND(8)==1
			IF ! ( <SRC.LOCKPICKING> > 999 )
			SRC.LOCKPICKING=<SRC.LOCKPICKING>+1
			ENDIF
		ENDIF
		RETURN 1
	ELSE
		SRC.SOUND=0241
		SRC.sysmessage @58,,1x Henuz bu kilidi acacak bilgiye sahip değilsiniz.
		RETURN 1
	ENDIF
ENDIF
IF <SRC.TARG.MOREX>==5
	if !(<eval <src.targ.tag.acanuid>> == <src.uid>)
	src.sysmessage @58,,1x Bu kasayı siz acmamıssınız.
	return 1
	endif
	IF (<SRC.LOCKPICKING>>80.0)
		
		SRC.SOUND=01FF
		//SRC.TARG.ATTR=08010
		SRC.TARG.morey=00
		SRC.TARG.TYPE=1
		SRC.sysmessage @58,,1 Kilidi actiniz.
		src.sayua 0837,6,0,enu * tuzağa yakalanır *
		src.targ.tag.hazinenpc1 1
		src.targ.timerf 60*10,remove
		src.targ.message @07ac 10 dakika sonra silinecek!
		SRC.NEWNPC 038
		src.act.homedist 10
		src.act.events +e_hazinenpc
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.tag.hazinekod1 1
		src.targ.tag.hazinenpc2 1
		SRC.NEWNPC c_M_orc_archer
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC c_rottin_corpse
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC c_M_balron
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC 039
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC 01067
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod3 1
		src.targ.tag.hazinenpc4 1
		SRC.NEWNPC 03
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod4 1
		src.targ.tag.hazinenpc5 1
		SRC.NEWNPC 01a
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod5 1
		src.targ.tag.hazinenpc6 1
		SRC.NEWNPC 03ca
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod6 1
		src.sysmessage @58,,1x Kasayı acabilmek icin yaratıkları kesmelisiniz.
		if rand(3)==1
			src.poison 2000
		endif
		IF RAND(8)==1
			IF ! ( <SRC.LOCKPICKING> > 999 )
			SRC.LOCKPICKING=<SRC.LOCKPICKING>+1
			ENDIF
		ENDIF
		RETURN 1
	ELSE
		SRC.SOUND=0241
		SRC.sysmessage @58,,1x Henuz bu kilidi acacak bilgiye sahip değilsiniz.
		RETURN 1
	ENDIF
ENDIF
IF <SRC.TARG.MOREX>==6
	if !(<eval <src.targ.tag.acanuid>> == <src.uid>)
	src.sysmessage @58,,1x Bu kasayı siz acmamıssınız.
	return 1
	endif
	IF (<SRC.LOCKPICKING>>90.0)
		SRC.SOUND=01FF
		//SRC.TARG.ATTR=08010
		SRC.TARG.morey=00
		SRC.TARG.TYPE=1
		SRC.sysmessage @58,,1 Kilidi actiniz.
		src.sayua 0837,6,0,enu * tuzağa yakalanır *
		src.targ.tag.hazinenpc1 1
		src.targ.timerf 60*10,remove
		src.targ.message @07ac 10 dakika sonra silinecek!
		SRC.NEWNPC 038
		src.act.homedist 10
		src.act.events +e_hazinenpc
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.tag.hazinekod1 1
		src.targ.tag.hazinenpc2 1
		SRC.NEWNPC c_rottin_corpse
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC c_m_balron
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC 039
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod2 1
		src.targ.tag.hazinenpc3 1
		SRC.NEWNPC 01067
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod3 1
		src.targ.tag.hazinenpc4 1
		SRC.NEWNPC 03
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod4 1
		src.targ.tag.hazinenpc5 1
		SRC.NEWNPC 01a
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod5 1
		src.targ.tag.hazinenpc6 1
		SRC.NEWNPC 03ca
		src.act.homedist 10
		src.act.tag.hazinesandikuid <src.targ.uid>
		src.act.events +e_hazinenpc
		src.act.tag.hazinekod6 1
		src.sysmessage @58,,1x Kasayı acabilmek icin yaratıkları kesmelisiniz.
		if rand(3)==1
		src.poison 2000
		endif
		IF RAND(8)==1
		IF ! ( <SRC.LOCKPICKING> > 999 )
		SRC.LOCKPICKING=<SRC.LOCKPICKING>+1
		ENDIF
		ENDIF
		RETURN 1
	ELSE
		SRC.SOUND=0241
		SRC.sysmessage @58,,1x Henuz bu kilidi acacak bilgiye sahip değilsiniz.
		RETURN 1
	ENDIF
ENDIF

[ITEMDEF 014fc]
DUPEITEM=014fb

[ITEMDEF 014fd]
DEFNAME=i_lockpick_set
DUPEITEM=014fb

[ITEMDEF 014fe]
DUPEITEM=014fb

[ITEMDEF i_chest_vesper1]
ID=0e40
defname i_chest_vesper1
name=metal chest
type=t_container_locked


ON=@Create
TYPE=2
MORE=0515
MOREX=7
COLOR=0482
ATTR=010
morey=985

on=@click
if strmatch('<morey>','985'))
message @0481,,1 a metal chest
message @38,,1 [kilitli]
return 1
else
message @0481,,1 a metal chest
message @38,,1 [acık]
return 1
endif

ON=@Timer
serv.newitem i_chest_vesper1
new.p <p>
new.TYPE=2
new.MORE=0515
new.MOREX=7
new.COLOR=0482
new.ATTR=010
new.morey=985
remove
return 1

[ITEMDEF i_chest_vesper2]
defname i_chest_vesper2
ID=0e41
name=metal chest
type=t_container_locked

ON=@Create
TYPE=2
MORE=0515
MOREX=7
COLOR=0482
ATTR=010
morey=985

on=@click
if strmatch('<morey>','985'))
message @0481,,1 a metal chest
message @38,,1 [kilitli]
return 1
else
message @0481,,1 a metal chest
message @38,,1 [acık]
return 1
endif

ON=@Timer
serv.newitem i_chest_vesper2
new.p <p>
new.TYPE=2
new.MORE=0515
new.MOREX=7
new.COLOR=0482
new.ATTR=010
new.morey=985
remove
return 1

[CHARDEF c_m_balr]
DEFNAME=c_m_balr
ID=c_DAEMON_W_SWORD
SOUND=snd_MONSTER_DAEMON1
ICON=i_pet_dragon
DAM=35,60
ARMOR=30
RESOURCES=50 i_ribs_raw,3 i_reag_dragon_blood
CAN=MT_WALK|MT_FLY|MT_USEHANDS|MT_FIRE_IMMUNE
DESIRES=c_DAEMON,i_gold,t_wand
AVERSIONS=r_water,r_mountains

ON=@Create
DORAND 2
	COLOR=0455
	COLOR=0525
ENDDO
DORAND 4
	name Balron
	name Devil
	name Evil
	name Slayer
ENDDO
STR={1650 2050}
DEX={800 900}
INT={915 1225}

PARRYING={90.0 100.0}
MAGERY={590.0 995.0}
MAGICRESISTANCE={290.0 900.0}
TACTICS={90.0 100.0}
WRESTLING={90.0 100.0}

NPC=brain_monster

FAME={7000 9000}
KARMA={-6000 -6999}

ON=@NPCRestock
ITEM=loot_BALRON2

CATEGORY=Monsters
SUBSECTION=Daemons & Gargoyles
DESCRIPTION=Balron


[EOF]
if (<src.targ.dispid> == 0e7e) || (<src.targ.dispid> == i_crate_small)
src.sound=01FF
src.targ.attr=0010
src.sysmessage @58,,1 Kilidi actınız!
src.targ.message @0481 1 dakika icinde silinecek!
src.targ.type t_container
src.targ.color 0

şuraya

src.targ.tag.acanuid <src.uid> ekle

çalışır.

Üye Ol veya Giriş Yap

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