OpenEuphoria

Re: Various Issues

• Posted by "C. K. Lester" <cklester at TICNET.COM> Aug 21, 1999
• 349 views

Thanks, Colin! Just what I needed. 

-----Original Message-----
From: Euphoria Programming for MS-DOS
[mailto:EUPHORIA at LISTSERV.MUOHIO.EDU]On Behalf Of Colin Taylor
Sent: Saturday, August 21, 1999 7:04 PM
To: EUPHORIA at LISTSERV.MUOHIO.EDU
Subject: Re: Various Issues


At 05:08 PM 8/21/99 -0500, C. K. Lester wrote:
>
>I figured I could modify the underline code to place the "underline"
through
>the text, but when I tried, I never could get it to draw. I even created a
>"strikethrough line thickness" item in the "default" variable and set
>STRIKETHRU to 16 where appropriate. But, again, I don't know which part of
>the code actually draws the stuff to screen. Is Jiri still around? I'm sure
>HE could help big time...
>

I haven't heard a peep from Jiri lately...

Font.e has fragments of underline code scattered through the program to
handle CLEAR and OPAQUE modes, horizontal and vertical printing, patterned
foreground, the shadow of the underline, etc. (you get the idea)  It isn't
hard to change the underline to a strikethrough, but you have to find and
change all the instances of underline code.  You can find the u/l code by
searching for references to "pa[5]".  In font.e (version 4.40) at line 418
you will find:

        pixel(repeat(fc,w),{x,y+h-1})

If you replace "h" with "floor(h/2)+1", the underline will turn into a
strikethrough (but only for CLEAR mode horizontal printing).  If you do a
similar fix on line 393, the shadow of the underline will also move up.
This should give you enough of an hint that you can continue to fix the
rest of the u/l code.

Colin Taylor