HDTenEightyP/NetNews huggingface dataset:
From: williams@ab.wvnet.edu (Tom Williams)
Newsgroups: vmsnet.tpu,comp.editors
Subject: Re: edt emulation
Date: 11 Nov 92 18:19:49 GMT
Article-I.D.: ab.1992Nov11.231949.693
Organization: Alderson-Broaddus College

> I see no
> reason to have the user insert the search string into the buffer, only to yank
> it back out to the paste buffer destroying what is there.  This really sounds
> like a kludge to me which I do not want to duplicate.  
> 

          Agreed.  I have been an EDT user for about 10 years now.
          (Does that give me extra votes? :-) )  The first thing I did
          was redefine Gold/Enter to be the nokeypad mode command

          	"(S/?'Old string: '/?'  New string: '/)."

          A couple of subtleties worth emulating: Search commands
          perform an implicit SELECT (Set Mark) operation on the
          search string if it's found, allowing the user to do a CUT
          operation on it.  Also, the change case (Gold-KP1) command
          acts on either select range or, if no select range is
          defined, the current character.  

-- 

                                                -Tom Williams
                                                 Computer Center Manager
                                                 Alderson-Broaddus College
                                                 WILLIAMS@AB.WVNET.EDU
Newsgroups: vmsnet.tpu
From: sharone@shar.zko.dec.com (Sharon Eikenberry)
Subject: Re: LSE's GOTO PLACEHOLDER jumping over pseudocodes
Reply-To: sharone@shar.zko.dec.com (Sharon Eikenberry)
Organization: Digital Equipment Corporation
Date: Wed, 11 Nov 1992 17:38:50 GMT


Do you have pseudocode delimiters defined in your language definition?
(SHOW LANGUAGE)

--Sharon Eikenberry			! eikenberry@tle.enet.dec.com
  LSE Developer
  Digital Equipment Corporation
  
  Opinions are my own.
From: ht@datani.dk
Newsgroups: vmsnet.tpu
Subject: Re: Procedure to matchup (){}[]  ???
Date: 11 Nov 92 07:58:50 GMT
Organization: Datani A/S, Copenhagen, Denmark

In article <1992Nov8.053543.383@wsuhub.uc.twsu.edu>, ldgiltne@wsuhub.uc.twsu.edu (Lawrence Giltner) writes:
> Before I spend a lot of time reinventing the wheel:
> 
> Does anybody have a procedure to pair up parenthesis, brackets, and
> braces.  I would like to put the cursor on one of ()[]{} and let the
> program figure out which direction it has to search and if found, then
> marks/selects all the text between them, including the ()[]{}.
I have one that finds the corresponding paren, brac. or whatever, but it does
not select the text between - mind you that is easy: just press select
before you find the matching thingymagig.

---------
procedure find_bracket
local
  cur_ch,
  this_ch,
  br_list,
  br_num,
  pat,
  level,
  here,
  there,
  direction;

  cur_ch := get_info(get_info(BUFFER, 'current'), 'character');
  br_list := "()[]{}<>+;!!??";
  br_num := INDEX(br_list, cur_ch);

  if br_num = 0
  then
    MESSAGE ("Not on a bracket");
  else
    br_num := ((br_num+1)/2)*2 -1;
    if br_num = INDEX(br_list, cur_ch)
    then
      direction:= FORWARD;
    else
      direction:= REVERSE;
    endif;

    pat := ANY(SUBSTR(br_list, br_num, 2));
    level := 1;
    here := mark(NONE);

    loop
      if direction = FORWARD
      then
        move_horizontal(1);
      else
        move_horizontal(-1);
      endif;
      there := search_quietly(pat, direction);
      exitif there = 0;      
      position(there);
      this_ch := get_info(get_info(BUFFER, 'current'), 'character');
      if this_ch = cur_ch
      then
          level := level + 1;
      else
          level := level - 1;
      endif;                               
      exitif level = 0;
    endloop;
    if there = 0 then
      position(here);
      message ("Matching bracket not found");
    endif;
  endif;
endprocedure

