viewing paste Unknown #14006 | 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
                case 1:
                        mes .@n$;
                        if (.EventON) {
                                mes "The Event is currently: [^0000FFON^000000]";
                                mes "Would you like to turn it OFF?";
                        } else {
                                mes "The Event is currently: [^FF0000OFF^000000]";
                                mes "Would you like to turn it ON?";
                        }
                        if(select("Yes:No")==2) close;
                        if (.EventON) {
                                set .EventON,0; set .Timer,0;
                                setnpctimer 0; stopnpctimer;
                                announce "A GM has decided to turn the Disguise Event off. As a result no further prizes will be given.",bc_map | bc_blue;
                                deletepset 1;
                                setnpcdisplay "Disguise Event",795;
                                close;
                        }
                        bindatcmd "joindisguise",strnpcinfo(3)+"::OnJoinDisguise",0,99;
                        set .EventON,1; set .Timer,1; setnpctimer 0; initnpctimer;
                        set .ResetCounter,.ResetCounter+1;
                        announce "The Disguise Event will begin in 3 minutes.",bc_all | bc_blue;
                        announce "The Event is being held in Prontera.",bc_all | bc_blue;
                        close;
Viewed 678 times, submitted by Pneuma.