;
;Memory Test
;
D400 INC $11 ; increment contents of memory containing low byte address (initialized at 0)
D402 BNE $D408 ; If not zero, continue to D408
D404 INC $12 ; If zero, bump high byte address which was initialized to 04
D406 BMI $D417 ; Jump when hi byte hits $80 (32K) to initms Output Power-Up Message
D408 LDA #$55 ; Load $55 test pattern
D40A STA ($11),Y ; Store test pattern in memory indirectly addressed by location 11 & 12
; Y register will always stay at zero in this loop
D40C CMP ($11),Y ; Compare Memory contents with ACC
D40E BNE $D417 ; If not equal, quit and go to initms Output Power-Up Message
D410 ASL ; Shift ACC left to $AA test pattern
D411 STA ($11),Y ; Store test pattern in memory
D413 CMP ($11),Y ; Compare Memory contents with ACC
D415 BEQ $D400 ; If Pass, go back to start of memory test loop to increment address
; If Fail, drop to initms with current RAM memory address
;
; initms Output Power-Up Message