HDTenEightyP/NetNews huggingface dataset:
From: cschang@hamlet.umd.edu (C. S. Chang)
Newsgroups: comp.lang.pascal,comp.lang.misc
Subject: Disable Windows' Multi-tasking
Date: 20 Dec 92 09:17:40 GMT
Organization: University of Maryland, College Park

This subject may look very strange, but this is exactly what I need.  

I am making a program that will copy a image file from the file server
and display the file with Windows Paintbrush.  However, with Windows'
multi-tasking feature, Windows Paintbrush were launched before that
image file ever got to the local directory.  Therefore, Paintbrush
couldn't locate the file from the local directory (because the copying
process I sent hasn't finished!)

Is there any way to resolve this particular problem.  Any suggestion
would be much appreciated.  I'm using Turbo Pascal for Windows.

Thanks in advance.


Truly Yours, C.S.Chang 


===================================================================
Programmer/Designer		Vice President	
AT&T Teaching Theater		Asian Engineering Association
Computer Science Center		University of Maryland
Room: ENGR 3140			Mailbox: ENGR 1131

Chairman			President
EE/SAC Computer Committee	Literature and Narrative Critiquing Society
University of Maryland		University of Maryland
Mailbox: AVW 2466		PO Box 405, College Park 20741

Phone:  (O) 301-403-1064; 301-680-1968; 
E-mail: cschang@umd5.umd.edu; cschang@wam.umd.edu; cschang@eng.umd.edu
From: leonard@qiclab.scn.rain.com (Leonard Erickson)
Newsgroups: comp.lang.pascal
Subject: Re: Week numbers
Date: 15 Dec 92 00:05:36 GMT
Article-I.D.: qiclab.1992Dec15.000536.15663
Reply-To: Leonard.Erickson@f51.n105.z1.fidonet.org
Organization: SCN Research/Qic Laboratories of Tigard, Oregon.

sbakker@cs.vu.nl (Bakker S) writes:

>Can anyone tell me how to number weeks, i.e. does Jan. 1 fall into week #1 or
>week #52? For example, in 1992 Jan. 1 fell into week #1, but in 1993 it will
>fall into week #52 of '92.

>Am I right in assuming that it's week #1 if Jan. 1 is either Monday, Tuesday,
>or Wednesday, and #52 otherwise?

The answer is "it depends". What are you using these week numbers *for*?

I know of several companies that schedule stuff according to "week numbers".
And the numbers are assigned *arbitrarily*. They will number the week 
containing Jan 1 as week 1, Week 2, Week 52, (or 53 or even *54* one year!)
depending on things like "do we need to have this week's output counted 
as being in 92 or in 93?" 

I wrote some software that had to deal with this stuff. And every december
I had to pound on someone to tell me *when* week 1 would start. And about
half the time, I'd have to go back and correct a bunch of data because
they'd changed their minds *after* telling me.

As I say, there's no standard. And since the years is 52 weeks and one
day long (two days in leap years), you need to be ready to deal with week
53 occasionally. I haven't sat down with a calendar to check, so I would
not even rule out week *54* as a legitimate possibility. 

-- 
Leonard Erickson		      leonard@qiclab.scn.rain.com
CIS: [70465,203]			 70465.203@compuserve.com
FIDO:   1:105/51	 Leonard.Erickson@f51.n105.z1.fidonet.org
(The CIS & Fido addresses are preferred)
Newsgroups: comp.lang.pascal
From: fdeck@vyasa.helios.nd.edu (francis deck)
Subject: RS-232 Codes?
Organization: OUC, University of Notre Dame
Date: Tue, 15 Dec 1992 18:14:40 GMT

If this isn't a FAQ, I don't know what is!  Does anybody have
a good Turbo Pascal 5.0 (or earlier) code for RS-232 i/o on
MS-DOS machines?  I'm using one such code, and it sometimes
misses received characters from a homemade data acquisition
system which spits out a 148-byte data packet at 9600 baud.
My needs are _very_ simple... just send single characters,
and receive single characters with some buffering, and a
flag to tell me when the buffer has characters in it!

