home *** CD-ROM | disk | FTP | other *** search
/ CD Shareware Magazine 1999 April / CD_Shareware_Magazine_31.iso / WIN95 / INTERNET / h12395co.exe / data.1 / string.hei < prev    next >
Encoding:
Text File  |  1997-12-02  |  2.7 KB  |  76 lines
  1. <includeonce
  2. //     Filename: string.hei version 1.0
  3. // Release date: March 3rd, 1997
  4. //    File Type: heitml String Tag Library
  5. // 
  6. // (C) 1996-97 H.E.I. GmbH and suppliers all rights reseved
  7. // 
  8. // Redistribution and use in source and binary forms, with or without
  9. // modification, are permitted provided that the following conditions
  10. // are met:
  11. // 1. Redistributions of source code must retain the above copyright
  12. //    notice, this list of conditions and the following disclaimer.
  13. // 2. Redistributions in binary form must reproduce the above copyright
  14. //    notice, this list of conditions and the following disclaimer in the
  15. //    documentation and/or other materials provided with the distribution.
  16. // 3. Neither the name of H.E.I. GmbH nor the names of its contributors
  17. //    may be used to endorse or promote products derived from this software
  18. //    without specific prior written permission.
  19. // 4. The complete licensing conditions of heitml apply also to this file,
  20. //    be sure to have read and accepted these conditions before using this
  21. //    file. This file may be used and modified freely in conjunction with 
  22. //    a valid heitml license.
  23. // 
  24. // THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
  25. // WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
  26. // MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  27. // IN NO EVENT SHALL THE H.E.I. OR CONTRIBUTORS BE LIABLE FOR ANY
  28. // DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  29. // DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
  30. // GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  31. // INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
  32. // IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
  33. // OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
  34. // IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  35.  
  36.  
  37. defenv TxtStr;
  38.  if isdecl(border) || isdecl(bgcolor)>
  39.    <table
  40.      <if isdecl(border)>  border="<? border>"  </if>
  41.      <if isdecl(bgcolor)> bgcolor="<? bgcolor>" </if>
  42.    > <tr> <td> <
  43.  /if> //
  44.   <font // 
  45.     <if isdecl(s)>  size=<? s> </if> //
  46.     <if isdecl(c)> color=<? c> </if> //
  47.   >
  48.   <if isdecl(style);
  49.     if toupper(style)=="I" 
  50.      || toupper(style)=="IB" 
  51.      || toupper(style)=="BI"> <i> <
  52.     /if
  53.  
  54.     if toupper(style)=="B" 
  55.      || toupper(style)=="IB" 
  56.      || toupper(style)=="BI"> <b> <
  57.     /if;
  58.   /if;
  59.  
  60.   defbody;
  61.  
  62.   if isdecl(style);
  63.     if toupper(style)=="I" 
  64.      || toupper(style)=="IB" 
  65.      || toupper(style)=="BI"> </i> <
  66.     /if;
  67.  
  68.     if toupper(style)=="B" 
  69.      || toupper(style)=="IB" 
  70.      || toupper(style)=="BI"> </b> < 
  71.     /if;
  72.   /if> //
  73.  </font> //
  74.  <if isdecl(border) || isdecl(bgcolor)> </td> </tr> </table> </if;
  75. /defenv
  76. >