th04

/********************************************************************/
/*This is part of main.exe of th04                                  */
/*The range is from sub_B439 to sub_B616                            */
/*This code is rewrite of screenshot of Part of MAG.Net             */
/*Because of video's low quality, it was hard to identify, so there */
/*can be wrong name or mistake.                                     */
/*08/20/2018 by WindowsTiger                                        */
/*06/10/2019 by WindowsTiger, EmsLoad Complete                      */
/*          But I could not ensure while loop is written correctly  */
/********************************************************************/
    ______________________
    ________________________________
    ______________
}
#endif
_________ void ___________________________
{
    _________
    _______________________________________________
#ifdef DEMO_REC
    _____________
    _________________________
    ______________
    _______________________________
    ______________
#endif
}
______ void ____DemoPlay(void)
{
#ifdef DEMO_REC
    if(key_det) goto endDD;
    key_det = DemoBuf[ncountw];
    shiftkey = DemoBuf[ncountw+DEMO_N];
#else
    DemoBuf[ncountw] = key_det;
    DemoBuf[ncountw+DEMO_N] = shiftkey;
#endif
    if(ncountw>=DEMO_N-4){
#ifdef DEMO_REC
        DemoPlaySave();
#endif
endDD:
        hmem_free(TP_SEG(DemoBuf));
        DrfmunOut(10);
        GameCore("op");
    }
}

/*--------------------------ＥＭＳ設作用-------------------------------*/

SVN EmsSetup(void)
{
    int i;
    long ofs;

    Stage = cfg->Stage;
    if(Stage==6) Rank = 4;
    else Rank = cfg->Rank;
    eyename[3] = '0'+Rank;
    Ems = 0;
    if(ems_exist()==0)return;
    if(ems_space()<EMSSIZE)return;
    Ems = ems_allocate(EMSSIZE);
    if(Ems){
        ems_setname(Ems, "GENSOEMS");
        CdgLoad(31,eyename,0);
        ems_write(Ems,0,SETCLIP(CdgBuf[31].seg[1]),CdgBuf[31].data.size*4);
        CdgFree(31);
    }
}

SVN EmsLoad(void)
{
    int i;
    WORD size;
    long ofs;
    static char* bbname = "BB0.CDG";
    bbname[2] = cfg->StChr[0];
    CdgLoad(0,bbname,0);
    if (Ems){
        ems_write(Ems,14000,SETCLIP(CdgBuf[0].Seg[1]),CdgBuf[0].data.size*4);
        if(StChr==0) CdgLoadAll(CDGIP,"KAO0.cd2");
        else CdgLoadAll(CDGIP,"KAO1.cd2");
        i=CDGIP;ofs=94000;
        size=CdgBuf[CDGIP].data.size;
        while(CdgBuf[i].seg[0]){
            ems_write(Ems,ofs,SETCLIP(CdgBuf[i].seg[0]),size);
            ofs += size;
            ems_write(Ems,ofs,SETCLIP(CdgBuf[i].seg[1]),size*4);
            ofs += size*4;
            CdgFree(i);
            i++;
        }
    }
}

SVN Ems_____(void)
{
    _________
        ____________________________
        ____________________________
    _____________________________