Skocz do zawartości

  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • ✅ Pełny dostęp do działów i ukrytych treści
    • ✅ Możliwość pisania i odpowiadania w tematach
    • ✅ System prywatnych wiadomości
    • ✅ Zbieranie reputacji i rozwijanie swojego profilu
    • ✅ Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

[PYTANIE]Poprawa

EdzioSkarpeta

Rekomendowane odpowiedzi

EdzioSkarpeta Pomocnik

EdzioSkarpeta

Opublikowano
Pomocnik

EdzioSkarpeta

Opublikowano

Mógłby ktoś to poprawić tak aby dało się zalogować&uruchomić minecrafta? Za pomoc dam limit lajków. Wszystko mi elegancko działa, faktycznie - loguje się ale problem jest z samym uruchomieniem minecrafta, pojawia się konsola i od razu znika, gry nie ma ;/

 

 

 

Public Sub odpalMC(ByVal login As String, ByVal haslo As String, Optional ByVal minimumRam As Integer = 512, Optional ByVal maksRam As Integer = 3200, Optional ByVal wersja As Integer = 147)
 Dim sciezka As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\"
 'ścieżka do appdata
 If Not System.IO.File.Exists(String.Format("{0}.minecraft/bin/minecraft.jar", sciezka)) Then
	 'jeżeli minecraft nie znajduje się na dysku...
	 Return
 End If
 'wychodzimy z funkcji
 Dim psi As New System.Diagnostics.ProcessStartInfo("java")
 psi.WindowStyle = System.Diagnostics.ProcessWindowStyle.Normal
 'ukrywamy konsolę od mc
 Dim response As String = pobierzDane(login, haslo, wersja)
 'pobieramy dane w formacie ?:deprecated:login:sesja (jeżeli wersja jest starsza niż aktualna (147) będzie posiadała - na początku):?
 If response.Contains("Bad") Then
	 'jeżeli nie istnieje konto o z podanym loginem i hasłem uzyskamy "Bad login"
	 MsgBox("Problem z zalogowaniem")
	 Return
 End If
 'opuszczamy funkcję
 psi.Arguments = String.Format("-Xmx1000M -Djava.library.path=%APPDATA%/.minecraft/bin/natives -cp %APPDATA%/.minecraft/bin/minecraft.jar;%APPDATA%/.minecraft/bin/jinput.jar;%APPDATA%/.minecraft/bin/lwjgl.jar;%APPDATA%/.minecraft/bin/lwjgl_util.jar net.minecraft.client.Minecraft", login, response.Split(":"c)(3))
 'launch = "start javaw -Xmx" & TextBox1.Text & "m -Djava.library.path=%APPDATA%/.minecraft/bin/natives -cp %APPDATA%/.minecraft/bin/minecraft.jar;%APPDATA%/.minecraft/bin/jinput.jar;%APPDATA%/.minecraft/bin/lwjgl.jar;%APPDATA%/.minecraft/bin/lwjgl_util.jar net.minecraft.client.Minecraft "
 'argumenty dla javy
 System.Diagnostics.Process.Start(psi)
 'uruchamiamy MC
End Sub
Public Function pobierzDane(ByVal login As String, ByVal haslo As String, ByVal wersja As Integer) As String
 Return New System.IO.StreamReader(System.Net.HttpWebRequest.Create(String.Format("https://login.minecraft.net?user={0}&password={1}&version={2}", login, haslo, wersja)).GetResponse().GetResponseStream()).ReadToEnd()
End Function

 

 

 

 

Strasznie namieszany, proszę zwracać uwagę na komentarze

skcode.png

NOWY SUPER LAUNCHER MINECRAFT: KLIKNIJ I PRZEJDŹ!

http://www.mpcforum....chergra-nowosc/

XxNeroxX Bywalec

XxNeroxX

Opublikowano
Bywalec

XxNeroxX

Opublikowano 

using System;
namespace MC_Launcher
{
    class Program
    {
		    static void Main(string[] args)
		    {
				    odpalMC("login", "hasło");
		    }
		    static void odpalMC(string login, string haslo, int minimumRam = 512, int maksRam = 3200, int wersja = 147)
		    {
				    string sciezka = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) + "\\"; //ścieżka do appdata
				    if (!System.IO.File.Exists(string.Format("{0}.minecraft/bin/minecraft.jar", sciezka))) //jeżeli minecraft nie znajduje się na dysku...
						    return;//wychodzimy z funkcji
				    System.Diagnostics.ProcessStartInfo psi = new System.Diagnostics.ProcessStartInfo("java");
				    psi.WindowStyle = System.Diagnostics.ProcessWindowStyle.Hidden; //ukrywamy konsolę od mc
				    string response = pobierzDane(login, haslo, wersja); //pobieramy dane w formacie ?:deprecated:login:sesja (jeżeli wersja jest starsza niż aktualna (147) będzie posiadała - na początku):?
				    if (response.Contains("Bad")) //jeżeli nie istnieje konto o z podanym loginem i hasłem uzyskamy "Bad login"
						    return; //opuszczamy funkcję
				    psi.Arguments = string.Format("-Xms{0}M -Xmx{1}M -Djava.library.path={2}.minecraft/bin/natives -cp {2}.minecraft/bin/minecraft.jar;{2}.minecraft/bin/jinput.jar;{2}.minecraft/bin/lwjgl.jar;{2}.minecraft/bin/lwjgl_util.jar net.minecraft.client.Minecraft {3} {4}", minimumRam, maksRam, sciezka, login, response.Split(':')[3]); //argumenty dla javy
				    System.Diagnostics.Process.Start(psi); //uruchamiamy MC
		    }
		    static string pobierzDane(string login, string haslo, int wersja)
		    {
				    return new System.IO.StreamReader(System.Net.HttpWebRequest.Create(string.Format("https://login.minecraft.net?user={0}&password={1}&version={2}", login, haslo, wersja)).GetResponse().GetResponseStream()).ReadToEnd();
		    }
    }
}

 

 

