Split desktop source into separate files

desk.acc/calculator.s

@@ -648,8 +648,6 @@ textfont:       .addr   0
         .byte   0               ; ???
 
         menu_bar_height := 13
-        screen_width    := 560
-        screen_height   := 192
 
         ;; params for MGTK::SetPortBits when decorating title bar
 .proc screen_port

desk.acc/eyes.s

@@ -45,9 +45,6 @@ entry:
 
 ;;; ============================================================
 
-screen_width    := 560
-screen_height   := 192
-
 da_window_id    := 60
 da_width        := screen_width / 3
 da_height       := screen_height / 3

desk.acc/puzzle.s

@@ -108,8 +108,6 @@ skip:   lda     #0
 ;;; ============================================================
 ;;; ???
 
-        screen_height := 192
-
 window_pos_flag:
         .byte   0               ; ???
 

desk.acc/show.text.file.s

@@ -13,6 +13,11 @@
         dummy1000 := $1000
 
 
+;;; Modified to toggle fixed width
+font_type       := DEFAULT_FONT+0
+font_last_char  := DEFAULT_FONT+1
+font_height     := DEFAULT_FONT+2
+font_width_table := DEFAULT_FONT+3 ; width in pixels, indexed by ASCII code
 
 
 start:  jmp     copy2aux

desk.acc/this.apple.s

@@ -42,9 +42,6 @@ entry:
 
 ;;; ============================================================
 
-screen_width    := 560
-screen_height   := 192
-
 da_window_id    := 60
 da_width        := 400
 da_height       := 118
@@ -1088,8 +1085,8 @@ notpas:
 
         ;; DAs are loaded with $1C00 as the io_buffer, so
         ;; $1C00-$1FFF MAIN is free.
-        buf0    := $1C00
+        buf0    := DA_IO_BUFFER
-        buf1    := $1D00
+        buf1    := DA_IO_BUFFER + $100
 
         ;; Run from clone in main memory
         php

desktop.inc

@@ -2,10 +2,19 @@
 ;;; DeskTop Internals
 ;;; ============================================================
 
-DA_LOAD_ADDRESS := $800
+screen_width    := 560
-DA_MAX_SIZE     := $1C00 - DA_LOAD_ADDRESS
+screen_height   := 192
-        ;; I/O Buffer starts at MAIN $1C00
+
-        ;; (but icon tables start at AUX $1B00)
+;;; ============================================================
+
+INVOKER                 := $290 ; Invoke other programs
+INVOKER_FILENAME        := $280 ; File to invoke (PREFIX must be set)
+
+DA_LOAD_ADDRESS := $800         ; Loaded into MAIN
+DA_IO_BUFFER    := $1C00        ; ...through $1FFF
+DA_MAX_SIZE     := DA_IO_BUFFER - DA_LOAD_ADDRESS
+        ;; Can't load DA past I/O Buffer at MAIN $1C00,
+        ;; but icon tables start at AUX $1B00 so can't clone there.
 
 ;;; ============================================================
 ;;; Direct Calls (from main memory)
@@ -171,14 +180,6 @@ icon_entry_type_trash   := %01110000
 ;;; Used by DAs for window definitions
 DEFAULT_FONT := $8800
 
-;;; Modified by Show Text File DA to toggle fixed width
-font_flag       := $8800 ; = $00 - if high bit set, glyphs are 2 bytes wide
-font_last_char  := $8801 ; = $7F - max glyph number (count is this + 1)
-font_height     := $8802 ; 9 pixels
-font_width_table := $8803 ; width in pixels, indexed by ASCII code
-
-font_glyphs     := $8883 ; $80 glyphs, organized by row, 9 bytes per
-
 ;;; Control Character Glyphs
 ;;;
 ;;; Glyphs $00-$1F are useful symbols; some overlap with MouseText