;;; -*- Mode: asm; indent-tabs-mode: t; tab-width: 8 -*-

        .include "line.inc"

        ;;START TIME HERE

        ;;for testing stuff
        Y_pos_ = $0D
        X_pos_ = $0E
        Y_end_ = $10
        X_end_ = $11
        LDA #$00
        STA X_pos_
        LDA #$30
        STA Y_pos_
        LDA #$ff
        STA X_end
        LDA #$30
        STA Y_end


@loop:;; mem f1
        LDA Y_pos_
        STA Y_pos
        LDA X_pos_
        STA X_pos

        jsr line
        INC Y_end
        LDA Y_end
        CMP #$50
        BEQ end__
        jmp @loop
end__:
        ;;Lets cleer bitmap
        LDA #>VIC_bank
        STA $FC
        LDA #<VIC_bank
        STA $FB

        LDA #>$5f3f
        STA $FE
        LDA #<$5f3f
        STA $FD

        LDA #$0
        jsr memset

        jmp exit

.include "line.s"