FUNKTION:
        static object FindTrader()
IMPLEMENTIERT:
        /std/trade.c
ARGUMENTE:
        keine
BESCHREIBUNG:
        FindTrader sucht im aktuellen Objekt nach einem Haendler.
        Dabei wird entweder nach der Id "\ntrader" oder den in
        P_TRADER_NEEDED angegebenen Ids gesucht.
RÜCKGABEWERT:
        Das gefundene Haendlerobjekt oder null.
BEMERKUNG:
        FindTrader ist eigentlich nur von Raeumen sinnvoll zu
        nutzen, da der Haendler ja im aktuellen Objekt gesucht
        wird.
        Falls Bedarf besteht, kann man die Funktion aber auch
        um die Angabe eines Suchgebietes erweitern.
BEISPIEL:
        if (!FindTrader()) return "Kein Haendler da!";
SIEHE AUCH:
        GetActiveCM(L), HeadLine(L), CostStr(L), SpecCostStr(L),
        MakeValString(L), MakePriceList(L), P_TRADER_NEEDED
 |