/* ------------------------------------------------ */
/* Final Writer Arexx Macro - Add HTML Italic Code  */
/* This macro will Place bold markers either side   */
/* of text that is highlighted                      */
/* $VER: HTML.Italic Ver 1.0 (10.5.95)              */
/* ------------------------------------------------ */
Options Results

Status LinePos

Parse VAR Result BeginLine BeginPosition EndLine EndPosition

IF      ( WORDS(Result) = 2 ) THEN DO
                FontColor Red
                Type "<i>"
                FontColor Black
                Font "times_italic"
                type " "
                FontColor Red
                Font "times"
                type "</i>"
                FontColor Black
                type " "
                MoveToLine BeginLine BeginPosition+4
                FontColor Black
                EXIT
                END

        Font "times_italic"
        MoveToLine BeginLine BeginPosition
        FontColor Red
	Font "times"
        Type "<i>"
        MoveToLine EndLine EndPosition+3
        FontColor Red
	Font "times"
        Type "</i>"
        FontColor black              
        Type " "