Jump to content

Ex Maple Grabber


Guest Py7|-|[]/\/
 Share

Recommended Posts

Guest Py7|-|[]/\/

Well... I threw it together quickly to grab other people's items... But seeing how the new game patch will close the game if AutoIt is running... it only works for a second or two before *Boom* games shuts down. Here it is anyways. Don't mind my ranting.

;Picks up items in MapleStory, activate with the hotkey: Ctrl+z... To terminate the script press: Ctrl+a...
While 1
   Sleep(100)
Wend

$active = WinActive("MapleStory")

HotKeySet("^z", "Pickup")
HotKeySet("^a", "Terminate")


Func Pickup()
   If $active = 1 then
      While 1
      Sleep(100)
      Send("{z down}")
      Sleep(100)
      Send("{z up}")
      Wend
   Else
      Exit 0
   EndIf
EndFunc

Func Terminate()
   Exit 0
EndFunc
Link to comment
Share on other sites

try .102 instead of .103. i also wrote an item pickup for maple story and the .102 version works fine, while the .103 causes maple story to kill itself. maple story does the same thing when i turn on ad-aware, so i doubt the game is targetting autoit.

i just built it into the capslock thing. if you saw my post asking for help on a capslock toggle then this will be familiar.

; check for only one instance of script
$strTitle = "Hobbes' Auto Pickup"
If WinExists($strTitle) Then Exit
AutoItWinSetTitle($strTitle)

; set initial values
AutoItSetOption("SendAttachMode", 1)
AutoItSetOption("SendCapslockMode", 0)
Send("{CAPSLOCK off}")
HotKeySet("{CAPSLOCK}", "Toggle")
$bToggle = 0

; main loop
While 1
    If $bToggle = 1 Then
        Send("z")
        Sleep(400)
    EndIf
Wend

; called when user presses capslock
Func Toggle()
    If $bToggle = 0 Then
        $bToggle = 1
        HotKeySet("{CAPSLOCK}")
        Send("{CAPSLOCK on}")
        HotKeySet("{CAPSLOCK}", "Toggle")
        HotKeySet("{ENTER}", "Enter")
    Else
        $bToggle = 0
        HotKeySet("{CAPSLOCK}")
        Send("{CAPSLOCK off}")
        HotKeySet("{CAPSLOCK}", "Toggle")
    EndIf 
EndFunc

; called when enter is pressed, but only if toggle is on
Func Enter()
    $bToggle = 0
    HotKeySet("{CAPSLOCK}")
    Send("{CAPSLOCK off}")
    HotKeySet("{CAPSLOCK}", "Toggle")
    HotKeySet("{ENTER}")
    Send("{ENTER}")
EndFunc

also, 200 ms per push is a bit fast. you can't pick up items in that game that quickly. i'd say 300 or 400 should be fine.

ps. i like the winactive bit, good idea.

Link to comment
Share on other sites

Guest Py7|-|[]/\/

The reason I set the pickup press as so fast is because lots of people lag at various intervals in the game... and when they do it will sometimes skip presses. Better to be safe then sorry. And as far as I know you can't play it without the latest patch. When I went to play it auto-updated the game and gave me no choice. And yes, for example:

When spydoctor is running, and I start the game, it will still shut down the game and say "Would you like to terminate the process SpyDoctor.exe?"

Link to comment
Share on other sites

If you compile the script so the name of the running program is not "AutoIt", does the game still close down?

<{POST_SNAPBACK}>

.102 scripts and scripts compiled with .102 work fine.

.103 scripts and scripts compiled with .103 cause it to crap out.

i am pretty sure it is not the game targetting autoit. many, many, other .exes running in the background cause the game to kill itself (iexplorer.exe being another).

this isn't a big deal. i don't know about python, but i played a couple times and already moved on. the game is in like 0.07 beta stage.

...

And as far as I know you can't play it without the latest patch. When I went to play it auto-updated the game and gave me no choice.

...

<{POST_SNAPBACK}>

python, i meant use v3.0.102 of autoit instead of v3.0.103.

you are correct, you have to play with the current version of maple story, which is 0.07. you can't go back to 0.06.

Link to comment
Share on other sites

Guest Py7|-|[]/\/

Ah, I see what you mean. Thanks for the input, but I am too lazy to go back to the regular release of AutoIt. And me and my brother use the GUI's now so it would be too much of an inconvience. But, I found a way to work around it... The bot will work if you start it after you are already in the game, it appears to only scan for processes when the game starts, not after it is already entered.

Link to comment
Share on other sites

  • 1 year later...

Hello..

I see nice, but old thread

I just like to know if AutoIt works for Maple Storry yet..

I'm new on coding.. so donno if I do things correct now.. (experimenting with examples)

I just liek to make simple auto loot program for me.. and those shown here not working atm. I'll try to test them in some other way..

Link to comment
Share on other sites

Mine is really ugly but I'm new so don't laugh at me :[

; Variable area
Global $On
$Autoloot = HotKeySet("^s","Autoloot")
$Terminate = HotKeySet("^x","Terminate")
$WindowTitle = "MapleStory"
; Make sure the window is open
WinActivate($WindowTitle,"")
WinWaitActive($WindowTitle,"",5)
; Start the functions
Func Autoloot()
; This is just incase the user has not pressed ctrl+s
    $Autoloot = NOT $Autoloot
; If the user has pressed crl+s it will send z, which is to loot in MS
    While $Autoloot
        Send("z")
    WEnd
; If the user has not pressed ctrl+s it will send nothing
    Send("")
EndFunc

; The function to terminate the autolooter if the user presses ctrl+x
Func Terminate()
    Exit
EndFunc

By the way this god damn wysiwyg type shit is disgusting.

Link to comment
Share on other sites

  • 11 months later...

/\/' date='Nov 8 2004, 05:08 PM' post='40328']Well... I threw it together quickly to grab other people's items... But seeing how the new game patch will close the game if AutoIt is running... it only works for a second or two before *Boom* games shuts down. Here it is anyways. Don't mind my ranting.

;Picks up items in MapleStory, activate with the hotkey: Ctrl+z... To terminate the script press: Ctrl+a...
While 1
   Sleep(100)
Wend

$active = WinActive("MapleStory")

HotKeySet("^z", "Pickup")
HotKeySet("^a", "Terminate")
Func Pickup()
   If $active = 1 then
      While 1
      Sleep(100)
      Send("{z down}")
      Sleep(100)
      Send("{z up}")
      Wend
   Else
      Exit 0
   EndIf
EndFunc

Func Terminate()
   Exit 0
EndFunc

where do we put this code?

Link to comment
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
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...