viewing paste Unknown #14131 | 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
prontera,150,150,3  script  Man-Hunt Event  831,{
 
    if(getgmlevel() >= 99){
        mes "Do you want to start the Hunt?";
        if(select("Yes:No") -1){
            next;
        }else
        deletearray $in$, getarraysize($in$);
        set .i, 0;
        donpcevent "Inside Event::OnGMStart";
        next;
    }
 
 
    if($hstart == 1){
        mes "Do you want to join the Hunt?";
        if(select("Yes:No") -1) end;
        mes .i;
        warp "06guild_01",50,50;
        set $in$[.i], strcharinfo(0);
        set .i, .i++;
        close;
    }else if($hstart == 2){
        mes "The hunt has started, you are not allowed to join now.";
        mes "Your current Points are: " + #MHPoint;
        mes "";
        mes "You get 1 Item for 1 Point.";
        if(select("Reward:Cancel") -1) end;
        next;
        for(.@i = 0; .@i < #MHPoint ; .@i ++){
            getitem .get_item, .get_num;
        }
        set #MHPoint, 0;
        mes "You got "+.@i+" " + .get_item + ".";
        close;
    }else{
        mes "The hunt is not active!";
        mes "Your current Points are: " + #MHPoint;
        mes "";
        mes "You get 1 Item for 1 Point.";
        if(select("Reward:Cancel") -1) end;
        next;
        for(.@i = 0; .@i < #MHPoint ; .@i ++){
            getitem .get_item, .get_num;
        }
        set #MHPoint, 0;
        mes "You got "+.@i+" " + .get_item + ".";
        close;
    }
OnInit:
    .get_item = 607; //Item you get
    .get_num = 1;   //how many?
        
    end;
OnEnd:
    set .i, 0;
    announce "Setting .i " + .i, 0;
    end;
}
Viewed 561 times, submitted by Normynator.