chingu 0.7.7.5 → 0.8rc1

data/examples/example25_fibers_state_machine.rb

@@ -0,0 +1,167 @@
+#!/usr/bin/env ruby
+require 'rubygems'
+require File.join(File.dirname($0), "..", "lib", "chingu")
+include Gosu
+include Chingu
+Velocity = Struct.new(:x, :y, :z)
+
+#
+# Press 'E' when demo is running to edit the playfield!
+# 
+class Game < Chingu::Window 
+  def initialize
+    p RUBY_VERSION
+    super(1000,600)
+  end
+  
+  def setup
+    retrofy
+    switch_game_state(Example25)
+  end    
+end
+
+class Example25 < GameState
+  def setup
+    self.input = { :escape => :exit, :e => :edit }    
+    load_game_objects
+    @droid = Droid.create(:x => 100, :y => 400)
+  end
+  
+  def edit
+    push_game_state(GameStates::Edit.new(:grid => [32,32], :classes => [Block]))
+  end
+  
+  def update    
+    super
+    $window.caption = "x/y: #{@droid.x.to_i}/#{@droid.y.to_i} - FPS: #{$window.fps}"
+  end
+  
+  def draw
+    super
+    #fill_rect(Rect.new(0,400,$window.width, 200), Color::White)
+  end
+end
+
+#
+# DROID
+#
+class Droid < Chingu::GameObject
+  trait :bounding_box, :scale => 0.80
+  traits :timer, :collision_detection , :timer, :velocity
+  
+  attr_reader :jumpign
+    
+  def setup
+    self.input = {  [:holding_left, :holding_a] => :holding_left, 
+                    [:holding_right, :holding_d] => :holding_right,
+                    [:up, :w] => :jump,
+                  }
+    
+    # Load the full animation from tile-file media/droid.bmp
+    @animations = Chingu::Animation.new(:file => "droid_11x15.bmp")
+    @animations.frame_names = { :scan => 0..5, :up => 6..7, :down => 8..9, :left => 10..11, :right => 12..13 }
+    
+    @animation = @animations[:scan]
+    @speed = 3
+    @jumping = false
+    
+    self.zorder = 300
+    self.factor = 3
+    self.acceleration_y = 0.5
+    self.max_velocity = 10
+    self.rotation_center = :bottom_center
+
+    @fiber = Fiber.new do |command| 
+      puts "got #{command}"; loop { v = Fiber.yield(); puts "got #{v}" }
+    end
+    @fiber.resume :one
+    @fiber.resume :two
+    #exit
+    
+    #fiber = Fiber.new do |command|
+      #while true
+      #  Fiber.yield
+      #end
+      #velocity ||= Velocity.new
+      
+      #if command == :left
+      #  move(-@speed, 0)
+      #  @animation = @animations[:left]
+      #elsif command == :right
+      #  move(@speed, 0)
+      #  @animation = @animations[:right]
+      #end
+    
+      #velocity
+    #end
+
+    update
+  end
+  
+  def holding_left
+    @fiber.resume :left
+  end
+
+  def holding_right
+    @fiber.resume :right
+  end
+
+  def jump
+    return if @jumping
+    @jumping = true
+    self.velocity_y = -10
+    @animation = @animations[:up]
+  end
+  
+  def move(x,y)
+    self.x += x
+    self.each_collision(Block) do |me, stone_wall|
+      self.x = previous_x
+      break
+    end
+    
+    self.y += y
+  end
+  
+  def update
+    @fiber.resume :jump# if holding?(:a)
+    
+    @image = @animation.next
+    
+    self.each_collision(Block) do |me, stone_wall|
+      if self.velocity_y < 0  # Hitting the ceiling
+        me.y = stone_wall.bb.bottom + me.image.height * self.factor_y
+        self.velocity_y = 0
+      else  # Land on ground
+        @jumping = false        
+        me.y = stone_wall.bb.top-1
+      end
+    end
+    
+    @animation = @animations[:scan] unless moved?
+  end
+end
+
+#
+# BLOCK, our basic level building block
+#
+class Block < GameObject
+  trait :bounding_box, :debug => false
+  trait :collision_detection
+  
+  def self.solid
+    all.select { |block| block.alpha == 255 }
+  end
+
+  def self.inside_viewport
+    all.select { |block| block.game_state.viewport.inside?(block) }
+  end
+
+  def setup
+    @image = Image["black_block.png"]
+    @color = Color.new(0xff808080)
+  end
+end
+
+
+Game.new.show

