HDTenEightyP/NetNews huggingface dataset:
From: stefan@sinus.stgt.sub.org (Stefan Bechtold)
Subject: Case/readln Question
Organization: Sinus Stuttgart, Germany
Date: Wed, 6 Jan 1993 00:47:00 GMT

Hi !

I've a question;
What I want to do is a menue with 15 items; therefore I've to use
the case statement under TurboPascal6.

But if I use char-type for the variable which is controlled
by case it doesn't work as the case-statement only accepts
1..9, not numbers with two digits (as 10..15).

So I could use integer-type where it works, in fact. But when I use integer and
type some char like a letter (e.g. 'A') , the case-loop exits (as
'A' is a char/string, but no integer).

What I want to do:
I want to control 15 numbers by a case-statement (so I do have to use
integer, doesn't I ?), but also want to control all other chars typed in
(so that the program doesn't exit but prints an error message.)

Do you have any solution ?

Thank you very much in advance,
Stefan
-- 
+ Stefan Bechtold # stefanb@delos.stgt.sub.org # Voice +49 711 813240 +
++++++++sed nemo potuit tangere: merda fuit ! (Martial III 17)+++++++++
Newsgroups: comp.lang.pascal
Subject: Re: Faster Pascal
From: warren@chchp.ac.nz (wmcivor@admin.chchp.ac.nz)
Date: 6 Jan 1993 23:12:37 GMT
Organization: Christchurch Polytechnic
NNTP-Posting-Host: 192.203.99.30

MITCHELL JAMES writes:
>Bascially, I'm trying to find a way to run Pascal code faster. I have access 
>to a 486 but this is woefully inadequate (for my needs at least). I was 
>wondering if a version of Pascal exists for platforms other than the DOS / 
>PC environment. If I could use a Unix environment for example, I would be 
>able to make use of a Sun workstation (which might be enough). If anyone has 
>experienced/solved the speed problem, I would greatly appreciate their 
>advice. Any replies can be mailed to me (address below) and I'll post a 
>summary of anything that turns up. 

According to some guff I recieved in the mail yesterday, Stony Brook have 
released a Pascal compiler 100% source compatible with Turbo Pascal.
Amoungst the claims is that it's up to 100% percent faster and produces code 
up to 30% smaller.

I don't know anything about this pascal, but  you might be interested in 
having a look.

Warren....
From: E.Thompson@newcastle.ac.uk (E. Thompson)
Newsgroups: comp.lang.pascal
Subject: Digital Crime dc1.boo and dc2.boo
Date: 12 Jan 93 14:04:46 GMT
Organization: University of Newcastle upon Tyne, UK NE1 7RU

Some time ago there was announced in this group a graphic development
package - I think called dc1.boo and dc2.boo.
An archie search on these produced no hits - Anyone out there got
any clues where thy can be found, I think they were written in T.P.
by someone in Australia.
E.Thompson@ncl.ac.uk
Newsgroups: comp.lang.pascal
From: gboersma@sce.carleton.ca (Gerald Boersma)
Subject: Re: pointers to arrays?!?
Organization: Carleton University
Date: Mon, 11 Jan 1993 19:28:13 GMT

gedeck@pctc.chemie.uni-erlangen.de (Peter Gedeck) writes:


>|>Type
>|>   ArrayType = Array[1..Max] of Char;
>|>
>|>Var
>|>   ArrayVar  : ^ArrayType;
>|>   Index     : Word;	
>|>
>|>[..]
>|>
>|>ArrayVar[Index]^ := etc..????

>ArrayVar^[Index] := etc..
>      
>Peter Gedeck

In C, it is possible to do the following with arrays on the heap:

1. Get a section of memory from the heap.
2. Use an array reference to correspond to a memory location on the
heap.

Of course, this implies that variable-sized arrays can be created and
referenced from the heap.

ie. 

main()
{
  int *Array;
  int size;

  /* define size of the array: can be acquired from user, etc.
     Point is, it is variable, not a constant. */

  Array = (int *) malloc (sizeof (int) * size);

  /* reference 5th element of array */
  Array[5] = 100;
}

This works because C considers Array[5] the same as pointer to Array
plus 5 * the size of each element (ie. adjusts the location of the
pointer).

As you can see, this is an extremely powerful approach to
dynamically-sized arrays without having to fiddle with pointers too
much.

Now, I tried doing something like this in Pascal, but had no luck. Any
suggestions?

Gerald.
gboersma@sce.carleton.ca


Newsgroups: comp.lang.pascal
From: ts@uwasa.fi (Timo Salmi)
Subject: Re: complex numbers
Organization: University of Vaasa, Finland
Date: Wed, 6 Jan 1993 08:33:45 GMT

In article <1993Jan5.220227.4094@nntpd.lkg.dec.com> reagan@hiyall.enet.dec.com (John R. Reagan) writes:
>Well, the Extended Pascal standard has complex numbers.  Just get Borland
>to implement that part of the standard.

Good heavens.  How stupid of me.  I totally missed this easiest and
most obvious solution myself.  :-)

   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: gsanchez@cs.umr.edu (Guadalupe Sanchez)
Subject: Re: There is no decompile on Turbo is there?
Date: Thu, 7 Jan 1993 04:56:01 GMT
Organization: University of Missouri - Rolla, Rolla, MO

In article <1ifihbINNe4e@usenet.INS.CWRU.Edu> ah157@cleveland.Freenet.Edu (Rob Henry) writes:
>
>
>
>I can't take a trubo pascal compiled program and reverse it to get
>the source code can I?


If you compile a program with the option that keeps debug info in, you can
view the source from the .exe.  Otherwise, there is no way to do it.
Newsgroups: comp.lang.pascal,comp.os.msdos.misc,comp.sys.ibm.pc.misc
From: wijkstra@fwi.uva.nl (Marcel Wijkstra (AIO))
Subject: Switch video mode in Turbo Pascal (5.5, 8514)
Organization: FWI, University of Amsterdam
Date: Mon, 11 Jan 1993 09:07:44 GMT

Hi,

We use Turbo Pascal 5.5 on a PS/2 with a 8514 for a Computer Graphics course.
My suprevisor wrote a set of graphics procedures, that supports both standard
VGA as well as 8514. In VGA mode, we have no problems at all.
However, when we use the 8514 mode, there is a problem with switching back to
text mode when an error occurs (proghram termination), or when using the IDE
for debugging. In both cases, the 8514 screen stays on top, and the text
screen remains invisible.
When the program terminates normally, the text screen does appear.

Is there some solution to this problem?
I've heard you can control the video mode switching for debugging with the
specification of one monitor for the IDE, and one for program output, but
I cannot find anything about it in the manual. How can this be done?
Is there a simple way of writing a TSR that takes over control of the
video mode switching (I never wrote a TSR before...)?
Or can it be done by programming the 8514 differently (I did not write the
grapphics procedures, but I do have access to its source code)?

Thanks in advance,
Marcel.
-- 
 X	   Marcel Wijkstra   AIO   (wijkstra@fwi.uva.nl)
|X|	     Faculty of Mathematics and Computer Science	
 X	       University of Amsterdam   The Netherlands
======Life stinks. Fortunately, I've got a cold.========
Newsgroups: comp.lang.pascal
From: trodgers@nmsu.edu (Thomas Rodgers)
Subject: Re: Distributing TPUs
Organization: NMSU Computer Science
	<765338d8368876t211@witsend.uucp> <dmurdoch.254.725594757@mast.queensu.ca>
	<1992Dec29.163745.19275@nmsu.edu> <1992Dec31.121645.6747@qiclab.scn.rain.com>
	<Sorokin.44.726103027@ps1.iaee.tuwien.ac.at>
Date: Tue, 5 Jan 1993 06:11:23 GMT

>>trodgers@nmsu.edu (Thomas Rodgers) writes:
>>
>>Well, TPU files have *big* advantage over OBJ and LIB files in onw
>>area. If I only use *one* function or procedure from a TPU, only the
>>code required for *that* is incorporated in the final EXE. Ditto for
>>constants defined in the TPU. Only the onsed that get *used* are
>>incorporated.

I didn't write this :)

=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
trodgers@nmsu.edu     In Real Life ???

                     ---------------------------
    "Bob's" promise is to widen the scope and nature of *abnormal 
behavior*, to explore NEW WAYS of going over the edge *and coming
back*.  PLUS to *bring back those who couldn't on their own*...to
help you create the HIGHEST POSSIBLE EARNINGS from the PSYCHODYNAMICS
of ABNORMALITY...to turn Conspiracy-implanted personality disorders
into an ILLUSION OF CREATIVITY that will *fool normals* and GET YOU
SEX!
--
  Excerpted from an online pamphlet for the Church Of The SubGenius
From: jrichert@krefcom.GUN.de (Jan Richert)
Newsgroups: comp.lang.pascal
Subject: Seeking for: ISAM database files access source
Date: 5 Jan 93 17:55:05 GMT
Reply-To: jrichert@krefcom.GUN.de (Jan Richert)
Organization: Krefcom UUCP Server, Krefeld, FRG

Hi!

I'm urgently seeking an example Pascal source code for accessing
(reading/writing) ISAM database files. Any documents explaining
the ISAM structure might also be helpfull.

Thanks in advance. PLEASE REPLY BY MAIL ONLY.


-- 
Jan Richert (NIC-ID: JR482)   | Internet:   jrichert@krefcom.GUN.de
Krefeld, FRG                  | Datex-J:    02151399843-0001
Voice & FAX: +49 2151 313124  | IRC-Nick:   jrichert
From: ATURNER@rcnvms.rcn.mass.edu (Alan Turner)
Newsgroups: comp.lang.pascal
Subject: untyped vars
Date: 8 Jan 93 01:22:38 GMT

Date sent:  1/7/93

Hello to all,

I am curious - TP allows for untyped vars as in parameter lists:

ex:   procedure something(a : word; b: byte; var c)
                                             ^^^^^
I would like to know of some wonderful uses for such a thing in addition
to comparing the size of two variables as in TP60.man pg 107-108.



-=Alan Turner=-                
-=Email: aturner@ecn.mass.edu=-
From: pierre.a..sicart@lill.frmug.fr.mugnet.org (Pierre A. Sicart)
Newsgroups: comp.lang.pascal
Subject: SIZES
Date: 9 Jan 93 23:13:00 GMT
Reply-To: pierre.a..sicart@lill.frmug.fr.mugnet.org (Pierre A. Sicart)
Organization: Li'LL BBS - Paris, France

Printing from a programme, I'm wondering about two topics I don't manage
correctly:

1) getting the ACTUAL paper size (but getting all paper sizes);

2) scalling fonts (which I print at the screen size, that means a small
point for a whole sentence).

thanks

---
 * Origin: ERANA's_PEACE,Toulouse_France, 2:324/102 @Fidonet.org
(102:330/1)
From: STANKULI%UWF.bitnet@cunyvm.cuny.edu ( stan kulikowski ii)
Newsgroups: comp.lang.pascal
Subject: circulating .TPUs for intermediate level education?
Date: 6 Jan 93 22:37:23 GMT



  i have several .TPUs which i wrote and use fairly often in my interface
designs.  i have been meaning to put these out if other programers,
especially beginners, might find them useful.  here is what they do,
please let me know if they are of interest and what procedures i need to
follow to place them into general circulation.  i would be happy to ftp
them to simtel-20 or somewhere if i knew the upload procedure.   i have a
compuserve account if they should be uploaded to some borland area over
there.

        TEXTPAGE   -- replaces the monitor routines of CRT with a set
                      that can be used to write text in colors to
                      nondisplayed text pages in EGA/VGA memories.
                      you get 8 text pages which rom bios calls can
                      switch between.

        JULIAN    -- does the standard conversions between julian and
                     gregorian dating, days elapsed, etc.

        READABLE  -- parses text lines into syllables, words, sentences
                     and other elements needed for a standard educational
                     readability formula.  variables can be addressed to
                     crudely estimate grade levels of text passed through it.


  and i may have a few others floating around.  i intend to make source
