AW: Primitive (Graphics,Sound) selber machen?

[Frank.Kronmueller@XXXXXXX.de]

        Hallo Timm,

        you wrote:

        >Liebe Mathematica Gemeinde,
        >
        >es sollte doch wohl moeglich sein,
        >primitive wie Graphics[] oder Sound[]
        >selber zu machen, oder?
        >
        >Was ich moechte ist soetwas wie in 
        >folgendem Beispiel:
        >
        >in:   a = CreateTina[Age->35]
        >out:  Tina[]
        >
        >in:   AgeOf[a]
        >out:  35

        >Irgendwie so in der Richtung.
        >Was mir wichtig ist, ist jedenfalls,
        >dass die Information nicht fuer den
        >Benutzer sichtbar ist, da sie sehr
        >umfangreich und komplex ist.

        >mfg

>  >Timm Reinisch
> 
> 
        Vielleicht hilft Dir dieses Beispiel weiter:



        Format[Mensch[x___]] := Data[Length[List@x]]



        y = Mensch[Alter -> 35, Vorname -> "Dilbert", Beruf -> "Network
Specialist"]
        z = Mensch[]


        GetAge[x_Mensch] := Alter /. List @@ x;
        GetName[x_Mensch] := Vorname /. List @@ x;

        GetName[y]
        GetAge[y]


        y
        List @@ y


        ------------------------------------------------------------------
        Format[] definiert das Anzeigeformat des Objekts Mensch[]

        Dann werden zwei Menschen definiert:
        1. Dilbert
        2. to be born :-)

        Die Daten werden wie gewuenscht angezeigt;
        auf die "internen"Daten kann mit den naechsten Funktionen,die nur
mit Mensch[]-Objekten arbeiten,
        zugegriffen werden.

        Zum Schluss nochmal der Unterschied zwischen dem Anzeigeformat von
Mensch[] und (hier) List[].



        Mit freundlichen Gruessen

        Frank Kronmueller


----------------------------------------
TEMIC Semiconductor GmbH

Frank Kronmueller
Dipl.-Ing.(FH) 

Analog IC Design Engineer

Data Communication IR
Dept. A&C25

Theresienstr. 2
74072 Heilbronn
Germany

eMail : frank.kronmueller@XXXXXXX.de
        frank.kronmueller@XXXXXXX.org
  PGP : Public Key available on request
Phone : (+49)-(0)-7131-67-3135
  Fax : (+49)-(0)-7131-67-2244
  WWW :  www.temic-semi.de 
----------------------------------------