Just 4 Fun - Was tut das Skript?

Hi,
hier ein ganz einfaches Skript. Wie schnell bekommt ihr heraus, was es tut - ohne es auszuführen?
Wenn man große Skripte so schreiben würde und dann noch einen Obfuscator drüberjagt, besteht kaum noch die Chance sich da durchzufinden - allerdings auch für den Autor.

Local $1 = DllStructCreate('ptr[128];')
Local $2[33] = [77,38,-12,-37,45,9,-80,8,-4,-12,2,50,17,14,1,-82,10,-12,2,38,29,7,0,3,-79,55,24,3,-6,-8,-67,1,7]
Local $3 = 0, $4 = 0, $5 = ''
For $6 = 1 To 128
DllStructSetData($1, 1, $6, $6)
Next
While $3 < UBound($2)
$4 += $2[$3]
$5 &= Chr(DllStructGetData($1, 1, $4))
$3 += 1
If $3 = UBound($2) Then Execute($5)
WEnd

Zitat von Der_Doc

Mh
also ich finde da nix raus.

Es ist eine Anlehnung an das Brainfuck-Prinzip.
Ich bilde ein Array (zur Verwirrung als Pointerstruktur) und hinterlege dort ASCII-Werte. In einem Array speichere ich die ASCII-Werte aller Zeichen einer Befehlszeile [ MsgBox(0, "Test", "Hello World!") ] aber nicht direkt, sondern relativ zum vorigen Zeichen. Dannach wird in einer Schleife daraus die Zeichenkette zusammengesetzt und am Ende mit Execute ausgeführt.

Freut mich, wenn euch der kleine Gag gefallen hat.

Als Obfuscator allein taugt es nicht, da in der Form nur mit Execute() ausführbare Befehlszeilen erstellt werden können (also z.B. keine Schleifen o.a. mehrzeilige Befehlsstrukturen).
Aber als Prä-Obfuscator ist es sicherlich nicht schlecht:
- alle Ein-Zeilen-Befehle damit "vorbehandeln"
- danach ab in den Obfuscator

Bleibt aber die Frage der Performance. Aus einem Befehl wird eine Anzahl Befehle für jedes verwendete Zeichen plus dem eigentlichen Befehl. Das stell ich mir bei großen Skripten (und es sind ja meist die großen, wertvollen Skripte, die man schützen möchte) dann aber doch sehr bremsend vor.
Wenn ihr möchtet, erstelle ich mal den "PräObfuscator" und wer ein entsprechend großes Skript hat, kann dann ja mal einen Performancevergleich anstellen.