/******************************************************************************
 *                                                                            *
 *      jctype.c                                                              *
 *                                                                            *
 *      {ꏈ֐                                                        *
 *                                                                            *
 ******************************************************************************/

  XV

  2005/06/03 Version 1.00 Eiskmoji, iskpun, iskana, isalkana, ispnkana,
                            isalnmkana, isprkana, isgrkana, isjis, issjis1,
                            issjis2, iskuten1, iskuten2, jisjis, jissjis,
                            jiskuten, jisl0, jisl1, jisl2, jisalpha, jisupper,
                            jislower, jisdigit, jiskana, jishira, jiskigou,
                            jisspace, sjistojis, jistosjis, jistokuten,
                            kutentojis, sjistokuten, kutentosjis ǉB

  ֐ꗗ

 +-----------------------------+------+------+--------------------------------+
 |           ֐            | ǉ | C |              l              |
 +-----------------------------+------+------+--------------------------------+
 | iskmoji                     | 1.00 |      |                                |
 | iskpun                      | 1.00 |      |                                |
 | iskana                      | 1.00 |      |                                |
 | isalkana                    | 1.00 |      |                                |
 | ispnkana                    | 1.00 |      |                                |
 | isalnmkana                  | 1.00 |      |                                |
 | isprkana                    | 1.00 |      |                                |
 | isgrkana                    | 1.00 |      |                                |
 | isjis                       | 1.00 |      |                                |
 | issjis1                     | 1.00 |      |                                |
 | issjis2                     | 1.00 |      |                                |
 | iskuten1                    | 1.00 |      |                                |
 | iskuten2                    | 1.00 |      |                                |
 | jisjis                      | 1.00 |      |                                |
 | jissjis                     | 1.00 |      |                                |
 | jiskuten                    | 1.00 |      |                                |
 | jisl0                       | 1.00 |      |                                |
 | jisl1                       | 1.00 |      |                                |
 | jisl2                       | 1.00 |      |                                |
 | jisalpha                    | 1.00 |      |                                |
 | jisupper                    | 1.00 |      |                                |
 | jislower                    | 1.00 |      |                                |
 | jisdigit                    | 1.00 |      |                                |
 | jiskana                     | 1.00 |      |                                |
 | jishira                     | 1.00 |      |                                |
 | jiskigou                    | 1.00 |      |                                |
 | jisspace                    | 1.00 |      |                                |
 | sjistojis                   | 1.00 |      |                                |
 | jistosjis                   | 1.00 |      |                                |
 | jistokuten                  | 1.00 |      |                                |
 | kutentojis                  | 1.00 |      |                                |
 | sjistokuten                 | 1.00 |      |                                |
 | kutentosjis                 | 1.00 |      |                                |
 +-----------------------------+------+------+--------------------------------+

