acme/examples/me/const.a
marcobaye af1bd69455 Release 0.95.2: Changed "save labels" to "symbol list" in a lot of code, error messages and docs.
Added "!symbollist" alias for "!sl" pseudo opcode.
Change in undocumented ("illegal") opcodes: ANC #8 now generates 0x0b instead of 0x2b (both opcodes do the same thing).
Added experimental support for generating a report listing. Thanks to Johann Klasek for writing this extension patch.


git-svn-id: https://svn.code.sf.net/p/acme-crossass/code-0/trunk@40 4df02467-bbd4-4a76-a152-e7ce94205b78
2014-11-22 01:36:02 +00:00

96 lines
2.2 KiB
Plaintext

;ACME 0.95.1
; Konstanten:
FALSE = 0 ; Das Programm verläßt sich an etlichen Stellen
TRUE = $ff ; darauf, daß genau diese Werte zugewiesen wurden.
MODIFIED8 = $ff ; Defaultwerte für
!addr MODIFIED16 = $ffff ; Selbstmodifikationen
Char_NUL = $00
Char_STOP = $03
Char_RETURN = $0d
Char_CursorDown = $11
Char_HOME = $13
Char_DEL = $14
Char_ESCAPE = $1b
Char_CursorRight = $1d
Char_At = $40
CharOwn_Delete = $74
Char_ShiftRETURN = $8d
Char_CursorUp = $91 ; Diese Werte waren früher als Strings angegeben.
Char_CLEAR = $93
Char_INST = $94
Char_Grey2 = $98
Char_BlueL = $9a
Char_Grey3 = $9b
Char_CursorLeft = $9d
_ = 1 ; Dieser Code steht für das unsichtbare Space in den Windows.
ä = $bb ; Werte um Umlaute verwenden zu können.
ö = $bc
ü = $bd
ß = $be
Ä = $db
Ö = $dc
Ü = $dd
chrol = 104 ; Fensterrahmen
chroo = 102
chror = 106
chrll = 97
chrmm = 32
chrrr = 97
chrul = 98
chruu = 102
chrur = 100
lf = 8 ; Filenr. & Sek.-Addy
; Zeropage:
!addr {
D8502 = $00 ; Direction
R8502 = $01 ; Register
vvek = $83 ; Vektor auf LineVektor
lvek = $85 ; LineVektor
tmp1 = $87
tmp2 = $89
vtemp = $8d ; crsr-address (3) ; zeropage (**mark**)
status = $90 ; System variable ST
fnlen = $b7 ; Dateiparameter
fnbank = $c7 ; Bank of file name
ndx = $d0 ; Tasten- &
kyndx = $d1 ; F- Buffer
keyidx = $d2 ; F-Zeichenzähler
mode = $d7 ; Bit 7 = Cursorscreen (40/80)
color = $f1 ; current attribute
locks = $f7 ; Verhindert CBM-Shift
beep = $f9 ; Tastenklick
lftb = $fa ; Maustasten
rgtb = $fb
line = $fc ; Zähler
col = $fd
zahl = $fe ; fürs Wrap
; System:
nmivek = $0318 ; NMI
keybuffer = $034a
pkydef = $100a ; Strings der F-Tasten
texttop = $1210 ; Basic-Ende+1
maxmem0 = $1212 ; Ende Bank 0
basic = $12fd ; Basic-IRQ
e_copyfont = $c027 ; Systemroutine, kopiert Font in VDC-RAM
e_cls = $c142 ; Systemroutine, löscht Screen
e_switchmode = $cd2e ; Systemroutine, switcht aktiven Monitor
takt = $d030 ; 2 MHz ; register (**mark**)
vdc = $d600 ; VDC
reg = $d601
conreg = $ff00 ; MMU-CR
nmiend = $ff33 ; NMI-Ende
primm = $ff7d ; Kernal
open = $ffc0
close = $ffc3
chkin = $ffc6
chkout = $ffc9
clrchn = $ffcc
basin = $ffcf
basout = $ffd2
}