中国DOS联盟

int mkpath(char *path)
{
        int levelcount = 0;

        WHILE(!fileexist(path)) && (STRLEN(path) > 2)
        {
                BX = STRRCHR(path, '\\');
                DSBYTE[BX] = 0;
                levelcount++;
        }

        LOOPNZ(levelcount)
        {
                BX = path;
                BX += STRLEN(BX);
                DSBYTE[BX] = '\\';
                mkdir(path);
                IF(CARRYFLAG) RETURN FALSE;
        }
        RETURN TRUE;
}