Gacha Machine / Lotti Girl

turbo_room,93,132,4	script	Card Gacha	562,{

	setarray .MvpC[0],4236,4147,4168,4142,4134,4137,4123,4324,4263,4318,4276,4146,4132,4131,4143,4135,4144,4148,4121,4342,4302,4305; // MVP Cards

	mes "[^FFA500Card Gacha^000000]";
	mes "I'm Lotti! I'll exchange";
	mes "Random Prizes for every";
	mes "^ff00003,000,000 zeny^000000.";
	next;
	mes "[^FFA500Card Gacha^000000]";
	mes "Jackpot Prize:";
	mes "^ff0000 1x Basic MVP Cards!^000000";
	mes "Consolations are:";
	mes "^ff0000 x1 Finale Token^000000";
	mes "^ff0000 x1 MVP Particle^000000";
	mes "^ff0000 x1 YGG Berry 10 Box^000000";
	mes "And many more!!";
	if (Zeny < 3000000)
		close;
	next;
	if(select("Let's Do This!!:No thanks...")==2) close;
	mes "[^FFA500Card Gacha^000000]";
	mes "Here we go...";
	set Zeny, Zeny - 3000000;
	set .@Total,5;
	//<%>,<ItemID>,<Amount>
	setarray .@P1[0],1,.MvpC[rand(0, 21)],1; // MVP Cards
	setarray .@P2[0],3,22783,1; // Finale Token
	setarray .@P3[0],3,22781,1; // MVP Particle
	setarray .@P4[0],5,14232,1; // YGG Berry Box
	setarray .@Default[0],512,1;
	set .@i, rand(1,.@Total);
	if (rand(1,100) > getd(".@P"+.@i+"[0]"))
	{
		for(set .@j,0; .@j<getarraysize(.@Default); set .@j,.@j+2)
		{
			getitem .@Default[.@j], .@Default[.@j+1];
			if(!.@k[0])
				setarray .@k[0], .@Default[.@j], .@Default[.@j+1];
		}
	}
	else{
		for(set .@j,1; .@j<getarraysize(getd(".@P"+.@i)); set .@j,.@j+2)
		{
			getitem getd(".@P"+.@i+"["+.@j+"]"), getd(".@P"+.@i+"["+(.@j+1)+"]");
			if (!.@k[0])
			{
				set .@gz,.@i;
				setarray .@k[0], getd(".@P"+.@i+"["+.@j+"]"), getd(".@P"+.@i+"["+(.@j+1)+"]");
				break;
			}
		}
	}
	if(1<=.@gz&&.@gz<=3)
		announce "Alright! "+strcharinfo(0)+" just received "+getitemname(.@k[0])+" x "+.@k[1]+" from Card Gacha!",bc_all,0xCBC3E3;
	specialeffect2 10;
	close;

OnInit:
	initnpctimer;
	end;

OnTimer1000:
	showscript("Rare Cards");
	setnpctimer 0;
	end;

}