HP3000-L Archives

December 2005, Week 3

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
"Dave Powell, MMfab" <[log in to unmask]>
Reply To:
Dave Powell, MMfab
Date:
Tue, 20 Dec 2005 13:11:12 -0800
Content-Type:
text/plain
Parts/Attachments:
text/plain (275 lines)
Pretty sure the 2626A also had the 4 windows.... and two data-comm ports.


Waaaay back in early 1982 (?) we used this for a quick & dirty file transfer
when we
needed to bring in some data files from remote site whose computer couldn't
write any physical media we could read.  One of the other programmers wrote a
pair of Cobol programs two transfer files between two local HP3000s, then the
remote site translated the sender program into their basic, and one night we
dialed in to their system, ran them, and it actually worked (!)

The sender program would write some data to the terminal, issue an escape
sequence to change port and workspace, and pause.  The reciever would grab the
workspace where the data was, issue escape sequences to transfer the data on
the screen back to the HP, then switch back.  I still have the source code.

Dave Powell,  MMfab

----- Original Message ----- 
From: "Johnson, Tracy" <[log in to unmask]>
To: <[log in to unmask]>
Sent: Tuesday, December 20, 2005 08:30
Subject: Re: [HP3000-L] looking for a couple of files


The 2626W was the "funniest" behaving of the "ET" type terminals.

It could scroll left and right.

It could be configured up into four mini-screens.  We would call them
"windows" today.  Only one "window" could communicate at a time however.

Tracy Johnson
Measurement Specialties, Inc.

BT







NNNN


