Jump to content

Question

Posted

how to edit this dice event? i will make it every 1 hour not in 3mins., thank you..

 

again i need every 1 hour only...

 

//##########################################################################
//By: ____                    _      __        __           ____    _____  #
//   |    \   ___ __    __ _ | |     \ \      / /_  _   _  / ___\  / ____| #
//   | ||  | / _ \\ \  / /| || |      \ \    / /| || \ | || | ___ | (___   #
//   | ||  ||  __/ \ \/ / | || |__     \ \/\/ / | ||  \| || |___|\ \___ \  #
// __|____/__\___|__\__/__|_||____|_____\_/\_/__|_||_|\__|_\_____/_____) | #
//|_____________________________________________________________________/  #
//                                                                         #
//##########################################################################
//                                                                         #
//== Dice Event                                                            #
//                                                                         #
//##########################################################################
//                                                                         #
//== Automatically starts a dice event every 30 minutes of every hour      #
//                                                                         #
//== Prize- Change 13723 to any item ID you want the winner to recieved    #
//                                                                         #                                         // Code Modify by : WordsUp
// Credit still for mAisakaTaiga                                
//##########################################################################
 
- script Dice#announcer -1,{
 
OnInit:
disablenpc "prtevent";
hideonnpc "Dice#evnt1";
end;
 
OnMinute20:
if( agitcheck() || agitcheck2() ) end;
announce "Dice: We are going to have a Dice event.",0;
sleep2 10000;
announce "Dice: For those who wants to join, Please proceed to the center of Prontera and enter the Warp Portal.",0;
sleep2 10000;
announce "Dice: After 1 Minute the Portal will close.",0;
sleep2 10000;
announce "Dice: So please go to the middle of Prontera and enter the Warp Portal now if you want to join.",0;
enablenpc "prtevent";
initnpctimer;
end;
 
OnTimer30000:
announce "Dice: Last 30 seconds.",0;
sleep2 5000;
announce "Dice: If you want to join please enter the Warp Portal beside me here in Prontera.",0;
end;
 
OnTimer50000:
announce "Dice: Last 10 seconds.",0;
end;
 
OnTimer55000:
announce "Dice: 5.",0;
end;
 
OnTimer56000:
announce "Dice: 4.",0;
end;
 
OnTimer57000:
announce "Dice: 3.",0;
end;
 
OnTimer58000:
announce "Dice: 2.",0;
end;
 
OnTimer59000:
announce "Dice: 1.",0;
end;
 
OnTimer60000:
announce "Dice: Time's up.",0;
end;
 
OnTimer61000:
disablenpc "prtevent";
donpcevent "Dice#evnt1::OnEnable";
stopnpctimer;
end;
 
OnTimer62000:
announce "Dice: The next Dice event will begin after 30 minutes.",0;
end;
}
 
//--------------------------------------------------
 
prontera,156,171,0 warp prtevent 2,2,quiz_01,204,90 
 
//--------------------------------------------------
 
quiz_01,204,93,6 script Dice#evnt1 715,{
 
//--------------------------------------------------
 
mes "[Dice]";
mes "Please tell me your name";
next;
input .@name$;
if(.@name$ != strcharinfo(0)) {
mes "[Dice]";
mes "Are you sure thats your character name?";
close;
}
mes "[Dice]";
mes "Congrats. You've won.";
close2;
announce "Dice: We have a winner, "+.@name$+".",0;
getitem 674,1;
warp "prontera",155,182;
hideonnpc "Dice#evnt1";
end;
 
OnEnable:
mapannounce "quiz_01","Dice: We are about to start the Dice event.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: But before we start the event here's how to play the game. . .",0;
sleep2 10000;
mapannounce "quiz_01","Dice: I'm only gonna say this once so read carefully.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: I'm going to pick a number, 1 to 4. Then I'll do a count down from 5 to 0.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: All you have to do is go to the box of the number you want.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: Example, If I get the number of 4, All the players standing on numbers 1 to 3 will be warped back to town.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: We will do it again and again until we only have 1 player left on the map.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: Oh yeah! Before I forget you MUST GO INSIDE THE BOX, because if you're caught standing on the stairs you'll be automatically disqualified.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: That's it.. Now let's play...",0;
sleep2 10000;
goto L_Start;
end;
 
