Texas Instruments TI-89 Titanium Bedienungsanleitung Seite 866

:Chat()
:Prgm
:ClrIO
:Disp "On first unit to send,","
enter 1;","On first to receive,"
:InputStr " enter 0",msg
:If msg="0" Then
: While true
Ê :
:
:
Ë
:
: EndWhile
:Else
: While true
Í : InputStr msg
: SendCalc msg
Î
: GetCalc msg
: Disp msg
: EndWhile
:EndIf
:EndPrgm
Hinweise:
Ê Richtet das betreffende Gerät zum Empfang und zum Anzeigen der Variable msg
ein.
Ë Ermöglicht es diesem Benutzer, eine Nachricht in msg einzugeben und diese zu
senden.
Ì Schleife, die von dem Gerät durchlaufen wird, das die erste Meldung empfängt.
Í Ermöglicht es diesem Benutzer, eine Nachricht in msg einzugeben und diese zu
Rechnerkopplung
GetCalc msg
Disp msg
InputStr msg
SendCalc msg
Ì
Ï
864