AutoHotKey [Hướng dẫn] Cách tạo một auto click không chiếm chuột đơn giản

dunghm · 31/10/23

cám ơn bạn đã chia sẻ

rem0413 · 1/11/23

rất hay cảm ơn bạn nhìu

bùi tuấn kiệt · 3/11/23

Có bác nào có đủ file cài đặt không cho em xin với ạ

AnhTuanIT99 · 4/11/23

Quá tuyệt cảm ơn bạn nhiều

saoden_n · 18/11/23

Hay quá, cảm ơn bạn

Huynh Dang · 24/11/23

Cám ơn rất nhiều

AnonymousPls · 26/11/23

Milli Master nói: ↑

A/ LỜI NÓI ĐẦU

Mình chỉ mới tìm hiểu về autohotkey vừa mới đây (cũng được 1 năm), với lại mình cũng không phải là dân lập trình chỉ là thèn cu cấp 3 đam mê rồi tập tành code thôi, nên sẽ có một số cái chưa chính xác và không đạt chuẩn lắm, mong các bạn thông cảm :p. Mình thấy ngôn ngữ này khá dễ học mà ít mem quá nên làm bài này để kéo thêm mem .

B/ CHUẨN BỊ

Đầu tiên thì các bạn phải có một số kiến thức cơ bản về autohotkey của bác @kakanet ở đây, mà không cũng được từ từ rồi quen, đang cần số lượng .
Những lệnh chính mà mình sử dụng để code: ControlClick, Gui và các hàm liên quan đến listview.
Chương trình dùng ControlClick nên có ưu điểm là click không chiếm chuột, cửa sổ cần click đang bị che bởi cửa sổ khác hay là bị thay đổi vị trí ban đầu thì vẫn có thể click một cách chính xác.

B/ TIẾN HÀNH CODE

PHẦN 1:
CLICK VÀO ĐÂY ĐỂ XEM PHẦN TIẾP THEO

Đầu tiên thì mình tạo một cái gui nho nhỏ gồm cái combox để tùy chọn các kiểu click, một editbox lưu thời gian delay, một cái listview để lưu thao tác và ba cái button điều khiển. Rồi sau đó gắn label, var cho các control. Có các hotkey như F2: thêm dữ liệu vào listview, F3: chạy auto, F4: dừng auto.

Mã (Autohotkey):

#NoEnv
#SingleInstance Force
CoordMode Mouse,Window
SetControlDelay -1
;Xem file help để hiểu thêm mấy dòng trên này

playing:=0

Gui,+Alwaysontop
Gui Add, Text, x16 y8 w52 h23 +0x200 , Kiểu click:
Gui Add, DropDownList, x80 y16 w120 vModeClick, Left||Middle|Right
Gui Add, Text, x224 y16 w34 h23 +0x200, Delay:
Gui Add, Edit, x264 y16 w120 h21 vDelayTime number,100
Gui Add, ListView, x16 y56 w391 h150, X|Y|Kiểu Click|Delay|Window
Gui Add, Button, x152 y224 w80 h23 gRunAuto , Chạy (F3)
Gui Add, Button, x240 y224 w80 h23 gStopAuto , Dừng (F4)
Gui Add, Button, x328 y224 w80 h23 gClearList, Xóa (Ctrl+Del)
Gui Show, , Auto Clicker
Return

F3::goto,RunAuto
F4::goto,StopAuto
^Delete::goto,ClearList

RunAuto:

return

StopAuto:

return

ClearList:

return

GuiEscape:
GuiClose:
ExitApp

Đầu tiên thì xử lí cái phần thêm dữ liệu vào listview trước. Mình sử dụng lệnh MouseGetPos để lấy dữ liệu và hàm LV_Add() để thêm. Dữ liệu cần thêm là X|Y|Kiểu Click|Delay|Window

Mã (Autohotkey):

F2::
if playing ; nếu đang chạy auto thì không lưu vào listview
return
Gui,Submit,Nohide ; lưu dữ liệu của các control vào biến
MouseGetPos,,,WinHWND ; Lấy HWND của cửa sổ
WinActivate,ahk_id %WinHWND%
MouseGetPos,X,Y ; Lấy vị trí x, y
LV_Add("",X,Y,ModeClick,DelayTime,WinHWND)
LV_ModifyCol(1)
LV_ModifyCol(2)
;2 dòng trên là chỉnh cho cột 1,2 cho ngay
return

Thêm xong rồi thì tới phần xóa nha. Mình dùng LV_Delete().

Mã (AutoIt):

ClearList:
if playing ; đang chạy thì không được xóa
return
LV_Delete() ; xóa toàn bộ nội dung trong listview
return

Được bây giờ tới phần đọc listview rồi chạy auto đây. Mình dùng LV_GetText() để lấy dữ liệu rồi dùng ControlClick.

Mã (Autohotkey):

RunAuto:
if (LV_GetCount()=0) ;nếu không có gì trong listview thì không chạy code bên dưới
return
playing:=1 ; đang chạy auto
; Dùng vòng lặp để lấy thông tin từ listview rồi thực hiện click tuần tự
Loop % LV_GetCount() ; lấy tất cả cột của listview
{ ;tạo vòng lặp lấy dữ liệu của listview X|Y|Kiểu click|Delay|Window sau đó thực hiện click
if Stop ; dòng này để dừng auto
break
Index:=A_Index
Loop % LV_GetCount("Col") ; lấy dữ liệu của từng hàng
LV_GetText(Data_%A_Index%,Index,A_Index)
Sleep,% Data_4
ControlClick,x%Data_1% y%Data_2%,ahk_id %Data_5%,,%Data_3%,,NA Pos ;thực hiện click
}
;chạy xong thì dừng thôi
stop:=0
playing:=0 ;
return

Tiếp theo là tới phần dừng auto, dễ thôi đặt biến stop là 1

Mã (Autohotkey):

StopAuto:
if not playing ; dừng rồi dừng chi nữa :)
return
Stop:=1
playing:=0
return

Một điều quan trọng nữa là để chạy được hầu hết các cửa sổ bạn phải cho nó chạy với quyền admin. Đặt RequireAdmin() lên đầu

Mã (Autohotkey):

RequireAdmin()
{
CommandLine := DllCall("GetCommandLine", "Str")

If !(A_IsAdmin || RegExMatch(CommandLine, " /restart(?!\S)")) {
Try {
If (A_IsCompiled) {
Run *RunAs "%A_ScriptFullPath%" /restart
} Else {
Run *RunAs "%A_AhkPath%" /restart "%A_ScriptFullPath%"
}
}
ExitApp
}
}

Bạn nào muốn xem code hoàn chỉnh thì nhấn like nha
Code dưới này hơi khác với phần hướng dẫn ở trên do dạo này mình rất bận mà cũng muốn nâng cấp cái code này. Khi nào rảnh thì mình sẽ hướng dẫn :p
***Nội dung ẩn không thể được trích dẫn.***

Thế thôi bài hướng dẫn đến đây là hết. Lần sau mình thực hiện các bước tiếp theo để hoàn thiện code, hẹn gặp lại các bạn vào các phần tiếp theo .
CLICK VÀO ĐÂY ĐỂ XEM PHẦN TIẾP THEO
Nhấp vào để mở rộng

kkk

lamcntt · 30/11/23

Milli Master nói: ↑

A/ LỜI NÓI ĐẦU

Mình chỉ mới tìm hiểu về autohotkey vừa mới đây (cũng được 1 năm), với lại mình cũng không phải là dân lập trình chỉ là thèn cu cấp 3 đam mê rồi tập tành code thôi, nên sẽ có một số cái chưa chính xác và không đạt chuẩn lắm, mong các bạn thông cảm :p. Mình thấy ngôn ngữ này khá dễ học mà ít mem quá nên làm bài này để kéo thêm mem .

B/ CHUẨN BỊ

