home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Workbench / Libs / GADUTIL.LHA / GadUtil / Examples / BetterTest-C / led.asm < prev    next >
Encoding:
Assembly Source File  |  1994-12-26  |  229 b   |  18 lines
  1.    xdef  _LightState
  2.    xdef  _ToggleLED
  3.  
  4.    section  code
  5. _LightState:
  6.    tst.w 6(sp)    ; Check state
  7.    beq.s setoff
  8.    bclr  #1,$bfe001
  9.    rts
  10. setoff:
  11.    bset  #1,$bfe001
  12.    rts
  13.  
  14. _ToggleLED:
  15.    bchg  #1,$bfe001
  16.    rts
  17.    end
  18.