RAM.DRV.SYSTEM: Show block count. Resolves #2

This commit is contained in:
Joshua Bell 2020-12-21 13:27:54 -08:00
parent 1260999b6c
commit cc49835c9f
2 changed files with 32 additions and 1 deletions

View File

@ -68,6 +68,13 @@ SETKBD := $FE89
SETVID := $FE93
BELL := $FF3A
;;; ============================================================
;;; Applesoft ROM routines
;;; ============================================================
;;; These require various ZP locations to be initialized.
LINPRNT := $ED24 ; print X,A as integer
;;; ============================================================
;;; Well-known RAM locations
;;; ============================================================
@ -75,3 +82,13 @@ BELL := $FF3A
INPUT_BUFFER := $200
RESETVEC := $3F2
COL80HPOS := $57B
;;; ============================================================
;;; Applesoft Zero Page Locations
;;; ============================================================
TEMPPT := $52
TEMPST := $55
SHIFT_SIGN_EXT := $A4
SPEEDZ := $F1
FLASH_BIT := $F3

View File

@ -411,7 +411,21 @@ install_success:
jsr HOME
jsr zstrout
scrcode "\r\r\r", PRODUCT, " - Installed"
scrcode "\r\r\r", PRODUCT, " - "
.byte 0
;; Initialize Applesoft zero page locations required by LINPRNT
copy #0, SHIFT_SIGN_EXT ; required by FP routines
copy #TEMPST, TEMPPT ; string descriptor pointer
copy #1, SPEEDZ ; output delay
copy #0, FLASH_BIT ; character set mask
ldx vol_dir_header+VolumeDirectoryHeader::total_blocks
lda vol_dir_header+VolumeDirectoryHeader::total_blocks+1
jsr LINPRNT
jsr zstrout
scrcode " Blocks"
.byte 0
rts