// /cmd// From Dead Souls
// A utility to help wizards and players keep track of what lines they're
// on, and to them turn all off and on with one command.
// by Gregon@Dead Souls
#include <daemons.h>
int cmd(string str) {
string *channels;
string *remote = ({});
string *local = ({});
string *i3 = ({});
string *imc2 = ({});
string ret = "", RemChans = CHAT_D->GetRemoteChannels();
int i;
channels = distinct_array((string *)this_player()->GetChannels());
if(!str) str = "";
if(str=="on"){
for(i=0; i<sizeof(channels);i++){
if(this_player()->GetBlocked(channels[i]))
this_player()->SetBlocked(channels[i]);
}
}
if(str=="off"){
for(i=0; i<sizeof(channels);i++){
if(!this_player()->GetBlocked(channels[i]))
this_player()->SetBlocked(channels[i]);
}
}
foreach(string chan in channels){
string tmp = CHAT_D->GetRemoteChannel(chan);
if(member_array(tmp, RemChans) != -1){
remote += ({ chan });
if(!strsrch(tmp, "Server") && grepp(tmp, ":")){
imc2 += ({ chan });
}
else i3 += ({ chan });
}
else local += ({ chan });
}
if(sizeof(remote)){
ret += "REMOTE CHANNELS\n---------------\n";
if(sizeof(imc2)){
imc2 = sort_array(imc2, 1);
ret += "\nIMC2\n----\n";
foreach(string chan in imc2){
ret += chan + "\t" + (this_player()->GetBlocked(chan) ?
"(%^RED%^BLOCKED%^RESET%^)" : "") + "\n";
}
}
if(sizeof(i3)){
i3 = sort_array(i3, 1);
ret += "\nIntermud-3\n----------\n";
foreach(string chan in i3){
ret += chan + "\t" + (this_player()->GetBlocked(chan) ?
"(%^RED%^BLOCKED%^RESET%^)" : "") + "\n";
}
}
}
if(sizeof(local)){
local = sort_array(local, 1);
ret += "\n\nLOCAL CHANNELS\n---------------\n";
foreach(string chan in local){
ret += chan + "\t" + (this_player()->GetBlocked(chan) ?
"(%^RED%^BLOCKED%^RESET%^)" : "") + "\n";
}
}
if(!sizeof(ret)){
ret = "No channels found.";
}
write(ret);
return 1;
}
void help(){
message("help","Syntax: lines -or- lines [on|off]\n\n"
"With no argument this command will display the status "
"of the lines to which you have access. With the argument on|off "
"it will turn all of the lines on or off.",this_player());
}
