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

การโปรเเกรมหุ่นยนต์2

กลับมาพบกันอีกเเร้วอาทิตย์ที่ 2 เเล้ว น้อ มาคราวนี้เราก็ได้สั่งให้หุ่นยนต์เดินเป็นรูปตัวยูกลับหัวน่ะค้าบบบบบ~~

นี้คือโค้ดที่กระผมภูมิใจนำเสนอก้าบบบบบบ

' {$STAMP BS2sx}
' {$PBASIC 2.5}

GOSUB Forward : PAUSE 900
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB T_Right : PAUSE 56
GOSUB Forwarda : PAUSE 28
GOSUB Forwardb : PAUSE 900
GOSUB Motor_Off


Forward: HIGH 13: LOW 12 : HIGH 15 : LOW 14: RETURN
T_Right: HIGH 13 : LOW 12 : LOW 15 : LOW 14: RETURN
Forwarda: HIGH 13: LOW 12 : HIGH 15 : LOW 14: RETURN
Forwardb: HIGH 13: LOW 12 : HIGH 15 : LOW 14: RETURN
Motor_Off: LOW 13: LOW 12 : LOW 15 : LOW 14

เเหะๆยาวเหยียดซะขนาดนี้เราขอสรุปให้ฟังสั้นล่ะกานน่ะ ^^

ที่เราต้องเขียนยาวซะขนาดนี้เพื่อที่จะทำให้หุ่นยนต์ของเราเลี้ยวได้อย่างเต็มประสิทธิภาพพพพพ

ปัญหาของเราในคราวนี้ก็คงเป็นการทำให้มันเลี้ยวเป็นตัวยูให้สำมะเร็จอ่าน่ะนอกน้านก็ชิวชิว

ไม่มีความคิดเห็น: