6502/acme
1
0
Fork 0
mirror of https://github.com/uffejakobsen/acme.git synced 2024-11-16 23:21:29 +00:00
Code Issues Projects Releases Wiki Activity

ACME_Lib: various minor edits

Browse Source 
git-svn-id: https://svn.code.sf.net/p/acme-crossass/code-0/trunk@120 4df02467-bbd4-4a76-a152-e7ce94205b78
This commit is contained in:
marcobaye 2020-02-28 20:40:18 +00:00
parent f22907849c
commit 63d26a9c82
4 changed files with 24 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
ACME_Lib/cbm/basic10.a
View File

@ -1,4 +1,4 @@
;ACME 0.94.4
;ACME 0.96.4
!ifdef lib_cbm_basic10_a !eof
lib_cbm_basic10_a = 1
@ -18,12 +18,20 @@ token_DIR = $ee ; was called DIRECTORY in basic v7
!macro b_DIR {!by token_DIR} ; aka DIRECTORY
; STASH/FETCH/SWAP are all decoded to DMA:
!macro b_DMA {!by $fe, $1f}
!macro b_DMA {!by $fe, $1f} ; command, length, source, target, subcommand
; extended token $fe $20 isn't used ($20 is ' ')
;!macro b_DMA {!by $fe, $21}
; extended token $fe $22 isn't used ($20 is '"')
;!macro b_DMA {!by $fe, $23}
; renamed function:
!macro b_LPEN {!by $ce, $04:!pet '('} ; was called PEN in basic7
; basic7 defines functions up to $ce, $0a (POINTER)
; new functions:
;!macro b_ {!by $ce, $0b:!pet '('} ; ?
!macro b_PIXEL {!by $ce, $0c:!pet '('} ; return pixel color
!macro b_RPALETTE {!by $ce, $0d:!pet '('} ; return palette color
; new instructions:
!macro b_TYPE {!by $fe, $27} ; display sequential disk file
!macro b_BVERIFY {!by $fe, $28}
@ -51,3 +59,8 @@ token_DIR = $ee ; was called DIRECTORY in basic v7
!macro b_MOUSE {!by $fe, $3e} ; set mouse parameters
!macro b_RMOUSE {!by $fe, $3f} ; read mouse position
!macro b_DISK {!by $fe, $40} ; send disc command
!macro b_CURSOR {!by $fe, $41} ; place text cursor?
;!macro b_ {!by $fe, $42} ; ?
!macro b_LOADIFF {!by $fe, $43} ; load IFF graphics
!macro b_SAVEIFF {!by $fe, $44} ; save IFF graphics
!macro b_EDIT {!by $fe, $45} ; switch between program and text editing

12
ACME_Lib/cbm/c128/petscii.a
View File

@ -1,4 +1,4 @@
;ACME 0.94.4
;ACME 0.96.4
!ifdef lib_cbm_c128_petscii_a !eof
lib_cbm_c128_petscii_a = 1
@ -25,8 +25,8 @@ petscii_LBLUE = 154
petscii_GRAY3 = 155: petscii_DWHITE = 155: petscii_LGRAY = 155
; switching character set
petscii_LOCK = 11 ; forbid CBM-shift (C64 uses 8)
petscii_UNLOCK = 12 ; allow CBM-shift (C64 uses 9)
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
@ -39,12 +39,12 @@ petscii_F7 = 136: petscii_F8 = 140
; C128-specific stuff
petscii_UNDERLINEON = 2
petscii_UNDERLINEOFF = 130
petscii_FLASHON = 15
petscii_FLASHOFF = 143
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
petscii_HELP = 132 ; (264 series machines use 140 instead)

4
ACME_Lib/cbm/c64/reu.a
View File

@ -47,8 +47,8 @@ rec_COMMAND_FETCH = %#.#....# ; starting and then reload values.
; Upgraded units and clones may have more, but the REC chip will always
; "wrap around" after eight banks if crossing bank borders!
; amount of bytes to process
rec_amount_low = $df07
rec_amount_high = $df08
rec_amount_low = $df07 ; using $0000 results in
rec_amount_high = $df08 ; 64 KiB being transferred
; when to request interrupts
rec_irqctrl = $df09
}

2
ACME_Lib/cbm/cia.a
View File

@ -75,7 +75,7 @@ lib_cbm_cia_a = 1
; control registers:
cia_interrupt_control = $d
; %7....... read: 1 = interrupt requested
; %7....... read: 1 = interrupt requested (reading clears register)
; write: 0 = disable interrupts indicated by set bits
; 1 = enable interrupts indicated by set bits
; %.65..... unused