Subversion Repositories Kolibri OS

Rev

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

Rev 3981 Rev 4060
Line 63... Line 63...
63 
 
 63 
 
Line 64... Line 64...
64 
 
 64 
 
65 
 
 65 
 
66 
window_refresh:
 66 
window_refresh:
67 
 
 67 
 
Line -... Line 68...
- 
 
 68 
; set text write cursor to beginning of last line
68 
; set the correct buffer pointers       ; FIXME: what is it good for?
 69 
        mov     eax, [textbox_width]
69 
        mov     eax, [textbox_width]    ;
 70 
        imul    eax, TEXTBOX_LINES - 1
70 
        imul    eax, 11                 ;
 71 
        mov     [text_pos], eax
71 
        mov     [pos], eax              ;
 72 
 
Line 231... Line 232...
231 
 
 232 
 
232 
  .quit:
 233 
  .quit:
Line 233... Line -...
233 
        ret
 - 
 
234 
 
 - 
 
235 
 
 - 
 
236 
print_text:                             ; eax = start ptr
 - 
 
237 
                                        ; dl = end char
 - 
 
238 
        pusha
 - 
 
239 
  ptr2:
 - 
 
240 
        mov     bl, [eax]
 - 
 
241 
 
 - 
 
242 
        cmp     bl, dl
 - 
 
243 
        je      ptr_ret
 - 
 
244 
        cmp     bl, 0
 - 
 
245 
        je      ptr_ret
 - 
 
246 
        call    print_character
 - 
 
247 
 
 - 
 
248 
        inc     eax
 - 
 
249 
        jmp     ptr2
 - 
 
250 
 
 - 
 
251 
  ptr_ret:
 - 
 
252 
        popa
 - 
 
253 
        ret
 - 
 
254 
 
 - 
 
255 
 
 - 
 
256 
print_text2:                            ; esi = ptr to ASCIIZ string
 - 
 
257 
 
 - 
 
258 
        pusha
 - 
 
259 
  .loop:
 - 
 
260 
        lodsb
 - 
 
261 
        test    al, al
 - 
 
262 
        jz      .done
 - 
 
263 
        mov     bl, al
 - 
 
264 
        call    print_character
 - 
 
265 
        jmp     .loop
 - 
 
266 
 
 - 
 
267 
  .done:
 - 
 
Line 268... Line 234...
268 
        popa
 234 
        ret
269 
        ret
 235 
 
Line 270... Line 236...
270 
 
 236