Skocz do zawartości

GoToPrO07

Members
  • Postów

    207
  • Rejestracja

  • Ostatnia wizyta

O użytkowniku

  • Płeć
    Mężczyzna

Ostatnie wizyty

Blok z ostatnimi odwiedzającymi dany profil jest wyłączony i nie jest wyświetlany użytkownikom.

Osiągnięcia GoToPrO07

  1. UPDATE 19.09.2011 DODANO NOWE PLUGINY.
  2. Dodaję serie screenów z serwera! http://imageshack.us/g/10/20110911103022.png/ Już dużo osób gra full serwer! Zapraszam do grania i zapraszania znajomych!
  3. Niestety 1.7.3 ale polecam!
  4. LEJ TE COLE 4FUN/SURVIVAL Nazwa serwera: Lej Te Cole IP: 85.195.99.106:25745 Wersja: 1.7.3 (NO PREMIUM) Strona: W budowie! Liczba slotów: 10 Typ serwera: 4Fun/Survival PvP: Włączone Zwierzęta: Włączone Moby: Włączone Administratorzy: Supermen - H@ kkk - Zastępca H@
  5. GoToPrO07

    Dedyk Progamers

    Siema, mam problem, nie wiem jak włączyć serwer minecraft kupiłem 10 slotów i nie wiem jak go skonfigurować i połączyć się z nim. Pomoże ktoś? Kupiłem żeby ogarnąć sobie rzeczy (nie krytykujcie ).
  6. GoToPrO07

    Kod programu

    Siema, jak zrobić ktoś program w autoit i dał tylko plik .exe to mogę zobaczyć cały kod programu?
  7. Siema, co muszę zrobić żeby programy które robie w Visual Basic działały u innych na komputerze?
  8. To też patrzyłem, widziałem dużo postów ze skryptami, np. http://forum.codecall.net/forum.php ale tak jak pisałem nie ma napisane jak np. zrobić panel logowania, żeby osoby się logowały itp. tylko dla newbie jakieś poradniki, ja już bardziej zaawansowany, a może polecisz mi jakiś inny program?
  9. Bardziej skrytów szukam z wytłumaczeniem do czego niż poradników, ogarniam all co się robi, tylko skrytów nie znam :| A jest bardzo mało stron z visual basic, jak już są to dla newbie jak zrobić kalkulator czy coś.
  10. Gościu jak masz pisać takie posty to nie pisz ! Głupi nie jestem, pytałem się tylko jakie strony polecacie, nie google http://lmgtfy.com/?q=noob
  11. REFRESH
  12. Siema, mam pytanie znacie może jakieś stronki z poradnikami/skryptami do visual basic? Rozdaje + i - za pomoc.
  13. Sory ale ja nie ogarniam autoit co jest nie tak? Tamto usunąłem i nic.
  14. Siema, mam problem, w czym jest błąd, kolega dał mi kod autoit i wyskakuje błąd. #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #include <IE.au3> #include <misc.au3> $Form1 = GUICreate("Marcdk's Youtube Account Creator ", 700, 500, 193, 125) $Singleproxyinput = GUICtrlCreateInput("", 100, 330, 150, 21) $Checkbox1 = GUICtrlCreateCheckbox("Enter Proxy", 26, 330, 75, 15) $Prefix = GUICtrlCreateInput("", 140, 40, 121, 21) $Account = GUICtrlCreateLabel("Account Prefix", 24, 48, 73, 17) $Label2 = GUICtrlCreateLabel("Account Password", 24, 80, 95, 17) $Password = GUICtrlCreateInput("", 140, 72, 121, 21) $BrowseLabel = GUICtrlCreateLabel("Load proxylist", 24, 370, 73, 17) $ProxyInfoLabel = GUICtrlCreateLabel("Loaded Proxies:", 24, 420, 100, 50) $ProxyNumber = GUICtrlCreateLabel("0", 110, 420, 100, 50) $Pic1 = GUICtrlCreatePic("Temp.jpg", 30, 165, 100, 100, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS)) $Pic2 = GUICtrlCreatePic("WindowsLive.jpg", 150, 165, 100, 100, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS)) $Pic3 = GUICtrlCreatePic("que.jpg", 262, 40, 22, 22, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS)) $Pic4 = GUICtrlCreatePic("que.jpg", 262, 72, 22, 22, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS)) $Pic5 = GUICtrlCreatePic("que.jpg", 252, 330, 22, 22, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS)) $Proxy = GUICtrlCreateButton("Browse", 122, 365, 121, 25, 0) $Group1 = GUICtrlCreateGroup("Account Details", 16, 16, 300, 100) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group2 = GUICtrlCreateGroup("Choose Email", 16, 135, 300, 150) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group3 = GUICtrlCreateGroup("Proxy Settings", 16, 305, 300, 150) GUICtrlCreateGroup("", -99, -99, 1, 1) GUISetState(@SW_SHOW) $Proceed = GUICtrlCreateLabel("At the youtube registration, and confirmation of the email you have to enter the Captcha manually, once that is done, press F10 twice to finish registration", 350, 20, 310, 300) $PanTask = _IECreateEmbedded() $Form2X = GUICtrlCreateObj($PanTask, 350, 80, 320, 250) $InterNetComOBJ = _IECreateEmbedded() ; Create Internet Explorer application $LowerLimit = 1 $UpperLimit = 10000 $RandomNumber = Random($LowerLimit,$UpperLimit,1) $Status = GUICtrlCreateLabel("Status:",350, 360, 300, 250) $Status2 = GUICtrlCreateLabel("Ready",400, 360, 300, 250) $message = "Select your proxylist - txt file" GUICtrlSetColor(-1, 0xff0000) While 1337=1337 If _IsPressed("79") Then Finish() EndIf If _IsPressed("78") Then Send ("{TAB}") Send ("{Enter}") Sleep (4000) Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{Enter}") EndIf $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Pic3 MsgBox(0,"Account Prefix", "Type in your desired username. Your username will be followed by a random number") Case $Pic4 MsgBox(0,"Your Password", "Enter your desired password here") Case $Pic5 Msgbox(0,"Proxy Info", "Put in a proxy here, in case you want to use just one") Case $Pic1 Begin() Case $Pic2 Begin2() EndSwitch WEnd Func Begin() GUICtrlSetData($Status2, "Grabbing temporary inbox email...") _IENavigate ($PanTask, "http://temporaryinbox.com/forward.php", 0) _IELoadWait ($PanTask) Send("{TAB}") Send("{TAB}") Send("{TAB}") Send("{TAB}") Send("^c") GUICtrlSetData($Status2, "Enters youtube.com...") Sleep(2000) _IENavigate ($PanTask, "http://www.youtube.com/signup.php", 0) _IELoadWait ($PanTask) GUICtrlSetData($Status2, "Filling the forms...") Send("^v") Send("{TAB}") sleep(1000) Send(GuiCtrlRead($Password)) Send("{TAB}") Send(GuiCtrlRead($Password)) Send("{TAB}") Send(GuiCtrlRead($Prefix)) Send($RandomNumber) Send ("{TAB}") Send ("{TAB}") Send ("d") Send ("{TAB}") Send ("{DOWN}") Send ("{TAB}") Send ("{DOWN}") Send ("{TAB}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{TAB}") Send ("{Space}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") GUICtrlSetData($Status2, "Awaiting captcha code...") EndFunc Func Begin2() GUICtrlSetData($Status2, "Enters youtube.com...") Sleep(2000) _IENavigate ($PanTask, "http://www.youtube.com/signup.php", 0) _IELoadWait ($PanTask) GUICtrlSetData($Status2, "Filling the forms...") $pantask = _IECreate ("https://signup.live.com/signup.aspx?ru=http%3a%2f%2fmail.live.com%2f%3frru%3dinbox&wa=wsignin1.0&rpsnv=10&ct=1233346552&rver=5.5.4177.0&wp=MBI&wreply=http:%2F%2Fmail.live.com%2Fdefault.aspx%3Fn%3D380146255&id=64855&bk=1233346552&rollrs=12&lic=1") sleep(3000) ($pantask, 0) $oQuery = _IEGetObjById($pantask, "iPwd"); 2nd Param = Name/ID _IEFormElementSetValue ($oQuery, "d3scene") ;_IEFormSubmit ($oForm) Send ($randomNumber) sleep (1000) Send ("@yopmail.com") Sleep (1000) Send("{TAB}") sleep(1000) Send(GuiCtrlRead($Password)) Send("{TAB}") Send(GuiCtrlRead($Password)) Send("{TAB}") Send(GuiCtrlRead($Prefix)) Send($RandomNumber) Send ("{TAB}") Send ("{TAB}") Send ("d") Send ("{TAB}") Send ("{DOWN}") Send ("{TAB}") Send ("{DOWN}") Send ("{TAB}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{DOWN}") Send ("{TAB}") Send ("{Space}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") GUICtrlSetData($Status2, "Awaiting captcha code...") sleep (1000) Endfunc Func Finish() Send ("{TAB}") sleep (500) Send ("{TAB}") sleep (500) Send ("{space}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{Enter}") sleep(1000) GUICtrlSetData($Status2, "Verifying Account...") _IENavigate($PanTask, "http://yopmail.com", 0) _IELoadWait ($PanTask) Send($RandomNumber) Sleep(4000) Send ("{TAB}") Send ("{Enter}") Sleep(3000) Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{TAB}") Send ("{Enter}") SLEEP (10000) Send(GuiCtrlRead($Prefix)) Send ($RandomNumber) Send ("{TAB}") Send(GuiCtrlRead($Password)) Send ("{TAB}") Send ("{Enter}") EndFunc
  15. GoToPrO07

    Darmowe Konta Steam

    Witam, mam dla was propozycje, mam do rozdania 10 kont steam, ja z nich nie użytkuje, kto pirrwszy ten lepszy. gg:21293714
×
×
  • Dodaj nową pozycję...