9010A bare bones program V2

From: Kev <KKlopp_at_erols.com>
Date: Wed Mar 06 2002 - 20:49:07 EST

<x-html>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN">
<HTML>
<HEAD>

<META content=text/html;charset=iso-8859-1 http-equiv=Content-Type>
<META content='"MSHTML 4.72.3612.1706"' name=GENERATOR>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT color=#000000 size=2><FONT face=Courier>Corrected a few spelling
mistakes, made the menu program functional, added a delay
routine.</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT size=2><FONT face=Courier>Any comments/
suggestions?</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT size=2><FONT face=Courier>Thanks,</FONT></FONT><FONT
face=Courier></FONT></DIV>
<DIV><FONT size=2><FONT face=Courier>Kev</FONT></FONT><FONT
face=Courier></FONT></DIV>
<DIV><FONT size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV><FONT face=Courier></FONT>
<DIV><FONT face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>! BARE BONES ARCADE BOARD
TESTER<BR>!&nbsp; by <A
href="mailto:Mowerman@erols.com">Mowerman@erols.com</A><BR>!<BR>! 3/6/02<BR>!
Ver 2<BR>!<BR>! This is close to a running program that can be used<BR>! to
quickly create a running program for testing arcade boards.<BR>! I have created
a running program from this outline and compiled<BR>! it using the RKSIC.exe
program for the FLUKE 9010A.<BR>!<BR>!<BR>! PROGRAM HOUSEKEEPING
VARIABLES<BR>!<BR>! *GAMENAME....replace with current game name.<BR>!
*PROGRAMMER..replace with current author name.<BR>! *DATE........replace with
original program date.<BR>! *MODDATE.....replace with revision date.<BR>!
*REVISION....replace with revision number.<BR>! *POD.........replace with test
pod required.<BR>!<BR>! BOARD SPECIFIC VARIABLES<BR>!<BR>! *RAMSTART1...replace
with first RAM location.<BR>! *RAMLENGTH1..replace with size of first RAM chip
location.<BR>! *ROMSTART1...replace with first ROM location.<BR>!
*ROMEND1.....replace with last location of first ROM.<BR>! *ROMSIG1.....replace
with Fluke Signature of first ROM.<BR>! *IO1.........replace with first I/O byte
location.<BR>! *DIP1........replace with first Dip Switch byte
location.</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>! *GAMENAME Test Routine<BR>!
Use *POD in CPU processor socket<BR>! Program created by *PROGRAMMER<BR>!
Program written on *DATE<BR>! Revision Date *MODDATE<BR>! Revision number
*REVISION</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>SETUP</FONT></FONT><FONT
face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>&nbsp;&nbsp; TRAP ACTIVE
FORCE LINE NO<BR>&nbsp;&nbsp; TRAP ACTIVE INTERRUPT NO</FONT></FONT><FONT
face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>PROGRAM MAIN<BR>&nbsp;&nbsp;
DPY-*GAMENAME TST<BR>&nbsp;&nbsp; DPY-+-PRESS CONT<BR>&nbsp;&nbsp;
STOP</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT
face=Courier>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!<BR>!
MAIN LOOP ROUTINE</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>! Proposed standard<BR>! 1 =
RAM Test<BR>! 2 = ROM Test<BR>! 3 = SND Test<BR>! 4 = I/O Test<BR>! 5 = DIP
Test<BR>! 6 = PROBE Test<BR>! 0 = Run UUT<BR>!<BR>! Register 1 is used for
keyboard input for
selection<BR>!<BR>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>MAINLOOP:</FONT></FONT><FONT
face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>&nbsp;&nbsp; DPY- 1-RAM 2-ROM
3-SND 4-IO 5-DIP\1<BR>&nbsp;&nbsp; IF REG1 = 1 GOTO RAMTEST<BR>&nbsp;&nbsp; IF
REG1 = 2 GOTO ROMTEST<BR>&nbsp;&nbsp; IF REG1 = 3 GOTO SNDTEST<BR>&nbsp;&nbsp;
IF REG1 = 4 GOTO IOTEST<BR>&nbsp;&nbsp; IF REG1 = 5 GOTO DIPTEST<BR>&nbsp;&nbsp;
IF REG1 = 6 GOTO PRBTEST<BR>&nbsp;&nbsp; IF REG1 = 9 GOTO RTEST<BR>&nbsp;&nbsp;
GOTO MAINLOOP</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT
face=Courier>RAMTEST:<BR>&nbsp;&nbsp;&nbsp;&nbsp; EXECUTE
RAMTST<BR>&nbsp;&nbsp;&nbsp;&nbsp; GOTO
MAINLOOP<BR>ROMTEST:<BR>&nbsp;&nbsp;&nbsp;&nbsp; EXECUTE
ROMTST<BR>&nbsp;&nbsp;&nbsp;&nbsp; GOTO
MAINLOOP<BR>SNDTEST:<BR>&nbsp;&nbsp;&nbsp;&nbsp; EXECUTE
SNDTST<BR>&nbsp;&nbsp;&nbsp;&nbsp; GOTO
MAINLOOP<BR>IOTEST:<BR>&nbsp;&nbsp;&nbsp;&nbsp; EXECUTE
IOTST<BR>&nbsp;&nbsp;&nbsp;&nbsp; GOTO
MAINLOOP<BR>DIPTEST:<BR>&nbsp;&nbsp;&nbsp;&nbsp; EXECUTE
DIPTST<BR>&nbsp;&nbsp;&nbsp;&nbsp; GOTO
MAINLOOP<BR>PRBTEST:<BR>&nbsp;&nbsp;&nbsp;&nbsp; EXECUTE
PRBTST<BR>&nbsp;&nbsp;&nbsp;&nbsp; GOTO
MAINLOOP<BR>RTEST:<BR>&nbsp;&nbsp;&nbsp;&nbsp; EXECUTE
RUNTST<BR>&nbsp;&nbsp;&nbsp;&nbsp; GOTO MAINLOOP</FONT></FONT><FONT
face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT
face=Courier>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!<BR>!&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
RAM TEST<BR>!<BR>! Display each (set) of RAMs as testing many Rams are 4 bit
wide such as<BR>! the common 2114s.<BR>!<BR>! RAM SHORT @ *RAMSTART1 -
*RAMLENGTH1<BR>!<BR>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>PROGRAM
TSTRAM<BR>&nbsp;&nbsp; DPY-TESTING PGM RAM R3 M3#<BR>&nbsp;&nbsp; RAM SHORT @
0-1FFF<BR>&nbsp;&nbsp; DPY- RAM TEST COMPLETE PRESS CONT#<BR>&nbsp;&nbsp;
STOP</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT
face=Courier><BR>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!<BR>!&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
ROM TEST<BR>!<BR>! Promt for version of ROM (if needed).&nbsp; Response goes
into REG1.<BR>! REG1 used for GOTO jump to corresponding LABEL for proper
test.<BR>!<BR>! Rom Test is done by removeable roms rather than blocks of memory
this<BR>! helps pinpoint the bad rom to replace.<BR>!<BR>! ROM TEST @ *ROMSTART1
- *ROMEND1 SIG
*ROMSIG1<BR>!<BR>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>PROGRAM
TSTROM</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>0: LABEL 0<BR>&nbsp;&nbsp;
DPY-ROM VERSION 1 OR 2 ? /1<BR>&nbsp;&nbsp; IF REG1 = 1 GOTO 1<BR>&nbsp;&nbsp;
IF REG1 = 2 GOTO 2<BR>&nbsp;&nbsp; GOTO 0<BR>1: LABEL 1<BR>&nbsp;&nbsp;
DPY-TESTING ROM F1<BR>&nbsp;&nbsp; ROM TEST @ 6800-6FFF SIG 53C9<BR>&nbsp;&nbsp;
DPY-TESTING ROM D E1<BR>&nbsp;&nbsp; ROM TEST @ 7000-77FF SIG
3D7A<BR>&nbsp;&nbsp; GOTO F<BR>2: LABEL 2</FONT></FONT><FONT
face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>!&nbsp; Insert Version 2 ROM
test here</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>F: LABEL F<BR>&nbsp;&nbsp;
DPY-ROM TEST COMPLETE<BR>&nbsp;&nbsp; STOP</FONT></FONT><FONT
face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT
face=Courier>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!<BR>!&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
SND TEST<BR>!<BR>! Sound test very dependant on game.&nbsp; Some games will have
a separate sound<BR>! processor &amp; some may be directly accessable from the
main processor.<BR>! This test is for directly accessable sound
generators.<BR>!<BR>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>PROGRAM
TSTSND</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>&nbsp;&nbsp; REG1 =
40<BR>&nbsp;&nbsp; DPY-Rivet SND. CONT=NEXT<BR>&nbsp;&nbsp; DPY-+ SND%1#<BR>0:
LABEL 0<BR>&nbsp;&nbsp; WRITE @7C00 = 05<BR>&nbsp;&nbsp; IF REG1 = 25 GOTO
1<BR>&nbsp;&nbsp; GOTO 0<BR>1: LABEL 1<BR>&nbsp;&nbsp; REG1 = 40<BR>&nbsp;&nbsp;
DPY-Springs SND. CONT=NEXT SND%1#<BR>2: LABEL 2<BR>&nbsp;&nbsp; WRITE @ 7C00 =
0A<BR>&nbsp;&nbsp; IF REG1 = 25 GOTO 3<BR>&nbsp;&nbsp; GOTO 2<BR>F: LABEL
F<BR>&nbsp;&nbsp; REG1 = 40<BR>&nbsp;&nbsp; DPY-SND TESTS COMPLETE.
PRESS<BR>&nbsp;&nbsp; DPY-+ CONT%1#<BR>&nbsp;&nbsp; STOP</FONT></FONT><FONT
face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT
face=Courier>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!<BR>!&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
I/O TEST<BR>!<BR>! This test may be configured to test all individual inputs one
at a time or<BR>! may just be configured to display the bytewide register of
inputs.&nbsp; By<BR>! looking at bytewide inputs for Normally Open momentary
inputs (buttons /<BR>! joysticks, coins etc) you can verify none are stuck
on.<BR>!<BR>! READ @ *IO1<BR>! REGE is contents of previous 9010A command, so
display
them.<BR>!<BR>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>PROGRAM
TSTIO</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>&nbsp;&nbsp; READ @
*IO1<BR>&nbsp;&nbsp; DPY-IO2 = $E PRESS CONT<BR>&nbsp;&nbsp;
STOP<BR>&nbsp;&nbsp; DPY-IO TESTS COMPLETE. PRESS<BR>&nbsp;&nbsp; DPY-+
CONT%1#<BR>&nbsp;&nbsp; STOP </FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT
face=Courier>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!<BR>!&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
DIP SWITCH TEST<BR>!<BR>! The DIP Test is 3 stages, a All on test, All off test,
Factory settings<BR>!<BR>! Set REGF = *DIP1 location<BR>! REGE is contents of
previous 9010A command, so use it.<BR>! <BR>! I could not get it to compare to
REGE so I used REG1 = REGE and then<BR>! compared to
REG1.<BR>!<BR>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>PROGRAM
DIPTST</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>REGF =
*DIP1</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>SW1ON:<BR>&nbsp;&nbsp; DPY-
TURN ALL DIPS ON AT SW1 #<BR>&nbsp;&nbsp; STOP<BR>&nbsp;&nbsp; READ @
REGF<BR>&nbsp;&nbsp; REG1 = REGE<BR>&nbsp;&nbsp; IF REG1 = FF GOTO
SW1OFF<BR>&nbsp;&nbsp; DPY- ERROR SW1 OFF PRESS CONT # <BR>&nbsp;&nbsp;
STOP<BR>&nbsp;&nbsp; GOTO SW1ON<BR>SW1OFF:&nbsp;&nbsp; <BR>&nbsp;&nbsp; DPY-
TURN ALL DIPS OFF AT SW1 #<BR>&nbsp;&nbsp; STOP<BR>&nbsp;&nbsp; READ
@REGF<BR>&nbsp;&nbsp; REG1 = REGE<BR>&nbsp;&nbsp; IF REG1 = 0 GOTO SW1FACTORY
<BR>&nbsp;&nbsp; DPY- ERROR SW1 ON PRESS CONT #<BR>&nbsp;&nbsp;
STOP<BR>&nbsp;&nbsp; GOTO SW1OFF<BR>SW1FACTORY:<BR>&nbsp;&nbsp; DPY- FACT SET
SW1 00000001 #<BR>&nbsp;&nbsp; STOP<BR>&nbsp;&nbsp; READ @REGF<BR>&nbsp;&nbsp;
REG1 = REGE<BR>&nbsp;&nbsp; IF REG1 = 80 GOTO SW2<BR>&nbsp;&nbsp; DPY- ERROR SW1
FACT PRESS CONT #<BR>&nbsp;&nbsp; STOP<BR>&nbsp;&nbsp; GOTO
SW1FACTORY<BR>&nbsp;SW2:</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>! DONE</FONT></FONT><FONT
face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>&nbsp; DPY-DIP TEST COMPLETE.
PRESS<BR>&nbsp; DPY-+ CONT%1#<BR>&nbsp; STOP</FONT></FONT><FONT
face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT
face=Courier>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!<BR>!&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
PROBE TEST<BR>!<BR>! Copied from Asteroids Test by *Sorry I don't have his name
at the moment<BR>! <BR>! The probe test is designed to excercise given signals
on the board, such<BR>! as flip, enable, select etc to aid in finding
faults.<BR>!<BR>! I'm not real clear on the implementation here, basically I
belive the<BR>! program does a set number of writes to trigger a signal &amp;
the probe counts<BR>! to see if it recieves all of the triggered signals.&nbsp;
I have noticed that<BR>! it is possible to see the 'wrong' signal &amp; thus get
a false positive test.<BR>!<BR>! REG9 = *ProbeLocation1<BR>! REGB = *Number of
Triggers excercised<BR>! REG0 = Number of triggers read by probe<BR>!<BR>!
Improvement or use of Signatures here should be
investigated.<BR>!<BR>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>PROGRAM
TSTPRB</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>&nbsp;&nbsp; SYNC
ADDRESS<BR>&nbsp;&nbsp; DPY-PLACE PROBE ON POINTS<BR>&nbsp;&nbsp; DPY-+
SHOWN.#<BR>&nbsp;&nbsp; STOP<BR>&nbsp;&nbsp; DPY-FLIP 5J-6.#<BR>&nbsp;&nbsp;
STOP<BR>&nbsp;&nbsp; REGB = 1<BR>&nbsp;&nbsp; REG9 = 7D82<BR>&nbsp;&nbsp; REGB =
40<BR>&nbsp;&nbsp; EXECUTE PROGRAM 65<BR>&nbsp;&nbsp; STOP</FONT></FONT><FONT
face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>PROGRAM 65&nbsp;&nbsp; 116
BYTES</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>&nbsp;&nbsp; READ
PROBE<BR>&nbsp;&nbsp; REG1 = REGB<BR>1: LABEL 1<BR>&nbsp;&nbsp; IF REG8 = 0 GOTO
2<BR>&nbsp;&nbsp; READ @ REG9<BR>&nbsp;&nbsp; GOTO 3<BR>2: LABEL
2<BR>&nbsp;&nbsp; WRITE @ REG9 = REGA<BR>3: LABEL 3<BR>&nbsp;&nbsp; DEC
REG1<BR>&nbsp;&nbsp; IF REG1 &gt; 0 GOTO 1<BR>&nbsp;&nbsp; READ
PROBE<BR>&nbsp;&nbsp; REG0 = REG0 AND 7F<BR>&nbsp;&nbsp; IF REG0 = REGB GOTO
4<BR>&nbsp;&nbsp; DPY-+CNT BAD.<BR>&nbsp;&nbsp; GOTO 5<BR>4: LABEL
4<BR>&nbsp;&nbsp; DPY-+ OK. <BR>5: LABEL 5<BR>&nbsp;&nbsp; DPY-+COUNT
@0=@B#<BR>&nbsp;&nbsp; STOP</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT
face=Courier><BR>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!<BR>!&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
RUN UUT TEST<BR>!<BR>! Simply runs Unit Under Test in operating mode<BR>! May
require a pointer, but watchdog/reset feature of board should start<BR>! the
board
correctly<BR>!<BR>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>PROGRAM
TSTRUN</FONT></FONT><FONT face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier>&nbsp;&nbsp; DPY-RUNNING
BOARD<BR>&nbsp;&nbsp; RUN UUT<BR>&nbsp;&nbsp; STOP</FONT></FONT><FONT
face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 size=2><FONT
face=Courier>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!<BR>!&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
DELAY<BR>!<BR>! Simply runs a 1 second Delay.
<BR>!<BR>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!</FONT></FONT><FONT
face=Courier></FONT></DIV>
<DIV><FONT color=#000000 size=2><FONT face=Courier></FONT></FONT><FONT
face=Courier></FONT>&nbsp;</DIV>
<DIV><FONT color=#000000 face=Courier size=2><BR>PROGRAM
DELAY<BR>&nbsp;&nbsp;&nbsp; REG1=40&nbsp; 0:<BR> DEC REG1<BR> IF REG1
&gt;0 GOTO 0<BR></FONT></DIV></BODY></HTML>

</x-html>
Received on Wed Mar 06 18:00:53 2002

This archive was generated by hypermail 2.1.8 : Tue Dec 02 2003 - 18:40:41 EST