UG_RRobots 1.3 → 2.0

data/lib/bullets.rb

@@ -35,5 +35,16 @@ class Bullet
         @dead = true
       end
     end
+    
+    @battlefield.mines.each do |mine|
+      if (Math.hypot(@y - mine.y, mine.x - @x) < 10) && (!mine.dead) && (mine.origin != origin) then
+        explosion = Explosion.new(@battlefield, mine.x, mine.y)
+        @battlefield << explosion
+        mine.destroy if self.energy > @battlefield.config.mines[:bullet_energy_resistance]
+        origin.destroyed_mines += 1
+        @dead = true
+      end
+    end
+    
   end
 end

data/lib/configuration.rb

@@ -4,6 +4,7 @@ module Configuration_accessors
   attr_accessor :robots
   attr_accessor :bullets
   attr_accessor :battlefield
+  attr_accessor :mines
 end
 
 class Configuration
@@ -20,9 +21,10 @@ class Configuration
     @filename = filename
     @game = { :timeout => 50000 }
     @toolboxes = { :with_toolboxes => false, :life_time => 200, :spawning_chances => 100, :energy_heal_points => 20 }
-    @robots = { :energy_max => 100 }
+    @robots = { :energy_max => 100, :nb_mines => 3, :radar_mine_scanning_performance => 500 }
     @bullets = { :speed => 30 } 
     @battlefield = { :height => 800, :width => 800 }
+    @mines = { :with_mines => false, :energy_hit_points => 20, :bullet_energy_resistance => 2 }
   end
   
 end

data/lib/misc.rb

@@ -0,0 +1,29 @@
+
+def gem_path(path='')
+  # TODO : Perhaps a better way to do it ...
+  # regarder Rubygems pour avoir le path direct ..
+  table_map = Gem.location_of_caller.first.split('/')
+  2.times do 
+    table_map.pop
+  end
+  table_map.push path unless path.empty? 
+  path_prefix = table_map.join('/')
+  return false unless File::exist?(path_prefix)
+  return path_prefix
+end 
+
+def init_I18n(locales)
+  I18n.default_locale = locales
+  locales_path = gem_path('config').concat("/locales")
+  I18n.load_path << Dir["#{locales_path}/*.yml"]
+end
+
+def get_locale_from_env
+  if not ENV['LANGUAGE'].empty? then
+    locale = ENV['LANGUAGE'].split('_').first
+  elsif not ENV['LANG'].empty? then
+    locale = ENV['LANG'].split('_').first
+  else
+    locale = 'en'
+  end
+end

data/lib/overloads.rb

@@ -7,4 +7,28 @@ class Numeric
    def to_deg
      self * TO_DEG
    end
-end
+end
+
+module RDoc
+# File lib/rdoc/usage.rb, line 98
+  def RDoc.file_no_exit(filename,*args)
+    content = IO.readlines(filename).join
+    markup = SM::SimpleMarkup.new
+    flow_convertor = SM::ToFlow.new
+    flow = markup.convert(content, flow_convertor)
+
+    format = "plain"
+
+    unless args.empty?
+      flow = extract_sections(flow, args)
+    end
+
+    options = RI::Options.instance
+    if args = ENV["RI"]
+      options.parse(args.split)
+    end
+    formatter = options.formatter.new(options, "")
+    formatter.display_flow(flow)
+  end
+end
+  

data/lib/robot.rb

@@ -14,13 +14,22 @@ module Robot
       define_method(n){|param| @actions[n] = param }
     }
   end
-
+  
+  def self.attr_order(*names)
+    names.each{|n|
+      n = n.to_sym
+      define_method(n){ @orders[n] = true }
+    }
+  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
@@ -30,6 +39,8 @@ module Robot
 
   #the event hash of your robot
   attr_accessor :events
+  
+  attr_accessor :orders
 
   #path to where your robot's optional skin images are
   attr_accessor :skin_prefix
@@ -87,6 +98,8 @@ module Robot
 
   #fires a bullet in the direction of your gun, power is 0.1 - 3, this power is taken from your energy
   attr_action :fire
+  
+  attr_order :drop_mine
 
   #turns the robot (and the gun and the radar), max 10 degrees per tick
   attr_action :turn
