|
|
1.1 root 1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24: |associate(style;;;
25:
26: [singers;;
27: draft on, page.offset 0.125i, indent .75i,
28: inline off, size 14, inline on, space 16])
29: |comment<summary: style singers (full instructions)>
30:
31: |environment(title;
32: new.page, blank.lines 1, center on, font bold;
33:
34: minimum.lines 1)
35: |comment<summary: title (title of the song)>
36:
37: |environment(verse;
38: minimum.lines .5, here on;)
39: |comment<summary: verse (verse of the song)>
40:
41: |environment(refrain;
42: minimum.lines .5, indent +2, here on;
43:
44: minimum.lines .5)
45: |comment<summary: refrain (refrain of the song)>
46:
47: |environment(smaller;
48: inline off, size -2, inline on, space -2;
49:
50: SPACE)
51: |comment<summary: smaller (print the song a little smaller than normal)>
52:
53: |environment(d;
54: |ifvalue draft off {
55: divert.input on Rs}
56: |ifvalue draft on {
57: font italics};
58:
59: |ifvalue draft on {
60: font roman})
61: |comment<summary: d (directive to the singers)>
62:
63: |environment(m;
64: |ifvalue draft off {
65: divert.input on Rs}
66: |ifvalue draft on {
67: indent.line -.75i};
68:
69: |ifvalue draft on {
70: horizontal.motion "|.75i"})
71: |comment<summary: m (margin text)>
72:
73: |environment(:document;
74: font.family helvetica, inline off, size 22, inline on, space 24, fill off,
75: page.offset 0.5i;)
76:
77: |environment(:document_save;
78: ;)
79:
80: |environment(:document_restore;
81: ;)
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.