tactical_fighter 1.0.0

data/bin/tactical_fighter

@@ -0,0 +1,780 @@
+#!/usr/bin/ruby
+
+#Tactical Fighter V1.0
+#this file is part of Tactical Fighter
+#Tactical Fighter is distributed under the CDDL licence
+#the author of Tactical Fighter is Dobai-Pataky Balint(dpblnt@gmail.com)
+
+
+begin
+	require 'gtk2'
+rescue LoadError => err
+	print "install ruby-gtk2\n"
+	exit
+end
+
+require 'drb'
+
+#default language
+@@lang="en"
+
+Strings={
+	"en"=>{"title"=>"Tactical Fighter"},
+	"hu"=>{"Map size"=>"Térkép méret", "title"=>"Taktikai Vadász","Language"=>"Nyelv", "Own address"=>"Saját cím", "Enemy address"=>"Ellenség címe", "Prepare the planes"=>"Készítsd elő a repülőket", "You Lost"=>"Vesztettél", "Shoot"=>"Lőjj", "Wait"=>"Várj", "You Won"=>"Nyertél"}
+}
+
+class String
+	def lng
+		@@lang && Strings.has_key?(@@lang) && Strings[@@lang].has_key?(self) ? Strings[@@lang][self] : self
+	end
+end
+
+class Main < Gtk::Window
+	class MultiMap < Gtk::HBox
+		class Map < Gtk::EventBox
+			class Plane
+				Down=1
+				Right=2
+				Up=3
+				Left=4
+				InitialState=0
+				ReadyState=1
+				def initialize(nx,ny)
+					@state=InitialState
+					@nx=nx
+					@ny=ny
+					@head_x=rand(@nx-7).to_i+4
+					@head_y=rand(@ny-7).to_i+4
+					@direction=rand(4).to_i+1 #torso direction from head
+				end
+				def on_coordinates?(x,y)
+					head?(x,y) || body?(x,y)
+				end
+				def body?(x,y)
+					case @direction
+						when Down then	@head_x-2 <= x && x <= @head_x+2 && y == @head_y+1 || @head_x-1 <= x && x <= @head_x+1 && y == @head_y+3 || x == @head_x && y == @head_y+2
+						when Up then		@head_x-2 <= x && x <= @head_x+2 && y == @head_y-1 || @head_x-1 <= x && x <= @head_x+1 && y == @head_y-3 || x == @head_x && y == @head_y-2
+						when Left then	@head_y-2 <= y && y <= @head_y+2 && x == @head_x-1 || @head_y-1 <= y && y <= @head_y+1 && x == @head_x-3 || y == @head_y && x == @head_x-2
+						when Right then	@head_y-2 <= y && y <= @head_y+2 && x == @head_x+1 || @head_y-1 <= y && y <= @head_y+1 && x == @head_x+3 || y == @head_y && x == @head_x+2
+					end
+				end
+				def ready?
+					@status == ReadyState
+				end
+				def invalidate
+					@status = InitialState
+				end
+				def validate
+					@status = ReadyState
+				end
+				def head?(x,y)
+					x == @head_x and y == @head_y
+				end
+				def rotate_cw(only_by_rotate=false)
+					@direction-=1
+					@direction+=4 if @direction<1
+					if only_by_rotate
+						keep_on_map_by_rotate_only
+						else
+						keep_on_map
+					end
+				end
+				def move_to(newx,newy)
+					@head_x=newx
+					@head_y=newy
+					keep_on_map
+					return @head_x,@head_y
+				end
+				def keep_on_map
+					newx=@head_x
+					newy=@head_y
+					#keep head on map
+					newx=0 if @head_x < 0
+					newy=0 if @head_y < 0
+					newx=@nx if @head_x > @nx
+					newy=@ny if @head_y > @ny
+					#keep body on map
+					case @direction
+						when Down then newy=@ny-3 if @head_y+3>@ny
+						when Up then newy=4 if @head_y<4
+						when Left then newx=4 if @head_x<4
+						when Right then newx=@nx-3 if @head_x+3>@nx
+					end
+					case @direction
+						when Up,Down then 
+							newx=3 if @head_x<3
+							newx=@nx-2 if @head_x>@nx-2
+						when Right,Left then
+							newy=3 if @head_y<3
+							newy=@ny-2 if @head_y>@ny-2
+					end
+					
+					move_to(newx,newy) if newx!=@head_x || newy!=@head_y
+				end
+				def keep_on_map_by_rotate_only(nhead_x=@head_x,nhead_y=@head_y)
+					newx=@head_x
+					newy=@head_y
+					if nhead_x!=@head_x || nhead_y!=@head_y
+						@head_x=nhead_x
+						@head_y=nhead_y
+					end
+					#keep body on map
+					case @direction
+						when Down then newy=@ny-3 if @head_y+3>@ny
+						when Up then newy=4 if @head_y<4
+						when Left then newx=4 if @head_x<4
+						when Right then newx=@nx-3 if @head_x+3>@nx
+					end
+					case @direction
+						when Up,Down then 
+							newx=3 if @head_x<3
+							newx=@nx-2 if @head_x>@nx-2
+						when Right,Left then
+							newy=3 if @head_y<3
+							newy=@ny-2 if @head_y>@ny-2
+					end
+					rotate_cw(true) if newx!=@head_x || newy!=@head_y
+					validate
+				end
+
+				def draw(cr,xroot,yroot,bs)
+					r=bs/3
+					if ready?
+		      	cr.set_source_rgba(0,0,1,0.5)
+		      	else
+		      	cr.set_source_rgba(0,1,0,0.5)
+		      end
+					cr.move_to(xroot+bs*(@head_x-0.5)+rx(0,-r),yroot+bs*(@head_y-0.5)+ry(0,-r))
+					rct(cr,-r,0,-r,0,-r,r*2)
+					rct(cr,0,r,0,r,-r,r)
+					rct(cr,-(bs*2-r),0,-(bs*2-r),0,-(bs*2-r),r)
+					rct(cr,0,r,0,r,(bs*2-r),r)
+					rct(cr,r,0,r,0,r,r)
+					rct(cr,0,bs,0,bs,-r,bs)
+					rct(cr,-r*2,0,-r*2,0,-r*2,r)
+					
+					rct(cr,0,r,0,r,bs+r,r)
+					rct(cr,bs+r,0,bs+r,0,bs+r,-r)
+					
+					rct(cr,0,-r,0,-r,-r*2,-r)
+					rct(cr,-r,0,-r,0,-r,-r)
+					rct(cr,0,-bs,0,-bs,r,-bs)
+					rct(cr,bs*2-r,0,bs*2-r,0,bs*2-r,-r)
+					rct(cr,0,-r,0,-r,-(bs*2-r),-r)
+					rct(cr,-r,0,-r,0,-r,-r)
+					rct(cr,0,-2*r,0,-2*r,-r,-2*r)
+					cr.close_path
+					cr.fill
+
+					cr.stroke
+				end
+				def rct(cr,x1,y1,x2,y2,xd,yd)
+					cr.rel_curve_to(rx(x1,y1),ry(x1,y1),rx(x2,y2),ry(x2,y2),rx(xd,yd),ry(xd,yd))
+				end
+				def rx(x,y)
+					case @direction
+						when Down then x
+						when Up then -x
+						when Left then -y
+						when Right then y
+					end
+				end
+				def ry(x,y)
+					case @direction
+						when Down then y
+						when Up then -y
+						when Left then -x
+						when Right then x
+					end
+				end
+			end
+
+#-------------- map -----------
+			Local=1
+			Remote=2
+			Empty=0
+			Missed=1
+			Hit=2
+			Wasted=3
+			def initialize(main,map_type,nx,ny)
+				@nx=nx
+				@ny=ny
+				@main=main
+				@map_type=map_type
+				@shoot_fifo=Array.new
+				@block_size=20
+				@line_width=(@block_size/7).to_i
+				@planes=Array.new
+				@plane_count=(0.03*@nx*@ny).to_i
+				@plane_count.times{|i| @planes.push(Plane.new(@nx,@ny))} if local?
+				super()
+				set_visible_window(false)
+				add(@widget=Gtk::Fixed.new)
+				set_size_request(@nx*@block_size,@ny*@block_size)
+				@map=Hash.new
+				for i in 1 .. @nx
+					@map[i]=Hash.new
+					for j in 1 .. @ny
+						@map[i][j]=Empty
+					end
+				end
+				@widget.signal_connect('size-allocate'){|me,allocation|
+					@block_size=(me.allocation.width-1)/@nx
+					yblock_size=(me.allocation.height-1)/@ny
+					@block_size=yblock_size if yblock_size<@block_size
+					@line_width=(@block_size/7).to_i
+					@xroot=me.allocation.x+(me.allocation.width-@nx*@block_size-1)/2
+					@yroot=me.allocation.y+(me.allocation.height-@ny*@block_size-1)/2
+				}
+				@widget.signal_connect('expose-event'){|me,ev|
+					cr=me.window.create_cairo_context
+					#grid
+					cr.set_source_rgb(0.8,0.8,0.8)
+					cr.set_line_width(1)
+					cr.set_line_cap(Cairo::LineCap::ROUND)
+					for i in 0 .. @nx
+						for j in 0 .. @ny
+							cr.move_to(@xroot+i*@block_size,@yroot)
+							cr.line_to(@xroot+i*@block_size,@yroot+@ny*@block_size)
+							cr.move_to(@xroot,@yroot+j*@block_size)
+							cr.line_to(@xroot+@nx*@block_size,@yroot+j*@block_size)
+						end
+					end
+					cr.stroke
+					cr.set_source_rgb(0.3,0.3,0.3)
+					cr.rectangle(@xroot,@yroot,@nx*@block_size,@ny*@block_size)
+					cr.stroke
+					all_set?#invalidate planes
+					#planes
+					@planes.each{|plane| plane.draw(cr,@xroot,@yroot,@block_size)}
+					for i in 1 .. @nx do
+						for j in 1 .. @ny do
+							if (cnt=count_plane_on_coordinates?(i,j))>1
+								plane=first_plane_on_coordinates?(i,j)
+					      cr.set_source_rgba(1.0*(cnt-1)/(@plane_count-1), if plane.ready? then 1 else 0 end, 1-1.0*(cnt-1)/(@plane_count-1),0.2)
+					      cr.rectangle(@xroot+(i-1)*@block_size+1,@yroot+(j-1)*@block_size+1,@block_size-2,@block_size-2)
+								cr.fill
+							end
+							#battle-map
+							case @map[i][j]
+								when Hit then 
+									cr.set_source_rgb(1,0,0)
+									cr.set_line_width(@line_width)
+									cr.set_line_cap(Cairo::LineCap::ROUND)
+									cr.move_to(@xroot+(i-1)*@block_size+@line_width*2,@yroot+(j-1)*@block_size+@line_width*2)
+									cr.line_to(@xroot+i*@block_size-@line_width*2,@yroot+j*@block_size-@line_width*2)
+									cr.move_to(@xroot+i*@block_size-@line_width*2,@yroot+(j-1)*@block_size+@line_width*2)
+									cr.line_to(@xroot+(i-1)*@block_size+@line_width*2,@yroot+j*@block_size-@line_width*2)
+									cr.stroke
+								when Missed then
+									cr.set_source_rgb(0,1,0)
+									cr.set_line_width(@line_width)
+									cr.set_line_cap(Cairo::LineCap::ROUND)
+									cr.arc(@xroot+(i-0.5)*@block_size, @yroot+(j-0.5)*@block_size, @block_size/3, 0, Math::PI*2)
+									cr.stroke
+								when Wasted then
+									cr.set_source_rgb(1,0,0)
+									cr.set_line_width(@line_width)
+									cr.set_line_cap(Cairo::LineCap::ROUND)
+									cr.arc(@xroot+(i-0.5)*@block_size, @yroot+(j-0.5)*@block_size, @block_size/3, 0 , Math::PI*2)
+									cr.move_to(@xroot+(i-1)*@block_size+@line_width*2,@yroot+(j-1)*@block_size+@line_width*2)
+									cr.line_to(@xroot+i*@block_size-@line_width*2,@yroot+j*@block_size-@line_width*2)
+									cr.move_to(@xroot+i*@block_size-@line_width*2,@yroot+(j-1)*@block_size+@line_width*2)
+									cr.line_to(@xroot+(i-1)*@block_size+@line_width*2,@yroot+j*@block_size-@line_width*2)
+									cr.stroke
+							end
+						end
+					end
+					cr.stroke
+					#draw the shoot_fifo
+					@shoot_fifo.each_index{|ind|
+						@shoot_fifo[ind]
+						layout=cr.create_pango_layout
+						layout.text=(ind+1).to_s
+						layout.set_width(@block_size * Pango::SCALE).set_alignment(Pango::Layout::ALIGN_CENTER)
+						layout.set_font_description(Pango::FontDescription.new("Sans #{(@block_size*0.6).to_i}"))
+						cr.update_pango_layout(layout)
+						cr.move_to(@xroot+@block_size*(@shoot_fifo[ind][0]-1),@yroot+@block_size*(@shoot_fifo[ind][1]-1))
+						cr.set_source_rgba(0.9,0.1,0.1,0.5)
+						cr.show_pango_layout(layout)
+						cr.stroke
+					}
+					#draw round transparent charts on the map, the waste a smaller inside
+					waste_ratio,hit_ratio = hit_counter
+
+					r=@block_size-1
+					xc=@xroot+@block_size
+					yc=@yroot+@ny*@block_size-@block_size
+					cr.set_line_width(1)
+					cr.set_source_rgba(0,2,0,0.1)
+					cr.move_to(xc,yc)
+					cr.arc(xc,yc,r,0,Math::PI*2)
+					cr.move_to(xc,yc)
+					cr.fill
+					cr.stroke
+					if hit_ratio>0
+						cr.set_source_rgba(1,0,0,0.1)
+						cr.move_to(xc,yc)
+						cr.line_to(xc+r,yc)
+						cr.arc(xc,yc,r,0,Math::PI*2*hit_ratio)
+						cr.line_to(xc,yc)
+						cr.close_path
+						cr.fill
+						cr.stroke
+					end
+
+					r=@block_size/2-1
+					xc=@xroot+@block_size
+					yc=@yroot+@ny*@block_size-@block_size
+					cr.set_line_width(1)
+					cr.set_source_rgba(0,2,0,0.3)
+					cr.move_to(xc,yc)
+					cr.arc(xc,yc,r,0,Math::PI*2)
+					cr.move_to(xc,yc)
+					cr.fill
+					cr.stroke
+					if waste_ratio>0
+						cr.set_source_rgba(1,0,0,0.3)
+						cr.move_to(xc,yc)
+						cr.line_to(xc+r,yc)
+						cr.arc(xc,yc,r,0,Math::PI*2*waste_ratio)
+						cr.line_to(xc,yc)
+						cr.close_path
+						cr.fill
+						cr.stroke
+					end
+
+
+					#message
+					message=nil
+					if local?
+						message="Prepare the planes".lng if @main.place?
+						message="You Lost".lng if @main.lost?
+						message="" if @main.won?
+					end
+					if remote?
+						message="Shoot".lng  if @main.shoot?
+						message="Wait".lng if @main.wait?
+						message="You Won".lng if @main.won?
+						message="" if @main.lost?
+					end
+
+					unless message.nil?
+						layout=cr.create_pango_layout
+						layout.text=message
+						layout.set_width(@block_size*@nx/2 * Pango::SCALE)
+						font_size=@block_size
+						layout.set_font_description(Pango::FontDescription.new("Sans #{font_size}"))
+						cr.update_pango_layout(layout)
+						while layout.size[0]/Pango::SCALE>@block_size*@nx do
+							font_size-=1
+							layout.set_font_description(Pango::FontDescription.new("Sans #{font_size}"))
+							cr.update_pango_layout(layout)
+						end
+						cr.move_to(@xroot+(@block_size*@nx-layout.size[0]/Pango::SCALE)/2,@yroot+(@block_size*@ny-layout.size[1]/Pango::SCALE)/2)
+						cr.set_source_rgba(1,1,0,0.6)
+						cr.show_pango_layout(layout)
+						cr.stroke
+					end
+					true
+				}
+				signal_connect('button-press-event'){|me,ev|
+					if ev.button == 1
+						if local? && @main.place?
+							#start moving plane
+							@xshift=((ev.x-@xroot)/@block_size).to_i+1
+							@yshift=((ev.y-@yroot)/@block_size).to_i+1
+							@dragged=false
+						end
+						if remote?
+							x=((me.allocation.x+ev.x-@xroot)/@block_size).to_i+1
+							y=((me.allocation.y+ev.y-@yroot)/@block_size).to_i+1
+							if 1<=x && x<=@nx && 1<=y && y<=@ny && @map[x][y] == Empty
+								if @main.shoot?
+									#shoot the enemy
+									set_cell_state(x,y,@main.shoot_enemy(x,y))
+									@main.wait unless @main.ended?
+								elsif @main.wait?
+									if @shoot_fifo.include?([x,y])
+										#remove from the fifo if already there
+										@shoot_fifo.delete([x,y])
+										redraw_map
+										else
+										#add to shoot fifo
+										@shoot_fifo.push([x,y])
+										redraw_cell(x,y)
+									end
+								end
+							end
+						end
+					end
+					if ev.button == 3
+						if local? && @main.place?
+							#make plane ready
+							if ev.event_type == Gdk::Event::BUTTON2_PRESS
+								#double-right-click validate all planes
+								@planes.each{|pl| pl.validate}
+								redraw_map
+								@main.ready if all_set?
+							else
+								if plane=first_head_on_coordinates?(((ev.x-@xroot)/@block_size).to_i+1,((ev.y-@yroot)/@block_size).to_i+1)
+									if plane.ready? then plane.invalidate else plane.validate end
+									redraw_map
+									@main.ready if all_set?
+								end
+							end
+						end
+						if remote?
+							#rotate guessed enemy plane
+							x=((me.allocation.x+ev.x-@xroot)/@block_size).to_i+1
+							y=((me.allocation.y+ev.y-@yroot)/@block_size).to_i+1
+							if @map[x][y] == Wasted
+								if plane=first_head_on_coordinates?(x,y)
+									plane.rotate_cw(true)
+									@planes.each{|plane| plane.validate}
+									redraw_map
+								end
+							end
+						end
+					end
+				}
+				signal_connect('button-release-event'){|me,ev|
+					if ev.button == 1 
+						if local? && @main.place? && !@xshift.nil? && !@yshift.nil?
+							#rotate plane
+							x=((ev.x-@xroot)/@block_size).to_i+1
+							y=((ev.y-@yroot)/@block_size).to_i+1
+							plane=first_head_on_coordinates?(@xshift,@yshift)
+							if !plane.nil? && !@dragged && !plane.ready?
+								plane.rotate_cw
+								redraw_map #also invalidate planes if needed
+							end
+							@xshift=nil
+							@yshift=nil
+						end
+					end
+				}
+				signal_connect('motion-notify-event'){|me,ev|
+					if local? && @main.place? && !@xshift.nil? && !@yshift.nil?
+						#move plane
+						if plane=first_head_on_coordinates?(@xshift,@yshift)
+							x=((ev.x-@xroot)/@block_size).to_i+1
+							y=((ev.y-@yroot)/@block_size).to_i+1
+							if (x!=@xshift || y!=@yshift) && !plane.ready?
+								@xshift,@yshift=plane.move_to(x,y)
+								if plane.head?(x,y)
+									@dragged=true
+									redraw_map
+								end
+							end
+						end
+					end
+				}
+			end
+			def redraw_map
+				@widget.window.invalidate(Gdk::Rectangle.new(@widget.allocation.x,@widget.allocation.y,@widget.allocation.width,@widget.allocation.height),false)
+			end
+			def redraw_cell(x,y)
+				@widget.window.invalidate(Gdk::Rectangle.new(@xroot+@block_size*(x-1),@yroot+@block_size*(y-1),@block_size,@block_size),false)
+			end
+			def local?
+				@map_type == Local
+			end
+			def remote?
+				@map_type == Remote
+			end
+			def fifo_shoot
+				if @main.shoot? && coo=@shoot_fifo[0]
+					#shoot the enemy from fifo
+					set_cell_state(coo[0],coo[1],@main.shoot_enemy(coo[0],coo[1]))
+					@shoot_fifo.delete_at(0)
+					@main.wait unless @main.ended?
+				end
+			end
+			def count_plane_on_coordinates?(x,y)
+				cnt=0
+				@planes.each{|plane| cnt+=1 if plane.on_coordinates?(x,y)}
+				cnt
+			end
+			def first_plane_on_coordinates?(x,y)
+				pl=nil
+				@planes.each{|plane| pl=plane if plane.on_coordinates?(x,y) && pl.nil?}
+				pl
+			end
+			def first_head_on_coordinates?(x,y)
+				pl=nil
+				@planes.each{|plane| pl=plane if plane.head?(x,y) && pl.nil?}
+				pl
+			end
+			def all_set?
+				cnt=0
+					for i in 1 .. @nx
+						for j in 1 .. @ny
+							if count_plane_on_coordinates?(i,j)>1
+								first_plane_on_coordinates?(i,j).invalidate
+								cnt+=1
+							end
+						end
+					end
+				good=cnt == 0
+				@planes.each{|plane| good=false unless plane.ready?}
+				good
+			end
+			def hit?(x,y)
+				cell_state=set_cell_state(x,y,if first_head_on_coordinates?(x,y)
+					Wasted
+					elsif first_plane_on_coordinates?(x,y)
+							Hit
+							else
+							Missed
+						end
+				)
+				@main.lost if all_wasted?
+				cell_state
+			end
+			def set_cell_state(x,y,state)
+				@map[x][y]=state
+				xwg=@xroot+x*@block_size
+				ywg=@xroot+y*@block_size
+#				redraw_map
+#				#@widget.window.invalidate(Gdk::Rectangle.new(xwg+1,ywg+1,@block_size-2,@block_size-2),false)
+				if remote? && state==Wasted
+					@planes.push(pp=Plane.new(@nx,@ny))
+					pp.keep_on_map_by_rotate_only(x,y)
+				end
+				state
+			end
+			def all_wasted?
+				waste_cnt=0
+					for i in 1 .. @nx
+						for j in 1 .. @ny
+							waste_cnt+=1 if @map[i][j] == Wasted
+						end
+					end
+				waste_cnt == @plane_count
+			end
+			def hit_counter
+				waste_cnt=0
+				hit_cnt=0
+				miss_cnt=0
+					for i in 1 .. @nx
+						for j in 1 .. @ny
+							waste_cnt+=1 if @map[i][j] == Wasted
+							hit_cnt+=1 if @map[i][j] == Hit
+							miss_cnt+=1 if @map[i][j] == Missed
+						end
+					end
+				return (waste_cnt.to_f/ @plane_count.to_f),hit_cnt.to_f/(hit_cnt.to_f+miss_cnt.to_f)
+				
+			end
+
+		end
+		def initialize(main,nx,ny)
+			@main=main
+			super()
+			pack_start(@local=Map.new(main,Map::Local,nx,ny),true,true)
+			#pack_start(Gtk::Fixed.new.set_size_request(10,10))
+			pack_start(@remote=Map.new(main,Map::Remote,nx,ny),true,true)
+			show_all
+		end
+		attr_reader :local, :remote
+	end
+	
+	class Setup < Gtk::Alignment
+		def initialize(main)
+			@main=main
+			super(0.5,0.5,0,0)
+			add(Gtk::VBox.new)
+			child.pack_start(Gtk::Table.new(2,2).
+				attach_defaults(@oa=Gtk::Label.new,0,1,0,1).attach_defaults(Gtk::Entry.new.set_text(@main.uri).set_editable(false).set_width_request(300),1,2,0,1).
+				attach_defaults(@ea=Gtk::Label.new,0,1,1,2).attach_defaults(@remote_address=Gtk::Entry.new,1,2,1,2)).
+			pack_start(
+				Gtk::HBox.new.
+					pack_start(@ms=Gtk::Label.new).
+					pack_start(@nxw=Gtk::SpinButton.new(10,40,1)).
+					pack_start(Gtk::Label.new('X')).
+					pack_start(@nyw=Gtk::SpinButton.new(10,40,1))
+			).
+			pack_start(
+				Gtk::HBox.new.
+					pack_start(@l=Gtk::Label.new).
+					pack_start(lang_combo=Gtk::ComboBox.new)
+				).
+			pack_start(Gtk::HBox.new.
+				pack_start(@connect=Gtk::Button.new(Gtk::Stock::MEDIA_PLAY)).
+				pack_start(@exit=Gtk::Button.new(Gtk::Stock::QUIT)))
+		Strings.each_key{|l| lang_combo.append_text(l)}
+		lang_combo.signal_connect("changed"){|me|
+			set_lang(me.active_text)
+		}
+		@nxw.signal_connect('value-changed'){|me| @remote_server.setup.set_map_size(@nxw.value,@nyw.value) if @remote_server}
+		@nyw.signal_connect('value-changed'){|me| @remote_server.setup.set_map_size(@nxw.value,@nyw.value) if @remote_server}
+
+		@exit.signal_connect('clicked'){|me|
+			DRb.stop_service
+			Gtk.main_quit
+		}
+		@connect.signal_connect('clicked'){|me| @main.start_game}
+
+		lang_combo.set_active(1)
+		end
+		attr_reader :nxw, :nyw, :remote_address
+		
+		def set_lang(lang)
+			@@lang=lang
+			@main.set_title('title'.lng)
+			@oa.set_text('Own address'.lng)
+			@ea.set_text('Enemy address'.lng)
+			@ms.set_text('Map size'.lng)
+			@l.set_text("Language".lng)
+		end
+		def set_map_size(x,y)
+			@nxw.set_value(x)
+			@nyw.set_value(y)
+		end
+	end
+
+	Idle=1
+	Place=2
+	Shoot=3
+	Wait=4
+	Won=5
+	Lost=6
+	
+
+	def initialize
+		super()
+		@server=DRb.start_service(nil,self)
+		@remote_server=nil
+		@state=Idle
+		add(@setup=Setup.new(self))
+		
+		signal_connect('delete-event') {|me,ev|
+			end_game
+			true
+		}
+
+		show_all
+	end
+	attr_reader :state, :setup
+	
+	def idle?
+		@state == Idle
+	end
+	def place?
+		@state == Place
+	end
+	def shoot?
+		@state == Shoot
+	end
+	def wait?
+		@state == Wait
+	end
+	def ended?
+		@state == Won || @state == Lost
+	end
+	def won?
+		@state == Won
+	end
+	def lost?
+		@state == Lost
+	end
+	
+	def end_game
+		unless idle?
+			@maps.destroy
+			add(@setup)
+			show_all
+			@state=Idle
+			@remote_server.end_game
+			@remote_server=nil
+		end
+	end
+
+	def start_game
+		begin
+			helloed=false
+			@remote_server=DRbObject.new(nil, "druby://#{@setup.remote_address.text}")
+			@remote_server.setup.set_map_size(@setup.nxw.value,@setup.nyw.value)
+			helloed=@remote_server.hello(self)
+			@setup.remote_address.set_text(@remote_server.uri)
+		rescue =>e
+			print e.message,"\n",e.backtrace.join("\n\t")
+		end
+		if helloed
+			remove(child)
+			add(@maps=MultiMap.new(self,setup.nxw.value,setup.nyw.value))
+			@state=Place
+		end
+	end
+
+	def hello(remote_server)
+		@remote_server=remote_server
+		@setup.remote_address.set_text(@remote_server.uri)
+		remove(child)
+		add(@maps=MultiMap.new(self,setup.nxw.value,setup.nyw.value))
+		@state=Place
+		true
+	end
+	def ready
+		if @remote_server.ready?
+			wait
+		end
+	end
+	def shoot
+		@state=Shoot
+		@remote_server.dont_shoot
+		@maps.local.redraw_map
+		@maps.remote.redraw_map
+		@maps.remote.fifo_shoot
+	end
+	def dont_shoot
+		@state=Wait
+		@maps.local.redraw_map
+		@maps.remote.redraw_map
+	end
+	def wait
+		@state=Wait
+		@remote_server.dont_wait
+		@maps.local.redraw_map
+		@maps.remote.redraw_map
+	end
+	def dont_wait
+		@state=Shoot
+		@maps.local.redraw_map
+		@maps.remote.redraw_map
+		@maps.remote.fifo_shoot
+	end
+	def ready?
+		@maps.local.all_set?
+	end
+	def shoot_enemy(x,y)
+		@remote_server.enemy_shoot(x,y)
+	end
+	def enemy_shoot(x,y)
+		@maps.local.hit?(x,y)
+	end
+	def lost
+		@state=Lost
+		@remote_server.won
+		@maps.local.redraw_map
+		@maps.remote.redraw_map
+	end
+	def won
+		@state=Won
+		@maps.local.redraw_map
+		@maps.remote.redraw_map
+	end
+	def uri
+		@server.uri[@server.uri.rindex('/')+1 .. @server.uri.length]
+	end
+end
+
+begin
+	Main.new
+rescue =>e
+	print e.message,"\n",e.backtrace.join("\n\t")
+end
+
+Gtk.main
+

metadata

@@ -0,0 +1,82 @@
+--- !ruby/object:Gem::Specification 
+name: tactical_fighter
+version: !ruby/object:Gem::Version 
+  hash: 23
+  prerelease: false
+  segments: 
+  - 1
+  - 0
+  - 0
+  version: 1.0.0
+platform: ruby
+authors: 
+- Dobai-Pataky Balint
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-03-05 00:00:00 +02:00
+default_executable: tactical_fighter
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: gtk2
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        hash: 377
+        segments: 
+        - 0
+        - 90
+        - 7
+        version: 0.90.7
+  type: :runtime
+  version_requirements: *id001
+description: A multiplayer LAN game on gtk2 for anyone to protect the friendly air force by taking down the enemy fighters
+email: dpblnt@gmail.com
+executables: 
+- tactical_fighter
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- bin/tactical_fighter
+has_rdoc: true
+homepage: http://sourceforge.net/projects/tacticalfighter/
+licenses: 
+- CDDL
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: tactical_fighter
+test_files: []
+