
21-66
Example
VISSCREEN 1,0,1 '
VISCLS '
WINDMAKE R,1,512,480,0,2 'Sets window 1 to a rectangle.
CAMIN 1 'Obtains a camera image from storage memory.
VISPLNOUT 0 '
VISREADQR 1,0,0,0 'Reads the QR code.
I1 = VISSTATUS(0) '
VISPRINT I1, VISSTATUS(1) '
IF I1 = 0 THEN '
VISLOC 10,10 '
VISPRINT VISGETSTR(1, VISSTATUS(1))
'
END IF '
VISCAMOUT 1 '
Komentarze do niniejszej Instrukcji