msgConsole

msgConsole()
ฟังค์ชั่นตรวจสอบการพูดกระซิบ (Private message) โดยจะคืนค่าเป็น จริง หรือ เท็จ (boolean) หากมีข้อความฟังค์ชั่นก็จะเป็นจริง

procedure ที่อนุญาติให้ใช้ = main_console
รูปแบบ = boolean msgConsole( ข้อความที่จะตรวจสอบ , ลักษณะข้อความ )

string ข้อความที่จะตรวจสอบ เช่น "finalized the" , "Calculate" , "unstruct"
boolean ลักษณะข้อความ 0 ทุกคำทั้งหมด 1 ส่วนใดส่วนหนึ่งของคำ ค่ามาตรฐานคือ 1

ตัวอย่าง
นายไก่กาอาราเร่ จะมาดีลบอท
เมื่อมีการดีลเกิดขึ้น ในคอนโซลของบอทจะแสดงข้อความ
"นายไก่กาอาราเร่ (CID:987654 LV:45) Request and your transaction"
เราจึงจับข้อความ Request and your transaction เพราะนี่คือจุดเริ่มต้นการดีล
หากเราต้องการให้บอทรับดีล หากการรับข้อความคอนโซลเป็นจริงจึงส่ง send deal กลับไปตามตัวอย่าง

sub main_console {

if ( msgConsole("Request and your",1)) {       
    sendCommand("deal");
}

}

แต่การดีลนั้นยังไม่จบ เมื่อนายไก่กาอาราเร่ ทำการยืนยันการดีล ก็จะมีข้อความประมาณว่า
"นายไก่กาอาราเร่ finalized the Deal"
เราจึงต้องส่ง deal กลับไปยืนยันเช่นกันอีกครั้ง

sub main_console {

if ( msgConsole("finalized the",1) ) {       
    sendCommand("deal");
}

}

จึงสามารถเขียนรวมกันด้วยเงื่อนไข or โดยใช้เครื่องหมาย || คั่นระหว่าง 2 เงื่อนไขศึกษารูปแบบการใช้ perl ได้ที่ www.perlmonk.org

sub main_console {

if (msgConsole("finalized the",1) || msgConsole("Request and your",1)) {       
    sendCommand("deal");
}

}