1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
|
encoding utf-8
require 6.2
source rabbit.th
#!PROCESS
#!TITLE 2 Drawing maps in therion
layout water-blue
code metapost
def a_water (expr p) =
T:=identity;
thfill p withcolor (0.0, 0.5, 1.0);
enddef;
endlayout
select pdx@rabbit
select pdp@rabbit
export map -projection plan -output rabbit-plan.pdf \
-layout-map-header 0 0 s
export map -projection plan -output rabbit-plan.svg \
-layout-map-header 0 0 s
export map -projection plan -output rabbit-plan.xhtml \
-layout-map-header 0 0 s
#!IMAGE rabbit-plan.pdf
export map -projection extended -output rabbit-xelev.pdf \
-layout-map-header 0 110 sw -layout water-blue
export map -projection extended -output rabbit-xelev.svg \
-layout-map-header 0 110 sw -layout water-blue
export map -projection extended -output rabbit-xelev.xhtml \
-layout-map-header 0 110 sw -layout water-blue
#!IMAGE rabbit-xelev.pdf
export model -output rabbit.lox
#!CLEAN rabbit.lox rabbit-plan.pdf rabbit-xelev.pdf
|
