- Joined
- Apr 22, 2005
- Sythe Gold
- 23
- Messages
- 7,825
http://www.uploadyour.info/download.php?filename=smrdll18597.dll
Rename it to SMRDll.dll after downloading it and copy it to your \Microsoft Visual Studio\VB98\ folder (or wherever you store your VB6 projects.
This is the exports.def file:
Please test this and tell me how it goes, and suggest improvements
Rename it to SMRDll.dll after downloading it and copy it to your \Microsoft Visual Studio\VB98\ folder (or wherever you store your VB6 projects.
This is the exports.def file:
Code:
EXPORTS
RandSleep @1
;Private Declare Sub RandSleep Lib "SMRDll.dll" (ByVal min as Long, ByVal max as Long)
;Sleeps for a random millisecond time between min and max
SendKeysEx @2
;Private Declare Sub SendKeysEx Lib "SMRDll.dll" (ByVal keys as String, ByVal times as Long, ByVal ms_wait as Long)
; Sends keys for the amount of times specified and sleeps for ms_wait milliseconds between each run
Random @3
;Private Declare Function Random (ByVal min as Long, ByVal max as Long) As Long
;Returns a random Long between min and max
CoinToss @4
;Private Declare Function CoinToss Lib "SMRDll.dll" () As Long
;Returns either 1 or 0 randomly
FindColor @5 ;BETA FUNCTION - NOT GUARANTEED TO WORK 100%
;Private Declare Function FindColor Lib "SMRDLL.dll" (ByVal RGBColor as Long, ByVal screenheight as Long, ByVal screenwidth as Long) As Long
;Searches for the specified color within the specified screenheight/width. A better working function will be included in a later release
;Returns 1 if the color is found and moves the mouse to the pixel where the color is first found, and returns 0 and does not move the mouse if the color is not found.
Please test this and tell me how it goes, and suggest improvements



























