ippa-chingu 0.5 → 0.5.1

data/games/triangle_wars/src/enemy.rb

@@ -0,0 +1,117 @@
+class EnemyTemplate < MyGameObject
+  attr_reader :speed_x, :speed_y
+	#attr_accessor :prev_x, :prev_y, :aim_x, :aim_y
+    
+	def initialize(options = {})
+    super
+    @image = Image["enemy.png"]
+    
+    @type = options[:type] || 0
+    @reaction = options[:reaction] || 0.1
+    
+		@prev_x, @prev_y = @x, @y
+    @speed_x = @speed_y = 0.0
+		@acceleration_x = @acceleration_y = 0.0
+		
+    @keep_color_for = 0	
+		@rad_to_deg = 180 / Math::PI
+  end
+  
+  def setup
+    @factor_x = @width.to_f / @image.width.to_f
+    @factor_y = @height.to_f / @image.height.to_f
+    self.factor = (@factor_x < @factor_y) ? @factor_x : @factor_y
+    
+    @radius = (@width + @height) / 2 * 0.50
+    @original_color = @color
+  end
+
+	def aim_at(x, y)
+    if @status != :dying
+      @aim_x, @aim_y = x, y
+      @angle = Math.atan2(@aim_y - @y, @aim_x - @x).to_f * @rad_to_deg
+      @angle = 90 + @angle
+      
+      @acceleration_y = (@y - @aim_y < 0) ? @reaction : -@reaction
+      @acceleration_x = (@x - @aim_x < 0) ? @reaction : -@reaction
+    end
+		self
+	end
+  
+  def damage(punch)
+    super
+    if @status != :dying
+      Sound["hit3.wav"].play(0.1, 0.3 + rand(10)/20.to_f)
+      @color = Gosu::Color.new(255,255,255,255)
+      @keep_color_for = $window.ticks + 5
+    end
+  end
+    
+	def die!
+    Sound["explosion.wav"].play(0.1, 1.0 + rand(0.5))
+    @image = Image["enemy_dying.png"]
+    @status = :dying
+    @color = @original_color
+    @color.alpha = 100
+  end
+  
+	def update
+    if @status == :dying
+      @factor_x += 0.4
+      @factor_y -= 0.2    if @factor_y > 0.2
+      @color.alpha -= 10  if @color.alpha > 10
+    else
+      @speed_y += @acceleration_y		if	(@speed_y + @acceleration_y).abs < @max_speed
+      @acceleration_y = 0	if @speed_y == 0
+
+      @speed_x += @acceleration_x		if	(@speed_x + @acceleration_x).abs < @max_speed
+      @acceleration_x = 0	if @speed_x == 0
+      move
+    end
+    
+    if @factor_x > 3
+      @status = :dead
+      $window.remove_game_object(self)
+    end
+    
+    @color = @original_color  if @color != @original_color && $window.ticks > @keep_color_for
+    
+		self
+	end	
+  
+  def move
+    base = $window.dt/100.0
+		@prev_x, @prev_y = @x, @y
+		@x += @speed_x * base
+    @y += @speed_y * base
+  end
+end
+  
+
+class Enemy < EnemyTemplate
+  def initialize(options)
+    super
+    
+    @type = options[:type] || 0
+    case @type
+      when 0
+        @width = 40 
+        @height = 30
+        @reaction = 0.01
+        @punch = 40
+        @health = 40
+        @max_speed = 4
+        @color = Gosu::Color.new(255,0,255,0)
+      when 1
+        @width = 80
+        @height = 60
+        @reaction = 0.02
+        @punch = 80
+        @health = 80
+        @max_speed = 10
+        @color = Gosu::Color.new(255,255,255,0)
+    end
+    
+    setup
+  end
+end

data/games/triangle_wars/src/game_over_state.rb

