1 REM Set bus monitor RD and IR to high
10 X=INP(&HC0)
20 GOTO 10