1% Initializes upper/lowercase lookup tables for DOS code page 852. 2% 852 is the default code page for Czech, ... 3% not complete! - Czech only (Petr Peringer <peringer@dcse.fee.vutbr.cz>) 4% 5. 0 64 1 { dup define_case } _for 6. 65 90 1 { dup 32 + define_case } _for 7. 91 96 1 { dup define_case } _for 8. 123 255 1 { dup define_case } _for 9%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 10. 0xB5 0xA0 define_case % \'A --> \'a 11. 0xAC 0x9F define_case % \v{C} --> etc. in TeX sequences 12. 0xD2 0xD4 define_case % \v{D} 13. 0xB7 0xD8 define_case % \v{E} 14. 0x90 0x82 define_case % \'E 15. 0xD6 0xA1 define_case % \'I 16. 0xD5 0xE5 define_case % \v{N} 17. 0xE0 0xA2 define_case % \'O 18. 0xFC 0xFD define_case % \v{R} 19. 0xE6 0xE7 define_case % \v{S} 20. 0x9B 0x9C define_case % \v{T} 21. 0xDE 0x85 define_case % \r{U} 22. 0xE9 0xA3 define_case % \'U 23. 0xED 0xEC define_case % \'Y 24. 0xA6 0xA7 define_case % \v{Z} 25%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% 26. "0-9a-zA-Z_\xB5\xA0\xAC\x9F\xD2\xD4\xB7\xD8\x90\x82\xD6\xA1\xD5\xE5\xE0\xA2\xFC\xFD\xE6\xE7\x9B\x9C\xDE\x85\xE9\xA3\xED\xEC\xA6\xA7" 27. define_word 28