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

   1 ||| create land
   2 | harbor 2% and 0%
   3 desi -6:8,0 h
   4 desi 1:9,1 h
   5 desi -3,-1:1 h
   6 edit l -6:8,-1:0 e 2 ?des=h
   7 | city 2% and 0%
   8 desi 0:9,4:5 c
   9 edit l 0:8,4 e 2
  10 | highway 100%
  11 desi 1:9,3 +
  12 edit l 0:8,-2 e 100 m 60
  13 | populate
  14 give c * ?des#. 100
  15 give m * ?des#. 100
  16 give f * ?des#. 100
  17 give s * ?des#. 1
  18 give g * ?des#. 1
  19 give i * ?des#. 9950
  20 give l * ?des#. 9950
  21 give b * ?des#. 20
  22 give r * ?des#. 200
  23 |
  24 ||| countries, each one gets one of each sector
  25 || #1
  26 add 1 1 1 p
  27 edit c 1 c 0,4 s 4 b 640 M 25000 T 100
  28 edit l -6:1,0:5 o 1 O 1 ?des#.
  29 | occupied sector (old owner is allied)
  30 edit l -2,0 O 2
  31 edit l -3,-1 o 2 O 1
  32 || #2
  33 add 2 2 2 p
  34 edit c 2 c 2,4 s 4 b 640 M 25000 T 100
  35 edit l 2:3,0:5 o 2 O 2
  36 || #3
  37 add 3 3 3 p
  38 edit c 3 c 4,4 s 4 b 640 M 25000 T 100
  39 edit l 4:5,0:5 o 3 O 3
  40 || #4
  41 add 4 4 4 p
  42 edit c 4 c 6,4 s 4 b 640 M 25000 T 100
  43 edit l 6:7,0:5 o 4 O 4
  44 || #5
  45 add 5 5 5 g
  46 | the following is to simplify building; owner will be reset to 0 later
  47 edit l 8:9,0:5 o 5 O 5
  48 || relations
  49 decl a 1 2
  50 decl a 2 1
  51 decl f 1 3
  52 decl f 3 1
  53 |
  54 ||| ships
  55 | all belong to #1 unless stated otherwise
  56 | ls#0/.../24: in each of the 25 different land sectors, fleet a
  57 | fb#25/.../34: in each of the 10 different cities, fleet a
  58 | fleet will be assigned later
  59 build s 0:9,0:5 ?des#. ls
  60 build s 0:9,4:5 fb
  61 | cs#80/81/82: in -6:-2,0, have 10c 101l 10h
  62 edit s 0 U 80 t cs L -2,0 c 10 l 101 h 10 U 81 L -4,0 U 82 L -6,0
  63 | cs#85/86/87: allied and ally is h's old-owner, allied in old-owned h, in
  64 | allied occupied h and old-owner matches ship owner
  65 edit s 0 U 85 t cs L -2,0 c 10 O 2 U 86 L -4,0 U 87 L -3,-1 O 1
  66 | ls#90/92/93/94: in #1's harbor, owned by #0/2/3/4, have 6m, fleet b
  67 edit s 0 U 90 F b m 6 O 0 U 92 O 2 U 93 O 3 U 94 O 4
  68 | ls#95: at sea, has 6m, fleet b
  69 edit s 90 U 95 L 1,-1 O 1
  70 | cal#100/mb#101/cs#105: ships loading planes
  71 | #100 capability plane, #101 capability miss, #105 full (done below)
  72 edit s 0 U 100 L -2,0 t cal U 101 t mb U 105 t cs
  73 | frg#110/sb#111/cs#112/sbc#113/cs#115: ships loading lands
  74 | #110 surface, #111 sub, #112 surface supply, #113 sub supply, #115 full
  75 edit s 100 U 110 t frg U 111 t sb U 112 t cs U 113 t sbc U 115 t cs
  76 | cs#150/.../154: tenders in 1,-1, have 20c 20m 20u 20f 7s 42g, fleet t
  77 | fleet will be assigned later
  78 edit s 0 U 150 L 1,-1 t cs c 20 m 20 u 20 f 20 s 7 g 42 U 151 U 152 U 153 U 154
  79 | cs#160/162/163/164: tenders owned by #0/2/3/4 in 0,-2,
  80 | have 20c 20m 20u 20f 7s 42g, fleet u
  81 edit s 150 U 160 L 0,-2 F u O 0 U 162 O 2 U 163 O 3 U 164 O 4
  82 | ls#165: another tender in 1,-1
  83 edit s 150 U 165 t ls
  84 | cs#166: another tender in 0,-2, have 20c 20m 20u 20f 7s 42g
  85 edit s 150 U 166 L 0,-2
  86 | frg#170/sb#171/cs#172/sbc#173/cs#175: ships receiving lands from tenders
  87 edit s 150 U 170 L 1,-1 t frg U 171 t sb U 172 t cs U 173 t sbc U 175 t cs
  88 | cs#200/201: ltender, have 20c 20m 20u 20f 7s 42g, fleet T
  89 edit s 150 U 200 F T U 201
  90 | cs#212: ltender, owned by #2, have 20c 20m 20u 20f 7s 42g
  91 edit s 200 U 212 O 2
  92 | assign #0/.../34 to fleet a, give 6m, fix up owner
  93 edit s * F a m 6 O 1 ?uid<35
  94 | assign #150/.../154 to fleet t
  95 edit s 150/151/152/153/154 F t
  96 |
  97 ||| land units
  98 | all belong to #1 unless stated otherwise
  99 | linf#0/.../24: next to fleet a, army A
 100 | army will be assigned later
 101 build l 0:9,0:5 ?des#. linf
 102 | linf#25/.../29: next to fleet a in 2% h, owned by sector owner, army A
 103 build l 0:8,0 linf
 104 edit u 25/26/27/28/29 a A
 105 | linf#30/.../34: next to army a, army C
 106 build l 0:8,0 ?des#. linf
 107 edit u 30/31/32/33/34 a C O 1
 108 | linf#35/.../39: next to army a, owned by sector owner, army C
 109 build l 0:8,0 linf
 110 edit u 35/36/37/38/39 a C
 111 | filler to make build give me #50 next, will be undone later
 112 edit u 40 O 5 U 41 U 42 U 43 U 44 U 45 U 46 U 47 U 48 U 49
 113 | tra#50/.../54: in each of the 5 different harbors, army a
 114 build l 0:8,0 tra
 115 edit u 50/51/52/53/54 a a m 6 O 1
 116 | sup#80/81/82 have 101i 10h in -6:-2,0
 117 edit u 0 U 80 T sup L -2,0 i 101 h 10 U 81 L -4,0 U 82 L -6,0
 118 | tra#90/92/93/94: in #1's harbor, owned by #0/2/3/4, have 6m, army b
 119 edit u 50 U 90 a b m 6 O 0 U 92 O 2 U 93 O 3 U 94 O 4
 120 | rad#100/105: lands loading planes, #100 empty, #101 full (done below)
 121 edit u 0 U 100 L -2,0 T rad U 105
 122 | tra#110/115: lands loading lands, #110 empty, #115 full (done below)
 123 edit u 0 U 110 L -2,0 T tra U 115
 124 | rad#120/.../133: riding cs#115 and tra#115
 125 edit u 0 U 120 T rad S 115 U 121 U 122 Y 115 U 123 U 124 U 125 U 126 U 127 U 128 U 129 U 130 U 131 U 132 U 133
 126 | linf#140/.../143: light
 127 edit u 0 U 140 L -2,0 U 141 U 142 U 143
 128 | hat#150/151/152: neither light nor heavy
 129 edit u 140 U 150 T hat U 151 U 152
 130 | tra#160: heavy
 131 edit u 140 U 160 T tra
 132 | #170/.../174: spies
 133 edit u 140 U 170 T spy U 171 U 172 U 172 U 173 U 174
 134 | linf#180/.../204: riding fleet a, have 6m, army B
 135 edit u 0 U 180 a B m 6 S 0 U 181 S 1 U 182 S 2 U 183 S 3 U 184 S 4 U 185 S 5 U 186 S 6 U 187 S 7 U 188 S 8 U 189 S 9 U 190 S 10 U 191 S 11 U 192 S 12 U 193 S 13 U 194 S 14 U 195 S 15 U 196 S 16 U 197 S 17 U 198 S 18 U 199 S 19 U 200 S 20 U 201 S 21 U 202 S 22 U 203 S 23 U 204 S 24
 136 | linf#210/212/213/214: next to fleet b
 137 edit u 0 U 210 U 212 U 213 U 214
 138 | linf#222/223/224/225: riding fleet b, owned by ride's owner, have 6m, army B
 139 | (lnd_prewrite() doesn't let us put a rider on unowned #90)
 140 edit u 0 U 225 a B m 6 S 95 U 222 O 2 S 92 U 223 O 3 S 93 U 224 O 4 S 94
 141 | linf#230/.../234: riding army a, have 6m army D
 142 edit u 0 U 230 a D m 6 Y 50 U 231 Y 51 U 232 Y 52 U 233 Y 53 U 234 Y 54
 143 | linf#240/242/243/244: next to army b
 144 edit u 0 U 240 U 242 U 243 U 244
 145 | linf#252/253/254: riding army b, owned by ride's owner, have 6m, army D
 146 | (lnd_prewrite() doesn't let us put a rider on unowned #90)
 147 edit u 0 U 252 a D m 6 O 2 Y 92 U 253 O 3 Y 93 U 254 O 4 Y 94
 148 | sup#300/linf#/301/302/303/hat#304: tended lands riding fleet t, army t
 149 edit u 80 U 300 a t S 150 U 301 T linf S 151 U 302 S 152 U 303 S 153 U 304 T hat S 154
 150 | linf#312/313/314: tended lands riding fleet u, owned by ride's
 151 | (lnd_prewrite() doesn't let us put a rider on unowned #160)
 152 | owner, army u
 153 edit u 301 U 312 a u O 2 S 162 U 313 O 3 S 163 U 314 O 4 S 164
 154 | linf#315/.../317, tended lands riding ls#165
 155 edit u 0 U 315 S 165 U 316 U 317
 156 | spy#320/321/323, tended spies riding ls#165, army s
 157 edit u 315 U 320 T spy a s U 321 U 322
 158 | linf#330/331, tended lands riding cs#166
 159 edit u 315 U 330 S 166 U 331
 160 | sup#350/351/352: ltended lands, have 25m 101i 10h, riding fleet T
 161 edit u 0 U 350 T sup m 25 S 200 U 351 U 352 S 201
 162 | assign #0/.../24 to army A, give 6m, fix up owner
 163 edit u * a A m 6 O 1 ?uid<25
 164 |
 165 |||| planes
 166 | all belong to #1 unless stated otherwise
 167 | sam#0/.../24: next to fleet a, wing A
 168 | wing will be assigned later
 169 build p 0:9,0:5 ?des#. sam
 170 | sam#25/.../29: next to fleet a in 2% h, owned by sector owner, wing A
 171 build p 0:8,0:0 ?des#. sam
 172 edit p 25/26/27/28/29 w A
 173 | sam#30/.../34: next to army a, wing C
 174 build p 0:8,0 sam
 175 edit p 30/31/32/33/34 w C O 1
 176 | sam#35/.../39: next to army a, owned by sector owner, wing C
 177 build p 0:8,0 sam
 178 edit p 35/36/37/38/39 w C
 179 | sam#40/.../59, #57 on ship#105, #58 on land#105, #59 hardened, rest wing E
 180 build p -2,0 sam 20 200 y
 181 edit p * w E ?uid>39&uid<57
 182 edit p 57 s 105
 183 edit p 58 y 105
 184 edit p 59 F 1
 185 | nc#60/.../89: helo, wing K
 186 build p -2,0 nc 30 200 y
 187 edit p * ?uid>59&eff>0 w K
 188 | mi#90/.../109: light missile, wing M
 189 build p -2,0 mi 20 200 y
 190 edit p * ?uid>89&eff>0 w M
 191 | f2#110/.../139: light fixed-wing, wing F
 192 build p -2,0 f2 30 200 y
 193 edit p * ?uid>109&eff>0 w F
 194 | zep#140: non-light
 195 edit p 0 U 140 l -2,0 T zep w
 196 | sam#150/.../174: riding fleet a, wing B
 197 edit p 0 U 150 w B s 0 U 151 s 1 U 152 s 2 U 153 s 3 U 154 s 4 U 155 s 5 U 156 s 6 U 157 s 7 U 158 s 8 U 159 s 9 U 160 s 10 U 161 s 11 U 162 s 12 U 163 s 13 U 164 s 14 U 165 s 15 U 166 s 16 U 167 s 17 U 168 s 18 U 169 s 19 U 170 s 20 U 171 s 21 U 172 s 22 U 173 s 23 U 174 s 24
 198 | sam#180/182/183/184: next to fleet b
 199 edit p 0 U 180 U 182 U 183 U 184
 200 | sam#192/193/194/195: riding fleet b, owned by ride's owner, wing B
 201 | (pln_prewrite() doesn't let us put a rider on unowned #90)
 202 edit p 0 U 192 w B O 2 s 92 U 193 O 3 s 93 U 194 O 4 s 94 U 195 s 95
 203 | sam#200/.../204: riding army a, wing D
 204 edit p 0 U 200 w D y 50 U 201 y 51 U 202 y 52 U 203 y 53 U 204 y 54
 205 | sam#210/212/213/214: next to army b
 206 edit p 0 U 210 U 212 U 213 U 214
 207 | sam#222/223/224: riding army b, owned by ride's owner, wing D
 208 | (pln_prewrite() doesn't let us put a rider on unowned #90)
 209 edit p 0 U 222 w D O 2 y 92 U 223 O 3 y 93 U 224 O 4 y 94
 210 | sam#230/231: riding rad#120 and next to rad#121, both riding cs#115
 211 edit p 0 U 231 l -2,0 U 230 y 120
 212 | sam#232/233: riding rad#122 and next to rad#120, both riding tra#115
 213 edit p 231 U 233 U 232 y 122
 214 | assign #0/.../24 to wing A, fix up owner
 215 edit p * w A O 1 ?uid<25
 216 |
 217 ||| finishing touches
 218 edit s * E 100 M 90 ?eff>0
 219 edit u * e 100 M 60 ?eff>0
 220 edit p * e 100 m 60 ?eff>0
 221 edit l * ?own=5 o 0 O 0
 222 edit s * ?own=5 O 0
 223 edit u * ?own=5 O 0
 224 edit p * ?own=5 O 0
 225 |
 226 ||| show initial state here to help maintainers
 227 map *
 228 cens * ?des#.
 229 comm * ?des#.
 230 ship *
 231 carg *
 232 land *
 233 lcarg *
 234 plan *