gglib 1.1.0 → 1.2.1

data/lib/window.rb

@@ -1,324 +1,333 @@
-module GGLib
-
-#The GUIWindow class is the central hub of the program. It is utimately responsible for all input and output (exept for logging output). 
-#The main game loops can be found in this class.
-class GUIWindow < Gosu::Window
-  attr_accessor :cursor, :background_image, :camera, :state
-  attr_reader :images, :mapimages
-  
-  BlankState = StateObject.new
-  
-  def initialize(w=640, h=480, fullscreen=true, u=20, stateObj=BlankState)
-    super(w, h, fullscreen, u)
-    $window=self #pre initialize global var to allow win initialization
-    @background_image = Gosu::Image.new(self, File.expand_path(File.dirname(__FILE__))+"/null.png", true)
-    @cursor = Cursor.new(File.expand_path(File.dirname(__FILE__))+"/media/cursor.bmp", false)
-    @framedrawn=false
-    @timer=0
-    @camera=Camera.new
-    @images = CArray.new
-    @mapimages = CArray.new
-    @guiWidgets = CArray.new
-    @state=stateObj
-    @focused=nil
-    @stickfocused=nil
-    @leftdrag = MouseDragEvent.new
-    @rightdrag = MouseDragEvent.new
-    @state.start
-    $window=self
-    $theme_init_hook.call
-  end
-  
-  def state=(val)
-    @state.end
-    @state = val
-    @state.start
-  end
-  
-  def widgets
-    return @widgets
-  end
-  
-  def framedrawn
-    return @framedrawn
-  end
-  
-  def button_down(id)
-    @state.button_down(id)
-    checkFocus
-    widgetDownProc(id)
-  end
-  
-  def button_up(id)
-    @state.button_up(id)
-    checkFocus                       
-    widgetUpProc(id)
-  end
-  
-  def timer
-    return @timer
-  end
-  
-  def widgets
-    return @guiWidgets
-  end
-   
-  def newImage(x,y,z,src,hardBorders=true,tracer="None")
-    img=Image.new(x,y,z,src,hardBorders,tracer,@images.size)
-    return @images << img
-  end
-  
-  def newTexture(x1,y1,x2,y2,z,src,hardBorders=true,tracer="None")
-    img=Texture.new(x1,y1,x2,y2,z,src,hardBorders,tracer,@images.size)
-    return @images << img
-  end
-  
-  def setImage(index,x,y,z,src,hardBorders=true,tracer="None")
-    img=Image.new(x,y,z,src,@images.size,hardBorders,tracer)
-    @images[index]=img
-    return index
-  end
-  
-  def setTexture(index, x1,y1,x2,y2,z,src,hardBorders=true,tracer="None")
-    img=Texture.new(x1,y1,x2,y2,z,src,hardBorders,tracer,@images.size)
-    @images[index]=img
-    return index
-  end
-  
-  def deleteImage(no)
-    if @images[no]!=nil
-      @images[no].del
-    end
-      @images.delete_at(no)
-  end
-  
-  def deleteAllImages
-    @images.clear
-  end
-  
-  def setBackground(src)
-    @background_image = Gosu::Image.new(self,src,true)    
-  end
-  
-  def setMapBackground(src)
-    @map_image = Gosu::Image.new(self,src,true)    
-  end
-  
-  def newMapImage(x,y,z,src,hardBorders=true,tracer="None")
-    img=Image.new(x,y,z,src,hardBorders,tracer,@mapimages.size)
-    return @mapimages << img
-  end
-  
-  def deleteMapImage(no)
-    if @mapimages[no]!=nil
-      @mapimages[no].del
-    end
-      @mapimages.delete_at(no)
-  end
-  
-  def deleteAllMapImages
-    @mapimages.clear
-  end  
-  
-  def newWidget(widget)
-    return @guiWidgets << widget
-  end
-  
-  def deleteWidget(widget)
-    id=widget.id
-    @guiWidgets.delete_at(id)
-  end
-  
-  def deleteAllWidgets
-    @guiWidgets.each {|widget| widget.del}
-    @guiWidgets.clear
-    @focused=nil
-    @stickfocused=nil
-    self.text_input=nil
-  end
-  
-  def createWidgets
-    self.text_input=nil
-    @focused=nil
-    @stickfocused=nil
-  end
-  
-  def setTextInput(field)
-    self.text_input=field
-  end
-  
-  def setFocus(object)
-    if @focused!=nil and not @focused.sleeping? #dont blur the object if it is the window or if it is sleeping
-      @focused.blur
-    end
-    if object==nil
-      @focused=nil
-    else
-      @focused=@guiWidgets[object]
-    end
-  end
-  
-  def setStickyFocus(object)
-    if @stickfocused!=nil
-      @stickfocused.onStickyBlur
-    end
-    @stickfocused=object
-    if @stickfocused!=nil
-      @stickfocused.onStickyFocus
-    end
-  end
-  
-  def hasFocus
-    return @focused
-  end
-  
-  def hasStickyFocus
-    return @stickfocused
-  end
-  
-  def update
-    checkFocus
-    
-    if @leftdrag.starting
-      if(Gosu::distance(@leftdrag.start_x, @leftdrag.start_y, mouse_x, mouse_y) > 5)
-        @leftdrag.confirmStart
-      end
-    elsif @rightdrag.starting
-      if(Gosu::distance(@rightdrag.start_x, @rightdrag.start_y, mouse_x, mouse_y) > 5)
-        @rightdrag.confirmStart
-      end
-    end
-    
-    if @timer>100
-      @timer=0
-    else
-      @timer+=1
-    end
-    
-    @state.update
-    @framedrawn = false
-  end
-
-  def draw
-    @cursor.draw
-    @images.each {|img| img.draw}
-    @guiWidgets.each {|widget| widget.intDraw}
-    @background_image.draw(0, 0, ZOrder::Background)
-    @state.draw
-    @framedrawn=true
-  end
-  
-  private
-  def widgetDownProc(id)
-    char=button_id_to_char(id)
-    setStickyFocus(nil) if (id==Gosu::Button::MsLeft or id==Gosu::Button::MsRight) and @stickfocused!=nil #and not @stickfocused.contains?(mouse_x, mouse_y)
-    if @stickfocused!=nil and not @stickfocused.sleeping? #only sticky focused widgets recieve text input 
-      if id==Gosu::Button::MsLeft
-        @leftdrag.start
-      elsif id==Gosu::Button::MsRight
-        @rightdrag.start
-      elsif char!=nil
-        if button_down?(Gosu::Button::KbLeftShift) or button_down?(Gosu::Button::KbRightShift)
-          if char=~/[A-Z]/i
-            char=char.upcase!
-          else
-            capschar=WidgetTextCaps[char]
-            if capschar!=nil
-              char=capschar
-            end
-          end
-        end
-        @stickfocused.feedText(char)
-      end  
-    end
-  end
-  
-  def widgetUpProc(id)
-    char=button_id_to_char(id)
-    setStickyFocus(nil) if (id==Gosu::Button::MsLeft or id==Gosu::Button::MsRight) and @stickfocused!=nil #and not @stickfocused.contains?(mouse_x, mouse_y)
-    if @stickfocused!=nil and not @stickfocused.sleeping? #only sticky focused widgets recieve text input 
-      if id==Gosu::Button::MsLeft
-        if @leftdrag.inprogress
-          @leftdrag.end
-          @stickfocused.event(WidgetEvent::MsLeftDrag)          
-        else
-          @leftdrag.terminate
-          @stickfocused.event(WidgetEvent::MsLeft)
-        end
-      elsif id==Gosu::Button::MsRight
-        if @rightdrag.inprogress
-          @rightdrag.end
-          @stickfocused.event(WidgetEvent::MsRightDrag)                  
-        else
-          @rightdrag.terminate
-          @stickfocused.event(WidgetEvent::MsRight)
-        end
-      elsif id==Gosu::Button::KbUp or id==Gosu::Button::GpUp
-        @stickfocused.event(WidgetEvent::KeyUp)
-      elsif id==Gosu::Button::KbDown or id==Gosu::Button::GpDown
-        @stickfocused.event(WidgetEvent::KeyDown)
-      elsif id==Gosu::Button::KbLeft or id==Gosu::Button::GpLeft
-        @stickfocused.event(WidgetEvent::KeyLeft)
-      elsif id==Gosu::Button::KbRight or id==Gosu::Button::GpRight
-        @stickfocused.event(WidgetEvent::KeyRight)
-      elsif id==Gosu::Button::KbRight or id==Gosu::Button::GpRight
-        @stickfocused.event(WidgetEvent::KeyRight)
-      elsif id==Gosu::Button::KbBackspace or id==Gosu::Button::KbDelete
-        @stickfocused.event(WidgetEvent::KeyDelete)   
-      elsif id==Gosu::Button::KbEscape or id==Gosu::Button::GpButton7
-        @stickfocused.event(WidgetEvent::KeyEscape)     
-      elsif id==Gosu::Button::KbEnter or id==Gosu::Button::GpButton2 or id==28 #strange Gosu bug, KbEnter!=Enter code
-        @stickfocused.event(WidgetEvent::KeyEnter)
-      elsif id==Gosu::Button::KbLeftAlt or id==Gosu::Button::KbRightAlt or id==Gosu::Button::GpButton5
-        @stickfocused.event(WidgetEvent::KeyAlt)
-      elsif id==Gosu::Button::KbLeftControl or id==Gosu::Button::KbRightControl or id==Gosu::Button::GpButton3
-        @stickfocused.event(WidgetEvent::KeyControl)
-      elsif id==Gosu::Button::KbLeftShift or id==Gosu::Button::KbRightShift or id==Gosu::Button::GpButton6
-        @stickfocused.event(WidgetEvent::KeyShift)      
-      elsif id==Gosu::Button::KbSpace or id==Gosu::Button::KbSpace or id==Gosu::Button::GpButton4
-        @stickfocused.event(WidgetEvent::KeySpace)
-      elsif id==Gosu::Button::GpButton0
-        @stickfocused.event(WidgetEvent::GpEnter)
-      elsif id==Gosu::Button::GpButton1
-        @stickfocused.event(WidgetEvent::GpCancel)        
-      end
-    end
-    if @focused!=nil and not @focused.sleeping? and (@stickfocused==nil or @focused.id != @stickfocused.id) #normally focused widgets only recieve click input 
-      if id==Gosu::Button::MsLeft
-        @focused.event(WidgetEvent::MsLeft)
-      elsif id==Gosu::Button::MsRight
-        @focused.event(WidgetEvent::MsRight)
-      elsif id==Gosu::Button::GpButton0
-        @focused.event(WidgetEvent::GpEnter)
-      end
-    end
-  end
-  
-  def checkFocus
-    if @focused==nil
-      oldfocus=nil
-    else
-      oldfocus=@focused.id      
-    end
-    newfocus=nil
-    focusFlag=false
-    @guiWidgets.each { |widget|
-      if (@cursor.visible and widget.over?(mouse_x,mouse_y)) and not widget.sleeping?
-        if not focusFlag
-          newfocus=widget.id
-          focusFlag=true
-        elsif widget.zfocus >= @guiWidgets[newfocus].zfocus #give focus to the widget with the highest focus zorder, or in the event of a tie, give focus to the new object
-          newfocus=widget.id
-        end
-      else
-      end
-    }
-    if newfocus!=nil and newfocus!=oldfocus
-      @guiWidgets[newfocus].focus
-    elsif newfocus==nil and oldfocus!=nil
-      setFocus(nil)
-    end
-  end
-end
-
-end #module GGLib
+module GGLib
+
+#The GUIWindow class is the central hub of the program. It is utimately responsible for all input and output (exept for logging output). 
+#The main game loops can be found in this class.
+class GUIWindow < Gosu::Window
+  attr_accessor :cursor, :background_image, :camera, :state
+  attr_reader :images, :mapimages
+  
+  BlankState = StateObject.new
+  
+  def initialize(w=640, h=480, fullscreen=true, u=20, stateObj=BlankState)
+    super(w, h, fullscreen, u)
+    $window=self #pre initialize global var to allow win initialization
+    @background_image = Gosu::Image.new(self, File.expand_path(File.dirname(__FILE__))+"/null.png", true)
+    @cursor = Cursor.new(File.expand_path(File.dirname(__FILE__))+"/media/cursor.bmp", false)
+    @framedrawn=false
+    @timer=0
+    @camera=Camera.new
+    @images = CArray.new
+    @mapimages = CArray.new
+    @guiWidgets = CArray.new
+    @state=stateObj
+    @focused=nil
+    @stickfocused=nil
+    @leftdrag = MouseDragEvent.new
+    @rightdrag = MouseDragEvent.new
+    @state.start
+    $window=self
+    $theme_init_hook.call
+  end
+  
+  def state=(val)
+    @state.end
+    @state = val
+    @state.start
+  end
+  
+  def widgets
+    return @widgets
+  end
+  
+  def framedrawn
+    return @framedrawn
+  end
+  
+  def button_down(id)
+    @state.button_down(id)
+    checkFocus
+    widgetDownProc(id)
+  end
+  
+  def button_up(id)
+    @state.button_up(id)
+    checkFocus                       
+    widgetUpProc(id)
+  end
+  
+  def timer
+    return @timer
+  end
+  
+  def widgets
+    return @guiWidgets
+  end
+   
+  def newImage(x,y,z,src,hardBorders=true,tracer="None")
+    img=Image.new(x,y,z,src,hardBorders,tracer,@images.size)
+    return @images << img
+  end
+  
+  def newTexture(x1,y1,x2,y2,z,src,hardBorders=true,tracer="None")
+    img=Texture.new(x1,y1,x2,y2,z,src,hardBorders,tracer,@images.size)
+    return @images << img
+  end
+  
+  def setImage(index,x,y,z,src,hardBorders=true,tracer="None")
+    img=Image.new(x,y,z,src,@images.size,hardBorders,tracer)
+    @images[index]=img
+    return index
+  end
+  
+  def setTexture(index, x1,y1,x2,y2,z,src,hardBorders=true,tracer="None")
+    img=Texture.new(x1,y1,x2,y2,z,src,hardBorders,tracer,@images.size)
+    @images[index]=img
+    return index
+  end
+  
+  def deleteImage(no)
+    if @images[no]!=nil
+      @images[no].del
+    end
+      @images.delete_at(no)
+  end
+  
+  def deleteAllImages
+    @images.clear
+  end
+  
+  def setBackground(src)
+    @background_image = Gosu::Image.new(self,src,true)    
+  end
+  
+  def setMapBackground(src)
+    @map_image = Gosu::Image.new(self,src,true)    
+  end
+  
+  def newMapImage(x,y,z,src,hardBorders=true,tracer="None")
+    img=Image.new(x,y,z,src,hardBorders,tracer,@mapimages.size)
+    return @mapimages << img
+  end
+  
+  def deleteMapImage(no)
+    if @mapimages[no]!=nil
+      @mapimages[no].del
+    end
+      @mapimages.delete_at(no)
+  end
+  
+  def deleteAllMapImages
+    @mapimages.clear
+  end  
+  
+  def newWidget(widget)
+    return @guiWidgets << widget
+  end
+  
+  def deleteWidget(widget)
+    id=widget.id
+    @guiWidgets.delete_at(id)
+  end
+  
+  def deleteAllWidgets
+    @guiWidgets.each {|widget| widget.del}
+    @guiWidgets.clear
+    @focused=nil
+    @stickfocused=nil
+    self.text_input=nil
+  end
+  
+  def createWidgets
+    self.text_input=nil
+    @focused=nil
+    @stickfocused=nil
+  end
+  
+  def setTextInput(field)
+    self.text_input=field
+  end
+  
+  def setFocus(object)
+    if @focused!=nil and not @focused.sleeping? #dont blur the object if it is the window or if it is sleeping
+      @focused.blur
+    end
+    if object==nil
+      @focused=nil
+    else
+      @focused=@guiWidgets[object]
+    end
+  end
+  
+  def setStickyFocus(object)
+    if @stickfocused!=nil
+      @stickfocused.onStickyBlur
+    end
+    @stickfocused=object
+    if @stickfocused!=nil
+      @stickfocused.onStickyFocus
+    end
+  end
+  
+  def hasFocus
+    return @focused
+  end
+  
+  def hasStickyFocus
+    return @stickfocused
+  end
+  
+  def update
+    checkFocus
+    
+    if @leftdrag.starting
+      if(Gosu::distance(@leftdrag.start_x, @leftdrag.start_y, mouse_x, mouse_y) > 5)
+        @leftdrag.confirmStart
+      end
+    elsif @rightdrag.starting
+      if(Gosu::distance(@rightdrag.start_x, @rightdrag.start_y, mouse_x, mouse_y) > 5)
+        @rightdrag.confirmStart
+      end
+    end
+    
+    if @timer>100
+      @timer=0
+    else
+      @timer+=1
+    end
+    
+    @state.update
+    @framedrawn = false
+  end
+
+  def draw
+    @cursor.draw
+    @images.each {|img| img.draw}
+    @guiWidgets.each {|widget| widget.intDraw}
+    @background_image.draw(0, 0, ZOrder::Background)
+    @state.draw
+    @framedrawn=true
+  end
+  
+  private
+  def widgetDownProc(id)
+    char=button_id_to_char(id)
+    setStickyFocus(nil) if (id==Gosu::Button::MsLeft or id==Gosu::Button::MsRight) and @stickfocused!=nil #and not @stickfocused.contains?(mouse_x, mouse_y)
+    if @stickfocused!=nil and not @stickfocused.sleeping? #only sticky focused widgets recieve text input 
+      if id==Gosu::Button::MsLeft
+        @leftdrag.start
+        @focused.event
+      elsif id==Gosu::Button::MsRight
+        @rightdrag.start
+        @focused.event
+      elsif char!=nil
+        if button_down?(Gosu::Button::KbLeftShift) or button_down?(Gosu::Button::KbRightShift)
+          if char=~/[A-Z]/i
+            char=char.upcase!
+          else
+            capschar=WidgetTextCaps[char]
+            if capschar!=nil
+              char=capschar
+            end
+          end
+        end
+        @stickfocused.feedText(char)
+      end  
+    end
+    if @focused!=nil and not @focused.sleeping? and (@stickfocused==nil or @focused.id != @stickfocused.id) #normally focused widgets only recieve click input 
+      if id==Gosu::Button::MsLeft
+        @focused.downevent(WidgetEvent::MsLeft)
+      elsif id==Gosu::Button::MsRight
+        @focused.downevent(WidgetEvent::MsRight)
+      end
+    end
+  end
+  
+  def widgetUpProc(id)
+    char=button_id_to_char(id)
+    setStickyFocus(nil) if (id==Gosu::Button::MsLeft or id==Gosu::Button::MsRight) and @stickfocused!=nil #and not @stickfocused.contains?(mouse_x, mouse_y)
+    if @stickfocused!=nil and not @stickfocused.sleeping? #only sticky focused widgets recieve text input 
+      if id==Gosu::Button::MsLeft
+        if @leftdrag.inprogress
+          @leftdrag.end
+          @stickfocused.event(WidgetEvent::MsLeftDrag)          
+        else
+          @leftdrag.terminate
+          @stickfocused.event(WidgetEvent::MsLeft)
+        end
+      elsif id==Gosu::Button::MsRight
+        if @rightdrag.inprogress
+          @rightdrag.end
+          @stickfocused.event(WidgetEvent::MsRightDrag)                  
+        else
+          @rightdrag.terminate
+          @stickfocused.event(WidgetEvent::MsRight)
+        end
+      elsif id==Gosu::Button::KbUp or id==Gosu::Button::GpUp
+        @stickfocused.event(WidgetEvent::KeyUp)
+      elsif id==Gosu::Button::KbDown or id==Gosu::Button::GpDown
+        @stickfocused.event(WidgetEvent::KeyDown)
+      elsif id==Gosu::Button::KbLeft or id==Gosu::Button::GpLeft
+        @stickfocused.event(WidgetEvent::KeyLeft)
+      elsif id==Gosu::Button::KbRight or id==Gosu::Button::GpRight
+        @stickfocused.event(WidgetEvent::KeyRight)
+      elsif id==Gosu::Button::KbRight or id==Gosu::Button::GpRight
+        @stickfocused.event(WidgetEvent::KeyRight)
+      elsif id==Gosu::Button::KbBackspace or id==Gosu::Button::KbDelete
+        @stickfocused.event(WidgetEvent::KeyDelete)   
+      elsif id==Gosu::Button::KbEscape or id==Gosu::Button::GpButton7
+        @stickfocused.event(WidgetEvent::KeyEscape)     
+      elsif id==Gosu::Button::KbEnter or id==Gosu::Button::GpButton2 or id==28 #strange Gosu bug, KbEnter!=Enter code
+        @stickfocused.event(WidgetEvent::KeyEnter)
+      elsif id==Gosu::Button::KbLeftAlt or id==Gosu::Button::KbRightAlt or id==Gosu::Button::GpButton5
+        @stickfocused.event(WidgetEvent::KeyAlt)
+      elsif id==Gosu::Button::KbLeftControl or id==Gosu::Button::KbRightControl or id==Gosu::Button::GpButton3
+        @stickfocused.event(WidgetEvent::KeyControl)
+      elsif id==Gosu::Button::KbLeftShift or id==Gosu::Button::KbRightShift or id==Gosu::Button::GpButton6
+        @stickfocused.event(WidgetEvent::KeyShift)      
+      elsif id==Gosu::Button::KbSpace or id==Gosu::Button::KbSpace or id==Gosu::Button::GpButton4
+        @stickfocused.event(WidgetEvent::KeySpace)
+      elsif id==Gosu::Button::GpButton0
+        @stickfocused.event(WidgetEvent::GpEnter)
+      elsif id==Gosu::Button::GpButton1
+        @stickfocused.event(WidgetEvent::GpCancel)        
+      end
+    end
+    if @focused!=nil and not @focused.sleeping? and (@stickfocused==nil or @focused.id != @stickfocused.id) #normally focused widgets only recieve click input 
+      if id==Gosu::Button::MsLeft
+        @focused.event(WidgetEvent::MsLeft)
+      elsif id==Gosu::Button::MsRight
+        @focused.event(WidgetEvent::MsRight)
+      elsif id==Gosu::Button::GpButton0
+        @focused.event(WidgetEvent::GpEnter)
+      end
+    end
+  end
+ 
+  def checkFocus
+    if @focused==nil
+      oldfocus=nil
+    else
+      oldfocus=@focused.id      
+    end
+    newfocus=nil
+    focusFlag=false
+    @guiWidgets.each { |widget|
+      if (@cursor.visible and widget.over?(mouse_x,mouse_y)) and not widget.sleeping?
+        if not focusFlag
+          newfocus=widget.id
+          focusFlag=true
+        elsif widget.zfocus >= @guiWidgets[newfocus].zfocus #give focus to the widget with the highest focus zorder, or in the event of a tie, give focus to the new object
+          newfocus=widget.id
+        end
+      else
+      end
+    }
+    if newfocus!=nil and newfocus!=oldfocus
+      @guiWidgets[newfocus].focus
+    elsif newfocus==nil and oldfocus!=nil
+      setFocus(nil)
+    end
+  end
+end
+
+end #module GGLib