KINDLY HELP ME, SORRY FOR ASKING TOO MUCH. NOT GOOD IN SCRIPTS, THANKS
Can u guys make this event work ingame and make it automated event every 2hrs,
price = 1tcg (ID: 7227)
//======Name========================================
// Poring Catcher Event
//======Version=====================================
// 1.0
//======Author(s)===================================
// Sandbox, Clydelion
//======Comments====================================
// In loving memory of AstralRO
//==================================================
//Edit to where would you place the warper
- script Poring Catcher Warper -1,{
mes "Do you want to join the Poring Catcher Event?";
menu "Yes",-;
set @rex,rand(102,104);
warp "poring_c01",@rex,101;
close;
}
prontera,159,182,4 script pcetrigger 45,{
OnInit:
enablenpc "Poring Catcher Warper";
end;
OnCatcherTrigger:
if(agitcheck() == 1) end;
enablenpc "Poring Catcher Warper";
announce "Poring Catcher Event: We are going to have a Poring Catcher Event",bc_all,0xFF7F50;
sleep2 1000;
announce "Poring Catcher Event: For those who want to join, please warp @ mellina 115 150!",bc_all,0xFF7F50; //Edit to where would you place the warper
sleep2 1000;
announce "Poring Catcher Event: The Warper would be open for 1 minute",bc_all,0xFF7F50;
sleep2 30000;
announce "Poring Catcher Event: Last 30 Seconds.",bc_all,0xFF7F50;
sleep2 30000;
announce "Poring Catcher Event: Warper Closed.",bc_all,0xFF7F50;
disablenpc "Poring Catcher Warper";
donpcevent "Poring Catcher Event::OnPoringCatcherStart";
end;
}
poring_c01,106,110,3 script Got Stuck?#pce 948,{
mes "[ Got Stuck? ]";
mes "Do you wish to go back?";
menu "Yes",-;
warp "mellina",115,150;
close;
}
- script Poring Catcher Event -1,{
OnPoringCatcherStart:
mapannounce "poring_c01","We are about to start the Poring Catcher Event.",bc_blue;
sleep2 1000;
mapannounce "poring_c01","Rules are simple:",bc_blue;
sleep2 1000;
mapannounce "poring_c01","In a few seconds I'm going to spawn tons of porings..",bc_blue;
sleep2 1000;
mapannounce "poring_c01","..All you need to do is kill the Poring with the right name..",bc_blue;
sleep2 1000;
mapannounce "poring_c01","..Which would be Poring.",bc_blue;
sleep2 1000;
mapannounce "poring_c01","If you kill the wrong one, you're out!",bc_blue;
sleep2 3000;
mapannounce "poring_c01","That's it.. Now let's get this on!",bc_blue;
sleep2 3000;
goto Lstart;
end;
Lnoone:
announce "No one won the Poring Catcher Event!",bc_all,0xFF7F50;
mapwarp "poring_c01","mellina",115,150;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
end;
}
}
- script poringwin -1,{
OnMobKilled:
getitem 7227,1; //Edit on what prize would you give to the winner
announce strcharinfo(0)+" won the Poring Catcher Event!",bc_all,0xFF7F50;
disablenpc "Poring Catcher Warper";
killmonsterall "poring_c01";
mapwarp "poring_c01","mellina",115,150;
end;
}
- script poringlose -1,{
OnMobKilled:
dispbottom "You killed the wrong Poring! Yerrrrrrrrrrrr out!";
warp "mellina",115,150; //Edit to where will you warp players that lost
sleep2 500;
if(getmapusers("poring_c01") == 0) goto Lnoone;
end;
Lnoone:
announce "No one won the Poring Catcher Event!",bc_all,0xFF7F50;
mapwarp "poring_c01","mellina",115,150;
killmonsterall "poring_c01";
disablenpc "Poring Catcher Warper";
end;
KINDLY MAKE THIS ONE AUTOMATED EVENT ALSO EVERY 3HOURS. PRICE 1TCG (id:7227)
prontera,154,188,4 script announce_nvz 101,{
OnMinute05:
if(agitcheck() == 1) end;
announce "The Novice Vs. Zombie Event will begin in 3 minutes.",0;
killmonsterall "quiz_01";
sleep 5000;
announce "The NPC 'Novice vs. Zombie' has appeared in Prontera!",0;
enablenpc "Novice vs. Zombie";
sleep 55000;
announce "Event: Novice Vs. Zombie will begin in 2 minutes. You better get ready!",0;
sleep 60000;
announce "Event: Novice Vs. Zombie will begin in 1 minute!",0;
sleep 30000;
mapannounce "quiz_01","In 30 seconds the monster will appear!",0;
sleep 25000;
announce "Event: Novice Vs. Zombie will begin in ~5~",0;
sleep 1000;
announce "~4~",0;
sleep 1000;
announce "~3~",0;
sleep 1000;
announce "~2~",0;
sleep 1000;
announce "~1~",0;
sleep 1000;
announce "Event: 'Novice Vs. Zombie' has begun!!",0,0x00FF00;
monster "quiz_01",42,369,"Zombie",1036,4;
disablenpc "Novice vs. Zombie";
sleep 10000;
monster "quiz_01",42,369,"Zombie-2",1036,10;
sleep 10000;
monster "quiz_01",42,369,"Zombie-3",1036,10;
sleep 10000;
monster "quiz_01",42,369,"Zombie-4",1036,10;
initnpctimer;
end;
OnTimer5000:
if ( getmapusers("quiz_01") == 0 )
{
killmonsterall "quiz_01";
announce "'Novice Vs. Zombie' has ended. All of the Zombies are gone.",0;
disablenpc "Prize";
stopnpctimer;
end;
}
else if ( getmapusers("quiz_01") > 1 )
{
if ($@NvZCounter >= 5){
switch(rand(0,2)){
case 0: mapannounce "quiz_01",getmapusers("quiz_01") +" players are still alive.",0,0x00FF00; break;
case 1: mapannounce "quiz_01",getmapusers("quiz_01") +" players are STILL alive? Are you sure you're not cheating?",0,0x00FF00; break;
case 2: mapannounce "quiz_01",getmapusers("quiz_01") +" players are STILL ALIVE? Seriously, I'm gonna have to report you.",0,0x00FF00; break;
}
} else {
mapannounce "quiz_01",getmapusers("quiz_01") +" players are still alive.",0,0x00FF00;
}
sleep 10000;
set $@NvZCounter,$@NvZCounter+1;
initnpctimer;
end;
}
initnpctimer;
end;
OnPCDieEvent:
getmapxy .@mapnvz$,.@xnvz,.@ynvz,0;
if ( .@mapnvz$ == "quiz_01") {
sleep2 1;
warp "prontera",156,223;
atcommand "@alive "+ strcharinfo(0);
dispbottom "You have lost...";
}
sleep2 1000;
if ( .@mapnvz$ == "quiz_01" && getmapusers("quiz_01") == 1 ) {
killmonsterall "quiz_01";
mapannounce "quiz_01","You have won, please approach to Prize NPC.",0;
enablenpc "Prize";
set $@NvZCounter,0;
stopnpctimer;
end;
}
end;
}
quiz_01,42,369,3 script Prize 72,{
if (sex == 1) {
announce "In 'Novice Vs. Zombie', " + strcharinfo (0) + " has won! Let's congratulate him!",0;
}
else {
announce "In 'Novice Vs. Zombie'" + strcharinfo (0) + " has won! Let's congratulate her!",0;
};
getitem 30005,100;
warp "prontera",156,223;
sleep2 250;
disablenpc "Prize";
end;
}
prontera,155,170,3 script Novice vs. Zombie 1015,{
if (BaseLevel > 1) goto L_No;
if (class == 0) goto L_event;
if (class > 0) goto L_No;
L_event:
sc_end SC_ALL;
percentheal 100,100;
atcommand "@storeall";
warp "quiz_01",42,369;
close;
L_No:
mes "[^0000FFNovice Vs. Zombie^000000]";
mes "Brains!!!!!!! D=<";
mes "^696969You are not a level 1 novice! Cheater!^000000";
close;
OnInit:
disablenpc "Novice vs. Zombie";
disablenpc "Prize";
end;
}
// mapflag
quiz_01 mapflag nocommand 2
Edited by Radian Once again please use the code box.
Question
Kirito-kun
Once again please use the code box.
Link to comment
Share on other sites
4 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.