พี่ อัต คับรบกวนช่วย เช็คโค๊ดให้ผมทีคับ

Code:

Hotkeyset("{END}","out")
if WinExists("Rohan") Then WinActivate ("Rohan")
While 1

$Pixe = PixelGetColor (884, 368)
if $Pixe = 0x0962FDthen
core()
endif
$Pixe = PixelGetColor (884, 368)
if $Pixe = 0x0962FDthen
core2()
endif
$Pixe = PixelGetColor (884, 348)
if $Pixe = 0x0962FDthen
core3()
endif
$Pixe = PixelGetColor (884, 329)
if $Pixe = 0x0962FDthen
core4()
endif
$Pixe = PixelGetColor (884, 308)
if $Pixe = 0x0962FDthen
core5()
endif
$Pixe = PixelGetColor (884, 329)
if $Pixe = 0x0962FDthen
core6()
endif
$Pixe = PixelGetColor (884, 465)
if $Pixe = 0x0962FDthen
dow()
endif
$Pixe = PixelGetColor (884, 543)
if $Pixe = 0x0962FDthen
dow2()
endif
$Pixe = PixelGetColor (884, 524)
if $Pixe = 0x0962FDthen
dow3()
endif
$Pixe = PixelGetColor (884, 485)
if $Pixe = 0x0962FDthen
dow4()
endif
$Pixe = PixelGetColor (884, 504)
if $Pixe = 0x0962FDthen
dow5()
endif
$Pixe = PixelGetColor (884, 563)
if $Pixe = 0x0962FDthen
dow6()
endif
WEnd



Func core()
$Pixe = PixelGetColor (894, 349)
if $Pixe = 0x95D98Ethen
Send("{SPACE}")
EndIf
EndFunc

Func core2()
$Pixe = PixelGetColor (894, 356)
if $Pixe = 0x95D98Ethen
Send("{SPACE}")
EndIf
EndFunc

Func core3()
$Pixe = PixelGetColor (894, 332)
if $Pixe = 0x95D98Ethen
Send("{SPACE}")
EndIf
EndFunc

Func core4()
$Pixe = PixelGetColor (894, 318)
if $Pixe = 0x95D98Ethen
Send("{SPACE}")
EndIf
EndFunc

Func core5()
$Pixe = PixelGetColor (894, 290)
if $Pixe = 0x95D98Ethen
Send("{SPACE}")
EndIf
EndFunc

Func core6()
$Pixe = PixelGetColor (894, 311)
if $Pixe = 0x95D98Ethen
Send("{SPACE}")
EndIf
EndFunc

Func dow()
$Pixe = PixelGetColor (894, 460)
if $Pixe = 0x95D98Ethen
Send("{SPACE}")
EndIf
EndFunc

Func dow2()
$Pixe = PixelGetColor (894, 530)
if $Pixe = 0x95D98Ethen
Send("{SPACE}")
EndIf
EndFunc

Func dow3()
$Pixe = PixelGetColor (894, 517)
if $Pixe = 0x95D98Ethen
Send("{SPACE}")
EndIf
EndFunc

Func dow4()
$Pixe = PixelGetColor (894, 472)
if $Pixe = 0x95D98Ethen
Send("{SPACE}")
EndIf
EndFunc

Func dow5()
$Pixe = PixelGetColor (894, 493)
if $Pixe = 0x95D98Ethen
Send("{SPACE}")
EndIf
EndFunc

Func dow6()
$Pixe = PixelGetColor (894, 548)
if $Pixe = 0x95D98Ethen
Send("{SPACE}")
EndIf
EndFunc

Func out()
Exit
EndFunc

While 1
$Pixe = PixelGetColor (884, 368)
ConsoleWrite(' Pixe = ' & hex($Pixe,6) & @crlf & '>Error code: ' & @error & @crlf)

$Pixe = PixelGetColor (884, 368)
ConsoleWrite(' Pixe = ' & hex($Pixe,6) & @crlf & '>Error code: ' & @error & @crlf)

$Pixe = PixelGetColor (884, 348)
ConsoleWrite(' Pixe = ' & hex($Pixe,6) & @crlf & '>Error code: ' & @error & @crlf)

$Pixe = PixelGetColor (884, 329)
ConsoleWrite(' Pixe = ' & hex($Pixe,6) & @crlf & '>Error code: ' & @error & @crlf)


$Pixe = PixelGetColor (884, 308)
ConsoleWrite(' Pixe = ' & hex($Pixe,6) & @crlf & '>Error code: ' & @error & @crlf)


$Pixe = PixelGetColor (884, 329)
ConsoleWrite(' Pixe = ' & hex($Pixe,6) & @crlf & '>Error code: ' & @error & @crlf)

$Pixe = PixelGetColor (884, 465)
ConsoleWrite(' Pixe = ' & hex($Pixe,6) & @crlf & '>Error code: ' & @error & @crlf)


$Pixe = PixelGetColor (884, 543)
ConsoleWrite(' Pixe = ' & hex($Pixe,6) & @crlf & '>Error code: ' & @error & @crlf)

$Pixe = PixelGetColor (884, 524)
ConsoleWrite(' Pixe = ' & hex($Pixe,6) & @crlf & '>Error code: ' & @error & @crlf)

$Pixe = PixelGetColor (884, 485)
ConsoleWrite(' Pixe = ' & hex($Pixe,6) & @crlf & '>Error code: ' & @error & @crlf)

$Pixe = PixelGetColor (884, 504)
ConsoleWrite(' Pixe = ' & hex($Pixe,6) & @crlf & '>Error code: ' & @error & @crlf)

$Pixe = PixelGetColor (884, 563)
ConsoleWrite(' Pixe = ' & hex($Pixe,6) & @crlf & '>Error code: ' & @error & @crlf)

sleep(100)

WEnd