Subversion Repositories Kolibri OS

Rev

Go to most recent revision | Blame | Last modification | View Log | Download | RSS feed

  1. ;---------------------------------------------------------------------
  2. death_of_protagonist_start:
  3.         mov     esi,map_level_game_over
  4.         call    map_level_to_plan_level
  5. .red:
  6.         call    draw_window
  7. ;---------------------------------------------------------------------
  8. .still:
  9.         mcall   10
  10.  
  11.         cmp     eax,1
  12.         je      .red
  13.  
  14.         cmp     eax,2
  15.         je      .key
  16.  
  17.         cmp     eax,3
  18.         je      .button
  19.        
  20.         jmp     .still
  21. ;---------------------------------------------------------------------
  22. .key:
  23.         mcall   2
  24.         cmp     [extended_key],1
  25.         je      .extended_key
  26.  
  27.         test    al,al
  28.         jnz     .still
  29.  
  30.         cmp     ah,0xE0
  31.         jne     start_level_0
  32.  
  33.         mov     [extended_key],1
  34.         jmp     .still
  35. ;---------------------------------------------------------------------
  36. .extended_key:
  37.         mov     [extended_key],0
  38.         jmp     start_level_0
  39. ;---------------------------------------------------------------------
  40. .button:
  41.         mcall   17
  42.  
  43.         cmp     ah,1
  44.         jne     .still
  45.        
  46.         jmp     button.exit
  47. ;--------------------------------------