Expanded Description
| Topic |
Description |
| Name |
text2html |
| Synopsis |
/infobank/programs/html/text2html/text2html.for |
| Description |
Program to convert a plain text file into a simple .html file.
|
| AUTHOR |
Clint Steele 10/22/96
|
| Reads |
read (90, '(q,a)', end = 99) Length, ALine(1:Length)
|
| Writes |
write (ALine, '(1024x)')
write (91, 4)
write (ALine, '(1024x)')
write (91, '(a)') ALine(1:Length)
write (91, 5)
write (ALine, '(1024x)')
|
| Opens |
|
| Calls |
call openem (1,-1)
call yesno ('Y[N]', Answer)
call stringlen (ALine, Length)
call htmlhead (91, ALine(1:Length))
call stringlen (ALine(1:Length), Length)
call stringlen (ALine, Length)
call htmlfoot (91, ALine(1:Length))
|
|