blob: 386d0defd15fffa56d555e27761a2429acfb67c7 (
plain)
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
55
56
57
58
59
60
61
|
(fate_version 1)
(require type/character.fate)
(declare_variable local character oscar)
(declare_variable local character carla)
(declare_variable local character simon)
(declare_variable local character julie)
(declare_variable local character statue)
(require include/locations.fate)
(set_fields
(name Oscar)
(agility 50)
(perception 50)
(money 20)
(location room0)
(variable oscar)
)
(set_fields
(name Carla)
(agility 75)
(perception 35)
(money 7)
(location room1)
(variable carla)
)
(set_fields
(name Simon)
(agility 35)
(perception 75)
(money 80)
(location room1)
(variable simon)
)
(set_fields
(name Julie)
(agility 60)
(perception 60)
(money 90)
(location room2)
(variable julie)
)
(set_fields
(name ( A oddly human shaped statue, with clothes adorned ))
(agility 0)
(perception 0)
(money 30)
(location corridor)
(variable statue)
)
;; Alright, but we clearly need to be able to point to variables using a type.
;; like (pointer (variable carla)) -> pointer to variable of type character
;; (a string, really) resolves to (variable carla), but allows characters to be
;; put in a set, for example.
|