---
compile it and bind it to a key of your choice.
---
Henrik Tougaard             Postmaster, News-Reader and general dogsbody
Datani A/S, Software Consultants
Copenhagen, Denmark         Only my own opinions........
Newsgroups: vmsnet.tpu
From: res_ewv@exodus.valpo.edu
Subject: Kept Eve
Organization: Valparaiso University
Date: Sun, 8 Nov 1992 17:16:25 GMT
X-Posted-From: exodus.valpo.edu
NNTP-Posting-Host: sol.ctr.columbia.edu

Greetings,

Some of you out there I know use a kept TPU editor which only needs to
be started up once per session.  Could someone please send me
instructions on how to do this?  Thanks.


                                                                               
                              Eric W. Vaandering                               
  ____________________________________________________________________________ 
 |BITNet:    RES_EWV@VALPO                    USPS Net:  Eric Vaandering      |
 |InterNet:  RES_EWV@exodus.valpo.edu                    Brandt Hall          |
 |PhoneNet:  (219) 464-5868                              Valparaiso, IN 46383 |
 |____________________________________________________________________________|
 |  Science:  Any discipline in which the fool of this generation can go      |
 |            beyond the genius of the last generation.                       |
 |____________________________________________________________________________|
Newsgroups: vmsnet.tpu
From: mccarthy@evetpu.enet.dec.com (Brian J. McCarthy)
Subject: Re: Need help with binding keys.
Organization: Digital Equipment Corporation
Date: Fri, 13 Nov 1992 11:33:59 GMT


In article <1992Nov11.184228.1@exodus.valpo.edu>, res_ewv@exodus.valpo.edu writes...
>Hello again
> 
>I now have EVE up and running as a kept editor, but I want to be able to
>redefine the CTRL-Z key to now do a WRITE and an ATTACH back to the calling
>process.  I can write a procedure to do both of these things, but I am having
>big problems binding the key to do this.  I am using the line in the TPU code
>DEFINE_KEY(procedure,CTRL_Z_KEY).  I get no error messages at all.  
> 
>Perhaps my problem is that the code is never being reached.  I am placing this
>in the EVE_ATTACH procedure.  This should get executed everytime EVE is called,
>correct?
> 
> 
>                                                                               
>                              Eric W. Vaandering                               

Put your key definition in a tpu$local_init procedure.  The following code
redefines CTRL/Z when I bring up the Motif interface of EVE, which I leave
running most of the time.  Since I use the CCT interface for News, VAXNotes,
VAXMail and several other things I can not break of the habbit of using it from
my "work" editor.

Note that this procedure references some V3.1 features of DECTPU and EVE 
multiple input files, generate buffer names...

procedure tpu$local_init
on_error
    [otherwise] :
	quit (off, 2);
endon_error;

    eve_set_keypad_edt;
    eve_set_scroll_margins ("15%","15%");
    eve$add_word_separators ("$!+%@(){}[]|\?/,;:=<>");
    eve$x_get_wild_active := true;	! read in multiple files

    eve$x_generate_bufnames := true;	! gen unique buf names
    !
    ! Override the ctrlz key in DECwindows not to exit unless I SHIFT it
    !
    if get_info (SCREEN, "decwindows") 
    then
    	define_key ('eve_do("")',  ctrl_z_key, 'Do');
    	define_key ('eve_exit',  key_name (ctrl_z_key, shift_modified), 
	'Exit');
    endif;

--------------------------------------------------------------------------------
Brian J. McCarthy 				Digital Equimpment Corp.
DECtpu/EVE Development Project Leader		Nashau, NH
--------------------------------------------------------------------------------
Newsgroups: vmsnet.tpu
From: fairfield@slacvx.slac.stanford.edu
Subject: Re: Procedure to matchup (){}[]  ???
Organization: Stanford Linear Accelerator Center
Date: Wed, 11 Nov 1992 18:31:09 GMT

In article <DAVIS.92Nov11085239@pacific.mps.ohio-state.edu>, davis@pacific.mps.ohio-state.edu ("John E. Davis") writes:
> While these procedures that have been posted may work fine for most purposes,
> I do not think they will as expected work for:
>
> if ((ch == ')') || (ch == '('))
>   {...}
>
> Does anyone have one that works properly for this case?  If so, does it also
> work for this:
>
> if ((ch == '\'') || (ch == '\\'))
>   {...}

    The EVE_MATCH_DELIMITORS I posted early last week works correctly in
