summaryrefslogtreecommitdiff
path: root/graphics/circuit_macros/examples/Incleps.m4
diff options
context:
space:
mode:
authorNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
committerNorbert Preining <norbert@preining.info>2019-09-02 13:46:59 +0900
commite0c6872cf40896c7be36b11dcc744620f10adf1d (patch)
tree60335e10d2f4354b0674ec22d7b53f0f8abee672 /graphics/circuit_macros/examples/Incleps.m4
Initial commit
Diffstat (limited to 'graphics/circuit_macros/examples/Incleps.m4')
-rw-r--r--graphics/circuit_macros/examples/Incleps.m421
1 files changed, 21 insertions, 0 deletions
diff --git a/graphics/circuit_macros/examples/Incleps.m4 b/graphics/circuit_macros/examples/Incleps.m4
new file mode 100644
index 0000000000..ceb1bc0f0c
--- /dev/null
+++ b/graphics/circuit_macros/examples/Incleps.m4
@@ -0,0 +1,21 @@
+.PS
+# Incleps.m4 : Illustrating one way to import and overwrite .eps graphics
+# Note: gpic doesn't fill the arrows
+darrow_init
+s_init(Incleps)
+sinclude(F_Incleps.dim) # Inserted for the web-page version.
+sinclude(examples.dim) # Change examples to the name of the main LaTeX file.
+
+define(`backarrow',`darrow(`$1',,,2pt__,6pt__,6pt__,<-|)')
+
+S: s_box(`\includegraphics[width=3in]{Incl}')
+ifgpic(`S: box invis ht s_ht wid s_wd with .c at S.n')
+
+thinlines_
+ backarrow( from boxcoord(S,0.4,0.95) up 0.4 right 0.7 )
+ s_box(\sf Basket) ljust
+ backarrow( from boxcoord(S,0.9,0.41) up 0.2 right 0.5 )
+ s_box(\sf Ball) ljust
+ backarrow( from boxcoord(S,0.85,0.32) up 0.2 right 0.5 )
+ s_box(`\sf\shortstack[l]{Star\\ player}') ljust
+.PE