MiniBCC #4 - Mona Lisa

Übersicht Sonstiges Projekte

Gehe zu Seite 1, 2  Weiter

Neue Antwort erstellen

SpionAtom

Betreff: MiniBCC #4 - Mona Lisa

 BeitragFr, Nov 02, 2012 1:01
Antworten mit Zitat
Benutzer-Profile anzeigen
user posted image

Willkommen zum vierten MiniBCC!


Eure Aufgabe:
Programmiert ein Bild, und zwar nichts geringeres als:
Leonardo da Vincis Mona Lisa



Question Was soll das denn bedeuten?
Schreibt ein Programm, das nichts anderes tut, als die Mona Lisa auszugeben.


Question Ich bin künstlerisch unbegabt, warum sollte ich dann mitmachen?
Es geht nicht darum, selbst künstlerisch tätig zu werden, vielmehr geht es darum ein Bild in den vorgegebenen Grenzen in Quellcode festzuhalten. (Ich verbiete natürlich niemanden, die Mona Lisa neu zu interpretieren).
Wichtig ist, dass man sie erkennt. Kreativ werden müsst Ihr also bei der Komprimierung.


Question Muss das Ergebnis in Farbe sein oder irgendeine Mindestauflösung erfüllen?
Ob Ihr schwarz weiß, Graustufen oder Farbe wählt, ist ganz Euch überlassen. Auch bei der Auflösung setze ich keine Vorgaben. Mich störts auch nicht, wenn das Endergebnis ein Ascii-Art ist. Dabei ist natürlich zu beachten, dass man am Ende auch was erkennt.
(Desweiteren hilft es natürlich kompetetiv zu denken. Farbe oder eine größere Auflösung kommen vielleicht besser an...)


Question Was sind die Rahmenbedingungen?
Ganz einfach, ihr habt 6 * 1024 Bytes = 6144 Bytes Quelltext, keine Externen Dateien oder Bibliotheken.

user posted image

Zeit habt ihr bis Sonntag, den 4.11.2012 23:59.

Als Abgabe zählt der letzte Beitrag, den Ihr mir rechteitig per PM habt zukommen lassen.
Abgegeben werden muss Quellcode und kompilierte Version (mindestens Windowskompilierung).
Zwischen- und Endergebnisse dürfen natürlich auch schon vorher präsentiert werden.


Question Das ist doch unmöglich. Wie soll ich da bloß rangehen?
user posted image Dieses Bild hat die Größe von 1.190 Bytes. Unmöglich ist nichts!



Bei Unklarheiten scheut Euch nicht Fragen zu stellen.
Ansonsten wünsche ich allen viel Spaß mit der Aufgabe!
os: Windows 10 Home cpu: Intel Core i7 6700K 4.00Ghz gpu: NVIDIA GeForce GTX 1080
  • Zuletzt bearbeitet von SpionAtom am Fr, Nov 02, 2012 17:37, insgesamt einmal bearbeitet

Addi

 BeitragFr, Nov 02, 2012 11:16
Antworten mit Zitat
Benutzer-Profile anzeigen
Ist ja mal ein cooler miniBCC Very Happy.
Habe erst kürzlich ein Programm geschrieben, dass Bilder in Data Code umwandelt, allerdings ohne komprimierung Very Happy.
Mal gucken vlt. wird ja was draus.

Edit:
Wie soll ausgegeben werden?
Einfach so, das es gezeichnet wird,
oder das es auf der Platte gespeichert wird?
BP/B3D/BMax : Lerne Java : Früher mal Lite-C : Gewinner BCC 62

SpionAtom

 BeitragFr, Nov 02, 2012 11:28
Antworten mit Zitat
Benutzer-Profile anzeigen
Ausgabe als Bild im Fenster reicht vollkommen. Wenn du noch Bytes übrig hast, kannst du gerne noch einen Export in eine Datei machen, ist aber nicht gefordert.
os: Windows 10 Home cpu: Intel Core i7 6700K 4.00Ghz gpu: NVIDIA GeForce GTX 1080

count-doku

 BeitragFr, Nov 02, 2012 12:39
Antworten mit Zitat
Benutzer-Profile anzeigen
Fertig Laughing

Unkomprimiertes Graustufenbild als Kommentar hinten an die BB Datei angehängt.
Komme genau auf 6.008Bytes.

Es zeigt das Bild an und speichert es als ml.bmp auf der Festplatte.
Als "Vorbild" nahm ich das von Spion gepostete 36x45 und habe es in Graustufen umgewandelt.

Das geht sicherlich besser (also mit mehr Informationen) aber egal.

