.scope circle_test_size
        .include "circle.inc"


        ;;Set initial parameters for circle
        LDA #$01
        STA $AD

loop:

;delay: ;lets delay the print
;        LDX #$ff
;        LDY #$ff
;delay_point:
;        NOP
;        NOP
;        DEX
;        BNE delay_point
;        DEY
;        BNE delay_point


        ;; set other parameters for circle
        LDA #$50
        STA X_pos
        STA Y_pos

        ;; make circle radius bigger
        INC $AD
        LDA $AD
        STA radius

        JSR clear_screen

        ;; draw the circle
        JSR circle

        ;; end loop if radius = $aa
        LDA $AD
        CMP #$20
        BNE loop
.endscope