Need Help changing time on script.

[cutekram]

Hi Guys i would like to ask if how can i change the time into 3 hours on this script thanks for advance
 

//FAST TYPE EVENT

//Credits to Emistry for making the script

//Paulinds for requesting the script, details & idea.

 

prontera,146,172,5 script Fast-Type Event 421,{

if(getgmlevel() >= 99) callsub L_GM;
if( !.Event ) {
        mes "There is no Event right now.";
} else if ( .String$ == "" ) {
        npctalk "Wait for the next round..";

} else {
        mes "Type the Correct Sentences.";
        mes "^FF0000" + .String$ + "^000000";
        input [email protected]$;
        if( .String$ == "" ) {
                announce "Sorry, " + strcharinfo(0) + " is a bit slow..",0;
                close;
        }
        if ( .String$ == [email protected]$ && .Event ) {
                getitem 7227, 1; //EDIT THE PRIZE HERE
                announce "Fast-Type Event: " + strcharinfo(0) + " typed the correct string!",0;
                set .String$, "";
                set .Round, .Round + 1;
                donpcevent "Fast-Type Event::OnStart2";
        } else {
                announce "" + strcharinfo(0) + " mispelled some strings XD",0;
        }
}
close;

OnMinute00:
OnMinute60:
if(.Event) end;
donpcevent "Fast-Type Event::OnStart";
end;

OnStart:
announce "Fast-Type Event has started at Prontera 146 172 !",0;
L_Begin:
set .Event, 1;
set .String$, "";
while( getstrlen( .String$ ) < .Length ){
        set .String$,.String$ + .List$[ rand( getarraysize( .List$ ) ) ];
}
announce "Round "+(.Round+1)+" Started !",0;
end;

OnStart2:
sleep2 5000;
if(.Round == .Rounds) {
        if(!.Event) end;
        announce "Fast-Type Event: Event is over!",0;
        set .Event, 0;
        set .Round, 0;
        end;
}
if(!.Event) end;
announce "Fast-Type Event: Next round starts in 5 seconds...",0;
sleep2 5000;
if(!.Event) end;
goto L_Begin;

L_GM:
mes "Fast-Type event is" + (.Event?"^00FF00 ON^000000":"^FF0000 OFF^000000");
if(select((!.Event?"^00FF00Start":"^FF0000End") + " Event^000000","Normal Player") == 2) return;
switch(.Event) {
        case 1:
                set .Event, 0;
                set .Round, 0;
                set .String$, "";
                announce "Fast-Type Event: A GM has ended the event.",0; break;
        default:
                donpcevent "Fast-Type Event::OnStart";
}
close;

OnInit:
set .Length,28; //EDIT THE LENGTH OF CHARACTERS TO BE TYPED
set .Rounds,3; //EDIT THE ROUNDS
setarray .List$,";","B","_","D","E","%","=","H","I","J","/","L","M","N","6","P","Q","]","S","T",","; //YOU CAN ADD LETTERS, DIGITS & SYMBOLS HERE..
end;
}

Edited August 29, 2015 by Emistry
codebox

[EL Dragon]

change

OnMinute00:
OnMinute60:

to

OnClock0000:
OnClock0300:
OnClock0600:
OnClock0900:
OnClock1200:
OnClock1500:
OnClock1800:
OnClock2100:

[cutekram]

Thank you so much!!!