Code:
BlitzBasic: [AUSKLAPPEN] 
image=CreateImage(36,45):bbfile=ReadFile("ml.bb"):While ReadLine(bbfile)<>".MONALISA":Wend:SetBuffer ImageBuffer(image):LockBuffer
For y=0 To 44:bbline$=ReadLine(bbfile):bbline=Mid(bbline,2,-1):For x=0 To 35:neuZahl=Mid(bbline,1,Instr(bbline,",")-1)
WritePixelFast(x,y,neuZahl*65536+neuZahl*256+neuZahl):bbline=Mid(bbline,Instr(bbline,",")+1):Next:Next
UnlockBuffer:CloseFile bbfile:SaveImage(image,"ml.bmp"):SetBuffer FrontBuffer():DrawImage image,10,10:WaitKey
.MONALISA
;142,136,119,116,117,117,130,124,114,110,120,122,120,105,131,122,132,132,135,139,135,127,120,119,110,142,141,124,120,128,132,121,124,128,127,124
;141,145,136,131,121,117,136,140,116,122,132,130,118,139,133,144,149,149,150,151,145,135,129,129,141,131,138,136,129,124,123,134,127,131,130,126
;141,137,127,128,129,128,136,132,125,110,137,144,149,162,158,125,101,89,84,100,123,140,140,140,135,125,137,130,123,122,120,135,122,127,126,124
;142,134,123,130,136,136,142,135,109,128,133,166,161,84,38,28,9,14,18,20,25,43,86,128,138,146,132,119,129,125,122,134,128,132,131,129
;139,142,146,148,140,133,139,146,143,133,152,154,49,31,44,70,50,40,35,35,38,36,25,23,133,171,136,124,140,125,123,135,138,141,140,136
;150,150,151,153,145,136,140,146,141,143,192,70,16,40,86,67,31,33,42,44,38,29,19,20,36,137,168,145,132,129,134,132,141,146,146,144
;156,150,152,158,155,147,140,142,137,193,121,16,103,145,153,156,126,89,51,32,28,31,36,37,6,63,171,173,136,152,147,142,140,145,146,145
;146,152,165,167,153,141,144,161,173,173,31,96,176,200,195,189,177,147,116,72,51,30,29,33,44,6,115,180,158,168,145,162,147,151,150,146
;158,146,158,166,158,175,143,167,208,84,21,151,203,186,183,177,174,158,139,76,58,41,24,33,25,15,34,182,157,142,149,156,158,169,151,144
;166,168,175,145,162,160,155,171,171,61,31,154,189,171,174,162,172,137,129,92,66,42,29,34,19,20,19,118,139,145,141,135,152,159,146,149
;180,169,158,152,181,148,159,187,126,24,56,177,183,180,169,170,178,147,141,126,106,89,54,17,31,24,5,77,138,128,122,138,149,149,142,156
;121,177,179,172,163,171,192,181,95,12,90,190,172,190,179,180,175,163,162,168,145,92,41,31,31,25,8,50,111,89,101,128,128,122,127,160
;102,109,115,172,186,176,184,142,68,17,82,162,127,150,190,134,51,122,120,102,94,73,22,14,20,31,30,38,79,81,105,104,111,99,107,148
;73,75,95,118,184,186,190,91,59,33,27,53,28,53,173,69,50,96,30,18,44,93,54,36,30,23,29,35,69,68,91,83,96,80,89,133
;92,92,110,127,162,108,124,122,48,36,68,130,89,101,181,57,132,123,72,102,152,116,34,24,41,25,23,35,66,53,59,71,77,60,75,123
;87,92,66,72,99,59,55,82,52,11,117,193,165,175,183,95,135,180,169,178,152,94,30,17,22,36,29,19,55,59,59,72,69,50,61,101
;77,52,67,68,67,74,61,67,48,8,87,169,189,171,185,110,151,174,176,165,123,66,23,28,27,17,19,29,61,93,87,89,79,77,76,80
;70,50,67,68,62,59,38,36,57,20,66,171,153,156,190,114,126,171,169,130,91,56,27,29,24,17,19,21,43,75,80,92,95,100,111,125
;79,63,67,67,59,50,41,33,55,18,27,152,156,145,92,25,120,163,139,90,73,57,32,28,23,22,29,21,24,37,32,41,51,51,56,64
;79,65,63,63,55,48,49,42,34,28,39,86,110,175,77,52,92,129,115,82,81,54,28,30,17,19,31,28,34,46,37,43,57,49,43,43
;56,48,49,52,46,42,48,40,45,62,17,106,128,136,131,65,62,112,127,100,85,45,26,34,30,22,25,24,40,63,60,65,55,50,50,55
;48,47,51,60,56,51,61,49,47,54,14,35,151,176,95,90,90,118,119,78,65,39,35,30,34,22,21,21,38,58,48,47,56,51,50,54
;49,53,57,70,65,61,69,55,48,32,43,17,28,157,216,157,125,102,82,50,48,34,39,27,26,21,27,31,45,64,57,57,64,53,45,44
;41,46,47,60,56,55,69,56,47,56,55,32,11,48,144,140,94,49,44,45,47,18,31,33,34,27,29,24,32,54,57,67,65,56,50,52
;53,44,69,75,64,93,102,55,46,43,30,34,18,5,11,25,27,23,30,32,27,30,32,33,34,22,25,26,19,29,42,34,58,51,53,53
;77,88,82,80,93,99,85,76,24,40,41,34,15,17,13,82,46,28,25,37,54,69,55,27,34,24,22,31,22,38,49,50,51,44,45,39
;95,90,96,108,100,101,89,75,48,45,48,34,20,34,10,115,128,85,53,51,69,96,84,42,28,24,20,39,22,44,54,68,88,79,74,55
;73,68,74,95,77,82,75,54,40,27,41,36,26,19,5,85,147,121,100,96,96,110,97,42,25,34,27,46,17,31,32,54,52,61,85,88
;38,62,43,48,58,59,31,32,23,16,33,13,17,21,54,106,127,119,117,123,113,123,124,70,29,49,45,53,14,17,11,32,26,26,38,26
;58,62,32,37,22,34,25,17,32,30,29,13,51,89,152,163,155,146,142,153,140,147,156,96,33,61,60,55,22,22,17,34,51,49,68,65
;85,53,27,52,13,30,46,14,25,28,25,60,137,160,173,161,162,155,159,176,160,147,140,74,41,67,67,47,31,34,36,44,54,69,126,157
;76,59,18,51,36,38,38,31,35,32,28,102,187,187,166,188,177,169,168,179,159,144,148,84,52,72,64,30,23,27,31,30,24,30,81,115
;69,48,50,47,60,50,53,14,25,52,53,157,180,180,179,186,171,164,175,176,160,163,158,76,50,68,55,15,13,48,60,40,23,28,56,86
;92,51,52,91,57,30,21,18,37,93,93,177,188,187,175,167,167,164,174,176,162,158,146,74,72,52,32,29,51,74,71,55,32,27,37,56
;115,70,59,64,28,26,20,10,47,133,141,180,175,176,180,178,187,177,171,177,174,166,137,74,49,55,58,67,98,126,108,74,57,36,25,26
;52,90,115,36,9,27,44,15,92,173,165,175,171,178,182,177,184,189,181,181,170,144,121,83,63,72,109,146,136,87,50,47,43,26,19,21
;74,113,110,18,15,35,29,20,58,167,201,206,180,161,172,190,189,189,181,187,192,172,141,100,89,107,102,57,26,25,26,21,28,22,25,31
;131,82,24,12,30,45,13,44,56,98,121,156,173,181,192,193,194,191,182,183,181,145,106,61,53,37,27,26,21,12,12,17,28,25,28,29
;75,25,14,38,35,39,28,85,74,64,62,77,89,125,172,193,181,203,208,185,129,78,68,49,34,32,28,22,33,45,37,18,18,17,23,25
;55,17,45,26,17,34,58,74,62,51,62,70,54,53,65,61,75,85,91,83,59,49,53,33,26,22,34,52,56,42,30,30,18,16,22,23
;56,36,31,27,17,40,64,57,57,53,46,60,88,72,82,77,66,61,70,73,66,47,25,20,23,22,43,77,48,27,16,19,18,18,19,18
;46,29,27,26,16,34,53,45,40,47,43,60,84,77,73,59,56,62,67,53,35,27,26,31,35,41,43,49,33,57,58,47,48,39,29,23
;26,17,20,21,19,31,41,32,31,42,32,47,63,66,56,39,49,58,52,30,13,15,24,29,34,37,30,28,25,72,82,61,64,49,30,22
;24,18,20,23,24,30,34,27,34,38,22,34,37,45,36,37,50,48,32,22,18,20,25,19,28,21,20,40,42,71,70,52,48,35,20,15
;26,20,23,24,27,30,31,28,33,28,16,28,25,30,29,54,46,35,15,19,24,16,23,15,26,17,24,56,59,73,65,50,26,22,20,20


