chingu 0.9rc7 → 0.9rc8

data/examples/example15_trait_timer2.rb

@@ -30,7 +30,7 @@ class Stuff < GameState
   end
   
   def stop
-    stop_timer(:name => :blink)
+    stop_timer(:blink)
   end
   
   def fast

data/examples/example7_gfx_helpers.rb

@@ -9,11 +9,25 @@ include Chingu
 # GFXHelpers example - demonstrating Chingus GFX
 #
 class Game < Chingu::Window
+  @@number_of_game_states = 7
   def initialize
     super(640,400)
     self.input = {:space => :next_effect, :esc => :exit}
     self.caption = "Example of Chingus GFX Helpers"
-    
+    load_game_states
+  end
+  
+  def next_effect
+    @@number_of_game_states -= 1
+    if @@number_of_game_states == 0
+      load_game_states
+      @@number_of_game_states = 7
+    else
+      pop_game_state
+    end   
+  end
+  
+  def load_game_states
     push_game_state(Fill)
     push_game_state(FillRect)
     push_game_state(FillGradient)
@@ -22,15 +36,13 @@ class Game < Chingu::Window
     push_game_state(DrawCircle)
     push_game_state(Particles)
   end
-  
-  def next_effect
-    pop_game_state
-  end
 end
 
+
+
 class DrawCircle < Chingu::GameState
   def draw
-    $window.caption = "circles and arcs (space to continue)"
+    $window.caption = "circles and arcs (press space to continue)"
     draw_circle(0, 0, 300, Color::RED)
     fill_circle($window.width, $window.height, 200, Color::RED)
     
@@ -44,14 +56,14 @@ end
 
 class Fill < Chingu::GameState 
   def draw
-    $window.caption = "fill (space to continue)"
+    $window.caption = "fill (press space to continue)"
     fill(Color::RED)
   end
 end
 
 class FillRect < Chingu::GameState 
   def draw
-    $window.caption = "fill_rect (space to continue)"
+    $window.caption = "fill_rect (press space to continue)"
     fill_rect([10,10,100,100], Color::WHITE)
   end
 end
@@ -63,7 +75,7 @@ class FillGradient < Chingu::GameState
   end
   
   def draw
-    $window.caption = "fill_gradient (space to continue)"
+    $window.caption = "fill_gradient (press space to continue)" 
     fill_gradient(:from => @pinkish, :to => @blueish, :orientation => :vertical)
   end
 end
@@ -74,7 +86,7 @@ class FillGradientMultipleColors < Chingu::GameState
   end
   
   def draw
-    $window.caption = "fill_gradient with more than two colors (space to continue)"
+    $window.caption = "fill_gradient with more than two colors (press space to continue)"
     fill_gradient(:colors => @colors, :orientation => :horizontal)
   end
 end
@@ -86,7 +98,7 @@ class FillGradientRect < Chingu::GameState
   end
   
   def draw
-    $window.caption = "fill_gradient with :rect-option (space to continue)"
+    $window.caption = "fill_gradient with :rect-option (press space to continue)"
     fill_gradient(:from => @color1, :to => @color2, :rect => [100,100,200,200], :orientation => :horizontal)
   end
 end

data/examples/game1.rb

@@ -8,12 +8,20 @@ require 'rubygems' rescue nil
 $LOAD_PATH.unshift File.join(File.expand_path(__FILE__), "..", "..", "lib")
 require 'chingu'
 require 'texplay'     # adds Image#get_pixel
+require 'optparse'
 
 include Gosu
 include Chingu
 
+
 class Game < Chingu::Window  
   def initialize
+    $debug = false
+    ARGV.each do |a|
+	if a == "-debug"
+	   $debug = true
+	end
+    end
     super(1000,400,false)
     self.input = { :escape => :exit }
 		retrofy
@@ -30,14 +38,18 @@ class Level < Chingu::GameState
   
   def initialize(options = {})
     super
