Advertisement
Guest User

Untitled

a guest
Sep 29th, 2017
73
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ; X - Pointer to lookup table - to allow ABX
  2. ; Y - Pointer to Coco video byte
  3. ; U - Pointer Chip8 video byte
  4. ; A/B/D - Transformations/Offsets
  5. ; Use CMPX / BNE for loop for now until I unroll
  6.  
  7.                 LDY #GraphicsPage+16    ; offset so I can write behind
  8.                 PSHS    U
  9.                 LDU #Video_RAM
  10. DrawLine           
  11.                 LDX #TransformTable     ; Draw Byte/Word One
  12.                 CLRA
  13.                 LDB ,U+
  14.                 ABX
  15.                 ABX
  16.                 LDD ,X
  17.                 STD -16,Y
  18.                 STD ,Y++
  19.                
  20.                 LDX #TransformTable     ; Draw Byte/Word Two
  21.                 CLRA
  22.                 LDB ,U+
  23.                 ABX
  24.                 ABX
  25.                 LDD ,X
  26.                 STD -16,Y
  27.                 STD ,Y++
  28.                
  29.                 LDX #TransformTable     ; Draw Byte/Word Three
  30.                 CLRA
  31.                 LDB ,U+
  32.                 ABX
  33.                 ABX
  34.                 LDD ,X
  35.                 STD -16,Y
  36.                 STD ,Y++
  37.                
  38.                 LDX #TransformTable     ; Draw Byte/Word Four
  39.                 CLRA
  40.                 LDB ,U+
  41.                 ABX
  42.                 ABX
  43.                 LDD ,X
  44.                 STD -16,Y
  45.                 STD ,Y++
  46.                
  47.                 LDX #TransformTable     ; Draw Byte/Word Five
  48.                 CLRA
  49.                 LDB ,U+
  50.                 ABX
  51.                 ABX
  52.                 LDD ,X
  53.                 STD -16,Y
  54.                 STD ,Y++
  55.                
  56.                 LDX #TransformTable     ; Draw Byte/Word Six
  57.                 CLRA
  58.                 LDB ,U+
  59.                 ABX
  60.                 ABX
  61.                 LDD ,X
  62.                 STD -16,Y
  63.                 STD ,Y++
  64.                
  65.                 LDX #TransformTable     ; Draw Byte/Word Seven
  66.                 CLRA
  67.                 LDB ,U+
  68.                 ABX
  69.                 ABX
  70.                 LDD ,X
  71.                 STD -16,Y
  72.                 STD ,Y++
  73.                
  74.                 LDX #TransformTable     ; Draw Byte/Word Eight
  75.                 CLRA
  76.                 LDB ,U+
  77.                 ABX
  78.                 ABX
  79.                 LDD ,X
  80.                 STD -16,Y
  81.                 STD ,Y++               
  82.                            
  83.                 LEAY    16,Y            ; Skip line already drawn  
  84.                                
  85.                 CMPU    #Video_RAM+256
  86.                 LBNE    DrawLine   
  87.                
  88.                 PULS    U
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement