Cube Loader

[moczymorda]

Odświeżyłem stary projekt.

 

Działa tylko na rozdzielczości 1024x768

 

 

Download:

http://rapidshare.com/files/243551897/Cube.exe.html

http://www.speedyshare.com/564774763.html

 

Scan:

http://www.virustotal.com/pl/analisis/9036...6bcc-1244766559

 

12.06.2009

- wybór serwer na którym mamy postać

- działa na zminimalizowanym Silku

 

04.06.2009

- działa na każdej rozdziałce

- czas ponownego logowania można ustawić w adresses.ini

- dodałem licznik prób logowania.

 

03.06.2006

- poprawiłem troszkę kod dodając:

 

While 1

if (PixelGetColor(209, 690) == 16738077) then

Sleep (7000)

MouseClick("left", 460, 562)

MouseMove(400, 562)

EndIf

WEnd

 

!!! Uwaga !!!!

Skrypt porównuje serwer wybrany z serwerem na którym mamy postać i jeśli po zalogowaniu te serwery pasują do siebie skrypt przywróci okno gry i zakończy działanie. Czyli serwer wybrany w Cube ma być taki sam jak wybrany w grze.

 

 

Info

Jest to uniwersalny loader bo będzie działał na każdej wersji Silkroad, chyba że dodadzą znowu Captcha. Po odpaleniu gry wpisuje login i hasło. Gdy serwer jest przepełniony czeka 7 sek i wciska ponownie Connect. Jest jeszcze troszkę zbugowany ale działa.

Chcąc zmienić czas ponownej próby logowania należy otworzyć plik adresses.ini i w sekcji [reconnect] ustawić odpowiednią wartość pamiętając że 1sek to 1000.

 

 

 

Masz taki błąd? Pliku Cube.exe nie jest w głównym folderze gry.

 

 

Kod źródłowy:

 

#cs ----------------------------------------------------------------------------

 

AutoIt Version: 3.2.12.0

Author: myName

 

Script Function:

Template AutoIt script.

 

#ce ----------------------------------------------------------------------------

 

; Script Start - Add your code below here

 

#include<WinAPI.au3>

#include <GUIConstantsEx.au3> ; klasa obsługi zdarzeń GUI

#include <ComboConstants.au3>

#include <NomadMemory.au3>

 

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("Cube", 266, 164, 296, 293)

$Group1 = GUICtrlCreateGroup("Login / Password", 8, 16, 249, 111)

$Login = GUICtrlCreateLabel("Login:", 16, 36, 33, 17)

$Password = GUICtrlCreateLabel("Password:", 16, 68, 53, 17)

$Servers = GUICtrlCreateLabel("Servers:", 16, 100, 53, 17)

$Log = GUICtrlCreateInput("", 128, 32, 113, 21)

$Pass = GUICtrlCreateInput("", 128, 64, 113, 21)

$servery = GUICtrlCreateCombo ("Choose server:", 128,96, 113, 20, $CBS_DROPDOWNLIST)