Đầu tiên thì các bạn phải có một số kiến thức cơ bản về autohotkey của bác @kakanet ở đây, mà không cũng được từ từ rồi quen, đang cần số lượng .
Những lệnh chính mà mình sử dụng để code: ControlClick, Gui và các hàm liên quan đến listview.
Chương trình dùng ControlClick nên có ưu điểm là click không chiếm chuột, cửa sổ cần click đang bị che bởi cửa sổ khác hay là bị thay đổi vị trí ban đầu thì vẫn có thể click một cách chính xác.

B/ TIẾN HÀNH CODE

PHẦN 1:
CLICK VÀO ĐÂY ĐỂ XEM PHẦN TIẾP THEO

Đầu tiên thì mình tạo một cái gui nho nhỏ gồm cái combox để tùy chọn các kiểu click, một editbox lưu thời gian delay, một cái listview để lưu thao tác và ba cái button điều khiển. Rồi sau đó gắn label, var cho các control. Có các hotkey như F2: thêm dữ liệu vào listview, F3: chạy auto, F4: dừng auto.

Mã (Autohotkey):

#NoEnv
#SingleInstance Force
CoordMode Mouse,Window
SetControlDelay -1
;Xem file help để hiểu thêm mấy dòng trên này

playing:=0

Gui,+Alwaysontop
Gui Add, Text, x16 y8 w52 h23 +0x200 , Kiểu click:
Gui Add, DropDownList, x80 y16 w120 vModeClick, Left||Middle|Right
Gui Add, Text, x224 y16 w34 h23 +0x200, Delay:
Gui Add, Edit, x264 y16 w120 h21 vDelayTime number,100
Gui Add, ListView, x16 y56 w391 h150, X|Y|Kiểu Click|Delay|Window
Gui Add, Button, x152 y224 w80 h23 gRunAuto , Chạy (F3)
Gui Add, Button, x240 y224 w80 h23 gStopAuto , Dừng (F4)
Gui Add, Button, x328 y224 w80 h23 gClearList, Xóa (Ctrl+Del)
Gui Show, , Auto Clicker
Return

F3::goto,RunAuto
F4::goto,StopAuto
^Delete::goto,ClearList

RunAuto:

return

StopAuto:

return

ClearList:

return

GuiEscape:
GuiClose:
ExitApp

Đầu tiên thì xử lí cái phần thêm dữ liệu vào listview trước. Mình sử dụng lệnh MouseGetPos để lấy dữ liệu và hàm LV_Add() để thêm. Dữ liệu cần thêm là X|Y|Kiểu Click|Delay|Window

Mã (Autohotkey):

F2::
if playing ; nếu đang chạy auto thì không lưu vào listview
return
Gui,Submit,Nohide ; lưu dữ liệu của các control vào biến
MouseGetPos,,,WinHWND ; Lấy HWND của cửa sổ
WinActivate,ahk_id %WinHWND%
MouseGetPos,X,Y ; Lấy vị trí x, y
LV_Add("",X,Y,ModeClick,DelayTime,WinHWND)
LV_ModifyCol(1)
LV_ModifyCol(2)
;2 dòng trên là chỉnh cho cột 1,2 cho ngay
return

Thêm xong rồi thì tới phần xóa nha. Mình dùng LV_Delete().

Mã (AutoIt):

ClearList:
if playing ; đang chạy thì không được xóa
return
LV_Delete() ; xóa toàn bộ nội dung trong listview
return

Được bây giờ tới phần đọc listview rồi chạy auto đây. Mình dùng LV_GetText() để lấy dữ liệu rồi dùng ControlClick.

Mã (Autohotkey):

RunAuto:
if (LV_GetCount()=0) ;nếu không có gì trong listview thì không chạy code bên dưới
return
playing:=1 ; đang chạy auto
; Dùng vòng lặp để lấy thông tin từ listview rồi thực hiện click tuần tự
Loop % LV_GetCount() ; lấy tất cả cột của listview
{ ;tạo vòng lặp lấy dữ liệu của listview X|Y|Kiểu click|Delay|Window sau đó thực hiện click
if Stop ; dòng này để dừng auto
break
Index:=A_Index
Loop % LV_GetCount("Col") ; lấy dữ liệu của từng hàng
LV_GetText(Data_%A_Index%,Index,A_Index)
Sleep,% Data_4
ControlClick,x%Data_1% y%Data_2%,ahk_id %Data_5%,,%Data_3%,,NA Pos ;thực hiện click
}
;chạy xong thì dừng thôi
stop:=0
playing:=0 ;
return