matching the parentheses (you didn't say WHAT you thought the unexpected
behaviour to be) for the _second_ case (perhaps you ought to _try_ the
procedures rather than just guessing :-), but the first case is tougher
because there's an "extra" copy of the delimiter you're trying to match
within a quoted string.

    I believe you're be asking the MATCH procedure to know a given
language's syntax for "quoting" a string, and to ignore  delimiters
embedded within those strings.  I can think of ways to do that, but I can
imagine more cases of it making the _wrong_ choice rather than the right
one... You basically have to search the WHOLE buffer to see if you're
within a (language-specific-syntax) quoted string.  I wouldn't want to
attempt that, I'd rather let the compiler catch _those_ cases...  "Operator
intervention" in the relatively infrequent cases, like your first example,
shouldn't be to ask :-)

    		-Ken
--
 Dr. Kenneth H. Fairfield    |  Internet: Fairfield@Slac.Stanford.Edu
 SLAC, P.O.Box 4349, MS 98   |  DECnet:   45537::FAIRFIELD (45537=SLACVX)
 Stanford, CA   94309        |  BITNET    Fairfield@Slacvx
 ----------------------------------------------------------------------------
 These opinions are mine, not SLAC's, Stanford's, nor the DOE's...
From: williams@ab.wvnet.edu
Newsgroups: vmsnet.tpu
Subject: ^U versus ^X
Date: 10 Nov 92 13:13:41 GMT
Reply-To: williams@ab.wvnet.edu
Organization: The Internet
Return-Path: <TPU-Mgr@SHSU.edu>
Errors-To: TPU-Mgr@SHSU.edu
X-Listname: Text Processing Utility (TPU) Language Discussion List
Return-Path: <!ab.wvnet.edu!williams@mccall.uucp>
Resent-Message-ID: <9211102217.AA06954@depot.cis.ksu.edu>
Resent-Date: Tue, 10 Nov 1992 16:12:15 CST
Resent-From: info-tpu-newsgate@mccall.com
Resent-To: info-tpu@shsu.edu
X-Envelope-To: info-tpu-newsgate@mccall.uucp
X-Vms-To: NET::"info-tpu-newsgate@mccall.uucp"
X-Vms-Cc: ME
Mime-Version: 1.0
Content-Transfer-Encoding: 7BIT

> From: WVNET::IN%"ldgiltne@wsuhub.uc.twsu.edu" 10-NOV-1992 00:17:59.38
> Subj: Problems with SET GOLD KEY
>
> I have all the Ctrl keys defined that were not
> "reserved" by TPU or VMS.

          ...And a few that *are* reserved by VMS.  See below.

>
> Both Ctrl-X and Ctrl-U acted as gold keys.
> Are these two keys tied together somehow?

          Yes.

          The VMS terminal driver uses ^U as an 'Un-type this line'
          key -- it deletes to the beginning of the line.

          ^X is a little more subtle:  DEC uses ^X for the 'clear
          *all* pending input' key.  If there is input in the
          type-ahead buffer, it is cleared.  If there is nothing in
          the type-ahead buffer, then the terminal driver treats ^X as
          if it were ^U.

          As a matter of fact, when you press ^X, TPU will not see it.
          The terminal driver will pass a ^U to TPU.  For proof, use
          the EVE command SHOW KEY, and press ^X.  You will be told
          that "CTRL/U is defined as blah blah blah".

          All of this is on the assumption that you have a
          more-or-less normal terminal setup.  I suspect that if you
          are running in PASTHRU or PASSALL mode (don't attempt this
          at home :-), the ^X will be passed as is.

          I hope this helps....

                                                -Tom Williams
                                                 Computer Center Manager
                                                 Alderson-Broaddus College
                                                 WILLIAMS@AB.WVNET.EDU
Newsgroups: vmsnet.tpu
From: res_ewv@exodus.valpo.edu
Subject: Need help with binding keys.
Organization: Valparaiso University
Date: Thu, 12 Nov 1992 00:42:28 GMT
X-Posted-From: exodus.valpo.edu
NNTP-Posting-Host: sol.ctr.columbia.edu

