File: tank.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 (37 lines) | stat: -rw-r--r-- 679 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
 
(game-module "tank"
  (title "Tank")
  (blurb "Simple tank battles")
  (variants
    (see-all false)
    (world-seen false)
    (world-size (20 20 10000))
	)
  )

(terrain-type plains (image-name "green") (char "+"))
(terrain-type hills (image-name "brown") (char "^"))

(unit-type tank (image-name "tank") (char "T")
  (start-with 1)
  (acp-per-turn 2)
  (hp-max 10)
  )

(table hit-chance
  (tank tank 100)
  )

(table damage
  (tank tank 1d4)
  )

(add tank vision-range 6)

(add t* occurrence (50 1))

(set synthesis-methods '(make-random-terrain make-countries))

;;; Don't want the world to wrap around.

;(world 10000) ; causes a warning, unclear if justified warning...