GUICtrlSetData($servery, "Neptune|Uranus|Saturn|Mercury|Hercules|Zeus|Alexander|Eldorado|Rome|Babel|O

ympus|Greece|Oasis|Troy|Pluto|Venus|Mars|Odin|Poseidon|Persia|Pacific|Sparta|Red

ea|Tibet|Alps|Venice|Athens|Aege", "")

GUICtrlSetStyle($servery, $CBS_DROPDOWNLIST)

$RunBtn = GUICtrlCreateButton("Run", 136, 132, 57, 25, 0)

$ExitBtn = GUICtrlCreateButton("Exit", 200, 132, 57, 25, 0)

$LABEL1 = GUICtrlCreateLabel("onet.pl", 12, 138, 105, 17)

GUICtrlSetColor(-1, 8421504)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

 

; Loop

While 1

 

If Not FileExists("adresses.ini") Then

ini()

 

EndIf

$time = FileGetTime("sro_client.exe")

$timeold = IniRead("adresses.ini", "time", "time", "")

If $time[0]&$time[1]&$time[2]&$time[3]&$time[4]&$time[5]<>$timeold Then

ini()

EndIf

 

$msg = GUIGetMsg()

Switch $msg

Case $GUI_EVENT_CLOSE

Exit

EndSwitch

 

If $msg = $ExitBtn Then

Exit

EndIf

 

If $msg = $RunBtn Then

 

$pid = Run(@ScriptDir&"\sro_client.exe"&" -0 /18 0 1")

 

$mid = _WinAPI_OpenProcess(0x1F0FFF, False, $pid)

;----------------------------

; Please Execute Silkroad.exe

;----------------------------

memwrite(IniRead("adresses.ini", "mc", "1", ""), "EB")

;------------

; Multiclient

;------------

memwrite(IniRead("adresses.ini", "mc", "2", ""), "EB")

memwrite(IniRead("adresses.ini", "mc", "3", ""), "EB")

; C10

;----

memwrite(IniRead("adresses.ini", "c10", "mac", ""), "BA"&randomhex(4)&"90")

memwrite(IniRead("adresses.ini", "c10", "ip", ""), nop(28))

;-----------------

; GameGuard Bypass

;-----------------

memwrite(IniRead("adresses.ini", "gg", "gg", ""), "C3")

;-----

; NoDC

;-----

memwrite(IniRead("adresses.ini", "nodc", "adress", ""), "8B0D"&IniRead("adresses.ini", "nodc", "replace", "")&"8B118B4214FFD05F83C410C3FFFF84C074")

 

While 1

if (PixelGetColor(19, 750) == 16744576) then

 

$proc = ProcessList("SRO_Client.exe")

$adress=0x00D3C5A8

$ID=_MemoryOpen($proc[1][1])

 

$LogSv = GUICtrlRead($Log)

$PassSv = GUICtrlRead($Pass)

$Reccon = IniRead("adresses.ini", "reconnect", "time", "")

ToolTip("LogIn", 0, 0)

MouseClick("primary", 130, 300, 2)

MouseClick("primary", 525, 434, 2)

Send($LogSv)

Send("{TAB}")

Send($PassSv)

Send("{Enter}")

Sleep (1000)

WinSetState("SRO_Client", "", @SW_MINIMIZE)

 

$X = 1

While 1

$sName=GUICtrlRead($servery)

$server = _MemoryRead($adress, $ID, 'wchar[12]')

 

ToolTip("Próby logowania na serwer " & $sName & ": " & $X, 0, 0)

Sleep($Reccon)

$HWND = WinGetHandle("SRO_Client")

ControlSend($HWND, "", "Edit1", "{ENTER}")

$X = $X + 1

 

If $server == $sName Then

WinSetState("SRO_Client", "", @SW_MAXIMIZE)

Exit

EndIf

 

WEnd

 

 

EndIf

WEnd

EndIf

WEnd

 

 

Func memwrite($adress, $hex)

$buffer = 0

$struct = DllStructCreate("byte["&StringLen($hex)/2&"]")

For $i=StringLen($hex)/2 To 1 Step -1

DllStructSetData($struct, 1, BinaryMid("0x"&$hex, $i, 1), $i)

Next

_WinAPI_WriteProcessMemory($mid, $adress, DllStructGetPtr($struct), StringLen($hex)/2, $buffer)

EndFunc

 

Func nop($len)

Local $all

For $i=1 To $len

$all=$all&"90"

Next

Return $all

EndFunc

 

Func randomhex($len)

Local $all

Local $str[$len]

For $i=0 To $len-1

$str[$i] = StringTrimLeft(Hex(Random(0x00, 0xFF, 1)), 6)

$all=$all&$str[$i]

Next

Return $all

EndFunc

 

Func rev($string)

Local $all

For $i=StringLen($string)+1 To 1 Step -2

$all=$all&StringMid($string, $i, 2)

Next

Return $all

EndFunc

 

Func trim($string)

While StringLeft($string, 1) = "0"

$string = StringTrimLeft($string, 1)

WEnd

Return $string

EndFunc

 

Podaje kod bez jednej funkcji wiadomo czemu... żeby nikt nie skopiował tego.

[MaaTi]

Wynik dla scanu

 

 

DrWeb 5.0.0.12182 2009.06.02 - Trojan.Click.25647

eSafe 7.0.17.0 2009.06.02 - Suspicious File

 

 

Tylko niewiem na 100% czy to nie program ktury porty i ip lamie.. wiec lepiej nie ryzykowac

[moczymorda]

Ten program napisałem ja i nie łamie żadnych portów lub IP.

[MaaTi]

Noto jak wytlumaczysz virusy w scanie? mowi sie trudno

 

Nie sciagac programu bo jest zasyfiony... pozdrawiam

 

 

i prosze o closed

[moczymorda]

Pokaże Ci geniuszu bo mam dobry humor dziś:

 

Zobaczmy post http://www.mpcforum.pl/index.php?s=&sh...st&p=264925

Skompilujmy ten kod do exe i zróbmy skan:

 

http://www.virustotal.com/pl/analisis/be86...0cec-1243982005

 

Wooow podejrzany plik nie? Proszę Cię jak nie wiesz co to AutoIt to nie wmawiaj ludziom że coś ma wirusa. Zresztą podałem kod mojego programu. Każdy może sobie skompilować i sprawdzić jak działa.

[Dungaar]

Mnie to sie raczej wydaje dziwne, ze admin konkurencyjnej strony zamieszcza tutaj swoj program...

[Czarny94]

nie ściągać, być może niebezpieczne, tu macie z elitepvp:

 

ttp://www.sendspace.com/file/yw8vwc

 

-----------------

A gdzie skan?

[mily222]

Jest w tym maly bład bo jak przez niego wbijam to co jakis czas pisze ze konto jest zajete i co chwile trzeba jeszcze raz silka odpalac;p

[moczymorda]

Mnie to sie raczej wydaje dziwne, ze admin konkurencyjnej strony zamieszcza tutaj swoj program...

 

 

To nie pierwszy raz:

http://www.mpcforum.pl/index.php?showtopic=16247

 

Jęśli boicie się używać na własnych loginach to możecie zrobić tak. Utworzyć sobie plik adresses.ini w katalogu gry i wpisać tam:

 

[time]

time=20090602201326

[mc]

1=0x7336B0

2=0x73371C

3=0x74469F

[c10]

mac=0x46C6E2

ip=0x46C757

[gg]

gg=0xA03F44

[nodc]

adress=0x7616BC

replace=6095FA00

 

Z źródła tego co podałem usunąć

 

If Not FileExists("adresses.ini") Then

ini()

EndIf

 

I normalnie działa. Funkcja której brakuje służy to pobierania wartości z pliku sro_client.exe i tworzenia pliku adresses.ini. Nie podam jej na pewno.

 

[RazDwaTrzy]

Mnie to sie raczej wydaje dziwne, ze admin konkurencyjnej strony zamieszcza tutaj swoj program...

 

Bo admini konkurencyjnej strony są inteligentni, oczytani i chcą tworzyć, nie niszczyć ;].

