// EVENTO KILL PLAYER
//

// SOUND 0
repeat 2
beep 20
beep 30
delay 4
beep 40
beep 50
endrepeat
IF H = 0
  LET LINE = 10
  LET COLUMN = 8
  COLOUR 71
  MESSAGE 19
  LET LINE = 9
  LET COLUMN = 7
  MESSAGE 15
  LET LINE = 11
  LET COLUMN = 7
  MESSAGE 15
  DELAY 60
ENDIF
DELAY 20
FADE
SUBTRACT 1 FROM LIVES
LET LINE = 0
LET COLUMN = L
PUTBLOCK 36
SUBTRACT 1 FROM L
LET R = 0
LET E = 0
LET D = 0
LET T = 8 // *7*
LET LINE = 0
LET COLUMN = 9

//ASM 205
//ASM 236
//ASM 143
LET H = 140
// PUTBLOCK 30
PUTBLOCK 30
PUTBLOCK 30
PUTBLOCK 30
PUTBLOCK 30
//IF B = 1
//  PUTBLOCK 113
//  ELSE
//  PUTBLOCK 112
//ENDIF
//ASM 205
//ASM 236
//ASM 143

// PANTALLA *GAME OVER*
    IF LIVES = 0
      CLS
      LET M = 31  // Parar músicas
      LET LINE = 11
      LET COLUMN = 12
      COLOUR 71
      MESSAGE 0
      LET LINE = 9
      LET COLUMN = 7
      MESSAGE 15
      LET LINE = 13
      LET COLUMN = 7
      MESSAGE 15
      //DELAY 140
      //FADE
      WAITKEY
      EXIT
    ENDIF


// Contador de VELAS por nivel
  IF N = 1
  	LET P = 1
  ENDIF
  IF N = 2
    LET P = 2
  ENDIF
  IF N = 3
    LET P = 3
  ENDIF
  IF N = 4
    LET P = 2
  ENDIF
  IF N = 5
    LET P = 2
  ENDIF
  IF N = 6
    LET P = 2
  ENDIF
  IF N = 7
    LET P = 2
  ENDIF
  IF N = 8
    LET P = 4
  ENDIF
  IF N = 9
    LET P = 2
  ENDIF
  IF N = 10
    LET P = 2
  ENDIF
  IF N = 11
    LET P = 2
  ENDIF
  IF N = 12
    LET P = 2
  ENDIF
  IF N = 13
    LET P = 1
  ENDIF
  IF N = 14
    LET P = 3
  ENDIF
  IF N = 15
    LET P = 2
  ENDIF
  IF N = 16
    LET P = 2
  ENDIF
  IF N = 17
    LET P = 2
  ENDIF
  IF N = 18
    LET P = 4
  ENDIF
  IF N = 19
    LET P = 2
  ENDIF
  IF N = 20
    LET P = 2
  ENDIF
  IF N = 21
    LET P = 2
  ENDIF
  IF N = 22
    LET P = 2
  ENDIF
  IF N = 23
    LET P = 3
  ENDIF
// Contador de VELAS por nivel
[EOF]