HDTenEightyP/NetNews huggingface dataset:
From: boogaard@fys.ruu.nl (Martin v.d. Boogaard)
Subject: Routine that produces delays shorter than 1 ms.
Summary: Looking for a TP routine that waits for e.g. 0.4 ms.
Keywords: delay, turbo, pascal, timer
Organization: Physics Department, University of Utrecht, The Netherlands
Date: Tue, 26 Jan 1993 14:14:47 GMT


Does anybody out there have the Turbo Pascal source code for a function
like `delay', capable of delays between, say, 0.3 and 0.5 ms. I'd prefer
a routine that produces delays that are independent of the CPU clock
frequency.

Suggestions preferably through email to boogaard@fys.ruu.nl.

Thanks for your attention and, maybe, your help.


Martin J. van den Boogaard                 |        boogaard@fys.ruu.nl
-----------------------------------------------------------------------
Dept. of Atomic & Interface Physics        |            the Netherlands
Debye Institute--Utrecht University        |        phone +31 30 533159
P.O. Box 80.000, NL-3508 TA Utrecht        |        fax   +31 30 543165
-----------------------------------------------------------------------
`Omit needless words.'               (William Strunk Jr. & E. B. White)
-----------------------------------------------------------------------
From: tdarcos@access.digex.com (Paul Robinson)
Newsgroups: comp.lang.pascal
Subject: [TDR] Willy.ZIP uploaded for T. Salmi
Date: 21 Jan 93 16:46:10 GMT

Due to the restriction against the uploading of games to 
WSMR-SIMTEL20.ARMY.MIL, this program is *not* uploaded there.

I have uploaded to garbo.uwasa.fi:  WILLY.ZIP

This is a game called "Willy the Worm."  

This is a program similar to the older Donkey Kong series, 
in which a user attempts to climb up the screen, dodging
cannon balls in order to ring a bell at the top of the screen,
being careful not to step on a tack.   Springs allow Willy
to bounce around walls or other objects, and ladders allow 
Willy to climb up or down.  Picking up presents adds to the 
score.  Only stepping on a tack, being struck by a cannon ball, or
running out of time loses a life.  Falling through open holes is
permitted. Ringing the bell ends the level, gives a bonus of 
the remaining time added to the user's score, and proceeds 
to the next level.  

This is the first text-only game I've seen that uses graphic
capability if available.  It plays on 1/2 screen on a text-only
adapter.  If it is played on CGA or higher, it uses the CGA 
character ram to replace some of the characters with its own
graphic images.

What this game will tell you, if you read the source:
1.  How to "lookahead" to examine the keyboard buffer;
2.  How to discard what you've read;
3.  How to reprogram the high-bit characters on a CGA
    monitor;
4.  How to design a game that works in both text and graphic
    modes.

This program is of interest because it is not only a playable
game, but comes with a screen editor so the user can redraw the
screens if he finds them too hard or too easy.  The screen editor
includes a demo mode allowing the user to "test drive" (play) 
the screen the user created and see if he made any mistakes.

Full source code (Turbo Pascal 3) is included for both the 
Game program and the screen editor, along with the compiled 
program.  I am not the author of the program (his name appears
in the documentation), but I will accept reports about how people
like or dislike the game.

The date on this program is 1987 or so, but it is about as
fresh as anything I've seen recently.  Someone asking on the
Info-Pascal list if there was a faster way to poll the keyboard
for a game caused me to look up this otherwise forgotten treasure. 
There are those who said that Turbo Pascal does not have the speed to
produce an effective *fast* response arcade-style game.  This 
will prove them wrong.

I have E-Mailed the program to some 95 people who requested it
as a UUENCODED message until I found a place to upload it.  

Comments or questions about the program may be directed to the original
author if he's still in Virginia, or to me at

TDARCOS@MCIMAIL.COM  (Paul Robinson)
From: csfraw@vehka.cs.uta.fi (Francis Akoto)
Newsgroups: comp.lang.pascal
Subject: help
Date: 24 Jan 93 13:41:16 GMT
Reply-To: csfraw@vehka.cs.uta.fi (Francis Akoto)
Distribution: world
Organization: University of Tampere, Finland

This is a pascal code which i thought was wrong : can anyone out there explain
what values i gets ( or can it be written in another way )

