[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

Değerlendirmeler

0

Total votes: 0