B4A Class Bluetooth ESC/POS Printer Class

agraham · Jun 8, 2019

For the last couple of weeks I have been playing with an 80mm Bluetooth ESC/POS thermal printer I bought off eBay, new and delivered, for the ludicrously cheap price of £20. While the print quality, particularly of images with large areas of black (they are gray due to power supply or thermal dissipation limitations probably), is not great it is adequate. The printer itself seems to be a generic Chinese unit (no surprise there then!) which is re-badged by all and sundry and sold at a remarkably wide range of prices.

Here then is a Printer class that will connect by Bluetooth to the printer and enable access to most of the printer functions, including barcodes and image preparation and printing. The included demo shows the capabilities that are available. To run the demo you will need a paired Bluetooth printer that is switched on. The Printer class uses the BitmapCreator, RandomAccessFile and Serial libraries.

On my printer the only thing that doesn't seem to work properly is QR code generation. Small QR codes don't seem to be able to be decoded by scanners and larger ones look obviously wrong with part of the top of the code replicated at the bottom when printed.

The obvious capabilities missing (so far!) are user defined characters and non-volatile bit images. Also not implemented are some codes that are either duplicates of available commands or ones whose functions I don’t understand.

The class module is included as source code in the demo so you can add any missing capabilities you need. If you add a significant one then please post it for others to play with.

EDIT: Version 2 now posted includes support for creating custom characters. See post #5 for details

aeric · Mar 16, 2024

vecino said:
?

Try clean the project and try again.
I put a Log(Success) after the line, it returns true. But I think this is wait for user answer is completed, not printer is connected.

vecino · Mar 16, 2024

I have come up with something like this, it looks like it might work for what I need.
I don't know if that loop can bring any problems.

B4X:

iConnected = -1
Printer1.Connect                  
Do While iConnected = -1
  Sleep(0)
Loop

If iConnected=1 Then
  PrintDocu
Else
  ToastMessageShow("Printer Not connected",False)
End If
         

Sub Printer1_Connected( Success As Boolean )
    If Success Then iConectada=1 Else iConectada=0
End Sub

Xfood · Mar 16, 2024

I believe if you have any problems, you may never get out of this cycle,
if you really want to use this method I would do something like this to establish a maximum time for the possible exit.

B4X:

iConnected = -1
Dim now As Long =DateTime.now
Printer1.Connect                 
Do While iConnected = -1
  Sleep(0)
If DateTime.now-now>=1000 Then Exit   ' whatever you want'
Loop

vecino · May 17, 2024

Hello, I have a question:
In the example program included with the library a reset (printer1.Reset) is done just before printing a text, before printing a barcode, before printing an image, etc.
Is that something necessary, why is it done?
Thank you very much.

agraham · May 17, 2024

It's done as an easy way to reset the printer to a default state so that any setup done for the previous demo/test will be reset for the next one.

Luis Caballero · Jun 5, 2024

Good morning, with what code could automatic paper cutting be carried out after a printing operation? Thank you

agraham · Jun 5, 2024

[Name] Select cut mode and cut paper
[Format] ①ASCII GS V m ② ASCII GS V m

①ASCII GS V m
Hex 1D 56 m
Decimal 29 86 m

②ASCII GS V m n
Hex 1D 56 m n
Decimal 29 86 m n

[Range] ① m= 1,49 ② m=66 , 0 <= n <= 255
[Description] Selects a mode for cutting paper and executes paper cutting.

The value of m selects the mode as follows:
1, 49 Partial cut(one point center uncut)
66 Feeds paper(cutting position + [n x(vertical motion unit)]) , and cuts the paper partially(one point center uncut)

[Details for①and②]
·This command is effective only processed at the beginning of a line.

[Note for ①]
·Only the partial cut is available; there is no full cut.

f0raster0 · Jun 6, 2024

Luis Caballero said:
Good morning, with what code could automatic paper cutting be carried out after a printing operation? Thank you

yes, if your printer support cutting the paper.
I use: Chr(48) = cut the paper
Printer1.WriteString(Chr(48)& CRLF)

cwt · Jun 11, 2024

The example works fine for me - connects to the printer and prints as expected with no errors.

When I add the printer code to my app, I get the below error when attempting to connect to the printer, on same device and printer where the example works:

escposprinter_connect (java line: 247)
java.lang.NullPointerException: Attempt to invoke virtual method 'void anywheresoftware.b4a.BA.setLastException(java.lang.Exception)' on a null object reference
at ikonpro.android.escposprinter._connect(escposprinter.java:247)
at ikonpro.android.sale_new$ResumableSub_B4XPage_MenuClick.resume(sale_new.java:415)
at ikonpro.android.sale_new._b4xpage_menuclick(sale_new.java:304)
at java.lang.reflect.Method.invoke(Native Method)
at anywheresoftware.b4a.BA.raiseEvent2(BA.java:221)
at anywheresoftware.b4a.BA$1.run(BA.java:360)
at android.os.Handler.handleCallback(Handler.java:958)
at android.os.Handler.dispatchMessage(Handler.java:99)
at android.os.Looper.loopOnce(Looper.java:205)
at android.os.Looper.loop(Looper.java:294)
at android.app.ActivityThread.main(ActivityThread.java:8376)
at java.lang.reflect.Method.invoke(Native Method)
at com.android.internal.os.RuntimeInit$MethodAndArgsCaller.run(RuntimeInit.java:640)
at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:982)

