home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Black Box 4
/
BlackBox.cdr
/
ibm1
/
do101j1.arj
/
HISTORY.SCR
< prev
next >
Wrap
Text File
|
1992-03-15
|
7KB
|
215 lines
* SCRIPT: HISTORY.SCR -- A history of the DO script processor
/STOP TOC
/DOCUMENT ON
/SET t "c 14 1"
:TOC
.clr
/GOSUB DispTitle "A History of the DO script processor"
/VERSION
»ye«1»gy«.»wh« In the Beginning . . .
»ye«2»gy«.»wh« Description of Version Numbers
»ye«3»gy«.»wh« Version History
»ye«3.1»wh« Version Index
»ye«4»gy«.»wh« About this script
»re«0»gy«.»wh« Exit
»#«
/SET Default 0
/GETS Chapter Default " »gr«Selection»gy«:»#«"
/SET Default OOPS
/GOTO %Chapter %Default
:1
/GOSUB DispTitle "In the Beginning . . ."
The »%t«DO»ye« script processor»#« has evolved over many years of personal
use. Although the first public version has a version number of
»re«1.00»#«, the »%t«DO»ye« script processor»#« has actually gone through »+gr«7»#« major
revisions in private use.
.pg clr
The »%t«DO»ye« script processor»#« started out to meet three needs.
»cy«1»gy«.»#« To be used as an automated tutor and display of features
for other products.
»cy«2»gy«.»#« To provide an extension to DOS' BATch capatilities.
»cy«3»gy«.»#« To automate utility functions which were too complex to
automate with BATch files and yet, too simplistic to need a
complete program written in a higher-level language such as
PASCAL or C.
As you can see from the current release, it has evolved well
beyond these beginnings as requirements dictated.
.pg
:2
/GOSUB DispTitle "Description of Version Numbers"
»%t«DO»#« version numbers are displayed using the »%t«/VERSION»#« command. You
can see the current version number in the line at the bottom of
the screen.
/SET B 15
/LOOK 25 17 1
/IF %Found EQ : 2.1
/SET B 19
:2.1
.pg clr
/GOSUB Arrow %B
The »ye«version number»#« is composed of three parts:
»gr«MAJOR VERSION»gy«:»#« This number indicates a major revision to the
»%t«DO»ye« script processor»#«'s capabilities
.pg
/GOSUB Arrow @math(%B+2)
»gr«MINOR VERSION»gy«:»#« These are incremental enhancements to the
capabilities
.pg
/GOSUB Arrow @math(%B+4)
»gr«REVISION»gy«:»#« A letter here indicates an error correction or
revision to the internal workings without
changes to the »%t«DO»#« capabilities
.pg clr
/GOSUB Arrow @math(%B+10)
The »wh«date»#« shows the date on which this version was produced.
.pg
:3
/GOSUB DispTitle "Version History"
Rather than bore you with the years of evolution of the »%t«DO»ye« script
processor»#«, this history starts with the first public release of
»%t«DO»#«. »wh«Enter the release number about which you are interested to
see a description of its capabilities.»#« Enter any portion of the
number to see information about all releases (e.g. "»re«1»#«" shows
information about major release 1, "»re«1.2»#«" shows information about
information about minor releases until "»re«1.3»#«").
»bl«NOTE»gr«:»re« 1.00»#« will show information about version 1.00 only. It
will stop at version »ye«1.01»#«. Enter »re«1»#« to see a complete history
of version 1.
»wh«Only major versions and significant bug fixes are displayed.»#«
The revision letter is placed before the change if applicable.
.pg
The index starts on the next page. You will be returned to the
main menu after viewing this feature. Enter "»gr«3.1»#«" to return to
the version index and select another version.
.pg
:3.1
/GOSUB DispTitle "Version History Index"
Released versions:
»re«1.00 »gy« -»ye« First Public Release
»re«1.01 »gy« -»ye« Modified »%t«DoIt»ye« Command
/SET Default 1.00
.go 1 19
/GETS Chapter Default " »wh«Revision (»re«Q»wh« to Quit)?»#«"
/SET Default 3.OOPS
/GOTO %Chapter %Default
:1
:1.00
/GOSUB DispTitle "DO script processor version 1.00"
»cy«-»#« Created Runtime version and Shareware version
»cy«-»#« Added date and time functions
»cy«-»#« Added string functions
»cy«-»#« Added math functions
»cy«-»#« Created Tutorial
.pg
»cy«a»#« Corrected problem in display routines.
»cy«a»#« Added »%t«/LISTVARS»#« command for debuging
.pg
»cy«b»#« Corrected obscure error which would have evaluated "A1" as a
formula in a »%t«/MATH»#« function
.pg
:1.01
/GOSUB DispTitle "DO script processor version 1.01"
»cy«-»#« Modified »%t«DoIt»#« command to only run a command shell if the
user forces one or the user selects a batch file. This
allows the DoIt command to return the error code from the
program through the variable »ye«ERRORLEVEL»#«.
The window is »re«NOT»#« reset after a »%t«DoIt»#« command is executed.
This cleans up cursor positioning.
.pg
»cy«b»#« Added page pause to »%t«/LISTVARS»#« command
»cy«b»#« Modified minor problem with »%t«/SIZE»#« command
»cy«b»#« Correct bug in »%t«DoIt»#« command when no parameters entered
»cy«b»#« Modified »%t«/FREE»#« to allow »re«NULL»#« drive and branch
.pg
»cy«c»#« Added »%t«~064pad()»#« function
.pg
»cy«d»#« Added »ma«Turbo Async Professional»#« communications routines
(TurboPower software). This will allow additional
communications features to be added.
.pg
»cy«i»#« Modified the »%t«~064trim()»#« function to accept only the string
and default to removing spaces from both ends.
.pg
:Q
* Will be returned to TOC because of DOCUMENT Mode
:3.OOPS
.bell clr
Invalid version number %chapter
.pg
/goto 3.1
:4
/GOSUB DispTitle "About this Script . . ."
This history of the »%t«DO»ye« script processor»#« is implemented as a »%t«DO»#«
script. It shows just a small portion of the power of the DO
script processor. You might want to examine the script using
your favorite text editor or »%t«DO»#«'s built in text editor.
To examine this script using the »%t«DO»#« full-screen editor, enter the
command:
»%t«DO»cy« history /E»#«
from the DOS command line.
Press »bo«<alt-x>»#« or »bo«<F10>»#« to exit the script when you are finished.
The DO editor responds to wordstar like commands. See the file
»ye«EDITOR.CMD»#« for a set of commands available in the full-screen
editor.
.pg 0
:0
/DOCUMENT OFF
/GOTO End
:OOPS
.bell
»ye«Invalid Chapter»gy«: »+re«%Chapter»#«
.pg -20
:DispTitle
.wi full clr
/SET title %DispTitle01
»re«
%title(C80)
»#«
/BOX 1 1 80 3 14 14 ""
/VERSION
.wi 4 5 80 23
/return
:Arrow
/SET Y {Y}
.wi full
/SET title " "
.go 1 23
%title(L79)
%title(L79)
.go %Arrow01 23 ye
│
.go %Arrow01 24
V
.# wi 4 5 80 22
.go 1 %Y
/RETURN
:End
.wi full clr
/DOCUMENT OFF
/ENDEXEC CLEAR