ON ERROR GOTO handler RANDOMIZE TIMER DO a = RND * 1000 b = RND * 1 SOUND a, b LOOP WHILE INKEY$ = "" SYSTEM handler: IF ERR = 5 THEN RESUME NEXT