Subversion Repositories Kolibri OS

Rev

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

Rev 551 Rev 2198
Line 153... Line 153...
153
 
153
 
Line 154... Line -...
154
 
-
 
155
draw_window:
154
 
156
 
-
 
Line 157... Line 155...
157
 
155
draw_window:
158
    mov  eax,12                    ; function 12:tell os about windowdraw
156
 
159
    mov  ebx,1                     ; 1, start of draw
157
 
160
    mcall
158
    mcall 12, 1                        ; start window redraw
161
 
159
 
162
                                   ; DRAW WINDOW
160
                                   ; DRAW WINDOW
163
    mov  eax, 0                    ; function 0 : define and draw window
161
    mov  eax, 0                    ; function 0 : define and draw window
164
    mov  ebx, 100*65536+200        ; [x start] *65536 + [x size]
162
    mov  ebx, 100*65536+200        ; [x start] *65536 + [x size]
Line 175... Line 173...
175
    mov  esi, text.len
173
    mov  esi, text.len
176
    mcall
174
    mcall
Line 177... Line 175...
177
 
175
 
Line 178... Line -...
178
    call draw_codes
-
 
179
 
176
    call draw_codes
180
    mov  eax,12                    ; function 12:tell os about windowdraw
-
 
Line 181... Line 177...
181
    mov  ebx,2                     ; 2, end of draw
177
 
Line 182... Line 178...
182
    mcall
178
    mcall 12, 2                        ; end window redraw
Line 291... Line 287...
291
if lang eq ru
287
if lang eq ru
292
  text:
288
  text:
293
      db '‘—ˆ’›‚€ž „€›… ‘ Š‹€‚ˆ€’“›'
289
      db '‘—ˆ’›‚€ž „€›… ‘ Š‹€‚ˆ€’“›'
294
  .len = $ - text
290
  .len = $ - text
Line 295... Line 291...
295
 
291
 
296
  title      db   '‘Š€ŠŽ„› Š‹€‚ˆ€’“›',0
292
  title      db   '‘ª ­ª®¤ë ª« ¢¨ âãàë',0
297
else
293
else
298
  text:
294
  text:
299
      db 'READING RAW SCANCODE DATA'
295
      db 'READING RAW SCANCODE DATA'
Line 300... Line 296...
300
  .len = $ - text
296
  .len = $ - text
301
 
297
 
Line 302... Line 298...
302
  title      db   'KEYBOARD SCANCODES',0
298
  title      db   'Keyboard scancodes',0
303
end if
299
end if