โจทย์เลเซอร์

ให้ตัวหุ่นยนต์หยุดอยู่ใกล้ผนังมากที่สุดโดยใช้แสงอินฟราเรด

เขาวงกต

PAUSE 1000
Main: GOSUB go
IF(IN1=0)OR(IN6=0)THEN
GOSUB back:PAUSE 150
GOSUB right:PAUSE 500
ENDIF
GOSUB go
IF(IN1=0)OR(IN6=0)THEN
GOSUB back:PAUSE 150
GOSUB right:PAUSE 500
ENDIF
GOSUB go
IF(IN1=0)OR(IN6=0)THEN
GOSUB back:PAUSE 150
GOSUB left:PAUSE 500
ENDIF
GOSUB go
IF(IN1=0)OR(IN6=0)THEN
GOSUB back:PAUSE 150
GOSUB right:PAUSE 500
ENDIF
GOSUB go
IF(IN1=0)OR(IN6=0)THEN
GOSUB back:PAUSE 150
GOSUB right:PAUSE 500
ENDIF
GOSUB go
IF(IN1=0)OR(IN6=0)THEN
GOSUB back:PAUSE 150
GOSUB left:PAUSE 500
ENDIF
GOSUB go
IF(IN1=0)OR(IN6=0)THEN
GOSUB back:PAUSE 150
GOSUB left:PAUSE 500
ENDIF
GOTO Main
go:HIGH 13:LOW 12:HIGH 15:LOW 14:RETURN
back:HIGH 12:LOW 13:HIGH 14:LOW 15:RETURN
right:LOW 13:LOW 12:HIGH 15:LOW 14:RETURN
left:HIGH 13:LOW 12:LOW 15:LOW 14:RETURN