FileWrite problem

[pingpong24]

#include <File.au3>

WinWaitActive ( "Untitled" )

While WinExists ("Untitled") = 1

If Random() < 0.5 Then

If FileExists("timer.ini") Then

$file = FileOpen("timer.ini", 1)

FileWrite($file, "0")

FileClose($file)

Else

_FileCreate("timer.ini")

$file = FileOpen("timer.ini", 1)

FileWrite($file, "0")

FileClose($file)

EndIf

EndIf

WEnd

Now it should just put 1 zero into the file timer.ini instead it puts endless amounts..

Edited December 10, 2005 by pingpong24

[Jos]

If FileExists("timer.ini") Then

$file = FileOpen("timer.ini", 1)

FileWrite($file, "0")

FileClose($file)

Else

_FileCreate("timer.ini")

$file = FileOpen("timer.ini", 1)

FileWrite($file, "0")

FileClose($file)

EndIf

Now it should just put 1 zero into the file timer.ini instead it puts endless amounts..

If it writes multiple zeros to the file then I am sure theres more code then what you have shown..OR if you want to replace the current content of the file with a Zero you should open the file with 2.(1 means append)

I also don't understand why you just use a single line like:

FileWite("timer.ini",0)

The result is the same as the code you show.

Edited December 10, 2005 by JdeB

[pingpong24]

#include <Misc.au3>

#include <File.au3>

WinWaitActive ( "Untitled" )

While WinExists ("Untitled") = 1

If _IsPressed('30') = 1 Then

;Sleep(700)

If FileExists("timer.ini") Then

FileWrite("timer.ini", "0")

FileClose("timer.ini")

Else

_FileCreate("timer.ini")

;Sleep(700)

FileWrite("timer.ini", "0")

FileClose("timer.ini")

EndIf

EndIf

WEnd

without sleep it gives too many zeros.. for some unknown reason.. can someone explain.. also if the sleep isnt more then 700.. it does the same.

Edited December 10, 2005 by pingpong24

[GaryFrost]

sleep allows the buffer to be cleared from a keypress

[Jos]

The reason for your problem is that the If is true for the time you press the 0 key.

This logic will only execute the 0 logic one time when you press the 0 key.

#include <Misc.au3>
#include <File.au3>
Global $LastKey = 0
WinWaitActive("Untitled") 

While WinExists("Untitled") = 1
    
    If _IsPressed ('30') Then 
       ;Sleep(700)
        If $LastKey = 0 Then 
            FileWrite("timer.ini", "0")
        EndIf
        $LastKey = 30
    Else
        $LastKey = 0        
    EndIf
WEnd

[Knight]

why filewrite to an ini, and not use iniwrite?

[Gene]

why filewrite to an ini, and not use iniwrite?

IniWrite applies a specific format to the data written to the INI file, IniRead expects the same specific format in an INI file. He apparently wants the 'timer.ini' file with no internal format and a '0' on the first line. Of course he may or may not use the standard format in later operations.

[pingpong24]

The reason for your problem is that the If is true for the time you press the 0 key.

This logic will only execute the 0 logic one time when you press the 0 key.

#include <Misc.au3>
#include <File.au3>
Global $LastKey = 0
WinWaitActive("Untitled") 

While WinExists("Untitled") = 1
    
    If _IsPressed ('30') Then 
      ;Sleep(700)
        If $LastKey = 0 Then 
            FileWrite("timer.ini", "0")
        EndIf
        $LastKey = 30
    Else
        $LastKey = 0        
    EndIf
WEnd

THANKS!! you helped me alot, the program is working fine now!! really appreate it.. though i wanted to make it all by my self without anyones help

[seandisanti]

THANKS!! you helped me alot, the program is working fine now!! really appreate it.. though i wanted to make it all by my self without anyones help

so is it just a plain keylogger?