Encode/ISO2022/JIS.esr

#?PESRC/1.0
Name:
        ISO2022::JIS
ShortDescription:
        An Encode module of 7-bit ISO/IEC 2022
        based coding systems defined by JISes
Description:
        This module defines convertion between perl internal
        representation and coding systems defined in standards
        of JIS (Japan Industrial Standards).
        
        Note that frequently used coding systems of JIS
        are included in other modules.  For instance,
        C<ISO-2022-JP-3> (defined by JIS X 0213:2000) is
        included in Encode::ISO2022::JUNET.

{
Name:
        jisx0201-1997-latin-7bit
Alias:
        JIS_C6220-1969-ro iso-ir-14 ir14 jp ISO646-JP 646-jp csISO14JISC6220ro
Cversion:
        C:bit=7
        C:G0=G94:J      ## JIS X 0201:1997 Graphic character set for Latin letters
        C:designate:*:default=-1
        C:option:{undef_char}=["\x3F", {type => 'G94', charset => 'J'}]
Encode:
        C:GR=undef
        C:G1=G96:~
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=0
        =>ucs_to_jisx0201_latin
        ->iso2022:C
Decode:
        C:G1=G94:J
        C:G2=G94:J
        C:G3=G94:J
        <-iso2022:C
        <=jisx0201_latin_to_ucs
Description:
        The 7-bit code for Latin letters (JIS X 0201:1997 6.1).
}

{
Name:
        jisx0201-1997-katakana-7bit
Alias:
        JIS_C6220-1969-jp JIS_C6220-1969 iso-ir-13 ir13 katakana x0201-7 csISO13JISC6220jp
Cversion:
        C:bit=7
        C:G0=G94:I      ## JIS X 0201:1997 Graphic character set for Katakana
        C:designate:*:default=-1
        C:option:{undef_char}=["\x25", {type => 'G94', charset => 'I'}]
Encode:
        C:GR=undef
        C:G1=G96:~
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=0
        =>ucs_to_jisx0201_katakana
        ->iso2022:C
Decode:
        C:G1=G94:I
        C:G2=G94:I
        C:G3=G94:I
        <-iso2022:C
        <=jisx0201_katakana_to_ucs
Description:
        The 7-bit code for Katakana (JIS X 0201:1997 6.2).
}

{
Name:
        jisx0201-1997-latin-katakana-7bit
Cversion:
        C:bit=7
        C:G0=G94:J      ## JIS X 0201:1997 Graphic character set for Latin letters
        C:G1=G94:I      ## JIS X 0201:1997 Graphic character set for Katakana
        C:designate:*:default=-1
        C:option:{undef_char}=["\x3F", {type => 'G94', charset => 'J'}]
Encode:
        C:GL=undef
        C:GR=undef
        C:option:{Ginvoke_to_left}=[1,1,1,1]
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=1   ## JIS X 0201:1997 doesn't have this limitation.
        =>ucs_to_jisx0201_latin ucs_to_jisx0201_katakana
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0201_latin_to_ucs jisx0201_katakana_to_ucs
Description:
        The 7-bit code for Latin and Katakana (JIS X 0201:1997 6.3).
        
        See also the description of C<jisx0201-1997-katakana-latin-7bit>.
}

{
Name:
        jisx0201-1997-katakana-latin-7bit
Cversion:
        C:bit=7
        C:G0=G94:J      ## JIS X 0201:1997 Graphic character set for Latin letters
        C:G1=G94:I      ## JIS X 0201:1997 Graphic character set for Katakana
        C:designate:*:default=-1
        C:option:{undef_char}=["\x3F", {type => 'G94', charset => 'J'}]
Encode:
        C:GL=undef
        C:GR=undef
        C:option:{Ginvoke_to_left}=[1,1,1,1]
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=1   ## JIS X 0201:1997 doesn't have this limitation.
        =>ucs_to_jisx0201_latin ucs_to_jisx0201_katakana
        ->iso2022:C
Decode:
        C:GL=G1 ## In default, G1=Katakana is invoked
        <-iso2022:C
        <=jisx0201_latin_to_ucs jisx0201_katakana_to_ucs
Description:
        The 7-bit code for Latin and Katakana (JIS X 0201:1997 6.3).
        
        JIS X 0201:1997 does not define whether G0 or G1 is
        invoked to GL at the initial status of information interchange.
        (But recommends G0=Latin should be invoked.)
        
        In this module, C<jisx0201-1997-latin-katakana-7bit>
        regards that G0=Latin is invoked to GL and
        C<jisx0201-1997-katakana-latin-7bit> that G1=Katakana
        is.  Note that on encoding, getting rid of this
        ambiguity, GL is regarded as undefined so that
        C<SI> or C<SO> is outputed before the first G0/G1 letter
        in both coding systems.
}

{
Name:
        jisx0201-1997-latin-latin-8bit
Alias:
        JIS_X0201 X0201 csHalfWidthKatakana kana8
Cversion:
        C:bit=8
        C:G0=G94:J      ## JIS X 0201:1997 Graphic character set for Latin letters
        C:G1=G94:I      ## JIS X 0201:1997 Graphic character set for Katakana
Encode:
        C:designate:*:default=-1
        C:option:{C1invoke_to_right}=1
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=0
        C:option:{undef_char}=["\x3F", {type => 'G94', charset => 'J'}]
        =>ucs_to_jisx0201_latin ucs_to_jisx0201_katakana
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0201_latin_to_ucs jisx0201_katakana_to_ucs
Description:
        The 8-bit code for Latin and Katakana (JIS X 0201:1997 6.4).
}

