Thread Druckersteuerung mit ESC-Sequenzen (2 answers)
Opened by Jiep1963 at 2010-09-23 20:27

Jiep1963
 2010-09-23 20:27
#141513 #141513
User since
2008-08-20
37 Artikel
BenutzerIn

user image
Hi Forumianer,

* Google'n brachte nichts (woebei ich wegen meinem schlechten Englisch auf Deutsche Infos angewiesen bin) -
* Mit Coding rumexperementieren brachte nichts -
* Hier in der Forum-Historie habe ich auch nichts gefunden.

Aufgabe: Ich will einen OKI 24 Nadeldrucker mit ESC-Steuersequenzen Befehel erteilen.

Ziel: Es müssen Lotto-Tickts mit Seriencode: Seriennummer in normalen nummerischen Zahlen + Klötzen-Code für OMR Lesegerät (vergleichbar mit Lochkartensystem) und Bar-Code gedruckt werden.

Das Ergebnis meiner eigenen Bemühungen ist niederschmettern.
Nachfolgend habe ich den Code aufgeführt der zwar alle String aber keine Steuerzeichen druckt.

Ich bin sehr dankbar für einen Hinweis, der mir zum Einstieg verhilft !!!

LG Achim

---------------------------

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50

#! /usr/bin/perl
#####################################################################
# 
# Test-Programm
# Sende Steuersequenzen zum Oki-Drucker
# 
# OS...: Linux  : > OpenSUSE 10.0, 2.6.13-15-default
# Tools: Perl   : > 5.8.7
# HW...: Drucker: OKI Microline 591
# 
##################################################################ap#

# OKI-Handbuch
# 27 = ESC, 103 =  g >> Seite 14-2, Druckmodi 15 cpi
# 27 = ESC,  14 = SO >> Seite 14-3, Horizontal, doppelte Breite eine Zeile

# 27 = ESC,  45 = -, 49 =   1 = Seite 14-6, Start Unterstreichen
# 27 = ESC,  45 = -, 48 =   0 = Seite 14-6, Stopp Unterstreichen

# Perl-Buch
# sprintf   >> Seite 135, Formatierte Ausgabe
# %c        >> Seite 137, ein Zeichen (ASCII) :: Eine Zahl wird übergeben, %c wandelt daraus ein ASCII = einen Druckerbefehl
# %s        >> Seite 137, ein String          :: Zahlen Text ....
# \n        >> Zeilenschaltung

#$Strg1   = "unterstrichen";
#$Strg2   = "und wieder normal";
#$fett_on = sprintf( "%c%c%c", 27, 45, 49);
#$fett_of = sprintf( "%c%c%c", 27, 45, 48);

#open( LPR, "|lpr -P OKI" );

#print LPR ( "$fett_on$Strg1$fett_of $Strg2\n" );
#print "<$fett_on>\n";
#print "<$fett_of>\n";
#print      ( "$fett_on$Strg1$fett_of $Strg2\n" );
#printf( "<%d>\n", 0x033 );

open( LPR, "|lpr -P OKI" );

for( $i = 0 ; $i < 255 ; $i++ )
   {
   printf "%c ! %c <ESC ! <%d>> wählt diese Kombination\n", 27, $i, $i ;
   #printf "\e!%c <ESC ! <%d>> wählt diese Kombination\n", $i, $i ;
   }
   
close( LPR );

1;
#EOF

View full thread Druckersteuerung mit ESC-Sequenzen