ifmapper 0.5

data/lib/IFMapper/FXPage.rb

@@ -0,0 +1,24 @@
+
+require 'IFMapper/FXConnection'
+require 'IFMapper/FXRoom'
+require 'IFMapper/Page'
+
+class FXPage < Page
+  def new_connection( roomA, exitA, roomB, exitB = nil )
+    c = FXConnection.new( roomA, roomB )
+    return _new_connection(c, roomA, exitA, roomB, exitB)
+  end
+
+  def new_room(x, y)
+    r = FXRoom.new( x, y, 'New Location' )
+    return _new_room(r, x, y)
+  end
+
+  def properties(map)
+    if not @win
+      @win = FXPageDialogBox.new(map)
+    end
+    @win.copy_from(self)
+    @win.show
+  end
+end

data/lib/IFMapper/FXPageDialogBox.rb

@@ -0,0 +1,38 @@
+
+
+class FXPageDialogBox < FXDialogBox
+
+  def copy_to()
+    @page.name  = @name.text
+    @map.update_title
+  end
+
+  def copy_from(page)
+    @name.text   = page.name.to_s
+    @page = page
+  end
+
+  def initialize(map)
+    decor = DECOR_TITLE|DECOR_BORDER|DECOR_CLOSE
+
+    super( map.window, "Page Information", decor, 40, 40, 0, 0 )
+    mainFrame = FXVerticalFrame.new(self,
+				    FRAME_SUNKEN|FRAME_THICK|
+				    LAYOUT_FILL_X|LAYOUT_FILL_Y)
+
+    frame = FXHorizontalFrame.new(mainFrame, LAYOUT_SIDE_TOP|LAYOUT_FILL_X)
+
+    FXLabel.new(frame, "Name: ", nil, 0, LAYOUT_FILL_X)
+    @name = FXTextField.new(frame, 40, nil, 0, LAYOUT_FILL_ROW)
+
+    frame = FXVerticalFrame.new(mainFrame, 
+				LAYOUT_SIDE_TOP|LAYOUT_FILL_X|LAYOUT_FILL_Y)
+
+
+    @name.connect(SEL_CHANGED) { copy_to() }
+    @map = map
+
+    # We need to create the dialog box first, so we can use select text.
+    create
+  end
+end

data/lib/IFMapper/FXRoom.rb

