Zitat:

---

Jetzt mehr als vorher, ich glaube ein Fehler hab ich noch gefunden,
jedoch wenn im Programm AllocVEC steht ist das doch ein Library
befehl, warum wird dann der Stack vom Programm selbst weniger?

---

Zitat:

---

Sind nur ilbm Dateien.

---

Zitat:

---

Das hier ist das einzigste was mir noch spanisch vorkommt:

IF GetDTAttrsA& (dtobjekt&, workbuf&) = 3 THEN
....
END IF

colors32& wird nicht wieder Freigegeben.

---

Zitat:

---

Original von Ralf27:
Das liest sich so als ob irgendwo der Speicher nicht mehr freigegeben wird und so der Stack "aufgefressen" wird.
Wird auch alles freigegeben was auch angefordert worden ist?

---

code:

---

while (running){
 xWait()
 while (msg = GetMsg(MsgPort)) {
  ...
  ReplyMsg(msg);
 }
}

---

code:

---

.KEY NAME/F
.BRA {
.KET }

c:list >t:tempname "{NAME}" LFORMAT "%m"
eval >t:templen 'c:list t:tempname LFORMAT "%l"' - 1
echo "Länge des Filenamens ohne Erweiterung 'type t:templen'"
delete >nil: t:tempname 
delete >nil: t:templen

---

Zitat:

---

IIntuition->OpenScreenTagList(0,tagscreen); //Hier entsteht eine Warnung =>Warum?

---

Zitat:

---

tagwindow[0].ti_Data = (struct Screen *) screen; //Hier entsteht eine Warnung =>Warum?

---

Zitat:

---

Der Moovid Programmierer, Programmiert in Assembler.
Nicht nur das Moovid schneller als Frogger ist, nein es
ist sogar viel stabieler.

---

Zitat:

---

Zur Frage zurück. Es gibt für den Amiga noch nichts richtiges für OS4, was aber auch an der zwingtaktik von hyperion liegt. Denn diese geben keinerlei Assembler-includes raus, weil sie "Hochsprachen fördern wollen" :-)LOL

---

Zitat:

---

Wie Du hier sehen kannst, wird ein #pragma Header eingebunden. Dies bedeutet, das dieser proto/ Header *nicht* für den GCC geeignet ist.

---

code:

---

#ifndef _PROTO_GUIGFX_H
#define _PROTO_GUIGFX_H

#ifndef EXEC_TYPES_H
#include <exec/types.h>
#endif
#ifndef CLIB_GUIGFX_PROTOS_H
#include <clib/guigfx_protos.h>
#endif

#ifndef __NOLIBBASE__
extern struct Library *GuiGFXBase;
#endif

#ifdef __GNUC__
#include <inline/guigfx.h>
#elif !defined(__VBCC__)
#include <pragma/guigfx_lib.h>
#endif

#endif	/*  _PROTO_GUIGFX_H  */

---

Zitat:

---

Die Includes die du mir gemailt hast, habe ich nach gg:include/ kopiert.
Irgendwas fehlt da wohl noch.

---

Zitat:

---

Und wo bindest Du die inlines ein?

---

code:

---

#include <exec/types.h>
    #include <graphics/gfx.h>
    #include <intuition/intuition.h>
	#include <guigfx/guigfx.h>
	#include <render/render.h>
    #include <dos/dos.h>

	/* Prototypes for system functions. */
    #include <proto/exec.h>
    #include <proto/graphics.h>
    #include <proto/intuition.h>
    #include <proto/guigfx.h>
    #include <proto/render.h>

			struct 	 Window *Fenster;
			struct 	 Screen *my_screen;
			struct	 Library *GuiGFXBase;
            struct   IntuitionBase  *IntuitionBase;
            struct   GfxBase        *GfxBase;
   extern   struct   ExecBase       *SysBase;

struct	 Window *GetWindow(UWORD x, UWORD y, UWORD w, UWORD h) {
   
   struct   TagItem	    WinTags[] = {
	  WA_PubScreenName, (ULONG) "Workbench",
	  WA_Height,	    h,
	  WA_Top,		    y,
	  WA_Width,		    w,
	  WA_Left,		    x,
	  WA_DragBar,	    FALSE,
	  WA_CloseGadget,   FALSE,
	  WA_SmartRefresh,  FALSE,
	  TAG_DONE,
   };

   return OpenWindowTagList(NULL, WinTags);
}

int	  main(int argc,char *argv[]) {

   struct	Screen 	 *WBScreen;
   struct	Window	 *MyWindow;
			APTR	 picture;
		    APTR	 drawhandle;
            ULONG	 h, w;

   IntuitionBase = (struct IntuitionBase *) OpenLibrary("intuition.library", 39);
   GuiGFXBase = OpenLibrary("guigfx.library", 0);

   if (IntuitionBase && GuiGFXBase) {
      picture = LoadPicture(argv[1], TAG_DONE);
	  if (picture) {
	     WBScreen=LockPubScreen("Workbench");
	     if (WBScreen) {
            if (GetPictureAttrs(picture, PICATTR_Width, (ULONG) &w, PICATTR_Height, (ULONG) &h, TAG_DONE) == 2) {
               MyWindow = GetWindow((WBScreen->Width-w)/2 , (WBScreen->Height-h)/2, w, h);
   	           if (MyWindow) {
				  drawhandle = ObtainDrawHandle(NULL, MyWindow->RPort, WBScreen->ViewPort.ColorMap, TAG_DONE);
				  if (drawhandle) {
      	          	 DrawPicture(drawhandle, picture, 0, 0, TAG_DONE);
               	     Wait(SIGBREAKF_CTRL_C);
                  	 ReleaseDrawHandle(drawhandle);
   	        	  }
      	       	  CloseWindow(MyWindow);
         	   }
            }
            UnlockPubScreen(NULL, WBScreen);
         }
      	 DeletePicture(picture);
      }
   }
}

---

Zitat:

---

Hast du vielleicht noch beispielcode ?

---

Zitat:

---

Also bei mir ist der WindowPort fast nie gefüllt.

---

Zitat:

---

Original von thomas:

Die erste Frage wäre dann schonmal, wie du vom Fenster auf die Task kommst.

---