Sign in to follow this  
Followers 0
AfX78z90

Help in do script minimized

3 posts in this topic

Here's the script:

;//////////////////////////////////////////////////////////////////////////////////////////////////

;////Protectus///Spam///Bot///Versão///1.0/////////////////////////////////////////////////////////

;///////Autor:///Protectus/////////////////////////////////////////////////////////////////////////

;//////////Feito///em///AutoITV3///////////////////////////////////////////////////////////////////

;/////////////E-mail:///lord_protectus@msn.com/////////////////////////////////////////////////////

;////Função do Script:///Spam BatlleNet///Channels/////////////////////////////////////////////////

;//////////////////////////////////////////////////////////////////////////////////////////////////

#include <GUIConstants.au3>

HotKeySet("^!p", "PauseFunction")

;=================================================================================================

; VARIAVEIS

;=================================================================================================

$logfile = FileOpen ("Logfile.txt", 1)

$msgini1 = IniRead("config.ini", "Loader", "Msg1", "")

$msgini2 = IniRead("config.ini", "Loader", "Msg2", "")

$msgini3 = IniRead("config.ini", "Loader", "Msg3", "")

$msgini4 = IniRead("config.ini", "Loader", "Msg4", "")

$msgini5 = IniRead("config.ini", "Loader", "Msg5", "")

$chaini1 = IniRead("config.ini", "Loader", "CHA1", "")

$chaini2 = IniRead("config.ini", "Loader", "CHA2", "")

$chaini3 = IniRead("config.ini", "Loader", "CHA3", "")

$chaini4 = IniRead("config.ini", "Loader", "CHA4", "")

$chaini5 = IniRead("config.ini", "Loader", "CHA5", "")

$msgdelay = IniRead("config.ini", "Loader", "Msgdelay", "")

FileWriteline ($logfile, "[Protectus SPAM BOT V1.0 Logfile de " & @MDAY & "/" & @MON & "/" & @YEAR & " " & @Hour & ":" & @Min & ":" & @Sec & "]")

;=================================================================================================

; INTERFACE DO BOT

;=================================================================================================

$spam_bot=GUICreate("Protectus Spam bot V1.0 para Diablo II", 350, 290)

$cor=GUISetBkColor(0xCCCCC)

$save=GuiCtrlCreateButton ("SALVAR", 250, 152, 50, 35)

$start=GUICtrlCreateButton("LIGAR SPAM", 250, 212, 85, 35)

$msg_grupo=GuiCtrlCreateGroup("Mensagens:", 7, 10, 220, 130)

$msg_1=GuiCtrlCreateLabel("1", 20, 33, 53, 15)

$msg1=GUICtrlCreateInput($msgini1, 30, 30, 190, 20)

$msg_2=GuiCtrlCreateLabel("2", 20, 53, 53, 15)

$msg2=GUICtrlCreateInput($msgini2, 30, 50, 190, 20)

$msg_3=GuiCtrlCreateLabel("3", 20, 73, 53, 15)

$msg3=GUICtrlCreateInput($msgini3, 30, 70, 190, 20)

$msg_4=GuiCtrlCreateLabel("4", 20, 93, 53, 15)

$msg4=GUICtrlCreateInput($msgini4, 30, 90, 190, 20)

$msg_5=GuiCtrlCreateLabel("5", 20, 113, 53, 15)

$msg5=GUICtrlCreateInput($msgini5, 30, 110, 190, 20)

$ch_grupo=GuiCtrlCreateGroup("Channels:", 7, 150, 220, 130)

$ch_1=GuiCtrlCreateLabel("1", 20, 173, 53, 15)

$ch1=GUICtrlCreateInput($chaini1, 30, 170, 190, 20)

$ch_2=GuiCtrlCreateLabel("2", 20, 193, 53, 15)

$ch2=GUICtrlCreateInput($chaini2, 30, 190, 190, 20)

$ch_3=GuiCtrlCreateLabel("3", 20, 213, 53, 15)

$ch3=GUICtrlCreateInput($chaini3, 30, 210, 190, 20)

$ch_4=GuiCtrlCreateLabel("4", 20, 233, 53, 15)

$ch4=GUICtrlCreateInput($chaini4, 30, 230, 190, 20)

$ch_5=GuiCtrlCreateLabel("5", 20, 253, 53, 15)

$ch5=GUICtrlCreateInput($chaini5, 30, 250, 190, 20)

$int_tempo=GuiCtrlCreateLabel("Intervalos:", 240, 30, 50, 15)

$tempo=GUICtrlCreateInput($msgdelay, 240, 50, 45, 20, 0x2001)

$obs=GuiCtrlCreateLabel("1000 = 1 Segundo", 240, 75, 100, 15)

GUISetState (@SW_SHOW)

;=================================================================================================

; START SCRIPT

;=================================================================================================

While 1

$msg = Guigetmsg()

Select

Case $msg = $GUI_EVENT_CLOSE

FileWriteline ($logfile, @Hour & ":" & @Min & ":" & @Sec & " " & "Fechou o Spam Bot")

Exit

Case $msg = $save

$lemsg1 = GUICtrlRead($msg1)

$lemsg2 = GUICtrlRead($msg2)

$lemsg3 = GUICtrlRead($msg3)

$lemsg4 = GUICtrlRead($msg4)

$lemsg5 = GUICtrlRead($msg5)

$lech1 = GUICtrlRead($ch1)

$lech2 = GUICtrlRead($ch2)

$lech3 = GUICtrlRead($ch3)

$lech4 = GUICtrlRead($ch4)

$lech5 = GUICtrlRead($ch5)

$wrimsg1 = IniWrite("config.ini", "Loader", "Msg1", $lemsg1)

