summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--g.tmac85
-rw-r--r--makefile4
2 files changed, 67 insertions, 22 deletions
diff --git a/g.tmac b/g.tmac
index c83e0ec..496dbfa 100644
--- a/g.tmac
+++ b/g.tmac
@@ -1,3 +1,4 @@
+.pn 0
.nr paragraph_indentation 2.3
.nr heading_current_number 1
.nr footnote_current_number 0
@@ -6,43 +7,47 @@
.nr footnote_point_size_reduction 3
\# default heading style
.ds heading_style DIGIT
-
+.ds show_header yes
+.ds show_footer yes
+\#########################################################################
.de place_footer_trap
.wh -3v paste_footer
..
+\#########################################################################
.de place_header_trap
.wh 0 paste_header
..
+\#########################################################################
.de place_ordinary_traps
.place_header_trap
.place_footer_trap
..
-
+\#########################################################################
.ev footnote_environment
.vs \n[footnote_vertical_spacing]
.ev
-
+\#########################################################################
\# IMPORTANT!
.place_ordinary_traps
-
+\#########################################################################
.de remove_footer_trap
.wh -3v
..
-
+\#########################################################################
.de remove_header_trap
.wh 0
..
-
+\#########################################################################
.nr header_text_from_top_spacing 1
.nr header_line_from_text_spacing 0.3
.nr header_real_text_from_line_spacing 2
.nr header_horizontal_line 1
.nr header_horizontal_line_thickness 0.5p
-
+\#########################################################################
.de paragraph
.ti \\n[paragraph_indentation]
..
-
+\#########################################################################
.de list
.ie '\\$1'end' \{\
.nr list_indentation 0
@@ -51,19 +56,19 @@
.nr list_indentation 1
\}
..
-
+\#########################################################################
.de item
.br
\\n[list_indentation])
.nr list_indentation +1
..
-
+\#########################################################################
.de mark_item
.if !'\\$1'' \{\
.nr \\$1 \\n[list_indentation]-1
\}
..
-
+\#########################################################################
.de heading
.br
.ie '\\*[heading_style]'NONE' \{\
@@ -77,7 +82,7 @@
\}
.br
..
-
+\#########################################################################
.de mark_heading
.if !'\\$1'' \{\
.if heading_current_number>0 \{\
@@ -85,22 +90,22 @@
\}
\}
..
-
-
+\#########################################################################
.de title
+\v'5v'
.ce 9999
.ps +2
.ps -2
\f[B] \\$1 \f[]
.sp 1
.ce 0
-.
.ds title_string \\$1
.if !d header_right \{\
.ds header_right \\*[title_string]
\}
.
..
+\#########################################################################
.de author
.ce 9999
\\$1
@@ -118,7 +123,7 @@
.ds header_left \\*[author_string]
\}
..
-
+\#########################################################################
.de footnote
.ie '\\$1'end' \{\
.ps +\\n[footnote_point_size_reduction]
@@ -134,11 +139,11 @@
[\\n[footnote_current_number]]
.boxa footnote_text
.ps -\\n[footnote_point_size_reduction]
-
+.
[\\n[footnote_current_number]]
\}
..
-
+\#########################################################################
.de paste_footnote
\#just in case we are in a diversion when this hits the trap
.box
@@ -151,25 +156,43 @@
.ev
.bp
..
-
+\#########################################################################
.de paste_footer
.ce 1
- \\n[.pn] -
.ce 0
.bp
..
-
+\#########################################################################
.de header
+.ie '\\$1'no' \{\
+.ds show_header no
+\}
+.el \{\
.ds header_left \\$1
.ds header_center \\$2
.ds header_right \\$3
+\}
+..
+\#########################################################################
+.de footer
+.ie '\\$1'no' \{\
+.ds show_footer no
+\}
+.el \{\
+.ds footer_left \\$1
+.ds footer_center \\$2
+.ds footer_right \\$3
+\}
..
-
+\#########################################################################
.de draw_full_page_horisontal_line
\D't \\n[header_horizontal_line_thickness]'
\l'\\n[.ll]u'
..
.de paste_header
+.if !(\\n[.pn]=1) \{\
+.if '\\*[show_header]'yes' \{\
.sp \\n[header_text_from_top_spacing]
.ad l
\\*[header_left]
@@ -187,5 +210,23 @@
.sp \\n[header_line_from_text_spacing]
.draw_full_page_horisontal_line
.sp \\n[header_real_text_from_line_spacing]
+\}
+\}
+..
+\#########################################################################
+.als newpage bp
+.als newline br
+\#########################################################################
+.ig
+.als параграф paragraph
+.als заглавие title
+.als автор author
+.als списък list
+.als елемент item
+.als новред newline
+.als новастраница newpage
+.als забележка footnote
+.als надпис heading
+.als щурц header
+.als основа footer
..
-
diff --git a/makefile b/makefile
new file mode 100644
index 0000000..6d33f71
--- /dev/null
+++ b/makefile
@@ -0,0 +1,4 @@
+install:
+ [ -d /usr/share/tmac ] || mkidr /usr/share/tmac/
+ cp g.tmac /usr/share/tmac/
+ [ -h /usr/share/groff/site-tmac/g.tmac ] || ln -s /usr/share/tmac/g.tmac /usr/share/groff/site-tmac/g.tmac