viewing paste Unknown #17551 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67
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;
       
                        }
                }
        }
       
       
Viewed 667 times, submitted by Radian.