seercard.c-Dateireferenz

#include <defines.h>
#include <properties.h>
#include <language.h>
#include <unit.h>
#include <moving.h>
#include <wizlevels.h>

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

gehe zum Quellcode dieser Datei

Makrodefinitionen
#define	KONTO   "seercard_kontostand"
#define	BESITZER_GUELTIG
Funktionen
static string	_feld ()
static string	_bild ()
static string	_guthaben ()
static int	kontostand (string str)
public string	query_owner ()
static string	_query_long ()
static string	_query_short ()
static mixed	_query_autoloadobj ()
static mixed	_set_autoloadobj (mixed wert)
static int	_query_amount ()
static string	_query_keep_on_sell ()
static int	_abheben (string str)
public varargs int	move (mixed dest, int method)
public int	IsEqual (object ob)
public string	GetOwner ()
public void	create ()
static int	_kontostand (string str)
Variablen
inherit std	thing
private string	owner

---

Makro-Dokumentation

#define BESITZER_GUELTIG

Wert:

(environment() && query_once_interactive(environment()) && \
    getuid(environment()) == owner)

Definiert in Zeile 19 der Datei seercard.c.

Wird benutzt von _feld(), _guthaben(), _query_amount(), _query_autoloadobj() und _query_keep_on_sell().

#define KONTO   "seercard_kontostand"

Definiert in Zeile 18 der Datei seercard.c.

Wird benutzt von _abheben(), _query_amount() und IsEqual().

---

Dokumentation der Funktionen

static int _abheben

(

string

str

)

[static]

Definiert in Zeile 276 der Datei seercard.c.

Benutzt _notify_fail(), _query_amount(), AddMoney(), break_string(), BS_LEAVE_MY_LFS und KONTO.

{
    int summe, guthaben;
    string dummy;
    
    if ( !this_player() || environment(this_object()) != this_player() )
        return 0;

    if ( str == "1 muenze ab" )
        summe = 1;
    else
        if ( !stringp(str) ||
             sscanf( str, "%d muenzen ab%s", summe, dummy ) != 2 ||
             summe < 1 || dummy != "" ){
            _notify_fail( "Wieviele Muenzen moechtest Du denn abheben?\n" );
            return 0;
        }

    if ( (guthaben = _query_amount()) < summe ){
        _notify_fail( "So hoch ist Dein Guthaben aber nicht!\n" );
        return 0;
    }

    if ( (int) this_player()->AddMoney(summe) != 1 ){
        write( "Soviel Geld koenntest Du gar nicht mehr tragen.\n" );
        return 1;
    }

    this_player()->Set( KONTO, guthaben - summe );
    
    write( break_string( "Du schuettelst Deine Seer-Card (TM) vorsichtig "
                         "hin und her und murmelst ein paar geheime Worte.\n"
                         "Ploetzlich macht es *PLOPP* und Du haeltst Geld "
                         "in den Haenden!", 78, 0, BS_LEAVE_MY_LFS ) );
    return 1;
}

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

static string _bild

(

)

[static]

Definiert in Zeile 124 der Datei seercard.c.

Benutzt break_string() und owner.

{
    if ( this_player() && getuid(this_player()) == owner )
        return break_string( "Du findest, dass das Bild ganz schlecht "
                             "getroffen ist. Dass man selber aber auch immer "
                             "so unvorteilhaft abgebildet wird!", 78 );

    return break_string( "Du findest, dass " + capitalize(owner) + " sehr gut "
                         "getroffen ist. Anscheinend wirst nur Du immer so "
                         "unvorteilhaft abgebildet.", 78 );
}

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

static string _feld

(

)

[static]

Definiert in Zeile 114 der Datei seercard.c.

Benutzt BESITZER_GUELTIG und break_string().

