Parents
  • Ops.. I forgot it :)
    ok, but we may use two files. One for the replacement and one for append)

    -- 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()


Reply
  • Ops.. I forgot it :)
    ok, but we may use two files. One for the replacement and one for append)

    -- 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()


Children
No Data