Values = <> ..                                        Values = <> ..

Do with Alarm                                         Do with Alarm
 - Read >Text< Socket,                                 - Read >Text< Socket,
   CheckIsCorrect Text,                                  CheckIsCorrect Text,
   Translate >Values< Text                               Translate >Values< Text 
 ' Socket = Rq.Network.TCP.Socket                      ' Socket = Rq.Network.TCP.Socket
;                                                     + Ec <>  
                                                        Handle Ec
If Alarm then                                         ;  
 ...
Else                                                  If Alarm then
 ...                                                   ...
;                                                     Else
                                                       ...
                                                      ;  