Belirttiğiniz yola dosya yaratmaya, mevcut dosyaya yazmaya yarar.
[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[function test]writefile logs\<src.account.name>.txt <args>
.test Deneme //yazarak test edebilirsiniz
ReadFile;
Belirtilen yolda, belirtilen dosyayı çağırarak okumaya yarar. Çağırılacak dosyada birden fazla satır varsa, yardımcı fonksiyon olan [LINES] devreye girer.
[function readfile]
if !(<file.inuse>)
file.mode.create 1
file.mode.append 1
file.mode.readflag 1
if (<file.open <strarg <args>>>)
local.a = <file.readline <streat <args>>>
file.close
endif
endif
return <local.a>[function test]src.sysmessage <serv.readfile logs\<src.account.name>.txt 1><args>
.test //yazarak sadece 1 satırlık yazıyı test edebilirsiniz
Birden fazla satır okutmak için ise; [LINES] fonksiyonunu görelim.
Lines;
[function lines]
if !(<file.inuse>)
file.mode.create 1
file.mode.append 1
file.mode.readflag 1
if (<file.open <strarg <args>>>)
local.a = <file.filelines <strarg <args>>>
file.close
endif
endif
return <local.a>[function test]for 1 <eval <serv.lines logs\<src.account.name>.txt> -1>
src.sysmessage <serv.readfile logs\<src.account.name>.txt <eval <local._for>>>
endfor
.test //yazarak çok satırlık yazıyı test edebilirsiniz
DeleteFile;
Belirtilen dosyayı, silme işleminde kullanılır.
[function deletefile]
if !(<file.inuse>)
file.mode.append 1
file.deletefile <args>
file.close
endif[function test]serv.deletefile logs\<src.account.name>.txt
.test //yazarak silme işlemini test edebilirsiniz.
Bu kod bütünleriyle, gelişmiş staff komut kayıt sistemi, staff - player konuşma kayıt sistemi, anti-edit gibi sistemleri rahatlıkla yapabilirsiniz.
Teşekkürler[/lines][/lines]

