PCjs Machines

Home of the original IBM PC emulator for browsers.

Logo

PC-SIG Diskette Library (Disk #115)

[PCjs Machine "ibm5150"]

Waiting for machine "ibm5150" to load....

Information about “DOS UTILITIES NO 6”

The programs on this disk include a very handy file-compression utility,
another to suppress the color signal when using a mono monitor, a very
interesting wave-form drawing utility (requires an 8087 chip),
and other useful programs.

System Requirements: Some programs require color graphics & BASIC.

How to Start: To run a COM or EXE program simply type its name and
press <ENTER>.  For instructions on running BASIC programs, please
refer to the GETTING STARTED section in this catalog.  To read DOC
files simply enter TYPE filename.ext and press <ENTER>.

Suggested Registration:  Contact authors.

File Descriptions:

DSKHND   BAS  Disk handler program from October Softalk
123KEY   DOC  Documentation file for 123KEY.PRO
123KEY   BAT  Batch file to run LOTUS 123 with PROKEY
123KEY   PRO  PROKEY file to enable numeric keypad with LOTUS 123
DHDEMO   BAS  Demo program for DSKHND.BAS
NOCOLOR  ASM  Suppress color for using mono monitor on C/G adapter
FREE     DOC  Catalog of user-supported software
SURF87   EXE  Produces wave forms on graphics printer  (Requires 8087)
SURF87   DOC  Documentation file for SURF87.EXE
SURFPR   BAS  Printer installation program for SURF87.EXE
SQUEEZE  EXE  File compression program
UNSQUEEZ EXE  Uncompress program
SQUSQ    DOC  Documentation file for SQUEEZ.EXE and UNSQUZ.EXE
NOCOLOR  COM  Executable program file
SCROLL   BAS  Scroll window program from PC Magazine, Oct 83, page 650
NOCOLOR  DOC  Documentation file for NOCOLOR.COM
PINUP?   PIC  Pinup picture;  COPY to LPT1:  (4 files)

123KEY.DOC

          PROKEY SUBSET FOR 1-2-3        [123KEY.DOC]
          -----------------------
In order for Prokey to work with a 123 spreadsheet, certain
setups are required.  First, the 123 system disk must contain
the files PROKEY.EXE (the main PROKEY tm. program) as well as
the file 123KEY.PRO which is the file that contains all the
custom key assignments to be used while in 1-2-3.

An additional third file may be included 123KEY.BAT (may be
re-named Autoexec.bat).  This file installs prokey and the keys
before it calls in the main 1-2-3 program.
     [123KEY.BAT]=  PROKEY/R 123KEY.PRO
                    123
                    ^Z
Upon boot-up the PROKEYS for 1-2-3 will be loaded into high
memory and will be invisible to the user until called.

One additional set-up is required on each new spreadsheet that
is started.  Because of the way 1-2-3 defines certain of the
function keys, it is necessary to inbed the definitions some
where in a group of isolated spreadsheet cells.  In doing so
you will cause PROKEY to interact with the 1-2-3 typing alternative.

The result is to move the functions STEP NAME ABS QUERY TABLE CALC GRAPH
from their respective keys F3 F4 F7 F8 F9 F10 to their new assignments
respectively altF3 altF4 altF7 altF8 altF9 altF10.

The move is to allow the re-assignment of those function keys as follows:
         F3   becomes HOME
         F4   becomes END
         F7   becomes the UP arrow
         F8   becomes the DOWN arrow
         F9   becomes the LEFT arrow
        F10   becomes the RIGHT arrow

You may now leave your NumLock key on and use the keypad as a
numeric keypad.  As stated above this requires a ONE-TIME-ONLY
setup on EACH NEW spreadsheet.  The setup is an automatic feature
built into the Prokey set loaded by the first step.  To use the
setup feature do this:

****  AFTER YOU HAVE CALLED IN A NEW SHEET OR CLEARDED THE       ****
****  OLD SHEET TO BUILD A NEW ONE, PRESS altF2  .               ****

      AltF2 moves the cursor to Cell position BA1 and writes
      cells that 1-2-3 's typing alternative will use in
      re-defining the keypad.  If this group of cells at
      BA1 is going to interfere with the spreadsheet, you
      may change their location by useing the 1-2-3 MOVE
      command to move the group to another section of the sheet.
      Or if you can change the prokey 123PRO.KEY file to have
      another beginning cell in place of BA1 (To do this pull
      up 123PRO.KEY with an editor and find BA1, change it!).

      Each cell in this special group has a range name and they
      remain the same in a 1-2-3 move. It is these names that
      the typing alternative uses in looking for those cells.






               |------|------|
               | HELP |EDIT  |
               |      |      |
               |  alt | alt  |                Print this template on an
               | step |setup |                Epson or Epson-like printer
               |------|------|                in the compressed print mode.
               | HOME |END   |
               |      |      |                then draw the arrows in the
               |  alt |alt   |                bottom four boxes as follows:
               | name |abs   |
               |------|------|
               |      |      |
               | GOTO |WINDOW|
               |      |      |
               |------|------|
               | /|\  |  |   |
               |  |   | \|/  |                    up           down
               |  alt |alt   |
               |query |table |
               |------|------|                   left          right
               | /___ | ___\ |
               | \    |    / |
               |  alt |alt   |                  Now tape this to your 1-2-3
               | calc |graph |                  plastic template.
               |______|______|


To use this you need to own PROKEY and download three files to put on your
1-2-3 system disk.  They are as follows : [123KEY.DOC]=this explanation
[123KEY.PRO]=the prokey definition file   [123KEY.BAT]=the new 123 autoexec.bat


CRC.TXT

PC-SIG Disk No. #115, version v1

The following is a list of the file checksums which should be produced by
the CRCK4 program on disk #9 (and others).  If the CRC numbers do not match
you may have a bad file.  To use type:  CRCK4 <filespec>

CRCK4 output for this disk:


CRCK ver 4.2B (MS DOS VERSION )
CTL-S pauses, CTL-C aborts

--> FILE:  123KEY  .BAT         CRC = 00 00

--> FILE:  123KEY  .DOC         CRC = 3B B9

--> FILE:  123KEY  .PRO         CRC = 06 41

--> FILE:  DHDEMO  .BAS         CRC = 6D 19

--> FILE:  DSKHND  .BAS         CRC = 67 F2

--> FILE:  FREE    .DOC         CRC = 46 62

--> FILE:  NOCOLOR .ASM         CRC = EE 1B

--> FILE:  NOCOLOR .COM         CRC = C8 93

--> FILE:  NOCOLOR .DOC         CRC = 1B B6

--> FILE:  PINUP1  .PIC         CRC = C9 50

--> FILE:  PINUP2  .PIC         CRC = 42 DC

--> FILE:  PINUP3  .PIC         CRC = A7 76

--> FILE:  PINUP4  .PIC         CRC = 6B 00

--> FILE:  SCROLL  .BAS         CRC = BD 5C

--> FILE:  SQUEEZE .EXE         CRC = 46 CE

--> FILE:  SQUSQ   .DOC         CRC = EA 27

--> FILE:  SURF87  .DOC         CRC = 09 1F

--> FILE:  SURF87  .EXE         CRC = 8F BC

--> FILE:  SURFPR  .BAS         CRC = 9B 58

--> FILE:  UNSQUEEZ.EXE         CRC = 56 C6

 ---------------------> SUM OF CRCS = C7 B7

DONE

These and other Public Domain and user-supported programs from:

PC Software Interest Group
1125 Stewart Ct  Suite G
Sunnyvale, CA 94086
(408) 730-9291

DHDEMO.BAS

10 'This program demonstrates Disk Handler
20 'from the October Issue of SofTalk, p. 72.
30 'Written by Howard Glosser
40 'Define SEGMENT and Load DISKHAND.BIN
50 'CLEAR,32768 ' This line is necessary only for 64K machines.
60 DEF SEG=&H1700 ' Use DEF SEG=&HF00 with machines with less then 96K.
70 BLOAD "DISKHAND.BIN",0
80 DISK%=0
90 CLS
100 LOCATE 1,5:PRINT" ** Disk Handler Demonstration **":PRINT
110 '
120 'Find Default Drive
130 '
140 FIND%=1:SET%=2:DISKPARM$=SPACE$(1)
150 PRINT"Find the Default Drive"
160 DISKOPT%=FIND%
170 PRINT"*** Subroutine Call"
180 CALL DISK% (DISKOPT%,DISKPARM$):SAVDRV$=DISKPARM$
190 PRINT"Got back and DEFAULT DRIVE is "CHR$(34)DISKPARM$ CHR$(34)
200 PRINT
210 '
220 'Set default drive
230 '
240 PRINT"Now let's set a new default drive":LOCATE ,,1:BEEP:PRINT
250 PRINT"Specify NEW default drive letter (A B C D:";:GOSUB 460
260 DISKPARM$=KY$:DISKOPT%=SET%
270 PRINT"*** Subroutine Call"
280 CALL DISK% (DISKOPT%,DISKPARM$)
290 PRINT"Return from subroutine and new default should be set"
300 '
310 ' ** Find out if it really changed
320 '
330 PRINT
340 PRINT"Find out if default drive really changed"
350 DISKOPT%=FIND%
360 PRINT"*** Subroutine Call"
370 CALL DISK% (DISKOPT%,DISKPARM$)
380 IF DISKPARM$<>SAVDRV$ THEN 420
390 SOUND 50,7:COLOR 0,7
400 PRINT"Default drive NOT changed. Invalid or same drive letter specified!"
410 COLOR 6,1:GOTO 440
420 PRINT"It's changed! The default drive is now "CHR$(34)DISKPARM$ CHR$(34)
430 SOUND 500,1:SOUND 400,1
440 END
450 '
460 '  **** Key-In Routine
470 '
480 KY$=INKEY$:IF KY$="" THEN 480
490 '
500 ' Check for small or capital letters
510 '
520 IF KY$<CHR$(97) OR KY$>CHR$(122) THEN 570
530 '
540 '  ** Change lowercase to uppercase
550 '
560 KY$=CHR$(ASC(KY$)-32)
570 '
580 PRINT KY$
590 RETURN
600 END' of program.

DSKHND.BAS

10 '***** Disk Handler *****  from the October, 1983 issue of SofTalk, p.71.
20 '
30 'FIND or SET the default drive in a BASIC program.
40 '
50 'Written by Howard Glosser
60 'DEF SEG=&H1700. Use DEF SEG &HF00 for machine with LESS then 96K.
70 '
80 'This builds and checks the subroutine.
90 '
100 CLS
110 DEF SEG=&H1700' Use DEF SEG &HF00 for machine with LESS then 96K.
120 FOR MEM%=0 TO 66
130 READ DT%
140 POKE MEM%,DT%
150 CHECKSUM%=CHECKSUM%+DT%
160 NEXT
170 READ DT%
180 IF CHECKSUM%=DT% THEN 230
190 PRINT"Error in DATA Statements - Check lines 290 - 370":END
200 '
210 '******* This Saves the routine
220 '
230 BSAVE"DISKHAND.BIN",0,&H43
240 PRINT"Diskhandler routine created."
250 END
260 '
270 '***** DATA Statements to build routine
280 '
290 DATA &H55,&H8B,&HEC,&H8B,&H76,&H8,&H8B,&H14
300 DATA &H83,&HFA,&H1,&H74,&H8,&H83,&HFA,&H2
310 DATA &H74,&H10,&H90,&HEB,&H2A,&H90,&HB4,&H19
320 DATA &HCD,&H21,&HFE,&HC0,&H32,&HE4,&HC,&H40
330 DATA &HEB,&H15,&H90,&H8B,&H76,&H6,&H8B,&H7C
340 DATA &H1,&H8B,&H15,&H80,&HF2,&H40,&HFE,&HCA
350 DATA &HB4,&HE,&HCD,&H21,&HEB,&H9,&H90,&H8B
360 DATA &H7E,&H6,&H8B,&H75,&H1,&H88,&H4,&H5D
370 DATA &HCA,&H4,&H0,&H1D35
380 END' of program.

FREE.DOC

    U S E R   S U P P O R T E D   S O F T W A R E

======================== 11/14/83 REVISION =========================

THIS CATALOG IS A COMPLEMENTS OF:

                    SEAWARE CORPORATION
                    P.O. BOX 1656
                    DELRAY BEACH, FL 33444
                    (305) 276-5072

THIS IS A CATALOG OF USER SUPPORTED SOFTWARE.  IT IS SUPPLIED AS A SERVICE
TO CUSTOMERS AND POTENTIAL CUSTOMERS.  THE LATEST REVISION IS ALWAYS
AVAILABLE BY CALLING THE BAT-BBS AT (305) 276-5072.  (BAT-BBS IS A
COMBINATION VOICE/DATA PHONE LINE.  4 RINGS=VOICE.
2 RINGS/HANDUP/REDIAL=BAT-BBS MODEM CONNECTION).  IN NO WAY IS THIS LIST AN
ENDORSEMENT OF ANY PRODUCT SHOWN HERE BY SEAWARE CORPORATION.  UNLESS
OTHERWISE NOTED, ALL PROGRAMS RUN ON AN IBM(TM) PERSONAL COMPUTER.

IF YOU WISH TO RECEIVE A PROGRAM LISTED IN THIS CATALOG, PLEASE COMMUNICATE
DIRECTLY WITH THE AUTHOR OR CONTACT SOURCE LISTED BELOW.  SEAWARE CORP.
DOES NOT HAVE THE PROGRAM, NOR WILL IT HANDLE YOUR CONTRIBUTIONS (UNLESS
SPECIFICALLY INDICATED).

FREEWARE IS A CONCEPT AND TRADEMARK OF ANDREW FLUEGELMAN (THE HEADLANDS
PRESS, INC., BOX 862, TIBURON, CA, 94920).  EACH PACKAGE DISPLAYS A NOTICE
ASKING FOR A VOLUNTARY CONTRIBUTION TO BE SENT TO THE AUTHOR.  ANDREW'S
FREEWARE PACKAGE IS PC-TALK, A COMMUNICATIONS PROGRAM.

THE FREEWARE CONCEPT IS BASED ON THESE PRINCIPLES:
- PEOPLE NEED TO TRY PROGRAMS TO SEE IF THEY ARE USEFUL.
- SOFTWARE AUTHORS CAN BE SUPPORTED DIRECTLY BY USERS.
- COPYING AND NETWORKING OF PROGRAMS CAN BE ENCOURAGED.

IF YOU ARE THE AUTHOR OF A USER SUPPORTED PROGRAM.  PLEASE LEAVE A MESSAGE
ON THE BAT-BBS AS TO THE DETAILS OF YOUR PUBLIC OFFER.

PERMISSION IS GRANTED TO COPY AND SHARE THIS CATALOG PROVIDED THE ABOVE
NOTICE IS INCLUDED AND UNALTERED.

====================================================================
PROGRAM...............: PC-TALK
LATEST REVISION.......: 3

SUGGESTED CONTRIBUTION: $35

CONTACT...............: THE HEADLANDS PRESS, INC.
                        P.O. BOX 862
                        TIBURON, CA 94920

AUTHOR................: ANDREW FUGLEMAN

SYSTEM REQUIREMENTS...: 96K IBM PERSONAL COMPUTER (INTERPRETED) OR 128K
  (TO RUN COMPILED). AN ASYNCHRONOUS COMMUNICATION ADAPTER. A HAYES
  SMARTMODEM (RECOMMENDED) OR OTHER MODEM (300 BAUD OR 1200 BAUD). A
  PRINTER (OPTIONAL).

CONTRIBUTION PROVIDES.: A DISKETTE WITH SOURCE OF THE LATEST VERSON.

DISKETTE ONLY.........: $5

DESCRIPTION:  PC-TALK IS A GENERAL PURPOSE COMMUNICATION PROGRAM WHICH
  ALLOWS COMPLETE FREEDOM IN MAKING CONNECTIONS TO EXTERNAL COMPUTER
  EQUIPMENT BY USING THE ASYNCHRONOUS COMMUNICATION ADAPTER.  ITS
  PRIMARY FLEXABILITY COMES WITH ITS ABILITY TO CONTROL A HAYES
  SMARTMODEM.  FOR THE HAYES MODEM, A DIALING DIRECTORY IS AVAILABLE.
  OPTIONS ARE ALSO AVAILABLE TO CONTROL BAUD RATE, SYSTEM PARAMETERS,
  SCREEN "SNAP-SHOT" PRINTING/STORAGE, DATA TRANSFER (ASCII, BINARY,
  PACING, AND XMODEM MODES), DISKETTE DIRECTORIES, DISK DATA PREVIEWING,
  AND MORE.


====================================================================
PROGRAM...............: "1-RINGYDINGY"(TM)
LATEST REVISION.......: 1.2

SUGGESTED CONTRIBUTION: $25

CONTACT...............: JIM BUTTON
                        P.O. BOX 5786
                        BELLEVUE, WA 98006

AUTHOR................: JIM BUTTON
                        SOURCE:     CL2925
                        COMPUSERVE: 71435,2012

SYSTEM REQUIREMENTS...:  "1-RINGYDINGY" REQUIRES A 64K OR
  LARGER IBM PC (WITH PC-DOS 1.0 OR 1.1), A 96K OR LARGER IBM
  PC (WITH PC-DOS 2.0 OR LATER), ONE DISK DRIVE, AND A SERIAL
  I/O PORT WITH A MODEM.  YOU MUST ALSO HAVE A VIDEO MONITOR
  CAPABLE OF DISPLAYING 80 CHARACTERS PER LINE.

CONTRIBUTION PROVIDES.: PROGRAM AND DOCUMENTATION ON DISKETTE.

DISKETTE ONLY.........: SEND DISKETTE WITH RETURN POSTAGE &
  MAILER OR $6.

DESCRIPTION:
  "1-RINGYDINGY" IS A GENERAL PURPOSE ASYNCHRONOUS
  COMMUNICATIONS PROGRAM.  IT WAS DESIGNED WITH THE "KISS"
  ("KEEP IT SIMPLE, STUPID") PRINCIPLE IN MIND.  ALTHOUGH IT
  EMPLOYS A SIMPLE AND STRAIGHTFORWARD APPROACH TO
  COMMUNICATIONS, ITS CAPABILITIES SURPASS THOSE OF SOME OF
  THE MORE EXPENSIVE COMMUNICATIONS PROGRAMS ON THE MARKET
  TODAY.

  WITH "1-RINGYDINGY" YOU WILL BE ABLE TO:

  -   COMMUNICATE AT SPEEDS UP TO 9600 BAUD (LIMITED BY THE SPEED OF
      YOUR SERIAL PORT AND MODEM.)

  -   EXCHANGE (SEND OR RECEIVE) TEXT FILES WITH OTHER COMPUTERS.
      WHILE SENDING TEXT FILES, YOU MAY DYNAMICALLY SEND SELECTED
      RECORDS FROM THE FILE AND SKIP PAST OTHER RECORDS NOT TO BE
      SENT.

  -   EXCHANGE (SEND OR RECEIVE) NON-TEXT (EXE OR COM) FILES WITH
      OTHER COMPUTERS WHICH SUPPORT THE "X-MODEM" PROTOCOL.

  -   USE MODEMS WHICH DON'T SUPPORT AUTO-DIAL.

  -   USE MODEMS WHICH DO SUPPORT AUTO-DIAL. THIS INCLUDES NOT ONLY
      THE HAYES SMARTMODEM, BUT ALSO A VARIETY OF OTHER MODEMS WHICH
      USE OTHER COMMANDS TO AUTODIAL A PHONE NUMBER.

  -   CAPTURE INCOMING DATA IN A DISK FILE.

  -   SETUP YOUR OWN "FILTERS" TO REMOVE OR CHANGE UNDESIRABLE
      CHARACTERS IN THE INCOMING DATA.

  -   DYNAMICALLY SLOW DOWN THE SPEED AT WHICH YOU TRANSMIT, SO AS
      NOT TO OVERRUN THE COMPUTER AT THE OTHER END.

  -   DYNAMICALLY ALTER YOUR COMMUNICATIONS PARAMETERS, SUCH AS
      PARITY, SPEED, AND NUMBER OF DATA BITS.

  -   BUILD AUTOMATIC LOGON SEQUENCES OF ANY LENGTH, TO ENABLE YOU TO
      LOG ON TO A VARIETY OF REMOTE COMPUTERS WITHOUT HAVING TO
      REMEMBER PHONE NUMBERS, PASSWORDS AND ACCESS COMMANDS.

  -   CHANGE THE COLORS ON YOUR DISPLAY (IF YOU HAVE A COLOR DISPLAY)
      TO SUIT YOUR PERSONAL TASTE.

  -   MOVE BACK AND FORTH BETWEEN DIFFERENT DIRECTORIES ON YOUR HARD
      DISK (IF YOU HAVE DOS 2.0) FOR RETRIEVING AND SENDING DATA.

  -   COMMUNICATE PROPERLY WITH COMPUTERS WHICH USE "XON/XOFF"
      CHARACTERS.

  IN SHORT, "1-RINGYDINGY" IS EASY TO USE, EASY TO UNDERSTAND,
  POWERFUL, AND SMALL IN SIZE.



====================================================================
PROGRAM...............: PC-FILE
LATEST REVISION.......: 9.1

SUGGESTED CONTRIBUTION: $25

CONTACT...............: JIM BUTTON
                        P.O. BOX 5786
                        BELLEVUE, WA 98006

AUTHOR................: JIM BUTTON
                        SOURCE:     CL2925
                        COMPUSERVE: 71435,2012

SYSTEM REQUIREMENTS...:  PC-FILE REQUIRES A 64K OR LARGER IBM PERSONAL
  COMPUTER, WITH AT LEAST ONE DISK DRIVE.  A PRINTER IS OPTIONAL.
  PC-FILE CAN BE SET UP TO SUPPORT EITHER 40 CHARACTER OR 80 CHARACTER
  WIDE DISPLAYS.

CONTRIBUTION PROVIDES.: PROGRAM AND DOCUMENTATION ON DISKETTE.

DISKETTE ONLY.........: SEND DISKETTE WITH RETURN POSTAGE &
  MAILER.

DESCRIPTION:  PC-FILE IS A GENERAL PURPOSE "DATA BASE MANAGER"
  PROGRAM.  IT WAS WRITTEN WITH ONE OVERRIDING GOAL IN MIND:  EASE OF
  USE.  WITH PC-FILE, IT'S VERY EASY FOR THE CASUAL OR PROFESSIONAL USER
  TO CREATE AND MAINTAIN DATA FILES ON THE COMPUTER, AND TO CREATE
  SIMPLE PRINTED REPORTS BASED ON THAT DATA.

    YOU CAN USE PC-FILE FOR ALL KINDS OF TASKS:
    -    MAINTAIN MAILING LISTS AND PRINT LABELS,
    -    MAINTAIN PRICE LISTS,
    -    MAINTAIN TELEPHONE DIRECTORIES,
    -    KEEP VARIOUS TYPES OF INVENTORY RECORDS,
    -    BUILD PERSONNEL FILES,
    -    KEEP CUSTOMER LISTS,
    -    BUILD AND MAINTAIN FILES TO BE USED BY OTHER PROGRAMS,
            LIKE VISICALC AND MAILMERGE,
    -    AND MANY OTHER TASKS WHICH ONLY YOU CAN DREAM UP.

  PC-FILE WILL ALLOW YOU TO SORT YOUR DATA INTO ALMOST ANY SEQUENCE.  IT
  ALLOWS RAPID ACCESS TO ANY RECORD IN THE FILE, WITH A SOPHISTICATED
  SEARCH TECHNIQUE ALLOWING COMPARISON SEARCHES ON ANY FIELD IN THE
  RECORD.  FOR EXAMPLE, YOU CAN DISPLAY ALL EMPLOYEES OVER A CERTAIN
  AGE, OR ALL CLIENTS IN A CERTAIN STATE, OR ALL ITEMS THAT ARE NOT IN A
  CERTAIN CATEGORY.  YOU CAN PRINT OUT REPORTS FROM YOUR DATABASE,
  LISTING ALL OR SOME OF THE FIELDS, FROM ALL OR SOME OF THE RECORDS, IN
  MANY DIFFERENT SEQUENCES, WITH TOTALS ON THE NUMERIC FIELDS.  REPORTS
  CAN BE SENT DIRECTLY TO YOUR VIDEO SCREEN, OR TO ANY ONE OF MANY
  DIFFERENT TYPES OF PRINTERS.  THEY CAN ALSO BE SENT TO DISK, FOR LATER
  USE WITH YOUR WORD PROCESSING PROGRAMS.

  YOU CAN CREATE ENTIRE NEW DATABASES FROM EXISTING DATABASES.  THE NEW
  DATABASES CAN BE IN A DIFFERENT FORMAT, AND CAN BE A SUBSET OF THE
  DATABASE FROM WHICH THEY WERE "CLONED".

  YOU CAN EXPORT YOUR DATABASE FILES FOR USE WITH VISICALC AND OTHER
  "CALC" TYPE PROGRAMS, OR TO "MAILMERGE" FILES.

  BUT ABOVE ALL ELSE, PC-FILE IS EASY!  MOST PEOPLE CAN USE IT WITH NO
  TRAINING OR INSTRUCTIONS.

====================================================================
PROGRAM...............: FRED (FREE EDITOR)
LATEST REVISION.......: 1.21

SUGGESTED CONTRIBUTION: $20

CONTACT...............: DAVID N. SMITH
                        44 OLE MUSKET LANE
                        DANBURY, CT 06810

AUTHOR................: DAVID N. SMITH

SYSTEM REQUIREMENTS...: IBMPC, 1 DISKETTE DRIVE, 96K MEMORY
  MINIMUM, DOS 1.1 OR 2.0.

CONTRIBUTION PROVIDES.:

DISKETTE ONLY.........: SEND DISKETTE WITH RETURN POSTAGE &
  MAILER.

DESCRIPTION:
  FRED IS A FULL SCREEN EDITOR FOR THE IBM PC.   IT  DISPLAYS FILES
  UP TO 1500 LINES LONG AND WITH LINES UP TO 254 CHARACTERS LONG ON
  A MONOCHROME DISPLAY  OR  80 COLUMN GRAPHICS DISPLAY.  THE SCREEN
  IS A WINDOW ONTO THE  FILE.   THE  WINDOW CAN MOVE UP, DOWN, LEFT
  AND RIGHT.  LINES  WHICH  ARE  LONGER  THAN THE SCREEN ARE PARTLY
  DISPLAYED.  IF YOU INSERT DATA, CHARACTERS SEEM TO BE LOST OFF OF
  THE  END OF THE LINE; THEY ARE NOT LOST BUT ARE  JUST  NO  LONGER
  DISPLAYED.   MOVE  THE CURSOR OFF OF THE SCREEN TO THE RIGHT  AND
  THEY WILL REAPPEAR AS THE WINDOW MOVES.

  IF A FILE IS TOO BIG TO FIT INTO MEMORY,  IT  COMPLAINS POLITELY;
  IF  MEMORY NEARS THE LIMIT WHILE YOU ARE EDITING, FRED TELLS  YOU
  AND LETS YOU CONTINUE EDITING  BUT  WON'T LET YOU ADD MORE LINES.
  IN GENERAL, IT IS FORGIVING; YOU CAN EVEN REMOVE THE  DISKETTE IT
  IS READING FROM OR WRITING TO WITHOUT BOMBING IT OR LOOSING  DATA
  IN MEMORY BUT I DO NOT RECOMMEND IT (NOR GUARANTEE IT).

  IT  UPDATES  THE  DISPLAY BUFFER DIRECTLY SO THAT SCREEN  UPDATES
  APPEAR  INSTANTANEOUS;  IT  IS FULLY POSSIBLE TO SCROLL THROUGH A
  FILE AT TYPAMATIC SPEEDS.

  FRED IS WRITTEN IN ABOUT 590 LINES OF COMPILED BASIC AND ABOUT 30
  LINES OF ASSEMBLER.  SINCE  ITS PERFORMANCE IS HORRID EXCEPT WHEN
  COMPILED, SOURCE IS NOT DISTRIBUTED.

  FRED IS SIMILAR TO THE IBM PERSONAL EDITOR; MOST OF IT'S KEYS ARE
  THE  SAME  AND  ITS  APPROACH TO HANDLING THE SCREEN IS ABOUT THE
  SAME.   I  USE  THE PERSONAL EDITOR;  FRED WAS AN EXPERIMENT FROM
  SOME TIME AGO WHICH I HAD  LAID ASIDE.  SEVERAL MONTHS OF READING
  THE DIALOGS  ON  THE  IBM PC SPECIAL INTEREST GROUP ON COMPUSERVE
  CONVINCED  ME  THAT THERE ARE MANY PEOPLE OUT THERE WHO STILL USE
  EDLIN AND WHO WILL NEVER PAY $100 FOR AN EDITOR.  THEREFORE I GOT
  FRED OUT AND POLISHED  IT  UP  A BIT  TO  GIVE AWAY.  I HOPE THAT
  PEOPLE FIND IT USEFUL.

  THE DOCUMENTATION IS SOMEWHAT SPARSE; THERE IS  NO  TUTORIAL  AND
  LITTLE  ELSE  BUT A LIST OF KEYS.  I SUSPECT THAT MOST  PC  USERS
  WON'T HAVE ANY TROUBLE USING  IT  SINCE  MOST  OF THE KEYS DO THE
  "RIGHT" THING.

====================================================================
PROGRAM...............: PC-WRITE
LATEST REVISION.......: 1

SUGGESTED CONTRIBUTION: $75

CONTACT...............: QUICKSOFT
                        219 FIRST N. #224
                        SEATTLE, WA 98109
                        (206) 282-0452

AUTHOR................: BOB WALLACE

SYSTEM REQUIREMENTS...:

CONTRIBUTION PROVIDES.:  REGISTRATION PROVIDES ADDITIONAL SERVICES, SUCH AS
  SOURCE FILES, TELEPHONE SUPPORT, A PRINTED MANUAL, AND A FREE COPY OF THE
  NEXT UPDATED VERSION.

  IN ADDITION, REGISTERED OWNERS RECEIVE A COMMISSION ($25) WHEN SOMEONE
  REGISTERS ONE OF THE OWNER'S COPIES.  THIS COMMISSION IS NOT MULTI-LEVEL
  OR "PYRAMIDAL", SINCE ONLY ONE PERSON RECEIVES IT.  IT'S JUST A SALES
  COMMISSION.

  PEOPLE WHO LIKE PC-WRITE REGISTER AND GIVE COPIES TO FRIENDS OR BUSINESS
  ASSOCIATES WITH IBM PC'S.  IF ONE REGISTERS, THEY GET A CHECK IN THE
  MAIL, AN EXTRA BONUS.

  TO REGISTER YOUR COPY, SEND THE AMOUNT REQUESTED TO QUICKSOFT, OR CALL
  WITH YOUR VISA/MASTERCARD NUMBER.  WE WILL NEED YOUR OLD REGISTRATION
  NUMBER SO WE CAN PROPERLY CREDIT THE OWNER.  YOU WILL RECEIVE YOUR NEW
  REGISTRATION NUMBER OVER THE PHONE OR WITH YOUR OTHER MATERIALS.

DISKETTE ONLY.........: $10

DESCRIPTION:  PC-WRITE IS A WORD PROCESSOR AND TEXT EDITOR FOR THE IBM
  PERSONAL COMPUTER.  IT HELPS YOU WRITE AND FORMAT BOOKS, REPORTS, LETTERS,
  PROGRAMS, MANUALS, OR OTHER TEXT.

  PC-WRITE WAS DEVELOPED FOR THE IBM PERSONAL COMPUTER.  IT MAY NOT RUN ON
  OTHER COMPUTERS, EVEN THOSE WHICH CLAIM TO BE "COMPATIBLE" WITH THE IBM PC.
  IF YOU ARE TRYING TO USE PC-WRITE ON ANOTHER MACHINE, YOU MAY BE OUT OF
  LUCK.  SOME, SUCH AS THE COMPAQ, MAY BE COMPATIBLE ENOUGH.

  THE PC-WRITE DISKETTE CONTAINS TWO PROGRAMS:  THE EDITOR AND PAGE PRINTER.
  YOU USE THE EDITOR TO CREATE YOUR TEXT, AND THE PAGE PRINTER TO DIVIDE IT
  INTO PAGES FOR PRINTING.

  IF YOU HAVE NEVER USED A COMPUTER OR AN EDITING PROGRAM, WELCOME TO WORD
  PROCESSING!  THE MANUAL INCLUDES A TUTORIAL SECTION TO HELP YOU GET
  STARTED.  IT ALSO AVOIDS THE USE OF TECHNICAL JARGON AS MUCH AS POSSIBLE.

  IF YOU HAVE USED OTHER EDITING PROGRAMS, ESPECIALLY FULL SCREEN EDITORS,
  YOU WILL FIND PC-WRITE EASY TO PICK UP.  YOU WILL ALSO FIND IT SMALL, FAST,
  AND RESPONSIVE.

  PC-WRITE INCLUDES MANY FEATURES:

  -  INSERT, REPLACE, AND DELETE TEXT ANYWHERE YOU WANT.
  -  SEARCH FOR A PIECE TEXT AND REPLACE IT WITH OTHER TEXT.
  -  MOVE AND COPY BLOCKS OF TEXT FROM ONE PLACE TO ANOTHER.
  -  SET MARGINS AND TABS, REFORMAT AND JUSTIFY PARAGRAPHS.
  -  PRINT YOUR TEXT IN PAGES WITH HEADERS AND FOOTERS.
  -  SPLIT SCREEN MODE LETS YOU EDIT TWO FILES AT ONCE.
  -  SEARCH AND REPLACE USE "WILD CARD" MATCH CHARACTERS.
  -  VERY FAST OPERATION LETS YOU EDIT EFFICIENTLY.
  -  CONVENIENT TRANSPOSE, CHANGE CASE, AND BOOKMARK KEYS.
  -  YOU CAN SET ANY CONTROL KEY TO BE ANY OTHER KEY.


====================================================================
PROGRAM...............: EXTENDED BATCH LANGUAGE
LATEST REVISION.......: 2.0

SUGGESTED CONTRIBUTION: $30 (SUGGESTED CONTRIBUTION FOR PUBLIC USE)
                            ($30 LICENSE FEE REQUIRED FOR BUSINESS USE)

CONTACT...............: SEAWARE CORP.
                        P.O. BOX 1656
                        DELRAY BEACH, FL 33444
                        (305) 276-5072

AUTHOR................: FRANK CANOVA

SYSTEM REQUIREMENTS...: 64K IBM PERSONAL COMPUTER AND PC-DOS (ANY VERSION)

CONTRIBUTION PROVIDES.:  A DISKETTE WITH THE PROGRAM, DEMONSTRATION
  FILES, AND SAMPLES.  A 70 PAGE HARDCOPY MANUAL WITH EXAMPLES, TIPS,
  AND DESCRIPTIONS.  A PASSWORD AND USER ID TO THE BAT-BBS, A HOT-LINE
  FOR HELP, TIPS, SWAPPING PROGRAMS WITH OTHER USERS, FREE UPDATES, AND
  OTHER SERVICES SUCH AS THIS CATALOG.

DISKETTE ONLY.........:  $5 FOR DISKETTE AND POSTAGE/HANDLING.

DESCRIPTION:  EXTENDED BATCH LANGUAGE IS A COMMAND PROGRAMMING
  LANGUAGE.  IT IS A HIGH LEVEL LANGUAGE THAT CAN BE USED AS A DIRECT
  REPLACEMENT OR IN CONJUNCTION WITH DOS BATCH FILES.  IT CAN OPERATE
  WITH IBM DOS VERSIONS 1.0, 1.1, OR 2.X.  COMPARED WITH STANDARD DOS
  BATCH FILES, BAT HAS SUPERIOR CONTROL STRUCTURES, STRING HANDLING, AND
  USER INTERFACES.  IT ALSO HAS TRACING FACILITIES, AND IS EASY TO LEARN
  AND USE.  MANY ASPECTS OF THE LANGUAGE ARE LIKE BASIC.  USERS OF
  VM/370 WILL ALSO FIND IT SIMILAR TO EXECS.  THE EFFECT OF USING BAT IS
  TO PUT "COVERS" ON THE PROGRAMS AND SYSTEM THAT IT CONTROLS.  A
  FRIENDLY, EASY TO USE INTERFACE IS EASILY CREATED.

  EXTENDED BATCH LANGUAGE HAS MORE POWER AND ENHANCED CAPABILITIES THAN
  EITHER DOS 1.1 OR DOS 2.0.  THIS PROGRAM USES THESE CAPABILITIES TO
  SOLVE COMMON PROBLEMS FOR......

  THE SYSTEM PROGRAMMER - WHO NEEDS TO DO LONG SEQUENCES OF TASKS
  BETWEEN LINKER, COMPILERS, DEBUGGERS, AND EDITORS.  HE CAN NOW CREATE
  AN INTELLIGENT LINK BETWEEN THESE PROGRAMS.  FOR INSTANCE, HE MAY WISH
  TO DO A LINK DEPENDING ON IF THE PREVIOUS COMPILE WAS SUCCESSFUL.  HE
  CAN ALSO RESPOND AUTOMATICALLY FROM A KEYBOARD "STACK" INTO VARIOUS
  UTILITIES.

  THE SECRETARY - WHO HAS SEVERAL TYPES OF TASKS TO PERFORM (WORD
  PROCESSING, ACCOUNTING PACKAGES, ETC) AND REQUIRES A SIMPLE WAY OF
  CHANGING FROM ONE TYPE OF TASK TO ANOTHER, PERHAPS WITH OPTIONAL HELP
  TEXT.

  THE STUDENT - WHO WISHES TO GO FROM ONE GAME TO ANOTHER WITHOUT HAVING
  TO LEARN THE SYSTEM COMMANDS REQUIRED TO MAKE EACH AVAILABLE.

  TESTERS - WHO WISH TO AUTOMATE LONG, BORING TESTS AND PROCEDURES ON
  THE PERSONAL COMPUTER.  AN EXCELLENT TOOL FOR A MANUFACTURING LINE.

    WITH EXTENDED BATCH LANGUAGE, YOU CAN HAVE:
    -    BETTER CONTROL OF MESSAGES TO THE SCREEN
    -    ACCEPT RESPONSES FROM THE USER AND CREATE RESPONSES TO PROGRAMS
    -    STRING HANDLING OPERATIONS (SUBSTRING, LENGTH, ETC.)
    -    ARITHMETIC EXPRESSIONS AND ASSIGNMENTS
    -    COMPARISONS AND PROGRAM RETURN CODES
    -    SEARCH FOR FILES OR TELL IF THEY EXIST
    -    COMPLETE FREEDOM TO MIX DOS AND BAT COMMANDS WITHIN THE SAME
                  CONTROL FILE


====================================================================
PROGRAM...............: EPISTAT
LATEST REVISION.......: 2.0

SUGGESTED CONTRIBUTION: $25

CONTACT...............: TRACY L. GUSTAFSON, M.D.
                        1705 GATTIS SCHOOL ROAD
                        ROUND ROCK, TX  78664

AUTHOR................: TRACY L. GUSTAFSON, M.D.

SYSTEM REQUIREMENTS...:
               MINIMUM                               OPTIMAL
         IBM PC WITH 64K RAM                  IBM PC WITH 96K RAM
         ONE 160K DISK DRIVE                  TWO DISK DRIVES
         COLOR/GRAPHICS ADAPTER               COLOR GRAPHICS ADAPTER
         MONOCHROME MONITOR                   HI-RES COLOR MONITOR
         BASICA                               BASICA
                                              IBM OR EPSON PRINTER
                                                  WITH GRAPHICS

CONTRIBUTION PROVIDES.: PROGRAM AND DOCUMENTATION ON DISKETTE.

DISKETTE ONLY.........: FREE PROGRAMS IF YOU SEND DISKETTE.

DESCRIPTION:  EPISTAT IS A COLLECTION OF PROGRAMS WRITTEN IN BASICA
  FOR STATISTICAL ANALYSIS OF SMALL TO MEDIUM-SIZED DATA SAMPLES ( <
  1000 OBSERVATIONS PER SAMPLE AND < 28 DATA SAMPLES PER FILE).  IT
  INCLUDES PROGRAMS TO ENTER, APPEND, AND EDIT DATA, AS WELL AS PERFORM
  SEVERAL KINDS OF DATA TRANSFORMATIONS.  THE DATAFILES CAN BE PRINTED,
  GRAPHED, OR SAVED TO DISK.  THE 21 PROGRAMS IN EPISTAT CAN ALSO
  PERFORM 34 COMMON STATISTICAL TESTS OR FUNCTIONS.

  THE PROGRAMS ARE INTENDED TO BE AS SELF-EXPLANATORY AND USER-FRIENDLY
  AS POSSIBLE.  ALL QUESTIONS CAN BE ANSWERED WITH A NUMBER, A "Y" FOR
  YES, OR AN "N" FOR NO.  A THOROUGH STUDY OF THIS GUIDE IS NOT
  NECESSARY BEFORE USING THE PROGRAMS.  ON THE OTHER HAND, NEITHER THE
  PROGRAMS NOR THIS MANUAL PURPORT TO TEACH THE PROPER USE OR
  INTERPRETATION OF STATISTICS.  RATHER, SOME FAMILIARITY WITH THE KINDS
  OF DATA REQUIRED AND THE UNDERLYING ASSUMPTIONS APPROPRIATE TO EACH
  STATISTICAL TEST IS ASSUMED.

  ONE WILL NOTE THAT SOME OF THE PROGRAMS EMPHASIZE EPIDEMIOLOGIC AND
  MEDICAL APPLICATIONS.  DESPITE THE WORDING OF VARIOUS PROGRAM
  QUESTIONS OR STATEMENTS, THESE TEST ALSO APPLY TO MANY OTHER TYPES OF
  DATA.  FOR FURTHER EXPLANATIONS OF TESTS, REFER TO:

   1.  COLTON, THEODORE. STATISTICS IN MEDICINE. LITTLE, BROWN AND CO.
         BOSTON, 1974.
   2.  FLEISS, JOSEPH.  STATISTICAL METHODS FOR RATES AND PROPORTIONS.
         JOHN WILEY AND SONS. NEW YORK, 1973.



====================================================================
PROGRAM...............: LADYBUG
LATEST REVISION.......: 0.9

SUGGESTED CONTRIBUTION: $35

CONTACT...............: DAVID N. SMITH
                        44 OLE MUSKET LANE
                        DANBURY, CT 06810

AUTHOR................: DAVID N. SMITH
                        COMPUSERVE: 73145,153.

SYSTEM REQUIREMENTS...:
    -   128K OF MEMORY.
    -   ONE SINGLE SIDED DISK DRIVE.  (BUT TWO, OR A DOUBLE SIDED ARE
        RECOMMENDED).
    -   A GRAPHICS ADAPTOR.
    -   A GRAPHICS DISPLAY OF ANY KIND.  (COLOR IS SUPPORTED ONLY ON
        A COLOR DISPLAY; 80 COLUMN EDITING IS SUPPORTED ONLY ON A
        HIGH RESOLUTION MONITOR.)
    -   DOS 1.1 OR 2.0
    -   AN IBM PC.

CONTRIBUTION PROVIDES.:

DISKETTE ONLY.........: FREE, SEND A DISKETTE AND A SELF ADDRESSED
        RETURNABLE MAILER TO ABOVE ADDRESS.

DESCRIPTION:

  LADYBUG IS A GRAPHICS LANGUAGE BASED ON LOGO TURTLE GRAPHICS.  IT
  CONTAINS MOST OF THE GRAPHICS COMMANDS, PROCEDURE MAKING COMMANDS, AND
  CONTROL COMMANDS FROM THE APPLE II(1) IMPLEMENTATION OF LOGO DONE BY
  TERRAPIN, INC.  THIS VERSION IS DESCRIBED IN THE BOOK LOGO FOR THE
  APPLE II, BY HAROLD ABELSON, PUBLISHED BY MCGRAW-HILL IN 1982.  IT IS
  VERY SIMILAR TO OTHER VERSIONS FOR THE APPLE II, TEXAS INSTRUMENTS,
  AND TRS-80(2) COMPUTERS.

  LADYBUG IS A VERSION OF LOGO PATTERNED AFTER THE APPLE II
  IMPLEMENTATION DEVELOPED BY TERRAPIN, INC.  IN GENERAL IT HAS:

  -   ALL OF THE GRAPHICS COMMANDS.
  -   ALL OF THE MATHEMATICAL COMPUTATIONS.
  -   ALL OF THE CONTROL COMMANDS.

  IN ADDITION IT HAS:

  -   A LARGE LIBRARY OF PROCEDURES ADAPTED FROM A VARIETY OF
      SOURCES.
  -   PAINTING OF AREAS.
  -   CLIPPING OF DRAWINGS (AS WELL AS WRAPAROUND).
  -   A FAST FULL SCREEN EDITOR.
  -   SUPPORT FOR USING BOTH DISPLAYS IF BOTH ARE PRESENT.
  -   SOUNDS -- PLAY STATEMENT LIKE BASIC.

  THE MAJOR FEATURES MISSING ARE:

  -   LIST MANIPULATION.
  -   VARIABLE NUMBERS OF PARAMETERS TO PRIMITIVES.
  -   SAVING SCREEN IMAGES.

  LADYBUG IS DISTRIBUTED AS COMPILED BASIC; SOURCE IS NOT DISTRIBUTED
  NOR IS IT AVAILABLE.



====================================================================
PROGRAM...............: ULTRA-ZAP
                        ULTRA-FORMAT
                        ULTRA-FILE

LATEST REVISION.......: ?

SUGGESTED CONTRIBUTION: ?

CONTACT...............: FREESOFT ULTRA-UTILITIES
                        P.O. BOX 27608
                        ST. LOUIS, MO  63146

AUTHOR................: ?

SYSTEM REQUIREMENTS...:  TO USE THEM, YOU'LL NEED AN IBM-PC WITH AT LEAST
                         64K RAM AND ONE SINGLE OR DOUBLE-SIDED DISK DRIVE
                         AND AN 80 COLUMN MONITOR.

CONTRIBUTION PROVIDES.:

DISKETTE ONLY.........: FREE PROGRAMS IF YOU SEND DISKETTE.

DESCRIPTION:
   THERE IS NOW AVAILABLE A THREE VOLUME SET OF IBM-PC
   UTILITIES THAT DO EVERYTHING THE NORTON UTILITIES DO AND
   MUCH, MUCH MORE.  TO GET THEM, SEND ONE FORMATTED
   DOUBLE-SIDED DISKETTE OR 2 FORMATTED SINGLE-SIDED DISKETTES,
   AND A SELF-ADDRESSED, POSTAGE-PAID RETURN MAILER TO THE
   ADDRESS ABOVE.

   THE PACKAGE INCLUDES:

*  ULTRA-ZAP:  PROGRAM FOR DISPLAYING/MODIFYING DISK SECTORS
   AND FILE SECTORS, COPYING DISK SECTORS, SEARCHING FOR BYTE
   OR CHARACTER SEQUENCES IN DISK OR FILE SECTORS, FILLING OR
   ZEROING DISK SECTORS, AND INTERROGATING DISKETTES TO DISPLAY
   THEIR PROTECTION TECHNIQUES.  THIS PROGRAM CAN WORK ON ANY
   DISK SECTOR, REGARDLESS OF PROTECTION, ETC.

*  ULTRA-FORMAT:  CAN FORMAT STANDARD OR COPY-PROTECTED DISK
   TRACKS, ALSO CAN REPAIR FILES CONTAINING "FLAKY" SECTORS BY
   PLACING A FRESH FORMAT ON A TRACK WITHOUT ERASING PRIOR
   DATA.

*  ULTRA-FILE:  PROGRAM FOR DISPLAYING ALL DIRECTORY
   INFORMATION ABOUT A DISK FILE, ASSIGNING OR REMOVING SYSTEM
   OR HIDDEN STATUS TO A FILE, BUILDING FILES FROM SCRATCH,
   RESURRECTING ACCIDENTALLY ERASED FILES, AND SELECTIVELY
   KILLING FILES FROM A MENU (FAST!).

   ALL IN ALL, IT IS AN EXTREMELY POWERFUL PACKAGE THAT MAKE
   LIFE MUCH EASIER FOR YOU AND YOUR IBM-PC.


====================================================================
PROGRAM...............: DESK-TOP

LATEST REVISION.......: ?

SUGGESTED CONTRIBUTION: $25

CONTACT...............: MICROCOMPUTER MANAGEMENT
                        45 DRUM HILL ROAD
                        CONCORD, MA 01742

AUTHOR................: ?

SYSTEM REQUIREMENTS...: ?

CONTRIBUTION PROVIDES.: ?

DISKETTE ONLY.........: FREE PROGRAMS IF YOU SEND TWO
                        FORMATED DOUBLE SIDED DISKS AND A
                        PREPAID MAILER.

DESCRIPTION:
IT IS AN DESK TOP AID FOR EXECUTIVES.  AMONGST MANY OTHER
THINGS, IT CONTAINS MACRO AND MENU-WRITING FOR 1-2-3.  ALL
CHOICES ARE USER-MODIFIABLE.

(( MORE DETAILS WILL BE AVAILABLE AT A LATER DATE ))

   DT IS BEING MARKETED UNDER THE FREEWARE<TM> CONCEPT. TO GET
YOUR COPY, SEND TWO FORMATTED DOUBLE SIDED DISKS AND A PREPAID
MAILER, AND WE'LL RETURN DT. IF YOU LIKE IT, WE ASK FOR A $25
DONATION.  OR, SEND THE $25.00 AND WE'LL SUPPLY THE DISKS AND
POSTAGE.
                       MICROCOMPUTER MANAGEMENT
                       45 DRUM HILL ROAD
                       CONCORD, MA 01742

<<END OF CATALOG>>


NOCOLOR.ASM

PAGE 60,132
; NOCOLOR.ASM: FOR TURNING OFF THE VIDEO COLOR,
; ALLOWING USERS WITH COMPOSITE B/W MONITORS TO
; USE PROGRAMS WHICH SET THE COLOR ON.
;                               PROGRAM BY RICH WINKEL
BOTTOM  SEGMENT AT 0H
        ORG     024H
KBDIP   DW      ?               ;IP FOR KBD INT
KBDCS   DW      ?               ;CS FOR KBD INT
        ORG     0417H
KB_FLAG DB      ?               ;ROM BIOS DATA
        ORG     0465H
CRTMODE DB      ?               ;CURRENT CRT MODE
BOTTOM  ENDS
;
NOCOLOR SEGMENT
        ASSUME CS:NOCOLOR,DS:BOTTOM
        ORG     100H
MAIN    PROC    NEAR
        JMP     INIT
;
; KEYBOARD INTERRUPT INTERCEPT ROUTINE
;
CATCH:  STI                     ;INTERRUPTS BACK ON
        PUSH    AX
        IN      AL,60H          ;CHECK SCAN CODE
        CMP     AL,0FH          ;IS IT TAB KEY?
        JNZ     L2              ;NO, ON TO KEYBOARD ROUTINE
        PUSH    DS              ;OTHERWISE, CHECK FOR
        XOR     AX,AX           ;ALT KEY SHIFT
        MOV     DS,AX           ;GET DOWN TO THE BOTTOM
        MOV     AL,KB_FLAG      ;GET KEYBOARD FLAG BYTE FROM ROM DATA
        TEST    AL,08H          ;ALT SHIFT?
        JZ      L1              ;NO, ON TO KEYBOARD ROUTINE
        PUSH    DX              ;OTHERWISE,
        MOV     DX,03D8H        ;POINT TO MODE SELECT PORT ON CG CARD
        MOV     AL,CRTMODE      ;GET BYTE FOR MODE REG
        OR      AL,04H          ;TURN ON B/W BIT
        MOV     CRTMODE,AL      ;SAVE CRT STATE
        OUT     DX,AL           ;TURN OFF COLOR
        IN      AL,61H          ;NOW, PREPARE TO RETURN
        MOV     AH,AL           ;RESET
        OR      AL,80H          ;THE
        OUT     61H,AL          ;KEYBOARD
        MOV     AL,AH           ;CONTROL
        OUT     61H,AL          ;PORT
        CLI                     ;TURN OFF INTERRUPTS
        MOV     AL,20H          ;RESET INTERRUPT CONTROLLER (8259)
        OUT     20H,AL
        POP     DX
        POP     DS
        POP     AX
        IRET                    ;BACK TO BUSINESS
L1:     POP     DS              ;ONWARD TO KBD ROUTINE
L2:     POP     AX
        DB      0EAH            ;PREFIX BYTE FOR FAR JUMP
JFARIP  DW      0H              ;IP FOR KBD ROUTINE
JFARCS  DW      0H              ;CS FOR KBD ROUTINE
;
; INSTALLATION ROUTINE
;
INIT:   XOR     AX,AX           ;GET INTO
        MOV     DS,AX           ;BOTTOM SEGMENT
        MOV     AX,KBDIP        ;GET IP FOR KBD INTERRUPT
        MOV     CS:JFARIP,AX    ;PUT IN OUR FAR JUMP
        MOV     AX,KBDCS        ;GET CS FOR KBD INTERRUPT
        MOV     CS:JFARCS,AX    ;PUT IN OUR FAR JUMP
        MOV     AX,CS           ;BACK TO
        MOV     DS,AX           ;OUR SEGMENT
        MOV     DX,OFFSET CATCH ;USE DOS TO POINT KBD INT TO US
        MOV     AX,2509H        ;'RESET INT 9H VECTOR TO DS:DX'
        INT     21H             ;DO IT
        MOV     AH,09H          ;PRINT MESSAGE
        MOV     DX,OFFSET MSG   ;POINT TO MESSAGE
        INT     21H             ;DO IT
        MOV     DX,OFFSET INIT  ;GET LAST ADDRESS OF RESIDENT CODE
        INT     27H             ;TERMINATE AND STAY RESIDENT
;
MSG     DB 0AH,09H,'      NOCOLOR installed.',0DH,0AH,0AH
        DB 09H,'Press Alt-Tab to disable color.',0AH,'$'
;
MAIN    ENDP
NOCOLOR ENDS
        END MAIN

NOCOLOR.DOC

NOCOLOE.COM

Those PC owners using a COLOR/GRAPHICS card with a monochrome monitor
may find this program useful.  Many programs assume that if you have
a C/G card, you have a color display, and proceed to produce color-
encoded video output, which makes indecipherable garbarge on a
monochrome screen.
Use this program to switch your Color/Graphics card to B/W mode from
within such a program.
Run NOCOLOR at the DOS prompt.  From then on, hitting Alt-Tab will
switch the C/G card to B/W mode.


SCROLL.BAS

10 ' SCROLL.BAS  -  Modified from the listing of DEMO.BAS on page 650 of
20 ' the October 1983 issue of "PC-Magazine"
30 '
40 CLEAR ,16000
50 DEFINT A-Z
60 FOR I = 1 TO 6
70   FOR J = 1 TO 10
80     READ X
90     TOT = TOT + X
100   NEXT
110   READ Y
120   IF TOT = Y THEN TOT = 0 : GOTO 160
130   BEEP
140   PRINT "Error in data statement #";1000 + 10 * (I - 1)
150   STOP
160 NEXT
170 RESTORE
180 DEF SEG = 16000 / 16
190 LOCAT = 0
200 FOR I = 1 TO 6
210   FOR J = 1 TO 10
220     READ X
230     POKE LOCAT,X
240     LOCAT = LOCAT + 1
250   NEXT
260   READ X
270 NEXT
280 BSAVE "SCROLL.BIN",0,60
290 CLS
300 PRINT "Subroutine file SCROLL.BIN created"
310 PRINT
320 PRINT "Hit ENTER for demo."
330 K$ = INKEY$
340 IF K$ < > CHR$(13) THEN 330
350 CLS
360 DEF SEG = 16000 / 16
370 BLOAD "SCROLL.BIN",0
380 FOR I = 1 TO 10
390   FOR J = 1 TO 16:PRINT "DEMO ";
400   NEXT
410 NEXT
420 OFFSET = 0
430 A = 7
440 B = 1
450 C = 0
460 D = 19
470 E = 22
480 F = 59
490 G = 32
500 FOR I = 1 TO 11
510   CALL OFFSET(A,B,C,D,E,F,G)
520   SOUND 32767,18
530 NEXT
540 IF A = 7 THEN A = 6 : GOTO 500
550 SOUND 32767,18
560 B = 0
570 C = 0
580 D = 19
590 E = 4
600 F = 59
610 CALL OFFSET(A,B,C,D,E,F,G)
620 SOUND 32767,18
630 B = 0
640 C = 5
650 D = 19
660 E = 9
670 F = 59
680 CALL OFFSET(A,B,C,D,E,F,G)
690 FOR I = 1 TO 5
700   B = 0
710   C = 5
720   D = 70 - (2 * I)
730   E = 4 + I
740   F = 68 + (2 * I)
750   CALL OFFSET(A,B,C,D,E,F,G)
760   SOUND 32767,18
770 NEXT
780 END
790 '
800 ' Note: Parameter requirements for SCROLL.BIN subroutine.
810 '
820 ' (All must be integer - explicitly or via DEFINT statement.)
830 '
840 ' OFFSET = Offset (from last DEF SEG) to beginning of routine
850 '          (wherever routine was loaded)
860 ' A      = "6" = "scroll up"
870 '        = "7" = "scroll down"
880 ' B      = number of lines to scroll
890 ' C,D    = row and column of upper left corner of "scroll window"
900 ' E,F    =  "   "    "    "  lower right corner of   "      "
910 ' G      = Attribute to be used on "blanked" lines
920 '
930 ' NOTES:
940 '  (1)   (C,D) and (E,F) are relative to (0,0)
950 '  (2)   None of the parameters are value checked by the subroutine,
960 '        so results of invalid parameters are unpredictable.
970 '  (3)   If B=0 then the entire window is "blanked"
980 '
1000 DATA 85,139,236,139,118,18,139,28,138,227,1267
1010 DATA 139,118,16,139,28,138,195,139,118,14,1044
1020 DATA 139,28,138,235,139,118,12,139,28,138,1114
1030 DATA 203,139,118,10,139,28,138,243,139,118,1275
1040 DATA 8,139,28,138,211,139,118,6,139,28,954
1050 DATA 138,251,179,0,205,16,93,202,14,0,1098
1060 END ' of program.

SQUSQ.DOC

               SQUEEZE AND UNSQUEEZ DOCUMENTATION

These two programs compress and decompress files.  Compression
(using SQUEEZE) allows files take less storage on disk, to be
transmitted faster, etc.  Additionally, compressed files provide
some information security, since they are encoded and are not
intelligible until decompressed (using UNSQUEEZ).  These programs
are compatible with the CP/M squeeze and unsqueeze programs
(information on CP/M bulletin boards is often squeezed).  In
fact, these versions were obtained in source format from the
Compuserve CP/M SIG (from the C database).  The only changes made
were those required to compile on the IBM PC using the C86
compiler.

Credit should be given to Richard Greenlaw who wrote this version
of SQUEEZE and UNSQUEEZ and to those who enhanced it.


                           SQUEEZE.EXE

Typical compression factors are:

      .COM    6%      (Don't bother)

      .ASM    33%     (using full ASCII set)

      .HEX    46%     (using only uppercase and a few others)

       Squeezing a really big file takes a few minutes.


Usage:     SQUEEZE filename

The squeezed file name is formed by changing the middle
letter of the file type to Q. If there is no file type,
the squeezed file type is QQQ. If the name exists it is
overwritten!


The transformations compress strings of identical bytes and
then encode each resulting byte value and EOF as bit strings
having lengths in inverse proportion to their frequency of
occurrence in the intermediate input stream. The latter uses
the Huffman algorithm. Decoding information is included in
the squeezed file, so squeezing short files or files with
uniformly distributed byte values will actually increase size.


                          UNSQUEEZ.EXE

UNSQUEEZ converts the information compressed with SQUEEZE or
compatible compression programs back to their original data.

Usage:     UNSQUEEZ filename

Note:  The file will be UNSQUEEZED to a file with the original
unsqueezed name.  For example if the file CVTHEX.BAS was
squeezed, it would create a file called CVTHEX.BQS.  UNSQUEEZ
CVTHEX.BQS will create a file called CVTHEX.BAS


                  RESTRICTIONS AND LIMITATIONS

1.   These versions do not support the DOS 2. hierarchical direct-
     ories.  Thus the file to be squeezed or unsqueezed must be
     in the current directory of the specified disk.

2.   If the disk is full, these programs do not detect it.  They
     terminate normally, with a directory entry that shows the
     actual size of the file and a file that has been truncated
     to fit on the disk.  No damage is done to the disk or
     directory.  If this happens, delete the truncated file, make
     some room on the disk (either by deleting unnecessary infor-
     mation or rerunning the program on a disk with sufficient
     space.

3.    The output file is always placed on the same disk drive as
     the input file.

I may fix these later, but for now, I am so happy to be able to
squeeze files for archive so am using the programs as is.


Dan Galorath [72245,1114]


SURF87.DOC

*********************************************************************
**                            SURFACE87                            **
*********************************************************************

    This program developed from an article in 80-Micro, May 1983, page
236.  The article is written by Delmer D. Hinrichs.  I got tired of
running benchmarks on the 8087 in my IBM-PC and remembered this
program, which draws elaborate, drop of water type waveforms on dot
matrix printers, such as the EPSON MX series.  Elaborate yes, but even
in compiled BASIC a moderately complex picture can take an hour or two
while the program computes hundreds of thousands of sine functions.

    SURFACE87 is written entirely in 8088/87 assembler, taking advan-
tage of the number crunching power of the 8087.  If you don't have an
8087 installed in your PC or compatible computer, this program will
not produce anything worthwhile.  If you do, some very intriguing
waveforms can be cranked out on your printer in an average of
fifteen minutes.

    You are invited to experiment with values outside those suggested
by the program.  A negative height multiplier, for instance, will make
a negative peak.  Different size waves make the peaks fatter or skinnier.
A good set of values to start out with are 1 peak, circular wave forms,
left margin 300, X position 250, Y position 250, wave lengths 71,
height multiplier 530.  This creates the classic three dimensional
drop of water in the pond image you have probably seen a hundred times
in magazines--in less than ten minutes.

    Output is intended for printer, but can optionally be sent to the
screen or disk. The screen image is compressed by a factor of four in
order to represent the 720,000 possible dots.  A disk file can be speci-
fied but make sure you have 91,200 bytes free on the disk. SURFACE87
can also print the files it writes.  A good way to experiment, once
you have a feel for the screen verses printer images, is to send the
picture to the screen and electric disk.  This saves a lot of paper
and if you create a really wonderful design you can save it to real
disk and print it out anytime at maximum speed.

    This file is one of three or four. SURF87.EXE is the main
program.  SURF87.HEX must be run through a hex-converter program to
produce SURF87.EXE.  SURFPR.BAS is a PC-BASIC program to install
alternate printers on SURF87.  The program comes ready to go for all
EPSON GRAFTRAX printers, including the IBM Graphics Printer.  If your
printer has a bit-plot mode, it can most likely be installed.

    Technical details:

    For IBM compatibles--if your computer understands the IBM video
BIOS routines in Interrupt 10H, the printer call Interrupt 17H and
standard MS-DOS function calls (version 1.10 and later) you should
have no problems with this program.

    For IBM-PC--in order to allow as many people as possible to use
the program the disk files only use the DOS 1.10 function calls, so
sorry about no PATH names.

    SURFACE87 disk files are standard random files with a block size
of 960.  In BASIC, a program to print these files can be written by
going to BASIC with the /S:960 option, and then doing an
       OPEN "filename" AS #1 LEN=960.
Printers other than the EPSON sometimes have more and less than 960
dot widths, and this is one way to get at the actual data produced.
Alternatively, SURFPR has sixteen bytes of space for each printer
set-up sequence, and can be used to move the image around the page.

    There is error detection built in to cope with out of disk space
or printer problems.  If you have specified output to disk and printer,
for instance, and run out of space on the disk file, the program will
close the disk file and continue sending to the printer.  If the
printer then runs out of paper, the program will find that it doesn't
have anything to do and will return to 'Program possibilities'.  So if
you are printing a picture and it looks crummy, just turn off the
printer for a second and you will be back at the main menu.

    Program translation and modifications by:

Marty Smith                 SOURCE ST2259 / COMPUSERVE 72155,1214
310 Cinnamon Oak Lane       (713) 464-6737 [Home]
Houston, TX  77079          (713) 661-1241 [Office]
11/7/83


SURFPR.BAS

10 DEFINT A-Z
20 I=0:J=0:BOX=0:X=0:Y=0:Z=0:REC=0:A$="":X$="":FS$="SURF87.EXE"
30 TRUE=-1:FALSE=0:B1=0:B2=0:B3=0:B4=0:ROW=0:COL=0:SURF$=SPACE$(32)+"SURFACE87"
40 DIM WORD(64),BYTE(128),FILE$(64),PCODE(20),PCODE$(32)
50 DEF SEG : POKE 106,0 : KEY OFF : KEY 10,""
60 FOR I=1 TO 32 : READ PCODE$(I) : NEXT
70 DATA soh,stx,etx,eot,enq,ack,bel,bs,ht,lf,vt,ff,cr,so,si,dle
80 DATA dc1,dc2,dc3,dc4,nak,syn,etb,can,em,sub,esc,fs,gs,rs,us,sp
90 GOTO 1000
100 ' open
110 ON ERROR GOTO 200
120 OPEN FS$ FOR INPUT AS #1
130 CLOSE #1
140 OPEN FS$ AS #1 LEN=128
150 FOR I=0 TO 63:FIELD #1,I*2 AS DUMMY$,2 AS FILE$(I) : NEXT
160 ON ERROR GOTO 0
170 RETURN
200 ' file error stuff
210 CLOSE
220 IF ERR=71 THEN PRINT "Disk not ready. Please try again." : RESUME
230 IF ERR=70 THEN PRINT "Disk is write protected. Please remove tab to write mods to disk." : RESUME
240 IF ERR=53 THEN PRINT "I can't find "+FS$+"." : GOSUB 250 : RESUME
245 GOTO 260
250 LINE INPUT "Please re-enter filename -->";FS$ : RETURN
260 IF ERR=75 OR ERR=76 THEN PRINT FS$+" has a PATH problem." : GOSUB 250 : RESUME
270 IF ERR=72 OR ERR=57 THEN PRINT "Sorry, can't seem to work with this disk" : ON ERROR GOTO 0 : END
280 ON ERROR GOTO 0
290 GOTO 500
300 'get record
310 ON ERROR GOTO 200
320 GET #1,REC
330 FOR I=0 TO 63 : WORD(I)=CVI(FILE$(I)) : NEXT
340 ON ERROR GOTO 0
350 RETURN
400 ' box b1,b2-b3,b4  --> top.row,top.col-bot.row,bot.col
405 ROW=CSRLIN:COL=POS(0)
410 LOCATE B1,B2,0 : PRINT CHR$(201); : PRINT STRING$(B4-B2-1,205);CHR$(187);
420 FOR BOX=B1+1 TO B3-1 : LOCATE BOX,B2 : PRINT CHR$(186);:LOCATE BOX,B4:PRINT CHR$(186); :NEXT
430 LOCATE B3,B2 : PRINT CHR$(200); : PRINT STRING$(B4-B2-1,205);CHR$(188);
440 LOCATE ROW,COL
450 RETURN
500 ' end
510 KEY 10,"SCREEN 0,0,0"+CHR$(13)
520 KEY ON
530 END
600 ' enter printer codes from keyboard.
610 LOCATE ,,1 : X=0 : ROW=CSRLIN : COL=POS(0)
620 I$="" : WHILE I$="" : I$=INKEY$ : WEND
630 IF I$=CHR$(0)+CHR$(68) THEN 700 ' finished
640 IF I$<>CHR$(0)+CHR$(83) THEN 650
645 X=X-1 : IF X<1 THEN X=0 : BEEP : LOCATE ROW,COL,1 : PRINT SPACE$(20); : LOCATE ROW,COL,1 : GOTO 620 ELSE 660
650 PCODE(X)=ASC(I$) : X=X+1 : IF X>15 THEN PRINT : PRINT "Only 16 allowed." : GOTO 700
660 LOCATE ROW,COL,1 : PRINT SPACE$(X*3+10); : LOCATE ROW,COL,1
670 FOR I=0 TO X-1 : IF PCODE(I)<33 THEN PRINT PCODE$(PCODE(I));" "; ELSE PRINT CHR$(PCODE(I));" ";
680 NEXT
690 GOTO 620
700 PRINT : PRINT "Is this correct (y/n)?"
710 I$=INKEY$ : IF I$="n" OR I$="N" THEN LOCATE ROW,COL : PRINT SPACE$(X*3+10);
720 IF I$="n" OR I$="N" THEN LOCATE ROW+1,COL : PRINT SPACE$(24); : LOCATE ROW,COL : GOTO 610
730 IF I$<>"y" AND I$<>"Y" THEN 710
740 RETURN
800 ' write a record
810 ON ERROR GOTO 200
820 FOR I=0 TO 63 : LSET FILE$(I)=MKI$(WORD(I)) : NEXT
830 PUT #1,REC
840 ON ERROR GOTO 0
850 RETURN
900 ' print codes in hex -- x=bytes,z=word(z)
910 A$=HEX$(WORD(Z)) : IF LEN(A$)=3 THEN B$="0"+LEFT$(A$,1) ELSE B$=LEFT$(A$,2)
920 PRINT B$+CHR$(32);
930 Y=X\2
940 FOR I=1 TO Y
950   A$=HEX$(WORD(I+Z))
960   IF LEN(A$)=1 THEN A$="000"+A$ ELSE IF LEN(A$)=2 THEN A$="00"+A$ ELSE IF LEN(A$)=3 THEN A$="0"+A$
970   PRINT RIGHT$(A$,2)+CHR$(32); : PRINT LEFT$(A$,2)+CHR$(32);
980 NEXT
990 Y=X MOD 2
995 IF Y=0 THEN ROW=CSRLIN : COL=POS(0) : LOCATE ROW,COL-3 : PRINT SPACE$(3);
996 PRINT
997 RETURN
1000 ' main
1010 CLS
1020 PRINT SURF$
1030 PRINT
1040 PRINT "                       Printer installation program"
1050 PRINT
1060 PRINT "                      (c) 1983 Martin R. Smith, Jr."
1070 PRINT
1080 PRINT "                        Press <enter> to continue.";
1090 LOCATE ,,1
1100 I$=INKEY$ : IF I$="" THEN 1100
1110 PRINT : PRINT : PRINT
1120 PRINT "Surface87 should work with most dot-matrix printers that have a bit-plot"
1130 PRINT "mode. It is set up to send 960 bytes to the EPSON(tm) series of printers"
1140 PRINT "with GRAFTRAX(tm) firmware."
1150 PRINT
1160 PRINT "In order to make it work with other printers, I need to know:"
1180 PRINT
1190 PRINT "         (1) The filename you have given SURF87."
1200 PRINT "         (2) The way your printer treats bit-plot bytes."
1210 PRINT "         (3) How to set the printer line-spacing to 8/72 inch."
1220 PRINT "         (4) How to make the printer treat the next 960 bytes as bit-plots."
1225 PRINT "         (5) How to return the line-spacing to normal."
1230 PRINT :PRINT "In order to begin, get your printer manual out and hit <enter>,"
1240 PRINT "or hit <x> to quit.";
1250 I$=INKEY$ : IF I$=CHR$(13) THEN 1300 ELSE IF I$="x" OR I$="X" THEN 500 ELSE 1250
1300 ' enter data
1310 CLS
1320 PRINT SURF$
1330 PRINT
1340 PRINT "Please enter the name you have given SURFACE87"
1350 LINE INPUT "<enter> alone will assume SURF87.EXE. -->";A$
1360 IF A$="" THEN 1380
1370 FS$=A$
1380 GOSUB 100
1400 REC=1 : GOSUB 300
1410 IF WORD(0)=&H5A4D THEN 1500
1420 PRINT "This is not an .EXE type file."
1430 PRINT "Please make sure you have HEX-CONVERTED your download and try again."
1440 GOTO 500
1500 REC=5 : GOSUB 300
1510 IF WORD(7)=&HFB4 AND WORD(56)=&H303C THEN 1600
1520 PRINT "I don't think this is SURFACE87."
1530 PRINT "This program modifies an existing file, and might cause problems"
1540 PRINT "with "+FS$+", so please check that you have specified the right"
1550 PRINT "file and try again."
1560 GOTO 500
1600 CLS
1610 PRINT SURF$ : PRINT SPACE$(32)+FS$ : PRINT
1620 PRINT "Dot matrix printers in bit-plot mode represent dots in two ways:"
1630 PRINT
1640 PRINT "      METHOD 1       PRINT HEAD WIRES         METHOD 2"
1650 PRINT "                           TOP"
1660 PRINT "       80h 128              o                  01h   1"
1670 PRINT "       40h  64              o                  02h   2"
1680 PRINT "       20h  32              o                  04h   4"
1690 PRINT "       10h  16              o                  08h   8"
1700 PRINT "       08h   8              o                  10h  16"
1710 PRINT "       04h   4              o                  20h  32"
1720 PRINT "       02h   2              o                  40h  64"
1730 PRINT "       01h   1              o                  80h 128"
1740 PRINT "                          BOTTOM"
1750 B1= 5:B2=45:B3= 7:B4=57:GOSUB 400
1760 B1= 5:B2= 5:B3= 7:B4=17:GOSUB 400
1770 B1= 5:B2= 5:B3=16:B4=17:GOSUB 400
1780 B1= 5:B2=45:B3=16:B4=57:GOSUB 400
1800 PRINT "Please enter the number of the method your printer uses. (1 or 2) ";
1810 LOCATE ,,1
1820 I$=INKEY$ : IF I$<>"1" AND I$<>"2" AND I$<>CHR$(27) THEN 1820
1830 IF I$=CHR$(27) THEN 500
1840 IF I$="1" THEN DOTHEAD=TRUE : DH$="TOP DOT = 128" ELSE DOTHEAD=FALSE : DH$="TOP DOT = 1"
1850 REC=61 : GOSUB 300
1860 IF DOTHEAD THEN WORD(0)=&H201:WORD(1)=&H804:WORD(2)=&H2010:WORD(3)=&H8040: GOTO 1900
1870 WORD(0)=&H4080:WORD(1)=&H1020:WORD(2)=&H408:WORD(3)=&H102
1900 CLS : PRINT SURF$ : PRINT SPACE$(32)+FS$ : PRINT SPACE$(32)+DH$ : PRINT
1910 PRINT "The next three items involve sending codes to the printer."
1920 PRINT
1930 PRINT "In order to make this as easy as possible, your keyboard will"
1940 PRINT "become a code generator.  Each key will be treated literally."
1950 PRINT
1970 PRINT "For example, say you need to send and ESCape to the printer."
1980 PRINT "Just hit the ESCape key, and I'll know what you mean."
1990 PRINT "If you need to send a number, hold down the ALT key, type"
2000 PRINT "the number on the numeric keypad, and then release the ALT key."
2010 PRINT "To send the letter 'A' or the letter '8', just type it in."
2020 PRINT
2030 PRINT "If you make a mistake, use the DEL key on the numeric keypad as a backspace."
2040 PRINT "When you are done, press the F10 - Function Key 10."
2050 PRINT
2060 PRINT "A table of ASCII codes for below 33 will be at the top of the"
2070 PRINT "screen to help."
2080 PRINT : PRINT "    Press <enter> when you are ready to begin."
2090 I$=INKEY$ : IF I$="" THEN 2090
2100 CLS : PRINT
2110 PRINT "   1 = soh    2 = stx    3 = etx    4 = eot    5 = enq    6 = ack    7 = bel "
2120 PRINT "   8 =  bs    9 =  ht   10 =  lf   11 =  vt   12 =  ff   13 =  cr   14 =  so "
2130 PRINT "  15 =  si   16 = dle   17 = dc1   18 = dc2   19 = dc3   20 = dc4   21 = nak "
2140 PRINT "  22 = syn   23 = etb   24 = can   25 =  em   26 = sub   27 = esc   28 =  fs "
2150 PRINT "  29 =  gs   30 =  rs   31 =  us   32 =  sp"
2160 B1=1:B2=1:B3=7:B4=78 : GOSUB 400
2170 PRINT
2180 PRINT "Enter your codes, using the DEL key as a backspace, the F10 key when done." : PRINT
2190 PRINT "First, I need the codes to set your printer to 8/72 inch."
2200 PRINT "Any other initial set-up code should go here."
2210 GOSUB 600
2220 IF X = 0 THEN 2310
2230 A$=HEX$(X) : IF LEN(A$)=1 THEN A$="0"+A$
2240 B$=HEX$(PCODE(0)) : CODE$="&H"+B$+A$
2250 WORD(8)=VAL(CODE$)
2260 FOR I=1 TO X STEP 2
2270   A$=HEX$(PCODE(I)) : IF LEN(A$)=1 THEN A$="0"+A$
2280   B$=HEX$(PCODE(I+1)) : CODE$="&h"+B$+A$
2290   WORD((I+1)\2+8)=VAL(CODE$)
2300 NEXT
2310 PRINT
2320 PRINT "Second, I need codes to print the next 960 bytes as bit plots."
2330 GOSUB 600
2340 IF X = 0 THEN 2430
2350 A$=HEX$(X) : IF LEN(A$)=1 THEN A$="0"+A$
2360 B$=HEX$(PCODE(0)) : CODE$="&H"+B$+A$
2370 WORD(24)=VAL(CODE$)
2380 FOR I=1 TO X STEP 2
2390   A$=HEX$(PCODE(I)) : IF LEN(A$)=1 THEN A$="0"+A$
2400   B$=HEX$(PCODE(I+1)) : CODE$="&h"+B$+A$
2410   WORD((I+1)\2+24)=VAL(CODE$)
2420 NEXT
2430 PRINT
2440 PRINT "Last, I need printer codes to reset things back to normal."
2445 PRINT "Then send two line feeds (chr$(10) or ^J) to advance paper to top of form."
2450 GOSUB 600
2460 IF X = 0 THEN 2550
2470 A$=HEX$(X) : IF LEN(A$)=1 THEN A$="0"+A$
2480 B$=HEX$(PCODE(0)) : CODE$="&H"+B$+A$
2490 WORD(16)=VAL(CODE$)
2500 FOR I=1 TO X STEP 2
2510   A$=HEX$(PCODE(I)) : IF LEN(A$)=1 THEN A$="0"+A$
2520   B$=HEX$(PCODE(I+1)) : CODE$="&h"+B$+A$
2530   WORD((I+1)\2+16)=VAL(CODE$)
2540 NEXT
2550 PRINT
2600 CLS
2610 PRINT SURF$
2620 PRINT : PRINT FS$
2630 PRINT : PRINT DH$
2640 PRINT : PRINT "Codes to set line space to 8/72 inch (in hex):"
2650 X=WORD(8) AND 255 : Z=8
2660 GOSUB 900
2670 PRINT : PRINT "Codes to set up 960 bit-plot bytes:"
2680 X=WORD(24) AND 255 : Z=24
2685 GOSUB 900
2690 PRINT : PRINT "Codes to reset printer:"
2700 X=WORD(16) AND 255 : Z=16
2710 GOSUB 900
2720 PRINT : PRINT "Does everything look correct (y/n)?"
2730 LOCATE ,,1
2740 I$=INKEY$ : IF I$="n" OR I$="N" THEN 1600
2750 IF I$<>"y" AND I$<>"Y" THEN 2740
2760 GOSUB 800
2770 CLOSE #1
2780 PRINT : PRINT FS$+" has been installed with new printer codes!"
2790 GOTO 500

Directory of PC-SIG Library Disk #0115

 Volume in drive A has no label
 Directory of A:\

123KEY   BAT        31  12-11-83   4:09p
123KEY   DOC      4166  12-11-83   4:09p
123KEY   PRO       602  12-11-83   4:10p
CRC      TXT      1499  11-09-84   2:37p
CRCK4    COM      1536  10-21-82   7:54p
DHDEMO   BAS      1859  12-11-83   4:01p
DSKHND   BAS      1220  12-11-83   4:02p
FREE     DOC     25694  12-11-83   3:23p
NOCOLOR  ASM      3370  12-11-83   4:15p
NOCOLOR  COM       256  12-11-83   4:17p
NOCOLOR  DOC       506  12-11-83   4:16p
PINUP1   PIC      6464  12-11-83   4:38p
PINUP2   PIC     10489  12-11-83   4:39p
PINUP3   PIC      7171  12-11-83   4:42p
PINUP4   PIC      8285  12-11-83   4:40p
SCROLL   BAS      2464   1-07-84   7:30p
SQUEEZE  EXE     18432  12-11-83   3:43p
SQUSQ    DOC      3162  12-13-83   8:27p
SURF87   DOC      4358  12-13-83   8:31p
SURF87   EXE      8576  12-11-83   2:50p
SURFPR   BAS     10615  12-11-83   3:25p
UNSQUEEZ EXE     15744  12-11-83   3:49p
       22 file(s)     136499 bytes
                       18432 bytes free