!Basic Test Program for Tempest INCLUDE "6502.POD" SETUP POD 6502 ADDRESS SPACE INFORMATION RAM @ 0000-07FF ! PROGRAM RAM - 2114 SRAM RAM @ 2000-2FFF ! VECTOR RAM -2114 SRAM PROGRAM TITLE DPY-TEMPEST TEST PROGRAM Aux TEMPEST TEST PROGRAM REG8 = 60 EXECUTE PAUSE EXECUTE MENU PROGRAM MENU 0: LABEL 0 DPY-MENU 1=RAM 2=ROM 3=VG /1 Aux MENU 1=RAM 2=ROM 3=VG IF REG1 = 1 GOTO 1 IF REG1 = 2 GOTO 2 IF REG1 = 3 GOTO 3 GOTO 0 1: LABEL 1 EXECUTE PROGRAM RAMTEST GOTO 0 2: LABEL 2 EXECUTE PROGRAM ROMTEST GOTO 0 3: LABEL 3 EXECUTE PROGRAM VGTEST GOTO 0 PROGRAM RAMTEST DPY-TESTING PROGRAM RAM @ R2 P2 # Aux TESTING PROGRAM RAM @ R2 P2 RAM SHORT @ 0000-03FF DPY-TESTING PROGRAM RAM @ R4 P4 # Aux TESTING PROGRAM RAM @ R4 P4 RAM SHORT @ 0400-07FF DPY-TESTING VECTOR RAM @ J3 J4 # Aux TESTING VECTOR RAM @ J3 J4 RAM SHORT @ 2000-23FF DPY-TESTING VECTOR RAM @ K3 K4 # Aux TESTING VECTOR RAM @ K3 K4 RAM SHORT @ 2400-27FF DPY-TESTING VECTOR RAM @ L3 L4 # Aux TESTING VECTOR RAM @ L3 L4 RAM SHORT @ 2800-2BFF DPY-TESTING VECTOR RAM @ M3 M4 # Aux TESTING VECTOR RAM @ M3 M4 RAM SHORT @ 2C00-2FFF DPY-RAM TESTING COMPLETE # Aux RAM TESTING COMPLETE PROGRAM ROMTEST 0: LABEL 0 DPY-ROM VERSION 1 - 2 or 3? /1 Aux ROM VERSION 1 - 2 or 3? IF REG1 = 1 GOTO 1 IF REG1 = 2 GOTO 2 IF REG1 = 2 GOTO 3 GOTO 0 1: LABEL 1 DPY-PRESS 1 - 16K ROM OR 2 - 32k? /1 Aux PRESS 1 - 16K ROM OR 2 - 32k? IF REG1 = 1 GOTO 4 IF REG1 = 2 GOTO 5 GOTO 1 4: LABEL 4 DPY-TESTING VECTOR ROM 123 @ N-P3 # Aux TESTING VECTOR ROM 123 @ N-P3 ROM TEST @ 3000-37FF SIG B0FC DPY-TESTING VECTOR ROM 124 @ R3 # Aux TESTING VECTOR ROM 124 @ R3 ROM TEST @ 3800-3FFF SIG 3D1D DPY-TESTING PROGRAM ROM 113 @ D1 # Aux TESTING PROGRAM ROM 113 @ D1 ROM TEST @ 9000-97FF SIG 092C DPY-TESTING PROGRAM ROM 114 @ E1 # Aux TESTING PROGRAM ROM 114 @ E1 ROM TEST @ 9800-9FFF SIG EB50 DPY-TESTING PROGRAM ROM 115 @ F1 # Aux TESTING PROGRAM ROM 115 @ F1 ROM TEST @ A000-A7FF SIG AF2A DPY-TESTING PROGRAM ROM 116 @ H1 # Aux TESTING PROGRAM ROM 116 @ H1 ROM TEST @ A800-AFFF SIG BF11 DPY-TESTING PROGRAM ROM 117 @ J1 # Aux TESTING PROGRAM ROM 117 @ J1 ROM TEST @ B000-B7FF SIG E298 DPY-TESTING PROGRAM ROM 118 @ K1 # Aux TESTING PROGRAM ROM 118 @ K1 ROM TEST @ B800-BFFF SIG 8470 DPY-TESTING PROGRAM ROM 119 @ L-M1 # Aux TESTING PROGRAM ROM 119 @ L-M1 ROM TEST @ C000-C7FF SIG C82E DPY-TESTING PROGRAM ROM 120 @ M-N1 # Aux TESTING PROGRAM ROM 120 @ M-N1 ROM TEST @ C800-CFFF SIG 445B DPY-TESTING PROGRAM ROM 121 @ P1 # Aux TESTING PROGRAM ROM 121 @ P1 ROM TEST @ D000-D7FF SIG 08D4 DPY-TESTING PROGRAM ROM 122 @ R1 # Aux TESTING PROGRAM ROM 122 @ R1 ROM TEST @ D800-DFFF SIG 997F DPY-ROM TEST COMPLETE # Aux ROM TEST COMPLETE 5: LABEL 5 DPY-TESTING VECTOR ROM 138 @ N-P3 # Aux TESTING VECTOR ROM 138 @ N-P3 ROM TEST @ 3000-3FFF SIG 1720 DPY-TESTING PROGRAM ROM 237 @ D1 # Aux TESTING PROGRAM ROM 237 @ D1 ROM TEST @ 9000-9FFF SIG C0FF DPY-TESTING PROGRAM ROM 136 @ F1 # Aux TESTING PROGRAM ROM 136 @ F1 ROM TEST @ A000-AFFF SIG E47D DPY-TESTING PROGRAM ROM 235 @ J1 # Aux TESTING PROGRAM ROM 235 @ J1 ROM TEST @ B000-BFFF SIG FC98 DPY-TESTING PROGRAM ROM 134 @ L-M1 # Aux TESTING PROGRAM ROM 134 @ L-M1 ROM TEST @ C000-CFFF SIG E810 DPY-TESTING PROGRAM ROM 133 @ P1 # Aux TESTING PROGRAM ROM 133 @ P1 ROM TEST @ D000-DFFF SIG 5752 2: LABEL 2 DPY-PRESS 1 - 16K ROM OR 2 - 32k? /1 Aux PRESS 1 - 16K ROM OR 2 - 32k? IF REG1 = 1 GOTO 6 IF REG1 = 2 GOTO 7 GOTO 2 6: LABEL 6 DPY-TESTING VECTOR ROM 123 @ N-P3 # Aux TESTING VECTOR ROM 123 @ N-P3 ROM TEST @ 3000-37FF SIG B0FC DPY-TESTING VECTOR ROM 124 @ R3 # Aux TESTING VECTOR ROM 124 @ R3 ROM TEST @ 3800-3FFF SIG 3D1D DPY-TESTING PROGRAM ROM 113 @ D1 # Aux TESTING PROGRAM ROM 113 @ D1 ROM TEST @ 9000-97FF SIG 092C DPY-TESTING PROGRAM ROM 114 @ E1 # Aux TESTING PROGRAM ROM 114 @ E1 ROM TEST @ 9800-9FFF SIG EB50 DPY-TESTING PROGRAM ROM 115 @ F1 # Aux TESTING PROGRAM ROM 115 @ F1 ROM TEST @ A000-A7FF SIG AF2A DPY-TESTING PROGRAM ROM 116 @ H1 # Aux TESTING PROGRAM ROM 116 @ H1 ROM TEST @ A800-AFFF SIG 0000 DPY-TESTING PROGRAM ROM 217 @ J1 # Aux TESTING PROGRAM ROM 217 @ J1 ROM TEST @ B000-B7FF SIG 294B DPY-TESTING PROGRAM ROM 118 @ K1 # Aux TESTING PROGRAM ROM 118 @ K1 ROM TEST @ B800-BFFF SIG 8470 DPY-TESTING PROGRAM ROM 119 @ L-M1 # Aux TESTING PROGRAM ROM 119 @ L-M1 ROM TEST @ C000-C7FF SIG C82E DPY-TESTING PROGRAM ROM 120 @ M-N1 # Aux TESTING PROGRAM ROM 120 @ M-N1 ROM TEST @ C800-CFFF SIG 445B DPY-TESTING PROGRAM ROM 121 @ P1 # Aux TESTING PROGRAM ROM 121 @ P1 ROM TEST @ D000-D7FF SIG 08D4 DPY-TESTING PROGRAM ROM 222 @ R1 # Aux TESTING PROGRAM ROM 222 @ R1 ROM TEST @ D800-DFFF SIG DF79 7: LABEL 7 DPY-TESTING VECTOR ROM 138 @ N-P3 # Aux TESTING VECTOR ROM 138 @ N-P3 ROM TEST @ 3000-3FFF SIG 1720 DPY-TESTING PROGRAM ROM 237 @ D1 # Aux TESTING PROGRAM ROM 237 @ D1 ROM TEST @ 9000-9FFF SIG C0FF DPY-TESTING PROGRAM ROM 136 @ F1 # Aux TESTING PROGRAM ROM 136 @ F1 ROM TEST @ A000-AFFF SIG E47D DPY-TESTING PROGRAM ROM 235 @ J1 # Aux TESTING PROGRAM ROM 235 @ J1 ROM TEST @ B000-BFFF SIG FC98 DPY-TESTING PROGRAM ROM 134 @ L-M1 # Aux TESTING PROGRAM ROM 134 @ L-M1 ROM TEST @ C000-CFFF SIG E810 DPY-TESTING PROGRAM ROM 133 @ P1 # Aux TESTING PROGRAM ROM 133 @ P1 ROM TEST @ D000-DFFF SIG 5752 DPY-ROM TEST COMPLETE # Aux ROM TEST COMPLETE 3: LABEL 3 DPY-PRESS 1 - 16K ROM OR 2 - 32k? /1 Aux PRESS 1 - 16K ROM OR 2 - 32k? IF REG1 = 1 GOTO 8 IF REG1 = 2 GOTO 9 GOTO 3 8: LABEL 8 DPY-TESTING VECTOR ROM 123 @ N-P3 # Aux TESTING VECTOR ROM 123 @ N-P3 ROM TEST @ 3000-37FF SIG B0FC DPY-TESTING VECTOR ROM 124 @ R3 # Aux TESTING VECTOR ROM 124 @ R3 ROM TEST @ 3800-3FFF SIG 3D1D DPY-TESTING PROGRAM ROM 113 @ D1 # Aux TESTING PROGRAM ROM 113 @ D1 ROM TEST @ 9000-97FF SIG 092C DPY-TESTING PROGRAM ROM 114 @ E1 # Aux TESTING PROGRAM ROM 114 @ E1 ROM TEST @ 9800-9FFF SIG EB50 DPY-TESTING PROGRAM ROM 115 @ F1 # Aux TESTING PROGRAM ROM 115 @ F1 ROM TEST @ A000-A7FF SIG AF2A DPY-TESTING PROGRAM ROM 316 @ H1 # Aux TESTING PROGRAM ROM 316 @ H1 ROM TEST @ A800-AFFF SIG 54AF DPY-TESTING PROGRAM ROM 217 @ J1 # Aux TESTING PROGRAM ROM 217 @ J1 ROM TEST @ B000-B7FF SIG 294B DPY-TESTING PROGRAM ROM 118 @ K1 # Aux TESTING PROGRAM ROM 118 @ K1 ROM TEST @ B800-BFFF SIG 8470 DPY-TESTING PROGRAM ROM 119 @ L-M1 # Aux TESTING PROGRAM ROM 119 @ L-M1 ROM TEST @ C000-C7FF SIG C82E DPY-TESTING PROGRAM ROM 120 @ M-N1 # Aux TESTING PROGRAM ROM 120 @ M-N1 ROM TEST @ C800-CFFF SIG 445B DPY-TESTING PROGRAM ROM 121 @ P1 # Aux TESTING PROGRAM ROM 121 @ P1 ROM TEST @ D000-D7FF SIG 08D4 DPY-TESTING PROGRAM ROM 222 @ R1 # Aux TESTING PROGRAM ROM 222 @ R1 ROM TEST @ D800-DFFF SIG DF79 DPY-ROM TEST COMPLETE # Aux ROM TEST COMPLETE 9: LABEL 9 DPY-TESTING VECTOR ROM 138 @ N-P3 # Aux TESTING VECTOR ROM 138 @ N-P3 ROM TEST @ 3000-3FFF SIG 1720 DPY-TESTING PROGRAM ROM 237 @ D1 # Aux TESTING PROGRAM ROM 237 @ D1 ROM TEST @ 9000-9FFF SIG C0FF DPY-TESTING PROGRAM ROM 136 @ F1 # Aux TESTING PROGRAM ROM 136 @ F1 ROM TEST @ A000-AFFF SIG E47D DPY-TESTING PROGRAM ROM 235 @ J1 # Aux TESTING PROGRAM ROM 235 @ J1 ROM TEST @ B000-BFFF SIG FC98 DPY-TESTING PROGRAM ROM 134 @ L-M1 # Aux TESTING PROGRAM ROM 134 @ L-M1 ROM TEST @ C000-CFFF SIG E810 DPY-TESTING PROGRAM ROM 133 @ P1 # Aux TESTING PROGRAM ROM 133 @ P1 ROM TEST @ D000-DFFF SIG 5752 PROGRAM VGTEST DPY-CONNECT SCOPE,XY MODE. CONT STOP WRITE @ 2000 = 40 WRITE @ 2001 = 80 WRITE @ 2002 = 00 WRITE @ 2003 = 70 WRITE @ 2004 = 00 WRITE @ 2005 = 1E WRITE @ 2006 = 00 WRITE @ 2007 = 60 WRITE @ 2008 = FF WRITE @ 2009 = 60 WRITE @ 200A = FF WRITE @ 200B = 03 WRITE @ 200C = FF WRITE @ 200D = 03 WRITE @ 200E = 00 WRITE @ 200F = 62 WRITE @ 2010 = 40 WRITE @ 2011 = 80 WRITE @ 2012 = 80 WRITE @ 2013 = 00 WRITE @ 2014 = 00 WRITE @ 2015 = 00 WRITE @ 2016 = 01 WRITE @ 2017 = 1F WRITE @ 2018 = 00 WRITE @ 2019 = 40 WRITE @ 201A = 80 WRITE @ 201B = 00 WRITE @ 201C = 80 WRITE @ 201D = 1F WRITE @ 201E = 00 WRITE @ 201F = 00 WRITE @ 2020 = FF WRITE @ 2021 = 40 WRITE @ 2022 = 00 WRITE @ 2023 = E0 DPY-CONFIRM PLUS PATTERN. CONT# Aux CONFIRM PLUS PATTERN. CONT DPY-+=EXIT%1# 0: LABEL 0 WRITE @ 3000 = 00 IF REG1 = 25 GOTO 2 GOTO 0 2: LABEL 2 DPY-## !!!!!! Pause Routine !!!!!!!!!!!!!!! PROGRAM PAUSE REG2 = REG8 DLOOP: DEC REG2 IF REG2 > 0 GOTO DLOOP