Вниз
Скачать: CL | DM;

Как преобразовывать палитры цветов?   Найти похожие ветки 

 
Sormy   (2004-06-17 17:00) [0]

Так мы особо не наговорим...
Излагаю проблему полностью...
Я занимаюсь переводом игры Divine Divinity. Вскрыл все формат текстовых ресурсов... Теперь надо перевести шрифт... долго не мог допереть по какому алгоритму он написан... Теперь понял... Сейчас пишу редактор шрифтов... Все нормально открывает, но цвета не совпадают в игре и в моей проге...
В файле под каждый пиксел выделяется 2 байта, я подумал, что стандартный 16битный цвет, но, видимо, ошибся... Теперь бы надо как-нить его заставить нормально отображаться... Я уже начинаю думать, что какой-то из них под альфа канал установлен, хотя прозрачных шрифтов в игре не видел...


 
MBo ©   (2004-06-17 17:05) [1]

может, там 15-битный r5g5b5?


 
cyborg ©   (2004-06-17 17:25) [2]

Может красный и синий местами поменять?


 
NailMan ©   (2004-06-17 18:33) [3]

MBo ©
Что-то давно я не видел r5g5b5, обычно юзаются r5g6b5

---
WBR, NailMan aka 2:5020/3337.13


 
Sormy   (2004-06-17 19:34) [4]

Да вроде больше на r5g6b5 смахивает, но как бы преобразовать...
Оооо... игра может и тот и тот формат читать - в экзешнике нарыл скрытые опции...
ммм... вы правы...
Только один вопрос остается: Как бы преобразовать в стандартную палитру винды pf16bit но?


 
Sormy   (2004-06-18 15:54) [5]

Вскрыл до конца...
Спасибо за намек, а то меня что-то заклинило на стандартной палитре винды...
Вот процедура преобразующая цвет из ML Font в стандартный виндовый...

function word2rgb(w:word;pix_num:word):longint;
var
 s,sr,sg,sb:string;
 res:longint;
 r,g,b:byte;
begin
 s:=Ten2Two(w,16);
 sr:=copy(s,1,5);
 sg:=copy(s,6,6);
 sb:=copy(s,12,5);
 r:=8*(Any2Ten(sr,2)+1)-1;
 b:=8*(Any2Ten(sb,2)+1)-1;
 case (pix_num+1) mod 3 of
   1: g:=4*Any2Ten(sg,2)-1;
   2: g:=4*(Any2Ten(sg,2)+2)-1;
   0: g:=4*(Any2Ten(sg,2)+1)-1;
 else
   msgok("Ошибка загрузки палитры!");
 end;
 res:=rgb(r,g,b);
 word2rgb:=res;
end;


pix_num - номер пиксела...



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.021 c
3-1095744487
Fishka
2004-09-21 09:28
2004.10.24
Level DBF-файлов 5 и 7 - какое это имеет значение?


14-1096952439
Dimman
2004-10-05 09:00
2004.10.24
Вопрос про цифровое видео


3-1096446465
zorik
2004-09-29 12:27
2004.10.24
Округление в Firebird


1-1097406315
SNV-Soft
2004-10-10 15:05
2004.10.24
Как заставить работать OnMouseMove у панели!?


1-1097040056
Dr. Genius
2004-10-06 09:20
2004.10.24
Как узнать размер текстового файла в Delphi




   Наверх