+# This file is part of PlomRogue. PlomRogue is licensed under the GPL version 3
+# or any later version. For details on its copyright, license, and warranties,
+# see the file NOTICE in the root directory of the PlomRogue source package.
+
+
from server.io import log, strong_write
from server.config.world_data import world_db, symbols_passable, directions_db
from server.utils import mv_yx_in_dir_legal, rand, id_setter
print("Ignoring beyond SEED_MAP: " +
"No thing action with name 'wait' defined.")
return
- if not world_db["SLIPPERS"] in world_db["ThingTypes"]:
- print("Ignoring: No valid SLIPPERS set.")
- return
- #for name in specials:
- # if world_db[name] not in world_db["ThingTypes"]:
- # print("Ignoring: No valid " + name + " set.")
- # return
+ for name in world_db["specials"]:
+ if world_db[name] not in world_db["ThingTypes"]:
+ print("Ignoring: No valid " + name + " set.")
+ return
world_db["Things"] = {}
make_map()
world_db["WORLD_ACTIVE"] = 1
id = id_setter(-1, "Things")
newT = new_Thing(t["T_TYPE"], (candidates[i][0], candidates[i][1]))
world_db["Things"][id] = newT
- #if (world_db["FAVOR_STAGE"] > 0
- # and t["T_TYPE"] == world_db["PLANT_0"]):
- # world_db["GOD_FAVOR"] += 5
- #elif t["T_TYPE"] == world_db["PLANT_1"];
- # world_db["GOD_FAVOR"] += 25
+ if (world_db["FAVOR_STAGE"] > 0
+ and t["T_TYPE"] == world_db["PLANT_0"]):
+ world_db["GOD_FAVOR"] += 5
+ elif t["T_TYPE"] == world_db["PLANT_1"]:
+ world_db["GOD_FAVOR"] += 25
#elif world_db["FAVOR_STAGE"] >= 4 and \
# t["T_TYPE"] == world_db["ANIMAL_1"]:
# log("The Island God SMILES upon a new-born bear baby.")
+ ". It glows in wondrous colors, and emits a sound as if "
+ "from a dying cat. The Island God laughs.\n")
t["T_LIFEPOINTS"] = 1
- decrement_lifepoints(t)
+ from server.config.misc import decrement_lifepoints_func
+ decrement_lifepoints_func(t)
+ elif (world_db["ThingTypes"][type]["TT_TOOL"] == "carpentry"):
+ pos = t["T_POSY"] * world_db["MAP_LENGTH"] + t["T_POSX"]
+ if (world_db["MAP"][pos] == ord("X")
+ or world_db["MAP"][pos] == ord("|")):
+ return
+ for id in [id for id in world_db["Things"]
+ if not world_db["Things"][id] == t
+ if not world_db["Things"][id]["carried"]
+ if world_db["Things"][id]["T_POSY"] == t["T_POSY"]
+ if world_db["Things"][id]["T_POSX"] == t["T_POSX"]]:
+ return
+ wood_id = None
+ for id in t["T_CARRIES"]:
+ type_material = world_db["Things"][id]["T_TYPE"]
+ if (world_db["ThingTypes"][type_material]["TT_TOOL"]
+ == "wood"):
+ wood_id = id
+ break
+ if wood_id != None:
+ t["T_CARRIES"].remove(wood_id)
+ del world_db["Things"][wood_id]
+ world_db["MAP"][pos] = ord("|")
+ log("With your " + world_db["ThingTypes"][type]["TT_NAME"]
+ + " you build a wooden barrier from your "
+ + world_db["ThingTypes"][type_material]["TT_NAME"] + ".")
elif world_db["ThingTypes"][type]["TT_TOOL"] == "food":
t["T_CARRIES"].remove(id)
del world_db["Things"][id]
elif t == world_db["Things"][0]:
log("You try to use this object, but FAIL.")
+def decrement_lifepoints(t):
+ t["T_LIFEPOINTS"] -= 1
+ _id = [_id for _id in world_db["Things"] if world_db["Things"][_id] == t][0]
+ if 0 == t["T_LIFEPOINTS"]:
+ sadness = world_db["ThingTypes"][t["T_TYPE"]]["TT_LIFEPOINTS"]
+ for id in t["T_CARRIES"]:
+ t["T_CARRIES"].remove(id)
+ world_db["Things"][id]["T_POSY"] = t["T_POSY"]
+ world_db["Things"][id]["T_POSX"] = t["T_POSX"]
+ world_db["Things"][id]["carried"] = False
+ t["T_TYPE"] = world_db["ThingTypes"][t["T_TYPE"]]["TT_CORPSE_ID"]
+ if world_db["Things"][0] == t:
+ t["fovmap"] = bytearray(b' ' * (world_db["MAP_LENGTH"] ** 2))
+ log("You die.")
+ log("See README on how to start over.")
+ else:
+ t["fovmap"] = False
+ t["T_MEMMAP"] = False
+ t["T_MEMDEPTHMAP"] = False
+ t["T_MEMTHING"] = []
+ return sadness
+ return 0
+
def actor_move(t):
def enter_altar():
- if world_db["GAME_WON"]:
+ from server.new_thing import new_Thing
+ if world_db["FAVOR_STAGE"] > 9000:
log("You step on a soul-less slab of stone.")
return
log("YOU ENTER SACRED GROUND.")
- if world_db["GOD_FAVOR"] > 9000:
- world_db["GAME_WON"] = 1
+ if world_db["FAVOR_STAGE"] == 0:
+ world_db["FAVOR_STAGE"] = 1
+ log("The Island God speaks to you: \"I don't trust you. You intrud"
+ + "e on the island's affairs. I think you're a nuisance at be"
+ + "st, and a danger to my children at worst. I will give you "
+ + "a chance to lighten my mood, however: For a while now, I'v"
+ + "e been trying to spread the plant "
+ + world_db["ThingTypes"][world_db["PLANT_0"]]["TT_NAME"]
+ + " (\""
+ + world_db["ThingTypes"][world_db["PLANT_0"]]["TT_SYMBOL"]
+ + "\"). I have not been very successful so far. Maybe you can"
+ + " make yourself useful there. I will count each further "
+ + world_db["ThingTypes"][world_db["PLANT_0"]]["TT_NAME"]
+ + " that grows to your favor.\"")
+ elif world_db["FAVOR_STAGE"] == 1 and world_db["GOD_FAVOR"] < 100:
+ log("The Island God will talk again when it favors you to >=100 "
+ +" points.")
+ elif world_db["FAVOR_STAGE"] == 1 and world_db["GOD_FAVOR"] >= 100:
+ world_db["FAVOR_STAGE"] = 2
+ log("The Island God speaks to you: \"You could have done worse so "
+ + "far. Maybe you are not the worst to happen to this island "
+ + "since the metal birds threw the great lightning ball. Maybe"
+ + " you can help me spread another plant. It multiplies faster"
+ + ",and it is highly nutritious: "
+ + world_db["ThingTypes"][world_db["PLANT_1"]]["TT_NAME"]
+ + " (\""
+ + world_db["ThingTypes"][world_db["PLANT_1"]]["TT_SYMBOL"]
+ + "\"). It is new. I give you the only example. Be very carefu"
+ + "l with it! I also give you another tool that may be helpful"
+ + ".\"")
+ id = id_setter(-1, "Things")
+ world_db["Things"][id] = new_Thing(world_db["PLANT_1"],
+ world_db["altar"])
+ id = id_setter(-1, "Things")
+ world_db["Things"][id] = new_Thing(world_db["TOOL_0"],
+ world_db["altar"])
+ elif world_db["FAVOR_STAGE"] == 2 and \
+ 0 == len([id for id in world_db["Things"]
+ if world_db["Things"][id]["T_TYPE"]
+ == world_db["PLANT_1"]]):
+ log("The Island God speaks to you: \"I am greatly disappointed tha"
+ + "t you lost all "
+ + world_db["ThingTypes"][world_db["PLANT_1"]]["TT_NAME"]
+ + " this island had. Here is another one. It cost me great wor"
+ + "k. Be more careful this time when planting it.\"")
+ id = id_setter(-1, "Things")
+ world_db["Things"][id] = new_Thing(world_db["PLANT_1"],
+ world_db["altar"])
+ world_db["GOD_FAVOR"] -= 250
+ elif world_db["FAVOR_STAGE"] == 2 and world_db["GOD_FAVOR"] < 500:
+ log("The Island God will talk again when it favors you to >=500 "
+ +" points.")
+ elif world_db["GOD_FAVOR"] > 9000:
+ world_db["FAVOR_STAGE"] = 9001
log("The Island God speaks to you: \"You have proven yourself wort"
+ "hy of my respect. You were a good citizen to the island, a"
+ "nd sometimes a better steward to its inhabitants than me. "
from server.config.world_data import symbols_passable
from server.build_fov_map import build_fov_map
- def decrement_lifepoints(t):
- t["T_LIFEPOINTS"] -= 1
- _id = [_id for _id in world_db["Things"] if world_db["Things"][_id] == t][0]
- if 0 == t["T_LIFEPOINTS"]:
- sadness = world_db["ThingTypes"][t["T_TYPE"]]["TT_LIFEPOINTS"]
- for id in t["T_CARRIES"]:
- t["T_CARRIES"].remove(id)
- world_db["Things"][id]["T_POSY"] = t["T_POSY"]
- world_db["Things"][id]["T_POSX"] = t["T_POSX"]
- world_db["Things"][id]["carried"] = False
- t["T_TYPE"] = world_db["ThingTypes"][t["T_TYPE"]]["TT_CORPSE_ID"]
- if world_db["Things"][0] == t:
- t["fovmap"] = bytearray(b' ' * (world_db["MAP_LENGTH"] ** 2))
- log("You die.")
- log("See README on how to start over.")
- else:
- t["fovmap"] = False
- t["T_MEMMAP"] = False
- t["T_MEMDEPTHMAP"] = False
- t["T_MEMTHING"] = []
- log("BAR " + str(t["T_LIFEPOINTS"]))
- return sadness
- return 0
+ from server.config.misc import decrement_lifepoints_func
+ from server.new_thing import new_Thing
passable = False
move_result = mv_yx_in_dir_legal(chr(t["T_ARGUMENT"]),
t["T_POSY"], t["T_POSX"])
elif 0 == hit_id:
hitter_name = world_db["ThingTypes"][t["T_TYPE"]]["TT_NAME"]
log(hitter_name +" WOUNDS you.")
- test = decrement_lifepoints(world_db["Things"][hit_id])
+ test = decrement_lifepoints_func(world_db["Things"][hit_id])
if test and t == world_db["Things"][0]:
world_db["GOD_FAVOR"] -= test
return
+ if (ord("X") == world_db["MAP"][pos]
+ or ord("|") == world_db["MAP"][pos]):
+ carries_axe = False
+ for id in t["T_CARRIES"]:
+ type = world_db["Things"][id]["T_TYPE"]
+ if world_db["ThingTypes"][type]["TT_TOOL"] == "axe":
+ carries_axe = True
+ break
+ if carries_axe:
+ axe_name = world_db["ThingTypes"][type]["TT_NAME"]
+ if t == world_db["Things"][0]:
+ log("With your " + axe_name + ", you chop!")
+ if ord("X") == world_db["MAP"][pos]:
+ world_db["GOD_FAVOR"] -= 1
+ chop_power = world_db["ThingTypes"][type]["TT_TOOLPOWER"]
+
+ case_X = world_db["MAP"][pos] == ord("X")
+ if (chop_power > 0
+ and ((case_X and
+ 0 == int(rand.next() / chop_power))
+ or (not case_X and
+ 0 == int(rand.next() / (3 * chop_power))))):
+ if t == world_db["Things"][0]:
+ log("You chop it DOWN.")
+ if ord("X") == world_db["MAP"][pos]:
+ world_db["GOD_FAVOR"] -= 10
+ world_db["MAP"][pos] = ord(".")
+ i = 3 if case_X else 1
+ for i in range(i):
+ id = id_setter(-1, "Things")
+ world_db["Things"][id] = \
+ new_Thing(world_db["LUMBER"],
+ (move_result[1], move_result[2]))
+ build_fov_map(t)
+ return
passable = chr(world_db["MAP"][pos]) in symbols_passable
dir = [dir for dir in directions_db
if directions_db[dir] == chr(t["T_ARGUMENT"])][0]
x = pos % world_db["MAP_LENGTH"]
world_db["altar"] = (y, x)
altar_found = True
- valid_slippers = world_db["SLIPPERS"] in world_db["ThingTypes"]
+ specials_set = True
+ for name in world_db["specials"]:
+ if world_db[name] not in world_db["ThingTypes"]:
+ specials_set = False
if altar_found and wait_exists and player_exists and \
- world_db["MAP"] and valid_slippers:
+ world_db["MAP"] and specials_set:
for id in world_db["Things"]:
if world_db["Things"][id]["T_LIFEPOINTS"]:
build_fov_map(world_db["Things"][id])
else:
print("Ignoring: Not all conditions for world activation met.")
-def command_slippers(str_int):
- val = integer_test(str_int, 0)
- if None != val:
- world_db["SLIPPERS"] = val
- if world_db["WORLD_ACTIVE"] and \
- world_db["SLIPPERS"] not in world_db["ThingTypes"]:
- world_db["WORLD_ACTIVE"] = 0
- print("SLIPPERS matches no known ThingTypes, deactivating world.")
+def play_move(str_arg):
+ if action_exists("move"):
+ 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
+ dir = ord(directions_db[str_arg])
+ from server.utils import mv_yx_in_dir_legal
+ move_result = mv_yx_in_dir_legal(chr(dir), t["T_POSY"], t["T_POSX"])
+ if 1 == move_result[0]:
+ pos = (move_result[1] * world_db["MAP_LENGTH"]) + move_result[2]
+ if ord("~") == world_db["MAP"][pos]:
+ log("You can't SWIM.")
+ return
+ if (ord("X") == world_db["MAP"][pos]
+ or ord("|") == world_db["MAP"][pos]):
+ carries_axe = False
+ for id in t["T_CARRIES"]:
+ type = world_db["Things"][id]["T_TYPE"]
+ if world_db["ThingTypes"][type]["TT_TOOL"] == "axe":
+ world_db["Things"][0]["T_ARGUMENT"] = dir
+ set_command("move")
+ return
+ if chr(world_db["MAP"][pos]) in symbols_passable:
+ world_db["Things"][0]["T_ARGUMENT"] = dir
+ set_command("move")
+ return
+ log("You CAN'T move there.")
+
+def play_use(str_arg):
+ if action_exists("use"):
+ t = world_db["Things"][0]
+ if 0 == len(t["T_CARRIES"]):
+ log("You have NOTHING to use in your inventory.")
+ else:
+ val = integer_test(str_arg, 0, 255)
+ if None != val and val < len(t["T_CARRIES"]):
+ id = t["T_CARRIES"][val]
+ type = world_db["Things"][id]["T_TYPE"]
+ if (world_db["ThingTypes"][type]["TT_TOOL"] == "axe"
+ and t == world_db["Things"][0]):
+ log("To use this item for chopping, move towards a tree "
+ + "while carrying it in your inventory.")
+ return
+ elif (world_db["ThingTypes"][type]["TT_TOOL"] == "carpentry"):
+ pos = t["T_POSY"] * world_db["MAP_LENGTH"] + t["T_POSX"]
+ if (world_db["MAP"][pos] == ord("X")
+ or world_db["MAP"][pos] == ord("|")):
+ log("Can't build when standing on barrier.")
+ return
+ for id in [id for id in world_db["Things"]
+ if not world_db["Things"][id] == t
+ if not world_db["Things"][id]["carried"]
+ if world_db["Things"][id]["T_POSY"] == t["T_POSY"]
+ if world_db["Things"][id]["T_POSX"] == t["T_POSX"]]:
+ log("Can't build when standing objects.")
+ return
+ wood_id = None
+ for id in t["T_CARRIES"]:
+ type_material = world_db["Things"][id]["T_TYPE"]
+ if (world_db["ThingTypes"][type_material]["TT_TOOL"]
+ == "wood"):
+ wood_id = id
+ break
+ if wood_id == None:
+ log("You can't use a "
+ + world_db["ThingTypes"][type]["TT_NAME"]
+ + " without some wood in your inventory.")
+ return
+ elif type != world_db["SLIPPERS"] and not \
+ world_db["ThingTypes"][type]["TT_TOOL"] == "food":
+ log("You CAN'T consume this thing.")
+ return
+ world_db["Things"][0]["T_ARGUMENT"] = val
+ set_command("use")
+ else:
+ print("Illegal inventory index.")
+
+def specialtypesetter(name): # #
+ def helper(str_int):
+ val = integer_test(str_int, 0)
+ if None != val:
+ world_db[name] = val
+ if world_db["WORLD_ACTIVE"] \
+ and world_db[name] not in world_db["ThingTypes"]:
+ world_db["WORLD_ACTIVE"] = 0
+ print(name + " fits no known ThingType, deactivating world.")
+ return helper
+
+def write_metamap_A():
+ from server.worldstate_write_helpers import write_map
+ ord_v = ord("v")
+ length = world_db["MAP_LENGTH"]
+ metamapA = bytearray(b'0' * (length ** 2))
+ for id in [id for id in world_db["Things"]
+ if not world_db["Things"][id]["carried"]
+ if world_db["Things"][id]["T_LIFEPOINTS"]
+ if world_db["Things"][0]["fovmap"][
+ world_db["Things"][id]["T_POSY"] * length
+ + world_db["Things"][id]["T_POSX"]] == ord_v]:
+ pos = (world_db["Things"][id]["T_POSY"] * length
+ + world_db["Things"][id]["T_POSX"])
+ if id == 0 or world_db["EMPATHY"]:
+ type = world_db["Things"][id]["T_TYPE"]
+ max_hp = world_db["ThingTypes"][type]["TT_LIFEPOINTS"]
+ third_of_hp = max_hp / 3
+ hp = world_db["Things"][id]["T_LIFEPOINTS"]
+ add = 0
+ if hp > 2 * third_of_hp:
+ add = 2
+ elif hp > third_of_hp:
+ add = 1
+ metamapA[pos] = ord('a') + add
+ else:
+ metamapA[pos] = ord('X')
+ for mt in world_db["Things"][0]["T_MEMTHING"]:
+ pos = mt[1] * length + mt[2]
+ if metamapA[pos] < ord('2'):
+ metamapA[pos] += 1
+ return write_map(metamapA, length)
+
+def write_metamap_B():
+ from server.worldstate_write_helpers import write_map
+ ord_v = ord("v")
+ length = world_db["MAP_LENGTH"]
+ metamapB = bytearray(b' ' * (length ** 2))
+ for id in [id for id in world_db["Things"]
+ if not world_db["Things"][id]["carried"]
+ if world_db["Things"][id]["T_LIFEPOINTS"]
+ if world_db["Things"][0]["fovmap"][
+ world_db["Things"][id]["T_POSY"] * length
+ + world_db["Things"][id]["T_POSX"]] == ord_v]:
+ pos = (world_db["Things"][id]["T_POSY"] * length
+ + world_db["Things"][id]["T_POSX"])
+ if id == 0 or world_db["EMPATHY"]:
+ action = world_db["Things"][id]["T_COMMAND"]
+ if 0 != action:
+ name = world_db["ThingActions"][action]["TA_NAME"]
+ else:
+ name = " "
+ metamapB[pos] = ord(name[0])
+ return write_map(metamapB, length)
strong_write(io_db["file_out"], "PLUGIN PleaseTheIslandGod\n")
if not "GOD_FAVOR" in world_db:
world_db["GOD_FAVOR"] = 0
-if not "GAME_WON" in world_db:
- world_db["GAME_WON"] = 0
+if not "FAVOR_STAGE" in world_db:
+ world_db["FAVOR_STAGE"] = 0
if not "SLIPPERS" in world_db:
world_db["SLIPPERS"] = 0
+if not "PLANT_0" in world_db:
+ world_db["PLANT_0"] = 0
+if not "PLANT_1" in world_db:
+ world_db["PLANT_1"] = 0
+if not "TOOL_0" in world_db:
+ world_db["TOOL_0"] = 0
+if not "LUMBER" in world_db:
+ world_db["LUMBER"] = 0
+if not "EMPATHY" in world_db:
+ world_db["EMPATHY"] = 0
+world_db["terrain_names"][":"] = "SOIL"
+world_db["terrain_names"]["|"] = "WALL"
+world_db["terrain_names"]["_"] = "ALTAR"
+world_db["specials"] = ["SLIPPERS", "PLANT_0", "PLANT_1", "TOOL_0", "LUMBER"]
io_db["worldstate_write_order"] += [["GOD_FAVOR", "world_int"]]
+io_db["worldstate_write_order"] += [[write_metamap_A, "func"]]
+io_db["worldstate_write_order"] += [[write_metamap_B, "func"]]
import server.config.world_data
server.config.world_data.symbols_passable += ":_"
server.config.actions.action_db["actor_move"] = actor_move
server.config.actions.action_db["actor_pickup"] = actor_pickup
server.config.actions.action_db["actor_drop"] = actor_drop
+server.config.actions.action_db["actor_use"] = actor_use
server.config.actions.ai_func = ai
from server.config.commands import commands_db
commands_db["TT_STORAGE"] = (1, False, setter("ThingType", "TT_STORAGE", 0, 255))
commands_db["T_PLAYERDROP"] = (1, False, setter("Thing", "T_PLAYERDROP", 0, 1))
commands_db["WORLD_ACTIVE"] = (1, False, command_worldactive)
-commands_db["GAME_WON"] = (1, False, setter(None, "GAME_WON", 0, 1))
-commands_db["SLIPPERS"] = (1, False, command_slippers)
+commands_db["FAVOR_STAGE"] = (1, False, setter(None, "FAVOR_STAGE", 0, 1))
+commands_db["SLIPPERS"] = (1, False, specialtypesetter("SLIPPERS"))
+commands_db["TOOL_0"] = (1, False, specialtypesetter("TOOL_0"))
+commands_db["PLANT_0"] = (1, False, specialtypesetter("PLANT_0"))
+commands_db["PLANT_1"] = (1, False, specialtypesetter("PLANT_1"))
+commands_db["LUMBER"] = (1, False, specialtypesetter("LUMBER"))
+commands_db["EMPATHY"] = (1, False, setter(None, "EMPATHY", 0, 1))
+commands_db["use"] = (1, False, play_use)
+commands_db["move"] = (1, False, play_move)
import server.config.misc
server.config.misc.make_map_func = make_map
server.config.misc.thingproliferation_func = thingproliferation
server.config.misc.make_world = make_world
+server.config.decrement_lifepoints_func = decrement_lifepoints