Rev 151 | Rev 1618 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 1063 | tullio | 1 | |
| 2 | /* |
||
| 3 | * This program is free software; you can redistribute it and/or modify |
||
| 4 | * it under the terms of the GNU General Public License as published by |
||
| 5 | * the Free Software Foundation; either version 2 of the License, or |
||
| 6 | * (at your option) any later version. |
||
| 7 | * |
||
| 8 | * This program is distributed in the hope that it will be useful, |
||
| 9 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
||
| 10 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||
| 11 | * GNU General Public License for more details. |
||
| 12 | * |
||
| 13 | * You should have received a copy of the GNU General Public License |
||
| 14 | * along with this program; if not, write to the Free Software |
||
| 15 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
||
| 16 | * |
||
| 17 | */ |
||
| 18 | |||
| 2 | pj | 19 | #include <ll/i386/hw-data.h> |
| 20 | #include <ll/i386/hw-instr.h> |
||
| 21 | #include <ll/i386/mem.h> |
||
| 22 | #include <ll/stdlib.h> |
||
| 23 | |||
| 24 | #include <drivers/gd.h> |
||
| 25 | |||
| 151 | giacomo | 26 | #include "font.h" |
| 2 | pj | 27 | #include "fun8.h" |
| 28 | |||
| 29 | #define fontaddr 0xffa6eL /* indirizzo set caratteri */ |
||
| 30 | extern DWORD flbaddr; |
||
| 31 | |||
| 32 | void RdWin_256(WORD x1, WORD y1, WORD x2, WORD y2, BYTE *buf) |
||
| 33 | { |
||
| 34 | WORD b_bank, b_offset, display_ptr; |
||
| 35 | int dx, len1, len2, bank_num, row, sx[12]; |
||
| 36 | /* int bank, enmem;*/ |
||
| 37 | DWORD end_of_line, display_offset; |
||
| 38 | WORD bytes_per_row; |
||
| 39 | LIN_ADDR p; |
||
| 40 | |||
| 41 | bytes_per_row = gd_getbpr(); |
||
| 42 | p = buf; |
||
| 43 | |||
| 44 | if (bytes_per_row == 1024) { |
||
| 45 | /* ClrWin_1024(x1,y1,x2,y2,color);*/ |
||
| 46 | Seg_Off_256(x1, y1, bytes_per_row, &b_offset, &b_bank); |
||
| 47 | dx = (x2 - x1) + 1; |
||
| 48 | display_offset = b_offset; |
||
| 49 | bank_num = b_bank; |
||
| 50 | Load_Write_Bank_256(bank_num); |
||
| 51 | row = y1; |
||
| 52 | do { |
||
| 53 | display_ptr = display_offset; |
||
| 54 | /* Clr_Part(color, dx, display_ptr);*/ |
||
| 55 | memcpy(p, (LIN_ADDR)(0xA0000 + display_ptr), dx); |
||
| 56 | p += dx; |
||
| 57 | display_offset += bytes_per_row; |
||
| 58 | if (display_offset >= 65536L) { |
||
| 59 | bank_num++; |
||
| 60 | Load_Write_Bank_256(bank_num); |
||
| 61 | display_offset = x1; |
||
| 62 | } |
||
| 63 | row++; |
||
| 64 | } while (row <= y2); |
||
| 65 | Load_Write_Bank_256(0); |
||
| 66 | } else { |
||
| 67 | if (bytes_per_row == 640) { |
||
| 68 | sx[0] = 0; |
||
| 69 | sx[1] = 256; |
||
| 70 | sx[2] = 512; |
||
| 71 | sx[3] = 128; |
||
| 72 | sx[4] = 384; |
||
| 73 | sx[5] = 0; |
||
| 74 | } |
||
| 75 | if (bytes_per_row == 800) { |
||
| 76 | sx[0] = 0; |
||
| 77 | sx[1] = 736; |
||
| 78 | sx[2] = 672; |
||
| 79 | sx[3] = 608; |
||
| 80 | sx[4] = 544; |
||
| 81 | sx[5] = 480; |
||
| 82 | sx[6] = 416; |
||
| 83 | sx[7] = 352; |
||
| 84 | } |
||
| 85 | Seg_Off_256(x1, y1, bytes_per_row, &b_offset, &b_bank); |
||
| 86 | dx = (x2 - x1) + 1; |
||
| 87 | row = y1; |
||
| 88 | display_offset = b_offset; |
||
| 89 | display_ptr = display_offset; |
||
| 90 | bank_num = b_bank; |
||
| 91 | Load_Write_Bank_256(bank_num); |
||
| 92 | do { |
||
| 93 | end_of_line = display_ptr + (x2 - x1); |
||
| 94 | if (end_of_line > 65536L) { |
||
| 95 | len2 = (1 + end_of_line - 65536L); |
||
| 96 | len1 = dx - len2; |
||
| 97 | /* Clr_Part(color, length_1, display_ptr);*/ |
||
| 98 | memcpy(p, (LIN_ADDR)(0xA0000 + display_ptr), len1); |
||
| 99 | p += len1; |
||
| 100 | bank_num++; |
||
| 101 | Load_Write_Bank_256(bank_num); |
||
| 102 | display_ptr = 0; |
||
| 103 | /* Clr_Part(color, length_2, display_ptr);*/ |
||
| 104 | memcpy(p, (LIN_ADDR)(0xA0000 + display_ptr), len2); |
||
| 105 | p += len2; |
||
| 106 | display_ptr = bytes_per_row - len1; |
||
| 107 | } else { |
||
| 108 | /* Clr_Part(color, dx, display_ptr);*/ |
||
| 109 | memcpy(p, (LIN_ADDR)(0xA0000 + display_ptr), dx); |
||
| 110 | p += dx; |
||
| 111 | display_offset = display_ptr + bytes_per_row; |
||
| 112 | if (display_offset > 65536L) { |
||
| 113 | bank_num++; |
||
| 114 | Load_Write_Bank_256(bank_num); |
||
| 115 | if (sx[bank_num] <= x1) { |
||
| 116 | display_ptr = x1 - sx[bank_num]; |
||
| 117 | } else { |
||
| 118 | display_ptr = x1 + (bytes_per_row - sx[bank_num]); |
||
| 119 | } |
||
| 120 | } else { |
||
| 121 | display_ptr += bytes_per_row; |
||
| 122 | } |
||
| 123 | } |
||
| 124 | row++; |
||
| 125 | } while (row <= y2); |
||
| 126 | Load_Write_Bank_256(0); |
||
| 127 | } |
||
| 128 | } |
||
| 129 | |||
| 130 | void WrWin_256(WORD x1, WORD y1, WORD x2, WORD y2, BYTE *buf) |
||
| 131 | { |
||
| 132 | WORD b_bank, b_offset, display_ptr; |
||
| 133 | int dx, len1, len2, bank_num, row, sx[12]; |
||
| 134 | /* int bank, enmem;*/ |
||
| 135 | DWORD end_of_line, display_offset; |
||
| 136 | WORD bytes_per_row; |
||
| 137 | LIN_ADDR p; |
||
| 138 | |||
| 139 | bytes_per_row = gd_getbpr(); |
||
| 140 | p = buf; |
||
| 141 | |||
| 142 | if (bytes_per_row == 1024) { |
||
| 143 | /* ClrWin_1024(x1,y1,x2,y2,color);*/ |
||
| 144 | Seg_Off_256(x1, y1, bytes_per_row, &b_offset, &b_bank); |
||
| 145 | //dx = (x2 - x1); |
||
| 146 | dx = (x2 - x1 + 1); |
||
| 147 | display_offset = b_offset; |
||
| 148 | bank_num = b_bank; |
||
| 149 | Load_Write_Bank_256(bank_num); |
||
| 150 | row = y1; |
||
| 151 | do { |
||
| 152 | display_ptr = display_offset; |
||
| 153 | /* Clr_Part(color, dx, display_ptr);*/ |
||
| 154 | memcpy((LIN_ADDR)(0xA0000 + display_ptr), p, dx); |
||
| 155 | p += dx; |
||
| 156 | display_offset += bytes_per_row; |
||
| 157 | if (display_offset >= 65536L) { |
||
| 158 | bank_num++; |
||
| 159 | Load_Write_Bank_256(bank_num); |
||
| 160 | display_offset = x1; |
||
| 161 | } |
||
| 162 | row++; |
||
| 163 | } while (row <= y2); |
||
| 164 | Load_Write_Bank_256(0); |
||
| 165 | } else { |
||
| 166 | if (bytes_per_row == 640) { |
||
| 167 | sx[0] = 0; |
||
| 168 | sx[1] = 256; |
||
| 169 | sx[2] = 512; |
||
| 170 | sx[3] = 128; |
||
| 171 | sx[4] = 384; |
||
| 172 | sx[5] = 0; |
||
| 173 | } |
||
| 174 | if (bytes_per_row == 800) { |
||
| 175 | sx[0] = 0; |
||
| 176 | sx[1] = 736; |
||
| 177 | sx[2] = 672; |
||
| 178 | sx[3] = 608; |
||
| 179 | sx[4] = 544; |
||
| 180 | sx[5] = 480; |
||
| 181 | sx[6] = 416; |
||
| 182 | sx[7] = 352; |
||
| 183 | } |
||
| 184 | Seg_Off_256(x1, y1, bytes_per_row, &b_offset, &b_bank); |
||
| 185 | dx = (x2 - x1 + 1); |
||
| 186 | row = y1; |
||
| 187 | display_offset = b_offset; |
||
| 188 | display_ptr = display_offset; |
||
| 189 | bank_num = b_bank; |
||
| 190 | Load_Write_Bank_256(bank_num); |
||
| 191 | do { |
||
| 192 | end_of_line = display_ptr + (x2 - x1); |
||
| 193 | // if (end_of_line >= 65536L) { |
||
| 194 | if (end_of_line > 65536L) { |
||
| 195 | len2 = (1 + end_of_line - 65536L); |
||
| 196 | len1 = dx - len2; |
||
| 197 | /* Clr_Part(color, length_1, display_ptr);*/ |
||
| 198 | memcpy((LIN_ADDR)(0xA0000 + display_ptr), p, len1); |
||
| 199 | p += len1; |
||
| 200 | bank_num++; |
||
| 201 | Load_Write_Bank_256(bank_num); |
||
| 202 | display_ptr = 0; |
||
| 203 | /* Clr_Part(color, length_2, display_ptr);*/ |
||
| 204 | memcpy((LIN_ADDR)(0xA0000 + display_ptr), p, len2); |
||
| 205 | p += len2; |
||
| 206 | display_ptr = bytes_per_row - len1; |
||
| 207 | } else { |
||
| 208 | /* Clr_Part(color, dx, display_ptr);*/ |
||
| 209 | memcpy((LIN_ADDR)(0xA0000 + display_ptr), p, dx); |
||
| 210 | p += dx; |
||
| 211 | display_offset = display_ptr + bytes_per_row; |
||
| 212 | if (display_offset > 65536L) { |
||
| 213 | //if (display_offset >= 65536L) { |
||
| 214 | bank_num++; |
||
| 215 | Load_Write_Bank_256(bank_num); |
||
| 216 | if (sx[bank_num] <= x1) { |
||
| 217 | display_ptr = x1 - sx[bank_num]; |
||
| 218 | } else { |
||
| 219 | display_ptr = x1 + (bytes_per_row - sx[bank_num]); |
||
| 220 | } |
||
| 221 | } else { |
||
| 222 | display_ptr += bytes_per_row; |
||
| 223 | } |
||
| 224 | } |
||
| 225 | row++; |
||
| 226 | } while (row <= y2); |
||
| 227 | Load_Write_Bank_256(0); |
||
| 228 | } |
||
| 229 | } |
||
| 230 | |||
| 231 | void linGet8(WORD x1, WORD y1, WORD x2, WORD y2, BYTE *buf) |
||
| 232 | { |
||
| 233 | WORD bpr; |
||
| 234 | LIN_ADDR addr, p; |
||
| 235 | WORD dx, y; |
||
| 236 | |||
| 237 | bpr = gd_getbpr(); |
||
| 238 | p = buf; |
||
| 239 | addr = (void *)(flbaddr + x1 + bpr * y1); |
||
| 240 | //dx = x2 - x1; |
||
| 241 | dx = x2 - x1 +1; |
||
| 242 | |||
| 243 | for (y = y1; y <= y2; y++) { |
||
| 244 | memcpy(p, addr, dx); |
||
| 245 | p += dx; |
||
| 246 | addr += bpr; |
||
| 247 | } |
||
| 248 | } |
||
| 249 | |||
| 250 | void linPut8(WORD x1, WORD y1, WORD x2, WORD y2, BYTE *buf) |
||
| 251 | { |
||
| 252 | WORD bpr; |
||
| 253 | LIN_ADDR addr, p; |
||
| 254 | WORD dx, y; |
||
| 255 | |||
| 256 | bpr = gd_getbpr(); |
||
| 257 | p = buf; |
||
| 258 | addr = (void *)(flbaddr + x1 + bpr * y1); |
||
| 259 | dx = x2 - x1 +1; |
||
| 260 | |||
| 261 | for (y = y1; y <= y2; y++) { |
||
| 262 | memcpy(addr, p, dx); |
||
| 263 | p += dx; |
||
| 264 | addr += bpr; |
||
| 265 | } |
||
| 266 | } |
||
| 267 | |||
| 268 | void ClrWin_256(WORD x1, WORD y1, WORD x2, WORD y2, DWORD color) |
||
| 269 | { |
||
| 270 | WORD b_bank, b_offset, display_ptr; |
||
| 271 | int dx, len1, len2, bank_num, row, sx[12]; |
||
| 272 | /* int bank, enmem;*/ |
||
| 273 | DWORD end_of_line, display_offset; |
||
| 274 | WORD bytes_per_row; |
||
| 275 | |||
| 276 | bytes_per_row = gd_getbpr(); |
||
| 277 | |||
| 278 | if (bytes_per_row == 1024) { |
||
| 279 | /* ClrWin_1024(x1,y1,x2,y2,color);*/ |
||
| 280 | Seg_Off_256(x1, y1, bytes_per_row, &b_offset, &b_bank); |
||
| 281 | dx = (x2 - x1) + 1; |
||
| 282 | display_offset = b_offset; |
||
| 283 | bank_num = b_bank; |
||
| 284 | Load_Write_Bank_256(bank_num); |
||
| 285 | row = y1; |
||
| 286 | do { |
||
| 287 | display_ptr = display_offset; |
||
| 288 | /* Clr_Part(color, dx, display_ptr);*/ |
||
| 289 | memset((LIN_ADDR)(0xA0000 + display_ptr), color, dx); |
||
| 290 | display_offset += bytes_per_row; |
||
| 291 | if (display_offset >= 65536L) { |
||
| 292 | bank_num++; |
||
| 293 | Load_Write_Bank_256(bank_num); |
||
| 294 | display_offset = x1; |
||
| 295 | } |
||
| 296 | row++; |
||
| 297 | } while (row <= y2); |
||
| 298 | Load_Write_Bank_256(0); |
||
| 299 | } else { |
||
| 300 | if (bytes_per_row == 640) { |
||
| 301 | sx[0] = 0; |
||
| 302 | sx[1] = 256; |
||
| 303 | sx[2] = 512; |
||
| 304 | sx[3] = 128; |
||
| 305 | sx[4] = 384; |
||
| 306 | sx[5] = 0; |
||
| 307 | } |
||
| 308 | if (bytes_per_row == 800) { |
||
| 309 | sx[0] = 0; |
||
| 310 | sx[1] = 736; |
||
| 311 | sx[2] = 672; |
||
| 312 | sx[3] = 608; |
||
| 313 | sx[4] = 544; |
||
| 314 | sx[5] = 480; |
||
| 315 | sx[6] = 416; |
||
| 316 | sx[7] = 352; |
||
| 317 | } |
||
| 318 | Seg_Off_256(x1, y1, bytes_per_row, &b_offset, &b_bank); |
||
| 319 | dx = (x2 - x1) + 1; |
||
| 320 | row = y1; |
||
| 321 | display_offset = b_offset; |
||
| 322 | display_ptr = display_offset; |
||
| 323 | bank_num = b_bank; |
||
| 324 | Load_Write_Bank_256(bank_num); |
||
| 325 | do { |
||
| 326 | end_of_line = display_ptr + (x2 - x1); |
||
| 327 | if (end_of_line >= 65536L) { |
||
| 328 | len2 = (1 + end_of_line - 65536L); |
||
| 329 | len1 = dx - len2; |
||
| 330 | /* Clr_Part(color, length_1, display_ptr);*/ |
||
| 331 | memset((LIN_ADDR)(0xA0000 + display_ptr), color, len1); |
||
| 332 | bank_num++; |
||
| 333 | Load_Write_Bank_256(bank_num); |
||
| 334 | display_ptr = 0; |
||
| 335 | /* Clr_Part(color, length_2, display_ptr);*/ |
||
| 336 | memset((LIN_ADDR)(0xA0000 + display_ptr), color, len2); |
||
| 337 | display_ptr = bytes_per_row - len1; |
||
| 338 | } else { |
||
| 339 | /* Clr_Part(color, dx, display_ptr);*/ |
||
| 340 | memset((LIN_ADDR)(0xA0000 + display_ptr), color, dx); |
||
| 341 | display_offset = display_ptr + bytes_per_row; |
||
| 342 | if (display_offset >= 65536L) { |
||
| 343 | bank_num++; |
||
| 344 | Load_Write_Bank_256(bank_num); |
||
| 345 | if (sx[bank_num] <= x1) { |
||
| 346 | display_ptr = x1 - sx[bank_num]; |
||
| 347 | } else { |
||
| 348 | display_ptr = x1 + (bytes_per_row - sx[bank_num]); |
||
| 349 | } |
||
| 350 | } else { |
||
| 351 | display_ptr += bytes_per_row; |
||
| 352 | } |
||
| 353 | } |
||
| 354 | row++; |
||
| 355 | } while (row <= y2); |
||
| 356 | Load_Write_Bank_256(0); |
||
| 357 | } |
||
| 358 | } |
||
| 359 | |||
| 360 | void linBox8(WORD x1, WORD y1, WORD x2, WORD y2, DWORD color) |
||
| 361 | { |
||
| 362 | WORD bpr; |
||
| 363 | DWORD addr; |
||
| 364 | WORD dx, y; |
||
| 365 | |||
| 366 | bpr = gd_getbpr(); |
||
| 367 | addr = flbaddr + x1 + bpr * y1; |
||
| 368 | dx = x2 - x1 + 1; |
||
| 369 | |||
| 370 | for (y = y1; y <= y2; y++) { |
||
| 371 | memset((LIN_ADDR)addr, color, dx); |
||
| 372 | addr += bpr; |
||
| 373 | } |
||
| 374 | } |
||
| 375 | |||
| 376 | void WrRect_256(WORD x1, WORD y1, WORD x2, WORD y2, DWORD color) |
||
| 377 | { |
||
| 378 | WORD bank, offs, ebank, eoffs; |
||
| 379 | WORD bpr; |
||
| 380 | WORD line_segment, len; |
||
| 381 | WORD y; |
||
| 382 | |||
| 383 | bpr = gd_getbpr(); |
||
| 384 | len = 1 + x2 - x1; |
||
| 385 | Seg_Off_256(x2, y1, bpr, &eoffs, &ebank); |
||
| 386 | Seg_Off_256(x1, y1, bpr, &offs, &bank); |
||
| 387 | Load_Write_Bank_256(bank); |
||
| 388 | if (bank == ebank) { |
||
| 389 | memset((LIN_ADDR)(0xA0000 + offs), color, len); |
||
| 390 | } else { |
||
| 391 | line_segment = 65536L - offs; |
||
| 392 | memset((LIN_ADDR)(0xA0000 + offs), color, line_segment); |
||
| 393 | Load_Write_Bank_256(ebank); |
||
| 394 | memset((LIN_ADDR)0xA0000, color, eoffs); |
||
| 395 | } |
||
| 396 | for (y = y1 + 1; y < y2 + 1; y++) { |
||
| 397 | Seg_Off_256(x1, y, bpr, &offs, &bank); |
||
| 398 | Load_Write_Bank_256(bank); |
||
| 399 | lmempokeb((LIN_ADDR)(0xA0000 + offs), color); |
||
| 400 | Seg_Off_256(x2, y, bpr, &offs, &bank); |
||
| 401 | Load_Write_Bank_256(bank); |
||
| 402 | lmempokeb((LIN_ADDR)(0xA0000 + offs), color); |
||
| 403 | } |
||
| 404 | Seg_Off_256(x2, y2, bpr, &eoffs, &ebank); |
||
| 405 | Seg_Off_256(x1, y2, bpr, &offs, &bank); |
||
| 406 | Load_Write_Bank_256(bank); |
||
| 407 | if (bank == ebank) { |
||
| 408 | memset((LIN_ADDR)(0xA0000 + offs), color, len); |
||
| 409 | } else { |
||
| 410 | line_segment = 65536L - offs; |
||
| 411 | memset((LIN_ADDR)(0xA0000 + offs), color, line_segment); |
||
| 412 | Load_Write_Bank_256(ebank); |
||
| 413 | memset((LIN_ADDR)0xA0000, color, eoffs); |
||
| 414 | } |
||
| 415 | } |
||
| 416 | |||
| 417 | void linRect8(WORD x1, WORD y1, WORD x2, WORD y2, DWORD color) |
||
| 418 | { |
||
| 419 | WORD bpr; |
||
| 420 | DWORD addr; |
||
| 421 | WORD dx, y; |
||
| 422 | |||
| 423 | bpr = gd_getbpr(); |
||
| 424 | addr = flbaddr + x1 + bpr * y1; |
||
| 425 | dx = x2 - x1; |
||
| 426 | |||
| 427 | memset((LIN_ADDR)addr, color, dx+1); |
||
| 428 | addr += bpr; |
||
| 429 | |||
| 430 | for (y = y1 + 1; y <= y2 - 1; y++) { |
||
| 431 | lmempokeb((LIN_ADDR)addr, color); |
||
| 432 | lmempokeb((LIN_ADDR)(addr + dx), color); |
||
| 433 | addr += bpr; |
||
| 434 | } |
||
| 435 | memset((LIN_ADDR)addr, color, dx+1); |
||
| 436 | } |
||
| 437 | |||
| 438 | void WrText_256(char *text, WORD x, WORD y, DWORD fg, DWORD bg) |
||
| 439 | { |
||
| 440 | DWORD fp; |
||
| 441 | WORD offs, bank; |
||
| 442 | WORD bpr; |
||
| 443 | int r, c, bits; |
||
| 444 | |||
| 445 | bpr = gd_getbpr(); |
||
| 446 | while (*text) { |
||
| 151 | giacomo | 447 | fp = (DWORD)&(font_table[*(BYTE *)text][0]); |
| 2 | pj | 448 | for (r=0; r<8; r++) { |
| 449 | bits = lmempeekb((LIN_ADDR)(fp++)); |
||
| 450 | for (c=0; c<8; c++) |
||
| 451 | if (bits & (0x80>>c)) { |
||
| 452 | Seg_Off_256(x + c, y + r, bpr, &offs, &bank); |
||
| 453 | Load_Write_Bank_256(bank); |
||
| 454 | lmempokeb((LIN_ADDR)(0xA0000 + offs), fg); |
||
| 455 | } |
||
| 456 | /* lmempokeb((LIN_ADDR)(addr + (y + r) * bpr + x + c), fg);*/ |
||
| 457 | /* vbe_putpixel((x+c),(y+r),fg);*/ |
||
| 458 | else { |
||
| 459 | Seg_Off_256(x + c, y + r, bpr, &offs, &bank); |
||
| 460 | Load_Write_Bank_256(bank); |
||
| 461 | lmempokeb((LIN_ADDR)(0xA0000 + offs), bg); |
||
| 462 | } |
||
| 463 | /* lmempokeb((LIN_ADDR)(addr + (y + r) * bpr + x + c), bg);*/ |
||
| 464 | /* vbe_putpixel((x+c), (y+r), bg);*/ |
||
| 465 | } |
||
| 466 | text++; |
||
| 467 | x += 8; |
||
| 468 | } |
||
| 469 | } |
||
| 470 | |||
| 471 | void linText8(char *text, WORD x, WORD y, DWORD fg, DWORD bg) |
||
| 472 | { |
||
| 473 | DWORD fp, addr; |
||
| 474 | WORD bpr; |
||
| 475 | int r, c, bits; |
||
| 476 | |||
| 477 | bpr = gd_getbpr(); |
||
| 478 | addr = gd_getflb(); |
||
| 479 | while (*text) { |
||
| 480 | /*DOSSetAddr(fp, (fontaddr + (8 * *(BYTE *)text)));*/ |
||
| 481 | /*DOSSetAddr(fp, (fontaddr + (8 * *(BYTE *)text)));*/ |
||
| 151 | giacomo | 482 | fp = (DWORD)&(font_table[*(BYTE *)text][0]); |
| 2 | pj | 483 | for (r=0; r<8; r++) { |
| 484 | bits = lmempeekb((LIN_ADDR)fp++); |
||
| 485 | for (c=0; c<8; c++) |
||
| 486 | if (bits & (0x80>>c)) |
||
| 487 | lmempokeb((LIN_ADDR)(addr + (y + r) * bpr + x + c), fg); |
||
| 488 | /* vbe_putpixel((x+c),(y+r),fg);*/ |
||
| 489 | else |
||
| 490 | lmempokeb((LIN_ADDR)(addr + (y + r) * bpr + x + c), bg); |
||
| 491 | /* vbe_putpixel((x+c), (y+r), bg);*/ |
||
| 492 | } |
||
| 493 | text++; |
||
| 494 | x += 8; |
||
| 495 | } |
||
| 496 | } |
||
| 497 | |||
| 498 | void WrLine_256(WORD x1, WORD y1, WORD x2, WORD y2, DWORD color) |
||
| 499 | { |
||
| 500 | int dx, dy, incr1, incr2, d, x, y, xend, yend, yinc, xinc; |
||
| 501 | WORD bpr; |
||
| 502 | WORD bank, offs, ebank, eoffs; |
||
| 503 | WORD line_segment, len; |
||
| 504 | |||
| 505 | bpr = gd_getbpr(); |
||
| 506 | if (y2 == y1) { |
||
| 507 | y = y1; |
||
| 508 | if (x1 > x2) { |
||
| 509 | xend = x1; |
||
| 510 | x1 = x2; |
||
| 511 | x2 = xend; |
||
| 512 | } |
||
| 513 | /* WrHline_256(x1, x2, y1, color, bpr); */ |
||
| 514 | len = 1 + x2 - x1; |
||
| 515 | Seg_Off_256(x2, y, bpr, &eoffs, &ebank); |
||
| 516 | Seg_Off_256(x1, y, bpr, &offs, &bank); |
||
| 517 | Load_Write_Bank_256(bank); |
||
| 518 | if (bank == ebank) { |
||
| 519 | memset((LIN_ADDR)(0xA0000 + offs), color, len); |
||
| 520 | } else { |
||
| 521 | line_segment = 65536L - offs; |
||
| 522 | memset((LIN_ADDR)(0xA0000 + offs), color, line_segment); |
||
| 523 | Load_Write_Bank_256(ebank); |
||
| 524 | memset((LIN_ADDR)0xA0000, color, eoffs); |
||
| 525 | } |
||
| 526 | } else { |
||
| 527 | dx = abs(x2 - x1); |
||
| 528 | dy = abs(y2 - y1); |
||
| 529 | if (dx >= dy) { |
||
| 530 | if (x1 > x2) { |
||
| 531 | x = x2; |
||
| 532 | y = y2; |
||
| 533 | xend = x1; |
||
| 534 | if (dy == 0) { |
||
| 535 | yinc = 0; |
||
| 536 | } else { |
||
| 537 | if (y2 > y1) { |
||
| 538 | yinc = -1; |
||
| 539 | } else { |
||
| 540 | yinc = 1; |
||
| 541 | } |
||
| 542 | } |
||
| 543 | } else { |
||
| 544 | x = x1; |
||
| 545 | y = y1; |
||
| 546 | xend = x2; |
||
| 547 | if (dy == 0) { |
||
| 548 | yinc = 0; |
||
| 549 | } else { |
||
| 550 | if (y2 > y1) { |
||
| 551 | yinc =1; |
||
| 552 | } else { |
||
| 553 | yinc = -1; |
||
| 554 | } |
||
| 555 | } |
||
| 556 | } |
||
| 557 | incr1 = 2 * dy; |
||
| 558 | d = incr1 - dx; |
||
| 559 | incr2 = 2 * (dy - dx); |
||
| 560 | Seg_Off_256(x, y, bpr, &offs, &bank); |
||
| 561 | Load_Write_Bank_256(bank); |
||
| 562 | lmempokeb((LIN_ADDR)(0xA0000 + offs), color); |
||
| 563 | while (x < xend) { |
||
| 564 | x++; |
||
| 565 | if (d < 0) { |
||
| 566 | d += incr1; |
||
| 567 | } else { |
||
| 568 | y += yinc; |
||
| 569 | d += incr2; |
||
| 570 | } |
||
| 571 | Seg_Off_256(x, y, bpr, &offs, &bank); |
||
| 572 | Load_Write_Bank_256(bank); |
||
| 573 | lmempokeb((LIN_ADDR)(0xA0000 + offs), color); |
||
| 574 | } |
||
| 575 | } else { |
||
| 576 | if (y1 > y2) { |
||
| 577 | x = x2; |
||
| 578 | y = y2; |
||
| 579 | yend = y1; |
||
| 580 | if (dx == 0) { |
||
| 581 | xinc = 0; |
||
| 582 | } else { |
||
| 583 | if (x2 > x1) { |
||
| 584 | xinc = -1; |
||
| 585 | } else { |
||
| 586 | xinc = 1; |
||
| 587 | } |
||
| 588 | } |
||
| 589 | } else { |
||
| 590 | x = x1; |
||
| 591 | y = y1; |
||
| 592 | yend = y2; |
||
| 593 | if (dx == 0) { |
||
| 594 | xinc = 0; |
||
| 595 | } else { |
||
| 596 | if (x2 > x1) { |
||
| 597 | xinc = 1; |
||
| 598 | } else { |
||
| 599 | xinc = -1; |
||
| 600 | } |
||
| 601 | } |
||
| 602 | } |
||
| 603 | incr1 = 2 * dx; |
||
| 604 | d = incr1 - dy; |
||
| 605 | incr2 = 2 * (dx - dy); |
||
| 606 | Seg_Off_256(x, y, bpr, &offs, &bank); |
||
| 607 | Load_Write_Bank_256(bank); |
||
| 608 | lmempokeb((LIN_ADDR)(0xA0000 + offs), color); |
||
| 609 | while (y < yend) { |
||
| 610 | y++; |
||
| 611 | if (d < 0) { |
||
| 612 | d += incr1; |
||
| 613 | } else { |
||
| 614 | x += xinc; |
||
| 615 | d += incr2; |
||
| 616 | } |
||
| 617 | Seg_Off_256(x, y, bpr, &offs, &bank); |
||
| 618 | Load_Write_Bank_256(bank); |
||
| 619 | lmempokeb((LIN_ADDR)(0xA0000 + offs), color); |
||
| 620 | } |
||
| 621 | } |
||
| 622 | } |
||
| 623 | } |
||
| 624 | |||
| 625 | void linLine8(WORD x1, WORD y1, WORD x2, WORD y2, DWORD color) |
||
| 626 | { |
||
| 627 | register int t, distance; |
||
| 628 | register DWORD addr; |
||
| 629 | register WORD bpr; |
||
| 630 | int xerr=0, yerr=0, deltax, deltay; |
||
| 631 | int incx, incy; |
||
| 632 | |||
| 633 | bpr = gd_getbpr(); |
||
| 634 | addr = gd_getflb(); |
||
| 635 | deltax = x2 - x1; /* compute both distances */ |
||
| 636 | deltay = y2 - y1; |
||
| 637 | |||
| 638 | if (deltax > 0) /* compute increments */ |
||
| 639 | incx = 1; |
||
| 640 | else if (deltax == 0) |
||
| 641 | incx = 0; |
||
| 642 | else |
||
| 643 | incx = -1; |
||
| 644 | |||
| 645 | if (deltay > 0) |
||
| 646 | incy = 1; |
||
| 647 | else if (deltay == 0) |
||
| 648 | incy = 0; |
||
| 649 | else |
||
| 650 | incy = -1; |
||
| 651 | |||
| 652 | deltax = abs(deltax); /* determine greater distance */ |
||
| 653 | deltay = abs(deltay); |
||
| 654 | if (deltax > deltay) |
||
| 655 | distance = deltax; |
||
| 656 | else |
||
| 657 | distance = deltay; |
||
| 658 | |||
| 659 | for (t=0; t<=distance+1; t++) { /* draw the line */ |
||
| 660 | /* vbe_putpixel(x1, y1, colour);*/ |
||
| 661 | lmempokeb((LIN_ADDR)(addr + y1 * bpr + x1), color); |
||
| 662 | xerr += deltax; |
||
| 663 | yerr += deltay; |
||
| 664 | if (xerr > distance) { |
||
| 665 | xerr -= distance; |
||
| 666 | x1 += incx; |
||
| 667 | } |
||
| 668 | if (yerr > distance) { |
||
| 669 | yerr -= distance; |
||
| 670 | y1 += incy; |
||
| 671 | } |
||
| 672 | } |
||
| 673 | } |
||
| 674 | |||
| 675 | void WrPixel_256(WORD x, WORD y, DWORD color) |
||
| 676 | { |
||
| 677 | WORD bpr; |
||
| 678 | WORD bank, offs; |
||
| 679 | |||
| 680 | bpr = gd_getbpr(); |
||
| 681 | Seg_Off_256(x, y, bpr, &offs, &bank); |
||
| 682 | Load_Write_Bank_256(bank); |
||
| 683 | lmempokeb((LIN_ADDR)(0xA0000 + offs), color); |
||
| 684 | /* Load_Write_Bank_256(0);*/ |
||
| 685 | } |
||
| 686 | |||
| 687 | void linWr8(WORD x, WORD y, DWORD color) |
||
| 688 | { |
||
| 689 | WORD bpr; |
||
| 690 | |||
| 691 | bpr = gd_getbpr(); |
||
| 692 | lmempokeb((LIN_ADDR)(flbaddr + y * bpr + x), color); |
||
| 693 | } |
||
| 694 | |||
| 695 | DWORD RdPixel_256(WORD x, WORD y) |
||
| 696 | { |
||
| 697 | WORD bpr; |
||
| 698 | WORD bank, offs; |
||
| 699 | DWORD rv; |
||
| 700 | |||
| 701 | bpr = gd_getbpr(); |
||
| 702 | Seg_Off_256(x, y, bpr, &offs, &bank); |
||
| 703 | Load_Write_Bank_256(bank); |
||
| 704 | rv = lmempeekb((LIN_ADDR)(0xA0000 + offs)); |
||
| 705 | return rv; |
||
| 706 | } |
||
| 707 | |||
| 708 | DWORD linRd8(WORD x, WORD y) |
||
| 709 | { |
||
| 710 | WORD bpr; |
||
| 711 | DWORD rv; |
||
| 712 | |||
| 713 | bpr = gd_getbpr(); |
||
| 714 | rv = lmempeekb((LIN_ADDR)(flbaddr + y * bpr + x)); |
||
| 715 | return rv; |
||
| 716 | } |
||
| 717 |