Posted Wednesday, August 12th @ 11:30:34 PM, by George Greer in the Specials dept.
Added Mar 15, 1997. Click the link below to read it or download it.
From: Mike <claywar@cetlink.net>
Subject: 8-Ball Special Procedure!
Feel like a useless specproc to liven your day? Try a low feature 8ball!
SPECIAL(ball)
{
char obj_name[MAX_STRING_LENGTH];
if (CMD_IS("rub")) {
argument = one_argument(argument, obj_name);
if (!(get_obj_in_list_vis(ch, obj_name, ch->carrying)))
return 0;
switch (number(1,3)) {
case 1:
send_to_char("Yes.\r\n",ch);
break;
case 2:
send_to_char("Maybe.\r\n",ch);
break;
case 3:
send_to_char("No.\r\n",ch);
break;
default:
send_to_char("BUG!!! Please Report!\r\n",ch);
break;
}
return 1;
}
return 0;
}
<< Locate Target Spell [by David Klasinc] | Reply | View as text | Threaded | Mail autoreception [by Ryan Linn] >> |
|
Related Links |
|
|
|
CircleMUD Snippets |
|
|
Note: Not all of these snippets will work perfectly with
your version of code, so be prepared to fix one
or two bugs that may arise, and please let me know
what you needed to do to fix it. Sending a corrected
version is always welcome.
|
Finally, if you wish to use any of the snippets from this
page, you are more than welcome, just mention the
authors in your credits. If you wish to release any
of these snippets to the public on another site,
contact me FIRST.
|
|
|
|
|
|
|