@@ -0,0 +1,218 @@
+
+require 'IFMapper/Room'
+require 'IFMapper/FXRoomDialogBox'
+
+#
+# Class used to reprent an IF room
+#
+class FXRoom < Room
+  attr_accessor :x, :y, :xx, :yy
+  attr_accessor :selected
+
+  @@win = nil
+
+  def initialize(x, y, *opts)
+    @xx = x * WW + WS_2
+    @yy = y * HH + HS_2
+    @selected = false
+    super(x, y, *opts)
+  end
+
+  def x=(v)
+    @x  = v
+    @xx = v * WW + WS_2
+  end
+
+  def y=(v)
+    @y  = v
+    @yy = v * HH + HS_2
+  end
+
+  def copy(b)
+    @name     = b.name
+    @objects  = b.objects
+    @tasks    = b.tasks
+    @darkness = b.darkness
+  end
+
+  def selected=(value)
+    if value and @@win
+      @@win.copy_from(self)
+    end
+    @selected = value
+  end
+
+  def modal_properties(map)
+    shown = @@win and @@win.shown?
+    if shown
+      @@win.hide
+    end
+    win = FXRoomDialogBox.new(map, self, nil, true)
+    # win.setFocus
+    win.setFocus
+    win.show
+    win.copy_from(self)
+    if win.execute != 0
+      win.copy_to()
+    else
+      return false
+    end
+    if shown
+      @@win.show
+    end
+    return true
+  end
+
+  # Open a new requester to change room properties
+  def properties( map, event = nil )
+    if not @@win
+      @@win = FXRoomDialogBox.new(map, self, event, false)
+    else
+      @@win.map = map
+    end
+    @@win.setFocus
+    @@win.show
+    @@win.copy_from(self)
+    return
+  end
+
+  #
+  # Given a connection and/or an exit index, return the x and y offset
+  # multipliers needed from the top corner of the box.
+  #
+  def _corner(c, idx)
+    idx = @exits.index(c) unless idx
+    raise "corner: #{c} not found in #{self}" unless idx
+    x = y = 0
+    case idx
+    when 0
+      x = 0.5
+    when 1
+      x = 1
+    when 2
+      x = 1
+      y = 0.5
+    when 3
+      x = 1
+      y = 1
+    when 4
+      x = 0.5
+      y = 1
+    when 5
+      y = 1
+    when 6
+      y = 0.5
+    when 7
+    else
+      raise "error wrong index #{idx}"
+    end
+    return [ x, y ]
+  end
+
+
+  # Given a connection belonging to a room, return draw coordinate
+  # of that corner.
+  def corner( c, zoom, idx = nil )
+    x, y = _corner(c, idx)
+    x = @xx + W * x
+    y = @yy + H * y
+    return [x * zoom, y * zoom]
+  end
+
+
+  def draw_index(dc, zoom, idx)
+    x = (@xx + W  - 20 ) * zoom
+    y = (@yy + HH - HS - 5 ) * zoom
+    dc.drawText(x, y, (idx + 1).to_s)
+  end
+
+
+  def draw_box(dc, zoom, idx, opt)
+    if @selected
+      dc.foreground = 'yellow'
+    else
+      if @darkness
+	dc.foreground = opt['Box Darkness Color']
+      else
+	dc.foreground = opt['Box BG Color']
+      end
+    end
+
+    x = @xx * zoom
+    y = @yy * zoom
+    w = W * zoom
+    h = H * zoom
+    dc.fillRectangle(x, y, w, h)
+
+
+    dc.foreground = opt['Box Border Color']
+    dc.lineWidth  = 2 * zoom
+    dc.lineWidth  = 2 if dc.lineWidth < 2
+    dc.lineStyle  = LINE_SOLID
+    dc.drawRectangle(x, y, w, h)
+
+    # Draw grey square for index
+    if opt['Location Numbers']
+      dc.foreground = opt['Box Number Color']
+      x += w # Index goes at bottom right of square
+      y += h 
+      w = WIDX * zoom
+      h = HIDX * zoom
+      x -= w
+      y -= h
+      dc.fillRectangle(x, y, w, h)
+      
+      dc.foreground = opt['Box Border Color']
+      dc.drawRectangle(x, y, w, h)
+
+      draw_index(dc, zoom, idx)
+    end
+  end
+
+  def draw_text_wrap(dc, x, y, zoom, maxLen, text)
+    if text.size > maxLen
+      str = text
+      fh  = dc.font.getFontHeight
+      while str and str.size > maxLen
+	idx = str.rindex(/[ -]/, maxLen)
+	unless idx
+	  idx = str.index(/[ -]/, maxLen)
+	  idx = str.size unless idx
+	end
+	dc.drawText(x, y, str[0..idx])
+	str = str[idx+1..-1]
+	y  += fh
+	str = nil if y > (@yy + H) * zoom
+      end
+      dc.drawText(x, y, str) if str
+    else
+      dc.drawText(x, y, text)
+    end
+    return [x, y]
+  end
+
+  def draw_name(dc, zoom)
+    x = (@xx + 5)  * zoom
+    y = (@yy + 15) * zoom
+    return draw_text_wrap( dc, x, y, zoom, 15, @name )
+  end
+
+  def draw_objects(dc, zoom, x, y)
+    return if @objects == ''
+    fh  = dc.font.getFontHeight
+    y += fh
+    objs = @objects.split("\n")
+    objs = objs.join(', ')
+    return draw_text_wrap( dc, x, y, zoom, 23, objs )
+  end
+
+
+  def draw(dc, zoom, idx, opt, data)
+    draw_box(dc, zoom, idx, opt)
+    dc.font = data['font']
+    x, y = draw_name(dc, zoom)
+    dc.font = data['objfont']
+    draw_objects(dc, zoom, x, y)
+  end
+
+end

data/lib/IFMapper/FXRoomDialogBox.rb

