viewing paste Unknown #647 | 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
prontera,150,150,5      script  Name    91,{
 
if(getgroupid() >= 90)
{
        mes "Hello GM, do you want?";
        switch(select("- Active:- Desactive:- Warp:- Nothing"))
        {
 
                case 1:
                        next;
                        if($activeS){ mes "This script are been activated..."; close; }
                        set $activeS,1;
                        announce "Script are been activated!",8;
                        close;
                case 2:
                        next;
                        if(!$activeS){ mes "This script are been desactivated..."; close; }
                        set $activeS,0;
                        announce "Script are been desactivated!",8;
                        close;
                case 3:
                        next;
                        warp "quiz_02",x,y;
                        end;
                case 4:
                        next;
                        close;
        }
}
else
        if(!$activeS){ mes "Script not working..."; close; }
        mes "Hello player...";
        mes "Do you want?";
        if(select("- Warp-me:- Nothing") == 2) close;
                warp "quiz_02",x1,y1;
                end;
 
OnInit:
        set $activeS,0;
        end;
}
Viewed 401 times, submitted by unknown.