1 SOPEN
2 M=ADC4:L=ADC5:R=ADC6
3 M=M-50:L=L-50:R=R-50
4 STX "rt,10,180\r"
5 IF ADC4 > M THEN
6 STX "rt,10,90\r"
7 ELSE
8 STX "fd,10,18\r"
9 ENDIF
10 IF RXFLAG THEN IF RCX = 78 THEN 5
11 GOTO 10
