rrobots 0.0.1

data/lib/rrobots.rb

@@ -0,0 +1,6 @@
+require 'rrobots/robot'
+require 'rrobots/battlefield'
+require 'rrobots/explosion'
+require 'rrobots/bullet'
+require 'rrobots/robot_runner'
+require 'rrobots/numeric'

data/lib/rrobots/battlefield.rb

@@ -0,0 +1,69 @@
+class Battlefield
+   attr_reader :width
+   attr_reader :height
+   attr_reader :robots
+   attr_reader :teams
+   attr_reader :bullets
+   attr_reader :explosions
+   attr_reader :time
+   attr_reader :seed
+   attr_reader :timeout  # how many ticks the match can go before ending.
+   attr_reader :game_over
+
+  def initialize width, height, timeout, seed
+    @width, @height = width, height
+    @seed = seed
+    @time = 0
+    @robots = []
+    @teams = Hash.new{|h,k| h[k] = [] }
+    @bullets = []
+    @explosions = []
+    @timeout = timeout
+    @game_over = false
+    srand @seed
+  end
+
+  def << object
+    case object
+    when RobotRunner
+      @robots << object
+      @teams[object.team] << object
+    when Bullet
+      @bullets << object
+    when Explosion
+      @explosions << object
+    end
+  end
+
+  def tick
+    explosions.delete_if{|explosion| explosion.dead}
+    explosions.each{|explosion| explosion.tick}
+
+    bullets.delete_if{|bullet| bullet.dead}
+    bullets.each{|bullet| bullet.tick}
+
+    robots.each do |robot|
+      begin
+        robot.send :internal_tick unless robot.dead
+      rescue Exception => bang
+        puts "#{robot} made an exception:"
+        puts "#{bang.class}: #{bang}", bang.backtrace
+        robot.instance_eval{@energy = -1}
+      end
+    end
+
+    @time += 1
+    live_robots = robots.find_all{|robot| !robot.dead}
+    @game_over = (  (@time >= timeout) or # timeout reached
+                    (live_robots.length == 0) or # no robots alive, draw game
+                    (live_robots.all?{|r| r.team == live_robots.first.team})) # all other teams are dead
+    not @game_over
+  end
+
+  def state
+    {:explosions => explosions.map{|e| e.state},
+     :bullets    => bullets.map{|b| b.state},
+     :robots     => robots.map{|r| r.state}}
+  end
+
+end

data/lib/rrobots/bullet.rb

@@ -0,0 +1,39 @@
+class Bullet
+  attr_accessor :x
+  attr_accessor :y
+  attr_accessor :heading
+  attr_accessor :speed
+  attr_accessor :energy
+  attr_accessor :dead
+  attr_accessor :origin
+
+  def initialize bf, x, y, heading, speed, energy, origin
+    @x, @y, @heading, @origin = x, y, heading, origin
+    @speed, @energy = speed, energy
+    @battlefield, dead = bf, false
+  end
+
+  def state
+    {:x=>x, :y=>y, :energy=>energy}
+  end
+
+  def tick
+    return if @dead
+    @x += Math::cos(@heading.to_rad) * @speed
+    @y -= Math::sin(@heading.to_rad) * @speed
+
+    @dead ||= (@x < 0) || (@x >= @battlefield.width)
+    @dead ||= (@y < 0) || (@y >= @battlefield.height)
+
+    @battlefield.robots.each do |other|
+      if (other != origin) && (Math.hypot(@y - other.y, other.x - @x) < 40) && (!other.dead)
+        explosion = Explosion.new(@battlefield, other.x, other.y)
+        @battlefield << explosion
+        damage = other.hit(self)
+        origin.damage_given += damage
+        origin.kills += 1 if other.dead
+        @dead = true
+      end
+    end
+  end
+end

data/lib/rrobots/explosion.rb

@@ -0,0 +1,20 @@
+class Explosion
+  attr_accessor :x
+  attr_accessor :y
+  attr_accessor :t
+  attr_accessor :dead
+
+  def initialize bf, x, y
+    @x, @y, @t = x, y, 0
+    @battlefield, dead = bf, false
+  end
+
+  def state
+    {:x=>x, :y=>y, :t=>t}
+  end
+
+  def tick
+    @t += 1
+    @dead ||= t > 15
+  end
+end

data/lib/rrobots/gui.rb

@@ -0,0 +1,2 @@
+require 'rrobots/gui/leaderboard'
+require 'rrobots/gui/gosuarena'

data/lib/rrobots/gui/gosuarena.rb

