24 lines
427 B
Text
24 lines
427 B
Text
|
input metauml;
|
||
|
|
beginfig(1);
|
||
|
|
% Klassen
|
||
|
|
Class.TTS("Sprachausgabe")
|
||
|
|
("zText")
|
||
|
|
("+Sprachausgabe(pText)", "+setzeText(pText)", "+text()", "+sprichtNoch()");
|
||
|
|
|
||
|
|
Class.STT("Spracheingabe")
|
||
|
|
("zText")
|
||
|
|
("+Sprachausgabe()", "+erkenneSprache()", "+text()");
|
||
|
|
|
||
|
|
% Modul
|
||
|
|
Package.Sprache("Sprache")(TTS, STT);
|
||
|
|
|
||
|
|
% Objekte anordnen
|
||
|
|
leftToRight(30)(TTS, STT);
|
||
|
|
|
||
|
|
% Objekte zeichnen
|
||
|
|
drawObjects(TTS, STT, Sprache);
|
||
|
|
|
||
|
|
endfig;
|
||
|
|
end
|
||
|
|
|