Tiếp theo là tới phần dừng auto, dễ thôi đặt biến stop là 1

Mã (Autohotkey):

StopAuto:
if not playing ; dừng rồi dừng chi nữa :)
return
Stop:=1
playing:=0
return

Một điều quan trọng nữa là để chạy được hầu hết các cửa sổ bạn phải cho nó chạy với quyền admin. Đặt RequireAdmin() lên đầu

Mã (Autohotkey):

RequireAdmin()
{
CommandLine := DllCall("GetCommandLine", "Str")

If !(A_IsAdmin || RegExMatch(CommandLine, " /restart(?!\S)")) {
Try {
If (A_IsCompiled) {
Run *RunAs "%A_ScriptFullPath%" /restart
} Else {
Run *RunAs "%A_AhkPath%" /restart "%A_ScriptFullPath%"
}
}
ExitApp
}
}

Bạn nào muốn xem code hoàn chỉnh thì nhấn like nha
Code dưới này hơi khác với phần hướng dẫn ở trên do dạo này mình rất bận mà cũng muốn nâng cấp cái code này. Khi nào rảnh thì mình sẽ hướng dẫn :p
***Nội dung ẩn không thể được trích dẫn.***

Thế thôi bài hướng dẫn đến đây là hết. Lần sau mình thực hiện các bước tiếp theo để hoàn thiện code, hẹn gặp lại các bạn vào các phần tiếp theo .
CLICK VÀO ĐÂY ĐỂ XEM PHẦN TIẾP THEO
Nhấp vào để mở rộng

nhinh · 14/12/23

... ạ

thiensuvqs · 16/12/23

thấy bài này ý nghĩa quá, mình bị lu mờ bấy nay được khai sáng

noun417 · 13/1/24

thanks b

ghostblade · 23/2/24

Hay

zero0zore · 23/2/24

xin mã nha chủ top

hug ly · 24/2/24

la sao

Fanz91 · 1/3/24

.................................

VietHung138 · 11/3/24

cam on chu post nha

soliz16 · 17/3/24

tks

43Nobita · 19/3/24

hay

thainh107 · 19/3/24

tks bro

lekhacnhu · 2/4/24

có thêm lưu kịch bản thì thật tuyệt, mỗi lần mở lại, lại phải tạo lại kịch bản

Đăng nhập

Tải bản cài đặt AutoIT mới nhất

Quy định và nội quy

Hướng dẫn chèn mã AutoIT trong diễn đàn

AutoHotKey [Hướng dẫn] Cách tạo một auto click không chiếm chuột đơn giản

dunghm Thành viên mới

1/6

rem0413 Thành viên mới

1/6

bùi tuấn kiệt Thành viên mới

1/6

AnhTuanIT99 Thành viên mới

1/6

saoden_n Thành viên mới

1/6

Huynh Dang Thành viên mới

1/6

AnonymousPls Thành viên mới

1/6

lamcntt Thành viên mới

1/6

nhinh Thành viên mới

1/6

thiensuvqs Thành viên mới

1/6

noun417 Thành viên mới

1/6

ghostblade Thành viên mới

1/6

zero0zore Thành viên mới

1/6

hug ly Thành viên mới

1/6

Fanz91 Thành viên mới

1/6

VietHung138 Thành viên mới

1/6

soliz16 Thành viên mới

1/6

43Nobita Thành viên mới

1/6

thainh107 Thành viên mới

1/6

lekhacnhu Thành viên mới

1/6

Chia sẻ trang này

Đăng nhập

Tải bản cài đặt AutoIT mới nhất

Quy định và nội quy

Hướng dẫn chèn mã AutoIT trong diễn đàn

AutoHotKey [Hướng dẫn] Cách tạo một auto click không chiếm chuột đơn giản

Chia sẻ trang này

Tìm kiếm hữu ích