Not sure what this is for, but found it sitting around, someone might be able
to use it.

Adam
!���������������������������������������������������������������������������Ŀ
!� Mod Name: VVEDIT.V                      Mod Author: Silly Boy 1@5035      �
!� Difficulty: SIMPLE!                     Date: 10-23-92                    �
!� VBBS Version: 5.52                      Type: Script                      �
!� Description: Create VV*.NET and V*.NET files without dropping to dos      �
!�              edit paths, compile, and add to your Sysop Menu              �
!�                                                                           �
!�              ? 255 2 VVEDIT                                               �
!�����������������������������������������������������������������������������
! please take time to email 1@5035 if you use this...just for logistics
! reasons... and to let me know its getting some use.
# makev
tr $clear
ts "-==-----------Secured Subs VV Net"
tr " File Maker/Editor------------== "
tr
rr $secure MEH "Please Select One! M/Make E/Edit H/Help  "
test $secure = M make
test $secure = E Edit
test $secure = H Help
# help
Tr "Make command will make a VV*.NET file for a secured sub"
Tr "Edit command will create/append a V*.NET file for a Hosted Sucured Sub."
Tr "on the edit command, the first time you create the file, it will show"
tr "it missing.. this is normal cause I added a feature to show you whats"
tr "in the file so you dont add a bbs twice."
Tr "Help Command brings you here"
pause
go makev
# edit
tr
tr "Please Enter the sub number to edit now. "
rw $line1 "=-> "
test $line1 = "" none
$file = "D:\VBBS\NET\V" & $line1 & ".net"
tr
tr "the contents of " $file " is..."
ef $file
tr
tr "Please Enter the BBS NODE to ADD now. "
rw $infile "=-> "
test $infile = "" none

$logtext = $handle & " updated V file for the secured sub # " & $line1
log $logtext

open $file append
write $infile
close

tr "File " $file " now updated"
call sbhere
pause
exit sysop
# make
tr
tr "Please Enter the sub number now. "
tr
rw $line1 "=-> "
test $line1 = "" none
setextra 8 $line1
$file = "D:\VBBS\NET\VV" & $line1 & ".net"
$infile = $extra8 MID 2

$logtext = $handle & " created VV file for the secured sub # " & $extra8
log $logtext

open $file output
write $infile
close
setextra 8 0
tr "File " $file " now created"
pause
# none
call sbhere
exit sysop
# sbhere
Tr "                                 ����������92�"
Tr "                    Another Fine ����script�� Util "
Tr "             Main Street BBS  503-826-1525  VirtualNET 1@5035"
Tr "          Dirtibuted in 2001 by Tucson Online telnet Hillcows.com"
ret

���������������-[ Aspect  Network @1520000 Virtual ADV 2.10 ]���������������Ŀ
� >> TELNET  HillCows.com  <<  Tucson Online BBS >> Elevation - Who Cares << �
�[   Virtual Advance    ]    Tucson Arizona 85730   [ AspectNet 1@1520000   ]