home *** CD-ROM | disk | FTP | other *** search
Turbo Pascal Compiled 8bit CP/M-80 COM | 1986-08-16 | 18.0 KB | 139 lines |
- Copyright (C) 1984 BORLAND Inc
- Kaypro II and IVctedP
- ^#V#N#F
- s#r#q#p
- #^#V
- 9^#Vh&
- |/g}/o#
- T]=o`9y
- T9^K#
- 8/<oz
- T9^K#
- oGOW_g
- `1pF,
- w###6
- ##N#F*
- Nw#Fw
- q#p#6
- #w#w#w
- TRUEFALSE
- N#F#s#r
- N#F#^#V
- " C}=(
- F+N+++V+^
- q#p##
- User break
- Run-time
- error
- , PC=
- Program aborted
- INPUT
- OUTPUT
- *What is the name of the file you want for !G
- (RETURN for help)
- )The INPUT file is the file that data will
- be read from
- )The information in it will not be altered
- Hit control-C to abort
- *The OUTPUT file is the file that data will
- be written to
- 3Any information currently in it will be overwritten
- and lost
- Hit control-C to abort
- Can't open file = !X
- File !X
- $ already exists. Overwrite? (Y or N)
- $Ready to input strings from keyboard
- Strings may be up to !P
- characters in length
- and up to !
- keys may be input.
- 6 To start the program just hit 'RETURN' when asked for
- a key to be found.
- Input string *A
- to be found
- $Input what it is to be replaced with
- Ready to read keys from a file.
- 4The input file should contain pairs of lines. On the
- 2 first line should be the string you want to FIND
- 6 and on the second line should be the string you want
- : to REPLACE it with. PAIRS of strings SHOULD BE SEPARATED
- , by ONE BLANK LINE. Strings may be up to !P
- $ in length and there is a limit of !
- pairs allowed.
- s#r!x
- Find Key *v
- Replace with
- s#r*k
- *Syntax error in key near character number *
- % (Y or N (Return for default))
- 6Options allow you to cause the program to ignore some
- ; differences between the keys to be found and the contents
- ; of the input file. The parity-bit is set by some programs
- : (notably WordStar). If the parity-bit is set in the key
- 9 it will not be ignored, even if that option is selected
- 0Just hit the carriage return to get the defaults
- $ (ignore parity,do not ignore case)
- %Do you want to ignore the parity bit *
- )Do you want to ignore the case of letters*
- <Key strings (sets of characters or numbers) to search for or
- : replace with may be input either from the keyboard while
- ; running this program, or from a previously prepared file.
- :In both cases keys take the same form. Letters and numbers
- < that may be typed in directly from the keyboard (including
- : the space bar) represent themselves, with the exception
- of the character !^
- hit return to continue
- % may be used to enter characters that
- do not appear on
- > the keyboard, such as control characters and carriage return
- 8 and line-feed characters. Its use may take four forms.
- They are:
- - represents a single !^
- in the key string.
- A - where A is any letter A-Z.
- 8 It represents the corresponding control-character
- in the key string.
- 3(###) - where ### is a 1 to 3 digit decimal number.
- ? It represents character number ### of the ASCII sequence
- in the key string.
- 6(##H) - where ## is a 1 or 2 digit hexadecimal number.
- ? It represents character number ##H of the ASCII sequence
- in the key string.
- hit return to continue
- ?Using these forms all ASCII characters 0-255 may be represented
- & in either the FIND or REPLACE keys.
- <A file containing keys may be prepared on any word processor
- , or editor that uses ASCII files (most do).
- 4The input file should contain pairs of lines. On the
- 2 first line should be the string you want to FIND
- 6 and on the second line should be the string you want
- : to REPLACE it with. PAIRS of strings SHOULD BE SEPARATED
- , by ONE BLANK LINE. Strings may be up to !P
- $ in length and there is a limit of !
- pairs allowed.
- 7The only character that will not work as a key in this
- 5 program is ^Z (control-Z, ASCII 26 or 1AH) which is
- used as an end-of-file marker.
- hit return to continue
- 1Do you want to input strings to be replaced from:
- 6 1) the keyboard
- 5 2) from a file
- 5 3) Set Options
- . 4) HELP
- IO error number *e
- (Decimal)
- 2While reading input file in procedure READINSOURCE
- Program terminated
- s#r*i
- s#r*q
- s#r!P
- REPLACE V1.1
- Copyright (c)1985 by John Porter
- +This program copies one file to another and
- " replaces specified key strings.
- Reading !
- Replacing !
- Writing !
- Writing !
-