Los leute machts besser!

mfg,
Count-Doku

aMul

Sieger des Minimalist Compo 01/13

BeitragFr, Nov 02, 2012 18:49
Antworten mit Zitat
Benutzer-Profile anzeigen
Ich habe eine Frage zu count-dokus code:

Ist es dem Programm erlaubt die Code-Datei zu lesen? Zählt das nicht zu externen Dateien?
Panic Pong - ultimate action mashup of Pong and Breakout <= aktives Spiele-Projekt, Downloads mit vielen bunten Farben!
advASCIIdraw - the advanced ASCII art program <= aktives nicht-Spiele-Projekt, must-have für ASCII/roguelike/dungeon-crawler fans!
Alter BB-Kram: ThroughTheAsteroidBelt - mit Quelltext! | RGB-Palette in 32²-Textur / Farbige Beleuchtung mit Dot3 | Stereoskopie in Blitz3D | Teleport-Animation Screensaver

count-doku

 BeitragFr, Nov 02, 2012 18:51
Antworten mit Zitat
Benutzer-Profile anzeigen
Wenn du recht hast aMul, dann muss ich ja noch Data's davormachen.
Naja mal sehen vllt. passts ja auch dann noch Very Happy

aMul

Sieger des Minimalist Compo 01/13

BeitragFr, Nov 02, 2012 18:54
Antworten mit Zitat
Benutzer-Profile anzeigen
Wenn es natürlich erlaubt ist, erlaubt das viele interessante Algorithmen, die das Bild zum Beispiel aus dem Quelltext selbst extrahieren und es dann das Bild als ASCII art ausgeben, wobei die benutzten Symbole der Quelltext sind.

MONA-CEPTION
Panic Pong - ultimate action mashup of Pong and Breakout <= aktives Spiele-Projekt, Downloads mit vielen bunten Farben!
advASCIIdraw - the advanced ASCII art program <= aktives nicht-Spiele-Projekt, must-have für ASCII/roguelike/dungeon-crawler fans!
Alter BB-Kram: ThroughTheAsteroidBelt - mit Quelltext! | RGB-Palette in 32²-Textur / Farbige Beleuchtung mit Dot3 | Stereoskopie in Blitz3D | Teleport-Animation Screensaver

SpionAtom

 BeitragFr, Nov 02, 2012 19:13
Antworten mit Zitat
Benutzer-Profile anzeigen
Programme, die auf ihren eigenen Quelltext zurückgreifen, funktionieren kompiliert nicht mehr und sind damit regelwidrig, darum besser Data-Blöcke oder ähnliches verwenden!




Ursprünglicher Text von mir:

Ist technisch gesehen keine externe Datei, also go for it. Aber nicht vergessen, mir den Beitrag als PM zu schicken, mit Exe und so. Andererseits, als Stand Alone exe funktioniert es nicht mehr
also doch nicht go.
os: Windows 10 Home cpu: Intel Core i7 6700K 4.00Ghz gpu: NVIDIA GeForce GTX 1080
  • Zuletzt bearbeitet von SpionAtom am Fr, Nov 02, 2012 19:18, insgesamt 2-mal bearbeitet

aMul

Sieger des Minimalist Compo 01/13

BeitragFr, Nov 02, 2012 19:15
Antworten mit Zitat
Benutzer-Profile anzeigen
EDIT:
Du Ninja du...

Ursprünglicher Post:
Es ist eine externe Datei wenn man nur die Exe gegeben hat. Razz
Aber es ist natürlich deine Entscheidung, und vielleicht finde ich sogar einen Weg das auszunutzen.
Panic Pong - ultimate action mashup of Pong and Breakout <= aktives Spiele-Projekt, Downloads mit vielen bunten Farben!
advASCIIdraw - the advanced ASCII art program <= aktives nicht-Spiele-Projekt, must-have für ASCII/roguelike/dungeon-crawler fans!
Alter BB-Kram: ThroughTheAsteroidBelt - mit Quelltext! | RGB-Palette in 32²-Textur / Farbige Beleuchtung mit Dot3 | Stereoskopie in Blitz3D | Teleport-Animation Screensaver

SpionAtom

 BeitragFr, Nov 02, 2012 19:17
Antworten mit Zitat
Benutzer-Profile anzeigen
Ja hab ich auch gerade bemerkt, darum nochmal in aller Deutlichkeit: Wenn das Programm als Stand Alone Exe nicht mehr funktioniert, ist es regelwidrig.
os: Windows 10 Home cpu: Intel Core i7 6700K 4.00Ghz gpu: NVIDIA GeForce GTX 1080

Eingeproggt

 BeitragFr, Nov 02, 2012 19:17
Antworten mit Zitat
Benutzer-Profile anzeigen
Kann irgendwer bitte das Bild in seinen Grundzügen mit Rect und Oval nachzeichnen?
Ich habs heute Nachmittag versucht aber da man alles händisch festlegen müsste war es mir zuviel Arbeit. Und ein Algorithmus der geometrische Flächen aus einem JPG extrahiert kenn ich nicht bzw. wär mir zuviel Arbeit.

(Nur um eine Idee in den Raum zu werfen Wink )

mfG, Christoph.
Gewinner des BCC 18, 33 und 65 sowie MiniBCC 9

ZEVS

 BeitragFr, Nov 02, 2012 19:57
Antworten mit Zitat
Benutzer-Profile anzeigen
Heißt das, dass alle Standardfunktionen außer Dateifunktionen erlaubt sind? Was ist z.B. mit OpenTCPStream?

ZEVS

SpionAtom

 BeitragFr, Nov 02, 2012 20:00
Antworten mit Zitat
Benutzer-Profile anzeigen
Rolling Eyes Wenn du auf externe Daten zugreifst, ist das eine Disqualifikation.
os: Windows 10 Home cpu: Intel Core i7 6700K 4.00Ghz gpu: NVIDIA GeForce GTX 1080

aMul

Sieger des Minimalist Compo 01/13

BeitragFr, Nov 02, 2012 20:02
Antworten mit Zitat
Benutzer-Profile anzeigen
Du hattest vor, das Bild von einem Webserver zu laden, hm? Mr. Green

Ich denke es ist relativ klar, dass jegliche Art von Kommunikation mit anderen Programmen verboten ist?
(Außer der Komunikation die BB intern nötig hat um Fenster zu erstellen, etc..)
Panic Pong - ultimate action mashup of Pong and Breakout <= aktives Spiele-Projekt, Downloads mit vielen bunten Farben!
advASCIIdraw - the advanced ASCII art program <= aktives nicht-Spiele-Projekt, must-have für ASCII/roguelike/dungeon-crawler fans!
Alter BB-Kram: ThroughTheAsteroidBelt - mit Quelltext! | RGB-Palette in 32²-Textur / Farbige Beleuchtung mit Dot3 | Stereoskopie in Blitz3D | Teleport-Animation Screensaver

BlitzMoritz

 BeitragFr, Nov 02, 2012 23:14
Antworten mit Zitat
Benutzer-Profile anzeigen
... sorry, klappt noch nicht, hab' eben noch ein Fehler bemerkt - bitte warten - es kommt noch was!

Holzchopf

Meisterpacker

BeitragSa, Nov 03, 2012 1:01
Antworten mit Zitat
Benutzer-Profile anzeigen
Du hast Post, Spion.

Ich sage das nicht SpionAtoms wegen, sondern vielmehr um die anderen Teilnehmer einzuschüchtern Twisted Evil
Erledige alles Schritt um Schritt - erledige alles. - Holzchopf
CC BY ♫ BinaryBorn - Yogurt ♫ (31.10.2018)
Im Kopf da knackt's und knistert's sturm - 's ist kein Gedanke, nur ein Wurm

Addi

 BeitragSa, Nov 03, 2012 11:49
Antworten mit Zitat
Benutzer-Profile anzeigen
Wie sieht es aus, wenn sich die exe selbst ausließt?
BP/B3D/BMax : Lerne Java : Früher mal Lite-C : Gewinner BCC 62

Vincent

 BeitragSa, Nov 03, 2012 11:51
Antworten mit Zitat
Benutzer-Profile anzeigen
Die klassische individuelle Farbtabelle ...

user posted image

Code: [AUSKLAPPEN]
Global a,b:Graphics 59*5,92*5,0,2:Dim p(21):Data $949963,$898246,$74552C,$5A6347,$000000,$5F371D,$46221C,$5B4D2C,$352021,$341518,$25111C,$3E2E29,$91622B,$BE923F,$1C0E1D,$C0AE64,$ECC565,$140A20,$434836,$261D28,$0A071C
For a=1 To 21:Read p(a) Next
M$="AABBBBBBBBBBBBBBBBBBBBBBBBBBCCCCDBBBBBBBBBBBBBBBBBBBBABBABAEBBBBBBBBBAAAABBBBBABAABBBCFFGGGGGGFHBBBABAAABBBBBBBABBBAAAAEBBABABBBAAAAAAAAABAAAABCFFCFFGGIIGGGIHBBAABBBBBBBAAAAABAAAAEAAAAAAAAAAAAAAAAAAAAABHFFCCFFFFGIJKJJKLBBAAAAABBAAAAAAAAAAAEAAAAAAAAAAAAAAAAAAAABHFCCMCCFFFGGIJKKKKLBAAAABBBBAAAAAAAAAAEAAAAAAAAAAAAAAAAAAAACFCMMNBMMCFGGIJKKKKOHAAAAAAAAAAAAAAAAAAEAAAAAAAAAAAAAAAAAAABFMNNPPNNNNMFFGIKKKKOOCAAAAAAAAAAAAAAAAAEAAAAAAAAAAAAAAAAAAAHCNPQQQQPNNNMFGIJKKKOOIBAAAAAAAAAAAAAAAAEAAAAAAAAAAAAAAAAAACFMNQQQQQQPNNMCFGJKOOOOODAAAAAAAAAAAAAAAAEAAAAAAAAAAAAAAAAAALFNPQQQQQQQPNMMCFIJKOOOOIAAAAAAAAAAAAAAAAEAAAPAPPAAAAAAAAAABGFNPQQQQQQPNNNMCFGJKKOOROBBBAABAAAAAAAAAAEAAAPPPPPAAAAAAAPBCGCNPPQQPQPPNNNMMCFJKKOOROSDBBBBAAAAAAAAAAEAAPAAAPPAAAPAPPPMFIMNPPPQQQPPNNNNNMFJKKOOOOLDDDDBAAAAAAAPAAEAAABBAAAPPPPPPPACGIMNPPPPQPPNNNNNBMFIKOOOOOIDDDDDBBBBAAAAAAEBBBBBBBBAPPPPPPACGIMNNNNPPNMMMMMMMCFIKKOOKOTSSDDDDDBDBAAAPPEBBDBDDDBBBAPPPABHFLCCMMMNNMCMMMCFFCFGJKOOOOOSSDDDDDDDBBAPPPEDDDDDDDBBDPPAAABFGLCCMFCNNMMNMFCCMMCGKTKROOKSSSSDDDDDDBAPPAEDDDDDDDBDBAADBABFGIMNNNNNPMMNNNMNNNCGKKOOKKOSSSSDDDDDDBAPPPEDDDDHDDDDDBDDDBCFGJNPPNNNNMNNNNPNNNCGKKKOOKOLSSSDDDDDDDAAAAEDDHSHDSSHHHHCSDHFJJMNPPPPNNNPQQQNNMFIKKKKOKKLSSSDDSDSSDBAAAEHDDHHDSSSSHHHSHHGGGCNPPPPPNNPPQPNMMFJKKTTOKKLDDDDDDDDDDDBAAEHDDDDSSSSSSSSSSLGGIFNPPNPNNNNPPNNMCGJKKTKOOKTSSSDDDDDDBBBAAEHHDDDDSSHHHHSSLLGGJFNNNNPNMMPPNNMMCGJKKTKOOKTLSSSSSSSSDDDDDEDHHSDDHDSHSHSSLLGJIGMNNNNCFCNNNNMCFGJKKTOTROTLLSSSSSSSSDDDDEHHHSDDSSSHSSSSLIIJIIMMNNNMMMNBNNMCFGJKKTKKOOILSSSSSSSSSSSSSESHHSDSHSHHHSSSSLIGGICNNMNMMCCMNNMCFGJKKKKOOOTLSSSSSSSSSDSDDEHHDHSSSSSSSSSSSLGGJIGMNPNNMMNNNBMCFGJKKKKOOTTLSSSSSSSSSSDDDEHHSSSSSSSSSSSHSLGGJJJFMNNMMMMMBMCFFGJKTKOOOKTLSSSSSSSSSSDSSEHHSHSSSSDDDDDDHHLIIJIJFNPQPNMMMCFFGJJKKKKKOTTLSSSDDDHSSSSSSESSSSSSSSSSSDHDDFLGGGGIIFNNNNMCCFFFGJJKKKKKOKTISSHDDDSSSSDDSESSSSSSSSSSDDDDDSGGJJJKJIFMMCCFFFGIGIJKKKKOOTKTSSSSDDSSDSSDSEHHSSSSSSHDDDDDDHLGJJJKKJILFFFFGLGGGGGJKKKOOKKTSSSSSSSSSSSSSEHDDDDDDDDDDDDDDDLIIJJJJJIICFFLLGGFFFFGJKKKOKKTLSSSSDSSSSSSSESSSSDDDDDDDDDDDDLIGGJJJIIGMMCHFFFFCCFGJJKKOKKKSSSSSSSHSSSSSESDDDDDDDDDDDDDDDSGGIGJIIIGCNMMCCCCCMCFGJJKKJKOTSHDDDDDDDDDDEDDDHDDHDDDDDDDDHSGJGGJIIGGCNNBMMMMMMMCGGJJJGKOKLLSSSHDDDDMBEDDCCHHHHSDCHDHHLLIIJJJIILHMNNNNBBNNNMMFGGGIFKOOKTLLLLHSLHBBEDCCCHHHHLLSLLLLLIIIJIIGFCBNNNNNNNNNNNMFGGGGGITKOILLLSLLLHCBECCCHHHHHLLLLLSLITIIIGGFMNNPPNNNNPPPNNNCFGFFFIIKKILSSDDDDBBBECCHFFCHHLLLILHLITIIGGCNNPPPPPPPPPPPNNNCFGFFGIIJKJLSHCBBBBBBECCCCCCCFLLLILLLTTIIGFNNPPQQQQQQQQQPNNNCFFFFGKIIIJILLHBBBBBBECCCCCCHFLFFILFGTTIIFCNPPQQQQQQQQQQQPNNCF"
m2$="FFGIKJIGIIILHCBBBBBECMCMCCFFFFFLFFITIIFFMPQQQQQQQQQQQQQPNMCFFFGJKIGFGGIILHCCCMBEMMMMMCCFFHHFFIKKIGFCNPQQQQQQQQQQQQPPNMFFFFGKJGFCFFIKIFCCBBBECMBMMMCHHCCFIKKIIFMMNQQQQQQQQQQQQQPPNMCFFFGGFFCCCFFIKTLFHCBEHHCBMMCCHCFITIIIGMMNQQQQQQQQQQQQQQQPNMCFFFCMMMMMCHFIITTIFFHEFFHCMMMCCCITTIIIFMNNQQQQQQQQQQQQQQQNNMCCCCCMMNMMHFLTKOTKIFFECCCHMCCMMFTTIITICNPQQQQQQQQQQQQQQQQNNMMCCMBMCFFGIITTTOTTTGFECCCCCCCMMITTIITGFMPQQQQQQQQQQQQQQQQPNNCCMCFGGIIKTKOOOOTTTTLEMCMMMMMCLTTTIIIGFCMNQQQPQQQQQQQQQQQNBMCFFGILIKKORRRRROTTTTTEMMMMMCHITTOTIIGFCCCCMNNPQQQQQQQQQQNMMCFGIIITOOTTORRRROTTTTTECMMCCCITITTIIILHCHCCCCCMBNPPQQQQPNMCCFGIITTTTLIITOORTTTTTTTEMMMCCHTLTTTIILHHHFFHCCCCMMMMMMMMMCCFHLITTTILLLLITORROTOTTTTEMMMMMHTLLTTTILHHHLFHFCCCCCCCCCCCCCFFLOOOTTILHLLITOOROOOTTTTEMMMMMFLLLTTLILHLHLLLFCCCCCCCCHHCHHLITORTIILHLLLIILIIIOTTTTTECCCCCLLTTTTIILLLLLLLLHCCCCHHHFHHHLTTOOOTILLLLLLHHFFLIITTTTTECCCCCGTTTTTTILLLILLLLHHHHHFFFHFLIITTOOTTIIITLLHHHFGGGITTTTTECCCFLLTTTTTTILLLILLLLHLHHHFLHHLLLTTOOKTIITTTLLFHFFFGITRTTTTEMMMCHLLLTTTTTLIIILLILLLLLLLHFHSLTTTOOTTITKKILFHFHFGIOROTTTIEMBMCSLITTTTTTLIIILITLLLLLLFFLHLITTOTTKTTKOILLFHFFGTROOOTTTLEBMMHLLTTTLTTTLILILITLLLLLLLFLLIIIOOTTOTOTTLLLLHFLKOOOOOTTTLEMMMLLLLLTTLTTLTTIIITLLLIILLFLLLITOOKOOTOTILLLLLGOOKOOTTTTTLECHSLTLLLLLTTTLTTIIITLLLILLLLLLLITKOOOTTOTIILIIITOOKOOOTTTTLEHLLTTTLLLLLTTTTTTITTIIILLLLLLLLTTTOOOOOOTIIIITKOOKKOKKTTTTTELITTTLLLLLLITTTTTTTTTIILLLLLLITTTTOOOORRTTIKTOOOOKKKOOOTTTTELLLLLLLLLLLLIIKTTTTTTITLLLLLLTTTTTTORRROOTIOROOOKKKOOKOTTTTELLLLLLLLLLLLIITTTTTTTTTLLLLLTTKTTTOORROOOTKRRRROKKOOOOOOTTTELLLLLLLFHHIIIITKTTTTTTIILLLITTTTTTOOROROOKRUUROKKKRROOOOTTTELLLFLLLLILLLIITTTTTTKTILLLTTTTOTTTTOTRROTORURROKKKKKKROOTTTEIIILITILLITIIIKOTTTTTTLLLLTTTTTTTTOOORROTRRRRRKKKKJJKOROTTTETITTIIILITTIITKOTTTKTIIIITTTTTTTOOOTORROORRRROOKOOJIKOORTTTELIFFFFFFGGITITKTTTOOTTTTIITTTOTOROOORRRRRRURRRKKKKKKKORROTTELFFCFGGFCFGTTTOTTTTTTTTTTTTTTOTOROOORRRRRRUUROKKKOOOORRRRTRELFFCGCCFFFGGITTTTTTTITTTTTOTTOOOOOORUURRRRRROOROKKKOOKORRTRELFFFMCFCCFCCLLHCCCLTTTTTTTTOOOOOTRRRURRRRRROROOOKKKOOOORRROELFCCCGCCHFMFMNPPNNNMCLTTOOORRORTORRRURRRRRRRRROKKJKORRRRRTOELFCFFCCGCFFMBNPPPNNNNMMHLTOOOOOTRRRRURRRRRRRROTKTTKORRRRTTTELFCLFCLHFFFMNNPPNNNNNNNNNCTOOTOORTRRUURRRRRRRRROOKKRRRTTRTTELLLFCGLFFLFMNNNNNNNNNNNNNNMFTRTRRRRRUUURRRRURRRROTKOOOTTTTTEIIILFLGFFLFCBNNNNNNNNNNNNNNNMHTRRRRUUUUURUUUUURRRKKRRRRRTTTETIIIGIGLLLFFMMMMMNNNNNNNNNNNNMMFIRUUUURURTIIOKKORROOORRTLTTERTTTIIIILILLFCCMMMNNNNNNNNNNNNNFLTOLFFLJGFCFFFFGGORRTTTTSLTEROTTTTTIITTLLLLHMMMNNNNNNNMMMNNMCMCCMMCCFFFCFFGFGJORRORTSTTERRRROOTTTTTTIFCMMMMMNNNNNNNCFCMNMCCFCCFFFFFFCFGGGGKRRRRRTRTERRTRRRROOTTHMMNNMMMMMMMMMMNNCFFMMMCCFFFFFFGFFFGGGGIORRRRORTETTOOOORROTMMMMNNMMMMMMMNMCMNNMFFFCCCFFFFFFFGGGFGGGGKRURURROEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE"

