HDTenEightyP/NetNews huggingface dataset:
From: comptec90132@camins.camosun.bc.ca
Subject: 46
Organization: Camosun College
Date: Fri, 10 Apr 1992 21:55:01 GMT

Hi,
   I need a basic read_key procedure.  Does anyone out there know where I
can get one?  Preferably for the VAX but I'm not too fussy.

Thanks in advance

mia
Newsgroups: comp.lang.pascal
From: nuxollam@NeXTwork.Rose-Hulman.Edu (Template Account)
Subject: Adlib
Reply-To: nuxollam@NeXTwork.Rose-Hulman.Edu (Template Account)
Organization: Rose-Hulman Institute of Technology
Date: Thu, 16 Apr 1992 05:57:28 GMT

Does anyone know how to use an Adlib card with TP 6.0?  And does anyone  
know where I can ftp a speech synthesizer program that uses the Adlib?
From: maurice.steyvers@ica.rulimburg.nl (M.L.A.M. Steyvers)
Newsgroups: comp.lang.pascal
Subject: Turbo-Vision menu question.
Keywords: TurboVision
Date: 15 Apr 92 14:53:11 GMT
Distribution: comp.lang.pascal
Organization: Rijksuniversiteit Limburg



Can someone tell me if (and how) it's possible to make a menu so that 
there always one of the menu-boxes pulled-down.

-----------------------------------------------------------------------------
maurice.steyvers@ica.rulimburg.nl		        University of Limburg
Information, Communication & Automation		  Maastricht, the Netherlands
-----------------------------------------------------------------------------
From: ts@uwasa.fi (Timo Salmi)
Newsgroups: comp.lang.pascal
Subject: Re: How to link compiled C functions in TP
Keywords: link C
Date: 9 Apr 92 11:03:05 GMT
Distribution: comp
Organization: University of Vaasa, Finland

In article <?.702734397@ss1> johnsotc@ss1.wpafb.af.mil (Tom C. Johnson) writes:
>Anybody have any experience with this who would be willing to share them?

Never done that, but have you looked whether the reference given in
garbo.uwasa.fi:/pc/ts/tsfaq27.zip Frequently Asked Questions is of
any use?

...................................................................
Prof. Timo Salmi
Moderating at garbo.uwasa.fi anonymous ftp archives 128.214.87.1
School of Business Studies, University of Vaasa, SF-65101, Finland
Internet: ts@chyde.uwasa.fi Funet: gado::salmi Bitnet: salmi@finfun
Newsgroups: comp.lang.pascal
Subject: Re: Problem with TP6.0 turbo.tpl replacement
From: khill@vax1.umkc.edu
Date: 6 Apr 92 14:45:54 CST
Organization: University of Missouri-Kansas City

In article <1992Mar30.225315.8222@odin.diku.dk>, tommy@diku.dk (Tommy Andreasen) writes:
> ddxxdd@mixcom.com (Jeff Ding) writes:
> 
> < stuff deleted >
>>I also downloaded the tpl60new.zip from garbo and ran into a different
>>problem.  When compiling this program, my computer froze up:
> 
>>var a, b, c : real;
>>begin
>>  a:= 1.1;
>>  b:= 2.2;
>>  c:= a + b;                      (Computer froze here)
>>end.
> 
>>It also freezes on subtraction but not on multiplication.
>>Anybody else have this problem?
> 
>>jeff.ding@mixcom.com
> 
> I have had the same kind of problems, and when trying to debug me
> out of them, I met this command:
> 
> 	shrd si,ax,cl
> 
> which certainly won't run on my old XT.
> 
> 				Tommy Andreasen
> 				tommy@freja.diku.dk

	Well, I guess I won't take the time to d/l this new .tpl file since
I only have a 286/287 and "shrd dest,src,cnt is the 386 specific command for
double precision shift right".  Does anybody out there think this file was
compiled allowing forcing 386 commands.  Gee, doesn't sound like the guy
who wrote .tpl replacement was terribly concerned about people with lower
level processors than his.  I begin to wonder if the reason why this new
.tpl is so much more efficient is because Borland used general 8088 commands
that they knew could run on any machine, and this guy used the more efficient
80386 commands, and not because he coded it so much more efficiently than
Borland.

			Ken Hill
			--------
			KHILL@VAX1.UMKC.EDU
