texplay 0.2.800-i386-mswin32 → 0.2.900-i386-mswin32

data/examples/example_fill.rb

@@ -1,44 +1,44 @@
-require 'rubygems'
-require 'common'
-require 'texplay'
-
-
-class W < Gosu::Window
-    def initialize
-        super(1024, 768, false, 20)
-        @img = TexPlay::create_blank_image(self, 1022, 800)
-        @tp = Gosu::Image.new(self, "#{Common::MEDIA}/texplay.png")
-        @gosu = Gosu::Image.new(self, "#{Common::MEDIA}/sand1.png")
-
-        points = []
-
-        # NOTE: TexPlay also accepts points. a 'point' is any object that responds to 'x' or y
-        # NOTE: current maximum points for a bezier is 13
-        (0..@img.width + 90).step(185) { |x|
-            p = TexPlay::TPPoint.new
-            p.x = x
-            p.y = @img.height * rand
-
-            points << p
-        }
-
-        @img.bezier points
-
-        # NOTE: the :texture hash argument works on ALL drawing actions; not just fills
-        @img.fill 300, 650, :texture => @gosu
-
-        # let's demonstrate by drawing a circle using the gosu.png texture
-        # NOTE: :texture even works on lines, boxes, polylines, beziers etc. 
-        @img.circle 400, 50, 40, :fill => true, :texture => @tp
-    end
-    
-    def draw
-        @img.draw 10, 10,1
-    end
-    
-end
-
-
-w = W.new
-w.show
-        
+require 'rubygems'
+require 'common'
+require 'texplay'
+
+
+class W < Gosu::Window
+    def initialize
+        super(1024, 768, false, 20)
+        @img = TexPlay::create_blank_image(self, 1022, 800)
+        @tp = Gosu::Image.new(self, "#{Common::MEDIA}/texplay.png")
+        @gosu = Gosu::Image.new(self, "#{Common::MEDIA}/sand1.png")
+
+        points = []
+
+        # NOTE: TexPlay also accepts points. a 'point' is any object that responds to 'x' or y
+        # NOTE: current maximum points for a bezier is 13
+        (0..@img.width + 90).step(185) { |x|
+            p = TexPlay::TPPoint.new
+            p.x = x
+            p.y = @img.height * rand
+
+            points << p
+        }
+
+        @img.bezier points
+
+        # NOTE: the :texture hash argument works on ALL drawing actions; not just fills
+        @img.fill 300, 650, :texture => @gosu
+
+        # let's demonstrate by drawing a circle using the gosu.png texture
+        # NOTE: :texture even works on lines, boxes, polylines, beziers etc. 
+        @img.circle 400, 50, 40, :fill => true, :texture => @tp
+    end
+    
+    def draw
+        @img.draw 10, 10,1
+    end
+    
+end
+
+
+w = W.new
+w.show
+        

data/examples/example_fill_old.rb

@@ -1,49 +1,49 @@
-require 'rubygems'
-require 'common'
-require 'texplay'
-
-class W < Gosu::Window
-    def initialize
-        super(1024, 768, false, 20)
-        @img = Gosu::Image.new(self, "#{Common::MEDIA}/empty2.png")
-        @tp = Gosu::Image.new(self, "#{Common::MEDIA}/texplay.png")
-        @gosu = Gosu::Image.new(self, "#{Common::MEDIA}/gosu.png")
-
-        # put a border on the image
-        @img.rect 0,0, @img.width - 1, @img.height - 1
-
-        points = []
-
-        # NOTE: TexPlay also accepts points. a 'point' is any object that responds to 'x' or 'y'
-        # NOTE: current maximum points for a bezier is 13
-        (0..@img.width).step(50) { |x|
-            p = TexPlay::TPPoint.new
-            p.x = x
-            p.y = @img.height * rand
-
-            points << p
-        }
-
-        @img.bezier points, :color => :white
-
-
-        # NOTE: the :texture hash argument works on ALL drawing actions; not just fills
-        @img.fill 300, 480, :texture => @tp
-
-        # let's demonstrate by drawing a circle using the gosu.png texture
-        # NOTE: :texture even works on lines, boxes, polylines, beziers etc. 
-        @img.circle 400, 50, 40, :fill => true, :texture => @gosu
-        
-    end
-    
-    def draw
-
-        @img.draw 100, 50,1
-    end
-    
-end
-
-
-w = W.new
-w.show
-        
+require 'rubygems'
+require 'common'
+require 'texplay'
+
+class W < Gosu::Window
+    def initialize
+        super(1024, 768, false, 20)
+        @img = Gosu::Image.new(self, "#{Common::MEDIA}/empty2.png")
+        @tp = Gosu::Image.new(self, "#{Common::MEDIA}/texplay.png")
+        @gosu = Gosu::Image.new(self, "#{Common::MEDIA}/gosu.png")
+
+        # put a border on the image
+        @img.rect 0,0, @img.width - 1, @img.height - 1
+
+        points = []
+
+        # NOTE: TexPlay also accepts points. a 'point' is any object that responds to 'x' or 'y'
+        # NOTE: current maximum points for a bezier is 13
+        (0..@img.width).step(50) { |x|
+            p = TexPlay::TPPoint.new
+            p.x = x
+            p.y = @img.height * rand
+
+            points << p
+        }
+
+        @img.bezier points, :color => :white
+
+
+        # NOTE: the :texture hash argument works on ALL drawing actions; not just fills
+        @img.fill 300, 480, :texture => @tp
+
+        # let's demonstrate by drawing a circle using the gosu.png texture
+        # NOTE: :texture even works on lines, boxes, polylines, beziers etc. 
+        @img.circle 400, 50, 40, :fill => true, :texture => @gosu
+        
+    end
+    
+    def draw
+
+        @img.draw 100, 50,1
+    end
+    
+end
+
+
+w = W.new
+w.show
+        

