Search found 344 matches

by YoucefHam
11 Jun 2019, 00:13
Forum: Ask For Help
Topic: help with script Topic is solved
Replies: 2
Views: 436

Re: help with script Topic is solved

Code: Select all

*~CapsLock::
while GetKeyState("CapsLock","T")
{
	SendInput, {w down}
	Sleep, 3000
	SendInput, {w up}
	Sleep, 62
	SendInput, {s down}
	Sleep, 3000
	SendInput, {s up}
}
return
by YoucefHam
10 Jun 2019, 22:22
Forum: Ask For Help
Topic: Help with Variable Subtraction
Replies: 2
Views: 413

Re: Help with Variable Subtraction

try this SetKeyDelay, 60, 120 num1 := 4 #If WinActive("ahk_exe PaintDotNet.exe") F8:: ;Save .pdn As .png File. num1-- MouseGetPos, x, y MouseMove, 0, 0 WinGetTitle, WinT, A ControlSend, WindowsForms10.Window.8.app.0.2bf8098_r32_ad16, !fa, % WinT ;"Save As" WinWaitActive, Save As Sleep, 800 ControlFo...
by YoucefHam
10 Jun 2019, 21:15
Forum: Ask For Help
Topic: Overwrite problem Topic is solved
Replies: 1
Views: 360

Re: Overwrite problem Topic is solved

try this #SingleInstance, Force FileSelectFolder, OutputVar FileCreateDir, % OutputVar "\ext" Loop, Files, % OutputVar "\*.zip", F { Unz(A_LoopFileLongPath, OutputVar "\ext\" StrReplace(A_LoopFileName,".zip")) i := "" Loop { FileMove, % OutputVar "\ext\" StrReplace(A_LoopFileName,".zip") "\*.*", % O...
by YoucefHam
10 Jun 2019, 20:39
Forum: Ask For Help
Topic: Ping script
Replies: 1
Views: 1079

Re: Ping script

