Hi All,

   I cant figure out why all the discussion about how hard Adept is to set
up.  It's really pretty easy.  If you're starting from scratch, it easy. 
If you're converting from another BBS package, it takes a bit more because
you have more to convert.  As long as you have files.bbs files, the file
base is easy to set up...but like any other program, if you have hundreds
of file areas, it's more work than 2 :) You can always write a REXX script
to convert them.

Ok, so lets say you have 300 file areas.  If you are like me, your
directory names are the same as the file area names. (ie. FWBBS is
d:\adept\fwbbs) and if you are lucky (or smart like me :) your directory
structure is the same for all your areas, although your disk letter might
be different if you span more than one disk.   Anyway, with a setup like
that, first you need to create a list of all your dir names and their
descriptions into a file called "dirnames" (how original :)

dirnames
---cut-------
GENPC              General PC Compatible Stuff
PCCOMM             PC Compatible Communications Programs and Files
diskutl            Disk Utilities
dirman             Directory Managers and Shells
dosutl             DOS Utilities and Files
wordpro            Wordprocessors, Editors, and Listers
dosapps            Applications Prgs. (dBase, 123, etc.)
archivers          File Compression Utilities
games              Games
apggames           Apogee Games
lang               Languages
etc..............

---cut-------

Then, modify the REXX script below.  You'll probably want to modify the
DLPATH and ULPATH.  I have all my files go into an uploaf areas so ULPATH
is the same for all areas.  The DLPATH has the same dir structure for each
area, modified by the area name.  If you span more than one disk with your
areas, just go back and edit the resultant file_areas file for the proper
disk.

This will create your 300 areas in about 2 min.  Yes, the resultant file
will still need some editing, but not much.

/* Create File_Areas file from a list of directory names */
f=1
file='dirnames'
farea = 'File_Areas'
do until lines('dirnames')=0
  param.f=linein('dirnames')
say param.f
      f=f+1
end
  e=1
num='192'
do until e > f
parse var param.e area desc
say num area desc
call lineout farea, 'AREABEGIN'
call lineout farea, 'NAME     'area
call lineout farea, 'NUMBER   'num
call lineout farea, 'DESC     'strip(desc)
call lineout farea, 'DLPATH   d:\adept\'area
call lineout farea, 'ULPATH   d:\OPUS\incoming'
call lineout farea, 'SSEC1    10'
call lineout farea, 'SFLAGS1  10'
call lineout farea, 'SFLAGS2  10'
call lineout farea, 'FLAGS    2'
call lineout farea, 'AREAEND'
e=e+1
num=num+1
end
---cut-------

Or maybe you want to create yor message_areas file from your areal.contro file:

---cut-------
/*  Create Message_areas from Area.control  */
f=1
ma='Message_Areas'
do until lines('area.control')=0
  param.f=linein('area.control')
    f=f+1
    end
e=1
do until e > f
parse var param.e echo name num address junk
say name num address
call lineout ma,  'AREABEGIN'
call lineout ma,  'NAME' name
call lineout ma,  'NUMBER' num
call lineout ma,  'DESC' name
call lineout ma,  'ORIGIN  The Cereal Port BBS 603-899-3335 199.125.78.133'
call lineout ma,  'SSEC1    10'
call lineout ma,  'SSEC2    10'
call lineout ma,  'SFLAGS1 10'
call lineout ma,  'SFLAGS2 10'
call lineout ma,  'FLAGS   2328'
call lineout ma,  'ADDRESS' address
call lineout ma,  'AREAEND'
e=e+1
end
---cut-------


Bill Esposito 
bespo{at}cereal.mv.com 
http/ftp/telnet cereal.mv.com
 
 
--- JAdeptWebEd v 1.11