prontera.gat,148,326,5 script Organizador Da GDE 806,{
show "[Organizador da DGE]";
if(getgmlevel()<99) goto L_NotGM;
show "Bem vindo, Eu posso arrumar os horários da woe pra você";
show "Siga as instruções passo a passo e tudo deverá estar pronto no final";
next;
show "[Organizador Da GDE]";
show "Agora a diversão começa";
show "Por favor escolha o que gostaria de fazer";
next;
menu "Adicionar o horário da GDE",L_Add,"Resetar todos os horários!",L_Reset,"Ver os Horários atuais",-;
show "[Organizador Da GDE]";
show "Ok os horários atuais são:-";
set @num,0;
L_LoopList:
if($sday[@num] == 0 && $eday[@num] == 0 && $woetime[@num] == 0 && $woetime2[@num] == 0) goto L_LoopListEnd;
if($sday[@num]==0) set $@tempday$,"Domingo";
if($sday[@num]==1) set $@tempday$,"Segunda";
if($sday[@num]==2) set $@tempday$,"Terça";
if($sday[@num]==3) set $@tempday$,"Quarta";
if($sday[@num]==4) set $@tempday$,"Quinta";
if($sday[@num]==5) set $@tempday$,"Sexta";
if($sday[@num]==6) set $@tempday$,"Sábado";
if($eday[@num]==0) set $@tempday2$,"Domingo";
if($eday[@num]==1) set $@tempday2$,"Segunda";
if($eday[@num]==2) set $@tempday2$,"terça";
if($eday[@num]==3) set $@tempday2$,"Quarta";
if($eday[@num]==4) set $@tempday2$,"Quinta";
if($eday[@num]==5) set $@tempday2$,"Sexta";
if($eday[@num]==6) set $@tempday2$,"Sabadoy";
if($eday[@num]==$sday[@num]) show $@tempday$+" Das "+$woetime[@num]+":00 até as "+$woetime2[@num]+":00";
if($eday[@num]!=$sday[@num]) show "Das "+$@tempday$+" "+$woetime[@num]+":00 até as "+$@tempday2$+" "+$woetime2[@num]+":00";
set @num,@num+1;
goto L_LoopList;
L_LoopListEnd:
close;
L_Add:
set @num,0;
L_AddLoop:
if($sday[@num] == 0 && $eday[@num] == 0 && $woetime[@num] == 0 && $woetime2[@num] == 0) goto L_AddLoopEnd;
set @num,@num+1;
goto L_AddLoop;
L_AddLoopEnd:
show "[Organizador Da GDE]";
show "QUal dia você gostária que a GDE ^FF0000começasse^000000?";
next;
menu "Domingo",-,"Segunda",-,"Terça",-,"Quarta",-,"Quinta",-,"Sexta",-,"Sábado",-;
if(@menu==1) set $sday[@num],0;
if(@menu==2) set $sday[@num],1;
if(@menu==3) set $sday[@num],2;
if(@menu==4) set $sday[@num],3;
if(@menu==5) set $sday[@num],4;
if(@menu==6) set $sday[@num],5;
if(@menu==7) set $sday[@num],6;
show "[Organizador Da GDE]";
show "Ok, agora escolha o horário que você gostaria que a woe ^FF0000começasse^000000";
show "Isto usando um relógio de 24 horas";
show "00 = meia noite";
show "12 = meio dia";
show "23 = 11 da noite";
next;
digit @input;
if (@input <> 24) goto L_BadNumber;
set $woetime[@num],@input;
show "[Organizador Da GDE]";
show "Qua dia você gostaria que a GDE^FF0000terminasse^000000 ?";
next;
menu "O mesmo que começou",-,"Domingo",-,"Segunda",-,"Terça",-,"QUarta",-,"Quinta",-,"Sexta",-,"Sábado",-;
if(@menu==1) set $eday[@num],$sday[@num];
if(@menu==2) set $eday[@num],0;
if(@menu==3) set $eday[@num],1;
if(@menu==4) set $eday[@num],2;
if(@menu==5) set $eday[@num],3;
if(@menu==6) set $eday[@num],4;
if(@menu==7) set $eday[@num],5;
if(@menu==8) set $eday[@num],6;
show "[Organizador Da GDE]";
show "Ok, agora me diga qual horário que você gostaria que a GDE ^FF0000terminasse^000000";
show "Isto também usando um relógio de 24 horas";
show "00 = meia noite";
show "12 = meio dia";
show "23 = 11 da noite";
next;
digit @input;
if (@input <> 24) goto L_BadNumber;
set $woetime2[@num],@input;
show "[Organizador Da GDE]";
show "O horário da sua GDE foi estabelecido";
show "Para confirmar vá em ^FF0000'Ver os horários da GDE'^000000";
close;
L_Reset:
show "[Organizador Da GDE]";
show "Você está prestes a resetar todos os horários da GDE";
show "Está certo disso??";
next;
menu "Não, o que eu estava pensando?",L_No,"Sim, eu gostaria de fazer isso",-;
if(agitcheck()==1) goto L_WoEOn;
deletearray $sday[0],200;
deletearray $eday[0],200;
deletearray $woetime[0],200;
deletearray $woetime2[0],200;
show "[Organizador Da GDE]";
show "Todos fora ressetados. lembre-se de setar novos";
close;
L_WoEOn:
show "[Organizador Da GDE]";
show "Sinto muito mas com a GDE em operação, não posso resetar os horários";
close;
L_No:
show "[Organizador Da GDE]";
show "Oh, tudo bem... volte quando quiser";
close;
L_NotGM:
show "os horários da GDE são :-";
set @num,0;
goto L_LoopList;
end;
L_BadNumber:
show "[Organizador Da GDE]";
show "Sinto muito, este numero eh inválido... tente novamente";
close;
}
- script Agit_Event2 -1,{
end;
OnInit:
disablenpc "Agit_Event";
OnMinute00:
OnAgitInit:
// Inicio da checagem do tempo
set $@num,0;
L_StartLoop:
if($sday[$@num] == 0 && $eday[$@num] == 0 && $woetime[$@num] == 0 && $woetime2[$@num] == 0) goto L_StartLoopEnd;
if((gettime(4)==$sday[$@num] && gettime(3)>=$woetime[$@num]) || (gettime(4)==$eday[$@num] && gettime(3)<$woetime2[$@num])) goto L_Start;
set $@num,$@num+1;
goto L_StartLoop;
// Fim da checaguem do tempo
L_StartLoopEnd:
set $@num,0;
L_EndLoop:
if($eday[$@num] == 0 && $woetime[$@num] == 0 && $woetime2[$@num] == 0) end;
if((gettime(4)==$eday[$@num]) && (gettime(3)==$woetime2[$@num])) goto L_End;
set $@num,$@num+1;
goto L_EndLoop;
end;
// Fim da woe
L_End:
if(agitcheck(0)==0) end;
Announce "A guerra do Emperium Começou!!!",8;
AgitEnd;
end;
// Start WoE
L_Start:
if(agitcheck(0)==1) end;
Announce "A guerra do Emperium Acabou!!!",8;
AgitStart;
end;