From: J_SCHULL@acc.haverford.edu (Jonathan Schull)
Newsgroups: comp.lang.pascal
Subject: How do you tell when a user has lifted a finger OFF of a key?
Date: 16 Apr 92 18:54:11 GMT

I'm using Turbo Pascal...
From: J_SCHULL@acc.haverford.edu (Jonathan Schull)
Newsgroups: comp.lang.pascal
Subject: CPUID
Date: 8 Apr 92 23:08:56 GMT

I've heard about a routine on Compuserve called CPUID which can
detect 8088, NECV20, 80186, 80286, etc.  My compuserve password
is not working at the moment(?).
Does anyone know where I can find this, or equivalent, public
domain code in pascal or assembler?
Newsgroups: sbcs.cse114,comp.lang.pascal
From: s1949782@titan.ucc.umass.edu (SpaceMan Spiff?)
Subject: Re: pascal trouble
Organization: University of Massachusetts, Amherst
Distribution: na
Date: Sun, 12 Apr 1992 13:24:39 GMT

In article <1992Apr12.024103.27635@sbcs.sunysb.edu> dtiberio@csws7.ic.sunysb.edu (David Tiberio) writes:
>
>	I have to do a database option where the user presses
>RETURN if he does not want the data changed. The string read
>in is an array of length 9. This is what I tried:
>
>	if string = '         ' then data_does_not_change;
>
>	This line is not being read for some reason the way
>I would expect it to. Should this work? It could be that I forgot
>something somewhere else, but I have had problems like this
>throughout this program.
>
>
>-- 
>      //   David Tiberio  SUNY Stony Brook 2-3662  AMIGA  DDD-MEN   
>     //  Not the llama! Come here Earl; I want to tell you something...
>   \X/  Liverpool, New York	flames to suggestions@cbmvax.commodore.com

Try This:

Temp : String;

Begin
 Readln(Temp);
 If Temp <> '' Then Current := Temp;


When the user hits return and hasn't typed anything then there will be
no change made to the current string.  If the user did type something then
it is assumed that they wanted a change, which is done.

Hope this help

-MAtthew Crocker
s1949782@titan.ucc.umass.edu
From: o-vinje@hsr.no (Odd E. Vinje)
Newsgroups: comp.lang.pascal
Subject: Changing textmode in TV
Date: 13 Apr 92 12:27:07 GMT
Organization: Rogaland University Centre

I'm using the conventional method of changing the textmode from 25 to 43 or 50
lines. But, the screen is blinking and returns to 25 lines immediatly. 

What could be the cause of this ?
From: ts@uwasa.fi (Timo Salmi)
Newsgroups: comp.lang.pascal
Subject: Complex numbers (was Re: Powers in Pascal)
Date: 10 Apr 92 18:11:26 GMT
Organization: University of Vaasa, Finland

In article <1992Apr10.020617.12479@massey.ac.nz> news@massey.ac.nz (USENET News System) writes:
>TYPE COMPLEX = RECORD

A pointer that some users might find interesting.  A recent PC
Magazine (vol 11 no 2 1992 p 347) had an interesting piece on
complex numbers in TP.

...................................................................
Prof. Timo Salmi
Moderating at garbo.uwasa.fi anonymous ftp archives 128.214.87.1
School of Business Studies, University of Vaasa, SF-65101, Finland
Internet: ts@chyde.uwasa.fi Funet: gado::salmi Bitnet: salmi@finfun
From: bobb@vice.ICO.TEK.COM (Bob Beauchaine)
Newsgroups: comp.lang.pascal
Subject: Re: Getting PrefixSeg of TSR's from a non-TSR program.
Date: 16 Apr 92 19:46:41 GMT
Organization: Tektronix, Inc., Beaverton,  OR.

