Home » Personal collection » Acorn DFS disks » dfs_box03_disk12_bcpl.scp » EXMPHDR
EXMPHDR
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 » Personal collection » Acorn DFS disks » dfs_box03_disk12_bcpl.scp |
| Filename: | EXMPHDR |
| Read OK: | ✔ |
| File size: | 00EF bytes |
| Load address: | 0000 |
| Exec address: | 0000 |
File contents
// Header file for EXAMPLE.
get "libhdr"
manifest $(
ug = firstfreeglobal // to save typing
$)
global $(
playtune:ug
voltmeter:ug+1
txtcursor:ug+2
hidecursor:ug+3
colour:ug+4
gcol:ug+5
plot:ug+6
$)
00000000 2f 2f 20 48 65 61 64 65 72 20 66 69 6c 65 20 66 |// Header file f| 00000010 6f 72 20 45 58 41 4d 50 4c 45 2e 0a 0d 0a 0d 67 |or EXAMPLE.....g| 00000020 65 74 20 22 6c 69 62 68 64 72 22 0a 0d 0a 0d 6d |et "libhdr"....m| 00000030 61 6e 69 66 65 73 74 20 24 28 0a 0d 75 67 20 3d |anifest $(..ug =| 00000040 20 66 69 72 73 74 66 72 65 65 67 6c 6f 62 61 6c | firstfreeglobal| 00000050 20 20 20 20 2f 2f 20 74 6f 20 73 61 76 65 20 74 | // to save t| 00000060 79 70 69 6e 67 0a 0d 20 20 20 20 20 20 20 20 20 |yping.. | 00000070 24 29 0a 0d 0a 0d 67 6c 6f 62 61 6c 20 24 28 0a |$)....global $(.| 00000080 0d 70 6c 61 79 74 75 6e 65 3a 75 67 0a 0d 76 6f |.playtune:ug..vo| 00000090 6c 74 6d 65 74 65 72 3a 75 67 2b 31 0a 0d 74 78 |ltmeter:ug+1..tx| 000000a0 74 63 75 72 73 6f 72 3a 75 67 2b 32 0a 0d 68 69 |tcursor:ug+2..hi| 000000b0 64 65 63 75 72 73 6f 72 3a 75 67 2b 33 0a 0d 63 |decursor:ug+3..c| 000000c0 6f 6c 6f 75 72 3a 75 67 2b 34 0a 0d 67 63 6f 6c |olour:ug+4..gcol| 000000d0 3a 75 67 2b 35 0a 0d 70 6c 6f 74 3a 75 67 2b 36 |:ug+5..plot:ug+6| 000000e0 0a 0d 20 20 20 20 20 20 20 24 29 0a 0d 0a 0d |.. $)....| 000000ef
.