1. isteğini yapmaya başlıyorum şimdi deneyecem en azından
2.isteğine gelirsek
[events esyacikarmabe]
on=@itemcreate
if (<src.account.plevel> > 2)
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> > 2)
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>==2)
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> < 2)
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
[events e_staff_spawnbit]
On=@ItemDClick
if ((<act.type> == t_spawn_char))
try uid.<argo.uid>.tag.tiklayankim <eval <src.uid>>
src.sysmessage @30 Stafflar Bunu Yapamaz!!
src.sysmessage @0785 <account>.txt dosyasina kaydedildi.
serv.WRITEFILE scripts/logs/<src.account.name>.txt <serv.uid.<act.tag0.cikarankim>.name> isimli kisi <serv.rtime> zamaninda <region.name> ' da <act.dispid> Spawniyla oynadi
src.s <act.dispid> Spawniyla Oynuyorum, Loglara Kaydedildim.
src.tag.s x
return 1
return 1
endif
if (<act.baseid> == i_staff_taming)
src.sysmessage @080a Taming Staff Kullanmak Yasak!
return 1
endif
On=@itemPickUp_Ground
if (<act.type> == t_corpse)
try uid.<argo.uid>.tag.tiklayankim <eval <src.uid>>
src.sysmessage @30 Stafflar Bunu Yapamaz!!
src.sysmessage @0785 <account>.txt dosyasina kaydedildi.
serv.WRITEFILE scripts/logs/<src.account.name>.txt <serv.uid.<act.tag0.cikarankim>.name> isimli kisi <serv.rtime> zamaninda <region.name> ' da Ceset tasiyor.
src.s Ceset Tasiyorum, Loglara Kaydedildim.
src.tag.s x
return 1
endif
if ((<src.targ.type> == t_spawn_char))
try uid.<argo.uid>.tag.tiklayankim <eval <src.uid>>
src.sysmessage @30 Stafflar Bunu Yapamaz!!
src.sysmessage @0785 <account>.txt dosyasina kaydedildi.
serv.WRITEFILE scripts/logs/<src.account.name>.txt <serv.uid.<act.tag0.cikarankim>.name> isimli kisi <serv.rtime> zamaninda <region.name> ' da <targ.dispid> Spawnını Tasimaya Kalkisti.
src.s Spawnlari Kurcaliyorum, Loglara Kaydedildim.
src.tag.s x
return 1
endif
[function f_oncommand]
if <src.account.plevel> > 1
if !(strmatch('<strsub 0 2 <args>>','pg')) || !(strmatch('<strsub 0 5 <args>>','mtele')) || !(strmatch('<strsub 0 4 <args>>','pg d')) || !(strmatch('<strsub 0 4 <args>>','pg m'))
file.close
IF !(<FILE.INUSE>)
FILE.MODE.APPEND=1
IF (<FILE.OPEN C:\sphere\STAFFLOG.TXT>)
FILE.WRITELINE <src.name> adli staff (plevel : <src.account.plevel>) <src.p> koordinatinda , <serv.rtime> tarihinde <args> adli komutu kullandi. Ayrica bu kisinin uidi : <src.uid>
file.writeline " "
file.close
endif
endif
endif
if (strmatch('<args>','add')) && (<src.account.plevel> >= 4)
return 0
else
if (strmatch('<strsub 0 6 <args>>','add i_')) || (strmatch('<strsub 0 9 <args>>','static i_')) && (<src.account.plevel> >= 4)
if !(strmatch('<src.account>','qutila'))
if (strmatch('<strsub 0 3 <args>>','add'))
src.addi <strsub 4 50 <args>>
return 1
endif
endif
elif (strmatch('<strsub 0 6 <args>>','add c_')) && (<src.account.plevel> >= 4)
if !(strmatch('<src.account>','qutila'))
if (strmatch('<strsub 0 3 <args>>','add'))
src.addc <strsub 4 50 <args>>
return 1
endif
endif
endif
endif
if (<src.account.plevel> > 6)
if (strmatch('<strsub 0 3 <args>>','dupe'))
say asdasr
src.mydupe
return 1
endif
endif
//if (<src.account.plevel> > 1)
// if (strmatch('<strsub 0 6 <args>>','remove'))
// src.targetf removef
// src.sysmessage @50 Neyi sileceksiniz?
// return 1
// endif
//endif
[function mydupe]
if (<argn1>==0)
targetf mydupe 1
else
newitem <targ.dispid>
new.p=<targ.p>
endif
[function removef]
if (<src.account.plevel> < 4)
if (<argo.topobj>)
if (<argo.topobj.isplayer>)
src.sysmessage @50,,1 Player'dan bir sey silemezsin.
return 1
endif
endif
endif
try uid.<argo.uid>.remove
[FUNCTION addi]
IF !(<ARGN>)
IF (<ISEMPTY <DEF.<ARGS>>>)
SYSMESSAGE @38,,1 Gecersiz bir komut kullandiniz
RETURN 0
ENDIF
ENDIF
IF !(<ISEMPTY <ARGS>>)
IF !(<SERV.ITEMDEF.<ARGS>>)
SYSMESSAGE @38,,1 Gecersiz bir komut kullandiniz
RETURN 0
ENDIF
TARGETFG addi_ <ARGS>
SYSMESSAGE @0 Where would you like to place the <SERV.ITEMDEF.<ARGS>.NAME>?
RETURN 1
ENDIF
SYSMESSAGE @38,,1 Gecersiz bir komut kullandiniz
RETURN 0
[FUNCTION addi_]
SERV.NEWITEM=<ARGS>
file.close
IF !(<FILE.INUSE>)
FILE.MODE.APPEND=1
IF (<FILE.OPEN C:\sphere\STAFFADD.TXT>)
FILE.WRITELINE <src.name> adli staff (plevel : <src.account.plevel>) <src.p> koordinatinda , <serv.rtime> tarihinde <serv.itemdef.<args>.name> adli item yaratti. Ayrica bu itemin uidi : <new.uid>
file.writeline " "
file.close
endif
endif
NEW.TIMER = -1
NEW.P = <SRC.TARGP>
NEW.TAG0.GMCREATE 1
NEW.TAG0.CIKARAN <eval <src.uid>>
new.tag0.tarihi <serv.rtime>
ACT=<NEW.UID>
obj=<new.uid>
[FUNCTION addc]
IF !(<ARGN>)
IF (<ISEMPTY <DEF.<ARGS>>>)
SYSMESSAGE @38,,1 Gecersiz bir komut kullandiniz
RETURN 0
ENDIF
ENDIF
IF !(<ISEMPTY <ARGS>>)
IF !(<SERV.CHARDEF.<ARGS>>)
SYSMESSAGE @38,,1 Gecersiz bir komut kullandiniz
RETURN 0
ENDIF
TARGETFG addc_ <ARGS>
SYSMESSAGE @0 Where would you like to place the <SERV.CHARDEF.<ARGS>.NAME>?
RETURN 1
ENDIF
SYSMESSAGE @38,,1 Gecersiz bir komut kullandiniz
RETURN 0
[FUNCTION addc_]
SERV.NEWNPC=<ARGS>
NEW.TIMER = -1
NEW.P = <SRC.TARGP>
NEW.TAG0.GMCREATE 1
NEW.TAG0.CIKARAN <eval <src.uid>>
new.tag0.tarihi <serv.rtime>
ACT=<NEW.UID>
file.close
IF !(<FILE.INUSE>)
FILE.MODE.APPEND=1
IF (<FILE.OPEN C:\sphere\STAFFNPCADD.TXT>)
FILE.WRITELINE <src.name> adli staff (plevel : <src.account.plevel>) <src.p> koordinatinda , <serv.rtime> tarihinde <serv.chardef.<new.id>.name> adli npcyi yaratti. Ayrica bu itemin uidi : <new.uid>
file.writeline " "
file.close
endif
endif
on=*
if <src.account.plevel> > 1
IF (<FILE.OPEN C:\sphere\STAFFKONUSMA.TXT>)
FILE.WRITELINE <src.name> adli staff (plevel : <src.account.plevel>) <src.p> koordinatinda , <serv.rtime> tarihinde <args> adli konusmayi Yapti. Ayrica bu kisinin uidi : <src.uid>
file.writeline " "
file.close
endif
endif
endif
return 1
endif
[FUNCTION add i_]
serv.b @38,,1 <src.name> adindaki staff <src.p> koordinatinda <args> adli komutu kullandi... [ EDIT ]
return 1
[FUNCTION add c_m_]
serv.b @38,,1 <src.name> adindaki staff <src.p> koordinatinda <args> adli komutu kullandi... [ EDIT ]
return 1
[EOF]