Fluke File 2, what does it do?

From: Kev <KKlopp_at_erols.com>
Date: Thu Mar 28 2002 - 21:52:32 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 size=2>
<P>I started running through some of the Fluke 0X files posted by John.&nbsp;
Anyone know what these are for?</P>
<P>&nbsp;</P>
<P>File02 had some interesting stuff.&nbsp; The first program in File 2 could be
used to read roms from a board and send it to the AUX (serial port).</P>
<P>&nbsp;</P>
<P>I jotted a few notes....</P>
<P>&nbsp;</P>
<P>Comments?</P>
<P>&nbsp;</P>
<P>Thanks,</P>
<P>Kev</P>
<P>&nbsp;</P>
<P>&nbsp;</P>
<P>&nbsp;</P>
<P>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!</P>
<P>!</P>
<P>! Program 2 displays value of memory locations one at a</P>
<P>! time sequentially</P>
<P>!</P>
<P>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!</P>
<P>PROGRAM 2 161 BYTES</P>
<P></P>
<P>DPY-ENTER UUT MEM IN HEX /F</P>
<P>1: LABEL 1</P>
<P>READ @ REGF</P>
<P>IF REGE &gt; F GOTO 2</P>
<P>DPY-UUT MEM.$F = 0$E</P>
<P>DPY-+ * HIT CONT *</P>
<P>GOTO 3</P>
<P>2: LABEL 2</P>
<P>DPY-UUT MEM. $F = $E</P>
<P>DPY-+ * HIT CONT *</P>
<P>3: LABEL 3</P>
<P>STOP</P>
<P>INC REGF</P>
<P>IF FFFF &gt;= REGF GOTO 1</P>
<P>DPY-ENTER NEW VALUE /F</P>
<P>GOTO 1</P>
<P>PROGRAM 3 1821 BYTES</P>
<P>DPY-ENTER PROGRAM AREA? /8</P>
<P>DPY-ENTER TEST RAM START? /6</P>
<P>DPY-ENTER TEST RAM END? /5</P>
<P>REGA = REG8</P>
<P>REG9 = 06</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 0C</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 11</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REG5 INC AND FF</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REG5 INC SHR SHR SHR SHR</P>
<P>REG9 = REG9 SHR SHR SHR SHR</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 31</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REGB = 74</P>
<P>EXECUTE PROGRAM 10</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REGC</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 21</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REG6 AND FF</P>
<P>EXECUTE PROGRAM 8</P>
<P>REG9 = REG6 SHR SHR SHR SHR</P>
<P>REG9 = REG9 SHR SHR SHR SHR</P>
<P>INC REG8</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = AF</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = E5</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 77</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = EE</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = FF</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 23</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 77</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 23</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 4F</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7D</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = BB</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 79</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = C2</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REGB = 11</P>
<P>EXECUTE PROGRAM 10</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REGC</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7C</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = BA</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 79</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = C2</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REGB = 11</P>
<P>EXECUTE PROGRAM 10</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REGC</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = E1</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = E5</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7E</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = EE</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = FF</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = B9</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = C2</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REGB = 53</P>
<P>EXECUTE PROGRAM 10</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REGC</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 23</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7E</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = B9</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = C2</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REGB = 5B</P>
<P>EXECUTE PROGRAM 10</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REGC</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 23</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7D</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = BB</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = C2</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REGB = 2A</P>
<P>EXECUTE PROGRAM 10</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REGC</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7C</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = BA</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = C2</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REGB = 2A</P>
<P>EXECUTE PROGRAM 10</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REGC</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = E1</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 23</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 1B</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7D</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = BB</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 13</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = C2</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REGB = 0B</P>
<P>EXECUTE PROGRAM 10</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REGC</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 1B</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7C</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = BA</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 13</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = C2</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REGB = 0B</P>
<P>EXECUTE PROGRAM 10</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REGC</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 05</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 79</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 21</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REG6 AND FF</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REG6 SHR SHR SHR SHR</P>
<P>REG9 = REG9 SHR SHR SHR SHR</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = C2</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REGB = 0C</P>
<P>EXECUTE PROGRAM 10</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REGC</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 76</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = F5</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 79</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = EE</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = FF</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 4F</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = F1</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = EE</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = FF</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 32</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REGB = 6B</P>
<P>EXECUTE PROGRAM 10</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REGC</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 79</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 32</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REGB = 6C</P>
<P>EXECUTE PROGRAM 10</P>
<P>EXECUTE PROGRAM 8</P>
<P>REG9 = REGC</P>
<P>INC REG8</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7C</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 32</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REGB = 6D</P>
<P>EXECUTE PROGRAM 10</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REGC</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7D</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 32</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REGB = 6E</P>
<P>EXECUTE PROGRAM 10</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REGC</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 76</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = AA</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = BB</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = CC</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = DD</P>
<P>EXECUTE PROGRAM 8</P>
<P>RUN UUT @ REGA</P>
<P>DPY-WAIT 30 SEC.</P>
<P>DPY-+ THEN HIT CONT</P>
<P>STOP</P>
<P>REGB = 6B</P>
<P>1: LABEL 1</P>
<P>INC REGA</P>
<P>DEC REGB</P>
<P>IF REGB &gt; 0 GOTO 1</P>
<P>READ @ REGA</P>
<P>REGD = REGE</P>
<P>INC REGA</P>
<P>READ @ REGA</P>
<P>REGD = REGD SHL SHL SHL SHL</P>
<P>REGD = REGD SHL SHL SHL SHL</P>
<P>REGD = REGD OR REGE</P>
<P>INC REGA</P>
<P>READ @ REGA</P>
<P>REGD = REGD SHL SHL SHL SHL</P>
<P>REGD = REGD SHL SHL SHL SHL</P>
<P>REGD = REGD OR REGE</P>
<P>INC REGA</P>
<P>READ @ REGA</P>
<P>REGD = REGD SHL SHL SHL SHL</P>
<P>REGD = REGD SHL SHL SHL SHL</P>
<P>REGD = REGD OR REGE</P>
<P>IF REGD = AABBCCDD GOTO 2</P>
<P>DPY-** RAM FAILURE **</P>
<P>DPY-+ HIT CONT</P>
<P>STOP</P>
<P>REGE = REGD AND FFFF</P>
<P>DPY-LOC FAILURE= $E</P>
<P>DPY-+ HIT CONT</P>
<P>STOP</P>
<P>REGE = REGD AND FF0000</P>
<P>REGE = REGE SHR SHR SHR SHR</P>
<P>REGE = REGE SHR SHR SHR SHR</P>
<P>REGE = REGE SHR SHR SHR SHR</P>
<P>REGE = REGE SHR SHR SHR SHR</P>
<P>IF REGE &gt; F GOTO 4</P>
<P>DPY-DATA WRITTEN=0$E</P>
<P>GOTO 5</P>
<P>4: LABEL 4</P>
<P>DPY-DATA WRITTEN=$E</P>
<P>5: LABEL 5</P>
<P>DPY-+ HIT CONT</P>
<P>STOP</P>
<P>REGE = REGD AND FF000000</P>
<P>REGE = REGE SHR SHR SHR SHR</P>
<P>REGE = REGE SHR SHR SHR SHR</P>
<P>REGE = REGE SHR SHR SHR SHR</P>
<P>REGE = REGE SHR SHR SHR SHR</P>
<P>REGE = REGE SHR SHR SHR SHR</P>
<P>REGE = REGE SHR SHR SHR SHR</P>
<P>IF REGE &gt; F GOTO 6</P>
<P>DPY-DATA WRITTEN= 0$E</P>
<P>GOTO 7</P>
<P>6: LABEL 6</P>
<P>DPY-DATA READ= $E</P>
<P>7: LABEL 7</P>
<P>GOTO 3</P>
<P>2: LABEL 2</P>
<P>DPY-** RAM TESTED O.K. **</P>
<P>3: LABEL 3</P>
<P>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!</P>
<P>!</P>
<P>! Program 4 trys to determine which address line the probe</P>
<P>! is placed on. It doesn't work flawlessly.</P>
<P>!</P>
<P>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!</P>
<P>PROGRAM 4 173 BYTES</P>
<P>SYNC ADDRESS</P>
<P>1: LABEL 1</P>
<P>DPY-PLACE PROBE - HIT CONT</P>
<P>STOP</P>
<P>REG1 = 1</P>
<P>REG2 = 0</P>
<P>2: LABEL 2</P>
<P>READ PROBE</P>
<P>READ @ REG1</P>
<P>READ PROBE</P>
<P>IF REG0 AND 1000000 &gt; 0 GOTO 3</P>
<P>IF REG2 = F GOTO 4</P>
<P>SHL REG1</P>
<P>INC REG2</P>
<P>GOTO 2</P>
<P>3: LABEL 3</P>
<P>DPY-PROBE ON ADDRESS BIT @2</P>
<P>GOTO 5</P>
<P>4: LABEL 4</P>
<P>DPY-NOT AN ADDRESS LINE</P>
<P>5: LABEL 5</P>
<P>DPY-+-NEW PT?3</P>
<P>IF REG3 = 1 GOTO 1</P>
<P>DPY-COMPLETE</P>
<P>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!</P>
<P>!</P>
<P>! Program 5 has you probe Data lines sequentially</P>
<P>!</P>
<P>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!</P>
<P>PROGRAM 5 322 BYTES</P>
<P>SYNC DATA</P>
<P>A: LABEL A</P>
<P>REG1 = 0</P>
<P>REG2 = 96EC</P>
<P>1: LABEL 1</P>
<P>DPY-PROBE ON DATA BIT $1</P>
<P>DPY-+-PRESS CONT</P>
<P>STOP</P>
<P>RAMP @ 1000</P>
<P>READ PROBE</P>
<P>REG0 = REG0 SHR SHR SHR SHR</P>
<P>REG0 = REG0 SHR SHR SHR SHR</P>
<P>REG0 = REG0 AND FFFF</P>
<P>IF REG0 = REG2 GOTO 2</P>
<P>DPY-SIG INCORRECT-</P>
<P>DPY-+WAS $0 NOT $2</P>
<P>GOTO 3</P>
<P>2: LABEL 2</P>
<P>DPY-SIG CORRECT-$0</P>
<P>DPY-+-HIT CONT</P>
<P>STOP</P>
<P>INC REG1</P>
<P>IF REG1 &gt; 1 GOTO 4</P>
<P>REG2 = 725B</P>
<P>GOTO 1</P>
<P>4: LABEL 4</P>
<P>IF REG1 &gt; 2 GOTO 5</P>
<P>REG2 = E5ED</P>
<P>GOTO 1</P>
<P>5: LABEL 5</P>
<P>IF REG1 &gt; 3 GOTO 6</P>
<P>REG2 = 5BE0</P>
<P>GOTO 1</P>
<P>6: LABEL 6</P>
<P>IF REG1 &gt; 4 GOTO 7</P>
<P>REG2 = 7E25</P>
<P>GOTO 1</P>
<P>7: LABEL 7</P>
<P>IF REG1 &gt; 5 GOTO 8</P>
<P>REG2 = 85EA</P>
<P>GOTO 1</P>
<P>8: LABEL 8</P>
<P>IF REG1 &gt; 6 GOTO 9</P>
<P>REG2 = 77C7</P>
<P>GOTO 1</P>
<P>9: LABEL 9</P>
<P>IF REG1 &gt; 7 GOTO A</P>
<P>REG2 = 6EBE</P>
<P>GOTO 1</P>
<P>3: LABEL 3</P>
<P>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!</P>
<P>!</P>
<P>! Program 6 creates a Data signature</P>
<P>!</P>
<P>!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!</P>
<P>PROGRAM 6 145 BYTES</P>
<P>REG1 = 0</P>
<P>REG2 = 1100</P>
<P>1: LABEL 1</P>
<P>WRITE @ REG2 = REG1</P>
<P>INC REG1</P>
<P>INC REG2</P>
<P>IF REG1 &gt; FF GOTO 2</P>
<P>GOTO 1</P>
<P>2: LABEL 2</P>
<P>DPY-** PROBE 0 **</P>
<P>DPY-+-HIT CONT</P>
<P>STOP</P>
<P>SYNC DATA</P>
<P>REG2 = 1100</P>
<P>3: LABEL 3</P>
<P>READ @ REG2</P>
<P>INC REG2</P>
<P>IF 1200 &gt; REG2 GOTO 3</P>
<P>READ PROBE</P>
<P>REG0 = REG0 SHR SHR SHR SHR</P>
<P>REG0 = REG0 SHR SHR SHR SHR</P>
<P>REG0 = REG0 AND FFFF</P>
<P>DPY-** SIG=$0 **</P>
<P>PROGRAM 7 779 BYTES</P>
<P>DPY-WHERE IN RAM ?/8</P>
<P>REG7 = REG8</P>
<P>REG7 = REG7 SHR SHR SHR SHR</P>
<P>REG7 = REG7 SHR SHR SHR SHR</P>
<P>DPY-PROM START ?/6</P>
<P>DPY-PROM END ?/5</P>
<P>REG9 = 21</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REG6</P>
<P>REG9 = REG6 AND FF</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REG6</P>
<P>REG9 = REG9 SHR SHR SHR SHR</P>
<P>REG9 = REG9 SHR SHR SHR SHR</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = AF</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 01</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REG5</P>
<P>REG9 = REG9 AND FF</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REG5</P>
<P>REG9 = REG9 SHR SHR SHR SHR</P>
<P>REG9 = REG9 SHR SHR SHR SHR</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 11</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 0</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 86</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = D2</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 0F</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REG7</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 1C</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 57</P>
<P>0. EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 23</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7D</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = A9</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7A</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = C2</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = A</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REG7</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 57</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7C</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = A8</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7A</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = C2</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = A</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REG7</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 86</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = D2</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 23</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REG7</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 1C</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 32</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 01</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>INC REG7</P>
<P>REG9 = REG7</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 7B</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 32</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 0</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = REG7</P>
<P>EXECUTE PROGRAM 8</P>
<P>INC REG8</P>
<P>REG9 = 76</P>
<P>EXECUTE PROGRAM 8</P>
<P>DEC REG7</P>
<P>REG7 = REG7 SHL SHL SHL SHL</P>
<P>REG7 = REG7 SHL SHL SHL SHL</P>
<P>RUN UUT @ REG7</P>
<P>DPY-HIT CONT </P>
<P>STOP</P>
<P>REG7 = REG7 SHR SHR SHR SHR</P>
<P>REG7 = REG7 SHR SHR SHR SHR</P>
<P>INC REG7</P>
<P>REG7 = REG7 SHL SHL SHL SHL</P>
<P>REG7 = REG7 SHL SHL SHL SHL</P>
<P>INC REG7</P>
<P>READ @ REG7</P>
<P>REGD = REGE</P>
<P>DEC REG7</P>
<P>READ @ REG7</P>
<P>REGE = REGE SHL SHL SHL SHL</P>
<P>REGE = REGE SHL SHL SHL SHL</P>
<P>REGE = REGE OR REGD</P>
<P>IF REGE &gt; FFF GOTO 4</P>
<P>IF REGE &gt; FF GOTO 3</P>
<P>IF REGE &gt; F GOTO 2</P>
<P>DPY-CHECKSUM = 000$E</P>
<P>GOTO 5</P>
<P>2: LABEL 2</P>
<P>DPY-CHECKSUM = 00$E</P>
<P>GOTO 5</P>
<P>3: LABEL 3</P>
<P>DPY-CHECKSUM = 0$E</P>
<P>GOTO 5</P>
<P>4: LABEL 4</P>
<P>DPY-CHECKSUM = $E</P>
<P>5: LABEL 5</P>
<P>PROGRAM 8 9 BYTES</P>
<P>WRITE @ REG8 = REG9</P>
<P>PROGRAM 10 54 BYTES</P>
<P>REG9 = REGA</P>
<P>1: LABEL 1</P>
<P>INC REG9</P>
<P>DEC REGB</P>
<P>IF REGB &gt; 0 GOTO 1</P>
<P>REGC = REG9 SHR SHR SHR SHR</P>
<P>REGC = REGC SHR SHR SHR SHR</P>
<P>REG9 = REG9 AND FF</P>
<P>2: LABEL 2</P>
<P>PROGRAM 12 179 BYTES</P>
<P>DPY-ENTER UUT MEM IN HEX /F</P>
<P>1: LABEL 1</P>
<P>REGF = REGF OR 800000</P>
<P>READ @ REGF</P>
<P>REG3 = REGF AND FFFFF</P>
<P>IF REGE &gt; F GOTO 2</P>
<P>DPY-UUT MEM.$3=0$E</P>
<P>DPY-+ * HIT CONT *</P>
<P>GOTO 3</P>
<P>2: LABEL 2</P>
<P>DPY-UUT MEM.$3=$E</P>
<P>DPY-+ * HIT CONT *</P>
<P>3: LABEL 3</P>
<P>STOP</P>
<P>INC REGF</P>
<P>IF 8FFFFF &gt;= REGF GOTO 1</P>
<P>DPY-ENTER NEW VALUE /F</P>
<P>GOTO 1</P>
<P>PROGRAM 14 197 BYTES</P>
<P>SYNC ADDRESS</P>
<P>1: LABEL 1</P>
<P>DPY-PLACE PROBE - HIT CONT</P>
<P>STOP</P>
<P>REG2 = 0</P>
<P>REG3 = 800000</P>
<P>REG4 = 1</P>
<P>2: LABEL 2</P>
<P>REG1 = REG3 OR REG4</P>
<P>READ PROBE</P>
<P>READ @ REG1</P>
<P>READ PROBE</P>
<P>IF REG0 AND 1000000 &gt; 0 GOTO 3</P>
<P>IF REG2 = 13 GOTO 4</P>
<P>SHL REG4</P>
<P>INC REG2</P>
<P>GOTO 2</P>
<P>3: LABEL 3</P>
<P>DPY-PROBE ON ADDRESS BIT @2</P>
<P>GOTO 5</P>
<P>4: LABEL 4</P>
<P>DPY-** NOT ADDRESS LINE **</P>
<P>5: LABEL 5</P>
<P>DPY-+-NEW PT?3</P>
<P>IF REG3 = 1 GOTO 1</P>
<P>DPY- COMPLETE</P>
<P>PROGRAM 15 579 BYTES</P>
<P>REG8 = 100</P>
<P>REG9 = B8</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = 8EFC</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = BED8</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = 0</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = BB</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = B400</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = 8A00</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = 0304</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = 46D8</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = 8146</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = FE</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = 7520</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = B8F4</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = 0</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = D88E</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = 1E89</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = 200</P>
<P>WRITE @ REG8 = REG9</P>
<P>INC REG8</P>
<P>INC REG8</P>
<P>REG9 = F4</P>
<P>WRITE @ REG8 = REG9</P>
<P>RUN UUT @ 00100</P>
<P>DPY-FOR DCO CHECKSUMS</P>
<P>DPY-+- HIT CONT</P>
<P>STOP</P>
<P>READ @ 00200</P>
<P>DPY-DCO ROM-A28 = $E</P>
<P>WRITE @ 00102 = 8EFE</P>
<P>RUN UUT @ 100</P>
<P>DPY-+ HIT CONT</P>
<P>STOP</P>
<P>READ @ 00200</P>
<P>DPY-DCO ROM-A29 = $E</P>
<P>WRITE @ 102 = 8EFC</P>
<P>WRITE @ 106 = 1</P>
<P>WRITE @ 114 = 1FE</P>
<P>RUN UUT @ 100</P>
<P>DPY-+ HIT CONT</P>
<P>STOP</P>
<P>READ @ 200</P>
<P>DPY-DCO ROM-A46 = $E</P>
<P>WRITE @ 102 = 8EFE</P>
<P>RUN UUT @ 100</P>
<P>DPY-+ HIT CONT</P>
<P>STOP</P>
<P>READ @ 200</P>
<P>DPY-DCO ROM-A47 = $E</P>
<P>STOP</P>
<P>DPY-CHECKSUM C0MPLETE.</P>
<P>STOP</P>
<P>STOP</P>
<P>STOP</P></FONT></DIV></BODY></HTML>

</x-html>
Received on Thu Mar 28 20:09:02 2002

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