home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 365.lha / VSnap / misc.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-04-11  |  2.6 KB  |  118 lines
  1. #define SCREENTOP\
  2.    (screen->TopEdge << ((screen->ViewPort.Modes & LACE)? 0: 1))
  3.  
  4. IMPORT struct IntuitionBase *IntuitionBase;
  5. IMPORT struct MsgPort *Sharedport;
  6. IMPORT WORD Sharedrefs;
  7.  
  8. struct Screen *WhichScreen()
  9. { 
  10.     REGISTER struct Screen *screen;
  11.     Forbid();
  12.     screen = IntuitionBase->FirstScreen;
  13.     while (screen && IntuitionBase->MouseY < SCREENTOP) {
  14.         screen = screen->NextScreen;
  15.     }
  16.     if (screen == NULL) {     /* Shouldn't happen */
  17.         screen = IntuitionBase->ActiveScreen;
  18.     }
  19.     Permit();
  20.     return screen;
  21. }
  22.  
  23. struct Window *WhichWindow(screen)
  24. struct Screen *screen;
  25. { 
  26.     struct Layer *layer;
  27.     layer = (struct Layer *)WhichLayer(&screen->LayerInfo,
  28.       (LONG)screen->MouseX, (LONG)screen->MouseY);
  29.     if (layer) {
  30.         return (struct Window *)layer->Window;
  31.     } else {
  32.         return NULL;
  33.     }
  34. }
  35.  
  36. struct Window *opensharedwindow(nw)
  37. struct NewWindow *nw;
  38. {
  39.     struct Window *win;
  40.     struct Screen scr;
  41.  
  42.     if (Sharedport) {
  43.         nw->IDCMPFlags = NULL;
  44.     } else {
  45.         nw->IDCMPFlags = CLOSEWINDOW;
  46.     }
  47.     if (!GetScreenData(&scr, (LONG)sizeof(struct Screen), WBENCHSCREEN, NULL)) {
  48.         return NULL;     /* No WB */
  49.     }
  50.     if (nw->TopEdge+nw->Height > scr.Height) {
  51.         nw->TopEdge = scr.Height-nw->Height;
  52.     }
  53.     if (nw->LeftEdge+nw->Width > scr.Width) {
  54.         nw->LeftEdge = scr.Width-nw->Width;
  55.     }
  56.     if (nw->TopEdge < 0) {
  57.         nw->TopEdge = 0;
  58.     }
  59.     if (nw->LeftEdge < 0) {
  60.         nw->LeftEdge = 0;
  61.     }
  62.  
  63.     if (win = OpenWindow(nw)) {
  64.         if (Sharedport) {
  65.             win->UserPort = Sharedport;
  66.             ModifyIDCMP(win, CLOSEWINDOW);
  67.         } else {
  68.             Sharedport = win->UserPort;
  69.         }
  70.         ++Sharedrefs;
  71.     }
  72.     return(win);
  73. }
  74.  
  75.  
  76. VOID closesharedwindow(win)
  77. struct Window *win;
  78. {
  79.     Forbid();
  80.     win->UserPort = NULL;
  81.     ModifyIDCMP(win, GADGETUP);     /* NEVER occurs */
  82.     Permit();
  83.     CloseWindow(win);
  84.     --Sharedrefs;
  85.     if (Sharedrefs == 0 && Sharedport) {
  86.         DeletePort(Sharedport);
  87.         Sharedport = NULL;
  88.     }
  89. }
  90.  
  91. VOID FreePlanes(bm, width, height)
  92. struct BitMap *bm;
  93. LONG width, height;
  94. { 
  95.     SHORT i;
  96.     for (i=0; i < bm->Depth; i++) {
  97.         if (bm->Planes[i]) {
  98.             FreeRaster(bm->Planes[i], width, height);
  99.         }
  100.     }
  101. }
  102.  
  103. WORD AllocPlanes(bm, width, height)
  104. struct BitMap *bm;
  105. LONG width, height;
  106. { 
  107.     WORD i;
  108.     for (i=0; i < bm->Depth; i++) {
  109.         bm->Planes[i] = NULL;
  110.     }
  111.     for (i=0; i < bm->Depth; i++) {
  112.         if (!(bm->Planes[i] = AllocRaster(width, height))) {
  113.             return 0;
  114.         }
  115.     }
  116.     return 1;
  117. }
  118.