/*************************************************************************** * Original Diku Mud copyright (C) 1990, 1991 by Sebastian Hammer, * * Michael Seifert, Hans Henrik St{rfeldt, Tom Madsen, and Katja Nyboe. * * * * Merc Diku Mud improvments copyright (C) 1992, 1993 by Michael * * Chastain, Michael Quan, and Mitchell Tse. * * * * In order to use any part of this Merc Diku Mud, you must comply with * * both the original Diku license in 'license.doc' as well the Merc * * license in 'license.txt'. In particular, you may not remove either of * * these copyright notices. * * * * Dystopia Mud improvements copyright (C) 2000, 2001 by Brian Graversen * * * * Much time and thought has gone into this software and you are * * benefitting. We hope that you share your changes too. What goes * * around, comes around. * ***************************************************************************/ #include <sys/types.h> #include <stdio.h> #include <stdlib.h> #include <string.h> #include <time.h> #include "merc.h" void check_effect_pot args ( ( CHAR_DATA *ch, OBJ_DATA *obj ) ); void random_cook_say args ( ( CHAR_DATA *ch ) ); bool know_ingredient args ( ( CHAR_DATA *ch, int value ) ); void do_hobbitarmor(CHAR_DATA *ch, char *argument) { OBJ_INDEX_DATA *pObjIndex; OBJ_DATA *obj; char arg[MAX_INPUT_LENGTH]; int vnum = 0; argument = one_argument( argument, arg ); if (IS_NPC(ch)) return; if( !IS_CLASS(ch, CLASS_HOBBIT)) { send_to_char("What?\n\r",ch); return; } if (arg[0] == '\0') { send_to_char("Please specify which piece of hobbit armor you wish to make: Knife Mace\n\r" "Bracer Charm Ring Vestment Hat Leggings Boots Gloves Sleeves Cloak Belt Mask Pot.\n\r",ch); return; } if ( ch->practice < 60 ) { send_to_char("It costs 60 points of primal to create hobbit equipment.\n\r",ch); return; } if (!str_cmp(arg,"knife")) vnum = 33240; else if (!str_cmp(arg,"mace")) vnum = 33241; else if (!str_cmp(arg,"bracer")) vnum = 33242; else if (!str_cmp(arg,"charm")) vnum = 33243; else if (!str_cmp(arg,"ring")) vnum = 33244; else if (!str_cmp(arg,"vestment")) vnum = 33245; else if (!str_cmp(arg,"hat")) vnum = 33246; else if (!str_cmp(arg,"leggings")) vnum = 33247; else if (!str_cmp(arg,"boots")) vnum = 33248; else if (!str_cmp(arg,"gloves")) vnum = 33249; else if (!str_cmp(arg,"sleeves")) vnum = 33250; else if (!str_cmp(arg,"cloak")) vnum = 33251; else if (!str_cmp(arg,"belt")) vnum = 33252; else if (!str_cmp(arg,"mask")) vnum = 33253; else if (!str_cmp(arg,"pot")) vnum = 33254; else { do_hobbitarmor(ch,""); return; } if ( vnum == 0 || (pObjIndex = get_obj_index( vnum )) == NULL) { send_to_char("Missing object, please inform a God.\n\r",ch); return; } obj = create_object(pObjIndex, 50); obj->questowner = str_dup(ch->pcdata->switchname); obj->ownerid = ch->pcdata->playerid; obj_to_char(obj, ch); ch->practice -= 60; act("$p appears in your hands.",ch,obj,NULL,TO_CHAR); act("$p appears in $n's hands.",ch,obj,NULL,TO_ROOM); return; } void do_bettercook(CHAR_DATA *ch, char *argument) { char arg[MAX_INPUT_LENGTH]; int new_power; argument = one_argument( argument, arg ); if (IS_NPC(ch)) return; if( !IS_CLASS(ch, CLASS_HOBBIT)) { send_to_char("What?\n\r",ch); return; } if (arg[0] == '\0') { send_to_char("What secrets of the kitchen would you like to explore? [spice, vegetables, meat, cake]\n\r",ch); return; } if (!str_cmp(arg,"cake")) new_power = HOBBIT_CAKE; else if (!str_cmp(arg,"spice")) new_power = HOBBIT_SPICE; else if (!str_cmp(arg,"meat")) new_power = HOBBIT_MEAT; else if (!str_cmp(arg,"vegetables")) new_power = HOBBIT_VEGETABLES; else { send_to_char("No such dish.\n\r",ch); return; } if (ch->pcdata->powers[new_power] > 3) { send_to_char("You already know all those secrets.\n\r",ch); return; } if (ch->practice < (ch->pcdata->powers[new_power] + 1) * 40) { send_to_char("You don't haven enough primal to learn this (40 primal per level).\n\r",ch); return; } ch->pcdata->powers[new_power]++; ch->pcdata->powers[HOBBIT_DISHES]++; ch->practice -= ch->pcdata->powers[new_power] * 40; send_to_char("You learn the ancient secret of a new ingredient.\n\r",ch); return; } void do_dishes(CHAR_DATA *ch, char *argument) { int i; bool found = FALSE; if (IS_NPC(ch)) return; if( !IS_CLASS(ch, CLASS_HOBBIT)) { send_to_char("What?\n\r",ch); return; } for (i = 1 ; i <= ch->pcdata->powers[HOBBIT_SPICE]; i++) { if (i == 1) send_to_char("You have uncovered the ancient secrets of : Pepper",ch); if (i == 2) send_to_char(" Chilli",ch); if (i == 3) send_to_char(" Garlic",ch); if (i == 4) send_to_char(" Curry",ch); found=TRUE; } if (found) send_to_char("\n\r",ch); for (i = 1 ; i <= ch->pcdata->powers[HOBBIT_VEGETABLES]; i++) { if (i == 1) send_to_char("You have uncovered the ancient secrets of : Carrot",ch); if (i == 2) send_to_char(" Potato",ch); if (i == 3) send_to_char(" Tomato",ch); if (i == 4) send_to_char(" Mushroom",ch); found=TRUE; } if (found) send_to_char("\n\r",ch); for (i = 1 ; i <= ch->pcdata->powers[HOBBIT_CAKE]; i++) { if (i == 1) send_to_char("You have uncovered the ancient secrets of : Sugar",ch); if (i == 2) send_to_char(" Chocolate",ch); if (i == 3) send_to_char(" Cream",ch); if (i == 4) send_to_char(" Cherry",ch); found=TRUE; } if (found) send_to_char("\n\r",ch); for (i = 1 ; i <= ch->pcdata->powers[HOBBIT_MEAT]; i++) { if (i == 1) send_to_char("You have uncovered the ancient secrets of : Pork",ch); if (i == 2) send_to_char(" Beef",ch); if (i == 3) send_to_char(" Herring",ch); if (i == 4) send_to_char(" Sausage",ch); found=TRUE; } if (found) send_to_char("\n\r",ch); if (!found) send_to_char("You know nothing!\n\r",ch); return; } void do_cook(CHAR_DATA *ch, char *argument) { char arg[MAX_INPUT_LENGTH]; char buf[MAX_STRING_LENGTH]; OBJ_DATA *obj; int i = 0, value = 0, j; one_argument(argument,arg); if (IS_NPC(ch)) return; if (!IS_CLASS(ch, CLASS_HOBBIT)) { send_to_char("Huh?\n\r",ch); return; } if (arg[0] == '\0') { send_to_char("Cook what? (ingredient or spill (to empty))\n\r",ch); return; } if ((obj = get_eq_char( ch, WEAR_SPECIAL )) == NULL) { send_to_char("your not ready to cook, get your pot out first.\n\r",ch); return; } if (obj->item_type != ITEM_COOKINGPOT) { send_to_char("your not ready to cook, get your pot out first.\n\r",ch); return; } if (!str_cmp(arg,"spill")) { obj->value[0]=0; obj->value[1]=0; obj->value[2]=0; obj->value[3]=0; send_to_char("You spill the contents of the pot onto the floor!\n\r",ch); return; } if (ch->mana < 100) { send_to_char("You don't have enough mana to summon the blessings of the great chef.\n\r",ch); return; } if (ch->move < 100) { send_to_char("Your to tired to cook anything.\n\r",ch); return; } while (obj->value[i] != 0 && i < 4) i++; if (obj->value[i] == 0) { /* Bits, so the order in which we cook doesn't matter :) */ if (!str_cmp(arg,"pepper")) value = 1; else if (!str_cmp(arg,"chilli")) value = 2; else if (!str_cmp(arg,"curry")) value = 4; else if (!str_cmp(arg,"garlic")) value = 8; else if (!str_cmp(arg,"beef")) value = 16; else if (!str_cmp(arg,"pork")) value = 32; else if (!str_cmp(arg,"sausage")) value = 64; else if (!str_cmp(arg,"herring")) value = 128; else if (!str_cmp(arg,"cream")) value = 256; else if (!str_cmp(arg,"sugar")) value = 512; else if (!str_cmp(arg,"chocolate")) value = 1024; else if (!str_cmp(arg,"cherry")) value = 2048; else if (!str_cmp(arg,"potato")) value = 4096; else if (!str_cmp(arg,"carrot")) value = 8192; else if (!str_cmp(arg,"mushroom")) value = 16384; else if (!str_cmp(arg,"tomato")) value = 32768; else { send_to_char("You know of no such ingredience.\n\r",ch); return; } if (!know_ingredient(ch,value)) return; for (j = 0; j < i; j++) { if (obj->value[j] == value) { send_to_char("That's already in the pot.\n\r", ch); return; } } obj->value[i] = value; sprintf(buf,"You throw the strange and exotic ingredient known as #s%s#n into the pot.\n\r", arg); send_to_char(buf,ch); ch->move -= 100; ch->mana -= 100; if (i == 3) check_effect_pot(ch,obj); } else { do_say(ch, "Hmmm, there really isn't any space in this pot for anything else, I'd better empty it."); do_cook(ch, "spill"); } return; } void random_cook_say(CHAR_DATA *ch) { int i = number_range(1,4); switch (i) { default: do_say(ch, "ooOOoo, I bet this will taste just wonderful!"); break; case (1): do_say(ch,"There can only be one..... And I'm Da Cook!");break; case (2): do_say(ch,"Get out of my kitchen or....");break; case (3): do_say(ch,"Boggles, wonder how this will taste");break; case (4): do_say(ch,"Soup?!?!?! This is no stinking soup, it's a super deluxe pot o'soup!");break; case (5): do_say(ch," ");break; } return; } void check_effect_pot(CHAR_DATA *ch, OBJ_DATA *obj) { CHAR_DATA *victim; int i=0; int sn; int level = ch->pcdata->powers[HOBBIT_DISHES]*3; if (obj->pIndexData->vnum == 33255) // mastery item level += 15; // empty pot and get the number i += obj->value[0]; obj->value[0]=0; i += obj->value[1]; obj->value[1]=0; i += obj->value[2]; obj->value[2]=0; i += obj->value[3]; obj->value[3]=0; if (i == 16772) // food frenzy : mushroom, herring, cream, curry { victim = ch; sn = skill_lookup("food frenzy"); if (sn > 0) (*skill_table[sn].spell_fun) (sn,level,ch,victim); do_say(ch,"Fooooood, I need foooood!"); } else if (i == 10273) // Clay ball : pepper carrot cherry pork { do_say(ch,"Ick, this is all sticky, here hold this."); if ((victim = ch->fighting) == NULL) { send_to_char("Noone is close enough to hold it.\n\r",ch); return; } sn = skill_lookup("clay ball"); if (sn > 0) (*skill_table[sn].spell_fun) (sn,level,ch,victim); WAIT_STATE(ch,8); return; } else if (i == 34834) // Sweet dreams : chilli tomato cherry beef { do_say(ch,"oooOOOooo, this rocks, try and give it a taste, I've never tasted anything like it"); if ((victim = ch->fighting) == NULL) { send_to_char("Noone is close enough to taste it.\n\r",ch); return; } if (number_range(1,3)==2) { send_to_char("They refuse to take a sip, what a pansy.\n\r",ch); return; } send_to_char("Damn this tastes good, better sheath those weapons so you can get a better grip on the spoon.\n\r",victim); do_say(victim,"oooOOOooo, your right, it really tastes good"); do_sheath(victim,"both"); WAIT_STATE(victim,12); WAIT_STATE(ch,18); return; } else if (i == 17473) // Burning mocha : pepper mushroom chocolate sausage { if ((victim = ch->fighting) == NULL) { send_to_char("You spill the burning mocha on the floor, causing no damage.\n\r",ch); return; } WAIT_STATE(ch, 8); do_say(ch,"Take a sip of this!!!"); one_hit(ch, victim, gsn_mocha, 1); one_hit(ch, victim, gsn_mocha, 1); if (level > 40) one_hit(ch, victim, gsn_mocha, 0); if (level > 50) one_hit(ch, victim, gsn_mocha, 0); if (victim == NULL) return; if (!IS_SET(victim->affected_by, AFF_FLAMING)) { send_to_char("The burning mocha starts a fire.\n\r",ch); SET_BIT(victim->affected_by, AFF_FLAMING); } return; } else if (i == 4488) // Potato Grenade : garlic potato cream herring { CHAR_DATA *victim_next; int i; victim_next = ch->in_room->people; victim = victim_next; do_say(ch,"Eat my potato grenades, they are tasty as HeLL!!"); while (victim_next != NULL) { if (level > 40) i = number_range(1,3); else i = number_range(1,2); victim_next = victim->next_in_room; if (IS_NPC(victim)) { if (is_safe(ch,victim)) break; while (i-- > 0) one_hit(ch,victim,gsn_potato,1); } victim = victim_next; } WAIT_STATE(ch,14); } else if (i == 8516) // Foggie Woggie : curry carrot cream sausage { WAIT_STATE(ch, 24); do_say(ch,"Foggie Woggie, this sure is steamy"); if (number_range(1,3) == 2) return; if (ch->in_room != NULL) { if (IS_SET (ch->in_room->room_flags, ROOM_ARENA)) { send_to_char("Your in the arena.\n\r",ch); return; } } if (in_fortress(ch)) { send_to_char("Your in The Forbidden Fortress.\n\r", ch); return; } act("A cloud of steam erupts from the pot, and when it disappears $n is gone.",ch,NULL,NULL,TO_ROOM); stc("You are swallowed by the pot.\n\r",ch); if (ch->fighting != NULL) stop_fighting( ch, TRUE ); char_from_room(ch); char_to_room(ch, get_random_room(ch)); stc("You stick your head out of the pot and is somewhere else.\n\r",ch); act("$n appears from inside a cooking pot.",ch,NULL,NULL,TO_ROOM); do_look(ch,"auto"); return; } else if (i == 33314) // Hot Bread : chilli tomato sugar pork { do_say(ch,"Sweet Bread... yummi... wait, this is hot breads, oh well..."); ch->hit += number_range(10*level, 20*level); if (ch->hit > ch->max_hit) ch->hit = ch->max_hit; send_to_char("You feel much better.\n\r",ch); WAIT_STATE(ch,8); return; } else if (i == 4632) // Stinky stinky : garlic potato sugar beef { if (ch->in_room == NULL) return; do_say(ch,"Stinky Stinky, I can't eat this... try and smell it people"); for (victim = ch->in_room->people; victim != NULL; victim = victim->next_in_room) { if (victim == ch) continue; if (is_safe(ch,victim)) continue; if (victim->position != POS_STANDING && number_range(1,4)!=2) continue; send_to_char("You take one sniff of the smelly stuff in the pot, and drop to the ground.\n\r",victim); act("$n's eyes turns blank, and $e drops to the ground!",victim,NULL,NULL,TO_ROOM); stop_fighting(victim, TRUE); victim->position = POS_SLEEPING; } WAIT_STATE(ch,16); return; } else { send_to_char("nothing happens.\n\r",ch); random_cook_say(ch); } return; } bool know_ingredient(CHAR_DATA *ch, int value) { bool can_cook = TRUE; if (value == 1 && ch->pcdata->powers[HOBBIT_SPICE] < 1) can_cook = FALSE; if (value == 2 && ch->pcdata->powers[HOBBIT_SPICE] < 2) can_cook = FALSE; if (value == 4 && ch->pcdata->powers[HOBBIT_SPICE] < 4) can_cook = FALSE; if (value == 8 && ch->pcdata->powers[HOBBIT_SPICE] < 3) can_cook = FALSE; if (value == 16 && ch->pcdata->powers[HOBBIT_MEAT] < 2) can_cook = FALSE; if (value == 32 && ch->pcdata->powers[HOBBIT_MEAT] < 1) can_cook = FALSE; if (value == 64 && ch->pcdata->powers[HOBBIT_MEAT] < 4) can_cook = FALSE; if (value == 128 && ch->pcdata->powers[HOBBIT_MEAT] < 3) can_cook = FALSE; if (value == 256 && ch->pcdata->powers[HOBBIT_CAKE] < 3) can_cook = FALSE; if (value == 512 && ch->pcdata->powers[HOBBIT_CAKE] < 1) can_cook = FALSE; if (value == 1024 && ch->pcdata->powers[HOBBIT_CAKE] < 2) can_cook = FALSE; if (value == 2048 && ch->pcdata->powers[HOBBIT_CAKE] < 4) can_cook = FALSE; if (value == 4096 && ch->pcdata->powers[HOBBIT_VEGETABLES] < 2) can_cook = FALSE; if (value == 8192 && ch->pcdata->powers[HOBBIT_VEGETABLES] < 1) can_cook = FALSE; if (value == 16384 && ch->pcdata->powers[HOBBIT_VEGETABLES] < 4) can_cook = FALSE; if (value == 32768 && ch->pcdata->powers[HOBBIT_VEGETABLES] < 3) can_cook = FALSE; if (!can_cook) send_to_char("You don't know how to do that.\n\r",ch); return can_cook; } const struct flag_type hobbit_dishes[] = { { "empty", 0, TRUE }, { "pepper", 1, TRUE }, { "chilli", 2, TRUE }, { "curry", 4, TRUE }, { "garlic", 8, TRUE }, { "beef", 16, TRUE }, { "pork", 32, TRUE }, { "sausage", 64, TRUE }, { "herring", 128, TRUE }, { "cream", 256, TRUE }, { "sugar", 512, TRUE }, { "chocolate", 1024, TRUE }, { "cherry", 2048, TRUE }, { "potato", 4096, TRUE }, { "carrot", 8192, TRUE }, { "mushroom", 16384, TRUE }, { "tomato", 32768, TRUE }, { "", 0, 0 } };