#cs ----------------------------------------------------------------------------

 AutoIt Version: 3.3.12.0
 Author:         myName

 Script Function:
	Template AutoIt script.

#ce ----------------------------------------------------------------------------
#include <File.au3>

$hGui = GUICreate('Progress',200,100)
$Bar1 = GUICtrlCreateLabel('0/720',10,10,180,20)
$Bar2 = GUICtrlCreateLabel('0/1280',10,40,180,20)
GUISetState(@SW_SHOW)

$Source = FileOpenDialog("Bild","","Images (*.jpg;*.bmp)","","","")
If @error Then Exit

For $y = 0 To 720
	For $x = 0 to 1280
		$xPixel = PixelGetColor($y,$x,$Source)
;~ 		FileWrite(@DesktopCommonDir & '\Pixel.txt','Pixel y: ' & $y & ' & x: ' & $x & ' = ' & $xPixel & @CRLF)
		FileWrite(@DesktopCommonDir & '\Pixel.txt',$xPixel)
		If $x = 1280 Then
			FileWrite(@DesktopCommonDir & '\Pixel.txt',@CRLF)
		EndIf
		GUICtrlSetData($Bar1, $y & ' / 720')
		GUICtrlSetData($Bar2, $x & ' / 1280')
	Next
Next