88 lines
2.6 KiB
C
88 lines
2.6 KiB
C
/* memo pad by Cratylus @ Frontiers
|
|
* Sep 21 2005
|
|
*/
|
|
|
|
int read_memo(string str);
|
|
int help_msg();
|
|
|
|
string ReadFun(mixed args...){
|
|
help_msg();
|
|
return "";
|
|
}
|
|
|
|
#include <lib.h>
|
|
#include <vendor_types.h>
|
|
inherit LIB_ITEM;
|
|
int dirchecked;
|
|
string ownerstr,capownerstr,fileread;
|
|
object ownerob;
|
|
void create(){
|
|
::create();
|
|
SetKeyName("memo pad");
|
|
SetId( ({"pad","memo","memo pad","notepad"}) );
|
|
SetShort("a yellow memo pad");
|
|
SetLong("A yellow pad of papers to write your memos on. "+
|
|
"There seems to be instructions written on it.");
|
|
SetMass(20);
|
|
SetVendorType(VT_TREASURE);
|
|
SetItems(([ ({"instruction", "instructions", "words"}) : "Words that "+
|
|
"explain how to use the notepad. Try: read instructions on notepad.",
|
|
]) );
|
|
SetRead( ([ ({"instruction", "instructions", "words"}) : (: ReadFun :),
|
|
"default" : (: read_memo :),
|
|
]) );
|
|
}
|
|
|
|
void init(){
|
|
::init();
|
|
add_action("memo","memo");
|
|
add_action("clean_memo","fresh");
|
|
add_action("erase_memo","erase");
|
|
ownerob=environment(this_object());
|
|
if(living(ownerob)) capownerstr=capitalize(ownerob->GetKeyName());
|
|
if(capownerstr) ownerstr=lower_case(capownerstr);
|
|
dirchecked=0;
|
|
}
|
|
int memo(string str){
|
|
if(!dirchecked){
|
|
this_object()->checkdir();
|
|
}
|
|
if(!str){
|
|
write("You do not write anything on your memo pad.\n");
|
|
return 1;
|
|
}
|
|
write_file(homedir(this_player())+"/log/memo",str+"\n");
|
|
write("You add a memorandum to your memo pad.\n");
|
|
say(capownerstr+" scribbles in "+possessive(this_player())+" memo pad.");
|
|
return 1;
|
|
}
|
|
int read_memo(mixed str...){
|
|
if(!dirchecked){
|
|
this_object()->checkdir();
|
|
}
|
|
fileread=read_file(homedir(this_player())+"/log/memo");
|
|
if(!fileread){
|
|
write("The memo pad is blank.\n");
|
|
write("For instructions: read instructions on memo pad");
|
|
return 1;
|
|
}
|
|
write("The pad reads:\n"+fileread+"\n");
|
|
say(capownerstr+" flips through "+possessive(this_player())+" memo pad.\n");
|
|
return 1;
|
|
}
|
|
int help_msg(){
|
|
write("The back of the pad reads:\n\n"+
|
|
"cReMem Memo Pad, For your note-taking needs! Memo pad commands:\n"+
|
|
"----------\n"+
|
|
"memo <string> : Writes <string> into the pad.\n"+
|
|
"read memo : Reads the contents of your memo pad.\n"+
|
|
"----------\n");
|
|
say(capownerstr+" reads the back of a memo pad.\n");
|
|
return 1;
|
|
}
|
|
int checkdir(){
|
|
if(file_size(homedir(this_player())+"/log") != -2) mkdir(homedir(this_player())+"/log");
|
|
dirchecked=1;
|
|
return 1;
|
|
}
|