data/examples/example_fluent.rb

@@ -1,31 +1,31 @@
-require 'rubygems'
-require 'common'
-require 'gosu'
-require 'texplay'
-
-class W < Gosu::Window
-    def initialize
-        super(1024, 768, false, 20)
-        @img = Gosu::Image.new(self, "#{Common::MEDIA}/sunset.png")
-        @img.rect 0,0, @img.width - 1, @img.height - 1
-
-        # test the fluent interface
-        @img.
-            line(0, 0, 1024, 1024).
-            circle(20, 20, 50).
-            rect 30, 30, 100, 100
-    end
-    
-    def draw
-        x = @img.width * rand
-        y = @img.height * rand
-        
-        @img.draw 100, 50,1
-    end
-    
-end
-
-
-w = W.new
-w.show
-        
+require 'rubygems'
+require 'common'
+require 'gosu'
+require 'texplay'
+
+class W < Gosu::Window
+    def initialize
+        super(1024, 768, false, 20)
+        @img = Gosu::Image.new(self, "#{Common::MEDIA}/sunset.png")
+        @img.rect 0,0, @img.width - 1, @img.height - 1
+
+        # test the fluent interface
+        @img.
+            line(0, 0, 1024, 1024).
+            circle(20, 20, 50).
+            rect 30, 30, 100, 100
+    end
+    
+    def draw
+        x = @img.width * rand
+        y = @img.height * rand
+        
+        @img.draw 100, 50,1
+    end
+    
+end
+
+
+w = W.new
+w.show
+        

data/examples/example_gen_eval.rb

@@ -1,34 +1,34 @@
-require 'rubygems'
-require 'common'
-require 'texplay'
-
-
-class W < Gosu::Window
-    def initialize
-        super(1024, 768, false, 20)
-        @img = Gosu::Image.new(self, "#{Common::MEDIA}/empty2.png")
-
-        @width = @img.width
-        @height = @img.height
-
-        # turn alpha blending and filling on
-        @img.set_options :alpha_blend => true, :fill => true
-    end
-    
-    def draw
-        
-        # Gen_eval lets us use local instance vars within the block
-        # even though the block appears to be getting instance_eval'd
-        # for more information see gen_eval.c and object2module.c
-        @img.paint {
-            rect @width * rand, @height * rand, @width * rand, @height * rand,
-            :color => [rand, rand ,rand, rand]
-        }  
-        
-        @img.draw 100, 50,1
-    end
-end
-
-w = W.new
-w.show
-        
+require 'rubygems'
+require 'common'
+require 'texplay'
+
+
+class W < Gosu::Window
+    def initialize
+        super(1024, 768, false, 20)
+        @img = Gosu::Image.new(self, "#{Common::MEDIA}/empty2.png")
+
+        @width = @img.width
+        @height = @img.height
+
+        # turn alpha blending and filling on
+        @img.set_options :alpha_blend => true, :fill => true
+    end
+    
+    def draw
+        
+        # Gen_eval lets us use local instance vars within the block
+        # even though the block appears to be getting instance_eval'd
+        # for more information see gen_eval.c and object2module.c
+        @img.paint {
+            rect @width * rand, @height * rand, @width * rand, @height * rand,
+            :color => [rand, rand ,rand, rand]
+        }  
+        
+        @img.draw 100, 50,1
+    end
+end
+
+w = W.new
+w.show
+        

data/examples/example_hash_arguments.rb

