description.c-Dateireferenz

#include <living/skills.h>
#include <living/clothing.h>
#include <thing/properties.h>
#include <wizlevels.h>
#include <new_skills.h>
#include <language.h>
#include <defines.h>
#include <class.h>
#include <sys_debug.h>

Include-Abhängigkeitsdiagramm für description.c:

gehe zum Quellcode dieser Datei

Makrodefinitionen
#define	NEED_PROTOTYPES
Funktionen
public string	_query_internal_extralook ()
public varargs int	AddExtraLook (string look, int duration, string key, string lookende, object ob)
public int	RemoveExtraLook (string key)
void	create ()
string	condition ()
varargs string	long ()
varargs string	name (int casus, int demonst)
static int	_query_gender ()
static string	_query_real_race ()
static mixed	_set_name (mixed nm)
int	_query_container ()
int	is_class_member (mixed str)
mapping	_query_material ()
static int	_query_player_light ()
varargs int	CannotSee (int silent)
Variablen
inherit std container	description

---

Makro-Dokumentation

#define NEED_PROTOTYPES

Definiert in Zeile 14 der Datei description.c.

---

Dokumentation der Funktionen

int _query_container

(

)

Definiert in Zeile 288 der Datei description.c.

{
  return 0;
}

static int _query_gender

(

)

[static]

Definiert in Zeile 265 der Datei description.c.

Benutzt P_FROG, P_GENDER, Query() und QueryProp().