code available with the intention that others can learn how such
operations are handled.  what is the general feeling about copyrighting
the source so to protect it for educational uses?
                                                 stan

        .      1: the check is in the mail             stankuli@UWF.bitnet
       ===     2: i will respect you in the morning
             3: i won't ...(well, you know this one)...
       ---     4: he's only just a good friend
               5:
                                    -- universal lies
Newsgroups: comp.lang.pascal
From: ts@uwasa.fi (Timo Salmi)
Subject: Re: complex numbers
Organization: University of Vaasa, Finland
Date: Tue, 5 Jan 1993 22:25:29 GMT

In article <34876@adm.brl.mil> OLDENHUIS@ib.agro.nl (Roelof Oldenhuis) writes:
>Maybe it's a FAQ, but I couldn't find anything about this subject:
>Is it possible to calculate with complex numbers in Pascal?
>I know TP has no standard procedures or functions for complex analysis 
>problems (Fortran does), but are there units or sets of functions/procedures 
>available to do this kind of mathematics?

I am increasingly vary of posting at all such indefinite pointers
any more, but I'll venture it this time.  If you look at the back
issues of Dr Dobb's Journal for about three years back, there is an
article on exactly such TP functions and procedures.  Sorry that I
do not have the exact reference. 

..................................................................
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
Date: Tuesday, 5 January 1993 18:27:42 MST
X-Mailer: TMail version 1.15R
From: "D. C. Sessions" <dcs@witsend.tnet.com>
Organization: Nobody but me -- really
Subject: Re: LARGE Sorts and such...
Newsgroups: comp.lang.pascal
Distribution: world