@@ -99,6 +112,9 @@ module Robot
 
   #broadcast message to other robots
   attr_action :broadcast
+  
+  #team_broadcast message to other robots
+  attr_action :team_broadcast
 
   #say something to the spectators
   attr_action :say
@@ -109,12 +125,18 @@ module Robot
   #distances to robots your radar swept over during last tick
   attr_event :robot_scanned
   
-  #distances to robots your radar swept over during last tick
+  #distances to toolboxes your radar swept over during last tick
   attr_event :toolbox_scanned
+  
+  #distances to mines your radar swept over during last tick
+  attr_event :mine_scanned
 
   #broadcasts received last turn
   attr_event :broadcasts
 
+  #Team broadcasts received last turn 
+  attr_event :team_broadcasts
+
 end
 
 require 'robotrunner'

data/lib/robotrunner.rb

@@ -2,7 +2,9 @@ class RobotRunner
 
   STATE_IVARS = [ :x, :y, :gun_heat, :heading, :gun_heading, :radar_heading, :time, :size, :speed, :energy, :team ]
   NUMERIC_ACTIONS = [ :fire, :turn, :turn_gun, :turn_radar, :accelerate ]
-  STRING_ACTIONS = [ :say, :broadcast ]
+  STRING_ACTIONS = [ :say, :broadcast, :team_broadcast ]
+  ORDERS = [ :drop_mine ]
+  
 
   STATE_IVARS.each{|iv|
     attr_accessor iv
@@ -14,6 +16,10 @@ class RobotRunner
     attr_accessor "#{iv}_max"
   }
 
+  ORDERS.each{|iv|
+    attr_accessor "#{iv}_max"
+  }
+  
   #AI of this robot
   attr_accessor :robot
 
@@ -26,10 +32,14 @@ class RobotRunner
   #keeps track of the kills
   attr_accessor :kills
   
+  attr_accessor :destroyed_mines
+  attr_accessor :trigged_mines
+  attr_accessor :dropped_mines
+  
   #keeps track of the catched toolboxes 
   attr_accessor :catched_toolboxes
 
-  attr_reader :actions, :speech
+  attr_reader :actions, :speech, :orders
 
   def initialize robot, bf, team=0
     @robot = robot
@@ -39,6 +49,7 @@ class RobotRunner
     set_initial_state
     @events = Hash.new{|h, k| h[k]=[]}
     @actions = Hash.new(0)
+    @orders = Hash.new(0)
   end
 
   def skin_prefix
@@ -57,7 +68,10 @@ class RobotRunner
     @energy = @battlefield.config.robots[:energy_max]
     @damage_given = 0
     @kills = 0
+    @destroyed_mines = 0
     @catched_toolboxes = 0
+    @dropped_mines = 0
+    @trigged_mines = 0
     teleport
   end
 
@@ -79,6 +93,8 @@ class RobotRunner
     @teleport_min, @teleport_max = 0, 100
     @say_max = 256
     @broadcast_max = 16
+    @team_broadcast_max = 16
+    @drop_mine_max = @battlefield.config.robots[:nb_mines]
   end
 
   def hit bullet
@@ -115,15 +131,28 @@ class RobotRunner
     update_state
     robot_tick
     parse_actions
+    parse_orders
     fire
+    drop_mine if @battlefield.with_mines
     turn
     move
     scan
     speak
     broadcast
+    team_broadcast
     @time += 1
   end
 
+  def parse_orders
+    @orders.clear
+    ORDERS.each{|on|
+        if @robot.orders[on] = true
+          @orders[on] = true
+        end 
+    }
+    @orders
+  end
+
   def parse_actions
     @actions.clear
     NUMERIC_ACTIONS.each{|an|
@@ -155,7 +184,10 @@ class RobotRunner
       @robot.send("#{k}=", v)
     }
     @robot.events = @events.dup
+    @robot.orders ||= Hash.new(0)
     @robot.actions ||= Hash.new(0)
+    @robot.orders.clear
+    @robot.orders[:drop_mine] = false
     @robot.actions.clear
   end
 
@@ -165,7 +197,7 @@ class RobotRunner
   end
 
   def fire