{
    if ( !BESITZER_GUELTIG )
        return break_string( "Das Feld schimmert aus jeder Richtung anders - "
                             "aber mehr kannst Du nicht erkennen.", 78 );

    return "Du kannst in dem Schimmern ein paar Ziffern erkennen.\n";
}

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

static string _guthaben

(

)

[static]

Definiert in Zeile 137 der Datei seercard.c.

Benutzt _query_amount(), BESITZER_GUELTIG und i.

Wird benutzt von _kontostand().

{
    int i;
    
    if ( !BESITZER_GUELTIG )
        return "Du kannst im Schimmern nichts erkennen.\n";

    if ( !(i = _query_amount()) )
        return "Welches Guthaben? :-)\n";

    return "Dein Guthaben betraegt " + ((i > 1) ? to_string(i) : "eine") +
        " Muenze" + ((i > 1) ? "n" : "") + ".\n";
}

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

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

static int _kontostand

(

string

str

)

[static]

Definiert in Zeile 152 der Datei seercard.c.

Benutzt _guthaben().

{
    if ( !this_player() || environment(this_object()) != this_player() )
        return 0;
    
    if ( !str || str == "" ){
        write( _guthaben() );
        return 1;
    }

    return 0;
}

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

static int _query_amount

(

)

[static]

Definiert in Zeile 242 der Datei seercard.c.

Benutzt BESITZER_GUELTIG, IS_SEER und KONTO.

Wird benutzt von _abheben(), _guthaben() und IsEqual().

{
    int res;

    // Wenn die Karte im Inv des Besitzers ist, Kontostand liefern
    if ( BESITZER_GUELTIG && IS_SEER(environment()) ){
        res = (int) environment()->Query(KONTO);

        // ... allerdings nur, wenn er gueltig ist ;-)
        if ( !intp(res) || res < 0 || res > 100000 )
            return environment()->Set( KONTO, 0 ), 0;
        else
            return res;
    }

    // Fuer Fremde ist die Karte wertlos (bis auf ihren Materialwert)
    return 0;
}

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

static mixed _query_autoloadobj

(

)

[static]

Definiert in Zeile 204 der Datei seercard.c.

Benutzt BESITZER_GUELTIG und owner.

{
    // Die Karte ist nur fuer den Eigentuemer autoload - auch, wenn sie in
    // einem Paket o.ae. steckt (zweiter Teil der Abfrage) bzw. wenn sie
    // in einem pseudo-leblosen Objekt steckt (renew - dritte Abfrage)
    if ( BESITZER_GUELTIG ||
         environment() && environment(environment()) &&
         query_once_interactive(environment(environment())) &&
         getuid(environment(environment())) == owner ||
         previous_object(1) &&
         object_name(previous_object(1)) == "/secure/master" )
        return owner;
    
    return 0;
}

static string _query_keep_on_sell

(

)

[static]

Definiert in Zeile 262 der Datei seercard.c.

Benutzt BESITZER_GUELTIG, owner, P_KEEP_ON_SELL und Query().

{
    // Der Besitzer der Karte 'behaelt' sie automatisch
    // Teil 2 der Abfrage, falls die Karte in einem Paket o.ae. steckt
    if ( BESITZER_GUELTIG || this_player() && getuid(this_player()) == owner )
        return owner;

    // Bei den anderen je nach Wunsch
    return Query(P_KEEP_ON_SELL);
}

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

static string _query_long

(

)

[static]

Definiert in Zeile 175 der Datei seercard.c.

Benutzt break_string(), BS_LEAVE_MY_LFS und owner.

{
    string str;

    str = "Eigentlich ist die Seer-Card ziemlich schlicht gehalten. Sie ist "
        "als ein etwa daumendickes Rechteck aus dunklem Holz geformt. "
        "Auf der rechten Seite ist ein Bild von " +
        ((this_player() && getuid(this_player()) == owner) ? "Dir" :
         capitalize(owner)) + " aufgemalt. Links "
        "daneben befindet sich ein schmucker Schriftzug in grossen silbernen "
        "Buchstaben. Im unteren Drittel der Karte befindet sich ein dezent "
        "schimmerndes rechteckiges Feld.";

    return break_string( str, 78, 0, BS_LEAVE_MY_LFS );
}

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

