Search found 3787 matches

by Rohwedder
Today, 13:33
Forum: Scripts and Functions
Topic: Numeral System Conversion of really arbitrary integers
Replies: 0
Views: 23

Numeral System Conversion of really arbitrary integers

Hallo, try: N = 31415926 ; Decimal Integer Number to test Dec = 0123456789 ; the Decimal Numerals Hex = 0123456789ABCDEF ; the Hexadecimal Numerals Comic = Oh @#&*$! ; a Comic Numeral system ; no repeating characters! MsgBox,% "Dec2Comic : " N := NuSyCo(N,Dec,Comic) MsgBox,% "Comic2Hex : " N := NuSy...
by Rohwedder
Today, 08:23
Forum: Ask For Help
Topic: permutations function with ALL possible combinations
Replies: 6
Views: 79

Re: permutations function with ALL possible combinations

Sorry, but now it smells like password cracking.
by Rohwedder
Today, 06:15
Forum: Ask For Help
Topic: permutations function with ALL possible combinations
Replies: 6
Views: 79

Re: permutations function with ALL possible combinations

Then,
try:

Code: Select all

String := "ABCD"
Len := StrLen(String)
q::
Loop,% Len**Len
{
	n := A_Index-1
	Loop,% Len
	{
		z := Mod(n, Len)
		Out := SubStr(String, z+1, 1) Out
		n := (n-z)//Len
	}
	SendInput,% Out "`n"
	Out =
}
by Rohwedder
Today, 04:48
Forum: Ask For Help
Topic: permutations function with ALL possible combinations
Replies: 6
Views: 79

Re: permutations function with ALL possible combinations

Hallo,
try:

Code: Select all

String := "ABCD"
q::
Loop, Parse, String
{
	Out1 := A_LoopField
	Loop, Parse, String
	{
		Out2 := Out1 A_LoopField
		Loop, Parse, String
		{
			Out3 := Out2 A_LoopField
			Loop, Parse, String
			{
				Out4 := Out3 A_LoopField
				SendInput,% Out4 "`n"
			}
		}
	}
}
by Rohwedder
Today, 02:33
Forum: Gaming
Topic: Fullscreen Splash-GUI Fading Topic is solved
Replies: 2
Views: 47

Re: Fullscreen Splash-GUI Fading Topic is solved

