trinity,102,131,5	script	Channel System	951,{

	set .chan$, "[ ^0000FFChannel System^000000 ]";
	
	mes .chan$;
	mes "Hello Adventurer!";
	mes "...";
	mes "Are you ready to join a global";
	mes "channel and make friends?";
	next;
	menu "> Channel System Intro",C1,"> Channel List",C2,"> Join Channel",C3;
	
	C1:
	mes .chan$;
	mes "The Channel System is a chat";
	mes "that allows you to speak with the";
	mes "rest of the players who are in the";
	mes "channel.";
	next;
	mes .chan$;
	mes "There are only 2 official channels,";
	mes "^0000FF#main^000000 and ^FF0000#trade^000000 channels.";
	next;
	mes .chan$;
	mes "These 2 chats are to used exclusively. ^FF0000You must speak english in the 2 channels at all times!";
	next;
	mes .chan$;
	mes "The main channel is used to ask ro related questions only, trading or selling items are prohibited on this channel. ^FF0000You must speak english in the 2 channels at all times!";
	next;
	mes .chan$;
	mes "The trade channel obviously its for trading purposes. you can't ask for support on this channel. ^FF0000You must speak english in the 2 channels at all times!";
	next;
	mes .chan$;
	mes "Thanks for reading the informations on how to use the channel system.";
	close;
	
	C2:
	atcommand "@channel list";
	close;
	
	C3:
	if(channelsys < 0) {
	mes .chan$;
	mes "please read the introduction of the system first.";
	end;
	} else {
	mes "please select which channel you want to join.";
	switch(select("> Main:> Trade:> Both")) {
	
	case 1:
	atcommand "@channel join #main";
	break;
	
	case 2:
	atcommand "@channel join #trade";
	break;
	
	case 3:
	atcommand "@channel join #main";
	atcommand "@channel join #trade";
	break;
	
			}
		}
	}