มีคุณสมบัติเจ๋ง ๆ ใน Windows ที่ให้คุณทำให้คอมพิวเตอร์ของคุณพูดหรือพูดอะไรก็ได้! วิธีนี้ใช้ประโยชน์จาก API ในตัวที่ติดตั้งบน Windows XP, Vista, 7, 8 และ 10 ที่เรียกว่า SAPI (Speech Application Programming Interface)
Microsoft Speech API คือสิ่งที่ใช้สำหรับคุณลักษณะการเข้าถึงข้อความเป็นคำพูดที่มีอยู่ใน Windows คุณยังสามารถเขียนโปรแกรมที่เรียก API ซึ่งจะทำให้คุณสามารถให้แอปพลิเคชันของคุณพูดได้ แต่สำหรับนักพัฒนา
สารบัญ
แค่ทำให้คอมพิวเตอร์ของคุณพูดในสิ่งที่คุณต้องการนั้นค่อนข้างง่ายจริงๆ! ในบทความนี้ ฉันจะแสดงวิธีสร้างสคริปต์ VBS ที่รับข้อความจากผู้ใช้แล้วพูด นอกจากนี้ ฉันจะพูดถึงวิธีฮาร์ดโค้ดข้อความที่คุณต้องการพูด จากนั้นกำหนดเวลาให้สคริปต์นั้นทำงานในเหตุการณ์เฉพาะ เช่น การเริ่ม Windows หรือออกจากระบบ
ป้อนข้อความ พูดข้อความ
เริ่มจากสคริปต์ง่ายๆ ที่จะป๊อปอัปกล่องโต้ตอบซึ่งคุณสามารถพิมพ์สิ่งที่คุณต้องการให้ Windows พูดได้ ขั้นแรกให้ดำเนินการต่อและเปิด Notepad
ขั้นตอนที่ 1: วางข้อความต่อไปนี้ลงในเอกสารใหม่:
Dim message, sapi
message=InputBox(“Enter the text you want spoken”,”Speak This”)
Set sapi=CreateObject(“sapi.spvoice”)
sapi.Speak message
โปรดทราบว่าเมื่อคุณคัดลอกข้อความจากเว็บเบราว์เซอร์และวางลงใน Notepad เครื่องหมายคำพูดจะทำให้เกิดปัญหา ก่อนที่คุณจะบันทึกไฟล์ คุณต้องดำเนินการและลบเครื่องหมายคำพูดแต่ละรายการ (“) และพิมพ์เครื่องหมายคำพูดอีกครั้ง ในตัวอย่างด้านล่าง มีเครื่องหมายคำพูดหกตัว ควรมีลักษณะเหมือนภาพด้านล่าง
ตอนนี้เมื่อคุณไปบันทึกไฟล์ ให้ตั้งชื่ออะไรก็ได้ แต่ให้แน่ใจว่าคุณพิมพ์.VBSหลังชื่อ ด้วย ถัดไป สำหรับ ช่อง บันทึกเป็นประเภทให้เลือกไฟล์ทั้งหมดแทนเอกสารข้อความเริ่มต้น
ตอนนี้ดับเบิลคลิกที่ไฟล์ VBS แล้วคุณจะเห็นช่องใส่ที่คุณสามารถพิมพ์ข้อความที่คุณต้องการพูดได้! พิมพ์บางอย่างแล้วคลิกตกลง
หากคุณทำทุกอย่างถูกต้อง คุณควรได้ยินเสียงผู้ชายหรือผู้หญิงพูดประโยคของคุณ หากคุณได้รับข้อความแสดงข้อผิดพลาดใดๆ โปรดตรวจสอบให้แน่ใจว่าได้คัดลอกและวางข้อความอีกครั้งและแทนที่เครื่องหมายคำพูดเหล่านั้น
กำหนดการตั้งค่าเสียง SAPI
มันสนุก แต่เราสามารถกำหนดค่าคอมพิวเตอร์พูดน้อยของเราด้วยการตั้งค่าที่แตกต่างกัน เราสามารถเปลี่ยนระดับเสียง เร็วหรือช้าของเสียงพูด และเปลี่ยนเพศระหว่างชายและหญิงได้ นี่คือตัวอย่างโค้ดที่ฉันเพิ่มบรรทัดพิเศษสองสามบรรทัด
Dim message, sapi
message=InputBox(“Enter the text you want spoken”,”Speak This”)
Set sapi=CreateObject(“sapi.spvoice”)
Set sapi.Voice = sapi.GetVoices.Item(1)
sapi.Rate = 0
sapi.volume = 100
sapi.Speak message
อัตราเริ่มต้นคือ 0 และช่วงคือ -10 ถึง 10 -10 จะทำให้เสียงพูดช้ามาก และ 10 จะพูดเร็วมาก ระดับเสียงเริ่มต้นที่ 100 และช่วงคือ 0 ถึง 100 บรรทัดที่ขึ้นต้นด้วยSet sapi.Voiceจะช่วยให้คุณเปลี่ยนเป็นเสียงอื่นได้ หากติดตั้งไว้ในระบบของคุณ
โปรดทราบว่าจำนวนเสียงที่คุณสามารถเลือกได้นั้นขึ้นอยู่กับระบบปฏิบัติการ ใน Windows 7 มีเพียงเสียงเดียวคือ Microsoft Anna
ใน Windows 10 มีสองเสียงคือ Microsoft David และ Microsoft Zira ดังภาพด้านล่าง
หากมีการติดตั้งเพียงเสียงเดียวในระบบของคุณ คุณต้องเปลี่ยนsapi.GetVoices.Item(1)เป็นsapi.GetVoices.Item(0)มิฉะนั้น คุณจะได้รับข้อความแสดงข้อผิดพลาดเมื่อคุณพยายามเรียกใช้สคริปต์ คุณยังสามารถสร้างเอกสาร Notepad อื่นและวางรหัสด้านล่าง ซึ่งจะบอกคุณว่าเสียงใดถูกติดตั้ง บันทึกเป็นไฟล์ .VBS ดังที่แสดงด้านบนแล้วเรียกใช้
Set VObj = CreateObject(“SAPI.SpVoice”)
For Each Voice In VObj.getvoices
I = I + 1
msgbox “” & (I – 1) & ” – ” & Voice.GetDescription
Next
จนถึงตอนนี้ เราใช้กล่องโต้ตอบป๊อปอัปนี้เพื่อป้อนข้อความ แต่คุณสามารถพิมพ์ข้อความของคุณลงในไฟล์สคริปต์ได้เช่นกัน ซึ่งจะเป็นประโยชน์หากคุณต้องการกำหนดเวลาให้สคริปต์ทำงานโดยอัตโนมัติ แน่นอนว่ามันสามารถใช้เล่นตลกกับเพื่อนและครอบครัวของคุณได้ และมันได้ผลดีจริงๆ
ลองจินตนาการว่ามีคนเปิดคอมพิวเตอร์และได้ยินคอมพิวเตอร์บอกพวกเขาว่า “สวัสดีจอห์น ฉันง่วงมาก วันนี้อย่ารบกวนฉันเลย!” เมื่อมันบูทขึ้น! ฉันสัญญากับคุณได้จากประสบการณ์ มันน่าตื่นเต้นและคุณควรลองอย่างแน่นอน
หากต้องการฮาร์ดโค้ดข้อความ ให้เปลี่ยนบรรทัดสุดท้ายเป็นดังนี้:
sapi.Speak “Hello John, I am very tired today!”
ไฟล์สคริปต์กำหนดการ
ตอนนี้คุณได้ฮาร์ดโค้ดข้อความของคุณสำหรับเป้าหมายที่ต้องการแล้ว คุณเพียงแค่เรียกใช้เมื่อคุณต้องการ หากคุณเชี่ยวชาญด้านเทคโนโลยี คุณสามารถใช้โปรแกรมอย่างAutoItซึ่งจะช่วยให้คุณทำสิ่งต่างๆ ได้มาก เช่น เรียกใช้ไฟล์สคริปต์เมื่อเปิดโปรแกรมบางโปรแกรมหรือเมื่อขยายหรือย่อขนาดหน้าต่าง
ฉันไม่มีเวลาพูดถึงเรื่องทั้งหมดนี้ในโพสต์นี้ แต่โชคดีที่ Microsoft มีฟีเจอร์ในตัวที่เรียกว่า Task Scheduler ที่ให้คุณทำบางสิ่งที่ค่อนข้างซับซ้อนด้วยสคริปต์ได้อย่างง่ายดาย
โพสต์ก่อนหน้าของฉันลงลึกเกี่ยวกับวิธีกำหนดเวลาให้ไฟล์สคริปต์ทำงานเมื่อมีเหตุการณ์บางอย่างเกิดขึ้นใน Windows หากคุณมีปัญหาในการทำให้สคริปต์ของคุณทำงาน โปรดโพสต์ความคิดเห็นและเราจะพยายามช่วยเหลือ สนุก!
เรียนรู้วิธีทำความสะอาดกล่องใส่รีเทนเนอร์ด้วยสบู่เหลวอ่อนๆ และน้ำอุ่น เช็ดให้แห้งอย่างถูกต้อง หลีกเลี่ยงความร้อนที่อาจทำให้เสียหาย และรู้ว่าเมื่อใดควรเปลี่ยนกล่องใหม่
เรียนรู้วิธีการตรวจสอบและบำรุงรักษาไส้กรองอากาศเครื่องยนต์ เมื่อใดควรทำความสะอาด เมื่อใดที่การเปลี่ยนไส้กรองอากาศจะปลอดภัยกว่า และวิธีการตรวจสอบการติดตั้งกลับเข้าไปอย่างถูกต้อง
เรียนรู้วิธีทำความสะอาดเครื่องทำน้ำแข็งในช่องแช่แข็งอย่างปลอดภัย รวมถึงถังเก็บน้ำแข็ง พื้นผิวเครื่องทำน้ำแข็งที่เข้าถึงได้ ช่องจ่ายน้ำแข็ง การเช็ดให้แห้ง การประกอบกลับ และข้อผิดพลาดที่ควรหลีกเลี่ยง
เรียนรู้วิธีทำความสะอาดหัวฉีดชำระอย่างปลอดภัย หลักการทำความสะอาดตัวเองคืออะไร วิธีจัดการกับคราบแร่ธาตุ และน้ำยาทำความสะอาดที่เหมาะสมกับรุ่นของคุณ
เรียนรู้วิธีทำความสะอาดตัวกรองทรายสระว่ายน้ำอย่างปลอดภัย ประเมินว่าการล้างย้อนได้ผลหรือไม่ และรู้ว่าเมื่อใดควรทำความสะอาดอย่างละเอียด ซ่อมแซม หรือเปลี่ยนวัสดุกรองใหม่
เรียนรู้วิธีทำความสะอาดเครื่องบดกาแฟอย่างปลอดภัย ตั้งแต่การใช้แปรงแห้งปัดใบมีด การล้างชิ้นส่วนที่ถอดได้ การประกอบกลับ การทดสอบ และการดูแลรักษาใบมีดบด
เรียนรู้วิธีการกำจัดกาวติดเล็บออกจากเสื้อผ้าอย่างปลอดภัย ตั้งแต่การขูดกาวที่แห้งแล้ว การใช้แอซีโทนอย่างระมัดระวัง การซัก และการตรวจสอบเนื้อผ้าก่อนตากให้แห้ง
เรียนรู้วิธีการกำจัดคราบกาวจากสติกเกอร์บนเสื้อผ้าอย่างปลอดภัย ตั้งแต่การใช้ความเย็นและการเตรียมการเบื้องต้น ไปจนถึงการใช้ตัวทำละลายอย่างระมัดระวัง การซัก และการตากให้แห้ง
เรียนรู้วิธีทำความสะอาดคีย์บอร์ดเชิงกลอย่างปลอดภัย รวมถึงการถอดปุ่มกด การกำจัดฝุ่น คราบสกปรก การเช็ดให้แห้ง การประกอบกลับ และเมื่อใดควรหยุดและตรวจสอบคู่มือ
เรียนรู้วิธีการล้างคราบกาวออกจากเสื้อผ้าโดยเริ่มจากวิธีอ่อนโยนก่อน เมื่อไหร่ควรใช้วิธีที่รุนแรงขึ้นสำหรับกาวร้อนหรือกาวซุปเปอร์ และวิธีการตรวจสอบเนื้อผ้าก่อนแห้ง
