Subversion Repositories Kolibri OS

Rev

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

Rev 316 Rev 485
Line 67... Line 67...
67 
  dd	 0x100000
 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'
72 
include  'macros.inc'
 72 
include  '..\..\..\macros.inc'
73 
;include   'debug.inc'
 73 
;include   'debug.inc'
Line 74... Line 74...
74 
include  'bgifont.inc'
 74 
include  'bgifont.inc'
75 
 
 75 
 
Line 99... Line 99...
99 
    inc  [help]
 99 
    inc  [help]
100 
    jmp  red
 100 
    jmp  red
101 
still:
 101 
still:
Line 102... Line 102...
102 
 
 102 
 
103 
    mov  eax,10
 103 
    mov  eax,10
Line 104... Line 104...
104 
    int  0x40
 104 
    mcall
105 
 
 105 
 
106 
    cmp  eax,1
 106 
    cmp  eax,1
107 
    je	 red
 107 
    je	 red
Line 112... Line 112...
112 
 
 112 
 
Line 113... Line 113...
113 
    jmp  still
 113 
    jmp  still
114 
 
 114 
 
115 
button:
 115 
button:
116 
    mov  eax,17
 116 
    mov  eax,17
117 
    int  0x40
 117 
    mcall
118 
    cmp  ah,1
 118 
    cmp  ah,1
119 
    jnz  noclose
 119 
    jnz  noclose
120 
close:
 120 
close:
121 
    xor  eax,eax
 121 
    xor  eax,eax
122 
    dec  eax
 122 
    dec  eax
123 
    int  0x40
 123 
    mcall
Line 124... Line 124...
124 
  noclose:
 124 
  noclose:
125 
    jmp  still
 125 
    jmp  still
126 
 
 126 
 
127 
key:
 127 
key:
128 
    mov  eax,2
 128 
    mov  eax,2
129 
    int  0x40
 129 
    mcall
130 
    shr  eax,8
 130 
    shr  eax,8
131 
    cmp  al,27 ; esc - close
 131 
    cmp  al,27 ; esc - close
Line 226... Line 226...
226 
 
 226 
 
227 
    mov  eax,48
 227 
    mov  eax,48
228 
    mov  ebx,3
 228 
    mov  ebx,3
229 
    mov  ecx,sc
 229 
    mov  ecx,sc
230 
    mov  edx,sizeof.system_colors
 230 
    mov  edx,sizeof.system_colors
Line 231... Line 231...
231 
    int  0x40
 231 
    mcall
232 
 
 232 
 
233 
    mov  eax,12
 233 
    mov  eax,12
Line 234... Line 234...
234 
    mov  ebx,1
 234 
    mov  ebx,1
235 
    int  0x40
 235 
    mcall
236 
 
 236 
 
237 
    xor  eax,eax
 237 
    xor  eax,eax
238 
    mov  ebx,10*65536+_X*2+30
 238 
    mov  ebx,10*65536+_X*2+30
239 
    mov  ecx,100*65536+_Y*2
 239 
    mov  ecx,100*65536+_Y*2
240 
    mov  edx,0x03261212
 240 
    mov  edx,0x03261212
Line 241... Line 241...
241 
    mov  esi,0x805080d0
 241 
    mov  esi,0x805080d0
242 
    mov  edi,0x005080d0
 242 
    mov  edi,0x005080d0
243 
    int  0x40
 243 
    mcall
244 
 
 244 
 
Line 250... Line 250...
250 
    mov  esi,title_end-title
 250 
    mov  esi,title_end-title
251 
    cmp  [help],2
 251 
    cmp  [help],2
252 
    je   .int
 252 
    je   .int
253 
    sub  esi,12
 253 
    sub  esi,12
254 
  .int:
 254 
  .int:
255 
    int  0x40
 255 
    mcall
Line 256... Line 256...
256 
 
 256 
 
257 
    cmp  [help],0
 257 
    cmp  [help],0
258 
    jnz  .help
 258 
    jnz  .help
259 
    cmp  byte[I_END],0
 259 
    cmp  byte[I_END],0
Line 280... Line 280...
280 
    mov  edi,cross
 280 
    mov  edi,cross
281 
    mov  eax,38
 281 
    mov  eax,38
282 
    mov  edx,0x4b331a
 282 
    mov  edx,0x4b331a
283 
    mov  ebx,[edi]
 283 
    mov  ebx,[edi]
284 
    mov  ecx,[edi+4]
 284 
    mov  ecx,[edi+4]
285 
    int  0x40
 285 
    mcall
286 
    mov  ebx,[edi+8]
 286 
    mov  ebx,[edi+8]
287 
    mov  ecx,[edi+12]
 287 
    mov  ecx,[edi+12]
288 
    int  0x40
 288 
    mcall
289 
    mov  ebx,freetest
 289 
    mov  ebx,freetest
290 
    BGIfont_Freetext
 290 
    BGIfont_Freetext
291 
  .eod:
 291 
  .eod:
292 
    mov  eax,12
 292 
    mov  eax,12
293 
    mov  ebx,2
 293 
    mov  ebx,2
294 
    int  0x40
 294 
    mcall
295 
    ret
 295 
    ret
Line 296... Line 296...
296 
 
 296 
 
297 
Print:	; eax-pointer to _txt struc
 297 
Print:	; eax-pointer to _txt struc
298 
   pusha
 298 
   pusha
Line 324... Line 324...
324 
 .l:
 324 
 .l:
325 
   mov  esi,[edx-4]
 325 
   mov  esi,[edx-4]
326 
   and  esi,0xfff
 326 
   and  esi,0xfff
327 
   push ecx
 327 
   push ecx
328 
   mov  ecx,[ebp+8]
 328 
   mov  ecx,[ebp+8]
329 
   int  0x40
 329 
   mcall
330 
   pop  ecx
 330 
   pop  ecx
331 
   lea  edx,[esi+edx+4]
 331 
   lea  edx,[esi+edx+4]
332 
   add  ebx,[ebp+4]
 332 
   add  ebx,[ebp+4]
333 
   loop .l
 333 
   loop .l
334 
   popa
 334 
   popa