/*-----------------------------------------------------------
        函數(shù) _LoadEMM : 利用INT15H將文件直接裝入擴(kuò)充存儲(chǔ)器
    -----------------------------------------------------------*/
    #include <hanenv.h>

    long _Cdecl _LoadEMM(file,size)
    FILE *file;                    /* 欲裝入擴(kuò)充存儲(chǔ)器的文件   */
    long size;                     /* 文件長(zhǎng)度                 */
    {
        long handle =_CurrentEMM;
        long addr;
        unsigned i,num;

        /*-- 如果剩余擴(kuò)充存儲(chǔ)器尺寸小于文件長(zhǎng)度則返回 ----------*/
        if(_GetEMMsize()-(int)((_CurrentEMM-1200000L)/1024L)<size/1024+1)
            return 0L;

        /*-- 設(shè)置各項(xiàng)參數(shù) --------------------------------------*/
        _CurrentEMM += size;
        size = size/1024+1;          /* 擴(kuò)充存儲(chǔ)器長(zhǎng)度以K為單位 */
        _Init_GDT();
        addr = FP_SEG(_HanFont);
        addr = (addr<<4)+FP_OFF(_HanFont);
        _SetSourAddr(addr,1024);
        addr = handle;

        /*-- 將文件讀到內(nèi)存并裝入擴(kuò)充存儲(chǔ)器 --------------------*/
        for(i=0;i<size;i++)
        {
            num=fread(_HanFont,sizeof(char),1024,file);
            _SetDestAddr(addr,num);
            _MoveDataEMM(num);
            addr += 1024;
        }

        /*-- 返回EMM自由空間的首地址 --------------------------*/
        return handle;
    }