Apple-2-SW/a2d
1
0
Fork 0
mirror of https://github.com/mi57730/a2d.git synced 2024-11-29 07:49:20 +00:00
Code Issues Projects Releases Wiki Activity

DeskTop: Annotate some A2D code org wierdness

Browse Source
This commit is contained in:
Joshua Bell 2018-01-04 18:48:36 -08:00
parent aed07533e8
commit e8d2364379
2 changed files with 15 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
desktop/README.md
View File

@ -38,6 +38,8 @@ Entry point is $4000 with a ProDOS MLI-style calling convention
* Font is at $8800
* Part of $8500-$87FF looks like part of "DeskTop" (see below), dealing with online volumes.
### "DeskTop" Application
`desktop.s`

18
desktop/a2d.s
View File

@ -8780,6 +8780,8 @@ mouse_operand: ; e.g. if mouse is in slot 4, this is $40
;;; ==================================================
;;; TODO: This section behaves almost like part of DeskTop, not A2D ???
.byte $03
.addr $85E9
@ -9102,13 +9104,17 @@ online_params_buffer:
;;; ==================================================
;;; Font
font_table:
.byte $00,$7F ; ??
font_definition:
.assert * = font_flag, error, "Entry point mismatch"
.byte $00
glyph_height:
.assert * = font_size_count, error, "Entry point mismatch"
.byte $7F
.assert * = font_height, error, "Entry point mismatch"
.byte 9
glyph_width_table:
.assert * = font_width_table, error, "Entry point mismatch"
.byte $01,$07,$07,$07,$07,$07,$01,$07
.byte $07,$07,$07,$07,$07,$07,$07,$07
.byte $07,$03,$07,$06,$07,$07,$07,$07
@ -9126,7 +9132,7 @@ glyph_width_table:
.byte $06,$06,$06,$06,$06,$06,$06,$07
.byte $06,$06,$06,$04,$02,$04,$05,$07
glyph_bitmaps:
.assert * = font_glyphs, error, "Entry point mismatch"
;; Format is: glyph0-row0, glyph1-row0, ...
.byte $00,$00,$00,$3F,$77,$01,$01,$00
.byte $00,$7F,$00,$00,$7F,$20,$3E,$3E
@ -9260,6 +9266,8 @@ glyph_bitmaps:
;;; ==================================================
;; ???
.byte $00,$00,$00,$00,$77,$30,$01
.byte $00,$00,$7F,$00,$00,$7F,$00,$00
.byte $00,$00,$00,$7A,$00,$00,$00,$00