{
  if (QueryProp(P_FROG)) return 1;
  return Query(P_GENDER);
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

public string _query_internal_extralook

(

)

Definiert in Zeile 27 der Datei description.c.

Benutzt abs, F_VALUE, m_delete(), ME, P_INTERNAL_EXTRA_LOOK, Query() und zeit.

                                          {
  mixed xl;
  int zeit;
  string res, look="";

  xl=Query(P_INTERNAL_EXTRA_LOOK,F_VALUE);
  if (!mappingp(xl))
    return(0);

  foreach(string key, mapping xld: xl) {
    if (intp(zeit=xld["xlduration"])) {
      //hat offenbar nen Ablaufdatum
      if ( (zeit > 0 && zeit < time()) ||
           (zeit < 0 && abs(zeit) < object_time(ME)) ) {
                // Zeit abgelaufen oder
                // negative "Ablaufzeit" und das Objekt ist neuer als die
                // Eintragzeit, also loeschen und weiter (ja, das geht. ;-) und xld
                // hat das Eintragsmapping ja noch, weitere Benutzung also moeglich.)
                efun::m_delete(xl,key);
                // ggf. Meldung ausgeben
                if (interactive(ME)) {
                  if (strlen(xld["xlende"])) {
                    tell_object(ME,xld["xlende"]);
                  }
                  //kein einfacher String, aber Objekt+Funktion gegeben?
                  else if (strlen(xld["xlendefun"]) && strlen(xld["xlobjectname"]) &&
                    (!catch(res=call_other(xld["xlobjectname"],xld["xlendefun"],ME)
                                    ;publish))) {
                      if (stringp(res) && strlen(res))
                                tell_object(ME,res);
                    }
                }
                continue;
      }
    }
    // Der Eintrag ist offenbar noch gueltig, Meldung anhaengen, bzw. via
    // Funktionsaufruf beschaffen.
    if (strlen(xld["xllook"]))
      look+=xld["xllook"];
    else if (strlen(xld["xlfun"]) && strlen(xld["xlobjectname"]) &&
                (!catch(res=call_other(xld["xlobjectname"],xld["xlfun"],ME);publish))) {
      if (!stringp(res) || !strlen(res)) {
                // keinen String oder leeren String gekriegt -> ueberspringen.
                continue;
      }
      else
                look+=res;
    }
  }
  // fertig. Wenn look nicht leer ist, zurueckgeben, sonst 0.
  if (strlen(look))
    return(look);
  else
    return(0);
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

mapping _query_material

(

)

Definiert in Zeile 313 der Datei description.c.

Benutzt P_MATERIAL und Query().

                          {
  mixed res;

  if (mappingp(res=Query(P_MATERIAL)))
    return res;
  return ([MAT_MISC_LIVING:100]);
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

static int _query_player_light

(

)

[static]

Definiert in Zeile 321 der Datei description.c.

Benutzt _query_int_light(), P_LIGHT_MODIFIER und QueryProp().

{  return _query_int_light()+QueryProp(P_LIGHT_MODIFIER);  }

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

static string _query_real_race

(

)

[static]

Definiert in Zeile 274 der Datei description.c.

Benutzt F_VALUE, P_RACE, P_REAL_RACE, Query() und QueryProp().

{
  return Query(P_REAL_RACE,F_VALUE)||QueryProp(P_RACE);
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

static mixed _set_name

(

mixed

nm

)

[static]

Definiert in Zeile 279 der Datei description.c.

Benutzt P_NAME, Set() und set_living_name().

{
  string lvnam;
  lvnam = nm;
  if(pointerp(nm)) lvnam = nm[0];
  set_living_name(lower_case(lvnam));
  return Set(P_NAME, nm);
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

public varargs int AddExtraLook	(	string	look,
		int	duration,
		string	key,
		string	lookende,
		object	ob
	)

Definiert in Zeile 83 der Datei description.c.

Benutzt BLUE_NAME, break_string(), BS_LEAVE_MY_LFS, F_VALUE, ME, P_INTERNAL_EXTRA_LOOK, Query(), replace_personal() und Set().

                                                            {
  mapping xl;
  string oname;
  if (!stringp(key) || !strlen(key)) {
    // Automatisch erzeugen, wenn moeglich
    if (!objectp(previous_object()) || 
                !stringp(key=object_name(previous_object())) || !strlen(key))
      return(-1);
  }
  
  if (!stringp(look) || !strlen(look))
    return(-2);
  if (!intp(duration))
    return(-3);
  
  xl=Query(P_INTERNAL_EXTRA_LOOK,F_VALUE); // dran denken: liefert referenz zurueck
  if (!mappingp(xl)) {
    Set(P_INTERNAL_EXTRA_LOOK, xl=([]) );
  }

  // kein Automatisches Ueberschreiben.
  if (member(xl,key))
    return(-4);

  // neg. Werte: "bis Ende/reboot", abs(duration) == Eintragzeit
  // 0: "fuer ewig", >0: Zeitdauer in Sekunden
  if (duration > 0)
    duration+=time();  // hoffentlich gibt es reichtzeitig 64bit-Ints
  else if (duration < 0)
    duration=negate(time());
  // 0 bleibt, wie es ist.

  if (objectp(ob)) {
    // Funktionsname und Objektname (als Name, damit es auch noch geht, wenn
    // das Objekt entladen wurde, Crash/reboot war etc.) speichern
    if (!oname=object_name(blueprint(ob)))
                oname=BLUE_NAME(ob); //BLUE_NAME nimmt explode()...
    xl[key]=(["xlobjectname":oname,
                      "xlfun": look,
                     ]);
    // ggf. Name der Funktion speichern, die bei Ablauf aufgerufen wird.
    if (stringp(lookende) && strlen(lookende))
                xl[key]["xlendefun"]=lookende;
  }
  else {
    // Einfacher Eintrag, nur den bearbeiteten String merken. ;-)
    xl[key]=(["xllook": break_string(replace_personal(look,({ME}),1),78,
                                             "",BS_LEAVE_MY_LFS),
                     ]);
    // ggf. Meldung speichern, die bei Ablauf ausgegeben werden soll.
    if (stringp(lookende) && strlen(lookende)) {
      xl[key]["xlende"]=break_string(replace_personal(lookende,({ME}),1),78,
                                             "",BS_LEAVE_MY_LFS);
    }
  }
  // Endezeit vermerken.
  if (duration != 0)
    xl[key]["xlduration"]=duration;

  // Kein Set noetig, weil Query das Mapping ja als Referenz lieferte.
  return(1);
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

varargs int CannotSee

(

int

silent

)

Definiert in Zeile 324 der Datei description.c.

Benutzt IS_LEARNER, P_BLIND, P_PLAYER_LIGHT, P_WANTS_TO_LEARN, Query(), QueryProp(), SK_NIGHTVISION und UseSkill().

Wird benutzt von _equipment(), _examine(), _inventory(), _look(), look_into() und show_exits().

{
   string is_blind;
   if (is_blind = QueryProp(P_BLIND)) {
      if (!silent) {
         if (stringp(is_blind))
            tell_object(this_object(), is_blind);
         else tell_object(this_object(), "Du bist blind!\n");
      }
      return 2;
   }
   if (UseSkill(SK_NIGHTVISION)<=0 &&
       environment() && QueryProp(P_PLAYER_LIGHT)<=0 &&
       (!IS_LEARNER(this_object()) || !Query(P_WANTS_TO_LEARN)))
   {
       if (!silent) tell_object(this_object(), "Es ist zu dunkel!\n");
       return 1;
   }
   return 0;
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

Hier ist ein Graph der zeigt, wo diese Funktion aufgerufen wird:

string condition

(

)

Definiert in Zeile 178 der Datei description.c.

Benutzt P_HP, P_MAX_HP, QueryPronoun(), QueryProp() und WER.

Wird benutzt von long().

{
  int hpnt, max_hpnt, perc;

  hpnt        = QueryProp( P_HP );
  max_hpnt    = QueryProp( P_MAX_HP );

  if(max_hpnt>0 && hpnt>0)
    perc=100*hpnt/max_hpnt;
 
  switch(perc) {
    case 0..9:
                return capitalize(QueryPronoun(WER))+" steht auf der Schwelle des Todes.\n";
    case 10..19:
                return capitalize(QueryPronoun(WER))+" braucht dringend einen Arzt.\n";
    case 20..29:
                return capitalize(QueryPronoun(WER))+" ist in keiner guten Verfassung.\n";
    case 30..39:
                return capitalize(QueryPronoun(WER))+" wankt bereits bedenklich.\n";
    case 40..49:
                return capitalize(QueryPronoun(WER))+" macht einen mitgenommenen Eindruck.\n";
    case 50..59:
                return capitalize(QueryPronoun(WER))+" sieht nicht mehr taufrisch aus.\n";
    case 60..69:
                return capitalize(QueryPronoun(WER))+" ist leicht angeschlagen.\n";
    case 70..79:
                return capitalize(QueryPronoun(WER))+" fuehlte sich heute schon besser.\n";
    case 80..89:
                return capitalize(QueryPronoun(WER))+" ist schon etwas geschwaecht.\n";
  }
  //fall-through
  return capitalize(QueryPronoun(WER))+" ist absolut fit.\n";
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

Hier ist ein Graph der zeigt, wo diese Funktion aufgerufen wird:

void create

(

)

Definiert in Zeile 166 der Datei description.c.

Benutzt AddId(), create(), F_MODE, F_MODE_AS, P_CLOTHING, P_GENDER, P_INTERNAL_EXTRA_LOOK, P_LIGHT_TRANSPARENCY, PROTECTED, SAVE, Set() und SetProp().

{ 
  ::create();
  Set(P_GENDER, SAVE, F_MODE);
  // Extralook-Property speichern und vor manueller Aenderung schuetzen
  // EMs duerfen, die wissen hoffentlich, was sie tun.
  Set(P_INTERNAL_EXTRA_LOOK, SAVE|PROTECTED, F_MODE_AS);
  SetProp(P_LIGHT_TRANSPARENCY, 0);
  SetProp(P_CLOTHING,({}));
  AddId("Living");
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

int is_class_member

(

mixed

str

)

Definiert in Zeile 293 der Datei description.c.

Benutzt P_RACE, QueryProp() und race.

                               {
  // Keine Klasse, keine Mitgliedschaft ...
  if (!str || (!stringp(str) && !pointerp(str)) || str=="") 
      return 0;

  if (::is_class_member(str))
    return 1;

  if (stringp(str))
    str = ({str});

  // Rassen werden als implizite Klassen aufgefasst.
  // TODO: Pruefen, ob das unbedingt hart-kodiert sein muss.
  string race = QueryProp(P_RACE);
  if ( stringp(race) && member( str, lower_case(race) ) > -1 )
    return 1;
  else
    return 0;
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

varargs string long

(

)

Definiert in Zeile 212 der Datei description.c.

Benutzt condition(), filter_ldfied(), make_invlist(), ME, ob(), P_EXTRA_LOOK, P_INTERNAL_EXTRA_LOOK, P_LONG, P_TRANSPARENT, PL, process_string(), QueryPronoun(), QueryProp() und WER.

                      {
  string str, cap_pronoun;
  string descr, invl,tmp,exl;
  int hpnt, max_hpnt;
  mixed filter_ldfied;
  object ob;

  str = process_string( QueryProp(P_LONG) );
  if(!stringp(str)) str = "";

  str += condition();

  // Extralook
  if(stringp(tmp = QueryProp(P_EXTRA_LOOK)))
    str += tmp;
  if (stringp(tmp = QueryProp(P_INTERNAL_EXTRA_LOOK)))
    str += tmp;
  for(ob = first_inventory(ME); ob; ob = next_inventory(ob))
    if(exl = ob->QueryProp(P_EXTRA_LOOK)) 
      str += exl;
    else if(exl = ob->extra_look()) 
      str += exl; // TO BE REMOVED

  
  if(filter_ldfied = QueryProp(P_TRANSPARENT))
  {
    invl = make_invlist(PL, all_inventory(ME));
    if(invl != "")
      str += capitalize(QueryPronoun(WER))+" traegt bei sich:\n" + invl;
  }
  return str;
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

varargs string name	(	int	casus,
		int	demonst
	)

Definiert in Zeile 245 der Datei description.c.

Benutzt name, P_ARTICLE, P_FROG, QueryArticle(), QueryProp(), RAW, SetProp() und WESSEN.

{
  string s;
  
  if( QueryProp( P_INVIS ) )
  {
    if( casus == RAW ) return "Jemand";
    return ({"Jemand","Jemands","Jemandem","Jemanden"})[casus];
  }
  if (QueryProp(P_FROG) && casus != RAW )
  {
    SetProp(P_ARTICLE,1);
    s=QueryArticle(casus,0)+"Frosch";
    if (casus==WESSEN) s += "es";
    SetProp(P_ARTICLE,0);
    return s;
  }
  return ::name( casus, demonst );
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

public int RemoveExtraLook

(

string

key

)

Definiert in Zeile 147 der Datei description.c.

Benutzt F_VALUE, m_delete(), P_INTERNAL_EXTRA_LOOK und Query().

                                       {
  mapping xl;
  if (!stringp(key) || !strlen(key)) {
    // Automatisch erzeugen, wenn moeglich
    if (!objectp(previous_object()) ||
                !stringp(key=object_name(previous_object())) || !strlen(key))
      return(-1);
  }
  xl=Query(P_INTERNAL_EXTRA_LOOK,F_VALUE); // dran denken: liefert referenz zurueck
  if (!mappingp(xl))
    return (-2);
  if (!member(xl,key))
    return(-2);

  efun::m_delete(xl,key);
  // Kein Set noetig, weil Query das Mapping ja als Referenz lieferte.
  return(1);
}

Hier ist ein Graph der zeigt, was diese Funktion aufruft:

---

Variablen-Dokumentation

inherit std container description

Definiert in Zeile 12 der Datei description.c.