This code works as written under Win_vista32, that is pausing if the files does not exist or of the current line does not exist.
but instead it automatically increments under Win_xp and %line% seems to have valid data.
Why? The purpose of the scripts is proof of concept of interprocess communication across computers. (yes I know of wm_messages for the same computer)
the first script reads a file looking for new lines
if there is no line I get the text that includes _____ underscores
Code:
#singleinstance force
#Persistent
;reader
CoordMode, ToolTip, screen
CoordMode, Mouse, screen
filename=tester1.txt
x=600
y=400
b_index=1
loop
{
FileReadLine, line, %filename%, %b_index%
b_errorlevel:=errorlevel ; so I can see the value using listvars
;listvars
;msgbox
if b_errorlevel = 0
{
tooltip, %b_index%:%line% , x, y , 1
b_index++
}
else
tooltip, %b_index%:__________ , x, y , 1
sleep, 200
}
return
+esc::exitapp
f12::reload
the 2nd script appends a line to the file that the 1st reads
Code:
#singleinstance force
#Persistent
; writer
CoordMode, ToolTip, screen
CoordMode, Mouse, screen
b_index=1
filename=tester1.txt
x=600
y=400
b_index=1
settimer, fred, 200
return
fred:
mousegetpos, x, y
Fileappend, test%b_index% x%x% Y%Y%`n, %filename%
b_index++
return
loop
{
Fileappend, test%a_index%`n, %filename%
sleep, 200
}
return
^esc::exitapp
f11::reload
Login
Register
FAQ
Search