In article <1992Apr16.173456.19151@sbcs.sunysb.edu> clane@libws1.ic.sunysb.edu (Charles F Lane) writes:
> [Discussion on a screen dump TSR omitted]
>
>MY PROBLEM: I don't want to require the user to remember the PrefixSeg
>            of the TSR.  Is there a way for my non-tsr program to find 
>            out the location (PrefixSeg) of my TSR in memory automatically?
>

  Obviously, you have a grasp on the basics of TSR programming to
  have gotten this far.  Why not go all the way and learn about task
  and stack switchine?  There are only a few more steps involved in
  creating a TSR that can call DOS without fear.  It's not that much 
  more involved, and the benefits to your program would include:

    1.  Smaller resident size (you wouldn't need large resident
    arrays)
    2.  Independence (No support program like you need now).
    3.  Hell, the learning experience. 

    Just my thoughts.

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

Bob Beauchaine bobb@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: clane@libws1.ic.sunysb.edu (Charles F Lane)
Subject: Re: Serial Port
Organization: State University of New York at Stony Brook
Date: Mon, 13 Apr 1992 15:26:44 GMT

In article <1992Apr11.071843.54389@cc.usu.edu> slr2l@cc.usu.edu writes:
>I'm interested in writing some online programs for bulletin board systems,
>although I'm having a rough time trying to figure out how to send the
>data to com port 1.  Any ideas??  
>  SLR2L@cc.usu.edu

	There are some good routines on ftps like oak.oakland.edu.  Try
asynch4.arc or ltcomm50.arc in the pub/msdos/turbopas directory.  Log on
anonymously and give your user id as a password.  I think someone in this
group made some com routines, too: Duncan Murdoch, maybe?  Don't remember.


-- 
~~~~~~~ I'm (sine)waving goodbye!  | Bo knows football, basketball, baseball,
Charles F. Lane                    | hockey, diddley, etc.  But does he know
clane@Libws1.ic.sunysb.edu         | computers?!
From: reagan@hiyall.enet.dec.com (John R. Reagan)
Newsgroups: comp.lang.pascal
Subject: Re: Complex numbers (was Re: Powers in Pascal)
Date: 13 Apr 92 17:01:42 GMT
Organization: Digital Equipment Corporation


BTW, the Extended Pascal standard has complex numbers built into the
language.

---
John Reagan
Digital Equipment Corporation
reagan@hiyall.enet.dec.com
Disclaimer:  The opinions and statements expressed by me are not
             necessarily those of Digital Equipment Corporation.
---
Newsgroups: comp.lang.pascal,comp.lang.c,comp.os.msdos.programmer
From: brandt@cco.caltech.edu (William N. Brandt)
Subject: HELP! How to do VGA graphics screen dumps onto an IBM Proprinter II
Summary: HELP! How to do VGA graphics screen dumps onto an IBM Proprinter II
Keywords: printer
Organization: California Institute of Technology, Pasadena
Date: Thu, 9 Apr 1992 00:02:57 GMT

Hi,

I own a 386 MSDOS IBM standard computer with a NEC VGA monitor and an IBM
Proprinter II. I would like to be able to do graphics screen dumps onto
the Proprinter. For example, I would like to be able to create a .EXE
file with Turbo Pascal which produces graphics output and then be able
to print this graphics output by pressing Shift-Print Screen.

Has anyone out there solved this problem? I would be grateful if you could
respond via email. Also, are there any FTP sites which have a progam
which allows one to do this?

I know a program called EGAPRO allows one to do EGA screen dumps onto
IBM Proprinters but it does not work with VGA monitors.

Thank you,
Niel Brandt   brandt@jomby.caltech.edu
From: holland@chester.ksu.ksu.edu (Rich Holland)
Newsgroups: comp.lang.pascal
Subject: Re: Help with pointers
Date: 7 Apr 1992 09:42:44 -0500
Organization: Kansas State University
Distribution: world
NNTP-Posting-Host: chester.ksu.ksu.edu


rind@binoc.bih.harvard.edu (David Rind) writes:

>> ["Error 204:  Invalid pointer operation"]  

>I would suggest checking very carefully that you've allocated
>enough space for the array and are not indexing past the point
>in the array that you had planned for.

