This is the mail archive of the xconq7@sources.redhat.com mailing list for the Xconq project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]

Exploration patch


Without the enclosed patch, exploration in the standard game ends
around turn 40 or 60 or something.  I guess another solution to
see-terrain-if-captured would be to just set it to zero (if one gets
info on a unit, one gets info on the terrain it sits on).  I've played
a few games with this patch and it seems to work well for me.

Comments?

2001-07-26  Jim Kingdon  <kingdon@panix.com>

	Make it so that exploration doesn't cease early in the game:
	* kernel/combat.c (capture_unit_2): Make see-terrain-if-captured
	like see-others-if-captured - we roll the dice for each unit, not
	all-or-nothing.
	* doc/refman.texi (Capture Action): Update accordingly.
	* lib/standard.g: Reduce see-terrain-if-captured for
	base/town/city from 10/50/100% to 2/5/20%.
	Reduce see-others-if-captured for "town (town city)" from 100%
	to 30%.
	* lib/lhs.g, lib/log.g: Likewise.

Index: doc/refman.texi
===================================================================
RCS file: /cvs/xconq/xconq/doc/refman.texi,v
retrieving revision 1.25
diff -u -r1.25 refman.texi
--- refman.texi	2001/01/13 04:39:33	1.25
+++ refman.texi	2001/07/28 18:05:38
@@ -5965,8 +5965,10 @@
 
 @deffn UnitTypeProperty @code{see-terrain-if-captured} n%
 If the world's terrain is not already seen, this property is the chance
-that the capturing side will get all of the terrain view collected
-by the former side of the captured unit.  This does not apply to any
+that the capturing side will get a view of each terrain cell view
+collected by the former side of the captured unit.
+The chance applies to each terrain cell.
+This does not apply to any
 unit views, just terrain.
 @end deffn
 
Index: kernel/combat.c
===================================================================
RCS file: /cvs/xconq/xconq/kernel/combat.c,v
retrieving revision 1.38
diff -u -r1.38 combat.c
--- combat.c	2000/12/28 15:10:46	1.38
+++ combat.c	2001/07/28 18:05:52
@@ -1918,9 +1918,13 @@
     if (newside && !newside->see_all && prevside != indepside) {
 	notesee = FALSE;
 	chance = u_see_terrain_captured(pris->type);
-	if (!g_terrain_seen() && probability(chance)) {
+	if (!g_terrain_seen()) {
 	    for_all_cells(x, y) {
-		if (terrain_view(prevside, x, y) != UNSEEN
+		/* By checking chance first, we make it so the amount of
+		   information given over is constant; if the capturing
+		   side already knows that info, tough luck.  */
+		if (probability(chance)
+		    && terrain_view(prevside, x, y) != UNSEEN
 		    && terrain_view(newside, x, y) == UNSEEN) {
 		    set_terrain_view(newside, x, y,
 				     terrain_view(prevside, x, y));
Index: lib/lhs.g
===================================================================
RCS file: /cvs/xconq/xconq/lib/lhs.g,v
retrieving revision 1.3
diff -u -r1.3 lhs.g
--- lhs.g	2001/01/21 00:45:16	1.3
+++ lhs.g	2001/07/28 18:05:54
@@ -91,14 +91,14 @@
 
 (set scorefile-name "lhs.xcq")
 
-(add u* see-terrain-if-captured 10)
-(add town see-terrain-if-captured 50)
-(add city see-terrain-if-captured 100)
+(add u* see-terrain-if-captured 2)
+(add town see-terrain-if-captured 5)
+(add city see-terrain-if-captured 20)
 
 (table see-others-if-captured
   (ship ship 50)
   (base u* 10)
   (town u* 20)
-  (town (town city) 100)
+  (town (town city) 30)
   (city u* 100)
   )
Index: lib/log.g
===================================================================
RCS file: /cvs/xconq/xconq/lib/log.g,v
retrieving revision 1.2
diff -u -r1.2 log.g
--- log.g	2001/01/21 00:45:16	1.2
+++ log.g	2001/07/28 18:05:54
@@ -108,14 +108,14 @@
   (do last-side-wins)
   )
 
-(add u* see-terrain-if-captured 10)
-(add town see-terrain-if-captured 50)
-(add city see-terrain-if-captured 100)
+(add u* see-terrain-if-captured 2)
+(add town see-terrain-if-captured 5)
+(add city see-terrain-if-captured 20)
 
 (table see-others-if-captured
   (ship ship 50)
   (base u* 10)
   (town u* 20)
-  (town (town city) 100)
+  (town (town city) 30)
   (city u* 100)
   )
Index: lib/standard.g
===================================================================
RCS file: /cvs/xconq/xconq/lib/standard.g,v
retrieving revision 1.9
diff -u -r1.9 standard.g
--- standard.g	2001/07/12 19:41:26	1.9
+++ standard.g	2001/07/28 18:05:55
@@ -167,14 +167,14 @@
 
 (set scorefile-name "standard.xcq")
 
-(add u* see-terrain-if-captured 10)
-(add town see-terrain-if-captured 50)
-(add city see-terrain-if-captured 100)
+(add u* see-terrain-if-captured 2)
+(add town see-terrain-if-captured 5)
+(add city see-terrain-if-captured 20)
 
 (table see-others-if-captured
   (ship ship 50)
   (base u* 10)
   (town u* 20)
-  (town (town city) 100)
+  (town (town city) 30)
   (city u* 100)
   )


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]