1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
;ACME 0.94.4
!ifdef lib_cbm_c64_petscii_a !eof
lib_cbm_c64_petscii_a = 1
!source <cbm/petscii.a>
; color codes
petscii_BLACK = 144
petscii_WHITE = 5
petscii_RED = 28
petscii_CYAN = 159
petscii_PURPLE = 156
petscii_GREEN = 30
petscii_BLUE = 31
petscii_YELLOW = 158
petscii_ORANGE = 129
petscii_BROWN = 149
petscii_LRED = 150
petscii_GRAY1 = 151
petscii_GRAY2 = 152
petscii_LGREEN = 153
petscii_LBLUE = 154
petscii_GRAY3 = 155
; switching character set
petscii_LOCK = 8 ; forbid CBM-shift (C128 uses 11)
petscii_UNLOCK = 9 ; allow CBM-shift (C128 uses 12)
petscii_LOWERCASE = 14 ; switch to lowercase/uppercase character set
petscii_UPPERCASE = 142 ; switch to uppercase/graphics character set
; function keys
petscii_F1 = 133: petscii_F2 = 137
petscii_F3 = 134: petscii_F4 = 138
petscii_F5 = 135: petscii_F6 = 139
petscii_F7 = 136: petscii_F8 = 140
|
