home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / jed098-4.zip / JED / LIB / DOS437.SL < prev    next >
Text File  |  1997-02-01  |  1KB  |  33 lines
  1. #ifdef MSDOS OS2
  2. %  Initializes upper/lowercase lookup tables for DOS code page 437.
  3. %  437 is the original DOS character table. So if your DOS version
  4. %  does not support code pages, use this table. 437 is also the 
  5. %  default code page for USA, United Kingdom, and International English.
  6. %  It is the alternate code page for Belgium, Brazil, Finland, France,
  7. %  Germany, Italy, Latin America, Netherlands, Spain, Sweden, and 
  8. %  Switzerland. 
  9. %  Information from MSDOS 5.0 manual
  10. %
  11. .   0  64 1 { dup define_case } _for
  12. .  65  90 1 { dup 32 + define_case } _for
  13. .  91  96 1 { dup define_case } _for
  14. . 123 255 1 { dup define_case } _for
  15. . 128 135 define_case
  16. . 142 132 define_case
  17. . 143 134 define_case
  18. . 144 130 define_case
  19. . 146 145 define_case
  20. . 153 148 define_case
  21. . 154 129 define_case
  22. . 165 164 define_case
  23. %
  24. % Now define a word.  This IS NOT based on above
  25. %
  26. . "0-9a-zA-Z\d128-\d167\d224-\d235" define_word
  27. % Marko thinks:
  28. . "0-9a-zA-Z\d128-\d154\d160-\d165\d224-\d235" define_word
  29.  
  30. #endif
  31.  
  32.  
  33.