[Comment Peacemaking]
writer: Slothere
date: 27.07.08 - 15:55
version: 056b+
update: 13.02.09 - 15:46
----------------------------------
on=@SUCCESS
IF (<FLAGS> & statf_war)
sys_error Savaş durumundayken kullanamazsınız.
return 1
ELIF (<SRC.FLAGS> & statf_dead) || (<SRC.FLAGS> & statf_freeze)
sys_error Şu anki durumunuzda kullanamazsınız.
return 1
ELIF (<SRC.FINDID(i_peacemaking_timer)>)
sys_error Bu yeteneği tekrar kullanabilmek için bir süre beklemelisiniz.
return 1
ENDIF
IF (<R<EVAL 12 - (<SRC.PEACEMAKING>/100)>> == 1)
FORCHARS <EVAL (<SRC.PEACEMAKING>/100)+2>
IF !(<ISPLAYER>) && !(<ISEVENT.e_peacemaking>)
//src.sysmessage @55 <name>: <EVAL (<EVAL (<SRC.PEACEMAKING>/50)>) + (<EVAL (<SRC.INT> * 0.08)/100>) - (<EVAL (<INT> * 0.02)/100>)>sn
TIMERF = <QVAL (<EVAL (<EVAL (<SRC.PEACEMAKING>/50)>) + (<EVAL (<SRC.INT> * 0.08)/100>) - (<EVAL (<INT> * 0.02)/100>)> < 5) ? 5 : <EVAL (<EVAL (<SRC.PEACEMAKING>/50)>) + (<EVAL (<SRC.INT> * 0.08)/100>) - (<EVAL (<INT> * 0.02)/100>)>>, peacemaking_
sayua 1153,6,6,0 *uyumaya baslar..*
EVENTS = +e_peacemaking
FLAGS &= ~statf_war
FLAGS |= statf_freeze
MEMORYFINDTYPE.memory_war_targ.remove
IF !(<SRC.FINDID(i_peacemaking_timer)>)
SERV.NEWITEM i_peacemaking_timer
SRC.EQUIP <NEW>
NEW.TIMER = 15
ENDIF
ENDIF
ENDFOR
ELSE
SRC.sys_error Başarısız oldunuz.
RETURN 1
ENDIF
[EVENTS e_peacemaking]
ON=@GETHIT
EVENTS -E_PEACEMAKING
ATTACK <SRC>
ON=@HITTRY
ACTION -1
RETURN 1
ON=@ATTACK
ACTION -1
RETURN 1
ON=@NPCACTFIGHT
ACTION -1
RETURN 1
[FUNCTION peacemaking_]
IF (<ISEVENT.e_peacemaking>)
EVENTS = -e_peacemaking
FLAGS &= ~statf_freeze
sayua 1153,6,6,0 *uykunun etkisi gecer*
FORPLAYERS 12
IF !(<ISGM>)
SRC.ATTACK <UID>
RETURN 1
ENDIF
ENDFOR
ENDIF
[ITEMDEF i_peacemaking_timer]
ID = i_gold
TYPE = t_eq_script
WEIGHT = 0
on=@Create
ATTR = attr_static|attr_decay|attr_invis
on=@Timer
REMOVE
RETURN 1
0
Total votes: 0
Yorumlar (0)