@@ -0,0 +1,18 @@
+class GameOver < Chingu::GameState
+  def initialize(options)
+    super
+    @title = Chingu::Text.new(:text=>"Game Over! Hit Space to continue.", :x=>150, :y=>200, :size=>40, :color => Color.new(0xFFFFFF00))
+    self.input = { :space => :restart }
+  end
+  
+  def back_to_menu
+    clear_game_states
+    push_game_state(Menu)
+  end
+
+  def draw
+    previous_game_state.update    # Draw prev game state onto screen (in this case our level)
+    previous_game_state.draw      # Draw prev game state onto screen (in this case our level)
+    super                         # Draw game objects in current game state, this includes Chingu::Texts
+  end  
+end

data/games/triangle_wars/src/level_state.rb

@@ -0,0 +1,114 @@
+class Level < Chingu::GameState
+  def initialize(options)
+    super
+		@player = Player.new({})
+    @level = options[:level] || 1
+    self.input = { :p => Pause, :f1 => :power_up }
+
+    @score = Text.new(:text => "Score: #{@player.score}  Lives: #{@player.lives}", :x => 10, :y => 4, :size => 30)
+  end
+  
+  def setup
+    # If we're starting from the beginning, initialize playerstuffz
+    if options[:level] == 1
+      @player.setup
+    end
+    
+    @player.x = $window.width/2
+    @player.y = $window.height/2
+  end
+  
+  def power_up
+    #PowerUp.new(:type=>"plasma_up", :x=>50, :y=>50, :speed_x=>3, :speed_y=>3)
+    @player.laser += 1
+  end
+                
+  def random_entry_point
+    x, y = 0
+    if rand(2)==0
+      x = rand(2)==0 ? 1 : $window.width
+      y = rand($window.height)
+    else
+      x = rand($window.width)
+      y = rand(2)==0 ? 1 : $window.height
+    end
+    return [x,y]
+  end
+    
+	def update
+    super
+    
+    push_game_state(GameOver) if @player.lives == 0
+    
+    @score.text = "Score: #{@player.score}  Lives: #{@player.lives}"
+    
+    if $window.ticks % 30 == 0
+      x, y = random_entry_point
+      Enemy.new(:x => x, :y => y, :level => options[:level], :type => rand(2))
+    end
+    
+    @bullets = game_objects_of_class(Bullet)
+    
+    PowerUp.all.each do |power_up|
+      if power_up.alive? && @player.collides_with?(power_up)
+        @player.take(power_up)
+        power_up.die!
+      end
+    end
+    
+    
+    #
+    # Loop thru all enemies, aim them at player and do collidestuff
+    #
+    Enemy.all.select { |enemy| enemy.alive? }.each do |enemy|
+      # Aim all enemies at player
+      enemy.aim_at(@player.x, @player.y)
+      
+      # Collide enemies with our bullets, damage enemies and kill bullets
+      [enemy].collide_by_radius(@bullets) do |enemy, bullet|
+        enemy.damage(bullet.health)
+        bullet.die!
+        
+        #power_up_from(enemy)  if enemy.dying?
+        PowerUp.new_from(enemy)  if enemy.dying?
+      end
+
+      # Collide all enemies with player, damage player and kill enemy
+      [enemy].collide_by_radius([@player]) do |enemy, player|
+        player.damage(enemy.health)        
+        enemy.die!
+      end
+      
+    end
+      
+    #
+    # Do some garbagecollection every 10 click, remove all dead objects and objcts outside screen.
+    #
+    #if $window.ticks % 10 == 0
+    @game_objects.reject! { |object| (object.respond_to?(:status) && object.dead?) || object.outside_window? }
+    #end
+    #@game_objects.reject! { |object| object.outside_window? }
+	end
+	
+	def draw
+		#Image["background#{options[:level]}.png"].draw(0, 0, 0)
+    super
+	end
+end
+
+
+
+		
+    #
+    #  # Collide all enemies with eachother (they "bump" into eachother and get stuck)
+    #  @enemies.collide_by_radius(@enemies) do |enemy, enemy2|
+    #    # Ensure that it's 2 different enemies
+    #    if enemy.object_id != enemy2.object_id
+    #      
+    #      # Revert the last X/Y move for the enemy that's farthest from player
+    #      # This makes him stop while the closes enemy keeps moving towards player
+    #      farthest_enemy = @player.distance_to(enemy) > @player.distance_to(enemy2) ? enemy : enemy2
+    #      farthest_enemy.x = farthest_enemy.prev_x
+    #      farthest_enemy.y = farthest_enemy.prev_y
+    #    end
+    #  end

