Jump to content

beep guitar

emoyasha

By emoyasha,
in AutoIt Example Scripts

 Share

Recommended Posts

emoyasha Universalist

emoyasha

Posted
Posted (edited)

yup just run it then move ur mouse all across the screen/

while 1
        $pos = MouseGetPos()
$freak = $pos[0] - $pos[1] / 180 * 360
    beep($freak,"1")
    
wendoÝ÷ Ù©Ýk¦)"Ö­)à¦sZºÚ"µÍÌÍÙHNBÌÍÝHBY ÌÍÙH ][ÝÉ][ÝÈ[IÌÍÙH[ÛJNK
B[YY    ÌÍÝH ][ÝÉ][ÝÈ[IÌÍÝH[ÛJ
L
L
B[Y ÌÍÙ  ÌÍÝ
B[È    ÌÍÙXZË  ÌÍÝ[YJB]Ú[HBBZY ÌÍÙXZÈ  ÝÈL[BBIÌÍÙXZÈHNBBQ[ÙBBBQ[YXY
    ÌÍÙXZË  ÌÍÝ[YJBIÌÍÙXZÈH  ÌÍÙXZÈ
ÈÌÙ[Q[[
Edited by emoyasha
Spoiler

Admin Of:http://notmyspace.info [Under Development, looking for volunteers to help improve]http://PSNetCards.co.ukhttp://ZacnAndLindsey.com [Under development, not quite sure what to do with it yet]http://revelm.com------------------------------------Radio Streams:http://75.185.53.88:8000 [128kb/s 44kHz]http://75.185.53.88:8002 [22kb/s 22kHz](works on mobile phones)-----------------------------------My Server:Owned By: http://jumpline.comIP:66.84.19.220Bandwidth:200GBStorage Space:1TBNetwork Connection: 1GB/S[up and down]Operating System: Red Hat LinuxInstalled Apps:Webmail, phpBB, Majordomo, phpMyAdmin, MySQL, Active Server Pages, FrontPage Extensions 2002, GraphicsMagick, Mod Perl, Perl, PHP: Hypertext Preprocessor, Python(want cheap good webhosting, or need a place to park your domain? contact me)-----------------------------------

 

Link to comment
Share on other sites
Squirrely1 Universalist

Squirrely1

Posted
Posted (edited)

We will likely excuse emoyasha's post here with its keen sense of syntax, proper formatting, initialization globalizable as it is - and lovely results - likely because automatic updates has ruined his machine, he's on pot, and an inlaw is visiting.

Edit1: I take that back; this is mildly interesting (from a child's perspective):

While 1
    $pos = MouseGetPos()
    $freak = $pos[0] - $pos[1] / 180 * 360
    Beep($freak, "1")
WEnd
Edited by Squirrely1

Das Häschen benutzt Radar

Link to comment
Share on other sites
emoyasha Universalist

emoyasha

Posted
  • Author
Posted

hmmmmm.......quite frankly, when you graduate your grammar class, then come patronize me.

Spoiler

Admin Of:http://notmyspace.info [Under Development, looking for volunteers to help improve]http://PSNetCards.co.ukhttp://ZacnAndLindsey.com [Under development, not quite sure what to do with it yet]http://revelm.com------------------------------------Radio Streams:http://75.185.53.88:8000 [128kb/s 44kHz]http://75.185.53.88:8002 [22kb/s 22kHz](works on mobile phones)-----------------------------------My Server:Owned By: http://jumpline.comIP:66.84.19.220Bandwidth:200GBStorage Space:1TBNetwork Connection: 1GB/S[up and down]Operating System: Red Hat LinuxInstalled Apps:Webmail, phpBB, Majordomo, phpMyAdmin, MySQL, Active Server Pages, FrontPage Extensions 2002, GraphicsMagick, Mod Perl, Perl, PHP: Hypertext Preprocessor, Python(want cheap good webhosting, or need a place to park your domain? contact me)-----------------------------------

 

Link to comment
Share on other sites
BillLuvsU Universalist

BillLuvsU

Posted
Posted

Down people, no need for drama. Cool little script. Now make one where you use the keyboard. Use each row of keys for each string. Of course I suppose it would have to be a base.and you could use the num pad enter as the strum key.... that would be AWESOME.

[center][/center]Working on the next big thing.Currently Playing: Halo 4, League of LegendsXBL GT: iRememberYhslaw

Link to comment
Share on other sites
emoyasha Universalist

emoyasha

Posted
  • Author
Posted

amazing idea, like hold the keyboard sideways.. righ tright, just one problem i have no idea on hwo to accosiate beep frequencys with notes, so untill someone tells me how i will just do increasing value, lol this might take a while, cause up as to add down has to subtract so i think if statements will work like u start at Q if $key = "Q" then ;code here else endif if $key = Q and $newkey = W then ;add 1000 else if $newkey = Q ;play regular endif. just an idea, and sugestiosn appriciated.

Spoiler

Admin Of:http://notmyspace.info [Under Development, looking for volunteers to help improve]http://PSNetCards.co.ukhttp://ZacnAndLindsey.com [Under development, not quite sure what to do with it yet]http://revelm.com------------------------------------Radio Streams:http://75.185.53.88:8000 [128kb/s 44kHz]http://75.185.53.88:8002 [22kb/s 22kHz](works on mobile phones)-----------------------------------My Server:Owned By: http://jumpline.comIP:66.84.19.220Bandwidth:200GBStorage Space:1TBNetwork Connection: 1GB/S[up and down]Operating System: Red Hat LinuxInstalled Apps:Webmail, phpBB, Majordomo, phpMyAdmin, MySQL, Active Server Pages, FrontPage Extensions 2002, GraphicsMagick, Mod Perl, Perl, PHP: Hypertext Preprocessor, Python(want cheap good webhosting, or need a place to park your domain? contact me)-----------------------------------

 

Link to comment
Share on other sites
emoyasha Universalist

emoyasha

Posted
  • Author
Posted (edited)

how do i detect a key being pressed? and lmao i have no idea how to start this, if someone could start me off, i could finish it.

or maybe i could assign each key a frequency? if that would be easier, using hotkeys....

what am i doing wrong

HotKeySet ( "Q", "_be")
while 1
wend
Func _be()
    Beep(1000, 500)
endfunc
Edited by emoyasha
Spoiler

Admin Of:http://notmyspace.info [Under Development, looking for volunteers to help improve]http://PSNetCards.co.ukhttp://ZacnAndLindsey.com [Under development, not quite sure what to do with it yet]http://revelm.com------------------------------------Radio Streams:http://75.185.53.88:8000 [128kb/s 44kHz]http://75.185.53.88:8002 [22kb/s 22kHz](works on mobile phones)-----------------------------------My Server:Owned By: http://jumpline.comIP:66.84.19.220Bandwidth:200GBStorage Space:1TBNetwork Connection: 1GB/S[up and down]Operating System: Red Hat LinuxInstalled Apps:Webmail, phpBB, Majordomo, phpMyAdmin, MySQL, Active Server Pages, FrontPage Extensions 2002, GraphicsMagick, Mod Perl, Perl, PHP: Hypertext Preprocessor, Python(want cheap good webhosting, or need a place to park your domain? contact me)-----------------------------------

 

Link to comment
Share on other sites
emoyasha Universalist

emoyasha

Posted
  • Author
Posted

ahhh what is hex key?

Spoiler

Admin Of:http://notmyspace.info [Under Development, looking for volunteers to help improve]http://PSNetCards.co.ukhttp://ZacnAndLindsey.com [Under development, not quite sure what to do with it yet]http://revelm.com------------------------------------Radio Streams:http://75.185.53.88:8000 [128kb/s 44kHz]http://75.185.53.88:8002 [22kb/s 22kHz](works on mobile phones)-----------------------------------My Server:Owned By: http://jumpline.comIP:66.84.19.220Bandwidth:200GBStorage Space:1TBNetwork Connection: 1GB/S[up and down]Operating System: Red Hat LinuxInstalled Apps:Webmail, phpBB, Majordomo, phpMyAdmin, MySQL, Active Server Pages, FrontPage Extensions 2002, GraphicsMagick, Mod Perl, Perl, PHP: Hypertext Preprocessor, Python(want cheap good webhosting, or need a place to park your domain? contact me)-----------------------------------

 

Link to comment
Share on other sites
Swift Universalist

Swift

Posted
Posted (edited)

Emoyasha, I made this just for you, although I could of used a for/next loop I died, this works fine, use the keys a-z for pitch, and 0-9 for lengh

Warning: 600 Lines of code!

#include <Misc.au3>
ToolTip("Beep Guitar Activated!", 1, 1)
$Dll = DllOpen("User32.dll")
While 1
    If _IsPressed("51", $Dll) Then;Letter Q
        If _IsPressed("60", $Dll) Then
            Beeep("Q|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("Q|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("Q|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("Q|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("Q|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("Q|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("Q|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("Q|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("Q|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("Q|9")
        EndIf
    EndIf
    If _IsPressed("57", $Dll) Then;Letter W
        If _IsPressed("60", $Dll) Then
            Beeep("W|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("W|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("W|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("W|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("W|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("W|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("W|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("W|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("W|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("W|9")
        EndIf
    EndIf
    If _IsPressed("45", $Dll) Then;Letter E
        If _IsPressed("60", $Dll) Then
            Beeep("E|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("E|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("E|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("E|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("E|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("E|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("E|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("E|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("E|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("E|9")
        EndIf
    EndIf
    If _IsPressed("52", $Dll) Then;Letter R
        If _IsPressed("60", $Dll) Then
            Beeep("R|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("R|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("R|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("R|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("R|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("R|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("R|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("R|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("R|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("R|9")
        EndIf
    EndIf
    If _IsPressed("54", $Dll) Then;Letter T
        If _IsPressed("60", $Dll) Then
            Beeep("T|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("T|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("T|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("T|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("T|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("T|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("T|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("T|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("T|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("T|9")
        EndIf
    EndIf
    If _IsPressed("45", $Dll) Then;Letter Y
        If _IsPressed("60", $Dll) Then
            Beeep("Y|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("Y|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("Y|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("Y|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("Y|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("Y|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("Y|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("Y|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("Y|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("Y|9")
        EndIf
    EndIf
    If _IsPressed("55", $Dll) Then;Letter U
        If _IsPressed("60", $Dll) Then
            Beeep("U|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("U|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("U|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("U|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("U|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("U|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("U|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("U|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("U|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("U|9")
        EndIf
    EndIf
    If _IsPressed("49", $Dll) Then;Letter I
        If _IsPressed("60", $Dll) Then
            Beeep("I|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("I|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("I|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("I|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("I|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("I|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("I|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("I|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("I|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("I|9")
        EndIf
    EndIf
    If _IsPressed("4F", $Dll) Then;Letter O
        If _IsPressed("60", $Dll) Then
            Beeep("O|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("O|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("O|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("O|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("O|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("O|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("O|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("O|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("O|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("O|9")
        EndIf
    EndIf
    If _IsPressed("50", $Dll) Then;Letter P
        If _IsPressed("60", $Dll) Then
            Beeep("P|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("P|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("P|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("P|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("P|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("P|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("P|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("P|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("P|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("P|9")
        EndIf
    EndIf
    If _IsPressed("41", $Dll) Then;Letter A
        If _IsPressed("60", $Dll) Then
            Beeep("A|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("A|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("A|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("A|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("A|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("A|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("A|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("A|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("A|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("A|9")
        EndIf
    EndIf
    If _IsPressed("53", $Dll) Then;Letter S
        If _IsPressed("60", $Dll) Then
            Beeep("S|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("S|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("S|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("S|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("S|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("S|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("S|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("S|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("S|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("S|9")
        EndIf
    EndIf
    If _IsPressed("44", $Dll) Then;Letter D
        If _IsPressed("60", $Dll) Then
            Beeep("D|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("D|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("D|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("D|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("D|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("D|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("D|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("D|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("D|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("D|9")
        EndIf
    EndIf
    If _IsPressed("46", $Dll) Then;Letter F
        If _IsPressed("60", $Dll) Then
            Beeep("F|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("F|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("F|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("F|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("F|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("F|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("F|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("F|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("F|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("F|9")
        EndIf
    EndIf
    If _IsPressed("47", $Dll) Then;Letter G
        If _IsPressed("60", $Dll) Then
            Beeep("G|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("G|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("G|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("G|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("G|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("G|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("G|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("G|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("G|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("G|9")
        EndIf
    EndIf
    If _IsPressed("48", $Dll) Then;Letter H
        If _IsPressed("60", $Dll) Then
            Beeep("H|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("H|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("H|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("H|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("H|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("H|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("H|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("H|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("H|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("H|9")
        EndIf
    EndIf
    If _IsPressed("4A", $Dll) Then;Letter J
        If _IsPressed("60", $Dll) Then
            Beeep("J|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("J|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("J|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("J|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("J|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("J|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("J|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("J|7")
        ElseIf _IsPRessed("68", $Dll) Then
            Beeep("J|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("J|9")
        EndIf
    EndIf
    If _IsPressed("4B", $Dll) Then;Letter K
        If _IsPressed("60", $Dll) Then
            Beeep("K|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("K|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("K|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("K|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("K|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("K|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("K|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("K|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("K|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("K|9")
        EndIf
    EndIf
    If _IsPressed("4C", $Dll) Then;Letter L
        If _IsPressed("60", $Dll) Then
            Beeep("L|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("L|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("L|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("L|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("L|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("L|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("L|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("L|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("L|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("L|9")
        EndIf
    EndIf
    If _IsPressed("5A", $Dll) Then;Letter Z
        If _IsPressed("60", $Dll) Then
            Beeep("Z|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("Z|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("Z|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("Z|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("Z|4")
        ElseIf _IsPRessed("65", $Dll) Then
            Beeep("Z|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("Z|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("Z|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("Z|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("Z|9")
        EndIf
    EndIf
    If _IsPressed("58", $Dll) Then;Letter X
        If _IsPressed("60", $Dll) Then
            Beeep("X|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("X|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("X|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("X|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("X|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("X|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("X|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("X|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("X|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("X|9")
        EndIf
    EndIf
    If _IsPressed("43", $Dll) Then;Letter C
        If _IsPressed("60", $Dll) Then
            Beeep("C|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("C|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("C|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("C|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("C|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("C|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("C|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("C|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("C|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("C|9")
        EndIf
    EndIf
    If _IsPressed("56", $Dll) Then;Letter V
        If _IsPressed("60", $Dll) Then
            Beeep("V|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("V|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("V|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("V|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("V|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("V|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("V|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("V|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("V|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("V|9")
        EndIf
    EndIf
    If _IsPressed("42", $Dll) Then;Letter B
        If _IsPressed("60", $Dll) Then
            Beeep("B|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("B|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("B|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("B|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("B|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("B|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("B|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("B|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("B|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("B|9")
        EndIf
    EndIf
    If _IsPressed("4E", $Dll) Then;Letter N
        If _IsPressed("60", $Dll) Then
            Beeep("N|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("N|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("N|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("N|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("N|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("N|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("N|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("N|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("N|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("N|9")
        EndIf
    EndIf
    If _IsPressed("4D", $Dll) Then;Letter M
        If _IsPressed("60", $Dll) Then
            Beeep("M|0")
        ElseIf _IsPressed("61", $Dll) Then
            Beeep("M|1")
        ElseIf _IsPressed("62", $Dll) Then
            Beeep("M|2")
        ElseIf _IsPressed("63", $Dll) Then
            Beeep("M|3")
        ElseIf _IsPressed("64", $Dll) Then
            Beeep("M|4")
        ElseIf _IsPressed("65", $Dll) Then
            Beeep("M|5")
        ElseIf _IsPressed("66", $Dll) Then
            Beeep("M|6")
        ElseIf _IsPressed("67", $Dll) Then
            Beeep("M|7")
        ElseIf _IsPressed("68", $Dll) Then
            Beeep("M|8")
        ElseIf _IsPressed("69", $Dll) Then
            Beeep("M|9")
        EndIf
    EndIf
WEnd

Func Beeep($LetterNumber)
    $String = StringSplit($LetterNumber, "|")
    ;Letter frequentcies
    If $String[1]="Q" Then $Fre=9000
    If $String[1]="W" Then $Fre=8500
    If $String[1]="E" Then $Fre=8250
    If $String[1]="R" Then $Fre=8000
    If $String[1]="T" Then $Fre=7750
    If $String[1]="Y" Then $Fre=7500
    If $String[1]="U" Then $Fre=7250
    If $String[1]="I" Then $Fre=7000
    If $String[1]="O" Then $Fre=6500
    If $String[1]="P" Then $Fre=6250
    If $String[1]="A" Then $Fre=6000
    If $String[1]="S" Then $Fre=5750
    If $String[1]="D" Then $Fre=5500
    If $String[1]="F" Then $Fre=5250
    If $String[1]="G" Then $Fre=4750
    If $String[1]="H" Then $Fre=4250
    If $String[1]="J" Then $Fre=4000
    If $String[1]="K" Then $Fre=3750
    If $String[1]="L" Then $Fre=3500
    If $String[1]="Z" Then $Fre=3250
    If $String[1]="X" Then $Fre=2750
    If $String[1]="C" Then $Fre=2250
    If $String[1]="V" Then $Fre=1750
    If $String[1]="B" Then $Fre=1250
    If $String[1]="N" Then $Fre=750
    If $String[1]="M" Then $Fre=250
    ;Number durations
    If $String[2]="0" Then $Dur=100
    If $String[2]="1" Then $Dur=200
    If $String[2]="2" Then $Dur=300
    If $String[2]="3" Then $Dur=400
    If $String[2]="4" Then $Dur=500
    If $String[2]="5" Then $Dur=600
    If $String[2]="6" Then $Dur=700
    If $String[2]="7" Then $Dur=800
    If $String[2]="8" Then $Dur=900
    If $String[2]="9" Then $Dur=1000
    Beep($Fre, $Dur)
EndFunc
Edited by R6V2
Link to comment
Share on other sites
  • Moderators
SmOke_N Universalist

SmOke_N

Posted
  • Moderators
Posted

Yep, definately could have knocked that down to like 40 or 50 lines max.

Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.

Link to comment
Share on other sites
emoyasha Universalist

emoyasha

Posted
  • Author
Posted

awesome! i couldn't find what key went with what number but awesome dude, thanks, it works perfect for me..

Spoiler

Admin Of:http://notmyspace.info [Under Development, looking for volunteers to help improve]http://PSNetCards.co.ukhttp://ZacnAndLindsey.com [Under development, not quite sure what to do with it yet]http://revelm.com------------------------------------Radio Streams:http://75.185.53.88:8000 [128kb/s 44kHz]http://75.185.53.88:8002 [22kb/s 22kHz](works on mobile phones)-----------------------------------My Server:Owned By: http://jumpline.comIP:66.84.19.220Bandwidth:200GBStorage Space:1TBNetwork Connection: 1GB/S[up and down]Operating System: Red Hat LinuxInstalled Apps:Webmail, phpBB, Majordomo, phpMyAdmin, MySQL, Active Server Pages, FrontPage Extensions 2002, GraphicsMagick, Mod Perl, Perl, PHP: Hypertext Preprocessor, Python(want cheap good webhosting, or need a place to park your domain? contact me)-----------------------------------

 

Link to comment
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...