1include start 2call OK move 14 14 3cchar HCHAR 0 "H" 4call OK echo_wchar $HCHAR 5call2 14 15 getyx STDSCR 6call OK echo_wchar $HCHAR 7call OK echo_wchar $HCHAR 8compare add_wch1.chk 9call OK move 14 79 10call OK echo_wchar $HCHAR 11call2 15 0 getyx STDSCR 12call OK echo_wchar $HCHAR 13call2 15 1 getyx STDSCR 14call OK echo_wchar $HCHAR 15call OK echo_wchar $HCHAR 16call OK echo_wchar $HCHAR 17call OK echo_wchar $HCHAR 18call OK echo_wchar $HCHAR 19call OK echo_wchar $HCHAR 20call OK echo_wchar $HCHAR 21compare add_wch2.chk 22call2 15 8 getyx STDSCR 23 24call OK clear 25call OK refresh 26compare clear1.chk 27 28# tests for multi-column characters 29cchar ACHAR 0x100 0x3401 30call OK echo_wchar $ACHAR 31call2 0 2 getyx STDSCR 32 33cchar CHAR 0 0x3401 34# test for wrapping 35call OK move 0 79 36call OK echo_wchar $CHAR 37call OK echo_wchar $CHAR 38call2 1 4 getyx STDSCR 39 40# test for special character processing 41cchar BACK 0 0x8 42call OK echo_wchar $BACK 43#compare add_wch3.chk 44 45# we are now at middle of multi-col char 46# (unexpected output) 47# call OK echo_wchar $CHAR 48# call2 1 4 getyx STDSCR 49