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