{
Name:
        jisx0208-1997-kanji-7bit
Cversion:
        C:bit=7
        C:G0=G94n:B@    ## JIS X 0208:1997
Encode:
        C:GR=undef
        C:G1=G96:~
        C:designate:*:default=-1
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=0
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
        =>ucs_to_jisx0208_1997
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0208_1997_to_ucs
Description:
        The 7-bit code for Kanji (JIS X 0208:1997 7.1.1).
}

{
Name:
        jisx0208-1997-kanji-8bit
Cversion:
        C:bit=8
        C:G0=G94n:B@    ## JIS X 0208:1997
Encode:
        C:GR=undef
        C:G1=G96:~
        C:designate:*:default=-1
        C:option:{C1invoke_to_right}=1
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=0
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
        =>ucs_to_jisx0208_1997
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0208_1997_to_ucs
Description:
        The 8-bit code for Kanji (JIS X 0208:1997 7.1.2).
}

{
Name:
        jisx0208-1997-irv-kanji-7bit
Cversion:
        C:bit=7
        C:G0=G94:B      ## ISO/IEC 646:1991 IRV
        C:G1=G94n:B@    ## JIS X 0208:1997
Encode:
        C:GL=undef
        C:GR=undef
        C:designate:*:default=-1
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
        C:option:{Ginvoke_to_left}=[1,1,1,1]
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=1   ## JIS X 0208:1997 does not have this limitation.
        =>ucs_to_ascii ucs_to_jisx0208_1997
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0208_1997_to_ucs
Description:
        The 7-bit code for IRV and Kanji (JIS X 0208:1997 7.2.1).
}

{
Name:
        jisx0208-1997-kanji-irv-7bit
Cversion:
        C:bit=7
        C:G0=G94:B      ## ISO/IEC 646:1991 IRV
        C:G1=G94n:B@    ## JIS X 0208:1997
Encode:
        C:GL=undef
        C:GR=undef
        C:designate:*:default=-1
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
        C:option:{Ginvoke_to_left}=[1,1,1,1]
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=1   ## JIS X 0208:1997 does not have this limitation.
        =>ucs_to_ascii ucs_to_jisx0208_1997
        ->iso2022:C
Decode:
        C:GL=G1
        <-iso2022:C
        <=jisx0208_1997_to_ucs
Description:
        The 7-bit code for IRV and Kanji (JIS X 0208:1997 7.2.1).
        
        This coding system is same as C<jisx0208-1997-irv-kanji-7bit>
        but start with Kanji set.  See description of
        C<jisx0201-1997-katakana-latin-7bit>.
}

{
Name:
        jisx0208-1997-irv-kanji-8bit
Cversion:
        C:bit=8
        C:G0=G94:B      ## ISO/IEC 646:1991 IRV
        C:G1=G94n:B@    ## JIS X 0208:1997
Encode:
        C:GL=undef
        C:GR=undef
        C:designate:*:default=-1
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
        C:option:{C1invoke_to_right}=1
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=0
        =>ucs_to_ascii ucs_to_jisx0208_1997
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0208_1997_to_ucs
Description:
        The 8-bit code for IRV and Kanji (JIS X 0208:1997 7.2.2).
        
        Note that this coding system is considerable as
        a subset of C<euc-jp>.  For the histrical reason,
        not a small number of Japanese EUCed applications
        did not support G2 and G3 sets (and some do not
        even now).  This coding system can be used for
        information interchanges with such implementions.
}

{
Name:
        jisx0208-1997-latin-kanji-7bit
Cversion:
        C:bit=7
        C:G0=G94:J      ## JIS X 0201:1997 Graphic character set for Latin letters
        C:G1=G94n:B@    ## JIS X 0208:1997
Encode:
        C:GL=undef
        C:GR=undef
        C:designate:*:default=-1
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
        C:option:{Ginvoke_to_left}=[1,1,1,1]
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=1   ## JIS X 0208:1997 does not have this limitation.
        =>ucs_to_jisx0201_latin ucs_to_jisx0208_1997
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0201_latin_to_ucs jisx0208_1997_to_ucs
Description:
        The 7-bit code for Latin and Kanji (JIS X 0208:1997 7.3.1).
}

{
Name:
        jisx0208-1997-kanji-latin-7bit
Cversion:
        C:bit=7
        C:G0=G94:J      ## JIS X 0201:1997 Graphic character set for Latin letters
        C:G1=G94n:B@    ## JIS X 0208:1997
Encode:
        C:GL=undef
        C:GR=undef
        C:designate:*:default=-1
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
        C:option:{Ginvoke_to_left}=[1,1,1,1]
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=1   ## JIS X 0208:1997 does not have this limitation.
        =>ucs_to_jisx0201_latin ucs_to_jisx0208_1997
        ->iso2022:C
Decode:
        C:GL=G1
        <-iso2022:C
        <=jisx0201_latin_to_ucs jisx0208_1997_to_ucs
Description:
        The 7-bit code for Latin and Kanji (JIS X 0208:1997 7.3.1).
        
        This coding system is same as C<jisx0208-1997-latin-kanji-7bit>
        but start with Kanji set.  See description of
        C<jisx0201-1997-katakana-latin-7bit>.
}

