Smarter bittable generation (thanks @jhusak)

Atari/gr_basics.asm

@@ -756,16 +756,17 @@ loop  sta (temp),y
       iny
       cpy #screenheight+1
     bne @-
-    ; and bittables for fastes plot and point
+    ; and bittables for fastest plot and point (thanks @jhusak)
     ldy #0
-@   tya
-    and #%00000111
-    tax
-    lda bittable,x
+    lda #$40
+@   asl
+    adc #0
     sta bittable1_long,y
+    tax
     eor #%11111111
     sta bittable2_long,y
-    iny
+    txa
+    dey
     bne @-
     rts
 .endp

C64/gr_basics.asm

@@ -659,16 +659,17 @@ next8lines
       iny
       cpy #screenheight+1
     bne @-
-    ; and bittables for fastes plot and point
+    ; and bittables for fastest plot and point (thanks @jhusak)
     ldy #0
-@   tya
-    and #%00000111
-    tax
-    lda bittable,x
+    lda #$40
+@   asl
+    adc #0
     sta bittable1_long,y
+    tax
     eor #%11111111
     sta bittable2_long,y
-    iny
+    txa
+    dey
     bne @-
     rts
 .endp

constants.asm

@@ -200,8 +200,8 @@ sintable
 ;    :screenheight+1 .by >(display+screenBytes*#)
 ;----------------------------
 ; now long (256 bytes) bittables are generated in RAM based on one bittable:
-bittable
-    .by $80,$40,$20,$10,$08,$04,$02,$01
+;bittable
+;    .by $80,$40,$20,$10,$08,$04,$02,$01
 ;bittable2
 ;    .by $7f,$bf,$df,$ef,$f7,$fb,$fd,$fe
 ;----------------------------