/*-----------------------------------------------------------
        函數 getxyc : 編輯字符數據
    -----------------------------------------------------------*/
    #include <hanenv.h>
    #include <string.h>

    unsigned _Cdecl getxyc(col,line,value,set)
    int col;             /* 編輯窗口左上角列坐標(以字節為單位) */
    int line;            /* 編輯窗口左上角行坐標(以象素為單位) */
    int *value;          /* 指向待編輯的字符數據的指針         */
    char *set;           /* 允許使用的字符集合                 */
    {
        char buff[2];
        unsigned h;

        /*-- 構造編輯緩沖區 -------------------*/
        buff[0] = *value;
        buff[1] = 0;

        /*-- 對非法輸入值循環 -----------------*/
        while(1)
        {
            h = getxya(col,line,1,buff,NULL);
            if(strchr(set,buff[0]) || h==KEY_ESC)
                break;
            else
            {
                sound(900);
                delay(100);
                nosound();
            }
        }

        /*-- 構造輸出結果 ---------------------*/
        if(h!=KEY_ESC)
            *value = buff[0];

        /*-- 返回退出編輯狀態的鍵盤碼 ---------*/
        return h;
    }