home · contact · privacy
Plugin: Fix bug by typo.
[plomrogue] / plugins / server / PleaseTheIslandGod.py
index fba1341d180fd8e648478f19260bba7cad48022f..975159a14426dabe11459a4e11d8a4a00cd84465 100644 (file)
@@ -112,10 +112,10 @@ def thingproliferation(t, prol_map):
                 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.")
-            #    world_db["GOD_FAVOR"] += 750
+            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.")
+                world_db["GOD_FAVOR"] += 750
 
 def make_map():
     global rand
@@ -252,7 +252,7 @@ def actor_pickup(t):
             if t == world_db["Things"][0]:
                 log("You PICK UP an object.")
     elif t == world_db["Things"][0]:
-        log("Can't pick up object: No storage room to carry more.")
+        log("CAN'T pick up object: No storage room to carry more.")
 
 
 def actor_drop(t):
@@ -301,22 +301,27 @@ def actor_use(t):
                 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 "
+                    + " 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]
             t["T_SATIATION"] += world_db["ThingTypes"][type]["TT_TOOLPOWER"]
             if t == world_db["Things"][0]:
-                log("You CONSUME this object.")
+                log("You CONSUME this thing.")
         elif t == world_db["Things"][0]:
             log("You try to use this object, but FAIL.")
 
 def decrement_lifepoints(t):
     t["T_LIFEPOINTS"] -= 1
+    live_type = t["T_TYPE"]
     _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"]
@@ -332,7 +337,25 @@ def decrement_lifepoints(t):
             t["T_MEMMAP"] = False
             t["T_MEMDEPTHMAP"] = False
             t["T_MEMTHING"] = []
-        return sadness
+            n_species = len([id for id in world_db["Things"]
+                             if world_db["Things"][id]["T_TYPE"] == live_type])
+            if 0 == n_species:
+                from server.new_thing import new_Thing
+                if world_db["FAVOR_STAGE"] >= 3 and \
+                    live_type == world_db["ANIMAL_0"]:
+                    world_db["GOD_FAVOR"] += 3000
+                    log("CONGRATULATIONS! The "
+                        + world_db["ThingTypes"][live_type]["TT_NAME"]
+                        + " species has died out. The Island God is pleased.")
+                else:
+                    id = id_setter(-1, "Things")
+                    world_db["Things"][id] = new_Thing(live_type,
+                                                       world_db["altar"])
+                    log("The "
+                        + world_db["ThingTypes"][live_type]["TT_NAME"]
+                        + " species has temporarily died out. "
+                        + "One new-born is spawned at the altar.")
+        return world_db["ThingTypes"][t["T_TYPE"]]["TT_LIFEPOINTS"]
     return 0
 
 def actor_move(t):
@@ -395,7 +418,42 @@ def actor_move(t):
         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:
+        elif world_db["FAVOR_STAGE"] == 2 and world_db["GOD_FAVOR"] >= 500:
+            world_db["FAVOR_STAGE"] = 3
+            log("The Island God speaks to you: \"The "
+                + world_db["ThingTypes"][world_db["ANIMAL_0"]]["TT_NAME"]
+                + " has lately become a pest. These creatures do not please me"
+                + " as much as they used to do. Exterminate them all. I will c"
+                + "ount each kill to your favor. To help you with the hunting,"
+                + " I grant you the empathy and knowledge to read animals.\"")
+            log("You will now see animals' health bars, and activities (\"m\": "
+                + "moving (maybe for an attack), \"u\": eating, \"p\": picking"
+                + " something up; no letter: waiting).")
+            world_db["EMPATHY"] = 1
+        elif world_db["FAVOR_STAGE"] == 3 and world_db["GOD_FAVOR"] < 5000:
+            log("The Island God will talk again when it favors you to >=5000 "
+                 +" points.")
+        elif world_db["FAVOR_STAGE"] == 3 and world_db["GOD_FAVOR"] >= 5000:
+            world_db["FAVOR_STAGE"] = 4
+            log("The Island God speaks to you: \"You know what animal I find "
+                 + "the cutest? The "
+                 + world_db["ThingTypes"][world_db["ANIMAL_1"]]["TT_NAME"]
+                 + "! I think what this islands clearly needs more of is "
+                 + world_db["ThingTypes"][world_db["ANIMAL_1"]]["TT_NAME"]
+                 + "s. Why don't you help? Support them. Make sure they are "
+                 + "well, and they will multiply faster. From now on, I will "
+                 + "count each new-born "
+                 + world_db["ThingTypes"][world_db["ANIMAL_1"]]["TT_NAME"]
+                 + " (not spawned by me due to undo an extinction event) "
+                 + "greatly to your favor. To help you with the feeding, here "
+                 + "is something to make the ground bear more consumables.")
+            id = id_setter(-1, "Things")
+            world_db["Things"][id] = new_Thing(world_db["TOOL_1"],
+                                               world_db["altar"])
+        elif world_db["GOD_FAVOR"] < 20000:
+            log("The Island God will talk again when it favors you to >=20000 "
+                 +" points.")
+        elif world_db["GOD_FAVOR"] > 20000:
             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"
