Subversion Repositories Kolibri OS

Rev

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

Rev 135 Rev 205
Line 288... Line 288...
288
    mov  eax,0                     ; function 0 : define and draw window
288
    mov  eax,0                     ; function 0 : define and draw window
289
;   mov  ebx,50*65536+400          ; [x start] *65536 + [x size]
289
;   mov  ebx,50*65536+400          ; [x start] *65536 + [x size]
290
    mov  ebx,[xstart]
290
    mov  ebx,[xstart]
291
    mov  ecx,MAXSTRINGS*10+45      ; [y start] *65536 + [y size]
291
    mov  ecx,MAXSTRINGS*10+45      ; [y start] *65536 + [y size]
292
    mov  edx,[sc.work]             ; color of work area RRGGBB,8->color gl
292
    mov  edx,[sc.work]             ; color of work area RRGGBB,8->color gl
293
    or   edx,0x03000000
293
    or   edx,0x13000000
294
    int  0x40
-
 
295
 
-
 
296
                                   ; WINDOW LABEL
294
    mov  edi,header                ; WINDOW LABEL
297
    mov  eax,4                     ; function 4 : write text to window
-
 
298
    mov  ebx,8*65536+8             ; [x start] *65536 + [y start]
-
 
299
    mov  ecx,[sc.grab_text]        ; color of text RRGGBB
-
 
300
    or   ecx,0x10000000
-
 
301
    mov  edx,header                ; pointer to text beginning
-
 
302
    mov  esi,header.len            ; text length
-
 
303
    int  0x40
295
    int  0x40
Line 304... Line 296...
304
 
296
    
305
    mov  ecx,4
297
    mov  ecx,4
306
    mov  esi,[sc.work]
298
    mov  esi,[sc.work]
Line 520... Line 512...
520
dump_cell_marg dd LMARGIN shl 16,(LMARGIN+16*HSPACE+15)shl 16
512
dump_cell_marg dd LMARGIN shl 16,(LMARGIN+16*HSPACE+15)shl 16
521
dump_cell_size dw HSPACE,VSPACE,6,VSPACE
513
dump_cell_size dw HSPACE,VSPACE,6,VSPACE
522
; 11,11 > 0,-1
514
; 11,11 > 0,-1
523
; 5,11  > 0,-1
515
; 5,11  > 0,-1
524
if lang eq ru
516
if lang eq ru
525
   header:
-
 
526
        db   '„Ž‘Š€ Ž’‹€„Šˆ ˆ ‘ŽŽ™…ˆ‰'
517
   header    db   '„Ž‘Š€ Ž’‹€„Šˆ ˆ ‘ŽŽ™…ˆ‰',0
527
    .len = $ - header
-
 
528
else if lang eq en
518
else if lang eq en
529
   header:
-
 
530
        db   'GENERAL DEBUG & MESSAGE BOARD'
519
   header    db   'GENERAL DEBUG & MESSAGE BOARD',0
531
    .len = $ - header
-
 
532
else
520
else
533
   header:
-
 
534
        db   'ALLGEMEINES DEBUG- & NACHRICHTENBOARD'
521
   header    db   'ALLGEMEINES DEBUG- & NACHRICHTENBOARD',0
535
    .len = $ - header
-
 
536
end if
522
end if
537
		 krnl_cnt dd 0
523
   krnl_cnt dd 0
538
   vmode dd 0
524
   vmode dd 0
539
   targ  dd text2
525
   targ  dd text2
540
I_END:
526
I_END: