Short: Crt.(i|p) for PCQ-Pascal Author: wwg@fg.arco.met.fu-berlin.de (Walter Weber-Groß) Uploader: tboeckel@uni-paderborn.de (Thore Boeckelmann) Type: dev/src Nützliche Prozeduren und Funktionen für PCQ-Pascal -------------------------------------------------- Basierend auf den Crt-Dateien von Andreas Tetzl habe ich diese Quelltexte um einige nützliche Funktionen und Prozeduren erweitert, ebenso wie ich vorhandene Prozeduren wie z. B. TextLine inhaltlich verändert habe um sie ein bißchen schneller zu machen. Die Prozedur GetConSize habe ich durch die Funktionen MaxX und MaxY ersetzt. Weitere Veränderungen und Ergänzungen sind den beiden Crt-Quelltexten zu entnehmen. Desweiteren gibt es jetzt eine Funktion ReadKey, die auf die Eingabe eines Zeichens wartet, ohne es dann jedoch auf dem Bildschirm darzustellen. Die Quelltexte sind FREEWARE. Meine Email-Adressen: Fido: 2:2411/801.96 UUCP: wwg@fg.arco.met.fu-berlin.de *** Useful console procedures and functions for PCQ-Pascal ------------------------------------------------------ Based on the Andreas Tetzl's work I added, changed and reworked some procedures and functions which allows simple controlling of cursor positioning as well as getting a single key without displaying it and something more. For further informations take a look at the source codes. All source codes are FREEWARE. My email addresses: Fido: 2:2411/801.96 UUCP: wwg@fg.arco.met.fu-berlin.de ============================= Archive contents ============================= Original Packed Ratio Date Time Name -------- ------- ----- --------- -------- ------------- 1042 486 53.3% 14-Jul-97 10:11:56 +Break.p 3187 1312 58.8% 14-Jul-97 10:11:56 +Crt.i 8437 2611 69.0% 14-Jul-97 10:11:56 +Crt.p 1491 674 54.7% 14-Jul-97 10:11:56 +CrtDemo.p 2856 1026 64.0% 14-Jul-97 10:11:56 +Nettolohn.p 898 434 51.6% 14-Jul-97 10:11:56 +ReadKey.p 1361 699 48.6% 14-Jul-97 10:11:56 +WWG-CRT.readme -------- ------- ----- --------- -------- 19272 7242 62.4% 14-Jul-97 17:54:40 7 files