var    i,j: integer ;
.....
....
    i := i or j ;
......


--
gallows
     Opinions are like assholes;
     Everybody has one but nobody wants to look at the others.

Newsgroups: comp.lang.pascal
From: achristo@pons.uio.no (Alf Christophersen)
Subject: Re: Borland Pascal 7.0 : How many megs ?
Organization: University of Oslo
Date: Mon, 25 Jan 1993 01:08:27 GMT


>: > Can anybody tell me how many megabyte Borland Pascal 7.0 uses ?
>: > (On harddisk I mean).
>
>: The german Borland Magazine 6/92 claims that
>: it needs 23 MByte if one installs everything.

>
>The install program for the US version claims 33 megs for full.
>--

And if you compile examples etc., add about 10 meg more :-) My
area is now about 40 meg plus own code it makes 110 meg!!! I need
a new computer! My IBM PS/2 55SX is too small and too slow for
any practical use. Now I have everything on my network disk :-(
And it is terribly slow.

>Death: the high price of living
>========================================================================
>Disclaimer:  I am not bubba.
>
Newsgroups: comp.lang.pascal
From: lowry@src.honeywell.com (Dave Lowry)
Subject: Pascal-s
Organization: Honeywell Systems & Research Center
Distribution: na
Date: Thu, 28 Jan 1993 20:09:56 GMT

Could someone please give me some information on the subset of Pascal
called "Pascal-s"?   (by N. Wirth?)  What I'd really like to find is
source code for a Pascal-s compiler, or for another "tiny" Pascal.
Thanks.

-Dave

lowry@src.honeywell.com
From: odiug@cip-s01.informatik.rwth-aachen.de (Guido Muesch)
Newsgroups: comp.lang.pascal
Subject: Re: Free pascal compiler for unix?
Date: 28 Jan 93 09:07:28 GMT
Organization: Rechnerbetrieb Informatik - RWTH Aachen
NNTP-Posting-Host: cip-s01.informatik.rwth-aachen.de

jon@ais.org (Jon Zeeff) writes:

>Are there any free Pascal compilers that wuld run under unix (BSD)?  It
>would be nice to have one for our club.

There are various more or less usable PD-compilers:

p2c - a Pascal to C converter. I heard its not so good to develop
      pascal programs. It works with correct Pascal-source but often
      dumps core on wrong code.

comp.unix.misc.volume23 [I think]
      There is a pascal compiler which generates p-code coming
      along with a p-code interpreter, both written in pascal.
      I did not give it a try by now, but maybe it will compile
      with p2c.

Pascal Compiler in the NET-2 Distribution.
      I don't know nothing about that beast.  I was curious and ftped
      it.  I had a short look at the sources, but I still dont know if
      it generates only p-code, or how hard it is to compile.  The
      distribution consists of various wierd BSD-Makefiles.  Does
      anybody know if it is worth to have a look at it? I think, if it
      would be easy to port, someone would have done that already.
      Or did somebody gibe it a try? Any experiences with it?

Cheers
  Guido
-- 
   /\    email:  odiug@pool.informatik.rwth-aachen.de
__/  \  ______________________________________________________________________
      \/ snail: Guido Muesch, Ruetscher Str.175/1104, W-5100 Aachen (Germany)
Newsgroups: comp.lang.pascal
From: dmurdoch@mast.queensu.ca (Duncan Murdoch)
Subject: Re: Problems with BP 7.0 IDE text editor
Organization: Queen's University
Date: Wed, 27 Jan 1993 14:51:48 GMT

In article <1993Jan27.042204.10277@ncsu.edu> samodena@csemail.cropsci.ncsu.edu (S. A. Modena) writes:
>In article <1993Jan27.090449.1@fencer.cis.dsto.gov.au>
>st_waldman@fencer.cis.dsto.gov.au writes:
>>I am using Borland Pascal 7.0 with its protected mode IDE. I have
>>encountered a problem when scrolling through text in the IDE editor
>>window. The problem occurs when I continuosly hold down the up-arrow or
>>down-arrow keys. I find that the characters "8" and "2" will get
>>dropped in regions where the cursor has been.

>If this were a common problem, it would have been mentioned repeatedly
>in this newsgroup.  ;^)

I've seen about half a dozen reports of it, but this might be the first one 
here.  

