Lock Scripti

• DewiLxTr
• 2009-08-17 16:11
• 0 Yorumlar
• 2422 Görüntüleme

Sorun ve sorulariniz için [email protected]

[FUNCTION lock]

SRC.NEWITEM i_memory_target_lock

SRC.ACT.EQUIP

RETURN 1



[ITEMDEF i_memory_target_lock]

ID=i_memory

TYPE=t_eq_script

NAME=lock target



ON=@Create

	ATTR=attr_decay|attr_invis

	TIMER=15



ON=@Equip

	TARGET @07a1  Sayin <src.name> , sabitlenecek esyayi seciniz?

	RETURN 1



ON=@Targon_Item

	IF ((<CONT.TARG.ATTR> & attr_move_never) || (<CONT.TARG.ATTR> & attr_static))

		CONT.TARG.MESSAGE @07a1 Sabitligi kaldirildi.

		CONT.TARG.ATTR=<CONT.TARG.ATTR>&~attr_move_never

		CONT.TARG.ATTR=<CONT.TARG.ATTR>&~attr_static

		CONT.TARG.LINK=04fffffff

	ELSE

		CONT.TARG.MESSAGE @07a1 Esya sabitlenmistir.

		CONT.TARG.ATTR=<CONT.TARG.ATTR>|attr_move_never

		CONT.TARG.LINK=<CONT.UID>

	ENDIF



	TRIGGER=@Timer

	RETURN 1



ON=@Targon_Char

	CONT.SYSMESSAGE @07a1 Canlilari sabitleyemezsiniz.

	TRIGGER=@Timer

	RETURN 1



ON=@Timer

	REMOVE

	RETURN 1



[FUNCTION gate]

IF (strmatch("<args>","britain"))

	var.LOC=1495,1629,10

ELSEIF (strmatch("<args>","star chamber"))

	var.LOC=star chamber

ELSEIF (strmatch("<args>","buc"))

	var.LOC=2706,2163

ELSEIF (strmatch("<args>","cove"))

	var.LOC=2275,1210,0

ELSEIF (strmatch("<args>","jhelom"))

	var.LOC=1383,3815,0

ELSEIF (strmatch("<args>","minoc"))

	var.LOC=2466,544

ELSEIF (strmatch("<args>","moonglow"))

	var.LOC=4442,1172

ELSEIF (strmatch("<args>","nujel'm"))

	var.LOC=3732,1279

ELSEIF (strmatch("<args>","ocllo"))

	var.LOC=3650,2519

ELSEIF (strmatch("<args>","serpent's hold"))

	var.LOC=3010,3371,15

ELSEIF (strmatch("<args>","skara brae"))

	var.LOC=632,2233

ELSEIF (strmatch("<args>","trinsic"))

	var.LOC=1867,2780

ELSEIF (strmatch("<args>","vesper"))

	var.LOC=2899,676,0

ELSEIF (strmatch("<args>","wind"))

	var.LOC=1465,989

ELSEIF (strmatch("<args>","yew"))

	var.LOC=546,992

ELSEIF (strmatch("<args>","papua"))

	var.LOC=5729,3209,-1

ELSEIF (strmatch("<args>","delucia"))

	var.LOC=5272,3995,37

ELSEIF (<EVAL(<args>)> == 0)

	SRC.SYSMESSAGE Komutu yanlis kullandiniz.

	RETURN 1

ELSE

	var.LOC=<args>

ENDIF



SOUND 0217

SRC.ANIM 17

SRC.NEWITEM i_moongate_blue

SRC.ACT.NAME=<ARGS>

SRC.ACT.DISPID=i_moongate_black

SRC.ACT.TYPE=t_script

SRC.ACT.ATTR=attr_decay

SRC.ACT.TIMER=60

SRC.ACT.P=<SRC.P>

SRC.ACT.MOREP=<var.LOC>



var.LOC=0

RETURN 1

Değerlendirmeler

Total votes: 0