1*57718be8SEnji Cooper# 2*57718be8SEnji Cooper# Validate the timeout works. 3*57718be8SEnji Cooper# 4*57718be8SEnji Cooperinclude start 5*57718be8SEnji Cooperdelay 2000 6*57718be8SEnji Cooperinput "a" 7*57718be8SEnji Coopercall 97 getch 8*57718be8SEnji Coopercall OK timeout 100 9*57718be8SEnji Cooperinput "b" 10*57718be8SEnji Cooper# since delay is in effect and we set timeout the following getch should 11*57718be8SEnji Cooper# return ERR not the character b. 12*57718be8SEnji Coopercall -1 getch 13*57718be8SEnji Cooper# drain input.... 14*57718be8SEnji Coopercall OK drain 15*57718be8SEnji Coopercall OK timeout -1 16*57718be8SEnji Coopercall OK keypad STDSCR 1 17*57718be8SEnji Cooperdelay 0 18*57718be8SEnji Cooperinput "\eOA" 19*57718be8SEnji Coopercall $KEY_UP getch 20*57718be8SEnji Coopercall OK refresh 21*57718be8SEnji Coopercompare timeout.chk 22