;PYPQ AutoIt v3 Bot by StabbyJoe (and Kaizokoji)
;Default settings:
;Default difficulty: Hell.
;Attack skill: CTRL.
;Start the bot anywhere on Hidden Street: Pyramid Dunes.
;It is recommended that you also run an auto potion program,
;some kind of god mode and filter out Pharoh Yetis.
;If you have all of the above and your attack skill hits 6 or more,
;you should receive S rank every time.
;The purpose of this bot is to repeatedly do the pq alone,
;collect a gem and re-enter.
;Using the below command you can change the PYPQ difficulty,
;0 is Easy, 1 is Normal, 2 is Hard and 3 is Hell.
 
#include <NomadMemory.au3>
$Difficulty = 3
WinWait("MapleStory","")
WinActivate("MapleStory","")
;MsgBox(1, "TestThis box will time out in 10 seconds", 10)
Sleep(1000)
$ProcessID = WinGetProcess("MapleStory")
$DllHandle = _MemoryOpen($ProcessID)
Local $MapAddress = 0x00B45118
Local $MapOffset = Dec("660")
$MapData = _MemoryRead($MapAddress, $DllHandle)
$MapPointer = '0x' & hex($MapData +  $MapOffset)
Local $ComboAddress = 0x00B43B48
Local $ComboOffset = Dec("2FEC")
$ComboData = _MemoryRead($ComboAddress, $DllHandle)
$ComboPointer = '0x' & hex($ComboData +  $ComboOffset)
 
While 1
 Sleep(1000)
    ;Walk to right side of map
    Send("{RIGHT down}")
    Sleep(9500)
    Send("{RIGHT up}")
    Sleep(1000)
    ;NPC chat to enter
    Send("{SPACE}")
    Sleep(1000)
    Send("{DOWN}")
    Sleep(1000)
    Send("{SPACE}")
    Sleep(1000)
    Send("{SPACE}")
    Sleep(1000)
    $Diffselect = 0
    While $Diffselect < $Difficulty
        Send("{DOWN}")
        Sleep(500)
        $Diffselect = $Diffselect + 1
    WEnd
    Send("{SPACE}")
    Sleep(1500) ;Entering S1
    Send("{RIGHT down}")
    Sleep(2000)
    Send("{RIGHT up}")
    Sleep(600)
    $Attack = 0
 $LeftAttack = 0
 $RightAttack = 0
 $Map = _MemoryRead($MapPointer, $DllHandle)
 $Combo = 0
 
 While not ($Map = 926010004) ;Move right, attack, move left, attack
  While $RightAttack < 25
   Send("{LCTRL}")
   Sleep(100)
   $RightAttack = $RightAttack + 1
  WEnd
  $RightAttack = 0
 
  ;Combo smash right
  $Combo = _MemoryRead($ComboPointer, $DllHandle)
  if $Combo > 29 Then
   Sleep(200)
   Send("{DOWN}")
   Sleep(150)
   Send("{RIGHT}")
   Sleep(150)
   Send("{LCTRL}")
   Sleep(400)
  EndIf
 
  Sleep(500)
  Send("{LEFT down}")
  Sleep(500)
  Send("{LEFT up}")
  While $LeftAttack < 25
   Send("{LCTRL}")
   Sleep(100)
   $LeftAttack = $LeftAttack + 1
  WEnd
  $LeftAttack = 0
 
  $Combo = _MemoryRead($ComboPointer, $DllHandle)
  if $Combo > 29 Then
   Sleep(100)
   Send("{DOWN}")
   Sleep(150)
   Send("{LEFT}")
   Sleep(150)
   Send("{LCTRL}")
   Sleep(400)
  EndIf
 
  Sleep(500)
  Send("{RIGHT down}")
  if not (($Map = 926013100) or ($Map = 926013101) or ($Map = 926013102) or ($Map = 926013103) or ($Map = 926013104)) then
   Sleep(500)
  Else
   Sleep(2000)
  EndIf
  Send("{RIGHT up}")
  $Attack = $Attack + 1
  $Map = _MemoryRead($MapPointer, $DllHandle)
 WEnd
    ;Exit
    Send("{RIGHT down}")
    Sleep(4000)
    Send("{RIGHT up}")
    Sleep(500)
    Send("{SPACE}")
    Sleep(1000)
    Send("{SPACE}")
    Sleep(1500)
    Send("{RIGHT down}")
    Sleep(3000)
    Send("{RIGHT up}")
    Sleep(1000)
    Send("{SPACE}")
    Sleep(1000)
    Send("{DOWN}")
    Sleep(1000)
    Send("{SPACE}")
    Sleep(1000)
    Send("{SPACE}")
    Sleep(1500)
WEnd