/*This is some code I had been wanting to write since my early days and just kept forgetting about. Then I came accross a snippet on this site with no header 'http://www.mudmagic.com/codes/dl/405' and it gave my idea back. So after a little work I have put it together, so here it is*/ /*in merc.h under pc_data*/ long guild_marks; /*save.c under fwrite_char*/ if (ch->pcdata->guild_marks > 0) fprintf( fp, "Guild_Marks %ld\n",ch->pcdata->guild_marks); else fprintf( fp, "Guild_Marks %d\n", 0); /*save.c under fread_char*/ KEY ("Guild_Marks", ch->pcdata->guild_marks, fread_number( fp ) ); /*save.c in load_char_obj*/ ch->pcdata->guild_marks = 0; /*db.c under clear_char*/ ch->pcdata->guild_marks = 0; /*recycle.c under free_char*/ if ( ch->pcdata ) { ch->pcdata->guild_marks = 0; free_pcdata(ch->pcdata); } /*act_obj.c in do_get, under the following*/ /* 'get ... container' */ /*if ( !str_cmp ( arg2, "all" ) || !str_prefix ( "all.", arg2 ) ) { send_to_char ( "You can't do that.\n\r", ch ); return; }*/ if ( (container = get_obj_list(ch, "guild box", ch->in_room->contents))) { send_to_char("You can only borrow from a guild box.\n\r",ch); return; } /*Ghreth's donation code, 04/29/06*/ void do_donate( CHAR_DATA *ch, char *argument) { OBJ_DATA *guild_box; OBJ_DATA *obj; char arg[MAX_INPUT_LENGTH]; char buf[MAX_STRING_LENGTH]; int amount; argument = one_argument(argument, arg); if (IS_NPC(ch)) { send_to_char("NPC's dont donate.\n\r", ch); return; } if (arg[0] == '\0' ) { send_to_char("Donate what?\n\r",ch); return; } if ( (guild_box = get_obj_list(ch, "guild box", ch->in_room->contents)) == NULL) { send_to_char("There doesnt seem to be a guild box here.\n\r",ch); return; } if ( (obj = get_obj_carry (ch, arg)) == NULL) { send_to_char("You do not have that.\n\r",ch); return; } else { if (!can_drop_obj(ch, obj) && ch->level < 52) { send_to_char("You cant seem to let it go.\n\r",ch); return; } if ((obj->item_type == ITEM_CORPSE_NPC) || (obj->item_type == ITEM_CORPSE_PC)) { send_to_char("You cannot donate that.\n\r",ch); return; } if (obj->timer > 0) { send_to_char("You cannot donate that.\n\r",ch); return; } act("$n donates {Y$p{x to the guild box.",ch,obj,NULL,TO_ROOM); act("You donate {Y$p{x to the guild box.",ch,obj,NULL,TO_CHAR); if ((!IS_OBJ_STAT(obj ,ITEM_ANTI_EVIL) && IS_EVIL(ch)) || (!IS_OBJ_STAT(obj ,ITEM_ANTI_GOOD) && IS_GOOD(ch)) || IS_NEUTRAL(ch)) if (obj->level > 0) { amount = UMAX(1, obj->level/7); if (amount == 1) { xprintf(buf, "You receive one guild mark for your item.\n\r"); send_to_char(buf,ch); } else { xprintf( buf, "You receive %ld guild marks for your item.\n\r",amount); send_to_char(buf,ch); } ch->pcdata->guild_marks += amount; } obj_from_char(obj); obj_to_obj(obj, guild_box); return; } } /*Ghreth's donation code, 04/29/06*/ void do_borrow( CHAR_DATA *ch, char *argument) { OBJ_DATA *guild_box; OBJ_DATA *obj; char arg[MAX_INPUT_LENGTH]; char buf[MAX_STRING_LENGTH]; int amount; argument = one_argument(argument, arg); if (IS_NPC(ch)) { send_to_char("NPC's dont borrow.\n\r", ch); return; } if (arg[0] == '\0' ) { send_to_char("Borrow what?\n\r",ch); return; } if ( (guild_box = get_obj_list(ch, "guild box", ch->in_room->contents)) == NULL) { send_to_char("There doesnt seem to be a guild box here.\n\r",ch); return; } obj = get_obj_list ( ch, arg, guild_box->contains ); if ( obj == NULL ) { send_to_char("I see nothing like that in the guild box.\n\r",ch); return; } act("$n borrows {Y$p{x from the guild box.",ch,obj,NULL,TO_ROOM); act("You borrow {Y$p{x from the guild box.",ch,obj,NULL,TO_CHAR); if ((!IS_OBJ_STAT(obj ,ITEM_ANTI_EVIL) && IS_EVIL(ch)) || (!IS_OBJ_STAT(obj ,ITEM_ANTI_GOOD) && IS_GOOD(ch)) || IS_NEUTRAL(ch)) if (obj->level > 0) { amount = UMAX(1, obj->level/7); if ( ch->pcdata->guild_marks < amount ) { send_to_char( "You do not possess enough guild marks to borrow that.\n\r", ch ); return; } if (amount == 1) { xprintf(buf, "You lose one guild mark for your item.\n\r"); send_to_char(buf,ch); } else { xprintf( buf, "You lose %ld guild marks for your item.\n\r",amount); send_to_char(buf,ch); } ch->pcdata->guild_marks -= amount; } obj_to_char(obj, ch); return; }