Star Micronics 10X User Manual page 170

~ _________________________________ G_8_m_in_i_U_S8_'_'S_M_B_n_U_B/
5046 CALL 24576
5050
BIT~(COL.RON)
=
PEEK (252)
5060
RETURN
Figure A-10 is the graphics program (refer to Figure 7-4) amended for the
Apple 11 computer.
!O PRINT CHRS 141;"PR*!"
20 REM .tl DEFINE PARAGRAPH SYMBOL IN PLACE OF THE
@ SYMBD~
30
PRINT CHRS
(27): CHRS (421:
CHR$
I!I:
CHR$
(W:
CHRS
(0): CHRS (6):
CHRS
(25):
CHR$
(01:
CHRS
(25):
CHR$
(118):
CHR$
1~51:
CHR$
(0):
CHRS
112'!:
CHP$
(0):
40 REM
ttf
SELECT DOWNLOADABLE CHARACTERS
50 PR!NT
CHRS
(27): CHRS (36): CHR$
(1):
60 REM
tt*
PRINT OUR NEW
SYMBO~
'0
PRINT
"@@@@@@"
Figure A-11 is the downloading paragraph symbols program (refer to
Figure 8-2) amended for the Apple 11 computer.
SPRINT CHRS (4);"PRll"
:0 REM St. DEFINE COPYRIGHT SYMBOL IN PLACE OF A
@
SYMBOL
20
PRINT CHRS
(271;
CHR$
(42);
CHR$
(I);
CHRS (641; CHRS
(0);
CHRS 1281:
CHRS 134'; CHRt (731; CHRS
(201:
CHR$ 1651; CHRS
(20):
CHRS (65); CHR$
(34); CHRt (20):
30
REM
'It
SELECT DOWNLOADABLE CHARACTERS
40
PRINT CHRS
(27);
CHR! (36): CHR$ (1)1
SO REM
a*.
PRINT OUR
NEW SYMBOL
60 PRINT ·COPVR!GHT
@
1983"
Figure A-12 is the downloading copyright program (refer to Figure 8-4)
amended for the Apple 1/ computer.
162
• •
• •
• •
• •
• •
• •
• •
• •
• •
• •
• •
•