Annotation of Amaya/amaya/HTMLT.T, revision 1.43

1.3       cvs         1:                { Author: I. Vatton      1994-1995-1996  }
1.1       cvs         2: 
                      3: TRANSLATION HTML;
                      4: 
1.3       cvs         5: LINELENGTH 78;
1.1       cvs         6: 
                      7: CONST
1.12      cvs         8:    DoubleQuote  = '"';
1.1       cvs         9: 
                     10: RULES
                     11: 
                     12:  HTML : BEGIN
1.36      cvs        13: #ifdef COUGAR
1.37      cvs        14:        Create '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">\12';
1.36      cvs        15: #else
1.26      cvs        16:        Create '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">\12';
1.36      cvs        17: #endif
1.18      cvs        18:        Create '<html';
                     19:        Create Attributes;
                     20:        Create '>\12';
1.15      cvs        21:        Create '</html>\12' After;
1.1       cvs        22:        END;
                     23: 
                     24:  HEAD: BEGIN
1.18      cvs        25:        Create '<head';
                     26:        Create Attributes;
                     27:        Create '>\12';
1.15      cvs        28:        Create '</head>\12' After;
1.1       cvs        29:        END;
                     30: 
                     31:  Document_URL:
                     32:        BEGIN
                     33:        Remove;
                     34:        END;
                     35: 
                     36:  TITLE:        BEGIN
1.18      cvs        37:        Create '<title';
                     38:        Create Attributes;
                     39:        Create '>\12';
1.15      cvs        40:        Create '</title>\12' After;
1.1       cvs        41:        END;
                     42: 
                     43:  ISINDEX: BEGIN
1.15      cvs        44:        Create '<isindex';
1.1       cvs        45:        IF Prompt
                     46:           BEGIN
                     47:           Create ' prompt="';
                     48:           Create Prompt;
1.12      cvs        49:           Create DoubleQuote;
1.1       cvs        50:           END;
                     51:        Create Attributes;
                     52:        Remove;
                     53:        Create '>\12';
                     54:        END;
                     55: 
                     56:  BASE: BEGIN
1.15      cvs        57:        Create '<base ';
1.1       cvs        58:        Create Attributes;
                     59:        Remove;
                     60:        Create '>\12';
                     61:        END;
                     62: 
                     63:  Styles:BEGIN
1.15      cvs        64:        Create '<style';
1.1       cvs        65:        IF Notation
                     66:           BEGIN
                     67:           Create ' type=';
                     68:           Create Notation;
                     69:           END;
                     70:        Create Attributes;
                     71:        Create '>\12';
1.15      cvs        72:        Create '</style>\12' After;
1.1       cvs        73:        END;
                     74: 
                     75:  StyleRule:
                     76:        BEGIN
                     77:        IF Selector
                     78:           BEGIN
                     79:           Create Selector;
                     80:           Create ' { ';
                     81:           Create ' }\12' After;
                     82:           END;
                     83:        END;
                     84: 
                     85:  SCRIPT: BEGIN
1.15      cvs        86:        Create '<script';
1.1       cvs        87:        Create Attributes;
                     88:        Create '>\12' After;
                     89:        END;
                     90: 
                     91:  META: BEGIN
1.15      cvs        92:        Create '<meta';
1.1       cvs        93:        Remove;
                     94:        Create Attributes;
                     95:        Create '>\12' After;
                     96:        END;
                     97: 
                     98:  LINK: BEGIN
1.15      cvs        99:        Create '<link';
1.1       cvs       100:        Remove;
                    101:        Create Attributes;
                    102:        Create '>\12' After;
                    103:        END;
                    104: 
                    105:  BODY: BEGIN
1.15      cvs       106:        Create '<body';
1.1       cvs       107:        Create Attributes;
                    108:        Create '>\12';
1.15      cvs       109:        Create '</body>\12' After;
1.1       cvs       110:        END;
                    111: 
                    112:  H1:   BEGIN
1.28      cvs       113:        if not within Preformatted Create '\12';
1.15      cvs       114:        Create '<h1';
1.1       cvs       115:        Create Attributes;
                    116:        Create '>';
1.15      cvs       117:        Create '</h1>' After;
1.28      cvs       118:        if not within Preformatted Create '\12' After;
1.1       cvs       119:        END;
                    120: 
                    121:  H2:   BEGIN
1.28      cvs       122:        if not within Preformatted Create '\12';
1.15      cvs       123:        Create '<h2';
1.1       cvs       124:        Create Attributes;
                    125:        Create '>';
1.15      cvs       126:        Create '</h2>' After;
1.28      cvs       127:        if not within Preformatted Create '\12' After;
1.1       cvs       128:        END;
                    129: 
                    130:  H3:   BEGIN
1.28      cvs       131:        if not within Preformatted Create '\12';
1.15      cvs       132:        Create '<h3';
1.1       cvs       133:        Create Attributes;
                    134:        Create '>';
1.15      cvs       135:        Create '</h3>' After;
1.28      cvs       136:        if not within Preformatted Create '\12' After;
1.1       cvs       137:        END;
                    138: 
                    139:  H4:   BEGIN
1.28      cvs       140:        if not within Preformatted Create '\12';
1.15      cvs       141:        Create '<h4';
1.1       cvs       142:        Create Attributes;
                    143:        Create '>';
1.15      cvs       144:        Create '</h4>' After;
1.28      cvs       145:        if not within Preformatted Create '\12' After;
1.1       cvs       146:        END;
                    147: 
                    148:  H5:   BEGIN
1.28      cvs       149:        if not within Preformatted Create '\12';
1.15      cvs       150:        Create '<h5';
1.1       cvs       151:        Create Attributes;
                    152:        Create '>';
1.15      cvs       153:        Create '</h5>' After;
                    154:        if not within Preformatted Create '\12' After;
