美佳のタイプトレーナ 英単語練習 Pascalソースコード
このソースコードは美佳のタイプトレーナ 英単語練習のPascalのソースコードです。
C言語、C++、Visual C++のソースコードとして使用できます。
ファイルタイプは .c あるいは .cpp を指定して下さい。
ただしBasic、Visual basicではこのままの形では使用できません。
このソースコードは、美佳のタイプトレーナ以外のタイプ練習ソフトを作成する人に便宜を図る為に公開する物です。
このソースコードを使用して、美佳タイプ互換のタイプ練習ソフトを作成しても構いません。
また、単語の追加などを行って使用しても構いません。
static char mes0[]="real";
static char mes1[]="integer";
static char mes2[]="char";
static char mes3[]="Boolean";
static char mes4[]="packed";
static char mes5[]="array";
static char mes6[]="of";
static char mes7[]="set";
static char mes8[]="file";
static char mes9[]="record";
static char mes10[]="end";
static char mes11[]="case";
static char mes12[]="nil";
static char mes13[]="in";
static char mes14[]="div";
static char mes15[]="mod";
static char mes16[]="goto";
static char mes17[]="begin";
static char mes18[]="if";
static char mes19[]="then";
static char mes20[]="else";
static char mes21[]="case";
static char mes22[]="while";
static char mes23[]="do";
static char mes24[]="repeat";
static char mes25[]="until";
static char mes26[]="for";
static char mes27[]="to";
static char mes28[]="downto";
static char mes29[]="with";
static char mes30[]="program";
static char mes31[]="label";
static char mes32[]="const";
static char mes33[]="type";
static char mes34[]="var";
static char mes35[]="procedure";
static char mes36[]="function";
static char mes37[]="false";
static char mes38[]="true";
static char mes39[]="text";
static char mes40[]="input";
static char mes41[]="output";
static char mes42[]="get";
static char mes43[]="put";
static char mes44[]="reset";
static char mes45[]="rewrite";
static char mes46[]="read";
static char mes47[]="readln";
static char mes48[]="write";
static char mes49[]="writeln";
static char mes50[]="page";
static char mes51[]="pack";
static char mes52[]="unpack";
char *mepascal[]={
mes0,
mes1,
mes2,
mes3,
mes4,
mes5,
mes6,
mes7,
mes8,
mes9,
mes10,
mes11,
mes12,
mes13,
mes14,
mes15,
mes16,
mes17,
mes18,
mes19,
mes20,
mes21,
mes22,
mes23,
mes24,
mes25,
mes26,
mes27,
mes28,
mes29,
mes30,
mes31,
mes32,
mes33,
mes34,
mes35,
mes36,
mes37,
mes38,
mes39,
mes40,
mes41,
mes42,
mes43,
mes44,
mes45,
mes46,
mes47,
mes48,
mes49,
mes50,
mes51,
mes52,
0};