saveLog()
ฟังค์ชั่น save ข้อความลง text file
procedure ที่อนุญาติให้ใช้ = ทุก procedure
รูปแบบ = saveLog( ชื่อไฟล์ , ข้อความ);
โดยไฟล์ที่เซฟจะอยู่ในโฟลเดอร์ log ของบอทตัวนั้นๆ
ตัวอย่าง
ให้บอทบันทึกการกระซิบที่มีคำว่า "บอท" เนื่องจากมันทำงานในกลุ่มแชท จึงให้ทำงานใน procedure main_chat
โดยจะให้เซฟเก็บไว้ในไฟล์ myLogPM.log
ตัวอย่างนี้จะสร้างฟังค์ชั่น GetDateTime สำหรับการบันทึก log จากฟังค์ชั่น [getDate()] และ [getTime()]
sub GetDateTime {
return getDate('D').":".getDate('M').":".getDate('Y')."-".getTime('H').":".getTime('M').":".getTime('S');
}
sub main_chat {
if ( msgPM( "บอท" , 1 ) ) {
$interface->writeoutput("save log to myLogPM.log \n","yellow");
$name = chatName();
$msg = chatMessage();
$dt = GetDateTime();
saveLog( "myLogPM.log" , "log > $dt : $name ซิบว่า $msg \n");
}
}
โดยลักษณะการเซฟใน myLogPM.log ใน โฟลเดอร์ log จะมีลักษณะแบบนี้
log > 18:09:2013-00:06:01 : นายไก่กาอาราเร่ ซิบว่า บอทป่าว
log > 18:09:2013-00:08:02 : นายไก่กาอาราเร่ ซิบว่า บอทบ่