@@ -426,8 +484,8 @@ def actor_move(t):
                   if world_db["Things"][id]["T_POSX"] == move_result[2]]
         if len(hitted):
             hit_id = hitted[0]
+            hitted_type = world_db["Things"][hit_id]["T_TYPE"]
             if t == world_db["Things"][0]:
-                hitted_type = world_db["Things"][hit_id]["T_TYPE"]
                 hitted_name = world_db["ThingTypes"][hitted_type]["TT_NAME"]
                 log("You WOUND " + hitted_name + ".")
                 world_db["GOD_FAVOR"] -= 1
@@ -435,8 +493,11 @@ def actor_move(t):
                 hitter_name = world_db["ThingTypes"][t["T_TYPE"]]["TT_NAME"]
                 log(hitter_name +" WOUNDS you.")
             test = decrement_lifepoints_func(world_db["Things"][hit_id])
-            if test and t == world_db["Things"][0]:
-                world_db["GOD_FAVOR"] -= test 
+            if test and world_db["FAVOR_STAGE"] >= 3 and \
+               hitted_type == world_db["ANIMAL_0"]:
+                world_db["GOD_FAVOR"] += 125
+            elif test and t == world_db["Things"][0]:
+                world_db["GOD_FAVOR"] -= 2 * test
             return
         if (ord("X") == world_db["MAP"][pos]
             or ord("|") == world_db["MAP"][pos]):
@@ -598,14 +659,14 @@ def play_use(str_arg):
                     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.")
+                        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.")
+                         log("CAN'T build when standing objects.")
                          return
                     wood_id = None
                     for id in t["T_CARRIES"]:
@@ -615,10 +676,18 @@ def play_use(str_arg):
                             wood_id = id
                             break
                     if wood_id == None:
-                        log("You can't use a "
+                        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 world_db["ThingTypes"][type]["TT_TOOL"] == "wood":
+                        log("To use wood, you NEED a carpentry tool.")
+                        return
                 elif type != world_db["SLIPPERS"] and not \
                         world_db["ThingTypes"][type]["TT_TOOL"] == "food":
                     log("You CAN'T consume this thing.")
@@ -628,7 +697,7 @@ def play_use(str_arg):
             else:
                 print("Illegal inventory index.")
 
-def specialtypesetter(name):  # #
+def specialtypesetter(name):
     def helper(str_int):
         val = integer_test(str_int, 0)
         if None != val:
@@ -639,6 +708,86 @@ def specialtypesetter(name):  # #
                 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
+
+def play_pickup():
+    """Try "pickup" as player's T_COMMAND"."""
+    if action_exists("pickup"):
+        t = world_db["Things"][0]
+        ids = [id for id in world_db["Things"] if id
+               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"]]
+        if not len(ids):
+            log("NOTHING to pick up.")
+        elif len(t["T_CARRIES"]) >= world_db["ThingTypes"][t["T_TYPE"]] \
+                ["TT_STORAGE"]:
+            log("CAN'T pick up: No storage room to carry anything more.")
+        else:
+            set_command("pickup")
+
 strong_write(io_db["file_out"], "PLUGIN PleaseTheIslandGod\n")
 
 if not "GOD_FAVOR" in world_db:
@@ -651,12 +800,26 @@ 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 "ANIMAL_0" in world_db:
+    world_db["ANIMAL_0"] = 0
+if not "ANIMAL_1" in world_db:
+    world_db["ANIMAL_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
-world_db["specials"] = ["SLIPPERS", "PLANT_0", "PLANT_1", "TOOL_0", "LUMBER"]
+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", "TOOL_1",
+    "LUMBER", "ANIMAL_0", "ANIMAL_1"]
 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 += ":_"
@@ -680,14 +843,20 @@ 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, specialtypesetter("SLIPPERS"))
 commands_db["TOOL_0"] = (1, False, specialtypesetter("TOOL_0"))
+commands_db["TOOL_1"] = (1, False, specialtypesetter("TOOL_1"))
+commands_db["ANIMAL_0"] = (1, False, specialtypesetter("ANIMAL_0"))
+commands_db["ANIMAL_1"] = (1, False, specialtypesetter("ANIMAL_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)
+commands_db["pickup"] = (0, False, play_pickup)
 
 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