/* Eventually this will handle other kinds of flow
* materials, but for now it is hardcoded just to be water.
* Handle this with EXTREME care. It can very easily
* overwhelm your mud.
*/
#include <lib.h>
#include ROOMS_H
#include <vendor_types.h>
#include <meal_types.h>
#include <medium.h>
#include <respiration_types.h>
inherit LIB_FLASK;
mixed *neighbors = ({});
mixed *rooms = ({});
mixed *first = ({});
mixed *second = ({});
mixed *third = ({});
mixed *fourth = ({});
static int press;
static string FlowType = "water";
static string ThisFile;
static int HBOverride, orig_medium, orig_resp, DoorStopped = 1;
void shb(int i){
if(!HBOverride) set_heart_beat(i);
}
void create(){
::create();
SetKeyName("flow object");
SetId( ({"flow","flood","object","water","overflow"}) );
SetAdjectives( ({"flow","flood"}) );
SetShort("some water");
SetLong("This is an overflow of water.");
SetMass(20);
SetInvis(1);
SetBaseCost("silver",10);
SetVendorType(VT_TREASURE);
shb(5);
SetNoCondition(1);
SetPreventGet("You can't get that.");
if(FlowType == "water"){
SetFlaskContents("water");
SetFlaskUses(2);
SetStrength(5);
SetMaxFlask(2);
SetEverFill(1);
SetMealType(MEAL_DRINK);
}
ThisFile = base_name(this_object());
}
void eventFlood(mixed targets){
object env = environment();
if(!env) return;
foreach(mixed room in scramble_array(targets)){
mixed flooder;
object arch = load_object(ROOM_ARCH);
if(!room) break;
if(environment() == room) continue;
if(press < 2) break;
flooder = filter(all_inventory(room),
(: base_name($1) == ThisFile :) );
if(sizeof(flooder)){
if(sizeof(flooder) > 1) flooder[1..]->eventDestruct();
flooder = flooder[0];
}
else {
int flood;
flooder = new(ThisFile);
flooder->SetProperty("LastLocation", base_name(env));
flood = flooder->eventMove(room);
if(!flood) continue;
tell_room(room,"This area starts flooding with water!");
tell_room(arch,base_name(room)+" has been flooded.");
}
if(flooder->GetPressure() < press){
if(press && flooder->AddPressure(1)) press--;
if(press < 2){
tell_room(env,"The water recedes a bit.");
}
}
}
}
void CheckRooms(){
mixed ret = ({});
object env;
mapping Exits;
env = room_environment();
if(press < 1){
eventDestruct();
return;
}
if(clonep() && environment() && !living(environment()) && press > 1){
}
if(env){
Exits = env->GetExitMap();
Exits += env->GetEnterMap();
foreach(mixed key, mixed val in Exits){
mixed door = env->GetDoor(key);
int ok =1;
if(door){
if(DoorStopped && door->GetClosed() && !door->GetPerforated()){
ok = 0;
}
else{
}
}
if(ok) ret += ({ val });
}
}
if(sizeof(ret)) rooms = ret;
if(press > 1){
rooms = ({});
foreach(mixed key, mixed val in Exits){
if(member_array(val, ret) == -1) continue;
if(key == "down") first += ({ load_object(val) });
else if(key == "up") fourth += ({ load_object(val) });
else rooms += ({ load_object(val) });
}
foreach(mixed room in rooms){
mixed flooder;
if(press < 2) break;
flooder = filter(all_inventory(room),
(: base_name($1) == ThisFile :) );
if(!sizeof(flooder)) second += ({ room });
else third += ({ room });
}
if(sizeof(first) && press > 0) eventFlood(first);
if(sizeof(second) && press > 1) eventFlood(second);
if(sizeof(third) && press > 1) eventFlood(third);
if(sizeof(fourth) && press > 2) eventFlood(fourth);
}
}
void heart_beat(){
object env;
if(!clonep()) return;
env = environment();
if(!env || living(env) || press < 2){
shb(240);
return;
}
CheckRooms();
if(press > 1 && env){
env->SetRespirationType(R_WATER);
}
else if(env){
env->SetRespirationType(orig_resp);
}
shb(90);
}
int AddPressure(int x){
int i;
object env = environment();
if(!env) return 0;
i = env->GetFlowLimit();
if(i && x > 0 && press >= i) return 0;
if(x){
if(press == 1 && x > 0){
tell_room(env,"The area completely fills with water!");
}
if(press > 1 && x < 0){
tell_room(env,"The water recedes a bit.");
}
press += x;
}
return press;
}
varargs int eventPrint(string msg, mixed arg2, mixed arg3){
msg = lower_case(msg);
if(grepp(msg, "opens") || grepp(msg, "closes") ){
CheckRooms();
shb(5);
}
return 1;
}
int GetPressure(){
return press;
}
int SetPressure(int i){
press = i;
return press;
}
int GetHBOverride(){
return HBOverride;
}
int SetHBOverride(int x){
if(x) HBOverride = 1;
else HBOverride = 0;
return HBOverride;
}
int GetDoorStopped(){
return DoorStopped;
}
int SetDoorStopped(int i){
DoorStopped = i;
return DoorStopped;
}
void init(){
::init();
}
string GetRoomAffectLong(){
if(press > 1){
return "\n%^CYAN%^This area is completely filled with water!%^RESET%^";
}
if(press == 1){
return "\n%^BOLD%^%^BLUE%^This area is flooded with water.%^RESET%^";
}
return "";
}
int eventDestruct(){
object env = environment();
if(env){
env->SetRespirationType(orig_resp);
}
return ::eventDestruct();
}
int eventMove(mixed dest){
object env;
int ret = ::eventMove(dest);
if(ret && env = room_environment(this_object())){
orig_resp = env->GetRespirationType();
}
return ret;
}
int GeteventPrints() { return 1; }