In <1993Jan3.222248.18162@news.acns.nwu.edu>, delusion@casbah.acns.nwu.edu (Albert Schmezer)  wrote:
# 	Anyways, for the question: How does one go about, in TurboPascal,
# sorting an array of IMMENSE proportions? What I mean is that I am making a
# database-type program, and I have at least 10,000 items in the database. How
# can I sort 10,000 items? They won't even fit into an array! If I can't sort
# them, how can I at least index them? I really need the ability to sort these
# LARGE amounts of information. If it were only 500 or even 1000 entries, it
# wouldn't be a problem - I would use a Quicksort or Heapsort routine, but
# 10,000 or 100,000 presents a grave problem. Is there a way to make use of a
# temporary file on the harddrive? How slow is this? How would I even go about
# doing this? Can I stick groups of 100 or so into an array and integrate the
# sorts? How would I do this?! Is this slow, too?

  Well, you COULD use a linked list instead of an array to collect your
  data.  That way, your main limitation would be the amount of memory
  available to hold the keys.  I know that Quicksort is very popular, but
  Mergesort actually has better worst-case performance and works very
  well on linked lists.

--- D. C. Sessions                            Speaking for myself ---
--- Note new network address:                dcs@witsend.tnet.com ---
--- Author (and everything else!) of TMail  (DOS mail/news shell) ---
From: z_youngjb@ccsvax.sfasu.edu
Newsgroups: comp.lang.pascal
Subject: <None>
Date: 9 Jan 93 04:06:08 CST
Organization: Stephen F. Austin State University

jl


kjkjlkjlkjljlkjlkjlj
kljkljlkjlkjlk
















Newsgroups: comp.lang.pascal
From: coconut@crash.cts.com (Brian Dear)
Subject: Re-sizing polygons
Reply-To: brian@coconut.com
Organization: Coconut Computing, Inc., La Jolla, CA
Date: 11 Jan 93 19:38:39 PST
Keywords: polygons resizing