data/examples/example2_gamestate_basics.rb

@@ -1,6 +1,7 @@
 #!/usr/bin/env ruby
-require 'rubygems'
-require File.join(File.dirname($0), "..", "lib", "chingu")
+require 'rubygems' rescue nil
+$LOAD_PATH.unshift File.join(File.expand_path(__FILE__), "..", "..", "lib")
+require 'chingu'
 include Gosu
 
 #

data/examples/example3_parallax.rb

@@ -1,6 +1,7 @@
 #!/usr/bin/env ruby
-require 'rubygems'
-require File.join(File.dirname($0), "..", "lib", "chingu")
+require 'rubygems' rescue nil
+$LOAD_PATH.unshift File.join(File.expand_path(__FILE__), "..", "..", "lib")
+require 'chingu'
 include Gosu
 
 #

data/examples/example4_gamestates.rb

@@ -1,6 +1,7 @@
 #!/usr/bin/env ruby
-require 'rubygems'
-require File.join(File.dirname($0), "..", "lib", "chingu")
+require 'rubygems' rescue nil
+$LOAD_PATH.unshift File.join(File.expand_path(__FILE__), "..", "..", "lib")
+require 'chingu'
 include Gosu
 
 #

data/examples/example5_gamestates_in_pure_gosu.rb

@@ -1,6 +1,7 @@
 #!/usr/bin/env ruby
-require 'rubygems'
-require File.join(File.dirname($0), "..", "lib", "chingu")
+require 'rubygems' rescue nil
+$LOAD_PATH.unshift File.join(File.expand_path(__FILE__), "..", "..", "lib")
+require 'chingu'
 include Gosu
 
 #

data/examples/example6_transitional_game_state.rb

@@ -1,6 +1,7 @@
 #!/usr/bin/env ruby
-require 'rubygems'
-require File.join(File.dirname($0), "..", "lib", "chingu")
+require 'rubygems' rescue nil
+$LOAD_PATH.unshift File.join(File.expand_path(__FILE__), "..", "..", "lib")
+require 'chingu'
 include Gosu
 
 #

data/examples/example7_gfx_helpers.rb

@@ -1,6 +1,7 @@
 #!/usr/bin/env ruby
-require 'rubygems'
-require File.join(File.dirname($0), "..", "lib", "chingu")
+require 'rubygems' rescue nil
+$LOAD_PATH.unshift File.join(File.expand_path(__FILE__), "..", "..", "lib")
+require 'chingu'
 include Gosu
 include Chingu
 

data/examples/example8_traits.rb

@@ -1,6 +1,7 @@
 #!/usr/bin/env ruby
-require 'rubygems'
-require File.join(File.dirname($0), "..", "lib", "chingu")
+require 'rubygems' rescue nil
+$LOAD_PATH.unshift File.join(File.expand_path(__FILE__), "..", "..", "lib")
+require 'chingu'
 include Gosu
 include Chingu
 

data/examples/example9_collision_detection.rb

@@ -1,6 +1,7 @@
 #!/usr/bin/env ruby
-require 'rubygems'
-require File.join(File.dirname($0), "..", "lib", "chingu")
+require 'rubygems' rescue nil
+$LOAD_PATH.unshift File.join(File.expand_path(__FILE__), "..", "..", "lib")
+require 'chingu'
 include Gosu
 include Chingu
 

data/examples/game1.rb

@@ -4,8 +4,9 @@
 # A simple game in Chingu, using GameState, GameObject, Paralaxx, has_traits etc
 # 
 #
-require 'rubygems'
-require File.join(File.dirname($0), "..", "lib", "chingu")
+require 'rubygems' rescue nil
+$LOAD_PATH.unshift File.join(File.expand_path(__FILE__), "..", "..", "lib")
+require 'chingu'
 require 'texplay'     # adds Image#get_pixel
 
 include Gosu

