Bootleggers.us script

[kaotkbliss]

hmmm, ok. I will look when I get home.

[kaotkbliss]

#include <IE.au3>

$sUsername = "oDon"
$sPassword = "uh0uxt9t"
$sUrl = "http://www.bootleggers.us/"
$oIE = _IECreate ($sUrl)
$oForm = _IEFormGetCollection ($oIE, 2)
$oUsername = _IEFormElementGetObjByName ($oForm, "Username")
$oPassword = _IEFormElementGetObjByName ($oForm, "Password")
_IEFormElementSetValue ($oUsername, $sUsername)
_IEFormElementSetValue ($oPassword, $sPassword)
_IEFormSubmit ($oForm)
_IELinkClickByText ($oIE, "crimes")
Sleep(100)
While 1
$oForm = _IEFormGetCollection ($oIE, 0)
_IEFormElementRadioSelect  ($oForm, "1", "select_crime", 1, "byValue")
$oSubmit = _IEGetObjByName ($oIE, "aCrime")
_IEAction ($oSubmit, "click")
Sleep(120000)
WEnd

[chappoian]

Great! it works now.

Now I added a step two, to make it even harder !

The current code is:

expandcollapse popup

#include <IE.au3>

$sUsername = "oDon"
$sPassword = "uh0uxt9t"
$sUrl = "http://www.bootleggers.us/"
$oIE = _IECreate ($sUrl)
$oForm = _IEFormGetCollection ($oIE, 2)
$oUsername = _IEFormElementGetObjByName ($oForm, "Username")
$oPassword = _IEFormElementGetObjByName ($oForm, "Password")
_IEFormElementSetValue ($oUsername, $sUsername)
_IEFormElementSetValue ($oPassword, $sPassword)
_IEFormSubmit ($oForm)
While 1
    _IELinkClickByText ($oIE, "crimes")
    Sleep(100)
    $oForm = _IEFormGetCollection ($oIE, 0)
    _IEFormElementRadioSelect  ($oForm, "4", "select_crime", 1, "byValue")
    $oSubmit = _IEGetObjByName ($oIE, "aCrime")
    _IEAction ($oSubmit, "click")
    Sleep(1000)
    
    _IELinkClickByText ($oIE, "Auto Burglary")
    Sleep(100)
    $oForm = _IEFormGetCollection ($oIE, 0)
    _IEFormElementRadioSelect  ($oForm, "1", "select_crime", 1, "byValue")
    $oSubmit = _IEFormGetObjByName ($oIE, "Steal")
    _IEAction ($oSubmit, "click")
    
    Sleep(120000)
    
    _IELinkClickByText ($oIE, "crimes")
    Sleep(100)
    $oForm = _IEFormGetCollection ($oIE, 0)
    _IEFormElementRadioSelect  ($oForm, "4", "select_crime", 1, "byValue")
    $oSubmit = _IEGetObjByName ($oIE, "aCrime")
    _IEAction ($oSubmit, "click")
    
    Sleep(125000)
WEnd

What I did, was add a second task, which is: Auto Burglary.

So now it commits a crime, steal a car, wait 2 mins, commit another crime, wait two minutes, and do it all again.

Only one problem, it does not steal a car. It selects the right box, but does not complete the form. I tried to get the right name for the form completion, but it was not present at the source code:

<tr>
      <td align=right colspan=2><input type=submit value="Steal"></td>
      </tr>

Full form code:

expandcollapse popup

<form method=POST action=/autoburglary.php>
      <table width=80% cellspacing=0 cellpadding=2 border=1 bordercolor=black class=sub2>
      <tr>
      <td colspan=2 class=header align=center>Crimes</td>
      </tr>
          <tr>
          <td><input type=radio name=select_crime value="1" id="selectedCrime[1]"> <label for="selectedCrime[1]" style="cursor: pointer;">Car jack from street</label>  
         </td>
         <td>1% chance</td>
         </tr>
          <tr>
          <td><input type=radio name=select_crime value="2" id="selectedCrime[2]"> <label for="selectedCrime[2]" style="cursor: pointer;">Steal from a private parking lot</label>  
         </td>
         <td>0% chance</td>
         </tr>
          <tr>
          <td><input type=radio name=select_crime value="3" id="selectedCrime[3]"> <label for="selectedCrime[3]" style="cursor: pointer;">Pick pocket keys</label>  
         </td>
         <td>1% chance</td>
         </tr>
          <tr>
          <td><input type=radio name=select_crime value="4" id="selectedCrime[4]"> <label for="selectedCrime[4]" style="cursor: pointer;">Steal from a public parking lot</label>   
         </td>
         <td>0% chance</td>
         </tr>
          <tr>
          <td><input type=radio name=select_crime value="5" id="selectedCrime[5]"> <label for="selectedCrime[5]" style="cursor: pointer;">Steal from another crew:</label>
            <select name=steal_crew>
            <option value="#">Select crew</option>
            <option value="#">---------------</option>
            <option>Event Horizon</option>
<option>Ombra Di Lucifer</option>
<option>The Order</option>
<option>The Clenched Fist</option>
<option>The Departed</option>
<option>The Black Heart Rebellion</option>
<option>Virtual Reality</option>
<option>Strictly Business</option>
<option>Trifecta</option>
<option>The Black Birds</option>
<option>The Rapture</option>
<option>The Fraternity</option>
<option>The Fatal Wounds</option>
<option>Gossip Girl</option>
<option>Infamous</option>
 
            </select>   
         </td>
         <td>0% chance</td>
         </tr>
      <tr>
      <td align=right colspan=2><input type=submit value="Steal"></td>
      </tr>
      </table>
      </form>

[kaotkbliss]

The problem might be in this line

$oForm = _IEFormGetCollection ($oIE, 0)

try different numbers and see if it can find the steal button.

[chappoian]

I tried 0 through 10, non of them worked.

Only with 0, it actually selects a box, and with 1 trough 10 it doesn't even select a box.