Need help with file read and comparing

[vamp1repk]

Hi guys,

i'm struggling with a small code concerning fileread.

if got a file with losts of numbers and i want to do a "pixelgetcolor" on screen and check if the colornumber is in the list of numbers in the file... but i dont know how to make "the check"...

someone got an idea? i tried with this

Func check()
    $file = FileOpen("list.txt")
    $life = PixelGetColor(500,850)
    $read = FileRead($file)
        If $read = $life Then  ;__________________ this should happen:
            ToolTip("numer is in list",0,0)
        Else
            ToolTip("number is not in list",0,0)
        EndIf
EndFunc

 

 

[Subz]

Use FileRead to read the file to a string and then use something like StringInStr to find the number within the string.

[ad777]

On 11/14/2021 at 2:23 PM, vamp1repk said:

Hi guys,

i'm struggling with a small code concerning fileread.

if got a file with losts of numbers and i want to do a "pixelgetcolor" on screen and check if the colornumber is in the list of numbers in the file... but i dont know how to make "the check"...

someone got an idea? i tried with this

Func check()
    $file = FileOpen("list.txt")
    $life = PixelGetColor(500,850)
    $read = FileRead($file)
        If $read = $life Then  ;__________________ this should happen:
            ToolTip("numer is in list",0,0)
        Else
            ToolTip("number is not in list",0,0)
        EndIf
EndFunc

 

 

this should work☺️

#include <File.au3>

$FileLine = FileReadToArray("list.txt")
$Lines = @extended
$life = 50
If IsArray($FileLine) Then
    For $i = 1 To $Lines Step 1
       Local $path = StringInStr(FileReadLine("list.txt",$i), 50)
       if $path  Then
      ToolTip("number is in list",0,0)
      FileWriteLine("list.txt",$path)
  ExitLoop
  Else
         ToolTip("number is not in list",0,0)
            EndIf
    Next
EndIf

 

[mikell]

As said @Subz ....

ToolTip(StringInStr(FileRead("list.txt"), $life) ? "number is in list" : "number is not in list", 0, 0)