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

สอบ


การสอบนี้อาจารย์ให้สั่งให้
หุ่นเดินหลบหลักดังรูป
' {$STAMP BS2sx}' {$PBASIC 2.5}PAUSE 2000
GOSUB T_Left : PAUSE 300GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Left : PAUSE 56GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwardb : PAUSE 50GOSUB Forward : PAUSE 850GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB T_Right : PAUSE 56GOSUB Forwarda : PAUSE 28GOSUB Forwardb : PAUSE 1800GOSUB S_Right : PAUSE 500 GOSUB Motor_OFF



T_Left: HIGH 13 : LOW 12 : LOW 15 : LOW 14: RETURNT_Right: LOW 13: LOW 12 : HIGH 15 : LOW 14: RETURNForward: HIGH 13: LOW 12 : HIGH 15 : LOW 14: RETURNForwardb: HIGH 13: LOW 12 : HIGH 15 : LOW 14: RETURNForwarda: HIGH 13: LOW 12 : HIGH 15 : LOW 14: RETURN
S_Right : LOW 13: HIGH 12: HIGH 15: LOW 14: RETURNMotor_Off: LOW 13: LOW 12 : LOW 15 : LOW 14

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