home *** CD-ROM | disk | FTP | other *** search
/ Amiga Developer CD v1.2 / amidev_cd_12.iso / devcon / milan_1991 / devcon91.3 / debug / examples / togl_led.asm < prev   
Assembly Source File  |  1992-09-01  |  493b  |  44 lines
  1. *
  2. * blinkLED.asm - demonstrates blinking of the power LED
  3. *
  4. * Assemble, then link object with amiga.lib
  5. *
  6.     INCLUDE    "exec/types.i"
  7.     INCLUDE "hardware/cia.i"
  8.  
  9. LDEBUG    SET     1
  10.  
  11.     section code
  12.  
  13.     
  14.     IFGT    LDEBUG
  15.     XREF    _ciaapra
  16. *
  17. * TOGL_LED macro
  18. *
  19.  
  20. TOGL_LED    MACRO
  21.     BCHG.B    #CIAB_LED,_ciaapra
  22.     ENDM
  23.     ENDC
  24.  
  25.     IFEQ    LDEBUG
  26. TOGL_LED    MACRO
  27.     ENDM
  28.     ENDC
  29.  
  30. *
  31. * Sample program calling TOGL_LED macro
  32. *
  33. main:
  34.     TOGL_LED
  35.     move.l    #$200000,d0    ; you'd be doing real code here
  36. 1$
  37.     sub.l    #1,d0
  38.     bne    1$
  39.     TOGL_LED
  40.  
  41.     RTS
  42.  
  43.     END
  44.