-    
-    @parallax = Parallax.create(:rotation_center => :top_left, :zorder => 200)
-    @parallax << { :image => "city2.png", :damping => 2, :zorder => 200}
-    @parallax << { :image => "city1.png", :damping => 1, :zorder => 200}	
-    @player = Player.create(:x => 30, :y => 10)
+
+    @parallax = Parallax.create(:rotation_center => :top_left, :zorder => 0)
+    @parallax << { :image => "city2.png", :damping => 2, :zorder => 0}
+    @parallax << { :image => "city1.png", :damping => 1, :zorder => 1000}
+
+    @player = Player.create(:x => 30, :y => 10, :zorder=> 500)
     
     @bg1 = Color.new(0xFFCE28FF)
     @bg2 = Color.new(0xFF013E87)
+    @text = Text.create("Score:", :size => 20, :x => 30, :y => 370, :zorder => 1001) #initialize score string
+    @text1 = Text.create("0", :size => 20, :x => 90, :y => 370, :zorder => 1001)   #initialize score value to 0
+    
   end
   
   #
@@ -53,7 +65,7 @@ class Level < Chingu::GameState
     @player.y = 100
     
     @parallax.camera_x = 0
-    @total_game_ticks = 100000
+    @total_game_ticks = 10000#100000
     @timer = 100
     @total_ticks = 0
   end
@@ -94,19 +106,183 @@ class Level < Chingu::GameState
       bullet.die
       if enemy.hit_by(bullet)
         @player.score += 20
+            @text1.destroy!       #destroy old score
+            @text1 = Text.create(@player.score, :size => 20, :x => 90, :y => 370, :zorder => 1001 )    #update the new score
+            
+      end
+    end
+
+    Bullet.each_bounding_circle_collision(EnemyPlane) do |bullet, enemy|
+      bullet.die
+      if enemy.hit_by(bullet)
+        @player.score += 20
+            @text1.destroy!       #destroy old score
+            @text1 = Text.create(@player.score, :size => 20, :x => 90, :y => 370, :zorder => 1001 )    #update the new score
+            
       end
     end
+
+    # clean up objects
+    game_objects.destroy_if { |object| object.outside_window? || object.color.alpha == 0 }
     
     @timer = @timer * 0.9999
     @total_ticks += 1
     if @total_ticks > @timer
-      Enemy.create(:x => $window.width, :y => rand(300))
+      Enemy.create(:x => $window.width, :y => rand(300), :zorder => (rand(20) * 100))
       @total_ticks = 0
     end
-        
-    $window.caption = "City Battle! Player x/y: #{@player.x}/#{@player.y} - Score: #{@player.score} - FPS: #{$window.fps} - game objects: #{game_objects.size}"
+    
+    if @player.score > 100
+        switch_game_state(Level2)
+    end
+    
+    if($debug)
+	$window.caption = "City Battle! - Player x/y: #{@player.x}/#{@player.y} - Score: #{@player.score} - FPS: #{$window.fps} - game objects: #{game_objects.size}"
+    else    
+	$window.caption = "City Battle! - Score: #{@player.score} - FPS: #{$window.fps} - game objects: #{game_objects.size}"
+    end
+  end
+  def draw
+    fill_gradient(:from => @bg2, :to => @bg1)
+    @parallax.draw
+    super    
+  end
+end
+
+
+#
+# GAME STATE: LEVEL
+#
+class Level2 < Chingu::GameState
+  has_trait :timer
+  
+  def initialize(options = {})
+    super
+
+    @parallax = Parallax.create(:rotation_center => :top_left, :zorder => 0)
+    @parallax << { :image => "city1.png", :damping => 2, :zorder => 0}
+    @parallax << { :image => "city3.png", :damping => 1, :zorder => 1000}
+
+    @player = Player.create(:x => 30, :y => 10, :zorder=> 500)
+    
+    @bg1 = Color.new(0xFFCE28FF)
+    @bg2 = Color.new(0xFF013E87)
+    @text = Text.create("Score:", :size => 20, :x => 30, :y => 370, :zorder => 1001) #initialize score string
+    @text1 = Text.create("0", :size => 20, :x => 90, :y => 370, :zorder => 1001)   #initialize score value to 0
+    
+    
+  end
+  
+  #
+  # This is called each time this GameState is switched/pushed/poped to.
+  #
+  def setup
+    # Remove all lingering game objects
+    Enemy.destroy_all
+    Bullet.destroy_all
+    
+    @player.score = 0
+    @player.x = 10
+    @player.y = 100
+    
+    @parallax.camera_x = 0
+    @total_game_ticks = 10000#100000
+    @timer = 100
+    @total_ticks = 0
+  end
+
+  #
+  # The foremost layer in our parallax scroller is the collidable terrain
+  #
+  def solid_pixel_at?(x, y)
+    begin     
+      @parallax.layers.last.get_pixel(x, y)[3] != 0
+    rescue
+      puts "Error in get_pixel(#{x}, #{y})"
+    end
   end
   
