Event Warper Help

[Kirito-kun]

prontera,159,165,4 script Event Warper 76,{

if( getgmlevel() < 80 ) {

        mes "You are not a GM with level 80 or higher, GTFO!";

        close;

        }

 

digit:

     // Input map and name

     mes "Hello "+strcharinfo(0)+", what do you wish to do?";

 

     switch( select ("Set an Event:Set an Event Map:Set a winner:Announce an Event")) {

 

          case 1:

               mes "Do you want to set an Event ?";

 

               if( select ("Yes:No") == 2) goto digit;

 

               mes "Input the name of the event you want to perform";

               input .@ev_name$;

               mes "["+.@ev_name$+"] is correct?";

               if( select ("Yes:No") == 2) goto digit;

 

               set $@ev_name$,.@ev_name$;

 

               mes "Event Name set to ["+$@ev_name$+"]";

               goto digit;

 

          case 2:

               if($@ev_map$!="")mes "Actual Event Map is "+$@ev_map$;

               else mes "No current event maps.";

               mes "Do you want to set an Event Map?";

 

               if( select ("Yes:No") == 2) goto digit;

 

               mes "Input the map where you want the event to take place";

               input .@ev_map$;

               mes "["+.@ev_map$+"] is correct?";

               if( select ("Yes:No") == 2) goto digit;

 

               set $@ev_map$,.@ev_map$;

 

               mes "Event Map set to ["+$@ev_map$+"]";

               goto digit;

 

          case 3:

               // Be careful not to @reloadscript between the end of the event and the rewarding.

               if( $@ev_name$=="") {

                    mes "You activated no events.";

                    close;

                    }

 

               // Rewarding a player will also reset the event map and name

               mes "Who do you want to reward for winning "+$@ev_name$+" event?";

               input .@player$;

 

               mes "["+.@player$+"] is correct?";

               if( select ("Yes:No") == 2) close;

 

               announce .@player$+" won the "+$@ev_name$+" event.",0;

 

               //Remove this if you manage not to give any reward.

               if( isloggedin(getcharid(3,.@player$))) getitem <item id>,<quantity>,getcharid(3,.@player$);

 

               set $@ev_map$,"";

               set $@ev_name$,"";

               close;

 

          case 4:

               if( $@ev_name$=="" || $@ev_map$=="") {

                    mes "Before activating an event you must input a Map and a Name.";

                    goto digit;

                    }

               break;

          }

 

mes "Do you want to activate "+.@ev_name$+" event in "+$@ev_map$+" map?";

if( select ("Yes:No") == 2) close;

 

announce strcharinfo(0)+" opens the Event Warp to "+.@ev_map$+" for "+.@ev_name$+" event.",0;

enablenpc "Event Warper";

 

setnpctimer 0;

initnpctimer;

 

sleep 5000;

announce "3 minutes left to join the event. Use 'Event Warper' to subscribe and warp in the event map.",0;

end;

 

OnTimer60000:

     announce "2 minutes left to join the event. Use 'Event Warper' to subscribe and warp in the event map.",0;

     end;

OnTimer120000:

     announce "1 minutes left to join the event. Use 'Event Warper' to subscribe and warp in the event map.",0;

     end;

OnTimer180000:

     announce "'Event Warper' closed. None can join the event anymore.",0;

     disablenpc "Event Warper";

     end;

}

 

// Event Warper

<map>,<x>,<y>,<facing>%TAB%script%TAB%Event Warper%TAB%<sprite>,{

 

// Should never happen.

if($@ev_map$=="") end;

 

mes "Do you want to warp to the event map? ("+$@ev_map$+")";

if( select("Yes:No") == 2) close;

 

warp $@ev_map$,0,0;

end;

}

Edited September 9, 2015 by Radian
please please use codebox.

[Scylla]

So what's the question here?

[Kirito-kun]

Kindly make this one like this. When a gm click the npc @prontera 56 231, the gm will select an event, then after he selected the event, the npc will announce that gm name is hosting LMS Event, then another npc will appear in prontera 70,240, normal player will click the npc and asking if they want to join LMS Event or not. IF they want to join, they will be warped at Morroc

Like that sir..THANKS

Edited September 9, 2015 by ikaiyou

[Scylla]

Kindly make this one like this. When a gm click the npc @prontera 56 231, the gm will select an event, then after he selected the event, the npc will announce that gm name is hosting LMS Event, then another npc will appear in prontera 70,240, normal player will click the npc and asking if they want to join LMS Event or not. IF they want to join, they will be warped at Morroc

Like that sir..THANKS

 

Try this:

prontera,56,231,4	script	Event Warper	76,{
if( getgmlevel() < 80 ) {
        mes "You are not a GM with level 80 or higher, GTFO!";
        close;
        }
 
digit:
     // Input map and name
     mes "Hello "+strcharinfo(0)+", what do you wish to do?";
 
     switch( select ("Set an Event:Set an Event Map:Set a winner:Announce an Event")) {
 
          case 1:
               mes "Do you want to set an Event ?";
 
               if( select ("Yes:No") == 2) goto digit;
 
               mes "Input the name of the event you want to perform";
               input .@ev_name$;
               mes "["+.@ev_name$+"] is correct?";
               if( select ("Yes:No") == 2) goto digit;
 
               set $@ev_name$,.@ev_name$;
 
               mes "Event Name set to ["+$@ev_name$+"]";
               goto digit;
 
          case 2:
               if($@ev_map$!="")mes "Actual Event Map is "+$@ev_map$;
               else mes "No current event maps.";
               mes "Do you want to set an Event Map?";
 
               if( select ("Yes:No") == 2) goto digit;
 
               mes "Input the map where you want the event to take place";
               input .@ev_map$;
               mes "["+.@ev_map$+"] is correct?";
               if( select ("Yes:No") == 2) goto digit;
 
               set $@ev_map$,.@ev_map$;
 
               mes "Event Map set to ["+$@ev_map$+"]";
               goto digit;
 
          case 3:
               // Be careful not to @reloadscript between the end of the event and the rewarding.
               if( $@ev_name$=="") {
                    mes "You activated no events.";
                    close;
                    }
 
               // Rewarding a player will also reset the event map and name
               mes "Who do you want to reward for winning "+$@ev_name$+" event?";
               input .@player$;
 
               mes "["+.@player$+"] is correct?";
               if( select ("Yes:No") == 2) close;
 
               announce .@player$+" won the "+$@ev_name$+" event.",0;
 
               //Remove this if you manage not to give any reward.
               if( isloggedin(getcharid(3,.@player$))) getitem 7227,5,getcharid(3,.@player$);
 
               set $@ev_map$,"";
               set $@ev_name$,"";
               close;
 
          case 4:
               if( $@ev_name$=="" || $@ev_map$=="") {
                    mes "Before activating an event you must input a Map and a Name.";
                    goto digit;
                    }
               break;
          }
 
mes "Do you want to activate "+.@ev_name$+" event in "+$@ev_map$+" map?";
if( select ("Yes:No") == 2) close;
 
announce strcharinfo(0)+" opens the Event Warp to "+.@ev_map$+" for "+.@ev_name$+" event.",0;
enablenpc "Event Warper";
 
setnpctimer 0;
initnpctimer;
 
sleep 5000;
announce "3 minutes left to join the event. Use 'Event Warper' to subscribe and warp in the event map.",0;
end;
 
OnTimer60000:
     announce "2 minutes left to join the event. Use 'Event Warper' to subscribe and warp in the event map.",0;
     end;
OnTimer120000:
     announce "1 minutes left to join the event. Use 'Event Warper' to subscribe and warp in the event map.",0;
     end;
OnTimer180000:
     announce "'Event Warper' closed. None can join the event anymore.",0;
     disablenpc "Event Warper";
     end;
}
 
// Event Warper
prontera,70,240,3	script	Event Warper2	100,{
 
// Should never happen.
if($@ev_map$=="") end;
 
mes "Do you want to warp to the event map? ("+$@ev_map$+")";
if( select("Yes:No") == 2) close;
 
warp $@ev_map$,0,0;
end;
}

That script actually works, you just did not edited this line:

// Event Warper
<map>,<x>,<y>,<facing>%TAB%script%TAB%Event Warper%TAB%<sprite>,{
 
// Should never happen.
if($@ev_map$=="") end;
 
mes "Do you want to warp to the event map? ("+$@ev_map$+")";
if( select("Yes:No") == 2) close;
 
warp $@ev_map$,0,0;
end;
}

Now if you wanna change the prize find this line:

 if( isloggedin(getcharid(3,.@player$))) getitem 7227,5,getcharid(3,.@player$);

and change 7227 (item ID) and 5 (amount)

Edited September 9, 2015 by Mary Magdalene

[Kirito-kun]

 

Kindly make this one like this. When a gm click the npc @prontera 56 231, the gm will select an event, then after he selected the event, the npc will announce that gm name is hosting LMS Event, then another npc will appear in prontera 70,240, normal player will click the npc and asking if they want to join LMS Event or not. IF they want to join, they will be warped at Morroc

Like that sir..THANKS

 

Try this:

prontera,56,231,4	script	Event Warper	76,{
if( getgmlevel() < 80 ) {
        mes "You are not a GM with level 80 or higher, GTFO!";
        close;
        }
 
digit:
     // Input map and name
     mes "Hello "+strcharinfo(0)+", what do you wish to do?";
 
     switch( select ("Set an Event:Set an Event Map:Set a winner:Announce an Event")) {
 
          case 1:
               mes "Do you want to set an Event ?";
 
               if( select ("Yes:No") == 2) goto digit;
 
               mes "Input the name of the event you want to perform";
               input .@ev_name$;
               mes "["+.@ev_name$+"] is correct?";
               if( select ("Yes:No") == 2) goto digit;
 
               set $@ev_name$,.@ev_name$;
 
               mes "Event Name set to ["+$@ev_name$+"]";
               goto digit;
 
          case 2:
               if($@ev_map$!="")mes "Actual Event Map is "+$@ev_map$;
               else mes "No current event maps.";
               mes "Do you want to set an Event Map?";
 
               if( select ("Yes:No") == 2) goto digit;
 
               mes "Input the map where you want the event to take place";
               input .@ev_map$;
               mes "["+.@ev_map$+"] is correct?";
               if( select ("Yes:No") == 2) goto digit;
 
               set $@ev_map$,.@ev_map$;
 
               mes "Event Map set to ["+$@ev_map$+"]";
               goto digit;
 
          case 3:
               // Be careful not to @reloadscript between the end of the event and the rewarding.
               if( $@ev_name$=="") {
                    mes "You activated no events.";
                    close;
                    }
 
               // Rewarding a player will also reset the event map and name
               mes "Who do you want to reward for winning "+$@ev_name$+" event?";
               input .@player$;
 
               mes "["+.@player$+"] is correct?";
               if( select ("Yes:No") == 2) close;
 
               announce .@player$+" won the "+$@ev_name$+" event.",0;
 
               //Remove this if you manage not to give any reward.
               if( isloggedin(getcharid(3,.@player$))) getitem 7227,5,getcharid(3,.@player$);
 
               set $@ev_map$,"";
               set $@ev_name$,"";
               close;
 
          case 4:
               if( $@ev_name$=="" || $@ev_map$=="") {
                    mes "Before activating an event you must input a Map and a Name.";
                    goto digit;
                    }
               break;
          }
 
mes "Do you want to activate "+.@ev_name$+" event in "+$@ev_map$+" map?";
if( select ("Yes:No") == 2) close;
 
announce strcharinfo(0)+" opens the Event Warp to "+.@ev_map$+" for "+.@ev_name$+" event.",0;
enablenpc "Event Warper";
 
setnpctimer 0;
initnpctimer;
 
sleep 5000;
announce "3 minutes left to join the event. Use 'Event Warper' to subscribe and warp in the event map.",0;
end;
 
OnTimer60000:
     announce "2 minutes left to join the event. Use 'Event Warper' to subscribe and warp in the event map.",0;
     end;
OnTimer120000:
     announce "1 minutes left to join the event. Use 'Event Warper' to subscribe and warp in the event map.",0;
     end;
OnTimer180000:
     announce "'Event Warper' closed. None can join the event anymore.",0;
     disablenpc "Event Warper";
     end;
}
 
// Event Warper
prontera,70,240,3	script	Event Warper2	100,{
 
// Should never happen.
if($@ev_map$=="") end;
 
mes "Do you want to warp to the event map? ("+$@ev_map$+")";
if( select("Yes:No") == 2) close;
 
warp $@ev_map$,0,0;
end;
}

That script actually works, you just did not edited this line:

// Event Warper
<map>,<x>,<y>,<facing>%TAB%script%TAB%Event Warper%TAB%<sprite>,{
 
// Should never happen.
if($@ev_map$=="") end;
 
mes "Do you want to warp to the event map? ("+$@ev_map$+")";
if( select("Yes:No") == 2) close;
 
warp $@ev_map$,0,0;
end;
}

Now if you wanna change the prize find this line:

 if( isloggedin(getcharid(3,.@player$))) getitem 7227,5,getcharid(3,.@player$);

and change 7227 (item ID) and 5 (amount)

 

 

 

When the Announcer Said: Event Warper: Closed. None can join the event anymore

the 1st Npc removed, and when i click the 2nd npc and ask me if i wan to warp to the event map, the npc will warp me, 

can u make it like this sir

 

1st NPC will not remove, then 2nd npc will not allow anyone to join/warp a player when the Event warper says None can join event anymore. And Hide the 2ndNPC,, but when a gm starts an event again,  the npc will appear.

Thanks in advance

Edited September 10, 2015 by ikaiyou