Send_CS

;~ {NUMPAD0} ~ {NUMPAD9}
HotKeySet('{NUMPAD0}','NUMPAD0')
HotKeySet('{NUMPAD1}','NUMPAD1')
HotKeySet("{esc}", "Sair")


While 1
   Sleep (30)
WEnd

Func coinflip()
   If $flip = 1 Then
   $flip = 0
Else
   $flip = 1
   EndIf
EndFunc

;~ manda b 4 1 sem delay
Func NUMPAD0()
   Send('b41')
EndFunc


;~ manda b 4 4 com delay de meio segundo
Func NUMPAD1()
   Send('b')
   Sleep(50)
   Send('4')
   Sleep(50)
   Send('4')
EndFunc


Func Sair()
   Exit
EndFunc