MSFN Forum: Can Anyone Do this - MSFN Forum

Jump to content



Page 1 of 1
  • You cannot start a new topic
  • You cannot reply to this topic

Can Anyone Do this Help! Rate Topic: -----

#1 User is offline   Orochimaru 

  • Group: Members
  • Posts: 3
  • Joined: 01-September 05

Posted 01 September 2005 - 02:58 PM

Hey everyone, darn im soo tired i've been trying to find out how to make a dialog box by pressing a shortcutkey. After the dialog has poped up i wanted to type somthing and then click ok and then make it Sleep(3000) after that open notepad and make it Send w/e i typed. But ofcourse i havnt got to do that, thats why im here for help.
I did that with a INput box here is the code:


HotKeySet("{F5}", "Type")
HotKeySet("{F8}", "Pause")
HotKeySet("{F9}", "Quit")

While 1
Sleep(100)
Wend


Func Type()
While 1
$clip1 = InputBox("Message", "Enter/Paste text to Spam", "" )
Run("C:\Program Files\Starcraft\Starcraft.exe")
Sleep(700)
$i=0
Do
Send("{Enter}")
Send("" & $clip1)
Send("{Enter}")
until $i=10
wend
EndFunc




Func Quit()
While 1
Exit 0
Wend
Endfunc

Func Pause()
While1
Wend
Endfunc


Basically all that does is when i press F5 a inputbox pops up and what ever i type in it. Gets send to w/e window im on after its sleep time.

So i wanted to do that with a Dialog box because i wanted to Send Profiles that are more then 1 line at once.

This is what i have so far but it seems to make no sense what so ever:


dim $clip1


HotKeySet("{F7}", "Type")
HotKeySet("{F9}", "Pause")


Func Pause()
While 1
Wend
Endfunc

func type()
while 1
$clip1 = Dialog Box
Sleep(700)
$i=0
Do
Send("{Enter}")
Send("" & $clip1)
Send("{Enter}")
until $i=10
wend
EndFunc




GUICreate("Type What You Want To Spam Below") ; will create a dialog box that when displayed is centered
GUISetState (@SW_SHOW) ; will display an empty dialog box

$GUI_EVENT_CLOSE = "1"

$nEdit = GUICtrlCreateEdit ("Type Here", 3,3,300,180)
GUICtrlCreateButton ("Ok", 20,200,50)
GUISetState ()

for $n=1 to 5
GUICtrlSetData ($nEdit,@CRLF & "line "& $n)
next


$EM_LINEINDEX = 0x00BB
$EM_LINEFROMCHAR = 0x00C9

Do
$msg = GUIGetMsg()
if $msg >0 then
$n=GUICtrlSendMsg ($nEdit, $EM_LINEINDEX,-1,0)
$nline=GUICtrlSendMsg( $nEdit, $EM_LINEFROMCHAR,$n,0)
GUICtrlSetState ($nEdit,256) ; set focus

MsgBox (0,"Currentline",$nLine)
Endif
Until $msg = $GUI_EVENT_CLOSE

All this does is when i run it a Dialog box pops up right away and then when i press F7 it types random words or numbers...

Also i didnt include

#include gui.........au3.
because it says "Error reading #include gui.........au3."

Can anyone please look at these sources and see if they can help me, i really need it thank you for reading.


#2 User is offline   spazmire11 

  • MicrowinX Devoloper
  • PipPip
  • Group: Members
  • Posts: 275
  • Joined: 27-June 05

Posted 01 September 2005 - 03:09 PM

if i am understanding this right you are sending this all in at once?
starcraft will go nuclear about that because you can only have one line of text
however if you want to spam multiple lines just make a array of strings and send each string individualy

do you understand that?

btw dont try spaming at the main bnet screen after i think 10 consecutave types in some time it will kick you for a day i think
spaming aint exactly nice eather so be nice plz

#3 User is offline   ripken204 

  • The Hardware Guy
  • PipPipPipPipPipPipPipPipPipPip
  • Group: Members
  • Posts: 6,311
  • Joined: 23-December 04
  • OS:Windows 7 x64
  • Country: Country Flag

Posted 01 September 2005 - 03:49 PM

i could do it but i wont! i hate you spammers, you make it so that ppl cant even talk in a chat room!

#4 User is offline   EchoNoise 

  • Defender of the Penguin
  • PipPipPipPipPip
  • Group: Members
  • Posts: 933
  • Joined: 10-April 05

Posted 01 September 2005 - 08:33 PM

Sorry about being a a-hole about all of this "moderator" hints... but I used to be a moderator on another forum... trying to get out of it... anyways


Spamming is sure not a good way in any form... Plus shouldn't this be in the programming section ?!

Share this topic:


Page 1 of 1
  • You cannot start a new topic
  • You cannot reply to this topic

1 User(s) are reading this topic
0 members, 1 guests, 0 anonymous users



All trademarks mentioned on this page are the property of their respective owners
Copyright © 2001 - 2011 msfn.org
Privacy Policy