ON=@SUCCESS

FORCHARS <EVAL (<PEACEMAKING>/100)+7>

IF !(<ISPLAYER>) && !(<SRC.FLAGS> & STATF_DEAD) && !(<SRC.FLAGS> & STATF_FREEZE) && !(<ISEVENT.e_peacemaking>) 

IF (RAND(10) == 1)

TIMERF = <EVAL (<SRC.PEACEMAKING>/100)+(<int>/10)>, peacemaking_

sayua 1153,6,6,0 *uyumaya baslar..*

EVENTS = +e_peacemaking

FLAGS &= ~statf_war

MEMORYFINDTYPE.memory_war_targ.remove

IF (RAND(5) == 1)

SRC.TIMERF <EVAL (<SRC.PEACEMAKING>/100)+(<int>/10)>, SKILLGAIN peacemaking 1

ENDIF

ELSE

SRC.SYSMESSAGE basarisiz oldunuz..

RETURN 1

ENDIF

ENDIF

ENDFOR



[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

sayua 1153,6,6,0 *uykunun etkisi gecer.*

ENDIF

Değerlendirmeler

0

Total votes: 0