I found out my problem by selectively commenting out procedures between
the point where I New() my array elements and the point where I Dispose() 
them.  I found out that I was Mark/Releasing memory for a buffer for a
copy of video memory, so I could "stack" menus and restore them.  That
seemed to destroy my pointers.  Maybe it was because I didn't have enough
Heap though -- I'm going to try increasing the heap size and test it, for
curiosity sake.  

 
-- 
Rich Holland             | INTERNET:  holland@matt.ksu.ksu.edu
419 Marlatt Hall         | BITNET  :  holland@ksuvm
Manhattan, KS  66506     | UUCP    :  ...rutgers!matt.ksu.ksu.edu!holland
"Jesus saves...but Gretzky gets the rebound!  He shoots!  He scores!!"
Newsgroups: comp.lang.pascal
From: nmouawad@waterloo.edu (Naji Mouawad)
Subject: Re: ExecView in TV
Organization: University of Waterloo
Date: Mon, 13 Apr 1992 16:31:00 GMT

In article <1992Apr13.122304.18726@hsr.no> o-vinje@hsr.no (Odd E. Vinje) writes:

   In my TV-program I have a problem with the ExecView -procedure. I'm trying
   executing a modal dialogbox (a MessageBox) in the program's Init -procedure 
   (which is a constructor).

   The program is hanging at this point. What is wrong ??

   Odd



You are trying to execute a message box inside of init ? That is
strange. You see, exec is a method of the object your are
INITializing. What init does among other things is to set-up a
reference pointer to a VMT (Virtual Method Table). This table contains
pointers to the code of virtual methods such as Exec.

From page 102 of the user's guide:

Warning !  The constructor must be called before any virtual method is
           called. Calling a virtual method without previously calling
           the constuctor can cause sytem lockup, and the compiler has
           no way to check the order in which methods are called.


One might argue that the VMT table is allocated on entry of the
constructor, that is it is allocated before anything else takes place.
Thus, one should be able to access the methods within the constructor.

For some reason I supsect that this cannot be the case.

In any event, turn on the range checking option and do not call a
method of your object within the init method. That's a safe bet.

naji.
     
 
--
     -------------------------------------------------------------------
    | Naji Mouawad  |          nmouawad@watmath.waterloo.edu            |
    |  University   |---------------------------------------------------|
    | Of Waterloo   |   "The Stranger in us is our most familiar Self"  |
     -------------------------------------------------------------------
Newsgroups: comp.lang.pascal
From: johnsotc@ss1.wpafb.af.mil (Tom C. Johnson)
Subject: How to link compiled C functions in TP
Date:  8 Apr 92 11:59:57 GMT
Distribution: comp
Summary: How to link C funcitons
Keywords: link C 
Organization: Air Force Institute of Technology

Anybody have any experience with this who would be willing to share them?

Thanks,

Tom


johnsotc@ss1.sews.wpafb.af.mil
From: friesenda@skyfox.usask.ca
Newsgroups: comp.lang.pascal
Subject: RE: Resetting IOResult
Date: 15 Apr 92 00:44:00 GMT
Organization: University of Saskatchewan

In a previous article, bryant@perlis.mcs.gvsu.edu (John Q. Public) wrote:
>Does anyone know how to reset IOResult to zero after taking care of an
>error condition?  My code looks something like this:
>{$I-}
>    perform I/O
>    IF IOResult <> 0 THEN
>        write(errormsg);
>{$I+}
>    
>    After I get past the {$I+} however, IOResult still retains it's value
>to blow up on the next I/O that is performed.  How do I reset it to 0?
>Thanks,
>JQP

If it blows up on the next I/O that occurs then that I/O caused an
error.  Pg 81 of TP Library Reference states that "A call to IOResult
clears its internal error flag."  You shouldn't have to reset it
because it is reset after you call the IOResult function.

----------
Darryl Friesen
Univ. of Saskatchewan
friesenda@sask.usask.ca
From: thaco@Lise.Unit.NO (Eirik Milch Pedersen)
Newsgroups: comp.lang.pascal
Subject: Test for PC/VGA
Date: 10 Apr 92 09:45:43 GMT
Organization: Norwegian Institue of Technology

This request is PC/VGA spesific, so if you don't have such a card, please jump
to the next posting.