Hallo, try: global AW_BLEND := 0x00080000 global AW_HIDE := 0x00010000 Gui,Color,Black,000000 Gui +LastFound Gui, +hwndhMyGUI Gui, -Caption +AlwaysOnTop Gui, Add, Button, xm+20 ym+50 w150 h50 gFade, Fade Out/In TempVar := A_ScreenHeight +100 Gui,Show, h%TempVar% w%A_ScreenWidth% Gui, Hide DllCall("u...
by Rohwedder
Yesterday, 11:25
Forum: Ask For Help
Topic: Repeat specific part of script Topic is solved
Replies: 2
Views: 76

Re: Repeat specific part of script Topic is solved

Hallo,
try:

Code: Select all

$F8::
IF F8
	Goto, SecondPart 
FirstPart:
Send, {3}
Sleep, 250
SecondPart:
Send, {e up}
endtime := A_TickCount + 1500
While ((F8:=GetKeyState("F8","P")) && A_TickCount < endtime)
{
	Send, {e down}
	Sleep, 200
}
return
by Rohwedder
Yesterday, 05:28
Forum: Ask For Help
Topic: Multiple letter hotkey
Replies: 4
Views: 86

Re: Multiple letter hotkey

Hallo, perhaps: ^+1:: ^+2:: ^+3:: ^+4:: ^+5:: ^+6:: ^+7:: ^+8:: ^+9:: #IF HotNo ^+0:: ;prevents leading zeros HotNo .= SubStr(A_ThisHotkey,0) Return ~*Ctrl Up:: KeyWait, Shift MsgBox, 64, Result, You typed:`n`n%HotNo% HotNo = Return #IF Edit: ~*Ctrl Up:: KeyWait, Shift instead of ~Ctrl Up:: No trigg...
by Rohwedder
16 Jan 2021, 05:41
Forum: Ask For Help
Topic: calculate 2+3=
Replies: 3
Views: 98

Re: calculate 2+3=

Hallo,
try:

Code: Select all

q::
ClipBoard = 2+3
FileDelete, ~.ahk
FileAppend, ClipBoard := %ClipBoard%, ~.ahk, UTF-8
RunWait, ~.ahk
MsgBox,% ClipBoard ;5
Return
Or use tidbit's eval(exp)
https://www.autohotkey.com/boards/viewtopic.php?f=6&t=15389
by Rohwedder
14 Jan 2021, 11:57
Forum: Ask For Help
Topic: Repeat a hotkey after its first thread is finished? Topic is solved
Replies: 2
Views: 55

Re: Repeat a hotkey after its first thread is finished? Topic is solved

Hallo,
try:

Code: Select all

varv:=0
tooltip % varv
#MaxThreadsPerHotkey 10
F1::
Critical
sleep 5000
varv++
tooltip % varv
return
by Rohwedder
14 Jan 2021, 02:35
Forum: Gaming
Topic: bind with two buttons simultaneously?
Replies: 3
Views: 103

Re: bind with two buttons simultaneously?

Try: Joy5:: Joy6:: Suspend, On ;prevents an additional thread Sleep, 400 ;waits for a 2nd JoyKey Switch, SubStr(A_ThisHotkey,0) GetKeyState("Joy5") GetKeyState("Joy6") { Case "510","500":WinMaximize, ahk_class Notepad++ ;Joy5 Case "601","600":WinMinimize, ahk_class Notepad++ ;Joy6 Case "511":Run, no...
by Rohwedder
13 Jan 2021, 15:17
Forum: Ask For Help
Topic: LButton & RButton :: MButton
Replies: 2
Views: 53

Re: LButton & RButton :: MButton

Hallo, try: RButton & LButton::SendInput, {MButton Down} RButton & LButton Up::SendInput, {MButton Up} RButton::RButton Regardless of the order in which the buttons are pressed would make LButton unusable! If LButton would be pressed first, Autohotkey would have to hide this event from your applicat...
by Rohwedder
13 Jan 2021, 13:02
Forum: Ich brauche Hilfe
Topic: Icon der Titelleiste in Gui anzeigen
Replies: 6
Views: 140

Re: Icon der Titelleiste in Gui anzeigen

Dank deinem Hinweis googelte ich die Funktion JEE_WinGetIcon(hWnd) von jeeswg.
Das Icon mit BackgroundTrans über meinen blauen Farbgradienten 0x0A246A - 0xA6CAF0 gelegt sieht wirklich WinXp-stylisch aus.
by Rohwedder
13 Jan 2021, 10:17
Forum: Gaming
Topic: hold shift and rapid press "k" with slight delay Topic is solved
Replies: 3
Views: 52

Re: hold shift and rapid press "k" with slight delay Topic is solved

Hallo,
try:

Code: Select all

~Shift::
While, GetKeyState("Shift","P")
{
	Send, {Blind}k
	Sleep, 300
}
Return
by Rohwedder
13 Jan 2021, 10:00
Forum: Ask For Help
Topic: Problem with my mouse whilst having my AHK script open
Replies: 1
Views: 56

Re: Problem with my mouse whilst having my AHK script open

Hallo,
try:

Code: Select all

Del::ExitApp
`::toggle:=!toggle
#If toggle
$Lbutton::
;...
return
#If
by Rohwedder
13 Jan 2021, 03:44
Forum: Gaming
Topic: bind with two buttons simultaneously?
Replies: 3
Views: 103

Re: bind with two buttons simultaneously?

Hallo,
joystick buttons are special! Perhaps something like this?:

Code: Select all

Joy5::
Joy6::
Switch, GetKeyState("Joy5") GetKeyState("Joy6")
{
Case "10":ToolTip, only Joy5
Case "01":ToolTip, only Joy6
Default:ToolTip, both Joy5 + Joy6
}
Return
by Rohwedder
13 Jan 2021, 02:19
Forum: Gaming
Topic: Holding Shift key remap mouse buttons
Replies: 2
Views: 67

Re: Holding Shift key remap mouse buttons

Hallo,
try:

Code: Select all

#If WinActive("ahk_exe MWOClient.exe")
LShift::Return
#If GetKeyState("LShift", "p") && WinActive("ahk_exe MWOClient.exe")
MButton::5
RButton::4
LButton::3
#If
by Rohwedder
12 Jan 2021, 08:53
Forum: Ask For Help
Topic: LShift and RShift with arrow key, not working as I expected
Replies: 3
Views: 49

Re: LShift and RShift with arrow key, not working as I expected

Then perhaps:

Code: Select all

<+Right::Send, {End} ;RShift + Right
+Right::Send, +{End} ;LShift (+ RShift) + Right
by Rohwedder
12 Jan 2021, 04:09
Forum: Ask For Help
Topic: LShift and RShift with arrow key, not working as I expected
Replies: 3
Views: 49

Re: LShift and RShift with arrow key, not working as I expected

Hallo,
which key combinations should send what? I can't tell from your snippets.

Go to advanced search