매크로
질문
2018.07.08 14:28

오토잇 조금이라도 하시는분 !! 도와줘요

겜못알
조회 수 84 추천 0 댓글 0
이게 위치는 잘찾는데 드래그가 않되요 도와주세요 ㅠㅠ

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Compile_Both=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <MsgBoxConstants.au3>
#include <AutoItConstants.au3>
#include <GDIPlus.au3>
#include <Timers.au3>
;~ #include <ScreenCapture.au3>

global $y = 0, $x = 0, $Input[39],$i1,$i2,$hBitmap
#Region ### START Koda GUI section ### Form=c:\users\administrator\desktop\growstone\form1.kxf
$Form1_1 = GUICreate("auto ghep da", 300, 120, 192, 124)
$Button1 = GUICtrlCreateButton("Run | Ctrl+Q= exit", 56, 85, 139, 30)
$Button2 = GUICtrlCreateButton("Move", 9, 85, 43, 30)
$Input[00] = GUICtrlCreateLabel("", 8, 8, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[01] = GUICtrlCreateLabel("", 32, 8, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[02] = GUICtrlCreateLabel("", 56, 8, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[03] = GUICtrlCreateLabel("", 80, 8, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[04] = GUICtrlCreateLabel("", 104, 8, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[05] = GUICtrlCreateLabel("", 128, 8, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[06] = GUICtrlCreateLabel("", 152, 8, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[07] = GUICtrlCreateLabel("", 176, 8, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[10] = GUICtrlCreateLabel("", 8, 32, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[11] = GUICtrlCreateLabel("", 32, 32, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[12] = GUICtrlCreateLabel("", 56, 32, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[13] = GUICtrlCreateLabel("", 80, 32, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[14] = GUICtrlCreateLabel("", 104, 32, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[15] = GUICtrlCreateLabel("", 128, 32, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[16] = GUICtrlCreateLabel("", 152, 32, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[17] = GUICtrlCreateLabel("", 176, 32, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[20] = GUICtrlCreateLabel("", 8, 56, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[21] = GUICtrlCreateLabel("", 32, 56, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[22] = GUICtrlCreateLabel("", 56, 56, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[23] = GUICtrlCreateLabel("", 80, 56, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[24] = GUICtrlCreateLabel("", 104, 56, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[25] = GUICtrlCreateLabel("", 128, 56, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[26] = GUICtrlCreateLabel("", 152, 56, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Input[27] = GUICtrlCreateLabel("", 176, 56, 20, 21, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Label1 = GUICtrlCreateLabel("", 208, 8, 36, 17, $WS_BORDER)
$Label2 = GUICtrlCreateLabel("", 254, 8, 36, 17, $WS_BORDER)
$Label3 = GUICtrlCreateLabel("", 208, 24, 36, 17, $WS_BORDER)
$Label4 = GUICtrlCreateLabel("", 254, 24, 36, 17, $WS_BORDER)
$Input25 = GUICtrlCreateInput("1", 208, 69, 25, 21)
$idCheckbox = GUICtrlCreateCheckbox("Lock", 240, 72, 49, 17)
$Label6 = GUICtrlCreateLabel("Rare MAX ", 208, 45, 80, 20, BitOR($SS_CENTER,$SS_CENTERIMAGE,$WS_BORDER))
$Label7 = GUICtrlCreateLabel("0", 197, 96, 15, 17)
$Label8 = GUICtrlCreateLabel("", 250,100, 50, 20, BitOR($SS_RIGHT,$SS_CENTERIMAGE))
GUICtrlSetFont(-1, 10, 800, 0, "SimSun")
GUICtrlSetColor(-1, 0x0000FF)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Global $title = WinGetHandle(("[CLASS:Qt5QWindowIcon]"))
While 1
HotKeySet("^q",'dung')
 $nMsg = GUIGetMsg()
 Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit
        Case $Button2
  move()
  Case $Button1
  GUICtrlSetData($Button1,"Stop | Ctrl+Q= exit")
  move()
  Sleep(150)
  MouseClick('left',461, 91,1,5) ;click button X
  MouseClick('left',495, 495,1,3) ;click button -
Sleep(150)
PixelSearch(85, 618,130, 639,0x444444); check auto attack
If Not @error Then ControlClick(WinGetTitle("[CLASS:Qt5QWindowIcon]"),'','','left',1,102, 628)
PixelSearch(85, 618,130, 639,0xFCBC50); check auto attack2
If Not @error Then ControlClick(WinGetTitle("[CLASS:Qt5QWindowIcon]"),'','','left',2,102, 628)
MouseClick('left',494, 703,1,3) ;click button +
  Sleep(100)
  loop()
 EndSwitch
WEnd
Func loop()
While 1
 Local $hStarttime = _Timer_Init()
PixelSearch(458, 88,465, 95,0xD0D0D0); check auto attack
If Not @error Then ControlClick($title,'','','left',1,480, 80) ;click button X
  $nMsg = GUIGetMsg()
                If $nMsg = $Button1 Then
                    $Abort = MsgBox(36, "Stop?", "Are you sure you want to Stop?")
                        If $Abort = 6 Then
       GUICtrlSetData($Button1,"RUN | Ctrl+Q= exit")
                            ExitLoop
                            Return
                        EndIf
    EndIf
_GDIPlus_Startup()
$hBitmap = Capture_Window($title, 469, 691)
;~  For $i1=0 to 2
;~  For $i2=0 to 7
;~   GUICtrlSetData($Input[$i1&$i2],'')
;~  Next
;~  Next
lv1(1,0x69382f,0x894d47,0xce6c5e,0x4f2726)
lv2(2,0x676767,0x9f9f9f,0xe4e4e4,0xffffff)
lv3(3,0x525252,0x676767,0x9f9f9f,0x3c3c3c)
lv4(4,0x291e27,0x443c48,0x443c48,0x291e27)
lv5(5,0x8F4526,0x8F4526,0x8F4526,0x8F4526)
lv6(6,0xFFFFFF,0xFFFFFF,0xFFFFFF,0xFFFFFF)
lv7(7,0xC66518,0xC66518,0xC66518,0xC66518)
lv8(8,0x246148,0x246148,0x122E22,0x327443)
lv9(9,0x6ABE30,0x6ABE30,0x6ABE30,0x6ABE30)
lv10(10,0x45F8FF,0x45F8FF,0xFFFFFF,0x0FB0FD)
lv11(11,0x6D2E0B,0xD9A066,0xF48E61,0x8F4526)
lv12(12,0xA85C3C,0x6D2E0B,0x6D2E0B,0xA85C3C)
lv13(13,0x9F9F9F,0x5A5A5A,0x5A5A5A,0x9F9F9F)
lv14(14,0xE39629,0xE39629,0xFBF236,0xE39629)
lv15(15,0xDD9500,0xFBF236,0xFBF236,0xDD9500)
lv16(16,0xFBF236,0xFFFFFF,0xFFFFFF,0xFBF236)
lv17(17,0xFFFFFF,0xFBF236,0xFFFFFF,0xFFFFFF)
lv18(18,0xA4C6D3,0xA4C6D3,0xFFFFFF,0xC6DCE0)
lv19(19,0x0fb0fd,0x0fb0fd,0xffffff,0x45f8ff)
lv20(20,0x16a5f6,0x256ae9,0xffffff,0x256ae9)
lv21(21,0xfbf236,0xfbf236,0xffffff,0xf8a834)
lv22(22,0xffffff,0xffffff,0xea6b33,0xea6b33)
lv23(23,0xffffff,0xffffff,0xc6dce0,0xc6dce0)
lv24(24,0x488868,0x488868,0xeec39a,0x488868)
check1()
$hBitmap = Capture_Window($title, 469, 691)
lv0 (0,0x947850,0x947850,0xB09468,0x947850)
lv00(0,0x68ba46,0x68ba46,0x77c852,0x68ba46)
 If _IsChecked($idCheckbox) Then
  Else
  if GUICtrlRead($Label7)<1 then GUICtrlSetData($Input25,GUICtrlRead($Input25)+1)
 EndIf
 GUICtrlSetData($Label7,0)

  ; save IMAGE
;~ _GDIPlus_ImageSaveToFile($hBitmap, @ScriptDir & "AutoItVN.jpg")
;~ _GDIPlus_BitmapDispose($hBitmap)
;~ ShellExecute(@ScriptDir & "AutoItVN.jpg")
_GDIPlus_Shutdown()
GUICtrlSetData($Label8,Ceiling(_Timer_Diff($hStarttime))&' MS')  ; check time mouse click DRAG
WEnd
EndFunc

func check1()
For $i=1 to GUICtrlRead($Input25)
 For $i1=0 to 2
 For $i2=0 to 7
  If GUICtrlRead($Input[$i1&$i2]) = $i Then
   GUICtrlSetData($Input[$i1&$i2],'')
   GUICtrlSetData($Label1,Abs(50+($i2*56)))
   GUICtrlSetData($Label2,Abs(550+($i1*56)))
   ExitLoop(2)
  EndIf
 Next
 Next
 For $i1=2 to 0 step -1
 For $i2=7 to 0 Step -1
  If GUICtrlRead($Input[$i1&$i2]) = $i Then
   GUICtrlSetData($Input[$i1&$i2],'')
   GUICtrlSetData($Label3,Abs(50+($i2*56)))
   GUICtrlSetData($Label4,Abs(550+($i1*56)))
   ExitLoop(2)
  EndIf
 Next
 Next
If GUICtrlRead($Label1)<>'' and GUICtrlRead($Label3)<>''  then
if GUICtrlRead($Label2)<>'' and GUICtrlRead($Label4)<>'' then
if GUICtrlRead($Label1)<>   GUICtrlRead($Label3)   then
MouseClickDrag('left',GUICtrlRead($Label3),GUICtrlRead($Label4),GUICtrlRead($Label1),GUICtrlRead($Label2),1)
Sleep(150)
EndIf
EndIf
EndIf
 GUICtrlSetData($Label1,'')
 GUICtrlSetData($Label2,'')
 GUICtrlSetData($Label3,'')
 GUICtrlSetData($Label4,'')
Next
EndFunc

func lv0($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
$Color1 = _GDIPlus_BitmapGetPixel($hBitmap,40+($i2*56), 550+($i1*56))
$Color2 = _GDIPlus_BitmapGetPixel($hBitmap,65+($i2*56), 550+($i1*56))
$Color3 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 540+($i1*56))
$Color4 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 565+($i1*56))
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
  GUICtrlSetData($Label7,GUICtrlRead($Label7)+1)
 EndIf
 Next
 Next
EndFunc
func lv00($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
$Color1 = _GDIPlus_BitmapGetPixel($hBitmap,40+($i2*56), 550+($i1*56))
$Color2 = _GDIPlus_BitmapGetPixel($hBitmap,65+($i2*56), 550+($i1*56))
$Color3 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 540+($i1*56))
$Color4 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 565+($i1*56))
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
  GUICtrlSetData($Label7,GUICtrlRead($Label7)+1)
 EndIf
 Next
 Next
EndFunc
func lv1($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,35+($i2*56), 550+($i1*56)) ; trai ;0x69382f
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,60+($i2*56), 555+($i1*56)) ; phai ;0x894d47
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,45+($i2*56), 540+($i1*56)) ; tren ;0xce6c5e
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 560+($i1*56)) ; duoi ;0x4f2726
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv2($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,35+($i2*56), 550+($i1*56)) ; trai ;0x676767
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,63+($i2*56), 552+($i1*56)) ; phai ;0x9f9f9f
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 544+($i1*56)) ; tren ;0xe4e4e4
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,45+($i2*56), 550+($i1*56)) ; duoi ;0xffffff
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv3($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
$Color1 = _GDIPlus_BitmapGetPixel($hBitmap,35+($i2*56), 550+($i1*56)) ; trai ;0x525252
$Color2 = _GDIPlus_BitmapGetPixel($hBitmap,60+($i2*56), 555+($i1*56)) ; phai ;0x676767
$Color3 = _GDIPlus_BitmapGetPixel($hBitmap,45+($i2*56), 540+($i1*56)) ; tren ;0x9f9f9f
$Color4 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 560+($i1*56)) ; duoi ;0x3c3c3c
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv4($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,35+($i2*56), 550+($i1*56)) ; trai ;0x291e27
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,65+($i2*56), 550+($i1*56)) ; phai ;0x443c48
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,45+($i2*56), 535+($i1*56)) ; tren ;0x443c48
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,45+($i2*56), 565+($i1*56)) ; duoi ;0x291e27
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv5($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
   $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,40+($i2*56), 553+($i1*56)) ; trai
   $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,58+($i2*56), 547+($i1*56)) ; phai
   $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,47+($i2*56), 540+($i1*56)) ; tren
   $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 560+($i1*56)) ; duoi
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv6($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,40+($i2*56), 550+($i1*56))
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,57+($i2*56), 550+($i1*56))
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,49+($i2*56), 541+($i1*56))
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,49+($i2*56), 559+($i1*56))
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv7($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,40+($i2*56), 550+($i1*56)) ; trai
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,57+($i2*56), 550+($i1*56)) ; phai
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,49+($i2*56), 541+($i1*56)) ; tren
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,49+($i2*56), 560+($i1*56)) ; duoi
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv8($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,40+($i2*56), 548+($i1*56)) ; trai
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,57+($i2*56), 548+($i1*56)) ; phai
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,49+($i2*56), 541+($i1*56)) ; tren
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,49+($i2*56), 560+($i1*56)) ; duoi
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv9($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,37+($i2*56), 550+($i1*56)) ; trai
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,60+($i2*56), 550+($i1*56)) ; phai
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 538+($i1*56)) ; tren
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 562+($i1*56)) ; duoi
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv10($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,39+($i2*56), 545+($i1*56)) ; trai
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,60+($i2*56), 545+($i1*56)) ; phai
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 538+($i1*56)) ; tren
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 560+($i1*56)) ; duoi
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv11($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,36+($i2*56), 545+($i1*56)) ; trai
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,62+($i2*56), 561+($i1*56)) ; phai
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 538+($i1*56)) ; tren
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 560+($i1*56)) ; duoi
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv12($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,42+($i2*56), 549+($i1*56)) ; trai
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,46+($i2*56), 542+($i1*56)) ; phai
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,47+($i2*56), 543+($i1*56)) ; tren
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,52+($i2*56), 559+($i1*56)) ; duoi
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv13($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,42+($i2*56), 549+($i1*56)) ; trai
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,46+($i2*56), 542+($i1*56)) ; phai
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,47+($i2*56), 543+($i1*56)) ; tren
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,52+($i2*56), 559+($i1*56)) ; duoi
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv14($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,39+($i2*56), 550+($i1*56)) ; trai
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,57+($i2*56), 547+($i1*56)) ; phai
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,51+($i2*56), 542+($i1*56)) ; tren
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,57+($i2*56), 560+($i1*56)) ; duoi
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv15($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,35+($i2*56), 561+($i1*56)) ; trai
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,65+($i2*56), 550+($i1*56)) ; phai
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,61+($i2*56), 537+($i1*56)) ; tren
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,45+($i2*56), 566+($i1*56)) ; duoi
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv16($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,41+($i2*56), 546+($i1*56)) ; trai
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 547+($i1*56)) ; phai
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,53+($i2*56), 534+($i1*56)) ; tren
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,47+($i2*56), 562+($i1*56)) ; duoi
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv17($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,60+($i2*56), 550+($i1*56)) ; trai
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,38+($i2*56), 548+($i1*56)) ; phai
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 533+($i1*56)) ; tren
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,60+($i2*56), 560+($i1*56)) ; duoi
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv18($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,35+($i2*56), 555+($i1*56)) ; trai
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,60+($i2*56), 553+($i1*56)) ; phai
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 540+($i1*56)) ; tren
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 564+($i1*56)) ; duoi
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv19($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,45+($i2*56), 550+($i1*56)) ; trai  ;0x0fb0fd
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,63+($i2*56), 550+($i1*56)) ; phai  ;0x0fb0fd
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,50+($i2*56), 547+($i1*56)) ; tren  ;0xffffff
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,49+($i2*56), 557+($i1*56)) ; duoi  ;0x45f8ff
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv20($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,43+($i2*56), 550+($i1*56)) ; trai  ;0x16a5f6
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,52+($i2*56), 554+($i1*56)) ; phai  ;0x256ae9
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,65+($i2*56), 540+($i1*56)) ; tren  ;0xffffff
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,33+($i2*56), 563+($i1*56)) ; duoi  ;0x256ae9
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv21($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,37+($i2*56), 557+($i1*56)) ; trai  ;0xfbf236
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,60+($i2*56), 555+($i1*56)) ; phai  ;0xfbf236
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,47+($i2*56), 548+($i1*56)) ; tren  ;0xffffff
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,51+($i2*56), 569+($i1*56)) ; duoi  ;0xf8a834
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv22($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,34+($i2*56), 546+($i1*56)) ; trai  ;0xffffff
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,60+($i2*56), 541+($i1*56)) ; phai  ;0xffffff
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,43+($i2*56), 548+($i1*56)) ; tren  ;0xea6b33
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,52+($i2*56), 548+($i1*56)) ; duoi  ;0xea6b33
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv23($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,35+($i2*56), 550+($i1*56)) ; trai  ;0xffffff
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,65+($i2*56), 544+($i1*56)) ; phai  ;0xffffff
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,41+($i2*56), 552+($i1*56)) ; tren  ;0xc6dce0
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,56+($i2*56), 549+($i1*56)) ; duoi  ;0xc6dce0
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc
func lv24($lv,$icolor1,$icolor2,$icolor3,$icolor4)
 For $i1=0 to 2
 For $i2=0 to 7
  $Color1 = _GDIPlus_BitmapGetPixel($hBitmap,27+($i2*56), 564+($i1*56)) ; trai ;488868
  $Color2 = _GDIPlus_BitmapGetPixel($hBitmap,71+($i2*56), 556+($i1*56)) ; phai ;488868
  $Color3 = _GDIPlus_BitmapGetPixel($hBitmap,53+($i2*56), 535+($i1*56)) ; tren ;eec39a
  $Color4 = _GDIPlus_BitmapGetPixel($hBitmap,43+($i2*56), 549+($i1*56)) ; duoi ;488868
 If  '0x'&Hex($Color1,6) = $icolor1   and '0x'&Hex($Color2,6) =$icolor2 and  '0x'&Hex($Color3,6) =$icolor3 and  '0x'&Hex($Color4,6) =$icolor4  Then
  GUICtrlSetData($Input[$i1&$i2],$lv)
 EndIf
 Next
 Next