+  def update
+    super
+    
+    # Move the level forward by increasing the parallax-scrollers camera x-coordinate
+    @parallax.camera_x += 1.5
+    
+    # Remove all objects outside screen
+    game_objects.destroy_if { |game_object| game_object.respond_to?("outside_window?") && game_object.outside_window? }
+
+    # Collide bullets with terrain
+    Bullet.select { |o| solid_pixel_at?(o.x, o.y)}.each { |o| o.die }
+        
+    # Collide player with terrain
+    push_game_state(GameOver) if solid_pixel_at?(@player.x, @player.y)
+    
+    # Collide player with enemies and enemy bullets
+    @player.each_bounding_circle_collision(Enemy) do |player, enemy|
+      enemy.die
+      push_game_state(GameOver)
+    end
+
+    # Collide player with enemies and enemy bullets
+    @player.each_bounding_circle_collision(EnemyPlane) do |player, enemy|
+      enemy.die
+      push_game_state(GameOver)
+    end
+    
+    Bullet.each_bounding_circle_collision(Enemy) do |bullet, enemy|
+      bullet.die
+      if enemy.hit_by(bullet)
+        @player.score += 20
+        @text1.destroy!       #destroy old score
+        @text1 = Text.create(@player.score, :size => 20, :x => 90, :y => 370, :zorder => 1001 )    #update the new score
+      end
+    end
+    
+    Bullet.each_bounding_circle_collision(EnemyPlane) do |bullet, enemy|
+      bullet.die
+      if enemy.hit_by(bullet)
+        @player.score += 20
+        @text1.destroy!       #destroy old score
+        @text1 = Text.create(@player.score, :size => 20, :x => 90, :y => 370, :zorder => 1001 )    #update the new score
+      end
+    end
+
+    Bullet.each_bounding_circle_collision(EnemyPlane) do |bullet, enemy|
+      bullet.die
+      if enemy.hit_by(bullet)
+        @player.score += 20
+            @text1.destroy!       #destroy old score
+            @text1 = Text.create(@player.score, :size => 20, :x => 90, :y => 370, :zorder => 1001 )    #update the new score
+            
+      end
+    end
+
+    
+    @timer = @timer * 0.9999
+    @total_ticks += 1
+    if @total_ticks > @timer
+      @select=rand(2)
+      if @select==1
+        Enemy.create(:x => $window.width, :y => rand(300), :zorder => (rand(20) * 100))
+      else
+        EnemyPlane.create(:x => $window.width, :y => rand(300), :zorder => (rand(20) * 100))
+      end
+      @total_ticks = 0
+    end
+    
+    if @player.score > 100
+        switch_game_state(Done)
+    end
+    
+    # clean up objects
+    game_objects.destroy_if { |object| object.outside_window? || object.color.alpha == 0 }
+    
+    if($debug)
+    $window.caption = "City Battle! - Player x/y: #{@player.x}/#{@player.y} - Score: #{@player.score} - FPS: #{$window.fps} - game objects: #{game_objects.size}"
+    else    
+    $window.caption = "City Battle! - Score: #{@player.score} - FPS: #{$window.fps} - game objects: #{game_objects.size}"
+    end
+  end
   def draw
     fill_gradient(:from => @bg2, :to => @bg1)
     @parallax.draw
@@ -280,6 +456,8 @@ class Enemy < GameObject
     @black = Color.new(0xFF000000)
     @status == :default
     
+    @fireball_animation = Chingu::Animation.new(:file => media_path("fireball.png"), :size => [32,32])
+    
     #
     # Cache explosion and shrapnel images (created with texplay, not recomended doing over and over each time)
     #
