22 lines
290 B
ArmAsm
22 lines
290 B
ArmAsm
;; #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
|
|
}
|