Combining long press and double tapping scripts

[Joey5]

Hi all,
The following two scripts work well separately but not together. Any chance of combining it so that one script can send short press/single tap, long press, double tap and triple press?
Thank you in advance.

Code: Select all

#IFWinActive, ahk_exe notepad.exe
d::
 {
   count++
   settimer, actions, 350
 }
return

actions:
 {
   if (count = 1)
    {
      send d
    }
   else if (count = 2)
    {
      send e
    }
   else if (count = 3)
    {
      send f
    }
   count := 0
 }
return
#IFWinActive

Code: Select all

#IFWinActive, ahk_exe notepad.exe
$d::
keywait, d, T0.5
if errorlevel {
	SoundBeep
	Send e
} else Send d
keywait, d
; d key down would immediately trigger $d:: again
return
#IFWinActive

[flyingDman]

Try Morse: viewtopic.php?f=76&t=127450&p=563668&hilit=morse#p563668

V2 example

Code: Select all

<^Numpad0::sendtext((x:=Morse())="0"?"single"
	:x="00"?"double"
	:x="1"?"long"
	:"")

Morse(to := 250)
	{
	while KeyWait(hk := RegExReplace(A_ThisHotkey, ".*?(\W|\w*)$","$1"), "DT" to/1000)
        st := A_TickCount, KeyWait(hk), pttrn .= A_TickCount-st > to
	Return pttrn
	}

[Joey5]

@flyingDman thank you. I am hoping to avoid using a modifier key.

[flyingDman]

My example includes one but it does not require one.