import <FarFuture.ash>;

string[8] peopleToUseTheSkillOn;
peopleToUseTheSkillOn[0] = "cathyoak";	
peopleToUseTheSkillOn[1] = "croft";	
peopleToUseTheSkillOn[2] = "cubeof11";
peopleToUseTheSkillOn[3] = "mai";
peopleToUseTheSkillOn[4] = "hairy";
peopleToUseTheSkillOn[5] = "hallehoopma";
peopleToUseTheSkillOn[6] = "notjim";
peopleToUseTheSkillOn[7] = "veracity";	

void use_time_pranks() {
	#int i;
	
	if (to_int(get_property("_timeSpinnerMinutesUsed")) <= 8) {
		FarFuture("shot");
	}
	
	sort peopleToUseTheSkillOn by random(100000);
	if (to_int(get_property("_timeSpinnerMinutesUsed")) < 9) {
		cli_execute("timespinner prank mistress of the obvious");
	}
	if (to_int(get_property("_timeSpinnerMinutesUsed")) < 10) {
		cli_execute("timespinner prank hagwench");
	}
	for i from 0 to count(peopleToUseTheSkillOn)-1 {
		if (to_int(get_property("_timeSpinnerMinutesUsed")) < 10) {
			cli_execute("timespinner prank " + peopleToUseTheSkillOn[i]);
		} else {
			return;
		}
	}
	return;
}

void use_smiles() {
	#int i;
	
	sort peopleToUseTheSkillOn by random(100000);
	
	if (to_int(get_property("_smilesOfMrA")) < 4) {
		use_skill(1, $skill[The Smile of Mr. A.], "mistress of the obvious");
	}
	if (to_int(get_property("_smilesOfMrA")) < 5) {
		use_skill(1, $skill[The Smile of Mr. A.], "hagwench");
	}
	
	for i from 0 to count(peopleToUseTheSkillOn)-1 {
		if (to_int(get_property("_smilesOfMrA")) < 5) {
			if (!use_skill(1, $skill[The Smile of Mr. A.], peopleToUseTheSkillOn[i])) {
				set_property("_smilesOfMrA", 5);
			}
		} else {
			return;
		}
	}
	return;
}
void main() {
	use_smiles();
	if (can_interact()) {
		use_time_pranks();
	}
}