PDA

View Full Version : Free source


nddwind
2004-08-31, 02:36 AM
;============================( GameForce )============================
;Version: 1.0
;Language: English
;Platform: Win9x / NT
;Author: NDDWinD <[email protected]>
;
;------( Start )------


;========================( End script hotkey )========================

hotkeyset("{end}", "s_exit")
func s_exit()
exit
endfunc

;==========================( Read Pass.txt )==========================

Global $pass = FileOpen ( "pass.txt", 0 )

If $pass = -1 Then
MsgBox ( 0, "Error", "Unable to open passfile.txt." )
Exit
EndIf

;===========================( Game Name )============================

$gamename=InputBox ("Check out www.nbay.tk", "Enter exact game name:")

;==========================( Win Activate )==========================

AutoItSetOption ("WinTitleMatchMode", 4)
WinActivate("classname=Diablo II")
AutoItSetOption("MouseCoordMode", 0)

;======================( Sleep )=======================

sleep(500)

;==================( Game Name as Pass)================

mouseclick("left", 712, 483, 1 ,2)
sleep(300)
send($gamename)
sleep(200)
send("{tab}")
sleep(300)
;/// PASSWORD ///
send($gamename)
;/// End Password ///
sleep(200)
send("{enter}")
sleep(300)

;================( Function name)========

readpass()

;================( Loop )================

Func readpass()

While 1

$password = FileReadLine ( $pass )
If @ERROR = -1 Then ExitLoop

mouseclick("left", 712, 483, 1 ,2) ;Click 'Join'

sleep ( 300 )
Send ( $gamename , 0 )
sleep(200)
Send ( '{TAB}' )
sleep(200)
Send ( $password , 0 )
sleep(200)
Send ( '{ENTER}' )
sleep ( 300 )
Wend


FileClose ( $pass )

EndFunc

Death
2004-08-31, 02:55 AM
Nice.
Doesnt that come from BH , snarg ?

Death
2004-08-31, 03:09 AM
PS , could you post that list of passwords ^.^ ?

WetWired
2004-08-31, 07:22 AM
Um, so how does it detect a join and stop? 'Cause otherwise, won't it just spam the game name and password list into the chat once you join?

Death
2004-08-31, 08:48 AM
Then you have to press "end"

`Insolence`
2004-08-31, 12:11 PM
I don't see any credit given to me... I practically wrote it.

nddwind
2004-08-31, 03:43 PM
I don't see any credit given to me... I practically wrote it.

Thanks for the $gamename input box knowledge you shared with me. And the other Autoit help you provided, you are very skilled with autoit. Oh yea this is only my 2nd script i've made besides a couple little things like timers and shit and item drop script.

and this is quite a bit different than snargs. Snargs is messed unless you change the delays using his source and compile it yourself.

This has delays

mouseclick("left", 712, 483, 1 ,2) ;Click 'Join'

sleep ( 300 )
Send ( $gamename , 0 )
sleep(200)
Send ( '{TAB}' )
sleep(200)
Send ( $password , 0 )
sleep(200)
Send ( '{ENTER}' )
sleep ( 300 )
Wend

Between each command.

nddwind
2004-08-31, 03:47 PM
PS , could you post that list of passwords ^.^ ?

I do not think zelaron would want that.

to big for a single thread.


Also about the "end" kill script feature- I could make it stop on game join by using the pixel but that would require 32 bit and some people don't have that.

blckshdwdragon
2004-08-31, 03:53 PM
use the edit button??

Sovereign
2004-08-31, 03:55 PM
Look who he responded to.. Two different people. That's allowed due to the other types of thread viewing modes available.

`Insolence`
2004-08-31, 05:45 PM
...wow, you're being stupid

It doesn't require the '32 bit' or anything like that.

Just do a pixel search for the red in the health globe, or yellowish orange in the stamina bar... or a number of things. THINK.

Thanks for the compliments, but you shouldn't be releasing scripts to the public yet, not stable and potentially damaging.

nddwind
2004-08-31, 08:13 PM
It not damaging really unless somthing forces you to minimize d2 like pop up or aim. ne ways all i did was post the source the people that are gonna use it can edit it to however the hell they want to.