As I was hacking through the (S)VGA card i did notice a undocumented a option 
setting of the Clock-select bits in the Miscellaneous Output Register. 
As I hav noticed this setting isn't valid for all VGA cards (perhaps only for
SVGA ones).
What want is that as many people as possible to try the program enclosed at 
their computer, and email me the result.

What I want you to do:
  (1) Uudecode the GRAFTEST.COM file at the end of this posting,
      or assemble the sourcecode enclosed (in case you would be sure that the
      program dosn't contain a VIRUS, that it of cource doesn't have)
  (2) Run GRAFTEST on you computer.
  (3) Send a mail to

        thaco@lise.unit.no

      answering the following questions:
       a) Do you see any colors at your screen?
       b) Does the computer 'hang'?
       c) What kind of graphic-card are you using?
       d) What kind of monitor are you using?
       e) Any comments?

NB:   This program could 'hang' your computer, so be prepared!
NBB:  It's normal to have a fuzzy picture on the screen.
NBBB: Please use the email address specified and NOT solan.unit.no.
      (I don't want to get my usual mailbox filled with 10.000 mails
       concearning this test.)


Thank you in advance!

 _/_/_/_/_/  _/    _/   _/_/_/     _/_/_/    _/_/_/
     _/      _/    _/  _/    _/   _/    _/  _/    _/
     _/      _/    _/  _/    _/   _/        _/    _/
     _/      _/_/_/_/  _/_/_/_/   _/        _/    _/
     _/      _/    _/  _/    _/   _/        _/    _/
     _/      _/    _/  _/    _/   _/    _/  _/    _/
     _/      _/    _/  _/    _/    _/_/_/    _/_/_/

+----------------------+----------------------------+
| Eirik Milch Pedersen |    thaco@solan.unit.no     |
|       Stp. 153       +----------------------------+
| 7000 TRONDHEIM - NTH |   "The summer is gone,     |
|        NORWAY        | and we are yet not saved!" |
+----------------------+----------------------------+
   
---------------- GRAFTEST.ASM ------------------
model small
codeseg
org 100h
start:
  mov ax,013h
  int 10h

  mov dx,03C2h
  mov al,06Fh
  out dx,al

  mov  ax,0A000h
  mov  es,ax
  mov  di,0
  mov  cx,7D00h
@@10:
  mov  al,cl
  and  al,1Fh
  stosb
  loop @@10

  in   al,60h
  mov  ah,al
@@20:
  in   al,60h
  cmp  al,ah
  je   @@20

  mov  ax,3h
  int  10h

  mov  ax,4C00h
  int  21h

end start
---------------- END -----------------------------



------------- CUT HERE ---------------------------
begin 644 graftest.com
MN!,`S1"ZP@.P;^ZX`*".P+\``+D`?8K!)!^JXOGD8(K@Y&`ZQ'3ZN`,`S1"X
$`$S-(1"Z
`
end
From: dtiberio@csws17.ic.sunysb.edu (David Tiberio)
Newsgroups: sbcs.cse114,comp.lang.pascal
Subject: file of data_type?
Date: 11 Apr 92 05:35:27 GMT
Organization: State University of New York at Stony Brook


	In my first run of my database, I used a file
of type TEXT. But I want to use a file type of my custom
design so that I can store everything in binary format.
I tried:

var	infile: file of database_record;

	but that did not work. I also tried file of binary.
Any help?



-- 
      //   David Tiberio  SUNY Stony Brook 2-3662  AMIGA  DDD-MEN   
     //  Not the llama! Come here Earl; I want to tell you something...
   \X/  Liverpool, New York	flames to suggestions@cbmvax.commodore.com
Newsgroups: comp.lang.pascal
From: clane@libws1.ic.sunysb.edu (Charles F Lane)
Subject: Getting PrefixSeg of TSR's from a non-TSR program.
Originator: clane@libws1.ic.sunysb.edu
Organization: State University of New York at Stony Brook
Date: Thu, 16 Apr 1992 17:34:56 GMT

    I am writing a TSR graphic image capture utility.  I am not dealing
