lib/ruby-1.9.1-rc1/ext/tk/sample/demos-jp/floor2.rb

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