Video in ASCII-Effekt

	Re: Video in ASCII-Effekt Patrick Deen - 11-06-2007 Sie haben wahrscheinlich deinen Charakter zu klein, wenn Sie nur die Bounding Boxen ;-) Ich habe kommentiert Dan 's Ausdruck für Sie. Hoffe, es hilft Ihnen, es zu verstehen :-) Eine andere Sache, Können Sie Ihren eigenen Satz von Zeichen reicht von hell bis dunkel. Ich war nicht wirklich gern dem "@"-Zeichen als das dunkelste so habe ich verändert desity String für meinen Geschmack. Hier ist der Ausdruck kommentiert; Dichte = " ."",^:"+'";~-_+<>i!Li?/|() 1 () [] rcvunxzjftlcjuyxzo0qoahkbdpqwm * wmb8 &%$#@'; / * "Dichte" ist nur eine Zeichenkette mit Zeichen bestellt von hell bis dunkel ( "" ist weiß und "@" ist schwarz).Sie können jedes Zeichen aus dieser Zeichenkette als Array. "Dichte [1]" wäre "."Array-Einträge, da beginnt die Zählung von Null (desity [0] =" ") * / Target = thiscomp.Schicht (Index -1); / * Die Ziel-Variable wird der Verweis auf die Ebene über der Ebene, wo Sie Text hinzugefügt haben diesen Ausdruck * / Cols = 80; / / Anzahl der Zeichen / Spalten, die die Breite des Gitters Rows = 60; / / Anzahl der Zeichen / Zeilen, aus denen sich die Höhe des Gitters W = thiscomp.Breite / cols; / / Division der Breite durch die Anzahl der Spalten können Sie die Breite der einzelnen "Zelle" im Netz H = thiscomp.Höhe / Zeilen; / / Division der Höhe von der Anzahl der Spalten können Sie die Höhe der einzelnen "Zelle" im Netz S = "" / / Das erklärt, eine leere Variable, um die Zeichenfolge, die Ihre ASCII art / / Als nächstes kommt eine verschachtelte Schleife, die es allen passieren... For (var i = 0; I Zeilen; i + +) (/ / Addition der Zeilen / * Den Wert von "I" gleich Null ist, Wiederholen Sie diese Aktion, während "I" ist kleiner als die Anzahl der Zeilen, Inkrement "I" mit einem nach jeder Ausführung des eingebetteten Skript * / / / die eigentliche verschachtelten Schleife For (var j = 0; j cols; j + +) (/ / Hinzufügen von Spalten zu der Zeile / * Der Wert "j" ist Null, Wiederholen Sie diese Aktion, während "j" ist kleiner als die Anzahl der Spalten, Inkrement "j" mit einem nach jeder Ausführung des Skripts * / Center = [W / 2 + j * w, H / 2 + I * h]; / / Aufteilung der Breite / Höhe der Zelle in der Hälfte und fügen j mal die Breite / Höhe auf diesen Wert in die Mitte-Nummer der einzelnen Zelle Sample = Ziel.Sampleimage (Mitte,[(w-1) / 2,(h-1) / 2]); / / Verwendet den "Center"-Variable für die Position und die Größe von dem Punkt, dem Proben zu entnehmen auf der Grundlage der Größe der Raster-Zellen. Probe wird ein Array von drei Zahlen zwischen 0 und 1 (1 = 0 = weiß und schwarz) S + = Dichte [math.Runde (lineare ([0],0,1,0,Dichte.Länge - 1))]; / / Die Variable "s" ist erhöht mit einem Charakter aus dem "desity" string. Der Ausdruck zwischen den Klammern verwendet gerade der erste Wert der in die Stichprobe einbezogenen Farbe Variable in der Stichprobe, um eine Integer-Zahl gerundet, die verwendet wird, um den Charakter, um die Zeichenkette "s" } S + = "r" / / nach einer Zeile wird in diesem wird eine neue Linie auf den Text, bis alle Zeilen sind. } S / / am Ende der String abgeschlossen ist auch von dieser einfachen Notation und das ist, was zeigt, auf der Textebene.

	Re: Video in ASCII-Effekt Patrick Deen - 11-06-2007 Kopieren Einfügen führt zu dummen Fehler, - ( Ich habe einen Backslash in meinem Beitrag (unter anderen Fehler, aber dieses ist von entscheidender Bedeutung) S + = "\ r"; / / nach einer Zeile wird in diesem wird eine neue Linie auf den Text, bis alle Zeilen bu