Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!uunet!seismo!sundc!pitstop!sun!oliveb!amiga!mitsumi!jimm
From: jimm@mitsumi.UUCP (Jim Mackraz)
Newsgroups: comp.sys.amiga
Subject: Re: Who's putting that window there?
Message-ID: <278@mitsumi.UUCP>
Date: Tue, 22-Sep-87 13:52:47 EDT
Article-I.D.: mitsumi.278
Posted: Tue Sep 22 13:52:47 1987
Date-Received: Thu, 24-Sep-87 06:34:51 EDT
References: <5164@jade.BERKELEY.EDU> <4001@well.UUCP>
Reply-To: jimm@mitsumi.UUCP (James Mackraz)
Organization: Mitsumi Technology Inc
Lines: 32

In article <4001@well.UUCP> ewhac@well.UUCP (Leo 'Bols Ewhac' Schwab) writes:
>	Speaking for myself, Robotroff opens a 3 x 10 gadgetless window on
>startup.  But it only does this to get the address of the Workbench ViewPort
>structure. 
>Leo L. Schwab -- The Guy in The Cape	ihnp4!ptsfa -\

In my rude hacks, I do something like

	lock_token = LockIBase(0L);
	for (screen = IntuitionBase->FirstScreen; screen;
		screen = screen->NextScreen)
	{
		if (screen->(I forget) == WORKBENCHSCREEN (or whatever))
		{
			kprintf("yippee!! I found it: %lx\n", screen);
			break;
		}
	}
	UnlockIBase(lock_token);
	if (!screen)	kprintf("You in more trouble than you think.\n");

I also find rastports of paint programs this way: I look for the first
screen which isn't the workbench and grab on to its rastport.  I do
some voodoo rendering into that rastport, and then use the paint 
program to save it off as an IFF file.  Beats workin'!

	jimm

-- 
	Jim Mackraz
	Mitsumi Technology, Inc.		408/980-5422
	{amiga,pyramid}!mitsumi!jimm