Hallo liebe Coder Kollegen,
Ich habe folgendes Problem - doch vorab, ich suche seit über 2h im Internet alles ab was mir bei diesem Thema auch nur ansatzweise helfen könnte. Soll heißen ich würde euch nicht um Hilfe bitten, wenn ich nicht absolut keinen Plan hätte wie ich meine Idee umsetzen könnte. Daher bitte ich auch inständig darum mir keine lmgtfy Links oder Verweise auf ein anderes Thema zu senden. Das habe ich mir nämlich schon mindestens 2x durchgelesen... Nun aber zu meinem Problem:
Ich habe mir in den Kopf gesetzt eine art eigenen Crypter zu Programmieren. Der aufbau ist relativ simpel:
In einem Textdokument habe ich in einer Zeile 92 dreistellige Zahlen (z.B. 001|002|003|...) stehen. Jede Zahl steht für ein Zeichen (001=a 002=! 003=A). Die Bedeutung der Zahlen steht aber nicht daneben. D.h. die exe wäre ohne das Textdokument unbrauchbar und umgekehrt. Der Grund für die Aktion mit dem Textdokument ist der, dass ich die Bedeutung von z.B. (001=a) nicht in der exe selber stehen haben will, da ich die Information das 001 = a ist später auch noch ändern möchte. Dann ist 001 z.B. = e. Das hat in meinen Augen den Vorteil, dass man zu jedem Text den man entcrypten will auch das richtige Textdokument braucht. Wie eine art Schlüssel. Soviel zum Grundprinzip. Den Rest könnt ihr euch wahrscheinlich denken Also die Anwendung liest das txt ein und Splittet den Text auf, welcher dann in einem Label abgelegt wird. Sprich in Label1 steht dann 001 in Label2 002 und so weiter. In meiner Anwendung ist dann lediglich festgehalten, dass wenn die Zahlenfolge die in Label1 steht kommt, ein a ausgegeben wird. Das geht so weiter bis Label92, was dann z.B. mit einem Z hinterlegt ist. (Habe ich also den Code 001|002| UND im Textdokument steht 001|002|003... Würde 001|002 ab bedeuten. Wenn im Textdokument 002|001|003 steht würde ba ausgegeben werden.) Soweit so gut. Nur an der Umsetzung in Code hapert es momentan sehr... Das was ich hier bis jetzt in der ganzen Zeit zusammen gecodet habe ist der größte scheiß. Der Split funktioniert nicht richtig und generell die systematische Umsetzung der Funktionen ist totaler mist... Ich schreibe den Code gleich hier drunter, aber bitte nicht Ich hätte gerne etwas mit Case oder etwas passenderem gemacht, aber ich habe mich mit so etwas oder ähnlichem noch nie beschäftigt. Es gibt bestimmt 1000 Sachen die man da noch verbessern könnte, aber fürs erste würde es mir reichen wenn die Umwandlung, Ein- Ausgabe und der Split des Textes/Zahlen funktionier.
Ich bin suuuuuuuuuuuuuper gespannt was ihr mir hierzu schreibt und freue mich schon wenn ich endlich weiter komme. Falls einer Interesse hat könnte man sich auch z.B. via Skype zu diesem Thema austauschen... PS: Ich weiß das es auch andere "fertige" Crypter Methoden für Text gibt, aber ich würde sehr gerne etwas eigenes machen
Beste Grüße,
Tim
Verschoben. ~Trade
Ich habe folgendes Problem - doch vorab, ich suche seit über 2h im Internet alles ab was mir bei diesem Thema auch nur ansatzweise helfen könnte. Soll heißen ich würde euch nicht um Hilfe bitten, wenn ich nicht absolut keinen Plan hätte wie ich meine Idee umsetzen könnte. Daher bitte ich auch inständig darum mir keine lmgtfy Links oder Verweise auf ein anderes Thema zu senden. Das habe ich mir nämlich schon mindestens 2x durchgelesen... Nun aber zu meinem Problem:
Ich habe mir in den Kopf gesetzt eine art eigenen Crypter zu Programmieren. Der aufbau ist relativ simpel:
In einem Textdokument habe ich in einer Zeile 92 dreistellige Zahlen (z.B. 001|002|003|...) stehen. Jede Zahl steht für ein Zeichen (001=a 002=! 003=A). Die Bedeutung der Zahlen steht aber nicht daneben. D.h. die exe wäre ohne das Textdokument unbrauchbar und umgekehrt. Der Grund für die Aktion mit dem Textdokument ist der, dass ich die Bedeutung von z.B. (001=a) nicht in der exe selber stehen haben will, da ich die Information das 001 = a ist später auch noch ändern möchte. Dann ist 001 z.B. = e. Das hat in meinen Augen den Vorteil, dass man zu jedem Text den man entcrypten will auch das richtige Textdokument braucht. Wie eine art Schlüssel. Soviel zum Grundprinzip. Den Rest könnt ihr euch wahrscheinlich denken Also die Anwendung liest das txt ein und Splittet den Text auf, welcher dann in einem Label abgelegt wird. Sprich in Label1 steht dann 001 in Label2 002 und so weiter. In meiner Anwendung ist dann lediglich festgehalten, dass wenn die Zahlenfolge die in Label1 steht kommt, ein a ausgegeben wird. Das geht so weiter bis Label92, was dann z.B. mit einem Z hinterlegt ist. (Habe ich also den Code 001|002| UND im Textdokument steht 001|002|003... Würde 001|002 ab bedeuten. Wenn im Textdokument 002|001|003 steht würde ba ausgegeben werden.) Soweit so gut. Nur an der Umsetzung in Code hapert es momentan sehr... Das was ich hier bis jetzt in der ganzen Zeit zusammen gecodet habe ist der größte scheiß. Der Split funktioniert nicht richtig und generell die systematische Umsetzung der Funktionen ist totaler mist... Ich schreibe den Code gleich hier drunter, aber bitte nicht Ich hätte gerne etwas mit Case oder etwas passenderem gemacht, aber ich habe mich mit so etwas oder ähnlichem noch nie beschäftigt. Es gibt bestimmt 1000 Sachen die man da noch verbessern könnte, aber fürs erste würde es mir reichen wenn die Umwandlung, Ein- Ausgabe und der Split des Textes/Zahlen funktionier.
VB.NET-Quellcode
- Imports System
- Imports System.IO
- Public Class Form1
- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Dim Lines() As String = System.IO.File.ReadAllLines("lib.txt")
- For Each Line As String In Lines
- Dim Splitted() As String = Line.Split("|")
- If Splitted.Length <> 3 Then Continue For
- Label1.Text = (Splitted(0))
- Label2.Text = (Splitted(1))
- Label3.Text = (Splitted(2))
- Label4.Text = (Splitted(3))
- Label5.Text = (Splitted(4))
- '... hier würde es jetzt bis 92 weiter gehen
- Next
- End Sub
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- End Sub
- Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
- Try
- Dim aText As String
- Dim anf As String = """"
- aText = TextBox3.Text
- aText = Replace(aText, Label1.Text, ".")
- aText = Replace(aText, Label2.Text, " ")
- aText = Replace(aText, Label3.Text, ":")
- aText = Replace(aText, Label4.Text, ",")
- aText = Replace(aText, Label5.Text, ";")
- aText = Replace(aText, Label6.Text, "-")
- aText = Replace(aText, Label7.Text, "_")
- aText = Replace(aText, Label8.Text, "/")
- aText = Replace(aText, Label9.Text, "\")
- aText = Replace(aText, Label10.Text, "!")
- aText = Replace(aText, Label11.Text, anf)
- aText = Replace(aText, Label12.Text, "§")
- aText = Replace(aText, Label3.Text, "%")
- aText = Replace(aText, Label3.Text, "&")
- aText = Replace(aText, Label3.Text, "(")
- aText = Replace(aText, Label3.Text, ")")
- aText = Replace(aText, Label3.Text, "=")
- aText = Replace(aText, Label3.Text, "+")
- aText = Replace(aText, Label3.Text, "*")
- aText = Replace(aText, Label3.Text, "ß")
- aText = Replace(aText, Label3.Text, "?")
- aText = Replace(aText, Label3.Text, "^")
- aText = Replace(aText, Label3.Text, ">")
- aText = Replace(aText, Label3.Text, "<")
- aText = Replace(aText, Label3.Text, "1")
- aText = Replace(aText, Label3.Text, "2")
- aText = Replace(aText, Label3.Text, "3")
- aText = Replace(aText, Label3.Text, "4")
- aText = Replace(aText, Label3.Text, "5")
- aText = Replace(aText, Label3.Text, "6")
- aText = Replace(aText, Label3.Text, "7")
- aText = Replace(aText, Label3.Text, "8")
- aText = Replace(aText, Label3.Text, "9")
- aText = Replace(aText, Label3.Text, "0")
- '... hier würde es jetzt bis 92 weiter gehen
- TextBox2.Text = aText
- Catch ex As Exception
- MsgBox(Err.Description)
- End Try
- End Sub
- Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
- Try
- For ZahlenZuBuchstaben = 1 To 92 'das hier war mein versuch das ganze via Case zu machen. Mehr als Fehler hat es leider nicht gebracht.
- Next
- Catch ex As Exception
- End Try
- End Sub
- End Class
Ich bin suuuuuuuuuuuuuper gespannt was ihr mir hierzu schreibt und freue mich schon wenn ich endlich weiter komme. Falls einer Interesse hat könnte man sich auch z.B. via Skype zu diesem Thema austauschen... PS: Ich weiß das es auch andere "fertige" Crypter Methoden für Text gibt, aber ich würde sehr gerne etwas eigenes machen
Beste Grüße,
Tim
Verschoben. ~Trade
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Trade“ ()