// vim: filetype=kickass
#import "math.inc"

* = $0801                               // BASIC start address (#2049)
.byte $0d,$08,$dc,$07,$9e,$20,$34,$39   // BASIC loader to start at $c000...
.byte $31,$35,$32,$00,$00,$00           // puts BASIC line 2012 SYS 49152

* = $c000

.const SCREEN_RAM = $0400
.const COLOR_RAM = $d800

.const kernal_scinit = $ff81
.const kernal_chrout = $ffd2
.const kernal_write_byte = $e716

.const zp_temp = $02
.const cursor_pointer_lo = $05
.const cursor_pointer_hi = $06

//
// main
//
main:
    jsr clear_screen

    // lda #0
    // sta $d020
    // sta $d021

    jsr day01

!loop:
    // inc $d020
    jmp !loop-

string:
    .text "The quick brown newline jumped over the lazy dog."
    .byte '\n'
    .byte 0

string_cr:
    .text "The quick brown carriage return jumped over the lazy dog."
    .byte '\r'
    .byte 0


day01:
    lda #<str_input
    sta $03
    lda #>str_input
    sta $04
    jsr write_string

    lda #<day01_input
    sta $03
    lda #>day01_input
    sta $04
    jsr write_string

    lda #<str_converted
    sta $03
    lda #>str_converted
    sta $04
    jsr write_string


    lda #<day01_input
    sta $03
    lda #>day01_input
    sta $04

.break
    ldy #0

!line:
    lda #0
    sta $22
    sta $23

!digit:
    lda ($03), y
    cmp #'\n'
    beq !break+

    i16_mul10($22, $23)

    lda ($03), y

    sec
    sbc #'0'

    i16_i8_add_a($22, $23)

    iny
    jmp !digit-

!break:
    sty $24

    lda $23
    jsr print_hex_0x
    lda $22
    jsr print_hex

    jsr print_newline
    jsr print_carriage_return

    ldy $24
    iny

    lda ($03), y
    bne !line-

!done:
    rts


day01_input:
    .import text "../rust/inputs/day01_example"
    .byte 0

str_input:
    .text "# Input"
    .byte '\n', 0

str_converted:
    .byte '\n'
    .text "# Converted"
    .byte '\n', 0


buffer:
    .fill $0100, 0


#import "screen.asm"