Very Fast Window routines in Turbo Pascal. General purpose routines for searching, sorting, and moving arrays of various elements. Turbo Pascal source code available to registered users.Ī complete assembly language assembler written in Turbo Pascal with full source code. Utility which allows full screen editing of data entry screens. Turbo Pascal source for a TSR that pops up with the ASCII table. TurboPower Software's announcement of Async Professional, a communications library for Turbo-compatible Pascal, which is scheduled to ship in June 1991.Ī TPW unit with source code from Robert Warren to simplify the use of huge type arrays. The PingAnsi unit provides partial Ansi emulation for Turbo Pascal versions 5.x and higher. TP4.0 source that duplicates normal TP I/O routines so that they output ANSI control codes.ĪNSIView is a unit that will give you CRT's features while still retaining the features of the new TVISION enviroment. Great.Įasy to use TP source code that creates ANSI color codes.Īnsi Driver for a TP 4.0+ program. Includes full source code.Ĭomplete replacement for TP's CRT Unit. Excellent Compression Ratios.ĪNIVGA is a powerful toolkit for the animation of sprites using Turbo Pascal 6.0. Software Archival Group is a collection of source code and program examples for the Pascal programming language.Ĭompression program written in Turbo Pascal and Turbo Vision. Shows all characters that can be displayed or entered from keyboard TP3.Ĭategory N.Z of the 5/28/94 release of the SWAG Pascal source code collection. When you start a statement, the prototype is given to you. Integrated Pascal interpreter/editor/tutor. Turbo Pascal Unit For Addressing ADLIB Card.ĪDVanced CRT routines v9.0 - Turbo Pascal 5.5 CRT routines with a wide variety of functions, including cursor control and timers. Turbo Pascal source that will activate Sidekick.ĭIR-like utility. TP source and executable to calculate a mortgage 29 1986Ībort Routine for TP V4.0. This is a Turbo Pascal unit for creating and displaying 3d line drawings in your programs. Turbo Pascal source file.ģD animation library for Borland Pascals: BP7, TP6, TPW plus utils. Patches Turbo Pascal's SYSTEM routines to use 32-bit integers for faster more efficient computations. Easy and simple.Įxample of displaying 2 Menu Bars using Turbo Vision for Pascal. Simple Procedure that creates Lotus style Menus. This will take a double as input and give a real as output.PASCAL Files from The Programmer's Corner File Name Result = Mantissa * ( 2 ^ Exponent ) End If Print Result Sleep Double to Real If Real48 ( 5 ) AND & H80 = -1 Then Mantissa = - Mantissa End If ' Raise the mantissa to the specified exponent. Dim Result As Double If Mantissa = 1.0 And Real48 ( 0 ) = 0 Then Result = 0.0 Else ' If the sign bit is set, make the value negative. Mantissa = Mantissa + 1 ' Test for a null value. Dim BitNo As Byte For BitNo = StartBit To 0 Step -1 Value = Value / 2 If (( Real48 ( ByteNo ) Shr BitNo ) And 1 ) = 1 Then Mantissa = Mantissa + Value End If Next BitNo Next ByteNo ' Add the implicit 1. Dim Mantissa As Double Dim Value As Double Value = 1 For ByteNo = 5 To 1 Step -1 Dim StartBit As Byte StartBit = 7 If ByteNo = 5 Then StartBit = 6 ' Skip the sign bit. Dim Exponent As Double Exponent = Real48 ( 0 ) - 129.0 ' Calculate the mantissa. Open "Real.bin" For Binary As # 1 Dim Real48 ( 0 To 5 ) As UByte Dim ByteNo As Byte For ByteNo = 0 To 5 Get # 1, , Real48 ( ByteNo ) Next ByteNo Close # 1 ' Get the exponent value, and eliminate the 129 offset. ' Load the real from a file into a byte array.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |