Code: Select all
F21::
F22::
If !go
Click, 134 739 D
go := True
MouseMove, A_ThisHotkey = "F21" ? -3 : 3, 0,, R
SetTimer, Stop, -300
Return
Stop:
Click, U
go := False
Return
Code: Select all
F21::
F22::
If !go
Click, 134 739 D
go := True
MouseMove, A_ThisHotkey = "F21" ? -3 : 3, 0,, R
SetTimer, Stop, -300
Return
Stop:
Click, U
go := False
Return
Noted on these. Thank you.gregster wrote: ↑09 May 2021, 12:09@arbibarbarona : Do you have a question on how to use code tags ?
([code]code goes here[/code] )
If so, feel free to ask! (You can also do this via PM - there is still one waiting that I sent to you which you didn't read yet.)
If not, it would be appreciated if you started using them. Thank you!
Code: Select all
F13::
F14::
If !go
Click, D
go := True
MouseMove, A_ThisHotkey = "F13" ? -2:2, 0,, R
SetTimer, Stop, -400
Return
Stop:
Click, U
go := False
Return
Code: Select all
+F13::
+F14::
If !go
Click, D
go := True
MouseMove, A_ThisHotkey = "+F13" ? 0:0, ? -2:2,, R
SetTimer, Stop3, -400
Return
Stop3:
Click, U
go := False
Retur
Code: Select all
MouseMove, 0, A_ThisHotkey = "+F13" ? -2 : 2,, R
Thank you so much. This is a great help.mikeyww wrote: ↑10 May 2021, 05:46It must be the syntax error doing that!
Explained: MouseMove • Ternary operatorCode: Select all
MouseMove, 0, A_ThisHotkey = "+F13" ? -2 : 2,, R
Code: Select all
suspend, On
pos := {}
*1::
*2::
*3::
*4::
*5::
*6::
*7::
*8::
*9::
*0::
*F1::
*F2::
*F3::
*F4::
*F5::
*F6::
*F7::
*F8::
*F9::
*F10::
*F11::
*F12::
*Numpad0::
*Numpad1::
*Numpad2::
*Numpad3::
*Numpad4::
*Numpad5::
*Numpad6::
*Numpad7::
*Numpad8::
*Numpad9::
If GetKeyState("Ctrl") {
MouseGetPos, x, y
pos[A_ThisHotkey, 1] := x, pos[A_ThisHotkey, 2] := y
SoundBeep, 1500
} Else MouseMove, pos[A_ThisHotkey, 1], pos[A_ThisHotkey, 2]
Return
^Left::
^Right::
If !go
Click, D
go := True
MouseMove, A_ThisHotkey = "^Left" ? -5:5, 0,, R
SetTimer, Stop, -200
Return
Stop:
Click, U
go := False
Return
^Up::
^Down::
If !go
Click, D
go := True
MouseMove, 0, A_ThisHotkey = "^Up" ? 5 : -5,, R
SetTimer, Stop2, -200
Return
Stop2:
Click, U
go := False
Return
!p::
Suspend, Off
SoundBeep, 2000
Return
!o::
Suspend, On
SoundBeep, 500
return
Esc::ExitApp
I may need your help implementing in my script above as I don't really know how. I've been reading Iniwrite but I can't get around it.
Code: Select all
Global pos := {}, ini := StrReplace(A_ScriptFullPath, ".ahk", ".ini")
OnExit("save")
IniRead, keyNames, %ini%
For each, key in StrSplit(keyNames, "`n") {
IniRead, section, %ini%, %key%
For each2, line in StrSplit(section, "`n")
part := StrSplit(line, "="), pos[key, part.1] := part.2
}
save(exitReason, exitCode) {
For key, pair in pos
For axis, coord in pair
IniWrite, %coord%, %ini%, %key%, %axis%
SoundBeep, 1000
}
Code: Select all
^Left::
^Right::
If !go
Click, D
go := True
MouseMove, A_ThisHotkey = "^Left" ? -5:5, 0,, R
SetTimer, Stop, -200
Return
Stop:
Click, U
go := False
Return
^Up::
^Down::
If !go
Click, D
go := True
MouseMove, 0, A_ThisHotkey = "^Up" ? 5 : -5,, R
SetTimer, Stop2, -200
Return
Stop2:
Click, U
go := False
Return
Code: Select all
SoundBeep, 500, 100
SoundBeep, 1000, 500
Tooltip, You have loaded the Color Script - Press ACTIVATE to proceed.
suspend, On
Global pos := {}, ini := StrReplace(A_ScriptFullPath, ".ahk", ".ini")
OnExit("save")
IniRead, keyNames, %ini%
For each, key in StrSplit(keyNames, "`n") {
IniRead, section, %ini%, %key%
For each2, line in StrSplit(section, "`n")
part := StrSplit(line, "="), pos[key, part.1] := part.2
}
*1:: ; Temp Primaries Wheel
*2:: ; Tint
*3:: ; Contrast
*4:: ; Pivot
*5:: ; Mid Details
*6:: ; Color Boost
*7:: ; Shadows
*8:: ; Highlights
*9:: ; Saturation
*0:: ; Hue
*F1:: ; Luma Mix
*F2:: ; Lift Scroll
*F3:: ; Lift Red
*F4:: ; Lift Green
*F5:: ; Lift Blue
*F6:: ; Gamma Scroll
*F7:: ; Gamma Red
*F8:: ; Gamma Green
*F9:: ; Gamma Blue
*F10:: ; Gain Scroll
*F11:: ; Gain Red
*F12:: ; Gain Green
If GetKeyState("Ctrl") {
MouseGetPos, x, y
pos[A_ThisHotkey, 1] := x, pos[A_ThisHotkey, 2] := y
SoundBeep, 1500
} Else MouseMove, pos[A_ThisHotkey, 1], pos[A_ThisHotkey, 2]
Return
^Left::
^Right::
If !go
Click, D
go := True
MouseMove, A_ThisHotkey = "^Left" ? -10:10, 0,, R
SetTimer, Stop, -400
Return
Stop:
Click, U
go := False
Return
^Up::
^Down::
If !move
Click, D
move := True
MouseMove, 0, A_ThisHotkey = "^Down" ? 10:-10,, R
SetTimer, Stop2, -400
Return
Stop2:
Click, U
move := False
Return
!+p::
Suspend, Off
SoundBeep, 2000, 500
Tooltip, Ready to COLOR? Script ACTIVATED!
Sleep, 1500
Tooltip,
Return
!+o::
Suspend, On
SoundBeep, 500
ToolTip, Color Script SUSPENDED. Keyboard Restored.
Sleep, 1500
Tooltip,
return
!End::
Suspend, Permit
If (A_ThisHotkey = A_PriorHotkey and A_TimeSincePriorHotkey < 200)
if !A_IsSuspended
{
SoundBeep, 1000
Suspend, On
}
else
{
Suspend, Off
Sleep, 150
}
Return
+Esc::
tooltip, EXIT Script, 810, 548
Sleep, 1000
tooltip,
ExitApp
return
~::
For key, pair in pos
For axis, coord in pair
IniWrite, %coord%, %ini%, %key%, %axis%
SoundBeep, 500
SoundBeep, 1000
tooltip, Successfully saved your SETTINGS, 810, 548
Sleep, 3000
tooltip,
save(exitReason, exitCode) {
For key, pair in pos
For axis, coord in pair
IniWrite, %coord%, %ini%, %key%, %axis%
SoundBeep, 1000, 100
SoundBeep, 500, 250
}