Entry

TSE: Language: Computer: SubML: Tag: Operation: Get: List: How to get the SubML tags from a list?

Mar 28th, 2005 08:58
Knud van Eeden,

----------------------------------------------------------------------
--- Knud van Eeden --- 28 March 2005 - 02:57 am ----------------------

TSE: Language: Computer: SubML: Tag: Operation: Get: List: How to get 
the SubML tags from a list?

---
---

Steps: Overview:

 1. -Create the following TSE macro

--- cut here: begin --------------------------------------------------

 FORWARD PROC Main()
 FORWARD STRING PROC FNStringGetListLanguageMarkupSubmlS()

 // --- MAIN --- //

 PROC Main()
  InsertText( FNStringGetListLanguageMarkupSubmlS(), _INSERT_ ) // 
gives e.g. ...""
 END

 <F12> Main()

 // --- LIBRARY --- //

 // library: string: get: list: language: markup: subml 
(filenamemacro=getstmsu.s) [kn, ri, mo, 28-03-2005 02:49:08]
 STRING PROC FNStringGetListLanguageMarkupSubmlS()
  // e.g. PROC Main()
  // e.g.  InsertText( FNStringGetListLanguageMarkupSubmlS(), 
_INSERT_ ) // gives e.g. ...""
  // e.g. END
  // e.g.
  // e.g. <F12> Main()
  STRING s[255] = ""
  INTEGER posI = 0
  //
  PushPosition()
  //
  EditFile( "YourTemporaryFile" )
  //
  AddLine( "<!>" )
  AddLine( "</bold>" )
  AddLine( "</book>" )
  AddLine( "</chapter>" )
  AddLine( "</chaptertitle>" )
  AddLine( "</comment>" )
  AddLine( "</image>" )
  AddLine( "</index>" )
  AddLine( "</italic>" )
  AddLine( "</item>" )
  AddLine( "</itemize>" )
  AddLine( "</literal>" )
  AddLine( "</para>" )
  AddLine( "</quotation>" )
  AddLine( "</section>" )
  AddLine( "</sectiontitle>" )
  AddLine( "</subscript>" )
  AddLine( "</subsection>" )
  AddLine( "</subsectiontitle>" )
  AddLine( "</subsubsection>" )
  AddLine( "</subsubsectiontitle>" )
  AddLine( "</superscript>" )
  AddLine( "</typewriter>" )
  AddLine( "</underline>" )
  AddLine( "</url>" )
  AddLine( "<?>" )
  AddLine( '<A">' )
  AddLine( '<a">' )
  AddLine( "<A'>" )
  AddLine( "<a'>" )
  AddLine( "<alpha>" )
  AddLine( "<angle>" )
  AddLine( "<Ao>" )
  AddLine( "<ao>" )
  AddLine( "<A^>" )
  AddLine( "<a^>" )
  AddLine( "<A`>" )
  AddLine( "<a`>" )
  AddLine( "<A~>" )
  AddLine( "<a~>" )
  AddLine( "<beta>" )
  AddLine( "<bigspace>" )
  AddLine( "<bold>" )
  AddLine( "<book>" )
  AddLine( "<C,>" )
  AddLine( "<c,>" )
  AddLine( "<chapter>" )
  AddLine( "<chaptertitle>" )
  AddLine( "<chi>" )
  AddLine( "<comment>" )
  AddLine( "<copyright>" )
  AddLine( "<DELTA>" )
  AddLine( "<delta>" )
  AddLine( "<doubledash>" )
  AddLine( '<E">' )
  AddLine( '<e">' )
  AddLine( "<E'>" )
  AddLine( "<e'>" )
  AddLine( "<epsilon>" )
  AddLine( "<eta>" )
  AddLine( "<E^>" )
  AddLine( "<e^>" )
  AddLine( "<E`>" )
  AddLine( "<e`>" )
  AddLine( "<GAMMA>" )
  AddLine( "<gamma>" )
  AddLine( "<gt>" )
  AddLine( '<I">' )
  AddLine( '<i">' )
  AddLine( "<I'>" )
  AddLine( "<i'>" )
  AddLine( "<image>" )
  AddLine( "<index>" )
  AddLine( "<infinity>" )
  AddLine( "<integral>" )
  AddLine( "<iota>" )
  AddLine( "<italic>" )
  AddLine( "<item>" )
  AddLine( "<itemize>" )
  AddLine( "<I^>" )
  AddLine( "<i^>" )
  AddLine( "<I`>" )
  AddLine( "<i`>" )
  AddLine( "<kappa>" )
  AddLine( "<LAMBDA>" )
  AddLine( "<lambda>" )
  AddLine( "<LaTeX>" )
  AddLine( "<literal>" )
  AddLine( "<lt>" )
  AddLine( "<minus>" )
  AddLine( "<mu>" )
  AddLine( "<nu>" )
  AddLine( "<N~>" )
  AddLine( "<n~>" )
  AddLine( '<O">' )
  AddLine( '<o">' )
  AddLine( "<O'>" )
  AddLine( "<o'>" )
  AddLine( "<OMEGA>" )
  AddLine( "<omega>" )
  AddLine( "<O^>" )
  AddLine( "<o^>" )
  AddLine( "<O`>" )
  AddLine( "<o`>" )
  AddLine( "<O~>" )
  AddLine( "<o~>" )
  AddLine( "<pagebreak>" )
  AddLine( "<para>" )
  AddLine( "<partial>" )
  AddLine( "<PHI>" )
  AddLine( "<phi>" )
  AddLine( "<PI>" )
  AddLine( "<pi>" )
  AddLine( "<PSI>" )
  AddLine( "<psi>" )
  AddLine( "<quotation>" )
  AddLine( "<rho>" )
  AddLine( "<section>" )
  AddLine( "<sectiontitle>" )
  AddLine( "<SIGMA>" )
  AddLine( "<sigma>" )
  AddLine( "<subscript>" )
  AddLine( "<subsection>" )
  AddLine( "<subsectiontitle>" )
  AddLine( "<subsubsection>" )
  AddLine( "<subsubsectiontitle>" )
  AddLine( "<superscript>" )
  AddLine( "<tau>" )
  AddLine( "<TeX>" )
  AddLine( "<THETA>" )
  AddLine( "<theta>" )
  AddLine( "<typewriter>" )
  AddLine( '<U">' )
  AddLine( '<u">' )
  AddLine( "<U'>" )
  AddLine( "<u'>" )
  AddLine( "<underline>" )
  AddLine( "<UPSILON>" )
  AddLine( "<upsilon>" )
  AddLine( "<url>" )
  AddLine( "<U^>" )
  AddLine( "<u^>" )
  AddLine( "<U`>" )
  AddLine( "<u`>" )
  AddLine( "<varepsilon>" )
  AddLine( "<varphi>" )
  AddLine( "<varrho>" )
  AddLine( "<varsigma>" )
  AddLine( "<vartheta>" )
  AddLine( "<XI>" )
  AddLine( "<xi>" )
  AddLine( "<zeta>" )
  //
  IF Llist( "<Your window title>", 80, 22, _ENABLE_SEARCH_ + 
_ANCHOR_SEARCH_ + _ENABLE_HSCROLL_ )
   //
   s = GetText( 1, 255 )
   posI = Pos( " ", s )
   IF ( posI <> 0 )
    s = SubStr( s, posI, Length( s ) - posI + 1 )
    s = Trim( s )
   ENDIF
   //
  ENDIF
   //
  AbandonFile()
  //
  PopPosition()
  RETURN( s )
 END

--- cut here: end ----------------------------------------------------

 2. -Compile this macro

 3. -Run this macro

 4. -Press <F12>

 5. -Select the SubML tag from the list

     e.g. <chapter>

 6. -This selection will be stored in the text at current cursor
     position

 7. -An example pdf screenshot can be seen at:

      http://www.knud.info/FaqtsSubmlChooseTagFromList.htm

---
---

Internet: see also:

---

TSE: Subml: Links: Overview: Can you give an overview of links?
http://www.faqts.com/knowledge_base/view.phtml/aid/34894/fid/1765

----------------------------------------------------------------------