[VB.NET] Faire un Name Changer RTE

[xSmokemodz]

Slut tous le monde,
1-Tout d'abord ouvrez un Nouveau Projet & nommez-le :

2- Choisissez votre Design :
Ajoutez 2 boutons que vous Marquez "Connect and Attach" sur l'un et sur l'autre vous Marquez "Disconnect".
Et pour le Name Changer ajoutez un Textbox & un Bouton & vous marquez Change Name comme moi :

3- Ajoutez vos références comme ceci

4- Importez les références Comme avec ce code
Code:
Imports PS3Lib 'Importe le DLL PS3Lib (ajouté précédament au référence du projet)
Imports PS3TMAPI
Comme ceci :

Ajoutez également ce bout de code en Dessous de Public Class Form1
Code:
Private processIDs As UInteger()
Private ProcessID As UInteger
5- Revenez sur la partie Design, Double-Cliquez sur le Bouton "Connect and Attach" et Collez ce code :
Code:
Try
' Connecte le tools à la PS3
PS3TMAPI.InitTargetComms()
PS3TMAPI.Connect(0, vbNullString)

Catch Ex As Exception
MsgBox("Nous n'avons pas pu connecté la PS3 ! ", MsgBoxStyle.Critical)
End Try
Try
' Attache le Process
PS3TMAPI.GetProcessList(0, processIDs)
Dim uProcess As ULong = processIDs(0)
ProcessID = Convert.ToUInt32(uProcess)
PS3TMAPI.ProcessAttach(0, PS3TMAPI.UnitType.PPU, ProcessID)
PS3TMAPI.ProcessContinue(0, ProcessID)

Catch Ex As Exception
MsgBox("Nous n'avons pas pu connecté la PS3 ! ", MsgBoxStyle.Critical)
End Try
6- Revenez sur la partie Design, Double-Cliquez sur le Bouton "Disconnect" et Collez ce code :
Code:
PS3TMAPI.Disconnect(0) 'Déconnecte la PS3
PS3TMAPI.ProcessStop(0, ProcessID) 'Arrête le processus
MsgBox("PS3 Disconnected", MsgBoxStyle.Information)
7- Revenez sur la partie Design, Renommez la Textbox en Namebo2, Double-Cliquez sur le Bouton et ajoutez ce code :
Code:
Dim Namebo2 As String
Namebo2 = FlatTextBox1.Text.ToString()
Dim Namebo2X As Integer = Convert.ToInt32(Namebo2)
Dim Namebo2X1 As Byte() = BitConverter.GetBytes(Namebo2X)
PS3TMAPI.ProcessSetMemory(0, PS3TMAPI.UnitType.PPU, ProcessID, 0, &H26B75D0, Namebo2X1)
Ceci étant le code pour Bo2 en MaJ 1.15


Voilà vous avez votre Name Changer & j'espères avoir été assez Clair.

 

[TLD | tofeur45]

manque de la source du c/c et demande de j'aime interdit

 

[xSmokemodz]

bah avec toi y manque toujours de source moi je comprend bien et cela a bien marquer

 

[TLD | tofeur45]

bah avec toi y manque toujours de source moi je comprend bien et cela a bien marquer

tu doit indiqué la source (le site ) du quel tu a copier le texte et le cité

 

[xSmokemodz]

daccord je note

 

[boss49300]

Bonjour All je tiens a préciser que cela ne me derange pas que mon tutoriel soit sur d'autres forum mais je demande le rajout de la source qui est Moi et le Forum Fr-Modz... Merci !

 

[E7x]

C/C de FR-Modz ,topic créer pars Boss et il n'y a pas de crédits , bah bravo Morray .

 

[Concept]

Slut tous le monde,
1-Tout d'abord ouvrez un Nouveau Projet & nommez-le :

2- Choisissez votre Design :
Ajoutez 2 boutons que vous Marquez "Connect and Attach" sur l'un et sur l'autre vous Marquez "Disconnect".
Et pour le Name Changer ajoutez un Textbox & un Bouton & vous marquez Change Name comme moi :

3- Ajoutez vos références comme ceci

4- Importez les références Comme avec ce code
Code:
Imports PS3Lib 'Importe le DLL PS3Lib (ajouté précédament au référence du projet)
Imports PS3TMAPI
Comme ceci :

Ajoutez également ce bout de code en Dessous de Public Class Form1
Code:
Private processIDs As UInteger()
Private ProcessID As UInteger
5- Revenez sur la partie Design, Double-Cliquez sur le Bouton "Connect and Attach" et Collez ce code :
Code:
Try
' Connecte le tools à la PS3
PS3TMAPI.InitTargetComms()
PS3TMAPI.Connect(0, vbNullString)

Catch Ex As Exception
MsgBox("Nous n'avons pas pu connecté la PS3 ! ", MsgBoxStyle.Critical)
End Try
Try
' Attache le Process
PS3TMAPI.GetProcessList(0, processIDs)
Dim uProcess As ULong = processIDs(0)
ProcessID = Convert.ToUInt32(uProcess)
PS3TMAPI.ProcessAttach(0, PS3TMAPI.UnitType.PPU, ProcessID)
PS3TMAPI.ProcessContinue(0, ProcessID)

Catch Ex As Exception
MsgBox("Nous n'avons pas pu connecté la PS3 ! ", MsgBoxStyle.Critical)
End Try
6- Revenez sur la partie Design, Double-Cliquez sur le Bouton "Disconnect" et Collez ce code :
Code:
PS3TMAPI.Disconnect(0) 'Déconnecte la PS3
PS3TMAPI.ProcessStop(0, ProcessID) 'Arrête le processus
MsgBox("PS3 Disconnected", MsgBoxStyle.Information)
7- Revenez sur la partie Design, Renommez la Textbox en Namebo2, Double-Cliquez sur le Bouton et ajoutez ce code :
Code:
Dim Namebo2 As String
Namebo2 = FlatTextBox1.Text.ToString()
Dim Namebo2X As Integer = Convert.ToInt32(Namebo2)
Dim Namebo2X1 As Byte() = BitConverter.GetBytes(Namebo2X)
PS3TMAPI.ProcessSetMemory(0, PS3TMAPI.UnitType.PPU, ProcessID, 0, &H26B75D0, Namebo2X1)
Ceci étant le code pour Bo2 en MaJ 1.15


Voilà vous avez votre Name Changer & j'espères avoir été assez Clair.

N'as tu pas des sources a fournir? Ce serait plus correct vis a vis du réel auteur du topic

 

[E7x]

N'as tu pas des sources a fournir? Ce serait plus correct vis a vis du réel auteur du topic

Les sources reviennent tout simplement a FR-Modz et à @boss49300 qui est l'auteur du topic.

 

[KeZoX]

Merci

 

[XModzBroX™]

Alors va faloir mexpliker la car jai refait et refait sa ne marche pas !!

 

[XModzBroX™]

deja d'ou le FlatTextBox1 alors qu'on na aucun truc qui sapelle comme sa ?

 

[Djamel SEC]

Toujours pas de source, je lock, une fois que tu les auras rajouté, je le ré-ouvrerai.