Inhalt

1. Ermittlung von Datum und Uhrzeit in GeoCalc

Mit GeoComm verfügt PC/Geos zwar über ein Terminalprogramm, aber es ist nicht gerade leistungsstark zu nennen. Dennoch reicht es für viele Anwender und vor allem für Einsteiger in die DFÜ Welt aus. Der erfahrene DFÜ'ler rümpft immer die Nase, wenn ich ihm erzähle, daß ich nach 10 Jahren DFÜ dennoch lieber zu GeoComm greife als zu anderen Terminalprogrammen, die dann meist nur als nicht registrierte Shareware Versionen vorliegen. GeoComm ist immerhin gegenüber den SW Versionen schon bezahlt, also will ich es auch nutzen.

In der Version 2.0 von PC/GEOS ist auch endlich ein grober Fehler in der VT100 Darstellung beseitigt worden. Die Löschung des Bildschirms war nicht korrekt und der Text wurde immer invers dargestellt. Diese Fehler treten nun nicht mehr auf, auch wenn der VT100 Modus insgesamt noch lückenhaft ist. ANSI kann aber immer noch nicht verwendet werden!

GeoComm wird von mir benutzt, um aus der GeoBox - unserer eigenen Mailbox - die aktuellen Nachrichten halbautomatisch gesteuert auszulesen. Der Vorteil der GeoComm Anwendung liegt für mich darin, daß ich GeoWorks dazu zunächst nicht verlassen muß. Während des Ladevorgangs, eines Mitteilungspaket im QWK Format, können andere Aufgaben parallel weiter erledigt werden. Erst zum Lesen der Nachrichten muß leider GeoWorks kurzfristig verlassen werden.

Die GeoBox ermöglicht es, alle oder einige Nachrichten per QWK Offline-Reader Datei zu packen und zu übertragen.
Vom Hauptmenü aus gelangt man mit dem Punkt 'n' in das Nachrichtenmenü. Mit 'q' wird der QWK Programmteil aufgerufen und mit 'd' wird QWK dazu veranlaßt, alle Nachrichten seit dem letzten Anruf zu sammeln (und eventuell entsprechend der QWK Konfiguration zu packen, falls gewünscht und eingestellt) und als Datei GEOBOX.QWK zu versenden. An dieser Stelle muß in GeoComm der Empfangsteil des XMODEM Protokolls eingeschaltet werden.

Nach dem Empfangen dieser Datei, welche ich immer gleich in dem Verzeichnis meines QWK Offline Readers speichern lasse, kann man ggf. eine GEOBOX.REP Datei zur GeoBox senden. Die GEOBOX.REP Datei erstellt man mit dem QWK OfflineReader; sie enthält meine Mitteilungen an GeoBox Teilnehmer oder an bestimmte Bretter der GeoBox.
Nach dieser Übertragung verlasse ich die GeoBox, starte den QWK Offline Reader und sehe mir in Ruhe die aktuellen Mitteilungen an, ohne das dabei Telefongebühren anfallen.

Alle oben genannten Vorgänge lassen sich halbwegs automatisch ausführen, wenn man dazu die Script Sprache von GeoComm einsetzt. Dies ist eine Mini-Programmiersprache mit Befehlen, die an das Modem bzw. eine Mailbox gesendet werden können. Neben einfachen Befehlen sind auch Sprünge innerhalb des Programms möglich. Das Programm selbst ist eine Textdatei, welche mit dem Text-Editor unter GeoWorks erstellt werden kann. Diese Datei muß in dem Verzeichnis: \GEOS20\USERDATA\COMMACRO gespeichert werden. In diesem Verzeichnis stehen schon zwei Beispiele, an welchen ich mich für meine persönlichen Scripts orientiert habe.

Für das Einloggen in die GeoBox habe ich das Script GEOBOX.MAC und für das Auslesen des QWK Pakets das Scrip: QWK_READ.MAC erstellt.
Im folgenden sind die Listings aufgeführt. Eine Erklärung der einzelnen Zeilen erübrigt sich weitgehend. Wer Probleme mit einzelnen Kommandos hat, sollte dies im GeoWorks Handbuch (1.x oder 2.0) nachlesen.
Für den eigenen Bedarf sind die Scripts natürlich entsprechend anzupassen, insbesondere bei Modem- und Userdaten.

GEOBOX.MAC

   PORT 4
   COMM 19200 - 8 - N - 1 - FULL
   TERM VT100
   CLEAR
   :retry
   PRINT "Wählen", CR
   DIAL "0236688480"
   MATCH "BUSY" GOTO retry
   MATCH "CARRIER" GOTO retry
   MATCH "CONNECT" GOTO connect
   PROMPT 3600
   PRINT "Zeitüberschreitung beim anwählen!", CR
   GOTO done
   :connect
   MATCH "Namen an" GOTO eintragen
   PROMPT 7200
   GOTO done
   :eintragen
   PAUSE 60
   SEND "Jürgen Heinisch",CR
   PAUSE 60
   SEND "passwort",CR
   :done
   PRINT "DONE",CR
   BELL
   END
   :ABORT
   PRINT "Telefon auflegen ?",CR
   SEND "+++"
   MATCH "OK" GOTO dohup
   PROMPT 300
   PRINT "ACHTUNG: Modem hat nicht
                 richtig aufgelegt !",CR
   GOTO end

   :dohup
   SEND "ATH0",CR
   MATCH "OK" GOTO hangup
   PROMPT 300
   PRINT "Zeitüberschreitung beim auflegen !",CR
   GOTO end
   :hangup
   PRINT "Aufgelegt",CR
   :end
   BELL
   END

QWK_READ.MAC

   SEND "N"
   PAUSE 200
   SEND "Q"
   PAUSE 700
   SEND CR
   PAUSE 700
   SEND "D"

   BELL
   PRINT "Jetzt X-Modem zum Empfang vorbereiten!"
   END

Jürgen Heinisch

  Ermittlung von Datum und Uhrzeit in GeoCalc (TOP)

   Wochentag = WEEKDAY(NOW())
   Tag       = DAY(NOW())
   Monat     = MONTH(NOW())
   Jahr      = YEAR (NOW())

   Sekunde   = SECOND(NOW())
   Minute    = MINUTE(NOW())
   Stunde    = HOUR(NOW())

Die Zellen müssen dann noch auf Ganzzahlformat gebracht werden.
Uhrzeit und Datum werden über das Menü OPTIONEN - Jetzt berechnen aktualisiert.

Für das aktuelle Datum gibt man folgende Formel in eine Zelle ein:

   =DATE(YEAR(TODAY());MONTH(TODAY());DAY(TODAY()))

Unter dem Menüpunkt EIGENSCHAFTEN - ZAHLEN FORMAT wählt man sich das gewünschte Darstellungsformat; gegebenfalls mit STRG+2 Spalte verbreitern.
Für die Uhrzeit gilt:

   =TIME(HOUR(NOW());MINUTE(NOW());SECOND(NOW()))

Auch hier die Darstellung wie unter Datum auswählen.

Jürgen Heinisch