$wrimsg2 = IniWrite("config.ini", "Loader", "Msg2", $lemsg2)

$wrimsg3 = IniWrite("config.ini", "Loader", "Msg3", $lemsg3)

$wrimsg4 = IniWrite("config.ini", "Loader", "Msg4", $lemsg4)

$wrimsg5 = IniWrite("config.ini", "Loader", "Msg5", $lemsg5)

$wrich1 = IniWrite("config.ini", "Loader", "CHA1", $lech1)

$wrich2 = IniWrite("config.ini", "Loader", "CHA2", $lech2)

$wrich3 = IniWrite("config.ini", "Loader", "CHA3", $lech3)

$wrich4 = IniWrite("config.ini", "Loader", "CHA4", $lech4)

$wrich5 = IniWrite("config.ini", "Loader", "CHA5", $lech5)

$leint = GUICtrlRead($tempo)

$wriint = IniWrite("config.ini", "Loader", "Msgdelay", $leint)

MsgBox(262208,"Spam Pronto","Opções salvas com sucesso!")

FileWriteline ($logfile, @Hour & ":" & @Min & ":" & @Sec & " " & "Opções Salvas com Sucesso!")

FileWriteline ($logfile, @Hour & ":" & @Min & ":" & @Sec & " " & "Fechou o Spam Bot")

Exit

Case $msg = $start

splashtexton("notitle",@LF &"Script feito por Protectus." & @LF "www.multxbot.tk" &, 200, 85,-1,-1,1)

Sleep (3000)

splashoff()

$msgbox = MsgBox(4, "Protectus Spam Bot V1.0", "Voce deseja ligar o Spam Bot?")

If $msgbox = 7 Then

FileWriteline ($logfile, @Hour & ":" & @Min & ":" & @Sec & " " & "Fechou o Spam Bot")

Exit

EndIf

RestoreDiablo()

Sleep ( 5000 )

EnviarMsgs()

EndSelect

WEnd

;=================================================================================================

; FUNÇÃO PAUSE

;=================================================================================================

Func PauseFunction()

FileWriteline ($logfile, @Hour & ":" & @Min & ":" & @Sec & " " & "Spam em Pausa")

$msgbox = MsgBox (1, "Pause..", "O Script esta em pausa. Pressione 'ok' se deseja continuar.")

If $msgbox = 2 Then

FileWriteline ($logfile, @Hour & ":" & @Min & ":" & @Sec & " " & "Fechou o Spam Bot")

Exit(1)

EndIf

FileWriteline ($logfile, @Hour & ":" & @Min & ":" & @Sec & " " & "Voltando aos Channels")

WinActivate ("Diablo II")

WinActivate ("D2Loader v1.1b0b14 Build On Oct 29 2003")

Sleep (5000)

EndFunc

;=================================================================================================

; FUNÇÃO RESTORE DIABLO II

;=================================================================================================

Func RestoreDiablo()

Sleep ( 2000 )

WinShow( 'Diablo II', '', @SW_RESTORE )

EndFunc

;=================================================================================================

; FUNÇÃO ENVIAR MENSAGENS

;=================================================================================================

Func EnviarMsgs()

Do

Sleep ( 500 )

Send ("{/}join" & " " & $chaini1)

Send ("{ENTER}")

FileWriteline ($logfile, @Hour & ":" & @Min & ":" & @Sec & " " & "Entrou no primeiro channel")

Sleep ( $msgdelay )

Send ($msgini1)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini2)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini3)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini4)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini5)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ("/join" & " " & $chaini2)

Send ("{ENTER}")

FileWriteline ($logfile, @Hour & ":" & @Min & ":" & @Sec & " " & "Entrou no segundo channel")

Sleep ( $msgdelay )

Send ($msgini1)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini2)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini3)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini4)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini5)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ("{/}join" & " " & $chaini3)

Send ("{ENTER}")

FileWriteline ($logfile, @Hour & ":" & @Min & ":" & @Sec & " " & "Entrou no terceiro channel")

Sleep ( $msgdelay )

Send ($msgini1)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini2)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini3)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini4)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini5)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ("{/}join" & " " & $chaini4)

Send ("{ENTER}")

FileWriteline ($logfile, @Hour & ":" & @Min & ":" & @Sec & " " & "Entrou no quarto channel")

Sleep ( $msgdelay )

Send ($msgini1)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini2)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini3)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini4)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini5)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ("{/}join" & " " & $chaini5)

Send ("{ENTER}")

FileWriteline ($logfile, @Hour & ":" & @Min & ":" & @Sec & " " & "Entrou no quinto channel")

Sleep ( $msgdelay )

Send ($msgini1)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini2)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini3)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini4)

Send ("{ENTER}")

Sleep ( $msgdelay )

Send ($msgini5)

Send ("{ENTER}")

Sleep ( $msgdelay )

Until $msgdelay = 5000000000000

EndFunc

;Fim do Script

///////////////////////////////////////////////////////////////////////////////////////////////

Hi

I would like to do this script with my diablo's window minimized because this is a spam bot and not necessary do it in active window...

Can someone send me here the right function to add into the script?

Thanks

Share this post


Link to post
Share on other sites



#2 ·  Posted (edited)

Check out ControlSend () and a UDF floating around called _ControlSendPlus() or something similar.

Edited by burrup

[u]Old Projects:[/u]A3MORGB2Hex[u]Old Functions:[/u]_TimeAdd/_TimeSub_AddComma_BubbleSort _RippleSort "He who does not understand your silence will probably not understand your words." - Elbert Hubbard.

Share this post


Link to post
Share on other sites

Check out ControlSend () and a UDF floating around called _ControlSendPlus() or something similar.

<{POST_SNAPBACK}>

I tried

It didn't work

Thx anyways

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