I'd be forever in your debt.

f.deck

Newsgroups: comp.lang.pascal
From: dmurdoch@mast.queensu.ca (Duncan Murdoch)
Subject: Re: Cross-Reference Tool Wanted
Summary: want TP, TC, or BC++ source for Pascal cross-references
Organization: Queen's University
Date: Wed, 16 Dec 1992 18:37:42 GMT

In article <78435@hydra.gatech.EDU> jm59@prism.gatech.EDU (MILLS,JOHN M.) writes:
>I would appreciate pointers to ftp's for cross-referencers which would
>scan a [Turbo]Pascal source file and generate line references to non-
>reserved symbols - specifically: constants, variables, functions and
>procedures.  It would be even nicer if the tool could scan a number of
>files identified on a file list, and jointly cross-reference them:
>Which symbols appear in a unit interface which are used, and where?
>Which are _not_ used in the specified family of files?
>
>I would like to find source files in TP or TC/BC/BC++, as these are the
>languages I commonly use.

A very nice cross reference tool is part of Turbo Analyst, a package from 
Turbopower Software that goes for around $90 by mail order.  It includes 
full source.   One warning:  it may not have been updated to handle BP 7 yet.

Duncan Murdoch
dmurdoch@mast.queensu.ca
Newsgroups: comp.lang.pascal
From: fdeck@vyasa.helios.nd.edu (francis deck)
Subject: Symbolic Curve Fitter
Organization: OUC, University of Notre Dame
Date: Mon, 14 Dec 1992 18:58:37 GMT

After receiving overwhelming response on my "symbolic" curve
fitting program, I have submitted the source code to:

   alt.sources

This appeared to be the best way to get it out to the world
quickly.  Thanks to all who gave me advice on using the
network.  I hope to hear from anyone who comes up with some
great modifications or bugs.

f.deck
physics 
notre dame
From: sl9dm@cc.usu.edu
Newsgroups: comp.lang.pascal
Subject: Need TP/BP codes!
Date: 12 Dec 92 18:44:42 MDT
Organization: Utah State University

I'm looking for a few of pieces of TP code:

1) The Hudson Message Base format that many BBS's use. 
	I'm writing a BBS but I don't want to use a propriatary Message base
format if at all possible. I'd prefer to use Hudson, but Fido will work just as
well really. 

2) TP (or BP) code to use IEMSI on the bbs. I really like the IEMSI logins, but
I have found it a little tricky to program into the BBS. 

3) Avatar 0+ code. I have the stupid document on the AVATAR format, but I'm
already behind the date I promised to have the first version to my betas so I
don't have a huge amount of time.

4) Split Screen Chat code. This is very important, because the IEMSI connects
will get screwed up BIG TIME when I chat with the user if both sides don't have
the split screen.

If you have any of these, PLEASE E-Mail it to me, or if you know where I can
find any of these, PLEASE E-Mail me and tell me the location (Anonymous FTP
please).

Thanks in advance!

--
-----------------------------------------------------------------------------
This Personal opinion junk was brought to you by one of the following Folks:

In the BBS World: The Master Ninja
in the REAL world: Dan Egli
on the Internet: SL9DM@CC.USU.EDU
-----------------------------------------------------------------------------
From: shinobi@mintir.new-orleans.la.us (Austin Luminais)
Newsgroups: comp.lang.pascal
Subject: .MOD files
Date: Thu, 17 Dec 92 21:06:29 CST
Organization: Minas Tirith BBS (Public Access Usenet for New Orleans)

Does anyone have any source to play .MOD files on the Soundblaster, in 
the background?
Or any source to play .MOD files at all?
From: exuptr@exu.ericsson.se (Patrick Taylor)
Newsgroups: comp.lang.pascal
Subject: Re: Week numbers
Date: 15 Dec 92 19:55:32 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 <1992Dec15.000536.15663@qiclab.scn.rain.com> leonard@qiclab.scn.rain.com (Leonard Erickson) writes:

