Subversion Repositories Kolibri OS

Rev

Rev 3540 | Rev 5082 | 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 
}