Subversion Repositories Kolibri OS

Rev

Rev 9606 | Rev 9715 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 9606 Rev 9709
Line 9... Line 9...
9 
;;                                                              ;;
 9 
;;                                                              ;;
10 
;;  Paul Butcher, paul.butcher@asa.co.uk                        ;;
 10 
;;  Paul Butcher, paul.butcher@asa.co.uk                        ;;
11 
;;                                                              ;;
 11 
;;                                                              ;;
12 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 12 
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line 13... Line 13...
13 
 
 13 
 
Line 14... Line 14...
14 
$Revision: 9606 $
 14 
$Revision: 9709 $
15 
 
 15 
 
16 
;------------------------------------------------------------------------------
 16 
;------------------------------------------------------------------------------
Line 493... Line 493...
493 
        ret
 493 
        ret
494 
;------------------------------------------------------------------------------
 494 
;------------------------------------------------------------------------------
495 
align 4
 495 
align 4
496 
VGA_draw_bar_1:
 496 
VGA_draw_bar_1:
497 
        mov     [temp.cx], eax
 497 
        mov     [temp.cx], eax
498 
        ;mov     eax, [TASK_BASE]
 - 
 
499 
        ;add     ebx, [eax-twdw + 4]
 - 
 
500 
        ;mov     eax, [eax-twdw + 0]
 - 
 
501 
        mov     eax, [current_slot_idx]
 498 
        mov     eax, [current_slot_idx]
502 
        shl     eax, 5
 499 
        shl     eax, 5
503 
        add     ebx, [eax+window_data+WDATA.box.top]
 500 
        add     ebx, [eax+window_data+WDATA.box.top]
504 
        mov     eax, [eax+window_data+WDATA.box.left]
 501 
        mov     eax, [eax+window_data+WDATA.box.left]
505 
        add     eax, [temp.cx]
 502 
        add     eax, [temp.cx]