Rev 5765 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
5730 | pavelyakov | 1 | #ifndef INCLUDE_FONT_H |
2 | #define INCLUDE_FONT_H |
||
3 | |||
4 | #ifndef INCLUDE_MATH_H |
||
5 | #include "../lib/math.h" |
||
6 | #endif |
||
7 | |||
8 | #ifndef INCLUDE_IO_H |
||
9 | #include "../lib/io.h" |
||
10 | #endif |
||
11 | |||
5759 | pavelyakov | 12 | |
13 | #define CP866 0 |
||
14 | #define ANSI 1 |
||
15 | |||
5753 | leency | 16 | :struct __SIZE |
17 | { |
||
18 | word width,height; |
||
19 | signed offset_x,offset_y; |
||
5757 | pavelyakov | 20 | float offset_i,w_italic; |
5753 | leency | 21 | byte text; |
5754 | pavelyakov | 22 | byte TMP_WEIGHT; |
5753 | leency | 23 | }; |
5730 | pavelyakov | 24 | :struct FONT |
25 | { |
||
5753 | leency | 26 | __SIZE size; |
5757 | pavelyakov | 27 | byte width,height,offsetLine,r,g,b,weight,italic; |
5759 | pavelyakov | 28 | byte encoding; |
5753 | leency | 29 | dword color; |
5736 | pavelyakov | 30 | dword file_size; |
5740 | pavelyakov | 31 | dword buffer; |
5741 | pavelyakov | 32 | dword buffer_size; |
5730 | pavelyakov | 33 | word block; |
34 | dword data; |
||
5736 | pavelyakov | 35 | dword begin; |
5730 | pavelyakov | 36 | dword size_file; |
37 | byte load(...); |
||
5740 | pavelyakov | 38 | byte symbol(word x;byte s;dword c); |
5742 | pavelyakov | 39 | byte symbol_size(byte s); |
5776 | leency | 40 | dword prepare(word x,y;dword text1); |
41 | void show(word x,y); |
||
5757 | pavelyakov | 42 | byte textcenter(word x,y,w,h;dword txt); |
5753 | leency | 43 | dword getsize(dword text1); |
44 | dword textarea(word x,y;dword text,c); |
||
45 | byte changeSIZE(); |
||
5740 | pavelyakov | 46 | void PixelRGB(word x,y); |
5757 | pavelyakov | 47 | dword GetPixel(word x,y); |
5740 | pavelyakov | 48 | dword tmp_y,tmp_height,tmp_x; |
5745 | leency | 49 | byte no_bg_copy; |
50 | dword bg_color; |
||
5730 | pavelyakov | 51 | }; |
52 | FONT font = 0; |
||
5740 | pavelyakov | 53 | |
5757 | pavelyakov | 54 | :dword FONT::GetPixel(word x,y) |
55 | { |
||
56 | dword tmp; |
||
57 | tmp = y*size.width*3; |
||
58 | tmp += x*3; |
||
59 | tmp += buffer; |
||
60 | r = DSBYTE[tmp]; |
||
61 | tmp++; |
||
62 | g = DSBYTE[tmp]; |
||
63 | tmp++; |
||
64 | b = DSBYTE[tmp]; |
||
65 | } |
||
5740 | pavelyakov | 66 | :void FONT::PixelRGB(dword x,y) |
67 | { |
||
68 | dword tmp; |
||
5753 | leency | 69 | tmp = y*size.width*3; |
5740 | pavelyakov | 70 | tmp += x*3; |
71 | tmp += buffer; |
||
72 | |||
73 | DSBYTE[tmp] = r; |
||
74 | tmp++; |
||
75 | DSBYTE[tmp] = g; |
||
76 | tmp++; |
||
77 | DSBYTE[tmp] = b; |
||
78 | } |
||
5753 | leency | 79 | :byte FONT::changeSIZE() |
5730 | pavelyakov | 80 | { |
5736 | pavelyakov | 81 | dword TMP_DATA; |
82 | dword ofs; |
||
83 | byte s; |
||
5753 | leency | 84 | IF(size.text<9) size.text = 8; |
5754 | pavelyakov | 85 | s = size.text-8; |
86 | data = begin; |
||
87 | TMP_DATA = data; |
||
88 | TMP_DATA +=s*4; |
||
89 | ofs = DSDWORD[TMP_DATA]; |
||
90 | IF(ofs==-1)return false; |
||
91 | data += ofs; |
||
92 | data += 156; |
||
93 | TMP_DATA = data; |
||
94 | file_size = DSDWORD[TMP_DATA]; |
||
95 | TMP_DATA += file_size; |
||
96 | TMP_DATA--; |
||
97 | height = DSBYTE[TMP_DATA]; |
||
98 | TMP_DATA--; |
||
99 | width = DSBYTE[TMP_DATA]; |
||
100 | block = math.ceil(height*width/32); |
||
101 | return true; |
||
5736 | pavelyakov | 102 | } |
5740 | pavelyakov | 103 | :proc_info Form_SELF_FONTS; |
5757 | pavelyakov | 104 | :byte FONT::textcenter(word x,y,w,h;dword txt) |
105 | { |
||
106 | getsize(txt); |
||
107 | EDX = w/2; |
||
108 | ECX = size.width/2; |
||
109 | EDX -= ECX; |
||
110 | x += EDX; |
||
111 | return text(x,y,txt); |
||
112 | } |
||
5753 | leency | 113 | :dword FONT::getsize(dword text1) |
5736 | pavelyakov | 114 | { |
5753 | leency | 115 | size.height = size.width = 0; |
116 | size.offset_x = size.offset_y = -1; |
||
117 | IF(size.text)IF(!changeSIZE())return 0; |
||
5742 | pavelyakov | 118 | WHILE(DSBYTE[text1]) |
119 | { |
||
5753 | leency | 120 | symbol_size(DSBYTE[text1]); |
5742 | pavelyakov | 121 | text1++; |
122 | } |
||
5753 | leency | 123 | $neg size.offset_y |
124 | $neg size.offset_x |
||
125 | size.height++; |
||
126 | size.height += size.offset_y; |
||
127 | size.width += size.offset_x; |
||
128 | size.width++; |
||
5757 | pavelyakov | 129 | IF(italic) |
130 | { |
||
5758 | pavelyakov | 131 | size.w_italic = size.height/3; |
132 | size.offset_i = size.w_italic/size.height; |
||
133 | size.width += size.w_italic; |
||
134 | size.w_italic = -size.w_italic; |
||
5757 | pavelyakov | 135 | } |
5753 | leency | 136 | return size.width; |
5742 | pavelyakov | 137 | } |
138 | :byte FONT::symbol_size(byte s) |
||
139 | { |
||
140 | dword xi,yi; |
||
141 | dword tmp,_; |
||
142 | dword iii; |
||
143 | byte rw=0; |
||
5753 | leency | 144 | byte X; |
5754 | pavelyakov | 145 | size.TMP_WEIGHT = math.ceil(size.text/17); |
5753 | leency | 146 | IF(s==32) |
147 | { |
||
148 | size.width += width/4; |
||
5754 | pavelyakov | 149 | IF(weight) size.width+=size.TMP_WEIGHT; |
5753 | leency | 150 | return; |
151 | } |
||
152 | IF(s==9) |
||
153 | { |
||
154 | size.width += width; |
||
5754 | pavelyakov | 155 | IF(weight) size.width+=size.TMP_WEIGHT; |
5753 | leency | 156 | return; |
157 | } |
||
5759 | pavelyakov | 158 | IF(!encoding){ |
159 | IF(s>=128)&&(s<=175)s+=64; |
||
160 | ELSE IF(s>=224)&&(s<=239)s+=16; |
||
161 | } |
||
5742 | pavelyakov | 162 | yi = 0; |
163 | iii = 0; |
||
164 | tmp = 4*block*s; |
||
165 | tmp +=data; |
||
5753 | leency | 166 | while(yi |
5742 | pavelyakov | 167 | { |
168 | xi = 0; |
||
169 | WHILE(xi |
||
170 | { |
||
171 | IF(iii%32) _ >>= 1; |
||
172 | ELSE |
||
173 | { |
||
174 | tmp += 4; |
||
175 | _ = DSDWORD[tmp]; |
||
176 | } |
||
5753 | leency | 177 | IF(_&1) |
178 | { |
||
179 | IF(xi>rw)rw=xi; |
||
180 | IF(size.height |
||
181 | IF(size.offset_y<0)size.offset_y = yi; |
||
182 | ELSE IF(yi |
||
183 | IF(!X) X = xi; |
||
184 | ELSE IF(X>xi)X = xi; |
||
185 | } |
||
5742 | pavelyakov | 186 | xi++; |
187 | iii++; |
||
188 | } |
||
189 | yi++; |
||
190 | } |
||
5753 | leency | 191 | size.width += rw; |
5754 | pavelyakov | 192 | IF(weight) size.width+=size.TMP_WEIGHT; |
5753 | leency | 193 | IF(s=='_') size.width--; |
194 | IF(size.offset_x<0)size.offset_x = X; |
||
5742 | pavelyakov | 195 | } |
5776 | leency | 196 | :dword FONT::prepare(word x,y;dword text1) |
5742 | pavelyakov | 197 | { |
198 | signed len=0; |
||
5753 | leency | 199 | dword c; |
200 | word _tmp_h; |
||
201 | c = color; |
||
5754 | pavelyakov | 202 | IF(!text1)return false; |
203 | IF(size.text)IF(!changeSIZE())return false; |
||
5740 | pavelyakov | 204 | GetProcessInfo(#Form_SELF_FONTS, SelfInfo); |
5754 | pavelyakov | 205 | IF(y>Form_SELF_FONTS.cheight) return false; |
206 | IF(x>Form_SELF_FONTS.cwidth) return false; |
||
5740 | pavelyakov | 207 | AX = c; |
208 | r = AL; |
||
209 | g = AH; |
||
210 | c>>=16; |
||
211 | AX = c; |
||
212 | b = AL; |
||
5753 | leency | 213 | getsize(text1); |
5754 | pavelyakov | 214 | y -= size.offset_y; |
215 | tmp_y = y; |
||
216 | |||
217 | EDX = size.width*size.height*3; |
||
5745 | leency | 218 | IF(!buffer_size) |
219 | { |
||
5754 | pavelyakov | 220 | buffer_size = EDX; |
5745 | leency | 221 | buffer = malloc(buffer_size); |
222 | } |
||
5754 | pavelyakov | 223 | ELSE IF(buffer_size |
5745 | leency | 224 | { |
5754 | pavelyakov | 225 | buffer_size = EDX; |
5745 | leency | 226 | buffer = realloc(buffer,buffer_size); |
227 | } |
||
228 | IF (no_bg_copy) |
||
229 | { |
||
230 | EBX = bg_color; |
||
231 | EDI = buffer; |
||
5754 | pavelyakov | 232 | EAX = buffer_size+EDI; |
5745 | leency | 233 | WHILE (EDI |
234 | { |
||
235 | ESDWORD[EDI] = EBX; |
||
236 | $add edi,3 |
||
237 | } |
||
238 | } |
||
5753 | leency | 239 | ELSE CopyScreen(buffer,x+Form_SELF_FONTS.left+5,y+Form_SELF_FONTS.top+GetSkinHeight(),size.width,size.height); |
5757 | pavelyakov | 240 | len = size.offset_x; |
5730 | pavelyakov | 241 | WHILE(DSBYTE[text1]) |
242 | { |
||
5753 | leency | 243 | IF(DSBYTE[text1]=='_') len--; |
5754 | pavelyakov | 244 | len+=symbol(len,DSBYTE[text1]); |
245 | IF(weight)len+=math.ceil(size.text/17); |
||
5730 | pavelyakov | 246 | text1++; |
247 | } |
||
5761 | leency | 248 | IF (no_bg_copy) && (!color) SmoothFont(buffer, size.width, size.height); |
5730 | pavelyakov | 249 | return len; |
250 | } |
||
5776 | leency | 251 | :void FONT::show(word x,y) |
252 | { |
||
253 | _PutImage(x,y,size.width,size.height,buffer); |
||
254 | } |
||
5761 | leency | 255 | inline fastcall dword b24(EBX) { return DSDWORD[EBX] << 8; } |
5776 | leency | 256 | :void SmoothFont(dword image, w, h) |
5761 | leency | 257 | { |
258 | byte rr,gg,bb; |
||
259 | dword i,line_w,to, pixel; |
||
260 | line_w = w * 3; |
||
5776 | leency | 261 | to = w*h*3 + image - line_w - 3; |
262 | for (i = image; i < to; i+=3) { |
||
263 | if (i-image%line_w +3 == line_w) continue; |
||
5761 | leency | 264 | if (b24(i)==0x000000) && (b24(i+3)!=0x000000) && (b24(i+line_w)!=0x000000) && (b24(i+3+line_w)==0x000000) |
265 | { |
||
266 | ShadowImage(i+3, 1, 1, 2); |
||
267 | ShadowImage(i+line_w, 1, 1, 2); |
||
268 | } |
||
269 | else if (b24(i)!=0x000000) && (b24(i+3)==0x000000) && (b24(i+line_w)==0x000000) && (b24(i+3+line_w)!=0x000000) |
||
270 | { |
||
271 | ShadowImage(i, 1, 1, 2); |
||
272 | ShadowImage(i+3+line_w, 1, 1, 2); |
||
273 | } |
||
274 | } |
||
275 | } |
||
5736 | pavelyakov | 276 | :dword FONT::textarea(word x,y;dword text1,c;byte size) |
5730 | pavelyakov | 277 | { |
5740 | pavelyakov | 278 | |
5730 | pavelyakov | 279 | } |
5742 | pavelyakov | 280 | |
5754 | pavelyakov | 281 | :byte FONT::symbol(signed x;byte s) |
5730 | pavelyakov | 282 | { |
5736 | pavelyakov | 283 | dword xi,yi; |
284 | dword tmp,_; |
||
285 | dword iii; |
||
5757 | pavelyakov | 286 | float ital = -size.w_italic; |
5741 | pavelyakov | 287 | dword ___x; |
5754 | pavelyakov | 288 | word TMP; |
289 | byte _TMP_WEIGHT; |
||
5736 | pavelyakov | 290 | byte rw=0; |
291 | IF(s==32)return width/4; |
||
292 | IF(s==9)return width; |
||
5759 | pavelyakov | 293 | IF(!encoding) |
294 | { |
||
295 | IF(s>=128)&&(s<=175)s+=64; |
||
296 | ELSE IF(s>=224)&&(s<=239)s+=16; |
||
297 | } |
||
5736 | pavelyakov | 298 | yi = 0; |
299 | iii = 0; |
||
300 | tmp = 4*block*s; |
||
301 | tmp +=data; |
||
5741 | pavelyakov | 302 | while(yi |
5736 | pavelyakov | 303 | { |
304 | xi = 0; |
||
5754 | pavelyakov | 305 | TMP = size.offset_y+yi; |
5753 | leency | 306 | while(xi |
5736 | pavelyakov | 307 | { |
5757 | pavelyakov | 308 | IF(iii%32) _ >>= 1; |
309 | ELSE |
||
310 | { |
||
311 | tmp += 4; |
||
312 | _ = DSDWORD[tmp]; |
||
313 | } |
||
314 | if(_&1) |
||
315 | { |
||
316 | IF(xi>rw)rw=xi; |
||
317 | ___x = x+xi; |
||
318 | IF(italic)___x+=math.ceil(ital); |
||
319 | if(___x |
||
320 | { |
||
321 | PixelRGB(___x,TMP); |
||
322 | _TMP_WEIGHT = size.TMP_WEIGHT; |
||
323 | WHILE(_TMP_WEIGHT) |
||
5753 | leency | 324 | { |
5757 | pavelyakov | 325 | IF(weight) PixelRGB(___x+_TMP_WEIGHT,TMP); |
326 | _TMP_WEIGHT--; |
||
5753 | leency | 327 | } |
5757 | pavelyakov | 328 | } |
329 | } |
||
330 | xi++; |
||
331 | iii++; |
||
5736 | pavelyakov | 332 | } |
333 | yi++; |
||
5757 | pavelyakov | 334 | IF(italic) ital-=size.offset_i; |
5736 | pavelyakov | 335 | } |
336 | return rw; |
||
5730 | pavelyakov | 337 | } |
338 | :byte FONT::load(dword path) |
||
339 | { |
||
340 | dword tmp; |
||
5745 | leency | 341 | buffer_size = 0; |
5730 | pavelyakov | 342 | IF(data)free(data); |
5765 | leency | 343 | if (!io.readKPACK(path)) |
5745 | leency | 344 | { |
345 | debug("Error while loading font: "); |
||
346 | debugln(path); |
||
5754 | pavelyakov | 347 | return false; |
5745 | leency | 348 | } |
5757 | pavelyakov | 349 | begin = tmp = data = io.buffer_data; |
5730 | pavelyakov | 350 | size_file = io.FILES_SIZE; |
351 | tmp +=size_file; |
||
352 | tmp--; |
||
353 | height = DSBYTE[tmp]; |
||
354 | tmp--; |
||
355 | width = DSBYTE[tmp]; |
||
356 | block = math.ceil(height*width/32); |
||
5754 | pavelyakov | 357 | return true; |
5730 | pavelyakov | 358 | } |
359 | |||
360 | #endif |