Post by Gromlakh on Jun 25, 2008 1:44:55 GMT
Here's my contribution to the '06 Edu competition (competition WINNER, that is...*strut*). I believe this was made at the same time as Slacker's unbelievably kickass mirror.
We had some size limitations on objects, so I wasn't able to do everything with it that I wanted. I had some grand designs on using this to make a new type of drink, one that would be sipped instead of gulped all in one go. Players would have to buy/install a wet bar in their house, then keep it stocked with various ingredients to be able to mix drinks properly. I don't know if Balance would have allowed that to heal players (similar to a pipe/gum), but I have in my mind this awesome image of smashing some NPCs while juggling a staff, a wand, and a glass of sazerac...
Here we go:
#pragma strict_types
inherit "/w/adinos/houses/baseobj/buildable";
void create()
{
::create();
set_alias( ({"bar","wetbar","wet bar","massive bar","massive wet bar",
"massive wetbar","alcohol","alcohols","drinks","drink"}));
set_short("a massive wet bar");
set_long("A massive wet bar stands before you. The bar appears to be fully "
"stocked with a wide variety of alcohols from across the realm. "
"You begin to feel thirsty. A list of drinks is attached to the "
"front of the bar.");
set_smell("The wonderous smell of alcohol rises from the wetbar and makes "
"your mouth water with anticipation.");
set_identify("You see a frosted purple elephant seal surfing a Jell-O "
"inner tube across a sea of fried kniggets with his friend "
"the dwarf giant. He becons you to join them.");
set_sound("Who cares what it sounds like? It's a BAR\; get to drinking!.");
set_taste("If you've drank so much that you're tasting the bar instead of "
"the liquor, perhaps it is time to go to sleep.");
set_touch("The wet bar feels like it is a bar, completely stocked with an "
"amazing selection of alcohol, which you desperately want to "
"drink.");
set_value(5000000);
set_material("wood");
set_weight(15);
set_msg_build("# &0 the instructions carefully and &1 in building a "
"massive wet bar.@read reads succeed succeeds");
set_msg_noremove("It would not be possible to remove the wet bar from this "
"room. You would need to demolish it.");
set_msg_destroy("# &0 a massive wet bar.@demolish demolishes");
//set_unique_id(OMG_WETBAR_ID);
set_unique_str("You have already installed a wet bar in this room.");
set_msg_out("This wet bar should not be installed outdoors, as it would "
"lead to unconscionable dilution of your alcoholic drinks. "
"Perhaps you should instead choose an indoor room?");
}
void init()
{
::init();
add_action("drink_list","list");
add_action("drink_mixer","mix");
add_action("drink_reader","read");
}
int drink_list()
{
writef("Despite the wide variety of alcohol in the bar, you feel saddened "
"as you remember that only two people have contributed drink "
"recipes to you. As you peruse the list of available options, you "
"ponder what strange effects their drinks may have on you and vow "
"to discover more recipes. \n\n");
this_player()->preformat(1);
write("--------------------------------------------\n"
"| MIX 'O MATIC |\n"
"| |\n"
"|1. Lunger's Embalmer Martini |\n"
"|2. SerIn's Huggybear Flower Wine |\n"
"| |\n"
"|USAGE: mix <#> |\n"
"--------------------------------------------\n");
this_player()->preformat(0);
return 1;
}
int drink_reader(string arg)
{
if(arg=="list") drink_list();
return 1;
}
int drink_mixer(string arg)
{
if(arg=="1") {
writef("You carefully follow the recipe provided by Lunger, mix up the "
"ingredients, and quickly suck down the martini. \n\n");
writef( ({"As you drink the martini, you feel a strange urge to complain "
"about Paldin. \n",
"As you drink the martini, you feel an uncontrollable urge to "
"code an upgrade to necros. \n",
"As you drink the martini, you feel an odd desire to "
"downgrade rangers. \n"})
[random(3)]); }
else if(arg=="2") {
writef("You carefully follow the recipe provided by SerIn, mix up the "
"ingredients, and greedily devour the delicious flower wine. \n\n");
writef( ({"As you drink the flower wine, you suddenly want to give an "
"elephant to everyone in the room. \n",
"As you drink the flower wine, you have a strange desire to "
"geoclaim for hours on end. \n",
"As you drink the flower wine, you begin to realize that you "
"need to idle for months on end as a rock. \n"})
[random(3)]); }
else
writef("What did you want to mix?\n");
return 1;
}
void setup()
{
::setup();
set_alias("bar");
}
string extra_long()
{
if (!query_installed())
return 0;
return "A massive wet bar stands in the corner.";
}
We had some size limitations on objects, so I wasn't able to do everything with it that I wanted. I had some grand designs on using this to make a new type of drink, one that would be sipped instead of gulped all in one go. Players would have to buy/install a wet bar in their house, then keep it stocked with various ingredients to be able to mix drinks properly. I don't know if Balance would have allowed that to heal players (similar to a pipe/gum), but I have in my mind this awesome image of smashing some NPCs while juggling a staff, a wand, and a glass of sazerac...
Here we go:
#pragma strict_types
inherit "/w/adinos/houses/baseobj/buildable";
void create()
{
::create();
set_alias( ({"bar","wetbar","wet bar","massive bar","massive wet bar",
"massive wetbar","alcohol","alcohols","drinks","drink"}));
set_short("a massive wet bar");
set_long("A massive wet bar stands before you. The bar appears to be fully "
"stocked with a wide variety of alcohols from across the realm. "
"You begin to feel thirsty. A list of drinks is attached to the "
"front of the bar.");
set_smell("The wonderous smell of alcohol rises from the wetbar and makes "
"your mouth water with anticipation.");
set_identify("You see a frosted purple elephant seal surfing a Jell-O "
"inner tube across a sea of fried kniggets with his friend "
"the dwarf giant. He becons you to join them.");
set_sound("Who cares what it sounds like? It's a BAR\; get to drinking!.");
set_taste("If you've drank so much that you're tasting the bar instead of "
"the liquor, perhaps it is time to go to sleep.");
set_touch("The wet bar feels like it is a bar, completely stocked with an "
"amazing selection of alcohol, which you desperately want to "
"drink.");
set_value(5000000);
set_material("wood");
set_weight(15);
set_msg_build("# &0 the instructions carefully and &1 in building a "
"massive wet bar.@read reads succeed succeeds");
set_msg_noremove("It would not be possible to remove the wet bar from this "
"room. You would need to demolish it.");
set_msg_destroy("# &0 a massive wet bar.@demolish demolishes");
//set_unique_id(OMG_WETBAR_ID);
set_unique_str("You have already installed a wet bar in this room.");
set_msg_out("This wet bar should not be installed outdoors, as it would "
"lead to unconscionable dilution of your alcoholic drinks. "
"Perhaps you should instead choose an indoor room?");
}
void init()
{
::init();
add_action("drink_list","list");
add_action("drink_mixer","mix");
add_action("drink_reader","read");
}
int drink_list()
{
writef("Despite the wide variety of alcohol in the bar, you feel saddened "
"as you remember that only two people have contributed drink "
"recipes to you. As you peruse the list of available options, you "
"ponder what strange effects their drinks may have on you and vow "
"to discover more recipes. \n\n");
this_player()->preformat(1);
write("--------------------------------------------\n"
"| MIX 'O MATIC |\n"
"| |\n"
"|1. Lunger's Embalmer Martini |\n"
"|2. SerIn's Huggybear Flower Wine |\n"
"| |\n"
"|USAGE: mix <#> |\n"
"--------------------------------------------\n");
this_player()->preformat(0);
return 1;
}
int drink_reader(string arg)
{
if(arg=="list") drink_list();
return 1;
}
int drink_mixer(string arg)
{
if(arg=="1") {
writef("You carefully follow the recipe provided by Lunger, mix up the "
"ingredients, and quickly suck down the martini. \n\n");
writef( ({"As you drink the martini, you feel a strange urge to complain "
"about Paldin. \n",
"As you drink the martini, you feel an uncontrollable urge to "
"code an upgrade to necros. \n",
"As you drink the martini, you feel an odd desire to "
"downgrade rangers. \n"})
[random(3)]); }
else if(arg=="2") {
writef("You carefully follow the recipe provided by SerIn, mix up the "
"ingredients, and greedily devour the delicious flower wine. \n\n");
writef( ({"As you drink the flower wine, you suddenly want to give an "
"elephant to everyone in the room. \n",
"As you drink the flower wine, you have a strange desire to "
"geoclaim for hours on end. \n",
"As you drink the flower wine, you begin to realize that you "
"need to idle for months on end as a rock. \n"})
[random(3)]); }
else
writef("What did you want to mix?\n");
return 1;
}
void setup()
{
::setup();
set_alias("bar");
}
string extra_long()
{
if (!query_installed())
return 0;
return "A massive wet bar stands in the corner.";
}