*= $8400 ; aka screen_bot_addrs[0], gets cleared by main() in the client.

 save_dlist_loc = $fe

;msg .sbyte "         Loading FujiNet Config         "
msg
  .sbyte "         Loading FujiNet "
  .if .def CLIENT
    .sbyte "Client"
  .else
    .sbyte "Config"
  .endif
  .sbyte "         "

dl
 .byte $70, $70, $70 ; 3x8 blanks
 .byte $70, $70, $70, $70, $70, $70, $70, $70, $70, $70
 .byte $42           ; LMS GR.0
 .word msg
 .byte $41           ; JVB
 .word dl

wait1frame
 lda $14 ; RTCLOK+2
wloop
 cmp $14
 beq wloop
 rts

init
 lda $0230
 sta save_dlist_loc
 lda $0231
 sta save_dlist_loc+1
 jsr wait1frame
 lda #<dl
 sta $0230 ; SDLSTL
 lda #>dl
 sta $0231 ; SDLSTH
 jmp wait1frame

 *= $02e2 ; INITAD
 .word init

 .if 0 ; change to 1 for standalone testing
run
 jmp run

 *= $02e0 ; RUNAD
 .word run
 .endif