try this oldClip := ClipboardAll ClipWait, 2 Clipboard := "" url := "www.google.com" Run, %ComSpec% /c "ping %url% | clip",,Hide,PingID Process, WaitClose, %PingID% txt := Clipboard Clipboard := oldClip ClipWait, 2 FoundPos := RegExMatch(txt,"Request timed out.") if FoundPos { MsgBox, Request timed ...
by YoucefHam
10 Jun 2019, 19:51
Forum: Ask For Help
Topic: Load script as administrator through exe
Replies: 1
Views: 378

Re: Load script as administrator through exe

try this

Code: Select all

RunAs, UserName, Password
Run, *RunAs "%A_WorkingDir%\HTPC AHK-U64.exe" "%A_WorkingDir%\HTPC Hotkeys.ahk"
by YoucefHam
10 Jun 2019, 18:54
Forum: Ask For Help
Topic: opening opera at a specific zoom
Replies: 1
Views: 330

Re: opening opera at a specific zoom

try this

Code: Select all

SetTitleMatchMode, 3
WinTitle := "YouTube - Google Chrome"

IfWinNotActive, % WinTitle
    WinWaitActive, % WinTitle
Sleep, 1200
SendInput, ^{Numpad0} ;Reset Zoom to 100%
Sleep, 500
SendInput, ^{NumpadSub 3} ;set Zoom to 75%
by YoucefHam
10 Jun 2019, 18:42
Forum: Ask For Help
Topic: wingetpos help
Replies: 1
Views: 364

Re: wingetpos help

try this ::ppa:: AutomaticPulsePoint: BlockInput, On WinGetPos,,,esw,esh,<< redacted >> - Google Chrome EnvDiv, esw, 2 esh := esh - 40 sleep, 20 controlclick X10 Y63,<< redacted >> - Google Chrome,, Left, 1, NA Sleep, 200 clipboard := send, ^a sleep 20 send, ^c sleep, 20 send, ^c sleep, 100 clip = %...
by YoucefHam
10 Jun 2019, 18:33
Forum: Ask For Help
Topic: need help to save gui hotkeys after close for next re-open (script included)
Replies: 4
Views: 668

Re: need help to save gui hotkeys after close for next re-open (script included)

try this #SingleInstance Force #Persistent #NoEnv IniRead, HKey, settings.ini, Application, MyHotkey if (HKey <> "ERROR") or (HKey <> "") Hotkey, % HKey, Hello, UseErrorLevel ON IniRead, HKey2, settings.ini, Application, MyHotkey2 if (HKey2 <> "ERROR") or (HKey2 <> "") Hotkey, % HKey2, Hello2, UseEr...
by YoucefHam
10 Jun 2019, 16:28
Forum: Ask For Help
Topic: Solved:Need simple example,real time calculating and output the result
Replies: 40
Views: 5540

Re: Solved:Need simple example,real time calculating and output the result

try this Var := "((5+15)*4)/20%+30%" MsgBox, % CalcPercente(Var) ExitApp CalcPercente(Var) { Loop { IfNotInString, Var, % "%" break if RegExMatch(Var, "([0-9]*)%",per%A_Index%) Var := StrReplace(Var, per%A_Index%1 "%", per%A_Index%1 / 100) } return var }
by YoucefHam
10 Jun 2019, 15:34
Forum: Ask For Help
Topic: My scripts keep looping once in a while
Replies: 3
Views: 425

Re: My scripts keep looping once in a while

try this

Code: Select all

*|::
	SetTimer, SpamInArchon, 10
	Gosub, SpamInArchon
	return
	
*| up::
	SetTimer, SpamInArchon, Off
	return

SpamInArchon: 
send +{LButton}
send 1
return
by YoucefHam
10 Jun 2019, 15:31
Forum: Gaming
Topic: How to stop game from detecting input button
Replies: 4
Views: 779

Re: How to stop game from detecting input button

try

Code: Select all

*$LButton::LCtrl
*$MButton::O
*$XButton2::P

LButton up::
SendInput, {LCtrl Up}
return
by YoucefHam
10 Jun 2019, 15:09
Forum: Gaming
Topic: Problems with diablo 3 script
Replies: 8
Views: 1756

Re: Problems with diablo 3 script

try this if Not A_IsAdmin AND A_OSVersion <> WIN_XP { Run *RunAs "%A_ScriptFullPath%" ExitApp } #NoEnv #MaxHotkeysPerInterval 99000000 #HotkeyInterval 99000000 #KeyHistory 0 SetWorkingDir %A_ScriptDir% ListLines Off Process, Priority, , A SetBatchLines, -1 SetKeyDelay, -1, -1 SetMouseDelay, -1 SetDe...
by YoucefHam
10 Jun 2019, 15:04
Forum: Gaming
Topic: How to stop game from detecting input button
Replies: 4
Views: 779

Re: How to stop game from detecting input button

try

Code: Select all

*$LButton::LCtrl
*$MButton::O
*$XButton2::P
by YoucefHam
10 Jun 2019, 12:12
Forum: Ask For Help
Topic: ini reads
Replies: 13
Views: 1442

Re: ini reads

Try it ; ############################################################ Gui, 1:Add, Button, x50 y50 w300 h300 gSales ,Sales Mode Gui, 1:Add, Button, x350 y50 w300 h300 gManager ,Manager Functions ; ############################################################ Gui, 2: Font, s16 Gui, 2:add, Edit, x1100 y...
by YoucefHam
09 Jun 2019, 19:12
Forum: Ask For Help
Topic: Simulate Sequential Keys to New Hotkey
Replies: 2
Views: 360

Re: Simulate Sequential Keys to New Hotkey

try this

Code: Select all

^y::
KeyWait, Ctrl
Sleep, 60
SendInput, {LAlt}
Sleep, 60
SendInput, {v}
Sleep, 60
SendInput, {t}
Sleep, 60
SendInput, {b}
return
if you are goining to select a menu Item use
WinMenuSelectItem
by YoucefHam
09 Jun 2019, 18:36
Forum: Ask For Help
Topic: Remapping WinKey
Replies: 4
Views: 631

Re: Remapping WinKey

try this #^x:: Activated := 1 SetTimer, Toggle, 200 SendInput {Del} Return Toggle: SetTimer, Toggle, off Activated := 0 return #if Activated LWin up::return RWin up::return or this one #^x:: Activated := 1 KeyWait, RWin ;or LWin Activated := 0 SendInput {Del} Return #if Activated LWin up::return RWi...
by YoucefHam
09 Jun 2019, 18:32
Forum: Gaming
Topic: Disable LAlt & Tab, keep native functions of BOTH keys when pressed TOGETHER
Replies: 6
Views: 1134

Re: Disable LAlt & Tab, keep native functions of BOTH keys when pressed TOGETHER

Here Try this if Not A_IsAdmin AND A_OSVersion <> WIN_XP { Run *RunAs "%A_ScriptFullPath%" ExitApp } Activated := 0 #if (Activated = 0) and WinActive("Counter-Strike: Global Offensive") LAlt & Tab:: KeyWait, LAlt SendInput, {Blind}{LAlt Down} Activated := 1 return #if (Activated = 1) and WinActive("...
by YoucefHam
09 Jun 2019, 16:52
Forum: Ask For Help
Topic: If win not active > pause all scripts
Replies: 1
Views: 251

Re: If win not active > pause all scripts

follow this example 0.ahk OnExit("OnExitFunction") IniWrite, 0, Setting.ini, Settings, Exit IniWrite, 0, Setting.ini, Settings, IsActive F3:: IsActive := 1 IniWrite, %IsActive%, Setting.ini, Settings, IsActive Run, 1.ahk Run, 2.ahk return F4:: IsActive := !IsActive IniWrite, %IsActive%, Setting.ini,...
by YoucefHam
09 Jun 2019, 16:33
Forum: Ask For Help
Topic: ini reads
Replies: 13
Views: 1442

Re: ini reads

Here try to follow this example

Online.ini

Code: Select all

[Settings]
IsActive=1

Code: Select all

q::
if IniRead("Online.ini", "Settings", "IsActive")
    MsgBox, True
else
    MsgBox, False
return

;  Function


IniRead(File, Section, key)
{
    IniRead, var, % File, % Section, % key
    return, var
}
by YoucefHam
09 Jun 2019, 16:19
Forum: Ask For Help
Topic: Remapping WinKey
Replies: 4
Views: 631

Re: Remapping WinKey

try this

Code: Select all

#^x::
SendInput {Del}
Return


LWin up::return
RWin up::return

Go to advanced search