1.1       cvs       155:        END;
                    156: 
                    157:  H6:   BEGIN
1.28      cvs       158:        if not within Preformatted Create '\12';
1.15      cvs       159:        Create '<h6';
1.1       cvs       160:        Create Attributes;
                    161:        Create '>';
1.15      cvs       162:        Create '</h6>' After;
                    163:        if not within Preformatted Create '\12' After;
1.1       cvs       164:        END;
                    165: 
                    166:  BaseFont:
                    167:        BEGIN
1.15      cvs       168:        Create '<basefont';
1.1       cvs       169:        Remove;
                    170:        Create Attributes;
                    171:        Create '>\12';
                    172:        END;
                    173: 
1.6       cvs       174:  BR:   BEGIN
1.15      cvs       175:        Create '<br';
1.6       cvs       176:        Create Attributes;
1.13      cvs       177:        Create '>\12';
1.6       cvs       178:        Remove;
                    179:        END;
1.1       cvs       180:  Italic_text:
                    181:        BEGIN
1.15      cvs       182:        Create '<i';
1.1       cvs       183:        Create Attributes;
                    184:        Create '>';
1.15      cvs       185:        Create '</i>' After;
1.1       cvs       186:        END;
                    187:  Bold_text:
                    188:        BEGIN
1.15      cvs       189:        Create '<b';
1.1       cvs       190:        Create Attributes;
                    191:        Create '>';
1.15      cvs       192:        Create '</b>' After;
1.1       cvs       193:        END;
                    194:  Teletype_text:
                    195:        BEGIN
1.15      cvs       196:        Create '<tt';
1.1       cvs       197:        Create Attributes;
                    198:        Create '>';
1.15      cvs       199:        Create '</tt>' After;
1.1       cvs       200:        END;
1.8       cvs       201:  Underlined_text:
                    202:        BEGIN
1.15      cvs       203:        Create '<u';
1.8       cvs       204:        Create Attributes;
                    205:        Create '>';
1.15      cvs       206:        Create '</u>' After;
1.8       cvs       207:        END;
1.1       cvs       208:  Struck_text:
                    209:        BEGIN
1.15      cvs       210:        Create '<strike';
1.1       cvs       211:        Create Attributes;
                    212:        Create '>';
1.15      cvs       213:        Create '</strike>' After;
1.1       cvs       214:        END;
                    215:  Big_text:
                    216:        BEGIN
1.15      cvs       217:        Create '<big';
1.1       cvs       218:        Create Attributes;
                    219:        Create '>';
1.15      cvs       220:        Create '</big>' After;
1.1       cvs       221:        END;
                    222:  Small_text:
                    223:        BEGIN
1.15      cvs       224:        Create '<small';
1.1       cvs       225:        Create Attributes;
                    226:        Create '>';
1.15      cvs       227:        Create '</small>' After;
1.1       cvs       228:        END;
                    229:  Subscript:
                    230:        BEGIN
1.15      cvs       231:        Create '<sub';
1.1       cvs       232:        Create Attributes;
                    233:        Create '>';
1.15      cvs       234:        Create '</sub>' After;
1.1       cvs       235:        END;
                    236:  Superscript:
                    237:        BEGIN
1.15      cvs       238:        Create '<sup';
1.1       cvs       239:        Create Attributes;
                    240:        Create '>';
1.15      cvs       241:        Create '</sup>' After;
1.1       cvs       242:        END;
                    243: 
                    244:  Emphasis:
                    245:        BEGIN
1.15      cvs       246:        Create '<em';
1.1       cvs       247:        Create Attributes;
                    248:        Create '>';
1.15      cvs       249:        Create '</em>' After;
1.1       cvs       250:        END;
                    251:  Strong:
                    252:        BEGIN
1.15      cvs       253:        Create '<strong';
1.1       cvs       254:        Create Attributes;
                    255:        Create '>';
1.15      cvs       256:        Create '</strong>' After;
1.1       cvs       257:        END;
                    258:  Def:
                    259:        BEGIN
1.15      cvs       260:        Create '<dfn';
1.1       cvs       261:        Create Attributes;
                    262:        Create '>';
1.15      cvs       263:        Create '</dfn>' After;
1.1       cvs       264:        END;
                    265:  Code:
                    266:        BEGIN
1.15      cvs       267:        Create '<code';
1.1       cvs       268:        Create Attributes;
                    269:        Create '>';
1.15      cvs       270:        Create '</code>' After;
1.1       cvs       271:        END;
                    272:  Sample:
                    273:        BEGIN
1.15      cvs       274:        Create '<samp';
1.1       cvs       275:        Create Attributes;
                    276:        Create '>';
1.15      cvs       277:        Create '</samp>' After;
1.1       cvs       278:        END;
                    279:  Keyboard:
                    280:        BEGIN
1.15      cvs       281:        Create '<kbd';
1.1       cvs       282:        Create Attributes;
                    283:        Create '>';
1.15      cvs       284:        Create '</kbd>' After;
1.1       cvs       285:        END;
                    286:  Variable:
                    287:        BEGIN
1.15      cvs       288:        Create '<var';
1.1       cvs       289:        Create Attributes;
                    290:        Create '>';
1.15      cvs       291:        Create '</var>' After;
1.1       cvs       292:        END;
                    293:  Cite:
                    294:        BEGIN
1.15      cvs       295:        Create '<cite';
1.1       cvs       296:        Create Attributes;
                    297:        Create '>';
1.15      cvs       298:        Create '</cite>' After;
1.1       cvs       299:        END;
                    300: 
                    301:  Font_: BEGIN
1.15      cvs       302:        Create '<font';
1.1       cvs       303:        Create Attributes;
                    304:        Create '>';
1.15      cvs       305:        Create '</font>' After;
1.1       cvs       306:        END;
                    307: 
                    308:  Applet: BEGIN
