View Full Version : My first script... ChatSpammer
DrTech
13th January 2005, 13:45
Okay this is the first one i made... Instructions are all inside the RAR file so i guess you can read...
This script would not have been made possible if TS58 did not help me... So most of the credit should go to him...
EDIT: Fixed a loop problem whereby the chatbox is closed at the start of the second loop. Please either have 2 lines of text or 4... do not put 3 or 1 as it will cause problems when looping.
EDIT: Uploaded new one... With more info... Note: Please do not leave line 3 and 4 empty as it might not work properly
TS58
14th January 2005, 06:34
Okay this is the first one i made... Instructions are all inside the RAR file so i guess you can read...
This script would not have been made possible if TS58 did not help me... So most of the credit should go to him...
Works good :) good for all those peoplethat spam to sell/ or even I will use it now sence soneone made one. :) Good job
Some info that will help
AutoItSetOption("SendKeyDelay", 1) ;send keys faster default is 10...
If WinActive("MapleStory") Then
;script here, not the func() tho
Else
Sleep (10000); puts a pasue in the loop so if ms isnt running, it doesnt over load older computers(like mine).
EndIf
:)
twisted0one7
14th January 2005, 07:47
good job
DrTech
14th January 2005, 11:23
Works good :) good for all those peoplethat spam to sell/ or even I will use it now sence soneone made one. :) Good job
Some info that will help
AutoItSetOption("SendKeyDelay", 1) ;send keys faster default is 10...
If WinActive("MapleStory") Then
;script here, not the func() tho
Else
Sleep (10000); puts a pasue in the loop so if ms isnt running, it doesnt over load older computers(like mine).
EndIf
:)
I see... i'll add that and see what happens... btw, what did you mean by the part i bold-ed
Edit: Okay, this is what i added... then when i initiate script... it closes after awhile..
If WinActive("MapleStory") Then
Sleep($var2)
send("{enter}")
$X =1
DO
send($textvar1)
send("{Enter}")
Sleep($var1)
send($textvar2)
send("{Enter}")
Sleep($var1)
send($textvar3)
send("{Enter}")
Sleep($var1)
send($textvar4)
send("{Enter}")
Sleep($var1)
Until $X =2
Else
Sleep(10000)
EndIf
TS58
14th January 2005, 11:49
I see... i'll add that and see what happens... btw, what did you mean by the part i bold-ed
Edit: Okay, this is what i added... then when i initiate script... it closes after awhile..
If WinActive("MapleStory") Then
Sleep($var2)
send("{enter}")
$X =1
DO
send($textvar1)
send("{Enter}")
Sleep($var1)
send($textvar2)
send("{Enter}")
Sleep($var1)
send($textvar3)
send("{Enter}")
Sleep($var1)
send($textvar4)
send("{Enter}")
Sleep($var1)
Until $X =2
Else
Sleep(10000)
EndIf
Thats great.
But to speed up the typing alitte,
AutoItSetOption("SendKeyDelay", 1) ;send keys faster default is 10... 1 is fastest.
The func() needs to be at the complete end of script, and how you set it up with
If WinActive("MapleStory") Then
;script here, not the func()
Else
Sleep (10000)
EndIf
Incase you alt tap out of the game, and someone else gets on the computer and presses the pause butten for the hell of it... it dont start sending "$textvar1" outside of the game.
Edit: Hrmm, The script closes, eh?
Try
$X =1
DO
If WinActive("MapleStory") Then
;nothing here
Else
Sleep (10000)
EndIf
Sleep($var2)
send("{enter}")
send($textvar1)
send("{Enter}")
Sleep($var1)
send($textvar2)
send("{Enter}")
Sleep($var1)
send($textvar3)
send("{Enter}")
Sleep($var1)
send($textvar4)
send("{Enter}")
Sleep($var1)
Until $X =2
DrTech
14th January 2005, 12:17
Thats great.
But to speed up the typing alitte,
AutoItSetOption("SendKeyDelay", 1) ;send keys faster default is 10... 1 is fastest.
The func() needs to be at the complete end of script, and how you set it up with
If WinActive("MapleStory") Then
;script here, not the func()
Else
Sleep (10000)
EndIf
Incase you alt tap out of the game, and someone else gets on the computer and presses the pause butten for the hell of it... it dont start sending "$textvar1" outside of the game.
Edit: Hrmm, The script closes, eh?
Try
$X =1
DO
If WinActive("MapleStory") Then
;nothing here
Else
Sleep (10000)
EndIf
Sleep($var2)
send("{enter}")
send($textvar1)
send("{Enter}")
Sleep($var1)
send($textvar2)
send("{Enter}")
Sleep($var1)
send($textvar3)
send("{Enter}")
Sleep($var1)
send($textvar4)
send("{Enter}")
Sleep($var1)
Until $X =2
working great... Thanks alot :) gonna put it up...
TS58
14th January 2005, 12:22
working great... Thanks alot :) gonna put it up...
Glad I could help. :)
vBulletin® v3.8.4, Copyright ©2000-2009, Jelsoft Enterprises Ltd.