with writing to disk from within the TSR because of DOS non-reentrancy.
Instead, I am storing the data in an array declared within the TSR.  Now,
by knowing the offset of the array from the PrefixSeg of the TSR I can
write the data to disk from a companion program which is non-TSR by knowing
the PrefixSeg of the TSR.  For now I am writeln'ing the TSR PrefixSeg when
the TSR is loaded and telling the user to remember it.  Then when the
non-tsr program is run it asks for the PrefixSeg that was displayed by the
TSR so it knows where the data array is located in memory.  Pfew!  This all
works fine and dandy.

MY PROBLEM: I don't want to require the user to remember the PrefixSeg
            of the TSR.  Is there a way for my non-tsr program to find 
            out the location (PrefixSeg) of my TSR in memory automatically?

   I have thought about embedding a specific sequence of byte-sized values
in the TSR, that way I could do a pattern match through the system memory to
locate my program.  The problem is there just may HAPPEN to be the same
sequence randomly stored somewhere in memory already -- you never know!
Who knows? Your name may be in there somewhere in the form ord(firstletter),
ord(secondletter), etc!  Maybe I'll write a program that searches for one's
name in memory just for the fun of it!

-- 
                          |"There are pearls to be had here, but you have to
Charles F. Lane           |break open the oysters."  My geology prof to a class
clane@Libws1.ic.sunysb.edu|w/no questions at a review 2 days before an exam.
Newsgroups: comp.lang.pascal
From: renns@fraser.sfu.ca (R Enns)
Subject: accessing VESA 640x480x256 mode ?
Organization: Simon Fraser University, Burnaby, B.C., Canada
Date: Wed, 8 Apr 1992 17:17:45 GMT


Is there a .BGI driver available for accessing VESA graphics modes?  In
particular I wish to use a 640x480x256 color mode.  Thanks in advance.


-- 

Darran Edmundson
darran@chaos.phys.sfu.ca
From: roth@oasys.dt.navy.mil (Pete Roth)
Newsgroups: comp.lang.pascal
Subject: Re: Turbo-Vision menu question.
Date: 16 Apr 92 13:05:13 GMT
Reply-To: roth@oasys.dt.navy.mil (Pete Roth)
Organization: The David Taylor Model Basin

In comp.lang.pascal, maurice.steyvers@ica.rulimburg.nl (M.L.A.M. Steyvers) writes:
>Can someone tell me if (and how) it's possible to make a menu so that
>there always one of the menu-boxes pulled-down.

How about:

VAR E : TEvent ;

E.What := evKeyPress; E.Command := aletter; PutEvent(E) ;

where 'aletter' corresponds to the menu item on the MenuBar (for
example, to pull down the ~F~ile menu, you may have to use kbAltF).

This is written on the fly, but should point you in the right direction.

regards, pete
- - - - - - - - - - - - - - - - - - - - - - - - - -
Peter N Roth      roth@oasys.dt.navy.mil
Just another victim of the GUI-induced Mouse Elbow Syndrome.
Newsgroups: comp.lang.pascal
From: brandt@cco.caltech.edu (William N. Brandt)
Subject: Help! Is there a MSDOS Pascal that breaks 640K Barrier?
Summary: Is there a MSDOS Pascal compiler that breaks 640K barrier
Organization: California Institute of Technology, Pasadena
Date: Wed, 15 Apr 1992 03:30:42 GMT

Hi,

I am a student doing radio astronomy work on my MSDOS 386 machine and
would like to know if there exists a version of Pascal that breaks
MSDOS's 640K barrier. Basically I want to be able to define an
array of 4000 by 4000 real numbers but this exceeds MSDOS's current
limit so I am wondering if there is a Pascal that gets around this and
doesn't crash the system it is running on all the time etc. = Reliable.

I am especially interested in good reliable
shareware that can be obtained off FTP but any info on this
subject would be very interesting to me - I might be able to get
research funds for it if one existed at a reasonable price. Graphics
capability and decent file reading utilities would be nice too.
Does anyone know if Turbo Pacal 6.0 (or whatever the newest one is) breaks
the barrier?
If you could respond via email I would be grateful!

Thank you, Niel Brandt      brandt@jomby.caltech.edu
Newsgroups: comp.lang.pascal