i need some help with this code i want to bind D to press D+E same time and A+Q and same time

[chicomat]

i made this code but when i run it it loops and spam de keys i only want to when i hold up the key stops and when i push down starts again

HotKeySet("a", "OneAndTwo")
HotKeySet("d", "OneAndThree")
Main()

Func Main()
    While 1

    WEnd
 EndFunc   ;==>main

Func OneAndTwo()
   While "1"
     Send("aq")
   WEnd
  EndFunc

Func OneAndThree()
   while "1"
     Send("de")
     WEnd
  EndFunc

[chicomat]

mistake on the tittle i want to bind 

D to press D+E at the same time when i hold 

and 

A to press A+Q at the same time when i hold

but it loops for ever 

[Jos]

4 hours ago, chicomat said:

when i run it it loops and spam de keys

Spam keys for what?

[chicomat]

when i stop pushing a or d it keeps doing the macro. i want to start the macro when i push and stop when i lift uft the key

[Jos]

You didn't answer my question!

Why do you need this?