1.15      cvs       309:        Create '<applet';
1.1       cvs       310:        Create Attributes;
                    311:        Create '>\12';
1.15      cvs       312:        Create '</applet>\12' After;    
1.1       cvs       313:        END;
                    314: 
                    315:  Parameter: BEGIN
1.15      cvs       316:        Create '<param';
1.1       cvs       317:        Create Attributes;
                    318:        Remove;
                    319:        Create '>\12';
                    320:        END;
                    321: 
                    322: #ifdef COUGAR
                    323:  Object: BEGIN
1.15      cvs       324:        Create '<object';
1.1       cvs       325:        Create Attributes;
                    326:        Create '>\12';
1.15      cvs       327:        Create '</object>\12' After;    
1.1       cvs       328:        END;
1.20      cvs       329: 
                    330:  Span: BEGIN
                    331:        Create '<span';
                    332:        Create Attributes;
                    333:        Create '>';
                    334:        Create '</span>' After;
                    335:        END;
1.1       cvs       336: #endif
1.29      cvs       337: 
                    338: #ifdef MATHML
1.33      cvs       339:  Math: BEGIN
                    340:        Create '<math';
1.29      cvs       341:        Create Attributes;
                    342:        Create '>\12';
1.31      cvs       343:         indent +2;
                    344:         indent -2 after;
1.33      cvs       345:        Create '</math>\12' After;      
                    346:        END;
                    347:  MathDisp: BEGIN
1.40      cvs       348:        Create '<math';
1.33      cvs       349:        Create Attributes;
                    350:        Create '>\12';
                    351:         indent +2;
                    352:         indent -2 after;
1.40      cvs       353:        Create '</math>\12' After;      
1.29      cvs       354:        END;
1.30      cvs       355:  MathML:
                    356:        Use MathMLT;    
1.41      cvs       357: #endif
                    358: #ifdef GRAPHML
                    359:  XMLGraphics: BEGIN
                    360:        Create '<xmlgraphics';
                    361:        Create Attributes;
                    362:        Create '>\12';
                    363:         indent +2;
                    364:         indent -2 after;
                    365:        Create '</xmlgraphics>\12' After;       
                    366:        END;
                    367:  GraphML:
                    368:        Use GraphMLT;   
1.29      cvs       369: #endif
                    370: 
1.1       cvs       371:  Paragraph: BEGIN
1.16      cvs       372:        Create '<p';
                    373:        Create Attributes;
                    374:        Create '>\12';
                    375:        Create '</p>' After;
                    376:        Create '\12' After;
                    377:        END;
                    378: 
                    379:  Pseudo_paragraph: BEGIN
                    380:        Create '\12';
1.1       cvs       381:        Create '\12' After;
                    382:        END;
                    383: 
                    384:  TEXT_UNIT: BEGIN
                    385:        IF Within Text_Area
                    386:                Remove;
                    387:        IF Within Text_Input
                    388:                Remove;
                    389:        END;
                    390: 
                    391:  Definition_List: BEGIN
1.15      cvs       392:        Create '<dl';
1.1       cvs       393:        Create Attributes;
                    394:        Create '>\12';
1.15      cvs       395:        Create '</dl>\12' After;
1.1       cvs       396:        END;
                    397: 
                    398:  Term: BEGIN
1.15      cvs       399:        Create '<dt';
1.1       cvs       400:        Create Attributes;
                    401:        Create '>';
1.15      cvs       402:        Create '</dt>\12' After;
1.1       cvs       403:        END;
                    404: 
                    405:  Definition: BEGIN
1.15      cvs       406:        Create '<dd';
1.1       cvs       407:        Create Attributes;
                    408:        Create '>';
1.15      cvs       409:        Create '</dd>\12' After;
1.1       cvs       410:        END;
                    411: 
                    412:  Unnumbered_List: BEGIN
1.15      cvs       413:        Create '<ul';
1.1       cvs       414:        Create Attributes;
                    415:        Create '>\12';
1.15      cvs       416:        Create '</ul>\12' After;
1.1       cvs       417:        END;
                    418: 
                    419:  Numbered_List:        BEGIN
1.15      cvs       420:        Create '<ol';
1.1       cvs       421:        Create Attributes;
                    422:        Create '>\12';
1.15      cvs       423:        Create '</ol>\12' After;
1.1       cvs       424:        END;
                    425: 
                    426:  Address: BEGIN
1.15      cvs       427:        Create '<address';
1.1       cvs       428:        Create Attributes;
                    429:        Create '>\12';
1.15      cvs       430:        Create '</address>\12' After;
1.1       cvs       431:        END;
                    432: 
                    433:  Menu: BEGIN
1.15      cvs       434:        Create '<menu';
1.1       cvs       435:        Create Attributes;
                    436:        Create '>\12';
1.15      cvs       437:        Create '</menu>\12' After;
1.1       cvs       438:        END;
                    439: 
                    440:  Directory: BEGIN
1.15      cvs       441:        Create '<dir';
1.1       cvs       442:        Create Attributes;
                    443:        Create '>\12';
1.15      cvs       444:        Create '</dir>\12' After;
1.1       cvs       445:        END;
                    446: 
                    447:  List_Item: BEGIN
1.15      cvs       448:        Create '<li';
1.1       cvs       449:        Create Attributes;
                    450:        Create '>';
                    451:        END;
                    452: 
                    453:  Preformatted: BEGIN
                    454:        NoLineBreak;
1.15      cvs       455:        Create '<pre';
1.1       cvs       456:        Create Attributes;
                    457:        Create '>';
1.15      cvs       458:        Create '</pre>\12' After;
1.1       cvs       459:        END;
                    460: 
                    461:  Horizontal_Rule: BEGIN
1.15      cvs       462:        Create '<hr';
1.1       cvs       463:        Create Attributes;
                    464:        Remove;
