gameover.s 1.2 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061
  1. ********************************************************************************
  2. * oo oo *
  3. * \( )/ Bullfrog Demo \( )/ *
  4. * ^ ^^ ^ Game Over ^ ^^ ^ *
  5. ********************************************************************************
  6. _end_game
  7. move.w score,d0
  8. move.w high_score,d1
  9. cmp.w d0,d1
  10. bge.s .not_new_high
  11. move.w score,high_score
  12. .not_new_high
  13. lea mess_8,a0
  14. moveq.l #0,d0
  15. move.w high_score,d0
  16. moveq.w #5,d1
  17. jsr _to_alpha
  18. .repeat
  19. jsr _wait_vbi ; wait for a vertical blank
  20. lea _background,a0
  21. jsr _q_redraw
  22. move.w #14,d0
  23. move.w logo_y,d1
  24. bge.s .still_pos
  25. neg.w d1
  26. .still_pos
  27. lsr.w #2,d1
  28. lea .mess,a2
  29. jsr _draw_font
  30. moveq.w #12,d0
  31. move.w #180,d1
  32. lea mess_7,a2
  33. jsr _draw_font
  34. moveq.w #16,d0
  35. move.w #192,d1
  36. lea mess_8,a2
  37. jsr _draw_font
  38. jsr _draw_logo
  39. jsr _swap_screens ; display the screen
  40. tst.w _fire
  41. beq .repeat ; no then loop around
  42. .to_here
  43. rts
  44. .mess dc.b 'GAME OVER',0
  45. even
  46. ********************************************************************************
  47. ********************************************************************************