data/games/triangle_wars/src/menu_state.rb

@@ -0,0 +1,67 @@
+class Menu < Chingu::GameState
+  def initialize(options)
+    super   
+    Text.size = 60
+    x = 220
+    @menu_items = []
+    @menu_items << Text.new(:text => "START GAME", :x => x, :y => 200, :id => :start)
+    @menu_items << Text.new(:text => "HELP", :x => x, :y => 300, :id => :help)
+    @menu_items << Text.new(:text => "QUIT", :x => x, :y => 400, :id => :quit)    
+    
+    @red = Color.new(200,255,255,255)
+    @red2 = Color.new(255,255,0,0)
+    @white = Color.new(255,255,255)
+    
+    @logo = GameObject.new(:x => $window.width/2, :y => 70, :image => "triangle_wars.png", :zorder => 10)
+    @background = GameObject.new(:image => "hubble_deep_field.png", :zorder => 0, :x => $window.width/2, :y => $window.height/2)
+    @background.color = Color.new(150,255,255,255)
+    
+    @zoom_seed = Math::PI
+    @zoom_seed_x = 0
+    @zoom_seed_y = Math::PI
+    self.input = { :up => :up, :down => :down, :return => :chose, :space => :chose}
+    
+  end
+  
+  def setup
+    @menu_index = 0
+    #Gosu::Song.new($window, "media/triangle_wars_intro.ogg").play
+    Song["triangle_wars_intro.ogg"].play(true)
+  end  
+  
+  def up
+    @menu_index -= 1 if @menu_index > 0
+  end
+  
+  def down
+    @menu_index += 1 if @menu_index < @menu_items.size-1
+  end
+  
+  def update
+    @background.angle += 0.05    
+    @background.factor = 1.5 + Math::sin(@zoom_seed += 0.001)
+
+    @menu_items.each_with_index do |menu_item, index|
+      if @menu_index == index
+        menu_item.color = ($window.ticks % 2 == 0) ? @red : @red2
+      else
+        menu_item.color = @white
+      end
+    end
+    
+    super # let chingu update all GameOjject based objects (Text is)
+  end
+  
+  def finalize
+    Song["triangle_wars_intro.ogg"].stop
+  end
+  
+  def chose
+    puts "chose!"
+    case @menu_items[@menu_index].options[:id]
+      when :start then  push_game_state(Level.new(:level => 1))
+      when :help  then  push_game_state(Help)
+      when :quit  then  close
+    end
+  end
+end

data/games/triangle_wars/src/my_game_object.rb

@@ -0,0 +1,46 @@
+#
+# Our basic class that every ingame object inherits from
+#
+class MyGameObject < Chingu::GameObject
+  attr_accessor :lives, :health, :speed_x, :speed_y
+  attr_reader :status, :radius, :punch
+ 
+  def initialize(options)
+    super
+    @status = :default
+  end
+  def damage(punch)
+    @health = 0 if @health.nil? ## ugly fix for something :/
+      
+    @health -= punch
+    if @health <= 0
+      @health = 0
+      die!
+    end
+    self
+  end
+  
+  def collides_with?(object)
+    distance(self.x, self.y, object.x, object.y) < self.radius
+  end
+		
+  def die!
+    @lives -= 1 if defined?(@lives)
+    @status = :dead
+    self
+  end
+
+  def alive?
+    @status == :default
+  end
+
+  def dead?
+    @status == :dead
+  end
+  
+  def dying?
+    @status == :dying
+  end
+  
+end
+

data/games/triangle_wars/src/pause_state.rb