@@ -1,47 +1,47 @@
-require 'rubygems'
-require 'common'
-require 'texplay'
-
-
-class W < Gosu::Window
-    def initialize
-        super(1024, 768, false, 20)
-        @img = Gosu::Image.new(self, "#{Common::MEDIA}/empty2.png")
-        @tp = Gosu::Image.new(self, "#{Common::MEDIA}/texplay.png")
-
-
-        # put a border on the image
-        @img.rect 0,0, @img.width - 1, @img.height - 1
-
-        # it can be annoying having to specify a bunch of :hash_arguments for every action
-        # here is how you specify common hash args that all actions will use (in the same image)
-
-        # all actions that respond to 'thickness' use a thickness of 8 pixels
-        # also set the color to random
-        @img.set_options :thickness => 8, :color => :rand
-
-        @img.rect 100, 100, 200, 200, :fill => false
-
-        # NOTE: for ngon, the parameters are as follows: x, y, radius, num_sides
-        @img.ngon 400, 400, 40, 3
-
-        # NOTE: the defaults can also be overidden:
-        @img.ngon 400, 200, 90, 6, :thickness => 1
-
-        # you can also delete the defaults
-        @img.delete_options
-
-        # this action will no longer have any default values
-        @img.ngon 200, 400, 90, 10
-    end
-    
-    def draw
-        @img.draw 100, 50,1
-    end
-    
-end
-
-
-w = W.new
-w.show
-        
+require 'rubygems'
+require 'common'
+require 'texplay'
+
+
+class W < Gosu::Window
+    def initialize
+        super(1024, 768, false, 20)
+        @img = Gosu::Image.new(self, "#{Common::MEDIA}/empty2.png")
+        @tp = Gosu::Image.new(self, "#{Common::MEDIA}/texplay.png")
+
+
+        # put a border on the image
+        @img.rect 0,0, @img.width - 1, @img.height - 1
+
+        # it can be annoying having to specify a bunch of :hash_arguments for every action
+        # here is how you specify common hash args that all actions will use (in the same image)
+
+        # all actions that respond to 'thickness' use a thickness of 8 pixels
+        # also set the color to random
+        @img.set_options :thickness => 8, :color => :rand
+
+        @img.rect 100, 100, 200, 200, :fill => false
+
+        # NOTE: for ngon, the parameters are as follows: x, y, radius, num_sides
+        @img.ngon 400, 400, 40, 3
+
+        # NOTE: the defaults can also be overidden:
+        @img.ngon 400, 200, 90, 6, :thickness => 1
+
+        # you can also delete the defaults
+        @img.delete_options
+
+        # this action will no longer have any default values
+        @img.ngon 200, 400, 90, 10
+    end
+    
+    def draw
+        @img.draw 100, 50,1
+    end
+    
+end
+
+
+w = W.new
+w.show
+        

data/examples/example_light.rb

@@ -0,0 +1,77 @@
+require 'rubygems'
+require 'common'
+require 'gosu'
+require 'texplay'
+
+class W < Gosu::Window
+  def initialize
+    super(500, 500, false, 20)
+
+    @x1 = 10
+    @x2 = 200
+    @y1 = 10
+    @y2 = 10
+
+    @radius = 100.0
+    @inner = 20.0
+    @max_opacity = 0.5
+    @max_opacity2 = 0.5
+
+    penumbra = (@radius - @inner).to_i
+    
+    @img = Gosu::Image.new(self, "#{Common::MEDIA}/maria.png")
+    #@img.rect(0, 0, @img.width - 1, @img.height - 1, :fill => true)
+
+    @circ2 = TexPlay.create_image(self, @radius * 2, @radius * 2)
+
+    @circ1 = TexPlay.create_image(self, @radius * 2, @radius * 2)
+
+     
+    shading_step = @max_opacity2.to_f / penumbra.to_f
+    @radius.to_i.downto(@inner) { |r|
+      @circ1.circle @radius, @radius, r, :color => [1, 0, 0, ((@radius - r) * shading_step)],
+      :fill => true
+    }
+
+    @circ1.circle @radius, @radius, @inner, :color => [1, 0, 0, @max_opacity2], :fill => true
+    
+   shading_step = @max_opacity.to_f / penumbra.to_f
+    @radius.to_i.downto(@inner) { |r|
+      @circ2.circle @radius, @radius, r, :color => [0, 0, 1, ((@radius - r) * shading_step)],
+      :fill => true
+    }
+
+    @circ2.circle @radius, @radius, @inner, :color => [0, 0, 1, @max_opacity], :fill => true
+  end
+  
+  def draw
+    @x1 += 1
+    @y1 += 1
+
+    @x2 -= 1
+    @y2 += 1
+    
+
+
+    @img.draw 10, 10,1
+    @circ1.draw @x1, @y1,1
+    @circ2.draw @x2, @y1,1
+
+    if button_down?(Gosu::KbEscape)
+      IL.Enable(IL::ORIGIN_SET)
+      IL.OriginFunc(IL::ORIGIN_UPPER_LEFT)
+      #            screenshot.crop(0,0, 500, 500).save("screenshot.jpg").free
+      exit
+    end  
+    
+  end
+
+  def update
+  end
+  
+end
+
+
+w = W.new
+w.show
+