data/examples/game_of_life.rb

@@ -1,291 +1,292 @@
-#
-# Conway's game of life in Gosu/Chingu
-# http://toastymofo.blogspot.com/2010/06/conways-game-of-life-in-ruby-gosu.html
-# 
-# Developed by r.kachowski ( http://www.toastymofo.net/ )
-# Additions by ippa ( http://ippa.se/gaming )
-#
-require 'chingu'
-require 'gosu'
-
-class Main < Chingu::Window
-  def initialize
-    super(640,480,false)
-    self.input={:esc=>:exit}    
-    push_game_state(GameOfLife)
-  end
-  def draw
-    super
-    fill_rect([0,0,640,480], 0xffffffff, -2)
-  end
-end
-
-class GameOfLife < Chingu::GameState
-  CELL_SIZE = 4
-  @@tick =0
-  def initialize
-    super
-    @grid = generate_grid
-    
-    self.input={  :left_mouse_button => :start_painting, 
-                  :released_left_mouse_button => :stop_painting,
-                  :right_mouse_button => :start_erasing,
-                  :releasedright_mouse_button => :stop_erasing,
-                  :z => :reset,
-                  :n => :update_grid,
-                  :space => :toggle_running,
-                  [:mouse_wheel_up,:left_arrow] => :prev_pattern,
-                  [:mouse_wheel_down,:right_arrow] => :next_pattern
-                }
-
-    @pattern = :pixel
-    @pattern_nr = 0
-    @painting = false
-    @erasing = false
-    @running = false
-    
-    @pattern_info = Chingu::Text.create(:x => 1, :y => 1, :size => 16, :color => Gosu::Color::BLACK)
-    update_pattern_info
-  end  
-  
-  def update_pattern_info
-    @pattern_info.text = "Current pattern: #{@pattern}. Change patterns with mousewheel."
-  end
-    
-  def prev_pattern
-    @pattern_nr -= 1
-    @pattern_nr = PATTERNS.keys.size-1 if @pattern_nr < 0
-    @pattern = PATTERNS.keys[@pattern_nr]
-    update_pattern_info
-  end
-  
-  def next_pattern
-    @pattern_nr += 1
-    @pattern_nr = 0 if @pattern_nr >= PATTERNS.keys.size
-    @pattern = PATTERNS.keys[@pattern_nr]
-    update_pattern_info
-  end
-  
-  def draw_pattern_at_mouse(pattern = :pixel, to_grid = false)
-    start_x = ($window.mouse_x/CELL_SIZE).floor
-    y = ($window.mouse_y/CELL_SIZE).floor - 1
-    
-    PATTERNS[pattern].each_line do |line|
-      x = start_x
-      line.each_char do |char|
-        @grid[x][y] = true  if char == "o" && to_grid
-        draw_cell(x, y)     if char == "o"
-        x += 1
-      end
-      
-      y += 1
-    end
-  end
-  
-  def update
-    super
-    
-    if @painting
-      draw_pattern_at_mouse(@pattern, true)
-      @painting = false if  @running           # Only put out pattern Once if game is running
-    else
-      draw_pattern_at_mouse(@pattern)
-    end
-    
-    update_grid if @running
-    
-    $window.caption = "Conway Generation #{@@tick}. Start/Stop with 'Space'. Run 1 generation with 'N'. Reset with 'Z'."
-  end
-
-  def draw
-    super
-    draw_grid
-  end
-  
-  private
-
-  def generate_grid
-    width = $window.width/CELL_SIZE
-    height = $window.height/CELL_SIZE
-
-    grid = Array.new(width)
-    col = Array.new(height)    
-    col.map!{false}
-    grid.map!{Array.new(col)}
-    grid
-  end
-
-  def draw_grid
-    @grid.each_with_index do |a,x|
-      a.each_with_index do |c,y|
-        if c === true
-          $window.fill_rect([x*CELL_SIZE,y*CELL_SIZE,CELL_SIZE,CELL_SIZE],0xff000000,0)
-        end        
-      end
-    end
-  end
-
-  def reset
-    @grid = generate_grid
-    @@tick = 0
-    @running = false
-  end
-
-  def update_grid
-    @new_grid = Marshal.load(Marshal.dump(@grid))
-
-    @grid.each_with_index do |a,x|
-      a.each_with_index do |c,y|
-        minus_x =x-1
-        minus_y = y-1
-        plus_x = x+1
-        plus_y = y+1
-        minus_x = @grid.length-1 if minus_x <0
-        minus_y = a.length-1 if minus_y <0
-        plus_y = 0 if plus_y >= a.length
-        plus_x = 0 if plus_x >= @grid.length
-
-        live_neighbours = 0
-
-        @grid[minus_x][y] == true ? live_neighbours+=1 : nil
-        @grid[plus_x][y] == true ? live_neighbours+=1 : nil
-        @grid[x][minus_y] == true ? live_neighbours+=1 : nil
-        @grid[x][plus_y] == true ? live_neighbours+=1 : nil
-        @grid[minus_x][plus_y] == true ? live_neighbours+=1 : nil
-        @grid[plus_x][minus_y] == true ? live_neighbours+=1 : nil
-        @grid[minus_x][minus_y] == true ? live_neighbours+=1 : nil
-        @grid[plus_x][plus_y] == true ? live_neighbours+=1 : nil
-
-        case live_neighbours
-          when 0..1 then @new_grid[x][y] = false
-          when 2 then @new_grid[x][y] = true if @new_grid[x][y] == true
-          when 3 then @new_grid[x][y] = true
-          when 4..8 then @new_grid[x][y] = false
-        end
-
-      end
-    end
-
-    @grid = @new_grid
-    @@tick+=1
-  end
-
-  def toggle_running
-    @running = !@running
-  end
-  
-  def start_painting; @painting = true; end
-  def stop_painting;  @painting = false; end  
-  def start_erasing;  @erasing = true; end
-  def stop_erasing;   @erasing = false; end
-      
-  def draw_cell(x, y, color = 0xaaff0000)
-    $window.fill_rect([x*CELL_SIZE,y*CELL_SIZE,CELL_SIZE,CELL_SIZE],0xaa0000ff,1)
-  end
-  
-end
-
-
-PATTERNS = Hash.new
-
-PATTERNS[:pixel] = %q{
-o
-}
-
-#
-# Spaceships
-#
-PATTERNS[:glider] = %q{
----o
--o-o
---oo
-}
-
-PATTERNS[:lightweight_spaceship] = %q{
--oooo
-o---o
-----o
-o--o-
-}
-
-#
-# Oscillators
-#
-PATTERNS[:blinker] = %q{
-ooo
-}
-
-PATTERNS[:beacon] = %q{
--ooo
-ooo-
-}
-
-PATTERNS[:toad] = %q{
-oo--
-o---
----o
---oo
-}
-
-PATTERNS[:pulsar] = %q{
----ooo---ooo--
---------------
--o----o-o----o
--o----o-o----o
--o----o-o----o
----ooo---ooo--
---------------
----ooo---ooo--
--o----o-o----o
--o----o-o----o
--o----o-o----o
---------------
----ooo---ooo--
-}
-
-#
-# Guns
-#
-PATTERNS[:gospel_glider_gun] = %q{
-------------------------o-----------
-----------------------o-o-----------
-------------oo------oo------------oo
------------o---o----oo------------oo
-oo--------o-----o---oo--------------
-oo--------o---o-oo----o-o-----------
-----------o-----o-------o-----------
------------o---o--------------------
-------------oo----------------------
-}
-
-PATTERNS[:block_laying_switch_engine] = %q{
-----------o-o--
-oo-------o-----
-oo--------o--o-
-------------ooo
-}
-
-
-
-#
-# Long lived patterns
-#
-PATTERNS[:rpentomino] = %q{
---oo
--oo
---o
-}
-
-PATTERNS[:diehard] = %q{
-oo---o-o
-oo----o-
-------o-
-}
-
-PATTERNS[:acorn] = %q{
---o-----
-----o---
--oo--ooo
-}
-
+#
+# Conway's game of life in Gosu/Chingu
+# http://toastymofo.blogspot.com/2010/06/conways-game-of-life-in-ruby-gosu.html
+# 
+# Developed by r.kachowski ( http://www.toastymofo.net/ )
+# Additions by ippa ( http://ippa.se/gaming )
+#
+require 'rubygems' rescue nil
+$LOAD_PATH.unshift File.join(File.expand_path(__FILE__), "..", "..", "lib")
+require 'chingu'
+
+class Main < Chingu::Window
+  def initialize
+    super(640,480,false)
+    self.input={:esc=>:exit}    
+    push_game_state(GameOfLife)
+  end
+  def draw
+    super
+    fill_rect([0,0,640,480], 0xffffffff, -2)
+  end
+end
+
+class GameOfLife < Chingu::GameState
+  CELL_SIZE = 4
+  @@tick =0
+  def initialize
+    super
+    @grid = generate_grid
+    
+    self.input={  :left_mouse_button => :start_painting, 
+                  :released_left_mouse_button => :stop_painting,
+                  :right_mouse_button => :start_erasing,
+                  :released_right_mouse_button => :stop_erasing,
+                  :z => :reset,
+                  :n => :update_grid,
+                  :space => :toggle_running,
+                  [:mouse_wheel_up,:left_arrow] => :prev_pattern,
+                  [:mouse_wheel_down,:right_arrow] => :next_pattern
+                }
+
+    @pattern = :pixel
+    @pattern_nr = 0
+    @painting = false
+    @erasing = false
+    @running = false
+    
+    @pattern_info = Chingu::Text.create(:x => 1, :y => 1, :size => 16, :color => Gosu::Color::BLACK)
+    update_pattern_info
+  end  
+  
+  def update_pattern_info
+    @pattern_info.text = "Current pattern: #{@pattern}. Change patterns with mousewheel."
+  end
+    
+  def prev_pattern
+    @pattern_nr -= 1
+    @pattern_nr = PATTERNS.keys.size-1 if @pattern_nr < 0
+    @pattern = PATTERNS.keys[@pattern_nr]
+    update_pattern_info
+  end
+  
+  def next_pattern
+    @pattern_nr += 1
+    @pattern_nr = 0 if @pattern_nr >= PATTERNS.keys.size
+    @pattern = PATTERNS.keys[@pattern_nr]
+    update_pattern_info
+  end
+  
+  def draw_pattern_at_mouse(pattern = :pixel, to_grid = false)
+    start_x = ($window.mouse_x/CELL_SIZE).floor
+    y = ($window.mouse_y/CELL_SIZE).floor - 1
+    
+    PATTERNS[pattern].each_line do |line|
+      x = start_x
+      line.each_char do |char|
+        @grid[x][y] = true  if char == "o" && to_grid
+        draw_cell(x, y)     if char == "o"
+        x += 1
+      end
+      
+      y += 1
+    end
+  end
+  
+  def update
+    super
+    
+    if @painting
+      draw_pattern_at_mouse(@pattern, true)
+      @painting = false if  @running           # Only put out pattern Once if game is running
+    else
+      draw_pattern_at_mouse(@pattern)
+    end
+    
+    update_grid if @running
+    
+    $window.caption = "Conway Generation #{@@tick}. Start/Stop with 'Space'. Run 1 generation with 'N'. Reset with 'Z'."
+  end
+
+  def draw
+    super
+    draw_grid
+  end
+  
+  private
+
+  def generate_grid
+    width = $window.width/CELL_SIZE
+    height = $window.height/CELL_SIZE
+
+    grid = Array.new(width)
+    col = Array.new(height)    
+    col.map!{false}
+    grid.map!{Array.new(col)}
+    grid
+  end
+
+  def draw_grid
+    @grid.each_with_index do |a,x|
+      a.each_with_index do |c,y|
+        if c === true
+          $window.fill_rect([x*CELL_SIZE,y*CELL_SIZE,CELL_SIZE,CELL_SIZE],0xff000000,0)
+        end        
+      end
+    end
+  end
+
+  def reset
+    @grid = generate_grid
+    @@tick = 0
+    @running = false
+  end
+
+  def update_grid
+    @new_grid = Marshal.load(Marshal.dump(@grid))
+
+    @grid.each_with_index do |a,x|
+      a.each_with_index do |c,y|
+        minus_x =x-1
+        minus_y = y-1
+        plus_x = x+1
+        plus_y = y+1
+        minus_x = @grid.length-1 if minus_x <0
+        minus_y = a.length-1 if minus_y <0
+        plus_y = 0 if plus_y >= a.length
+        plus_x = 0 if plus_x >= @grid.length
+
+        live_neighbours = 0
+
+        @grid[minus_x][y] == true ? live_neighbours+=1 : nil
+        @grid[plus_x][y] == true ? live_neighbours+=1 : nil
+        @grid[x][minus_y] == true ? live_neighbours+=1 : nil
+        @grid[x][plus_y] == true ? live_neighbours+=1 : nil
+        @grid[minus_x][plus_y] == true ? live_neighbours+=1 : nil
+        @grid[plus_x][minus_y] == true ? live_neighbours+=1 : nil
+        @grid[minus_x][minus_y] == true ? live_neighbours+=1 : nil
+        @grid[plus_x][plus_y] == true ? live_neighbours+=1 : nil
+
+        case live_neighbours
+          when 0..1 then @new_grid[x][y] = false
+          when 2 then @new_grid[x][y] = true if @new_grid[x][y] == true
+          when 3 then @new_grid[x][y] = true
+          when 4..8 then @new_grid[x][y] = false
+        end
+
+      end
+    end
+
+    @grid = @new_grid
+    @@tick+=1
+  end
+
+  def toggle_running
+    @running = !@running
+  end
+  
+  def start_painting; @painting = true; end
+  def stop_painting;  @painting = false; end  
+  def start_erasing;  @erasing = true; end
+  def stop_erasing;   @erasing = false; end
+      
+  def draw_cell(x, y, color = 0xaaff0000)
+    $window.fill_rect([x*CELL_SIZE,y*CELL_SIZE,CELL_SIZE,CELL_SIZE],0xaa0000ff,1)
+  end
+  
+end
+
+
+PATTERNS = Hash.new
+
+PATTERNS[:pixel] = %q{
+o
+}
+
+#
+# Spaceships
+#
+PATTERNS[:glider] = %q{
+---o
+-o-o
+--oo
+}
+
+PATTERNS[:lightweight_spaceship] = %q{
+-oooo
+o---o
+----o
+o--o-
+}
+
+#
+# Oscillators
+#
+PATTERNS[:blinker] = %q{
+ooo
+}
+
+PATTERNS[:beacon] = %q{
+-ooo
+ooo-
+}
+
+PATTERNS[:toad] = %q{
+oo--
+o---
+---o
+--oo
+}
+
+PATTERNS[:pulsar] = %q{
+---ooo---ooo--
+--------------
+-o----o-o----o
+-o----o-o----o
+-o----o-o----o
+---ooo---ooo--
+--------------
+---ooo---ooo--
+-o----o-o----o
+-o----o-o----o
+-o----o-o----o
+--------------
+---ooo---ooo--
+}
+
+#
+# Guns
+#
+PATTERNS[:gospel_glider_gun] = %q{
+------------------------o-----------
+----------------------o-o-----------
+------------oo------oo------------oo
+-----------o---o----oo------------oo
+oo--------o-----o---oo--------------
+oo--------o---o-oo----o-o-----------
+----------o-----o-------o-----------
+-----------o---o--------------------
+------------oo----------------------
+}
+
+PATTERNS[:block_laying_switch_engine] = %q{
+----------o-o--
+oo-------o-----
+oo--------o--o-
+------------ooo
+}
+
+
+
+#
+# Long lived patterns
+#
+PATTERNS[:rpentomino] = %q{
+--oo
+-oo
+--o
+}
+
+PATTERNS[:diehard] = %q{
+oo---o-o
+oo----o-
+------o-
+}
+
+PATTERNS[:acorn] = %q{
+--o-----
+----o---
+-oo--ooo
+}
+
 Main.new.show