wip-hugo/routines/line/line_down.s

@@ -51,6 +51,7 @@
         Sub_16 >D, <D, dx, #$00
 
         jsr pixel_draw ;;only used first pixel. after this relative position is abused
+        ;LDY #$00
         LDX X_pos
 for_x:
         ;; Paints A to address i btp_mem_pos* + Y

wip-hugo/routines/line/line_down_inv.s

@@ -45,6 +45,7 @@
         Sub_16 >D, <D, dy, #$00
 
         jsr pixel_draw ;;only used first pixel. after this relative position is abused
+        LDY #$00
         LDX Y_pos
 for_y:
         LDA byte_to_paint

wip-hugo/routines/line/line_up.s

@@ -12,6 +12,15 @@
 .proc line_up
         .include "line.inc"; Defines memory positions, ex X_pos
 
+        ;LDA #$20
+        ;STA X_pos
+        ;STA Y_pos
+        ;LDA #$10
+        ;STA Y_end
+        ;LDA #$40
+        ;STA X_end
+
+
         ;;We need to clear this memory
         LDA #$00
         STA <V
@@ -53,6 +62,9 @@
         Sub_16 >D, <D, dx, #$00
 
         jsr pixel_draw
+        ;INY ; Dont want underflow
+        ;LDY #$09
+        ;Sub_16 >btp_mem_pos, <btp_mem_pos, #$40, #$01 ;-320
         LDX X_pos
 for_x:
         LDA byte_to_paint

wip-hugo/routines/line/line_up_inv.s

@@ -44,39 +44,20 @@
         STA <D
         Add_16 >D, <D, #$ff, #$01
         Sub_16 >D, <D, dy, #$00
-
-        jsr pixel_draw
-        LDX Y_pos
 for_y:
-        LDA byte_to_paint
+        jsr pixel_draw
-        ORA (>btp_mem_pos), Y
+        ;;Increment Y until Y_pos = Y_end and X_pos = X_end
-        STA (>btp_mem_pos), Y
+        DEC Y_pos
-decrement_y_pos:
+        LDY Y_pos
-        DEY
+        CPY Y_end
-        CPY #$ff
-        BNE decrement_y_pos_end
-move_8px_up:
-        LDY #$07
-        Sub_16>btp_mem_pos, <btp_mem_pos,#$40 , #$01; ; +320 bytes
-decrement_y_pos_end:
-        DEX
-        CPX Y_end
         BEQ end
+
         ;;If D <  %00000010 00000000:  case_2
         ;;else case 1.
         Lag_16 >D, <D, #$00, #$02, case_2
 case_1:
-        Sub_16 >D, <D, >V, <V, !; D = D - V
+        INC X_pos
-increment_pixel_x:
+        Sub_16 >D, <D, >V, <V; D = D - V
-        LDA byte_to_paint
-        LSR byte_to_paint
-        BCC for_y
-move_8px_left:
-        ;; add +8 to btp_mem_pos. Find more of why in pixel_draw
-        Add_16 >btp_mem_pos, <btp_mem_pos, #$08, #$00
-        ;; reset byte_to_paint
-        LDA #%10000000
-        STA byte_to_paint
         JMP for_y
 case_2:
         Add_16 >D, <D, >dx_2, <dx_2;D = D + 2*dy

wip-hugo/routines/memory/pixel_draw.s

@@ -46,12 +46,24 @@ end__:
 	;; Adding inside chunk offset
 	LDA #%00000111 ; A = y (mod 8)
 	AND Y_pos ;; offset to add
+
+
+	;;ading offset, same as psudocode bellow
+	;;Add_16 >btp_mem_pos, <btp_mem_pos, A, #$00
+	;CLC ; Y = b_low
+	;ADC >btp_mem_pos
+	;STA >btp_mem_pos
+	;LDA #$00
+	;ADC <btp_mem_pos ; C =0
+	;STA <btp_mem_pos
+
 	TAY
+	CLC
 
 	LDA #$00
 	STA $4B
+
 	;;y =8 translates to 320 bytes.
-	CLC
 	LDA #%11111000 ; A =  y - [y (mod 8)]
 	AND Y_pos
 	STA >C
@@ -79,6 +91,7 @@ end__:
 	Add_16 >btp_mem_pos, <btp_mem_pos, #<Bitmap, #>Bitmap, !
 
 	;;Let draw some stuff
+	;LDY #$00
 	LDA byte_to_paint ;; note that both bytes are used!
 	ORA (>btp_mem_pos), Y
 	STA (>btp_mem_pos), Y