Iso: A script to write 4 me

[nain93]

i would like something like this:

HotKeySet("{F11}", "autoadvertising")

While 1 
   Sleep(10) 
WEnd 

Func autoadvertising()
AutoItSetOption("SendKeyDelay", 20)
Send("{ENTER} Runs hosted by channel: Clan Xnlg {ENTER}")
Sleep(10) 
Send("{ENTER} Come see us to follow. {ENTER}")
Sleep(10) 
Send("{ENTER}~~~Clan Xnlg~~~ {ENTER}")
 
EndFunc

but the 3x sentences would appear one after the other realy realy fast. Cu im using this on Diablo 2, and it takes some times to send the message. i would like something that could send all in 1shot when i press F11.

Is there a function to do that instead of

AutoItSetOption("SendKeyDelay", 20)

I tried to put lower keydelay but it dosent work on D2.

[martin]

i would like something like this:

HotKeySet("{F11}", "autoadvertising")

While 1 
   Sleep(10) 
WEnd 

Func autoadvertising()
AutoItSetOption("SendKeyDelay", 20)
Send("{ENTER} Runs hosted by channel: Clan Xnlg {ENTER}")
Sleep(10) 
Send("{ENTER} Come see us to follow. {ENTER}")
Sleep(10) 
Send("{ENTER}~~~Clan Xnlg~~~ {ENTER}")
 
EndFunc

but the 3x sentences would appear one after the other realy realy fast. Cu im using this on Diablo 2, and it takes some times to send the message. i would like something that could send all in 1shot when i press F11.

Is there a function to do that instead of

AutoItSetOption("SendKeyDelay", 20)

I tried to put lower keydelay but it dosent work on D2.

So that I understand, do you want to have 3 messages sent, with a long enough time between each one so that they can be read, but in a way that doesn't cause a delay in the script? So that when you press F11 the process to start sending the messages begins but your script continues even though there might be a 10 second delay between each message (sentence).

[Tr10]

expandcollapse popup

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;Auto it Baal Helper;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;By Tr10 for op eMelee;;;;;;;;;;;;;;;;;;;;;;;;
$msg1 = IniRead ( "config.ini" , "Config", "msg1", "default" );
$msg2 = IniRead ( "config.ini" , "Config", "msg2", "default" );
$msg3 = IniRead ( "config.ini" , "Config", "msg3", "default");
$msg4 = IniRead ( "config.ini" , "Config", "msg4", "default");
$msg5 = IniRead ( "config.ini" , "Config", "msg5", "default" );
$msg6 = IniRead ( "config.ini" , "Config", "msg6" , "default");
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$delay = Iniread ("config.ini", "Config" , "delay" , "default");
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
$hk1 = Iniread ("config.ini" , "config" , "Hotkey1" , "default");
$hk2 = Iniread ("config.ini" , "config" , "Hotkey2" , "default");
$hk3 = Iniread ("config.ini" , "config" , "Hotkey3" , "default");
$hk4 = Iniread ("config.ini" , "config" , "Hotkey4" , "default");
$hk5 = Iniread ("config.ini" , "config" , "Hotkey5" , "default");
$hk6 = Iniread ("config.ini" , "config" , "Hotkey6" , "default");
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Hotkey's;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Global $Paused
HotKeySet($hk1, "Channel")
HotKeySet($hk2, "Ng")
HotKeySet($hk3, "NoBaal")
HotKeySet($hk4, "AllonBaal")
HotKeySet($hk5, "Clear")
HotKeySet($hk6, "Unclear")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;Loop;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
While 1
    Sleep(100)
WEnd
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;Fuction's Start;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Func Channel()
        Send ("{ENTER}")
        sleep($delay)
        Send ($msg1)
        sleep($delay)
        Send ("{ENTER}")
EndFunc

Func Ng()
        Send ("{ENTER}")
        sleep($delay)
        Send ($msg2)
        sleep($delay)
        Send ("{ENTER}")
EndFunc

Func NoBaal()
        Send ("{ENTER}")
        sleep($delay)
        Send ($msg3)
        sleep($delay)
        Send ("{ENTER}")
EndFunc

Func AllonBaal()
        Send ("{ENTER}")
        sleep($delay)
        Send ($msg4)
        sleep($delay)
        Send ("{ENTER}")
EndFunc

Func Clear()
        Send ("{ENTER}")
        sleep($delay)
        Send ($msg5)
        sleep($delay)
        Send ("{ENTER}")
EndFunc

Func Unclear()
        Send ("{ENTER}")
        sleep($delay)
        Send ($msg6)
        sleep($delay)
        Send ("{ENTER}")
EndFunc

the config.ini:

[config]
;These are your spam messages, edit them accordingly.

msg1=----Op eMelee for baal runs.----
msg2=Okay, time for new game.
msg3=Don't go in chamber. We top baal in these runs.
msg4=Welcome to op eMelee Baal's. These runs are hosted by Guild Melee on d2jsp.org -- Stop by and say hi, we baal out of channel op eMelee.
msg5=[1]Tp is Up and Leacher friendly.
msg6=[2]Tp is Fucking Ugly, I wouldn't come in here.


hotkey1={NUMPAD1}
hotkey2={NUMPAD2}
hotkey3={NUMPAD3}
hotkey4={NUMPADADD}
hotkey5={NUMPAD7}
hotkey6={NUMPAD8}

;This is your delay between typing keys, turn this up if you notice any lag.(ms)
delay=100

I wrote this awhile ago to spam games for my baal channel.

You could set the delays to lower except that autoit will type too fast and you will be typing messages without pressing enter first.

To answer your question in one sentence, their is no way to send all that text all at once without sending packets.

hope that helps

Edited December 22, 2007 by Tr10

[nain93]

whats the Config.ini ??

[nain93]

anybody can help me plz?

[nain93]

Does I have to make the Config.ini or it is somewhere? and if I have to make it, how i do?

[nain93]

nvm.. i found how.