File: duel.g

package info (click to toggle)
xconq 7.2.2-2
  • links: PTS
  • area: main
  • in suites: slink
  • size: 8,296 kB
  • ctags: 9,199
  • sloc: ansic: 107,849; sh: 2,108; perl: 2,057; makefile: 1,177; sed: 161; csh: 50; awk: 49; lisp: 39
file content (54 lines) | stat: -rw-r--r-- 705 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
 
(game-module "duel"
  (title "The Duel")
  (blurb "Tanks, one-on-one.")
  (base-module "tank")
  (variants
   (see-all true)
   (sequential true)
   ("More Tanks" more (true (add u* start-with 1)))
   ) 
)

(area 20 20)

(area (terrain (by-name "+" plains)
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
  "20+"
))

;; Limit to two players only.

(set sides-min 2)
(set sides-max 2)

;; Two sides, no special properties needed (?).

(side 1)

(side 2)

;; Two tanks, one for each side, at predetermined locations.

(tank 10  7 1)

(tank 10 13 2)

(scorekeeper (when after-event) (do last-side-wins))