Hello again

I now have EVE up and running as a kept editor, but I want to be able to
redefine the CTRL-Z key to now do a WRITE and an ATTACH back to the calling
process.  I can write a procedure to do both of these things, but I am having
big problems binding the key to do this.  I am using the line in the TPU code
DEFINE_KEY(procedure,CTRL_Z_KEY).  I get no error messages at all.  

Perhaps my problem is that the code is never being reached.  I am placing this
in the EVE_ATTACH procedure.  This should get executed everytime EVE is called,
correct?


                                                                               
                              Eric W. Vaandering                               
  ____________________________________________________________________________ 
 |BITNet:    RES_EWV@VALPO                    USPS Net:  Eric Vaandering      |
 |InterNet:  RES_EWV@exodus.valpo.edu                    Brandt Hall          |
 |PhoneNet:  (219) 464-5868                              Valparaiso, IN 46383 |
 |____________________________________________________________________________|
 |                                                                            |
 |  What I said back then -- well, it's hard to find.  Number one, I          |
 |  didn't say it.                                                            |
 |                  -- George Bush, on calling Reagan's policies              |
 |                     ``voodoo economics'' during the 1980 primaries.        |
 |                     NBC rebroadcast the tape.                              |
 |____________________________________________________________________________|
Newsgroups: vmsnet.tpu
From: davis@pacific.mps.ohio-state.edu ("John E. Davis")
Subject: Re: Procedure to matchup (){}[]  ???
Reply-To: davis@pacific.mps.ohio-state.edu  (John E. Davis)
Organization: "Dept. of Physics, The Ohio State University"
Date: Wed, 11 Nov 1992 13:54:34 GMT

While these procedures that have been posted may work fine for most purposes,
I do not think they will work as expected for:

if ((ch == ')') || (ch == '('))
  {...}

Does anyone have one that works properly for this case?  If so, does it also
work for this:

if ((ch == '\'') || (ch == '\\'))
  {...}

--
     _____________
#___/John E. Davis\_________________________________________________________
#
# internet: davis@amy.tch.harvard.edu
#   bitnet: davis@ohstpy
#   office: 617-735-6746
#
Newsgroups: vmsnet.tpu
Subject: Procedure to matchup (){}[]  ???
From: ldgiltne@wsuhub.uc.twsu.edu (Lawrence Giltner)
Date: 8 Nov 92 05:35:43 CST
Organization: Wichita State University, Wichita, Ks

Before I spend a lot of time reinventing the wheel:

Does anybody have a procedure to pair up parenthesis, brackets, and
braces.  I would like to put the cursor on one of ()[]{} and let the
program figure out which direction it has to search and if found, then
marks/selects all the text between them, including the ()[]{}.

Is there a TPU procedure for this?   TPU v2.6 on VMS v5.5.

I wrote a procedure like this for VDE and would like the same
convenience.

   main.frame (man'fram'), n. the largest peripheral you can attach to a PC.
   Of course these are my opinions, you'll have to go out and buy your own!
 VAX Internet  ldgiltne@wsuhub.uc.twsu.edu   VAX BITNET  ldgiltne at twsuvax
                Wichita State University   Wichita, Kansas,  U.S.A.
Newsgroups: vmsnet.tpu
From: davis@pacific.mps.ohio-state.edu ("John E. Davis")
Subject: Re: Control keys and EDIT/TPU
Reply-To: davis@pacific.mps.ohio-state.edu  (John E. Davis)
Organization: "Dept. of Physics, The Ohio State University"
Date: Thu, 5 Nov 1992 21:40:52 GMT

What would be really nice is to have a procedure, say assign_key that when
invoked as:

     assign_key("^A ^VERY ^LONG ^KEY_SEQUENCE", function)

will build the appropriate keymap/tree structure.  To my knowledge, EVE/TPU
does not have this.      
--
     _____________
#___/John E. Davis\_________________________________________________________
#
# internet: davis@amy.tch.harvard.edu
#   bitnet: davis@ohstpy
#   office: 617-735-6746
#
From: brodie@fps.mcw.edu
Newsgroups: vmsnet.admin
Subject: need VMSNET checkgroups list
Date: 9 Nov 92 09:31:04 CST
Organization: Medical College of Wisconsin,  Milwaukee, WI

