comp.lang.ada
 help / color / mirror / Atom feed
From: Gautier Write-only <gautier@fakeaddress.nil>
Subject: Re: DOS or Windows Console I/O
Date: Thu, 14 Aug 2003 07:16:34 +0200
Date: 2003-08-14T07:16:34+02:00	[thread overview]
Message-ID: <3F3B1B32.F5DFE6E1@fakeaddress.nil> (raw)
In-Reply-To: 8Gx_a.2094$jw4.1318@nwrdny03.gnilink.net

For Windows I'd look at...
  http://users.ncrvnet.nl/gmvdijk/packages.html#CONSOLE

For DOS (and GNAT) you'll in dos_paqs.zip, URL below,
------------------------------------------------------------------------------
--  File:            pctextsc.ads
--  Description:     Simple Text Screen unit for PC  (GNAT/DOS Ada compiler)
--                   Intended compatibility with Turbo Pascal CRT unit.
------------------------------------------------------------------------------

package PC_TextScreen is

  screen_base_x: integer:= 1;
  screen_base_y: integer:= 1;

  procedure TextMode(mode:integer);
  procedure GotoXY(x,y:integer);
  procedure PutXY(x,y:integer; s:string);
  function WhereX return integer;
  function WhereY return integer;
  procedure ClrScr;

end PC_TextScreen;
You can extend it as you like...
HTH
________________________________________________________
Gautier  --  http://www.mysunrise.ch/users/gdm/gsoft.htm

NB: For a direct answer, e-mail address on the Web site!



      parent reply	other threads:[~2003-08-14  5:16 UTC|newest]

Thread overview: 9+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2003-08-13 21:00 DOS or Windows Console I/O Stephane Richard
2003-08-13 21:05 ` DOS or Windows Console I/O (Addendum) Stephane Richard
2003-08-14  0:03   ` Jeffrey Creem
2003-08-13 21:25 ` DOS or Windows Console I/O Larry Kilgallen
2003-08-13 23:56   ` Stephane Richard
2003-08-14 11:46   ` Dmytry Lavrov
2003-08-14  1:23 ` Jeffrey Carter
2003-08-14 11:49   ` Ross Higson
2003-08-14  5:16 ` Gautier Write-only [this message]
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox