Rohanopoly-Bot

[mdna]

#removed

[Marvetick]

If u want please upload source code

[mdna]

Its written in AutoIt so you need to compile it or run it on Scite

Hope you enjoy, any problems can be written here

Greetings, Mdna

english version:

 Spoiler

#include <INet.au3>
#include <String.au3>

$login = "https://portal.playrohan.com/Login/Login.process.html"
$getcoin = "http://de.rohan.playrohan.com/LandingSite/RohanMonopoly/getFreeCoinXml.asp"
$play = "http://de.rohan.playrohan.com/LandingSite/RohanMonopoly/itemListPrizeXml.asp"
$imgsite = "http://imgupload.playrohan.com/itemimg/"
$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, '<returnCode>', '</returnCode>')
	If IsArray($coindummy) And $coindummy[0] = '0' Then
		$doplay = _INetGetSource($play)
		$split = _StringBetween($doplay, '<itemName>', '</itemName>')
		If IsArray($split) Then
			$pic = _StringBetween($doplay, '<itemImgPath>', '</itemImgPath>')
			InetGet($imgsite&$pic, "C:\pic.jpg")
			SplashImageOn("", "C:\pic.jpg")
			MsgBox(0, "Rohanopoly-Bot", 'The User '&$user&' got "'&$split[0]&'"!')
			SplashOff()
			FileDelete("C:\pic.jpg")
		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

german version:

 Spoiler

#include <INet.au3>
#include <String.au3>

$login = "https://portal.playrohan.com/Login/Login.process.html"
$getcoin = "http://de.rohan.playrohan.com/LandingSite/RohanMonopoly/getFreeCoinXml.asp"
$play = "http://de.rohan.playrohan.com/LandingSite/RohanMonopoly/itemListPrizeXml.asp"
$imgsite = "http://imgupload.playrohan.com/itemimg/"
$zusatz = "?ru=&rq=&rv=&"
$user = InputBox("Rohanopoly-Bot", "Nutzername")
$pass = InputBox("Rohanopoly-Bot", "Passwort", "", "*")
$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, '<returnCode>', '</returnCode>')
	If IsArray($coindummy) And $coindummy[0] = '0' Then
		$doplay = _INetGetSource($play)
		$split = _StringBetween($doplay, '<itemName>', '</itemName>')
		If IsArray($split) Then
			$pic = _StringBetween($doplay, '<itemImgPath>', '</itemImgPath>')
			InetGet($imgsite&$pic, "C:\pic.jpg")
			SplashImageOn("", "C:\pic.jpg")
			MsgBox(0, "Rohanopoly-Bot", 'Der Nutzer '&$user&' hat das Item "'&$split[0]&'" erhalten!')
			SplashOff()
			FileDelete("C:\pic.jpg")
		Else
			MsgBox(0, "Rohanopoly-Bot", "Es konnte kein Preis gewonnen werden!")
		EndIf
	ElseIf IsArray($coindummy) And $coindummy[0] = '-1' Then
		MsgBox(0, "Rohanopoly-Bot", "Gratis-Münze bereits abgeholt!")
	ElseIf IsArray($coindummy) And $coindummy[0] = '-100' Then
		MsgBox(0, "Rohanopoly-Bot", "Anmeldefehler!")
	EndIf
ElseIf IsArray($dummy) And $dummy[0] = 'No Account Information.' Then
	MsgBox(0, "Rohanopoly-Bot", "Der angegebene Account existiert nicht!")
ElseIf IsArray($dummy) And $dummy[0] = 'Please check password.' Then
	MsgBox(0, "Rohanopoly-Bot", "Das angegebene Passwort stimmt nicht!")
EndIf

[ika123456]

how to play this?

[roxas46]

How would this work? Can it played using multiple accounts? Like I write in 100+ accounts, and it plays it all for me?

[smoka95]

indeed how to manage to use this code for the people like me who dont know ?

[mdna]

i'll upload a already compiled version in time.
It only works with one acount each run - so you need to start it everyday once just entering your userdata and its done

[mdna]

Okay heres the Bot for windows (theres no mac or linux version - sry for that :S)

Have fun with it

[num4ir]

Backdoor/Win32.Xtreme.gen
Backdoor.Win32.Xtreme.azc is a backdoor Trojan that endangers your PC to other malware threats. Backdoor.Win32.Xtreme.azc opens a back door on the compromised PC which enables it to obtain remote access and control over the corrupted machine. Backdoor.Win32.Xtreme.azc can access your personal information. Backdoor.Win32.Xtreme.azc can steal your private details and use them for illicit actions.
Backdoor/Finlosky.a
Backdoor.Finlosky.A is a backdoor trojan that provides the author of the trojan with remote administration of victim machines. Once installed, backdoor trojan can be instructed to send, receive, execute and delete files, harvest confidential data from the computer and log activity on the computer.


Now, do you really want this guy to take over your computer? LOL

[Marvetick]

Originally Posted by num4ir

Backdoor/Win32.Xtreme.gen
Backdoor.Win32.Xtreme.azc is a backdoor Trojan that endangers your PC to other malware threats. Backdoor.Win32.Xtreme.azc opens a back door on the compromised PC which enables it to obtain remote access and control over the corrupted machine. Backdoor.Win32.Xtreme.azc can access your personal information. Backdoor.Win32.Xtreme.azc can steal your private details and use them for illicit actions.
Backdoor/Finlosky.a
Backdoor.Finlosky.A is a backdoor trojan that provides the author of the trojan with remote administration of victim machines. Once installed, backdoor trojan can be instructed to send, receive, execute and delete files, harvest confidential data from the computer and log activity on the computer.


Now, do you really want this guy to take over your computer? LOL

That's why I asked for source ;p

[smoka95]

idk about that trojan but script works great lolz

[Dr.Dr.SheldonLeeCooper]

I Testet it on a VMware. Works fine ^^ But i delete it after i use that Bot :P

[mdna]

Its cause of the script language I used - mostly its used for scriptkiddie hacks so some av's put them on theyr blacklist, sry for that but its fine -> its the same as the source only packed

[smoka95]

its okey manz ty for ur great job keep it that way

[mdna]

thank you - hope you guys enjoy - if you have any idea tell me, also other bots