;----------------------------------------------------------------------------- ; sgml2html.xom ;----------------------------------------------------------------------------- ; (c) Copyright 1996 Novell, Inc. ; All rights reserved. ; ; This program is an unpublished copyrighted work which is proprietary ; to Novell, Inc. and contains confidential information that is not to ; be reproduced or disclosed to any other person or entity without ; prior written consent from Novell, Inc. in each and every instance. ; ; No part of this file may be duplicated, revised, translated, ; localized or modified in any manner or compiled, linked or uploaded ; or downloaded to or from any computer system without prior written ; consent of Novell, Inc. ; ; WARNING: Unauthorized reproduction of this program as well as ; unauthorized preparation of derivative works based upon the program ; or distribution of copies by sale, rental, lease or lending are ; violations of federal copyright laws and state trade secret laws, ; punishable by civil and criminal penalties. ;----------------------------------------------------------------------------- down-translate ;*** macros macro passthru is output "%c" macro-end macro childof is when parent is macro-end macro grandchildof is parent of parent is macro-end macro chtitle is output "

%g(NUMBUF) %c

%n" macro-end macro title1 is output "

%c

%n" macro-end macro title2 is output "

%c

%n" macro-end macro title3 is output "

%c

%n" macro-end macro title4 is output "
%c
%n" macro-end macro title5 is output "
%c
%n" macro-end macro tagB is output "%c%n" macro-end macro refname is output "

%g(NAMEWD)-" tagB macro-end macro graf is output "

%c%n" macro-end ;no way to distinguish igraf in html macro igraf is output "

%c%n" macro-end macro lowtitle is output "

%c" macro-end macro address is output "

%c
%n" macro-end macro b is output "%c%n" macro-end macro blockquote is output "
%c
%n" macro-end macro br is output "
%c%n" macro-end macro cite is output "%c%n" macro-end macro code is output "%c%n" macro-end macro dd is output "
%c%n" macro-end macro dir is output "%c%n" macro-end macro dl is output "
%c
%n" macro-end macro dt is output "
%c%n" macro-end macro em is output "%c" macro-end macro h1 is output "

%c

%n" macro-end macro h2 is output "

%c

%n" macro-end macro h3 is output "

%c

%n" macro-end macro h4 is output "

%c

