mandel.s

@@ -46,38 +46,6 @@ SDLSTH = $231
 
 .data
 
-strings:
-str_self:
-    .byte "MANDEL-6502"
-str_self_end:
-str_speed:
-    .byte "ms/px"
-str_speed_end:
-str_run:
-    .byte "RUN "
-str_run_end:
-str_done:
-    .byte "DONE"
-str_done_end:
-
-str_self_len = str_self_end - str_self
-str_speed_len = str_speed_end - str_speed
-str_run_len = str_run_end - str_run
-str_done_len = str_done_end - str_done
-
-char_map:
-    ; Map ATASCII string values to framebuffer font entries
-    ; Sighhhhh
-    .repeat 32, i
-        .byte i + 64
-    .endrepeat
-    .repeat 64, i
-        .byte i
-    .endrepeat
-    .repeat 32, i
-        .byte 96 + i
-    .endrepeat
-
 aspect:
     ; aspect ratio!
     ; pixels at 320w are 5:6 (narrow)
@@ -499,22 +467,6 @@ enough:
     rts
 .endproc
 
-.macro draw_text col, len, cstr
-    ; clobbers A, X
-    .local loop
-    .local done
-    ldx #0
-loop:
-    cpx #len
-    beq done
-    ldy cstr,x
-    lda char_map,y
-    sta textbuffer + col,x
-    inx
-    jmp loop
-done:
-.endmacro
-
 .proc start
 
     ; ox = 0; oy = 0; zoom = 0
@@ -555,9 +507,6 @@ zero_byte_loop:
     cmp #.hibyte(framebuffer_end)
     bne zero_page_loop
 
-    draw_text 0, str_self_len, str_self
-    draw_text 40 - str_run_len, str_run_len, str_run
-
     ; Re-enable display DMA
     lda #$22
     sta DMACTL
@@ -613,8 +562,6 @@ loop_sx_done:
 
 loop_sy_done:
 
-    draw_text 40 - str_done_len, str_done_len, str_done
-
 loop:
     ; finished
     jmp loop