[RELEASE]CMT - Complete Machine Language Translator

[schabbo1]

[ ITALIANO ]

CMT è un semplice traduttore dal codice macchina alla tua lingua , per ora funziona solo con l'alfabeto latino e non ha tutti i simboli ma ne sono presenti più di 10 di quelli speciali .
Per ora l'unica traduzione a non avere bug è quella da La tua Lingua a Morse , visto che abbiamo riscontrato un bug nella traduzione contraria che staimo risolvendo .
Per tutto il resto stiamo aggiungendo anche la traduzione in codice binario che sarà possibile utilizare non prima di natale , si cercano anche aiutanti al progetto , nella prossima versione sarà necessario effettuare un login tramite un client aggiunto al programma per contare tutte le persone che fanno uso di questo servizio .
Il programma è estremamente semplice da usare e disponde anche un Check Update , quindi non bisogna andare su nessun sioto per aggiornarsi basterà cliccare sul bottone e confermare .
[ Deutsch ]

CMT ist ein einfaches Übersetzer aus Ihrer Sprache in Maschinencode, denn jetzt funktioniert nur mit dem lateinischen Alphabet und hat alle Symbole, aber es gibt mehr als 10 der speziellen.
Für den Moment ist das nur die Übersetzung nicht, um Fehler von Your Language Morse haben, da wir einen Fehler in der Übersetzung vor, solange wir die Lösung gefunden haben.
Für den Rest fügen wir Übersetzung in binäre Code, den Sie nicht gut gebrauchen kann vor Weihnachten haben wir auch auf der Suche nach Helfern für das Projekt, wird die nächste Version müssen über einen Client anmelden hinzugefügt, um das Programm zu allen Menschen, die Verwendung count dieses Dienstes.
Das Programm ist extrem einfach zu bedienen und mit Adresse ein Check Update, also nicht auf jedem Siot gehen zu aktualisieren einfach auf den Button klicken und bestätigen.
[ English ]

CMT is a simple translator from your language to machine code, for now only works with the Latin alphabet and has all the symbols but there are more than 10 of the special ones.
For now, the only translation is not to have bugs from Your Language Morse, seeing as we have found a bug in the translation against long as we are solving.
For the rest we are adding translation into binary code that you can not make good use before Christmas, we are also looking for helpers to the project, the next version will need to login through a client added to the program to count all the people who use of this service.
The program is extremely simple to use and provided with address a Check Update, so do not go on any Siot to update just click on the button and confirm.
[ Screen ]

[ Download Mediafire ( Mediafire use BitDefender Online AntiVirus ) ]

[Freddy​]

Ein Virustest wäre nett.

[Train™]

Virustotal ist doch Pflicht?

[schabbo1]

okok, but since his mediafire used a virus I thought I'd put it. Now Edit

[MrSm!th]

Originally Posted by Train™

Virustotal ist doch Pflicht?

Nein.

[lolkop]

stringreplace isn't a good choice for stuff like this.

lets say, u've got this morse text for "p":

..-./

your source would now start the replacing function, and go through the single stringreplace commands. the first match would be:

$e = StringReplace($d, "./", "e")

so the text will get changed to:

..-e

now there ain't no matching rules left, to replace the text.

since every morse line, except space, ends on '/', you could simply use stringsplit, with '/' as delimiter, and check the stuff before those delimiters.

beside that, you should build an unicode array, and set your morsecode to the specific positions. that way, you could simply use the Chr and Asc functions, to parse the text kinda efficient.

Edit:
here's an example for a recursive parser, using your parsing library:

 Spoiler

Dim $array[255]
$array[Asc('a')] = ".-/"
$array[Asc('b')] = ".../"
$array[Asc('c')] = "../"
$array[Asc('d')] = "../"
$array[Asc('e')] = "./"
$array[Asc('f')] = "..-./"
$array[Asc('g')] = "--./"
$array[Asc('h')] = "..../"
$array[Asc('i')] = "../"
$array[Asc('l')] = ".-../"
$array[Asc('m')] = "--/"
$array[Asc('n')] = "-./"
$array[Asc('o')] = "---/"
$array[Asc('p')] = ".--./"
$array[Asc('q')] = "--.-/"
$array[Asc('r')] = ".-./"
$array[Asc('s')] = ".../"
$array[Asc('t')] = "-/"
$array[Asc('u')] = "..-/"
$array[Asc('v')] = "...-/"
$array[Asc('w')] = ".--/"
$array[Asc('x')] = "-..-/"
$array[Asc('y')] = "-.--/"
$array[Asc('z')] = "--../"
$array[Asc(' ')] = "\"
$array[Asc('À')] = ".--.-/"
$array[Asc('Ç')] = "-.-../"
$array[Asc('Ð')] = "..--./"
$array[Asc('È')] = ".-..-/"
$array[Asc('É')] = "..-../"
$array[Asc('G')] = "--.-./"
$array[Asc(',')] = "--..--/"
$array[Asc('?')] = "..--../"
$array[Asc("'")] = ".----./"
$array[Asc('!')] = "-.-.--/"
$array[Asc('(')] = "-.--./"
$array[Asc(')')] = "-.--.-/"
$array[Asc('&')] = ".-.../"
$array[Asc(':')] = "---.../"
$array[Asc(';')] = "-.-.-./"
$array[Asc('=')] = "-...-/"
$array[Asc('+')] = ".-.-./"
$array[Asc('_')] = "..--.-/"
$array[Asc('$')] = "...-..-/"
$array[Asc('@')] = ".--.-./"

Func StringToMorse($string, $morse='')
	If $string='' Then Return $morse
	Return StringToMorse(StringTrimLeft($string,1), $morse&$array[Asc(StringLeft($string,1))])
EndFunc

Func MorseToString($morse, $string='', $buffer='')
	If $morse='' Then Return $string
	If StringLeft($buffer,1)='\' Then Return MorseToString($morse, $string&' ', StringTrimLeft($buffer,1))
	If StringLeft($morse,1)='/' Then Return MorseToString(StringTrimLeft($morse,1), $string&Search($buffer&'/'), '')
	Return MorseToString(StringTrimLeft($morse,1), $string, $buffer&StringLeft($morse,1))
EndFunc

Func Search($morse)
	For $i=0 To 254
		If $array[$i]=$morse Then Return Chr($i)
	Next
EndFunc

$string = 'ich esse eine tomate'
ConsoleWrite('String = '&$string&@CRLF)
ConsoleWrite('MorseCode = '&StringToMorse($string)&@CRLF)
ConsoleWrite('Rückweg = '&MorseToString(StringToMorse($string))&@CRLF)