自学教程：C++ stringp函数代码示例

varargs int page(string data, string title, function callback, int no_ansi){    if(!stringp(data)) return 0;    if(stringp(title)) write("*===| Paging: " + title + " |===*/n/n");    if(functionp(callback)) cb = callback;    if(no_ansi) ansi = 0;    currentLine = 0;    if(!this_player()->query_env("morelines"))	myLinesPerCycle = DEF_LINESPERCYCLE;    else	myLinesPerCycle = to_int(this_player()->query_env("morelines"));    linesPerCycle = myLinesPerCycle - 1;    exploded = explode(data, "/n");    totalLines = sizeof(exploded);    page_more();}

/*    Description:      Prove knowledge of some secret.    Parameters:         ( mixed secret, closure cl, mixed extra )      or ( mixed secret, object ob,  string func, mixed extra )      secret - something you want to prove knowledge of      cl     - a closure      ob     - an object in which to call func      func   - a function to call in ob      extra  - an extra parameter to pass      Depending on which form is used, one of these will be done:            ob->func( hash, extra )        or  funcall( hash, extra )      where hash is the hash value of the secret: hash( secret )    Returns:      The return value of the call/eval.    Notes:      None.*/varargs mixedprove( mixed val, mixed ob_or_cl, mixed func_or_extra, mixed extra ){  if( closurep( ob_or_cl ) )    return funcall( (closure) ob_or_cl, hash( val ), func_or_extra );  if( !objectp( ob_or_cl ) || !stringp( func_or_extra ))    return 0;  return call_other( (object) ob_or_cl, (string) func_or_extra,                      hash( val ), extra );}

static void_stop_listen(string channel, object ob){    if(!channel || !stringp(channel))	return;    if(channels[channel])	m_delkey(channels[channel], ob);    if (listeners[ob])	listeners[ob] -= ({channel});

void setup(){	string loc;	if( stringp(loc = query("location")) )		move(loc);	set("no_get", 1);	seteuid(getuid());	restore();}

mixed can_climb_obj() {     if( this_player()->GetParalyzed() ) {        return "You cannot do anything!";    }    if(this_player()->GetPosition() != POSITION_STANDING ) {        return "You must be standing in order to climb.";    }    if(!stringp(hobbled(this_player()))) return "Your injuries prevent that movement.";    return this_player()->CanManipulate();}

// 任务的名字varargs string name(){        if (stringp(quest_name))                return quest_name;        if (functionp(quest_name))                return evaluate(quest_name);        return "未名任务";}

varargs nomask mixedsort_array(mixed arr, mixed lfunc, object obj){    if (stringp(lfunc)) {	if (!obj)	    obj = previous_object();	lfunc = mkfunction(lfunc, obj);    }    return sort(arr, lfunc);}

void _tarn_turn_on(object pl,string txt,int gen){  if (!objectp(pl)||!interactive(pl)) return WEG();  if (!stringp(txt)||txt=="") return WEG();  if (gen<0||gen>2) return WEG();  player=pl;  desc=capitalize(txt);  gender=gen;  shadow(pl,1);}

string relative_name(mixed ob) {    string * path;    if (objectp(ob)) 	path = explode(file_name(ob),"/");    else if (stringp(ob)) 	path = explode(ob,"/");    else 	error("Object or array expected./n");     return path[sizeof(path)-1];}

string query_look() {   if( stringp(query_message()) )// Gpfault:  Reading is supposed to cost readiness// don't let players get the text for free by looking//      return ::query_look() + "/n/n" + "~CTITThe sign reads~CDEF:/n/n" + query_message();      return "It's a simple sign post, made of a flat piece of wood bound by leather strips to a post. It has been painted ~CWRNRED~CDEF./n/nOwned by $(OWNER)." + "/n/nThe sign has writing on it.  Try ~CCOMread~CDEFing it.";   else      return "It's a simple sign post, made of a flat piece of wood bound by leather strips to a post. It has been painted ~CWRNRED~CDEF./n/nOwned by $(OWNER)." + "/n/nThe sign is blank.";}

varargs int tail(string file){    if (extern_call())        set_this_object(previous_object());    if (!stringp(file) || !this_player())        return 0;    string txt = read_bytes(file, -(TAIL_MAX_BYTES + 80), (TAIL_MAX_BYTES + 80));    if (!stringp(txt))        return 0;    // cut off first (incomplete) line    int index = strstr(txt, "/n");    if (index > -1) {        if (index + 1 < strlen(txt))            txt = txt[index+1..];        else            txt = "";    }

int do_wear(object me, object ob){	string str;	if( ob->query("female_only")	&&	(string)me->query("gender") != "
C++ stringprintf函数代码示例
C++ stringmatchlen函数代码示例