pixelgetcolor 속도 관련 질문드립니다

SetBatchLines,-1

F1::

시작 := A_TickCount

x := 1

y := 1

x1 := 2

y1 := 1

x2 := 1

y2 := 2

x3 := 2

y3 := 2

loop

{

pixelgetcolor, a, x, y,RGB 

pixelgetcolor, b, x1, y1,RGB 

pixelgetcolor, c, x2, y2,RGB

pixelgetcolor, d, x3, y3,RGB

x:= x + 5

if (x > 1000)

{

x := 1

y:= y + 5

if (y > 1000)

{

break

}

}

}

걸린시간 := A_TickCount - 시작

MsgBox, % 걸린시간

return

나름대로 제가 짠 스크립트인데요..

xy 좌표 1,1 ~ 1000,1000 까지 2x2 크기의 픽셀값을 따오는 스크립트? 입니다.

xy 값을 5씩 늘려줬는데도 속도가 거의 5초가 나오네요.. 비슷한 함수나 더 빠르게는 못 만들까요?

답글