EndFunc

Func Capture_Window($hWnd, $w, $h)
    Local $hDC_Capture = _WinAPI_GetWindowDC($hWnd)
    Local $hMemDC = _WinAPI_CreateCompatibleDC($hDC_Capture)
    Local $hHBitmap = _WinAPI_CreateCompatibleBitmap($hDC_Capture, $w, $h)
    Local $hObjectx = _WinAPI_SelectObject($hMemDC, $hHBitmap)
    DllCall("user32.dll", "int", "PrintWindow", "hwnd", $hWnd, "handle", $hMemDC, "int", 0)
    _WinAPI_DeleteDC($hMemDC)
    Local $hObject = _WinAPI_SelectObject($hMemDC, $hObjectx)
    _WinAPI_ReleaseDC($hWnd, $hDC_Capture)
    Local $hBmp = _GDIPlus_BitmapCreateFromHBITMAP($hHBitmap)
    _WinAPI_DeleteObject($hHBitmap)
    Return $hBmp
EndFunc   ;==>Capture_Window
func move()
 WinMove(WinGetTitle(("[CLASS:Qt5QWindowIcon]")),'',0,0,541, 748)
 MouseMove(0,0,1)
 MouseDown("left")
 MouseMove(20,20,5)
 MouseMove(0,0,1)
 MouseUp("left")
