home · contact · privacy
Plugin: Add fertilizer tool, and TOOL_0 variable.
[plomrogue] / plugins / server / PleaseTheIslandGod.py
index a22d433cb6f2053a1c0082dcdbc14caca7744ee7..f513300209122f240f762cfd829ca45ff8665524 100644 (file)
@@ -60,16 +60,10 @@ def make_world(seed):
         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
-    if not world_db["PLANT_0"] in world_db["ThingTypes"]:
-        print("Ignoring: No valid PLANT_0 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
@@ -116,8 +110,8 @@ def thingproliferation(t, prol_map):
             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 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.")
@@ -284,6 +278,36 @@ def actor_use(t):
             t["T_LIFEPOINTS"] = 1
             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"] == "fertilizer":
+            pos = t["T_POSY"] * world_db["MAP_LENGTH"] + t["T_POSX"]
+            if world_db["MAP"][pos] == ord("."):
+                log("You create SOIL.")
+                world_db["MAP"][pos] = ord(":")
         elif world_db["ThingTypes"][type]["TT_TOOL"] == "food":
             t["T_CARRIES"].remove(id)
             del world_db["Things"][id]
@@ -338,7 +362,45 @@ def actor_move(t):
                  + " 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["GOD_FAVOR"] > 150:
+        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"
@@ -356,6 +418,7 @@ def actor_move(t):
     from server.config.world_data import symbols_passable
     from server.build_fov_map import build_fov_map
     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"])
@@ -395,11 +458,24 @@ def actor_move(t):
                     if ord("X") == world_db["MAP"][pos]:
                         world_db["GOD_FAVOR"] -= 1
                 chop_power = world_db["ThingTypes"][type]["TT_TOOLPOWER"]
-                if (chop_power > 0 and 0 == int(rand.next() / chop_power)):
+
+                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.")
-                        world_db["GOD_FAVOR"] -= 10
+                        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
@@ -460,10 +536,12 @@ def command_worldactive(worldactive_string):
                     x = pos % world_db["MAP_LENGTH"]
                     world_db["altar"] = (y, x)
                     altar_found = True
-            valid_slippers = world_db["SLIPPERS"] in world_db["ThingTypes"]
-            valid_plant0 = world_db["PLANT_0"] 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 and valid_plant0:
+                    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])
@@ -476,24 +554,6 @@ def command_worldactive(worldactive_string):
             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 command_plant0(str_int):
-    val = integer_test(str_int, 0)
-    if None != val:
-        world_db["PLANT_0"] = val
-        if world_db["WORLD_ACTIVE"] and \
-           world_db["PLANT_0"] not in world_db["ThingTypes"]:
-            world_db["WORLD_ACTIVE"] = 0
-            print("PLANT_0 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
@@ -538,6 +598,37 @@ def play_use(str_arg):
                       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 world_db["ThingTypes"][type]["TT_TOOL"] == "fertilizer":
+                    pos = t["T_POSY"] * world_db["MAP_LENGTH"] + t["T_POSX"]
+                    if not world_db["MAP"][pos] == ord("."):
+                        log("Can only make soil out of NON-SOIL earth.")
+                        return
                 elif type != world_db["SLIPPERS"] and not \
                         world_db["ThingTypes"][type]["TT_TOOL"] == "food":
                     log("You CAN'T consume this thing.")
@@ -547,6 +638,81 @@ def play_use(str_arg):
             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)
+
+def calc_effort(thing_action, thing):
+    from math import sqrt
+    effort = thing_action["TA_EFFORT"]
+    if thing_action["TA_NAME"] == "move":
+        typ = thing["T_TYPE"]
+        max_hp = (world_db["ThingTypes"][typ]["TT_LIFEPOINTS"])
+        effort = int(effort / sqrt(max_hp))
+        effort = 1 if effort == 0 else effort
+    return effort
+
 strong_write(io_db["file_out"], "PLUGIN PleaseTheIslandGod\n")
 
 if not "GOD_FAVOR" in world_db:
@@ -557,7 +723,23 @@ 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 "TOOL_1" in world_db:
+    world_db["TOOL_1"] = 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 += ":_"
@@ -579,8 +761,13 @@ 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["FAVOR_STAGE"] = (1, False, setter(None, "FAVOR_STAGE", 0, 1))
-commands_db["SLIPPERS"] = (1, False, command_slippers)
-commands_db["PLANT_0"] = (1, False, command_plant0)
+commands_db["SLIPPERS"] = (1, False, specialtypesetter("SLIPPERS"))
+commands_db["TOOL_0"] = (1, False, specialtypesetter("TOOL_0"))
+commands_db["TOOL_1"] = (1, False, specialtypesetter("TOOL_1"))
+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)
 
@@ -588,4 +775,5 @@ 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
+server.config.misc.decrement_lifepoints_func = decrement_lifepoints
+server.config.misc.calc_effort_func = calc_effort