I would like to re-size (shrink or enlarge) a set of Polygon code
using the Polygon functions in the Borland Graphics Interface of TP,
or using the DrawPoly functions in Genus's GX Graphics toolkit.
I was curious to know if anyone knew of anything that already does 
this... i.e., can take a set of Polygon coordinates and apply a
scaling factor to them so that the resulting image is smaller or larger.
This would make Polygon routines far more useful.  

Any ideas?  Please reply to brian@coconut.com.

Thanks!

Brian Dear /// Coconut Computing, Inc. \\\ brian@coconut.com
From: dobler@sparc1.wiwi.uni-karlsruhe.de (Volker Dobler)
Newsgroups: comp.lang.pascal
Subject: Unit to print ??
Date: 8 Jan 1993 08:49:24 GMT
Organization: Institut fuer Entscheidungstheorie und Unternehmensforschung Universitaet Karlsruhe (TH)
Distribution: world
NNTP-Posting-Host: etupc30.wiwi.uni-karlsruhe.de

Hello,

I'm looking for a unit to print out things in TurboVision to diffrent Printers (HPLaser,
matrix printer, ....).
There is a unit within TurboPower's ObjectVision, but this is not compatible with
TurboVision. I sent this question a few days ago to this group and didn't get any response.
So, i try it again.

Thanks for any (!!) hint.
Volker
==============================================================================
|          Volker Dobler, Universitaet Karlsruhe (TH), Deutschland           |
|                                                                            |
|   e-mail: dobler@etupc30.wiwi.uni-karlsruhe.de     ,-----------------------|
|    oder     ul1f@dkauni2.bitnet                    |  I don't like chaos,  |
|  PGP20-Public Key:                                 |  but chaos likes me.  |
|        finger dobler@etupc30.wiwi.uni-karlsruhe.de |                       |
==============================================================================
From: bobbe@vice.ICO.TEK.COM (Robert Beauchaine)
Newsgroups: comp.lang.pascal
Subject: Re: <None>
Date: 9 Jan 93 19:10:49 GMT
Organization: Tektronix, Inc., Beaverton,  OR.

In article <1993Jan9.040609.2373@ccsvax.sfasu.edu> z_youngjb@ccsvax.sfasu.edu writes:
>jl
>
>
>kjkjlkjlkjljlkjlkjlj
>kljkljlkjlkjlk

 auertyp;ouh;/asldkfh 
 asddhr;kaiu
 asi74'q2

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

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: pf@bilbo.bio.purdue.edu (Paul Furbacher)
Subject: Re: TVision : BUG in my head or in TV?
Followup-To: comp.lang.pascal
Organization: Purdue University
Date: Tue, 12 Jan 1993 06:07:25 GMT

In article <07JAN93.20698633.0034@music.mus.polymtl.ca>, Steph wrote:

...in a response to S.A. Modena's comments on Object.Init zeroing
the fields in the member list:

> I wouldn't use it.  Even though TV might zero data fields, Turbo
> Pascal itself doesn't, so in _my_ book it's bad practice to use this
> feature, especially if not all versions do it, for instance.

All *two* versions of TurboVision use this, so the author's (Steph's)
logic is a little askew here.  It takes very little getting used
to, and in most cases, it would be uncommon to port objects
created in TV to other object libraries.  Duncan Murdoch mentioned
that he has confronted *annoyances* (not problems) over this 
feature when porting TV objects to OWL.  But 1) porting is
not a high priority for many practionners, 2) porting between
TV and OWL will be done by people who are wise enough to 
realize the initialization occurs in the TV Init calls and
doesn't in the OWL calls. (I'm not smart enough to program in
both, so I don't worry too much -- maybe a few minutes of lost
sleep each night, but other problems contribute more to my 
insomnia.)

> 'sides, they always thought me that un-initialized variables are a
> bad programming practice.  

Again, twisted logic.  TV does exactly what your instructors 
told you to do, initialize all variables to some common value, 
like ZERO.  Good programming practice, so they say.

> ...I know that if I were to read someone
> else's code that used hidden features of TVision, I'd quickly get
> lost.  I'll stick to doing InitVar := 0, thank you.  :)

Two points here:

1. Pascal and detail hiding.  Hand and glove.  What a lovely pair.

