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