1.15      cvs       465:        Create '>';
1.17      cvs       466:        if not within Preformatted Create '\12';
1.1       cvs       467:        END;
                    468: 
                    469:  Form: BEGIN
1.15      cvs       470:        Create '<form';
1.1       cvs       471:        Create Attributes;
                    472:        Create '>\12';
1.15      cvs       473:        Create '</form>\12' After;
1.1       cvs       474:        END;
                    475: 
                    476:  Option_Menu: BEGIN
1.15      cvs       477:        Create '\12<select';
1.1       cvs       478:        Create Attributes;
1.5       cvs       479:        Create '>';
1.15      cvs       480:        Create '\12</select>\12' After;
1.1       cvs       481:        END;
                    482: 
                    483:  Option: BEGIN
1.15      cvs       484:        Create '\12<option';
1.5       cvs       485:        Create Attributes;
                    486:        Create '>';
1.1       cvs       487:        END;
                    488: 
                    489:  Toggle_Menu: BEGIN
1.15      cvs       490:        Create '<!--toggle_menu-->\12<pre>\12';
                    491:        Create '</pre>\12' After;
1.1       cvs       492:        END;
                    493: 
                    494:  Toggle_Item: BEGIN
                    495:        Create '\12' After;
                    496:        END;
                    497: 
                    498:  Radio_Menu: BEGIN
1.15      cvs       499:        Create '<!--radio_menu-->\12<pre>\12';
                    500:        Create '</pre>\12' After;
1.1       cvs       501:        END;
                    502: 
                    503:  Radio_Item: BEGIN
                    504:        Create '\12' After;
                    505:        END;
                    506: 
                    507:  Text_Input_Line: BEGIN
1.15      cvs       508:        Create '<!--text_input_line-->\12<p>\12';
                    509:        Create '</p>\12' After;
1.1       cvs       510:        END;
                    511: 
                    512:  Text_Area: BEGIN
1.15      cvs       513:        Create '<textarea';
1.1       cvs       514:        Create Attributes;
                    515:        Create '>';
1.15      cvs       516:        Create '</textarea>';
1.1       cvs       517:        END;
                    518: 
                    519:  Checkbox_Input: BEGIN
1.15      cvs       520:        Create '<input type=checkbox';
1.1       cvs       521:        Create Attributes;
                    522:        Create '>';
                    523:        Remove;
                    524:        END;
                    525: 
                    526:  Radio_Input: BEGIN
1.15      cvs       527:        Create '<input type=radio';
1.1       cvs       528:        Create Attributes;
                    529:        Create '>';
                    530:        Remove;
                    531:        END;
                    532: 
                    533:  Text_Input: BEGIN
1.15      cvs       534:        Create '<input type=text';
1.1       cvs       535:        Create Attributes;
                    536:        Create '>';
                    537:        Remove;
                    538:        END;
                    539: 
                    540:  Hidden_Input: BEGIN
1.15      cvs       541:        Create '<input type=hidden';
1.1       cvs       542:        Create Attributes;
                    543:        Create '>';
                    544:        Remove;
                    545:        END;
                    546: 
                    547:  Password_Input: BEGIN
1.15      cvs       548:        Create '<input type=password';
1.1       cvs       549:        Create Attributes;
                    550:        Create '>';
                    551:        Remove;
                    552:        END;
                    553: 
                    554:  File_Input: BEGIN
1.15      cvs       555:        Create '<input type=file';
1.1       cvs       556:        Create Attributes;
                    557:        Create '>';
                    558:        Remove;
                    559:        END;
                    560: 
                    561:  Reset_Input: BEGIN
1.15      cvs       562:        Create '\12<input type=reset';
1.1       cvs       563:        Create Attributes;
                    564:        Create '>';
                    565:        Remove;
                    566:        END;
                    567: 
                    568:  Submit_Input: BEGIN
1.15      cvs       569:        Create '\12<input type=submit';
1.1       cvs       570:        Create Attributes;
                    571:        Create '>';
                    572:        Remove;
                    573:        END;
                    574: 
                    575:  Block_Quote: BEGIN
1.15      cvs       576:        Create '<blockquote';
1.1       cvs       577:        Create Attributes;
                    578:        Create '>\12';
1.15      cvs       579:        Create '</blockquote>\12' After;
1.1       cvs       580:        END;
                    581: 
                    582:  PICTURE_UNIT: BEGIN
1.10      cvs       583: #ifdef COUGAR
                    584:        if Immediately within Object
                    585:                Remove;
                    586:        if NOT Immediately within Object BEGIN
1.15      cvs       587:                Create '<img';
1.10      cvs       588:                Create Attributes;
                    589:                Create '>' After;
                    590:                END;
                    591:        if NOT within Paragraph AND NOT Immediately within Object
                    592:                Create '\12' After;
                    593: #else
1.15      cvs       594:        Create '<img';
1.1       cvs       595:        Create Attributes;
                    596:        Create '>' After;
                    597:        if NOT within Paragraph
                    598:                Create '\12' After;
1.10      cvs       599: #endif
1.1       cvs       600:        END;
                    601: 
                    602:  Anchor: BEGIN
1.15      cvs       603:        Create '<a';
1.1       cvs       604:        Create Attributes;
                    605:        Create '>';
1.15      cvs       606:        Create '</a>' After;
1.1       cvs       607:        END;
                    608: 
                    609:  MAP:
                    610:        BEGIN
1.15      cvs       611:        Create '<map';
1.1       cvs       612:        Create Attributes;
                    613:        Create '>\12';
1.15      cvs       614:        Create '</map>\12' after;
1.1       cvs       615:        END;
                    616: 
                    617:  AREA:
                    618:        BEGIN
1.15      cvs       619:        Create '<area';
1.1       cvs       620:        Create Attributes;
                    621:        Remove;
                    622:        Create '>\12';
                    623:        END;
                    624: 
                    625: { ---- Tables ---- }
                    626: 
                    627:  Table:
                    628:        BEGIN
