diff options
| -rw-r--r-- | fernbedienung.lpr | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/fernbedienung.lpr b/fernbedienung.lpr index e6ac9b9..1c86644 100644 --- a/fernbedienung.lpr +++ b/fernbedienung.lpr @@ -17,12 +17,15 @@ var s: string; begin - ttySLeser:=tLeseProzess.create(extractfilepath(paramstr(0))+'socket',1); + ttySLeser:=tLeseProzess.create(paramstr(1),1); repeat if ttySLeser.gibZeile(s) then begin - if s='Ha!' then continue; // Startzeichen - if length(s)=2 then + if s='Ha!' then begin + writeln('Empfänger hat sich gemeldet!'); + continue; // Startzeichen + end; + if length(s)=3 then if base64ToBin(s) then begin writeln('Bits: '+s); continue; |