version 1.52, 1998/07/20 15:34:54
|
version 1.53, 1998/07/27 17:48:24
|
Line 1
|
Line 1
|
{ Author: I. Vatton 1994-1995-1996 } |
{ Author: I. Vatton 1994-1995-1996 } |
|
|
|
{ If variable XML is set, the document is saved in the XML syntax. |
|
Otherwise, it is saved in HTML } |
|
|
TRANSLATION HTML; |
TRANSLATION HTML; |
|
|
LINELENGTH 78; |
LINELENGTH 78; |
Line 10 CONST
|
Line 13 CONST
|
RULES |
RULES |
|
|
HTML : BEGIN |
HTML : BEGIN |
|
#ifdef XML |
|
Create '<?xmlversion="1.0" ?>\12'; |
|
Create Namespaces; |
|
#endif |
Create '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">\12'; |
Create '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">\12'; |
Create '<html'; |
Create '<html'; |
Create Attributes; |
Create Attributes; |
Line 46 RULES
|
Line 53 RULES
|
END; |
END; |
Create Attributes; |
Create Attributes; |
Remove; |
Remove; |
|
#ifdef XML |
|
Create ' />\12'; |
|
#else |
Create '>\12'; |
Create '>\12'; |
|
#endif |
END; |
END; |
|
|
BASE: BEGIN |
BASE: BEGIN |
Create '<base '; |
Create '<base '; |
Create Attributes; |
Create Attributes; |
Remove; |
Remove; |
|
#ifdef XML |
|
Create ' />\12'; |
|
#else |
Create '>\12'; |
Create '>\12'; |
|
#endif |
END; |
END; |
|
|
STYLE_: BEGIN |
STYLE_: BEGIN |
Line 81 RULES
|
Line 96 RULES
|
Create '<meta'; |
Create '<meta'; |
Remove; |
Remove; |
Create Attributes; |
Create Attributes; |
Create '>\12' After; |
#ifdef XML |
|
Create ' />\12'; |
|
#else |
|
Create '>\12'; |
|
#endif |
END; |
END; |
|
|
LINK: BEGIN |
LINK: BEGIN |
Create '<link'; |
Create '<link'; |
Remove; |
Remove; |
Create Attributes; |
Create Attributes; |
Create '>\12' After; |
#ifdef XML |
|
Create ' />\12'; |
|
#else |
|
Create '>\12'; |
|
#endif |
END; |
END; |
|
|
BODY: BEGIN |
BODY: BEGIN |
Line 157 RULES
|
Line 180 RULES
|
Create '<basefont'; |
Create '<basefont'; |
Remove; |
Remove; |
Create Attributes; |
Create Attributes; |
|
#ifdef XML |
|
Create ' />\12'; |
|
#else |
Create '>\12'; |
Create '>\12'; |
|
#endif |
END; |
END; |
|
|
BR: BEGIN |
BR: BEGIN |
Create '<br'; |
Create '<br'; |
|
Remove; |
Create Attributes; |
Create Attributes; |
|
#ifdef XML |
|
Create ' />\12'; |
|
#else |
Create '>\12'; |
Create '>\12'; |
Remove; |
#endif |
END; |
END; |
|
|
Italic_text: |
Italic_text: |
BEGIN |
BEGIN |
Create '<i'; |
Create '<i'; |
Line 173 RULES
|
Line 205 RULES
|
Create '>'; |
Create '>'; |
Create '</i>' After; |
Create '</i>' After; |
END; |
END; |
|
|
Bold_text: |
Bold_text: |
BEGIN |
BEGIN |
Create '<b'; |
Create '<b'; |
Line 319 RULES
|
Line 352 RULES
|
Create '<param'; |
Create '<param'; |
Create Attributes; |
Create Attributes; |
Remove; |
Remove; |
|
#ifdef XML |
|
Create ' />\12'; |
|
#else |
Create '>\12'; |
Create '>\12'; |
|
#endif |
END; |
END; |
|
|
Object: BEGIN |
Object: BEGIN |
Line 333 RULES
|
Line 370 RULES
|
Create '<ins'; |
Create '<ins'; |
Create Attributes; |
Create Attributes; |
Create '>'; |
Create '>'; |
Create '</span>' After; |
Create '</ins>' After; |
END; |
END; |
|
|
DEL: BEGIN |
DEL: BEGIN |
Create '<del'; |
Create '<del'; |
Create Attributes; |
Create Attributes; |
Create '>'; |
Create '>'; |
Create '</span>' After; |
Create '</del>' After; |
END; |
END; |
|
|
Span: BEGIN |
Span: BEGIN |
Line 380 RULES
|
Line 417 RULES
|
indent -2 after; |
indent -2 after; |
Create '</math>\12' After; |
Create '</math>\12' After; |
END; |
END; |
MathDisp: BEGIN |
|
Create '<math'; |
|
Create Attributes; |
|
Create '>\12'; |
|
indent +2; |
|
indent -2 after; |
|
Create '</math>\12' After; |
|
END; |
|
MathML: |
MathML: |
Use MathMLT; |
#ifdef XML |
|
Use MathMLTX; |
|
#else |
|
Use MathMLT; |
|
#endif |
#endif |
#endif |
#ifdef GRAPHML |
#ifdef GRAPHML |
XMLGraphics: BEGIN |
XMLGraphics: BEGIN |
Line 401 RULES
|
Line 434 RULES
|
Create '</xmlgraphics>\12' After; |
Create '</xmlgraphics>\12' After; |
END; |
END; |
GraphML: |
GraphML: |
Use GraphMLT; |
#ifdef XML |
|
Use GraphMLTX; |
|
#else |
|
Use GraphMLT; |
|
#endif |
#endif |
#endif |
|
|
Paragraph: BEGIN |
Paragraph: BEGIN |
Line 484 RULES
|
Line 521 RULES
|
Create '<li'; |
Create '<li'; |
Create Attributes; |
Create Attributes; |
Create '>'; |
Create '>'; |
|
Create '</li>\12' After; |
END; |
END; |
|
|
Preformatted: BEGIN |
Preformatted: BEGIN |
Line 498 RULES
|
Line 536 RULES
|
Create '<hr'; |
Create '<hr'; |
Create Attributes; |
Create Attributes; |
Remove; |
Remove; |
Create '>'; |
#ifdef XML |
|
Create ' />\12'; |
|
#else |
|
Create '>\12'; |
|
#endif |
if not within Preformatted Create '\12'; |
if not within Preformatted Create '\12'; |
END; |
END; |
|
|
Line 520 RULES
|
Line 562 RULES
|
Create '\12<option'; |
Create '\12<option'; |
Create Attributes; |
Create Attributes; |
Create '>'; |
Create '>'; |
|
Create '</option>' After; |
END; |
END; |
|
|
Text_Area: BEGIN |
Text_Area: BEGIN |
Line 532 RULES
|
Line 575 RULES
|
Checkbox_Input: BEGIN |
Checkbox_Input: BEGIN |
Create '<input type=checkbox'; |
Create '<input type=checkbox'; |
Create Attributes; |
Create Attributes; |
|
#ifdef XML |
|
Create ' />'; |
|
#else |
Create '>'; |
Create '>'; |
|
#endif |
Remove; |
Remove; |
END; |
END; |
|
|
Radio_Input: BEGIN |
Radio_Input: BEGIN |
Create '<input type=radio'; |
Create '<input type=radio'; |
Create Attributes; |
Create Attributes; |
|
#ifdef XML |
|
Create ' />'; |
|
#else |
Create '>'; |
Create '>'; |
|
#endif |
Remove; |
Remove; |
END; |
END; |
|
|
Text_Input: BEGIN |
Text_Input: BEGIN |
Create '<input type=text'; |
Create '<input type=text'; |
Create Attributes; |
Create Attributes; |
|
#ifdef XML |
|
Create ' />'; |
|
#else |
Create '>'; |
Create '>'; |
|
#endif |
Remove; |
Remove; |
END; |
END; |
|
|
Hidden_Input: BEGIN |
Hidden_Input: BEGIN |
Create '<input type=hidden'; |
Create '<input type=hidden'; |
Create Attributes; |
Create Attributes; |
|
#ifdef XML |
|
Create ' />'; |
|
#else |
Create '>'; |
Create '>'; |
|
#endif |
Remove; |
Remove; |
END; |
END; |
|
|
Password_Input: BEGIN |
Password_Input: BEGIN |
Create '<input type=password'; |
Create '<input type=password'; |
Create Attributes; |
Create Attributes; |
|
#ifdef XML |
|
Create ' />'; |
|
#else |
Create '>'; |
Create '>'; |
|
#endif |
Remove; |
Remove; |
END; |
END; |
|
|
File_Input: BEGIN |
File_Input: BEGIN |
Create '<input type=file'; |
Create '<input type=file'; |
Create Attributes; |
Create Attributes; |
|
#ifdef XML |
|
Create ' />'; |
|
#else |
Create '>'; |
Create '>'; |
|
#endif |
Remove; |
Remove; |
END; |
END; |
|
|
Reset_Input: BEGIN |
Reset_Input: BEGIN |
Create '\12<input type=reset'; |
Create '\12<input type=reset'; |
Create Attributes; |
Create Attributes; |
|
#ifdef XML |
|
Create ' />'; |
|
#else |
Create '>'; |
Create '>'; |
|
#endif |
Remove; |
Remove; |
END; |
END; |
|
|
Submit_Input: BEGIN |
Submit_Input: BEGIN |
Create '\12<input type=submit'; |
Create '\12<input type=submit'; |
Create Attributes; |
Create Attributes; |
|
#ifdef XML |
|
Create ' />'; |
|
#else |
Create '>'; |
Create '>'; |
|
#endif |
Remove; |
Remove; |
END; |
END; |
|
|
Line 598 RULES
|
Line 673 RULES
|
if NOT Immediately within Object BEGIN |
if NOT Immediately within Object BEGIN |
Create '<img'; |
Create '<img'; |
Create Attributes; |
Create Attributes; |
Create '>' After; |
#ifdef XML |
|
Create ' />\12'; |
|
#else |
|
Create '>'; |
|
#endif |
END; |
END; |
if NOT within Paragraph AND NOT Immediately within Object |
if NOT within Paragraph AND NOT Immediately within Object |
Create '\12' After; |
Create '\12' After; |
Line 622 RULES
|
Line 701 RULES
|
AREA: |
AREA: |
BEGIN |
BEGIN |
Create '<area'; |
Create '<area'; |
Create Attributes; |
|
Remove; |
Remove; |
|
Create Attributes; |
|
#ifdef XML |
|
Create ' />\12'; |
|
#else |
Create '>\12'; |
Create '>\12'; |
|
#endif |
END; |
END; |
|
|
{ ---- Tables ---- } |
{ ---- Tables ---- } |