Subversion Repositories Kolibri OS

Rev

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

Rev 109 Rev 485
Line 19... Line 19...
19 
;5941 ;4523(with new random)
 19 
;5941 ;4523(with new random)
Line 20... Line 20...
20 
 
 20 
 
- 
 
 21 
 
21 
 
 22 
 
22 
 
 23 
include 'lang.inc'
Line 23... Line 24...
23 
include 'lang.inc'
 24 
include '..\..\..\macros.inc'
24 
include 'ascl.inc'
 25 
include 'ascl.inc'
Line 41... Line 42...
41 
 
 42 
 
Line 42... Line 43...
42 
 
 43 
 
43 
still:
 44 
still:
Line 44... Line 45...
44 
 
 45 
 
45 
    mov  eax,11                 ; scan event
 46 
    mov  eax,11                 ; scan event
46 
    int  0x40
 47 
    mcall
47 
 
 48 
 
Line 56... Line 57...
56 
    mov eax,47
 57 
    mov eax,47
57 
    mov ebx,5*65536
 58 
    mov ebx,5*65536
58 
    mov ecx,[scorea]
 59 
    mov ecx,[scorea]
59 
    mov edx,300*65536+8
 60 
    mov edx,300*65536+8
60 
    mov esi,cl_Blue
 61 
    mov esi,cl_Blue
61 
    int 0x40
 62 
    mcall
62 
out_scoreb:
 63 
out_scoreb:
63 
    mov eax,47
 64 
    mov eax,47
64 
    mov ebx,5*65536
 65 
    mov ebx,5*65536
65 
    mov ecx,[scoreb]
 66 
    mov ecx,[scoreb]
66 
    mov edx,350*65536+8
 67 
    mov edx,350*65536+8
67 
    mov esi,cl_Red
 68 
    mov esi,cl_Red
68 
    int 0x40
 69 
    mcall
Line 69... Line 70...
69 
 
 70 
 
70 
del_images:
 71 
del_images:
71 
    setimg dword [ply1x],dword [ply1y],img4
 72 
    setimg dword [ply1x],dword [ply1y],img4
72 
    setimg dword [ply2x],dword [ply2y],img4
 73 
    setimg dword [ply2x],dword [ply2y],img4
Line 288... Line 289...
288 
    call draw_window
 289 
    call draw_window
289 
    jmp  still
 290 
    jmp  still
Line 290... Line 291...
290 
 
 291 
 
291 
  key:                          ; key
 292 
  key:                          ; key
292 
    mov eax,2
 293 
    mov eax,2
293 
    int 0x40
 294 
    mcall
294 
    cmp ah,key_Left
 295 
    cmp ah,key_Left
295 
    jne no_l
 296 
    jne no_l
296 
    sub dword [ply1rx],16
 297 
    sub dword [ply1rx],16
297 
no_l:
 298 
no_l:
Line 314... Line 315...
314 
 
 315 
 
Line 315... Line 316...
315 
    jmp  still
 316 
    jmp  still
316 
 
 317 
 
317 
  button:                       ; button
 318 
  button:                       ; button
318 
    mov  eax,17                 ; get id
 319 
    mov  eax,17                 ; get id
319 
    int  0x40
 320 
    mcall
320 
    cmp  ah,1                   ; button id=1 ?
 321 
    cmp  ah,1                   ; button id=1 ?
321 
    jne  noclose
 322 
    jne  noclose
322 
    mov  eax,-1                 ; close this program
 323 
    mov  eax,-1                 ; close this program
323 
    int  0x40
 324 
    mcall
Line 324... Line 325...
324 
  noclose:
 325 
  noclose: