Rev 3540 | Rev 4850 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 3540 | Rev 4135 | ||
---|---|---|---|
Line 95... | Line 95... | ||
95 | db char - 0x440 + 0xE0 |
95 | db char - 0x440 + 0xE0 |
96 | end if |
96 | end if |
97 | end while |
97 | end while |
98 | } |
98 | } |
Line -... | Line 99... | ||
- | 99 | ||
- | 100 | struc cp866 [arg] |
|
- | 101 | { |
|
- | 102 | common |
|
- | 103 | cp866 arg |
|
- | 104 | } |
|
99 | 105 | ||
100 | ; Latin-1 encoding |
106 | ; Latin-1 encoding |
101 | ; 0x00-0xFF - trivial map |
107 | ; 0x00-0xFF - trivial map |
102 | macro latin1 [arg] |
108 | macro latin1 [arg] |
103 | { local offs, char, graph |
109 | { local offs, char, graph |
Line 115... | Line 121... | ||
115 | .err Failed to convert to Latin-1 |
121 | .err Failed to convert to Latin-1 |
116 | end if |
122 | end if |
117 | end while |
123 | end while |
118 | } |
124 | } |
Line -... | Line 125... | ||
- | 125 | ||
- | 126 | struc latin1 [arg] |
|
- | 127 | { |
|
- | 128 | common |
|
- | 129 | latin1 arg |
|
- | 130 | } |
|
119 | 131 | ||
120 | ; CP850 encoding |
132 | ; CP850 encoding |
121 | macro cp850 [arg] |
133 | macro cp850 [arg] |
122 | { local offs, char, graph |
134 | { local offs, char, graph |
123 | offs = 0 |
135 | offs = 0 |
Line 145... | Line 157... | ||
145 | else |
157 | else |
146 | err Failed to convert to CP850 |
158 | err Failed to convert to CP850 |
147 | end if |
159 | end if |
148 | end while |
160 | end while |
149 | }>>>>>>>>>> |
161 | } |
- | 162 | ||
- | 163 | struc cp850 [arg] |
|
- | 164 | { |
|
- | 165 | common |
|
- | 166 | cp850 arg |
|
- | 167 | }>>>>>>>>>> |