rem: Response (the_slave_empire, ThraddDemeanor);
add: DoResponsePhrase (the_slave_empire0, ThraddDemeanor, shared_phrase_buf);
context: ThraddCulture (RESPONSE_REF R){	if (PLAYER_SAID (R, be_polite))	{		NPCPhrase (OK_POLITE);		SET_GAME_STATE (THRADD_INTRO, 0);	}	else if (PLAYER_SAID (R, use_rhymes))	{		NPCPhrase (OK_RHYMES);		SET_GAME_STATE (THRADD_INTRO, 1);	}	else if (PLAYER_SAID (R, speak_pig_latin))	{		NPCPhrase (OK_PIG_LATIN);		SET_GAME_STATE (THRADD_INTRO, 2);	}	else if (PLAYER_SAID (R, just_the_way_we_do))	{		NPCPhrase (OK_WAY_YOU_DO);		SET_GAME_STATE (THRADD_INTRO, 3);	}	NPCPhrase (WHAT_NAME_FOR_CULTURE);	Response (you_decide, ThraddDemeanor);	Response (fat, ThraddDemeanor);	Response (the_slave_empire, ThraddDemeanor);}