Armenian Knowledge Base  

Go Back   Armenian Knowledge Base > Technical sections > Software
Register

Reply
 
LinkBack Thread Tools
Old 03.05.2007, 22:59   #1
Младенец
 
Join Date: 05 2007
Location: Россия
Posts: 1
Downloads: 0
Uploads: 0
Reputation: 0 | 0
Default Из AprilArmenian в Sylfaen

Привет, всем!
Вот такая проблема, надо перекодировать текст из старой кодировки в Юникод, т.е. стоял шрифт AprilArmenian, а надо Sylfaen.
Чем это можно безболезненно и быстро сделать?
Пробовал разные программы DOS>Unicod, результат нулевой.
Помогите пожалуйста. Или все в ручную придется делать...
Reply With Quote
Old 03.05.2007, 23:37   #2
Кросаффчег!
 
hex's Avatar
 
Join Date: 09 2006
Location: йа здесь
Age: 37
Posts: 1,335
Downloads: 2
Uploads: 0
Reputation: 9 | 0
Default

попробуй KDWin-всик конверетером может получится
Reply With Quote
Old 03.05.2007, 23:56   #3
инсценирующи
 
[ Xelgen ]'s Avatar
 
Join Date: 07 2002
Location: Fireplace of Ecotopia
Age: 31
Posts: 4,327
Downloads: 22
Uploads: 0
Reputation: 193 | 4
Default

KDWin'овский конвертер
На armunicode.org есть конвертеры/макросы для МС офиса.
на osi.am был конвертер.
Reply With Quote
Old 04.05.2007, 02:01   #4
горно-предгорной жизни =)
 
Gor Vardanyan's Avatar
 
Join Date: 02 2005
Location: Multiverse
Age: 34
Posts: 962
Downloads: 0
Uploads: 0
Reputation: 0 | 0
Default

opyat' je KDWin-ovski converter, no posle convertacii obezatelno nado proverit' text, inogda vmesto symbolov "գ" stavlyaet "." tochku... etc
Reply With Quote
Old 04.05.2007, 05:26   #5
Дошкольник
 
Join Date: 02 2007
Location: Yerevan, Armenia
Posts: 111
Downloads: 0
Uploads: 0
Reputation: 66 | 3
Default

Also try searching in Google for babelpad
Reply With Quote
Old 04.05.2007, 08:18   #6
Извращенка
 
Тень Стервы...'s Avatar
 
Join Date: 04 2003
Location: Временно в сети
Age: 39
Posts: 959
Downloads: 21
Uploads: 0
Reputation: 96 | 3
Default

Тут три разных конвертора, try it...
Reply With Quote
Old 06.05.2007, 06:33   #7
Скромный ученый
 
Professor's Avatar
 
Join Date: 06 2006
Location: В мягком удобном кресле...
Age: 45
Posts: 7,375
Downloads: 20
Uploads: 3
Reputation: 1086 | 6
Default

Ссылки, конечно же, вещь хорошая, но...

Sub arial_amu()
'
' amu_arial Macro
' Macro recorded 22.04.01 by Tigran Petrosyan
'
st = Selection.Text
rt = ""
sl = Len(st)
'MsgBox (sl)
For i = 1 To sl
ch = Mid(st, i, 1)
num = AscW(ch)
'MsgBox (num)
If (num > 177 And num < 254) Then GoTo uc Else GoTo lc
uc:
delta = Fix(num / 2) - num / 2
'MsgBox (delta)
If (delta = 0) Then num_1 = 1329 + (num - 178) / 2 Else num_1 = 1377 + (num - 179) / 2
GoTo rr
lc: If num = 168 Then num_1 = 1415: GoTo rr Else
If num = 167 Then num_1 = 171: GoTo rr Else
If num = 166 Then num_1 = 187: GoTo rr Else
If num = 170 Then num_1 = 1373: GoTo rr Else
If num = 177 Then num_1 = 1374: GoTo rr Else
If num = 176 Then num_1 = 1371: GoTo rr Else
If num = 175 Then num_1 = 1372: GoTo rr Else num_1 = num
rr: ac = ChrW(num_1)
'MsgBox (num_1)
rt = rt & ac
Next i
Selection.Delete
Selection.Font.Name = "Sylfaen"
Selection.TypeText Text:=rt
End Sub
__________________
И этот милый старичок сказал с улыбкой мне:
- Ловлю я воду на крючок и жгу ее в огне...
Reply With Quote
Sponsored Links
Reply

Thread Tools


На правах рекламы:
реклама

All times are GMT. The time now is 07:38.


Powered by vBulletin® Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.