static string _query_short

(

)

[static]

Definiert in Zeile 192 der Datei seercard.c.

Benutzt owner.

{
    if ( !owner || !strlen(owner) )
        return "Eine Geldkarte";

    if ( this_player() && getuid(this_player()) == owner )
        return "Deine Seer-Card (TM)";

    return "Die Geldkarte von " + capitalize(owner);
}

static mixed _set_autoloadobj

(

mixed

wert

)

[static]

Definiert in Zeile 221 der Datei seercard.c.

Benutzt AddAdjective() und owner.

{
    // Wird normalerweise nur beim Einloggen nach Ende/Reboot aufgerufen
    if ( owner == "" && stringp(wert) && this_interactive() &&
         getuid(this_interactive()) == wert ){

        if ( member( ({ 'x', 'z', 's' }), wert[<1] ) != -1 ){
            AddAdjective( wert+"'" );
            AddAdjective( wert );
        }
        
        if ( wert[<1] != 's' )
            AddAdjective( wert+"s" );

        return owner = wert;
    }

    return -1;
}

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

public void create

(

)

Definiert in Zeile 45 der Datei seercard.c.

Benutzt AddCmd(), AddDetail(), AddId(), AddSmells(), AddSounds(), break_string(), create(), FEMALE, ME, owner, P_GENDER, P_INFO, P_LOG_FILE, P_MATERIAL, P_NAME, P_NOBUY, P_VALUE, P_WEIGHT, SENSE_DEFAULT, set_next_reset() und SetProp().