L_Start:
if(getmapusers("quiz_01") == 1) goto L_Champ;
if(getmapusers("quiz_01") == 0) goto L_None;
if(getmapusers("quiz_01") > 1) {
announce "Dice: . . . . .",0;
set $@number, rand(1,4);
sleep2 10000;
announce "Dice: I have a number now. Please go to the box of the number you want.... GO!",0;
sleep2 10000;
announce "Dice: 5",0;
sleep2 5000;
announce "Dice: 4",0;
sleep2 4000;
announce "Dice: 3",0;
sleep2 3000;
announce "Dice: 2",0;
sleep2 2000;
announce "Dice: 1",0;
sleep2 1000;
announce "Dice: Time's up.",0;
donpcevent "evnt#1::OnEnable";
announce "Dice: Winning number "+$@number+".",0;
if(($@number != 1) && ($@number != 2) && ($@number != 3)) goto L_Lose1;
if(($@number != 1) && ($@number != 2) && ($@number != 4)) goto L_Lose2;
if(($@number != 1) && ($@number != 3) && ($@number != 4)) goto L_Lose3;
if(($@number != 2) && ($@number != 3) && ($@number != 4)) goto L_Lose4;
end;
}
 
L_Lose1:
areawarp "quiz_01",183,81,191,60,"prontera",155,182;
areawarp "quiz_01",195,81,203,60,"prontera",155,182;
areawarp "quiz_01",207,81,215,60,"prontera",155,182;
goto L_Start;
end;
 
L_Lose2:
areawarp "quiz_01",183,81,191,60,"prontera",155,182;
areawarp "quiz_01",195,81,203,60,"prontera",155,182;
areawarp "quiz_01",219,81,227,60,"prontera",155,182;;
goto L_Start;
end;
 
L_Lose3:
areawarp "quiz_01",183,81,191,60,"prontera",155,182;
areawarp "quiz_01",207,81,215,60,"prontera",155,182;
areawarp "quiz_01",219,81,227,60,"prontera",155,182;
goto L_Start;
end;
 
L_Lose4:
areawarp "quiz_01",195,81,203,60,"prontera",155,182;
areawarp "quiz_01",207,81,215,60,"prontera",155,182;
areawarp "quiz_01",219,81,227,60,"prontera",155,182;
goto L_Start;
end;
 
L_Champ:
mapannounce "quiz_01","Dice: Come to me and tell me your name.",0;
hideoffnpc "Dice#evnt1";
end;
 
L_None:
announce "No One Enters the Dice Event. Closed",0;
hideonnpc "Dice#evnt1";
end;
}
 
- script evnt#1 -1,{
 
OnEnable:
areawarp "quiz_01",182,94,228,88,"prontera",155,182;
areawarp "quiz_01",185,87,188,82,"prontera",155,182;
areawarp "quiz_01",197,87,200,82,"prontera",155,182;
areawarp "quiz_01",209,87,212,82,"prontera",155,182;
areawarp "quiz_01",221,87,224,82,"prontera",155,182;
end;
}
 
// -- Mapflags
quiz_01 mapflag nowarp
quiz_01 mapflag nowarpto
quiz_01 mapflag noteleport
quiz_01 mapflag nosave
quiz_01 mapflag nomemo
quiz_01 mapflag nobranch
quiz_01 mapflag noloot
quiz_01 mapflag noskill
quiz_01 mapflag nopenalty

6 answers to this question

Recommended Posts

Posted

is set to start at minute 20 of every hour

 

change:

OnMinute20:

For:

OnClock1700:

OnClock1700: means that event trigger at hour 17:00

 

so if you want it every hour add:

OnClock0000:
OnClock0100:
OnClock0200:
OnClock0300:

like that.

Posted

so it looks like this? please check. thanks..

 

- script Dice#announcer -1,{
 
OnInit:
disablenpc "prtevent";
hideonnpc "Dice#evnt1";
end;
 
OnMinute1700:
if( agitcheck() || agitcheck2() ) end;
announce "Dice: We are going to have a Dice event.",0;
sleep2 10000;
announce "Dice: For those who wants to join, Please proceed to the center of Prontera and enter the Warp Portal.",0;
sleep2 10000;
announce "Dice: After 1 Minute the Portal will close.",0;
sleep2 10000;
announce "Dice: So please go to the middle of Prontera and enter the Warp Portal now if you want to join.",0;
enablenpc "prtevent";
initnpctimer;
end;
 
