Aktuelle Zeit: 21. Apr 2018, 21:07

Alle Zeiten sind UTC + 1 Stunde [ Sommerzeit ]





Ein neues Thema erstellen Auf das Thema antworten  [ 1 Beitrag ] 
 In VB08 einen Pokemon Script Creator programmieren 
AutorNachricht
Administrator
Administrator
Benutzeravatar

Registriert: 02.2009
Beiträge: 265
Wohnort: NRW
Geschlecht: männlich
Highscores: 6
Freundescode: 5241 5057 6457
Beitrag In VB08 einen Pokemon Script Creator programmieren
So, hier erklär ich euch, wie man einen einfachen Script Creator für Pokemon in Microsoft Visual Basic 2008 schreibt!
Als erstes braucht ihr Microsoft Visual Basic- hier
Microsoft .Net Framework wird automatisch mit installiert!
Wer sich mit Scripten auskännt, wird das verstehen!
Wenn ihr noch garnicht's über VB08 wißt, empehle ich erstmal die grundlagen zu lernen!

Fangen wir an!
Wir erstellen eine neue Windows Forms anwengung!
Das sollte dann so aussehen:
Klick mich
Jetzt erstellt ihr:
ein Label
4 Buttons
Eine Textbox
Eine RichTextbox
Ein SaveFileDialog

Diese machen wir so(Den Text von Buttons, Labels, Forms, ect verändert ihr bei den eigenschaften unter Text!):
Bild
Nun müssen wir noch ein paar einstellungen verändern!
Bei den einstellungen von RichTextbox1 verändern wir folgende einstellungen(Die anderen bleiben wie sie sind!):
ReadOnly - True
WordWrap - False

Beim SaveFileDialog1 ändern wir folgendes:
Filter - Rubikon Dateien(*.rbc)|*.rbc
Title - Script Speichern

Nun könnt ihr schonmal 'F5' drücken, um euer Programm zu testen!
Wie ihr seht, könnt ihr bereits auf die Buttons klicken, aber es passiert nicht's!
Ganz wichtig: Speichert jetzt lieber mal zur sicherheit ab!
Nun müssen wir die Codes schreiben, das schwierigste von allen!
Ihr macht einen Doppelklick auf den Button wo 'Zeilenumbruch' steht und schreibt dort:
Code:
TextBox1.Text += "\n"

Jetzt klicken wir oben wieder auf 'Form1.vb [Entwurf]'
Jetzt machen wir einen Doppelklick auf den Button wo drauf steht: 'Neue Textbox' und schreibt:
Code:
TextBox1.Text += "\p"
Jetzt geht ihr wieder zum Enwurf, macht einen Doppelklick auf den Button wo 'Script anzeigen' steht und fügt folgenden Text ein:
Code:
RichTextBox1.Text = ("#ORG $ShowText" + Chr(13) + _
                     "Lock" + Chr(13) + _
                     "Faceplayer" + Chr(13) + _
                     "message $Tex1" + Chr(13) + _
                     "$Text1 1 = " + TextBox1.Text + Chr(13) + _
                     "boxset 6" + Chr(13) + _
                     "release" + Chr(13) + _
                     "end")

So, nun geht ihr nochmal zum Entwurf, und macht einen Doppelklick auf Den Button wo 'Script Speichern' steht!
Dort schreibt ihr:
Code:
RichTextBox1.Text = ("#ORG $ShowText" + Chr(13) + _
                     "Lock" + Chr(13) + _
                     "Faceplayer" + Chr(13) + _
                     "message $Tex1" + Chr(13) + _
                     "$Text1 1 = " + TextBox1.Text + Chr(13) + _
                     "boxset 6" + Chr(13) + _
                     "release" + Chr(13) + _
                     "end")
If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            RichTextBox1.SaveFile(SaveFileDialog1.FileName, RichTextBoxStreamType.PlainText)
        Else
            MsgBox("Script wurde nicht gespeichert!")
        End If

Das wars auch schon!


MADE BY POKEMON-HACKER-JONES

_________________
Mfg Master Saikyou


16. Feb 2009, 21:15
Profil Besuche Website   Persönliches Album
Beiträge der letzten Zeit anzeigen:  Sortiere nach  
Ein neues Thema erstellen Auf das Thema antworten  [ 1 Beitrag ] 

Alle Zeiten sind UTC + 1 Stunde [ Sommerzeit ]


Du darfst keine neuen Themen in diesem Forum erstellen.
Du darfst keine Antworten zu Themen in diesem Forum erstellen.
Du darfst deine Beiträge in diesem Forum nicht ändern.
Du darfst deine Beiträge in diesem Forum nicht löschen.
Du darfst keine Dateianhänge in diesem Forum erstellen.

Suche nach:
Gehe zu:  
cron
© phpBB® Forum Software • Designed by Vjacheslav Trushkin for Free Forums/DivisionCore.
phpBB3 Forum von phpBB8.de