{
    if ( !clonep(ME) ){
        set_next_reset(-1);
        return;
    }

    ::create();

    SetProp( P_LOG_FILE, "report/tiamak.rep" );
    SetProp( P_NAME, "Geldkarte" );
    SetProp( P_INFO,
             break_string( "So sehr Du Dich auch anstrengst, Du kommst "
                           "einfach nicht hinter das Geheimnis dieser "
                           "Karte. Du weisst nur eines mit Sicherheit: "
                           "es muss etwas mit Magie zu tun haben.", 78 ) );
    SetProp( P_GENDER, FEMALE );
    SetProp( P_MATERIAL, ([ MAT_PEAR_WOOD: 80, MAT_MISC_MAGIC: 20 ]) );
    SetProp( P_WEIGHT, 1000 );
    SetProp( P_VALUE, 1000 );
    SetProp( P_NOBUY, 1 );

    if ( !owner)
        owner = "";

    AddSounds( SENSE_DEFAULT,
               break_string( "Du kannst nichts hoeren. Es sind anscheinend "
                             "auch keine losen Teile vorhanden.", 78 ) );

    AddSmells( SENSE_DEFAULT, "Auch bargeldlose Zahlungsmittel stinken "
               "nicht. ;-)\n" );

    AddDetail( "sicherheit", "So etwas bietet diese Karte nicht!\n" );
    AddDetail( "geheimnis", "Es lautet \"guthaben\". Aber verrate es "
               "nicht weiter!\nAngeblich kannst Du das Guthaben sogar direkt "
               "wieder abheben.\n" );
    AddDetail( "magie", "Wenn man sie so einfach untersuchen koennte, "
               "waere sie nicht halb so\ngeheimnisvoll.\n" );
    AddDetail( "rechteck",
               break_string( "An dieser Karte ist alles rechteckig: das Bild, "
                             "das merkwuerdige Feld und die Karte selber.",
               78) );
    AddDetail( ({ "holz", "birnbaumholz" }), "Es handelt sich um das "
               "mindestens genauso seltene wie magische Birnbaumholz.\n" );
    AddDetail( ({ "schriftzug", "schrift" }), "Nur wo \"Seer-Card\" drauf "
               "steht, ist auch wirklich eine Seer-Card drin.\n" );
    AddDetail( ({ "buchstabe", "buchstaben" }), "Sie bilden den "
               "unvermeidlichen Schriftzug \"Seer-Card (TM)\".\n" );
    AddDetail( "drittel", "Na unten halt.\n" );
    AddDetail( ({ "seite", "seiten" }), "Eine von beiden.\n" );
    AddDetail( ({ "rechte seite", "rechts" }), "Das ist die eine.\n" );
    AddDetail( ({ "linke seite", "links" }), "Das ist die andere.\n" );
    AddDetail( "rueckseite", "Die Rueckseite ist total leer und "
               "langweilig.\n" );
    AddDetail( ({ "zahl", "zahlen", "ziffern", "ziffer" }), "Vielleicht sollen "
               "sie Dein Guthaben darstellen?\n" );
    AddDetail( ({ "feld", "schimmern", "richtung" }), #'_feld/*'*/ );
    AddDetail( "bild", #'_bild/*'*/ );
    AddDetail( "guthaben", #'_guthaben/*'*/ );
    AddDetail( ({ "muenze", "muenzen" }), "Tipp mal \"guthaben\" ein.\n" );

    AddCmd( "guthaben", "_kontostand" );
    AddCmd( ({ "heb", "hebe" }), "_abheben" );
    
    AddId( ({ "\ngeldkarte", "geldkarte", "seercard", "seer-card",
                  "karte", "card" }) );
}

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

public string GetOwner

(

)

Definiert in Zeile 366 der Datei seercard.c.

{
    return "Tiamak";
}

public int IsEqual

(

object

ob

)

Definiert in Zeile 341 der Datei seercard.c.

Benutzt _query_amount(), BLUE_NAME, KONTO und P_AMOUNT.

{
    int muenzen, guthaben;
    
    if ( BLUE_NAME(ob) != "/obj/money" ||
         (muenzen = (int) ob->QueryProp(P_AMOUNT)) >= 0 ||
         !(guthaben = _query_amount()) )
        return 0;

    // negativen(!) Betrag abziehen
    guthaben += muenzen;
    
    if ( guthaben < 0 ){
        // Karte leer - Restbetrag wieder zurueck
        ob->AddAmount( guthaben - muenzen );
        environment()->Set( KONTO, 0 );
    }
    else {
        ob->AddAmount( -muenzen );
        environment()->Set( KONTO, guthaben );
    }
}

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

static int kontostand

(

string

str

)

[static]

public varargs int move	(	mixed	dest,
		int	method
	)

Definiert in Zeile 314 der Datei seercard.c.

Benutzt AddAdjective(), move() und owner.

{
    int res;

    res = ::move( dest, method );

    // Besitzer der Karte setzen, falls noch keiner existiert
    if ( owner == "" && res == 1 && environment() &&
         query_once_interactive(environment()) ){
        owner = getuid(environment());
        
        if ( member( ({ 'x', 'z', 's' }), owner[<1] ) != -1 ){
            AddAdjective( owner );
            AddAdjective( owner+"'" );
        }
        
        if ( owner[<1] != 's' )
            AddAdjective( owner+"s" );
    }

    return res;
}

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

public string query_owner

(

)

Definiert in Zeile 167 der Datei seercard.c.

Benutzt owner.

{
    return owner;
}

---

Variablen-Dokumentation

private string owner

Definiert in Zeile 24 der Datei seercard.c.

Wird benutzt von _bild(), _query_autoloadobj(), _query_keep_on_sell(), _query_long(), _query_short(), _set_autoloadobj(), create(), geldmenge(), get_uids(), heart_beat(), init(), move(), query_owner() und QueryOwner().

inherit std thing

Definiert in Zeile 8 der Datei seercard.c.