@@ -0,0 +1,124 @@
+require 'gosu'
+
+BIG_FONT = 'Courier New'
+SMALL_FONT = 'Courier New'
+COLORS = ['white', 'blue', 'yellow', 'red', 'lime'] 
+FONT_COLORS = [0xffffffff, 0xff0008ff, 0xfffff706, 0xffff0613, 0xff00ff04]
+    
+GosuRobot = Struct.new(:body, :gun, :radar, :speech, :info, :status, :color, :font_color)
+
+module ZOrder
+  Background, Robot, Explosions, UI = *0..3
+end
+
+class RRobotsGameWindow < Gosu::Window
+  attr_reader :battlefield, :xres, :yres
+  attr_accessor :on_game_over_handlers, :boom, :robots, :bullets, :explosions
+  
+  def initialize(battlefield, xres, yres)
+    super(xres, yres, false, 16)
+    self.caption = 'RRobots'
+    @font = Gosu::Font.new(self, BIG_FONT, 24)
+    @small_font = Gosu::Font.new(self, SMALL_FONT, 24) #xres/100
+    @background_image = Gosu::Image.new(self, File.join(File.dirname(__FILE__),"../images/space.png"), true)
+    @battlefield = battlefield
+    @xres, @yres = xres, yres
+    @on_game_over_handlers = []
+    init_window
+    init_simulation
+    @leaderboard = Leaderboard.new(self, @robots)
+  end
+
+  def on_game_over(&block)
+    @on_game_over_handlers << block
+  end
+  
+  def init_window
+    @boom = (0..14).map do |i|
+      Gosu::Image.new(self, File.join(File.dirname(__FILE__),"../images/explosion#{i.to_s.rjust(2, '0')}.bmp"))
+    end
+    @bullet_image = Gosu::Image.new(self, File.join(File.dirname(__FILE__),"../images/bullet.png"))
+  end
+  
+  def init_simulation
+    @robots, @bullets, @explosions = {}, {}, {}
+  end
+
+  def draw
+    simulate
+    draw_battlefield
+    @leaderboard.draw
+    if button_down? Gosu::Button::KbEscape
+      self.close
+    end
+  end
+
+  def draw_battlefield
+    draw_robots
+    draw_bullets
+    draw_explosions
+  end
+  
+  def simulate(ticks=1)
+    @explosions.reject!{|e,tko| e.dead }
+    @bullets.reject!{|b,tko| b.dead }
+    @robots.reject! { |ai,tko| ai.dead}
+    ticks.times do
+      if @battlefield.game_over
+        @on_game_over_handlers.each{|h| h.call(@battlefield) }
+          winner = @robots.keys.first
+          whohaswon = if winner.nil?
+            "Draw!"
+          elsif @battlefield.teams.all?{|k,t|t.size<2}
+            "#{winner.name} won!"
+          else
+            "Team #{winner.team} won!"
+          end
+          text_color = winner ? winner.team : 7
+          @font.draw_rel("#{whohaswon}", xres/2, yres/2, ZOrder::UI, 0.5, 0.5, 1, 1, 0xffffff00)
+      end
+      @battlefield.tick
+    end
+  end
+  
+  def draw_robots
+    @battlefield.robots.each_with_index do |ai, i|
+      next if ai.dead
+      col = COLORS[i % COLORS.size]
+      font_col = FONT_COLORS[i % FONT_COLORS.size]
+      @robots[ai] ||= GosuRobot.new(
+        Gosu::Image.new(self, File.join(File.dirname(__FILE__),"../images/#{col}_body000.bmp")),
+        Gosu::Image.new(self, File.join(File.dirname(__FILE__),"../images/#{col}_turret000.bmp")),
+        Gosu::Image.new(self, File.join(File.dirname(__FILE__),"../images/#{col}_radar000.bmp")),
+        @small_font,
+        @small_font,
+        @small_font,
+        col,
+        font_col
+      )
+      @robots[ai].body.draw_rot(ai.x / 2, ai.y / 2, ZOrder::Robot, (-(ai.heading-90)) % 360)
+      @robots[ai].gun.draw_rot(ai.x / 2, ai.y / 2, ZOrder::Robot, (-(ai.gun_heading-90)) % 360)
+      @robots[ai].radar.draw_rot(ai.x / 2, ai.y / 2, ZOrder::Robot, (-(ai.radar_heading-90)) % 360)
+      
+      @robots[ai].speech.draw_rel(ai.speech.to_s, ai.x / 2, ai.y / 2 - 40, ZOrder::UI, 0.5, 0.5, 1, 1, font_col)
+      @robots[ai].info.draw_rel("#{ai.name}", ai.x / 2, ai.y / 2 + 30, ZOrder::UI, 0.5, 0.5, 1, 1, font_col)
+      @robots[ai].info.draw_rel("#{ai.energy.to_i}", ai.x / 2, ai.y / 2 + 50, ZOrder::UI, 0.5, 0.5, 1, 1, font_col)
+    end
+  end
+
+  def draw_bullets
+    @battlefield.bullets.each do |bullet|
+      @bullets[bullet] ||= @bullet_image
+      @bullets[bullet].draw(bullet.x / 2, bullet.y / 2, ZOrder::Explosions)
+    end
+  end
+
+  def draw_explosions
+    @battlefield.explosions.each do |explosion|
+      @explosions[explosion] = boom[explosion.t % 14]
+      @explosions[explosion].draw_rot(explosion.x / 2, explosion.y / 2, ZOrder::Explosions, 0)
+    end
+  end
+end
+
+

