/* /lib/std/story.c
* from the Dead Souls Object Library
* handles objects and NPCs telling stories
* created by Corvar
* Version:
* Last Modified:
*/
private int AlreadyTellingTale;
private mapping Tales;
private string TalesDir;
private string NoTaleMessage;
void PickTale( string taletotell );
void TellTale( int part );
string SetTalesDir(string dir);
string GetTalesDir();
mapping SetTale(mapping tale);
mapping GetTale();
array GetTaleKeys();
string SetNoTaleMessage(string notalemessage);
string GetNoTaleMessage();
int GetTellingTale();
static void create(){
AlreadyTellingTale = 0;
TalesDir = "";
Tales = ([ ]);
}
/* One of the following two must be used. SetTalesDir(string dir) will set a
directory which will contain tale files. Each tale file should consist of
the following:
action#delay where action is what you want the NPC to say, and delay
is how long before the next action.
Example:
say this is the first part of the tale#5
emote this is the second part of the tale which is really long so that it will span a line. Note that there is no line feed in the middle of this line#4
speak last line#1
End Example.
If using SetTale(mapping tale) instead the mapping should be like the
following
SetTale( ([ 1 : ({"say this is the first part of the tale",5}),
2 : ({"emote this is.....",4}), 3 : ({"speak last line",1}) ]) );
*/
string SetTalesDir(string dir){
TalesDir = dir;
return TalesDir;
}
mapping SetTale(mapping tale){
Tales = tale;
return Tales;
}
string SetNoTaleMessage(string notalemessage){
NoTaleMessage = notalemessage;
return NoTaleMessage;
}
string GetTalesDir(){ return TalesDir; }
mapping GetTale(){ return Tales; }
array GetTaleKeys(){ return keys( Tales ); }
string GetNoTaleMessage(){ return NoTaleMessage; }
int GetTellingTale(){ return AlreadyTellingTale; }
void PickTale( string taletotell ){
array msg;
string file, *files;
int y;
if( ! AlreadyTellingTale ){
int x = 0;
if( TalesDir ){
files = get_dir( GetTalesDir() );
if(taletotell){
y = member_array(taletotell,files);
if( y != -1 )
file = taletotell;
else {
environment(this_object())->eventPrint(NoTaleMessage);
return;
}
}
else
file = files[random(sizeof(files))];
AlreadyTellingTale = 1;
Tales = ([]);
msg = explode( read_file( TalesDir + file ), "\n" );
foreach( string str in msg ){
Tales[x++] = explode( str, "#" );
}
}
if( !Tales ) return;
call_out( (: TellTale :), 1, 0 );
}
}
void TellTale( int part ){
if( part == sizeof( keys( Tales ) ) ){
AlreadyTellingTale = 0;
return;
}
if( living(this_object()) ) this_object()->eventForce( Tales[part][0] );
else environment(this_object())->eventPrint( Tales[part][0] );
call_out( (: TellTale :), to_int( Tales[part][1] ), part + 1 );
return;
}
