;; #LAYOUT# STD *        #TAKE
;; #LAYOUT# CRT KERNAL_1 #TAKE
;; #LAYOUT# M65 KERNAL_1 #TAKE
;; #LAYOUT# *   *        #IGNORE

;
; Tape (normal) helper routine - checksum calculation
;


!ifdef CONFIG_TAPE_NORMAL {


tape_normal_update_checksum:

	lda INBIT
	eor RIPRTY
	sta RIPRTY

	rts
}