>>Can anyone tell me how to number weeks, i.e. does Jan. 1 fall into week #1 or
>>week #52? For example, in 1992 Jan. 1 fell into week #1, but in 1993 it will
>>fall into week #52 of '92.

>>Am I right in assuming that it's week #1 if Jan. 1 is either Monday, Tuesday,
>>or Wednesday, and #52 otherwise?

>The answer is "it depends". What are you using these week numbers *for*?

>I know of several companies that schedule stuff according to "week numbers".
>And the numbers are assigned *arbitrarily*. They will number the week 
>containing Jan 1 as week 1, Week 2, Week 52, (or 53 or even *54* one year!)
>depending on things like "do we need to have this week's output counted 
>as being in 92 or in 93?" 

>I wrote some software that had to deal with this stuff. And every december
>I had to pound on someone to tell me *when* week 1 would start. And about
>half the time, I'd have to go back and correct a bunch of data because
>they'd changed their minds *after* telling me.

>As I say, there's no standard. And since the years is 52 weeks and one
>day long (two days in leap years), you need to be ready to deal with week
>53 occasionally. I haven't sat down with a calendar to check, so I would
>not even rule out week *54* as a legitimate possibility. 

I assume you are saying that week 54 would arise when a leap-year
begins with Sunday as the end of week 1, for example, and week 2 is
Monday Jan 2.  Then week 53 will end on Dec 30?

As far as a standard, the Swedes have been numbering their weeks for a long 
time.

From studying their calendars, it looks like they do this:

	1.  Weeks start on Monday, always.

	2.  If a week containing Jan 1 has 4 or more days in the new
	    year, then it's counted as week one.  Otherwise, it is week 52
	    or 53, and the following week is week 1.

	3.  In the years I looked at, there were no week 54's.

 ----------------------!!! H A P P Y   H O L I D A Y S !!!-------------------
 ObQuotes:
 "Igornance and prejudice, confident their ways are best..."
 "Quick to judge, quick to anger, slow to understand..."

  - Patrick Taylor, Ericsson Network Systems
    exuptr@exu.ericsson.se                    "Don't let the .se fool you"
    Visit the SOUNDING BOARD BBS 214-596-2915, a Wildcat! BBS
Newsgroups: comp.lang.pascal
From: u910826@bruny.cc.utas.edu.au (Louis        siuoL)
Subject: Re: Faking millions of colors out of 16, and so on
Organization: University of Tasmania, Australia.
Date: Mon, 14 Dec 1992 02:32:33 GMT

dmurdoch@mast.queensu.ca (Duncan Murdoch) writes:

>In article <1992Dec12.234840.199@athena.mit.edu> acgoldis@athena.mit.edu (Andrew C Goldish) writes:
>>According to the Borland 6 graphics package and the rules for my monitor, one can
>>set the sixteen colors in the palette to be different things with the
>>SetRGBPalette command.  Is there any way one can print sixteen colors, change one
>>of the values, and print a 17th color on the screen without having the pixel
>>originally in the color that was changed change to the new color?

>Only if you're very fast.  The EGA or VGA hardware standard that the 16 
>colour modes are using is only able to display 16 different colours 
>simultaneously.  However, pixels only get updated on the screen 50 or 60 
>times per second.  If you like, you can change the palette after a pixel has 
>been drawn, write a different pixel in a 17th colour, and change palette the
>back by the time the card refreshes the first pixel.  

very possible, I just did that in a 256 colour mode, producing 728 colours on screen. (on any vga, with an 8mhz or more AT).

>Soon after the EGA came out there was a program published in PC Magazine 
>that could use this technique to display 64 colours simultaneously on a 6 
>Mhz AT; I'd guess a modern PC would have enough time left over to get some 
>useful work done at the same time it was flipping the palette around like 
>this.

[stuff deleted]

>Duncan Murdoch
>dmurdoch@mast.queensu.ca

Louis
--
Louis Solomon - a student at The University of Tasmania
      e-mail: u910826@bruny.cc.utas.edu.au

