Anti Edit System !

[events esyacikarmabe]
on=@itemcreate
if (<src.account.plevel> > 1)
try uid.<argo.uid>.tag.tarihisoylebab <serv.rtime>
try uid.<argo.uid>.tag.cikarankim <eval <src.uid>>
serv.WRITEFILE scripts/logs/<src.account.name>.txt  'Item:<act.name>','Cikaran Isim:<serv.uid.<act.tag0.cikarankim>.name>','Cikaran Acc:<serv.uid.<act.tag0.cikarankim>.account.name>'
endif

on=@charcreate
if (<src.account.plevel> > 1)
try uid.<argo.uid>.tag.tarihisoylebab <serv.rtime>
try uid.<argo.uid>.tag.cikarankim <eval <src.uid>>
serv.WRITEFILE scripts/logs/<src.account.name>.txt  'Char:<act.name>','Cikaran Isim:<serv.uid.<act.tag0.cikarankim>.name>','Cikaran Acc:<serv.uid.<act.tag0.cikarankim>.account.name>'
endif

on=@charclick
if !(<act.tag0.cikarankim>==0)
act.message @0799,1,1 [Staff Tarafindan Yapildi]
act.message @0785 Cikaran Isim & Acc : [<serv.uid.<act.tag0.cikarankim>.name>] - [<serv.uid.<act.tag0.cikarankim>.account.name>]
act.message @0785,1,1 Tarih : [<act.tag0.tarihisoylebab>] | Char Ismi : [<act.name>]
return 1
endif
if (<src.account.plevel> < 1)
sysmessage @0787,1,1 Anti Edit Sistem:
sysmessage @0785,1,1 Eger Illegal Oldugunu Dusunuyorsaniz, Lutfen Bunu Yetkiliye Acele olarak Bildiriniz !
return 1
endif

On=@itemclick
if !(<act.tag0.cikarankim>==0)
act.message @0799,1,1 [Staff Tarafindan Yapildi]
act.message @0785 Cikaran Isim & Acc : [<serv.uid.<act.tag0.cikarankim>.name>] - [<serv.uid.<act.tag0.cikarankim>.account>]
act.message @0785,1,1 Tarih : [<act.tag0.tarihisoylebab>] | Esya Ismi : [<act.name>]
return 1
endif
if (<src.account.plevel> < 1)
sysmessage @0787,1,1 Anti Edit Sistem:
sysmessage @0785,1,1 Eger Illegal Oldugunu Dusunuyorsaniz, Lutfen Bunu Yetkiliye Acele olarak Bildiriniz !
return 1
endif

on=@itemdropon_char
if (<src.account.plevel> > 1)
src.sysmessage @0785,1,1 Gorevliler Kimseye Esya veremez !
return 1

on=@chardclick
src.sysmessage @0785,1,1 Gorevliler Yaratiklarin cantalarini acamaz ve ata binemez !
return 1

[FUNCTION WRITEFILE]
IF !(<FILE.INUSE>)
FILE.MODE.CREATE=1
FILE.MODE.APPEND=1
FILE.MODE.WRITEFLAG=1
IF (<FILE.OPEN <STRARG <ARGS>>>)
FILE.WRITELINE <STREAT <ARGS>>
FILE.CLOSE
ENDIF
ENDIF

[eof]