Home » Recent acquisitions » Acorn ADFS disks » adfs_AcornUser_199801_2.adf » PenDnHTML » !Install/Files/HTML/Macros

!Install/Files/HTML/Macros

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Recent acquisitions » Acorn ADFS disks » adfs_AcornUser_199801_2.adf » PenDnHTML
Filename: !Install/Files/HTML/Macros
Read OK:
File size: 0170 bytes
Load address: 0000
Exec address: 0000
File contents
| PenDown DTP Macros for HTML

Macro "Hypertext data"
DocSend "<EDir>.Linx"
DocLoad "<Wimp$Scrap>"
DoMacro DeleteScrap

Macro "Create HTML"
DocSend "<EDir>.ToHTML"

Macro "DeleteScrap" hidden
| If for some reason Wimp$Scrap does not exist, an attempt to
| delete will raise an error, so create it first, just in case!
OS "Create <Wimp$Scrap>"
OS "Delete <Wimp$Scrap>"
00000000  7c 20 50 65 6e 44 6f 77  6e 20 44 54 50 20 4d 61  || PenDown DTP Ma|
00000010  63 72 6f 73 20 66 6f 72  20 48 54 4d 4c 0a 0a 4d  |cros for HTML..M|
00000020  61 63 72 6f 20 22 48 79  70 65 72 74 65 78 74 20  |acro "Hypertext |
00000030  64 61 74 61 22 0a 44 6f  63 53 65 6e 64 20 22 3c  |data".DocSend "<|
00000040  45 44 69 72 3e 2e 4c 69  6e 78 22 0a 44 6f 63 4c  |EDir>.Linx".DocL|
00000050  6f 61 64 20 22 3c 57 69  6d 70 24 53 63 72 61 70  |oad "<Wimp$Scrap|
00000060  3e 22 0a 44 6f 4d 61 63  72 6f 20 44 65 6c 65 74  |>".DoMacro Delet|
00000070  65 53 63 72 61 70 0a 0a  4d 61 63 72 6f 20 22 43  |eScrap..Macro "C|
00000080  72 65 61 74 65 20 48 54  4d 4c 22 0a 44 6f 63 53  |reate HTML".DocS|
00000090  65 6e 64 20 22 3c 45 44  69 72 3e 2e 54 6f 48 54  |end "<EDir>.ToHT|
000000a0  4d 4c 22 0a 0a 4d 61 63  72 6f 20 22 44 65 6c 65  |ML"..Macro "Dele|
000000b0  74 65 53 63 72 61 70 22  20 68 69 64 64 65 6e 0a  |teScrap" hidden.|
000000c0  7c 20 49 66 20 66 6f 72  20 73 6f 6d 65 20 72 65  || If for some re|
000000d0  61 73 6f 6e 20 57 69 6d  70 24 53 63 72 61 70 20  |ason Wimp$Scrap |
000000e0  64 6f 65 73 20 6e 6f 74  20 65 78 69 73 74 2c 20  |does not exist, |
000000f0  61 6e 20 61 74 74 65 6d  70 74 20 74 6f 0a 7c 20  |an attempt to.| |
00000100  64 65 6c 65 74 65 20 77  69 6c 6c 20 72 61 69 73  |delete will rais|
00000110  65 20 61 6e 20 65 72 72  6f 72 2c 20 73 6f 20 63  |e an error, so c|
00000120  72 65 61 74 65 20 69 74  20 66 69 72 73 74 2c 20  |reate it first, |
00000130  6a 75 73 74 20 69 6e 20  63 61 73 65 21 0a 4f 53  |just in case!.OS|
00000140  20 22 43 72 65 61 74 65  20 3c 57 69 6d 70 24 53  | "Create <Wimp$S|
00000150  63 72 61 70 3e 22 0a 4f  53 20 22 44 65 6c 65 74  |crap>".OS "Delet|
00000160  65 20 3c 57 69 6d 70 24  53 63 72 61 70 3e 22 0a  |e <Wimp$Scrap>".|
00000170