X-Git-Url: https://plomlompom.com/repos/?a=blobdiff_plain;f=plugins%2Fserver%2FTheCrawlingEater.py;h=b456ee7af45a53f71e46f714cad04291da284c01;hb=7efda459942e6180a2767069b07f9af1fa8bb8ec;hp=867f05c0f3b7f5cb940e9fb63f06e3acdb86caaf;hpb=fa6fec4689b183dc3a4c1528ced578e4fcd6348c;p=plomrogue diff --git a/plugins/server/TheCrawlingEater.py b/plugins/server/TheCrawlingEater.py index 867f05c..b456ee7 100644 --- a/plugins/server/TheCrawlingEater.py +++ b/plugins/server/TheCrawlingEater.py @@ -6,36 +6,139 @@ from server.config.world_data import world_db +def command_help(str_int): + val = integer_test(str_int, 0, 9) + if None != val: + if val == 0: + log(" ") + log("[HELP SCREEN 0: help screen list]") + log("0 - this screen") + log("1 - key bindings") + log("2 - environment 1/3") + log("3 - environment 2/3") + log("4 - environment 3/3") + log("5 - other beings") + log("6 - winning") + log("7 - restart and replay") + log("For more, see ./README or ./README_TCE files.") + pass + elif val == 1: + log(" ") + log("[HELP SCREEN 1: key bindings]") + log("movement/eating: w/e/d/c/x/s") + log("drink: i") + log("defecate: o") + log("pee: p") + log("autopilot: A") + log("look mode: l") + log("quit: Q") + log("help screens: 1/2/3/4/5/6/7/8/9") + log("help overview: 0") + elif val == 2: + log(" ") + log("[HELP SCREEN 2: environment 1/3]") + log("There is mostly solid matter and fluid. " + "'_', '.', ':' are ground, '%', '#', 'X' are walls. " + "Less thick ones can be eaten." + "Background color indicates fluid concentration. " + "'O'/'0' is holes; stepping into them is dangerous." + "'-' and '+' are cracks in the ground, and may becomes holes. " + "'$' is special places that will change you. " + "Learn more in HELP SCREEN 3." + ) + elif val == 3: + log(" ") + log("[HELP SCREEN 3: environment 2/3]") + log("Use the 'l' command to investigate the environment. " + "Its cursor will describe the area pointed at by two numbers: " + "ground elevation/matter thickness (left), wetness (right). " + "You cannot breathe there if the sum of both is > 5. " + "Greater ground elevation means slower movement." + ) + elif val == 4: + log(" ") + log("[HELP SCREEN 4: environment 3/3]") + log("Waste will pile up to ground matter an walls. " + "Fluid will trickle down into the environment. " + "General humidity will sparkle up new fluid on the ground " + "level ('_'). " + "Only from there can you drink fluid. " + "Much fluid on a ground level tile creates potential for " + "cracks to appear there. They may be sealed with waste." + ) + elif val == 5: + log(" ") + log("[HELP SCREEN 5: other beings]") + log(" '?' on the memory map indicate sounds of movement. " + "You may encounter the sources. They appear as the general " + "humidity of the environment grows, grown from its fluids and " + "earth. " + ) + elif val == 6: + log(" ") + log("[HELP SCREEN 6: winning]") + log("Find '$' tiles. Don't dump waste and fluids on fields with " + "great elevation and wetness sums. Control ground wetness " + "by providing great or small ground space for fluid sparkling " + "up to concentrate in. " + "A special kind of hole will only evolve from a 'O' hole that " + "is surrounded by six other holes." + ) + elif val == 7: + log(" ") + log("[HELP SCREEN 7: restart and replay]") + log("You can restart in a new game world by running " + "./roguelike -n. You can replay a record of your current game" + " by running ./roguelike -s." + "See file ./README for more details." + ) + else: + log(" ") + log("No HELP SCREEN defined for this number.") + log(" ") + + +def command_ai(): + if not (world_db["WORLD_ACTIVE"] + and world_db["Things"][0]["T_LIFEPOINTS"] > 0): + return + world_db["ai"](world_db["Things"][0]) + world_db["turn_over"]() + + def play_drink(): - if action_exists("drink") and world_db["WORLD_ACTIVE"]: - pos = world_db["Things"][0]["pos"] - if not (chr(world_db["MAP"][pos]) == "0" - and world_db["wetmap"][pos] > ord("0")): - log("NOTHING to drink here.") - return - elif world_db["Things"][0]["T_BLADDER"] >= 32: - log("You're too FULL to drink more.") - return - world_db["set_command"]("drink") + if not (action_exists("drink") and world_db["WORLD_ACTIVE"] + and world_db["Things"][0]["T_LIFEPOINTS"] > 0): + return + pos = world_db["Things"][0]["pos"] + if not (chr(world_db["MAP"][pos]) in "0-+" + and world_db["wetmap"][pos] > ord("0")): + log("NOTHING to drink here.") + return + elif world_db["Things"][0]["T_KIDNEY"] >= 32: + log("You're too FULL to drink more.") + return + world_db["set_command"]("drink") def actor_drink(t): - pos = world_db["Things"][0]["pos"] - if chr(world_db["MAP"][pos]) == "0" and \ - world_db["wetmap"][pos] > ord("0") and t["T_BLADDER"] < 32: - log("You DRINK.") - t["T_BLADDER"] += 1 + pos = t["pos"] + if chr(world_db["MAP"][pos]) in "0-+" and \ + world_db["wetmap"][pos] > ord("0") and t["T_KIDNEY"] < 32: + if world_db["Things"][0] == t: + log("You DRINK.") + t["T_KIDNEY"] += 1 world_db["wetmap"][pos] -= 1 - if world_db["wetmap"][pos] == ord("0"): - world_db["MAP"][pos] = ord("0") def play_pee(): - if action_exists("pee") and world_db["WORLD_ACTIVE"]: - if world_db["Things"][0]["T_BLADDER"] < 1: - log("Nothing to drop from empty bladder.") - return - world_db["set_command"]("pee") + if not (action_exists("pee") and world_db["WORLD_ACTIVE"] + and world_db["Things"][0]["T_LIFEPOINTS"] > 0): + return + if world_db["Things"][0]["T_BLADDER"] < 1: + log("NOTHING to drop from empty bladder.") + return + world_db["set_command"]("pee") def actor_pee(t): @@ -43,18 +146,21 @@ def actor_pee(t): return if t == world_db["Things"][0]: log("You LOSE fluid.") - if not world_db["catch_air"](t): + if not world_db["test_air"](t): return t["T_BLADDER"] -= 1 - world_db["wetmap"][t["pos"]] += 1 + if chr(world_db["MAP"][t["pos"]]) not in "*&": + world_db["wetmap"][t["pos"]] += 1 def play_drop(): - if action_exists("drop") and world_db["WORLD_ACTIVE"]: - if world_db["Things"][0]["T_BOWEL"] < 1: - log("Nothing to drop from empty bowel.") - return - world_db["set_command"]("drop") + if not (action_exists("drop") and world_db["WORLD_ACTIVE"] + and world_db["Things"][0]["T_LIFEPOINTS"] > 0): + return + if world_db["Things"][0]["T_BOWEL"] < 1: + log("NOTHING to drop from empty bowel.") + return + world_db["set_command"]("drop") def actor_drop(t): @@ -62,108 +168,235 @@ def actor_drop(t): return if t == world_db["Things"][0]: log("You DROP waste.") - if not world_db["catch_air"](t): + if not world_db["test_air"](t): return - world_db["MAP"][t["pos"]] += 1 + if world_db["MAP"][t["pos"]] == ord("+"): + world_db["MAP"][t["pos"]] = ord("-") + elif world_db["MAP"][t["pos"]] == ord("-"): + world_db["MAP"][t["pos"]] = ord("0") + elif chr(world_db["MAP"][t["pos"]]) not in "*&": + world_db["MAP"][t["pos"]] += 1 t["T_BOWEL"] -= 1 def play_move(str_arg): - """Try "move" as player's T_COMMAND, str_arg as T_ARGUMENT / direction.""" - if action_exists("move") and world_db["WORLD_ACTIVE"]: - from server.config.world_data import directions_db, symbols_passable - t = world_db["Things"][0] - if not str_arg in directions_db: - print("Illegal move direction string.") - return - d = ord(directions_db[str_arg]) - from server.utils import mv_yx_in_dir_legal - move_result = mv_yx_in_dir_legal(chr(d), t["T_POSY"], t["T_POSX"]) - if 1 == move_result[0]: - pos = (move_result[1] * world_db["MAP_LENGTH"]) + move_result[2] - if chr(world_db["MAP"][pos]) in "34": - if t["T_BOWEL"] >= 32: - if t == world_db["Things"][0]: - log("You're too FULL to eat.") - return - world_db["Things"][0]["T_ARGUMENT"] = d - world_db["set_command"]("move") + if not (action_exists("move") and world_db["WORLD_ACTIVE"] + and world_db["Things"][0]["T_LIFEPOINTS"] > 0): + return + from server.config.world_data import directions_db, symbols_passable + t = world_db["Things"][0] + if not str_arg in directions_db: + print("Illegal move direction string.") + return + d = ord(directions_db[str_arg]) + from server.utils import mv_yx_in_dir_legal + move_result = mv_yx_in_dir_legal(chr(d), t["T_POSY"], t["T_POSX"]) + if 1 == move_result[0]: + pos = (move_result[1] * world_db["MAP_LENGTH"]) + move_result[2] + hitted = [tid for tid in world_db["Things"] + if world_db["Things"][tid]["T_POSY"] == move_result[1] + if world_db["Things"][tid]["T_POSX"] == move_result[2]] + if len(hitted) > 0: + if t["T_STOMACH"] >= 32 and t["T_KIDNEY"] >= 32: + if t == world_db["Things"][0]: + log("You're too FULL to suck resources from another creature.") return - if chr(world_db["MAP"][pos]) in symbols_passable: - world_db["Things"][0]["T_ARGUMENT"] = d - world_db["set_command"]("move") + world_db["Things"][0]["T_ARGUMENT"] = d + world_db["set_command"]("eat") + return + legal_targets = "34" + if world_db["GRACE"] >= 8: + legal_targets += "5" + if chr(world_db["MAP"][pos]) in legal_targets: + if t["T_STOMACH"] >= 32: + if t == world_db["Things"][0]: + log("You're too FULL to eat.") return - log("You CAN'T eat your way through there.") + world_db["Things"][0]["T_ARGUMENT"] = d + world_db["set_command"]("eat") + return + if chr(world_db["MAP"][pos]) in symbols_passable: + world_db["Things"][0]["T_ARGUMENT"] = d + world_db["set_command"]("move") + return + log("You CAN'T eat your way through there.") + + +def suck_out_creature(t, tid): + if t == None: + t = world_db["Things"][tid] + elif tid == None: + tid = next(tid for tid in world_db["Things"] + if world_db["Things"][tid] == t) + room_stomach = 32 - world_db["Things"][0]["T_STOMACH"] + room_kidney = 32 - world_db["Things"][0]["T_KIDNEY"] + if t["T_STOMACH"] > room_stomach: + t["T_STOMACH"] -= room_stomach + world_db["Things"][0]["T_STOMACH"] = 32 + else: + world_db["Things"][0]["T_STOMACH"] + t["T_STOMACH"] + t["T_STOMACH"] = 0 + if t["T_KIDNEY"] > room_stomach: + t["T_KIDNEY"] -= room_stomach + world_db["Things"][0]["T_KIDNEY"] = 32 + else: + world_db["Things"][0]["T_KIDNEY"] + t["T_KIDNEY"] + t["T_KIDNEY"] = 0 + hitted_name = world_db["ThingTypes"][t["T_TYPE"]]["TT_NAME"] + log("You SUCK EVERYTHING from " + hitted_name + ", killing them.") + world_db["die"](t, "FOO") +world_db["suck_out_creature"] = suck_out_creature + + +def actor_eat(t): + from server.utils import mv_yx_in_dir_legal, rand + from server.config.world_data import symbols_passable + passable = False + move_result = mv_yx_in_dir_legal(chr(t["T_ARGUMENT"]), + t["T_POSY"], t["T_POSX"]) + if 1 == move_result[0]: + pos = (move_result[1] * world_db["MAP_LENGTH"]) + move_result[2] + hitted = [tid for tid in world_db["Things"] + if world_db["Things"][tid]["T_POSY"] == move_result[1] + if world_db["Things"][tid]["T_POSX"] == move_result[2]] + if len(hitted): + hit_id = hitted[0] + hitted_tid = world_db["Things"][hit_id]["T_TYPE"] + if t == world_db["Things"][0]: + if world_db["GRACE"] >= 16: + world_db["suck_out_creature"](None, hit_id) + return + hitted_name = world_db["ThingTypes"][hitted_tid]["TT_NAME"] + log("You SUCK resources from " + hitted_name + ".") + elif 0 == hit_id: + if world_db["GRACE"] >= 16: + world_db["suck_out_creature"](t, None) + return + hitter_name = world_db["ThingTypes"][t["T_TYPE"]]["TT_NAME"] + log(hitter_name +" SUCKS resources from you.") + hitted = world_db["Things"][hit_id] + if t["T_STOMACH"] < 32: + t["T_STOMACH"] = t["T_STOMACH"] + 1 + hitted["T_STOMACH"] -= 1 + if t["T_KIDNEY"] < 32: + t["T_KIDNEY"] = t["T_KIDNEY"] + 1 + hitted["T_KIDNEY"] -= 1 + return + passable = chr(world_db["MAP"][pos]) in symbols_passable + if passable and t == world_db["Things"][0]: + log("You try to EAT, but fail.") + else: + height = world_db["MAP"][pos] - ord("0") + if t["T_STOMACH"] >= 32: + return + if height == 5 and not \ + (t == world_db["Things"][0] and world_db["GRACE"] >= 8): + return + t["T_STOMACH"] += 1 + if t == world_db["Things"][0]: + log("You EAT.") + eaten = (height == 3 and 0 == int(rand.next() % 2)) or \ + (height == 4 and 0 == int(rand.next() % 5)) or \ + (height == 5 and 0 == int(rand.next() % 10)) + if eaten: + world_db["MAP"][pos] = ord("0") + if t["T_STOMACH"] > 32: + t["T_STOMACH"] = 32 def actor_move(t): from server.build_fov_map import build_fov_map from server.utils import mv_yx_in_dir_legal, rand - from server.config.world_data import directions_db, symbols_passable + from server.config.world_data import symbols_passable passable = False move_result = mv_yx_in_dir_legal(chr(t["T_ARGUMENT"]), t["T_POSY"], t["T_POSX"]) if 1 == move_result[0]: pos = (move_result[1] * world_db["MAP_LENGTH"]) + move_result[2] hitted = [tid for tid in world_db["Things"] - if world_db["Things"][tid] != t - if world_db["Things"][tid]["T_LIFEPOINTS"] if world_db["Things"][tid]["T_POSY"] == move_result[1] if world_db["Things"][tid]["T_POSX"] == move_result[2]] if len(hitted): hit_id = hitted[0] hitted_tid = world_db["Things"][hit_id]["T_TYPE"] if t == world_db["Things"][0]: + if world_db["GRACE"] >= 16: + world_db["suck_out_creature"](None, hit_id) + return hitted_name = world_db["ThingTypes"][hitted_tid]["TT_NAME"] log("You BUMP into " + hitted_name + ".") elif 0 == hit_id: + if world_db["GRACE"] >= 16: + world_db["suck_out_creature"](t, None) + return hitter_name = world_db["ThingTypes"][t["T_TYPE"]]["TT_NAME"] log(hitter_name +" BUMPS into you.") return passable = chr(world_db["MAP"][pos]) in symbols_passable - direction = [direction for direction in directions_db - if directions_db[direction] == chr(t["T_ARGUMENT"])][0] if passable: t["T_POSY"] = move_result[1] t["T_POSX"] = move_result[2] t["pos"] = move_result[1] * world_db["MAP_LENGTH"] + move_result[2] - if world_db["MAP"][t["pos"]] == ord("-"): - world_db["die"](t, "You FALL in a hole, and die.") - return - build_fov_map(t) - else: - height = world_db["MAP"][pos] - ord("0") - if t["T_BOWEL"] >= 32 or height == 5: - return - eaten = False - if height == 3 and 0 == int(rand.next() % 2): - t["T_BOWEL"] += height - eaten = True - elif height == 4 and 0 == int(rand.next() % 5): - t["T_BOWEL"] += height - eaten = True - log("You EAT.") - if eaten: - world_db["MAP"][pos] = ord("0") - if t["T_BOWEL"] > 32: - t["T_BOWEL"] = 32 - + world_db["soundmap"][t["pos"]] = ord("9") + if t == world_db["Things"][0] and world_db["MAP"][t["pos"]] == ord("$"): + world_db["MAP"][t["pos"]] = ord("0") + log("You feel a strange AURA from this place.") + if world_db["GRACE"] == 0: + log("You can now eat ALL walls.") + elif world_db["GRACE"] == 8: + log("You now have a DEATH touch towards other creatures.") + elif world_db["GRACE"] == 16: + log("You can now LEVITATE over holes.") + elif world_db["GRACE"] == 24: + log("You are now READY to leave through a special hole.") + elif world_db["GRACE"] == 32: + log("You already have all the GRACE you can get.") + if world_db["GRACE"] <= 24: + world_db["GRACE"] += 8 + elif t == world_db["Things"][0]: + log("You try to MOVE there, but fail.") + + +def test_hole(t): + if t == world_db["Things"][0]: + if world_db["GRACE"] < 32 and world_db["MAP"][t["pos"]] == ord("&"): + log("You feel you need more GRACE to leave through this hole.") + elif world_db["GRACE"] >= 32 and world_db["MAP"][t["pos"]] == ord("&"): + world_db["die"](t, "You FLY through the hole, into your waking life." + "Good bye, and CONGRATULATIONS.") + return False + if world_db["GRACE"] >= 24: + return True + if chr(world_db["MAP"][t["pos"]]) in "*&": + world_db["die"](t, "You FALL into a hole, and die.") + return False + return True +world_db["test_hole"] = test_hole -def catch_air(t): - if (world_db["wetmap"][t["pos"]] - ord("0")) \ - + (world_db["MAP"][t["pos"]] - ord("0")) > 4: - world_db["die"](t, "You SUFFOCATE") +def test_air(t): + if world_db["terrain_fullness"](t["pos"]) > 5: + world_db["die"](t, "You SUFFOCATE.") return False return True -world_db["catch_air"] = catch_air +world_db["test_air"] = test_air def die(t, message): t["T_LIFEPOINTS"] = 0 if t == world_db["Things"][0]: t["fovmap"] = bytearray(b' ' * (world_db["MAP_LENGTH"] ** 2)) + t["T_MEMMAP"][t["pos"]] = ord("@") log(message) + else: + if world_db["MAP"][t["pos"]] != ord("$"): + world_db["MAP"][t["pos"]] = ord("5") + world_db["HUMILITY"] = t["T_KIDNEY"] + t["T_BLADDER"] + \ + (world_db["wetmap"][t["pos"]] - ord("0")) + world_db["wetmap"][t["pos"]] = 0 + tid = next(tid for tid in world_db["Things"] + if world_db["Things"][tid] == t) + del world_db["Things"][tid] world_db["die"] = die @@ -189,7 +422,7 @@ def make_map(): and ((not single_allowed) or is_neighbor((y, x), "0")): world_db["MAP"][pos] = ord("0") i_ground += 1 - n_water = int((length ** 2) / 64) + n_water = int((length ** 2) / 32) i_water = 0 while (i_water <= n_water): y, x, pos = new_pos() @@ -197,6 +430,13 @@ def make_map(): ord("0") == world_db["wetmap"][pos]: world_db["wetmap"][pos] = ord("3") i_water += 1 + n_altars = 8 + i_altars = 0 + while (i_altars < n_altars): + y, x, pos = new_pos() + if ord("0") == world_db["MAP"][pos]: + world_db["MAP"][pos] = ord("$") + i_altars += 1 def calc_effort(ta, t): @@ -206,8 +446,9 @@ def calc_effort(ta, t): t["T_POSY"], t["T_POSX"]) if 1 == move_result[0]: pos = (move_result[1] * world_db["MAP_LENGTH"]) + move_result[2] - narrowness = world_db["MAP"][pos] - ord("0") - return 2 ** narrowness + if chr(world_db["MAP"][pos]) in "012": + narrowness = world_db["MAP"][pos] - ord("0") + return 2 ** narrowness return 1 world_db["calc_effort"] = calc_effort @@ -219,78 +460,131 @@ def turn_over(): from server.io import try_worldstate_update from server.config.io import io_db from server.utils import rand + from server.build_fov_map import build_fov_map while world_db["Things"][0]["T_LIFEPOINTS"]: for tid in [tid for tid in world_db["Things"]]: if not tid in world_db["Things"]: continue - Thing = world_db["Things"][tid] - if Thing["T_LIFEPOINTS"]: - if not Thing["T_COMMAND"]: - update_map_memory(Thing) + t = world_db["Things"][tid] + if t["T_LIFEPOINTS"]: + if not (world_db["test_air"](t) and world_db["test_hole"](t)): + continue + if not t["T_COMMAND"]: + update_map_memory(t) + build_fov_map(t) if 0 == tid: return - ai(Thing) - if Thing["T_LIFEPOINTS"]: - Thing["T_PROGRESS"] += 1 + world_db["ai"](t) + if t["T_LIFEPOINTS"]: + t["T_PROGRESS"] += 1 taid = [a for a in world_db["ThingActions"] - if a == Thing["T_COMMAND"]][0] + if a == t["T_COMMAND"]][0] ThingAction = world_db["ThingActions"][taid] - effort = world_db["calc_effort"](ThingAction, Thing) - if Thing["T_PROGRESS"] >= effort: + effort = world_db["calc_effort"](ThingAction, t) + if t["T_PROGRESS"] >= effort: action = action_db["actor_" + ThingAction["TA_NAME"]] - action(Thing) - Thing["T_COMMAND"] = 0 - Thing["T_PROGRESS"] = 0 - if Thing["T_BOWEL"] > 16: - if 0 == (rand.next() % (33 - Thing["T_BOWEL"])): - action_db["actor_drop"](Thing) - if Thing["T_BLADDER"] > 16: - if 0 == (rand.next() % (33 - Thing["T_BLADDER"])): - action_db["actor_pee"](Thing) - water = 0 - positions_to_wet = [] - for pos in range(world_db["MAP_LENGTH"] ** 2): - if world_db["MAP"][pos] == ord("0") \ - and world_db["wetmap"][pos] < ord("5"): - positions_to_wet += [pos] - i_positions_to_wet = len(positions_to_wet) - for pos in range(world_db["MAP_LENGTH"] ** 2): + action(t) + if t["T_LIFEPOINTS"] <= 0: + continue + t["T_COMMAND"] = 0 + t["T_PROGRESS"] = 0 + if t["T_BOWEL"] > 16: + if 0 == (rand.next() % (33 - t["T_BOWEL"])): + action_db["actor_drop"](t) + if t["T_BLADDER"] > 16: + if 0 == (rand.next() % (33 - t["T_BLADDER"])): + action_db["actor_pee"](t) + if 0 == world_db["TURN"] % 5: + t["T_STOMACH"] -= 1 + t["T_BOWEL"] += 1 + t["T_KIDNEY"] -= 1 + t["T_BLADDER"] += 1 + if t["T_STOMACH"] <= 0: + world_db["die"](t, "You DIE of hunger.") + elif t["T_KIDNEY"] <= 0: + world_db["die"](t, "You DIE of dehydration.") + mapsize = world_db["MAP_LENGTH"] ** 2 + for pos in range(mapsize): wetness = world_db["wetmap"][pos] - ord("0") height = world_db["MAP"][pos] - ord("0") - if height == 0 and wetness > 0 \ - and 0 == rand.next() % ((2 ** 16) / (2 ** wetness)): + if world_db["MAP"][pos] == ord("-"): + height = -1 + elif world_db["MAP"][pos] == ord("+"): + height = -2 + elif world_db["MAP"][pos] == ord("$"): + height = -3 + if height == -2 and wetness > 1 \ + and 0 == rand.next() % ((2 ** 10) / (2 ** wetness)): + world_db["MAP"][pos] = ord("*") + world_db["HUMIDITY"] += wetness + if height == -1 and wetness > 1 \ + and 0 == rand.next() % ((2 ** 9) / (2 ** wetness)): + world_db["MAP"][pos] = ord("+") + if height == 0 and wetness > 1 \ + and 0 == rand.next() % ((2 ** 8) / (2 ** wetness)): world_db["MAP"][pos] = ord("-") - if pos in positions_to_wet: - positions_to_wet.remove(pos) - i_positions_to_wet -= 1 - if ((wetness > 0 and height != 0) or wetness > 1) \ - and 0 == rand.next() % 5: + if ((wetness > 0 and height > 0) or wetness > 1) \ + and 0 == rand.next() % 16: world_db["wetmap"][pos] -= 1 - water += 1 - i_positions_to_wet -= 1 - if i_positions_to_wet == 0: - break - if water > 0: - while water > 0: + world_db["HUMIDITY"] += 1 + if world_db["HUMIDITY"] > 0: + if world_db["HUMIDITY"] > 2 and 0 == rand.next() % 2: + world_db["NEW_SPAWN"] += 1 + world_db["HUMIDITY"] -= 1 + if world_db["NEW_SPAWN"] >= 16: + world_db["NEW_SPAWN"] -= 16 + from server.new_thing import new_Thing + while 1: + y = rand.next() % world_db["MAP_LENGTH"] + x = rand.next() % world_db["MAP_LENGTH"] + if chr(world_db["MAP"][y * world_db["MAP_LENGTH"] + x]) !=\ + "5": + from server.utils import id_setter + tid = id_setter(-1, "Things") + world_db["Things"][tid] = new_Thing( + world_db["PLAYER_TYPE"], (y, x)) + pos = y * world_db["MAP_LENGTH"] + x + break + positions_to_wet = [] + for pos in range(mapsize): + if chr(world_db["MAP"][pos]) in "0-+" \ + and world_db["wetmap"][pos] < ord("5"): + positions_to_wet += [pos] + while world_db["HUMIDITY"] > 0 and len(positions_to_wet) > 0: select = rand.next() % len(positions_to_wet) pos = positions_to_wet[select] world_db["wetmap"][pos] += 1 positions_to_wet.remove(pos) - water -= 1 + world_db["HUMIDITY"] -= 1 + for pos in range(mapsize): + if world_db["soundmap"][pos] > ord("0"): + world_db["soundmap"][pos] -= 1 + from server.utils import libpr + libpr.init_score_map() + def set_map_score(pos, score): + test = libpr.set_map_score(pos, score) + if test: + raise RuntimeError("No score map allocated for set_map_score().") + [set_map_score(pos, 1) for pos in range(mapsize) + if world_db["MAP"][pos] == ord("*")] + for pos in range(mapsize): + if world_db["MAP"][pos] == ord("*"): + if libpr.ready_neighbor_scores(pos): + raise RuntimeError("No score map allocated for " + + "ready_neighbor_scores.()") + score = 0 + dirs = "edcxsw" + for i in range(len(dirs)): + score += libpr.get_neighbor_score(i) + if score == 6: + world_db["MAP"][pos] = ord("&") + libpr.free_score_map() world_db["TURN"] += 1 io_db["worldstate_updateable"] = True try_worldstate_update() world_db["turn_over"] = turn_over -def command_ai(): - """Call ai() on player Thing, then turn_over().""" - from server.ai import ai - if world_db["WORLD_ACTIVE"]: - ai(world_db["Things"][0]) - world_db["turn_over"]() - - def set_command(action): """Set player's T_COMMAND, then call turn_over().""" tid = [x for x in world_db["ThingActions"] @@ -306,15 +600,42 @@ def play_wait(): world_db["set_command"]("wait") -def save_wetmap(): +def save_maps(): length = world_db["MAP_LENGTH"] string = "" for i in range(length): line = world_db["wetmap"][i * length:(i * length) + length].decode() string = string + "WETMAP" + " " + str(i) + " " + line + "\n" + for i in range(length): + line = world_db["soundmap"][i * length:(i * length) + length].decode() + string = string + "SOUNDMAP" + " " + str(i) + " " + line + "\n" return string +def soundmapset(str_int, mapline): + def valid_map_line(str_int, mapline): + from server.utils import integer_test + val = integer_test(str_int, 0, 255) + if None != val: + if val >= world_db["MAP_LENGTH"]: + print("Illegal value for map line number.") + elif len(mapline) != world_db["MAP_LENGTH"]: + print("Map line length is unequal map width.") + else: + return val + return None + val = valid_map_line(str_int, mapline) + if None != val: + length = world_db["MAP_LENGTH"] + if not world_db["soundmap"]: + m = bytearray(b' ' * (length ** 2)) + else: + m = world_db["soundmap"] + m[val * length:(val * length) + length] = mapline.encode() + if not world_db["soundmap"]: + world_db["soundmap"] = m + + def wetmapset(str_int, mapline): def valid_map_line(str_int, mapline): from server.utils import integer_test @@ -338,6 +659,13 @@ def wetmapset(str_int, mapline): if not world_db["wetmap"]: world_db["wetmap"] = m + +def write_soundmap(): + from server.worldstate_write_helpers import write_map + length = world_db["MAP_LENGTH"] + return write_map(world_db["soundmap"], world_db["MAP_LENGTH"]) + + def write_wetmap(): from server.worldstate_write_helpers import write_map length = world_db["MAP_LENGTH"] @@ -348,32 +676,328 @@ def write_wetmap(): return write_map(visible_wetmap, world_db["MAP_LENGTH"]) +def get_dir_to_target(t, target): + + from server.utils import rand, libpr, c_pointer_to_bytearray + from server.config.world_data import symbols_passable + + def get_map_score(pos): + result = libpr.get_map_score(pos) + if result < 0: + raise RuntimeError("No score map allocated for get_map_score().") + return result + + def zero_score_map_where_char_on_memdepthmap(c): + map = c_pointer_to_bytearray(t["T_MEMDEPTHMAP"]) + if libpr.zero_score_map_where_char_on_memdepthmap(c, map): + raise RuntimeError("No score map allocated for " + "zero_score_map_where_char_on_memdepthmap().") + + def set_map_score(pos, score): + test = libpr.set_map_score(pos, score) + if test: + raise RuntimeError("No score map allocated for set_map_score().") + + def set_movement_cost_map(): + copy_memmap = t["T_MEMMAP"][:] + copy_memmap.replace(b' ', b'4') + memmap = c_pointer_to_bytearray(copy_memmap) + if libpr.TCE_set_movement_cost_map(memmap): + raise RuntimeError("No movement cost map allocated for " + "set_movement_cost_map().") + + def animates_in_fov(maplength): + return [Thing for Thing in world_db["Things"].values() + if Thing["T_LIFEPOINTS"] and 118 == t["fovmap"][Thing["pos"]] + and (not Thing == t)] + + def seeing_thing(): + def exists(gen): + try: + next(gen) + except StopIteration: + return False + return True + mapsize = world_db["MAP_LENGTH"] ** 2 + if target == "food" and t["T_MEMMAP"]: + return exists(pos for pos in range(mapsize) + if ord("2") < t["T_MEMMAP"][pos] < ord("5")) + elif target == "fluid_certain" and t["fovmap"]: + return exists(pos for pos in range(mapsize) + if t["fovmap"] == ord("v") + if world_db["MAP"][pos] == ord("0") + if world_db["wetmap"][pos] > ord("0")) + elif target == "crack" and t["T_MEMMAP"]: + return exists(pos for pos in range(mapsize) + if t["T_MEMMAP"][pos] == ord("-")) + elif target == "fluid_potential" and t["T_MEMMAP"] and t["fovmap"]: + return exists(pos for pos in range(mapsize) + if t["T_MEMMAP"][pos] == ord("0") + if t["fovmap"] != ord("v")) + elif target == "space" and t["T_MEMMAP"] and t["fovmap"]: + return exists(pos for pos in range(mapsize) + if ord("-") <= t["T_MEMMAP"][pos] <= ord("2") + if (t["fovmap"] != ord("v") + or world_db["terrain_fullness"](pos) < 5)) + elif target in {"hunt", "flee"} and t["fovmap"]: + return exists(Thing for + Thing in animates_in_fov(world_db["MAP_LENGTH"])) \ + or exists(pos for pos in range(mapsize) + if world_db["soundmap"][pos] > ord("0") + if t["fovmap"][pos] != ord("v")) + return False + + def init_score_map(): + mapsize = world_db["MAP_LENGTH"] ** 2 + test = libpr.TCE_init_score_map() + [set_map_score(pos, 65535) for pos in range(mapsize) + if chr(t["T_MEMMAP"][pos]) in "5*&"] + set_movement_cost_map() + if test: + raise RuntimeError("Malloc error in init_score_map().") + if target == "food" and t["T_MEMMAP"]: + [set_map_score(pos, 0) for pos in range(mapsize) + if ord("2") < t["T_MEMMAP"][pos] < ord("5")] + elif target == "fluid_certain" and t["fovmap"]: + [set_map_score(pos, 0) for pos in range(mapsize) + if t["fovmap"] == ord("v") + if world_db["MAP"][pos] == ord("0") + if world_db["wetmap"][pos] > ord("0")] + elif target == "crack" and t["T_MEMMAP"]: + [set_map_score(pos, 0) for pos in range(mapsize) + if t["T_MEMMAP"][pos] == ord("-")] + elif target == "fluid_potential" and t["T_MEMMAP"] and t["fovmap"]: + [set_map_score(pos, 0) for pos in range(mapsize) + if t["T_MEMMAP"][pos] == ord("0") + if t["fovmap"] != ord("v")] + elif target == "space" and t["T_MEMMAP"] and t["fovmap"]: + [set_map_score(pos, 0) for pos in range(mapsize) + if ord("-") <= t["T_MEMMAP"][pos] <= ord("2") + if (t["fovmap"] != ord("v") + or world_db["terrain_fullness"](pos) < 5)] + elif target == "search": + zero_score_map_where_char_on_memdepthmap(mem_depth_c[0]) + elif target in {"hunt", "flee"}: + [set_map_score(Thing["pos"], 0) for + Thing in animates_in_fov(world_db["MAP_LENGTH"])] + [set_map_score(pos, 0) for pos in range(mapsize) + if world_db["soundmap"][pos] > ord("0") + if t["fovmap"][pos] != ord("v")] + + def rand_target_dir(neighbors, cmp, dirs): + candidates = [] + n_candidates = 0 + for i in range(len(dirs)): + if cmp == neighbors[i]: + candidates.append(dirs[i]) + n_candidates += 1 + return candidates[rand.next() % n_candidates] if n_candidates else 0 + + def get_neighbor_scores(dirs, eye_pos): + scores = [] + if libpr.ready_neighbor_scores(eye_pos): + raise RuntimeError("No score map allocated for " + + "ready_neighbor_scores.()") + for i in range(len(dirs)): + scores.append(libpr.get_neighbor_score(i)) + return scores + + def get_dir_from_neighbors(): + import math + dir_to_target = False + dirs = "edcxsw" + eye_pos = t["pos"] + neighbors = get_neighbor_scores(dirs, eye_pos) + minmax_start = 0 if "flee" == target else 65535 - 1 + minmax_neighbor = minmax_start + for i in range(len(dirs)): + if ("flee" == target and get_map_score(t["pos"]) < neighbors[i] and + minmax_neighbor < neighbors[i] and 65535 != neighbors[i]) \ + or ("flee" != target and minmax_neighbor > neighbors[i]): + minmax_neighbor = neighbors[i] + if minmax_neighbor != minmax_start: + dir_to_target = rand_target_dir(neighbors, minmax_neighbor, dirs) + if "flee" == target: + distance = get_map_score(t["pos"]) + fear_distance = 5 + attack_distance = 1 + if not dir_to_target: + if attack_distance >= distance: + dir_to_target = rand_target_dir(neighbors, + distance - 1, dirs) + elif dir_to_target and fear_distance < distance: + dir_to_target = 0 + return dir_to_target, minmax_neighbor + + dir_to_target = False + mem_depth_c = b' ' + run_i = 9 + 1 if "search" == target else 1 + minmax_neighbor = 0 + while run_i and not dir_to_target and \ + ("search" == target or seeing_thing()): + run_i -= 1 + init_score_map() + mem_depth_c = b'9' if b' ' == mem_depth_c \ + else bytes([mem_depth_c[0] - 1]) + if libpr.TCE_dijkstra_map_with_movement_cost(): + raise RuntimeError("No score map allocated for dijkstra_map().") + dir_to_target, minmax_neighbor = get_dir_from_neighbors() + libpr.free_score_map() + if dir_to_target and str == type(dir_to_target): + action = "move" + from server.utils import mv_yx_in_dir_legal + move_result = mv_yx_in_dir_legal(dir_to_target, t["T_POSY"], + t["T_POSX"]) + if 1 != move_result[0]: + return False, 0 + pos = (move_result[1] * world_db["MAP_LENGTH"]) + move_result[2] + hitted = [tid for tid in world_db["Things"] + if world_db["Things"][tid]["pos"] == pos] + if world_db["MAP"][pos] > ord("2") or len(hitted) > 0: + action = "eat" + t["T_COMMAND"] = [taid for taid in world_db["ThingActions"] + if world_db["ThingActions"][taid]["TA_NAME"] + == action][0] + t["T_ARGUMENT"] = ord(dir_to_target) + return dir_to_target, minmax_neighbor +world_db["get_dir_to_target"] = get_dir_to_target + + +def terrain_fullness(pos): + wetness = world_db["wetmap"][pos] - ord("0") + if chr(world_db["MAP"][pos]) in "-+": + height = 0 + else: + height = world_db["MAP"][pos] - ord("0") + return wetness + height +world_db["terrain_fullness"] = terrain_fullness + + +def ai(t): + + if t["T_LIFEPOINTS"] == 0: + return + + def standing_on_fluid(t): + if world_db["MAP"][t["pos"]] == ord("0") and \ + world_db["wetmap"][t["pos"]] > ord("0"): + return True + else: + return False + + def thing_action_id(name): + return [taid for taid in world_db["ThingActions"] + if world_db["ThingActions"][taid] + ["TA_NAME"] == name][0] + + t["T_COMMAND"] = thing_action_id("wait") + needs = { + "fix_cracks": 24, + "flee": 24, + "safe_pee": (world_db["terrain_fullness"](t["pos"]) * t["T_BLADDER"]) / 4, + "safe_drop": (world_db["terrain_fullness"](t["pos"]) * t["T_BOWEL"]) / 4, + "food": 33 - t["T_STOMACH"], + "fluid_certain": 33 - t["T_KIDNEY"], + "fluid_potential": 32 - t["T_KIDNEY"], + "search": 1, + } + from operator import itemgetter + needs = sorted(needs.items(), key=itemgetter(1,0)) + needs.reverse() + for need in needs: + if need[1] > 0: + if need[0] == "fix_cracks": + if world_db["MAP"][t["pos"]] == ord("-") and \ + t["T_BOWEL"] > 0 and \ + world_db["terrain_fullness"](t["pos"]) <= 3: + t["T_COMMAND"] = thing_action_id("drop") + return + elif world_db["get_dir_to_target"](t, "crack")[0]: + return + if need[0] in {"fluid_certain", "fluid_potential"}: + if standing_on_fluid(t): + t["T_COMMAND"] = thing_action_id("drink") + return + elif t["T_BLADDER"] > 0 and \ + world_db["MAP"][t["pos"]] == ord("0"): + t["T_COMMAND"] = thing_action_id("pee") + return + elif need[0] in {"safe_pee", "safe_drop"}: + action_name = need[0][len("safe_"):] + if world_db["terrain_fullness"](t["pos"]) <= 3: + t["T_COMMAND"] = thing_action_id(action_name) + return + test = world_db["get_dir_to_target"](t, "space") + if test[0]: + if test[1] < 5: + return + elif world_db["terrain_fullness"](t["pos"]) < 5: + t["T_COMMAND"] = thing_action_id(action_name) + return + if t["T_STOMACH"] < 32 and \ + world_db["get_dir_to_target"](t, "food")[0]: + return + continue + if need[0] in {"fluid_certain", "fluid_potential", "food"}: + if world_db["get_dir_to_target"](t, need[0])[0]: + return + elif world_db["get_dir_to_target"](t, "hunt")[0]: + return + elif need[0] != "food" and t["T_STOMACH"] < 32 and \ + world_db["get_dir_to_target"](t, "food")[0]: + return + elif world_db["get_dir_to_target"](t, need[0])[0]: + return +world_db["ai"] = ai + + from server.config.io import io_db +io_db["worldstate_write_order"] += [["T_STOMACH", "player_int"]] +io_db["worldstate_write_order"] += [["T_KIDNEY", "player_int"]] io_db["worldstate_write_order"] += [["T_BOWEL", "player_int"]] io_db["worldstate_write_order"] += [["T_BLADDER", "player_int"]] io_db["worldstate_write_order"] += [[write_wetmap, "func"]] +io_db["worldstate_write_order"] += [[write_soundmap, "func"]] +io_db["worldstate_write_order"] += [["GRACE", "world_int"]] import server.config.world_data server.config.world_data.symbols_hide = "345" -server.config.world_data.symbols_passable = "012-" +server.config.world_data.symbols_passable = "012-+*&$" +server.config.world_data.thing_defaults["T_STOMACH"] = 16 server.config.world_data.thing_defaults["T_BOWEL"] = 0 +server.config.world_data.thing_defaults["T_KIDNEY"] = 16 server.config.world_data.thing_defaults["T_BLADDER"] = 0 +world_db["soundmap"] = bytearray(b"0" * world_db["MAP_LENGTH"] ** 2) world_db["wetmap"] = bytearray(b"0" * world_db["MAP_LENGTH"] ** 2) -io_db["hook_save"] = save_wetmap +if not "NEW_SPAWN" in world_db: + world_db["NEW_SPAWN"] = 0 +if not "HUMIDITY" in world_db: + world_db["HUMIDITY"] = 0 +if not "GRACE" in world_db: + world_db["GRACE"] = 0 +io_db["hook_save"] = save_maps import server.config.make_world_helpers server.config.make_world_helpers.make_map = make_map from server.config.commands import commands_db commands_db["THINGS_HERE"] = (2, True, lambda x, y: None) +commands_db["HELP"] = (1, False, command_help) commands_db["ai"] = (0, False, command_ai) commands_db["move"] = (1, False, play_move) +commands_db["eat"] = (1, False, play_move) commands_db["wait"] = (0, False, play_wait) commands_db["drop"] = (0, False, play_drop) commands_db["drink"] = (0, False, play_drink) commands_db["pee"] = (0, False, play_pee) commands_db["use"] = (1, False, lambda x: None) commands_db["pickup"] = (0, False, lambda: None) +commands_db["GRACE"] = (1, False, setter(None, "GRACE", 0, 255)) +commands_db["NEW_SPAWN"] = (1, False, setter(None, "NEW_SPAWN", 0, 255)) +commands_db["HUMIDITY"] = (1, False, setter(None, "HUMIDITY", 0, 65535)) +commands_db["T_STOMACH"] = (1, False, setter("Thing", "T_STOMACH", 0, 255)) +commands_db["T_KIDNEY"] = (1, False, setter("Thing", "T_KIDNEY", 0, 255)) commands_db["T_BOWEL"] = (1, False, setter("Thing", "T_BOWEL", 0, 255)) commands_db["T_BLADDER"] = (1, False, setter("Thing", "T_BLADDER", 0, 255)) commands_db["WETMAP"] = (2, False, wetmapset) +commands_db["SOUNDMAP"] = (2, False, soundmapset) from server.actions import actor_wait import server.config.actions server.config.actions.action_db = { @@ -382,6 +1006,7 @@ server.config.actions.action_db = { "actor_drop": actor_drop, "actor_drink": actor_drink, "actor_pee": actor_pee, + "actor_eat": actor_eat, } strong_write(io_db["file_out"], "PLUGIN TheCrawlingEater\n")