/*-----------------------------------------------------------
        內部函數 _ClearPrompt : 清提示行
    -----------------------------------------------------------*/
    #include <hanenv.h>

    void _Cdecl _ClearPrompt(clear_mode)
    int clear_mode;                         /* 清理模式        */
    {

        /*-- 如果清理模式為0,首先清理輸入法名稱區 -------------*/
        if(clear_mode<1)
            _Block(7,_PromptLine+7, 8,CHAR_HIGH,_PmtBk);

        /*-- 如果清理模式為0或1,還要清理輸入碼區 --------------*/
        if(clear_mode<2)
            _Block(16,_PromptLine+7,12,CHAR_HIGH,_PmtBk);

        /*-- 無論清理模式如何,一律清理重復碼區和重復碼提示區 --*/
        _Block(29,_PromptLine+7,40,CHAR_HIGH,_PmtBk);
        _Block(70,_PromptLine+7, 3,CHAR_HIGH,_PmtBk);
    }