Texas Instruments Voyage 200 TI-89 Titanium Mode D'emploi page 834

: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
Remarques :
Ê Configure l'unité pour la réception et l'affichage de la variable msg.
Ë Permet ensuite à l'utilisateur d'entrer un message dans la variable msg et de
l'envoyer.
Ì Boucle exécutée par l'unité qui reçoit le premier message.
Í Permet à l'utilisateur d'entrer un message dans la variable msg et de l'envoyer.
Connectivité
GetCalc msg
Disp msg
InputStr msg
SendCalc msg
Ì
Ï
834