"If wishes were fishes, we'd all cast nets" - Dune
Newsgroups: comp.lang.pascal
From: jeffbyrn@mp.cs.niu.edu (Jeff Byrne)
Subject: Re: getimage
Organization: Northern Illinois University
Date: Sun, 13 Dec 1992 22:21:35 GMT

In article <4161.1250.uupcb@compart.fi> jarmo.aho@compart.fi (Jarmo Aho)  writes:
>
>DJ>        I am busy with a small game woith some simple graphics.
>DJ>        I found out what the format is of a (TP) getimage BMP but I don't
>DJ>        know what the meaning is of the last word. Could anyone tell me ?
>
>
>  If yoy are talking about 16 color mode, then that last word is
>  meaningless. I have found that ImageSize doesn't compute imagesize
>  quite correctly. It gives two bytes (that last word) too much.
>  That is not very serious, but in 256 color graphics mode it's
>  worse. For example ImageSize(0,0,30,30) gives 998. Correct value
>  is 965.
( Function deleted )

Hi,
  
  In the on-line help for TP7 it says that the buffer size is computed by
adding 6 bytes to the bitmap size.  The first two words are for the image
width and height.  It says that the third word is reserved.  It doesn't say
where the third word is located in the file.  I guess at the end.  I don't 
remember what the docs said for TP6.  Maybe Borland is planning ahead.
- Jeff
From: lee@cpu.us.dynix.com (Lee Crites)
Newsgroups: comp.lang.pascal
Subject: Re: Funny (?) DOS IDE editor window chars
Date: 16 Dec 92 04:12:25 GMT



On 15 Dec 1992, Pete Roth wrote:

> I've noticed that when I reload a file that's already been "made" that
> the editor window occasionally posts an "M" next to the spot
> where the "file has been changed" symbol appears (lower left corner
> of the window). I haven't found anything in the K's of doc pages that
> might give me a clue to this behavior.

I've seen this from time to time, but it has been where the mouse-cursor
happened to be at the time.  Might this be the case here?  I started a
habit of moving the mouse-cursor to a particular spot first.

lee@us.dynix.com
From: wisanr@newton.hartwick.edu
Newsgroups: comp.lang.pascal
Subject: TP's reset on read-only files
Date: 12 Dec 92 21:42:46 -0500
Organization: HARTWICK COLLEGE

 
I've been astonished to discover that TP's reset procedure can't open a
read-only file ex@|cept as a text file.  This appears to be true of
every version since TP1.  If it weren't clearly documented I'd call it a bug:
reset opens a text file for input and any other kind of file for
input and output.  In consequence, DOS will reject an attempt to reset a file
with attribute read-only.
 
The only work-around I've found is to change the attribute, open and
read the file, close it, and put it back to read-only.  I don't like it because
a program that stops abnormally might close the file, but it
will surely not restore the attribute.  
TP7 comes with the source code for the run-time library, and it's
perfectly clear there in FCTL.ASM.  TP opens the file with the standard
file-handle DOS call: INT 21h with AH=3Ch and AL=2.  AL=2 opens for both
read and write access.  AL=0 would open for read only and AL=1 for write
only.  The value for AL is taken from a typed constant in SYSTEM.PAS
 
Ideally, I'd like to add a new procedure, say reset2read which would load AL=0
in FCTL.ASM, but I'm diffident about tryingl that.  The
trouble is that you'd have to insert a new typed constant and a new procedure
declaration in SYSTEM.PAS, and the lists of declarations there
is peppered with warnings not to change anything because the compiler
depends on their exact order.
 
Now, what?
From: bobbe@vice.ICO.TEK.COM (Robert Beauchaine)
Newsgroups: comp.lang.pascal
Subject: Re: TurboVision & COM routines
Date: 15 Dec 92 21:11:46 GMT
Organization: Tektronix, Inc., Beaverton,  OR.