{
Name:
        jisx0208-1997-latin-kanji-8bit
Cversion:
        C:bit=8
        C:G0=G94:J      ## JIS X 0201:1997 Graphic character set for Latin letters
        C:G1=G94n:B@    ## JIS X 0208:1997
Encode:
        C:GL=undef
        C:GR=undef
        C:designate:*:default=-1
        C:option:{C1invoke_to_right}=1
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=0
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
        =>ucs_to_jisx0201_latin ucs_to_jisx0208_1997
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0201_latin_to_ucs jisx0208_1997_to_ucs
Description:
        The 8-bit code for Latin and Kanji (JIS X 0208:1997 7.2.2).
}

{
Name:
        jisx0213-2000-kanji-7bit
Cversion:
        C:bit=7
        C:G0=G94n:O     ## JIS X 0213:2000 plane 1
        C:G1=G94n:P     ## JIS X 0213:2000 plane 2
Encode:
        C:GR=undef
        C:designate:*:default=-1
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'O'}]
        C:option:{Ginvoke_to_left}=[1,1,1,1]
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=1   ## JIS X 0213:2000 does not have this limitation.
        =>ucs_to_jisx0213_2000_1 ucs_to_jisx0213_2000_2
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0213_2000_1_to_ucs jisx0213_2000_2_to_ucs
Description:
        The 7-bit code for Kanji (JIS X 0213:2000 7.1.1).
}

{
Name:
        jisx0213-2000-kanji-8bit
Cversion:
        C:bit=8
        C:G0=G94n:O     ## JIS X 0213:2000 plane 1
        C:G1=G94n:P     ## JIS X 0213:2000 plane 2
Encode:
        C:GR=undef
        C:designate:*:default=-1
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'O'}]
        C:option:{C1invoke_to_right}=1
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=0
        =>ucs_to_jisx0213_2000_1 ucs_to_jisx0213_2000_2
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0213_2000_1_to_ucs jisx0213_2000_2_to_ucs
Description:
        The 8-bit code for Kanji (JIS X 0213:2000 7.1.2).
}

{
Name:
        jisx0213-2000-irv-kanji-7bit
Cversion:
        C:bit=7
        C:G0=G94:B      ## ISO/IEC 646:1991 IRV
        C:G1=G94n:O     ## JIS X 0213:2000 plane 1
        C:G3=G94n:P     ## JIS X 0213:2000 plane 2
Encode:
        C:GR=undef
        C:designate:*:default=-1
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'O'}]
        C:option:{Ginvoke_to_left}=[1,1,1,1]
        C:option:{Ginvoked_by_single_shift}=[0,0,1,1]
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=1   ## JIS X 0213:2000 does not have this limitation.
        =>ucs_to_ascii ucs_to_jisx0213_2000_1 ucs_to_jisx0213_2000_2
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0213_2000_1_to_ucs jisx0213_2000_2_to_ucs
Description:
        The 7-bit code for IRV and Kanji (JIS X 0213:2000 7.2.1).
}

{
Name:
        jisx0213-2000-irv-kanji-8bit
Cversion:
        C:bit=8
        C:G0=G94:B      ## ISO/IEC 646:1991 IRV
        C:G1=G94n:O     ## JIS X 0213:2000 plane 1
        C:G3=G94n:P     ## JIS X 0213:2000 plane 2
Encode:
        C:GR=undef
        C:designate:*:default=-1
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'O'}]
        C:option:{Ginvoke_to_left}=[1,0,0,0]
        C:option:{Ginvoked_by_single_shift}=[0,0,1,1]
        C:option:{C1invoke_to_right}=1
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=1   ## JIS X 0213:2000 does not have this limitation.
        =>ucs_to_ascii ucs_to_jisx0213_2000_1 ucs_to_jisx0213_2000_2
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0213_2000_1_to_ucs jisx0213_2000_2_to_ucs
Description:
        The 7-bit code for IRV and Kanji (JIS X 0213:2000 7.2.1).
}

{
Name:
        jisx0213-2000-latin-kanji-7bit
Cversion:
        C:bit=7
        C:G0=G94:J      ## JIS X 0201:1997 Graphic character set for Latin letters
        C:G1=G94n:O     ## JIS X 0213:2000 plane 1
        C:G3=G94n:P     ## JIS X 0213:2000 plane 2
Encode:
        C:GR=undef
        C:designate:*:default=-1
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'O'}]
        C:option:{Ginvoke_to_left}=[1,1,1,1]
        C:option:{Ginvoked_by_single_shift}=[0,0,1,1]
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=1   ## JIS X 0213:2000 does not have this limitation.
        =>ucs_to_jisx0201_latin ucs_to_jisx0213_2000_1 ucs_to_jisx0213_2000_2
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0201_latin_to_ucs jisx0213_2000_1_to_ucs jisx0213_2000_2_to_ucs
Description:
        The 7-bit code for Latin and Kanji (JIS X 0213:2000 7.3.1).
}

{
Name:
        jisx0213-2000-latin-kanji-8bit
Cversion:
        C:bit=8
        C:G0=G94:J      ## JIS X 0201:1997 Graphic character set for Latin letters
        C:G1=G94n:O     ## JIS X 0213:2000 plane 1
        C:G3=G94n:P     ## JIS X 0213:2000 plane 2
Encode:
        C:GR=undef
        C:designate:*:default=-1
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'O'}]
        C:option:{Ginvoke_to_left}=[1,0,0,0]
        C:option:{Ginvoked_by_single_shift}=[0,0,1,1]
        C:option:{C1invoke_to_right}=1
        C:option:{reset}->{Gdesignation}=0
        C:option:{reset}->{Ginvoke}=1   ## JIS X 0213:2000 does not have this limitation.
        =>ucs_to_jisx0201_latin ucs_to_jisx0213_2000_1 ucs_to_jisx0213_2000_2
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0201_latin_to_ucs jisx0213_2000_1_to_ucs jisx0213_2000_2_to_ucs
Description:
        The 8-bit code for Latin and Kanji (JIS X 0213:2000 7.2.2).
}

