UBI EasyCoder 201 IIE Manuel d'instructions télécharger pdf (Page 144)

Intermec Fingerprint v7.61 – Programmer’s Reference Manual Ed. 7142

Chapter 2 Program Instructions

LAYOUT, cont.

Example

Note that the 10 characters available to deﬁ ne a font in the LAYOUT statement in most cases cannot

accommodate modern outline font names. Instead, use font aliases as described in Chapter 6. In the

example below, the font aliases are indicated by lowercase italic typing (lines 90–120, 150).

10 DIM QERR%(10)

20 LAYDATA$(0)="01DAY"

30 LAYDATA$(1)="04123456789012"

40 QERR%(0)=0

50 OPEN "tmp:LOGNAME.DAT" FOR OUTPUT AS 19

60 PRINT# 19,"DIAMONDS.1";

70 CLOSE 19

80 OPEN "tmp:LAYOUT.DAT" FOR OUTPUT AS 6

90 PRINT# 6,"01C11100 10 font alias 00I 11 ";

100 PRINT# 6,"01C11100 40 font alias 00 22 ";

110 PRINT# 6,"01C11100 100 font aliasWEDNES 06I 11 ";

120 PRINT# 6,"01C11100 130 font aliasSATURNUS 05I 11 ";

130 PRINT# 6,"02L11300 70 1 33 ";

140 PRINT# 6,"03S11100 210 300 3 ";

150 PRINT# 6,"04H1 font alias ";

160 PRINT# 6,"04B14100 300 EAN13 0 312 100";

170 CLOSE 6

180 LAYOUT "tmp:LAYOUT.DAT","tmp:LOGNAME.DAT",LAYDATA$,QERR%

190 IF QERR% (1) = 0 THEN GOTO 260

200 PRINT "-ERROR- LAYOUT 1"

210 I%=0

220 IF QERR%(I%)=0 THEN GOTO 260

230 PRINT " ERROR ";QERR%(I%+1);" in record ";QERR%(I%)

240 I%=I%+2

250 GOTO 220

260 PRINTFEED

1 2 ... 139 140 141 142 143 144 145 146 147 148 149 ... 331 332

Pas de commentaire

UBI EasyCoder 201 IIE Manuel d'instructions Page 144