1%# floor2.rb
2#
3# This demonstration script creates a canvas widet that displays the
4# floorplan for DEC's Western Research Laboratory.
5#
6# floorDisplay widget demo (called by 'widget')
7#
8
9# floorDisplay2 --
10# Recreate the floorplan display in the canvas given by "w".  The
11# floor given by "active" is displayed on top with its office structure
12# visible.
13#
14# Arguments:
15# w -           Name of the canvas window.
16# active -      Number of active floor (1, 2, or 3).
17
18def floorDisplay2(w,active)
19  return if $activeFloor2 == active
20
21  w.delete('all')
22  $activeFloor2 = active
23
24  # First go through the three floors, displaying the backgrounds for
25  # each floor.
26
27  floor2_bg1(w,$floor2_colors['bg1'],$floor2_colors['outline1'])
28  floor2_bg2(w,$floor2_colors['bg2'],$floor2_colors['outline2'])
29  floor2_bg3(w,$floor2_colors['bg3'],$floor2_colors['outline3'])
30
31  # Raise the background for the active floor so that it's on top.
32
33  w.raise("floor#{active}")
34
35  # Create a dummy item just to mark this point in the display list,
36  # so we can insert highlights here.
37
38  w.create(TkcRectangle,0,100,1,101,'fill'=>'','outline'=>'','tags'=>'marker')
39
40  # Add the walls and labels for the active floor, along with
41  # transparent polygons that define the rooms on the floor.
42  # Make sure that the room polygons are on top.
43
44  $floorLabels2.clear
45  $floorItems2.clear
46  send("floor2_fg#{active}", w, $floor2_colors['offices'])
47  w.raise('room')
48
49  # Offset the floors diagonally from each other.
50
51  w.move('floor1', '2c', '2c')
52  w.move('floor2', '1c', '1c')
53
54  # Create items for the room entry and its label.
55  w.create(TkcWindow, 600, 100, 'anchor'=>'w', 'window'=>$floor2_entry)
56  w.create(TkcText, 600, 100, 'anchor'=>'e', 'text'=>"Room: ")
57  w['scrollregion'] = w.bbox('all')
58end
59
60# newRoom2 --
61# This method is invoked whenever the mouse enters a room
62# in the floorplan.  It changes tags so that the current room is
63# highlighted.
64#
65# Arguments:
66# w  -          The name of the canvas window.
67
68def newRoom2(w)
69  id = w.find_withtag('current')[0]
70  $currentRoom2.value = $floorLabels2[id.id] if id != ""
71  Tk.update(true)
72end
73
74# roomChanged2 --
75# This method is invoked whenever the currentRoom variable changes.
76# It highlights the current room and unhighlights any previous room.
77#
78# Arguments:
79# w -           The canvas window displaying the floorplan.
80# args -        Not used.
81
82def roomChanged2(w,*args)
83  w.delete('highlight')
84  item = $floorItems2[$currentRoom2.value]
85  return if item == nil
86  new = TkcPolygon.new(w, *(w.coords(item)))
87  new.configure('fill'=>$floor2_colors['active'], 'tags'=>'highlight')
88  w.raise(new, 'marker')
89end
90
91# floor2_bg1 --
92# This method represents part of the floorplan database.  When
93# invoked, it instantiates the background information for the first
94# floor.
95#
96# Arguments:
97# w -           The canvas window.
98# fill -        Fill color to use for the floor's background.
99# outline -     Color to use for the floor's outline.
100
101def floor2_bg1(w,fill,outline)
102  w.create(TkcPolygon,347,80,349,82,351,84,353,85,363,92,375,99,386,104,
103                 386,129,398,129,398,162,484,162,484,129,559,129,559,133,725,
104                 133,725,129,802,129,802,389,644,389,644,391,559,391,559,327,
105                 508,327,508,311,484,311,484,278,395,278,395,288,400,288,404,
106                 288,409,290,413,292,418,297,421,302,422,309,421,318,417,325,
107                 411,330,405,332,397,333,344,333,340,334,336,336,335,338,332,
108                 342,331,347,332,351,334,354,336,357,341,359,340,360,335,363,
109                 331,365,326,366,304,366,304,355,258,355,258,387,60,387,60,391,
110                 0,391,0,337,3,337,3,114,8,114,8,25,30,25,30,5,93,5,98,5,104,7,
111                 110,10,116,16,119,20,122,28,123,32,123,68,220,68,220,34,221,
112                 22,223,17,227,13,231,8,236,4,242,2,246,0,260,0,283,1,300,5,
113                 321,14,335,22,348,25,365,29,363,39,358,48,352,56,337,70,
114                 344,76,347,80, 'tags'=>['floor1','bg'], 'fill'=>fill)
115  w.create(TkcLine,386,129,398,129, 'fill'=>outline, 'tags'=>['floor1','bg'])
116  w.create(TkcLine,258,355,258,387, 'fill'=>outline, 'tags'=>['floor1','bg'])
117  w.create(TkcLine,60,387,60,391, 'fill'=>outline, 'tags'=>['floor1','bg'])
118  w.create(TkcLine,0,337,0,391, 'fill'=>outline, 'tags'=>['floor1','bg'])
119  w.create(TkcLine,60,391,0,391, 'fill'=>outline, 'tags'=>['floor1','bg'])
120  w.create(TkcLine,3,114,3,337, 'fill'=>outline, 'tags'=>['floor1','bg'])
121  w.create(TkcLine,258,387,60,387, 'fill'=>outline, 'tags'=>['floor1','bg'])
122  w.create(TkcLine,484,162,398,162, 'fill'=>outline, 'tags'=>['floor1','bg'])
123  w.create(TkcLine,398,162,398,129, 'fill'=>outline, 'tags'=>['floor1','bg'])
124  w.create(TkcLine,484,278,484,311, 'fill'=>outline, 'tags'=>['floor1','bg'])
125  w.create(TkcLine,484,311,508,311, 'fill'=>outline, 'tags'=>['floor1','bg'])
126  w.create(TkcLine,508,327,508,311, 'fill'=>outline, 'tags'=>['floor1','bg'])
127  w.create(TkcLine,559,327,508,327, 'fill'=>outline, 'tags'=>['floor1','bg'])
128  w.create(TkcLine,644,391,559,391, 'fill'=>outline, 'tags'=>['floor1','bg'])
129  w.create(TkcLine,644,389,644,391, 'fill'=>outline, 'tags'=>['floor1','bg'])
130  w.create(TkcLine,559,129,484,129, 'fill'=>outline, 'tags'=>['floor1','bg'])
131  w.create(TkcLine,484,162,484,129, 'fill'=>outline, 'tags'=>['floor1','bg'])
132  w.create(TkcLine,725,133,559,133, 'fill'=>outline, 'tags'=>['floor1','bg'])
133  w.create(TkcLine,559,129,559,133, 'fill'=>outline, 'tags'=>['floor1','bg'])
134  w.create(TkcLine,725,129,802,129, 'fill'=>outline, 'tags'=>['floor1','bg'])
135  w.create(TkcLine,802,389,802,129, 'fill'=>outline, 'tags'=>['floor1','bg'])
136  w.create(TkcLine,3,337,0,337, 'fill'=>outline, 'tags'=>['floor1','bg'])
137  w.create(TkcLine,559,391,559,327, 'fill'=>outline, 'tags'=>['floor1','bg'])
138  w.create(TkcLine,802,389,644,389, 'fill'=>outline, 'tags'=>['floor1','bg'])
139  w.create(TkcLine,725,133,725,129, 'fill'=>outline, 'tags'=>['floor1','bg'])
140  w.create(TkcLine,8,25,8,114, 'fill'=>outline, 'tags'=>['floor1','bg'])
141  w.create(TkcLine,8,114,3,114, 'fill'=>outline, 'tags'=>['floor1','bg'])
142  w.create(TkcLine,30,25,8,25, 'fill'=>outline, 'tags'=>['floor1','bg'])
143  w.create(TkcLine,484,278,395,278, 'fill'=>outline, 'tags'=>['floor1','bg'])
144  w.create(TkcLine,30,25,30,5, 'fill'=>outline, 'tags'=>['floor1','bg'])
145  w.create(TkcLine,93,5,30,5, 'fill'=>outline, 'tags'=>['floor1','bg'])
146  w.create(TkcLine,98,5,93,5, 'fill'=>outline, 'tags'=>['floor1','bg'])
147  w.create(TkcLine,104,7,98,5, 'fill'=>outline, 'tags'=>['floor1','bg'])
148  w.create(TkcLine,110,10,104,7, 'fill'=>outline, 'tags'=>['floor1','bg'])
149  w.create(TkcLine,116,16,110,10, 'fill'=>outline, 'tags'=>['floor1','bg'])
150  w.create(TkcLine,119,20,116,16, 'fill'=>outline, 'tags'=>['floor1','bg'])
151  w.create(TkcLine,122,28,119,20, 'fill'=>outline, 'tags'=>['floor1','bg'])
152  w.create(TkcLine,123,32,122,28, 'fill'=>outline, 'tags'=>['floor1','bg'])
153  w.create(TkcLine,123,68,123,32, 'fill'=>outline, 'tags'=>['floor1','bg'])
154  w.create(TkcLine,220,68,123,68, 'fill'=>outline, 'tags'=>['floor1','bg'])
155  w.create(TkcLine,386,129,386,104, 'fill'=>outline, 'tags'=>['floor1','bg'])
156  w.create(TkcLine,386,104,375,99, 'fill'=>outline, 'tags'=>['floor1','bg'])
157  w.create(TkcLine,375,99,363,92, 'fill'=>outline, 'tags'=>['floor1','bg'])
158  w.create(TkcLine,353,85,363,92, 'fill'=>outline, 'tags'=>['floor1','bg'])
159  w.create(TkcLine,220,68,220,34, 'fill'=>outline, 'tags'=>['floor1','bg'])
160  w.create(TkcLine,337,70,352,56, 'fill'=>outline, 'tags'=>['floor1','bg'])
161  w.create(TkcLine,352,56,358,48, 'fill'=>outline, 'tags'=>['floor1','bg'])
162  w.create(TkcLine,358,48,363,39, 'fill'=>outline, 'tags'=>['floor1','bg'])
163  w.create(TkcLine,363,39,365,29, 'fill'=>outline, 'tags'=>['floor1','bg'])
164  w.create(TkcLine,365,29,348,25, 'fill'=>outline, 'tags'=>['floor1','bg'])
165  w.create(TkcLine,348,25,335,22, 'fill'=>outline, 'tags'=>['floor1','bg'])
166  w.create(TkcLine,335,22,321,14, 'fill'=>outline, 'tags'=>['floor1','bg'])
167  w.create(TkcLine,321,14,300,5, 'fill'=>outline, 'tags'=>['floor1','bg'])
168  w.create(TkcLine,300,5,283,1, 'fill'=>outline, 'tags'=>['floor1','bg'])
169  w.create(TkcLine,283,1,260,0, 'fill'=>outline, 'tags'=>['floor1','bg'])
170  w.create(TkcLine,260,0,246,0, 'fill'=>outline, 'tags'=>['floor1','bg'])
171  w.create(TkcLine,246,0,242,2, 'fill'=>outline, 'tags'=>['floor1','bg'])
172  w.create(TkcLine,242,2,236,4, 'fill'=>outline, 'tags'=>['floor1','bg'])
173  w.create(TkcLine,236,4,231,8, 'fill'=>outline, 'tags'=>['floor1','bg'])
174  w.create(TkcLine,231,8,227,13, 'fill'=>outline, 'tags'=>['floor1','bg'])
175  w.create(TkcLine,223,17,227,13, 'fill'=>outline, 'tags'=>['floor1','bg'])
176  w.create(TkcLine,221,22,223,17, 'fill'=>outline, 'tags'=>['floor1','bg'])
177  w.create(TkcLine,220,34,221,22, 'fill'=>outline, 'tags'=>['floor1','bg'])
178  w.create(TkcLine,340,360,335,363, 'fill'=>outline, 'tags'=>['floor1','bg'])
179  w.create(TkcLine,335,363,331,365, 'fill'=>outline, 'tags'=>['floor1','bg'])
180  w.create(TkcLine,331,365,326,366, 'fill'=>outline, 'tags'=>['floor1','bg'])
181  w.create(TkcLine,326,366,304,366, 'fill'=>outline, 'tags'=>['floor1','bg'])
182  w.create(TkcLine,304,355,304,366, 'fill'=>outline, 'tags'=>['floor1','bg'])
183  w.create(TkcLine,395,288,400,288, 'fill'=>outline, 'tags'=>['floor1','bg'])
184  w.create(TkcLine,404,288,400,288, 'fill'=>outline, 'tags'=>['floor1','bg'])
185  w.create(TkcLine,409,290,404,288, 'fill'=>outline, 'tags'=>['floor1','bg'])
186  w.create(TkcLine,413,292,409,290, 'fill'=>outline, 'tags'=>['floor1','bg'])
187  w.create(TkcLine,418,297,413,292, 'fill'=>outline, 'tags'=>['floor1','bg'])
188  w.create(TkcLine,421,302,418,297, 'fill'=>outline, 'tags'=>['floor1','bg'])
189  w.create(TkcLine,422,309,421,302, 'fill'=>outline, 'tags'=>['floor1','bg'])
190  w.create(TkcLine,421,318,422,309, 'fill'=>outline, 'tags'=>['floor1','bg'])
191  w.create(TkcLine,421,318,417,325, 'fill'=>outline, 'tags'=>['floor1','bg'])
192  w.create(TkcLine,417,325,411,330, 'fill'=>outline, 'tags'=>['floor1','bg'])
193  w.create(TkcLine,411,330,405,332, 'fill'=>outline, 'tags'=>['floor1','bg'])
194  w.create(TkcLine,405,332,397,333, 'fill'=>outline, 'tags'=>['floor1','bg'])
195  w.create(TkcLine,397,333,344,333, 'fill'=>outline, 'tags'=>['floor1','bg'])
196  w.create(TkcLine,344,333,340,334, 'fill'=>outline, 'tags'=>['floor1','bg'])
197  w.create(TkcLine,340,334,336,336, 'fill'=>outline, 'tags'=>['floor1','bg'])
198  w.create(TkcLine,336,336,335,338, 'fill'=>outline, 'tags'=>['floor1','bg'])
199  w.create(TkcLine,335,338,332,342, 'fill'=>outline, 'tags'=>['floor1','bg'])
200  w.create(TkcLine,331,347,332,342, 'fill'=>outline, 'tags'=>['floor1','bg'])
201  w.create(TkcLine,332,351,331,347, 'fill'=>outline, 'tags'=>['floor1','bg'])
202  w.create(TkcLine,334,354,332,351, 'fill'=>outline, 'tags'=>['floor1','bg'])
203  w.create(TkcLine,336,357,334,354, 'fill'=>outline, 'tags'=>['floor1','bg'])
204  w.create(TkcLine,341,359,336,357, 'fill'=>outline, 'tags'=>['floor1','bg'])
205  w.create(TkcLine,341,359,340,360, 'fill'=>outline, 'tags'=>['floor1','bg'])
206  w.create(TkcLine,395,288,395,278, 'fill'=>outline, 'tags'=>['floor1','bg'])
207  w.create(TkcLine,304,355,258,355, 'fill'=>outline, 'tags'=>['floor1','bg'])
208  w.create(TkcLine,347,80,344,76, 'fill'=>outline, 'tags'=>['floor1','bg'])
209  w.create(TkcLine,344,76,337,70, 'fill'=>outline, 'tags'=>['floor1','bg'])
210  w.create(TkcLine,349,82,347,80, 'fill'=>outline, 'tags'=>['floor1','bg'])
211  w.create(TkcLine,351,84,349,82, 'fill'=>outline, 'tags'=>['floor1','bg'])
212  w.create(TkcLine,353,85,351,84, 'fill'=>outline, 'tags'=>['floor1','bg'])
213end
214
215# floor2_bg2 --
216# This method represents part of the floorplan database.  When
217# invoked, it instantiates the background information for the first
218# floor.
219#
220# Arguments:
221# w -           The canvas window.
222# fill -        Fill color to use for the floor's background.
223# outline -     Color to use for the floor's outline.
224
225def floor2_bg2(w,fill,outline)
226  w.create(TkcPolygon,559,129,484,129,484,162,398,162,398,129,315,129,
227                 315,133,176,133,176,129,96,129,96,133,3,133,3,339,0,339,0,391,
228                 60,391,60,387,258,387,258,329,350,329,350,311,395,311,395,280,
229                 484,280,484,311,508,311,508,327,558,327,558,391,644,391,644,
230                 367,802,367,802,129,725,129,725,133,559,133,559,129,
231                 'tags'=>['floor2','bg'], 'fill'=>fill)
232  w.create(TkcLine,350,311,350,329, 'fill'=>outline, 'tags'=>['floor2','bg'])
233  w.create(TkcLine,398,129,398,162, 'fill'=>outline, 'tags'=>['floor2','bg'])
234  w.create(TkcLine,802,367,802,129, 'fill'=>outline, 'tags'=>['floor2','bg'])
235  w.create(TkcLine,802,129,725,129, 'fill'=>outline, 'tags'=>['floor2','bg'])
236  w.create(TkcLine,725,133,725,129, 'fill'=>outline, 'tags'=>['floor2','bg'])
237  w.create(TkcLine,559,129,559,133, 'fill'=>outline, 'tags'=>['floor2','bg'])
238  w.create(TkcLine,559,133,725,133, 'fill'=>outline, 'tags'=>['floor2','bg'])
239  w.create(TkcLine,484,162,484,129, 'fill'=>outline, 'tags'=>['floor2','bg'])
240  w.create(TkcLine,559,129,484,129, 'fill'=>outline, 'tags'=>['floor2','bg'])
241  w.create(TkcLine,802,367,644,367, 'fill'=>outline, 'tags'=>['floor2','bg'])
242  w.create(TkcLine,644,367,644,391, 'fill'=>outline, 'tags'=>['floor2','bg'])
243  w.create(TkcLine,644,391,558,391, 'fill'=>outline, 'tags'=>['floor2','bg'])
244  w.create(TkcLine,558,327,558,391, 'fill'=>outline, 'tags'=>['floor2','bg'])
245  w.create(TkcLine,558,327,508,327, 'fill'=>outline, 'tags'=>['floor2','bg'])
246  w.create(TkcLine,508,327,508,311, 'fill'=>outline, 'tags'=>['floor2','bg'])
247  w.create(TkcLine,484,311,508,311, 'fill'=>outline, 'tags'=>['floor2','bg'])
248  w.create(TkcLine,484,280,484,311, 'fill'=>outline, 'tags'=>['floor2','bg'])
249  w.create(TkcLine,398,162,484,162, 'fill'=>outline, 'tags'=>['floor2','bg'])
250  w.create(TkcLine,484,280,395,280, 'fill'=>outline, 'tags'=>['floor2','bg'])
251  w.create(TkcLine,395,280,395,311, 'fill'=>outline, 'tags'=>['floor2','bg'])
252  w.create(TkcLine,258,387,60,387, 'fill'=>outline, 'tags'=>['floor2','bg'])
253  w.create(TkcLine,3,133,3,339, 'fill'=>outline, 'tags'=>['floor2','bg'])
254  w.create(TkcLine,3,339,0,339, 'fill'=>outline, 'tags'=>['floor2','bg'])
255  w.create(TkcLine,60,391,0,391, 'fill'=>outline, 'tags'=>['floor2','bg'])
256  w.create(TkcLine,0,339,0,391, 'fill'=>outline, 'tags'=>['floor2','bg'])
257  w.create(TkcLine,60,387,60,391, 'fill'=>outline, 'tags'=>['floor2','bg'])
258  w.create(TkcLine,258,329,258,387, 'fill'=>outline, 'tags'=>['floor2','bg'])
259  w.create(TkcLine,350,329,258,329, 'fill'=>outline, 'tags'=>['floor2','bg'])
260  w.create(TkcLine,395,311,350,311, 'fill'=>outline, 'tags'=>['floor2','bg'])
261  w.create(TkcLine,398,129,315,129, 'fill'=>outline, 'tags'=>['floor2','bg'])
262  w.create(TkcLine,176,133,315,133, 'fill'=>outline, 'tags'=>['floor2','bg'])
263  w.create(TkcLine,176,129,96,129, 'fill'=>outline, 'tags'=>['floor2','bg'])
264  w.create(TkcLine,3,133,96,133, 'fill'=>outline, 'tags'=>['floor2','bg'])
265  w.create(TkcLine,315,133,315,129, 'fill'=>outline, 'tags'=>['floor2','bg'])
266  w.create(TkcLine,176,133,176,129, 'fill'=>outline, 'tags'=>['floor2','bg'])
267  w.create(TkcLine,96,133,96,129, 'fill'=>outline, 'tags'=>['floor2','bg'])
268end
269
270# floor2_bg3 --
271# This method represents part of the floorplan database.  When
272# invoked, it instantiates the background information for the first
273# floor.
274#
275# Arguments:
276# w -           The canvas window.
277# fill -        Fill color to use for the floor's background.
278# outline -     Color to use for the floor's outline.
279
280def floor2_bg3(w,fill,outline)
281  w.create(TkcPolygon,159,300,107,300,107,248,159,248,159,129,96,129,96,
282                 133,21,133,21,331,0,331,0,391,60,391,60,370,159,370,159,300,
283                 'tags'=>['floor3','bg'], 'fill'=>fill)
284  w.create(TkcPolygon,258,370,258,329,350,329,350,311,399,311,399,129,
285                 315,129,315,133,176,133,176,129,159,129,159,370,258,370,
286                 'tags'=>['floor3','bg'], 'fill'=>fill)
287  w.create(TkcLine,96,133,96,129, 'fill'=>outline, 'tags'=>['floor3','bg'])
288  w.create(TkcLine,176,129,96,129, 'fill'=>outline, 'tags'=>['floor3','bg'])
289  w.create(TkcLine,176,129,176,133, 'fill'=>outline, 'tags'=>['floor3','bg'])
290  w.create(TkcLine,315,133,176,133, 'fill'=>outline, 'tags'=>['floor3','bg'])
291  w.create(TkcLine,315,133,315,129, 'fill'=>outline, 'tags'=>['floor3','bg'])
292  w.create(TkcLine,399,129,315,129, 'fill'=>outline, 'tags'=>['floor3','bg'])
293  w.create(TkcLine,399,311,399,129, 'fill'=>outline, 'tags'=>['floor3','bg'])
294  w.create(TkcLine,399,311,350,311, 'fill'=>outline, 'tags'=>['floor3','bg'])
295  w.create(TkcLine,350,329,350,311, 'fill'=>outline, 'tags'=>['floor3','bg'])
296  w.create(TkcLine,350,329,258,329, 'fill'=>outline, 'tags'=>['floor3','bg'])
297  w.create(TkcLine,258,370,258,329, 'fill'=>outline, 'tags'=>['floor3','bg'])
298  w.create(TkcLine,60,370,258,370, 'fill'=>outline, 'tags'=>['floor3','bg'])
299  w.create(TkcLine,60,370,60,391, 'fill'=>outline, 'tags'=>['floor3','bg'])
300  w.create(TkcLine,60,391,0,391, 'fill'=>outline, 'tags'=>['floor3','bg'])
301  w.create(TkcLine,0,391,0,331, 'fill'=>outline, 'tags'=>['floor3','bg'])
302  w.create(TkcLine,21,331,0,331, 'fill'=>outline, 'tags'=>['floor3','bg'])
303  w.create(TkcLine,21,331,21,133, 'fill'=>outline, 'tags'=>['floor3','bg'])
304  w.create(TkcLine,96,133,21,133, 'fill'=>outline, 'tags'=>['floor3','bg'])
305  w.create(TkcLine,107,300,159,300,159,248,107,248,107,300,
306              'fill'=>outline, 'tags'=>['floor3','bg'])
307end
308
309# floor2_fg1 --
310# This method represents part of the floorplan database.  When
311# invoked, it instantiates the foreground information for the first
312# floor (office outlines and numbers).
313#
314# Arguments:
315# w -           The canvas window.
316# color -       Color to use for drawing foreground information.
317
318def floor2_fg1(w,color)
319  i = TkcPolygon.new(w,375,246,375,172,341,172,341,246,
320                     'fill'=>'', 'tags'=>['floor1','room'])
321  $floorLabels2[i.id] = '101'
322  $floorItems2['101'] = i
323  w.create(TkcText,358,209, 'text'=>'101', 'fill'=>color,
324              'anchor'=>'c', 'tags'=>['floor1','label'])
325  i = TkcPolygon.new(w,307,240,339,240,339,206,307,206,
326                     'fill'=>'', 'tags'=>['floor1','room'])
327  $floorLabels2[i.id] = 'Pub Lift1'
328  $floorItems2['Pub Lift1'] = i
329  w.create(TkcText,323,223, 'text'=>'Pub Lift1', 'fill'=>color,
330              'anchor'=>'c', 'tags'=>['floor1','label'])
331  i = TkcPolygon.new(w,339,205,307,205,307,171,339,171,
332                     'fill'=>'', 'tags'=>['floor1','room'])
333  $floorLabels2[i.id] = 'Priv Lift1'
334  $floorItems2['Priv Lift1'] = i
335  w.create(TkcText,323,188, 'text'=>'Priv Lift1', 'fill'=>color,
336              'anchor'=>'c', 'tags'=>['floor1','label'])
337  i = TkcPolygon.new(w,42,389,42,337,1,337,1,389,
338                     'fill'=>'', 'tags'=>['floor1','room'])
339  $floorLabels2[i.id] = '110'
340  $floorItems2['110'] = i
341  w.create(TkcText,21.5,363, 'text'=>'110', 'fill'=>color,
342              'anchor'=>'c', 'tags'=>['floor1','label'])
343  i = TkcPolygon.new(w,59,389,59,385,90,385,90,337,44,337,44,389,
344                     'fill'=>'', 'tags'=>['floor1','room'])
345  $floorLabels2[i.id] = '109'
346  $floorItems2['109'] = i
347  w.create(TkcText,67,363, 'text'=>'109', 'fill'=>color,
348              'anchor'=>'c', 'tags'=>['floor1','label'])
349  i = TkcPolygon.new(w,51,300,51,253,6,253,6,300,
350                     'fill'=>'', 'tags'=>['floor1','room'])
351  $floorLabels2[i.id] = '111'
352  $floorItems2['111'] = i
353  w.create(TkcText,28.5,276.5, 'text'=>'111', 'fill'=>color,
354              'anchor'=>'c', 'tags'=>['floor1','label'])
355  i = TkcPolygon.new(w,98,248,98,309,79,309,79,248,
356                     'fill'=>'', 'tags'=>['floor1','room'])
357  $floorLabels2[i.id] = '117B'
358  $floorItems2['117B'] = i
359  w.create(TkcText,88.5,278.5, 'text'=>'117B', 'fill'=>color,
360              'anchor'=>'c', 'tags'=>['floor1','label'])
361  i = TkcPolygon.new(w,51,251,51,204,6,204,6,251,
362                     'fill'=>'', 'tags'=>['floor1','room'])
363  $floorLabels2[i.id] = '112'
364  $floorItems2['112'] = i
365  w.create(TkcText,28.5,227.5, 'text'=>'112', 'fill'=>color,
366              'anchor'=>'c', 'tags'=>['floor1','label'])
367  i = TkcPolygon.new(w,6,156,51,156,51,203,6,203,
368                     'fill'=>'', 'tags'=>['floor1','room'])
369  $floorLabels2[i.id] = '113'
370  $floorItems2['113'] = i
371  w.create(TkcText,28.5,179.5, 'text'=>'113', 'fill'=>color,
372              'anchor'=>'c', 'tags'=>['floor1','label'])
373  i = TkcPolygon.new(w,85,169,79,169,79,192,85,192,
374                     'fill'=>'', 'tags'=>['floor1','room'])
375  $floorLabels2[i.id] = '117A'
376  $floorItems2['117A'] = i
377  w.create(TkcText,82,180.5, 'text'=>'117A', 'fill'=>color,
378              'anchor'=>'c', 'tags'=>['floor1','label'])
379  i = TkcPolygon.new(w,77,302,77,168,53,168,53,302,
380                     'fill'=>'', 'tags'=>['floor1','room'])
381  $floorLabels2[i.id] = '117'
382  $floorItems2['117'] = i
383  w.create(TkcText,65,235, 'text'=>'117', 'fill'=>color,
384              'anchor'=>'c', 'tags'=>['floor1','label'])
385  i = TkcPolygon.new(w,51,155,51,115,6,115,6,155,
386                     'fill'=>'', 'tags'=>['floor1','room'])
387  $floorLabels2[i.id] = '114'
388  $floorItems2['114'] = i
389  w.create(TkcText,28.5,135, 'text'=>'114', 'fill'=>color,
390              'anchor'=>'c', 'tags'=>['floor1','label'])
391  i = TkcPolygon.new(w,95,115,53,115,53,168,95,168,
392                     'fill'=>'', 'tags'=>['floor1','room'])
393  $floorLabels2[i.id] = '115'
394  $floorItems2['115'] = i
395  w.create(TkcText,74,141.5, 'text'=>'115', 'fill'=>color,
396              'anchor'=>'c', 'tags'=>['floor1','label'])
397  i = TkcPolygon.new(w,87,113,87,27,10,27,10,113,
398                     'fill'=>'', 'tags'=>['floor1','room'])
399  $floorLabels2[i.id] = '116'
400  $floorItems2['116'] = i
401  w.create(TkcText,48.5,70, 'text'=>'116', 'fill'=>color,
402              'anchor'=>'c', 'tags'=>['floor1','label'])
403  i = TkcPolygon.new(w,89,91,128,91,128,113,89,131,
404                     'fill'=>'', 'tags'=>['floor1','room'])
405  $floorLabels2[i.id] = '118'
406  $floorItems2['118'] = i
407  w.create(TkcText,108.5,102, 'text'=>'118', 'fill'=>color,
408              'anchor'=>'c', 'tags'=>['floor1','label'])
409  i = TkcPolygon.new(w,178,128,178,132,216,132,216,91,
410                     163,91,163,112,149,112,149,128,
411                     'fill'=>'', 'tags'=>['floor1','room'])
412  $floorLabels2[i.id] = '120'
413  $floorItems2['120'] = i
414  w.create(TkcText,189.5,111.5, 'text'=>'120', 'fill'=>color,
415              'anchor'=>'c', 'tags'=>['floor1','label'])
416  i = TkcPolygon.new(w,79,193,87,193,87,169,136,169,136,192,
417                     156,192,156,169,175,169,175,246,79,246,
418                     'fill'=>'', 'tags'=>['floor1','room'])
419  $floorLabels2[i.id] = '122'
420  $floorItems2['122'] = i
421  w.create(TkcText,131,207.5, 'text'=>'122', 'fill'=>color,
422              'anchor'=>'c', 'tags'=>['floor1','label'])
423  i = TkcPolygon.new(w,138,169,154,169,154,191,138,191,
424                     'fill'=>'', 'tags'=>['floor1','room'])
425  $floorLabels2[i.id] = '121'
426  $floorItems2['121'] = i
427  w.create(TkcText,146,180, 'text'=>'121', 'fill'=>color,
428              'anchor'=>'c', 'tags'=>['floor1','label'])
429  i = TkcPolygon.new(w,99,300,126,300,126,309,99,309,
430                     'fill'=>'', 'tags'=>['floor1','room'])
431  $floorLabels2[i.id] = '106A'
432  $floorItems2['106A'] = i
433  w.create(TkcText,112.5,304.5, 'text'=>'106A', 'fill'=>color,
434              'anchor'=>'c', 'tags'=>['floor1','label'])
435  i = TkcPolygon.new(w,128,299,128,309,150,309,150,248,99,248,99,299,
436                     'fill'=>'', 'tags'=>['floor1','room'])
437  $floorLabels2[i.id] = '105'
438  $floorItems2['105'] = i
439  w.create(TkcText,124.5,278.5, 'text'=>'105', 'fill'=>color,
440              'anchor'=>'c', 'tags'=>['floor1','label'])
441  i = TkcPolygon.new(w,174,309,174,300,152,300,152,309,
442                     'fill'=>'', 'tags'=>['floor1','room'])
443  $floorLabels2[i.id] = '106B'
444  $floorItems2['106B'] = i
445  w.create(TkcText,163,304.5, 'text'=>'106B', 'fill'=>color,
446              'anchor'=>'c', 'tags'=>['floor1','label'])
447  i = TkcPolygon.new(w,176,299,176,309,216,309,216,248,152,248,152,299,
448                     'fill'=>'', 'tags'=>['floor1','room'])
449  $floorLabels2[i.id] = '104'
450  $floorItems2['104'] = i
451  w.create(TkcText,184,278.5, 'text'=>'104', 'fill'=>color,
452              'anchor'=>'c', 'tags'=>['floor1','label'])
453  i = TkcPolygon.new(w,138,385,138,337,91,337,91,385,
454                     'fill'=>'', 'tags'=>['floor1','room'])
455  $floorLabels2[i.id] = '108'
456  $floorItems2['108'] = i
457  w.create(TkcText,114.5,361, 'text'=>'108', 'fill'=>color,
458              'anchor'=>'c', 'tags'=>['floor1','label'])
459  i = TkcPolygon.new(w,256,337,140,337,140,385,256,385,
460                     'fill'=>'', 'tags'=>['floor1','room'])
461  $floorLabels2[i.id] = '107'
462  $floorItems2['107'] = i
463  w.create(TkcText,198,361, 'text'=>'107', 'fill'=>color,
464              'anchor'=>'c', 'tags'=>['floor1','label'])
465  i = TkcPolygon.new(w,300,353,300,329,260,329,260,353,
466                     'fill'=>'', 'tags'=>['floor1','room'])
467  $floorLabels2[i.id] = 'Smoking'
468  $floorItems2['Smoking'] = i
469  w.create(TkcText,280,341, 'text'=>'Smoking', 'fill'=>color,
470              'anchor'=>'c', 'tags'=>['floor1','label'])
471  i = TkcPolygon.new(w,314,135,314,170,306,170,306,246,177,246,177,135,
472                     'fill'=>'', 'tags'=>['floor1','room'])
473  $floorLabels2[i.id] = '123'
474  $floorItems2['123'] = i
475  w.create(TkcText,245.5,190.5, 'text'=>'123', 'fill'=>color,
476              'anchor'=>'c', 'tags'=>['floor1','label'])
477  i = TkcPolygon.new(w,217,248,301,248,301,326,257,326,257,310,217,310,
478                     'fill'=>'', 'tags'=>['floor1','room'])
479  $floorLabels2[i.id] = '103'
480  $floorItems2['103'] = i
481  w.create(TkcText,259,287, 'text'=>'103', 'fill'=>color,
482              'anchor'=>'c', 'tags'=>['floor1','label'])
483  i = TkcPolygon.new(w,396,188,377,188,377,169,316,169,316,131,396,131,
484                     'fill'=>'', 'tags'=>['floor1','room'])
485  $floorLabels2[i.id] = '124'
486  $floorItems2['124'] = i
487  w.create(TkcText,356,150, 'text'=>'124', 'fill'=>color,
488              'anchor'=>'c', 'tags'=>['floor1','label'])
489  i = TkcPolygon.new(w,397,226,407,226,407,189,377,189,377,246,397,246,
490                     'fill'=>'', 'tags'=>['floor1','room'])
491  $floorLabels2[i.id] = '125'
492  $floorItems2['125'] = i
493  w.create(TkcText,392,217.5, 'text'=>'125', 'fill'=>color,
494              'anchor'=>'c', 'tags'=>['floor1','label'])
495  i = TkcPolygon.new(w,399,187,409,187,409,207,474,207,474,164,399,164,
496                     'fill'=>'', 'tags'=>['floor1','room'])
497  $floorLabels2[i.id] = '126'
498  $floorItems2['126'] = i
499  w.create(TkcText,436.5,185.5, 'text'=>'126', 'fill'=>color,
500              'anchor'=>'c', 'tags'=>['floor1','label'])
501  i = TkcPolygon.new(w,409,209,409,229,399,229,399,253,
502                     486,253,486,239,474,239,474,209,
503                     'fill'=>'', 'tags'=>['floor1','room'])
504  $floorLabels2[i.id] = '127'
505  $floorItems2['127'] = i
506  w.create(TkcText,436.5,'231', 'text'=>'127', 'fill'=>color,
507              'anchor'=>'c', 'tags'=>['floor1','label'])
508  i = TkcPolygon.new(w,501,164,501,174,495,174,495,188,
509                     490,188,490,204,476,204,476,164,
510                     'fill'=>'', 'tags'=>['floor1','room'])
511  $floorLabels2[i.id] = 'MShower'
512  $floorItems2['MShower'] = i
513  w.create(TkcText,488.5,'184', 'text'=>'MShower', 'fill'=>color,
514              'anchor'=>'c', 'tags'=>['floor1','label'])
515  i = TkcPolygon.new(w,497,176,513,176,513,204,492,204,492,190,497,190,
516                     'fill'=>'', 'tags'=>['floor1','room'])
517  $floorLabels2[i.id] = 'Closet'
518  $floorItems2['Closet'] = i
519  w.create(TkcText,502.5,190, 'text'=>'Closet', 'fill'=>color,
520              'anchor'=>'c', 'tags'=>['floor1','label'])
521  i = TkcPolygon.new(w,476,237,476,206,513,206,513,254,488,254,488,237,
522                     'fill'=>'', 'tags'=>['floor1','room'])
523  $floorLabels2[i.id] = 'WShower'
524  $floorItems2['WShower'] = i
525  w.create(TkcText,494.5,230, 'text'=>'WShower', 'fill'=>color,
526              'anchor'=>'c', 'tags'=>['floor1','label'])
527  i = TkcPolygon.new(w,486,131,558,131,558,135,724,135,724,166,
528                     697,166,697,275,553,275,531,254,515,254,
529                     515,174,503,174,503,161,486,161,
530                     'fill'=>'', 'tags'=>['floor1','room'])
531  $floorLabels2[i.id] = '130'
532  $floorItems2['130'] = i
533  w.create(TkcText,638.5,205, 'text'=>'130', 'fill'=>color,
534              'anchor'=>'c', 'tags'=>['floor1','label'])
535  i = TkcPolygon.new(w,308,242,339,242,339,248,342,248,
536                     342,246,397,246,397,276,393,276,
537                     393,309,300,309,300,248,308,248,
538                     'fill'=>'', 'tags'=>['floor1','room'])
539  $floorLabels2[i.id] = '102'
540  $floorItems2['102'] = i
541  w.create(TkcText,367.5,278.5, 'text'=>'102', 'fill'=>color,
542              'anchor'=>'c', 'tags'=>['floor1','label'])
543  i = TkcPolygon.new(w,397,255,486,255,486,276,397,276,
544                     'fill'=>'', 'tags'=>['floor1','room'])
545  $floorLabels2[i.id] = '128'
546  $floorItems2['128'] = i
547  w.create(TkcText,441.5,265.5, 'text'=>'128', 'fill'=>color,
548              'anchor'=>'c', 'tags'=>['floor1','label'])
549  i = TkcPolygon.new(w,510,309,486,309,486,255,530,255,
550                     552,277,561,277,561,325,510,325,
551                     'fill'=>'', 'tags'=>['floor1','room'])
552  $floorLabels2[i.id] = '129'
553  $floorItems2['129'] = i
554  w.create(TkcText,535.5,293, 'text'=>'129', 'fill'=>color,
555              'anchor'=>'c', 'tags'=>['floor1','label'])
556  i = TkcPolygon.new(w,696,281,740,281,740,387,642,387,
557                     642,389,561,389,561,277,696,277,
558                     'fill'=>'', 'tags'=>['floor1','room'])
559  $floorLabels2[i.id] = '133'
560  $floorItems2['133'] = i
561  w.create(TkcText,628.5,335, 'text'=>'133', 'fill'=>color,
562              'anchor'=>'c', 'tags'=>['floor1','label'])
563  i = TkcPolygon.new(w,742,387,742,281,800,281,800,387,
564                     'fill'=>'', 'tags'=>['floor1','room'])
565  $floorLabels2[i.id] = '132'
566  $floorItems2['132'] = i
567  w.create(TkcText,771,334, 'text'=>'132', 'fill'=>color,
568              'anchor'=>'c', 'tags'=>['floor1','label'])
569  i = TkcPolygon.new(w,800,168,800,280,699,280,699,168,
570                     'fill'=>'', 'tags'=>['floor1','room'])
571  $floorLabels2[i.id] = '134'
572  $floorItems2['134'] = i
573  w.create(TkcText,749.5,224, 'text'=>'134', 'fill'=>color,
574              'anchor'=>'c', 'tags'=>['floor1','label'])
575  i = TkcPolygon.new(w,726,131,726,166,800,166,800,131,
576                     'fill'=>'', 'tags'=>['floor1','room'])
577  $floorLabels2[i.id] = '135'
578  $floorItems2['135'] = i
579  w.create(TkcText,763,148.5, 'text'=>'135', 'fill'=>color,
580              'anchor'=>'c', 'tags'=>['floor1','label'])
581  i = TkcPolygon.new(w,340,360,335,363,331,365,326,366,304,366,
582                     304,312,396,312,396,288,400,288,404,288,
583                     409,290,413,292,418,297,421,302,422,309,
584                     421,318,417,325,411,330,405,332,397,333,
585                     344,333,340,334,336,336,335,338,332,342,
586                     331,347,332,351,334,354,336,357,341,359,
587                     'fill'=>'', 'tags'=>['floor1','room'])
588  $floorLabels2[i.id] = 'Ramona Stair'
589  $floorItems2['Ramona Stair'] = i
590  w.create(TkcText,368,323, 'text'=>'Ramona Stair', 'fill'=>color,
591              'anchor'=>'c', 'tags'=>['floor1','label'])
592  i = TkcPolygon.new(w,30,23,30,5,93,5,98,5,104,7,110,10,116,16,119,20,
593                     122,28,123,32,123,68,220,68,220,87,90,87,90,23,
594                     'fill'=>'', 'tags'=>['floor1','room'])
595  $floorLabels2[i.id] = 'University Stair'
596  $floorItems2['University Stair'] = i
597  w.create(TkcText,155,77.5, 'text'=>'University Stair', 'fill'=>color,
598              'anchor'=>'c', 'tags'=>['floor1','label'])
599  i = TkcPolygon.new(w,282,37,295,40,312,49,323,56,337,70,352,56,
600                     358,48,363,39,365,29,348,25,335,22,321,14,
601                     300,5,283,1,260,0,246,0,242,2,236,4,231,8,
602                     227,13,223,17,221,22,220,34,260,34,
603                     'fill'=>'', 'tags'=>['floor1','room'])
604  $floorLabels2[i.id] = 'Plaza Stair'
605  $floorItems2['Plaza Stair'] = i
606  w.create(TkcText,317.5,28.5, 'text'=>'Plaza Stair', 'fill'=>color,
607              'anchor'=>'c', 'tags'=>['floor1','label'])
608  i = TkcPolygon.new(w,220,34,260,34,282,37,295,40,312,49,
609                     323,56,337,70,350,83,365,94,377,100,
610                     386,104,386,128,220,128,
611                     'fill'=>'', 'tags'=>['floor1','room'])
612  $floorLabels2[i.id] = 'Plaza Deck'
613  $floorItems2['Plaza Deck'] = i
614  w.create(TkcText,303,81, 'text'=>'Plaza Deck', 'fill'=>color,
615              'anchor'=>'c', 'tags'=>['floor1','label'])
616  i = TkcPolygon.new(w,257,336,77,336,6,336,6,301,77,301,77,310,257,310,
617                     'fill'=>'', 'tags'=>['floor1','room'])
618  $floorLabels2[i.id] = '106'
619  $floorItems2['106'] = i
620  w.create(TkcText,131.5,318.5, 'text'=>'106', 'fill'=>color,
621              'anchor'=>'c', 'tags'=>['floor1','label'])
622  i = TkcPolygon.new(w,146,110,162,110,162,91,130,91,130,115,95,115,
623                     95,128,114,128,114,151,157,151,157,153,112,153,
624                     112,130,97,130,97,168,175,168,175,131,146,131,
625                     'fill'=>'', 'tags'=>['floor1','room'])
626  $floorLabels2[i.id] = '119'
627  $floorItems2['119'] = i
628  w.create(TkcText,143.5,133, 'text'=>'119', 'fill'=>color,
629              'anchor'=>'c', 'tags'=>['floor1','label'])
630  w.create(TkcLine,155,191,155,189, 'fill'=>color, 'tags'=>['floor1','wall'])
631  w.create(TkcLine,155,177,155,169, 'fill'=>color, 'tags'=>['floor1','wall'])
632  w.create(TkcLine,96,129,96,169, 'fill'=>color, 'tags'=>['floor1','wall'])
633  w.create(TkcLine,78,169,176,169, 'fill'=>color, 'tags'=>['floor1','wall'])
634  w.create(TkcLine,176,247,176,129, 'fill'=>color, 'tags'=>['floor1','wall'])
635  w.create(TkcLine,340,206,307,206, 'fill'=>color, 'tags'=>['floor1','wall'])
636  w.create(TkcLine,340,187,340,170, 'fill'=>color, 'tags'=>['floor1','wall'])
637  w.create(TkcLine,340,210,340,201, 'fill'=>color, 'tags'=>['floor1','wall'])
638  w.create(TkcLine,340,247,340,224, 'fill'=>color, 'tags'=>['floor1','wall'])
639  w.create(TkcLine,340,241,307,241, 'fill'=>color, 'tags'=>['floor1','wall'])
640  w.create(TkcLine,376,246,376,170, 'fill'=>color, 'tags'=>['floor1','wall'])
641  w.create(TkcLine,307,247,307,170, 'fill'=>color, 'tags'=>['floor1','wall'])
642  w.create(TkcLine,376,170,307,170, 'fill'=>color, 'tags'=>['floor1','wall'])
643  w.create(TkcLine,315,129,315,170, 'fill'=>color, 'tags'=>['floor1','wall'])
644  w.create(TkcLine,147,129,176,129, 'fill'=>color, 'tags'=>['floor1','wall'])
645  w.create(TkcLine,202,133,176,133, 'fill'=>color, 'tags'=>['floor1','wall'])
646  w.create(TkcLine,398,129,315,129, 'fill'=>color, 'tags'=>['floor1','wall'])
647  w.create(TkcLine,258,352,258,387, 'fill'=>color, 'tags'=>['floor1','wall'])
648  w.create(TkcLine,60,387,60,391, 'fill'=>color, 'tags'=>['floor1','wall'])
649  w.create(TkcLine,0,337,0,391, 'fill'=>color, 'tags'=>['floor1','wall'])
650  w.create(TkcLine,60,391,0,391, 'fill'=>color, 'tags'=>['floor1','wall'])
651  w.create(TkcLine,3,114,3,337, 'fill'=>color, 'tags'=>['floor1','wall'])
652  w.create(TkcLine,258,387,60,387, 'fill'=>color, 'tags'=>['floor1','wall'])
653  w.create(TkcLine,52,237,52,273, 'fill'=>color, 'tags'=>['floor1','wall'])
654  w.create(TkcLine,52,189,52,225, 'fill'=>color, 'tags'=>['floor1','wall'])
655  w.create(TkcLine,52,140,52,177, 'fill'=>color, 'tags'=>['floor1','wall'])
656  w.create(TkcLine,395,306,395,311, 'fill'=>color, 'tags'=>['floor1','wall'])
657  w.create(TkcLine,531,254,398,254, 'fill'=>color, 'tags'=>['floor1','wall'])
658  w.create(TkcLine,475,178,475,238, 'fill'=>color, 'tags'=>['floor1','wall'])
659  w.create(TkcLine,502,162,398,162, 'fill'=>color, 'tags'=>['floor1','wall'])
660  w.create(TkcLine,398,129,398,188, 'fill'=>color, 'tags'=>['floor1','wall'])
661  w.create(TkcLine,383,188,376,188, 'fill'=>color, 'tags'=>['floor1','wall'])
662  w.create(TkcLine,408,188,408,194, 'fill'=>color, 'tags'=>['floor1','wall'])
663  w.create(TkcLine,398,227,398,254, 'fill'=>color, 'tags'=>['floor1','wall'])
664  w.create(TkcLine,408,227,398,227, 'fill'=>color, 'tags'=>['floor1','wall'])
665  w.create(TkcLine,408,222,408,227, 'fill'=>color, 'tags'=>['floor1','wall'])
666  w.create(TkcLine,408,206,408,210, 'fill'=>color, 'tags'=>['floor1','wall'])
667  w.create(TkcLine,408,208,475,208, 'fill'=>color, 'tags'=>['floor1','wall'])
668  w.create(TkcLine,484,278,484,311, 'fill'=>color, 'tags'=>['floor1','wall'])
669  w.create(TkcLine,484,311,508,311, 'fill'=>color, 'tags'=>['floor1','wall'])
670  w.create(TkcLine,508,327,508,311, 'fill'=>color, 'tags'=>['floor1','wall'])
671  w.create(TkcLine,559,327,508,327, 'fill'=>color, 'tags'=>['floor1','wall'])
672  w.create(TkcLine,644,391,559,391, 'fill'=>color, 'tags'=>['floor1','wall'])
673  w.create(TkcLine,644,389,644,391, 'fill'=>color, 'tags'=>['floor1','wall'])
674  w.create(TkcLine,514,205,475,205, 'fill'=>color, 'tags'=>['floor1','wall'])
675  w.create(TkcLine,496,189,496,187, 'fill'=>color, 'tags'=>['floor1','wall'])
676  w.create(TkcLine,559,129,484,129, 'fill'=>color, 'tags'=>['floor1','wall'])
677  w.create(TkcLine,484,162,484,129, 'fill'=>color, 'tags'=>['floor1','wall'])
678  w.create(TkcLine,725,133,559,133, 'fill'=>color, 'tags'=>['floor1','wall'])
679  w.create(TkcLine,559,129,559,133, 'fill'=>color, 'tags'=>['floor1','wall'])
680  w.create(TkcLine,725,149,725,167, 'fill'=>color, 'tags'=>['floor1','wall'])
681  w.create(TkcLine,725,129,802,129, 'fill'=>color, 'tags'=>['floor1','wall'])
682  w.create(TkcLine,802,389,802,129, 'fill'=>color, 'tags'=>['floor1','wall'])
683  w.create(TkcLine,739,167,802,167, 'fill'=>color, 'tags'=>['floor1','wall'])
684  w.create(TkcLine,396,188,408,188, 'fill'=>color, 'tags'=>['floor1','wall'])
685  w.create(TkcLine,0,337,9,337, 'fill'=>color, 'tags'=>['floor1','wall'])
686  w.create(TkcLine,58,337,21,337, 'fill'=>color, 'tags'=>['floor1','wall'])
687  w.create(TkcLine,43,391,43,337, 'fill'=>color, 'tags'=>['floor1','wall'])
688  w.create(TkcLine,105,337,75,337, 'fill'=>color, 'tags'=>['floor1','wall'])
689  w.create(TkcLine,91,387,91,337, 'fill'=>color, 'tags'=>['floor1','wall'])
690  w.create(TkcLine,154,337,117,337, 'fill'=>color, 'tags'=>['floor1','wall'])
691  w.create(TkcLine,139,387,139,337, 'fill'=>color, 'tags'=>['floor1','wall'])
692  w.create(TkcLine,227,337,166,337, 'fill'=>color, 'tags'=>['floor1','wall'])
693  w.create(TkcLine,258,337,251,337, 'fill'=>color, 'tags'=>['floor1','wall'])
694  w.create(TkcLine,258,328,302,328, 'fill'=>color, 'tags'=>['floor1','wall'])
695  w.create(TkcLine,302,355,302,311, 'fill'=>color, 'tags'=>['floor1','wall'])
696  w.create(TkcLine,395,311,302,311, 'fill'=>color, 'tags'=>['floor1','wall'])
697  w.create(TkcLine,484,278,395,278, 'fill'=>color, 'tags'=>['floor1','wall'])
698  w.create(TkcLine,395,294,395,278, 'fill'=>color, 'tags'=>['floor1','wall'])
699  w.create(TkcLine,473,278,473,275, 'fill'=>color, 'tags'=>['floor1','wall'])
700  w.create(TkcLine,473,256,473,254, 'fill'=>color, 'tags'=>['floor1','wall'])
701  w.create(TkcLine,533,257,531,254, 'fill'=>color, 'tags'=>['floor1','wall'])
702  w.create(TkcLine,553,276,551,274, 'fill'=>color, 'tags'=>['floor1','wall'])
703  w.create(TkcLine,698,276,553,276, 'fill'=>color, 'tags'=>['floor1','wall'])
704  w.create(TkcLine,559,391,559,327, 'fill'=>color, 'tags'=>['floor1','wall'])
705  w.create(TkcLine,802,389,644,389, 'fill'=>color, 'tags'=>['floor1','wall'])
706  w.create(TkcLine,741,314,741,389, 'fill'=>color, 'tags'=>['floor1','wall'])
707  w.create(TkcLine,698,280,698,167, 'fill'=>color, 'tags'=>['floor1','wall'])
708  w.create(TkcLine,707,280,698,280, 'fill'=>color, 'tags'=>['floor1','wall'])
709  w.create(TkcLine,802,280,731,280, 'fill'=>color, 'tags'=>['floor1','wall'])
710  w.create(TkcLine,741,280,741,302, 'fill'=>color, 'tags'=>['floor1','wall'])
711  w.create(TkcLine,698,167,727,167, 'fill'=>color, 'tags'=>['floor1','wall'])
712  w.create(TkcLine,725,137,725,129, 'fill'=>color, 'tags'=>['floor1','wall'])
713  w.create(TkcLine,514,254,514,175, 'fill'=>color, 'tags'=>['floor1','wall'])
714  w.create(TkcLine,496,175,514,175, 'fill'=>color, 'tags'=>['floor1','wall'])
715  w.create(TkcLine,502,175,502,162, 'fill'=>color, 'tags'=>['floor1','wall'])
716  w.create(TkcLine,475,166,475,162, 'fill'=>color, 'tags'=>['floor1','wall'])
717  w.create(TkcLine,496,176,496,175, 'fill'=>color, 'tags'=>['floor1','wall'])
718  w.create(TkcLine,491,189,496,189, 'fill'=>color, 'tags'=>['floor1','wall'])
719  w.create(TkcLine,491,205,491,189, 'fill'=>color, 'tags'=>['floor1','wall'])
720  w.create(TkcLine,487,238,475,238, 'fill'=>color, 'tags'=>['floor1','wall'])
721  w.create(TkcLine,487,240,487,238, 'fill'=>color, 'tags'=>['floor1','wall'])
722  w.create(TkcLine,487,252,487,254, 'fill'=>color, 'tags'=>['floor1','wall'])
723  w.create(TkcLine,315,133,304,133, 'fill'=>color, 'tags'=>['floor1','wall'])
724  w.create(TkcLine,256,133,280,133, 'fill'=>color, 'tags'=>['floor1','wall'])
725  w.create(TkcLine,78,247,270,247, 'fill'=>color, 'tags'=>['floor1','wall'])
726  w.create(TkcLine,307,247,294,247, 'fill'=>color, 'tags'=>['floor1','wall'])
727  w.create(TkcLine,214,133,232,133, 'fill'=>color, 'tags'=>['floor1','wall'])
728  w.create(TkcLine,217,247,217,266, 'fill'=>color, 'tags'=>['floor1','wall'])
729  w.create(TkcLine,217,309,217,291, 'fill'=>color, 'tags'=>['floor1','wall'])
730  w.create(TkcLine,217,309,172,309, 'fill'=>color, 'tags'=>['floor1','wall'])
731  w.create(TkcLine,154,309,148,309, 'fill'=>color, 'tags'=>['floor1','wall'])
732  w.create(TkcLine,175,300,175,309, 'fill'=>color, 'tags'=>['floor1','wall'])
733  w.create(TkcLine,151,300,175,300, 'fill'=>color, 'tags'=>['floor1','wall'])
734  w.create(TkcLine,151,247,151,309, 'fill'=>color, 'tags'=>['floor1','wall'])
735  w.create(TkcLine,78,237,78,265, 'fill'=>color, 'tags'=>['floor1','wall'])
736  w.create(TkcLine,78,286,78,309, 'fill'=>color, 'tags'=>['floor1','wall'])
737  w.create(TkcLine,106,309,78,309, 'fill'=>color, 'tags'=>['floor1','wall'])
738  w.create(TkcLine,130,309,125,309, 'fill'=>color, 'tags'=>['floor1','wall'])
739  w.create(TkcLine,99,309,99,247, 'fill'=>color, 'tags'=>['floor1','wall'])
740  w.create(TkcLine,127,299,99,299, 'fill'=>color, 'tags'=>['floor1','wall'])
741  w.create(TkcLine,127,309,127,299, 'fill'=>color, 'tags'=>['floor1','wall'])
742  w.create(TkcLine,155,191,137,191, 'fill'=>color, 'tags'=>['floor1','wall'])
743  w.create(TkcLine,137,169,137,191, 'fill'=>color, 'tags'=>['floor1','wall'])
744  w.create(TkcLine,78,171,78,169, 'fill'=>color, 'tags'=>['floor1','wall'])
745  w.create(TkcLine,78,190,78,218, 'fill'=>color, 'tags'=>['floor1','wall'])
746  w.create(TkcLine,86,192,86,169, 'fill'=>color, 'tags'=>['floor1','wall'])
747  w.create(TkcLine,86,192,78,192, 'fill'=>color, 'tags'=>['floor1','wall'])
748  w.create(TkcLine,52,301,3,301, 'fill'=>color, 'tags'=>['floor1','wall'])
749  w.create(TkcLine,52,286,52,301, 'fill'=>color, 'tags'=>['floor1','wall'])
750  w.create(TkcLine,52,252,3,252, 'fill'=>color, 'tags'=>['floor1','wall'])
751  w.create(TkcLine,52,203,3,203, 'fill'=>color, 'tags'=>['floor1','wall'])
752  w.create(TkcLine,3,156,52,156, 'fill'=>color, 'tags'=>['floor1','wall'])
753  w.create(TkcLine,8,25,8,114, 'fill'=>color, 'tags'=>['floor1','wall'])
754  w.create(TkcLine,63,114,3,114, 'fill'=>color, 'tags'=>['floor1','wall'])
755  w.create(TkcLine,75,114,97,114, 'fill'=>color, 'tags'=>['floor1','wall'])
756  w.create(TkcLine,108,114,129,114, 'fill'=>color, 'tags'=>['floor1','wall'])
757  w.create(TkcLine,129,114,129,89, 'fill'=>color, 'tags'=>['floor1','wall'])
758  w.create(TkcLine,52,114,52,128, 'fill'=>color, 'tags'=>['floor1','wall'])
759  w.create(TkcLine,132,89,88,89, 'fill'=>color, 'tags'=>['floor1','wall'])
760  w.create(TkcLine,88,25,88,89, 'fill'=>color, 'tags'=>['floor1','wall'])
761  w.create(TkcLine,88,114,88,89, 'fill'=>color, 'tags'=>['floor1','wall'])
762  w.create(TkcLine,218,89,144,89, 'fill'=>color, 'tags'=>['floor1','wall'])
763  w.create(TkcLine,147,111,147,129, 'fill'=>color, 'tags'=>['floor1','wall'])
764  w.create(TkcLine,162,111,147,111, 'fill'=>color, 'tags'=>['floor1','wall'])
765  w.create(TkcLine,162,109,162,111, 'fill'=>color, 'tags'=>['floor1','wall'])
766  w.create(TkcLine,162,96,162,89, 'fill'=>color, 'tags'=>['floor1','wall'])
767  w.create(TkcLine,218,89,218,94, 'fill'=>color, 'tags'=>['floor1','wall'])
768  w.create(TkcLine,218,89,218,119, 'fill'=>color, 'tags'=>['floor1','wall'])
769  w.create(TkcLine,8,25,88,25, 'fill'=>color, 'tags'=>['floor1','wall'])
770  w.create(TkcLine,258,337,258,328, 'fill'=>color, 'tags'=>['floor1','wall'])
771  w.create(TkcLine,113,129,96,129, 'fill'=>color, 'tags'=>['floor1','wall'])
772  w.create(TkcLine,302,355,258,355, 'fill'=>color, 'tags'=>['floor1','wall'])
773  w.create(TkcLine,386,104,386,129, 'fill'=>color, 'tags'=>['floor1','wall'])
774  w.create(TkcLine,377,100,386,104, 'fill'=>color, 'tags'=>['floor1','wall'])
775  w.create(TkcLine,365,94,377,100, 'fill'=>color, 'tags'=>['floor1','wall'])
776  w.create(TkcLine,350,83,365,94, 'fill'=>color, 'tags'=>['floor1','wall'])
777  w.create(TkcLine,337,70,350,83, 'fill'=>color, 'tags'=>['floor1','wall'])
778  w.create(TkcLine,337,70,323,56, 'fill'=>color, 'tags'=>['floor1','wall'])
779  w.create(TkcLine,312,49,323,56, 'fill'=>color, 'tags'=>['floor1','wall'])
780  w.create(TkcLine,295,40,312,49, 'fill'=>color, 'tags'=>['floor1','wall'])
781  w.create(TkcLine,282,37,295,40, 'fill'=>color, 'tags'=>['floor1','wall'])
782  w.create(TkcLine,260,34,282,37, 'fill'=>color, 'tags'=>['floor1','wall'])
783  w.create(TkcLine,253,34,260,34, 'fill'=>color, 'tags'=>['floor1','wall'])
784  w.create(TkcLine,386,128,386,104, 'fill'=>color, 'tags'=>['floor1','wall'])
785  w.create(TkcLine,113,152,156,152, 'fill'=>color, 'tags'=>['floor1','wall'])
786  w.create(TkcLine,113,152,156,152, 'fill'=>color, 'tags'=>['floor1','wall'])
787  w.create(TkcLine,113,152,113,129, 'fill'=>color, 'tags'=>['floor1','wall'])
788end
789
790# floor2_fg2 --
791# This method represents part of the floorplan database.  When
792# invoked, it instantiates the foreground information for the second
793# floor (office outlines and numbers).
794#
795# Arguments:
796# w -           The canvas window.
797# color -       Color to use for drawing foreground information.
798
799def floor2_fg2(w,color)
800  i = TkcPolygon.new(w,748,188,755,188,755,205,758,205,758,222,
801                     800,222,800,168,748,168,
802                     'fill'=>'', 'tags'=>['floor2','room'])
803  $floorLabels2[i.id] = '238'
804  $floorItems2['238'] = i
805  w.create(TkcText,774,195, 'text'=>'238', 'fill'=>color,
806              'anchor'=>'c', 'tags'=>['floor2','label'])
807  i = TkcPolygon.new(w,726,188,746,188,746,166,800,166,800,131,726,131,
808                     'fill'=>'', 'tags'=>['floor2','room'])
809  $floorLabels2[i.id] = '237'
810  $floorItems2['237'] = i
811  w.create(TkcText,763,148.5, 'text'=>'237', 'fill'=>color,
812              'anchor'=>'c', 'tags'=>['floor2','label'])
813  i = TkcPolygon.new(w,497,187,497,204,559,204,559,324,641,324,
814                     643,324,643,291,641,291,641,205,696,205,
815                     696,291,694,291,694,314,715,314,715,291,
816                     715,205,755,205,755,190,724,190,724,187,
817                     'fill'=>'', 'tags'=>['floor2','room'])
818  $floorLabels2[i.id] = '246'
819  $floorItems2['246'] = i
820  w.create(TkcText,600,264, 'text'=>'246', 'fill'=>color,
821              'anchor'=>'c', 'tags'=>['floor2','label'])
822  i = TkcPolygon.new(w,694,279,643,279,643,314,694,314,
823                     'fill'=>'', 'tags'=>['floor2','room'])
824  $floorLabels2[i.id] = '247'
825  $floorItems2['247'] = i
826  w.create(TkcText,668.5,296.5, 'text'=>'247', 'fill'=>color,
827              'anchor'=>'c', 'tags'=>['floor2','label'])
828  i = TkcPolygon.new(w,232,250,308,250,308,242,339,242,339,246,
829                     397,246,397,255,476,255,476,250,482,250,559,250,
830                     559,274,482,274,482,278,396,278,396,274,232,274,
831                     'fill'=>'', 'tags'=>['floor2','room'])
832  $floorLabels2[i.id] = '202'
833  $floorItems2['202'] = i
834  w.create(TkcText,285.5,260, 'text'=>'202', 'fill'=>color,
835              'anchor'=>'c', 'tags'=>['floor2','label'])
836  i = TkcPolygon.new(w,53,228,53,338,176,338,233,338,233,196,
837                     306,196,306,180,175,180,175,169,156,169,
838                     156,196,176,196,176,228,
839                     'fill'=>'', 'tags'=>['floor2','room'])
840  $floorLabels2[i.id] = '206'
841  $floorItems2['206'] = i
842  w.create(TkcText,143,267, 'text'=>'206', 'fill'=>color,
843              'anchor'=>'c', 'tags'=>['floor2','label'])
844  i = TkcPolygon.new(w,51,277,6,277,6,338,51,338,
845                     'fill'=>'', 'tags'=>['floor2','room'])
846  $floorLabels2[i.id] = '212'
847  $floorItems2['212'] = i
848  w.create(TkcText,28.5,307.5, 'text'=>'212', 'fill'=>color,
849              'anchor'=>'c', 'tags'=>['floor2','label'])
850  i = TkcPolygon.new(w,557,276,486,276,486,309,510,309,510,325,557,325,
851                     'fill'=>'', 'tags'=>['floor2','room'])
852  $floorLabels2[i.id] = '245'
853  $floorItems2['245'] = i
854  w.create(TkcText,521.5,300.5, 'text'=>'245', 'fill'=>color,
855              'anchor'=>'c', 'tags'=>['floor2','label'])
856  i = TkcPolygon.new(w,560,389,599,389,599,326,560,326,
857                     'fill'=>'', 'tags'=>['floor2','room'])
858  $floorLabels2[i.id] = '244'
859  $floorItems2['244'] = i
860  w.create(TkcText,579.5,357.5, 'text'=>'244', 'fill'=>color,
861              'anchor'=>'c', 'tags'=>['floor2','label'])
862  i = TkcPolygon.new(w,601,389,601,326,643,326,643,389,
863                     'fill'=>'', 'tags'=>['floor2','room'])
864  $floorLabels2[i.id] = '243'
865  $floorItems2['243'] = i
866  w.create(TkcText,622,357.5, 'text'=>'243', 'fill'=>color,
867              'anchor'=>'c', 'tags'=>['floor2','label'])
868  i = TkcPolygon.new(w,688,316,645,316,645,365,688,365,
869                     'fill'=>'', 'tags'=>['floor2','room'])
870  $floorLabels2[i.id] = '242'
871  $floorItems2['242'] = i
872  w.create(TkcText,666.5,340.5, 'text'=>'242', 'fill'=>color,
873              'anchor'=>'c', 'tags'=>['floor2','label'])
874  i = TkcPolygon.new(w,802,367,759,367,759,226,802,226,
875                     'fill'=>'', 'tags'=>['floor2','room'])
876  $floorLabels2[i.id] = 'Barbecue Deck'
877  $floorItems2['Barbecue Deck'] = i
878  w.create(TkcText,780.5,296.5, 'text'=>'Barbecue Deck', 'fill'=>color,
879              'anchor'=>'c', 'tags'=>['floor2','label'])
880  i = TkcPolygon.new(w,755,262,755,314,717,314,717,262,
881                     'fill'=>'', 'tags'=>['floor2','room'])
882  $floorLabels2[i.id] = '240'
883  $floorItems2['240'] = i
884  w.create(TkcText,736,288, 'text'=>'240', 'fill'=>color,
885              'anchor'=>'c', 'tags'=>['floor2','label'])
886  i = TkcPolygon.new(w,755,316,689,316,689,365,755,365,
887                     'fill'=>'', 'tags'=>['floor2','room'])
888  $floorLabels2[i.id] = '241'
889  $floorItems2['241'] = i
890  w.create(TkcText,722,340.5, 'text'=>'241', 'fill'=>color,
891              'anchor'=>'c', 'tags'=>['floor2','label'])
892  i = TkcPolygon.new(w,755,206,717,206,717,261,755,261,
893                     'fill'=>'', 'tags'=>['floor2','room'])
894  $floorLabels2[i.id] = '239'
895  $floorItems2['239'] = i
896  w.create(TkcText,736,233.5, 'text'=>'239', 'fill'=>color,
897              'anchor'=>'c', 'tags'=>['floor2','label'])
898  i = TkcPolygon.new(w,695,277,643,277,643,206,695,206,
899                     'fill'=>'', 'tags'=>['floor2','room'])
900  $floorLabels2[i.id] = '248'
901  $floorItems2['248'] = i
902  w.create(TkcText,669,241.5, 'text'=>'248', 'fill'=>color,
903              'anchor'=>'c', 'tags'=>['floor2','label'])
904  i = TkcPolygon.new(w,676,135,676,185,724,185,724,135,
905                     'fill'=>'', 'tags'=>['floor2','room'])
906  $floorLabels2[i.id] = '236'
907  $floorItems2['236'] = i
908  w.create(TkcText,700,160, 'text'=>'236', 'fill'=>color,
909              'anchor'=>'c', 'tags'=>['floor2','label'])
910  i = TkcPolygon.new(w,675,135,635,135,635,145,628,145,628,185,675,185,
911                     'fill'=>'', 'tags'=>['floor2','room'])
912  $floorLabels2[i.id] = '235'
913  $floorItems2['235'] = i
914  w.create(TkcText,651.5,160, 'text'=>'235', 'fill'=>color,
915              'anchor'=>'c', 'tags'=>['floor2','label'])
916  i = TkcPolygon.new(w,626,143,633,143,633,135,572,135,
917                     572,143,579,143,579,185,626,185,
918                     'fill'=>'', 'tags'=>['floor2','room'])
919  $floorLabels2[i.id] = '234'
920  $floorItems2['234'] = i
921  w.create(TkcText,606,160, 'text'=>'234', 'fill'=>color,
922              'anchor'=>'c', 'tags'=>['floor2','label'])
923  i = TkcPolygon.new(w,557,135,571,135,571,145,578,145,
924                     578,185,527,185,527,131,557,131,
925                     'fill'=>'', 'tags'=>['floor2','room'])
926  $floorLabels2[i.id] = '233'
927  $floorItems2['233'] = i
928  w.create(TkcText,552.5,158, 'text'=>'233', 'fill'=>color,
929              'anchor'=>'c', 'tags'=>['floor2','label'])
930  i = TkcPolygon.new(w,476,249,557,249,557,205,476,205,
931                     'fill'=>'', 'tags'=>['floor2','room'])
932  $floorLabels2[i.id] = '230'
933  $floorItems2['230'] = i
934  w.create(TkcText,516.5,227, 'text'=>'230', 'fill'=>color,
935              'anchor'=>'c', 'tags'=>['floor2','label'])
936  i = TkcPolygon.new(w,476,164,486,164,486,131,525,131,525,185,476,185,
937                     'fill'=>'', 'tags'=>['floor2','room'])
938  $floorLabels2[i.id] = '232'
939  $floorItems2['232'] = i
940  w.create(TkcText,500.5,158, 'text'=>'232', 'fill'=>color,
941              'anchor'=>'c', 'tags'=>['floor2','label'])
942  i = TkcPolygon.new(w,476,186,495,186,495,204,476,204,
943                     'fill'=>'', 'tags'=>['floor2','room'])
944  $floorLabels2[i.id] = '229'
945  $floorItems2['229'] = i
946  w.create(TkcText,485.5,195, 'text'=>'229', 'fill'=>color,
947              'anchor'=>'c', 'tags'=>['floor2','label'])
948  i = TkcPolygon.new(w,474,207,409,207,409,187,399,187,399,164,474,164,
949                     'fill'=>'', 'tags'=>['floor2','room'])
950  $floorLabels2[i.id] = '227'
951  $floorItems2['227'] = i
952  w.create(TkcText,436.5,185.5, 'text'=>'227', 'fill'=>color,
953              'anchor'=>'c', 'tags'=>['floor2','label'])
954  i = TkcPolygon.new(w,399,228,399,253,474,253,474,209,409,209,409,228,
955                     'fill'=>'', 'tags'=>['floor2','room'])
956  $floorLabels2[i.id] = '228'
957  $floorItems2['228'] = i
958  w.create(TkcText,436.5,231, 'text'=>'228', 'fill'=>color,
959              'anchor'=>'c', 'tags'=>['floor2','label'])
960  i = TkcPolygon.new(w,397,246,397,226,407,226,407,189,377,189,377,246,
961                     'fill'=>'', 'tags'=>['floor2','room'])
962  $floorLabels2[i.id] = '226'
963  $floorItems2['226'] = i
964  w.create(TkcText,392,217.5, 'text'=>'226', 'fill'=>color,
965              'anchor'=>'c', 'tags'=>['floor2','label'])
966  i = TkcPolygon.new(w,377,169,316,169,316,131,397,131,397,188,377,188,
967                     'fill'=>'', 'tags'=>['floor2','room'])
968  $floorLabels2[i.id] = '225'
969  $floorItems2['225'] = i
970  w.create(TkcText,356.5,150, 'text'=>'225', 'fill'=>color,
971              'anchor'=>'c', 'tags'=>['floor2','label'])
972  i = TkcPolygon.new(w,234,198,306,198,306,249,234,249,
973                     'fill'=>'', 'tags'=>['floor2','room'])
974  $floorLabels2[i.id] = '224'
975  $floorItems2['224'] = i
976  w.create(TkcText,270,223.5, 'text'=>'224', 'fill'=>color,
977              'anchor'=>'c', 'tags'=>['floor2','label'])
978  i = TkcPolygon.new(w,270,179,306,179,306,170,314,170,314,135,270,135,
979                     'fill'=>'', 'tags'=>['floor2','room'])
980  $floorLabels2[i.id] = '223'
981  $floorItems2['223'] = i
982  w.create(TkcText,292,157, 'text'=>'223', 'fill'=>color,
983              'anchor'=>'c', 'tags'=>['floor2','label'])
984  i = TkcPolygon.new(w,268,179,221,179,221,135,268,135,
985                     'fill'=>'', 'tags'=>['floor2','room'])
986  $floorLabels2[i.id] = '222'
987  $floorItems2['222'] = i
988  w.create(TkcText,244.5,157, 'text'=>'222', 'fill'=>color,
989              'anchor'=>'c', 'tags'=>['floor2','label'])
990  i = TkcPolygon.new(w,177,179,219,179,219,135,177,135,
991                     'fill'=>'', 'tags'=>['floor2','room'])
992  $floorLabels2[i.id] = '221'
993  $floorItems2['221'] = i
994  w.create(TkcText,198,157, 'text'=>'221', 'fill'=>color,
995              'anchor'=>'c', 'tags'=>['floor2','label'])
996  i = TkcPolygon.new(w,299,327,349,327,349,284,341,284,341,276,299,276,
997                     'fill'=>'', 'tags'=>['floor2','room'])
998  $floorLabels2[i.id] = '204'
999  $floorItems2['204'] = i
1000  w.create(TkcText,324,301.5, 'text'=>'204', 'fill'=>color,
1001              'anchor'=>'c', 'tags'=>['floor2','label'])
1002  i = TkcPolygon.new(w,234,276,297,276,297,327,257,327,257,338,234,338,
1003                     'fill'=>'', 'tags'=>['floor2','room'])
1004  $floorLabels2[i.id] = '205'
1005  $floorItems2['205'] = i
1006  w.create(TkcText,265.5,307, 'text'=>'205', 'fill'=>color,
1007              'anchor'=>'c', 'tags'=>['floor2','label'])
1008  i = TkcPolygon.new(w,256,385,256,340,212,340,212,385,
1009                     'fill'=>'', 'tags'=>['floor2','room'])
1010  $floorLabels2[i.id] = '207'
1011  $floorItems2['207'] = i
1012  w.create(TkcText,234,362.5, 'text'=>'207', 'fill'=>color,
1013              'anchor'=>'c', 'tags'=>['floor2','label'])
1014  i = TkcPolygon.new(w,210,340,164,340,164,385,210,385,
1015                     'fill'=>'', 'tags'=>['floor2','room'])
1016  $floorLabels2[i.id] = '208'
1017  $floorItems2['208'] = i
1018  w.create(TkcText,187,362.5, 'text'=>'208', 'fill'=>color,
1019              'anchor'=>'c', 'tags'=>['floor2','label'])
1020  i = TkcPolygon.new(w,115,340,162,340,162,385,115,385,
1021                     'fill'=>'', 'tags'=>['floor2','room'])
1022  $floorLabels2[i.id] = '209'
1023  $floorItems2['209'] = i
1024  w.create(TkcText,138.5,362.5, 'text'=>'209', 'fill'=>color,
1025              'anchor'=>'c', 'tags'=>['floor2','label'])
1026  i = TkcPolygon.new(w,89,228,89,156,53,156,53,228,
1027                     'fill'=>'', 'tags'=>['floor2','room'])
1028  $floorLabels2[i.id] = '217'
1029  $floorItems2['217'] = i
1030  w.create(TkcText,71,192, 'text'=>'217', 'fill'=>color,
1031              'anchor'=>'c', 'tags'=>['floor2','label'])
1032  i = TkcPolygon.new(w,89,169,97,169,97,190,89,190,
1033                     'fill'=>'', 'tags'=>['floor2','room'])
1034  $floorLabels2[i.id] = '217A'
1035  $floorItems2['217A'] = i
1036  w.create(TkcText,93,179.5, 'text'=>'217A', 'fill'=>color,
1037              'anchor'=>'c', 'tags'=>['floor2','label'])
1038  i = TkcPolygon.new(w,89,156,89,168,95,168,95,135,53,135,53,156,
1039                     'fill'=>'', 'tags'=>['floor2','room'])
1040  $floorLabels2[i.id] = '216'
1041  $floorItems2['216'] = i
1042  w.create(TkcText,71,145.5, 'text'=>'216', 'fill'=>color,
1043              'anchor'=>'c', 'tags'=>['floor2','label'])
1044  i = TkcPolygon.new(w,51,179,51,135,6,135,6,179,
1045                     'fill'=>'', 'tags'=>['floor2','room'])
1046  $floorLabels2[i.id] = '215'
1047  $floorItems2['215'] = i
1048  w.create(TkcText,28.5,157, 'text'=>'215', 'fill'=>color,
1049              'anchor'=>'c', 'tags'=>['floor2','label'])
1050  i = TkcPolygon.new(w,51,227,6,227,6,180,51,180,
1051                     'fill'=>'', 'tags'=>['floor2','room'])
1052  $floorLabels2[i.id] = '214'
1053  $floorItems2['214'] = i
1054  w.create(TkcText,28.5,203.5, 'text'=>'214', 'fill'=>color,
1055              'anchor'=>'c', 'tags'=>['floor2','label'])
1056  i = TkcPolygon.new(w,51,275,6,275,6,229,51,229,
1057                     'fill'=>'', 'tags'=>['floor2','room'])
1058  $floorLabels2[i.id] = '213'
1059  $floorItems2['213'] = i
1060  w.create(TkcText,28.5,252, 'text'=>'213', 'fill'=>color,
1061              'anchor'=>'c', 'tags'=>['floor2','label'])
1062  i = TkcPolygon.new(w,114,340,67,340,67,385,114,385,
1063                     'fill'=>'', 'tags'=>['floor2','room'])
1064  $floorLabels2[i.id] = '210'
1065  $floorItems2['210'] = i
1066  w.create(TkcText,90.5,362.5, 'text'=>'210', 'fill'=>color,
1067              'anchor'=>'c', 'tags'=>['floor2','label'])
1068  i = TkcPolygon.new(w,59,389,59,385,65,385,65,340,1,340,1,389,
1069                     'fill'=>'', 'tags'=>['floor2','room'])
1070  $floorLabels2[i.id] = '211'
1071  $floorItems2['211'] = i
1072  w.create(TkcText,33,364.5, 'text'=>'211', 'fill'=>color,
1073              'anchor'=>'c', 'tags'=>['floor2','label'])
1074  i = TkcPolygon.new(w,393,309,350,309,350,282,342,282,342,276,393,276,
1075                     'fill'=>'', 'tags'=>['floor2','room'])
1076  $floorLabels2[i.id] = '203'
1077  $floorItems2['203'] = i
1078  w.create(TkcText,367.5,292.5, 'text'=>'203', 'fill'=>color,
1079              'anchor'=>'c', 'tags'=>['floor2','label'])
1080  i = TkcPolygon.new(w,99,191,91,191,91,226,174,226,174,198,
1081                     154,198,154,192,109,192,109,169,99,169,
1082                     'fill'=>'', 'tags'=>['floor2','room'])
1083  $floorLabels2[i.id] = '220'
1084  $floorItems2['220'] = i
1085  w.create(TkcText,132.5,208.5, 'text'=>'220', 'fill'=>color,
1086              'anchor'=>'c', 'tags'=>['floor2','label'])
1087  i = TkcPolygon.new(w,339,205,307,205,307,171,339,171,
1088                     'fill'=>'', 'tags'=>['floor2','room'])
1089  $floorLabels2[i.id] = 'Priv Lift2'
1090  $floorItems2['Priv Lift2'] = i
1091  w.create(TkcText,323,188, 'text'=>'Priv Lift2', 'fill'=>color,
1092              'anchor'=>'c', 'tags'=>['floor2','label'])
1093  i = TkcPolygon.new(w,307,240,339,240,339,206,307,206,
1094                     'fill'=>'', 'tags'=>['floor2','room'])
1095  $floorLabels2[i.id] = 'Pub Lift 2'
1096  $floorItems2['Pub Lift 2'] = i
1097  w.create(TkcText,323,223, 'text'=>'Pub Lift 2', 'fill'=>color,
1098              'anchor'=>'c', 'tags'=>['floor2','label'])
1099  i = TkcPolygon.new(w,175,168,97,168,97,131,175,131,
1100                     'fill'=>'', 'tags'=>['floor2','room'])
1101  $floorLabels2[i.id] = '218'
1102  $floorItems2['218'] = i
1103  w.create(TkcText,136,149.5, 'text'=>'218', 'fill'=>color,
1104              'anchor'=>'c', 'tags'=>['floor2','label'])
1105  i = TkcPolygon.new(w,154,191,111,191,111,169,154,169,
1106                     'fill'=>'', 'tags'=>['floor2','room'])
1107  $floorLabels2[i.id] = '219'
1108  $floorItems2['219'] = i
1109  w.create(TkcText,132.5,180, 'text'=>'219', 'fill'=>color,
1110              'anchor'=>'c', 'tags'=>['floor2','label'])
1111  i = TkcPolygon.new(w,375,246,375,172,341,172,341,246,
1112                     'fill'=>'', 'tags'=>['floor2','room'])
1113  $floorLabels2[i.id] = '201'
1114  $floorItems2['201'] = i
1115  w.create(TkcText,358,209, 'text'=>'201', 'fill'=>color,
1116              'anchor'=>'c', 'tags'=>['floor2','label'])
1117  w.create(TkcLine,641,186,678,186, 'fill'=>color, 'tags'=>['floor2','wall'])
1118  w.create(TkcLine,757,350,757,367, 'fill'=>color, 'tags'=>['floor2','wall'])
1119  w.create(TkcLine,634,133,634,144, 'fill'=>color, 'tags'=>['floor2','wall'])
1120  w.create(TkcLine,634,144,627,144, 'fill'=>color, 'tags'=>['floor2','wall'])
1121  w.create(TkcLine,572,133,572,144, 'fill'=>color, 'tags'=>['floor2','wall'])
1122  w.create(TkcLine,572,144,579,144, 'fill'=>color, 'tags'=>['floor2','wall'])
1123  w.create(TkcLine,398,129,398,162, 'fill'=>color, 'tags'=>['floor2','wall'])
1124  w.create(TkcLine,174,197,175,197, 'fill'=>color, 'tags'=>['floor2','wall'])
1125  w.create(TkcLine,175,197,175,227, 'fill'=>color, 'tags'=>['floor2','wall'])
1126  w.create(TkcLine,757,206,757,221, 'fill'=>color, 'tags'=>['floor2','wall'])
1127  w.create(TkcLine,396,188,408,188, 'fill'=>color, 'tags'=>['floor2','wall'])
1128  w.create(TkcLine,727,189,725,189, 'fill'=>color, 'tags'=>['floor2','wall'])
1129  w.create(TkcLine,747,167,802,167, 'fill'=>color, 'tags'=>['floor2','wall'])
1130  w.create(TkcLine,747,167,747,189, 'fill'=>color, 'tags'=>['floor2','wall'])
1131  w.create(TkcLine,755,189,739,189, 'fill'=>color, 'tags'=>['floor2','wall'])
1132  w.create(TkcLine,769,224,757,224, 'fill'=>color, 'tags'=>['floor2','wall'])
1133  w.create(TkcLine,802,224,802,129, 'fill'=>color, 'tags'=>['floor2','wall'])
1134  w.create(TkcLine,802,129,725,129, 'fill'=>color, 'tags'=>['floor2','wall'])
1135  w.create(TkcLine,725,189,725,129, 'fill'=>color, 'tags'=>['floor2','wall'])
1136  w.create(TkcLine,725,186,690,186, 'fill'=>color, 'tags'=>['floor2','wall'])
1137  w.create(TkcLine,676,133,676,186, 'fill'=>color, 'tags'=>['floor2','wall'])
1138  w.create(TkcLine,627,144,627,186, 'fill'=>color, 'tags'=>['floor2','wall'])
1139  w.create(TkcLine,629,186,593,186, 'fill'=>color, 'tags'=>['floor2','wall'])
1140  w.create(TkcLine,579,144,579,186, 'fill'=>color, 'tags'=>['floor2','wall'])
1141  w.create(TkcLine,559,129,559,133, 'fill'=>color, 'tags'=>['floor2','wall'])
1142  w.create(TkcLine,725,133,559,133, 'fill'=>color, 'tags'=>['floor2','wall'])
1143  w.create(TkcLine,484,162,484,129, 'fill'=>color, 'tags'=>['floor2','wall'])
1144  w.create(TkcLine,559,129,484,129, 'fill'=>color, 'tags'=>['floor2','wall'])
1145  w.create(TkcLine,526,129,526,186, 'fill'=>color, 'tags'=>['floor2','wall'])
1146  w.create(TkcLine,540,186,581,186, 'fill'=>color, 'tags'=>['floor2','wall'])
1147  w.create(TkcLine,528,186,523,186, 'fill'=>color, 'tags'=>['floor2','wall'])
1148  w.create(TkcLine,511,186,475,186, 'fill'=>color, 'tags'=>['floor2','wall'])
1149  w.create(TkcLine,496,190,496,186, 'fill'=>color, 'tags'=>['floor2','wall'])
1150  w.create(TkcLine,496,205,496,202, 'fill'=>color, 'tags'=>['floor2','wall'])
1151  w.create(TkcLine,475,205,527,205, 'fill'=>color, 'tags'=>['floor2','wall'])
1152  w.create(TkcLine,558,205,539,205, 'fill'=>color, 'tags'=>['floor2','wall'])
1153  w.create(TkcLine,558,205,558,249, 'fill'=>color, 'tags'=>['floor2','wall'])
1154  w.create(TkcLine,558,249,475,249, 'fill'=>color, 'tags'=>['floor2','wall'])
1155  w.create(TkcLine,662,206,642,206, 'fill'=>color, 'tags'=>['floor2','wall'])
1156  w.create(TkcLine,695,206,675,206, 'fill'=>color, 'tags'=>['floor2','wall'])
1157  w.create(TkcLine,695,278,642,278, 'fill'=>color, 'tags'=>['floor2','wall'])
1158  w.create(TkcLine,642,291,642,206, 'fill'=>color, 'tags'=>['floor2','wall'])
1159  w.create(TkcLine,695,291,695,206, 'fill'=>color, 'tags'=>['floor2','wall'])
1160  w.create(TkcLine,716,208,716,206, 'fill'=>color, 'tags'=>['floor2','wall'])
1161  w.create(TkcLine,757,206,716,206, 'fill'=>color, 'tags'=>['floor2','wall'])
1162  w.create(TkcLine,757,221,757,224, 'fill'=>color, 'tags'=>['floor2','wall'])
1163  w.create(TkcLine,793,224,802,224, 'fill'=>color, 'tags'=>['floor2','wall'])
1164  w.create(TkcLine,757,262,716,262, 'fill'=>color, 'tags'=>['floor2','wall'])
1165  w.create(TkcLine,716,220,716,264, 'fill'=>color, 'tags'=>['floor2','wall'])
1166  w.create(TkcLine,716,315,716,276, 'fill'=>color, 'tags'=>['floor2','wall'])
1167  w.create(TkcLine,757,315,703,315, 'fill'=>color, 'tags'=>['floor2','wall'])
1168  w.create(TkcLine,757,325,757,224, 'fill'=>color, 'tags'=>['floor2','wall'])
1169  w.create(TkcLine,757,367,644,367, 'fill'=>color, 'tags'=>['floor2','wall'])
1170  w.create(TkcLine,689,367,689,315, 'fill'=>color, 'tags'=>['floor2','wall'])
1171  w.create(TkcLine,647,315,644,315, 'fill'=>color, 'tags'=>['floor2','wall'])
1172  w.create(TkcLine,659,315,691,315, 'fill'=>color, 'tags'=>['floor2','wall'])
1173  w.create(TkcLine,600,325,600,391, 'fill'=>color, 'tags'=>['floor2','wall'])
1174  w.create(TkcLine,627,325,644,325, 'fill'=>color, 'tags'=>['floor2','wall'])
1175  w.create(TkcLine,644,391,644,315, 'fill'=>color, 'tags'=>['floor2','wall'])
1176  w.create(TkcLine,615,325,575,325, 'fill'=>color, 'tags'=>['floor2','wall'])
1177  w.create(TkcLine,644,391,558,391, 'fill'=>color, 'tags'=>['floor2','wall'])
1178  w.create(TkcLine,563,325,558,325, 'fill'=>color, 'tags'=>['floor2','wall'])
1179  w.create(TkcLine,558,391,558,314, 'fill'=>color, 'tags'=>['floor2','wall'])
1180  w.create(TkcLine,558,327,508,327, 'fill'=>color, 'tags'=>['floor2','wall'])
1181  w.create(TkcLine,558,275,484,275, 'fill'=>color, 'tags'=>['floor2','wall'])
1182  w.create(TkcLine,558,302,558,275, 'fill'=>color, 'tags'=>['floor2','wall'])
1183  w.create(TkcLine,508,327,508,311, 'fill'=>color, 'tags'=>['floor2','wall'])
1184  w.create(TkcLine,484,311,508,311, 'fill'=>color, 'tags'=>['floor2','wall'])
1185  w.create(TkcLine,484,275,484,311, 'fill'=>color, 'tags'=>['floor2','wall'])
1186  w.create(TkcLine,475,208,408,208, 'fill'=>color, 'tags'=>['floor2','wall'])
1187  w.create(TkcLine,408,206,408,210, 'fill'=>color, 'tags'=>['floor2','wall'])
1188  w.create(TkcLine,408,222,408,227, 'fill'=>color, 'tags'=>['floor2','wall'])
1189  w.create(TkcLine,408,227,398,227, 'fill'=>color, 'tags'=>['floor2','wall'])
1190  w.create(TkcLine,398,227,398,254, 'fill'=>color, 'tags'=>['floor2','wall'])
1191  w.create(TkcLine,408,188,408,194, 'fill'=>color, 'tags'=>['floor2','wall'])
1192  w.create(TkcLine,383,188,376,188, 'fill'=>color, 'tags'=>['floor2','wall'])
1193  w.create(TkcLine,398,188,398,162, 'fill'=>color, 'tags'=>['floor2','wall'])
1194  w.create(TkcLine,398,162,484,162, 'fill'=>color, 'tags'=>['floor2','wall'])
1195  w.create(TkcLine,475,162,475,254, 'fill'=>color, 'tags'=>['floor2','wall'])
1196  w.create(TkcLine,398,254,475,254, 'fill'=>color, 'tags'=>['floor2','wall'])
1197  w.create(TkcLine,484,280,395,280, 'fill'=>color, 'tags'=>['floor2','wall'])
1198  w.create(TkcLine,395,311,395,275, 'fill'=>color, 'tags'=>['floor2','wall'])
1199  w.create(TkcLine,307,197,293,197, 'fill'=>color, 'tags'=>['floor2','wall'])
1200  w.create(TkcLine,278,197,233,197, 'fill'=>color, 'tags'=>['floor2','wall'])
1201  w.create(TkcLine,233,197,233,249, 'fill'=>color, 'tags'=>['floor2','wall'])
1202  w.create(TkcLine,307,179,284,179, 'fill'=>color, 'tags'=>['floor2','wall'])
1203  w.create(TkcLine,233,249,278,249, 'fill'=>color, 'tags'=>['floor2','wall'])
1204  w.create(TkcLine,269,179,269,133, 'fill'=>color, 'tags'=>['floor2','wall'])
1205  w.create(TkcLine,220,179,220,133, 'fill'=>color, 'tags'=>['floor2','wall'])
1206  w.create(TkcLine,155,191,110,191, 'fill'=>color, 'tags'=>['floor2','wall'])
1207  w.create(TkcLine,90,190,98,190, 'fill'=>color, 'tags'=>['floor2','wall'])
1208  w.create(TkcLine,98,169,98,190, 'fill'=>color, 'tags'=>['floor2','wall'])
1209  w.create(TkcLine,52,133,52,165, 'fill'=>color, 'tags'=>['floor2','wall'])
1210  w.create(TkcLine,52,214,52,177, 'fill'=>color, 'tags'=>['floor2','wall'])
1211  w.create(TkcLine,52,226,52,262, 'fill'=>color, 'tags'=>['floor2','wall'])
1212  w.create(TkcLine,52,274,52,276, 'fill'=>color, 'tags'=>['floor2','wall'])
1213  w.create(TkcLine,234,275,234,339, 'fill'=>color, 'tags'=>['floor2','wall'])
1214  w.create(TkcLine,226,339,258,339, 'fill'=>color, 'tags'=>['floor2','wall'])
1215  w.create(TkcLine,211,387,211,339, 'fill'=>color, 'tags'=>['floor2','wall'])
1216  w.create(TkcLine,214,339,177,339, 'fill'=>color, 'tags'=>['floor2','wall'])
1217  w.create(TkcLine,258,387,60,387, 'fill'=>color, 'tags'=>['floor2','wall'])
1218  w.create(TkcLine,3,133,3,339, 'fill'=>color, 'tags'=>['floor2','wall'])
1219  w.create(TkcLine,165,339,129,339, 'fill'=>color, 'tags'=>['floor2','wall'])
1220  w.create(TkcLine,117,339,80,339, 'fill'=>color, 'tags'=>['floor2','wall'])
1221  w.create(TkcLine,68,339,59,339, 'fill'=>color, 'tags'=>['floor2','wall'])
1222  w.create(TkcLine,0,339,46,339, 'fill'=>color, 'tags'=>['floor2','wall'])
1223  w.create(TkcLine,60,391,0,391, 'fill'=>color, 'tags'=>['floor2','wall'])
1224  w.create(TkcLine,0,339,0,391, 'fill'=>color, 'tags'=>['floor2','wall'])
1225  w.create(TkcLine,60,387,60,391, 'fill'=>color, 'tags'=>['floor2','wall'])
1226  w.create(TkcLine,258,329,258,387, 'fill'=>color, 'tags'=>['floor2','wall'])
1227  w.create(TkcLine,350,329,258,329, 'fill'=>color, 'tags'=>['floor2','wall'])
1228  w.create(TkcLine,395,311,350,311, 'fill'=>color, 'tags'=>['floor2','wall'])
1229  w.create(TkcLine,398,129,315,129, 'fill'=>color, 'tags'=>['floor2','wall'])
1230  w.create(TkcLine,176,133,315,133, 'fill'=>color, 'tags'=>['floor2','wall'])
1231  w.create(TkcLine,176,129,96,129, 'fill'=>color, 'tags'=>['floor2','wall'])
1232  w.create(TkcLine,3,133,96,133, 'fill'=>color, 'tags'=>['floor2','wall'])
1233  w.create(TkcLine,66,387,66,339, 'fill'=>color, 'tags'=>['floor2','wall'])
1234  w.create(TkcLine,115,387,115,339, 'fill'=>color, 'tags'=>['floor2','wall'])
1235  w.create(TkcLine,163,387,163,339, 'fill'=>color, 'tags'=>['floor2','wall'])
1236  w.create(TkcLine,234,275,276,275, 'fill'=>color, 'tags'=>['floor2','wall'])
1237  w.create(TkcLine,288,275,309,275, 'fill'=>color, 'tags'=>['floor2','wall'])
1238  w.create(TkcLine,298,275,298,329, 'fill'=>color, 'tags'=>['floor2','wall'])
1239  w.create(TkcLine,341,283,350,283, 'fill'=>color, 'tags'=>['floor2','wall'])
1240  w.create(TkcLine,321,275,341,275, 'fill'=>color, 'tags'=>['floor2','wall'])
1241  w.create(TkcLine,375,275,395,275, 'fill'=>color, 'tags'=>['floor2','wall'])
1242  w.create(TkcLine,315,129,315,170, 'fill'=>color, 'tags'=>['floor2','wall'])
1243  w.create(TkcLine,376,170,307,170, 'fill'=>color, 'tags'=>['floor2','wall'])
1244  w.create(TkcLine,307,250,307,170, 'fill'=>color, 'tags'=>['floor2','wall'])
1245  w.create(TkcLine,376,245,376,170, 'fill'=>color, 'tags'=>['floor2','wall'])
1246  w.create(TkcLine,340,241,307,241, 'fill'=>color, 'tags'=>['floor2','wall'])
1247  w.create(TkcLine,340,245,340,224, 'fill'=>color, 'tags'=>['floor2','wall'])
1248  w.create(TkcLine,340,210,340,201, 'fill'=>color, 'tags'=>['floor2','wall'])
1249  w.create(TkcLine,340,187,340,170, 'fill'=>color, 'tags'=>['floor2','wall'])
1250  w.create(TkcLine,340,206,307,206, 'fill'=>color, 'tags'=>['floor2','wall'])
1251  w.create(TkcLine,293,250,307,250, 'fill'=>color, 'tags'=>['floor2','wall'])
1252  w.create(TkcLine,271,179,238,179, 'fill'=>color, 'tags'=>['floor2','wall'])
1253  w.create(TkcLine,226,179,195,179, 'fill'=>color, 'tags'=>['floor2','wall'])
1254  w.create(TkcLine,176,129,176,179, 'fill'=>color, 'tags'=>['floor2','wall'])
1255  w.create(TkcLine,182,179,176,179, 'fill'=>color, 'tags'=>['floor2','wall'])
1256  w.create(TkcLine,174,169,176,169, 'fill'=>color, 'tags'=>['floor2','wall'])
1257  w.create(TkcLine,162,169,90,169, 'fill'=>color, 'tags'=>['floor2','wall'])
1258  w.create(TkcLine,96,169,96,129, 'fill'=>color, 'tags'=>['floor2','wall'])
1259  w.create(TkcLine,175,227,90,227, 'fill'=>color, 'tags'=>['floor2','wall'])
1260  w.create(TkcLine,90,190,90,227, 'fill'=>color, 'tags'=>['floor2','wall'])
1261  w.create(TkcLine,52,179,3,179, 'fill'=>color, 'tags'=>['floor2','wall'])
1262  w.create(TkcLine,52,228,3,228, 'fill'=>color, 'tags'=>['floor2','wall'])
1263  w.create(TkcLine,52,276,3,276, 'fill'=>color, 'tags'=>['floor2','wall'])
1264  w.create(TkcLine,155,177,155,169, 'fill'=>color, 'tags'=>['floor2','wall'])
1265  w.create(TkcLine,110,191,110,169, 'fill'=>color, 'tags'=>['floor2','wall'])
1266  w.create(TkcLine,155,189,155,197, 'fill'=>color, 'tags'=>['floor2','wall'])
1267  w.create(TkcLine,350,283,350,329, 'fill'=>color, 'tags'=>['floor2','wall'])
1268  w.create(TkcLine,162,197,155,197, 'fill'=>color, 'tags'=>['floor2','wall'])
1269  w.create(TkcLine,341,275,341,283, 'fill'=>color, 'tags'=>['floor2','wall'])
1270end
1271
1272# floor2_fg3 --
1273# This method represents part of the floorplan database.  When
1274# invoked, it instantiates the foreground information for the third
1275# floor (office outlines and numbers).
1276#
1277# Arguments:
1278# w -           The canvas window.
1279# color -       Color to use for drawing foreground information.
1280
1281def floor2_fg3(w,color)
1282  i = TkcPolygon.new(w,89,228,89,180,70,180,70,228,
1283                     'fill'=>'', 'tags'=>['floor3','room'])
1284  $floorLabels2[i.id] = '316'
1285  $floorItems2['316'] = i
1286  w.create(TkcText,79.5,204, 'text'=>'316', 'fill'=>color,
1287              'anchor'=>'c', 'tags'=>['floor3','label'])
1288  i = TkcPolygon.new(w,115,368,162,368,162,323,115,323,
1289                     'fill'=>'', 'tags'=>['floor3','room'])
1290  $floorLabels2[i.id] = '309'
1291  $floorItems2['309'] = i
1292  w.create(TkcText,138.5,345.5, 'text'=>'309', 'fill'=>color,
1293              'anchor'=>'c', 'tags'=>['floor3','label'])
1294  i = TkcPolygon.new(w,164,323,164,368,211,368,211,323,
1295                     'fill'=>'', 'tags'=>['floor3','room'])
1296  $floorLabels2[i.id] = '308'
1297  $floorItems2['308'] = i
1298  w.create(TkcText,187.5,345.5, 'text'=>'308', 'fill'=>color,
1299              'anchor'=>'c', 'tags'=>['floor3','label'])
1300  i = TkcPolygon.new(w,256,368,212,368,212,323,256,323,
1301                     'fill'=>'', 'tags'=>['floor3','room'])
1302  $floorLabels2[i.id] = '307'
1303  $floorItems2['307'] = i
1304  w.create(TkcText,234,345.5, 'text'=>'307', 'fill'=>color,
1305              'anchor'=>'c', 'tags'=>['floor3','label'])
1306  i = TkcPolygon.new(w,244,276,297,276,297,327,260,327,260,321,244,321,
1307                     'fill'=>'', 'tags'=>['floor3','room'])
1308  $floorLabels2[i.id] = '305'
1309  $floorItems2['305'] = i
1310  w.create(TkcText,270.5,301.5, 'text'=>'305', 'fill'=>color,
1311              'anchor'=>'c', 'tags'=>['floor3','label'])
1312  i = TkcPolygon.new(w,251,219,251,203,244,203,244,219,
1313                     'fill'=>'', 'tags'=>['floor3','room'])
1314  $floorLabels2[i.id] = '324B'
1315  $floorItems2['324B'] = i
1316  w.create(TkcText,247.5,211, 'text'=>'324B', 'fill'=>color,
1317              'anchor'=>'c', 'tags'=>['floor3','label'])
1318  i = TkcPolygon.new(w,251,249,244,249,244,232,251,232,
1319                     'fill'=>'', 'tags'=>['floor3','room'])
1320  $floorLabels2[i.id] = '324A'
1321  $floorItems2['324A'] = i
1322  w.create(TkcText,247.5,240.5, 'text'=>'324A', 'fill'=>color,
1323              'anchor'=>'c', 'tags'=>['floor3','label'])
1324  i = TkcPolygon.new(w,223,135,223,179,177,179,177,135,
1325                     'fill'=>'', 'tags'=>['floor3','room'])
1326  $floorLabels2[i.id] = '320'
1327  $floorItems2['320'] = i
1328  w.create(TkcText,200,157, 'text'=>'320', 'fill'=>color,
1329              'anchor'=>'c', 'tags'=>['floor3','label'])
1330  i = TkcPolygon.new(w,114,368,114,323,67,323,67,368,
1331                     'fill'=>'', 'tags'=>['floor3','room'])
1332  $floorLabels2[i.id] = '310'
1333  $floorItems2['310'] = i
1334  w.create(TkcText,90.5,345.5, 'text'=>'310', 'fill'=>color,
1335              'anchor'=>'c', 'tags'=>['floor3','label'])
1336  i = TkcPolygon.new(w,23,277,23,321,68,321,68,277,
1337                     'fill'=>'', 'tags'=>['floor3','room'])
1338  $floorLabels2[i.id] = '312'
1339  $floorItems2['312'] = i
1340  w.create(TkcText,45.5,299, 'text'=>'312', 'fill'=>color,
1341              'anchor'=>'c', 'tags'=>['floor3','label'])
1342  i = TkcPolygon.new(w,23,229,68,229,68,275,23,275,
1343                     'fill'=>'', 'tags'=>['floor3','room'])
1344  $floorLabels2[i.id] = '313'
1345  $floorItems2['313'] = i
1346  w.create(TkcText,45.5,252, 'text'=>'313', 'fill'=>color,
1347              'anchor'=>'c', 'tags'=>['floor3','label'])
1348  i = TkcPolygon.new(w,68,227,23,227,23,180,68,180,
1349                     'fill'=>'', 'tags'=>['floor3','room'])
1350  $floorLabels2[i.id] = '314'
1351  $floorItems2['314'] = i
1352  w.create(TkcText,40.5,203.5, 'text'=>'314', 'fill'=>color,
1353              'anchor'=>'c', 'tags'=>['floor3','label'])
1354  i = TkcPolygon.new(w,95,179,95,135,23,135,23,179,
1355                     'fill'=>'', 'tags'=>['floor3','room'])
1356  $floorLabels2[i.id] = '315'
1357  $floorItems2['315'] = i
1358  w.create(TkcText,59,157, 'text'=>'315', 'fill'=>color,
1359              'anchor'=>'c', 'tags'=>['floor3','label'])
1360  i = TkcPolygon.new(w,99,226,99,204,91,204,91,226,
1361                     'fill'=>'', 'tags'=>['floor3','room'])
1362  $floorLabels2[i.id] = '316B'
1363  $floorItems2['316B'] = i
1364  w.create(TkcText,95,215, 'text'=>'316B', 'fill'=>color,
1365              'anchor'=>'c', 'tags'=>['floor3','label'])
1366  i = TkcPolygon.new(w,91,202,99,202,99,180,91,180,
1367                     'fill'=>'', 'tags'=>['floor3','room'])
1368  $floorLabels2[i.id] = '316A'
1369  $floorItems2['316A'] = i
1370  w.create(TkcText,95,191, 'text'=>'316A', 'fill'=>color,
1371              'anchor'=>'c', 'tags'=>['floor3','label'])
1372  i = TkcPolygon.new(w,97,169,109,169,109,192,154,192,154,198,
1373                     174,198,174,226,101,226,101,179,97,179,
1374                     'fill'=>'', 'tags'=>['floor3','room'])
1375  $floorLabels2[i.id] = '319'
1376  $floorItems2['319'] = i
1377  w.create(TkcText,141.5,209, 'text'=>'319', 'fill'=>color,
1378              'anchor'=>'c', 'tags'=>['floor3','label'])
1379  i = TkcPolygon.new(w,65,368,58,368,58,389,1,389,1,333,23,333,23,323,65,323,
1380                     'fill'=>'', 'tags'=>['floor3','room'])
1381  $floorLabels2[i.id] = '311'
1382  $floorItems2['311'] = i
1383  w.create(TkcText,29.5,361, 'text'=>'311', 'fill'=>color,
1384              'anchor'=>'c', 'tags'=>['floor3','label'])
1385  i = TkcPolygon.new(w,154,191,111,191,111,169,154,169,
1386                     'fill'=>'', 'tags'=>['floor3','room'])
1387  $floorLabels2[i.id] = '318'
1388  $floorItems2['318'] = i
1389  w.create(TkcText,132.5,180, 'text'=>'318', 'fill'=>color,
1390              'anchor'=>'c', 'tags'=>['floor3','label'])
1391  i = TkcPolygon.new(w,175,168,97,168,97,131,175,131,
1392                     'fill'=>'', 'tags'=>['floor3','room'])
1393  $floorLabels2[i.id] = '317'
1394  $floorItems2['317'] = i
1395  w.create(TkcText,136,149.5, 'text'=>'317', 'fill'=>color,
1396              'anchor'=>'c', 'tags'=>['floor3','label'])
1397  i = TkcPolygon.new(w,274,194,274,221,306,221,306,194,
1398                     'fill'=>'', 'tags'=>['floor3','room'])
1399  $floorLabels2[i.id] = '323'
1400  $floorItems2['323'] = i
1401  w.create(TkcText,290,207.5, 'text'=>'323', 'fill'=>color,
1402              'anchor'=>'c', 'tags'=>['floor3','label'])
1403  i = TkcPolygon.new(w,306,222,274,222,274,249,306,249,
1404                     'fill'=>'', 'tags'=>['floor3','room'])
1405  $floorLabels2[i.id] = '325'
1406  $floorItems2['325'] = i
1407  w.create(TkcText,290,235.5, 'text'=>'325', 'fill'=>color,
1408              'anchor'=>'c', 'tags'=>['floor3','label'])
1409  i = TkcPolygon.new(w,263,179,224,179,224,135,263,135,
1410                     'fill'=>'', 'tags'=>['floor3','room'])
1411  $floorLabels2[i.id] = '321'
1412  $floorItems2['321'] = i
1413  w.create(TkcText,243.5,157, 'text'=>'321', 'fill'=>color,
1414              'anchor'=>'c', 'tags'=>['floor3','label'])
1415  i = TkcPolygon.new(w,314,169,306,169,306,192,273,192,
1416                     264,181,264,135,314,135,
1417                     'fill'=>'', 'tags'=>['floor3','room'])
1418  $floorLabels2[i.id] = '322'
1419  $floorItems2['322'] = i
1420  w.create(TkcText,293.5,163.5, 'text'=>'322', 'fill'=>color,
1421              'anchor'=>'c', 'tags'=>['floor3','label'])
1422  i = TkcPolygon.new(w,307,240,339,240,339,206,307,206,
1423                     'fill'=>'', 'tags'=>['floor3','room'])
1424  $floorLabels2[i.id] = 'Pub Lift3'
1425  $floorItems2['Pub Lift3'] = i
1426  w.create(TkcText,323,223, 'text'=>'Pub Lift3', 'fill'=>color,
1427              'anchor'=>'c', 'tags'=>['floor3','label'])
1428  i = TkcPolygon.new(w,339,205,307,205,307,171,339,171,
1429                     'fill'=>'', 'tags'=>['floor3','room'])
1430  $floorLabels2[i.id] = 'Priv Lift3'
1431  $floorItems2['Priv Lift3'] = i
1432  w.create(TkcText,323,188, 'text'=>'Priv Lift3', 'fill'=>color,
1433              'anchor'=>'c', 'tags'=>['floor3','label'])
1434  i = TkcPolygon.new(w,350,284,376,284,376,276,397,276,397,309,350,309,
1435                     'fill'=>'', 'tags'=>['floor3','room'])
1436  $floorLabels2[i.id] = '303'
1437  $floorItems2['303'] = i
1438  w.create(TkcText,373.5,292.5, 'text'=>'303', 'fill'=>color,
1439              'anchor'=>'c', 'tags'=>['floor3','label'])
1440  i = TkcPolygon.new(w,272,203,272,249,252,249,252,230,
1441                     244,230,244,221,252,221,252,203,
1442                     'fill'=>'', 'tags'=>['floor3','room'])
1443  $floorLabels2[i.id] = '324'
1444  $floorItems2['324'] = i
1445  w.create(TkcText,262,226, 'text'=>'324', 'fill'=>color,
1446              'anchor'=>'c', 'tags'=>['floor3','label'])
1447  i = TkcPolygon.new(w,299,276,299,327,349,327,349,284,341,284,341,276,
1448                     'fill'=>'', 'tags'=>['floor3','room'])
1449  $floorLabels2[i.id] = '304'
1450  $floorItems2['304'] = i
1451  w.create(TkcText,324,301.5, 'text'=>'304', 'fill'=>color,
1452              'anchor'=>'c', 'tags'=>['floor3','label'])
1453  i = TkcPolygon.new(w,375,246,375,172,341,172,341,246,
1454                     'fill'=>'', 'tags'=>['floor3','room'])
1455  $floorLabels2[i.id] = '301'
1456  $floorItems2['301'] = i
1457  w.create(TkcText,358,209, 'text'=>'301', 'fill'=>color,
1458              'anchor'=>'c', 'tags'=>['floor3','label'])
1459  i = TkcPolygon.new(w,397,246,377,246,377,185,397,185,
1460                     'fill'=>'', 'tags'=>['floor3','room'])
1461  $floorLabels2[i.id] = '327'
1462  $floorItems2['327'] = i
1463  w.create(TkcText,387,215.5, 'text'=>'327', 'fill'=>color,
1464              'anchor'=>'c', 'tags'=>['floor3','label'])
1465  i = TkcPolygon.new(w,316,131,316,169,377,169,377,185,397,185,397,131,
1466                     'fill'=>'', 'tags'=>['floor3','room'])
1467  $floorLabels2[i.id] = '326'
1468  $floorItems2['326'] = i
1469  w.create(TkcText,365.5,150, 'text'=>'326', 'fill'=>color,
1470              'anchor'=>'c', 'tags'=>['floor3','label'])
1471  i = TkcPolygon.new(w,308,251,242,251,242,274,342,274,342,282,375, 282,
1472                     375,274,397,274,397,248,339,248,339,242,308,242,
1473                     'fill'=>'', 'tags'=>['floor3','room'])
1474  $floorLabels2[i.id] = '302'
1475  $floorItems2['302'] = i
1476  w.create(TkcText,319.5,261, 'text'=>'302', 'fill'=>color,
1477              'anchor'=>'c', 'tags'=>['floor3','label'])
1478  i = TkcPolygon.new(w,70,321,242,321,242,200,259,200,259,203,272,203,
1479                     272,193,263,180,242,180,175,180,175,169,156,169,
1480                     156,196,177,196,177,228,107,228,70,228,70,275,107,275,
1481                     107,248,160,248,160,301,107,301,107,275,70,275,
1482                     'fill'=>'', 'tags'=>['floor3','room'])
1483  $floorLabels2[i.id] = '306'
1484  $floorItems2['306'] = i
1485  w.create(TkcText,200.5,284.5, 'text'=>'306', 'fill'=>color,
1486              'anchor'=>'c', 'tags'=>['floor3','label'])
1487  w.create(TkcLine,341,275,341,283, 'fill'=>color, 'tags'=>['floor3','wall'])
1488  w.create(TkcLine,162,197,155,197, 'fill'=>color, 'tags'=>['floor3','wall'])
1489  w.create(TkcLine,396,247,399,247, 'fill'=>color, 'tags'=>['floor3','wall'])
1490  w.create(TkcLine,399,129,399,311, 'fill'=>color, 'tags'=>['floor3','wall'])
1491  w.create(TkcLine,258,202,243,202, 'fill'=>color, 'tags'=>['floor3','wall'])
1492  w.create(TkcLine,350,283,350,329, 'fill'=>color, 'tags'=>['floor3','wall'])
1493  w.create(TkcLine,251,231,243,231, 'fill'=>color, 'tags'=>['floor3','wall'])
1494  w.create(TkcLine,243,220,251,220, 'fill'=>color, 'tags'=>['floor3','wall'])
1495  w.create(TkcLine,243,250,243,202, 'fill'=>color, 'tags'=>['floor3','wall'])
1496  w.create(TkcLine,155,197,155,190, 'fill'=>color, 'tags'=>['floor3','wall'])
1497  w.create(TkcLine,110,192,110,169, 'fill'=>color, 'tags'=>['floor3','wall'])
1498  w.create(TkcLine,155,192,110,192, 'fill'=>color, 'tags'=>['floor3','wall'])
1499  w.create(TkcLine,155,177,155,169, 'fill'=>color, 'tags'=>['floor3','wall'])
1500  w.create(TkcLine,176,197,176,227, 'fill'=>color, 'tags'=>['floor3','wall'])
1501  w.create(TkcLine,69,280,69,274, 'fill'=>color, 'tags'=>['floor3','wall'])
1502  w.create(TkcLine,21,276,69,276, 'fill'=>color, 'tags'=>['floor3','wall'])
1503  w.create(TkcLine,69,262,69,226, 'fill'=>color, 'tags'=>['floor3','wall'])
1504  w.create(TkcLine,21,228,69,228, 'fill'=>color, 'tags'=>['floor3','wall'])
1505  w.create(TkcLine,21,179,75,179, 'fill'=>color, 'tags'=>['floor3','wall'])
1506  w.create(TkcLine,69,179,69,214, 'fill'=>color, 'tags'=>['floor3','wall'])
1507  w.create(TkcLine,90,220,90,227, 'fill'=>color, 'tags'=>['floor3','wall'])
1508  w.create(TkcLine,90,204,90,202, 'fill'=>color, 'tags'=>['floor3','wall'])
1509  w.create(TkcLine,90,203,100,203, 'fill'=>color, 'tags'=>['floor3','wall'])
1510  w.create(TkcLine,90,187,90,179, 'fill'=>color, 'tags'=>['floor3','wall'])
1511  w.create(TkcLine,90,227,176,227, 'fill'=>color, 'tags'=>['floor3','wall'])
1512  w.create(TkcLine,100,179,100,227, 'fill'=>color, 'tags'=>['floor3','wall'])
1513  w.create(TkcLine,100,179,87,179, 'fill'=>color, 'tags'=>['floor3','wall'])
1514  w.create(TkcLine,96,179,96,129, 'fill'=>color, 'tags'=>['floor3','wall'])
1515  w.create(TkcLine,162,169,96,169, 'fill'=>color, 'tags'=>['floor3','wall'])
1516  w.create(TkcLine,173,169,176,169, 'fill'=>color, 'tags'=>['floor3','wall'])
1517  w.create(TkcLine,182,179,176,179, 'fill'=>color, 'tags'=>['floor3','wall'])
1518  w.create(TkcLine,176,129,176,179, 'fill'=>color, 'tags'=>['floor3','wall'])
1519  w.create(TkcLine,195,179,226,179, 'fill'=>color, 'tags'=>['floor3','wall'])
1520  w.create(TkcLine,224,133,224,179, 'fill'=>color, 'tags'=>['floor3','wall'])
1521  w.create(TkcLine,264,179,264,133, 'fill'=>color, 'tags'=>['floor3','wall'])
1522  w.create(TkcLine,238,179,264,179, 'fill'=>color, 'tags'=>['floor3','wall'])
1523  w.create(TkcLine,273,207,273,193, 'fill'=>color, 'tags'=>['floor3','wall'])
1524  w.create(TkcLine,273,235,273,250, 'fill'=>color, 'tags'=>['floor3','wall'])
1525  w.create(TkcLine,273,224,273,219, 'fill'=>color, 'tags'=>['floor3','wall'])
1526  w.create(TkcLine,273,193,307,193, 'fill'=>color, 'tags'=>['floor3','wall'])
1527  w.create(TkcLine,273,222,307,222, 'fill'=>color, 'tags'=>['floor3','wall'])
1528  w.create(TkcLine,273,250,307,250, 'fill'=>color, 'tags'=>['floor3','wall'])
1529  w.create(TkcLine,384,247,376,247, 'fill'=>color, 'tags'=>['floor3','wall'])
1530  w.create(TkcLine,340,206,307,206, 'fill'=>color, 'tags'=>['floor3','wall'])
1531  w.create(TkcLine,340,187,340,170, 'fill'=>color, 'tags'=>['floor3','wall'])
1532  w.create(TkcLine,340,210,340,201, 'fill'=>color, 'tags'=>['floor3','wall'])
1533  w.create(TkcLine,340,247,340,224, 'fill'=>color, 'tags'=>['floor3','wall'])
1534  w.create(TkcLine,340,241,307,241, 'fill'=>color, 'tags'=>['floor3','wall'])
1535  w.create(TkcLine,376,247,376,170, 'fill'=>color, 'tags'=>['floor3','wall'])
1536  w.create(TkcLine,307,250,307,170, 'fill'=>color, 'tags'=>['floor3','wall'])
1537  w.create(TkcLine,376,170,307,170, 'fill'=>color, 'tags'=>['floor3','wall'])
1538  w.create(TkcLine,315,129,315,170, 'fill'=>color, 'tags'=>['floor3','wall'])
1539  w.create(TkcLine,376,283,366,283, 'fill'=>color, 'tags'=>['floor3','wall'])
1540  w.create(TkcLine,376,283,376,275, 'fill'=>color, 'tags'=>['floor3','wall'])
1541  w.create(TkcLine,399,275,376,275, 'fill'=>color, 'tags'=>['floor3','wall'])
1542  w.create(TkcLine,341,275,320,275, 'fill'=>color, 'tags'=>['floor3','wall'])
1543  w.create(TkcLine,341,283,350,283, 'fill'=>color, 'tags'=>['floor3','wall'])
1544  w.create(TkcLine,298,275,298,329, 'fill'=>color, 'tags'=>['floor3','wall'])
1545  w.create(TkcLine,308,275,298,275, 'fill'=>color, 'tags'=>['floor3','wall'])
1546  w.create(TkcLine,243,322,243,275, 'fill'=>color, 'tags'=>['floor3','wall'])
1547  w.create(TkcLine,243,275,284,275, 'fill'=>color, 'tags'=>['floor3','wall'])
1548  w.create(TkcLine,258,322,226,322, 'fill'=>color, 'tags'=>['floor3','wall'])
1549  w.create(TkcLine,212,370,212,322, 'fill'=>color, 'tags'=>['floor3','wall'])
1550  w.create(TkcLine,214,322,177,322, 'fill'=>color, 'tags'=>['floor3','wall'])
1551  w.create(TkcLine,163,370,163,322, 'fill'=>color, 'tags'=>['floor3','wall'])
1552  w.create(TkcLine,165,322,129,322, 'fill'=>color, 'tags'=>['floor3','wall'])
1553  w.create(TkcLine,84,322,117,322, 'fill'=>color, 'tags'=>['floor3','wall'])
1554  w.create(TkcLine,71,322,64,322, 'fill'=>color, 'tags'=>['floor3','wall'])
1555  w.create(TkcLine,115,322,115,370, 'fill'=>color, 'tags'=>['floor3','wall'])
1556  w.create(TkcLine,66,322,66,370, 'fill'=>color, 'tags'=>['floor3','wall'])
1557  w.create(TkcLine,52,322,21,322, 'fill'=>color, 'tags'=>['floor3','wall'])
1558  w.create(TkcLine,21,331,0,331, 'fill'=>color, 'tags'=>['floor3','wall'])
1559  w.create(TkcLine,21,331,21,133, 'fill'=>color, 'tags'=>['floor3','wall'])
1560  w.create(TkcLine,96,133,21,133, 'fill'=>color, 'tags'=>['floor3','wall'])
1561  w.create(TkcLine,176,129,96,129, 'fill'=>color, 'tags'=>['floor3','wall'])
1562  w.create(TkcLine,315,133,176,133, 'fill'=>color, 'tags'=>['floor3','wall'])
1563  w.create(TkcLine,315,129,399,129, 'fill'=>color, 'tags'=>['floor3','wall'])
1564  w.create(TkcLine,399,311,350,311, 'fill'=>color, 'tags'=>['floor3','wall'])
1565  w.create(TkcLine,350,329,258,329, 'fill'=>color, 'tags'=>['floor3','wall'])
1566  w.create(TkcLine,258,322,258,370, 'fill'=>color, 'tags'=>['floor3','wall'])
1567  w.create(TkcLine,60,370,258,370, 'fill'=>color, 'tags'=>['floor3','wall'])
1568  w.create(TkcLine,60,370,60,391, 'fill'=>color, 'tags'=>['floor3','wall'])
1569  w.create(TkcLine,0,391,0,331, 'fill'=>color, 'tags'=>['floor3','wall'])
1570  w.create(TkcLine,60,391,0,391, 'fill'=>color, 'tags'=>['floor3','wall'])
1571  w.create(TkcLine,307,250,307,242, 'fill'=>color, 'tags'=>['floor3','wall'])
1572  w.create(TkcLine,273,250,307,250, 'fill'=>color, 'tags'=>['floor3','wall'])
1573  w.create(TkcLine,258,250,243,250, 'fill'=>color, 'tags'=>['floor3','wall'])
1574end
1575
1576# Below is the "main program" that creates the floorplan demonstration.
1577
1578# toplevel widget
1579if defined?($floor2_demo) && $floor2_demo
1580  $floor2_demo.destroy
1581  $floor2_demo = nil
1582end
1583
1584# demo toplevel widget
1585$floor2_demo = TkToplevel.new {|w|
1586  title("Floorplan Canvas Demonstration 2")
1587  iconname("Floorplan2")
1588  positionWindow(w)
1589  geometry('+20+20')
1590  minsize(100,100)
1591}
1592
1593base_frame = TkFrame.new($floor2_demo).pack(:fill=>:both, :expand=>true)
1594
1595# label
1596TkLabel.new(base_frame, 'font'=>$font, 'wraplength'=>'8i', 'justify'=>'left',
1597            'text'=>"This window contains a canvas widget showing the floorplan of Digital Equipment Corporation's Western Research Laboratory.  It has three levels.  At any given time one of the levels is active, meaning that you can see its room structure.  To activate a level, click the left mouse button anywhere on it.  As the mouse moves over the active level, the room under the mouse lights up and its room number appears in the \"Room:\" entry.  You can also type a room number in the entry and the room will light up."){
1598  pack('side'=>'top')
1599}
1600
1601# frame
1602$floor2_buttons = TkFrame.new(base_frame) {|frame|
1603  TkButton.new(frame) {
1604    text 'Dismiss'
1605    command proc{
1606      tmppath = $floor2_demo
1607      $floor2_demo = nil
1608      tmppath.destroy
1609    }
1610  }.pack('side'=>'left', 'expand'=>'yes')
1611
1612  TkButton.new(frame) {
1613    text 'Show Code'
1614    command proc{showCode 'floor2'}
1615  }.pack('side'=>'left', 'expand'=>'yes')
1616}
1617$floor2_buttons.pack('side'=>'bottom', 'fill'=>'x', 'pady'=>'2m')
1618
1619#
1620$floorLabels2 = {}
1621$floorItems2 = {}
1622
1623# canvas
1624if $tk_version =~ /^4\.[01]/
1625  $floor2_canvas_frame = TkFrame.new(base_frame,'bd'=>2,'relief'=>'sunken',
1626                                    'highlightthickness'=>2)
1627  $floor2_canvas = TkCanvas.new($floor2_canvas_frame,
1628                               'width'=>900, 'height'=>500, 'borderwidth'=>0,
1629                               'highlightthickness'=>0) {|c|
1630    TkScrollbar.new(base_frame, 'orient'=>'horiz',
1631                    'command'=>proc{|*args| c.xview(*args)}){|hs|
1632      c.xscrollcommand(proc{|first,last| hs.set first,last})
1633      pack('side'=>'bottom', 'fill'=>'x')
1634    }
1635    TkScrollbar.new(base_frame, 'command'=>proc{|*args| c.yview(*args)}){|vs|
1636      c.yscrollcommand(proc{|first,last| vs.set first,last})
1637      pack('side'=>'right', 'fill'=>'y')
1638    }
1639  }
1640  $floor2_canvas_frame.pack('side'=>'top','fill'=>'both', 'expand'=>'yes')
1641  $floor2_canvas.pack('expand'=>'yes', 'fill'=>'both')
1642
1643else
1644  TkFrame.new(base_frame) {|f|
1645    pack('side'=>'top', 'fill'=>'both', 'expand'=>'yes')
1646
1647    h = TkScrollbar.new(f, 'highlightthickness'=>0, 'orient'=>'horizontal')
1648    v = TkScrollbar.new(f, 'highlightthickness'=>0, 'orient'=>'vertical')
1649
1650    TkFrame.new(f, 'bd'=>2, 'relief'=>'sunken') {|f1|
1651      $floor2_canvas = TkCanvas.new(f1, 'width'=>900, 'height'=>500,
1652                                   'borderwidth'=>0,
1653                                   'highlightthickness'=>0) {
1654        xscrollcommand(proc{|first,last| h.set first,last})
1655        yscrollcommand(proc{|first,last| v.set first,last})
1656        pack('expand'=>'yes', 'fill'=>'both')
1657      }
1658      grid('padx'=>1, 'pady'=>1, 'row'=>0, 'column'=>0,
1659           'rowspan'=>1, 'columnspan'=>1, 'sticky'=>'news')
1660    }
1661
1662    v.grid('padx'=>1, 'pady'=>1, 'row'=>0, 'column'=>1,
1663           'rowspan'=>1, 'columnspan'=>1, 'sticky'=>'news')
1664    h.grid('padx'=>1, 'pady'=>1, 'row'=>1, 'column'=>0,
1665           'rowspan'=>1, 'columnspan'=>1, 'sticky'=>'news')
1666
1667    TkGrid.rowconfigure(f, 0, 'weight'=>1, 'minsize'=>0)
1668    TkGrid.columnconfigure(f, 0, 'weight'=>1, 'minsize'=>0)
1669
1670    pack('expand'=>'yes', 'fill'=>'both', 'padx'=>1, 'pady'=>1)
1671
1672    v.command(proc{|*args| $floor2_canvas.yview(*args)})
1673    h.command(proc{|*args| $floor2_canvas.xview(*args)})
1674  }
1675end
1676
1677
1678# Create an entry for displaying and typing in current room.
1679
1680$currentRoom2 = TkVariable.new
1681$floor2_entry = TkEntry.new($floor2_canvas, 'width'=>10, 'relief'=>'sunken',
1682                           'bd'=>2, 'textvariable'=>$currentRoom2)
1683
1684# Choose colors, then fill in the floorplan.
1685
1686$floor2_colors = {}
1687if TkWinfo.depth($floor2_canvas) > 1
1688  $floor2_colors['bg1'] = '#a9c1da'
1689  $floor2_colors['outline1'] = '#77889a'
1690  $floor2_colors['bg2'] = '#9ab0c6'
1691  $floor2_colors['outline2'] = '#687786'
1692  $floor2_colors['bg3'] = '#8ba0b3'
1693  $floor2_colors['outline3'] = '#596673'
1694  $floor2_colors['offices'] = 'Black'
1695  $floor2_colors['active'] = '#c4d1df'
1696else
1697  $floor2_colors['bg1'] = 'white'
1698  $floor2_colors['outline1'] = 'black'
1699  $floor2_colors['bg2'] = 'white'
1700  $floor2_colors['outline2'] = 'black'
1701  $floor2_colors['bg3'] = 'white'
1702  $floor2_colors['outline3'] = 'black'
1703  $floor2_colors['offices'] = 'Black'
1704  $floor2_colors['active'] = 'black'
1705end
1706
1707$activeFloor2 = ''
1708floorDisplay2 $floor2_canvas,3
1709
1710# Set up event bindings for canvas:
1711
1712$floor2_canvas.itembind('floor1', '1', proc{floorDisplay2 $floor2_canvas,1})
1713$floor2_canvas.itembind('floor2', '1', proc{floorDisplay2 $floor2_canvas,2})
1714$floor2_canvas.itembind('floor3', '1', proc{floorDisplay2 $floor2_canvas,3})
1715$floor2_canvas.itembind('room', 'Enter', proc{newRoom2 $floor2_canvas})
1716$floor2_canvas.itembind('room', 'Leave', proc{$currentRoom2.value = ''})
1717$floor2_canvas.bind('2', proc{|x,y| $floor2_canvas.scan_mark x,y}, '%x %y')
1718$floor2_canvas.bind('B2-Motion',
1719                   proc{|x,y| $floor2_canvas.scan_dragto x,y}, '%x %y')
1720$floor2_canvas.bind('Destroy', proc{$currentRoom2.unset})
1721$currentRoom2.value = ''
1722$currentRoom2.trace('w',proc{roomChanged2 $floor2_canvas})
1723