tu masz chyba błąd

 

				    string sciezka = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) + "\\"; //ścieżka do appdata

wyraźnie pisze że musisz podać ścieżkę do appdata nie wiem czy tu jest błąd ,ale mi się tak zdaje ;p

1379958827-U247153.png


EdzioSkarpeta Pomocnik

EdzioSkarpeta

Opublikowano
Pomocnik

EdzioSkarpeta

  • Autor
Opublikowano

Dobra, działa, loguje się, gra się odpala ale na nic to - na singlu gram jako email z logowania <_<

 

Kod:

Imports System.Net
Imports System.Text
Public Class Form8
   Public Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
   End Sub
   Public Sub MaskedTextBox1_MaskInputRejected(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MaskInputRejectedEventArgs) Handles MaskedTextBox1.MaskInputRejected
   End Sub
   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    odpalMC(login:=TextBox1.Text, haslo:=MaskedTextBox1.Text)
   End Sub

   Public Sub odpalMC(ByVal login As String, ByVal haslo As String, Optional ByVal minimumRam As Integer = 512, Optional ByVal maksRam As Integer = 1024, Optional ByVal wersja As Integer = 147)

    Dim sciezka As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\"
    'ścieżka do appdata
    If Not System.IO.File.Exists(String.Format("{0}.minecraft/bin/minecraft.jar", sciezka)) Then
	    'jeżeli minecraft nie znajduje się na dysku...
	    Return
    End If
    'wychodzimy z funkcji
    Dim psi As New System.Diagnostics.ProcessStartInfo("java")
    psi.WindowStyle = System.Diagnostics.ProcessWindowStyle.Normal
    'ukrywamy konsolę od mc
    Dim response As String = pobierzDane(login, haslo, wersja)
    'pobieramy dane w formacie ?:deprecated:login:sesja (jeżeli wersja jest starsza niż aktualna (147) będzie posiadała - na początku):?
    If response.Contains("Bad") Then
	    'jeżeli nie istnieje konto o z podanym loginem i hasłem uzyskamy "Bad login"
	    MsgBox("Problem z zalogowaniem")
	    Return
    End If
    'opuszczamy funkcję
    psi.Arguments = String.Format("-Xms{0}M -Xmx{1}M -Djava.library.path={2}.minecraft/bin/natives -cp {2}.minecraft/bin/minecraft.jar;{2}.minecraft/bin/jinput.jar;{2}.minecraft/bin/lwjgl.jar;{2}.minecraft/bin/lwjgl_util.jar net.minecraft.client.Minecraft {3} {4}", minimumRam, maksRam, sciezka, login, response.Split(":"c)(3))
    'launch = "start javaw -Xmx" & TextBox1.Text & "m -Djava.library.path=%APPDATA%/.minecraft/bin/natives -cp %APPDATA%/.minecraft/bin/minecraft.jar;%APPDATA%/.minecraft/bin/jinput.jar;%APPDATA%/.minecraft/bin/lwjgl.jar;%APPDATA%/.minecraft/bin/lwjgl_util.jar net.minecraft.client.Minecraft "
    'argumenty dla javy
    System.Diagnostics.Process.Start(psi)
    'Custom start
    'Shell("start javaw -Xmx1000m -Djava.library.path=%APPDATA%/.minecraft/bin/natives -cp %APPDATA%/.minecraft/bin/minecraft.jar;%APPDATA%/.minecraft/bin/jinput.jar;%APPDATA%/.minecraft/bin/lwjgl.jar;%APPDATA%/.minecraft/bin/lwjgl_util.jar net.minecraft.client.Minecraft", login, response.Split(":"c)(3))
    'uruchamiamy MC
   End Sub
   Public Function pobierzDane(ByVal login As String, ByVal haslo As String, ByVal wersja As Integer) As String
    Return New System.IO.StreamReader(System.Net.HttpWebRequest.Create(String.Format("https://login.minecraft.net?user={0}&password={1}&version={2}", login, haslo, wersja)).GetResponse().GetResponseStream()).ReadToEnd()
   End Function

End Class

skcode.png

NOWY SUPER LAUNCHER MINECRAFT: KLIKNIJ I PRZEJDŹ!

http://www.mpcforum....chergra-nowosc/

Bum662 Budowniczy

Bum662

Opublikowano
Budowniczy

Bum662

Opublikowano

nie loguj sie przez email

Moje tutki:

"Bad Video Card Drivers" - Błąd w mc? Zobacz do mnie aby dowiedzieć się jak to naprawić!

Chcesz wyciągnąć maksymalną ilość fps w minecraft? Kliknij

tu!

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

Tematy
×
×
  • Dodaj nową pozycję...