mirror of
https://github.com/uffejakobsen/acme.git
synced 2024-12-12 12:29:01 +00:00
63d26a9c82
git-svn-id: https://svn.code.sf.net/p/acme-crossass/code-0/trunk@120 4df02467-bbd4-4a76-a152-e7ce94205b78
51 lines
1.6 KiB
Plaintext
51 lines
1.6 KiB
Plaintext
;ACME 0.96.4
|
|
|
|
!ifdef lib_cbm_c128_petscii_a !eof
|
|
lib_cbm_c128_petscii_a = 1
|
|
|
|
!source <cbm/petscii.a>
|
|
|
|
; color codes
|
|
; vic vdc
|
|
petscii_BLACK = 144: petscii_DBLACK = 144
|
|
petscii_WHITE = 5: petscii_LWHITE = 5
|
|
petscii_RED = 28: petscii_DRED = 28
|
|
petscii_CYAN = 159: petscii_LCYAN = 159
|
|
petscii_PURPLE = 156: petscii_LMAGENTA = 156
|
|
petscii_GREEN = 30: petscii_DGREEN = 30
|
|
petscii_BLUE = 31: petscii_DBLUE = 31
|
|
petscii_YELLOW = 158: petscii_LYELLOW = 158
|
|
petscii_ORANGE = 129: petscii_DMAGENTA = 129
|
|
petscii_BROWN = 149: petscii_DYELLOW = 149
|
|
petscii_LRED = 150
|
|
petscii_GRAY1 = 151: petscii_DCYAN = 151
|
|
petscii_GRAY2 = 152: petscii_LBLACK = 152: petscii_DGRAY = 152
|
|
petscii_LGREEN = 153
|
|
petscii_LBLUE = 154
|
|
petscii_GRAY3 = 155: petscii_DWHITE = 155: petscii_LGRAY = 155
|
|
|
|
; switching character set
|
|
petscii_LOCK = 11 ; forbid CBM-shift (C64 uses 8 instead)
|
|
petscii_UNLOCK = 12 ; allow CBM-shift (C64 uses 9 instead)
|
|
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
|
|
|
|
; C128-specific stuff
|
|
petscii_UNDERLINEON = 2
|
|
petscii_UNDERLINEOFF = 130
|
|
petscii_FLASHON = 15 ; (264 series machines use 130 instead)
|
|
petscii_FLASHOFF = 143 ; (264 series machines use 131 instead)
|
|
petscii_BELL = 7
|
|
petscii_TAB = 9
|
|
petscii_SETTAB = 24
|
|
petscii_LINEFEED = 10
|
|
petscii_ESCAPE = 27
|
|
petscii_SHIFTSTOP = 131
|
|
petscii_HELP = 132 ; (264 series machines use 140 instead)
|