function	script	MemoTicket	{

if (!callfunc("isValidTFMap")) {
	getitem 18003,1;
	dispbottom "Sorry, Memo Ticket cannot be used on  this map";
} else {
	if(agitcheck() == 0) {
		atcommand "@save";
	} else {
		dispbottom "Sorry, Memo Ticket cannot be used during WoE or WoE SE!";
	}
}
end;

}

function	script	PartyRecall	{

if (!callfunc("isValidTFMap")) {
	getitem 18004,1;
	dispbottom "Sorry, Party Recall Ticket cannot be used on  this map";
} else {
	if(agitcheck() == 0) {
		getmapxy(@map$,@x,@y,0);
		set @partyid,getcharid(1);
		warpparty @map$,@x,@y,@partyid;
	} else {
		dispbottom "Sorry, Party Recall Ticket cannot be used during WoE or WoE SE";
	}
}
end;

}

//
// Function to set a list of limited maps for all tickets
//
-	script	Ticket_Functions::LimitedMaps#tf01	-1,{

	// Set limited map names
	OnInit:
	setarray $@TF_RMaps$, "gefg_cas01","gefg_cas02","gefg_cas03","gefg_cas04","gefg_cas05","payg_cas01","payg_cas02","payg_cas03","payg_cas04","payg_cas05","aldeg_cas01","aldeg_cas02","aldeg_cas03","aldeg_cas04","aldeg_cas05","prtg_cas01","prtg_cas02","prtg_cas03","prtg_cas04","prtg_cas05","arug_cas01","arug_cas02","arug_cas03","schg_cas01","schg_cas02","schg_cas03","sch_gld","pay_gld","prt_gld","alde_gld","gef_fild13","aru_gld";
	end;

}

//
// Function to check if standing map is limited
//
function	script	isValidTFMap	{

// Get info about where player is standing
getmapxy(@map$,@x,@y,strcharinfo(0));

// Go through every limited map names
for (set @i,0; @i < getarraysize($@TF_RMaps$); set @i,@i+1) {

	// Check if standing map is limited
	if (@map$ == $@TF_RMaps$[@i]) {
		return(1); // yes limited map
		continue; // exit loop
	}

}
return(0); // no, not limited map 
end;

}