In article <BzBEIq.9vG@nic.umass.edu> mcrocker@titan.ucc.umass.edu (MATTHEW S CROCKER) writes:
>
>Ok,  I know this has been asked before.. so NO flames.
>
>I'm using TP 6.0 and will be getting BP7.0 soon.  I'm looking for some
>good TurboVision Com port routines.  I'm going to need to run upto 4
>COM ports at 9600 BPS (1 modem, 2 data,1 FAX).. I'll be using a 486 machine
>I am considering writing this in C++ but I know Pascal better
>
  
  Anyone planning on using a TTerminal object for Com routines
  desperately needs to look at the December/January edition of PC
  Techniques.  There's an article on how to properly extend a
  TTerminal object to speed up data output.  The original object as
  coded can have difficulty handling data rates of even 2400 baud 
  because of the way it handles screen output.  The revised version
  has no problems at even 9600 (so the author claims).


/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\ 

Bob Beauchaine bobbe@vice.ICO.TEK.COM 

C: The language that combines the power of assembly language with the 
   flexibility of assembly language.

Real friends don't let friends use UNIX.
Newsgroups: comp.lang.pascal
From: gilligan@cs1.bradley.edu (Edward Henigin)
Subject: text mode scrolling text down?
Keywords: scroll
Organization: Bradley University
Date: 12 Dec 92 18:57:53 GMT

Okay, I know there's a built in way to scroll text off the screen
going up (just to a writeln on line 25) but is there a built in way
to scroll text down?

