!Basic Test Program for Omega Race INCLUDE "Z80.POD" SETUP POD Z80 ADDRESS SPACE INFORMATION RAM @ 4000-4BFF ! PROGRAM RAM - 2114 SRAM RAM @ 8000-8FFF ! VECTOR RAM -2114 SRAM PROGRAM TITLE DPY-OMEGA RACE TEST PROGRAM Aux OMEGA RACE TEST PROGRAM REG8 = 60 EXECUTE PAUSE EXECUTE MENU PROGRAM MENU 0: LABEL 0 DPY-MENU 1=RAM 2=ROM /1 Aux MENU 1=RAM 2=ROM IF REG1 = 1 GOTO 1 IF REG1 = 2 GOTO 2 GOTO 0 1: LABEL 1 EXECUTE PROGRAM RAMTEST GOTO 0 2: LABEL 2 EXECUTE PROGRAM ROMTEST GOTO 0 PROGRAM RAMTEST BUS TEST DPY-TESTING PROGRAM RAM @ S2 S3 # Aux TESTING PROGRAM RAM @ S2 S3 RAM SHORT @ 4000-43FF DPY-TESTING PROGRAM RAM @ RS2 R3 # Aux TESTING PROGRAM RAM @ RS2 R3 RAM SHORT @ 4400-47FF DPY-TESTING PROGRAM RAM @ RP2 P3 # Aux TESTING PROGRAM RAM @ RP2 P3 RAM SHORT @ 4800-4BFF DPY-TESTING VECTOR RAM @ ML1 H1 # Aux TESTING VECTOR RAM @ ML1 H1 RAM SHORT @ 8000-83FF DPY-TESTING VECTOR RAM @ MN1 J1 # Aux TESTING VECTOR RAM @ MN1 J1 RAM SHORT @ 8400-87FF DPY-TESTING VECTOR RAM @ NP1 KJ1 # Aux TESTING VECTOR RAM @ NP1 KJ1 RAM SHORT @ 8800-8BFF DPY-TESTING VECTOR RAM @ LK1 KL1 # Aux TESTING VECTOR RAM @ LK1 KL1 RAM SHORT @ 8C00-8FFF DPY-TESTING SOUND RAM @ K4 J4 # Aux TESTING SOUND RAM @ K4 J4 RAM SHORT @ 10000-103FF DPY-RAM TESTING COMPLETE # Aux RAM TESTING COMPLETE EXECUTE PAUSE PROGRAM ROMTEST BUS TEST 0: LABEL 0 DPY-TESTING PROGRAM ROM MX4D @ M8 # Aux TESTING PROGRAM ROM MX4D ROM TEST @ 0000-0FFF SIG 9B58 DPY-TESTING PROGRAM ROM LX4D @ L8 # Aux TESTING PROGRAM ROM LX4D @ L8 ROM TEST @ 1000-1FFF SIG 57EE DPY-TESTING PROGRAM ROM KX4D @ K8 # Aux TESTING PROGRAM ROM KX4D @ K8 ROM TEST @ 2000-2FFF SIG 3F07 DPY-TESTING PROGRAM ROM JX4D @ J8 # Aux TESTING PROGRAM ROM JX4D @ J8 ROM TEST @ 3000-3FFF SIG 4B6C DPY-TESTING VECTOR ROM EX4D @ E1 # Aux TESTING VECTOR ROM EX4D @ E1 ROM TEST @ 9000-97FF SIG 286F DPY-TESTING VECTOR ROM FX4D @ F1 # Aux TESTING VECTOR ROM FX4D @ F1 ROM TEST @ 9800-9FFF SIG A9F1 DPY-TESTING SOUND ROM KX4D @ K5 # Aux TESTING SOUND ROM KX4D @ K5 ROM TEST @ 10000-107FF SIG 7D72 DPY-ROM TEST COMPLETE # Aux ROM TEST COMPLETE STOP EXECUTE PAUSE !!!!!! Pause Routine !!!!!!!!!!!!!!! PROGRAM PAUSE REG2 = REG8 DLOOP: DEC REG2 IF REG2 > 0 GOTO DLOOP