Party check

prontera,150,150,4	script	Special warper	47,{
	getpartymember getcharid(1),0;
	getpartymember getcharid(1),2;
	mes "Special warper";
	if($@partymembercount > 2){
		mes "Your party must consist of 2 people only";
		close;
	}
	.@player_id = getcharid(3);
	.@partner_id = ($@partymemberaid[0]==.@player_id)?$@partymemberaid[1]:$@partymemberaid[0];
	.@partner_name$ = ($@partymemberaid[0]==.@player_id)?$@partymembername$[1]:$@partymembername$[0];
	if(!isloggedin(.@partner_id)){
		mes .@partner_name + " is currently offline";
		close;
	}
	attachrid(.@partner_id);
	.@partner_sex = Sex;
	.@partner_lvl = BaseLevel;
	.@partner_tcg = countitem(7227);
	.@partner_z = Zeny;
	attachrid(.@player_id);
	if(Sex == .@partner_sex){
		mes "Your partner must be " + Sex?"female":"male";
		close;
	}
	if(BaseLevel < 99){
		mes "You are below 99";
		close;
	}
	if(.@partner_lvl < 99){
		mes .@partner_name$ + " is below 99";
		close;
	}
	if(countitem(7227) < 10){
		mes "You don't have 10 TCG Cards";
		close;
	}
	if(.@partner_tcg < 10){
		mes .@partner_name$ + " don't have 10 TCG Cards";
		close;
	}
	if(Zeny < 10000000){
		mes "Your amount of Zeny is " + Zeny + ". You need " + (10000000-Zeny) + "more Zeny.";
		close;
	}
	if(.@partner_z < 10000000){
		mes .@partner_name$ + "'s amount of Zeny is " + .@partner_z + ". He need " + (10000000-.@partner_z) + "more Zeny.";
		close;
	}
	mes "Everything is OK.";
	mes "Warping...";
	close2;
	Zeny -= 10000000;
	delitem 7227,10;
	attachrid(.@partner_id);
	Zeny -= 10000000;
	delitem 7227,10;
	warpparty "gld_dun01",0,0,getcharid(1);
	end;
}