include rus_add.e
include std/graphics.e

sequence s, t, u

t="123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890"
u="         10        20        30        40        50        60        70        80        90        100       110       120"

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

puts(1, u & '\n')
puts(1, t & '\n')

puts(1, "cp utf-8  -> " & recode(s, "du")) 
puts(1, {27} & "[6n") -- Esc-sequence to get the cursor position

if getc(0) then end if

? get_position()
? get_position()

if getc(0) then end if
--puts(1, "cp 866    -> " & s) puts(1, {27} & "[6n")
--? get_position()
--? get_position()
--puts(1, {27} & "[6n")

--puts(1, {27} & "[6n")

--puts(1, "\\e#8")
--"cp utf-8  -> �������������񆦇  ���  asdfgh ---- ��������������������������������"