Also, what is the function (I assume it's in crt.tpu) that returns
the cursor position?

Thanks a lot!

--
|ed -- gilligan@camelot.bradley.edu                                          |
|   -- gilligan@cs1.bradley.edu     | If you want a friend, feed any animal. |
|    Are you deviant?  Probably.    |           -Jane's Addiction            |
From: bobbe@vice.ICO.TEK.COM (Robert Beauchaine)
Newsgroups: comp.lang.pascal
Subject: Re: Creating a TSR
Date: 16 Dec 92 20:32:41 GMT
Organization: Tektronix, Inc., Beaverton,  OR.

In article <BzD80L.KHr@news.cso.uiuc.edu> amead@s.psych.uiuc.edu (Alan Mead) writes:
>Hendrik.Klompmaker@beheer.zod.wau.nl (Hendrik Klompmaker) writes:
>
>If you are really interested in HOW to write a TSR (as opposed to just
>getting the job done), then I have a few bits of code.  The problem
>(which I'll only sketch) is rather more complex than you seemed to
>think.  DOS and some of the BIOS is NON-REENTRANT, meaning that if you
>call, a function twice (once by some application and the second time by
>you TSR that "pops-up" over the first app) the second call overwrites
>information neccessary for the first call to return.  Thus after your
>TSR reliquishes control, execution resumes at some random point in
>memory and chaos ensues.

  For the best discussion I've ever seen on this subject, find a
  copy of _Turbo_Pascal_Advanced_Programmer's_Guide_.  It addresses
  every part of TSR programming, including stack switching,
  reentrancy, unloading, checking for a running copy, etc.  

  I know the book is out of print, but if you can find a used copy,
  it's worth this single chapter alone.  Lot's of other good stuff,
  too.


/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\/\ 

Bob Beauchaine bobbe@vice.ICO.TEK.COM 

C: The language that combines the power of assembly language with the 
   flexibility of assembly language.

Real friends don't let friends use UNIX.
Newsgroups: comp.lang.pascal
From: ts@uwasa.fi (Timo Salmi)
Subject: Re: Turbo Pascal 7.0
Organization: University of Vaasa, Finland
Date: Sun, 13 Dec 1992 08:33:54 GMT

In article <1992Dec13.031805.7854@spock.UUCP> vohaul@spock.uucp (Razvan Surdulescu) writes:
>I would be interested in buying the 7.0 version of Turbo Pascal.
>Unfortunately , I don't know very much about this software product and
>I was wondering if somebody could help me with some information , through

You might start by looking at
   6058 Oct 31 14:27 garbo.uwasa.fi:/pc/turbopas/bp7-info.zip

"If you do not know how to go about getting this material, users are
welcome to email me for the prerecorded garbo.uwasa.fi instructions
(long, circa 29Kb).  North American users are referred to the Garbo
mirror on wuarchive.wustl.edu.  Australian users are referred to the
archie.au mirror.  For the Asian users there is the NCTUCCCA.edu.tw
mirror.  The mirrors may lag occasionally, or might not have all the
files.  If you do not receive my reply within five days, please ask
your own site's system manager to construct a returnable mail path
for you". 

(P.S.  What was it with your followups directed to "none".  Not very
useful in getting replys.  Just a note, no flame). 

   All the best, Timo

..................................................................
Prof. Timo Salmi
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
From: evsikov@lcta5.jinr.dubna.su (Igor Evsikov)
Newsgroups: comp.lang.pascal
Subject: Re: Re: Copyright question from Russia
Date: 12 Dec 92 17:01:45 GMT
Reply-To: evsikov@lcta5.jinr.dubna.su
Organization: Lcta

Hi all! Thanks for interest to my question.

In article <AACHK8hmy9@lcta5.jinr.dubna.su> I writes:

>I and my friends wrote changes to Turbo Vision. We changed
>DRIVERS, VIEW, MENU and DIALOG TPU's in original Borlang codes.

>For EGA or VGA adapters you may use:
>  - GRAPHIC mouse cursor in TEXT videomode. A variety of the
>    mouse cursor shapes is supplied. When selected, the graphic
>    mouse cursor _smoothly_ moves through the screen.

>  - new  graphic simbol for menus, windows, dialogs. Very
>    beautiful font.

>I can send DEMO.
       ^^^^
Too many netters ask my to receive Demo. I sent it till I have
possibility. But my limit is finished. I can send Demo anythere
where you can see it , but I don't no where.

>... Can I distribute it as SHAREWARE? ...

One half sayed "You can distribute it", second half - "You can
not distribute it". I don't know that is DO. "To be or not to
be"?

Igor
Newsgroups: comp.lang.pascal
From: dmurdoch@mast.queensu.ca (Duncan Murdoch)
Subject: Re: Wanted: Code for sorting a file
Organization: Queen's University
Date: Tue, 15 Dec 1992 16:32:03 GMT

In article <1992Dec15.135354.10665@htsa.aha.nl> quintenu@htsa.aha.nl (Quinten Uijldert) writes:
>Who can E-Mail me some code for sorting a file. The file contains
>records like this:
>
>TYPE
>  RecType = RECORD
>    Name, Street, Zip, Telephone: String;
>  END;
>  FileType = TEXT;
>
>VAR
>  Rec: RecType;
>  f: FileType;
>
>I Want to sort the file on Rec.Name, but I can't figure it out how
>to do it.
>I Use TP 6.0.

You don't say how big the file is.  If it's small enough to load the whole 
thing into memory, the easiest way is as follows:

 1. convert your RecType to an object type, 
 2. create a TStringCollection descendant whose KeyOf method returns a 
pointer to the Name field
 3. read your data file, and insert all the records into your collection
 4. write the whole collection back to the file.

This isn't the fastest way to sort, but for a file small enough to fit into 
memory (less than 16380 records, 300K total size) you probably wouldn't 
notice any improvements you could make.

For a bigger file, I'd use an external sort package; QSORT (shareware by Ben 
Baker available at lots of ftp sites) works well for me.

Duncan Murdoch
dmurdoch@mast.queensu.ca
Newsgroups: comp.lang.pascal
From: fdeck@vyasa.helios.nd.edu (francis deck)
Subject: Update on clever curve-fit program
Organization: OUC, University of Notre Dame
Date: Sat, 12 Dec 1992 17:31:13 GMT

I was so overwhelmed by responses to my posting on the
automatic curve-fitting program (with symbolic interpreter)
that I can't respond to them all!  However, I am in the
process of figuring out how to put my program onto the
anonymous FTP site maintained by Notre Dame.  I will
send out another posting when I get it set up.

Thanks for all of the great responses.

f.deck

Newsgroups: comp.lang.pascal