Subversion Repositories Kolibri OS

Rev

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

Rev 205 Rev 316
Line 62... Line 62...
62 
  db	 'MENUET01'
 62 
  db	 'MENUET01'
63 
  dd	 0x01
 63 
  dd	 0x01
64 
  dd	 START
 64 
  dd	 START
65 
  dd	 I_END
 65 
  dd	 I_END
66 
  dd	 0x100000
 66 
  dd	 0x100000
67 
  dd	 0x0cfff0
 67 
  dd	 0x100000
68 
  dd	 0x0
 68 
  dd	 0x0
69 
not1strun  dd	 0x0
 69 
not1strun  dd	 0x0
Line 70... Line 70...
70 
 
 70 
 
71 
include 'lang.inc'
 71 
include 'lang.inc'
Line 221... Line 221...
221 
    add  esi,6
 221 
    add  esi,6
222 
    loop .ol
 222 
    loop .ol
223 
    jmp  still
 223 
    jmp  still
Line 224... Line 224...
224 
 
 224 
 
- 
 
 225 
draw_window:
- 
 
 226 
 
- 
 
 227 
    mov  eax,48
- 
 
 228 
    mov  ebx,3
- 
 
 229 
    mov  ecx,sc
- 
 
 230 
    mov  edx,sizeof.system_colors
- 
 
 231 
    int  0x40
225 
draw_window:
 232 
 
226 
    mov  eax,12
 233 
    mov  eax,12
227 
    mov  ebx,1
 234 
    mov  ebx,1
Line 228... Line 235...
228 
    int  0x40
 235 
    int  0x40
229 
 
 236 
 
230 
    xor  eax,eax
 237 
    xor  eax,eax
231 
    mov  ebx,10*65536+_X*2
 238 
    mov  ebx,10*65536+_X*2+30
232 
    mov  ecx,100*65536+_Y*2
 239 
    mov  ecx,100*65536+_Y*2
233 
    mov  edx,0x03261212
 240 
    mov  edx,0x03261212
234 
    mov  esi,0x805080d0
 241 
    mov  esi,0x805080d0
Line 235... Line 242...
235 
    mov  edi,0x005080d0
 242 
    mov  edi,0x005080d0
236 
    int  0x40
 243 
    int  0x40
- 
 
 244 
 
237 
 
 245 
    mov  eax,4
238 
    mov  eax,4
 246 
    mov  ebx,8*65536+8
239 
    mov  ebx,8*65536+8
 247 
    mov  ecx,[sc.grab_text]
240 
    mov  ecx,0x10ddeeff
 248 
    or   ecx,0x10000000
241 
    mov  edx,title
 249 
    mov  edx,title
242 
    mov  esi,title_end-title
 250 
    mov  esi,title_end-title
Line 437... Line 445...
437 
    BGI_VACENTER or BGI_HACENTER
 445 
    BGI_VACENTER or BGI_HACENTER
438 
freetest BGIfree ?,?,?,?,?,?,?,?,?
 446 
freetest BGIfree ?,?,?,?,?,?,?,?,?
439 
help db ?
 447 
help db ?
440 
pinfo:
 448 
pinfo:
441 
    times 1024 db ?
 449 
    times 1024 db ?
442 
rb 10000     ; reserve, unless process info will corrupt our fonts (why?)
 450 
sc     system_colors
443 
I_END:
 451 
I_END: