🚀 go-pugleaf

ReSent-To:nntp-xmit#@andrew.cmu.edu
Return-path: <jv0l#@andrew.cmu.edu>
X-Andrew-Authenticated-as: 1752
To: outnews#ext.nn.comp.sys.mac@andrew.cmu.edu
Newsgroup: comp.sys.mac

Probably the easiest way to go about doing this would be to call the
getWMgrPort procedure which gives you a grafPtr to the screen.  This grafPtr
can be used to draw on the menu bar or on the desktop.  I have used this port
to make balls bounce around the desktop behind the windows.

Code would look something like this:

----
procedure giveMessage(what:str255);

  var
    oldPort,
    mgrPort: grafPtr;

  begin
    getPort(oldPort);
    getWMgrPort(mgrPort); {See window manager for details}
    setPort(mgrPort);
    moveTo(400,20); {or wherever}
    drawString(what);
    setPort(oldPort);
  end;
----
Justin
arpa: jv0l@andrew.cmu.edu