Fit in the gold room.

[Kasthiel]

 

Hi friends, I'd like some help from you guys to adjust this Gold Room.
1st I would like to set (Monday, Wednesday and Friday) for her to open
2nd Set a certain time of day (18:30, 21:30 and 00:30)
As soon as this Monday at 18:30 it would open and close after 1 hour.
3º to kill 1 monster instead of being born this monster pile, he selected one of the list and was born, whenever one dies one is born another in the place, but using these same monsters.

//*********************************************************************************************************************************************************************************
//***--Topic Link :		***\( ^ ~ ^ )/***
//***
//***
//*********************************************************************************************************************************************************************************
//***-- Script by :		***\( ^ ~ ^ )/***
//***-- Emistry
//***
//*********************************************************************************************************************************************************************************
//***-- Contact Info :	***\( ^ ~ ^ )/***
//***-- My Email : [email protected]
//***
//*********************************************************************************************************************************************************************************
//***-- Messages :		***\( ^ ~ ^ )/***
//***-- Drop me a private message or email if you are looking for my helps ^^.
//***-- Beside that, I am looking for a Server to work with ^^ .  
//***-- I will do my best to help you ^^.
//***-- More Details ? PM Me ^^.
//***
//*********************************************************************************************************************************************************************************
//***Although these scripts might not suit or follow with what you have requested completely. But i still wish you can give it a try before reject the works.
//***
//*********************************************************************************************************************************************************************************
//-------------------------MONSTER DATABASE [ REPLACE it in Your MOB_DB.txt ]  --------------------------------------------------------------------

//1852,G_EM_ANGELING,Angeling,Angeling,99,120,0,0,0,1,60,71,100,99,1,17,80,80,126,20,10,12,0,8,66,0x37B5,300,1288,288,384,0,0,0,0,0,0,969,5000,969,10000,969,8000,969,1000,0,0,0,0,0,0,0,0,0,0,0,0,0,0
//1853,G_EM_DEVILING,Deviling,Deviling,99,120,0,0,0,1,60,71,100,99,1,17,80,80,126,20,10,12,0,8,66,0x37B5,300,1288,288,384,0,0,0,0,0,0,7444,5000,7444,10000,7444,5000,969,10000,969,5000,0,0,0,0,0,0,0,0,0,0,0,0
//-------------------------NPC [ Warper + Exchanger  ]  --------------------------------------------------------------------

sala_vip,104,103,5	script	Gold Room	10120,{

set @NPC$,"^A020F0[Gold Room]^000000";		// Nome do Npc.


	mes @NPC$;
	mes "Eu posso te levar para uma mina de ouro.";
	next;
	mes @NPC$;
	mes "Eu cobro um valor de:";
	mes "100.000 Zeny por entrada.";
	next;
	switch(select("Entrar na sala de ouro:Cancelar")) {
case 1:
	if(Zeny < 100000) goto nomoney;
	set .@a,rand(50);
	set .@b,rand(50);
	mes @NPC$;
	mes "Antes de entrar, você precisa responder a pergunta para verificação de segurança.";
	mes "Se A = "+.@a+"   B = "+.@b;
	switch( rand(1) ){
	set .@answer,.@a + .@b;
	mes "Quantos são A + B ?";
	next;
			input .@input;	
			next;
		if( .@input!=.@answer ) {
		//atcommand "@kick " + strcharinfo(0);
		warp "SavePoint",0,0;
		close;
		break;
		}
		else if (.@input==.@answer) {
			set Zeny,Zeny-1000000;	
			addtimer 5000,strnpcinfo(0)+"::OnTimeLimit";
	mes @NPC$;
	mes "Você provou seu valor.";
	mes "Por favor. Entre.";
			next;
			warp "pvp_y_1-5",0,0; 	
			close;
			}
		end;
		}
case 2:
			mes @NPC$;
			mes "Owh....";
			mes "Não importa... Já que é sua decisão.";
			mes "Tudo depende de você.";
			mes "Volte se você mudar de idéia.";
			close;
	}
	nomoney:
		mes @NPC$;
		mes "Desculpe. Você precisa de 1.000.000z para poder entrar!";
		close;

OnTimeLimit:
	message strcharinfo(0),"[Gold Room ] Você tem 15 minuto!";
	sleep2 900000;
	warp "SavePoint",0,0;
	end;
	
OnInit:
//removemapflag "pvp_y_1-5",mf_nowarp;
monster "pvp_y_1-5",0,0,"Gold Angeling",1096,25,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Ghostring",1120,25,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold ArchAngeling",1388,25,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Deviling",1582,25,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Poring",1002,100,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Poporing",1031,100,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Poring Noel",1062,100,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Drops",1113,100,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Botaring",2093,100,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Marin",1242,100,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Metaling",1613,100,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Stapo",1784,100,strnpcinfo(0)+"::OnKill";
end;

OnKill:
monster "pvp_y_1-5",0,0,"Gold Mastering",1090,1,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Angeling",1096,1,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Ghostring",1120,1,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold ArchAngeling",1388,1,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Deviling",1582,1,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Poring",1002,1,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Poporing",1031,1,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Poring Noel",1062,1,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Drops",1113,1,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Botaring",2093,1,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Marin",1242,1,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Metaling",1613,1,strnpcinfo(0)+"::OnKill";
monster "pvp_y_1-5",0,0,"Gold Stapo",1784,1,strnpcinfo(0)+"::OnKill";
if(rand(100)<50){
getitem 969,1;
}
end;
}