{
Name:
        jisx4001-text-7bit
Cversion:
        C:bit=7
        C:G0=G94n:B ## JIS X 0208-1983
Encode:
        C:GR=undef
        C:C1=C1:~
        C:G0=G0:~
        C:designate:*:default=-1
        C:designate:G94:J=0     ## JIS X 0201-1976 Roman set
        C:designate:G94n:B=0    ## JIS X 0208-1983
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B'}]
        C:option:{reset}->{Gdesignation}='J'    ## JIS X 4001 does not have this limitation.
        =>ucs_to_jisx0201_latin ucs_to_jisx0208_1983
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0201_latin_to_ucs jisx0208_1983_to_ucs
Description:
        JIS X 4001 text (7-bit code, JIS X 4001-1989 6)
}

{
Name:
        jisx4001-text-8bit
Cversion:
        C:bit=8
        C:G0=G94n:B ## JIS X 0208-1983
Encode:
        C:GR=undef
        C:C1=C1:~
        C:G0=G0:~
        C:designate:*:default=-1
        C:designate:G94:J=0     ## JIS X 0201-1976 Roman set
        C:designate:G94n:B=0    ## JIS X 0208-1983
        C:option:{C1invoke_to_right}=1
        C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B'}]
        C:option:{reset}->{Gdesignation}='J'    ## JIS X 4001 does not have this limitation.
        =>ucs_to_jisx0201_latin ucs_to_jisx0208_1983
        ->iso2022:C
Decode:
        <-iso2022:C
        <=jisx0201_latin_to_ucs jisx0208_1983_to_ucs
Description:
        JIS X 4001 text (8-bit code, JIS X 4001-1989 6)
}

POD:ENCODING:POSTAMBLE:
        Note that although other JISes such as JIS X 0212 and JIS X 9010
        define ISO/IEC 2022-comfprming coded character sets,
        these standards do not define complete coding system (but define
        as used on ISO/IEC 2022 environment), so this module
        does not include those coded character sets.  (IETF RFC 1345
        and IANAREG give charset name to coded character sets
        consist of such standards.  But those are defined by RFC 1345,
        not by JIS.  Such coded character sets should be implemented
        in Encode::ISO2022::RFC1345.)

POD:SEE ALSO:
        %%ReferenceJISX0201_1997%%
        
        %%ReferenceJISX0208_1997%%
        
        %%ReferenceJISX0213_2000%%
        
        JIS X 4001-1989, "File Specification for Japanese Documents
        interchange (Basic Type)", Japan Industrial Standarad
        Committee (JISC) <http://www.jisc.go.jp/>, 1989.
        
        L<Encode::ISO2022::JUNET>, L<Encode::ISO2022::EUCJA>

POD:LICENSE:
        Copyright %%YEAR%% Wakaba <w@suika.fam.cx>
        
        %%PerlLicense%%