1.15      cvs       629:        Create '\12<table';
1.1       cvs       630:        Create Attributes;
                    631:        Create '>\12';
1.15      cvs       632:        Create '</table>\12' after;
1.1       cvs       633:        END;
                    634: 
                    635:  CAPTION:
                    636:        BEGIN
1.15      cvs       637:        Create '<caption';
1.1       cvs       638:        Create Attributes;
                    639:        Create '>';
1.15      cvs       640:        Create '</caption>\12' after;
1.1       cvs       641:        END;
                    642: 
                    643:  Table_head:
                    644:        Remove;
                    645: 
1.11      cvs       646: #ifdef COUGAR
1.1       cvs       647:  thead:
                    648:        BEGIN
1.15      cvs       649:        Create '<thead';
1.1       cvs       650:        Create Attributes;
                    651:        Create '>\12';
1.15      cvs       652:        Create '</thead>\12' after;
1.1       cvs       653:        END;
                    654: 
                    655:  tfoot:
                    656:        BEGIN
1.15      cvs       657:        Create '<tfoot';
1.1       cvs       658:        Create Attributes;
                    659:        Create '>\12';
1.15      cvs       660:        Create '</tfoot>\12' after;
1.1       cvs       661:        END;
                    662:  tbody:
                    663:        BEGIN
1.15      cvs       664:        Create '<tbody';
1.1       cvs       665:        Create Attributes;
                    666:        Create '>\12';
1.15      cvs       667:        Create '</tbody>\12' after;
1.1       cvs       668:        END;
1.11      cvs       669: #endif
1.1       cvs       670: 
                    671:  Table_body:
                    672:        Get tfoot;
                    673: 
                    674:  Table_row:
                    675:        BEGIN
1.15      cvs       676:        Create '<tr';
1.1       cvs       677:        Create Attributes;
                    678:        Create '>\12';
1.15      cvs       679:        Create '</tr>\12' after;
1.1       cvs       680:        END;
                    681: 
                    682:  Data_cell:
                    683:        BEGIN
1.15      cvs       684:        Create '<td';
1.1       cvs       685:        Create Attributes;
                    686:        Create '>';
1.25      cvs       687:        Create '</td>\12' after;
1.1       cvs       688:        END;
                    689: 
                    690:  Heading_cell:
                    691:        BEGIN
1.15      cvs       692:        Create '<th';
1.1       cvs       693:        Create Attributes;
                    694:        Create '>';
1.25      cvs       695:        Create '</th>\12' after;
1.1       cvs       696:        END;
                    697: 
                    698:  Table_foot:
                    699:        BEGIN
                    700:        Remove;
                    701:        END;
                    702: 
                    703:  Division: BEGIN
1.15      cvs       704:        Create '\12<div';
1.1       cvs       705:        Create Attributes;
                    706:        Create '>\12';
1.15      cvs       707:        Create '</div>\12' After;
1.1       cvs       708:        END;
                    709: 
                    710:  Center: BEGIN
1.15      cvs       711:        Create '\12<center';
1.1       cvs       712:        Create Attributes;
                    713:        Create '>\12';
1.15      cvs       714:        Create '</center>\12' After;
1.1       cvs       715:        END;
                    716: 
1.8       cvs       717:  Invalid_element:
                    718:        BEGIN
                    719:        if Error_type = BadPosition
                    720:           Remove;
                    721:        if not Error_type = BadPosition
                    722:            BEGIN
                    723:           NoTranslation;
                    724:           Create Content;
                    725:           Remove;
                    726:           Create Attributes;
                    727:           Create '>';
                    728:           END;
1.1       cvs       729:        END;
                    730: 
                    731:  Comment\240: BEGIN
                    732:        NoLineBreak;
                    733:        Create '<!--';
1.27      cvs       734:        NoTranslation;
1.1       cvs       735:        Create '-->\12' after;
                    736:        END;
                    737: 
                    738:  Comment_line: BEGIN
                    739:        if not last create '\12' after;
                    740:        END;
                    741: 
                    742: ATTRIBUTES
1.18      cvs       743: 
                    744: #ifdef COUGAR
1.19      cvs       745:  Langue:
1.20      cvs       746:        IF not HTML
                    747:            BEGIN
                    748:            Create ' lang="';
                    749:            Create Langue;
                    750:            Create DoubleQuote;
                    751:            END;
1.18      cvs       752: #endif
1.1       cvs       753: 
                    754:  http_equiv: BEGIN
                    755:        Create ' http-equiv="';
                    756:        Create http_equiv;
1.12      cvs       757:        Create DoubleQuote;
1.1       cvs       758:        END;
                    759: 
                    760:  meta_name: BEGIN
                    761:        Create ' name="';
                    762:        Create meta_name;
1.12      cvs       763:        Create DoubleQuote;
1.1       cvs       764:        END;
                    765: 
                    766:  meta_content: BEGIN
                    767:        Create ' content="';
                    768:        Create meta_content;
1.12      cvs       769:        Create DoubleQuote;
1.1       cvs       770:        END;
                    771: 
                    772:  REL:  BEGIN
                    773:        Create ' rel="';
                    774:        Create REL;
1.12      cvs       775:        Create DoubleQuote;
1.1       cvs       776:        END;
                    777: 
                    778:  REV:  BEGIN
                    779:        Create ' rev="';
                    780:        Create REV;
1.12      cvs       781:        Create DoubleQuote;
1.1       cvs       782:        END;
                    783: 
                    784:  HREF_ :
                    785:        BEGIN
                    786:        NoTranslation;
                    787:        Create ' href="';
                    788:        Create HREF_;
1.12      cvs       789:        Create DoubleQuote;
1.1       cvs       790:        END;
                    791: 
                    792:  background_ :
                    793:        BEGIN
                    794:        Create ' background="';
                    795:        Create background_;