Duncan Murdoch
From: exuptr@exu.ericsson.se (Sunbird a la 400ci)
Newsgroups: comp.lang.pascal
Subject: Re: NaN and comp type
Keywords: comp, NaN
Date: 25 Jan 93 02:57:19 GMT
Organization: Ericsson Network Systems, Inc.
X-Disclaimer: This article was posted by a user at Ericsson.
              Any opinions expressed are strictly those of the
              user and not necessarily those of Ericsson.

In article <1993Jan23.072940.22388@qiclab.scn.rain.com> leonard@qiclab.scn.rain.com (Leonard Erickson) writes:
>From: leonard@qiclab.scn.rain.com (Leonard Erickson)
>Subject: NaN and comp type
>Keywords: comp, NaN
>Date: 23 Jan 93 07:29:40 GMT

>According to the TP6 manual, NaN is represented for the comp type
>by a value of 0, with a sign bit of 1. But if you *create* such a
>value TP 5.5 and TP 6.0 both treat it as a *large* negative 
>number (-9.22337203685478E+0018) 

>So is it broken, or are the docs wrong? I was *hoping* to use it 
>to mark uninitialized values. <sigh>

One way to check for sure would be to attempt to access the data one longint
at a time, and looking at the hex representation of each double-word.  This 
also might prove a prettier way of initialising them.

 -----------Visit the SOUNDING BOARD BBS 214-596-2915, a Wildcat! BBS--------
 ObQuotes:
 "Quick to judge, quick to anger, slow to understand..."
 "Ignorance and prejudice, and fear go hand-in-hand..."

    Patrick Taylor, Ericsson Network Systems
    exuptr@exu.ericsson.se                    "Don't let the .se fool you"
Newsgroups: comp.lang.pascal
From: simon@guk.auspost.com.au (Simon Carter)
Subject: Re: Fast "COPY" Routine help...PLEASE.
Organization: Australia Post
X-Newsreader: TIN [version 1.1 PL6]
Date: Fri, 22 Jan 1993 00:02:58 GMT

SJS132@psuvm.psu.edu wrote:
: [Stuff deleted!]

