2
############################################################################
4
# MODULE: d.split.frame
5
# AUTHOR: M. Hamish Bowman, Dept. Marine Science, Otago Univeristy,
7
# PURPOSE: Split the display into quarter frames, etc
8
# (This script is a replacement for d.split from GRASS 5,6)
10
# COPYRIGHT: (c) 2007 Hamish Bowman, and the GRASS Development Team
11
# This program is free software released to the public domain
13
#############################################################################
16
#% description: Split the display into subframes.
21
#% description: Number of subframes
22
#% options: 2,4,6,8,9,12,16
27
#% description: Split horizontally not vertically
30
if [ -z "$GISBASE" ] ; then
31
echo "You must be in GRASS GIS to run this program." 1>&2
35
# skip parser if no args are given
36
if [ "$#" -gt 0 ] ; then
37
if [ "$1" != "@ARGS_PARSED@" ] ; then
38
exec g.parser "$0" "$@"
46
if [ `d.mon -p | cut -f1 -d' '` != "Currently" ] ; then
47
g.message -e "No monitor currently selected for output"
52
if [ $? -ne 0 ] ; then
53
g.message -e "Error clearing display monitor"
58
case "$GIS_OPT_FRAMES" in
59
2) if [ $GIS_FLAG_H -eq 0 ] ; then
61
d.frame -c frame=uno at=50,100,0,100
62
d.frame -c frame=dos at=0,50,0,100
64
d.frame -c frame=uno at=0,100,0,50
65
d.frame -c frame=dos at=0,100,50,100
68
4) d.frame -c frame=uno at=50,100,0,50
69
d.frame -c frame=dos at=50,100,50,100
70
d.frame -c frame=tres at=0,50,0,50
71
d.frame -c frame=cuatro at=0,50,50,100
73
6) if [ $GIS_FLAG_H -eq 0 ] ; then
75
d.frame -c frame=uno at=66.6667,100,0,50
76
d.frame -c frame=dos at=66.6667,100,50,100
77
d.frame -c frame=tres at=33.3333,66.6667,0,50
78
d.frame -c frame=cuatro at=33.3333,66.6667,50,100
79
d.frame -c frame=cinco at=0,33.3333,0,50
80
d.frame -c frame=seis at=0,33.3333,50,100
82
d.frame -c frame=uno at=50,100,0,33.3333
83
d.frame -c frame=dos at=50,100,33.3333,66.6667
84
d.frame -c frame=tres at=50,100,66.6667,100
85
d.frame -c frame=cuatro at=0,50,0,33.3333
86
d.frame -c frame=cinco at=0,50,33.3333,66.6667
87
d.frame -c frame=seis at=0,50,66.6667,100
90
8) if [ $GIS_FLAG_H -eq 0 ] ; then
92
d.frame -c frame=uno at=75,100,0,50
93
d.frame -c frame=dos at=75,100,50,100
94
d.frame -c frame=tres at=50,75,0,50
95
d.frame -c frame=cuatro at=50,75,50,100
96
d.frame -c frame=cinco at=25,50,0,50
97
d.frame -c frame=seis at=25,50,50,100
98
d.frame -c frame=siete at=0,25,0,50
99
d.frame -c frame=ocho at=0,25,50,100
101
d.frame -c frame=uno at=50,100,0,25
102
d.frame -c frame=dos at=50,100,25,50
103
d.frame -c frame=tres at=50,100,50,75
104
d.frame -c frame=cuatro at=50,100,75,100
105
d.frame -c frame=cinco at=0,50,0,25
106
d.frame -c frame=seis at=0,50,25,50
107
d.frame -c frame=siete at=0,50,50,75
108
d.frame -c frame=ocho at=0,50,75,100
111
9) d.frame -c frame=uno at=66.6667,100,0,33.3333
112
d.frame -c frame=dos at=66.6667,100,33.3333,66.6667
113
d.frame -c frame=tres at=66.6667,100,66.6667,100
114
d.frame -c frame=cuatro at=33.3333,66.6667,0,33.3333
115
d.frame -c frame=cinco at=33.3333,66.6667,33.3333,66.6667
116
d.frame -c frame=seis at=33.3333,66.6667,66.6667,100
117
d.frame -c frame=siete at=0,33.3333,0,33.3333
118
d.frame -c frame=ocho at=0,33.3333,33.3333,66.6667
119
d.frame -c frame=nueve at=0,33.3333,66.6667,100
121
12) if [ $GIS_FLAG_H -eq 0 ] ; then
123
d.frame -c frame=uno at=75,100,0,33.3333
124
d.frame -c frame=dos at=75,100,33.3333,66.6667
125
d.frame -c frame=tres at=75,100,66.6667,100
126
d.frame -c frame=cuatro at=50,75,0,33.3333
127
d.frame -c frame=cinco at=50,75,33.3333,66.6667
128
d.frame -c frame=seis at=50,75,66.6667,100
129
d.frame -c frame=siete at=25,50,0,33.3333
130
d.frame -c frame=ocho at=25,50,33.3333,66.6667
131
d.frame -c frame=nueve at=25,50,66.6667,100
132
d.frame -c frame=diez at=0,25,0,33.3333
133
d.frame -c frame=once at=0,25,33.3333,66.6667
134
d.frame -c frame=doce at=0,25,66.6667,100
136
d.frame -c frame=uno at=66.6667,100,0,25
137
d.frame -c frame=dos at=66.6667,100,25,50
138
d.frame -c frame=tres at=66.6667,100,50,75
139
d.frame -c frame=cuatro at=66.6667,100,75,100
140
d.frame -c frame=cinco at=33.3333,66.6667,0,25
141
d.frame -c frame=seis at=33.3333,66.6667,25,50
142
d.frame -c frame=siete at=33.3333,66.6667,50,75
143
d.frame -c frame=ocho at=33.3333,66.6667,75,100
144
d.frame -c frame=nueve at=0,33.3333,0,25
145
d.frame -c frame=diez at=0,33.3333,25,50
146
d.frame -c frame=once at=0,33.3333,50,75
147
d.frame -c frame=doce at=0,33.3333,75,100
150
16) d.frame -c frame=uno at=75,100,0,25
151
d.frame -c frame=dos at=75,100,25,50
152
d.frame -c frame=tres at=75,100,50,75
153
d.frame -c frame=cuatro at=75,100,75,100
154
d.frame -c frame=cinco at=50,75,0,25
155
d.frame -c frame=seis at=50,75,25,50
156
d.frame -c frame=siete at=50,75,50,75
157
d.frame -c frame=ocho at=50,75,75,100
158
d.frame -c frame=nueve at=25,50,0,25
159
d.frame -c frame=diez at=25,50,25,50
160
d.frame -c frame=once at=25,50,50,75
161
d.frame -c frame=doce at=25,50,75,100
162
d.frame -c frame=trece at=0,25,0,25
163
d.frame -c frame=catorce at=0,25,25,50
164
d.frame -c frame=quince at=0,25,50,75
165
d.frame -c frame=dieciseis at=0,25,75,100
172
g.message "Use 'd.erase -f' to clear frames from display monitor."