1.12      cvs       796:        Create DoubleQuote;
1.1       cvs       797:        END;
                    798: 
                    799:  BackgroundColor :
                    800:        BEGIN
                    801:        Create ' bgcolor="';
                    802:        Create BackgroundColor;
1.12      cvs       803:        Create DoubleQuote;
1.1       cvs       804:        END;
                    805: 
                    806:  TextColor :
                    807:        BEGIN
                    808:        Create ' text="';
                    809:        Create TextColor;
1.12      cvs       810:        Create DoubleQuote;
1.1       cvs       811:        END;
                    812: 
                    813:  LinkColor :
                    814:        BEGIN
                    815:        Create ' link="';
                    816:        Create LinkColor;
1.12      cvs       817:        Create DoubleQuote;
1.1       cvs       818:        END;
                    819: 
                    820:  VisitedLinkColor :
                    821:        BEGIN
                    822:        Create ' vlink="';
                    823:        Create VisitedLinkColor;
1.12      cvs       824:        Create DoubleQuote;
1.1       cvs       825:        END;
                    826: 
                    827:  ActiveLinkColor :
                    828:        BEGIN
                    829:        Create ' alink="';
                    830:        Create ActiveLinkColor;
1.12      cvs       831:        Create DoubleQuote;
1.1       cvs       832:        END;
                    833: 
                    834:  BaseFontSize:
                    835:        BEGIN
1.12      cvs       836:        Create ' size="';
1.1       cvs       837:        Create BaseFontSize;
1.12      cvs       838:        Create DoubleQuote;
1.1       cvs       839:        END;
                    840: 
                    841:  Font_size :
                    842:        BEGIN
                    843:        Create ' size="';
                    844:        Create Font_size;
1.12      cvs       845:        Create DoubleQuote;
1.1       cvs       846:        END;
                    847: 
                    848:  color :
                    849:        BEGIN
                    850:        Create ' color="';
                    851:        Create color;
1.12      cvs       852:        Create DoubleQuote;
1.1       cvs       853:        END;
1.6       cvs       854: 
                    855:  Clear = Left_:
                    856:        Create ' clear=left';
                    857:  Clear = Right_:
                    858:        Create ' clear=right';
1.9       cvs       859:  Clear = All_:
                    860:        Create ' clear=all';
                    861:  Clear = None:
                    862:        Create ' clear=none';
1.1       cvs       863: 
                    864:  Align = left_:
                    865:        Create ' align=left';
                    866:  Align = center_:
                    867:        Create ' align=center';
                    868:  Align = right_:
                    869:        Create ' align=right';
                    870: 
                    871:  NoShade:
                    872:        Create ' noshade';
                    873: 
                    874:  Size_: BEGIN
                    875:        Create ' size="';
                    876:        Create Size_;
1.12      cvs       877:        Create DoubleQuote;
1.1       cvs       878:        END;
                    879: 
                    880:  Width__: BEGIN
                    881:        Create ' width="';
                    882:        Create Width__;
1.12      cvs       883:        Create DoubleQuote;
1.1       cvs       884:        END;
                    885: 
                    886:  codebase: BEGIN
                    887:        NoTranslation;
                    888:        Create ' codebase="';
                    889:        Create codebase;
1.12      cvs       890:        Create DoubleQuote;
1.1       cvs       891:        END;
                    892: 
                    893:  code: BEGIN
                    894:        Create ' code="';
                    895:        Create code;
1.12      cvs       896:        Create DoubleQuote;
1.1       cvs       897:        END;
                    898: 
                    899:  applet_name: BEGIN
                    900:        Create ' name="';
                    901:        Create applet_name;
1.12      cvs       902:        Create DoubleQuote;
1.1       cvs       903:        END;
                    904: 
                    905:  Param_name: BEGIN
                    906:        Create ' name="';
                    907:        Create Param_name;
1.12      cvs       908:        Create DoubleQuote;
1.1       cvs       909:        END;
                    910: 
                    911:  Param_value: BEGIN
                    912:        Create ' value="';
                    913:        Create Param_value;
1.12      cvs       914:        Create DoubleQuote;
1.1       cvs       915:        END;
                    916: #ifdef COUGAR
                    917:  classid: BEGIN
                    918:        Create ' classid="';
                    919:        Create classid;
1.12      cvs       920:        Create DoubleQuote;
1.1       cvs       921:        END;
                    922: 
                    923:  data: BEGIN
                    924:        Create ' data="';
                    925:        Create data;
1.12      cvs       926:        Create DoubleQuote;
1.1       cvs       927:        END;
                    928: 
                    929:  Object_type: BEGIN
                    930:        Create ' type="';
                    931:        Create Object_type;
1.12      cvs       932:        Create DoubleQuote;
1.1       cvs       933:        END;
                    934: 
1.38      cvs       935:  Link_type: BEGIN
                    936:        Create ' type="';
                    937:        Create Link_type;
                    938:        Create DoubleQuote;
                    939:        END;
                    940: 
1.1       cvs       941:  codetype: BEGIN
                    942:        Create ' codetype="';
                    943:        Create codetype;
1.12      cvs       944:        Create DoubleQuote;
1.1       cvs       945:        END;
                    946: #endif
                    947:  Title : BEGIN
                    948:        NoTranslation;
                    949:        Create ' title="';
                    950:        Create Title;
1.12      cvs       951:        Create DoubleQuote;
1.1       cvs       952:        END;
                    953: 
                    954:  Class: BEGIN
1.22      cvs       955:        Create ' class="';
                    956:        Create Class;
                    957:        Create DoubleQuote;
1.1       cvs       958:        END;
                    959: 
                    960:  Style\240:
                    961:        BEGIN
