Das deutsche QBasic- und FreeBASIC-Forum

[Skilltronic]

Hallo

Ich möchte ein kleines, absolut sinnfreies Programm vorstellen, das ich eben mit QB zusammengeschustert habe. Es liest EAN13-Barcodes von Bildern aus.

Da die Erkennung noch nicht sehr ausgereift ist, müssen die Bilder einige Bedingungen erfüllen.

- Es müssen Bitmap-Dateien mit 256 Graustufen sein

- Sie sollten mindesten ca. 200 Pixel in der Breite und 10 in der Höhe haben

- Im Bildausschnitt darf nur der Barcode zu sehen sein.

- Die maximale Grösse beträgt 640x200 Pixel. Innerhalb dieser Grenzen ist man aber relativ frei und auch eine leichte Schrägstellung macht nichts. Es darf aber nicht auf dem Kopf stehen.

Also z.B. aus so einem Ausgangsfoto



muss man so etwas machen, damit das Programm damit arbeiten kann.



Der Sourcecode ist noch recht katastrophal, deshalb gibt's erst mal nur die .exe zum runterladen. Die ZIP-Datei enthält dazu noch ein paar Testbilder.

Download (ca. 500kB).

Würde mich freuen, wenn der eine oder andere es mal mit eigenen Fotos ausprobiert und vom Ergebnis berichtet. Ist alles noch etwas primitiv und funktioniert nur mit den 13-Stelligen Codes, mir geht es aber hauptsächlich um die Funktion. Wie gesagt, hat eigentlich keinen tieferen Sinn.

Gruß
Skilltronic
_________________
Elektronik und QB? www.skilltronics.de !

[Mao]

Hallo Skilltronic!

Das Programm ist durchaus interessant. Tests bei mir verliefen mal positiv, mal negativ.
Bei einem Bild stürzte mir das Programm mit "Index außerhalb des Bereichs" (hieß glaub ich so) ab. Bei anderen wurde es erkennt, manchmal aber die letzten paar Ziffern nicht.

Trotzdem gute Arbeit!
_________________
Eine handvoll Glück reicht nie für zwei.
--

[Skilltronic]

Hallo Mao,

danke für die Antwort. Könntest Du mir evtl. die Bilder schicken, die nicht funktionieren? Mal sehen, ob ich den Fehler finde.

Meine Mailadresse: skillfinger@gmx.de

Gruß
Skilltronic
_________________
Elektronik und QB? www.skilltronics.de !

[Mao]

Natürlich, Mail sollte in den nächsten 10 Minuten da sein.

/edit:
Sollte da sein.
Wie in der Mail geschrieben; teilweise musste ich die BMP's nochmal erstellen (da wieder gelöscht). Die anderen Bilder erkannte das Programm dann doch ohne Probleme! (Wahrscheinlich ein Fehler meinerseits (von wem auch sonst).)
_________________
Eine handvoll Glück reicht nie für zwei.
--

[Skilltronic]

Super, vielen Dank für Deine Mühe!

Ich denke, es liegt bei den Bildern, die nicht gehen, an der ungleichmässigen Helligkeit. Die weißen Streifen auf der linken Seite sind fast so dunkel, wie die schwarzen auf der rechten, da kommt die automatische Kontrasteinstellung ins schleudern. Ich habe aber schon eine Idee für eine entsprechende Verbesserung. Das es sich aufhängt sollte natürlich trotzdem nicht sein. Mal sehen, was ich da machen kann. Als erstes vielleicht ne Fehlermeldung "unzureichende Bildqualität" oder so. Ich arbeite dran...

Gruß
Skilltronic
_________________
Elektronik und QB? www.skilltronics.de !

[Sebastian]

Hallo,

das Programm funktioniert bestens! Alle meine 3 Testbilder (ZIP-Download) wurden ohne Fehler ausgelesen - wirklich eine prima Sache! Wenn der Quellcode "verschönert" wurde, bekommen wir den aber auch mal zu sehen, oder? Würde mich sehr interessieren, wie das gemacht wird.

Viele Grüße!
Sebastian
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!

[Mao]

Ja, halt wie geschrieben, die Beleuchtung war sehr unpraktisch...das Licht kam von der rechten Seite. Deswegen auch dieser "Farbverlauf".
_________________
Eine handvoll Glück reicht nie für zwei.
--

[King-01]

Tolles programm

wie sieht der quellcode eigentlich aus?
_________________
[quote="IRC"](22:41:56)<PMedia>Jojo, hats nen Grund warum wir chatten obwohl du grad neben mir sitzt?
...
(23:00:59)<PMedia>USB war erst als Waffe geplant[/quote]

