git.sur5r.net Git - cc65/blob - libsrc/telestrat/sound.s

   1 ;
   2 ; jede jede@oric.org 2017-01-22
   3
   4     .export         _kbdclick1,_oups,_ping,_explode,_shoot,_zap
   5     .include        "telestrat.inc"
   6
   7 .proc _kbdclick1
   8     ldx #<sound_bip_keyboard
   9     ldy #>sound_bip_keyboard
  10     BRK_TELEMON XSONPS
  11     rts
  12 sound_bip_keyboard:
  13     .byte $1f,$00,$00,$00,$00,$00,$00,$3e,$10,$00,$00,$1f,$00,$00
  14 .endproc
  15
  16 .proc _explode
  17     BRK_TELEMON XEXPLO
  18     rts
  19 .endproc
  20
  21 .proc _oups
  22     BRK_TELEMON XOUPS
  23     rts
  24 .endproc
  25
  26 .proc _ping
  27     BRK_TELEMON XPING
  28     rts
  29 .endproc
  30
  31 .proc _shoot
  32     BRK_TELEMON XSHOOT
  33     rts
  34 .endproc
  35
  36 .proc _zap
  37     BRK_TELEMON XZAP
  38     rts
  39 .endproc
  40
  41
  42