1.22      cvs       962:        IF not Within HEAD
1.1       cvs       963:            BEGIN
1.21      cvs       964:            Create ' style="';
1.1       cvs       965:            Create Style\240;
1.12      cvs       966:            Create DoubleQuote;
1.1       cvs       967:            END;
                    968:        END;
1.20      cvs       969: 
                    970: #ifdef COUGAR
                    971:  ID:   BEGIN
                    972:        Create ' id="';
                    973:        Create ID;
                    974:        Create DoubleQuote;
                    975:        END;
                    976: #endif
1.1       cvs       977: 
                    978:  BulletStyle = disc :
                    979:        Create ' type=disc';
                    980:  BulletStyle = square :
                    981:        Create ' type=square';
                    982:  BulletStyle = circle :
                    983:        Create ' type=circle';
                    984: 
                    985:  COMPACT:
                    986:        Create ' compact';
                    987: 
                    988:  NumberStyle = Arabic_ :
                    989:        Create ' type=1';
                    990:  NumberStyle = LowerAlpha :
                    991:        Create ' type=a';
                    992:  NumberStyle = UpperAlpha :
                    993:        Create ' type=A';
                    994:  NumberStyle = LowerRoman :
                    995:        Create ' type=i';
                    996:  NumberStyle = UpperRoman :
                    997:        Create ' type=I';
                    998: 
                    999:  Start > 1: BEGIN
                   1000:        Create ' start="';
                   1001:        Create Start;
1.12      cvs      1002:        Create DoubleQuote;
1.1       cvs      1003:        END;
                   1004: 
                   1005:  ItemStyle = disc :
                   1006:        Create ' type=disc';
                   1007:  ItemStyle = square :
                   1008:        Create ' type=square';
                   1009:  ItemStyle = circle :
                   1010:        Create ' type=circle';
                   1011:  ItemStyle = Arabic_ :
                   1012:        Create ' type=1';
                   1013:  ItemStyle = LowerAlpha :
                   1014:        Create ' type=a';
                   1015:  ItemStyle = UpperAlpha :
                   1016:        Create ' type=A';
                   1017:  ItemStyle = LowerRoman :
                   1018:        Create ' type=i';
                   1019:  ItemStyle = UpperRoman :
                   1020:        Create ' type=I';
                   1021: 
                   1022:  ItemValue: BEGIN
                   1023:        Create ' value="';
                   1024:        Create ItemValue;
1.12      cvs      1025:        Create DoubleQuote;
1.1       cvs      1026:        END;
                   1027: 
                   1028:  Script_URL: BEGIN
                   1029:        Create ' action="';
                   1030:        Create Script_URL;
1.12      cvs      1031:        Create DoubleQuote;
1.1       cvs      1032:        END;
                   1033: 
                   1034:  METHOD=Post_:
1.15      cvs      1035:        Create ' method="post"';
1.1       cvs      1036: 
                   1037:  METHOD=Get_:
1.15      cvs      1038:        Create ' method="get"';
1.1       cvs      1039: 
                   1040:  ENCTYPE: BEGIN
                   1041:        Create ' enctype="';
                   1042:        Create ENCTYPE;
1.12      cvs      1043:        Create DoubleQuote;
1.1       cvs      1044:        END;
                   1045: 
                   1046:  NAME: BEGIN
                   1047:        NoTranslation;
                   1048:        Create ' name="';
                   1049:        Create NAME;
1.12      cvs      1050:        Create DoubleQuote;
1.1       cvs      1051:        END;
                   1052: 
                   1053:  Multiple:
                   1054:        Create ' multiple';
                   1055: 
1.4       cvs      1056:  MenuSize: BEGIN
1.12      cvs      1057:        Create ' size="';
1.4       cvs      1058:        Create MenuSize;
1.12      cvs      1059:        Create DoubleQuote;
1.4       cvs      1060:        END;
1.5       cvs      1061: 
                   1062:  Selected:
                   1063:        Create ' selected';
1.4       cvs      1064: 
1.9       cvs      1065:  Value_: BEGIN
1.1       cvs      1066:        Create ' value="';
1.13      cvs      1067:        Create Value_;
1.12      cvs      1068:        Create DoubleQuote;
1.1       cvs      1069:        END;
                   1070: 
                   1071:  Rows: BEGIN
1.12      cvs      1072:        Create ' rows="';
1.1       cvs      1073:        Create Rows;
1.12      cvs      1074:        Create DoubleQuote;
1.1       cvs      1075:        END;
                   1076: 
                   1077:  Columns: BEGIN
1.12      cvs      1078:        Create ' cols="';
1.1       cvs      1079:        Create Columns;
1.12      cvs      1080:        Create DoubleQuote;
1.1       cvs      1081:        END;
                   1082: 
                   1083:  Checked = Yes_:
                   1084:        Create ' checked';
                   1085: 
                   1086:  Area_Size: BEGIN
1.12      cvs      1087:        Create ' size="';
1.1       cvs      1088:        Create Area_Size;
1.12      cvs      1089:        Create DoubleQuote;
1.1       cvs      1090:        END;
                   1091: 
                   1092:  MaxLength: BEGIN
1.12      cvs      1093:        Create ' maxlength="';
1.1       cvs      1094:        Create MaxLength;
1.12      cvs      1095:        Create DoubleQuote;
1.1       cvs      1096:        END;
                   1097: 
                   1098:  SRC:  BEGIN
                   1099:        Create ' src="';
                   1100:        Create SRC;
1.12      cvs      1101:        Create DoubleQuote;
1.1       cvs      1102:        END;
                   1103: 
                   1104:  ALT:  BEGIN
                   1105:        Create ' alt="';
                   1106:        Create ALT;