-    if (@actions[:fire] > 0) && (@gun_heat == 0)
+    if (@actions[:fire] > 0) && (@gun_heat == 0) 
       bullet = Bullet.new(@battlefield, @x, @y, @gun_heading, @battlefield.config.bullets[:speed] , @actions[:fire]*3.0, self)
       3.times{bullet.tick}
       @battlefield << bullet
@@ -174,6 +206,15 @@ class RobotRunner
     @gun_heat -= 0.1
     @gun_heat = 0 if @gun_heat < 0
   end
+  
+  def drop_mine
+    if (@orders[:drop_mine] == true) && (@actions[:fire] == 0) && (@dropped_mines < @drop_mine_max) then
+      energy  = @battlefield.config.mines[:energy_hit_points]
+      mine = Mine.new(@battlefield, @x, @y, energy , self)
+      @battlefield << mine
+      @dropped_mines += 1
+    end
+  end
 
   def turn
     @old_radar_heading = @radar_heading
@@ -222,6 +263,17 @@ class RobotRunner
         end
       end
     end
+    @battlefield.mines.each do |mine|
+      if  (!mine.dead)
+        a = Math.atan2(@y - mine.y, mine.x - @x) / Math::PI * 180 % 360
+        if (@old_radar_heading <= a && a <= @new_radar_heading) || (@old_radar_heading >= a && a >= @new_radar_heading) ||
+          (@old_radar_heading <= a+360 && a+360 <= @new_radar_heading) || (@old_radar_heading >= a+360 && a+360 >= new_radar_heading) ||
+          (@old_radar_heading <= a-360 && a-360 <= @new_radar_heading) || (@old_radar_heading >= a-360 && a-360 >= @new_radar_heading)
+          dist = Math.hypot(@y - mine.y, mine.x - @x)
+          @events['mine_scanned'] << [dist] if (dist < @battlefield.config.robots[:radar_mine_scanning_performance]) and (self != mine.origin)
+        end
+      end
+    end
   end
 
   def speak
@@ -233,6 +285,22 @@ class RobotRunner
     end
   end
 
+  def team_broadcast
+    @battlefield.teams[self.team].each do |other|
+      if (other != self) && (!other.dead)
+        msg = other.actions[:team_broadcast]
+        if msg != 0
+          a = Math.atan2(@y - other.y, other.x - @x) / Math::PI * 180 % 360
+          dir = 'east'
+          dir = 'north' if a.between? 45,135
+          dir = 'west' if a.between? 135,225
+          dir = 'south' if a.between? 225,315
+          @events['team_broadcasts'] << [msg, dir]
+        end
+      end
+    end
+  end
+  
   def broadcast
     @battlefield.robots.each do |other|
       if (other != self) && (!other.dead)

data/lib/tkarena.rb

@@ -7,7 +7,7 @@ class TkArena
 
   attr_reader :battlefield, :xres, :yres
   attr_accessor :speed_multiplier, :on_game_over_handlers
-  attr_accessor :canvas, :boom, :robots, :bullets, :explosions, :colors, :toolboxes, :toolbox_img
+  attr_accessor :canvas, :boom, :robots, :bullets, :explosions, :colors, :toolboxes, :toolbox_img, :mines, :mine_img
   attr_accessor :default_skin_prefix, :path_prefix
 
   def initialize battlefield, xres, yres, speed_multiplier
@@ -42,14 +42,6 @@ class TkArena
     TkPhotoImage.new(:data => Base64.encode64(data))
   end
 
-  def usage
-    puts "usage: rrobots.rb <FirstRobotClassName[.rb]> <SecondRobotClassName[.rb]> <...>"
-    puts "\tthe names of the rb files have to match the class names of the robots"
-    puts "\t(up to 8 robots)"
-    puts "\te.g. 'ruby rrobots.rb SittingDuck NervousDuck'"
-    exit
-  end
-
   def init_canvas
     @canvas = TkCanvas.new(:height=>yres, :width=>xres, :scrollregion=>[0, 0, xres, yres], :background => '#000000').pack
     @colors = []
