Times_i

[stalin]

I have been sent a Word document from an author in America. It contains some words in a font that my vesion of Word calls Times_i.

I do not have this font and can find no trace of it using Google.

It is used for word with unusual diacritic characters (arabic transliterations) however it does not display correctly and (as I do not have this font) I cannot discover what the correct characters are supposed to be.

Has anyone heard of this font. Can I get hold of it so I can, at least, see what the correct characters should be?

After I've solved this problem my next problem will be how to convert this font into a unicode-compliant font but one thing at a time.

[Dick Pape]

This is probably not the right forum for "what is this font" questions, but I have one whose file name is timesi.ttf. Its font name is Times New Roman Italic and has 933 Unicode characters so could contain your characters. This is likely to be included in Windows o/s fonts.

Selecting any large open type font should show the characters even if not aligned or spaced properly unless the author did not use standard character mapping.

[Bhikkhu Pesala]

My best guess is that the font will use the CSX encoding. Try the attached font and see if the text makes sense. The following code is an OpenOffice macro to convert CSX to Unicode. I don't actually use it myself, so make sure that it does work as you want before running it on your documents. Always keep backups of course.

Code: Select all

Sub CSXtoUnicode
oDoc = thisComponent 
aFind = Array("  ", "ò", "ñ", "§", "â","à" ,"ä", "ã" ,"æ","å", "ô", "ó", "ÿ", "þ", "ì", "ë","î", "í", "ý", "ü", "ö", "õ", "¥", "¤", "ð", "ï", "è", "ç", "ê", "é", "ú", "ù", "ø", "÷") 
aReplace = Array(" ", "Ṭ", "ṭ", "ṁ", "Ā", "ā", "Ī", "ī", "Ū", "ū", "Ḍ", "ḍ", "Ḥ", "ḥ", "Ḷ", "ḷ","Ḹ", "ḹ", "Ṃ", "ṃ", "Ṇ", "ṇ", "Ñ", "ñ", "Ṅ", "ṅ", "Ṛ", "ṛ", "Ṝ", "ṝ", "Ṣ", "ṣ", "Ś", "ś")
aRayCount = 0 
FandR = oDoc.createReplaceDescriptor 
FandR.SearchCaseSensitive = true
FandR.SearchRegularExpression = true 
While aRayCount <= uBound(aFind) 
 FandR.setSearchString(aFind(aRayCount)) 
 FandR.setReplaceString(aReplace(aRayCount)) 
 aRayCount = aRayCount + 1 
 oDoc.ReplaceAll(FandR) 
Wend 
End Sub