{I don't have any Turbo stuff here, so minor detailse may be incorrect}

* Firstly, you are opening the OutFile in READONLY mode. Change the
FileMode before rewriting it.

* Use a record size of one byte when opening the files. Otherwise,
if the file is not an integral number of records long, the incorrect
number of bytes will be written.

* You don't need {$I-} {$I+} around the BlockRead unless you are
performing some error checking. It you include the 4th
variable (BytesGot <- which incidentally should be RecordsGot), no
error is produced if less than the requested number of records
can be read.
 
* Let me suggest the following:


   	Assign(Infile,FileName);       {Assign the File}
   	Assign(OutFile,Path);          {Assign the File}
 
   	FileMode := 0;      {Open the INFILE as READONLY}
   	Reset(Infile,1);    {Open the input}

   	FileMode := 1;      {Open OUTFILE as WRITEONLY}
   	Rewrite(OutFile,1); {Create or clear the output}
 
	repeat
             BlockRead(InFile,BP^,RecSize,BytesGot);
             BlockWrite(OutFile,BP^,BytesGot);
        until (BytesGot < RecSize);

        Close(Outfile);
        Close(Infile);


* If you are writing a copying program (unless it's for you own
exclusive use), you should be checking the value of ParamCount BEFORE
using ParamStr(1) and ParamStr(2). Check they exist before 
blindly using them! 


Hope this helps,

Simon
--
+-----------------------------------------------------------+
| Simon Carter: 3rd Year Elec/Comp Sci, Monash Uni, Clayton |
|   Net: simon@auspost.com.au (currently)          \\|//    |
| /simon% find -greatquotes -print >> .signature   (o o)    |
+-----------------------------------------------ooO-(_)-Ooo-+
From: OLDENHUIS@ib.agro.nl (Roelof Oldenhuis)
Newsgroups: comp.lang.pascal
Subject: password encryption (e.g. in bat files)
Date: 25 Jan 93 12:50:20 GMT

Hello,

Maybe this is not the wright group, but I am looking for a program (utility) 
that can hide strings (passwords) in batch files (or exe files).
The reason is obvious; I want to login with a batch file and I don't want to 
show my password in it.

I could not find such a program (or TP source), but if anyone does (or has 
suggestions) please let me know.

Thanks in advance,

Roelof Oldenhuis    Internet: oldenhuis@ib.agro.nl
From: neuhaus@troja.informatik.uni-dortmund.de (Jan Neuhaus)
Newsgroups: comp.lang.pascal
Subject: BP7.0 DPMI: Using a swap file for PM-Applications
Date: 27 Jan 1993 17:09:17 GMT
Organization: CS Department, Dortmund University, Germany
Distribution: world
Reply-To: neuhaus@ls10.Informatik.Uni-Dortmund.DE
NNTP-Posting-Host: troja.informatik.uni-dortmund.de
Keywords: BP7.0,DPMI,Swapping

-- 

The integrated environment of BP has an option (/f<n>) which allows to
create a swapfile of <n>KB size. This is used to extend the virtuell
memory which is available under DPMI (provided by RTM.EXE).

I was wondering whether it is possible to use this feature for
applications created with BP. Assuming a huge harddisk it might be
possible to applications using 16MB on a machine which has only 2MB
of RAM. After reading most of the manuals and some frustrating tests
I decided to ask this question to the net:

Is it possible to use a swapfile to extend the memory availible under
the DPMI provided by Borland?

---------------------------------------------------------------------
{$X+}
{$I STD_DISC.LAI}

Newsgroups: comp.lang.pascal
From: ts@uwasa.fi (Timo Salmi)
Subject: Re: Pascal BBS area
Organization: University of Vaasa, Finland
Date: Thu, 28 Jan 1993 18:26:48 GMT

In article <F422XB1w165w@infopls.chi.il.us> bo@infopls.chi.il.us (Greg Bohmann) writes:
>Is there any good Pascal or Programming BBS's in the 708 or 312 area?

Which country?  (Yes, I know, but I can't resist).

   All the best, Timo

..................................................................
Prof. Timo Salmi      Co-moderator of comp.archives.msdos.announce
Moderating at garbo.uwasa.fi anonymous FTP archives 128.214.87.1
Faculty of Accounting & Industrial Management; University of Vaasa
Internet: ts@uwasa.fi Bitnet: salmi@finfun   ; SF-65101, Finland
Newsgroups: comp.lang.pascal
From: sjsobol@wariat.org (Steven J. Sobol)
Subject: Variant records
Organization: APK Public Access
X-Newsreader: TIN [version 1.1 PL7]
Date: Sat, 23 Jan 1993 14:01:59 GMT

I consider myself a pretty knowledgable Pascal programmer, but there is 
one thing I haven't been able to figure out. When you have a variant
record such as the following

var  Rec : record
    case Boolean of
      ( True:  BigNumber: LongInt; )
      ( False: ALongInt: LongInt; )
end;

how does the computer resolve a reference to Rec.Bignumber as opposed to
Rec.LongInt? Could I use an ordinal value instead of a Boolean, like this:

var  Rec : record
    case Byte of
      ( 0:  BigNumber: LongInt; )
      ( 1:  ALongInt: LongInt; )
      ( 2:  A32BitVal: LongInt; )
end;

How about an enumerated value?

thanks.
  -s

-- 
*** **  ** The Tiny Software Co.   Steve Sobol, President   sjsobol@tiny.com
 * *   *           23707 Glenhill Drive    Cleveland, OH 44122    USA
 *  *  *   Cleveland OH  216 691-1169    Home of  Top-Quality  Shareware  And
 *   * *   Columbus OH   614 793-1835    KNOWLEDGE IS POWER Training Seminars
 * **   ** Freenet: ag510@po.cwru.edu      FINGER me at: sjsobol@wariat.org
From: xingdong@oregon.uoregon.edu (Xingdong Mu)
Newsgroups: comp.lang.pascal
Subject: TP6.0 to C TRANSLATOR needed
Date: 22 Jan 1993 16:08 PST
Organization: University of Oregon
Distribution: world
NNTP-Posting-Host: oregon.uoregon.edu
News-Software: VAX/VMS VNEWS 1.41    

Hi, we rae looking for a complete TP6.0 to C/C++ transaltor, is
there anyone who is aware of such a product? Please mail you info
to "xingdong@oregon".  Thank you very much
							XD


Newsgroups: comp.lang.pascal
From: dmurdoch@mast.queensu.ca (Duncan Murdoch)
Subject: Re: drivers in OVR?
Organization: Queen's University
Date: Tue, 26 Jan 1993 18:02:14 GMT

In article <lawrence-260193100111@ls-21.biology.utah.edu> lawrence@bioscience.utah.edu (jeff lawrence) writes:

>is it possible to link driver and font OBJ files into overlays instead of
>the EXE file in BP7?  the manuals don't seem to outwardly forbid it, and
>the compiler does fine overlaying the unit with the procedures, but i can't
>initialize the drivers.  if the unit is *not* overlaid, things are fine.
>seems like a waste of space to put them in the EXE file.  am i grabbing at
>straws here?

You can't, because BGI depends on the active driver staying at a fixed 
position in memory.  If you don't want to link them all in, you can tack 
them on the end of the .EXE and just load the detected one at run-time; an 
example of how to do this is in BGIRES.ZIP, where I put them in a resource 
file.  (Look on garbo.uwasa.fi in either /pc/turbopas or /pc/turbovis.)


Duncan Murdoch
dmurdoch@mast.queensu.ca
From: russell@alpha3.ersys.edmonton.ab.ca (Russell Schulz)
Newsgroups: comp.lang.pascal
Subject: uvapc: Pascal compiler for Unix: info and ftp site
Date: Mon, 25 Jan 1993 14:40:39 MST
Organization: Private System, Edmonton, AB, Canada
X-Newsreader: rusnews v0.99

just got this in from Jack Davidson:

--- cut here ---

			uvapc Fact Sheet

uvapc is an ISO standard Pascal compiler developed by the University
of Virginia's Academic Computing Center and the Department of
Computer Science.  uvapc passes the ISO standard Pascal validation suite.
It is being used at over 100 sites on various platforms running Unix.
The following versions of uvapc are operational:

   uvapc for 386 
   uvapc for sun3
   uvapc for sun4
   uvapc for NeXT
   uvapc for 3b

Of these versions, all but the NeXT version is being distributed. Postscript
factsheets describing the compilers and how to obtain source code
can be picked up via anonymous ftp (virginia.edu). The files are in the
pub directory.

For questions not answered in the factsheets, send e-mail to:

   uvapc@virginia.edu

--- cut here ---

I haven't yet looked at what all's there, but I will do soon.  have fun!
-- 
Russell Schulz  russell@alpha3.ersys.edmonton.ab.ca  ersys!rschulz  Shad 86c
From: RPatel@massey.ac.nz (R. Patel)
Newsgroups: comp.lang.pascal
Subject: STRING AND INTEGER CONVERSION (Mac AND PC) - HELP
Date: 25 Jan 93 20:25:22 GMT
Organization: Massey University, Palmerston North, New Zealand
X-Reader: NETNEWS/PC Version 2c


G'day,

I tried posting this before and it never showed up so please bear with
me if it did appear.

Anyway I've got a Pascal prog. on the Mac which uses the SANE library
functions int2str and str2int (ie converts a string to integer and vice
versa).

I'm trying to get the program running on the PC under TPascal but I
don't know what library to use and which functions to call that have the
same operations (ie converting strings and integers etc).

Hope someone can assist me,

Thanx in advance,

Raj.

-- 


              "Righteous Indignation, try it, you'll like it"
                           
			   rpatel@massey.ac.nz

			    Massey University
		       	     Palmerston Nth 
			      New Zealand			
Newsgroups: comp.lang.pascal
From: dmurdoch@mast.queensu.ca (Duncan Murdoch)
Subject: Re: Loading from a Stream
Organization: Queen's University
Date: Sun, 24 Jan 1993 16:45:37 GMT

In article <35199@adm.brl.mil> astoner@mcis.messiah.edu writes:
>  This is a question for all you stream experts out there.  I am working
>on a portfolio tracking program that involves four different types of
>transactions (Stock, Bond, Options, Future).  Sounds like these four
>types of transaction should be a descendant of a Transaction type, which
>is the descendant of TObject so it can be streamed.  All of the general
>data is stored in the Transaction type which also defines several virtual
>methods which are overridden in the specific types.  The data unique to
>each specific type of transaction is of course stored in them.
>  Right now I have the specific types LOAD(ing) and STORE(ing) all of the
>fields.  Is it possible to call the ancestors LOAD method to LOAD that part
>of the data then continue with the specific data?

Yes, you can indeed do that.

>  The more important problem that I am having is that when I store something
>on the stream I am having problems reading it back.  I can't seem to get
>it to call the proper LOAD method for the specific types.  If I have a
>variable that is a pointer to the Transaction type isn't it supposed to
>call the methods of the descendants, or something like that?

Load won't.  The way the polymorphism works on streams is that the 
TStream.Get method first reads an ID word from the stream, then looks it up 
in a table and calls the appropriate Load method.  This depends on you
having put the objects on the stream using TStream.Put, and having 
registered the types and the ID codes.

You can do it all without using Get or Put or registration, but there isn't 
much to be gained.  Essentially what you'd do is to duplicate the operations
described above.

>  One of the methods defined in the base Transaction type is an ID method
>that is to return the type of transaction that is stored in the base
>transaction type.  When I load the data back from the stream shouldn't I
>be able to call this ID method to determine how to type cast the loaded
>data?

That's probably a bad way to do it.  The problem is that the call to 
Transaction.Load allocates only the memory for a Transaction; if your 
descendants add fields, then there'll be nowhere to put them.

Duncan Murdoch
dmurdoch@mast.queensu.ca
From: tp923021@jarrah.canberra.edu.au (ben elliston)
Sender: gateway@f262.n620.z3.fidonet.org
Newsgroups: comp.lang.pascal
Subject: Fast text file parsing
Date: Tue, 26 Jan 1993 19:41:00

Hi.

I'm looking for some _fast_ text file routines for parsing files looking for:

- a command (ie. "DIRECTORY")
- an argument (ie. "C:\FOO\")

so that, given the command, the argument can be quickly found, regardless of:

- the case of either words
- their position in the line
- but the may not be preceeded in the line by anything in the line but spaces.

For example:

              DiReCtOrY c:\foo

Would be found, but

; directory c:\foo

Would not (and could be considered a comment instead).

Thanks.

Cheers, Ben
Organization: Penn State University
Date: Thu, 28 Jan 1993 13:13:38 EST
From: Doug ! <JDG111@psuvm.psu.edu>
Newsgroups: comp.lang.pascal
Subject: Re: Text windows WITHOUT OOP
 <NFgVXB2w165w@kalki33.lakes.trenton.sc.us>

In article <NFgVXB2w165w@kalki33.lakes.trenton.sc.us>,
system@kalki33.lakes.trenton.sc.us (Kalki Dasa) says:
>
>Doug ! <JDG111@psuvm.psu.edu> writes:
>
>> Anyone know of any good text windowing units/packages which do NOT require
>> the programmer to use Object Oriented Programming?  Turbo Vision is nice, I
>> don't have the time to re-learn everything right now.  I know there's GOT to
>> be something written out there to help me out, I just don't know what, or
>> where.  If YOU do, drop me a line.
>
>Well, I have a (shareware) set of TP 5.5 utilities from Eagle that
>implements windows, menus, status lines, etc., as TPUs. No OOP is
>necessary to use them, althought they were probably written using OOP.
>The name of the file is EAGLEPAS.ZIP, and it is available on my BBS at
>(301) 643-3172
>
Thanks for the info.  I picked up 2 pascal text window units, TWI and TW.  TWI
was released in version 2.0 before the darn thing would work, and costs $15.
TW is in version 2.00 also, and was $26.50.  I opted for the latter, after
looking thru the code and experimenting.  I registered it already.  Very nice
system, supporting pull down menus, structrured input fields, etc.
From: berend@contrast.wlink.nl (Berend de Boer)
Newsgroups: comp.lang.pascal
Subject: Speed of BP7 Protected Mode programs
Date: Thu, 21 Jan 1993 12:20:06

Jochen Magnus wrote in a message to All:

 JM> I've made a simple test of the performance: Reading 50000x
 JM> byte by byte out of   a file:
 JM> Realmode: 45 sec, protected Mode: 92 sec.

Very interesting, but: what kind of machine? A 286 or a 386/486?


Groetjes,

Berend. (-:
fido: 2:281/527.23
email: berend@contrast.wlink.nl