File: cond.g

package info (click to toggle)
xconq 7.1.0-7
  • links: PTS
  • area: main
  • in suites: hamm
  • size: 7,056 kB
  • ctags: 7,960
  • sloc: ansic: 88,493; perl: 2,057; sh: 1,766; makefile: 1,110; csh: 81; awk: 47; lisp: 39
file content (54 lines) | stat: -rw-r--r-- 516 bytes parent folder | download | duplicates (3) 
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
 
;;; Start with the simple game in the library.

;;; (should add a variant that controls the condition)

(include "simple")

(if 1 x)

(unit-type dragon)

(end-if x)

(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+"
))

(set see-all true)

(side 1)

(human 10 10 1)

(if 0 xxx)

(human 11 11 1)

(else xxx)

(dragon 11 11 1)

(end-if xxx)

(human 11 12 1)