OnTimer30000:
announce "Dice: Last 30 seconds.",0;
sleep2 5000;
announce "Dice: If you want to join please enter the Warp Portal beside me here in Prontera.",0;
end;
 
OnTimer50000:
announce "Dice: Last 10 seconds.",0;
end;
 
OnTimer55000:
announce "Dice: 5.",0;
end;
 
OnTimer56000:
announce "Dice: 4.",0;
end;
 
OnTimer57000:
announce "Dice: 3.",0;
end;
 
OnTimer58000:
announce "Dice: 2.",0;
end;
 
OnTimer59000:
announce "Dice: 1.",0;
end;
 
OnTimer60000:
announce "Dice: Time's up.",0;
end;
 
OnTimer61000:
disablenpc "prtevent";
donpcevent "Dice#evnt1::OnEnable";
stopnpctimer;
end;
 
OnTimer62000:
announce "Dice: The next Dice event will begin after 30 minutes.",0;
end;
}
 
//--------------------------------------------------
 
prontera,156,171,0 warp prtevent 2,2,quiz_01,204,90
 
//--------------------------------------------------
 
quiz_01,204,93,6 script Dice#evnt1 715,{
 
//--------------------------------------------------
 
mes "[Dice]";
mes "Please tell me your name";
next;
input .@name$;
if(.@name$ != strcharinfo(0)) {
mes "[Dice]";
mes "Are you sure thats your character name?";
close;
}
mes "[Dice]";
mes "Congrats. You've won.";
close2;
announce "Dice: We have a winner, "+.@name$+".",0;
getitem 674,1;
warp "prontera",155,182;
hideonnpc "Dice#evnt1";
end;
 
OnEnable:
mapannounce "quiz_01","Dice: We are about to start the Dice event.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: But before we start the event here's how to play the game. . .",0;
sleep2 10000;
mapannounce "quiz_01","Dice: I'm only gonna say this once so read carefully.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: I'm going to pick a number, 1 to 4. Then I'll do a count down from 5 to 0.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: All you have to do is go to the box of the number you want.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: Example, If I get the number of 4, All the players standing on numbers 1 to 3 will be warped back to town.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: We will do it again and again until we only have 1 player left on the map.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: Oh yeah! Before I forget you MUST GO INSIDE THE BOX, because if you're caught standing on the stairs you'll be automatically disqualified.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: That's it.. Now let's play...",0;
sleep2 10000;
goto L_Start;
end;
 
L_Start:
if(getmapusers("quiz_01") == 1) goto L_Champ;
if(getmapusers("quiz_01") == 0) goto L_None;
if(getmapusers("quiz_01") > 1) {
announce "Dice: . . . . .",0;
set $@number, rand(1,4);
sleep2 10000;
announce "Dice: I have a number now. Please go to the box of the number you want.... GO!",0;
sleep2 10000;
announce "Dice: 5",0;
sleep2 5000;
announce "Dice: 4",0;
sleep2 4000;
announce "Dice: 3",0;
sleep2 3000;
announce "Dice: 2",0;
sleep2 2000;
announce "Dice: 1",0;
sleep2 1000;
announce "Dice: Time's up.",0;
donpcevent "evnt#1::OnEnable";
announce "Dice: Winning number "+$@number+".",0;
if(($@number != 1) && ($@number != 2) && ($@number != 3)) goto L_Lose1;
if(($@number != 1) && ($@number != 2) && ($@number != 4)) goto L_Lose2;
if(($@number != 1) && ($@number != 3) && ($@number != 4)) goto L_Lose3;
if(($@number != 2) && ($@number != 3) && ($@number != 4)) goto L_Lose4;
end;
}
 
L_Lose1:
areawarp "quiz_01",183,81,191,60,"prontera",155,182;
areawarp "quiz_01",195,81,203,60,"prontera",155,182;
areawarp "quiz_01",207,81,215,60,"prontera",155,182;
goto L_Start;
end;
 
L_Lose2:
areawarp "quiz_01",183,81,191,60,"prontera",155,182;
areawarp "quiz_01",195,81,203,60,"prontera",155,182;
areawarp "quiz_01",219,81,227,60,"prontera",155,182;;
goto L_Start;
end;
 
L_Lose3:
areawarp "quiz_01",183,81,191,60,"prontera",155,182;
areawarp "quiz_01",207,81,215,60,"prontera",155,182;
areawarp "quiz_01",219,81,227,60,"prontera",155,182;
goto L_Start;
end;
 
