include window
call $FALSE is_keypad $win1
input "\eOA"
call 0x1b wgetch $win1
call OK keypad $win1 $TRUE
input "\eOA"
call $KEY_UP wgetch $win1

# disable assembly of KEY_UP; other multi-character keys should work
call OK keyok $KEY_UP $FALSE
input "\eOA"
call 0x1b wgetch $win1
noinput
call Ox4f wgetch $win1
noinput
call 0x41 wgetch $win1
input "\eOB"
call $KEY_DOWN wgetch $win1