//*//*//*//*//*//*//*//*//*//*//*//*//*//*//*//*//*//
//The Owner Neon
//Tarafindan Fixlenmistir ! ....
//*//*//*//*//*//*//*//*//*//*//*//*//*//*//*//*//*//
//Date = 26 / 07 / 2003 ---- Tum Hakları Saklıdır !
//VERSION=0.56b
//Kullanan Sunucular : Curse,Moniras
//*//*//*//*//*//*//*//*//*//*//*//*//*//*//*//*//*//
[function kufuretti]
[ITEMDEF i_kufurettiver]
ID=i_memory
TYPE=t_eq_script
NAME=Non-Action
ON=@Create
timer 30
ATTR attr_decay|04
On=@equip
target
on=@timer
remove
return 1
On=@targon_char
src.newitem i_kufurkonusamaz
src.act.cont <src.targ.uid>
src.act.timer 1
remove
return 1
[ITEMDEF i_jail2]
ID=i_memory
TYPE=t_eq_script
NAME=Jail
ON=@Create
ATTR attr_decay
On=@Equip
src.go star
CONT.FLAGS=<CONT.FLAGS>&~000000004
TIMER=1
ON=@Timer
if ( <cont> )
if ( <more1> )
cont.sysmessage <EVAL(<more1>)>
more1=<more1>-1
TIMER=1
return 1
else
cont.forgive
cont.go <cont.tag.sonmekan>
remove
endif
endif
return 1
[function kufurdedec]
if !(<src.findid.i_actionyasak>)
forchars 8
if !(<uid>=<src.uid>)
if (<isplayer>)
if !(<isgm>)
if !(<src.isgm>)
if !(<src.findid.i_kufurkonusamaz>)
if !(<findid.i_kufuretti.more>=<src.uid>)
ctag.kufurcu <src.name>
ctag.kufurcuuid <src.uid>
src.newitem i_kufuretti
src.act.cont <uid>
src.act.more <src.uid>
src.act.timer 1
endif
endif
endif
endif
endif
endif
endfor
endif
[itemdef i_kufuretti]
name kufuretti
weight 0
id i_gold
type t_eq_script
layer layer_special
On=@UnEquip
try src.dialog d_kufuretti
return 1
On=@Timer
remove
return 1
[dialog d_kufuretti]
50,50
nomove
resizepic 0 0 5120 210 280
resizepic 10 10 3000 192 260
htmlgump 20 20 170 25 3 1 0
htmlgump 20 60 170 120 0 1 1
htmlgump 38 200 150 25 1 1 0
htmlgump 38 230 150 25 2 1 0
button 20 202 2714 2715 1 0 1
button 20 232 2714 2715 1 0 0
[dialog d_kufuretti text]
<src.ctag.kufurcu> isimli kişi hakaret içeren bir yazı yazdı. Konuşma ve savaşma yasağı olarak ceza almasını ister misiniz?
Evet, rahatsız oldum.
Hayir, rahatsız olmadım.
<def.center><serv.name> Küfür Dedektörü<def.center>
[dialog d_kufuretti button]
On=1
if !(0<src.ctag.kufurcuuid>)
src.smsx bir hata olustu
return 1
elseif (<uid.<src.ctag.kufurcuuid>.findid.i_actionyasak>)
return 1
elseif (<uid.<src.ctag.kufurcuuid>.distance> > 50)
src.smsx Küfür eden kişi yanınızdan çoktan uzaklaştı.
return 1
else
src.newitem i_kufurkonusamaz
src.act.cont <src.ctag.kufurcuuid>
src.act.timer 1
return 1
endif
[ITEMDEF i_kufurkonusamaz]
ID=i_memory
TYPE=t_eq_script
NAME=Non-Action
ON=@Create
timer 1
ATTR attr_decay|04
On=@unequip
timer 1
src.newitem i_actionyasak
src.act.equip
on=@timer
remove
return 1
[ITEMDEF i_actionyasak]
ID=i_memory
TYPE=t_eq_script
NAME=Non-Action
ON=@Create
ATTR attr_decay
timer 1200
On=@unequip
cont.events -e_actionyasak
On=@equip
timer 300
src.events +e_actionyasak
ON=@Timer
cont.events -e_actionyasak
remove
return 1
[events e_actionyasak]
On=@SpellCast
action -1
return 1
On=@SkillStart
if (<src.action> == skill_magery)
skill fail
return 1
endif
if (<src.action> == skill_swordsmanship)
skill fail
return 1
endif
if (<src.action> == skill_fencing)
skill fail
return 1
endif
if (<src.action> == skill_macefighting)
skill fail
return 1
endif
if (<src.action> == skill_wrestling)
skill fail
return 1
endif
if (<src.action> == skill_archery)
skill fail
return 1
endif
if (<src.action> == skill_healing)
skill fail
return 1
endif
on=@attack
smsx Bu durumdayken birine saldiramazsiniz!
return 1
on=@click
if (<findid.i_actionyasak.TIMER> <60)
message @800 Yasak Sure : <FINDID.i_actionyasak.TIMER>sn.
elseif (<findid.i_actionyasak.TIMER> <3600)
message @800 Yasak Sure : <EVAL ((<FINDID.i_actionyasak.TIMER> - (<EVAL ((<FINDID.i_actionyasak.TIMER> / 60) / 60) / 24> * 60 * 60 * 24)) - (<EVAL ((<FINDID.i_actionyasak.TIMER> - (<EVAL ((<FINDID.i_actionyasak.TIMER> / 60) / 60) / 24> * 60 * 60 * 24)) / 60) / 60> * 60 * 60)) / 60>dk.
elseif (<findid.i_actionyasak.TIMER> >3600)
message @800 Yasak Sure : <EVAL ((<FINDID.i_actionyasak.TIMER> - (<EVAL ((<FINDID.i_actionyasak.TIMER> / 60) / 60) / 24> * 60 * 60 * 24)) / 60) / 60>sa.
endif
))