EndFunc

Func dung()
 Exit
EndFunc
Func _IsChecked($idControlID)
    Return BitAND(GUICtrlRead($idControlID), $GUI_CHECKED) = $GUI_CHECKED
EndFunc   ;==>_IsChecked

위로 아래로 댓글로 가기
?
Category
List of Articles
분류 제목 글쓴이 최근변경 추천
자유 외부 커뮤니티로의 유입 광고 글에 대해 피카부 2023.10.19 0/0
자유 글이 베스트로 이동될 시 권한 부여 피카부 2021.06.07 0/0
자유 추천 금지를 권유/유도하는 행위는 제재 됩니다 피카부 2020.01.15 0/0
자유 이메일로 공유 요청하는 계정 제재 피카부 2018.09.14 0/0
자유 이곳은 매크로 장터가 아닙니다. 구매/판매 글 제재 피카부 2019.02.19 0/0
자유 운영 방해 목적의 매크로 관련 글 제재 피카부 2019.09.03 0/0
자유 테일스타 회원 레벨 정보 이용하기 피카부 2022.02.17 0/0
자유 외부 유료 매크로의 추천 유도 및 광고 추천 제재 피카부 2018.04.25 0/0
자유 매크로는 [공유] 분류를 지정해주세요 피카부 2022.02.17 0/0
질문 뮤2 매클은 정말 없는건가요??? 꼬버 2018.07.07 0/0
질문 2렙은 어떻게 올리는거죠? 11 뒤로가기 2020.08.05 0/0
질문 오토잇 조금이라도 하시는분 !! 도와줘요 겜못알 2018.07.08 0/0
질문 오토잇 드래그 소스이거 맞나용 겜못알 2018.07.08 0/0
질문 돌키우기 매크로 구하는건 2렙때바로되나요? 3 씨올 2018.08.04 0/0
질문 랩2되면 메크로 다운가능? 15 대마왕빌런킹 2019.10.11 0/0
자유 2렙열심히찍어보자!! 1 매매매크 2020.08.05 0/0
질문 오토터치 사용하시는분 계신가요 오탁 2018.07.11 0/0
자유 진짜 허탈하네 베스트에 있는 스크립트 받으려고 2렙 ... 3 iorbits 2018.09.26 0/0
질문 오버히트 무료로 쫄작되는 매크로 있나요? 검객이 2018.07.12 0/0
질문 레볼 1년만에 다시 시작하는데 좋은 매크로 있을까요? ... 5 매쓰 2018.07.27 0/0
자유 린2레볼 최신 매크로 공유해주실분 3 chobo 2018.07.24 0/0
자유 음양사 매크로 구합니다 은겸 2018.07.12 0/0
자유 [스톤에이지 시즌2] 카카오토Pro 2.01버젼입니다. 4 파란자전거 2018.08.01 0/0
질문 레볼매크로 2 매크로쪼아카 2018.07.23 0/0
질문 스톤에이지 메크로 어디 없나요 ? 2 쩐더쭈 2018.07.17 0/0
질문 유ni크 매크로 없어졌나요? 2 Lay4u 2018.07.18 0/0
질문 돌키우기 매크로 없나용 2 belov242 2018.07.25 0/0
질문 쿠키런2 매크로 없나용? 3 초밥인간 2018.11.06 0/0
자유 주변에서 좋다고해서 사용해볼려고 가입했습니다. 2 천사스키 2018.08.02 0/0
쓰기
Board Pagination Prev 1 ... 247248249250251252253254255 ... 515 Next
/ 515

전체 최신 인기글

전체 주간 인기글