13 replies to this topic

[para000]

Hi.
I wanna ask you guys if anyone know how to make a scrip that do the fallowing:
I have a .txt file whit a lot of this line that look like this:

<Waypoint>[color=red]-9373.636 -961.6185 173.3781[/color]</Waypoint>

and i wanna convert every line (have like 500+ line) into:

<Hotspot X="[color=red]-9373.636[/color]" Y="[color=red]-961.6185[/color]" Z="[color=red]173.3781[/color]" />

do anyone know how to do it?
Thanks very much and if you need more details just ask.

[para000]

There will be dozens of ways to do it.
The most important thing you have to do is to learn regular expressions.

sorry buy i`m a beginner in programming . don't really know how to start it.

[para000]

k...i will try to understand it... thanks for your hlep

[para000]

Study

Reads a file's contents into a variable.
Source: http://www.autohotke...ds/FileRead.htm

then parse the variable in a

Retrieves substrings (fields) from a string, one at a time.
Source: http://www.autohotke...s/LoopParse.htm

and save it to a new file with

Writes text to the end of a file (first creating the file, if necessary).
Source: http://www.autohotke.../FileAppend.htm

while parsing the file line by line you can use the following RE to rewrite the line and save it to a new file

line=<Waypoint>-9373.636 -961.6185 173.3781</Waypoint>
MsgBox % RegExReplace(line,"<Waypoint>(.*) (.*) (.*)</Waypoint>","<Hotspot X=""$1"" Y=""$2"" Z=""$3"" />")

Try something, post code if you get stuck.

Note that you can do the above in any decent text editor that supports a regular expression find/replace (such as notepad++)

in a editor is not working because i can`t replace something that not exist.

[Odlanir]

file=

(join`r`n

<Waypoint>-9373.143 -999.1444 666.2222</Waypoint>

<Waypoint>-1334.326 -741.7812 333.3333</Waypoint>

<Waypoint>-6667.455 -278.9638 999.4444</Waypoint>

<Waypoint>-2977.876 -658.1963 888.5555</Waypoint>

<Waypoint>-3496.681 -189.2561 444.6666</Waypoint>

)

run, notepad,,,PID

WinWaitActive, ahk_pid %PID% 

ControlSetText, Edit1,%file%,ahk_pid %PID% 

file := RegExReplace(File,"m`a)<Waypoint>(.*) (.*) (.*)</Waypoint>","<Hotspot X=""$1"" Y=""$2"" Z=""$3"" />")

MsgBox Now your data will change

ControlSetText, Edit1,%file%,ahk_pid %PID% 

return



esc::

	WinClose,ahk_pid %PID% 

	ExitApp

return

[para000]

is there any way i can make the scrip read a .txt instead copying the text in the scrip. Because the script can`t read to may rows i have like 100 rows that i need to replace and i need to copy paste on the script every time 20 of them in script.

So i want to read a .txt the data replace it and post it on a new .txt

Thx very much if anyone can help me

Loop read, c:\data.txt
   newdata := A_LoopReadLine "`n" newdata

FileAppend %newdata%, c:\newdata.txt

This is a script that i have found on the forum that read data from a txt and place it on another .txt. Prob can help you.

Thx again.

[engunneer]

Study

Reads a file's contents into a variable.
Source: http://www.autohotke...ds/FileRead.htm

[para000]

the point is that i don`t understand that much. I know some basic AHK but what you give me to read is very complicated. So if someone can show me i will be very grateful. i really don`t know how to make this.

sorry for asking this much.

[engunneer]

replace

file=
(join`r`n
<Waypoint>-9373.143 -999.1444 666.2222</Waypoint>
<Waypoint>-1334.326 -741.7812 333.3333</Waypoint>
<Waypoint>-6667.455 -278.9638 999.4444</Waypoint>
<Waypoint>-2977.876 -658.1963 888.5555</Waypoint>
<Waypoint>-3496.681 -189.2561 444.6666</Waypoint>
)

with

FileRead, file, C:\data.txt

file is the name of the variable that now holds the text from your file.

Alternately, your example from before

Loop read, c:\data.txt
   newdata := A_LoopReadLine "`n" newdata
;...

is basically the same thing, but inefficient. It does read the file into newdata.

I am hoping you understand the basic concept of variables?

[para000]

Thx guys. I manage to make it whit your help.

here is the scrip if anyone on the forum will need it.

FileRead, file, C:\data.txt
file := RegExReplace(File,"m`a)  <Waypoint>(.*) (.*) (.*)</Waypoint>","<Hotspot X=""$1"" Y=""$2"" Z=""$3"" />")
FileAppend %file%, c:\newdata.txt
return

esc::
ExitApp
return

Thanks again guys.