git.pond.sub.org Git - empserver/blob - tests/retreat/setup-POGO

   1 || create land
   2 desi @0,0:2 a
   3 desi 4,4 h
   4 des -6,2 h
   5 give c * ?des#. 100
   6 || country#1
   7 add 1 1 1 p
   8 edit l * ?des#.&xloc>-6&xloc<0 o 1 O 1
   9 desi -2,0 c
  10 edit c 1 c -2,0 s 4 b 640 M 25000 T 100
  11 | two forts (-2,-2 with return fire, -2,2 without)
  12 desi -2,2 f
  13 desi -2,-2 f
  14 | harbor
  15 desi -3,1 h
  16 | ships for testing retreat command
  17 build s -3,1 cs 5
  18 edit s 4 L -5,1 U 7
  19 | fleet a defined below
  20 | ship to drop depth charges
  21 build s -3,1 dd
  22 edit s 5 g 1 s 40
  23 | ship to launch torpedoes
  24 build s -3,1 sb
  25 edit s 6 T 165 L -1,3 g 1 s 36
  26 | complete the ships
  27 edit s * ?own#0 E 100 M 127 m 10
  28 | p-bombers with 50% hit chance vs. dd in port
  29 build p -2,2 lb 5
  30 | marine missiles acc 50
  31 edit p 0 U 10 T mi t 160 U 11 U 12 U 13 U 14
  32 | p-bombers with 50% hit chance vs. cav
  33 edit p 0 U 20 t 400 U 21 U 22 U 23 U 24
  34 | very accurate p-bomber
  35 edit p 0 U 30 T ac t 400
  36 | complete the planes
  37 edit p * ?own#0 e 100 m 127
  38 | land units for testing retreat command
  39 build l -3,1 inf 5
  40 edit u 4 L -4,0 U 7
  41 | army a defined below
  42 | complete the land units (fortify to reduce unwanted collateral damage)
  43 edit u * ?own#0 e 100 M 127 m 10 F 127
  44 || country#2
  45 add 2 2 2 p
  46 edit l * ?des#.&own=0 o 2 O 2
  47 | mountain, to test "can't retreat into mountain"
  48 desi 2,0 ^
  49 edit c 2 c 2,0 s 4 b 640 M 25000 T 100
  50 | a city for testing canals
  51 desi 4,0 c
  52 | harbors, 0,2 efficient, 2,2 construction zone
  53 desi 0:2,2 h
  54 edit l 2,2 e 1
  55 | ship that can return fire to -2,-2 and -5,-1 weakly
  56 edit s 5 U 9 O 2 L -4,-2 E 60
  57 | a train to carry land units
  58 edit u 0 U 9 O 2 T tra L 0,2
  59 | target ships gun fire: injured, helpless, not helpless
  60 edit s 0 U 20 O 2 U 10 L 0,2 U 11
  61 retr 10 nhhnj ih
  62 retr 11 n h
  63 retr 20 u h
  64 | crazy group retreat
  65 edit s 10 U 25 L -4,2 U 26 U 27 U 28 U 29 L 5,3
  66 edit s 25 U 24 O 1
  67 fleet g 24/25/26/27/28/29
  68 retr g ggg i
  69 retr 26 bn i
  70 retr g ?uid=27 bn i
  71 retr g ?uid=28 ggg b
  72 retr g ?uid=29 ggg i
  73 | target ships that want to retreat, but can't:
  74 | sunk
  75 edit s 10 U 30 E 20
  76 | in canal
  77 edit s 10 U 31 L 4,0
  78 | crewless
  79 edit s 10 U 32 m 0
  80 | in construction zone
  81 edit s 10 U 33 L 2,2
  82 | landlocked in 3,1
  83 edit s 10 U 34 L 3,1
  84 | no mobility
  85 edit s 10 U 35 M 0
  86 | on sale
  87 edit s 10 U 36
  88 | set as POGO doesn't work, done in setup-2
  89 fleet c 30/32/35/36
  90 retr c n i
  91 retr 31/33/34 n i
  92 | target ships having difficulties during retreat:
  93 edit s 10 U 40 t lc U 41 U 42
  94 | runs out of mobility
  95 edit s 40 M 5
  96 retr 40 nnnnh i
  97 | into construction zone 2,2
  98 retr 41 nuh i
  99 | into unfriendly -3,1
 100 edit s 42 L -4,2
 101 retr 42 ugggh i
 102 | as group into minefield -6,4
 103 edit s 10 U 43 t ms U 44
 104 fleet m 43/44
 105 edit s m L -4,4
 106 edit l -6,4 M 100
 107 retr m gg i
 108 | into canal 4,0
 109 edit s 10 U 46 L 5,1 U 47 t pt
 110 fleet n 46/47
 111 retr n y i
 112 | missions for retreat to clear
 113 miss s 40/41/42 int .
 114 | target ships depth-charges: injured vs. depth-charged, depth-charged,
 115 | helpless, not helpless
 116 edit s 10 U 50 t sb L -5,1 U 51 U 52 U 53 L -4,-2
 117 retr 50 gg dih
 118 retr 51 gg dh
 119 retr 52/53 gg h
 120 | target ships bombs: injured vs. bombed, bombed
 121 | five of each, to have a decent chance at getting both a hit and a miss
 122 edit s 10 U 60 t dd L -6,2 U 61 U 62 U 63 U 64 U 65 U 66 U 67 U 68 U 69
 123 retr 60/61/62/63/64 nn bih
 124 retr 65/66/67/68/69 nn bh
 125 | target ships missiles: injured (bombed doesn't apply)
 126 | five, to have a decent chance at getting both a hit and a miss
 127 edit s 60 U 80 L -6,2 U 81 U 82 U 83 U 84
 128 retr 80/81/82/83/84 nn bih
 129 | target ships torpedoes: torpedoed (injured not implemented)
 130 | five, to have a decent chance at getting both a hit and a miss
 131 edit s 10 U 100 L 0,4 U 101 U 102 U 103 U 104
 132 retr 100/101/102/103/104 nn tih
 133 | target ship sonar
 134 edit s 50 U 120
 135 retr 120 gg s
 136 | target ship boarding
 137 edit s 50 U 130 t tt
 138 retr 130 gg u
 139 | target land units bombs: bombed
 140 edit u 9 U 10 T cav L 1,1
 141 lret 10 jhhuy b
 142 | crazy group retreat
 143 edit u 10 U 25 L 3,1 a g U 26 U 27 U 28 U 29 L 4,0
 144 edit u 25 U 24 O 1
 145 army g 24/25/26/27/28/29
 146 lret g bhg b
 147 lret 26 uh b
 148 lret g ?uid=27 uh b
 149 lret g ?uid=28 bhg i
 150 lret g ?uid=29 bhg b
 151 | target land units that want to retreat, but can't:
 152 | destroyed
 153 edit u 10 U 30 L 0,2 e 10
 154 | loaded on ship
 155 edit u 10 U 31 L 0,2 S 35
 156 | crewless
 157 edit u 10 U 32 L 0,2 m 0
 158 | kidnapped
 159 edit u 10 U 33 L -1,1
 160 | loaded on train
 161 edit u 10 U 34 L 0,2 Y 9
 162 | no mobility
 163 edit u 10 U 35 L 0,2 M 0
 164 | on sale
 165 edit u 10 U 36 L 0,2
 166 | set as POGO doesn't work, done in setup-2
 167 army c 30/31/32/34/35/36
 168 lret c j b
 169 lret 33 j b
 170 | target land units having difficulties during retreat:
 171 | runs out of mobility
 172 edit u 10 U 40 M 5
 173 lret 40 nu b
 174 | into mountain 2,0
 175 edit u 10 U 41
 176 lret 41 jy b
 177 | into foreign sector -1,1
 178 edit u 10 U 42
 179 lret 42 g b
 180 | as group into minefield 0,0
 181 edit u 10 U 10 U 43 T eng U 44
 182 army m 43/44
 183 edit l 0,0 O 1 M 100
 184 lret m yu b
 185 | missions for retreat to clear
 186 miss l 40/41/42 res .
 187 | target land units bombs: injured vs. bombed
 188 | five, to have a decent chance at getting both a hit and a miss
 189 edit u 10 U 60 L 0,0 U 61 U 62 U 63 U 64
 190 lret 60/61/62/63/64 nj bih
 191 || country#3, allied to #2
 192 add 3 3 3 p
 193 edit l 2:3,-2:-1 o 3 O 3
 194 || country#4, friendly to #2
 195 add 4 4 4 p
 196 edit l 4,4 o 4 O 4
 197 || finishing touches
 198 give m * ?des=f 5
 199 give g * ?des=f 2
 200 give s * ?des=f 100
 201 give p * ?des=f 100
 202 edit l * ?des#.&eff=0 e 100 m 127
 203 fleet a 0/1/3/4
 204 army a 0/1/3/4
 205 || relations
 206 decl w 1 2
 207 decl w 2 1
 208 decl a 2 3
 209 decl f 2 4
 210 || show initial state here to help maintainers
 211 map *
 212 cens * ?des#.
 213 ship *
 214 retr *
 215 land *
 216 lretr *
 217 plane *