const long message;
}} action_t;
+typedef struct {{
+ const string_group_t words;
+ const char* message;
+}} special_t;
+
typedef struct {{
const long motion;
+ const long cond;
const long dest;
+ const bool nodwarves;
const bool stop;
}} travelop_t;
* inherited from FORTRAN, someday. To understand these, read the
* encoding description for travel.
*/
-#define T_DESTINATION(entry) MOD((entry).dest, 1000)
-#define T_CONDITION(entry) ((entry).dest / 1000)
-#define T_NODWARVES(entry) (T_CONDITION(entry) == 100)
-#define T_HIGH(entry) ((entry).dest)
#define T_TERMINATE(entry) ((entry).motion == 1)
#define L_SPEAK(loc) ((loc) - 500)
extern long conditions[];
extern const motion_t motions[];
extern const action_t actions[];
-extern const action_t specials[];
+extern const special_t specials[];
extern const travelop_t travel[];
extern const long tkey[];
+extern const char *ignore;
#define NLOCATIONS {}
#define NOBJECTS {}
{}
}};
-const action_t specials[] = {{
+const special_t specials[] = {{
{}
}};
-{}
+const long tkey[] = {{{}}};
const travelop_t travel[] = {{
{}
}};
+const char *ignore = \"{}\";
+
/* end */
"""
else:
words_str = get_string_group(contents["words"])
mot_str += template.format(words_str)
+ global ignore
+ if contents.get("oldstyle", True) == False:
+ for word in contents["words"]:
+ if len(word) == 1:
+ ignore += word.upper()
return mot_str
def get_actions(actions):
message = contents["message"]
act_str += template.format(words_str, message)
+ global ignore
+ if contents.get("oldstyle", True) == False:
+ for word in contents["words"]:
+ if len(word) == 1:
+ ignore += word.upper()
act_str = act_str[:-1] # trim trailing newline
return act_str
+def get_specials(specials):
+ template = """ {{
+ .words = {},
+ .message = {},
+ }},
+"""
+ spc_str = ""
+ for special in specials:
+ contents = special[1]
+
+ if contents["words"] == None:
+ words_str = get_string_group([])
+ else:
+ words_str = get_string_group(contents["words"])
+
+ if contents["message"] == None:
+ message = "NULL"
+ else:
+ message = make_c_string(contents["message"])
+
+ spc_str += template.format(words_str, message)
+ global ignore
+ if contents.get("oldstyle", True) == False:
+ for word in contents["words"]:
+ if len(word) == 1:
+ ignore += word.upper()
+ spc_str = spc_str[:-1] # trim trailing newline
+ return spc_str
+
def bigdump(arr):
out = ""
for (i, entry) in enumerate(arr):
if out and out[-1] == ' ':
out = out[:-1]
out += "\n "
- out += str(arr[i]) + ", "
+ out += str(arr[i]).lower() + ", "
out = out[:-2] + "\n"
return out
raise ValueError
def cencode(cond, name):
if cond is None:
- return 0;
+ return 0
+ elif cond == ["nodwarves"]:
+ return 100
elif cond[0] == "pct":
return cond[1]
elif cond[0] == "carry":
sys.stderr.write("dungeon: unknown object name %s in with clause of \n" % (cond[1], name))
sys.exit(1)
elif cond[0] == "not":
- # FIXME: Allow named as well as numbered states
try:
obj = objnames.index(cond[1])
if type(cond[2]) == int:
#
# In order to de-crypticize the runtime code, we're going to break these
# magic numbers up into a struct.
- travel = [[0, 0, False]]
+ travel = [[0, 0, 0, False, False]]
tkey = [0]
oldloc = 0
while ltravel:
tkey.append(len(travel))
oldloc = loc
elif travel:
- travel[-1][2] = not travel[-1][2]
+ travel[-1][-1] = not travel[-1][-1]
while rule:
- travel.append([rule.pop(0), newloc, False])
- travel[-1][2] = True
+ cond = newloc // 1000
+ travel.append([rule.pop(0),
+ cond,
+ newloc % 1000,
+ cond==100,
+ False])
+ travel[-1][-1] = True
return (travel, tkey)
def get_travel(travel):
template = """ {{
.motion = {},
+ .cond = {},
.dest = {},
+ .nodwarves = {},
.stop = {},
}},
"""
out = ""
for entry in travel:
- out += template.format(entry[0], entry[1], entry[2]).lower()
+ out += template.format(*entry).lower()
out = out[:-1] # trim trailing newline
return out
(travel, tkey) = buildtravel(db["locations"],
db["objects"])
-
+ ignore = ""
c = c_template.format(
h_name,
get_arbitrary_messages(db["arbitrary_messages"]),
get_condbits(db["locations"]),
get_motions(db["motions"]),
get_actions(db["actions"]),
- get_actions(db["specials"]),
- "const long tkey[] = {%s};" % bigdump(tkey),
+ get_specials(db["specials"]),
+ bigdump(tkey),
get_travel(travel),
+ ignore,
)
h = h_template.format(