Can someone please post the latest vmsnet checkgroups list...?
Much thanks.
-- 
Kent C. Brodie - Sr. Systems & Network Manager	 InterNet:  brodie@fps.mcw.edu
Faculty Physicians & Surgeons			 uucpNet:   fps.mcw.edu!brodie
Medical College of Wisconsin			 MaBellNet: +1 414 266 5080

begin 700 sig.file
M+BYW:&%T(&1I9"!Y;W4@97AP96-T(&9O<B!A('1W;RUL:6YE('5U96YC;V1E
?9"!F:6QE+"!A(&-O;&]R('!I8W1U<F4_(" Z+2D@("UL
 
end
Newsgroups: vmsnet.admin
Subject: Re: vmsnet.decus.journal - new group request
From: tp@mccall.com (Terry Poot)
Date: Tue, 10 Nov 1992 09:31:47 CST
Reply-To: tp@mccall.com (Terry Poot)
Organization: The McCall Pattern Co., Manhattan, KS, USA
Nntp-Posting-User: tp


OK, nobody has complained about the group or the name. As soon as Don or whoever
will be the moderator provides me the info I need, I'll do it. 
--
Terry Poot <tp@mccall.com>                   The McCall Pattern Company
(uucp: ...!rutgers!depot!mccall!tp)          615 McCall Road
(800)255-2762, in KS (913)776-4041           Manhattan, KS 66502, USA
Newsgroups: vmsnet.admin
Subject: Re: vmsnet.decus.journal - new group request
From: rewise@musctn.monsanto.com (Richard Wiseman - VAX/VMS CraftsPerson)
Date: 7 Nov 92 00:42:41 GMT
Nntp-Posting-User: drboll

In article <1992Nov2.130646@mccall.com>, tp@mccall.com (Terry Poot) writes:
> 
> In article <1992Oct27.110112.1017@beckman.com>, dsroberts@beckman.com writes:
>>So I would like to ask that a newsgroup called
>>
>>vmsnet.decus.journal
>>
>>be created for this purpose.  We would like it moderated so that any replies
>>can be processed by the journal editor before posting to the newsgroup.
> 
> This sounds perfectly acceptable to me. (Sorry for the delay, I was out of town
> much of last week.)
> 
 one vote FOR the new group...
	as i do not have access to DECUSserv, this would be a great help
to me...

					...rew
-- 
-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
   Richard Wiseman		 VAX-VMS Crafts Person
   MONSANTO	                Internet:  Rewise@musctn.monsanto.com
   RR #5 Wiggins Rd.             Yellnet:  +1 (319)262-7528 or 262-7339
   BOX 473                           FAX:  +1 (319)262-5626
   Muscatine, Ia 52761        Disclaimer:  All opinions are my own, I think
-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
From: aeg03@rrz.uni-koeln.de (Jan T. Kim)
Subject: PamsNet and VMS: Activating the TASK-object
Followup-To: vmsnet.networks.misc
Keywords: PamsNet,TASK-object
Reply-To: kim@vax.mpiz-koeln.mpg.dbp.de
Organization: Regional Computing Center, University of Cologne, F. R. Germany
Date: Thu, 12 Nov 92 13:49:59 GMT

Hi VMS gurus,

a while ago  we  started  networking  our  Atari  computers  with
PamsNet.  We  also  purchased a server program vor VMS for having
the VAX serving its files to the Atari network. This  works  such
that a program is run in a batch queue under the PAMSNET account,
which was created for this purpose. This process waits  for  user
requests  to  access  their  directory.  Upon such a request, the
pamsnet program starts a server process under the account of  the
corresponding user, enabling him to access his/her VAX files over
the Atari network.
However, for this to work properly, it  is  necessary  that  "the
TASK-object  of  VMS  is  activated  for  local  users" (from the
PamsNet manual, translated by me). Could some  kind  soul  please
explain to me what we are supposed to do? Preferrably in the form
of a sequence of commands to type  in,  as  our  knowledge  about
several corners of VMS is very limited.

Followup-To: vmsnet.networks.misc is set.

Thanx in advance,

Greetinx, Jan

 +- Jan Kim -- X.400:    S=kim;OU=vax;O=mpiz-koeln;P=mpg;A=dbp;C=de -+
 |             Internet: kim@vax.mpiz-koeln.mpg.dbp.de               |
 |                                                                   |
 *----=<  hierarchical systems are for files, not for humans  >=-----*
Newsgroups: vmsnet.admin
From: aus@winx03.informatik.uni-wuerzburg.dbp.de (Hans Aus)
Subject: Re: vmsnet.decus.journal - new group request
Organization: University of Wuerzburg, Germany
Date: Tue, 10 Nov 1992 10:19:10 GMT

>>>
>>>vmsnet.decus.journal ??

Yes, me too! I think that this would be a great service for the global
Decus community.

-- 
Hans M Aus, Institute of Virology, University of Wuerzburg, Germany
e-mail: hans.aus@vax.rz.uni-wuerzburg.dbp.de (preferred)
Versbacherstr 7, 8700 Wuerzburg. Fax: Germany +931 201 3934; tel:3954
Newsgroups: gnu.chess
From: ccecks@nuscc.nus.sg (Chua Kong Sian)
Subject: gnuan
Organization: National University of Singapore
Date: Fri, 6 Nov 1992 06:42:56 GMT

I have been playing a bit with gnuan.  In trying to analyze a game, I
set the max_time variable to 10 mins and max-depth to 34.  This is what
I obtained.


Move White Black      Score Depth     Best Line
------------------------------------------------------------------
  1   e4*               13    8    g1f3  g8f6  b1c3  e7e6  e2e4  f8b4  e4e5  f6g4             
            e5*      -12000    1   
  2   Nf3*           -12000    1        
            Nc6*     -12000    1   

Bad move.  Bb5  Board position is: 

 R N B Q K B N R
 P P P P P P P P
 - - - - - - - -
 - - - - - - - -
 - - - - - - - -
 - - - - - - - -
 p p p p p p p p
 r n b q k b n r


           White's percentage was  0.00%.     Black's percentage was  0.00%.

           Elapsed time was 601 seconds.

The board position is not updated at all.  This does not happen when I
set the value of max_time to 5 mins.  In that case the whole analysis
went fine.  Looks like a bug, and my feeling is that an out of array
bound condition is causing gnuan to behave in this manner.  Any clues
anyone?

On another issue, I didn't like the fact that gnuan did not use the book
to screen out book moves from its analysis, so I have modified it to
skip moves that can be found in the book.  Unfortunately, Stuart
has mentioned that the next patch release with involve a book with a
million positions.  Obviously, the book entry list will have to be
redesigned and my addition to gnuan will no longer work.  Wonder if
there is anyway this addition could be incorporated into pl 60.  Stuart?


Newsgroups: gnu.chess
From: tmoody@sju.edu (T. Moody)
Subject: Reinventing the wheel
Organization: St. Joseph's University
Distribution: gnu
Date: Wed, 11 Nov 1992 02:48:57 GMT


Since I have been unable to get gnuchess to run on my feeble old 8088
machine, I have decided to write my own chess program.  Okay, it's not
exactly for that reason; I thought it would be an interesting thing to
try.  I am not a programmer; just a hobbyist who has taught himself
Turbo Pascal.

I was right.  It is very interesting.  I soon discovered that the
apparently trivial procedure of creating a list of legal moves from a
given position is not so trivial, when one considers the possibility of
pinned pieces and discovered checks.  However, I have solved that
problem and can generate lists of legal moves from a given position.

What I am having trouble with is conceptualizing the routine for finding
a good move at a given ply depth.  The minimax thing, while conceptually
easy to understand, is elusive as an algorithm.  Also, I note that other
programs seem to *finish* searching at a given depth before starting to
examine the next ply, whereas to me the most comprehensible approach is
to use nested loops to search depth-first.

I think I need some hints.  I presume that all of these matters are well
hashed out in print somewhere.  Can anyone recommend a
not-too-forbidding book on the subject?

Thanks.

-- 
Todd Moody * tmoody@sju.edu  (That's St. Joseph's Univ., Philosophy Dept.)
            "In what furnace was thy brain?"  -- William Blake