home *** CD-ROM | disk | FTP | other *** search
/ Amiga Developer CD 2.1 / Amiga Developer CD v2.1.iso / Extras / Development / RKM_Companion_v2.04 / Exec_Library / Interrupts / vertbserver.asm < prev   
Encoding:
Assembly Source File  |  1999-10-27  |  2.1 KB  |  52 lines

  1. * vertbserver.asm. Example simple interrupt server for vertical blank
  2. *
  3. * Assembled with Howesoft Adapt 680x0 Macro Assembler Rel. 1.0
  4. * hx68 from: vertbserver.asm to vertbserver.o INCDIR include:
  5. * blink from lib:c.o vertb.o vertbserver.o to vertb lib lib:lc.lib lib:amiga.lib
  6. *
  7. *
  8. * Copyright (c) 1992-1999 Amiga, Inc.
  9. *
  10. * This example is provided in electronic form by Amiga, Inc. for
  11. * use with the "Amiga ROM Kernel Reference Manual: Libraries", 3rd Edition,
  12. * published by Addison-Wesley (ISBN 0-201-56774-1).
  13. *
  14. * The "Amiga ROM Kernel Reference Manual: Libraries" contains additional
  15. * information on the correct usage of the techniques and operating system
  16. * functions presented in these examples.  The source and executable code
  17. * of these examples may only be distributed in free electronic form, via
  18. * bulletin board or as part of a fully non-commercial and freely
  19. * redistributable diskette.  Both the source and executable code (including
  20. * comments) must be included, without modification, in any copy.  This
  21. * example may not be published in printed form or distributed with any
  22. * commercial product.  However, the programming techniques and support
  23. * routines set forth in these examples may be used in the development
  24. * of original executable software products for Amiga computers.
  25. *
  26. * All other rights reserved.
  27. *
  28. * This example is provided "as-is" and is subject to change; no
  29. * warranties are made.  All use is at your own risk. No liability or
  30. * responsibility is assumed.
  31.  
  32.     section    text,code
  33.  
  34.     INCLUDE "exec/types.i"
  35.     INCLUDE "hardware/custom.i"
  36.     INCLUDE "hardware/intbits.i"
  37.  
  38.         XDEF    _VertBServer
  39.  
  40. * Entered with:       A0 == scratch (execpt for highest pri vertb server)
  41. *  D0 == scratch      A1 == is_Data
  42. *  D1 == scratch      A5 == vector to interrupt code (scratch)
  43. *                     A6 == scratch
  44. *
  45.     section code
  46.  
  47. _VertBServer:
  48.         ADDI.L  #1,(a1)           ; increments counter is_Data points to
  49.         MOVEQ.L #0,d0             ; set Z flag to continue to process other vb-servers
  50.         RTS                       ;return to exec
  51.         END
  52.