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 702 times, submitted by Guest.