ts@uwasa.fi (Timo Salmi LASK) (02/25/90)
Sun 25-Feb-90: I have gotten repeated requests from the users for a Turbo Pascal 5.5 version of my Turbo Pascal units collection. I now have finally got the 5.5 compiler, courtesy of University of Vaasa, because it was felt here that this international interaction is important enough to warrant the expense. (As I have told many of the users who have contacted me in this matter, I am not yet interested in OOP myself). Hence I am in a position to oblige. The new version is called tspas18.arc. There is only one new function in the collection this time. The main point was providing the TP 5.5 versions of the units. Thus there are now three versions of each unit in this new release: TP 4.0, 5.5, and 5.5. The package is available by anonymous ftp from chyde.uwasa.fi directory /pc/ts in the usual manner.- It is true that Borland has made excellent products for the PC community, but the incompatibility between the TPUs of the different Turbo Pascal versions has many of us users disgruntled. ................................................................... Prof. Timo Salmi (Moderating at anon. ftp site 128.214.12.3) School of Business Studies, University of Vaasa, SF-65101, Finland Internet: ts@chyde.uwasa.fi Funet: gado::salmi Bitnet: salmi@finfun Summary of the Functions and procedures in the TSPAS Package: Functions are indicated by the ending FN, the procedures by the lack of it. TSUNTA: PANMR Scroll screen right PANML Scroll screen left WIDTHFN Current width of text screen ATTRIBFN Color attribute for direct write to video memory VIDXY Direct write to the screen video memory VDCHXY Direct read from the screen video memory VDAEXYFN Direct read of a screen video memory color attribute TSUNTB: TIMERFN Time elapsed since midnight POWERFN Conventional raising of a positive number to a power POWERGFN Generalized raising of any real to a power POWERLFN Raise longint to a non-negative integer power TWOTOFN Two to a power, fast R16TOFN Sixteen to a power, fast BITONFN Status of a bit in a word CONVBFN Convert from a number of any base to any other base BINDECFN Convert binary to decimal, fast DECBINFN Convert decimal to binary, fast (outdated by BINFN) BINFN Convert decimal to binary, very fast LBINFN Convert longint to binary, fast HEXDECFN Convert hexadecimal to decimal, fast DECHEXFN Convert decimal to hexadecimal, fast (outdated by HEXFN) HEXFN Convert decimal to hexadecimal, very fast LHEXFN Convert longint to hexadecimal, fast TSUNTC: PLAYNOTE Play a note PRTONLFN Get the online status of a printer DSKCNTFN Get the number of disk devices (MsDos 3+ only) REVCOLOR Reverse text colors (a toggle) TSUNTD: TRIMRGFN Trim a string right TRIMLFFN Trim a string left LEADFN Lead a string with a multiple character (i.e. pad left) TRAILFN Trail a string with a multiple character (i.e. pad right) DOSDELAY Delay without using the Crt unit PARSE Extract all substrings from a string STRCNTFN Number of substrings in a string (resembles ParamCount) SPARTFN Returns a specified substring (resembles ParamStr) TSUNTE: CURSOFF Turn off cursor (keeps other cursor attributes) CURSON Turn cursor back on as it was CURSOR Change cursor size BORDER Change border color (CGA, VGA) CLB Clear the keyboard buffer MONOFN Is it a monochrome CAPSONFN CapsLock status NUMLONFN NumLock status FEXISTFN File existence status, handles ReadOnly files correctly FSIZEFN File size in bytes as in directory CLUSIZFN Cluster size on a device (cluster is the allocation unit) ALLSIZFN Allocated true size of a file in bytes CMDLNFN Returns the entire command line WKDAYFN Returns modern weekday WEEKNRFN Returns the week number for a given date TSUNTF: EDRDLN Readln with line-editing potential EDREADLN Readln with line-editing, recall, and insert toggle TSUNTG: DRIVESFN Number of diskette drives on the system FDRIVEFN The name of the first diskette drive on the system INDRIVFN Is a media present in the given drive GOATXY As the ordinary GoToXY but no Crt unit required WHEREXFN As the ordinary WhereX but no Crt unit required WHEREYFN As the ordinary WhereY but no Crt unit required KEYPREFN As the ordinary KeyPressed but no Crt unit required READKEFN As the ordinary ReadKey but no Crt unit required INKEYFN Basic-like timed character input REVAREA Reverse the colors of an area USEPRN Redirect write and writeln to the printer USECON Restore write and writeln direction to the screen TSUNTH: GRTABLFN Has MsDos GRAFTABL been loaded or not Searching Archive: TSPAS18.ARC - Turbo Pascal 5.0 units, T.Salmi Filename Comment Date Time CRC -------- -------------------------------- ---- ---- --- READ40.ME TP 4.0 users, read this first 07-26-89 19:10:30 2C60 READ55.ME TP 5.5 users, read this first 02-24-90 20:58:52 3CF5 TSPAS.NWS Information on the updates 02-25-90 16:30:32 406F TSPAS.SUM Function & procedure summary 02-24-90 20:51:52 6F7C TSPROG.INF List of PD programs from T.Salmi 10-28-89 16:59:34 D436 TSUNTA.INT Interface document of tsunta.tpu 02-24-90 20:21:46 0117 TSUNTA.TPU Routines for scrolling sideways 02-25-90 15:12:30 713D TSUNTA.TST Test for tsunta.tpu unit 09-24-89 13:32:02 A33D TSUNTA40.TPU TP 4.0 version of tsunta.tpu 02-25-90 15:22:32 357F TSUNTA55.TPU TP 5.5 version of tsunta.tpu 02-25-90 15:24:36 0431 TSUNTB.INT Interface document of tsuntb.tpu 02-25-90 15:55:42 7F61 TSUNTB.TPU Routines for base conversion etc 02-25-90 15:12:30 EE75 TSUNTB.TST Test for tsuntb.tpu unit 10-18-89 18:08:40 9099 TSUNTB40.TPU TP 4.0 version of tsuntb.tpu 02-25-90 15:22:32 580E TSUNTB55.TPU TP 5.5 version of tsuntb.tpu 02-25-90 15:24:36 ADC9 TSUNTC.INT Interface document of tsuntc.tpu 02-24-90 20:23:56 9D32 TSUNTC.TPU Playnote, printer status, drives 02-25-90 15:12:32 1D33 TSUNTC.TST Test for tsuntc.tpu unit 02-25-90 15:42:36 9837 TSUNTC40.TPU TP 4.0 version of tsuntc.tpu 02-25-90 15:22:34 4161 TSUNTC55.TPU TP 5.5 version of tsuntc.tpu 02-25-90 15:24:36 7990 TSUNTD.INT Interface document of tsuntd.tpu 02-24-90 20:24:34 4697 TSUNTD.TPU Routines for strings etc 02-25-90 15:12:32 1B4A TSUNTD.TST Test for tsuntd.tpu unit 09-25-89 17:59:58 6DE0 TSUNTD40.TPU TP 4.0 version of tsuntd.tpu 02-25-90 15:22:34 C43F TSUNTD55.TPU TP 5.5 version of tsuntd.tpu 02-25-90 15:24:38 3671 TSUNTE.INT Interface document of tsunte.tpu 02-24-90 20:25:08 2CA7 TSUNTE.TPU Cursor, keyboard, files, weekday 02-25-90 15:12:30 24A6 TSUNTE.TST Test for tsunte.tpu unit 12-06-89 20:14:32 855F TSUNTE40.TPU TP 4.0 version of tsunte.tpu 02-25-90 15:22:30 EB2D TSUNTE55.TPU TP 5.5 version of tsunte.tpu 02-25-90 15:24:34 1851 TSUNTF.INT Interface document of tsuntf.tpu 02-24-90 20:25:50 4F1F TSUNTF.TPU Readln with input-string editing 02-25-90 15:12:32 1FC6 TSUNTF.TST Test for tsuntf.tpu unit 12-02-89 15:36:08 D662 TSUNTF40.TPU TP 4.0 version of tsuntf.tpu 02-25-90 15:22:36 5F72 TSUNTF55.TPU TP 5.5 version of tsuntf.tpu 02-25-90 15:24:38 E93D TSUNTG.INT Interface document of tsuntg.tpu 02-24-90 20:26:42 7652 TSUNTG.TPU Miscellaneous added routines 02-25-90 15:12:34 7F06 TSUNTG.TST Test for tsuntg.tpu unit 02-25-90 15:43:10 ABB4 TSUNTG40.TPU TP 4.0 version of tsuntg.tpu 02-25-90 15:22:36 0E11 TSUNTG55.TPU TP 5.5 version of tsuntg.tpu 02-25-90 15:24:38 8935 TSUNTH.INT Interface document of tsunth.tpu 02-24-90 20:31:02 DFCC TSUNTH.TPU More miscellanenous routines 02-25-90 15:12:34 82B5 TSUNTH.TST Test for tsunth.tpu unit 02-25-90 15:43:26 AD90 TSUNTH40.TPU TP 4.0 version of tsunth.tpu 02-25-90 15:22:36 7869 TSUNTH55.TPU TP 5.5 version of tsunth.tpu 02-25-90 15:24:40 6658 VAASA.INF Info: Finland, Vaasa, U of Vaasa 02-02-90 11:52:54 F6C0 ---- ------ ------ ----- 0046 148138 86482 42%