> -----Original Message-----
> From: HP-3000 Systems Discussion
> [mailto:[log in to unmask]] On Behalf Of Glenn Mitchell
> Sent: Tuesday, December 20, 2005 9:47 AM
> To: [log in to unmask]
> Subject: Re: [HP3000-L] looking for a couple of files
>
>
> From the HP Museum
> (http://www.hpmuseum.net/display_item.php?hw=242):
>
> "The 2626W was introduced in 1982 at $4950 specifically as a
> word processing terminal running HPWORD off of 3000 systems.
> The 2626W had 64K of local RAM to hold documents and free the
> central CPU."
>
> Glenn Mitchell
> 3GM Associates, Inc.
>
>
>
> -----Original Message-----
> From: HP-3000 Systems Discussion
> [mailto:[log in to unmask]] On Behalf Of Bob Comeau
> Sent: Tuesday, December 20, 2005 8:52 AM
> To: [log in to unmask]
> Subject: Re: [HP3000-L] looking for a couple of files
>
> As the code mentions, the terminal it supports was the 2626,
> specifically the 2626A I think.  We only ever had one of
> these way back when.  They were a rather pricey item at the
> time.  It also had the ability to have the screen divided up
> into 4 'windows'.
>
> There was a 2626W version which was used with the early word
> processing program available on the HP whose name escapes me,
> we didn't have that.
>
> I had written a simple keystroke capture program which mapped
> nearly all the keys on the keyboard to one of the 16 values
> for the tone parm in the escape sequence.  It kept my son
> busy while I did weekend maintenance on the system.
>
> We're stretching the memory cells now...
>
> Bob Comeau
> Sr. Systems Programmer Analyst
> Crossley Carpet Mills Ltd.
> (902)895-5491 ex 139
>
>
> -----Original Message-----
> From: HP-3000 Systems Discussion
> [mailto:[log in to unmask]]On Behalf Of Miller, Keven
> Sent: December 20, 2005 9:36 AM
> To: [log in to unmask]
> Subject: Re: looking for a couple of files
>
>
> Simpkins, Terry wrote:
>  > Years ago, when I was a programmer (and dinosaurs ruled
> the earth), at  > HP in Boise, we created some songs that
> would play on  > the old HP terminals (HP2645, HP2624, etc).  >
>  > These files were a series of bells driven by escape
> sequences.   As I
>  > recall you could get a little over an octive range on
> those  > terminals.  >
>
> Ever since I found this on CSL ("MUSIC") I have wanted to
> test it. But I have never come across any documentation or
> terminal that supported this escape sequence  <esc>&t#d#v#F .
> I have a user manual for the HP2626A/W, but its not mentioned
> in there.
>
> Anyway, here is MUSIC.DOC, the MUSIC.SOURCE, in basic.
>
> Terry, if you happen to find and "song" files, I would like
> to view a few of them.
>
> Keven
>
>
> MUSIC.DOC
>             *************************************
>             !                                   !
>             !               MUSIC               !
>             !                                   !
>             *************************************
>
>                 VERSION 1.0    FEB. 9, 1983
>
>
>              CONTACT:  GERALD L. OTTERBEIN
>                        THE YOUNG INDUSTRIES CO., INC.
>                        PAINTER ST.
>                        MUNCY, PA.    17756
>                        717/546-3165
>
>
>
>              SYSTEM   3000 SERIES 30, MPE IV C.L0.C3
>
>              CLASSIFICATION 910 General Demonstrations
>
>
>              LANGUAGE    BASIC
>
>
>
>       This program will play music automatically, or allow you to
>   compose your own tunes utilizing the tone generator in the 2626
>   terminal. The program is self-documenting.
>
>
>
>
> MUSIC.BAS
> MUSIC
>     10 DIM A$[16],B$[250],T$[5],D$[5],V$[5]
>     18 PRINT "MUSIC <02.01> GLO Young Inds., Muncy, Pa. 17756"
>     19 PRINT "  "
>     20 INPUT "1 = MANUAL INPUT, 2 = AUTOMATIC",K
>     30 IF K=2 THEN DO
>     40   INPUT "1=Aura Lee, 2=Bautiful Dreamer, 3=Do Re Me",G
>     50   READ B$
>     60   IF G=1 THEN 100
>     70   READ B$
>     80   IF G=2 THEN 100
>     90   READ B$
>    100   GOTO 400
>    110 DOEND
>    120 LET D=14
>    130 LET V=0
>    140 PRINT "                                                      0"
>    150 PRINT
> "---------------------------------------------------0-----"
>    160 PRINT "                                                0"
>    170 PRINT
> "---------------------------------------------0-----------"
>    180 PRINT "                                          0"
>    190 PRINT
> "---------------------------------------0-----------------"
>    200 PRINT "                                    0"
>    210 PRINT
> "-----------------------------0--#0-----------------------"
>    220 PRINT "                          0"
>    230 PRINT
> "-----------------------0---------------------------------"
>    240 PRINT "                    0"
>    250 PRINT "               --0--"
>    260 PRINT "              0"
>    270 PRINT "         --0--"
>    280 PRINT "           a  b  c  d  e  f  g  #q  A  B  C  D
> E  F  G "
>    290 PRINT &
>       "Code: 0=Whole note, 1= 1/2 note, 2= 1/4 note, 3= 1/8
> note, 4= 1/1& 6 note"
>    300 PRINT "Volume code is:  < = soft,  > = loud"
>    310 PRINT "Eg:  A2<f1>"
>    320 PRINT "     |||"
>    330 PRINT "     ||L__volume"
>    340 PRINT "     ||"
>    350 PRINT "     |L__ duration"
>    360 PRINT "     |"
>    370 PRINT "     L__frequency"
>    380 PRINT &
>       "Enter notes optionally followed by code; terminate with -X-"
>    390 INPUT B$
>    400 PRINT CTL(208);'27;";"
>    410 A$="abcdefgqABCDEFGH"
>    420 LET D=12
>    430 FOR I=1 TO 250
>    440   X=POS(A$,B$[I;1])-1
>    450   IF B$[I;1]="X" THEN 600
>    460   IF X=-1 THEN 590
>    470   CONVERT X TO T$
>    480   J=I+1
>    490   IF B$[J;1]="0" THEN D=14
>    500   IF B$[J;1]="1" THEN D=10
>    510   IF B$[J;1]="2" THEN D=8
>    520   IF B$[J;1]="3" THEN D=6
>    530   IF B$[J;1]="4" THEN D=4
>    540   CONVERT D TO D$
>    550   J=I+2
>    560   IF B$[J;1]="<" THEN V=0
>    570   IF B$[J;1]=">" THEN V=1
>    580   PRINT CTL(208);'27;"&t";D$;"d";V;"v";T$;"F";
>    590 NEXT I
>    600 PRINT CTL(208);'27;":"
>    610 INPUT "DO YOU WANT TO RUN AGAIN ?",R$
>    620 IF R$="N" THEN 650
>    630 RESTORE
>    640 GOTO 20
>    650 STOP
>    660 REM ~~~~~~~~~~~~~~~~~~~  AURA LEE
> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
>    670 DATA "g0<CBCDADHCBABCCX"
>    680 REM
> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
>    690 REM **********************  BEAUTIFUL DREAMER
> ******************
>    700 DATA "F1>EFC0<AHI>g1fgDH3C0E1DDCBBAgAX"
>    710 REM
> **************************************************************
>    720 REM +++++++++++++++++++  DO RE ME SONG
> ++++++++++++++++++++++++++
>    730 DATA &
>
> "e0<f1g0e2g1e2g0H0f0g3A2A2g2f2A0H0g0A1B0g2B1g2B0H0A0B3C2C2B2A2C0X"
>    740 REM
> ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
>  >
>
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
>
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
>
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
>

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2