can you make this script every 10mins pls

[Hades03]

prontera,159,232,5 script Fast-Type Event 757,{
if( .String$ == "" ){
mes "There is no Event right now.";
}else{
mes "Type the Correct Sentences.";
mes "^FF0000"+.Strings$+"^000000";
input .@Type$;
if( .String$ == .@Type$ ){
 mes "Gratz..you type the correct string.";
 getitem 607,1;
 set .String$,"";
}else{
 mes "Sry there is already other person win this round.";
}
}
close;
OnClock0200:
OnClock0400:
//etc..
set .String$,"";
while( getstrlen( .String$ ) < .Length ){
set .String$,.String$ + .List$[ rand( getarraysize( .List$ ) ) ];
}
announce "Round Started.",0;
end;
OnInit:
set .Length,6;
setarray .List$,"A","B","C","D","E","F","G";
end;
}

and can you pls fix it the Sentences doesnt show wew

Edited May 19, 2012 by Jam

[Emistry]

change

OnClock0200:
OnClock0400:

into

OnMinute00:
OnMinute10:
OnMinute20:
OnMinute30:
OnMinute40:
OnMinute50:

[Mystery]

Uh, well, for the Timer.. change them to OnMin10: onwards to OnMin60:

Edited May 19, 2012 by Mysterious

[Hades03]

how?