commits for 7.5.0 pre-release tarball

[xconq] / lib / ww2-div-pac.g

diff --git a/lib/ww2-div-pac.g b/lib/ww2-div-pac.g
index a5fda9246bf88be31d281ee7379d1e49ca9b6f00..98f3ecadd988a82ff0904fa603db1a098a827243 100644 (file)
--- a/lib/ww2-div-pac.g
+++ b/lib/ww2-div-pac.g
@@ -1,7 +1,13 @@
 (game-module "ww2-div-pac"
-  (title "WWII, Division-level, Pacific")
-  (version "0.9")
-  (blurb "base module for divisional/theater-level WWII in the Pacific")
+  (title "WWII Division Level Sea")
+  (version "1.0")
+  (blurb "Base module for division level sea war. Emphasis on the Pacific.")
+  (variants
+   (world-seen true)
+   (see-all true)
+   (sequential false)
+   ("Last Side Wins" keep-score true (true (scorekeeper (do last-side-wins))))
+   )
   )
 
 (unit-type a-inf-bn (image-name "inf-bn")
@@ -224,13 +230,17 @@
 
 (add ground-types acp-per-turn 1)
 (add ship-types acp-per-turn 24)
+(add place-types acp-per-turn 24)
 
 (add carrier-types free-acp 6)
-;(add place-types free-acp 6)
+(add place-types free-acp 6)
 
 ;;; Movement.
 
+(add place-types speed 0)
+
 (table mp-to-enter-terrain
+  (place-types t* 99)
   (ground-types sea 99)
   (ship-types land 99)
   (ship-types atoll 12)
@@ -265,6 +275,8 @@
 
 (table acp-to-attack
   (ship-types u* 6)
+  (carrier-types u* 0)
+  (place-types u* 0)
   )
 
 (table acp-to-defend
@@ -277,6 +289,9 @@
 (table acp-to-be-fired-on
   ;; Defense consumes a good bit of time.
   (carrier-types carrier-types 6)
+  (carrier-types place-types 6)
+  (place-types carrier-types 6)
+  (place-types place-types 6)
   )
 
 (add carrier-types range 8)
@@ -288,8 +303,13 @@
   (ground-types place-types 50)
   ;; Naval combat.
   (ship-types ship-types 50)
+  ;; Air combat.
   (carrier-types ground-types 50)
-  (carrier-types place-types 50)
+  (carrier-types ship-types 50)                ;       This is redundant with ship-types ship-types 50, but
+  (carrier-types place-types 50)               ;       we spell it out for clarity.
+  (place-types ground-types 50)
+  (place-types ship-types 50)
+  (place-types place-types 50)
   )
 
 (table damage
@@ -298,9 +318,16 @@
   (ground-types place-types 1)
   ;; Naval combat.
   (ship-types ship-types 1)
+  ;; Air combat.
+  (carrier-types ground-types 1)
+  (carrier-types ship-types 1)         ;       This is redundant with ship-types ship-types 1, but
+  (carrier-types place-types 1)                ;       we spell it out for clarity.
+  (place-types ground-types 1)
+  (place-types ship-types 1)
+  (place-types place-types 1)
   )
 
-(table consumption-per-attack
+(table consumption-per-fire
   ;; Expect to lose one plane in an attack.
   (carrier-types air 1)
   (place-types air 1)
@@ -311,7 +338,7 @@
   (u* air 1)
   )
 
-(table material-to-attack
+(table material-to-fire
   ;; Carrier needs at least a few planes.
   (carrier-types air 6)
   (place-types air 6)