// Petrarch // Merentha Lib 1.0 // <muds> #include <daemons.h> string help() { return "Syntax: muds\n\nThis command will display all the MUDs \ connected to the Merentha InterMUD System. This system connects MUDs \ together on a network so communication between different worlds is \ possible.\n\n\ See also: users, finger, tell"; } int command() { mapping Muds=NETWORK_D->query_mud_list(); string *muds=keys(Muds), list; int i=sizeof(muds), x=this_player()->getenv("SCREEN"); if(!x)x=75; if(!i) muds=({ "%^RED%^"+mud_name()+" knows of no other MUDS on the \ MIS. This could be because of the low number of MUDs currently \ on the system.\n\n\ %^ORANGE%^To fix copy /save/daemons/network.old to /save/daemons/network.o \ and reboot your MUD.\n\n\ %^GREEN%^If that does not work you may need to download a new network.o \ from http://www.merentha.com and reboot your MUD."}); while(i--) { muds[i]="%^RED%^"+arrange_string(muds[i],x/4-1)+ "%^GREEN%^"+arrange_string(Muds[muds[i]]["address"],16)+ arrange_string(Muds[muds[i]]["port"],6)+ "%^ORANGE%^"+arrange_string(Muds[muds[i]]["mudlib"],x/4)+ arrange_string(Muds[muds[i]]["driver"],x/5)+ arrange_string(""+Muds[muds[i]]["pings"],x/5); muds[i]=arrange_string(muds[i],x-4); } list=implode(muds,"\n"); this_player()->more(border(list,"MUDs on MIS",this_player()->getenv("SCREEN")),this_player()->getenv("SCREEN")); return 1; }