sListeRessources is string = fListResource()
FOR EACH STRING sNomRessource OF sListeRessources SEPARATED BY CR
sExtension is string = Lower(fExtractPath(sNomRessource, fExtension))
IF sExtension IN (".fic", ".mmo", ".ndx", ".ftx") THEN
fExtractResource(sNomRessource, "bdd" + [fSep()] + sNomRessource)
END
END