data/lib/rrobots/gui/leaderboard.rb

@@ -0,0 +1,19 @@
+class Leaderboard
+  def initialize(window, robots)
+    @font_size = 24 
+    @robots = robots
+    @font = Gosu::Font.new(window, 'Courier New', @font_size) 
+    @x_offset = @font_size
+    @y_offset = @font_size * 2
+  end
+
+  def draw
+    if @robots
+      @robots.each_with_index do |r, i|
+        y = @y_offset + i * @font_size
+        @font.draw("#{r.first.name}", @x_offset, y, ZOrder::UI, 1.0, 1.0, r.last.font_color)
+        @font.draw("#{r.first.energy.to_i}", @x_offset + (@font_size * 6), y, ZOrder::UI, 1.0, 1.0, r.last.font_color)
+      end
+    end
+  end
+end

data/lib/rrobots/numeric.rb

@@ -0,0 +1,10 @@
+class Numeric
+   TO_RAD = Math::PI / 180.0
+   TO_DEG = 180.0 / Math::PI
+   def to_rad
+     self * TO_RAD
+   end
+   def to_deg
+     self * TO_DEG
+   end
+end

data/lib/rrobots/robot.rb

@@ -0,0 +1,115 @@
+module Robot
+
+  def self.attr_state(*names)
+    names.each{|n|
+      n = n.to_sym
+      attr_writer n
+      attr_reader n
+    }
+  end
+
+  def self.attr_action(*names)
+    names.each{|n|
+      n = n.to_sym
+      define_method(n){|param| @actions[n] = param }
+    }
+  end
+
+  def self.attr_event(*names)
+    names.each{|n|
+      n = n.to_sym
+      define_method(n){ @events[n] }
+    }
+  end
+
+  #the state hash of your robot. also accessible through the attr_state methods
+  attr_accessor :state
+
+  #the action hash of your robot
+  attr_accessor :actions
+
+  #the event hash of your robot
+  attr_accessor :events
+
+  #path to where your robot's optional skin images are
+  attr_accessor :skin_prefix
+
+  #team of your robot
+  attr_state :team
+
+  #the height of the battlefield
+  attr_state :battlefield_height
+
+  #the width of the battlefield
+  attr_state :battlefield_width
+
+  #your remaining energy (if this drops below 0 you are dead)
+  attr_state :energy
+
+  #the heading of your gun, 0 pointing east, 90 pointing north, 180 pointing west, 270 pointing south
+  attr_state :gun_heading
+
+  #your gun heat, if this is above 0 you can't shoot
+  attr_state :gun_heat
+
+  #your robots heading, 0 pointing east, 90 pointing north, 180 pointing west, 270 pointing south
+  attr_state :heading
+
+  #your robots radius, if x <= size you hit the left wall
+  attr_state :size
+
+  #the heading of your radar, 0 pointing east, 90 pointing north, 180 pointing west, 270 pointing south
+  attr_state :radar_heading
+
+  #ticks since match start
+  attr_state :time
+
+  #whether the match is over or not, remember to go into cheer mode when this is true ;)
+  attr_state :game_over
+
+  #your speed (-8..8)
+  attr_state :speed
+  alias :velocity :speed
+
+  #your x coordinate, 0...battlefield_width
+  attr_state :x
+
+  #your y coordinate, 0...battlefield_height
+  attr_state :y
+
+  #accelerate (max speed is 8, max accelerate is 1/-1, negativ speed means moving backwards)
+  attr_action :accelerate
+
+  #accelerates negativ if moving forward (and vice versa), may take 8 ticks to stop (and you have to call it every tick)
+  def stop
+    accelerate((speed > 0) ? -1 : ((speed < 0) ? 1 :0))
+  end
+
+  #fires a bullet in the direction of your gun, power is 0.1 - 3, this power is taken from your energy
+  attr_action :fire
+
+  #turns the robot (and the gun and the radar), max 10 degrees per tick
+  attr_action :turn
+
+  #turns the gun (and the radar), max 30 degrees per tick
+  attr_action :turn_gun
+
+  #turns the radar, max 60 degrees per tick
+  attr_action :turn_radar
+
+  #broadcast message to other robots
+  attr_action :broadcast
+
+  #say something to the spectators
+  attr_action :say
+
+  #if you got hit last turn, this won't be empty
+  attr_event :got_hit
+
+  #distances to robots your radar swept over during last tick
+  attr_event :robot_scanned
+
+  #broadcasts received last turn
+  attr_event :broadcasts
+
+end