home *** CD-ROM | disk | FTP | other *** search
/ The Best Internet Programs / BESTINTERNET.bin / latest / ged2ht20 / template < prev   
Encoding:
Text File  |  1995-04-06  |  1.7 KB  |  94 lines
  1. <HTML>
  2. <HEAD>
  3. <TITLE>${@.XREF}: ${@.NAME}</TITLE>
  4. </HEAD>
  5. <BODY>
  6. <H1>${@.NAME}</H1>
  7. !INCLUDE @.img
  8. !IF @.EVENT
  9. <UL>
  10. !RESET i
  11. !WHILE @.EVENT[i]
  12. <LI><EM>${@.EVENT[i].TAG}</EM>: ${@.EVENT[i].DATE}, ${@.EVENT[i].PLACE.NAME}
  13. !INCREMENT i
  14. !END
  15. </UL>
  16. !ENDIF
  17. !IF @.FATHER
  18. <EM>Father:</EM> <A HREF="${@.FATHER.XREF.&}">${@.FATHER.NAME}</A><BR>
  19. !ENDIF
  20. !IF @.MOTHER
  21. <EM>Mother:</EM> <A HREF="${@.MOTHER.XREF.&}">${@.MOTHER.NAME}</A><BR>
  22. !ENDIF
  23. <BR>
  24. !RESET i
  25. !WHILE @.FAMS[i]
  26. </EM>Family ${i}</EM>:
  27. !IF @.ISMALE
  28. !IF @.FAMS[i].FAMILY.WIFE
  29. <A HREF="${@.FAMS[i].FAMILY.WIFE.XREF.&}">${@.FAMS[i].FAMILY.WIFE.NAME}</A>
  30. !ENDIF
  31. !ENDIF
  32. !IF @.ISFEMALE
  33. !IF @.FAMS[i].FAMILY.HUSBAND
  34. <A HREF="${@.FAMS[i].FAMILY.HUSBAND.XREF.&}">${@.FAMS[i].FAMILY.HUSBAND.NAME}</A>
  35. !ENDIF
  36. !ENDIF
  37. !IF @.FAMS[i].FAMILY.EVENT
  38. <UL>
  39. !RESET j
  40. !WHILE @.FAMS[i].FAMILY.EVENT[j]
  41. <LI><EM>${@.FAMS[i].FAMILY.EVENT[j].TAG}</EM>: ${@.FAMS[i].FAMILY.EVENT[j].DATE}, ${@.FAMS[i].FAMILY.EVENT[j].PLACE.NAME}
  42. !INCREMENT j
  43. !END
  44. </UL>
  45. !ELSE
  46. <BR>
  47. !ENDIF
  48. !IF @.FAMS[i].FAMILY.CHILDREN
  49. <OL>
  50. !RESET j
  51. !WHILE @.FAMS[i].FAMILY.CHILDREN[j]
  52. <LI><A HREF="${@.FAMS[i].FAMILY.CHILDREN[j].INDIV.XREF.&}">${@.FAMS[i].FAMILY.CHILDREN[j].INDIV.NAME}</A>
  53. !INCREMENT j
  54. !END
  55. </OL>
  56. !ENDIF
  57. !INCREMENT i
  58. !END
  59. <A HREF="INDEX.html">INDEX</A><BR><BR>
  60. !IF @.NOTE
  61. <H2>Notes</H2>
  62. !RESET i
  63. !WHILE @.NOTE[i]
  64. ${@.NOTE[i].TEXT}
  65. !RESET j
  66. !WHILE @.NOTE[i].CONT[j]
  67. ${@.NOTE[i].CONT[j].TEXT}
  68. <BR>
  69. !INCREMENT j
  70. !END
  71. <BR>
  72. !INCREMENT i
  73. !END
  74. !ENDIF
  75. <BR>
  76. !IF @.SOURCE
  77. <H2>Sources</H2>
  78. !RESET i
  79. !WHILE @.SOURCE[i]
  80. ${@.SOURCE[i].SOURCE.TEXT}
  81. !RESET j
  82. !WHILE @.SOURCE[i].SOURCE.CONT[j]
  83. ${@.SOURCE[i].SOURCE.CONT[j].TEXT}
  84. <BR>
  85. !INCREMENT j
  86. !END
  87. <BR>
  88. !INCREMENT i
  89. !END
  90. !ENDIF
  91. !INCLUDE @.inc
  92. </BODY>
  93. </HTML>
  94.