| 1,4 → 1,4 |
|---|
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| .;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| ;; ;; |
| ;; Copyright (C) KolibriOS team 2004-2008. All rights reserved. ;; |
| ;; Distributed under terms of the GNU General Public License ;; |
| 130,5 → 130,288 |
|---|
| popad |
| pop eax ; << // Alver 22.06.2008 // << |
| ret |
| |
| ;===================================================== |
| ; NEW FONTS |
| ;_____________________________________________________ |
| ; |
| |
| align 8 |
| sdsh_data: |
| |
| include 'sdsh.inc' |
| |
| sdsh_code: |
| |
| ; eax = if (bit[31]) |
| ; then lower 31 bits points to the user-selected font |
| ; else ax = number of preloaded system font |
| ; ebx = x<<16 + y |
| ; ecx = 0x00RRGGBB |
| ; edx = if (bits[31:8] == 0) |
| ; then dl = single char to write |
| ; else edx= pointer to asciiz-string |
| |
| |
| sdsh_draw_char: |
| ; eax = left side X |
| ; ebx = bottom Y |
| ; edi = color 0x0RRGGBB |
| ; ebp = font@ |
| ; ecx = ascii, zero-extended to 32bits |
| push ecx, edx, ebp |
| shl ebp, 4 |
| add ebp, sdsh_data.info |
| call ch_checkscreen |
| jb .exit |
| call ch_checkwin |
| jc .exit |
| xor ch, ch |
| mov edx, [ebp + 4] ; chartable addr |
| mov cx, word[edx + ecx*2] ; tick info |
| mov edx, ecx |
| and ecx, 15 ; cl = number of ticks |
| jz .blank |
| shr edx, 4 ; offset in the chartable |
| add edx, [sdsh_data.chars] ; edx -> the char's ticklist |
| .next_tick: |
| call parse_tick |
| add edx, 4 |
| dec cl |
| jnz .next_tick |
| .blank: |
| .exit: |
| pop ebp, edx, ecx |
| ret |
| |
| |
| parse_tick: |
| ; eax = left side X |
| ; ebx = bottom Y |
| ; edx ->tickinfo |
| ; edi = color 0x0RRGGBB |
| ; ebp = font's header |
| popad |
| xor ecx, ecx |
| mov dx, word[edx] |
| mov cl, dl |
| test dl, 0xE0 ; ticks #32..255 |
| jz .lntick.short |
| cmp dl, 0xE0 |
| jae .lntick.long |
| cmp dl, 0xC0 |
| jae .cstick |
| .gptick: |
| mov cl, dh ; three rotation bits |
| and cl, 7 |
| mov dh, ... - origin |
| mov dl, .... - num_vertices!! |
| mov esi, ... - tickfield?? |
| jmp .draw |
| |
| .cstick: |
| and cl, 4 |
| shr cl, 2 ; only one rotational bit |
| and dl, 3 |
| dec dl |
| jb .cstick.0 |
| mov esi, sdsh_data.cs2 ; the square |
| dec dl |
| jb .cstick.1 |
| dec dl |
| jb .cstick.2 |
| .cstick.3: |
| mov esi, sdsh_data.cs3 ; 12pix-ring |
| mov dl, 10 |
| jmp .draw |
| .cstick.2: |
| mov dl, 7 |
| jmp .draw |
| .cstick.1: |
| mov dl, 6 |
| jmp .draw |
| .cstick.3: |
| mov esi, sdsh_data.cs0 ; 4pix-square |
| mov dl, 3 |
| jmp .draw |
| |
| .ritick: |
| test dl, 1 |
| jnz .ritick.1 |
| .ritick.0: |
| mov cl, dh ; y |
| and cl, 0x0F |
| and ebx, ecx |
| mov cl, dh |
| shr cl, 4 ; x |
| and eax, ecx |
| call ch_putpixel |
| jmp .exit |
| .ritick.1: |
| mov esi, sdsh_data.ri1 ; 8pix-ring |
| mov dl, 4 |
| jmp .draw |
| |
| .lntick.short: |
| test dl, 0x06 ; ticks #0, 1 are reserved for |
| jz .ritick ; rotational invariants |
| and dl, 0x07 ; dl = line length |
| jmp .lntick.both |
| .lntick.long: |
| and dl, 0x07 |
| add dl, 8 |
| .lntick.both: |
| sub dl, 2 ; num_vertice = num_points - 2 |
| and cl, 0x18 ; two rotation bits |
| shr cl, 3 |
| mov esi, sdsh_data.blank |
| .draw: |
| push ecx |
| mov cl, dh ; y |
| and cl, 0x0F |
| and ebx, ecx |
| mov cl, dh |
| shr cl, 4 ; x |
| and eax, ecx |
| pop ecx |
| call draw_tick |
| .exit: |
| popad |
| ret |
| |
| |
| |
| |
| |
| |
| draw_tick: |
| ; eax = x-origin |
| ; ebx = y-origin |
| ; edi = 0x0RRGGBB |
| ; cl = direction (0..7) |
| ; ch = number of vertices |
| ; edx -> tick bitfield |
| |
| pushad |
| call putchpixel ; point 0 |
| xor ecx, ecx |
| mov edx, ecx |
| mov dl, byte[esi] |
| and dl, 7 |
| mov cl, 3 |
| .move_and_draw: |
| xor dh, dh |
| call [.moves + edx*4] |
| call putchpixel |
| |
| shl edx, 5 ; prepare to move the old value to dh |
| bt [esi], ecx |
| |
| rol edx, 1 |
| inc ecx |
| bt [esi], ecx |
| rol edx, 1 |
| inc ecx |
| bt [esi], ecx |
| rol edx, 1 |
| inc ecx |
| xor dh, dl |
| jnz .move_and_draw ; any step-back means the end |
| .done: |
| popad |
| ret |
| |
| .move000: |
| inc eax |
| ret |
| .move001: |
| inc eax |
| inc ebx |
| ret |
| .move010: |
| inc ebx |
| ret |
| .move011: |
| dec eax |
| inc ebx |
| ret |
| .move111: |
| dec eax |
| ret |
| .move110: |
| dec eax |
| dec ebx |
| ret |
| .move101: |
| dec ebx |
| ret |
| .move100: |
| dec ebx |
| inc eax |
| ret |
| |
| align 4 |
| .moves dd .move000, .move001, .move010, .move011, .move100, .move101, .move110, .move111 |
| |
| ;) |
| |
| align 4 |
| ch_checkscreen: |
| cmp [Screen_Max_X], eax |
| jb .getout |
| cmp [Screen_Max_Y], ebx |
| .getout: |
| ret |
| |
| align 4 |
| ch_checkwin: |
| ; eax = x coordinate |
| ; ebx = y coordinate |
| ; ebp -> font info |
| ;!destroys ch, edx! |
| push eax, ebx |
| mov ch, byte[CURRENT_TASK] |
| mov al, byte [ebp] ; char X-width |
| mov edx, [_display.width] ; screen X-size |
| imul edx, ebx |
| add edx, [_WinMapAddress] |
| add edx, eax |
| cmp ch, byte [edx] |
| jne .fail |
| moxzx eax, byte [ebp] |
| cmp ch, byte [edx+eax] |
| jne .fail |
| moxzx ebx, byte [ebp+1] |
| imul ebx, [_display.width] |
| cmp ch, byte [edx+ebx] |
| jne .fail |
| add edx, eax |
| cmp ch, byte [edx+ebx] |
| clc |
| je .done |
| .fail: |
| stc ; CF means the charbox is invisible |
| .done: |
| pop ebx, eax |
| ret |
| |
| align 4 |
| ch_putpixel: |
| ; eax = x coordinate |
| ; ebx = y coordinate |
| ; edi = 0x0RRGGBB |
| push edx |
| mov edx, ebx |
| imul edx, [BytesPerScanLine] |
| lea edx, [edx+eax*4] |
| mov [LFB_BASE+edx], edi |
| pop edx |
| ret |
| |
| ;) |
| |
| |
| |
| |
| ;diff16 "font code end ",0,$ |
| diff10 "font code size",dtext,$ |