From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: 
X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,622fa0e87d54d0bb
X-Google-Attributes: gid103376,public
From: jerry@jvdsys.nextjk.stuyts.nl (Jerry van Dijk)
Subject: Re: Displaying positional text
Date: 1996/07/30
Message-ID: <DvDpqI.5n@jvdsys.nextjk.stuyts.nl>#1/1
X-Deja-AN: 171348473
references: <4taun9$3i2@hq.hq.af.mil>
organization: JerryWare HQ, Haarlem, Holland
newsgroups: comp.lang.ada
Date: 1996-07-30T00:00:00+00:00
List-Id: <comp.lang.ada>


1Lt Joel Rudy (joel.rudy@comm.hq.af.mil) wrote:

: Is there an Ada95 package that allows you to display text at position(x,y)
: where x is the row, and y is the column (or something similar).

Not in Ada itself, since it would depend on the platform the program
is running on.

However, there probably is a function to do this somewhere on your system,
just import & and use it.

If you happen to use GNAT on DOS you might use:

	procedure Goto_XY (X, Y : in Integer);
	pragma Import (C, Goto_XY, "gotoxy");

and move the cursor home with:

	Goto_XY (1, 1);

Hope this helps,
Jerry.

-- 
-----------------------------------------------------------------------
--  Jerry van Dijk       --   e-mail: jerry@jvdsys.nextjk.stuyts.nl  --
--  Banking Consultant   --              Member Team-Ada             -- 
--  Ordina Finance BV    --    Located at Haarlem, The Netherlands   --