@@ -0,0 +1,119 @@
+
+
+#
+# Class used to display a room dialog box
+#
+class FXRoomDialogBox < FXDialogBox
+
+  attr_writer :map
+
+  def copy_to()
+    @room.name    = @name.text
+    @room.objects = @objects.text
+    @room.objects.gsub!(/[\.,\t]+/, "\n")
+    @room.tasks = @tasks.text
+    @room.darkness = (@darkness.checkState == 1)
+
+    ## we should do something like:
+    ## @room.draw(dc)
+    ## for faster updates
+    @map.draw
+  end
+
+
+  def copy_from(room)
+    @name.text           = room.name
+    @darkness.checkState = room.darkness
+    @objects.text        = room.objects
+    @tasks.text          = room.tasks
+    # Select text for quick editing if it uses default location name
+    @name.setCursorPos room.name.size # - 1 if room.name.size > 0
+    if room.name == 'New Location'
+      @name.selectAll
+    end
+    if self.shown?
+      @name.setFocus
+    end
+    @room = room
+    if @map.navigation
+      @name.disable
+      @darkness.disable
+      @objects.disable
+      @tasks.disable
+    else
+      @name.enable
+      @darkness.enable
+      @objects.enable
+      @tasks.enable
+    end
+  end
+
+  def initialize(map, room, event = nil, modal = nil)
+    pos = [40, 40]
+    if event
+      pos  = [ event.last_x, event.last_y ]
+    end
+    maxW = map.window.width  - 390
+    maxH = map.window.height - 300
+    pos[0] = maxW if pos[0] > maxW
+    pos[1] = maxH if pos[1] > maxH
+    
+    if modal
+      decor = DECOR_TITLE|DECOR_BORDER
+    else
+      decor = DECOR_TITLE|DECOR_BORDER|DECOR_CLOSE
+    end
+
+    super( map.window, "Room Information", decor, pos[0], pos[1], 0, 0 )
+    mainFrame = FXVerticalFrame.new(self,
+				    FRAME_SUNKEN|FRAME_THICK|
+				    LAYOUT_FILL_X|LAYOUT_FILL_Y)
+
+    frame = FXHorizontalFrame.new(mainFrame, LAYOUT_SIDE_TOP|LAYOUT_FILL_X)
+
+    FXLabel.new(frame, "Location: ", nil, 0, LAYOUT_FILL_X)
+    @name = FXTextField.new(frame, 40, nil, 0, LAYOUT_FILL_ROW)
+
+    frame = FXVerticalFrame.new(mainFrame, 
+				LAYOUT_SIDE_TOP|LAYOUT_FILL_X|LAYOUT_FILL_Y)
+
+    
+    frame2 = FXHorizontalFrame.new(frame, LAYOUT_SIDE_TOP|LAYOUT_FILL_X)
+    FXLabel.new(frame2, "Objects: ", nil, 0, LAYOUT_FILL_X)
+    @darkness = FXCheckButton.new(frame2, "Darkness", nil, 0,
+				  ICON_BEFORE_TEXT|LAYOUT_CENTER_X|
+				  LAYOUT_SIDE_RIGHT)
+
+    @objects = FXText.new(frame, nil, 0, LAYOUT_FILL_X|LAYOUT_FILL_Y)
+    @objects.visibleRows = 8
+
+    frame = FXVerticalFrame.new(mainFrame, LAYOUT_SIDE_TOP|LAYOUT_FILL_X|
+				LAYOUT_FILL_Y)
+    FXLabel.new(frame, "Tasks: ", nil, 0, LAYOUT_FILL_X)
+    @tasks = FXText.new(frame, nil, 0, LAYOUT_FILL_X|LAYOUT_FILL_Y)
+    @tasks.visibleRows = 8
+
+    if modal
+      buttons = FXHorizontalFrame.new(mainFrame, 
+				      LAYOUT_SIDE_BOTTOM|LAYOUT_FILL_X|
+				      PACK_UNIFORM_WIDTH)
+      # Accept
+      @ok = FXButton.new(buttons, "&Accept", nil, self, FXDialogBox::ID_ACCEPT,
+			 FRAME_RAISED|FRAME_THICK|LAYOUT_RIGHT|LAYOUT_CENTER_Y)
+      
+      # Cancel
+      cmd = FXButton.new(buttons, "&Cancel", nil, self, FXDialogBox::ID_CANCEL,
+			 FRAME_RAISED|FRAME_THICK|LAYOUT_RIGHT|LAYOUT_CENTER_Y)
+    else
+      @name.connect(SEL_CHANGED) { copy_to() }
+      @objects.connect(SEL_CHANGED) { copy_to()}
+      @tasks.connect(SEL_CHANGED) { copy_to() }
+      @darkness.connect(SEL_COMMAND) { copy_to() }
+    end
+    
+    @map = map
+
+    # We need to create the dialog box first, so we can use select text.
+    create
+  end
+end

data/lib/IFMapper/FXSearchDialogBox.rb

@@ -0,0 +1,51 @@
+
+#
+# Class used to display a connection dialog box
+#
+class FXSearchDialogBox < FXDialogBox
+  attr_accessor :index
+
+  def text=(x)
+    @search.text = x
+    @index = 0
+  end
+
+  def text
+    return @search.text
+  end
+
+  def proc=(p)
+    @search.connect(SEL_CHANGED, p)
+    @proc = p
+  end
+
+  def initialize(parent)
+    decor = DECOR_TITLE|DECOR_BORDER|DECOR_CLOSE
+    super( parent, '', decor, 40, 200, 0, 0 )
+    @index = 0
+    mainFrame = FXVerticalFrame.new(self,
+				    FRAME_SUNKEN|FRAME_THICK|
+				    LAYOUT_FILL_X|LAYOUT_FILL_Y)
+
+    frame = FXHorizontalFrame.new(mainFrame, LAYOUT_SIDE_TOP|LAYOUT_FILL_X)
+
+    FXLabel.new(frame, "Search String: ", nil, 0, LAYOUT_FILL_X)
+    @search = FXTextField.new(frame, 40, nil, 0, LAYOUT_FILL_ROW)
+
+    frame = FXHorizontalFrame.new(mainFrame, LAYOUT_SIDE_BOTTOM|LAYOUT_FILL_X)
+    @previous = FXButton.new(frame, "Previous Match")
+    @previous.connect(SEL_COMMAND) { |sender, sel, e |
+      @index -= 1 if @index > 0
+      sender.handle(self, MKUINT(message, SEL_CHANGED), nil)
+      @proc.call @search, nil, nil if @proc
+    }
+    @next     = FXButton.new(frame, "Next Match") 
+    @next.connect(SEL_COMMAND) { |sender, sel, e |
+      @index += 1
+      @proc.call @search, nil, nil if @proc
+    }
+
+    # We need to create the dialog box first, so we can use select text.
+    create
+  end
+end