TSCLIB.DLL w
TSCLIB.DLL eAwXLX{C
1. openport(a)
: wqX
:
a: CLAwLX{WAp
YsLAAwA|@LWAp
\\SERVER\TTP243
2. closeport()
: wqX
: L
3. setup(a,b,c,d,e,f,g)
: ]weBBCLtBCL@BPOB
)
gap/black mark Z
ZB
:
a: rOA]weA
b: rOA]wA
c: rOA]wCLtA
mm
mm
(CLtHPP
1.0: C 1.0 TCLt
1.5: C 1.5 TCLt
2.0: C 2.0 TCLt
3.0: C 3.0 TCLt
4.0: C 4.0 TCLt
6.0: C 4.0 TCLt
8.0: C 4.0 TCLt
10.0: C 4.0 TCLt
: TSC CLEVER TTP-243
:
gap/black mark
)
d: rOA]wCL@A
0~15ArUjCLGU
e: rOA]wPO
0 ZP
1 P
(gap sensor)
(black mark sensor)
f: rOA]w
g: rOA]w
gap/black mark ZA
gap/black mark ZA
: mm
: mmAY@
]
0
4. clearbuffer()
: M
: L
5. barcode(a,b,c,d,e,f,g,h,I)
: XXCL
:
a: rOAX
X V_lIAHI (point)C
(200 DPIA1 I=1/8 mm, 300 DPIA1 I=1/12 mm)
b: rOAX
Y V_lIAHI (point)C
(200 DPIA1 I=1/8 mm, 300 DPIA1 I=1/12 mm)
c: rOA
128
128M
EAN128
25
25C
39
39C
93
EAN13
EAN13+2
EAN13+5
EAN8
EAN8+2
EAN8+5
CODA
POST
UPCA
UPCA+2
UPCA+5
UPCE
Code 128, switching code subset A, B, C
automatically
Code 128, switching code subset A, B, C
manually.
Code 128, switching code subset A, B, C
automatically
Interleaved 2 of 5
Interleaved 2 of 5 with check digits
Code 39
Code 39 with check digits
Code 93
EAN 13
EAN 13 with 2 digits add-on
EAN 13 with 5 digits add-on
EAN 8
EAN 8 with 2 digits add-on
EAN 8 with 5 digits add-on
Codabar
Postnet
UPC-A
UPC-A with 2 digits add-on
UPC-A with 5 digits add-on
UPC-E
UPCE+2
UPCE+5
UPC-E with 2 digits add-on
UPC-E with 5 digits add-on
d: rOA]wXAHI
e: rOA]wO_CLXX
0: CLX
1: CLX
f: rOA]wX
0:
90:
180:
270:
0
90
180
270
g: rOA]wX
h: rOA]wX
I: rOAXe
bar ]lA
bar ]lA
TSPL U
TSPL U
6. printerfont(a,b,c,d,e,f,g)
: XrCL
:
a: rOAr
X V_lIAHI (point)C
(200 DPIA1 I=1/8 mm, 300 DPIA1 I=1/12 mm)
b: rOAr
Y V_lIAHI (point)C
12 C
(200 DPIA1 I=1/8 mm, 300 DPIA1 I=1/12 mm)
c: rOArWA@
1: 8*/12 dots
2: 12*20 dots
3: 16*24 dots
4: 24*32 dots
5: 32*48 dots
TST24.BF2: c
TST16.BF2: c
TTT24.BF2: c
TSS24.BF2:
TSS16.BF2:
K:
L:
24*24
16*16
24*24 (qHX)
24*24
16*16
24*24
16*16
d: rOA]wr
0:
0
90:
180:
270:
90
180
270
e: rOA]wr
f: rOA]wr
g: rOACLre
X VjvA
X VjvA
1~8
1~8
7. sendcommand(command)
: eOXL
: O
TSPL
8. printlabel(a,b)
: CLe
:
a: rOA]wCL
b: rOA]wCL
9. downloadpcx(a,b)
PCX L
:U
:
a: rOAW
b: rOAULOW
10. formfeed()
: Ab
: L
11. nobackfeed()
: ]wi^R
: L
(set)
(copy)
(i]t| )
(jgW
)
setup
12. windowsfont(a,b,c,d,e,f,g,h)
Windows TTF rCLr
:
:
a: OAr
b: OAr
c: OArAHI
d: OAAfV
X V_lIAHI (point)C
Y V_lIAHI (point)C
(point)C
0 -> 0 degree
90-> 90 degree
180-> 180 degree
270-> 270 degree
e: OAr~
0->
1->
2->
3->
f: O
(Normal)
(Italic)
(Bold)
(Bold and Italic)
, u
0-> Lu
1-> [u
g: rOArWCp
h: rOACLreC
13. about()
DLL X
:
: L
: Arial, Times new Roman, W
,
Visual Basic 5.0, 6.0 for Win95, 98 d
Private Declare Sub openport Lib "c:\windows\system\tsclib.dll" (
ByVal PrinterName As String)
Private Declare Sub closeport Lib "c:\windows\system\tsclib.dll" ()
Private Declare Sub sendcommand Lib "c:\windows\system\tsclib.dll" ( _
ByVal command As String)
Private Declare Sub setup Lib "c:\windows\system\tsclib.dll" ( _
ByVal LabelWidth As String, _
ByVal LabelHeight As String, _
ByVal Speed As String, _
ByVal Density As String, _
ByVal Sensor As String, _
ByVal Vertical As String, _
ByVal Offset As String)
Private Declare Sub downloadpcx Lib "c:\windows\system\tsclib.dll" ( _
ByVal Filename As String, _
ByVal ImageName As String)
Private Declare Sub barcode Lib "c:\windows\system\tsclib.dll" ( _
ByVal X As String, _
ByVal Y As String, _
ByVal CodeType As String, _
ByVal Height As String, _
ByVal Readable As String, _
ByVal rotation As String, _
ByVal Narrow As String, _
ByVal Wide As String, _
ByVal Code As String)
Private Declare Sub printerfont Lib "c:\windows\system\tsclib.dll" ( _
ByVal X As String, _
ByVal Y As String, _
ByVal FontName As String, _
ByVal rotation As String, _
ByVal Xmul As String, _
ByVal Ymul As String, _
ByVal Content As String)
Private Declare Sub clearbuffer Lib "c:\windows\system\tsclib.dll" ()
Private Declare Sub printlabel Lib "c:\windows\system\tsclib.dll" ( _
ByVal NumberOfSet As String, _
ByVal NumberOfCopy As String)
Private Declare Sub formfeed Lib "c:\windows\system\tsclib.dll" ()
Private Declare Sub nobackfeed Lib "c:\windows\system\tsclib.dll" ()
Private Declare Sub windowsfont Lib "c:\windows\system\tsclib.dll" ( _
ByVal X As Integer, _
ByVal Y As Integer, _
ByVal fontheight As Integer, _
ByVal rotation As Integer, _
ByVal fontstyle As Integer, _
ByVal fontunderline As Integer, _
ByVal FaceName As String, _
ByVal TextContent As String)
Private Sub Command1_Click()
Call openport(“TSC CLEVER TTP-243”)
‘Call openport(“\\server\TTP243”)
Call setup("100", "100", "3", "10", "0", "0", "0")
Call clearbuffer
Call downloadpcx("c:\UL.PCX", "UL.PCX")
Call printerfont("10", "10", "4", "0", "1", "1", "TEST PRINTOUT")
Call barcode("10", "80", "39", "96", "1", "0", "2", "4", "0987654321")
Call sendcommand("PUTPCX 100,250,""UL.PCX""")
Call sendcommand("BAR 400,200,300,100")
Call sendcommand("BOX 10,300,300,300,5")
Call windowsfont(10, 500, 80, 0, 0,0, "
Call printlabel("1", "1")
Call closeport
End Sub
", "r
")
FoxPro d
declare openport in c:\windows\system\tsclib.dll string
declare closeport in c:\windows\system\tsclib.dll
declare sendcommand in c:\windows\system\tsclib.dll
declare setup in c:\windows\system\tsclib.dll
string,string,string,string,string,string,string
declare downloadpcx in c:\windows\system\tsclib.dll
string, string
declare barcode in c:\windows\system\tsclib.dll
string,string,string,string,string,string,string,string,string
declare printerfont in c:\windows\system\tsclib.dll
string,string,string,string,string,string,string
declare clearbuffer in c:\windows\system\tsclib.dll
declare printlabel in c:\windows\system\tsclib.dll string,string
declare formfeed in c:\windows\system\tsclib.dll
declare nobackfeed in c:\windows\system\tsclib.dll
declare windowsfont in c:\windows\system\tsclib.dll
integer,integer,integer,integer,integer,integer,integer,string,strin
g
openport(“TSC CLEVER TTP-243”)
setup("32","25","2","10","0","0","0")
clearbuffer()
barcode("10","0","EAN13","80","1","0","2","4","123456789012")
windowsfont(10,100,50,0,0,0,"
printlabel("1","1")
closeport()
","r
")