[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]
0
Total votes: 0
Yorumlar (0)