19 lines
542 B
Plaintext
19 lines
542 B
Plaintext
|
<EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. <20><><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD> Win32 <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> koi8-r <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>. <20><><EFBFBD> <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>:
|
|||
|
|
set lang ru
|
|||
|
|
set mc_source {
|
|||
|
|
mcset $lang "File" "<22><><EFBFBD><EFBFBD>"
|
|||
|
|
mcset $lang "New..." "<22><><EFBFBD><EFBFBD><EFBFBD>..."
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
set mc_source [encoding convertto koi8-r $mc_source]
|
|||
|
|
set mc_source [encoding convertfrom cp1251 $mc_source]
|
|||
|
|
|
|||
|
|
eval $mc_source
|
|||
|
|
|
|||
|
|
++++++++++++++++++++++++++
|
|||
|
|
set mc_source [encoding convertto koi8-r $mc_source]
|
|||
|
|
set mc_source [encoding convertfrom [encoding system] $mc_source]
|
|||
|
|
|
|||
|
|
|
|||
|
|
|