[Skilltronic]

Hallo

@Sebastian: Auch Dir Danke fürs Testen und das Hochladen der entsprechenden Bilder.

@Mao: Es liegt wohl wirklich am Helligkeitsverlauf wie man hier schön sehen kann:



Das sind die Helligkeitswerte von "schoko2.bmp". Wie man sieht, liegen manche Minima auf der selben Höhe wie andere Maxima. Aber dieses Problem hat mich auf eine ganz neue Art der Auswertung gebracht, die ich mal ausprobieren will. War also trotzdem sehr hilfreich.

@King-01: Quellcode kommt, wenn er vorzeigbar ist

Gruß
Skilltronic
_________________
Elektronik und QB? www.skilltronics.de !

[Mao]

Huch, wie hast du denn das Diagramm erstellt?
X-Koordinate=X-Koordinate im Bild?
Y-Koordinate=Durchschnittliche Helligkeit auf Y-Koordinate?

Schön auf jeden Fall, wenn's doch was geholfen hat!
_________________
Eine handvoll Glück reicht nie für zwei.
--

[Skilltronic]

[Michael Frey]

Bitte Werte Parameter aus die übergeben werden, ich gebe nicht gerne Dateinamen ein.

Frage:
Kannst du bitte auch ein Programm schreiben, das eine Zahlenfolge in EAN-13 Umwandelt?

Dann kann man selber solche Codes drucken, Fotografieren und wieder Zurück verwandeln und damit hätte das auswerten einen Sinn

Edit:
Hab jetzt 2 Bilder gemacht und ausprobiert und es klappt recht gut.
Was ich noch nicht raus habe ist, wie ich 256 Bit Graustuffen Bitmaps erzeuge.
Ich hab's drum so gemacht: Mit Paint Shop Pro 4 zugeschnitten, in Graustuffen umgewandelt und dann mit MS Paint als 256-Farbbitmap gespeichert.
Es geht, aber ich glaube das ist nicht im Sinne des Erfinders.
_________________
http://de.wikibooks.org/wiki/FreeBasic Jede Hilfe für dieses Buch ist Willkommen!
http://de.wikibooks.org/wiki/FreeBasic:_FAQ FAQ zu Freebasic (im Aufbau, hilfe Willkommen)
Neu mit Syntax Highlight

[Mao]

Wenn ich in GIMP das Bild in Graustufen konvertiere haut's automatisch eine 256-Bitmap raus.
_________________
Eine handvoll Glück reicht nie für zwei.
--

[Jojo]

@Michael Frey: Dann empfehle ich das kostenlose Programm PhotoFiltre. wandle dort das bild in 256 graustufen um (9. symbol in toolbar). gehe dort auf system -> grauwert 256 farben.
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.

[Skilltronic]

Hallo

[King-01]

Ich benutze auch nicht gern Paramenter.
Extra die Eingabeaufforderung starten, in den pfad gehen....
_________________
[quote="IRC"](22:41:56)<PMedia>Jojo, hats nen Grund warum wir chatten obwohl du grad neben mir sitzt?
...
(23:00:59)<PMedia>USB war erst als Waffe geplant[/quote]

[Jojo]

schonmal was von verküpfungen gehört?
auf der eingabe-aufforderung musst du's ja auch immer wieder neu eintippen, wenn du eine verknüpfung erstellst (oder Maos tolles parameter-programm ), ist das einmalt getippt...
_________________
» Die Mathematik wurde geschaffen, um Probleme zu lösen, die es nicht gäbe, wenn die Mathematik nicht erschaffen worden wäre.

[Sebastian]

Ich denke, dass mit Parameter an dieser Stelle keine steuernden Kommandozeilenparameter wie bei fbc.exe gemeint sind, sondern die Funktionalität, dass man eine Datei einfach auf die EXE via Drag&Drop draufzieht und diese dann geöffnet wird. Das Programm wird dabei gestartet und der Dateiname der draufgezogenen Datei steht in Anführungszeichen in COMMAND$ und kann daraus gelesen werden. So erspart man sich die Tastatureingaben.
_________________

Die gefährlichsten Familienclans | Opas Leistung muss sich wieder lohnen - für 6 bis 10 Generationen!

[Jojo]

[Mao]

@Jojo:
Hey, da erinnert sich ja doch noch einer dran.
_________________
Eine handvoll Glück reicht nie für zwei.
--