1.12      cvs      1107:        Create DoubleQuote;
1.1       cvs      1108:        END;
                   1109: 
                   1110:  Alignment = Top_:
                   1111:        Create ' align=top';
                   1112:  Alignment = Middle_:
                   1113:        Create ' align=middle';
                   1114:  Alignment = Bottom_:
                   1115:        Create ' align=bottom';
                   1116:  Alignment = Left_:
                   1117:        Create ' align=left';
                   1118:  Alignment = Right_:
                   1119:        Create ' align=right';
                   1120: 
                   1121:  Height_: BEGIN
                   1122:        Create ' height="';
                   1123:        Create Height_;
1.12      cvs      1124:        Create DoubleQuote;
1.1       cvs      1125:        END;
                   1126: 
                   1127:  Img_border: BEGIN
                   1128:        Create ' border="';
                   1129:        Create Img_border;
1.12      cvs      1130:        Create DoubleQuote;
1.1       cvs      1131:        END;
                   1132: 
                   1133:  hspace: BEGIN
                   1134:        Create ' hspace="';
                   1135:        Create hspace;
1.12      cvs      1136:        Create DoubleQuote;
1.1       cvs      1137:        END;
                   1138: 
                   1139:  vspace: BEGIN
                   1140:        Create ' vspace="';
                   1141:        Create vspace;
1.12      cvs      1142:        Create DoubleQuote;
1.1       cvs      1143:        END;
                   1144: 
                   1145:  ISMAP:
                   1146:        Create ' ismap';
                   1147: 
                   1148:  USEMAP: BEGIN
                   1149:        NoTranslation;
                   1150:        Create ' usemap="';
                   1151:        Create USEMAP;
1.12      cvs      1152:        Create DoubleQuote;
1.1       cvs      1153:        END;
                   1154: 
                   1155:  nohref:
                   1156:        Create ' nohref';
                   1157: 
                   1158:  shape = rectangle:
                   1159:        Create ' shape=rect';
                   1160:  shape = circle:
                   1161:        Create ' shape=circle';
                   1162:  shape = polygon:
                   1163:        Create ' shape=poly';
                   1164: 
                   1165:  coords: BEGIN
                   1166:        Create ' coords="';
                   1167:        Create coords;
1.12      cvs      1168:        Create DoubleQuote;
1.1       cvs      1169:        END;
1.40      cvs      1170: 
                   1171: #ifdef MATHML
                   1172:  mode = inline_math:
                   1173:        Create ' mode=inline';
                   1174:  mode = display:
                   1175:        Create ' mode=display';
                   1176: #endif
1.1       cvs      1177: 
                   1178:  Border: BEGIN
1.12      cvs      1179:        Create ' border="';
1.1       cvs      1180:        Create Border;
1.12      cvs      1181:        Create DoubleQuote;
1.1       cvs      1182:        END;
                   1183: 
                   1184:  cellspacing: BEGIN
                   1185:        Create ' cellspacing="';
                   1186:        Create cellspacing;
1.12      cvs      1187:        Create DoubleQuote;
1.1       cvs      1188:        END;
                   1189: 
                   1190:  cellpadding: BEGIN
                   1191:        Create ' cellpadding="';
                   1192:        Create cellpadding;
1.12      cvs      1193:        Create DoubleQuote;
1.1       cvs      1194:        END;
                   1195: 
                   1196:  Position = Position_top:
                   1197:         Create ' align=top';
                   1198:  Position = Position_bottom:
                   1199:         Create ' align=bottom';
                   1200: 
                   1201:  Row_align = Row_left:
                   1202:         Create ' align=left';
                   1203:  Row_align = Row_center:
                   1204:         Create ' align=center';
                   1205:  Row_align = Row_right:
                   1206:         Create ' align=right';
                   1207:  Row_valign = Row_top:
                   1208:         Create ' valign=top';
                   1209:  Row_valign = Row_middle:
                   1210:         Create ' valign=middle';
                   1211:  Row_valign = Row_bottom:
                   1212:         Create ' valign=bottom';
                   1213: 
1.39      cvs      1214:  colspan_: BEGIN
1.12      cvs      1215:        Create ' colspan="';
1.39      cvs      1216:        Create colspan_;
1.12      cvs      1217:        Create DoubleQuote;
1.1       cvs      1218:        END;
                   1219: 
1.39      cvs      1220:  rowspan_: BEGIN
1.12      cvs      1221:        Create ' rowspan="';
1.39      cvs      1222:        Create rowspan_;
1.12      cvs      1223:        Create DoubleQuote;
1.1       cvs      1224:        END;
                   1225: 
                   1226:  Cell_align = Cell_left:
                   1227:        Create ' align=left';
                   1228:  Cell_align = Cell_center:
                   1229:        Create ' align=center';
                   1230:  Cell_align = Cell_right:
                   1231:        Create ' align=right';
                   1232: 
                   1233:  Cell_valign = Cell_top:
                   1234:        Create ' valign=top';
                   1235:  Cell_valign = Cell_middle:
                   1236:        Create ' valign=middle';
                   1237:  Cell_valign = Cell_bottom:
                   1238:        Create ' valign=bottom';
                   1239: 
1.24      cvs      1240:  No_wrap = no_wrap:
1.1       cvs      1241:        Create ' nowrap';
                   1242: 
                   1243:  Invalid_attribute:
                   1244:        Create Invalid_attribute;
                   1245: 
                   1246: #include "Text_SGML.inc"
                   1247: 
1.35      cvs      1248: #include "greek.sgml"
                   1249: 
1.1       cvs      1250: GraphTRANSLATE
                   1251:        BEGIN
                   1252:        'c' -> 'circle';
                   1253:        'Q' -> 'circle';
                   1254:        'R' -> 'rect';
                   1255:        'C' -> 'rect';
                   1256:        ' ' -> 'rect';
                   1257:        'P' -> 'rect';
                   1258:        'p' -> 'polygon';
                   1259:        'B' -> 'polygon';
                   1260:        END;
                   1261: 
                   1262: END

Webmaster