thảo luận Tất cả về autohotkey

SongKoSo đã nói:

Bàn phím mình bị liệt phím * và - ở bên dẫy phím số bên phải. Mình muốn mod * = page up và - = page down ạ. Các bác giúp mình code với

Nhấp để mở rộng...

NumpadPgUp::*
NumpadPgDn::-

pTalent đã nói:

Mã:

NumpadPgUp::*
NumpadPgDn::-

Nhấp để mở rộng...

SongKoSo đã nói:

NumpadPgUp::*
PgDn::Send, -

Em chỉnh lại như này thì chỉ có PgDn thì OK

Nhấp để mở rộng...

PgUp::*
PgDn::-

SongKoSo đã nói:

Xem tệp đính kèm 2521901

Em muốn 2 phím này ạ. Bàn phím em dùng gần như này luôn

Nhấp để mở rộng...

lucas- đã nói:

Nhờ mấy thím giúp, mình muốn chép text từ audio
Mình muốn vừa nghe, rồi gõ text trên Word, nhưng tốc độ chép sẽ không đồng bộ với tốc độ audio, vì vậy mình cần một hotkey để tua ngược về trước file audio (đang dùng VLC) nhưng con trỏ vẫn nằm trên Word để chép tiếp thì có được không nhỉ?
Hoặc có cách nào khác để thuận tiện cho việc nghe-chép này không nhỉ?
Mình xin cám ơn

Nhấp để mở rộng...

hpa557 đã nói:

Em có đoạn script để giải nén file. Nhưng nó giải nén trực tiếp. Giờ mình muốn giải nén vào folder giống kiểu chọn này của WinRAR.
Tức là hiện tại Script đang chạy lệnh Extract Here (lựa chọn thứ 4)
Còn em mong muốn chạy lệnh Extract to "folder..." (lựa chọn thứ 3)
Nhờ các bác giúp đỡ
Xem tệp đính kèm 2250219
Dưới đây là Script hiện tại (forum ko cho em paste script vào nên đành up lên notepad online)

https://anotepad.com/notes/8t379dh5

Nhấp để mở rộng...

; #NoEnv - Tắt việc sử dụng biến môi trường để tăng tính tương thích với các phiên bản Windows khác nhau
#NoEnv

; Đường dẫn đến các phần mềm giải nén
winrarPath := "C:\Program Files\WinRAR\WinRAR.exe"
sevenZipPath := "C:\Program Files\7-Zip\7z.exe"

+!r:: ; Phím để sử dụng auto là Shift + Alt + R
; Copy đường dẫn file được chọn
Send ^c
Sleep 50

; Lấy đường dẫn archive từ clipboard
ArchivePath := Clipboard

; Kiểm tra có phải là file nén được hỗ trợ không
if (!RegExMatch(ArchivePath, "i)\.(rar|zip|7z|gz|bz2|tar|tgz|bzip2|xz)$")) {
    MsgBox, Vui lòng chọn file nén được hỗ trợ để giải nén!`n`nĐịnh dạng hỗ trợ:`nRAR, ZIP, 7Z, GZ, BZ2, TAR, TGZ, BZIP2, XZ
    return
}

; Tách phần mở rộng để xác định phần mềm cần thiết
SplitPath, ArchivePath, FileName, FileDir, FileExt, FileNameNoExt

; Tạo đường dẫn thư mục giải nén
ExtractPath := FileDir . "\" . FileNameNoExt

; Tạo thư mục giải nén nếu chưa tồn tại
FileCreateDir, %ExtractPath%

; Xác định và thực thi lệnh giải nén dựa vào phần mở rộng
if (FileExt = "rar" || FileExt = "zip") {
    ; Lệnh cho WinRAR
    RunWait, "%winrarPath%" x -o+ "%ArchivePath%" "%ExtractPath%"
} else if (FileExt = "7z" || FileExt = "gz" || FileExt = "bz2" || FileExt = "tar" || FileExt = "tgz" || FileExt = "bzip2" || FileExt = "xz") {
    ; Lệnh cho 7-Zip
    RunWait, "%sevenZipPath%" x "%ArchivePath%" -o"%ExtractPath%" -y
    
    ; Kiểm tra và giải nén file .tar nếu có
    TarFile := ExtractPath . "\" . FileNameNoExt . ".tar"
    if FileExist(TarFile) {
        RunWait, "%sevenZipPath%" x "%TarFile%" -o"%ExtractPath%" -y
        FileDelete, %TarFile%
    }
}

; Kiểm tra kết quả và hiển thị thông báo
if ErrorLevel
    MsgBox, Lỗi khi giải nén file!
else
    MsgBox, Giải nén thành công vào thư mục:`n%ExtractPath%

return

Fioren đã nói:

Mã:

~Lshift::
TimeButtonDown = %A_TickCount%
Loop
{
   Sleep 10
   GetKeyState, LshiftState, Lshift, P
   if LshiftState = U
      break
   elapsed = %A_TickCount%
   elapsed -= %TimeButtonDown%
   if elapsed > 200
   {
      x0 = A_CaretX
      y0 = A_CaretY
      Loop
   {
     Sleep 20
     GetKeyState keystate, Lshift
     IfEqual keystate, U, {
       x0 = A_CaretX
       y0 = A_CaretY
       break
     }
   }
   if (x-x0 > 5 or x-x0 < -5 or y-y0 > 5 or y-y0 < -5)
   {
      clip0 := ClipBoardAll
      ;ClipBoard =
      Send ^c
      ClipWait 1, 1
      IfEqual ClipBoard,, SetEnv ClipBoard, %clip0%
   }
      return
   }
}

~LButton::
TimeButtonDown = %A_TickCount%
Loop
{
   Sleep 10
   GetKeyState, LButtonState, LButton, P
   if LButtonState = U
      break
   elapsed = %A_TickCount%
   elapsed -= %TimeButtonDown%
   if elapsed > 200
   {
      MouseGetPos x0, y0
      Loop
   {
     Sleep 20
     GetKeyState keystate, LButton
     IfEqual keystate, U, {
       MouseGetPos x, y
       break
     }
   }
   if (x-x0 > 5 or x-x0 < -5 or y-y0 > 5 or y-y0 < -5)
   {
      clip0 := ClipBoardAll
      ;ClipBoard =
      Send ^c
      ClipWait 1, 1
      IfEqual ClipBoard,, SetEnv ClipBoard, %clip0%
   }
      return
   }
}
TimeButtonUp = %A_TickCount%
Loop
{
   Sleep 10
   GetKeyState, LButtonState, LButton, P
   if LButtonState = D
      break
   elapsed = %A_TickCount%
   elapsed -= %TimeButtonUp%
   if elapsed > 350
   {
      return
   }
}
   Sleep, 100
   Send, ^c
return

Quét chọn text, sau đó click vào 1 lần cái đống quét chọn là nó copy vào clipboard

Nhấp để mở rộng...