Jump to content

plz help how to organize from notepad or Ini file


Recommended Posts

plz help how to organize information from notepad or INIfile

Example:

0=000308
1=000308
2=000308
3=000308
4=000408
5=000408
6=000408
7=000408
8=000408
9=000408
10=000308
11=000308
12=000308
13=000408
14=000408
15=000408
16=000408
17=000408
18=000408
19=000408
20=000308
21=000308
22=000308
23=000408
24=000408
25=000408
26=000408
27=000408
28=000408
29=000408
30=000308

 0=000308 x 11 total

 1=000408 x 20 total

2 lines summary all

 

Thank you

 

Edited by chacoya121
Link to comment
Share on other sites

read data and organize and count total of each result

0=000308
1=000308
2=000308
3=000308
4=000408
5=000408
6=000408
7=000408
8=000408
9=000408
10=000308
11=000308
12=000308
13=000408
14=000408
15=000408
16=000408
17=000408
18=000408
19=000408
20=000308
21=000308
22=000308
23=000408
24=000408
25=000408
26=000408
27=000408
28=000408
29=000408
30=000308

total = 11x 000308
total = 20x 000408

 

Edited by chacoya121
Link to comment
Share on other sites

You can try something like:

#include <Array.au3>
#include <File.au3>

Local $aArray, $a000308[1][2], $a000408[1][2]
_FileReadToArray("Dummy01.txt", $aArray, $FRTA_COUNT, "=")
For $i = 1 To $aArray[0][0]
    If $aArray[$i][1] = "000308" Then
        _ArrayAdd($a000308, $aArray[$i][0] & "|" & $aArray[$i][1])
    Else
        _ArrayAdd($a000408, $aArray[$i][0] & "|" & $aArray[$i][1])
    EndIf
Next
$a000308[0][0] = UBound($a000308) - 1
$a000408[0][0] = UBound($a000408) - 1
_ArrayDisplay($a000308)
_ArrayDisplay($a000408)
_ArrayDisplay($aArray)

 

Link to comment
Share on other sites

another way,

#include <Array.au3>

Local $sum[1][2], $find, $index, $count = 0, $source = IniReadSection("new.ini", "section")

Local $tmp = _Array_FromColumn($source, 1)

Local $ini = _ArrayUnique($tmp, Default, Default, 1, 0)

For $i = UBound($ini) - 1 To 1 Step -1
    $find = $ini[$i]
    $index = UBound($source) - 1
    Do
        $index = _ArraySearch($source, $find, 0, $index - 1, 1, 0, 0, 1)
        If Not @error Then
            $count += 1
        EndIf
    Until @error Or $index <= 1
    _ArrayAdd($sum, $find & "," & " x " & $count, 0, ",")
    $sum[0][0] += 1
    $count = 0
Next

_ArrayDisplay($sum)

Func _Array_FromColumn(ByRef $aArray, $iColumn = 0, $istart = 1)
    Local $aArray1D = ['']
    For $i = $istart To UBound($aArray) - 1
        _ArrayAdd($aArray1D, $aArray[$i][$iColumn])
    Next
    Return $aArray1D
EndFunc   ;==>_Array_FromColumn

 

Edited by Deye
Link to comment
Share on other sites

HotKeySet("{Home}", "Start")
HotKeySet("{Esc}", "MyExit")

Global $colorcount = 0

While 1
    Sleep(100)
WEnd

Func MyExit()
    Exit
EndFunc

Func Start()
    For $i = 0 to 9 Step +1
        For $j = 0 to 9 Step +1
            $color = PixelGetColor($i,$j)
            IniWrite("Color Code.ini","Color",$colorcount,Hex($color,6))
            $colorcount += 1
        Next
    Next
EndFunc

can someone help me organize this color count, i m just curious how it work, cuz i try to figure out how it work but soo confusing me, im low lvl programing and sorry for my english

Edited by chacoya121
Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
×
  • Create New...