L_Lose4:
areawarp "quiz_01",195,81,203,60,"prontera",155,182;
areawarp "quiz_01",207,81,215,60,"prontera",155,182;
areawarp "quiz_01",219,81,227,60,"prontera",155,182;
goto L_Start;
end;
 
L_Champ:
mapannounce "quiz_01","Dice: Come to me and tell me your name.",0;
hideoffnpc "Dice#evnt1";
end;
 
L_None:
announce "No One Enters the Dice Event. Closed",0;
hideonnpc "Dice#evnt1";
end;
}
 
- script evnt#1 -1,{
 
OnEnable:
areawarp "quiz_01",182,94,228,88,"prontera",155,182;
areawarp "quiz_01",185,87,188,82,"prontera",155,182;
areawarp "quiz_01",197,87,200,82,"prontera",155,182;
areawarp "quiz_01",209,87,212,82,"prontera",155,182;
areawarp "quiz_01",221,87,224,82,"prontera",155,182;
end;
}
 
// -- Mapflags
quiz_01 mapflag nowarp
quiz_01 mapflag nowarpto
quiz_01 mapflag noteleport
quiz_01 mapflag nosave
quiz_01 mapflag nomemo
quiz_01 mapflag nobranch
quiz_01 mapflag noloot
quiz_01 mapflag noskill
quiz_01 mapflag nopenalty
Posted (edited)

This:

OnMinute1700:

Is the activation timer thats what you need to change for

OnClock0000:

OnMinute60: means every 60 mins server uptime, correct me someone if im wrong

 

But if u use OnClock event start every hour server time.

 

Sample:

- script Dice#announcer -1,{
 
OnInit:
disablenpc "prtevent";
hideonnpc "Dice#evnt1";
end;
 
OnClock1700:
OnClock1800:
OnClock1900:
OnClock2000:

if( agitcheck() || agitcheck2() ) end;
announce "Dice: We are going to have a Dice event.",0;
Edited by enteike
Posted

so it looks like this?

 

- script Dice#announcer -1,{
 
OnInit:
disablenpc "prtevent";
hideonnpc "Dice#evnt1";
end;
 
OnClock1700:
OnClock1800:
OnClock1900:
OnClock2000:
OnClock2100:
OnClock2200:
OnClock2300:
OnClock2400:
 
if( agitcheck() || agitcheck2() ) end;
announce "Dice: We are going to have a Dice event.",0;
sleep2 10000;
announce "Dice: For those who wants to join, Please proceed to the center of Prontera and enter the Warp Portal.",0;
sleep2 10000;
announce "Dice: After 1 Minute the Portal will close.",0;
sleep2 10000;
announce "Dice: So please go to the middle of Prontera and enter the Warp Portal now if you want to join.",0;
enablenpc "prtevent";
initnpctimer;
end;
 
OnTimer30000:
announce "Dice: Last 30 seconds.",0;
sleep2 5000;
announce "Dice: If you want to join please enter the Warp Portal beside me here in Prontera.",0;
end;
 
OnTimer50000:
announce "Dice: Last 10 seconds.",0;
end;
 
OnTimer55000:
announce "Dice: 5.",0;
end;
 
OnTimer56000:
announce "Dice: 4.",0;
end;
 
OnTimer57000:
announce "Dice: 3.",0;
end;
 
OnTimer58000:
announce "Dice: 2.",0;
end;
 
OnTimer59000:
announce "Dice: 1.",0;
end;
 
OnTimer60000:
announce "Dice: Time's up.",0;
end;
 
OnTimer61000:
disablenpc "prtevent";
donpcevent "Dice#evnt1::OnEnable";
stopnpctimer;
end;
 
OnTimer62000:
announce "Dice: The next Dice event will begin after 30 minutes.",0;
end;
}
 
//--------------------------------------------------
 
prontera,156,171,0 warp prtevent 2,2,quiz_01,204,90
 
//--------------------------------------------------
 
quiz_01,204,93,6 script Dice#evnt1 715,{
 
//--------------------------------------------------
 
mes "[Dice]";
mes "Please tell me your name";
next;
input .@name$;
if(.@name$ != strcharinfo(0)) {
mes "[Dice]";
mes "Are you sure thats your character name?";
close;
}
mes "[Dice]";
mes "Congrats. You've won.";
close2;
announce "Dice: We have a winner, "+.@name$+".",0;
getitem 674,1;
warp "prontera",155,182;
hideonnpc "Dice#evnt1";
end;
 