i=CreateImage(60,90)
SetBuffer ImageBuffer(i)

k = Len( M$ )
l = 1
For b=0 To 85
For a=0 To 59
   If l<=2500
      c=Asc(Mid$(M,l,1))-65
   Else
      c=Asc(Mid$(M2,l-2500,1))-65
   EndIf
   
   WritePixel a, b, p(c+1)
   l = l + 1
Next
Next

TFormFilter 1
ScaleImage i,5,5
Flip
DrawImage i,0,0
Color 255,255,255
Text 59*5/2,92*5-20,"Beliebige Taste drücken !",1
WaitKey()
End
Gott ist nicht mit uns ... weil er mit Idioten keine Gnade kennt !
 

#Reaper

Newsposter

BeitragSa, Nov 03, 2012 14:46
Antworten mit Zitat
Benutzer-Profile anzeigen
Aah.. moment mal! Very Happy
Wenn nur die exe standalone laufen muss, ist dann Incbin erlaubt? Very Happy Laughing Wink
AMD Athlon 64 3500+, ATI AX800 Pro/TD, 2048 MB DRR 400 von Infineon, ♥RIP♥ (2005 - Juli 2015 -> sic!)
Blitz3D, BlitzMax, MaxGUI, Monkey X; Win7

SpionAtom

 BeitragSa, Nov 03, 2012 15:28
Antworten mit Zitat
Benutzer-Profile anzeigen
Ich bitte darum auf incbin zu verzichten. Laughing

und denkt an exe und PM!
os: Windows 10 Home cpu: Intel Core i7 6700K 4.00Ghz gpu: NVIDIA GeForce GTX 1080

Gehe zu Seite 1, 2  Weiter

Neue Antwort erstellen


Übersicht Sonstiges Projekte

Nach Oben

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group