1	#?PESRC/1.0
2	Name:
3	ISO2022::JIS
4	ShortDescription:
5	An Encode module of 7-bit ISO/IEC 2022
6	based coding systems defined by JISes
7	Description:
8	This module defines convertion between perl internal
9	representation and coding systems defined in standards
10	of JIS (Japan Industrial Standards).
11
12	Note that frequently used coding systems of JIS
13	are included in other modules. For instance,
14	C<ISO-2022-JP-3> (defined by JIS X 0213:2000) is
15	included in Encode::ISO2022::JUNET.
16
17	{
18	Name:
19	jisx0201-1997-latin-7bit
20	Alias:
21	JIS_C6220-1969-ro iso-ir-14 ir14 jp ISO646-JP 646-jp csISO14JISC6220ro
22	Cversion:
23	C:bit=7
24	C:G0=G94:J ## JIS X 0201:1997 Graphic character set for Latin letters
25	C:designate:*:default=-1
26	C:option:{undef_char}=["\x3F", {type => 'G94', charset => 'J'}]
27	Encode:
28	C:GR=undef
29	C:G1=G96:~
30	C:option:{reset}->{Gdesignation}=0
31	C:option:{reset}->{Ginvoke}=0
32	=>ucs_to_jisx0201_latin
33	->iso2022:C
34	Decode:
35	C:G1=G94:J
36	C:G2=G94:J
37	C:G3=G94:J
38	<-iso2022:C
39	<=jisx0201_latin_to_ucs
40	Description:
41	The 7-bit code for Latin letters (JIS X 0201:1997 6.1).
42	}
43
44	{
45	Name:
46	jisx0201-1997-katakana-7bit
47	Alias:
48	JIS_C6220-1969-jp JIS_C6220-1969 iso-ir-13 ir13 katakana x0201-7 csISO13JISC6220jp
49	Cversion:
50	C:bit=7
51	C:G0=G94:I ## JIS X 0201:1997 Graphic character set for Katakana
52	C:designate:*:default=-1
53	C:option:{undef_char}=["\x25", {type => 'G94', charset => 'I'}]
54	Encode:
55	C:GR=undef
56	C:G1=G96:~
57	C:option:{reset}->{Gdesignation}=0
58	C:option:{reset}->{Ginvoke}=0
59	=>ucs_to_jisx0201_katakana
60	->iso2022:C
61	Decode:
62	C:G1=G94:I
63	C:G2=G94:I
64	C:G3=G94:I
65	<-iso2022:C
66	<=jisx0201_katakana_to_ucs
67	Description:
68	The 7-bit code for Katakana (JIS X 0201:1997 6.2).
69	}
70
71	{
72	Name:
73	jisx0201-1997-latin-katakana-7bit
74	Cversion:
75	C:bit=7
76	C:G0=G94:J ## JIS X 0201:1997 Graphic character set for Latin letters
77	C:G1=G94:I ## JIS X 0201:1997 Graphic character set for Katakana
78	C:designate:*:default=-1
79	C:option:{undef_char}=["\x3F", {type => 'G94', charset => 'J'}]
80	Encode:
81	C:GL=undef
82	C:GR=undef
83	C:option:{Ginvoke_to_left}=[1,1,1,1]
84	C:option:{reset}->{Gdesignation}=0
85	C:option:{reset}->{Ginvoke}=1 ## JIS X 0201:1997 doesn't have this limitation.
86	=>ucs_to_jisx0201_latin ucs_to_jisx0201_katakana
87	->iso2022:C
88	Decode:
89	<-iso2022:C
90	<=jisx0201_latin_to_ucs jisx0201_katakana_to_ucs
91	Description:
92	The 7-bit code for Latin and Katakana (JIS X 0201:1997 6.3).
93
94	See also the description of C<jisx0201-1997-katakana-latin-7bit>.
95	}
96
97	{
98	Name:
99	jisx0201-1997-katakana-latin-7bit
100	Cversion:
101	C:bit=7
102	C:G0=G94:J ## JIS X 0201:1997 Graphic character set for Latin letters
103	C:G1=G94:I ## JIS X 0201:1997 Graphic character set for Katakana
104	C:designate:*:default=-1
105	C:option:{undef_char}=["\x3F", {type => 'G94', charset => 'J'}]
106	Encode:
107	C:GL=undef
108	C:GR=undef
109	C:option:{Ginvoke_to_left}=[1,1,1,1]
110	C:option:{reset}->{Gdesignation}=0
111	C:option:{reset}->{Ginvoke}=1 ## JIS X 0201:1997 doesn't have this limitation.
112	=>ucs_to_jisx0201_latin ucs_to_jisx0201_katakana
113	->iso2022:C
114	Decode:
115	C:GL=G1 ## In default, G1=Katakana is invoked
116	<-iso2022:C
117	<=jisx0201_latin_to_ucs jisx0201_katakana_to_ucs
118	Description:
119	The 7-bit code for Latin and Katakana (JIS X 0201:1997 6.3).
120
121	JIS X 0201:1997 does not define whether G0 or G1 is
122	invoked to GL at the initial status of information interchange.
123	(But recommends G0=Latin should be invoked.)
124
125	In this module, C<jisx0201-1997-latin-katakana-7bit>
126	regards that G0=Latin is invoked to GL and
127	C<jisx0201-1997-katakana-latin-7bit> that G1=Katakana
128	is. Note that on encoding, getting rid of this
129	ambiguity, GL is regarded as undefined so that
130	C<SI> or C<SO> is outputed before the first G0/G1 letter
131	in both coding systems.
132	}
133
134	{
135	Name:
136	jisx0201-1997-latin-latin-8bit
137	Alias:
138	JIS_X0201 X0201 csHalfWidthKatakana kana8
139	Cversion:
140	C:bit=8
141	C:G0=G94:J ## JIS X 0201:1997 Graphic character set for Latin letters
142	C:G1=G94:I ## JIS X 0201:1997 Graphic character set for Katakana
143	Encode:
144	C:designate:*:default=-1
145	C:option:{C1invoke_to_right}=1
146	C:option:{reset}->{Gdesignation}=0
147	C:option:{reset}->{Ginvoke}=0
148	C:option:{undef_char}=["\x3F", {type => 'G94', charset => 'J'}]
149	=>ucs_to_jisx0201_latin ucs_to_jisx0201_katakana
150	->iso2022:C
151	Decode:
152	<-iso2022:C
153	<=jisx0201_latin_to_ucs jisx0201_katakana_to_ucs
154	Description:
155	The 8-bit code for Latin and Katakana (JIS X 0201:1997 6.4).
156	}
157
158	{
159	Name:
160	jisx0208-1997-kanji-7bit
161	Cversion:
162	C:bit=7
163	C:G0=G94n:B@ ## JIS X 0208:1997
164	Encode:
165	C:GR=undef
166	C:G1=G96:~
167	C:designate:*:default=-1
168	C:option:{reset}->{Gdesignation}=0
169	C:option:{reset}->{Ginvoke}=0
170	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
171	=>ucs_to_jisx0208_1997
172	->iso2022:C
173	Decode:
174	<-iso2022:C
175	<=jisx0208_1997_to_ucs
176	Description:
177	The 7-bit code for Kanji (JIS X 0208:1997 7.1.1).
178	}
179
180	{
181	Name:
182	jisx0208-1997-kanji-8bit
183	Cversion:
184	C:bit=8
185	C:G0=G94n:B@ ## JIS X 0208:1997
186	Encode:
187	C:GR=undef
188	C:G1=G96:~
189	C:designate:*:default=-1
190	C:option:{C1invoke_to_right}=1
191	C:option:{reset}->{Gdesignation}=0
192	C:option:{reset}->{Ginvoke}=0
193	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
194	=>ucs_to_jisx0208_1997
195	->iso2022:C
196	Decode:
197	<-iso2022:C
198	<=jisx0208_1997_to_ucs
199	Description:
200	The 8-bit code for Kanji (JIS X 0208:1997 7.1.2).
201	}
202
203	{
204	Name:
205	jisx0208-1997-irv-kanji-7bit
206	Cversion:
207	C:bit=7
208	C:G0=G94:B ## ISO/IEC 646:1991 IRV
209	C:G1=G94n:B@ ## JIS X 0208:1997
210	Encode:
211	C:GL=undef
212	C:GR=undef
213	C:designate:*:default=-1
214	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
215	C:option:{Ginvoke_to_left}=[1,1,1,1]
216	C:option:{reset}->{Gdesignation}=0
217	C:option:{reset}->{Ginvoke}=1 ## JIS X 0208:1997 does not have this limitation.
218	=>ucs_to_ascii ucs_to_jisx0208_1997
219	->iso2022:C
220	Decode:
221	<-iso2022:C
222	<=jisx0208_1997_to_ucs
223	Description:
224	The 7-bit code for IRV and Kanji (JIS X 0208:1997 7.2.1).
225	}
226
227	{
228	Name:
229	jisx0208-1997-kanji-irv-7bit
230	Cversion:
231	C:bit=7
232	C:G0=G94:B ## ISO/IEC 646:1991 IRV
233	C:G1=G94n:B@ ## JIS X 0208:1997
234	Encode:
235	C:GL=undef
236	C:GR=undef
237	C:designate:*:default=-1
238	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
239	C:option:{Ginvoke_to_left}=[1,1,1,1]
240	C:option:{reset}->{Gdesignation}=0
241	C:option:{reset}->{Ginvoke}=1 ## JIS X 0208:1997 does not have this limitation.
242	=>ucs_to_ascii ucs_to_jisx0208_1997
243	->iso2022:C
244	Decode:
245	C:GL=G1
246	<-iso2022:C
247	<=jisx0208_1997_to_ucs
248	Description:
249	The 7-bit code for IRV and Kanji (JIS X 0208:1997 7.2.1).
250
251	This coding system is same as C<jisx0208-1997-irv-kanji-7bit>
252	but start with Kanji set. See description of
253	C<jisx0201-1997-katakana-latin-7bit>.
254	}
255
256	{
257	Name:
258	jisx0208-1997-irv-kanji-8bit
259	Cversion:
260	C:bit=8
261	C:G0=G94:B ## ISO/IEC 646:1991 IRV
262	C:G1=G94n:B@ ## JIS X 0208:1997
263	Encode:
264	C:GL=undef
265	C:GR=undef
266	C:designate:*:default=-1
267	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
268	C:option:{C1invoke_to_right}=1
269	C:option:{reset}->{Gdesignation}=0
270	C:option:{reset}->{Ginvoke}=0
271	=>ucs_to_ascii ucs_to_jisx0208_1997
272	->iso2022:C
273	Decode:
274	<-iso2022:C
275	<=jisx0208_1997_to_ucs
276	Description:
277	The 8-bit code for IRV and Kanji (JIS X 0208:1997 7.2.2).
278
279	Note that this coding system is considerable as
280	a subset of C<euc-jp>. For the histrical reason,
281	not a small number of Japanese EUCed applications
282	did not support G2 and G3 sets (and some do not
283	even now). This coding system can be used for
284	information interchanges with such implementions.
285	}
286
287	{
288	Name:
289	jisx0208-1997-latin-kanji-7bit
290	Cversion:
291	C:bit=7
292	C:G0=G94:J ## JIS X 0201:1997 Graphic character set for Latin letters
293	C:G1=G94n:B@ ## JIS X 0208:1997
294	Encode:
295	C:GL=undef
296	C:GR=undef
297	C:designate:*:default=-1
298	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
299	C:option:{Ginvoke_to_left}=[1,1,1,1]
300	C:option:{reset}->{Gdesignation}=0
301	C:option:{reset}->{Ginvoke}=1 ## JIS X 0208:1997 does not have this limitation.
302	=>ucs_to_jisx0201_latin ucs_to_jisx0208_1997
303	->iso2022:C
304	Decode:
305	<-iso2022:C
306	<=jisx0201_latin_to_ucs jisx0208_1997_to_ucs
307	Description:
308	The 7-bit code for Latin and Kanji (JIS X 0208:1997 7.3.1).
309	}
310
311	{
312	Name:
313	jisx0208-1997-kanji-latin-7bit
314	Cversion:
315	C:bit=7
316	C:G0=G94:J ## JIS X 0201:1997 Graphic character set for Latin letters
317	C:G1=G94n:B@ ## JIS X 0208:1997
318	Encode:
319	C:GL=undef
320	C:GR=undef
321	C:designate:*:default=-1
322	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
323	C:option:{Ginvoke_to_left}=[1,1,1,1]
324	C:option:{reset}->{Gdesignation}=0
325	C:option:{reset}->{Ginvoke}=1 ## JIS X 0208:1997 does not have this limitation.
326	=>ucs_to_jisx0201_latin ucs_to_jisx0208_1997
327	->iso2022:C
328	Decode:
329	C:GL=G1
330	<-iso2022:C
331	<=jisx0201_latin_to_ucs jisx0208_1997_to_ucs
332	Description:
333	The 7-bit code for Latin and Kanji (JIS X 0208:1997 7.3.1).
334
335	This coding system is same as C<jisx0208-1997-latin-kanji-7bit>
336	but start with Kanji set. See description of
337	C<jisx0201-1997-katakana-latin-7bit>.
338	}
339
340	{
341	Name:
342	jisx0208-1997-latin-kanji-8bit
343	Cversion:
344	C:bit=8
345	C:G0=G94:J ## JIS X 0201:1997 Graphic character set for Latin letters
346	C:G1=G94n:B@ ## JIS X 0208:1997
347	Encode:
348	C:GL=undef
349	C:GR=undef
350	C:designate:*:default=-1
351	C:option:{C1invoke_to_right}=1
352	C:option:{reset}->{Gdesignation}=0
353	C:option:{reset}->{Ginvoke}=0
354	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B@'}]
355	=>ucs_to_jisx0201_latin ucs_to_jisx0208_1997
356	->iso2022:C
357	Decode:
358	<-iso2022:C
359	<=jisx0201_latin_to_ucs jisx0208_1997_to_ucs
360	Description:
361	The 8-bit code for Latin and Kanji (JIS X 0208:1997 7.2.2).
362	}
363
364	{
365	Name:
366	jisx0213-2000-kanji-7bit
367	Cversion:
368	C:bit=7
369	C:G0=G94n:O ## JIS X 0213:2000 plane 1
370	C:G1=G94n:P ## JIS X 0213:2000 plane 2
371	Encode:
372	C:GR=undef
373	C:designate:*:default=-1
374	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'O'}]
375	C:option:{Ginvoke_to_left}=[1,1,1,1]
376	C:option:{reset}->{Gdesignation}=0
377	C:option:{reset}->{Ginvoke}=1 ## JIS X 0213:2000 does not have this limitation.
378	=>ucs_to_jisx0213_2000_1 ucs_to_jisx0213_2000_2
379	->iso2022:C
380	Decode:
381	<-iso2022:C
382	<=jisx0213_2000_1_to_ucs jisx0213_2000_2_to_ucs
383	Description:
384	The 7-bit code for Kanji (JIS X 0213:2000 7.1.1).
385	}
386
387	{
388	Name:
389	jisx0213-2000-kanji-8bit
390	Cversion:
391	C:bit=8
392	C:G0=G94n:O ## JIS X 0213:2000 plane 1
393	C:G1=G94n:P ## JIS X 0213:2000 plane 2
394	Encode:
395	C:GR=undef
396	C:designate:*:default=-1
397	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'O'}]
398	C:option:{C1invoke_to_right}=1
399	C:option:{reset}->{Gdesignation}=0
400	C:option:{reset}->{Ginvoke}=0
401	=>ucs_to_jisx0213_2000_1 ucs_to_jisx0213_2000_2
402	->iso2022:C
403	Decode:
404	<-iso2022:C
405	<=jisx0213_2000_1_to_ucs jisx0213_2000_2_to_ucs
406	Description:
407	The 8-bit code for Kanji (JIS X 0213:2000 7.1.2).
408	}
409
410	{
411	Name:
412	jisx0213-2000-irv-kanji-7bit
413	Cversion:
414	C:bit=7
415	C:G0=G94:B ## ISO/IEC 646:1991 IRV
416	C:G1=G94n:O ## JIS X 0213:2000 plane 1
417	C:G3=G94n:P ## JIS X 0213:2000 plane 2
418	Encode:
419	C:GR=undef
420	C:designate:*:default=-1
421	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'O'}]
422	C:option:{Ginvoke_to_left}=[1,1,1,1]
423	C:option:{Ginvoked_by_single_shift}=[0,0,1,1]
424	C:option:{reset}->{Gdesignation}=0
425	C:option:{reset}->{Ginvoke}=1 ## JIS X 0213:2000 does not have this limitation.
426	=>ucs_to_ascii ucs_to_jisx0213_2000_1 ucs_to_jisx0213_2000_2
427	->iso2022:C
428	Decode:
429	<-iso2022:C
430	<=jisx0213_2000_1_to_ucs jisx0213_2000_2_to_ucs
431	Description:
432	The 7-bit code for IRV and Kanji (JIS X 0213:2000 7.2.1).
433	}
434
435	{
436	Name:
437	jisx0213-2000-irv-kanji-8bit
438	Cversion:
439	C:bit=8
440	C:G0=G94:B ## ISO/IEC 646:1991 IRV
441	C:G1=G94n:O ## JIS X 0213:2000 plane 1
442	C:G3=G94n:P ## JIS X 0213:2000 plane 2
443	Encode:
444	C:GR=undef
445	C:designate:*:default=-1
446	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'O'}]
447	C:option:{Ginvoke_to_left}=[1,0,0,0]
448	C:option:{Ginvoked_by_single_shift}=[0,0,1,1]
449	C:option:{C1invoke_to_right}=1
450	C:option:{reset}->{Gdesignation}=0
451	C:option:{reset}->{Ginvoke}=1 ## JIS X 0213:2000 does not have this limitation.
452	=>ucs_to_ascii ucs_to_jisx0213_2000_1 ucs_to_jisx0213_2000_2
453	->iso2022:C
454	Decode:
455	<-iso2022:C
456	<=jisx0213_2000_1_to_ucs jisx0213_2000_2_to_ucs
457	Description:
458	The 7-bit code for IRV and Kanji (JIS X 0213:2000 7.2.1).
459	}
460
461	{
462	Name:
463	jisx0213-2000-latin-kanji-7bit
464	Cversion:
465	C:bit=7
466	C:G0=G94:J ## JIS X 0201:1997 Graphic character set for Latin letters
467	C:G1=G94n:O ## JIS X 0213:2000 plane 1
468	C:G3=G94n:P ## JIS X 0213:2000 plane 2
469	Encode:
470	C:GR=undef
471	C:designate:*:default=-1
472	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'O'}]
473	C:option:{Ginvoke_to_left}=[1,1,1,1]
474	C:option:{Ginvoked_by_single_shift}=[0,0,1,1]
475	C:option:{reset}->{Gdesignation}=0
476	C:option:{reset}->{Ginvoke}=1 ## JIS X 0213:2000 does not have this limitation.
477	=>ucs_to_jisx0201_latin ucs_to_jisx0213_2000_1 ucs_to_jisx0213_2000_2
478	->iso2022:C
479	Decode:
480	<-iso2022:C
481	<=jisx0201_latin_to_ucs jisx0213_2000_1_to_ucs jisx0213_2000_2_to_ucs
482	Description:
483	The 7-bit code for Latin and Kanji (JIS X 0213:2000 7.3.1).
484	}
485
486	{
487	Name:
488	jisx0213-2000-latin-kanji-8bit
489	Cversion:
490	C:bit=8
491	C:G0=G94:J ## JIS X 0201:1997 Graphic character set for Latin letters
492	C:G1=G94n:O ## JIS X 0213:2000 plane 1
493	C:G3=G94n:P ## JIS X 0213:2000 plane 2
494	Encode:
495	C:GR=undef
496	C:designate:*:default=-1
497	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'O'}]
498	C:option:{Ginvoke_to_left}=[1,0,0,0]
499	C:option:{Ginvoked_by_single_shift}=[0,0,1,1]
500	C:option:{C1invoke_to_right}=1
501	C:option:{reset}->{Gdesignation}=0
502	C:option:{reset}->{Ginvoke}=1 ## JIS X 0213:2000 does not have this limitation.
503	=>ucs_to_jisx0201_latin ucs_to_jisx0213_2000_1 ucs_to_jisx0213_2000_2
504	->iso2022:C
505	Decode:
506	<-iso2022:C
507	<=jisx0201_latin_to_ucs jisx0213_2000_1_to_ucs jisx0213_2000_2_to_ucs
508	Description:
509	The 8-bit code for Latin and Kanji (JIS X 0213:2000 7.2.2).
510	}
511
512	{
513	Name:
514	jisx4001-text-7bit
515	Cversion:
516	C:bit=7
517	C:G0=G94n:B ## JIS X 0208-1983
518	Encode:
519	C:GR=undef
520	C:C1=C1:~
521	C:G0=G0:~
522	C:designate:*:default=-1
523	C:designate:G94:J=0 ## JIS X 0201-1976 Roman set
524	C:designate:G94n:B=0 ## JIS X 0208-1983
525	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B'}]
526	C:option:{reset}->{Gdesignation}='J' ## JIS X 4001 does not have this limitation.
527	=>ucs_to_jisx0201_latin ucs_to_jisx0208_1983
528	->iso2022:C
529	Decode:
530	<-iso2022:C
531	<=jisx0201_latin_to_ucs jisx0208_1983_to_ucs
532	Description:
533	JIS X 4001 text (7-bit code, JIS X 4001-1989 6)
534	}
535
536	{
537	Name:
538	jisx4001-text-8bit
539	Cversion:
540	C:bit=8
541	C:G0=G94n:B ## JIS X 0208-1983
542	Encode:
543	C:GR=undef
544	C:C1=C1:~
545	C:G0=G0:~
546	C:designate:*:default=-1
547	C:designate:G94:J=0 ## JIS X 0201-1976 Roman set
548	C:designate:G94n:B=0 ## JIS X 0208-1983
549	C:option:{C1invoke_to_right}=1
550	C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => 'B'}]
551	C:option:{reset}->{Gdesignation}='J' ## JIS X 4001 does not have this limitation.
552	=>ucs_to_jisx0201_latin ucs_to_jisx0208_1983
553	->iso2022:C
554	Decode:
555	<-iso2022:C
556	<=jisx0201_latin_to_ucs jisx0208_1983_to_ucs
557	Description:
558	JIS X 4001 text (8-bit code, JIS X 4001-1989 6)
559	}
560
561	POD:ENCODING:POSTAMBLE:
562	Note that although other JISes such as JIS X 0212 and JIS X 9010
563	define ISO/IEC 2022-comfprming coded character sets,
564	these standards do not define complete coding system (but define
565	as used on ISO/IEC 2022 environment), so this module
566	does not include those coded character sets. (IETF RFC 1345
567	and IANAREG give charset name to coded character sets
568	consist of such standards. But those are defined by RFC 1345,
569	not by JIS. Such coded character sets should be implemented
570	in Encode::ISO2022::RFC1345.)
571
572	POD:SEE ALSO:
573	%%ReferenceJISX0201_1997%%
574
575	%%ReferenceJISX0208_1997%%
576
577	%%ReferenceJISX0213_2000%%
578
579	JIS X 4001-1989, "File Specification for Japanese Documents
580	interchange (Basic Type)", Japan Industrial Standarad
581	Committee (JISC) <http://www.jisc.go.jp/>, 1989.
582
583	L<Encode::ISO2022::JUNET>, L<Encode::ISO2022::EUCJA>
584
585	POD:LICENSE:
586	Copyright %%YEAR%% Wakaba <w@suika.fam.cx>
587
588	%%PerlLicense%%