EasyManuals Logo

Radio Shack Quick Printer II Operation Manual

Radio Shack Quick Printer II
169 pages
To Next Page IconTo Next Page
To Next Page IconTo Next Page
To Previous Page IconTo Previous Page
To Previous Page IconTo Previous Page
Page #148 background imageLoading...
Page #148 background image
Computer
Graphics
Operation
Manual
----------TRS·BO
®
----------
SUBROUTINE
PPTST
PSET
AND
POINT
TEST
LOGICAL
POINT,MSG(21)
CALL
CLS
ENCODE(MSG,l.0'.0')
FORMAT('PSET
AND
POINT
TEST')
CALL
SETXY(.0',~)
CALL
LOCATE(.0')
CALL
GPRINT(19,MSG)
CALL
WAIT
CALL
CLS
SET
AND
CHECK
ALL
PIXELS
DO
1.0'
1=.0',639
DO
11
J=~,239
CALL
SETXY(I,J)
CALL
PSET(l)
K=POINT(L)
IF(K.EQ.~)
GO
TO
999
CONTINUE
CONTINUE
RESET
AND
CHECK
ALL
PIXELS
DO
12
I=~,639
DO
13
J=~,239
CALL
SETXY(I,J)
CALL
PSET(.0')
K=POINT(L)
IF
(K.EQ.1)
GOTO
999
CONTINUE
CONTINUE
CALL
CLS
ENCODE(MSG,l.0'l)
FORMAT('PSET
AND
POINT PASSED')
CALL
SETXY(.0',~)
CALL
LOCATE(.0')
CALL
GPRINT(21,MSG)
GOTO
1.0'.0'.0'
CALL
CLS
ENCODE
(MSG,
1.0'
2 )
FORMAT('PSET
AND
POINT
FAILED')
CALL
SETXY(~,~)
CALL
LOCATE(.0')
CALL
GPRINT(21,MSG)
CALL
WAIT
---------lIadlolhaell---------
-144-

Other manuals for Radio Shack Quick Printer II

Questions and Answers:

Question and Answer IconNeed help?

Do you have a question about the Radio Shack Quick Printer II and is the answer not in the manual?

Radio Shack Quick Printer II Specifications

General IconGeneral
BrandRadio Shack
ModelQuick Printer II
CategoryDesktop
LanguageEnglish

Related product manuals