Add test for memcpy

wip-hugo/routines/memory/memcpy_test.s

@@ -0,0 +1,31 @@
+;;; -*- Mode: asm; indent-tabs-mode: t; tab-width: 8 -*-
+memcpy_test:
+        ;; TESTING OF MEMCPY TEMPERARLY HERE BECAUSE IT WILL USE THAT :)
+        X_pos = $FA
+        A_start = $FAFB
+        Y_pos = $F9
+        B_start = $FCFD
+        charset = $FB
+        B_end = $FEFF
+        code = $FE
+        petski_position = $FEFF ;reuses code:s memory
+        screen_position = $FCFD
+
+
+        Mov_16 >B_start, <B_start, #<$D000, #>$D000
+        ;#### TEMP INIT DATA ####
+        Mov_16 >B_end, <B_end,  #<($D000+$1F3F), #>($D000 +$1F3F)
+        LDA #$10
+        STA code
+        LDA #$10
+        STA X_pos
+        STA Y_pos
+
+
+        Mov_16 >A_start, <A_start, #<VIC_bank, #>VIC_bank
+        ;We first need to clear some memory
+        ;Mov_16 >A_end, >A_end,  #<(VIC_bank+100),  #>(VIC_bank +100)
+        LDA #$00
+        JSR memcpy
+        STA <petski_position
+        jmp exit