Closed

A program that would do a set of things for me.

This project received 6 bids from talented freelancers with an average bid price of $93 USD.

Get free quotes for a project like this
Employer working
Project Budget
$10 - $50 USD
Total Bids
6
Project Description

First of all, I'm not sure which skill/option I had to choose.

Anyway, this is the idea.

There's an online game that I play, and on their main website they have this "game", and daily you get a free coin to play once and get items. So I want to make over 300~500 accounts (I'd do this part myself), But instead of manually Logging in -> Go to the page -> click free coin -> Click play -> Log out and repeat. I would like there to be 'something' that would do this all for me, I found something similar on a website. And the guy posted this "code"

#include

#include

$login = "[url removed, login to view]"

$getcoin = "[url removed, login to view]"

$play = "[url removed, login to view]"

$imgsite = "[url removed, login to view]"

$zusatz = "?ru=&rq=&rv=&"

$user = InputBox("Rohanopoly-Bot", "Username")

$pass = InputBox("Rohanopoly-Bot", "Password", "", "*")

$get = $zusatz&"userid="&$user&"&userpw="&$pass

$login = _INetGetSource($login&$get)

$dummy = _StringBetween($login, '"returnmsg": "', '"}}')

If IsArray($dummy) And $dummy[0] = 'Login complete!' Then

$getcoins = _INetGetSource($getcoin)

$coindummy = _StringBetween($getcoins, '', '')

If IsArray($coindummy) And $coindummy[0] = '0' Then

$doplay = _INetGetSource($play)

$split = _StringBetween($doplay, '', '')

If IsArray($split) Then

$pic = _StringBetween($doplay, '', '')

InetGet($imgsite&$pic, "C:\[url removed, login to view]")

SplashImageOn("", "C:\[url removed, login to view]")

MsgBox(0, "Rohanopoly-Bot", 'The User '&$user&' got "'&$split[0]&'"!')

SplashOff()

FileDelete("C:\[url removed, login to view]")

Else

MsgBox(0, "Rohanopoly-Bot", "No prices got!")

EndIf

ElseIf IsArray($coindummy) And $coindummy[0] = '-1' Then

MsgBox(0, "Rohanopoly-Bot", "Free-Coin already taken!")

ElseIf IsArray($coindummy) And $coindummy[0] = '-100' Then

MsgBox(0, "Rohanopoly-Bot", "Loginproblem!")

EndIf

ElseIf IsArray($dummy) And $dummy[0] = 'No Account Information.' Then

MsgBox(0, "Rohanopoly-Bot", "User dosn't exist!")

ElseIf IsArray($dummy) And $dummy[0] = 'Please check password.' Then

MsgBox(0, "Rohanopoly-Bot", "wrong Password!")

EndIf

Looking to make some money?

  • Set your budget and the timeframe
  • Outline your proposal
  • Get paid for your work

Hire Freelancers who also bid on this project

    • Forbes
    • The New York Times
    • Time
    • Wall Street Journal
    • Times Online