@@ -0,0 +1,16 @@
+class Pause < Chingu::GameState
+  def initialize(options)
+    super
+    @title = Chingu::Text.new(:text=>"PAUSED ('P' to un-pause)", :x=>150, :y=>200, :size=>40, :color => Color.new(0xFFFFFF00))
+    self.input = { :p => :un_pause }
+  end
+
+  def un_pause
+    pop_game_state(:setup => false)    # Return the previous game state, dont call setup()
+  end
+  
+  def draw
+    previous_game_state.draw      # Draw prev game state onto screen (in this case our level)
+    super                         # Draw game objects in current game state, this includes Chingu::Texts
+  end  
+end

data/games/triangle_wars/src/player.rb

@@ -0,0 +1,136 @@
+class Player < MyGameObject
+  add_component :input
+  attr_accessor :speed, :score, :lives, :plasma
+
+  def initialize(options)
+    super
+		@image = Image["spaceship.png"]
+    @radius = (@image.height + @image.width) / 2 * 0.80
+    setup
+	end
+	
+  def setup
+    self.input = { :holding_left => :turn_left, :holding_right => :turn_right, :space => :fire }
+    
+    @engine_power = 7
+    @health = 100
+    @lives = 3
+    @score = 0
+    @angle_step = 3
+    
+    # weapons
+    @plasma = 1
+    @rocket = 0
+    @laser = 1
+    @autofire = 0
+    @current_weapon = :plasma
+  end
+  
+	def turn_left
+    @angle -= @angle_step
+  end
+  def turn_right
+    @angle += @angle_step
+	end
+  
+  def bigbomb
+    #game_objects_of_class(Enemy).each do |enemy|
+    #end
+  end
+  
+  def take(power_up)
+    case power_up.type
+      when "1up"
+        @lives += 1
+      when "autofire"
+        self.input[:holding_space] = :fire
+      when "bigbomb"
+        puts "bigbomb"
+        bigbomb
+      when "plasma_up"
+        puts "plasma"
+        @plasma += 1  if @plasma < 10
+        @current_weapon = :plasma
+      when "laser_up"
+        puts "laser"
+        @laser += 1   if @laser < 10
+        @current_weapon = :laser
+      when "rocket_up"
+        puts "rocket"
+        @rocket += 1  if @rocket < 5
+    end
+  end
+  
+	def fire    
+    # @plasma:
+    # 2: start_offset: 5
+    # 3: start_offset: 10
+    # 4: start_offset: 15        -15, -5, 5, 15
+    #
+    if @current_weapon == :plasma
+      start_offset = (@plasma-1) * 5
+      @plasma.times do |nr|
+        Bullet.new(:x => @x, :y => @y, :angle => @angle - start_offset + (nr*10), :type => :plasma)
+      end
+    elsif @current_weapon == :laser
+      @plasma.times do |nr|
+        Bullet.new(:x => @x, :y => @y, :angle => @angle, :type => :laser)
+      end
+    end
+    
+    
+  end
+	
+	def distance_to(object)
+		distance(self.x, self.y, object.x, object.y)
+	end
+	
+	def update
+    @x += offset_x(@angle, 2)
+		@y += offset_y(@angle, 2)
+		self
+  end
+end
+
+class Weapon
+  def initialize(weapon_class, power = 1)
+    @weapon_class = weapon_class
+    @power = power
+  end
+  
+  def fire
+    #@weapon_class.new
+  end
+end
+
+class Bullet < MyGameObject
+  def initialize(options)
+    super
+    @range = options[:range] || 40
+    @type = options[:type] || :plasma
+		@image = Image["#{@type.to_s}.png"]
+		@health = 10
+    @speed = 8
+    @color = Color.new(255,255,255,255)
+    @mode = :additive
+    
+    Sample["plasma.wav"].play(0.1)
+  end
+  
+  def move
+		@x += @speed_x
+		@y += @speed_y
+  end
+  
+  def update(time = 1)
+    #base = time/100.0
+    
+    if @type == :laser
+      @color.alpha =  ($window.ticks%2 == 0) ? 255 : 0
+    end
+    
+		@speed_x = offset_x(@angle, @speed)
+		@speed_y = offset_y(@angle, @speed)
+    move
+  end  	
+end