// statue.txt v1.0
// M. G. Slack - 2006
// (slack at attglobal dot net)
// Simple script, displays the name of a given statue when searched/looked at.  Can
// call a town script node if needed.
//
// Memory Cells - 
//   0 - Name of the statue (1-16).  Default is 0, nothing happens.
//   1,2 - Coordinates for a stuff done flag. If these are 0 and 0, ignored. Otherwise,
//         if the given flag is non-zero, will call given town script node.
//   3 - Town script node to call (if greater than 0 and sdf is set).

beginterrainscript; 

variables;

short nm;
string descline;

body;

beginstate INIT_STATE;
break;

beginstate START_STATE;
break;

beginstate SEARCH_STATE;
	if ((get_memory_cell(0) < 1) || (get_memory_cell(0) > 16)) {
		message_dialog("The un-named statues features are almost life-like.", "You run your fingers over the cold sculpture, feeling the artist's strokes.");
		end();
	}
	// get name of statue now, display plaque
	nm = get_memory_cell(0);
	clear_buffer();
	if (nm == 1) {
		append_string("_Lady at the Gates_"); // amenti (ament?)
	}
	else if (nm == 2) {
		append_string("_Devourer of Souls_"); // ammit
	}
	else if (nm == 3) {
		append_string("_Sacred Cat_"); // bast
	}
	else if (nm == 4) {
		append_string("_Cow Mother_"); // hathor
	}
	else if (nm == 5) {
		append_string("_Lady of Life_"); // isis
	}
	else if (nm == 6) {
		append_string("_Cosmic Balance_"); // ma'at
	}
	else if (nm == 7) {
		append_string("_Lady Supreme_"); // neith
	}
	else if (nm == 8) {
		append_string("_Lady Vulture_"); // nekhbet
	}
	else if (nm == 9) {
		append_string("_Lady of the House_"); // nephthys
	}
	else if (nm == 10) {
		append_string("_Celestial Mistress_"); // nut (nuit?)
	}
	else if (nm == 11) {
		append_string("_Sacred Love_"); // qetesh
	}
	else if (nm == 12) {
		append_string("_Fierce Lioness_"); // sekhmet
	}
	else if (nm == 13) {
		append_string("_Scorpion Queen_"); // selket
	}
	else if (nm == 14) {
		append_string("_Mistress of Books_"); // seshat
	}
	else if (nm == 15) {
		append_string("_Lady of Birth_"); // taueret
	}
	else if (nm == 16) {
		append_string("_Lady Cobra_"); // uadjet (wadjet?)
	}
	get_buffer_text(descline);
	message_dialog("A small plaque on the base of the statue reads:", descline);
	// kick off town script?
	if ((get_memory_cell(1) > 0) || (get_memory_cell(2) > 0)) {
		if ((get_flag(get_memory_cell(1), get_memory_cell(2)) > 0) && (get_memory_cell(3) > 0)) {
			run_town_script(get_memory_cell(3));
		}
	}
break;
