/[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 - (show 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 #?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 Alias:
11 jphone-iso2022-jp
12 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 =>ucs_to_ascii_yen ucs_to_jisx0208_1997_yen ucs_to_jisx0208_to_katakana_hw ucs_to_jphone
30 ->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 =>ucs_to_ascii_yen ucs_to_jisx0208_1997_yen ucs_to_jisx0201_katakana_hw ucs_to_jphone
64 ->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 <=ascii_yen_to_ucs jisx0208_1997_to_ucs jisx0201_katakana_hw_to_ucs jphone_to_ucs jisx0212_1990_to_ucs
71 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