data/examples/example_lsystem.rb

@@ -1,61 +1,61 @@
-require 'common'
-require 'gosu'
-
-Dragon = TexPlay::LSystem.new do
-    rule "F" => "F"
-    rule "X" => "X+YF+"
-    rule "Y" => "-FX-Y"
-    angle 90
-
-    atom "FX"
-end
-
-Koch = TexPlay::LSystem.new do
-    rule "F" => "F-F++F-F"
-
-    angle 60
-
-    atom "F"
-end
-
-Bush1 = TexPlay::LSystem.new do
-    rule "F" => "F[-F]F[+F][F]"
-    
-    angle 20
-    atom "F"
-end
-
-Bush2 = TexPlay::LSystem.new do
-    rule "F" => "FF"
-    rule "X" => "F[+X]F[-X]+X"
-    
-    angle 20
-    atom "X"
-end
-
-Bush3 = TexPlay::LSystem.new do
-    rule "F" => "FF"
-    rule "X" => "F-[[X]+X]+F[+FX]-X"
-    
-    angle 22.5
-    atom "X"
-end
-
-
-
-class W < Gosu::Window
-    def initialize
-        super(1024, 768, false, 20)
-        @img = TexPlay::create_blank_image(self, 500, 500)
-        @img.set_options :color => :rand
-        @img.lsystem(400, 150, Koch, :order => 8, :line_length => 6)
-        #@img.save("dragon.jpg")
-    end
-
-    def draw
-        @img.draw(100,0,1)
-    end
-end
-
-w = W.new
-w.show
+require 'common'
+require 'gosu'
+
+Dragon = TexPlay::LSystem.new do
+    rule "F" => "F"
+    rule "X" => "X+YF+"
+    rule "Y" => "-FX-Y"
+    angle 90
+
+    atom "FX"
+end
+
+Koch = TexPlay::LSystem.new do
+    rule "F" => "F-F++F-F"
+
+    angle 60
+
+    atom "F"
+end
+
+Bush1 = TexPlay::LSystem.new do
+    rule "F" => "F[-F]F[+F][F]"
+    
+    angle 20
+    atom "F"
+end
+
+Bush2 = TexPlay::LSystem.new do
+    rule "F" => "FF"
+    rule "X" => "F[+X]F[-X]+X"
+    
+    angle 20
+    atom "X"
+end
+
+Bush3 = TexPlay::LSystem.new do
+    rule "F" => "FF"
+    rule "X" => "F-[[X]+X]+F[+FX]-X"
+    
+    angle 22.5
+    atom "X"
+end
+
+
+
+class W < Gosu::Window
+    def initialize
+        super(1024, 768, false, 20)
+        @img = TexPlay::create_blank_image(self, 500, 500)
+        @img.set_options :color => :rand
+        @img.lsystem(400, 150, Koch, :order => 8, :line_length => 6)
+        #@img.save("dragon.jpg")
+    end
+
+    def draw
+        @img.draw(100,0,1)
+    end
+end
+
+w = W.new
+w.show

data/examples/example_melt.rb

@@ -1,27 +1,27 @@
-require 'rubygems'
-require 'common'
-require 'gosu'
-require 'texplay'
-
-
-class W < Gosu::Window
-    def initialize
-        super(1024, 768, false, 20)
-        @img = Gosu::Image.new(self, "#{Common::MEDIA}/sunset.png")
-    end
-    
-    def draw
-        x = (@img.width - 100/2) * rand 
-        y = (@img.height - 100/2) * rand 
-
-        @img.splice @img, x, y + 1, :crop => [x, y, x + 100, y + 100]
-
-        @img.draw 100, 50,1
-    end
-    
-end
-
-
-w = W.new
-w.show
-        
+require 'rubygems'
+require 'common'
+require 'gosu'
+require 'texplay'
+
+
+class W < Gosu::Window
+    def initialize
+        super(1024, 768, false, 20)
+        @img = Gosu::Image.new(self, "#{Common::MEDIA}/sunset.png")
+    end
+    
+    def draw
+        x = (@img.width - 100/2) * rand 
+        y = (@img.height - 100/2) * rand 
+
+        @img.splice @img, x, y + 1, :crop => [x, y, x + 100, y + 100]
+
+        @img.draw 100, 50,1
+    end
+    
+end
+
+
+w = W.new
+w.show
+