*= $3400
 .incbin "font.dat"

 *= $3360
dlist_vis
 .byte $70, $70, $30 ; 2 8-line blanks, 1 4-line blank
 .byte $42           ; LMS GR.0
dl_bot_lms
 .word scr_vis_buf
 .byte $02, $02, $02, $02, $02, $02, $02, $02
 .byte $02, $02, $02, $02, $02, $02, $02, $02
 .byte $02, $02, $02, $02, $02, $02 ; 22 GR.0 lines
 .byte $00
 .byte $42           ; LMS GR.0
dl_status_lms
 .word status_box    ; line 23
 .byte $06           ; one GR.1 line
 .byte $41           ; JVB
 .word dlist_vis

edbox_only_dlist
 .byte $70, $70, $30 ; 2 8-line blanks, 1 4-line blank
 .byte $70, $70, $70, $70, $70, $70, $70, $70
 .byte $42
 .word $0600 ; edit_box from addrs.c
 .byte $02, $02, $02, $02, $02
 .byte $00
 .byte $42
 .word status_box ; status_box from addrs.c
 .byte $06   ; GR.1
 .byte $41
 .word edbox_only_dlist

status_box
 .rept 60
  .byte 0
 .endr

status_box_end = status_box + 60

; $3400 - $37ff is the font!

; shoehorn the transmit & receive buffers here
 *= $3800
rx_buf ; 512 bytes
 *= $3a00
tx_buf ; 512 bytes
 *= $3c00
scr_vis_buf ; not used yet
 *= $3fa0
end_marker ; a line_t (42 bytes)
 .byte <end_marker ; points to
 .byte >end_marker ; itself!
 .byte $fe ; inverse ~
 .rept 39
  .byte 0 ; rest of the line is nulls (look like spaces)
 .endr

 *= $4000
; screen RAM starts at the XE bankswitching window!
scr_main_mem

 *= $7fff
scr_main_mem_end