Subversion Repositories Kolibri OS

Rev

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

Rev 109 Rev 485
Line 18... Line 18...
18 
    dd     0x0 , 0x0         ; I_Param , I_Icon
 18 
    dd     0x0 , 0x0         ; I_Param , I_Icon
Line 19... Line 19...
19 
 
 19 
 
Line 20... Line 20...
20 
;******************************************************************************
 20 
;******************************************************************************
- 
 
 21 
 
21 
 
 22 
include 'lang.inc'
22 
include 'lang.inc'
 23 
include '..\..\..\macros.inc'
23 
include 'ascl.inc'
 24 
include 'ascl.inc'
Line 316... Line 317...
316 
;    mov ebx,10*65536+40
 317 
;    mov ebx,10*65536+40
317 
;    mov ebx,10*65536+20
 318 
;    mov ebx,10*65536+20
318 
;    mov edx,2
 319 
;    mov edx,2
319 
;    mov esi,0x0000ff00
 320 
;    mov esi,0x0000ff00
320 
;    mov eax,8
 321 
;    mov eax,8
321 
;    int 0x40
 322 
;    mcall
322 
    mov [level],0
 323 
    mov [level],0
323 
    mov [nextlev],0
 324 
    mov [nextlev],0
324 
    mov [againbut],1
 325 
    mov [againbut],1
325 
    call draw_window
 326 
    call draw_window
Line 332... Line 333...
332 
    call draw_window
 333 
    call draw_window
333 
    jmp  still
 334 
    jmp  still
Line 334... Line 335...
334 
 
 335 
 
335 
  key:                          ; key
 336 
  key:                          ; key
336 
    mov eax,2
 337 
    mov eax,2
337 
    int 0x40
 338 
    mcall
338 
    cmp ah,key_Left
 339 
    cmp ah,key_Left
339 
    jne no_l
 340 
    jne no_l
340 
    sub dword [ply1rx],50 ;24 ;16
 341 
    sub dword [ply1rx],50 ;24 ;16
341 
no_l:
 342 
no_l:
Line 357... Line 358...
357 
no_sp:
 358 
no_sp:
358 
    jmp  still
 359 
    jmp  still
Line 359... Line 360...
359 
 
 360 
 
360 
  button:                       ; button
 361 
  button:                       ; button
361 
    mov  eax,17                 ; get id
 362 
    mov  eax,17                 ; get id
362 
    int  0x40
 363 
    mcall
363 
    cmp  ah,1                   ; button id=1 ?
 364 
    cmp  ah,1                   ; button id=1 ?
364 
    jne  noclose
 365 
    jne  noclose
365 
    mov  eax,-1                 ; close this program
 366 
    mov  eax,-1                 ; close this program
366 
    int  0x40
 367 
    mcall
367 
noclose:
 368 
noclose:
368 
    cmp ah,2
 369 
    cmp ah,2
369 
    jne  noplayagain
 370 
    jne  noplayagain
370 
    mov [xt],100
 371 
    mov [xt],100
Line 430... Line 431...
430 
    mov ebx,150*65536+80
 431 
    mov ebx,150*65536+80
431 
    mov ecx,240*65536+12
 432 
    mov ecx,240*65536+12
432 
    mov edx,2
 433 
    mov edx,2
433 
    mov esi,0x0000aa00
 434 
    mov esi,0x0000aa00
434 
    mov eax,8
 435 
    mov eax,8
435 
    int 0x40
 436 
    mcall
436 
    mov ecx,260*65536+12
 437 
    mov ecx,260*65536+12
437 
    mov edx,1
 438 
    mov edx,1
438 
    int 0x40
 439 
    mcall
439 
    label 152,244,'Play again?',cl_Red+font_Big
 440 
    label 152,244,'Play again?',cl_Red+font_Big
440 
    jmp elev
 441 
    jmp elev
441 
nlev:
 442 
nlev:
442 
    label 160,200,'You Win!',cl_Green+font_Big
 443 
    label 160,200,'You Win!',cl_Green+font_Big
443 
    label 130,220,'Youre Score:',cl_Green+font_Big
 444 
    label 130,220,'Youre Score:',cl_Green+font_Big
Line 445... Line 446...
445 
    mov ebx,150*65536+80
 446 
    mov ebx,150*65536+80
446 
    mov ecx,240*65536+12
 447 
    mov ecx,240*65536+12
447 
    mov edx,2
 448 
    mov edx,2
448 
    mov esi,0x0000aa00
 449 
    mov esi,0x0000aa00
449 
    mov eax,8
 450 
    mov eax,8
450 
    int 0x40
 451 
    mcall
451 
    mov ecx,260*65536+12
 452 
    mov ecx,260*65536+12
452 
    mov edx,1
 453 
    mov edx,1
453 
    int 0x40
 454 
    mcall
454 
    label 152,244,'Next level?',cl_Red+font_Big
 455 
    label 152,244,'Next level?',cl_Red+font_Big
455 
elev:
 456 
elev:
Line 456... Line 457...
456 
 
 457 
 
457 
    label 178,264,'Exit?',cl_Red+font_Big
 458 
    label 178,264,'Exit?',cl_Red+font_Big