CAB Apollo 1 Instrukcja Operatora Pobierz pdf (Strona 236)

236 cab Produkttechnik GmbH & Co KG

236

PRODUCT MARKING AND BARCODE IDENTIFICATION

Hermes

Apollo

A-series

This

function is

available

for:

[TABLE OF CONTENTS]

[COMMAND LIST][INDEX][ESC][i][L][S]

Small program to show ON GOSUB. Uses ASCII dump mode to show what happens:

<ABC>

for number=0 to 6

on number+1 gosub sorry,one,two,three,four,five,sorry

next number

end

label sorry:print „; Sorry, can’t convert „,number:return

label one:print „; 1=one“:return

label two:print „; 2=two“:return

label three:print „; 3=three“:return

label four:print „; 4=four“:return

label five:print „; 5=five“:return

</ABC>

Small program to show READ,DATA and RESTORE. Uses ASCII dump mode to show what happens:

<ABC>

restore names

read maxnum

dim names$(maxnum)

for a=1 to maxnum:read names$(a):next a

for number=0 to 10

if (number>=1 and number<=maxnum) then

print „; „,number,“=“,names$(number)

else

print „; Sorry, can’t convert „,number

endif

next number

error „Program finished“

label names

data 9,“one“,“two“,“three“,“four“,“five“,“six“

data „seven“,“eight“,“nine“

</ABC>

Small program for measuring the label length:

<ABC>

REM read measured length

dy=PEEK(„mlength“)

IF dy>0 BREAK

PRINT „f“

WAIT 0.25

REM wait until standing again REPEAT

UNTIL (PEEK(„direction“)=0)

LOOP

PRINT „J“

PRINT „S l1;0,0,“,dy-2,“,“,dy,“,100"

PRINT „T 0,10,0,3,5;Measured length: „,dy,“mm“

PRINT „A 1“

</ABC>

1 2 ... 231 232 233 234 235 236 237 238 239 240 241 ... 254 255

Komentarze do niniejszej Instrukcji

Brak uwag

CAB Apollo 1 Instrukcja Operatora Strona 236

Komentarze do niniejszej Instrukcji

Powiązane produkty i podręczniki dla Drukarki etykiet CAB Apollo 1