[Freeorion-programmers] SF.net SVN: freeorion: [2093] trunk/FreeOrion/default

[<geo...@us...>]

Revision: 2093
          http://svn.sourceforge.net/freeorion/revision/?rev=2093&view=rev
Author:   geoffthemedio
Date:     2007-06-25 04:03:22 -0700 (Mon, 25 Jun 2007)

Log Message:
-----------
-Added maelstrom512 to credits
-Updated python AI script with newer version I've had sitting around for a while.  Should actually send fleets to explore now.

Modified Paths:
--------------
    trunk/FreeOrion/default/AI/FreeOrionAI.py
    trunk/FreeOrion/default/credits.xml

Modified: trunk/FreeOrion/default/AI/FreeOrionAI.py
===================================================================
--- trunk/FreeOrion/default/AI/FreeOrionAI.py	2007-06-25 01:09:06 UTC (rev 2092)
+++ trunk/FreeOrion/default/AI/FreeOrionAI.py	2007-06-25 11:03:22 UTC (rev 2093)
@@ -1,7 +1,6 @@
 import foaiint
 
 # globals
-systems_to_explore = []
 systems_being_explored = []
 
 
@@ -27,15 +26,23 @@
     for fleet_id in fleet_ids_list:
         fleet = universe.GetFleet(fleet_id)
         if (fleet == None): continue
+
+        foaiint.LogOutput("Fleet: " + str(fleet_id));
         
         start_system_id = fleet.SystemID()
         if (start_system_id == fleet.INVALID_OBJECT_ID): continue
+
+        foaiint.LogOutput("in system: " + str(start_system_id));
         
         system_ids_list = GetExplorableSystemIDs(start_system_id, empire_id)
 
-        
-    foaiint.LogOutput("system_ids_list: " + str(system_ids_list))
-        
+        foaiint.LogOutput("can explore: " + str(system_ids_list));
+
+        if (len(system_ids_list) > 0):
+            destination_id = system_ids_list[0]
+            foaiint.IssueFleetMoveOrder(fleet_id, destination_id)
+    
+    
     foaiint.DoneTurn()
 
 
@@ -91,30 +98,3 @@
 
     return fleet_ids_list
 
-
-#def GetExplorableSystemID(start_system_id, object_ids_list):
-#    foaiint.LogOutput("GetExplorableSystemID")
-#    universe = foaiint.GetUniverse()
-#    empire_id = foaiint.EmpireID()
-#    
-#    system_ids_list = []
-#    
-#    foaiint.LogOutput("A")
-#    for obj_id in object_ids_list:
-#        foaiint.LogOutput("B")
-#        
- #       system = universe.GetSystem(obj_id)        
- #       if (system == None): continue
- #       
- #       foaiint.LogOutput("C")
-#        
- #       if (not universe.SystemsConnected(start_system_id, obj_id, empire_id)): continue
- #       
- #       foaiint.LogOutput("D")
- #       
- #       system_ids_list = system_ids_list + [obj_id]
- #       
- #       foaiint.LogOutput("E")
- #   
- #   foaiint.LogOutput("F")
- #   return system_ids_list

Modified: trunk/FreeOrion/default/credits.xml
===================================================================
--- trunk/FreeOrion/default/credits.xml	2007-06-25 01:09:06 UTC (rev 2092)
+++ trunk/FreeOrion/default/credits.xml	2007-06-25 11:03:22 UTC (rev 2093)
@@ -18,6 +18,7 @@
       <PERSON name="Michael J. Agostini" nick=""                task="Programming"/>
       <PERSON name="Geoff Topping"       nick="Geoff the Medio" task="Programming, Game Design"/>
       <PERSON name="Karol Szumski"       nick="MareviQ"         task="Programming"/>
+      <PERSON name="Mike Dotterer"       nick="maelstrom512"    task="Programming"/>
     </GROUP>
     <GROUP name ="GAMEDESIGN">
       <PERSON name="Krum Stanoev"    nick=""           task="Game Design"/>