/[suikacvs]/perl/lib/Encode/ISO2022/Pictogram.esr
Suika

Contents of /perl/lib/Encode/ISO2022/Pictogram.esr

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.2 - (hide annotations) (download)
Thu Dec 19 01:27:01 2002 UTC (21 years, 11 months ago) by wakaba
Branch: MAIN
CVS Tags: HEAD
Changes since 1.1: +5 -3 lines
*** empty log message ***

1 wakaba 1.1 #?PESRC/1.0
2     Name:
3     ISO2022::Pictogram
4     ShortDescription:
5     ISO/IEC 2022-like coding systems with pictogram character sets
6    
7     {
8     Name:
9     jphone-iso-2022-jp
10 wakaba 1.2 Alias:
11     jphone-iso2022-jp
12 wakaba 1.1 Cversion:
13     use:charset:Pictogram
14     use:Encode::SJIS
15     C:bit=7
16     C:G0=G94:B
17     Encode:Prepare:
18     C:GR=undef
19     C:C1=C1:~
20     C:G1=G96:~
21     C:designate:*:default=-1
22     C:designate:G94:B=0 ## ASCII + YEN SIGN
23     C:designate:G94n:B=0 ## JIS X 0208:1997
24     C:designate:G94n:B@=0 ## JIS X 0208:1997
25     C:option:{use_revision}=0
26     C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => '@'}]
27     C:option:{fallback_from_ucs}=\&Encode::SJIS::_internal_to_page
28     Encode:
29 wakaba 1.2 =>ucs_to_ascii_yen ucs_to_jisx0208_1997_yen ucs_to_jisx0208_to_katakana_hw ucs_to_jphone
30 wakaba 1.1 ->iso2022:C
31     Decode:Prepare:
32     C:option:{final_to_set}->{G94n}->{B}='B@'
33     Decode:
34     !& Encode::SJIS::page_to_internal
35     <-iso2022:C
36     <=ascii_yen_to_ucs jisx0208_1997_to_ucs jphone_to_ucs jisx0208_1978_to_ucs
37     Description:
38     ISO-2022-JP for J-SKY defined by [JGUIDE].
39    
40     Note that this coding system does NOT comform to ISO/ISO 2022 NOR to RFC 1468.
41     }
42    
43     {
44     Name:
45     jphone-euc-jp
46     Cversion:
47     use:charset:Pictogram
48     use:Encode::SJIS
49     C:bit=8
50     C:G0=G94:B ## ASCII + YEN SIGN
51     C:G1=G94n:B@ ## JIS X 0208:1997
52     C:G2=G94:I ## JIS X 0201 Katakana
53     Encode:Prepare:
54     C:designate:*:default=-1
55     C:option:{Ginvoke_to_left}=[1,0,0,0]
56     C:option:{Ginvoke_by_single_shift}=[0,0,1,1]
57     C:option:{C1invoke_to_right}=1
58     C:option:{reset}->{Gdesignation}=0
59     C:option:{reset}->{Ginvoke}=0
60     C:option:{undef_char}=["\x22\x2E", {type => 'G94n', charset => 'B', revision => '@'}]
61     C:option:{fallback_from_ucs}=\&Encode::SJIS::_internal_to_page
62     Encode:
63 wakaba 1.2 =>ucs_to_ascii_yen ucs_to_jisx0208_1997_yen ucs_to_jisx0201_katakana_hw ucs_to_jphone
64 wakaba 1.1 ->iso2022:C
65     Decode:Prepare:
66     C:G3=G94n:D ## JIS X 0212-1990
67     Decode:
68     !& Encode::SJIS::page_to_internal
69     <-iso2022:C
70 wakaba 1.2 <=ascii_yen_to_ucs jisx0208_1997_to_ucs jisx0201_katakana_hw_to_ucs jphone_to_ucs jisx0212_1990_to_ucs
71 wakaba 1.1 Description:
72     EUC-JP for J-SKY defined by [JGUIDE].
73    
74     Note that this coding system does NOT comform to ISO/ISO 2022, Japanese EUC
75     specification NOR JIS X 0208:1997.
76     }
77    
78     POD:SEE ALSO:
79     L<Encode::SJIS::Pictogram>, L<Encode::JIS::JUNET>, L<Encode::JIS::EUCJA>
80    
81     POD:LICENSE:
82     Copyright %%YEAR%% Wakaba <w@suika.fam.cx>
83    
84     %%PerlLicense%%

admin@suikawiki.org
ViewVC Help
Powered by ViewVC 1.1.24