[MaaTi]

Mow co chcesz mojim zdaniem to jest do bani i tak... wole SRO Auto connect ktury krystaliczny skanik i dziala z minimalizacja gry -_- pozatym to mi starczy moge se sam wbisac pasy ... i jeszcze ze dziala tlyko przy 1024 x 768 omg

[rosire]

@MaaTi

Po pierwsze pisze się ktÓry, a nie ktury

Po drugie nie wiem czemu karzesz zamykać ten temat skoro moczymorda podał plik i kod źródłowy do niego ^_^

[LOLx5]

@MaaTi

Po pierwsze pisze się ktÓry, a nie ktury

Po drugie nie wiem czemu karzesz zamykać ten temat skoro moczymorda podał plik i kod źródłowy do niego ^_^

Rosire pisze sie kaŻesz^^, a nie karzesz:P Kara-karzesz. Kazac- kaŻesz^^

[rosire]

dobrze napisałem.... Zainstaluj sobie Mozille Firefox albo sprawdź sobie na infobocie....

karzesz 
forma podstawowa: karać

[Dungaar]

każesz

 

forma podstawowa:

kazać

1. wydawać rozkaz albo polecenie, polecać, zarządzać, rozkazywać

2. powodować, że coś się dzieje, zmuszać do czegoś swoim postępowaniem, nie rozkazem

 

karzesz

 

forma podstawowa:

karać

nakładać, wymierzać karę

 

LOLx5 ma rację.

[nuclear1985]

Nawet google podpowiada - każesz

[moczymorda]

Nowa wersja:

- działa na każdej rozdziałce

- czas ponownego logowania można ustawić w adresses.ini w sekcji [reconnect] ( 1sek to 1000 )

- liczenie prób logowania

 

Pomysły?

[Dungaar]

Pomysły?

Odgrywanie dzwieku gdy juz sie zaloguje.

[konar]

Może działanie w minimalizacji gry, gdzie w tym czasie można grac w coś innego lub sufrować po morzu?

[moczymorda]

Jutro zrobię po zalogowaniu sygnał i na zminimalizowanym żeby działało.

[lol4432]

Uwaga keyloger !!!!! ohebal mi pies mojego chara 85lvl UWAGA!!!!

[moczymorda]

Co zrobiłem?

[lol4432]

ojebales mnie ze wszystkiego na postac w glupa lecisz!!

[moczymorda]

Jak mogłem Cie okraść nupie jak dałem Ci kod programu który możesz sobie sam skompilować.

[wojtek12]

a można zrobić żeby odpalał loadera