Sign in to follow this  
Followers 0
Raffle

Hotkeyset()

11 posts in this topic

Hi, i can normally make it so that a msgbox or input box is set with a hotkey to pop it up. this time i used koda and i don't know how do make the hotkeyset work with koda. could someone please tell me how?

Share this post


Link to post
Share on other sites



Please post some code that replicates the problem that you are having.

[Not that I'll be of much help with GUIs - but it will give someone else a place to start.]


[size="1"][font="Arial"].[u].[/u][/font][/size]

Share this post


Link to post
Share on other sites

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("Raffle's Auto Talker!", 243, 23, 193, 115)

GUISetIcon("C:\Program Files\Diamond Caves II\DC2.exe")

GUICtrlCreateInput("", 0, 0, 193, 21)

GUICtrlSetBkColor(-1, 0xA6CAF0)

GUICtrlCreateInput("", 208, 0, 33, 21)

GUICtrlSetBkColor(-1, 0x008000)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

EndSwitch

WEnd

Share this post


Link to post
Share on other sites

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("Raffle's Auto Talker!", 243, 23, 193, 115)

GUISetIcon("C:\Program Files\Diamond Caves II\DC2.exe")

GUICtrlCreateInput("", 0, 0, 193, 21)

GUICtrlSetBkColor(-1, 0xA6CAF0)

GUICtrlCreateInput("", 208, 0, 33, 21)

GUICtrlSetBkColor(-1, 0x008000)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

Exit

EndSwitch

WEnd

It should work the same way with Koda I believe. Just use the GUISetState in a function and ensure you use the handle for the window. In the code provided I used the F1 key to pop up your window.

#include <GUIConstants.au3>

HotKeySet("{F1}", "_ShowWindow")

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Raffle's Auto Talker!", 243, 23, 193, 115)
GUISetIcon("C:\Program Files\Diamond Caves II\DC2.exe")
GUICtrlCreateInput("", 0, 0, 193, 21)
GUICtrlSetBkColor(-1, 0xA6CAF0)
GUICtrlCreateInput("", 208, 0, 33, 21)
GUICtrlSetBkColor(-1, 0x008000)
;
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd 

Func _ShowWindow()
    GUISetState(@SW_SHOW, $Form1)
EndFunc

Share this post


Link to post
Share on other sites

#5 ·  Posted (edited)

how do i make it so it don't close after 1 time! and also look at my attachment it has a picture of it. i was wondering how to make it so the left input be what's said and the right input how many time's saying. this is for runescape btw

autotalker.bmp

for future reference how do i make it so picture's show up instead of using attachments *edit

Edited by Raffle

Share this post


Link to post
Share on other sites

how do i make it so it don't close after 1 time! and also look at my attachment it has a picture of it. i was wondering how to make it so the left input be what's said and the right input how many time's saying. this is for runescape btw

autotalker.bmp

for future reference how do i make it so picture's show up instead of using attachments *edit

what?

please organize your words so we can help


[quote]Baby you're all that I want, When you're lyin' here in my armsI'm findin' it hard to believe, We're in heavenAnd love is all that I need , And I found it there in your heartIt isn't too hard to see, We're in heaven .Bryan Adams[/quote].............................................................................[u]AUTOIT[/u]

Share this post


Link to post
Share on other sites

#7 ·  Posted (edited)

how do i make it so it don't close after 1 time! and also look at my attachment it has a picture of it. i was wondering how to make it so the left input be what's said and the right input how many time's saying. this is for runescape btw

autotalker.bmp

for future reference how do i make it so picture's show up instead of using attachments *edit

I don't quite understand what you're talking about as far as the left and right input. If you could describe it in more detail and I will see what I can do. As far as the window disappearing after one time that's all due to the $GUI_EVENT_CLOSE. Replace your _ShowWindow() function with this:

Func _ShowWindow()
    GUISetState(@SW_SHOW, $Form1)
    While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
            Case $GUI_EVENT_CLOSE
                GUISetState(@SW_HIDE, $Form1)

        EndSwitch
    Wend
EndFunc

In regards to putting the picture in instead of adding an attachment, you just click on the Insert Image button below the fonts drop down menu.

Edited by kiwikid

Share this post


Link to post
Share on other sites

in the left hand side yo utype in what you want it to type in runescape.

in the right say you put 10 it would say that message 10 times

Share this post


Link to post
Share on other sites

in the left hand side yo utype in what you want it to type in runescape.

in the right say you put 10 it would say that message 10 times

Below is more modified code. Your next problem is whether or not you need to add a @CRLF at the end of each thing to be said. However the most important thing to do is ensure your chat pane has focus before performing the Send.

#include <GUIConstants.au3>

HotKeySet("{F1}", "_ShowWindow")

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Raffle's Auto Talker!", 243, 23, 193, 115)
GUISetIcon("C:\Program Files\Diamond Caves II\DC2.exe")
$Input1 = GUICtrlCreateInput("", 0, 0, 193, 21)
GUICtrlSetBkColor(-1, 0xA6CAF0)
$Input2 = GUICtrlCreateInput("", 208, 0, 33, 21)
GUICtrlSetBkColor(-1, 0x008000)
;
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit

    EndSwitch
WEnd 

Func _ShowWindow()
    GUISetState(@SW_SHOW, $Form1)
    While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
            Case $GUI_EVENT_CLOSE
            ;Read in item to be said
                $Speak = GUICtrlRead($Input1)
                $Repeat = GUICtrlRead($Input2)
                GUISetState(@SW_HIDE, $Form1)
                For $i = 1 to $Repeat
                    Send($Speak, 1)
                Next

        EndSwitch
    Wend
EndFunc

Share this post


Link to post
Share on other sites

take the Exit out of the damn loop you have if you want it to run more than once.... I think this COULD be what you are talking about??? please be more clear

Share this post


Link to post
Share on other sites

#11 ·  Posted (edited)

made a few changes for you now u can use you app as many time as u want

add few hotkeys with functions

check the explaining near each modification

hope this helps u

; MODIFIED BY STAR2
#include <GUIConstants.au3>
HotKeySet(&quoÞÑ_I][ÝË  ][Ý×ÔÚÝÕÚ[ÝÉ][ÝÊHÈSÕTÕÑVHÔÒÕÒSÈHÕRBݶW6WBgV÷C·´c'ÒgV÷C²ÂgV÷Cµô7FöâgV÷C²²õU"õD´Udõ"Ô´ärDR
Q%=8)!½Ñ-åMÐ ÅÕ½ÐííÍôÅÕ½Ðì°ÅÕ½Ðí}!¥]¥¹½ÜÅÕ½Ðì¤ìe=UH!=Q-d= HIDING THE GUI
HotKeySet("{F4}", "_Close") ; HOTKEY INÐTÑHHÐSQÈVUSÕTÑÔSBÌÍÑÜLHHÕRPÜX]J    ][ÝÔYIÌη2WFòFƶW"b333²gV÷C²Â#C2Â#2¤uT6WD6öâgV÷C·6VÆÃ3"æFÆÂgV÷C²Ã#ÀÌØí%¹ÁÕÐÄôU%
Ñɱ
ÉÑ%¹ÁÕÐ ÅÕ½ÐìÅÕ½Ðì°À°À°ÄäÌ°ÈĤ)U%
ÑɱMÑ   ­olor(-1, 0xA6CAF0)
$Input2 = GUICtrlCreateInput("", 208, 0, ÌËK  ÌÍÑT×ÓSPTHÈÕÈÑUTÈSUÈPÐÑTSTSÈÓHSPT¤uT7G&Å6WD&´6öÆ÷"Ó ¥vÆR¢6ÆVW¥tVæB ¤gVæ2õ6÷u¥¹½Ü ¤(U%MÑMÑÑ¡M]}M!=°ÀÌØí½É´Ä¤)¹Õ¹()Õ¹}Ñ¥½¸ ¤(%½ $i = 1 To GUICtrlRead ($Input2)
        MsgBox (-1, "test info&quÝÈÕRPÝXY
    ÌÍÒ[]JKJBBTÛY
L
BS^[[Â[ÈÒYUæF÷r uT6WE7FFR5uôDRÂb33c´f÷&Ó¤VæDgVæ0 ¤gVæ2ô6Æ÷6R W@¤¹Õ¹

see ya :rolleyes:

Edited by star2

[quote]Baby you're all that I want, When you're lyin' here in my armsI'm findin' it hard to believe, We're in heavenAnd love is all that I need , And I found it there in your heartIt isn't too hard to see, We're in heaven .Bryan Adams[/quote].............................................................................[u]AUTOIT[/u]

Share this post


Link to post
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
Sign in to follow this  
Followers 0