วันพุธที่ 19 กันยายน พ.ศ. 2550

เขียนโปรแกรมหุ่นยนต์

สวัสดีคร้าบบบ~พ่อแม่พี่น้องที่เข้ามาชมเว็บของป๋ม ขอบคุณมากที่เข้ามาชม(นานๆทีจะมาชมกาน)
เอาล่ะคับ วันนี้อ.ให้กลุ่มผมเขียนโปรแกรมให้หุ่นยนต์ของเราเดินไป 1 ช่องแล้วถอยหลังกลับมาที่เดิมนะฮับ
' {$STAMP BS2sx}'
{$PBASIC 2.5}
PAUSE 1000
Main: GOSUB Forward : PAUSE 1177
GOSUB Backward : PAUSE 1177
GOTO Main
Forward: HIGH 13 : LOW 12 : HIGH 15 : LOW 14 : RETURN
T_Left: HIGH 13 : LOW 12 : HIGH 15 : LOW 14 : RETURN
Backward: HIGH 12 : LOW 13 : HIGH 14 : LOW 15 : RETURN
T_Right: HIGH 13 : LOW 12 : HIGH 15 : LOW 14 : RETURN
จากโด้ดด้านบน ผมสั่งให้หุ่นยนต์เดินตรงไปหนึ่งช่อง PAUSE=1177 หลังจากปรับปรุงมานาน -3- แต่พอรู้ว่าPAUSEของมันเท่าไหร่ก็ง่ายแล้วคับ

วันพุธที่ 4 กรกฎาคม พ.ศ. 2550

เขียนโปรแกรม

วันนี้ต้อง