/******************************************************************************
 *
 *   Fiskmoji / Ǔ_ȊO̔pJiǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int iskmoji(int c);
 *
 *     FcǓ_ȊO̔pJiǂ𒲂ׂ}NłB
 *           i0xA6c0xDFj
 *
 *   lFcǓ_ȊO̔pJiȂ0ȊOԂ܂BȊO̕
 *           ̏ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fiskpun / pJi̋Ǔ_ǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int iskpun(int c);
 *
 *     FcpJi̋Ǔ_ǂ𒲂ׂ}NłB
 *           i0xA1c0xA5j
 *
 *   lFcpJi̋Ǔ_Ȃ0ȊOԂ܂BȊȌ̕
 *           0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fiskana / p̃Jiǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int iskana(int c);
 *
 *     Fcp̃Jiǂ𒲂ׂ}NłBi0xA1c0xDFj
 *
 *   lFcp̃JiȂ0ȊOԂ܂BȊȌ̕ꍇ0
 *           Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fisalkana / p܂̓Jiǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int isalkana(int c);
 *
 *     Fcp܂̓Jiǂ𒲂ׂ}NłBisalkana
 *           isalpha{iskmojiŝƓƂłB
 *
 *   lFcp܂̓JiȂ0ȊOԂ܂BȊȌ̕
 *           0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fispnkana / p̋Ǔ_܂̓Ji̋Ǔ_ǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int ispnkana(int c);
 *
 *     Fcp̋Ǔ_܂̓Ji̋Ǔ_ǂ𒲂ׂ}N
 *           Bispnkanaispunct{iskpunŝƓƂłB
 *
 *   lFcp̋Ǔ_܂̓Ji̋Ǔ_Ȃ0ȊOԂ܂B
 *           ȊȌ̕ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fisalnmkana / p܂̓Jiǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int isalnmkana(int c);
 *
 *     Fcp܂̓Jiǂ𒲂ׂ}NłBisalnmkana
 *           isalnum{iskmojiŝƓƂłB
 *
 *   lFcp܂̓JiȂ0ȊOԂ܂BȊȌ̕
 *           0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fisprkana / \\܂̓Jiǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int isprkana(int c);
 *
 *     Fc\\܂̓Jiǂ𒲂ׂ}NłB
 *           isprkanaisprint{iskanaŝƓƂłB
 *
 *   lFc\\܂̓JiȂ0ȊOԂ܂BȊO̕
 *           ̏ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fisgrkana / 󔒈ȊO̕\\܂̓Jiǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int isgrkana(int c);
 *
 *     Fc󔒈ȊO̕\\܂̓Jiǂ𒲂ׂ}N
 *           łBisgrkanaisgraph{iskanaŝƓƂłB
 *
 *   lFc󔒈ȊO̕\\܂̓JiȂ0ȊOԂ܂B
 *           ȊȌ̕ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fisjis / JISR[h̑1܂͑2oCgǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int isjis(int c);
 *
 *     FcJISR[h̑1܂͑2oCgǂ𒲂ׂ}NłB
 *           i0x21c0x7Ej
 *
 *   lFcJISR[h̑1܂͑2oCgȂ0ȊOԂ܂BȊO
 *           ̏̕ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fissjis1 / VtgJISR[h̑1oCgǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int issjis1(int c);
 *
 *     FcVtgJISR[h̑1oCgǂ𒲂ׂ}NłB
 *           i0x81c0x9F ܂ 0xE0c0xFCj
 *
 *   lFcVtgJISR[h̑1oCgȂ0ȊOԂ܂BȊO̕
 *           ̏ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fissjis2 / VtgJISR[h̑2oCgǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int issjis2(int c);
 *
 *     FcVtgJISR[h̑2oCgǂ𒲂ׂ}NłB
 *           i0x40c0x7E ܂ 0x80c0xFCj
 *
 *   lFcVtgJISR[h̑2oCgȂ0ȊOԂ܂BȊO̕
 *           ̏ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fiskuten1 / _̋悩ǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int iskuten1(int c);
 *
 *     Fc_̋悩ǂ𒲂ׂ}NłBi01c08 ܂
 *           c13 ܂ 16c84j
 *
 *   lFc_̋Ȃ0ȊOԂ܂BȊȌ̕ꍇ0Ԃ
 *           ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fiskuten2 / _̓_ǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int iskuten2(int c);
 *
 *     Fc_̓_ǂ𒲂ׂ}NłBi01c94j
 *
 *   lFc_̓_Ȃ0ȊOԂ܂BȊȌ̕ꍇ0Ԃ
 *           ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjisjis / JISR[hǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int jisjis(unsigned short c);
 *
 *     FcJISR[hǂ𒲂ׂ܂BiʃoCg 0x21c0x7EA
 *           ʃoCg 0x21c0x7Ej
 *
 *   lFcJISR[hȂ0ȊOԂ܂BȊȌ̕ꍇ0Ԃ
 *           ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjissjis / VtgJISR[hǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int jissjis(unsigned short c);
 *
 *     FcVtgJISR[hǂ𒲂ׂ܂BiʃoCg
 *           0x81c0x9F ܂ 0xE0c0xFCAʃoCg 0x40c0x7E ܂
 *            0x80c0xFCj
 *
 *   lFcVtgJISR[hȂ0ȊOԂ܂BȊȌ̕ꍇ
 *           0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjiskuten / _R[hǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int jiskuten(unsigned short c);
 *
 *     Fc_R[hǂ𒲂ׂ܂Bi2 01c08 ܂
 *           c13 ܂ 16c0x84A2 01c94j
 *
 *   lFc_R[hȂ0ȊOԂ܂BȊȌ̕ꍇ0
 *           ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjisl0 / VtgJISR[h̒̊ȊO̕ǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int jisl0(unsigned short c);
 *
 *     FcVtgJISR[h̒̊ȊO̕ǂ𒲂ׂ܂B
 *           i0x8140c0x889Ej
 *
 *   lFcVtgJISR[h̒̊ȊO̕Ȃ0ȊOԂ܂B
 *           ȊȌ̕ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjisl1 / VtgJISꐅǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int jisl1(unsigned short c);
 *
 *     FcVtgJISꐅǂ𒲂ׂ܂B
 *           i0x889Fc0x989Ej
 *
 *   lFcVtgJISꐅȂ0ȊOԂ܂BȊO̕
 *           ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjisl2 / VtgJIS񐅏ǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int jisl2(unsigned short c);
 *
 *     FcVtgJIS񐅏ǂ𒲂ׂ܂B
 *           i0x989Fc0xEAFCj
 *
 *   lFcVtgJIS񐅏Ȃ0ȊOԂ܂BȊO̕
 *           ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjisalpha / VtgJIS̉pǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int jisalpha(unsigned short c);
 *
 *     FcVtgJIS̉pǂ𒲂ׂ܂Bi0x8260c0x8279 
 *            0x8281c0x829Aj
 *
 *   lFcVtgJIS̉pȂ0ȊOԂ܂BȊȌ̕ꍇ
 *           0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjisupper / VtgJIS̉p啶ǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int jisupper(unsigned short c);
 *
 *     FcVtgJIS̉p啶ǂ𒲂ׂ܂Bi0x8260c0x8279j
 *
 *   lFcVtgJIS̉p啶Ȃ0ȊOԂ܂BȊȌ̕
 *           0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjislower / VtgJIS̉pǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int jislower(unsigned short c);
 *
 *     FcVtgJIS̉pǂ𒲂ׂ܂Bi0x8281c0x829Aj
 *
 *   lFcVtgJIS̉pȂ0ȊOԂ܂BȊȌ̕
 *           0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjisdigit / VtgJIS̐ǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int jisdigit(unsigned short c);
 *
 *     FcVtgJIS̐ǂ𒲂ׂ܂Bi0x824Fc0x8258j
 *
 *   lFcVtgJIS̐Ȃ0ȊOԂ܂BȊȌ̕ꍇ0
 *           Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjiskana / VtgJIS̃J^Jiǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int jiskana(unsigned short c);
 *
 *     FcVtgJIS̃J^Jiǂ𒲂ׂ܂Bi0x8340c0x8396j
 *
 *   lFcVtgJIS̃J^JiȂ0ȊOԂ܂BȊȌ̕
 *           0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjishira / VtgJIŜЂ炪Ȃǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int jishira(unsigned short c);
 *
 *     FcVtgJIŜЂ炪Ȃǂ𒲂ׂ܂Bi0x829Fc0x82F1j
 *
 *   lFcVtgJIŜЂ炪ȂȂ0ȊOԂ܂BȊȌ̕
 *           0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjiskigou / VtgJIS̋Lǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int jiskigou(unsigned short c);
 *
 *     FcVtgJIS̋Lǂ𒲂ׂ܂Bi0x8141c0x81ACj
 *
 *   lFcVtgJIS̋LȂ0ȊOԂ܂BȊȌ̕ꍇ0
 *           Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjisspace / VtgJIS̃Xy[Xǂ̔
 *
 * ďo`F#include "jctype.h"
 *           int jisspace(unsigned short c);
 *
 *     FcVtgJIS̃Xy[Xǂ𒲂ׂ܂Bic0x8140j
 *
 *   lFcVtgJIS̃Xy[XȂ0ȊOԂ܂BȊȌ̕
 *           0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fsjistojis / VtgJISR[hJISR[hɕϊ
 *
 * ďo`F#include "jctype.h"
 *           unsigned short sjistojis(unsigned short c);
 *
 *     Fc̃VtgJISR[hJISR[hɕϊ܂B
 *
 *   lFcVtgJISR[hƂēK؂ȒlłΑΉJISR[h
 *           ܂BȊO̒l̏ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjistosjis / JISR[hVtgJISR[hɕϊ
 *
 * ďo`F#include "jctype.h"
 *           unsigned short jistosjis(unsigned short c);
 *
 *     FcJISR[hVtgJISR[hɕϊ܂B
 *
 *   lFcJISR[hƂēK؂ȒlłΑΉVtgJISR[h
 *           ܂BȊO̒l̏ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fjistokuten / JISR[h_R[hɕϊ
 *
 * ďo`F#include "jctype.h"
 *           unsigned short jistokuten(unsigned short c);
 *
 *     FcJISR[h_R[hɕϊ܂B
 *
 *   lFcJISR[hƂēK؂ȒlłΑΉ_R[hԂ܂B
 *           ȊO̒l̏ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fkutentojis / _R[hJISR[hɕϊ
 *
 * ďo`F#include "jctype.h"
 *           unsigned short kutentojis(unsigned short c);
 *
 *     Fc̋_R[hJISR[hɕϊ܂B
 *
 *   lFc_R[hƂēK؂ȒlłΑΉJISR[hԂ܂B
 *           ȊO̒l̏ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fsjistokuten / VtgJISR[h_R[hɕϊ
 *
 * ďo`F#include "jctype.h"
 *           unsigned short sjistokuten(unsigned short c);
 *
 *     Fc̃VtgJISR[h_R[hɕϊ܂B
 *
 *   lFcVtgJISR[hƂēK؂ȒlłΑΉ_R[h
 *           ܂BȊO̒l̏ꍇ0Ԃ܂B
 *
 ******************************************************************************/

/******************************************************************************
 *
 *   Fkutentosjis / _R[hVtgJISR[hɕϊ
 *
 * ďo`F#include "jctype.h"
 *           unsigned short kutentosjis(unsigned short c);
 *
 *     Fc̋_R[hVtgJISR[hɕϊ܂B
 *
 *   lFc_R[hƂēK؂ȒlłΑΉVtgJISR[h
 *           ܂BȊO̒l̏ꍇ0Ԃ܂B
 *
 ******************************************************************************/

