home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Phoenix CD 2.0
/
Phoenix_CD.cdr
/
01e
/
makefile.zip
/
READ.ME
< prev
Wrap
Text File
|
1988-04-06
|
2KB
|
96 lines
Below is a block of code which prepares to call the MAKEFILE.PRG utility.
CREATOR[] is first declared, then the elements are loaded with values which
correspond to the 4 files created with 4 successive calls to MAKEFILE.
The following is excerpted from a working program, and only for purpose
of illustrating how to use the MAKEFILE utility:
Each file name is represented in a variable, and certain fields' lengths
are represented by variables.
clear
@ 10,20 say "Creating new files..."
declare CREATOR[10,4]
**
** for &topload. - 3 fields, each of length represented in a variable value
**
** DETAILTEXTCnnn 0
** TOPIC Cnnn 0
** SUBTOPIC Cnnn 0
**
toploadmin=1
toploadmax=3
CREATOR[1,1]="DETAILTEXT"
CREATOR[1,2]="C"
CREATOR[1,3]=detaillen
CREATOR[1,4]=0
CREATOR[2,1]="TOPIC"
CREATOR[2,2]="C"
CREATOR[2,3]=toplen
CREATOR[2,4]=0
CREATOR[3,1]="SUBTOPIC"
CREATOR[3,2]="C"
CREATOR[3,3]=subtoplen
CREATOR[3,4]=0
**
** for &topic. - 3 fields, one of whose length is represented in a variable
**
** TOPIC Cnnn 0
** FIRSTSUB N 6 0
** LASTSUB N 6 0
**
topicmin=4
topicmax=6
CREATOR[4,1]="TOPIC"
CREATOR[4,2]="C"
CREATOR[4,3]=toplen + 1
CREATOR[4,4]=0
CREATOR[5,1]="FIRSTSUB"
CREATOR[5,2]="N"
CREATOR[5,3]=6
CREATOR[5,4]=0
CREATOR[6,1]="LASTSUB"
CREATOR[6,2]="N"
CREATOR[6,3]=6
CREATOR[6,4]=0
**
** for &subtopic. - 3 fields, one of whose length is represented in a variable
**
** SUBTOPIC Cnnn 0
** FIRSTDET N 6 0
** LASTDET N 6 0
**
subtopicmin=7
subtopicmax=9
CREATOR[7,1]="SUBTOPIC"
CREATOR[7,2]="C"
CREATOR[7,3]=subtoplen + 1
CREATOR[7,4]=0
CREATOR[8,1]="FIRSTDET"
CREATOR[8,2]="N"
CREATOR[8,3]=6
CREATOR[8,4]=0
CREATOR[9,1]="LASTDET"
CREATOR[9,2]="N"
CREATOR[9,3]=6
CREATOR[9,4]=0
**
** for &detail. - 1 field with length represented in a variable
**
** DETAILTEXTCnnn 0
**
detailmin=10
detailmax=10
CREATOR[10,1]="DETAILTEXT"
CREATOR[10,2]="C"
CREATOR[10,3]=detaillen + 1
CREATOR[10,4]=0
** call makefile to create each
do makefile with topload,toploadmin,toploadmax
do makefile with topic,topicmin,topicmax
do makefile with subtopic,subtopicmin,subtopicmax
do makefile with detail,detailmin,detailmax