/* Not really a Lag Code but it works snippet. Written by Felix of ZephleaMUD for ZephleaMUD. 01 - Feb - 01 Well, I know this is not the prettiest of code, but it does work. Basically it is a hack of the drowning code and some other things... Was written for a early bpl 14 or 15 I think but it should work for the most of them...I havent been keeping up with the new releases so much.. To install: 1) Add to the ACMD's at the top of act.wizard.c 2) Add to the end of act.wizard.c 3) Add to the ACMD's at the top of interpreter.c 4) Add to the Command List Reboot (or copyover as it may be)... Usage: lag ie 'lag person_you_dont_like 30' to lag them for 30 seconds. NOTE: At some point in time(bpl 17 for sure), Circle began using vict = get_char_vis(ch, name, FIND_CHAR_WORLD); instead of vict = get_char_vis(ch, name); so you may need to change it to make it work on your mud. Enjoy! If you use this please email me at: fjvazquez@hotmail.com */ ACMD(do_lag) { struct char_data *vict; char *name = arg, *timetolag = buf2; two_arguments(argument, name, timetolag); if (!*timetolag || !*name) { send_to_char("usage: lag target length_in_seconds\r\n", ch); return; } vict = get_char_vis(ch, name); if (vict == 0) { send_to_char("Cannot find your target!\r\n", ch); return; } if (IS_NPC(vict)) { send_to_char("You can't do that to a mob!\r\n", ch); return; } /* so someone can't lag you */ if (strcmp(GET_NAME(vict), "YOUR NAME HERE") == 0) { sprintf(buf, "%s tried to lag you but failed!\r\nLagging them instead!\r\n", GET_NAME(ch)); send_to_char(buf, vict); vict = ch; } /* a little revenge... */ if (GET_LEVEL(ch) <= GET_LEVEL(vict)) { vict = ch; } WAIT_STATE(vict, atoi(timetolag) RL_SEC); if (ch != vict) send_to_char("Ok. now lagging them!\r\n", ch); if (ch == vict) send_to_char("Don't try to lag someone higher than you!\r\n", ch); return; }