@@ -70,10 +62,11 @@ class TkArena
       TkPhotoImage.new(:file => "#{path_prefix}/images/explosion#{i.to_s.rjust(2, '0')}.gif")
     end
     @toolbox_img = TkPhotoImage.new(:file => "#{path_prefix}/images/toolbox.gif")
+    @mine_img = TkPhotoImage.new(:file => "#{path_prefix}/images/mine.gif")
   end
 
   def init_simulation
-    @robots, @bullets, @explosions, @toolboxes = {}, {}, {}, {}
+    @robots, @bullets, @explosions, @toolboxes, @mines = {}, {}, {}, {}, {}
     TkTimer.new(20, -1, Proc.new{
       begin
         draw_frame
@@ -93,9 +86,10 @@ class TkArena
     @explosions.reject!{|e,tko| @canvas.delete(tko) if e.dead; e.dead }
     @bullets.reject!{|b,tko| @canvas.delete(tko) if b.dead; b.dead }
     @toolboxes.reject!{|t,tko| @canvas.delete(tko) if t.dead; t.dead }
+    @mines.reject!{|m,tko| @canvas.delete(tko) if m.dead; m.dead }
     @robots.reject! do |ai,tko|
       if ai.dead
-        tko.status.configure(:text => "#{ai.name.ljust(20)} dead")
+        tko.status.configure(:text => I18n.t('tkarena.ai_name_dead', :ai_name => ai.name.ljust(20)))
         tko.each{|part| @canvas.delete(part) if part != tko.status}
         true
       end
@@ -106,17 +100,17 @@ class TkArena
         unless @game_over
           winner = @robots.keys.first
           whohaswon = if winner.nil?
-            "Draw!"
+            I18n.t('tkarena.draw')
           elsif @battlefield.teams.all?{|k,t|t.size<2}
-            "#{winner.name} won!"
+            I18n.t('tkarena.no_team_won', :winner_name => winner.name)
           else
-            "Team #{winner.team} won!"
+            I18n.t('tkarena.team_won', :winner_team => winner.team)
           end
           text_color = winner ? winner.team : 7
           @game_over = TkcText.new(canvas,
             :fill => @text_colors[text_color],
             :anchor => 'c', :coords => [400,400], :font=>'courier 36', :justify => 'center',
-            :text => "GAME OVER\n#{whohaswon}")
+            :text => I18n.t('tkarena.game_over').concat("\n#{whohaswon}"))
         end
       end
       @battlefield.tick
@@ -125,6 +119,7 @@ class TkArena
 
   def draw_battlefield
     draw_toolboxes
+    draw_mines
     draw_robots
     draw_bullets
     draw_explosions
@@ -170,6 +165,13 @@ class TkArena
         bullet.x / 2 + 3, bullet.y / 2 + 3)
     end
   end
+  
+  def draw_mines
+    @battlefield.mines.each do |mine|
+      @mines[mine] ||= TkcImage.new(@canvas, mine.x / 2, mine.y / 2)
+      @mines[mine].image(mine_img)
+    end
+  end
 
   def draw_explosions
     @battlefield.explosions.each do |explosion|

data/robots/Killer.rb

@@ -36,7 +36,7 @@ class Killer
     else
       @radar_range *= -2 if (@radar_range.abs < 60)
     end 
-  
+    drop_mine if rand(100) == 50 
     fire 3
     
     if ((x < 100) || (x > 1500) || (y < 100) || (y > 1500)) && (@escape.nil? || @escape.zero?)

data/robots/MsgBot.rb

@@ -4,10 +4,18 @@ class MsgBot
 include Robot
 
   def tick events
-    events['broadcasts'].each{|msg,dir|
-      say "Got message #{msg.inspect} from #{dir}!"
-    }
-    broadcast "Hello! Team #{team}!" if rand < 0.01
+    priv = true
+    unless priv then 
+      events['broadcasts'].each{|msg,dir|
+        say "Got message #{msg.inspect} from #{dir}!"
+      }
+      broadcast "Hello! Team #{team}!" if rand < 0.01
+    else
+      events['team_broadcasts'].each{|msg,dir|
+        say "Got priv message #{msg.inspect} from #{dir}!"
+      }
+      team_broadcast "Hello! Team #{team}!" if rand < 0.01
+    end
   end
 
 end