Remove dead / obsolete code

src/blitter/TileProcs.s

@@ -1,121 +0,0 @@
-; A simple helper function that fills in all of the opcodes of a tile with the PEA opcode.  This is
-; a separate functino because we can often just update the tile data if we know the opcodes are already
-; set.  When we have to fill the opcodes, this function is used
-_TBFillPEAOpcode
-                 sep             #$20
-                 lda             #$F4
-]line            equ   0
-                 lup   8
-                 sta:            $0000+{]line*$1000},y
-                 sta:            $0003+{]line*$1000},y
-]line            equ   ]line+1
-                 --^
-                 rep             #$20
-                 rts
-
-; Copy tile data into the direct page compositing buffer.  The main reason to do this in full passes is
-; because we can avoid needing to use both the X and Y registers during the compositing process and
-; reserve Y to hold the code field address.
-;
-; Also, we can get away with not setting the bank register, this is a wash in terms of speed, but results
-; in simpler, more composable subroutines
-_TBCopyTileDataAndMaskToCBuff
-                 jsr   _TBCopyTileDataToCBuff
-                 jmp   _TBCopyTileMaskToCBuff
-
-_TBCopyTileDataAndMaskToCBuffV
-                 jsr   _TBCopyTileDataToCBuffV
-                 jmp   _TBCopyTileMaskToCBuffV
-
-_TBCopyTileDataToCBuff
-]line            equ   0
-                 lup   8
-                 ldal  tiledata+{]line*4},x
-                 sta   blttmp+{]line*4}
-
-                 ldal  tiledata+{]line*4}+2,x
-                 sta   blttmp+{]line*4}+2
-]line            equ   ]line+1
-                 --^
-                 rts
-
-_TBCopyTileDataToCBuffV
-]src             equ   7
-]dest            equ   0
-                 lup   8
-                 ldal  tiledata+{]src*4},x
-                 sta   blttmp+{]dest*4}
-
-                 ldal  tiledata+{]src*4}+2,x
-                 sta   blttmp+{]dest*4}+2
-]src             equ   ]src-1
-]dest            equ   ]dest+1
-                 --^
-                 rts
-
-; Copy tile mask data into the direct page compositing buffer.
-_TBCopyTileMaskToCBuff
-]line            equ   0
-                 lup   8
-                 ldal  tiledata+{]line*4}+32,x
-                 sta   blttmp+{]line*4}+32
-
-                 ldal  tiledata+{]line*4}+32+2,x
-                 sta   blttmp+{]line*4}+32+2
-]line            equ   ]line+1
-                 --^
-                 rts
-
-_TBCopyTileMaskToCBuffV
-]src             equ   7
-]dest            equ   0
-                 lup   8
-                 ldal  tiledata+{]src*4}+32,x
-                 sta  blttmp+{]dest*4}+32
-
-                 ldal  tiledata+{]src*4}+32+2,x
-                 sta   blttmp+{]dest*4}+32+2
-]src             equ   ]src-1
-]dest            equ   ]dest+1
-                 --^
-                 rts
-
-; Tile 0 specializations
-; _TBConstTile
-;
-; A specialized routine that fills in a tile with a single constant value.  It's intended to be used to
-; fill in solid colors, so there are no specialized horizontal or verical flipped variants
-_TBConstTileX
-                 lda             #0
-                 sta:            $0001,y
-                 sta:            $0004,y
-                 sta             $1001,y
-                 sta             $1004,y
-                 sta             $2001,y
-                 sta             $2004,y
-                 sta             $3001,y
-                 sta             $3004,y
-                 sta             $4001,y
-                 sta             $4004,y
-                 sta             $5001,y
-                 sta             $5004,y
-                 sta             $6001,y
-                 sta             $6004,y
-                 sta             $7001,y
-                 sta             $7004,y
-                 plb
-                 rts
-
-_TBConstTileSlow0
-                 tax
-                 jsr    _TBFillPEAOpcode
-                 jmp    _TBConstTileX
-
-_TBConstTileDataToDP2
-]line            equ   0
-                 lup   8
-                 stz   tmp_tile_data+{]line*4}
-                 stz   tmp_tile_data+{]line*4}+2
-]line            equ   ]line+1
-                 --^
-                 rts