include rus_add.e

sequence s
s="�������������񆦇�����������������������������������" 
---^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^-cp866
clear_screen()

puts(1, "Test of the current Russian code page\n\n"
      & "cp 866    -> " & s & "\n"                 -- DOS
      & "cp 1251   -> " & recode(s, "dw") & "\n"   -- WIN
      & "cp 8859-5 -> " & recode(s, "di") & "\n"   -- ISO
      & "cp koi8-r -> " & recode(s, "dk") & "\n"   -- KOI
      & "cp Mac OS -> " & recode(s, "dm") & "\n"   -- MAC
      & "cp utf-8  -> " & recode(s, "du") & "\n\n" -- UTF
      & "Press Enter to exit...")

s[1] = getc(0)