Üye ol    Giriş
  1. Forumlar
  2. Oyunlar
  3. Ultima Online
  4. Sphere Scripting
  5. hazine

hazine

Almora_
Almora_
Members
0
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]
  • 2009-02-28 22:27
  • #1
Basic
Basic
Expert
4
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.
  • 2009-03-01 01:35
  • #2

Üye Ol veya Giriş Yap

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

Discord ile Bağlan
Twitch ile Bağlan
Steam ile Bağlan
Google ile Bağlan