STANKULI%UWF.BITNET@cunyvm.cuny.edu ( stan kulikowski ii) (06/22/91)
i have been playing with the rom bios routines in my ps/2 . the following
procedure uses the video services to change the background color.
procedure SET_BACKGROUND (COLOR : integer);
begin
CLEAR (REGISTER); (* Sets them all to 0 *)
REGISTER.ah := $10;
REGISTER.bh := COLOR;
intr ($10,REGISTER);
end; (* SET_BACKGROUND procedure *)
when i call this the background switches to the right color (0-15) leaving
the text chars displayed in whatever color they were in.
what i have not figured out is how to set the foreground color of the chars
to whatever i want. i have been using R.T. Stevens (1989) Graphics Programming
in C as my reference, but to no avail.
does anyone have a tp procedure which sets the foreground color to whatever
color you want for subsequent writelns? i can do this when ansi.sys is
installed with the escape codes to the screen, but i would like to handle
this from the rom bios video services if i can.
stan
. stankuli@UWF.bitnet
===
| | close your eyes, my darling, or three of them at least
--- -- old venusian lullabyts@uwasa.fi (Timo Salmi) (06/22/91)
In article <27270@adm.brl.mil> STANKULI%UWF.BITNET@cunyvm.cuny.edu ( stan kulikowski ii) writes: : > does anyone have a tp procedure which sets the foreground color to whatever >color you want for subsequent writelns? i can do this when ansi.sys is >installed with the escape codes to the screen, but i would like to handle >this from the rom bios video services if i can. : Have you checked my /pc/ts/tspa23##.arc units at garbo and simtel20. (There is so much material that having not looked for awhile, I can't recall even myself what's in there). ................................................................... Prof. Timo Salmi Moderating at garbo.uwasa.fi anonymous ftp archives 128.214.12.37 School of Business Studies, University of Vaasa, SF-65101, Finland Internet: ts@chyde.uwasa.fi Funet: gado::salmi Bitnet: salmi@finfun
defaria@hpcupt3.cup.hp.com (Andy DeFaria) (06/25/91)
>/ hpcupt3:comp.lang.pascal / STANKULI%UWF.BITNET@cunyvm.cuny.edu ( stan kulikowski ii) / 11:48 am Jun 21, 1991 / > > i have been playing with the rom bios routines in my ps/2 . the following >procedure uses the video services to change the background color. > > procedure SET_BACKGROUND (COLOR : integer); > begin > CLEAR (REGISTER); (* Sets them all to 0 *) > REGISTER.ah := $10; > REGISTER.bh := COLOR; > intr ($10,REGISTER); > end; (* SET_BACKGROUND procedure *) > > when i call this the background switches to the right color (0-15) leaving >the text chars displayed in whatever color they were in. > > what i have not figured out is how to set the foreground color of the chars >to whatever i want. i have been using R.T. Stevens (1989) Graphics Programming >in C as my reference, but to no avail. > > does anyone have a tp procedure which sets the foreground color to whatever >color you want for subsequent writelns? i can do this when ansi.sys is >installed with the escape codes to the screen, but i would like to handle >this from the rom bios video services if i can. Why not simply use TP's own TextBackground (I believe that's what it's called) and TextColor procedures? They are in the CRT unit I believe and do the job for you. RTFM or use the help to look them up.
ts@uwasa.fi (Timo Salmi) (06/26/91)
In article <45670025@hpcupt3.cup.hp.com> defaria@hpcupt3.cup.hp.com (Andy DeFaria) writes: : >Why not simply use TP's own TextBackground (I believe that's what it's >called) and TextColor procedures? They are in the CRT unit I believe and >do the job for you. RTFM or use the help to look them up. This is a point that has been discussed many times. Using the Crt unit enforces direct screen writes, and disables redirection potential unless special steps (which are not as straightforward as occasionally claimed) are taken. If these do not matter in a program, then, no problem. Else one has to do something about it. ................................................................... Prof. Timo Salmi Moderating at garbo.uwasa.fi anonymous ftp archives 128.214.12.37 School of Business Studies, University of Vaasa, SF-65101, Finland Internet: ts@chyde.uwasa.fi Funet: gado::salmi Bitnet: salmi@finfun
defaria@hpcupt3.cup.hp.com (Andy DeFaria) (06/27/91)
>/ hpcupt3:comp.lang.pascal / ts@uwasa.fi (Timo Salmi) / 11:36 am Jun 25, 1991 / >In article <45670025@hpcupt3.cup.hp.com> defaria@hpcupt3.cup.hp.com (Andy DeFaria) writes: >: >>Why not simply use TP's own TextBackground (I believe that's what it's >>called) and TextColor procedures? They are in the CRT unit I believe and >>do the job for you. RTFM or use the help to look them up. > >This is a point that has been discussed many times. Using the Crt >unit enforces direct screen writes, and disables redirection ^^^^^^^^^^^^^^^^^^^^ >potential unless special steps (which are not as straightforward as ^^^^^^^^^ >occasionally claimed) are taken. If these do not matter in a >program, then, no problem. Else one has to do something about it. This may be the answer to my problem posted under the "Redirecting I/O for .BAT files" note. Could you explain this problem and the special steps involved in resolving it? Email if this is considered a FAQ? Thanks
ts@uwasa.fi (Timo Salmi) (06/28/91)
In article <45670027@hpcupt3.cup.hp.com> defaria@hpcupt3.cup.hp.com (Andy DeFaria) writes: >>/ hpcupt3:comp.lang.pascal / ts@uwasa.fi (Timo Salmi) / 11:36 am Jun 25, 1991 / : >>This is a point that has been discussed many times. Using the Crt >>unit enforces direct screen writes, and disables redirection > ^^^^^^^^^^^^^^^^^^^^ >>potential unless special steps (which are not as straightforward as > ^^^^^^^^^ >>occasionally claimed) are taken. If these do not matter in a >>program, then, no problem. Else one has to do something about it. > >This may be the answer to my problem posted under the "Redirecting I/O for >.BAT files" note. Could you explain this problem and the special steps >involved in resolving it? Email if this is considered a FAQ? May I suggest /pc/ts/tsfaq21.arc Frequently Asked Questions and the comments in /pc/ts/tspa23##.arc (##=40,50,55,60) tpu units collection. The reason for aswering this way is that a repeat would take quite a lot of effort to write again, and the correctness is better guarateed in ready material. ................................................................... Prof. Timo Salmi Moderating at garbo.uwasa.fi anonymous ftp archives 128.214.12.37 School of Business Studies, University of Vaasa, SF-65101, Finland Internet: ts@chyde.uwasa.fi Funet: gado::salmi Bitnet: salmi@finfun