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

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

มาพบกานอีกครั้งกับกระผมพิสิฏฐ์กรน่ะจ๊ะ^^
เอาล่ะน้าคราวเนี้ยอ่าอาจารย์สั่งให้พวกเราใฃ้โค้ดจาก การโปรเเกรมหุ่นยนต์2 ที่ผมโพสต์ไป ทำ LOOP ขึ้นมา
เนื่องจากความปังยาน้อยของกระผมทำให้ใช้เวลากว่า 3 อาทิตย์ กว่าจาสำเร็จเเต่ไม่ใฃ่เเค่ปังยาน้อยเเต่เพราะงานที่ทับถมกันมาเรื่อยๆด้วยน่ะอย่าเข้าใจผิด
เเต่ในที่สุดผมก็ทำเสร็จเเล้วผมจะสาธิตให้ดูล่ะกาน

' {$STAMP BS2sx}' {$PBASIC 2.5}
yo VAR Word
GOSUB Forward : PAUSE 900
yo = 0
DO
GOSUB T_Right: PAUSE 56
GOSUB Fowarda : PAUSE 28
yo= yo + 1
LOOP UNTIL (yo = 86)
GOSUB Fowardb : 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

ก่อนอื่นก็ต้องประกาศก่อนว่าเราจาใช้อายายผมใช้ yo เพราะเป็นคนในกลุ่มของผมเเหะๆ
เเล้วเราก็ต้องบอกด้วยว่า yo เท่ากับ 0 หลังจากนั้นก็บอกว่า yo= yo + 1 เเล้วสุดท้ายก็บอกว่า LOOP กี่ครั้ง โดนใช้คำสั่ง
LOOP UNTIL (yo = ??)
จบไปเเล้วกับการทำ LOOP

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