%n" macro-end macro h5 is output "
%c
%n" macro-end macro h6 is output "
%c
%n" macro-end macro hr is output "
%c%n" macro-end macro i is output "%c%n" macro-end macro kbd is output "%c%n" macro-end macro li is output "
  • %c%n" macro-end macro menu is output "%c%n" macro-end macro ol is output "
      %c
    %n" macro-end macro p is output "

    %c%n" macro-end macro pre is output "

    %c
    %n" macro-end macro samp is output "%c%n" macro-end macro strong is output "%c" macro-end macro tt is output "%c" macro-end macro ul is output "" macro-end macro var is output "%c" macro-end macro computertype is output "%c" macro-end macro italcomputertype is output "%c" macro-end macro codetype is output "%c" macro-end macro boldcodetype is output "%c" macro-end macro italpara is output "

    %c%n" macro-end macro ital is output "%c" macro-end macro boldpara is output "

    %c%n" macro-end macro bolditalpara is output "

    %c%n" macro-end macro sub is output "%c%n" macro-end macro sup is output "%c%n" macro-end macro vpad is output "

    %c

    %n" macro-end macro alltable is output "

    %c

    " macro-end macro emph is output "%c" macro-end macro tblrow is output "%n%c" macro-end macro cverbatim is ;can't do justification=verbatim output "

    %c
    " macro-end macro gpnchap is do when counter CHAPNUM is greater-than 1 reset COUNTA to counter CHAPNUM decrement COUNTA by 1 put CHAPCONTENT '' done do when counter CHAPNUM is less-than counter CHAPCT reset COUNTA to counter CHAPNUM increment COUNTA by 1 put CHAPCONTENT '%n' done macro-end macro gpnsect is do when counter SECT1NUM is greater-than 1 reset COUNTA to counter SECT1NUM decrement COUNTA by 1 put SECTCONTENT '%n' done do when counter SECT1NUM is less-than counter SECTCT ;when not the last reset COUNTA to counter SECT1NUM increment COUNTA by 1 put SECTCONTENT '%n' done macro-end macro gpnappx is do when counter APPXNUM is greater-than 1 reset COUNTA to counter APPXNUM decrement COUNTA by 1 put CHAPCONTENT '' done do when counter APPXNUM is less-than counter APPXCT reset COUNTA to counter APPXNUM increment COUNTA by 1 put CHAPCONTENT '%n' done macro-end macro gpnpref is do when counter PREFNUM is greater-than 1 reset COUNTA to counter PREFNUM decrement COUNTA by 1 put CHAPCONTENT '' done do when counter PREFNUM is less-than counter PREFCT reset COUNTA to counter PREFNUM increment COUNTA by 1 put CHAPCONTENT '%n' done macro-end macro gpnappxsect is do when counter SECT1NUM is greater-than 1 reset COUNTA to counter SECT1NUM decrement COUNTA by 1 put SECTCONTENT '%n' done do when counter SECT1NUM is less-than counter SECTCT ;when not the last reset COUNTA to counter SECT1NUM increment COUNTA by 1 put SECTCONTENT '%n' done macro-end macro gpnprefacesect is do when counter SECT1NUM is greater-than 1 reset COUNTA to counter SECT1NUM decrement COUNTA by 1 put SECTCONTENT '%n' done do when counter SECT1NUM is less-than counter SECTCT ;when not the last reset COUNTA to counter SECT1NUM increment COUNTA by 1 put SECTCONTENT '%n' done macro-end macro emittoc is reopen TOC as "./%g(BKNAME)/toc.htm" put TOC '%g(TOCTEMP1)' put TOC '%g(TOCTEMP3)' close TOC macro-end macro emittoc1 is reopen TOC as "./%g(BKNAME)/toc.htm" put TOC '%n
    %g(IMGSMMANUAL)' put TOC '%g(TOCTEMP3)' close TOC macro-end macro emittocchap is open TOCSECT1 as "./%g(BKNAME)/tocch%d(CHAPNUM).htm" put TOCSECT1 file "./%g(BKNAME)/toc.htm" put TOCSECT1 '%g(TOCTEMP2)' put TOCSECT1 '%g(TOCTEMP3)' put TOCSECT1 "%n
    %n" close TOCSECT1 macro-end macro emittocpref is open TOCPREFACE as "./%g(BKNAME)/tocpref%d(PREFNUM).htm" put TOCPREFACE file "./%g(BKNAME)/toc.htm" put TOCPREFACE '%g(TOCTEMP2)' put TOCPREFACE '%g(TOCTEMP3)' put TOCPREFACE "%n
    %n" macro-end macro emittocappx is open TOCAPPX as "./%g(BKNAME)/tocappx%d(APPXNUM).htm" put TOCAPPX file "./%g(BKNAME)/toc.htm" put TOCAPPX '%g(TOCTEMP2)' put TOCAPPX '%g(TOCTEMP3)' put TOCAPPX "%n
    %n" macro-end macro emitxmark is output "%g(XMARKK)" macro-end macro emptyxmark is set buffer XMARKK to "" macro-end macro hidden is suppress macro-end ;*** globals global stream BKNAME ;passed in by start script global stream COLL ;passed in by start script global counter PARTNUM ;part # counter global counter CHAPNUM ;chapter # counter global counter APPXNUM ;appendix # counter global counter PREFNUM ;preface # counter global stream NUMBUF ;temp # buffer global counter PSTEP ;step # in PROCEDURE global counter PSSSTEP ;step # in SUBSTEP in STEP in PROCEDURE global stream CTITLE ;content of TITLE in MSGEXPLAN global counter INTERFACENUM ;interface # global counter LSTNUM ;list # global stream DOCTYPE global stream CHAPBUF global stream TEMP global counter SECT1NUM global counter SECT2NUM global counter COUNTA global stream TOP global counter CHSECNUM ;number of sections of current chapter global counter FIRSTSECT global stream TOCTEMP1 global stream TOCTEMP2 global stream TOCTEMP3 global stream GLYTEMP global stream REFID global stream IMGFOLDERPL global stream IMGFOLDERMN global stream IMGSMMANUAL global counter SECTCT global stream XMARKK global counter PREFCT global counter CHAPCT global counter APPXCT ;*** output files global stream STARTCOLL global stream STARTFRM global stream CHAPCONTENT global stream SECTCONTENT global stream TOC global stream TOCPREFACE global stream TOCAPPX global stream CURCHAPTOC global stream TOCSECT1 global stream TOCREST global stream GLRY global stream NAMEWD global stream IMPWD global stream NOTEWD global stream TIPWD global stream WARNWD global stream CTNWD global stream SEEWD global stream ALSOWD global stream LOCWD global stream REMWD global stream CLASSWD global stream GG ;*** Term information element BOOK set buffer NAMEWD to "NAME" set buffer IMPWD to "IMPORTANT: " set buffer NOTEWD to "NOTE: " set buffer TIPWD to "SUGGESTION: " set buffer WARNWD to "WARNING: " set buffer CTNWD to "CAUTION: " set buffer SEEWD to "See " set buffer ALSOWD to "See Also " set buffer LOCWD to "Local Server : " set buffer REMWD to "Remote Server : " set buffer CLASSWD to "Classification: " set buffer IMGFOLDERPL to '' set buffer IMGFOLDERMN to '' set buffer IMGSMMANUAL to '' reset PARTNUM to 0 reset CHAPNUM to 0 reset APPXNUM to 0 reset PREFNUM to 0 set buffer NUMBUF to "" set buffer CURCHAPTOC to "" set buffer DOCTYPE to '%n' open TOC as "./%g(BKNAME)/toc.htm" open STARTFRM as "./%g(BKNAME)/start.htm" put (TOC and STARTFRM) "%g(DOCTYPE)" put STARTFRM "%n" put STARTFRM '%n' put STARTFRM '%n' put STARTFRM '%n' ;;;;;;%??? put STARTFRM '%n' put STARTFRM '%n' put STARTFRM "%n" put STARTFRM "%n" put STARTFRM "%n" close STARTFRM put TOC '%n%n' put TOC '%n' ; put TOC '%n
    %g(IMGSMMANUAL) Disclaimer
    %n' close TOC output '%g(DOCTYPE)' output '%n%n' output "%c%n" output "%n%n%n" reopen TOC as "./%g(BKNAME)/toc.htm" put TOC "
    %n%n%n" close TOC do when file "./%g(BKNAME)/tocpref.htm" exists reset COUNTA to 1 repeat exit when counter COUNTA is greater-than counter PREFNUM reopen TOCPREFACE as "./%g(BKNAME)/tocpref%d(COUNTA).htm" put TOCPREFACE "%n" close TOCPREFACE increment COUNTA by 1 again done do when file "./%g(BKNAME)/tocappx%d(APPXNUM).htm" exists reset COUNTA to 1 repeat exit when counter COUNTA is greater-than counter APPXNUM reopen TOCAPPX as "./%g(BKNAME)/tocappx%d(COUNTA).htm" put TOCAPPX "
    %n%n%n" close TOCAPPX increment COUNTA by 1 again done reset COUNTA to 1 repeat exit when counter COUNTA is greater-than counter CHAPNUM reopen TOCSECT1 as "./%g(BKNAME)/tocch%d(COUNTA).htm" put TOCSECT1 "%n
    %n%n%n" close TOCSECT1 increment COUNTA by 1 again element TITLE childof BOOK set buffer TEMP to "%c" reopen STARTCOLL as "%g(COLL).htm" put STARTCOLL '
    %n%n%g(TEMP)
    %n' close STARTCOLL open TOP as "./%g(BKNAME)/hometop.htm" put TOP "%g(DOCTYPE)%n%n" put TOP "%n%g(TEMP)%n%n" put TOP '%n' put TOP '%n' put TOP "

    %g(TEMP)

    %n" close TOP element CHAPTER do when counter CHAPNUM is equal 0 reopen TOC as "./%g(BKNAME)/toc.htm" put TOC "

    " close TOC done reset SECT1NUM to 0 increment CHAPNUM by 1 open CHAPCONTENT with referents-allowed as "./%g(BKNAME)/ch%d(CHAPNUM).htm" put CHAPCONTENT '%g(DOCTYPE)%n%n' gpnchap ; output previous-next graphics put CHAPCONTENT "%c%n
    %n" gpnchap put CHAPCONTENT "%n%n%n" close CHAPCONTENT reopen TOCSECT1 as "./%g(BKNAME)/tocch%d(CHAPNUM).htm" put TOCSECT1 "%n
    %n" close TOCSECT1 element BOOKINFO reopen TOC as "./%g(BKNAME)/toc.htm" put TOC '%n
    %g(IMGSMMANUAL) Disclaimer
    %n' close TOC output "%c" element PREFACE increment PREFNUM by 1 reset SECT1NUM to 0 open CHAPCONTENT with referents-allowed as "./%g(BKNAME)/pref%d(PREFNUM).htm" put CHAPCONTENT '%g(DOCTYPE)%n%n' gpnpref put CHAPCONTENT "%c%n
    %n" gpnpref put CHAPCONTENT "%n%n%n" close CHAPCONTENT do when counter SECTCT isnt equal 0 put TOCPREFACE "%n
    %n" close TOCPREFACE done element APPENDIX increment APPXNUM by 1 reset SECT1NUM to 0 open TOCAPPX as "./%g(BKNAME)/tocappx%d(APPXNUM).htm" put TOCAPPX '%g(DOCTYPE)%n%n' open CHAPCONTENT with referents-allowed as "./%g(BKNAME)/appx%d(APPXNUM).htm" put CHAPCONTENT '%g(DOCTYPE)%n%n' gpnappx put CHAPCONTENT "%c%n
    %n" gpnappx put CHAPCONTENT "%n%n%n" close CHAPCONTENT put TOCAPPX "%n%n" element SECT1 do childof CHAPTER do when counter SECT1NUM is equal 0 emittocchap emittoc else output "%n" done increment SECT1NUM by 1 open SECTCONTENT with referents-allowed as "./%g(BKNAME)/ch%d(CHAPNUM)s%d(SECT1NUM).htm" put SECTCONTENT '%g(DOCTYPE)%n%n%n' gpnsect put (CHAPCONTENT and SECTCONTENT) "%c%n
    %n" gpnsect put SECTCONTENT "%n%n" close SECTCONTENT else do childof PREFACE do when counter SECT1NUM is equal 0 emittocpref emittoc else output "%n" done increment SECT1NUM by 1 open SECTCONTENT with referents-allowed as "./%g(BKNAME)/pref%d(PREFNUM)s%d(SECT1NUM).htm" put SECTCONTENT '%g(DOCTYPE)%n%n' gpnprefacesect put (CHAPCONTENT and SECTCONTENT) "%c%n
    %n" gpnprefacesect put SECTCONTENT "%n%n" close SECTCONTENT else do childof APPENDIX do when counter SECT1NUM is equal 0 emittocappx emittoc else output "%n" done increment SECT1NUM by 1 open SECTCONTENT with referents-allowed as "./%g(BKNAME)/appx%d(APPXNUM)s%d(SECT1NUM).htm" put SECTCONTENT '%g(DOCTYPE)%n%n%n' gpnappxsect put (CHAPCONTENT and SECTCONTENT) "%c%n
    %n" gpnappxsect put SECTCONTENT "%n" close SECTCONTENT else output "%n" done done done element TITLE childof CHAPTER emptyxmark set buffer TEMP to "%c" emitxmark do when counter SECTCT is equal 0 set buffer TOCTEMP1 to '%n
    %g(IMGSMMANUAL)' else set buffer TOCTEMP1 to '%n
    %g(IMGFOLDERPL)%n' done set buffer TOCTEMP2 to '%n
    %g(IMGFOLDERMN)%n' set buffer TOCTEMP3 to '%d(CHAPNUM). %g(TEMP)
    %n' do when counter SECTCT is equal 0 emittoc1 done reset COUNTA to 1 repeat exit when counter COUNTA is greater-than counter PREFNUM reopen TOCREST as "./%g(BKNAME)/tocpref%d(COUNTA).htm" put TOCREST '%g(TOCTEMP1)' put TOCREST '%g(TOCTEMP3)' close TOCREST increment COUNTA by 1 again reset COUNTA to 1 repeat exit when counter COUNTA is greater-than counter CHAPNUM reopen TOCREST as "./%g(BKNAME)/tocch%d(COUNTA).htm" put TOCREST '%g(TOCTEMP1)' put TOCREST '%g(TOCTEMP3)' close TOCREST increment COUNTA by 1 again set buffer NUMBUF to "%d(CHAPNUM). " output "

    %g(NUMBUF) %g(TEMP)

    %n" element TITLE childof PART increment PARTNUM by 1 set buffer NUMBUF to "%d(PARTNUM)" chtitle element TITLE childof APPENDIX emptyxmark set buffer TEMP to "%c" emitxmark do when counter SECTCT is equal 0 set buffer TOCTEMP1 to '%n
    %g(IMGSMMANUAL)' else set buffer TOCTEMP1 to '%n
    %g(IMGFOLDERPL)%n' done set buffer TOCTEMP2 to '%n
    %g(IMGFOLDERMN)%n' set buffer TOCTEMP3 to '%ua(APPXNUM). %g(TEMP)
    %n' put TOCAPPX '%g(TOCTEMP1)' put TOCAPPX '%g(TOCTEMP3)' do when counter SECTCT is equal 0 emittoc1 done reset COUNTA to 1 repeat exit when counter COUNTA is greater-than counter PREFNUM reopen TOCREST as "./%g(BKNAME)/tocpref%d(COUNTA).htm" put TOCREST '%g(TOCTEMP1)' put TOCREST '%g(TOCTEMP3)' close TOCREST increment COUNTA by 1 again reset COUNTA to 1 repeat exit when counter COUNTA is greater-than counter CHAPNUM reopen TOCREST as "./%g(BKNAME)/tocch%d(COUNTA).htm" put TOCREST '%g(TOCTEMP1)' put TOCREST '%g(TOCTEMP3)' close TOCREST increment COUNTA by 1 again reset COUNTA to 1 repeat exit when counter COUNTA is greater-than counter APPXNUM reopen TOCREST as "./%g(BKNAME)/tocappx%d(COUNTA).htm" put TOCREST '%g(TOCTEMP1)' put TOCREST '%g(TOCTEMP3)' close TOCREST increment COUNTA by 1 again set buffer NUMBUF to "%ua(APPXNUM)" output "

    %g(NUMBUF) %g(TEMP)

    %n" element TITLE childof BIBLIOGRAPHY chtitle element TITLE childof PREFACE emptyxmark set buffer TEMP to "%c" emitxmark do when counter SECTCT is equal 0 set buffer TOCTEMP1 to '%n
    %g(IMGSMMANUAL)' else set buffer TOCTEMP1 to '%n
    %g(IMGFOLDERPL)%n' done set buffer TOCTEMP2 to '%n
    %g(IMGFOLDERMN)%n' set buffer TOCTEMP3 to '%g(TEMP)
    %n' do when counter SECTCT is equal 0 emittoc1 done reset COUNTA to 1 repeat exit when counter COUNTA is greater-than counter PREFNUM reopen TOCREST as "./%g(BKNAME)/tocpref%d(COUNTA).htm" put TOCREST '%g(TOCTEMP1)' put TOCREST '%g(TOCTEMP3)' close TOCREST increment COUNTA by 1 again output "

    %g(TEMP)

    %n" element TITLE childof REFERENCE chtitle element REFMETA do childof REFENTRY and grandchildof SECT1 title1 else set buffer NUMBUF to "" chtitle done element TITLE childof SECT1 emptyxmark set buffer TEMP to "%c" emitxmark do when grandchildof CHAPTER reopen TOCSECT1 as "./%g(BKNAME)/tocch%d(CHAPNUM).htm" put TOCSECT1 '
    %g(IMGSMMANUAL) %d(CHAPNUM)-%d(SECT1NUM). %g(TEMP)
    %n' close TOCSECT1 else do when grandchildof PREFACE put TOCPREFACE '
    %g(IMGSMMANUAL) %g(TEMP)
    %n' else do when grandchildof APPENDIX put TOCAPPX '
    %g(IMGSMMANUAL) %ua(APPXNUM)-%d(SECT1NUM) %g(TEMP)
    %n' else output "%g(TEMP)%n" done done done output "

    %g(TEMP)

    %n" element TITLE childof PARTINTRO title1 element TITLE childof REFSYNOPSISDIV title1 element TITLE childof REFSECT1 title1 element ITERM childof ILEVEL1 output "

    %n" title1 element ITERM childof ILEVEL2 h3 element TITLE childof REFSECT2 title2 element TITLE childof SECT2 title2 element TITLE childof SECT3 title3 element TITLE childof EXAMPLE do when grandchildof REFSECT1 title3 else lowtitle done element ITERM childof ILEVEL3 h4 element GLOSSARY open GLRY with referents-allowed as "./%g(BKNAME)/glossary.htm" put GLRY '%g(DOCTYPE)' put GLRY '%n%n' put GLRY "%c%n" put GLRY "%n%n%n" close GLRY element TITLE childof GLOSSARY emptyxmark set buffer TEMP to "%c" emitxmark reopen TOC as "./%g(BKNAME)/toc.htm" set buffer GLYTEMP to '%n
    %g(IMGSMMANUAL) %g(TEMP)
    %n' put TOC '%g(GLYTEMP)' close TOC reset COUNTA to 1 repeat exit when counter COUNTA is greater-than counter PREFNUM reopen TOCREST as "./%g(BKNAME)/tocpref%d(COUNTA).htm" put TOCREST '%g(GLYTEMP)' close TOCREST increment COUNTA by 1 again reset COUNTA to 1 repeat exit when counter COUNTA is greater-than counter CHAPNUM reopen TOCREST as "./%g(BKNAME)/tocch%d(COUNTA).htm" put TOCREST '%g(GLYTEMP)' close TOCREST increment COUNTA by 1 again reset COUNTA to 1 repeat exit when counter COUNTA is greater-than counter APPXNUM reopen TOCREST as "./%g(BKNAME)/tocappx%d(COUNTA).htm" put TOCREST '%g(GLYTEMP)' close TOCREST increment COUNTA by 1 again output "%n

    %g(TEMP)%n

    " ;;element GLOSSTERM childof GLOSSENTRY title3 ;;element GLOSSTERM b element GLOSSTERM do childof GLOSSENTRY title3 else b done element TITLE childof SECT4 title4 element TITLE childof SECT5 title5 element REFCLASS output "

    %v(ROLE):%c%n" unless attribute ROLE is equal "" ;???element BLOCKQUOTE blockquote ???name too long??? ;;element FUNCTION childof SYNOPSIS tagB ;;element FUNCTION childof PROGRAMLISTING b ;;element FUNCTION b element FUNCTION do childof SYNOPSIS tagB else b done element FORMALPARA graf element TITLE childof FORMALPARA b element BRIDGEHEAD lowtitle element TITLE childof ABSTRACT lowtitle element TITLE childof AUTHORBLURB lowtitle element SIMPLELIST address element MEMBER childof SIMPLELIST graf ;;element LISTITEM childof VARLISTENTRY ;;element LISTITEM ;;element LISTITEM childof ORDEREDLIST element LISTITEM do childof ORDEREDLIST increment LSTNUM by 1 do when attribute numeration of parent is equal "arabic" output "

    %d(LSTNUM).%c%n" else do when attribute numeration of parent is equal "upperalpha" output "

    %ua(LSTNUM).%c%n" else do when attribute numeration of parent is equal "loweralpha" output "

    %a(LSTNUM).%c%n" else do when attribute numeration of parent is equal "upperroman" output "

    %ui(LSTNUM).%c%n" else do when attribute numeration of parent is equal "lowerroman" output "

    %i(LSTNUM).%c%n" else output "

    %c%n" done done done done done else do childof VARLISTENTRY output "

    %c
    %n" else output "
  • %c
    • %n" done done element ITEMIZEDLIST ul element ORDEREDLIST reset LSTNUM to 0 output "%c%n" element PROCEDURE reset PSTEP to 0 vpad element TITLE childof PROCEDURE lowtitle element STEP do childof PROCEDURE increment PSTEP by 1 vpad else do childof SUBSTEPS and grandchildof STEP and parent of parent of parent is PROCEDURE increment PSSSTEP by 1 vpad else vpad done done ;element STEP childof PROCEDURE element SUBSTEPS childof STEP and grandchildof PROCEDURE reset PSSSTEP to 0 output "
    %n%c%n
    %n" ;element STEP childof SUBSTEPS childof STEP childof PROCEDURE ;element TITLE childof EXAMPLE lowtitle element MSG boldpara element MSGTEXT childof MSGSUB graf ;element MSGORIG ;element MSGLEVEL element MSGEXPLAN set buffer CTITLE to "" output "%c%n" element TITLE childof MSGEXPLAN set buffer CTITLE to "%c" element GLOSSDEF graf element VARIABLELIST DL element TERM childof VARLISTENTRY output "
    %c
    %n" element IDXSRC ital element ISEE output "

    %g(SEEWD)%c%n" element SEEALSO output "

    %g(ALSOWD)%c%n" element ANCHOR hidden element COMMENT hidden element LOTENTRY hidden element PARTNUM hidden element TITLEABBREV hidden element TOCENTRY1 hidden element TOCENTRY2 hidden element TOCENTRY3 hidden element TOCENTRY4 hidden element TOCENTRY5 hidden element CITETITLE i element COMMAND b element EMPHASIS em element FIRSTTERM b element KEYCAP do when attribute ROLE isnt IMPLIED do when attribute ROLE is equal "HasNoBrackets" output "%c%n" else output "%c%n" done else output "%c%n" done element SHORTFORM b ;element INTERFACE ; increment INTERFACENUM by 1 ; do when attribute CLASS is "menuitem" ; do when element LITERAL computertype element REPLACEABLE italcomputertype element STRUCTFIELD italcomputertype element PARAMETER italcomputertype element COMPUTEROUTPUT codetype element PROMPT codetype element USERINPUT boldcodetype element SUBSCRIPT sub element SUPERSCRIPT sup element LOCALBLOCKING output "

    %g(LOCWD)%c%n" element REMOTEBLOCKING output "

    %g(REMWD)%c%n" element APPLICATION do when children of parent is equal 1 output "%n

    %g(CLASSWD)%c" else output ",%c" done element PARA do childof IMPORTANT do when children of parent is equal 1 output "%g(IMPWD)%c%n" else italpara done else childof NOTE do when children of parent is equal 1 output "%g(NOTEWD)%c%n" else italpara done else childof TIP do when children of parent is equal 1 output "%g(TIPWD)%c%n" else italpara done else childof WARNING do when children of parent is equal 1 output "%g(WARNWD)%c%n" else italpara done else childof CAUTION do when children of parent is equal 1 output "%g(CTNWD)%c%n" else italpara done else childof ENTRY output "%c
    " else childof LISTITEM do when children of parent isnt equal 1 output "
    %c%n" else output "%c%n" done else childof MSGEXPLAN do when children of parent is equal 1 output "

    %g(CTITLE)%c%n" else graf done else childof STEP and grandchildof PROCEDURE do when children of parent is equal 1 output "%d(PSTEP).%c%n" else graf done else childof STEP and grandchildof SUBSTEPS and parent of parent of parent is STEP and parent of parent of parent of parent is PROCEDURE do when children of parent is equal 1 output "%d(PSTEP)%a(PSSSTEP). %c%n" else graf done else graf done ;;element PARA graf element IMPORTANT vpad ;;element PARA childof IMPORTANT element NOTE vpad ;;element PARA childof NOTE element TIP vpad ;;element PARA childof TIP element WARNING vpad ;;element PARA childof WARNING element CAUTION vpad ;;element PARA childof CAUTION ;;element PARA childof ENTRY ;;element PARA childof LISTITEM ;;element PARA childof MSGEXPLAN ;==== table elements ===== element TABLE alltable element INFORMALTABLE alltable element TITLE childof TABLE output "%c%n" element COLSPEC hidden element ROW childof THEAD tblrow element ROW childof TBODY tblrow element ENTRY when ancestor is THEAD output "%c%n" element ENTRY when ancestor is TBODY output "%c" element SCREEN cverbatim element LITERALLAYOUT cverbatim element PROGRAMLISTING cverbatim element TITLE childof BOOKBIBLIO ; reopen TOC as "./%g(BKNAME)/toc.htm" ; put TOC "

    %g(NUMBUF) %c

    %n" ; close TOC output "

    %c

    %n" element TITLE childof LEGALNOTICE title3 element TITLE childof PARA and grandchildof LEGALNOTICE lowtitle element EDITION title5 element CORPAUTHOR ; reopen TOP as "./%g(BKNAME)/hometop.htm" ; put TOP "

    %g(NUMBUF) %c

    %n" ; put TOP "%n" ; put TOP "%n" ; close TOP suppress element SERIES title5 element COPYRIGHT graf element GRAPHIC childof SCREENSHOT and grandchildof FIGURE cverbatim element TITLE childof FIGURE ;??? fignum output "

    Figure %c %n" element GRAPHIC childof FIGURE ; output '
    %n' ; output '
    ' set buffer GG to "" repeat scan "%v(fileref)" match ".tif" set buffer GG to "%G(GG).jpg" match ANY = c set buffer GG to "%G(GG)%x(c)" again output '
    ' suppress ;??? element #FOOTER element XMARK do when ancestor is CHAPTER do when counter SECT1NUM is equal 0 set referent "%v(id)" to "ch%d(CHAPNUM).htm" else set referent "%v(id)" to "ch%d(CHAPNUM)s%d(SECT1NUM).htm" done else do when ancestor is PREFACE do when counter SECT1NUM is equal 0 set referent "%v(id)" to "pref%d(PREFNUM).htm" else set referent "%v(id)" to "pref%d(PREFNUM)s%d(SECT1NUM).htm" done else do when ancestor is APPENDIX do when counter SECT1NUM is equal 0 set referent "%v(id)" to "appx%d(APPXNUM).htm" else set referent "%v(id)" to "appx%d(APPXNUM)s%d(SECT1NUM).htm" done else do when ancestor is GLOSSARY ;not really a link set referent "%v(id)" to "glossary.htm" done done done done do when parent isnt TITLE output '' else do when grandchildof (CHAPTER or PREFACE or APPENDIX or GLOSSARY or SECT1) set buffer XMARKK to '' else output '' done done suppress element IXREF output '' output "%c" processing-instruction "nov sect1count " any* = text reset SECTCT to "%x(text)" processing-instruction "nov prefcount " any* = text reset PREFCT to "%x(text)" processing-instruction "nov chapcount " any* = text reset CHAPCT to "%x(text)" processing-instruction "nov appxcount " any* = text reset APPXCT to "%x(text)" ;*** Default behavior ;element #IMPLIED output "%c<%q/NDEF>%n" element #IMPLIED output "%c%n"