2. Every time you pick up somebody else's code using either a 
compiler or toolbox with which you are to some degree unfamiliar,
you are dealing with not only the hidden assumptions of the 
compiler and toolbox designer, but those of the programmer who used 
those tools to create the program you have the pleasure of
maintaining.  To hope to get away from hidden assumptions and
features is an exercize in futility.  Don't go around 
interacting with people, they're full of hidden features, like 
personality traits and agendas.

pf
Newsgroups: comp.lang.pascal
From: dmurdoch@mast.queensu.ca (Duncan Murdoch)
Subject: Re: Performance questions
Organization: Queen's University
Date: Tue, 12 Jan 1993 02:09:32 GMT

In article <07JAN93.21000832.0034@music.mus.polymtl.ca> Steph <CT80@music.mus.polymtl.ca> writes:

>1) I have seen often in 'C programs big functions separated in their
>   own .C file, to make their own separate .OBJ file.  If I were to
>   do this in PASCAL, implementing one function per .TPU, would there
>   be any performance lags _at run time_?

Yes, there'd be a performance lag, because you wouldn't have any near 
calls.  Unless you turn it off, procedures local to a unit use the near call 
model.  (Interfaced procedures are called by a PUSH CS and a near call, but 
use a far return.)  You could use include files and still have one procedure 
per file without incurring any penalty other than slower compiles.

BTW, one reason people would choose one procedure per file is to deal with 
dumb linkers that link things on an .OBJ by .OBJ basis; since the TP linker 
works on a procedure by procedure basis anyways, it's not necessary there.  

>  reset(datafile, 1);
>  seek(datafile, random(100) * datasize);
>  blockread(datafile, data, datasize, bytesread);

>(**** example two *****)

>  reset(datafile, datasize);
>  seek(datafile, random(100));
>  blockread(datafile, data, 1, records_read);

>All I want to know if there is a difference, in _disk access_
>between the two cases.  

No difference.  The record size is purely a TP concept.  DOS doesn't get 
told about it. 

Duncan Murdoch
From: ts@uwasa.fi (Timo Salmi)
Newsgroups: comp.lang.pascal
Subject: Re: Changing from hidden to UNHIDDEN
Date: 11 Jan 93 16:36:39 GMT
Organization: University of Vaasa, Finland

In article <usgcjsx.726767662@gsusgi1.gsu.edu> usgcjsx@gsusgi2.gsu.edu (Craig_J_Stadler) writes:
>How does one go about changing a file attribute
>from hidden to unhidden using SetFAttr ?

I know that it is too easy and even unproductive to say this, but
you really should first take a look at your TP manuals.  It is rigth
in there at the very keyword.

[25 lines of sig deleted]

   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
From: OLDENHUIS@ib.agro.nl (Roelof Oldenhuis)
Newsgroups: comp.lang.pascal
Subject: complex numbers
Date: 5 Jan 93 16:17:26 GMT

Hello,

Maybe it's a FAQ, but I couldn't find anything about this subject:
Is it possible to calculate with complex numbers in Pascal?
I know TP has no standard procedures or functions for complex analysis 
problems (Fortran does), but are there units or sets of functions/procedures 
available to do this kind of mathematics?

Thanks in advance,

Roelof Oldenhuis,      internet: oldenhuis@ib.agro.nl
From: tcscs!zeta@src.honeywell.com (Gregory Youngblood)
Newsgroups: comp.lang.pascal
Subject: Looking for books for windows programming
Date: Sat, 09 Jan 93 18:56:18 CST
Reply-To: zeta%tcscs@src.honeywell.com
Organization: TCS Consulting Services

I'd like to find a pascal programming book for programming windows apps.

I have bp7 and would like to use it to its fullest abilities.  Thanks

Greg

.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.
.   TCS Consulting Services   P.O. Box 600008   St. Paul, MN  55106-0008    .
.   ..!srcsip!tcscs!zeta                 ..!src.honeywell.com!tcscs!zeta    .
.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.-=-.