Apple-2-SW/a2d
1
0
Fork 0
mirror of https://github.com/mi57730/a2d.git synced 2025-02-26 23:29:11 +00:00
Code Issues Projects Releases Wiki Activity

Skip DAs with high bit set. Fixes #102

Browse Source
This commit is contained in:
Joshua Bell 2019-01-02 10:46:03 -08:00
parent 50a755afde
commit 8ecea72c84
2 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
RELEASE-NOTES.md
View File

@ -11,6 +11,7 @@
* Show Text File DA: Keyboard support. Escape quits, arrows scroll. (#4) * Show Text File DA: Keyboard support. Escape quits, arrows scroll. (#4)
* Reorganized/renamed several menu items. (#13) * Reorganized/renamed several menu items. (#13)
* Icon bitmap improvements. (#74) * Icon bitmap improvements. (#74)
* DAs with high bit in aux-type set are skipped. (#102)
### Additional Desk Accessories ### Additional Desk Accessories

6
desktop/desktop_main.s
View File

@ -15434,8 +15434,10 @@ process_block:
ldy #FileEntry::file_type ldy #FileEntry::file_type
lda (dir_ptr),y lda (dir_ptr),y
cmp #DA_FILE_TYPE cmp #DA_FILE_TYPE
beq is_da bne next_entry
jmp next_entry ldy #FileEntry::aux_type+1 ; high bit set = skip
lda (dir_ptr),y
bmi next_entry
;; Compute slot in DA name table ;; Compute slot in DA name table
is_da: inc desk_acc_num is_da: inc desk_acc_num