OnEnable:
mapannounce "quiz_01","Dice: We are about to start the Dice event.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: But before we start the event here's how to play the game. . .",0;
sleep2 10000;
mapannounce "quiz_01","Dice: I'm only gonna say this once so read carefully.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: I'm going to pick a number, 1 to 4. Then I'll do a count down from 5 to 0.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: All you have to do is go to the box of the number you want.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: Example, If I get the number of 4, All the players standing on numbers 1 to 3 will be warped back to town.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: We will do it again and again until we only have 1 player left on the map.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: Oh yeah! Before I forget you MUST GO INSIDE THE BOX, because if you're caught standing on the stairs you'll be automatically disqualified.",0;
sleep2 10000;
mapannounce "quiz_01","Dice: That's it.. Now let's play...",0;
sleep2 10000;
goto L_Start;
end;
 
L_Start:
if(getmapusers("quiz_01") == 1) goto L_Champ;
if(getmapusers("quiz_01") == 0) goto L_None;
if(getmapusers("quiz_01") > 1) {
announce "Dice: . . . . .",0;
set $@number, rand(1,4);
sleep2 10000;
announce "Dice: I have a number now. Please go to the box of the number you want.... GO!",0;
sleep2 10000;
announce "Dice: 5",0;
sleep2 5000;
announce "Dice: 4",0;
sleep2 4000;
announce "Dice: 3",0;
sleep2 3000;
announce "Dice: 2",0;
sleep2 2000;
announce "Dice: 1",0;
sleep2 1000;
announce "Dice: Time's up.",0;
donpcevent "evnt#1::OnEnable";
announce "Dice: Winning number "+$@number+".",0;
if(($@number != 1) && ($@number != 2) && ($@number != 3)) goto L_Lose1;
if(($@number != 1) && ($@number != 2) && ($@number != 4)) goto L_Lose2;
if(($@number != 1) && ($@number != 3) && ($@number != 4)) goto L_Lose3;
if(($@number != 2) && ($@number != 3) && ($@number != 4)) goto L_Lose4;
end;
}
 
L_Lose1:
areawarp "quiz_01",183,81,191,60,"prontera",155,182;
areawarp "quiz_01",195,81,203,60,"prontera",155,182;
areawarp "quiz_01",207,81,215,60,"prontera",155,182;
goto L_Start;
end;
 
L_Lose2:
areawarp "quiz_01",183,81,191,60,"prontera",155,182;
areawarp "quiz_01",195,81,203,60,"prontera",155,182;
areawarp "quiz_01",219,81,227,60,"prontera",155,182;;
goto L_Start;
end;
 
L_Lose3:
areawarp "quiz_01",183,81,191,60,"prontera",155,182;
areawarp "quiz_01",207,81,215,60,"prontera",155,182;
areawarp "quiz_01",219,81,227,60,"prontera",155,182;
goto L_Start;
end;
 
L_Lose4:
areawarp "quiz_01",195,81,203,60,"prontera",155,182;
areawarp "quiz_01",207,81,215,60,"prontera",155,182;
areawarp "quiz_01",219,81,227,60,"prontera",155,182;
goto L_Start;
end;
 
L_Champ:
mapannounce "quiz_01","Dice: Come to me and tell me your name.",0;
hideoffnpc "Dice#evnt1";
end;
 
L_None:
announce "No One Enters the Dice Event. Closed",0;
hideonnpc "Dice#evnt1";
end;
}
 
- script evnt#1 -1,{
 
OnEnable:
areawarp "quiz_01",182,94,228,88,"prontera",155,182;
areawarp "quiz_01",185,87,188,82,"prontera",155,182;
areawarp "quiz_01",197,87,200,82,"prontera",155,182;
areawarp "quiz_01",209,87,212,82,"prontera",155,182;
areawarp "quiz_01",221,87,224,82,"prontera",155,182;
end;
}
 
// -- Mapflags
quiz_01 mapflag nowarp
quiz_01 mapflag nowarpto
quiz_01 mapflag noteleport
quiz_01 mapflag nosave
quiz_01 mapflag nomemo
quiz_01 mapflag nobranch
quiz_01 mapflag noloot
quiz_01 mapflag noskill
quiz_01 mapflag nopenalty

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...