Clipper/FiveWin - Modificar un Archivo

Alguien me prodira hechar una mano

necesito abrir un archivo de texto el cual contiene inforacion del topo

02323 23 234343 45 657 656m6 6 756
0 45io4534834345843958485908590948902349329
0454398549490509438906
03498438978798 3489878 5 3487957893489 348347857845
057834784784578 469 459 45 99 78999

y necesito modificar el primer digito de cada linea,

Podria alguien echarme un mano

ya que yo estudie cllipper hace algun timepo pero ya no m eacuerdo de nada.

Gracias de antemano

Amigo Jose, no especificastes como lo quieres modificar el primer digito, automatico o manual.

Te presento ambas opciones
carchivo:=memoread("topo.txt")
nlineas:=mlcount(carchivo)
// de manera automatico
for napunta:=1 to nlineas
clinea:=memoline(carchivo,napunta)
csalida:=csalida+"X"+subs(clinea,2)+chr(13)+chr(10)
next
memowrit("texto.txt",csalida)

// de manera manual
memowrit("texto.txt",memoedit(carchivo))

Nota: revisa la sintaxis de las funciones ya que las hice de memoria.

Saludos
Raúl Noguera
Cagua - Venezuela