gglib 1.1.0 → 1.2.1

data/lib/tile.rb

@@ -1,170 +1,170 @@
-module GGLib
-
-#The Tile class represents a rectangular region on the screen.
-#It is synonymous with the Rect structure used in many C programs.
-class Tile
-    @@tiles = CArray.new
-    #@@tile = []
-    attr_accessor :x1,:y1,:x2,:y2,:inclusive,:id 
-    #@inclusive decides whether or not tile edges are considered part of the tile
-    def initialize(x1=0,y1=0,x2=1,y2=1,inclusive=true,id=nil) #id parameter is for use by saveload ONLY!!!!
-      @x1,@y1,@x2,@y2=x1,y1,x2,y2
-      #begin
-      #  @x1+=0;@y1+=0;@x2+=0;@y2+=0 #check if coordinate is actually a proc (damn dynamic typing...)
-      #rescue
-      #  raise "Bad coord: ID#{@@tiles.size+1}"
-      #end
-      @inclusive=inclusive
-      #@name=name
-      if id==nil
-        @id=@@tiles.size #volatile, id overwritten by derived classes
-        @tileno=@id #secure copy of id
-        @@tiles << self
-      else
-        @id=id
-        @tileno=id
-        @@tiles[id]=self
-      end
-    end
-    
-    #Find out if a point is located in the tile
-    def isInTile?(x,y)
-      if @inclusive
-        return iTile(x,y)
-      else
-        return xTile(x,y)
-      end
-    end
-    
-    alias contains? isInTile?
-    
-    #Redefine the tile
-    def setCoordinates(x1,y1,x2,y2)
-      @x1,@y1,@x2,@y2=x1,y1,x2,y2
-    end
-    
-    #Redefine the tile
-    def setTile(x1,y1,x2,y2)
-      @x1,@y1,@x2,@y2=x1,y1,x2,y2
-    end
-    
-    #Translate the coordinates of the tile so that the thop left corner of the tile is at the given coordinates
-    def move(x,y=@y)
-      @x2=x+(@x2-@x1)
-      @y2=y+(@y2-@y1)
-      @y1=y
-      @x1=x
-    end
-    
-    #translate the cordinates of the tile so that the center of the tile is at the given point
-    def centerOn(x, y)
-      hwidth=((@x2-@x1)/2).ceil.abs
-      hheight=((@y2-@y1)/2).ceil.abs
-      @x2=x+hwidth
-      @y2=y+hheight
-      @y1=y-hheight
-      @x1=x-hwidth
-    end
-    
-    #Returns the width of the tile
-    def height
-      return (@y2-@y1).abs
-    end  
-    
-    #Returns the hiehgt of the tile    
-    def width
-      return (@x2-@x1).abs
-    end
-    
-    #Find out if a point is located in the tile, including the edges of the tile
-    def iTile(x,y)
-      return (x>=@x1 and x<=@x2 and y>=@y1 and y<=@y2)
-    end
-
-    #Find out if a point is located in the tile, *not* including the edges of the tile
-    def xTile(x,y)
-      return (x>@x1 and x<@x2 and y>@y1 and y<@y2)
-    end
-    
-    #Iterates over all of the encompased by the tile
-    def each 
-      @x1.upto(@x2) { |x|
-        @y1.upto(@y2) { |y|
-          yield x,y
-        }
-      }
-    end
-    
-    #Iterates over all of the points on the edges of the tile
-    def eachBorder(xindent=0,yindent=0)
-      (@x1+xindent).upto(@x2-xindent) { |x|
-        yield x, @y1+yindent
-      }
-      
-      (@x1+xindent).upto(@x2-xindent) { |x|
-        yield x, @y2+yindent
-      }
-      
-      (@y1+xindent).upto(@y2-xindent) { |y|
-        yield @x1+xindent, y
-      }
-      
-      (@y1+xindent).upto(@y2-xindent) { |y|
-        yield @x2+xindent, y
-      }
-    end
-    
-    public
-    #See Tile::intersect?
-    def intersect?(tile)
-      return Tile::intersect?(self,tile)
-    end
-    
-    #Find out if the given two tiles intersect. 
-    def Tile.intersect?(tile1,tile2)
-      return  ((tile2.x1 < tile1.x2) and (tile2.x2 > tile1.x1) and (tile2.y1 < tile1.y2) and (tile2.y2 > tile1.y1))
-    end
-    
-    #Returns the tile with the given index
-    def Tile.getById(id)
-      if @@tiles[id]!=nil
-        return @@tiles[id]
-      else
-        return false
-      end
-    end
-    
-    #Deletes the tile with the given index
-    def Tile.deleteById(id)
-      if @@tiles[id]!=nil
-        @@tiles[id].del
-        @@tiles.delete_at(id)
-        return true
-      else
-        return false
-      end
-    end
-    
-    #Returns an array of all tiles
-    def Tile.getAllInstances
-      return @@tiles
-    end
-    
-    #Override the internal array of tiles with a new one
-    def Tile.setAllInstances(ntiles)
-      @@tiles=ntiles
-    end
-    
-    #Delete all tiles int the program. (Includes classes derived from tiles)
-    def Tile.deleteAllInstances
-      @@tiles=CArray.new
-    end
-    
-    #Deletes the calling tile
-    def del
-      @@tiles.delete_at(@tileno)
-      @x1,@y1,@x2,@y2,@inclusive,@id,@tileno=nil
-    end
-  end
-  
+module GGLib
+
+#The Tile class represents a rectangular region on the screen.
+#It is synonymous with the Rect structure used in many C programs.
+class Tile
+    @@tiles = CArray.new
+    #@@tile = []
+    attr_accessor :x1,:y1,:x2,:y2,:inclusive,:id 
+    #@inclusive decides whether or not tile edges are considered part of the tile
+    def initialize(x1=0,y1=0,x2=1,y2=1,inclusive=true,id=nil) #id parameter is for use by saveload ONLY!!!!
+      @x1,@y1,@x2,@y2=x1,y1,x2,y2
+      #begin
+      #  @x1+=0;@y1+=0;@x2+=0;@y2+=0 #check if coordinate is actually a proc (damn dynamic typing...)
+      #rescue
+      #  raise "Bad coord: ID#{@@tiles.size+1}"
+      #end
+      @inclusive=inclusive
+      #@name=name
+      if id==nil
+        @id=@@tiles.size #volatile, id overwritten by derived classes
+        @tileno=@id #secure copy of id
+        @@tiles << self
+      else
+        @id=id
+        @tileno=id
+        @@tiles[id]=self
+      end
+    end
+    
+    #Find out if a point is located in the tile
+    def isInTile?(x,y)
+      if @inclusive
+        return iTile(x,y)
+      else
+        return xTile(x,y)
+      end
+    end
+    
+    alias contains? isInTile?
+    
+    #Redefine the tile
+    def setCoordinates(x1,y1,x2,y2)
+      @x1,@y1,@x2,@y2=x1,y1,x2,y2
+    end
+    
+    #Redefine the tile
+    def setTile(x1,y1,x2,y2)
+      @x1,@y1,@x2,@y2=x1,y1,x2,y2
+    end
+    
+    #Translate the coordinates of the tile so that the thop left corner of the tile is at the given coordinates
+    def move(x,y=@y)
+      @x2=x+(@x2-@x1)
+      @y2=y+(@y2-@y1)
+      @y1=y
+      @x1=x
+    end
+    
+    #translate the cordinates of the tile so that the center of the tile is at the given point
+    def centerOn(x, y)
+      hwidth=((@x2-@x1)/2).ceil.abs
+      hheight=((@y2-@y1)/2).ceil.abs
+      @x2=x+hwidth
+      @y2=y+hheight
+      @y1=y-hheight
+      @x1=x-hwidth
+    end
+    
+    #Returns the width of the tile
+    def height
+      return (@y2-@y1).abs
+    end  
+    
+    #Returns the hiehgt of the tile    
+    def width
+      return (@x2-@x1).abs
+    end
+    
+    #Find out if a point is located in the tile, including the edges of the tile
+    def iTile(x,y)
+      return (x>=@x1 and x<=@x2 and y>=@y1 and y<=@y2)
+    end
+
+    #Find out if a point is located in the tile, *not* including the edges of the tile
+    def xTile(x,y)
+      return (x>@x1 and x<@x2 and y>@y1 and y<@y2)
+    end
+    
+    #Iterates over all of the encompased by the tile
+    def each 
+      @x1.upto(@x2) { |x|
+        @y1.upto(@y2) { |y|
+          yield x,y
+        }
+      }
+    end
+    
+    #Iterates over all of the points on the edges of the tile
+    def eachBorder(xindent=0,yindent=0)
+      (@x1+xindent).upto(@x2-xindent) { |x|
+        yield x, @y1+yindent
+      }
+      
+      (@x1+xindent).upto(@x2-xindent) { |x|
+        yield x, @y2+yindent
+      }
+      
+      (@y1+xindent).upto(@y2-xindent) { |y|
+        yield @x1+xindent, y
+      }
+      
+      (@y1+xindent).upto(@y2-xindent) { |y|
+        yield @x2+xindent, y
+      }
+    end
+    
+    public
+    #See Tile::intersect?
+    def intersect?(tile)
+      return Tile::intersect?(self,tile)
+    end
+    
+    #Find out if the given two tiles intersect. 
+    def Tile.intersect?(tile1,tile2)
+      return  ((tile2.x1 < tile1.x2) and (tile2.x2 > tile1.x1) and (tile2.y1 < tile1.y2) and (tile2.y2 > tile1.y1))
+    end
+    
+    #Returns the tile with the given index
+    def Tile.getById(id)
+      if @@tiles[id]!=nil
+        return @@tiles[id]
+      else
+        return false
+      end
+    end
+    
+    #Deletes the tile with the given index
+    def Tile.deleteById(id)
+      if @@tiles[id]!=nil
+        @@tiles[id].del
+        @@tiles.delete_at(id)
+        return true
+      else
+        return false
+      end
+    end
+    
+    #Returns an array of all tiles
+    def Tile.getAllInstances
+      return @@tiles
+    end
+    
+    #Override the internal array of tiles with a new one
+    def Tile.setAllInstances(ntiles)
+      @@tiles=ntiles
+    end
+    
+    #Delete all tiles int the program. (Includes classes derived from tiles)
+    def Tile.deleteAllInstances
+      @@tiles=CArray.new
+    end
+    
+    #Deletes the calling tile
+    def del
+      @@tiles.delete_at(@tileno)
+      @x1,@y1,@x2,@y2,@inclusive,@id,@tileno=nil
+    end
+  end
+  
   end #module GGLib