The crash happens on this line: PairedDevices = Serial1.GetPairedDevices

in the EscPosPrinter module sub: Public Sub Connect As Boolean

I can see no difference between the example app and my app, other than my app is B4XPages and not Activities.

agraham · Jun 12, 2024

Difficult to say without any code but the problem lies outside the EscPos and Serial libraries so I suspect you are calling Connect too early in the process of setting up the single Activity of your B4XPages app. Check your program flow.

cwt · Jun 12, 2024

Actually, I am using your example almost verbatim in my own code. I call Connect from the title bar menu just as your example does. So the B4XPage has already loaded and displayed.

agraham · Jun 12, 2024

Your B4XPage_MenuClick event appears to be a Resumable Sub, my mnuConnect_Click event isn't - I still think its something to do with your program flow.

cwt · Jun 12, 2024

I had not done Printer1.Initialize prior to calling Connect (stupidly). Now I just need to get Bluetooth permissions working but the permissions are not as easy as I expected.

JoshuaBradbury · Sep 11, 2024

@agraham
I'm trying to get one of these printers to work. I have downloaded your folder in the pinned post and I'm trying to get it to run. It connects to the printer but then doesn't print, any ideas/suggestions?

The only change that I've made to your code is the codepage.

nakuable · May 6, 2025

agraham said:
For the last couple of weeks I have been playing with an 80mm Bluetooth ESC/POS thermal printer I bought off eBay, new and delivered, for the ludicrously cheap price of £20. While the print quality, particularly of images with large areas of black (they are gray due to power supply or thermal dissipation limitations probably), is not great it is adequate. The printer itself seems to be a generic Chinese unit (no surprise there then!) which is re-badged by all and sundry and sold at a remarkably wide range of prices.

Here then is a Printer class that will connect by Bluetooth to the printer and enable access to most of the printer functions, including barcodes and image preparation and printing. The included demo shows the capabilities that are available. To run the demo you will need a paired Bluetooth printer that is switched on. The Printer class uses the BitmapCreator, RandomAccessFile and Serial libraries.

On my printer the only thing that doesn't seem to work properly is QR code generation. Small QR codes don't seem to be able to be decoded by scanners and larger ones look obviously wrong with part of the top of the code replicated at the bottom when printed.

The obvious capabilities missing (so far!) are user defined characters and non-volatile bit images. Also not implemented are some codes that are either duplicates of available commands or ones whose functions I don’t understand.

The class module is included as source code in the demo so you can add any missing capabilities you need. If you add a significant one then please post it for others to play with.

EDIT: Version 2 now posted includes support for creating custom characters. See post #5 for details

Hi, first, I apologize for reviving an old post and thanks you @agraham for the class.

I'm ussing in my project and it work very well, but i'm trying print NV logo, but i can't.

Please, can you help me?

I tried some ESC/POS commands, and generary some character is printed in to the ticket. So, I think that I'm do any bad.

Thank you very much in advanced.

Best regards.

nakuable · May 6, 2025

nakuable said:
Hi, first, I apologize for reviving an old post and thanks you @agraham for the class.

I'm ussing in my project and it work very well, but i'm trying print NV logo, but i can't.

Please, can you help me?

I tried some ESC/POS commands, and generary some character is printed in to the ticket. So, I think that I'm do any bad.

Thank you very much in advanced.

Best regards.

Hi Friends, I solved my issue.

Finally I add this function and work well for me with 3 different printers and logo in NVRam

B4X:

'--------------
' Print Memory Logo
'--------------

Public Sub PrintMemoryLogo()
    Dim cmd(4) As Byte
    cmd(0) = 28     ' FS
    cmd(1) = 112    ' "p"
    cmd(2) = 1      ' n = número de imagen
    cmd(3) = 0      ' m = modo de impresión normal
    WriteBytes(cmd)
End Sub

B4A Class Bluetooth ESC/POS Printer Class

Attachments

aeric

Expert

vecino

Well-Known Member

Xfood

Expert

vecino

Well-Known Member

agraham

Expert

Luis Caballero

Member

agraham

Expert

f0raster0

Well-Known Member

cwt

Active Member

agraham

Expert

cwt

Active Member

agraham

Expert

cwt

Active Member

JoshuaBradbury

Member

nakuable

Member

nakuable

Member

Similar Threads

B4A Class Bluetooth ESC/POS Printer Class

Attachments

Expert

Well-Known Member

Expert

Well-Known Member

Expert

Member

Expert

Well-Known Member

Active Member

Expert

Active Member

Expert

Active Member

Member

Member

Member

Similar Threads

Privacy & Transparency

Privacy & Transparency