From: robin on
"flowergirl" <senhortomas(a)hotmail.com> wrote in message
news:f24620c8-ec69-46e7-80de-3b86b9dadda7(a)21g2000yqj.googlegroups.com...
>On Jan 31, 5:30 pm, "robin" <robi...(a)bigpond.com> wrote:
>> "flowergirl" <senhorto...(a)hotmail.com> wrote in message
>>
>> news:a8586b73-12b1-4489-98ba-912f0c525ed5(a)e37g2000yqn.googlegroups.com...
>
>> |How do I print from the Extended ASCII Character Set (IBM Character
>> |Set) with Compaq Visual Fortran 6.5? For example, using the DOS
>> |editor or MS Word and entering Alt 219 (numeric key pad) displays the
>> |box type character ?. I can put this into a Powerstation 1.0 write
>> |statement and it prints successfully. However CVF 6.5 displays t|he
>> |character instead. The same goes for other extended ASCII characters.
>
>> How are you generating the characters?

>Here's an example:

>If the following program is compiled and run with Compaq Visual
>Fortran 6.5 as a console application, the result is a box printed with
>ASCII text based characters (corners, horizontal lines, and vertical
>lines).

>write(*,*) char(218),char(196),char(191)
>write(*,*) char(179),' ' ,char(179)
>write(*,*) char(192),char(196),char(217)
>end

Have you tried using an A-format?

>But if the same program is compiled and run as a standard graphics or
>quick win application, a list of character codes gets printed instead.


From: robin on
"flowergirl" <senhortomas(a)hotmail.com> wrote in message
news:a8586b73-12b1-4489-98ba-912f0c525ed5(a)e37g2000yqn.googlegroups.com...
"How do I print from the Extended ASCII Character Set (IBM Character
"Set) with Compaq Visual Fortran 6.5? For example, using the DOS
"editor or MS Word and entering Alt 219 (numeric key pad) displays the
"box type character ?. I can put this into a Powerstation 1.0 write
"statement and it prints successfully. However CVF 6.5 displays the |

How did my suggestion go?
Do you want more ideas?


From: flowergirl on
On Feb 2, 5:35 pm, "robin" <robi...(a)bigpond.com> wrote:
>
> How did my suggestion go?
> Do you want more ideas?

The A-format has the same result as in this variation of my previous
example:

write(*,10) char(218),char(196),char(191)
write(*,10) char(179),' ' ,char(179)
write(*,10) char(192),char(196),char(217)
10 format(3a1)
end

I have a textual user interface (TUI) that I developed with
Powerstation 1.0 under Windows 95. Powerstation does not compile
under Windows XP. I would like to make my TUI available for other
compiler and operating systems.
From: dpb on
flowergirl wrote:
> On Feb 2, 5:35 pm, "robin" <robi...(a)bigpond.com> wrote:
>> How did my suggestion go?
>> Do you want more ideas?
>
> The A-format has the same result as in this variation of my previous
> example:
>
> write(*,10) char(218),char(196),char(191)
> write(*,10) char(179),' ' ,char(179)
> write(*,10) char(192),char(196),char(217)
> 10 format(3a1)
> end
>
....

Works fine (assuming intent is a hollow outline box figure) w/ CVF 6.6
in console mode under XP.

As expected, and as Steve L notes, this _WON'T_ work in an actual
Windows session mode app.

But, if the intent is a TUI, what's wrong w/ building console app, anyway?

--