data/lib/widget.rb

@@ -1,206 +1,218 @@
-module GGLib
-
-#The Widget class is an interface between the button class and the window class which allows for user interaction with an area of the screen. This area is referred to as the widget.
-#To make a Widget, simply create a class derived from Widget and override methods as needed:
-#
-# class MyWidget < Widget      #all widgets are subclasses of Widget
-#   attr_reader :text,:font    #most widgets will have text and font attributes
-#   def initialize(window,text)
-#     super(window,Button::Image,0,400,640,480,"img/gui/mywidget image.png",name="My Widget")       #use super to initialize the button
-#     @text=text; @font=Gosu::Font.new(window, "arial", 50)          #initialize widget specific variables
-#   end
-#   def draw                        #the window will call draw every time it executes GameWindow::draw
-#     font.draw(text,0,0)           #you do not have to draw the image here, Button class does that for you
-#     if clicked?                   #here you do widget specific things like drawing text,
-#       setImage(Gosu::Image.new)   #changing the picture on mouse over or click, etc
-#     end                                     
-#   end
-#   def onDelete        #onDelete is called when the window wants to delete the widget
-#     puts "deleted"    #execute widget specific code here
-#   end                 #or leave the function alone if there is no widget specific code
-# end
-#
-#See the `Widget Programmer's Handbook` for more info.
-
-class Widget < Tile
-  attr_reader :window, :name, :sleeping, :defimage, :buttonId, :id, :zfocus
-  attr_accessor :theme
-  def initialize(name="unnamed",x1=0,y1=0,x2=1,y2=1,theme=Theme::BlankTheme,acceptsticky=true,z=0) #do not modify
-    super(x1,y1,x2,y2)
-    @id=$window.newWidget(self)
-    @theme=theme.newInstance(self)
-    @name=name
-    @sleeping=false
-    @zfocus=z
-    @acceptstickyfocus=acceptsticky
-    onInitialize
-  end
-  def hasFocus? #do not modify
-    if $window.hasFocus == self
-      return true 
-    else
-      return false
-    end
-  end
-  def hasStickyFocus? #do not modify
-    if $window.hasStickyFocus == self
-      return true 
-    else
-      return false
-    end
-  end
-  def focus #do not modify
-    #debugger
-    $window.setFocus(@id) 
-    onMouseOver #focus is triggered by the onMouseOver event, so when the window gives a widget focus, it must preform the mouseover event 
-  end  
-  def blur #do not modify
-    onMouseOut #blur is triggered by the onMouseOut event, so when the window blurs a widget, it must preform the mouseout event
-  end
-  
-  def over?(x,y)
-    return iTile(x,y)      
-  end
-  def clicked?(x,y)
-    if $window.button_down?(Gosu::Button::MsLeft)
-      return xTile(x,y)
-    else
-      return false
-    end
-  end
-    
-  def event(type) #do not modify
-    if type==WidgetEvent::MsLeft
-      if @acceptstickyfocus
-        stickFocus
-      end
-      onClick
-    elsif type==WidgetEvent::MsRight
-      onRightClick
-    else
-      onKeyPress(type)
-    end
-  end
-  
-  def feedText(char)
-  end
-  def onClick
-  end
-  def onRightClick
-  end
-  def onDrag(x1, y1, x2, y2)
-  end
-  def onRightDrag(x1, y1, x2, y2)
-  end
-  def onMouseOver
-  end
-  def onStickyFocus
-  end
-  def onMouseOut 
-  end
-  def onStickyBlur
-  end
-  def onInitialize
-  end
-  def onDelete
-  end
-  def onKeyPress(key)
-  end
-  
-  def stickFocus
-    $window.setStickyFocus(self)
-  end
-  def unstickFocus
-    $window.setStickyFocus(nil)
-  end
-  
-  def intDraw
-    if not @sleeping
-      @theme.draw
-      draw
-    end
-  end
-  
-  def draw
-  end
-  
-  def sleep
-    if not @sleeping
-      if hasStickyFocus?
-        $window.setStickyFocus(nil)
-      end
-      @theme.setSleepState
-      @sleeping=true
-    end
-  end
-  def sleeping?
-    return @sleeping
-  end
-  def wakeUp
-    if @sleeping
-      @theme.setWakeState
-      @sleeping=false
-    end
-  end
-  
-  def button
-    return Button.getButton(buttonId)
-  end
-  
-  def del
-    onDelete
-    if $window.nil?
-      raise "Window assigned to nil" #Very strange bug. Should be dead by now. (This is just in case.)
-      return
-    end
-    $window.deleteWidget(self)
-    super
-  end
-end
-
-class WidgetEvent
-  MsLeft=0
-  MsRight=1
-  KeyUp=2
-  KeyDown=3
-  KeyLeft=4
-  KeyRight=5
-  KeyEscape=6
-  KeyEnter=7      
-  KeyAlt=8
-  KeyControl=9
-  KeyShift=10      
-  KeySpace=11
-  GpEnter=12
-  GpCancel=13
-  KeyText=14
-  KeyDelete=15
-  MsLeftDrag=16
-  MsRightDrag=17
-end
-
-WidgetTextCaps = {
- ","=>"<",
- "."=>">",
- "/"=>"?",
- "'"=>"\"",
- ";"=>":",
- "["=>"{",
- "]"=>"}",
- "\\"=>"|",
- "="=>"+",
- "-"=>"_",
- "0"=>")",
- "9"=>"(",
- "8"=>"*",
- "7"=>"&",
- "6"=>"^",
- "5"=>"%",
- "4"=>"$",
- "3"=>"#",
- "2"=>"@",
- "1"=>"!",
- "`"=>"~"
-}
-
+module GGLib
+
+#The Widget class is an interface between the button class and the window class which allows for user interaction with an area of the screen. This area is referred to as the widget.
+#To make a Widget, simply create a class derived from Widget and override methods as needed:
+#
+# class MyWidget < Widget      #all widgets are subclasses of Widget
+#   attr_reader :text,:font    #most widgets will have text and font attributes
+#   def initialize(window,text)
+#     super(window,Button::Image,0,400,640,480,"img/gui/mywidget image.png",name="My Widget")       #use super to initialize the button
+#     @text=text; @font=Gosu::Font.new(window, "arial", 50)          #initialize widget specific variables
+#   end
+#   def draw                        #the window will call draw every time it executes GameWindow::draw
+#     font.draw(text,0,0)           #you do not have to draw the image here, Button class does that for you
+#     if clicked?                   #here you do widget specific things like drawing text,
+#       setImage(Gosu::Image.new)   #changing the picture on mouse over or click, etc
+#     end                                     
+#   end
+#   def onDelete        #onDelete is called when the window wants to delete the widget
+#     puts "deleted"    #execute widget specific code here
+#   end                 #or leave the function alone if there is no widget specific code
+# end
+#
+#See the `Widget Programmer's Handbook` for more info.
+
+class Widget < Tile
+  attr_reader :window, :name, :sleeping, :defimage, :buttonId, :id, :zfocus
+  attr_accessor :theme
+  def initialize(name="unnamed",x1=0,y1=0,x2=1,y2=1,theme=Themes::blank,acceptsticky=true,z=0) #do not modify
+    super(x1,y1,x2,y2)
+    @id=$window.newWidget(self)
+    @theme=theme.newInstance(self)
+    @name=name
+    @sleeping=false
+    @zfocus=z
+    @acceptstickyfocus=acceptsticky
+    onInitialize
+  end
+  def hasFocus? #do not modify
+    if $window.hasFocus == self
+      return true 
+    else
+      return false
+    end
+  end
+  def hasStickyFocus? #do not modify
+    if $window.hasStickyFocus == self
+      return true 
+    else
+      return false
+    end
+  end
+  def focus #do not modify
+    #debugger
+    $window.setFocus(@id) 
+    onMouseOver #focus is triggered by the onMouseOver event, so when the window gives a widget focus, it must preform the mouseover event 
+  end  
+  def blur #do not modify
+    onMouseOut #blur is triggered by the onMouseOut event, so when the window blurs a widget, it must preform the mouseout event
+  end
+  
+  def over?(x,y)
+    return iTile(x,y)      
+  end
+  def clicked?(x,y)
+    if $window.button_down?(Gosu::Button::MsLeft)
+      return xTile(x,y)
+    else
+      return false
+    end
+  end
+    
+  def event(type) #do not modify
+    if type==WidgetEvent::MsLeft
+      if @acceptstickyfocus
+        stickFocus
+      end
+      onClick
+    elsif type==WidgetEvent::MsRight
+      onRightClick
+    else
+      onKeyPress(type)
+    end
+  end
+
+  def downevent(type)
+    if type==WidgetEvent::MsLeft
+      onMouseDown
+    elsif type==WidgetEvent::MsRight
+      onRightMouseDown
+    end
+  end
+  
+  def feedText(char)
+  end
+  def onMouseDown
+  end
+  def onRightMouseDown
+  end
+  def onClick
+  end
+  def onRightClick
+  end
+  def onDrag(x1, y1, x2, y2)
+  end
+  def onRightDrag(x1, y1, x2, y2)
+  end
+  def onMouseOver
+  end
+  def onStickyFocus
+  end
+  def onMouseOut 
+  end
+  def onStickyBlur
+  end
+  def onInitialize
+  end
+  def onDelete
+  end
+  def onKeyPress(key)
+  end
+  
+  def stickFocus
+    $window.setStickyFocus(self)
+  end
+  def unstickFocus
+    $window.setStickyFocus(nil)
+  end
+  
+  def intDraw
+    if not @sleeping
+      @theme.draw
+      draw
+    end
+  end
+  
+  def draw
+  end
+  
+  def sleep
+    if not @sleeping
+      if hasStickyFocus?
+        $window.setStickyFocus(nil)
+      end
+      @theme.setSleepState
+      @sleeping=true
+    end
+  end
+  def sleeping?
+    return @sleeping
+  end
+  def wakeUp
+    if @sleeping
+      @theme.setWakeState
+      @sleeping=false
+    end
+  end
+  
+  def button
+    return Button.getButton(buttonId)
+  end
+  
+  def del
+    onDelete
+    if $window.nil?
+      raise "Window assigned to nil" #Very strange bug. Should be dead by now. (This is just in case.)
+      return
+    end
+    $window.deleteWidget(self)
+    super
+  end
+end
+
+class WidgetEvent
+  MsLeft=0
+  MsRight=1
+  KeyUp=2
+  KeyDown=3
+  KeyLeft=4
+  KeyRight=5
+  KeyEscape=6
+  KeyEnter=7      
+  KeyAlt=8
+  KeyControl=9
+  KeyShift=10      
+  KeySpace=11
+  GpEnter=12
+  GpCancel=13
+  KeyText=14
+  KeyDelete=15
+  MsLeftDrag=16
+  MsRightDrag=17
+end
+
+WidgetTextCaps = {
+ ","=>"<",
+ "."=>">",
+ "/"=>"?",
+ "'"=>"\"",
+ ";"=>":",
+ "["=>"{",
+ "]"=>"}",
+ "\\"=>"|",
+ "="=>"+",
+ "-"=>"_",
+ "0"=>")",
+ "9"=>"(",
+ "8"=>"*",
+ "7"=>"&",
+ "6"=>"^",
+ "5"=>"%",
+ "4"=>"$",
+ "3"=>"#",
+ "2"=>"@",
+ "1"=>"!",
+ "`"=>"~"
+}
+
 end #module GGLib