@@ -323,7 +501,19 @@ class Enemy < GameObject
     # Create some shrapnel-objects
     #
     Sound["explosion.wav"].play(0.3)
-    Explosion.create(:x => @x, :y => @y, :image => @@explosion_image )
+    
+    #Explosion.create(:x => @x, :y => @y, :image => @@explosion_image )
+    5.times{ Chingu::Particle.create( :x => @x, 
+                          :y => @y, 
+                          :animation => @fireball_animation,
+                          :scale_rate => +0.05, 
+                          :fade_rate => -10, 
+                          :rotation_rate => +1,
+                          :mode => :default
+                        ) 
+			@x -= @velocity
+			}
+			
     5.times { Shrapnel.create(:x => @x, :y => @y, :image => @@shrapnel_image)}
     
     #
@@ -343,6 +533,103 @@ class Enemy < GameObject
 end
 
 
+#
+# OUR ENEMY Plane
+#
+class EnemyPlane < GameObject
+  has_traits :collision_detection, :timer  
+  attr_reader :radius
+  
+  def setup
+    @velocity = options[:velocity] || 2
+    @health = options[:health] || 100
+    
+    @anim = Animation.new(:file => "media/enemy_plane.png", :size => [32,20], :delay => 100)
+    @image = @anim.first
+      
+    @radius = 5
+    @black = Color.new(0xFF000000)
+    @status == :default
+    
+    @fireball_animation = Chingu::Animation.new(:file => media_path("fireball.png"), :size => [32,32])
+    
+    #
+    # Cache explosion and shrapnel images (created with texplay, not recomended doing over and over each time)
+    #
+    @@shrapnel_image ||= Shrapnel.create_image_for(self)
+    @@explosion_image ||= Explosion.create_image_for(self)
+  end
+  
+  def hit_by(object)
+    return if @status == :dying
+    
+    #
+    # During 20 millisecons, use Gosus :additive draw-mode, which here results in a white sprite
+    # Classic "hit by a bullet"-effect
+    #
+    during(20) { @mode = :additive; }.then { @mode = :default }
+    
+    @health -= 20
+  
+    if @health <= 0
+      die
+      return true
+    else
+      return false
+    end
+  end
+  
+  def fire
+    EnemyBullet.create(:x => self.x, :y => self.y)
+  end
+  
+  def die
+    #
+    # Make sure die() is only called once
+    #
+    return  if @status == :dying
+    @status = :dying
+    
+    #
+    # Play our explosion-sound file
+    # Create an explosion-object
+    # Create some shrapnel-objects
+    #
+    Sound["explosion.wav"].play(0.3)
+    
+    #Explosion.create(:x => @x, :y => @y, :image => @@explosion_image )
+    5.times{ Chingu::Particle.create( :x => @x, 
+                          :y => @y, 
+                          :animation => @fireball_animation,
+                          :scale_rate => +0.05, 
+                          :fade_rate => -10, 
+                          :rotation_rate => +1,
+                          :mode => :default
+                        ) 
+			@x -= @velocity
+			}
+			
+    5.times { Shrapnel.create(:x => @x, :y => @y, :image => @@shrapnel_image)}
+    
+    #
+    # During 200 ms, fade and scale image, then destroy it
+    #
+    @color = @black
+    @color.alpha = 50
+    during(200) { @factor_x += 0.5; @factor_y += 0.5; @x -= 1; @color.alpha -= 1}.then { self.destroy }
+  end
+  
+  def update
+    return if @status == :dying
+    
+    @image = @anim.next
+    @x -= @velocity
+  end
+end
+
+
+
+
 #
 # GAME STATE: GAME OVER
 #
@@ -368,17 +655,14 @@ end
 # GAME STATE: GAME OVER
 #
 class Done < Chingu::GameState
-  def initialize(options)
-    @score = options[:score]
-  end
-  
+
   def setup
     @text = Text.create("You made it! Score #{@score} (ESC to quit, RETURN to try again!)", :size => 40, :x => 30, :y => 100)
     self.input = { :esc => :exit, :return => :try_again}
   end  
   
   def try_again
-    pop_game_state  # pop back to our playing game state
+    switch_game_state(Level)
   end
 end