home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / alib / d2xx / d203 / gurusguide.lha / GurusGuide / simpler.c < prev    next >
Encoding:
C/C++ Source or Header  |  1989-04-30  |  3.2 KB  |  78 lines
  1. /************************************************************************
  2. **********                                                     **********
  3. **********          S I M P L E R   I N T E R R U P T          **********
  4. **********          ---------------------------------          **********
  5. **********                                                     **********
  6. **********        Copyright (C) 1988 Sassenrath Research       **********
  7. **********                All Rights Reserved.                 **********
  8. **********                                                     **********
  9. **********    Example from the "Guru's Guide, Meditation #1"   **********
  10. **********                                                     **********
  11. *************************************************************************
  12. **                                                                     **
  13. **                            - NOTICE -                               **
  14. **                                                                     **
  15. **  The "Guru's Guide, Meditation #1" contains detailed information    **
  16. **  about Amiga interrupts as well as a complete discussion of this    **
  17. **  and other examples.  Meditation #1 and all of its examples were    **
  18. **  written by Carl Sassenrath, the architect of Amiga's multitasking  **
  19. **  operating system.  Copies of the "Guru's Guide" may be obtained    **
  20. **  from:                                                              **
  21. **           GURU'S GUIDE, P.O. BOX 1510, UKIAH, CA 95482              **
  22. **                                                                     **
  23. **  Please include a check for $14.95, plus $1.50 shipping ($4.00 if   **
  24. **  outside North America).  CA residents add 6% sales tax.            **
  25. **                                                                     **
  26. **  This example may be used for any purposes, commercial, personal,   **
  27. **  public, and private, so long as ALL of the above text, copyright,  **
  28. **  mailing address, and this notice are retained in their entirety.   **
  29. **                                                                     **
  30. **  THIS EXAMPLE IS PROVIDED WITHOUT WARRANTY OF ANY KIND.             **
  31. **                                                                     **
  32. ************************************************************************/
  33.  
  34. /*
  35. **  COMPILATION NOTE:
  36. **
  37. **  Compiled under MANX AZTEC C 3.6A.  Use the +L compiler option
  38. **  and the "c32" library.  Link with intrsup.o
  39. */
  40.  
  41.  
  42. #include <exec/interrupts.h>
  43. #include <hardware/intbits.h>
  44.  
  45. VOID    IntrProc();    /* forward to interrupt code */
  46. long    IntrCount;    /* vertical blank counter     */
  47.  
  48.  
  49. #asm    /* Interrupt Server Code */
  50. _IntrProc:
  51.         add.l    #1,(a1)    ; increment IntrCount
  52.         moveq    #0,d0    ; Z-flag - do next server
  53.         rts
  54. #endasm
  55.  
  56.  
  57. main()    /* Initialization, Main, and Clean-up */
  58. {
  59.     extern int Enable_Abort;
  60.     extern struct Interrupt *MakeIntr();
  61.     struct Interrupt *intr;
  62.  
  63.     Enable_Abort = 0;    /* prevent a CTRL-C */
  64.  
  65.     IntrCount = 0;
  66.  
  67.     intr = MakeIntr("simple.example", -60,&IntrProc,&IntrCount);
  68.     if (intr == NULL) exit(100);
  69.  
  70.     AddIntServer(INTB_VERTB, intr);
  71.  
  72.     while (IntrCount < 200) printf("%d\n", IntrCount);
  73.  
  74.     RemIntServer(INTB_VERTB, intr);
  75.  
  76.     FreeIntr(intr);
  77. }
  78.