CAC 2016-03-15

ISOLTS TST810 LUF

top of the loop:

; A=000000000022

loop:     sta       w7
          tze       exit
          lda       w6
          tpl       l1
          lda       1,dl
          sta       w4
l1:
          lda       w6
          ada       w6
          ada       w4
          sta       w6
          lda       0,dl
          sta       w4
          lda       w3
          ada       w3
          ada       1,dl
          sta       w3
          lda       w7
          sba       1,dl
          tra       loop
exit:

w3:       oct       0  ; 003143
w4:       oct       0  ; 003144

w6:       oct       0  ; 003146
w7:       oct       0  ; 003147

DBG(974296087)> CPU1 TRACE: 024663 003147755200 (STA 003147) 003147 755(0) 0 1 0 00
DBG(974296087)> CPU1 FINAL: Write(Actual) Write:      abs address=00003147 writeData=000000000022

DBG(974296091)> CPU1 TRACE: 024664 024706600200 (TZE 024706) 024706 600(0) 0 1 0 00

DBG(974296095)> CPU1 TRACE: 024665 003146235200 (LDA 003146) 003146 235(0) 0 1 0 00
DBG(974296095)> CPU1 FINAL: Read (Actual) Read:       abs address=00003146  readData=000011000000

DBG(974296099)> CPU1 TRACE: 024666 024671605200 (TPL 024671) 024671 605(0) 0 1 0 00

DBG(974296103)> CPU1 TRACE: 024671 003146235200 (LDA 003146) 003146 235(0) 0 1 0 00
DBG(974296103)> CPU1 FINAL: Read (Actual) Read:       abs address=00003146  readData=000011000000

DBG(974296107)> CPU1 TRACE: 024672 003146075200 (ADA 003146) 003146 075(0) 0 1 0 00
DBG(974296107)> CPU1 FINAL: Read (Actual) Read:       abs address=00003146  readData=000011000000
A=000022000000

DBG(974296111)> CPU1 TRACE: 024673 003144075200 (ADA 003144) 003144 075(0) 0 1 0 00
DBDBG(974296111)> CPU1 FINAL: Read (Actual) Read:       abs address=00003144  readData=000000000000
A=000022000000

DBG(974296115)> CPU1 TRACE: 024674 003146755200 (STA 003146) 003146 755(0) 0 1 0 00
DBG(974296115)> CPU1 FINAL: Write(Actual) Write:      abs address=00003146 writeData=000022000000

DBG(974296119)> CPU1 TRACE: 024675 000000235207 (LDA 000000,DL) 000000 235(0) 0 1 0 07

DBG(974296123)> CPU1 TRACE: 024676 003144755200 (STA 003144) 003144 755(0) 0 1 0 00
DBG(974296123)> CPU1 FINAL: Write(Actual) Write:      abs address=00003144 writeData=000000000000

DBG(974296127)> CPU1 TRACE: 024677 003143235200 (LDA 003143) 003143 235(0) 0 1 0 00
DBG(974296127)> CPU1 FINAL: Read (Actual) Read:       abs address=00003143  readData=000000000000

DBG(974296131)> CPU1 TRACE: 024700 003143075200 (ADA 003143) 003143 075(0) 0 1 0 00
DBG(974296131)> CPU1 FINAL: Read (Actual) Read:       abs address=00003143  readData=000000000000
A=000000000000

DBG(974296135)> CPU1 TRACE: 024701 000001075207 (ADA 000001,DL) 000001 075(0) 0 1 0 07
A=000000000001

DBG(974296139)> CPU1 TRACE: 024702 003143755200 (STA 003143) 003143 755(0) 0 1 0 00
DBG(974296139)> CPU1 FINAL: Write(Actual) Write:      abs address=00003143 writeData=000000000001

DBG(974296143)> CPU1 TRACE: 024703 003147235200 (LDA 003147) 003147 235(0) 0 1 0 00
DBG(974296143)> CPU1 FINAL: Read (Actual) Read:       abs address=00003147  readData=000000000022

DBG(974296147)> CPU1 TRACE: 024704 000001175207 (SBA 000001,DL) 000001 175(0) 0 1 0 07
A=000000000021

DBG(974296151)> CPU1 TRACE: 024705 024663710200 (TRA 024663) 024663 710(0) 0 1 0 00

w7: 022, 021, 020, 017, ..., 1, 0, 033, 011, 010, ..., 0, 6, 036, 035, ..., 0, 7, 35, 34, ...., 0, 22, 21, 0, 0,  33, 32, ...,

Agg! Self modifying code!

DBG(977209819)> CPU1 TRACE: 022657 022774452006 (SCPR 022774,QL) 022774 452(0) 0 0 0 06
DBG(977209819)> CPU1 FINAL: Write(Actual) Write:      abs address=00022774 writeData=000000000261
DBG(977209819)> CPU1 FINAL: Write(Actual) Write:      abs address=00022775 writeData=000000000000

261 ; enable mode register, enable HEXFP, enable margin controlm "Strobe the HR on transfer mode" HR = History Register?
     49 (ABSA
  70127 (ADA
   6296 (ANA
     20 (DIS
   1013 (EAA
     90 (LCPR
 102694 (LDA
      1 (LDBR
    225 (LDI
    156 (LPRP0
      8 (RSW
  25106 (SBA
      1 (SBAR
     20 (SCPR
    118 (SCU
    109 (SDBR
     59 (SPRP0
  85520 (STA
   1056 (STC1
   2560 (TNZ
  14053 (TPL
  25105 (TRA
  26593 (TZE
Unless otherwise stated, the content of this page is licensed under Creative Commons Attribution-ShareAlike 3.0 License