73 lines
1.8 KiB
C
73 lines
1.8 KiB
C
//
|
|
// 行列 簡碼 轉碼程式
|
|
//
|
|
// 李傅魁 1998/03/15
|
|
//
|
|
|
|
#include <windows.h>
|
|
#include <stdio.h>
|
|
#include "resource.h"
|
|
|
|
#define CharSize 2 //for unicode file format
|
|
|
|
int cvthigh(char *FileName,char *OutName,DWORD *line)
|
|
{
|
|
FILE *fin;
|
|
FILE *fout;
|
|
WORD temp;
|
|
int i;
|
|
|
|
*line =1;
|
|
|
|
// open input file
|
|
if((fin = fopen(FileName,"rb")) ==NULL)
|
|
return IDS_ERROPENFILE;
|
|
fread(&temp,CharSize,1,fin); // for unicode header
|
|
|
|
// open output file
|
|
if((fout=fopen(OutName,"wb"))==NULL)
|
|
{
|
|
fclose(fin);
|
|
return IDS_ERRCREATEFILE;
|
|
}
|
|
|
|
|
|
while(fread(&temp,1,CharSize,fin))
|
|
{
|
|
if (temp!=' ') //每列第一字為空白字元時，該列即為註解列
|
|
{
|
|
// cut not chinese char
|
|
do {
|
|
if(temp>255) break;
|
|
} while(fread(&temp,1,CharSize,fin));
|
|
|
|
if(feof(fin)) break; //finsh!
|
|
|
|
// get chinese (10 characters)
|
|
i=0;
|
|
do {
|
|
if(temp<=255)
|
|
break;
|
|
if(temp==0x25a1) temp=0; // non-character
|
|
fwrite (&temp,1,sizeof(temp),fout); // write to output file
|
|
i++;
|
|
} while (fread(&temp,1,CharSize,fin));
|
|
|
|
if (i!=10)
|
|
{
|
|
fclose(fin);
|
|
fclose(fout);
|
|
return IDS_ERRFORMATCODE;
|
|
}
|
|
}
|
|
while(temp!=0x000a) // goto end of line ...
|
|
if(!fread(&temp,1,CharSize,fin))
|
|
break;
|
|
(*line) ++;
|
|
}
|
|
|
|
fclose(fin);
|
|
fclose(fout);
|
|
return 0;
|
|
}
|