home *** CD-ROM | disk | FTP | other *** search
- rem HP DeskJet/Deskjet Plus (using internal PC-8 character set)
- rem Supports Presentation cartridge M (with US ASCII symbol set)
-
- cc '@'=27,"E",27,"&k0G",27,"(10U",27,"(s1Q"
- cc 'b'=27,"(s3B" ; 27,"(s0B"
- cc 'i'=27,"(s1S" ; 27,"(s0S"
- cc 'q'=27,"(s2Q" ; 27,"(s1Q"
- cc 's'=27,"&a+0.25R" ; 27,"&a-0.25R" ;; subscript
- cc 't'=27,"&a-0.25R" ; 27,"&a+0.25R" ;; superscript
- cc 'u'=27,"&d0D" ; 27,"&d@"
-
- rem Character redefinitions using PC-8 Symbol set
-
- rc ''=27,"&p1X",2
- rc ''=27,"&p1X",3
- rc ''=27,"&p1X",4
- rc ''=27,"&p1X",5
- rc ''=27,"&p1X",6
- rc ''=27,"&p1X",11
- rc 12=13,12 ;; form feed
- rc ''=27,"&p1X",14
- rc ''=27,"&p1X",15
- rc ''=27,"&p1X",16
- rc ''=27,"&p1X",17
- rc ''=27,"&p1X",18
- rc ''=27,"&p1X",19
- rc '¶'=27,"&p1X",20
- rc '§'=27,"&p1X",21
- rc ''=27,"&p1X",22
- rc ''=27,"&p1X",23
- rc ''=27,"&p1X",24
- rc ''=27,"&p1X",25
- rc ''=27,"&p1X",26
- rc ''=27,"&p1X",27
- rc ''=27,"&p1X",28
- rc ''=27,"&p1X",29
- rc ''=27,"&p1X",30
- rc ''=27,"&p1X",31
-
- rem accented chars defined so as not to be split into letter and accent
-
- rc 'Ç'=128
- rc 'ü'=129
- rc 'é'=130
- rc 'â'=131
- rc 'ä'=132
- rc 'à'=133
- rc 'å'=134
- rc 'ç'=135
- rc 'ê'=136
- rc 'ë'=137
- rc 'è'=138
- rc 'ï'=139
- rc 'î'=140
- rc 'ì'=141
- rc 'Ä'=142
- rc 'Å'=143
- rc 'É'=144
- rc 'æ'=145
- rc 'Æ'=146
- rc 'ô'=147
- rc 'ö'=148
- rc 'ò'=149
- rc 'û'=150
- rc 'ù'=151
- rc 'ÿ'=152
- rc 'Ö'=153
- rc 'Ü'=154
- rc 'ø'=27,"(8U",214,27,"(10U" ;; o slash
- rc '£'=156
- rc 'Ø'=27,"(8U",210,27,"(10U" ;; O slash
- IF PC
- rc ''=158
- ENDIF
- IF ST
- rc 158=27,"(8U",222,27,"(10U" ;; double s
- ENDIF
- rc 'á'=160
- rc 'í'=161
- rc 'ó'=162
- rc 'ú'=163
- rc 'ñ'=164
- rc 'Ñ'=165
- rc 'ß'=27,"(8U",222,27,"(10U"
- rc '»'=27,"(10U",175
-
- rc 'Ð'=27,"(8U",227,27,"(10U"
- rc 'ð'=27,"(8U",228,27,"(10U"
- rc 'Þ'=27,"(8U",240,27,"(10U"
- rc 'þ'=27,"(8U",241,27,"(10U"
- rc ''=27,"(11U",158,27,"(10U"
- rc ''=27,"(11U",159,27,"(10U"
-
- IF ANSI
- rc ''=218
- rc ''=191
- rc ''=192
- rc ''=217
- rc ''=196
- rc ''=179
- rc ''=194
- rc ''=193
- rc ''=197
- rc ''=195
- rc ''=180
- rc 'ª'=166
- rc 'º'=167
- rc '¿'=168
- rc '¬'=170
- rc '½'=171
- rc '¼'=172
- rc '¡'=173
- rc '«'=174
- rc 'µ'=230
- rc '±'=241
- rc '÷'=246
- rc '°'=248
- rc '·'=250
- rc 164=27,"(8U",186,27,"(10U" ;; curr. sym.
- rc 165=27,"(8U",188,27,"(10U" ;; yen
- rc 166=27,"(0N",166,27,"(10U" ;; vert
- rc 169=27,"(0N",169,27,"(10U" ;; copyright
- rc 174=27,"(0N",174,27,"(10U" ;; registered
- rc 175=27,"(0N",175,27,"(10U" ;; overline
- rc 179=27,"(0N",179,27,"(10U" ;; super 3
- rc 190=27,"(8U",245,27,"(10U" ;; 3/4
- rc 215=27,"(0N",215,27,"(10U" ;; multiply
- ENDIF
-
- hl 27,"="
-
- mm 2
- mf 1
- ff on
- cw 30
- cc 'c'=27,"(s20H" ; 27,"(s10H"
- cc 'e'=27,"(s16.67H" ; 27,"(s10H"
- cc 'l'=27,"(s5H" ; 27,"(s10H"
- cc 'p'=27,"(s1P" ; 27,"(s0P"
-