summaryrefslogtreecommitdiff
path: root/Layer.c
diff options
context:
space:
mode:
Diffstat (limited to 'Layer.c')
-rw-r--r--Layer.c289
1 files changed, 289 insertions, 0 deletions
diff --git a/Layer.c b/Layer.c
new file mode 100644
index 0000000..0e56e1c
--- /dev/null
+++ b/Layer.c
@@ -0,0 +1,289 @@
+#include <proto/exec.h>
+#include <proto/graphics.h>
+#include <proto/intuition.h>
+#include <graphics/rastport.h>
+
+#include "Bobi.h"
+#include "BobStructure.h"
+
+extern struct MyBob *BobTable[];
+extern struct Screen *mainscreen;
+extern struct Window *mainwindow,*toolwindow;
+extern struct RastPort *mainrastport;
+extern WORD numbobs,actbobnum,options,mainx0,mainy0;
+extern struct Gadget AutoSizeGadget;
+extern char LabelGadgetSIBuff[];
+extern struct MenuItem CollisionRectMenuItem;
+
+/************************************************************************/
+
+static void DrawBobCross(struct MyBob *bob,WORD x,WORD y)
+{
+ register struct RastPort *rp=mainrastport;
+ register WORD xl,yl;
+
+ xl = mainx0-bob->X0;
+ yl = mainy0-bob->Y0;
+
+ SetDrMd(rp,COMPLEMENT);
+ Move(rp,xl,y);
+ Draw(rp,xl+bob->Width-1,y);
+ Move(rp,x,yl);
+ Draw(rp,x,yl+bob->Height-1);
+}
+
+/************************************************************************/
+
+void SetOrgFunc()
+{
+ register struct MyBob *bob;
+ register struct IntuiMessage *msg;
+ register BOOL looping=TRUE;
+ register ULONG oldidcmp;
+ register WORD x,y;
+
+ if((numbobs>0) && (numbobs!=actbobnum))
+ {
+ bob = BobTable[actbobnum];
+ x = mainx0;
+ y = mainy0;
+ DrawBobCross(bob,x,y);
+ oldidcmp = mainwindow->IDCMPFlags;
+ mainwindow->Flags |= RMBTRAP;
+ ModifyIDCMP(mainwindow,MOUSEBUTTONS);
+ do
+ {
+ WaitTOF();
+ if(msg = (struct IntuiMessage *)GetMsg(mainwindow->UserPort))
+ {
+ switch(msg->Code)
+ {
+ case SELECTDOWN:
+ if(!BobHit(bob,msg->MouseX,msg->MouseY))
+ {
+ bob->X0 = x-mainx0+bob->X0;
+ bob->Y0 = y-mainy0+bob->Y0;
+ }
+ /* hier kein break! */
+ case MENUDOWN:
+ looping=FALSE;
+ break;
+ }
+ }
+ else if(!BobHit(bob,mainwindow->MouseX,mainwindow->MouseY))
+ {
+ DrawBobCross(bob,x,y);
+ x = mainwindow->MouseX;
+ y = mainwindow->MouseY;
+ DrawBobCross(bob,x,y);
+ }
+ } while(looping);
+
+ DrawBobCross(bob,x,y);
+ mainwindow->Flags &= ~RMBTRAP;
+ ModifyIDCMP(mainwindow,oldidcmp);
+ }
+ else ShowMonoReq2("Please select a bob first!");
+}
+
+/************************************************************************/
+
+void SetMainOrgFunc()
+{
+ register ULONG oldidcmp;
+ register WORD x,y;
+
+ x=mainx0; y=mainy0;
+ DrawCross(mainscreen,x,y);
+
+ oldidcmp = mainwindow->IDCMPFlags;
+ mainwindow->Flags |= RMBTRAP;
+ ModifyIDCMP(mainwindow,MOUSEBUTTONS);
+ DrawCross(mainscreen,mainx0,mainy0); /* Am alten Ort zur Orientierung */
+ for(;;)
+ {
+ register struct IntuiMessage *msg;
+
+ WaitTOF();
+ if(msg = (struct IntuiMessage *)GetMsg(mainwindow->UserPort))
+ {
+ DrawCross(mainscreen,mainx0,mainy0);
+ if(msg->Code==SELECTDOWN)
+ {
+ mainx0=x; /* Werte nur übernehmen wenn linke Maustaste */
+ mainy0=y;
+ }
+ DrawCross(mainscreen,x,y);
+ ReplyMsg((struct Message *)msg);
+ break;
+ }
+ else
+ {
+ DrawCross(mainscreen,x,y);
+ x = mainwindow->MouseX;
+ y = mainwindow->MouseY;
+ DrawCross(mainscreen,x,y);
+ }
+ }
+ mainwindow->Flags &= ~RMBTRAP;
+ ModifyIDCMP(mainwindow,oldidcmp);
+}
+
+/************************************************************************/
+
+void DragBobFunc()
+{
+ WORD xold,yold,dx,dy;
+ register struct MyBob *bob;
+ register struct IntuiMessage *msg;
+ register struct BitMap *tmpmap;
+ register WORD x,y,xoff,yoff;
+ BOOL looping=TRUE;
+ LONG oldidcmp;
+
+ if((numbobs>0) && (numbobs!=actbobnum))
+ {
+ bob = BobTable[actbobnum];
+ if(tmpmap=MakeBitMap(bob->Width,bob->Height,bob->Depth))
+ {
+ CopyMem(bob->Planes[0],tmpmap->Planes[0],bob->PlaneSize*bob->Depth);
+
+ xoff = mainwindow->MouseX+bob->X0-mainx0;
+ yoff = mainwindow->MouseY+bob->Y0-mainy0;
+ x = xold = mainwindow->MouseX-xoff;
+ y = yold = mainwindow->MouseY-yoff;
+ oldidcmp = mainwindow->IDCMPFlags;
+ mainwindow->Flags |= RMBTRAP;
+ ModifyIDCMP(mainwindow,MOUSEBUTTONS);
+ DrawRect(mainrastport,(WORD)(x-1),(WORD)(y-1),(WORD)(x+bob->Width),
+ (WORD)(y+bob->Height),0); /* Macht SetAPen,0 */
+ do
+ {
+ WaitTOF();
+ msg=(struct IntuiMessage *)GetMsg(mainwindow->UserPort);
+ if(toolwindow) if(!msg)
+ msg=(struct IntuiMessage *)GetMsg(toolwindow->UserPort);
+ if(msg)
+ {
+ switch(msg->Code)
+ {
+ case SELECTUP:
+ bob->X0 = mainx0-x;
+ bob->Y0 = mainy0-y;
+ looping=FALSE;
+ break;
+
+ case MENUDOWN:
+ RectFill(mainrastport,x-1,y-1,x+bob->Width,
+ y+bob->Height);
+ looping=FALSE;
+ break;
+ }
+ ReplyMsg((struct Message *)msg);
+ }
+ else
+ {
+ xold=x; yold=y;
+ x = mainwindow->MouseX-xoff;
+ y = mainwindow->MouseY-yoff;
+ /* if(x<MINX) x = MINX;
+ if(y<MINY) y = MINY;
+ if(x > MAXX-bob->Width) x = MAXX-bob->Width;
+ if(y > MAXY-bob->Height) y = MAXY-bob->Height;
+ */
+ dx = x-xold; dy = y-yold;
+
+ if(dx>0)
+ RectFill(mainrastport,xold-1,yold-1,x-1,yold+bob->Height);
+ else
+ RectFill(mainrastport,x+bob->Width,yold-1,xold+bob->Width,yold+bob->Height);
+
+ if(dy>0)
+ RectFill(mainrastport,xold-1,yold-1,xold+bob->Width,y);
+ else
+ RectFill(mainrastport,xold-1,y+bob->Height,xold+bob->Width,yold+bob->Height);
+
+ WaitTOF();
+ BltBitMapRastPort(tmpmap,0,0,mainrastport,x,y,
+ bob->Width,bob->Height,0xc0);
+ }
+ } while(looping);
+ mainwindow->Flags &= ~RMBTRAP;
+ ModifyIDCMP(mainwindow,oldidcmp);
+ MyFreeBitMap(tmpmap);
+ }
+ else ShowMonoReq2("Not enough memory to move bob!");
+ }
+ else ShowMonoReq2("Internal Error 193 in Layer.c !");
+}
+
+/************************************************************************/
+
+void SetCollBoundsFunc()
+{
+ register struct MyBob *bob;
+ register struct IntuiMessage *msg;
+ register BOOL looping=TRUE;
+ register ULONG oldidcmp;
+ register WORD x,y;
+
+ if((numbobs>0) && (numbobs!=actbobnum))
+ {
+ CollisionRectMenuItem.Flags |= CHECKED; /* Enable collision */
+ options |= GOF_COLLISIONRECT;
+
+ bob = BobTable[actbobnum];
+ x = mainx0-bob->X0+bob->CollX0;
+ y = mainy0-bob->Y0+bob->CollY0;
+ DrawCross(mainscreen,x,y);
+
+ oldidcmp = mainwindow->IDCMPFlags;
+ mainwindow->Flags |= RMBTRAP;
+ ModifyIDCMP(mainwindow,MOUSEBUTTONS);
+ do
+ {
+ WaitTOF();
+ if(msg = (struct IntuiMessage *)GetMsg(mainwindow->UserPort))
+ {
+ switch(msg->Code)
+ {
+ case SELECTDOWN:
+ /* if(!BobHit(bob,msg->MouseX,msg->MouseY)) */
+ {
+ DrawCross(mainscreen,x,y);
+ bob->CollX0 = x+bob->X0-mainx0;
+ bob->CollY0 = y+bob->Y0-mainy0;
+ ShowBob(bob);
+ x = mainx0-bob->X0+bob->CollX1;
+ y = mainy0-bob->Y0+bob->CollY1;
+ DrawCross(mainscreen,x,y);
+ }
+ break;
+
+ case SELECTUP:
+ /* if(!BobHit(bob,msg->MouseX,msg->MouseY)) */
+ {
+ DrawCross(mainscreen,x,y);
+ bob->CollX1 = x+bob->X0-mainx0;
+ bob->CollY1 = y+bob->Y0-mainy0;
+ }
+ looping=FALSE;
+ break;
+ }
+ ReplyMsg((struct Message *)msg);
+ }
+ else /* if(!BobHit(bob,mainwindow->MouseX,mainwindow->MouseY)) */
+ {
+ DrawCross(mainscreen,x,y);
+ x = mainwindow->MouseX;
+ y = mainwindow->MouseY;
+ DrawCross(mainscreen,x,y);
+ }
+ } while(looping);
+
+ mainwindow->Flags &= ~RMBTRAP;
+ ModifyIDCMP(mainwindow,oldidcmp);
+ }
+ else ShowMonoReq2("Please select a bob first!");
+}
+
generated by cgit v1.2.3 (git 2.25.1) at 2024-04-25 01:25:02 +0000