-- By me_hungry
!currentitem = !!ce
-- values inside not processed file
!readarray = object ARRAY()
-- replacement file dir
!fileelement = object FILE('d:\ReplacementSpecs.txt')
!fileelement.DeleteFile()
-- Output file dir
!uofileelement = object FILE('d:\OutputSpecsFile.txt')
!uofileelement.DeleteFile()
var !spearr coll all spec with(matchwild(name,'*LIMBOSPEC*') ne true) for ce
speconmode
-- formate
do !specs values !spearr
$!specs
-- create file
file /$!fileelement overwrite output ce file end
-- replace /* in file
!readarray = !fileelement.readFile()
-- values inside new file
!valinnewfile = object ARRAY()
do !readval values !readarray
!readval = !readval.replace('*/',!specs.dbref().name + '/')
!valinnewfile.append(!readval)
enddo
!uofileelement.writeFile('APPEND', !valinnewfile)
enddo
exit
$!currentitem
!fileelement.DeleteFile()
-- By me_hungry
!currentitem = !!ce
-- values inside not processed file
!readarray = object ARRAY()
-- replacement file dir
!fileelement = object FILE('d:\ReplacementSpecs.txt')
!fileelement.DeleteFile()
-- Output file dir
!uofileelement = object FILE('d:\OutputSpecsFile.txt')
!uofileelement.DeleteFile()
var !spearr coll all spec with(matchwild(name,'*LIMBOSPEC*') ne true) for ce
speconmode
-- formate
do !specs values !spearr
$!specs
-- create file
file /$!fileelement overwrite output ce file end
-- replace /* in file
!readarray = !fileelement.readFile()
-- values inside new file
!valinnewfile = object ARRAY()
do !readval values !readarray
!readval = !readval.replace('*/',!specs.dbref().name + '/')
!valinnewfile.append(!readval)
enddo
!uofileelement.writeFile('APPEND', !valinnewfile)
enddo
exit
$!currentitem
!fileelement.DeleteFile()