1 C00   19:29 JUN 20,'83                                                                          PAGE    1
A      1                  9999.999  +END
1 C00   19:29 JUN 20,'83                                                                          PAGE    2
A   .SS BA,HA,WA,DA,LF,CF,AF,AFA,NAME,NUM,ABSVAL
    .SS R0,R1,R2,R3,R4,R5,R6,R7,R8,R9,R10,R11,R12,R13,R14,R15
    .SS X1,X2,X3,X4,X5,X6,X7,SCOR,TCOR,%,%%
    .END
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE    3
A       1                                     PCC
        2         TEXT               CATALOG  EQU      C'0705'
        3         TEXT               VERSION  EQU      C'H02'
        4                            TITLE    EQU      S:PT('AKU CPU BENCHMARK',;
        5         TEXT                                 ' 960-',CATALOG,'-',VERSION)

        7                                     SYSTEM   SIG9P

        9         00000000           R0       EQU      0
       10         00000001           R1       EQU      1
       11         00000002           R2       EQU      2
       12         00000003           R3       EQU      3
       13         00000004           R4       EQU      4
       14         00000005           R5       EQU      5
       15         00000006           R6       EQU      6
       16         00000007           R7       EQU      7
       17         00000008           R8       EQU      8
       18         00000009           R9       EQU      9
       19         0000000A           R10      EQU      X'A'
       20         0000000B           R11      EQU      X'B'
       21         0000000C           R12      EQU      X'C'
       22         0000000D           R13      EQU      X'D'
       23         0000000E           R14      EQU      X'E'
       24         0000000F           R15      EQU      X'F'
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE    4
A      26                            * PROCEDURE TO GENERATE THE ENTIRE BENCHMARK

       28         00000000           EXPAND   CNAME
       29                                     PROC
       30                                     LIST     0
       31                            CV       SET      0
       32                            CX       DO       NUM(LO)
       33                                     DO       CV<CX
       34                                     LW,8     =FS'1.0'
       35                                     STW,8    VV
       36                            CV       SET      CX
       37                                     FIN
       38                                     DO1      LS(CX)
       39                                     GEN,8,4,20  LO(CX),8,VV
       40                                     DO1      LX(CX)
       41                                     GEN,8,4,3,17  LO(CX),8,1,VV
       42                                     DO1      LI(CX)
       43                                     GEN,1,7,4,20  1,LO(CX),8,VI
       44                                     FIN
       45                                     DO1 11
       46                                     BDR,8  %+1
       47                                     DO1 46
       48                                     BIR,8  %+1
       49                                     DO1 112
       50                                     BAL,9  %+1
       51                                     DO1 1192
       52                                     B  %+1
       53                                     LIST     1
       54                                     PEND

       56                            * PROCEDURE FOR GENERATING DICTIONARY DOUBLE WORDS

       58         00000000           :PROCDIC CNAME
       59                                     PROC
       60                            LF       GEN,32,3,3,3,3,4,16  AF(1),ABSVAL(AF(2)),ABSVAL(AF(3)),;
       61                                                          ABSVAL(AF(4)),ABSVAL(AF(5)),;
       62                                                          ABSVAL(AF(6)),ABSVAL(AF(7))
       63                                     PEND

       65                            * PROCEDURE TO DEFINE VARIOUS HIGHER-LEVEL INSTRUCTIONS

       67         00000000           ENTER    CNAME                      PUSH R15 INTO
       68                                     PROC                        THE LINK STACK
       69                            LF       PSW,R15  DPM:STK
       70                                     PEND

       72         00000000           EXIT     CNAME                      POP LINK STACK
       73                                     PROC                        AND EXIT VIA R15
       74                            LF       PLW,R15  DPM:STK
       75                                     B        *R15
       76                                     PEND
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE    5
A      78                            *  MONITOR LINK TABLE
       79                            *  ------------------
       80                            *                     THIS TABLE IS LOADED BY THE MONITOR FOR THE
       81                            *  PURPOSE OF ESTABLISHING COMMUNICATIONS BETWEEN THE TEST PROGRAM AND
       82                            *  THE MONITOR (DPM).

       84   01 00200                          ORG      X'200'
            01 00200
       85         01 00200           :MLT     EQU      %                 ABSOLUTE RECOVERY LOCATION
       86         01 00201           :P1      EQU      :MLT+1            DIRECTIVE PARAMETER 1
       87         01 00202           :P2      EQU      :MLT+2            DIRECTIVE PARAMETER 2
       88         01 00203           :P3      EQU      :MLT+3            DIRECTIVE PARAMETER 3
       89         01 00204           :P4      EQU      :MLT+4            DIRECTIVE PARAMETER 4
       90         01 0020F           :DUMP    EQU      :MLT+15           ADDR OF MEMORY DUMP ROUTINE
       91         01 00211           :PSW     EQU      :MLT+17           PARAMETER STATUS WORD
       92         01 00213           :BCDC    EQU      :MLT+19           ADDR OF BCD FORMAT CONVERSION
       93         01 00214           :MONITOR EQU      :MLT+20           DIRECTIVE RETURN ADDRESS
       94         01 00216           :BINC    EQU      :MLT+22           ADDR OF BINARY FORMAT CONVERSION
       95         01 00217           :DECC    EQU      :MLT+23           ADDR OF DECIMAL FORMAT CONVERSION
       96         01 00218           :HEXC    EQU      :MLT+24           ADDR OF HEXADEC FORMAT CONVERSION
       97         01 00219           :1BYTEIN EQU      :MLT+25           ADDR OF 1 BYTE INPUT ROUTINE
       98         01 0021A           :CURBCNT EQU      :MLT+26           CURRENT BYTE COUNT
       99         01 0021B           :ERROR   EQU      :MLT+27           ADDR OF ERROR REPORT ROUTINE
      100         01 0021C           :PRINT   EQU      :MLT+28           ADDR OF MESSAGE PRINT ROUTINE
      101         01 0021D           :SENSE   EQU      :MLT+29           ADDR OF SENSE SWITCH 1,3 TESTS
      102         01 0021E           :MONWAIT EQU      :MLT+30           MONITOR WAIT
      103         01 0021F           :MRECOVR EQU      :MLT+31           BRANCH TO ABSOLUTE RECOVERY LOCATION
      104         01 00220           :MSGOUT  EQU      :MLT+32           MSG OUTPUT DEVICE, TYPE AND ADDR
      105         01 00221           :MSGIN   EQU      :MLT+33           MSG INPUT DEVICE, TYPE AND ADDR
      106         01 00222           :LOADIN  EQU      :MLT+34           ADDR OF INITIAL LOADING DEVICE
      107         01 00223           :ERRORC  EQU      :MLT+35           PROGRAM ERROR COUNT
      108         01 00224           :KSRADR  EQU      :MLT+36           KEYBOARD/PRINTER DEVICE ADDR
      109         01 00225           :MACHINE EQU      :MLT+37           MACHINE TYPE CODE
      110         01 00226           :RELBIAS EQU      :MLT+38           RELOCATION BIAS
      111         01 00227           :RLOADER EQU      :MLT+39           ADDR OF RESIDENT LOADER
      112         01 00228           :DTLFLAG EQU      :MLT+40           DIAGNOSTIC TAPE LIBRARY FLAG
      113         01 00229           :PREPORT EQU      :MLT+41           ADDR OF PARAMETER ERROR REPORT
      114         01 0022A           :QSENSE  EQU      :MLT+42           QUICK SENSE ROUTINE
      115         01 0022B           :WAIT    EQU      :MLT+43           WAIT SUBROUTINE
      116         01 0022C           :DICINDX EQU      :MLT+44           ADDR OF DICTIONARY INDEX
      117         01 0022D           :DICILEN EQU      :MLT+45           LENGTH OF DICTIONARY INDEX
      118         01 0022E           :MEMSIZE EQU      :MLT+46           SYSTEM MEMORY SIZE
      119         01 0022F           :MEMLAST EQU      :MLT+47           LAST USABLE MEMORY LOCATION
      120         01 00230           :MONIOBF EQU      :MLT+48           ADDR OF MONITOR IO BUFFER
      121         01 00231           :MONPBF  EQU      :MLT+49           ADDR OF ABSOLUTE RECOVERY ROUTINE
      122         01 00237           :REMOTE  EQU      :MLT+55           REMOTE CONNECT ROUTINE
      123         01 00238           :CLOCK3  EQU      :MLT+56           10HZ CLOCK (FROM COUNTER 3)
      124         01 00240           :MLTEND  EQU      :MLT+64           LWA MONITOR LINK TABLE
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE    6
A     126                            *  PROGRAM INTERFACE TABLE
      127                            *  -----------------------
      128                            *                          THIS TABLE IS LOADED BY THE TEST PROGRAM FOR
      129                            *  THE PURPOSE OF ESTABLISHING COMMUNICATIONS BETWEEN THE MONITOR (DPM)
      130                            *  AND THE USER PROGRAM.

      132   01 00300                          ORG      X'300'
            01 00300
      133   01 00300    00000339     :PIT0    DATA     :CATALOG          ADDR OF CATALOG NUMBER
      134   01 00301    0000033A     :PIT1    DATA     :PROGID           ADDR OF PROGRAM ID MESSAGE
      135   01 00302    00000320     :PIT2    DATA     :DIC              ADDR OF DIRECTIVE DICTIONARY
      136   01 00303    0000000C A   :PIT3    DATA     :DICEND-:DIC      LENGTH OF DIRECTIVE DICTIONARY
      137   01 00304    0000039D     :PIT4    DATA     :RECOVER          ADDR OF ABSOLUTE RECOVERY ROUTINE
      138   01 00305    0000032C     :PIT5    DATA     :CDT              ADDR OF CONTEXT DESCRIPTION TABLE
      139   01 00306    00000002 A   :PIT6    DATA     :CDTEND-:CDT      LENGTH OF CONTEXT DESCRIPTION TABLE
      140   01 00307    00000000 A   :PIT7    DATA     0                 CURRENT DIRECTIVE (TEXT)
      141   01 00308    0000037A     :PIT8    DATA     :INITIAL          ADDR OF INITIALIZER ROUTINE
      142   01 00309    00000000 A   :PIT9    DATA     0                 LAST MODEL NUMBER STORED IN CDB
      143   01 0030A    00000000 A   :PIT10   DATA     0                 PARAMETER NUMBER IN ERROR
      144   01 0030B    00000000 A   :PIT11   DATA     0                 ADDR OF MSG TO BE PRINTED AFTER INIT
      145   01 0030C    00000000 A   :PIT12   DATA     0                 RUNFLAG, RUN PROG IF FLAG = -1
      146   01 0030D    00000000 A   :PIT13   DATA     0
      147   01 0030E    00000000 A   :PIT14   DATA     0
      148   01 0030F    00000000 A   :PIT15   DATA     0                 USER TRAP AND FAULT HANDLER
      149   01 00310    00000000 A   :PIT16   DATA     0                 LINK FOR INITIAL, ITHLDR

      151         0000000F                    DO       :PIT0+32-%
      152   01 00311    00000000 A            DATA     0
      153                                     FIN
            01 00312    00000000 A
            01 00313    00000000 A
            01 00314    00000000 A
            01 00315    00000000 A
            01 00316    00000000 A
            01 00317    00000000 A
            01 00318    00000000 A
            01 00319    00000000 A
            01 0031A    00000000 A
            01 0031B    00000000 A
            01 0031C    00000000 A
            01 0031D    00000000 A
            01 0031E    00000000 A
            01 0031F    00000000 A
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE    7
A     155                            *  DIRECTIVE DICTIONARY
      156                            *  --------------------
      157                            *                        THIS TABLE SUPPLIES THE MONITOR WITH
      158                            *  INFORMATION ABOUT EACH DIRECTIVE AVAILABLE IN THE TEST PROGRAM.
      159                            *  EACH DICTIONARY ENTRY CONSISTS OF 2 WORDS (64 BITS) WHICH ARE
      160                            *  DEFINED AS FOLLOWS:
      161                            *
      162                            *  BITS 00 THRU 31  4 BYTE MNEMONIC IDENTIFIER IN EBCDIC
      163                            *  BITS 32 THRU 34  TYPE OF CONVERSION FOR PARAMETER 1.
      164                            *  BITS 35 THRU 37  TYPE OF CONVERSION FOR PARAMETER 2.
      165                            *  BITS 38 THRU 40  TYPE OF CONVERSION FOR PARAMETER 3.
      166                            *  BITS 41 THRU 43  TYPE OF CONVERSION FOR PARAMETER 4.
      167                            *  BITS 44 THRU 47  NOT ASSIGNED; MUST BE EQUAL TO ZERO
      168                            *  BITS 48 THRU 63  ROUTINE ADDRESS
      169                            *
      170                            *  TYPE OF PARAMETER CONVERSION
      171                            *
      172                            *  000   HEXADECIMAL
      173                            *  001   DECIMAL
      174                            *  002   ALPHANUMERIC

      176   01 00320                          ORG      X'320'
            01 00320
      177         01 00320           :DIC     EQU      %
      178   01 00320    E3E2E3F0 A            :PROCDIC 'TST0',1,1,0,7,0,TEST     COMPREHENSIVE TEST
                        2470034B
      179   01 00322    E3E2E3F1 A            :PROCDIC 'TST1',1,1,7,7,0,TEST     FUNCTIONAL TEST
                        27F0034B
      180   01 00324    E3E2E3F2 A            :PROCDIC 'TST2',1,1,0,7,0,TEST     RANDOM EXERCISER
                        2470034B
      181   01 00326    E3E2E3F3 A            :PROCDIC 'TST3',1,1,1,1,0,TEST     UTILITY TESTS
                        2490034B
      182   01 00328    E3E2E3F4 A            :PROCDIC 'TST4',0,0,0,0,0,TEST     RANDOM FUNCTIONAL
                        0000034B
      183   01 0032A    D3C9D4E3 A            :PROCDIC 'LIMT',1,1,0,0,0,TEST     LIMIT (PARAMETER SET)
                        2400034B
      184         01 0032C           :DICEND  EQU      %
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE    8
A     186                            *  CONTEXT DESCRIPTION TABLE
      187                            *  -------------------------
      188                            *                             THE CONTEXT DESCRIPTION TABLE ALLOWS
      189                            *  THE MONITOR TO PASS-ON ENVIRONMENTAL INFORMATION FROM THE 'SYST'
      190                            *  DIRECTIVE TO THE TEST PROGRAM. NORMALLY ONLY ONE ENTRY WILL BE
      191                            *  REQUIRED. EACH CONTEXT DESCRIPTION TABLE ENTRY CONSISTS OF 2 WORDS
      192                            *  (64 BITS) WHICH ARE DEFINED AS FOLLOWS:
      193                            *
      194                            *  BITS 00 THRU 08  LENGTH OF CONTEXT DATA BLOCK
      195                            *  BITS 09 THRU 27  NOT ASSIGNED; MUST BE EQUAL TO ZERO
      196                            *  BITS 28 THRU 31  NUMBER OF DEVICE MODEL NUMBERS
      197                            *  BITS 32 THRU 61  ADDR OF CONTEXT DATA BLOCK

      199         01 0032C           :CDT     EQU      :DICEND
      200   01 0032C    05000001 N            GEN,9,19,4,32 :CDBEND-:CDB,0,:CDBMEND-:CDBM,:CDB
                        0000032F
      201         01 0032E           :CDTEND  EQU      %

      203                            *  CONTEXT DATA BLOCK
      204                            *  ------------------
      205                            *                      THE CONTEXT DATA BLOCK CONTAINS ENVIRONMENTAL
      206                            *  INFORMATION FOR THE TEST PROGRAM.

      208         01 0032E           :CDBM    EQU      %
      209   01 0032E    00000000 A            DATA     0
      210         01 0032F           :CDBMEND EQU      %

      212         01 0032F           :CDB     EQU      %
      213   01 0032F    0003     A            DATA,2   3,0               PARAMETER COUNT, MODEL NUMBER
            01 0032F 2  0000     A
      214   01 00330    00000000 A            DATA     0                  SELECTION MASK

      216   01 00331    00000000 A            DATA     0                 DEVICE ADDRESS OF FIRST UNIT
      217   01 00332    00000000 A            DATA     0                 DEVICE ADDRESS OF SECOND UNIT
      218   01 00333    00000000 A            DATA     0                 DEVICE ADDRESS OF THIRD UNIT
      219   01 00334    00000000 A            DATA     0                 DEVICE ADDRESS OF FOURTH UNIT
      220   01 00335    00000000 A            DATA     0                 DEVICE ADDRESS OF FIFTH UNIT
      221   01 00336    00000000 A            DATA     0                 DEVICE ADDRESS OF SIXTH UNIT
      222   01 00337    00000000 A            DATA     0                 DEVICE ADDRESS OF SEVENTH UNIT
      223   01 00338    00000000 A            DATA     0                 DEVICE ADDRESS OF EIGHTH UNIT

      225         01 00339           :CDBEND  EQU      %
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE    9
A     227         01 00339           :CATALOG EQU      %                 PROGRAM CATALOG NUMBER
      228   01 00339    00000000 A            DATA     0

      230         01 0033A           :PROGID  EQU      %                 PROGRAM IDENTIFICATION MESSAGE
      231   01 0033A    1EC1D2E4 A            TEXTC    TITLE
            01 0033B    40C3D7E4 A
            01 0033C    40C2C5D5 A
            01 0033D    C3C8D4C1 A
            01 0033E    D9D240F9 A
            01 0033F    F6F060F0 A
            01 00340    F7F0F560 A
            01 00341    C8F0F240 A
      232   01 00342    01404040 A   :MSGBEG  TEXTC    ' '
      233   01 00343    1BE3E2E3 A            TEXTC    'TST0 => START AKU BENCHMARK'
            01 00344    F0407E6E A
            01 00345    40E2E3C1 A
            01 00346    D9E340C1 A
            01 00347    D2E440C2 A
            01 00348    C5D5C3C8 A
            01 00349    D4C1D9D2 A
      234   01 0034A    01404040 A   :MSGEND  TEXTC    ' '
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE   10
A     236                            *           *** PRE-EXECUTION CONTROL FOR ALL DIRECTIVES
      237                            *               ----------------------------------------
      238                            *
      239                            * CONTROL IS TRANSFERED HERE BEFORE EXECUTING ANY DIRECTIVE.
      240                            * :RECOVER IS CALLED TO RESET THE STACK AND BASIC REGISTERS.

      242         01 0034B           TEST     EQU      %
      243   01 0034B    6AF0039D              BAL,R15  :RECOVER          RESET STACK

      245   01 0034C    32400303              LW,R4    :PIT3             RECOVER POINTER TO DIRECTIVE
      246   01 0034D    2540007F A            SLS,R4   -1                 (SCAN DIRECTORY AS DPM DID)
      247   01 0034E    68000352              B        MUXEND

      249   01 0034F    92680302     MUXBEG   LD,R6    *:PIT2,R4
      250   01 00350    31600307              CW,R6    :PIT7             GET DIRECTORY ENTRY, LOOK
      251   01 00351    68380354              BE       DIRMUX,R4          FOR LAST DIRECTIVE ENTERED
      252   01 00352    6440034F     MUXEND   BDR,R4   MUXBEG               MUST MATCH EVENTUALLY
      253   01 00353    68080354              B        DIRMUX,R4

      255         01 00354           DIRMUX   EQU      %
      256   01 00354    680003ED              B        TST0              GENERAL FUNCTIONAL
      257   01 00355    6800035A              B        TST1              SPECIFIC FUNCTIONAL
      258   01 00356    6800035A              B        TST2              RANDOM EXERCISER
      259   01 00357    6800035A              B        TST3              UTILITIES
      260   01 00358    6800035A              B        TST4              RANDOM FUNCTIONAL
      261   01 00359    68000384              B        LIMT              ALTER GLOBAL PARAMETER

      263         01 0035A           TST1     EQU      %
      264         01 0035A           TST2     EQU      %
      265         01 0035A           TST3     EQU      %
      266         01 0035A           TST4     EQU      %
      267   01 0035A    E8000214              B        *:MONITOR
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE   11
A     269                            *           ***  INTERRUPT/TRAP HANDLER  ***
      270                            *
      271                            * PARAMETERS REQUIRED:
      272                            * ---------- --------
      273                            *   ITHTEST - TEST BEING PERFORMED (0=TST0,1=TST1,2=TST2,3=TST3,4=TST4)
      274                            *   ITHSUBT - SUBTEST BEING PERFORMED
      275                            *   ITHRST  - RESTART ADDRESS

      277   01 0035B    35F00310     ITHDLR   STW,R15  :PIT16            SAVE RETURN ADDRESS

      279   01 0035C    32C0036E              LW,12    ITHTEST           TEST NUMBER
      280   01 0035D    EAF00218              BAL,15   *:HEXC              CONVERT TO EBCDIC
      281   01 0035E    75F20372              STB,15   ITHM2+1,1           PLACE IN MSG
      282   01 0035F    EAF0021C              BAL,15   *:PRINT
      283   01 00360    00000371              DATA     ITHM2             'TSTX WILL BE RESTARTED'

      285   01 00361    3300036F              MTW,0    ITHSUBT           SKIP IF SUBTEST
      286   01 00362    68300364              BEZ      %+2                EQUAL ZERO
      287   01 00363    6AF00366              BAL,R15  ITHDIS              ELSE DISPLAY SUBTEST NUMBER

      289   01 00364    32F00370              LW,15    ITHRST            (R15)=RESTART ADDRESS

      291   01 00365    E8000310              B        *:PIT16           RETURN TO MONITOR

      293   01 00366    09F003A8     ITHDIS   ENTER                      SAVE RETURN ADDRESS

      295   01 00367    32C0036F              LW,12    ITHSUBT           SUBTEST NUMBER
      296   01 00368    EAF00217              BAL,15   *:DECC              CONVERT TO EBCDIC
      297   01 00369    55F20379              STH,15   ITHM3+2,1           PLACE IN MSG
      298   01 0036A    EAF0021C              BAL,15   *:PRINT
      299   01 0036B    00000377              DATA     ITHM3             'SUBTEST NO. XX'

      301   01 0036C    08F003A8              EXIT
            01 0036D    E800000F A

      303   01 0036E    00000000 A   ITHTEST  DATA     0
      304   01 0036F    00000000 A   ITHSUBT  DATA     0
      305   01 00370    00000000 A   ITHRST   DATA     0

      307   01 00371    1740E3E2 A   ITHM2    TEXTC    ' TSTX WILL BE RESTARTED'
            01 00372    E3E740E6 A
            01 00373    C9D3D340 A
            01 00374    C2C540D9 A
            01 00375    C5E2E3C1 A
            01 00376    D9E3C5C4 A
      308   01 00377    0BE2E4C2 A   ITHM3    TEXTC    'SUBTEST: XX'
            01 00378    E3C5E2E3 A
            01 00379    7A40E7E7 A
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE   12
A     310                            *                                   INITIAL ENTRY TO PROGRAM
      311                            *                                   ------------------------------------
      312                            *
      313                            * THIS ROUTINE IS ACCESSED BY THE MONITOR AFTER LOADING THE TEST
      314                            * PROGRAM AND WHENEVER A SYST DIRECTIVE IS EXECUTED BY THE USER.

      316   01 0037A    35F00310     :INITIAL STW,R15  :PIT16            SAVE RETURN ADDRESS

      318   01 0037B    6AF00237              BAL,R15  :REMOTE           CONNECT REMOTE USERS

      320   01 0037C    6AF0039D              BAL,R15  :RECOVER          RESTORE THE SYSTEM

      322   01 0037D    220FFFFF A            LI,R0    -1                SET RUN FLAG
      323   01 0037E    4600030C              XW,R0    :PIT12             AND SKIP IF SET PREVIOUSLY
      324   01 0037F    E9300310              BNEZ     *:PIT16             (NO MESSAGES)

      326   01 00380    22400342              LI,R4    :MSGBEG           ELSE PREPARE TO DISPLAY
      327   01 00381    2250034A              LI,R5    :MSGEND            SYST MESSAGES AND COMMENTS
      328   01 00382    6AF01F7B              BAL,R15  MSGPRN

      330   01 00383    E8000310              B        *:PIT16           RETURN TO DPM
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE   13
A     332                            *                 *** LIMT - PARAMETER CHANGE DIRECTIVE
      333                            *                     ---------------------------------
      334                            *
      335                            *        ALLOWS THE SETTING OF SPECIFIC, INTERNAL PARAMETERS OF
      336                            *        THE ETHERNET DIAGNOSTIC.

      338         01 00384           LIMT     EQU      %
      339   01 00384    32400201              LW,R4    :P1               GUARD AGAINST NONSENSICAL
      340   01 00385    68200394              BLEZ     LMT10              PARAMETER ONE OF LIMT

      342   01 00386    21400005 A            CI,R4    5                 UPPER LIMIT
      343   01 00387    69200394              BG       LMT10

      345   01 00388    68080388              B        %,R4              SKIP ON P1 VALUE

      347   01 00389    68000394              B        LMT10             1
      348   01 0038A    68000394              B        LMT10             2
      349   01 0038B    68000394              B        LMT10             3
      350   01 0038C    68000394              B        LMT10             4
      351   01 0038D    6800038E              B        LMT05             5 SET TIME SNAPSHOT PARAMETER

      353         01 0038E           LMT05    EQU      %
      354   01 0038E    32000201              LW,R0    :P1               GET TIME OR BUFFER SNAPSHOT
      355   01 0038F    35001FB0              STW,R0   TIMESNAP           PARAMETER AND SAVE AWAY
      356   01 00390    E8000214              B        *:MONITOR

      358                            * GENERAL ENTRIES TO ANNOUNCE PARAMETER ERRORS

      360   01 00391    EAF00229     LMT00    BAL,R15  *:PREPORT         REPORT PARAMETER IN ERROR
      361   01 00392    00000307              DATA     :PIT7              TEXT OF DIRECTIVE
      362   01 00393    E8000214              B        *:MONITOR

      364   01 00394    3510030A     LMT10    STW,R1   :PIT10            P1
      365   01 00395    68000391              B        LMT00

      367   01 00396    3520030A     LMT20    STW,R2   :PIT10            P2
      368   01 00397    68000391              B        LMT00

      370   01 00398    3530030A     LMT30    STW,R3   :PIT10            P3
      371   01 00399    68000391              B        LMT00

      373   01 0039A    22000004 A   LMT40    LI,R0    4                 P4
      374   01 0039B    3540030A              STW,R4   :PIT10
      375   01 0039C    68000391              B        LMT00

      377                            *                                   ABSOLUTE RECOVERY ROUTINE
      378                            *                                   -------------------------

      380   01 0039D    124003A6     :RECOVER LD,R4    DPM:BEG           RESTORE SYSTEM STACK
      381   01 0039E    154003A8              STD,R4   DPM:STK

      383   01 0039F    22100001 A            LI,1     1                 RESTORE REGISTERS 1,2,3
      384   01 003A0    22200002 A            LI,2     2
      385   01 003A1    22300003 A            LI,3     3

      387   01 003A2    32400200              LW,4     :MLT              ABSOLUTE RECOVERY
      388   01 003A3    35400026 A            STW,4    X'26'

      390   01 003A4    E800000F A            B        *R15              RETURN
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE   14
A     392                            LO       SET      2,16,17,18,31,32,33,34,35,37,38,48,49,;
      393                                      50,51,53,54,55,56,58,59,60,61,62,63,69,71,72,73,;
      394                                      74,75,82,83,85,86,87,112,113,114,;
      395         LIST                         115,116

      397                            LS       SET      35,1,2,7,1,315,46,686,4,27,7,14,163,1198,;
      398                                      43,687,4,2,8,39,5,119,221,71,266,11,4,21,25,2,72,;
      399         LIST                         0,0,0,0,0,0,0,0,0,0

      401                            LI       SET      0,1,0,0,0,0,0,0,0,0,1,1,0,15,0,5,0,0,0,;
      402                                      0,0,2,2,2,8,5,7,1,2,0,0,3,5,4,8,7,;
      403         LIST                         4,9,9,6,7

      405                            LX       SET      0,7,2,5,2,0,0,0,0,3,5,2,53,503,4,379,1,1,;
      406                                      2,2,4,69,89,15,110,8,29,4,5,3,9,11,3,5,2,6,;
      407         LIST                         0,2,4,25,3,5


      410                                     BOUND    8
      411   01 003A6    000003A9     DPM:BEG  DATA     DPM:RES-1
      412   01 003A7    0040     A            DATA,2   64,0
            01 003A7 2  0000     A

      414   01 003A8                 DPM:STK  RES      2
      415   01 003AA                 DPM:RES  RES      64
      416         00000029           XLO      SET      NUM(LO)
      417         00000029           XLS      SET      NUM(LS)
      418         00000029           XLI      SET      NUM(LI)
      419         0000002A           XLX      SET      NUM(LX)

      421                                     BOUND    8
      422   01 003EA    00000000 A   VV       DATA     0,0
            01 003EB    00000000 A
      423   01 003EC    000003EA     VI       DATA     VV

      425         01 003ED           TST0     EQU      %
      426   01 003ED    22000000 A            LI,R0    0
      427   01 003EE    3500036E              STW,R0   ITHTEST
      428   01 003EF    3500036F              STW,R0   ITHSUBT
      429   01 003F0    35001FAF              STW,R0   TIMEFLAG

      431   01 003F1    220003ED              LI,R0    TST0
      432   01 003F2    35000370              STW,R0   ITHRST

      434         01 003F3           TST0A    EQU      %
      435   01 003F3    22000000 A            LI,R0    0                 CLEAR COUNTER
      436   01 003F4    35000238              STW,R0   :CLOCK3

      438   01 003F5    22100000 A            LI,R1    0                 CLEAR INDEX
      439   01 003F6    22E003E8 A            LI,R14   1000               SET LOOP LIMIT

      441         01 003F7           TST0B    EQU      %
      442                                     EXPAND

      444   01 01F77    64E003F7              BDR,R14  TST0B             LOOP ON LIMIT

      446   01 01F78    22C003E8 A            LI,R12   1000
      447   01 01F79    6AF01F91              BAL,R15  TIMEDISP          DISPLAY STATISTIC

      449   01 01F7A    680003F3              B        TST0A
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE   15
A     452   01 01F7B    09F003A8     MSGPRN   ENTER                      PRINT STRING OF TEXTC BLOCKS

      454   01 01F7C    35401F7E     MSGPRN0  STW,R4   %+2               STORE WA(TEXTC)
      455   01 01F7D    EAF0021C              BAL,R15  *:PRINT
      456   01 01F7E    00000000 A            DATA     0

      458   01 01F7F    F2F00004 A            LB,R15   *R4               ADVANCE
      459   01 01F80    20F00004 A            AI,R15   4                  TO THE
      460   01 01F81    25F0007E A            SLS,R15  -2                  NEXT TEXTC BLOCK
      461   01 01F82    3040000F A            AW,R4    R15

      463   01 01F83    31400005 A            CW,R4    R5                COMPARE WITH WA(LAST TEXTC)
      464   01 01F84    68201F7C              BLE      MSGPRN0            CONTINUE IF NOT YET DONE

      466   01 01F85    08F003A8              EXIT
            01 01F86    E800000F A

      468         01 01F87           TIMECOND EQU      %                 CONDITIONAL TIME DISPLAY
      469   01 01F87    33001FB0              MTW,0    TIMESNAP           EXIT IF SNAP PARAMETER
      470   01 01F88    E830000F A            BEZ      *R15                SET TO ZERO

      472   01 01F89    09F003A8              ENTER

      474   01 01F8A    32F0000C A            LW,R15   R12               SAVE COUNT

      476   01 01F8B    25C00160 A            SLD,R12  -32               COMPUTE COUNT
      477   01 01F8C    36C01FB0              DW,R12   TIMESNAP           MOD SNAP PARAMETER
      478   01 01F8D    21C00000 A            CI,R12   0                   AND DISPLAY IF CONGRUENT
      479   01 01F8E    69301FAD              BNEZ     TIMEOUTS

      481   01 01F8F    32C0000F A            LW,R12   R15               RESTORE COUNT
      482   01 01F90    68001F92              B        TIMEUNCD           AND GO DISPLAY
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE   16
A     484         01 01F91           TIMEDISP EQU      %                 UNCONDITIONAL TIMING DISPLAY
      485   01 01F91    09F003A8              ENTER

      487         01 01F92           TIMEUNCD EQU      %
      488   01 01F92    22100001 A            LI,R1    1
      489   01 01F93    32400238              LW,R4    :CLOCK3           SAMPLE ELAPSED TIME
      490   01 01F94    EAF00217              BAL,R15  *:DECC             CONVERT AND STORE
      491   01 01F95    55F01FB7              STH,R15  TIMEMSG1+1          THE CYCLE COUNTER
      492   01 01F96    25F00070 A            SLS,R15  -16
      493   01 01F97    55F21FB6              STH,R15  TIMEMSG1+0,R1
      494   01 01F98    EAF00217              BAL,R15  *:DECC
      495   01 01F99    75F21FB6              STB,R15  TIMEMSG1+0,R1

      497   01 01F9A    25400160 A            SLD,R4   -32               CONVERT ELAPSED
      498   01 01F9B    36401FBB              DW,R4    =10                TIME TO SECONDS AND TENTHS

      500   01 01F9C    32C00005 A            LW,R12   R5                DISPLAY ELAPSED SECONDS
      501   01 01F9D    EAF00217              BAL,R15  *:DECC
      502   01 01F9E    35F01FB8              STW,R15  TIMEMSG1+2

      504   01 01F9F    25400010 A            SLS,R4   16
      505   01 01FA0    30401FBC              AW,R4    L('.0  ')
      506   01 01FA1    35401FB9              STW,R4   TIMEMSG1+3

      508   01 01FA2    22401FB1              LI,R4    TIMEMSG0          PREPARE TO DISPLAY
      509   01 01FA3    33001FAF              MTW,0    TIMEFLAG           FULL HEADING BUT
      510   01 01FA4    68301FA6              BEZ      %+2                 ALTER IF HEADING DONE
      511   01 01FA5    22401FB6              LI,R4    TIMEMSG1             ALREADY
      512   01 01FA6    22501FB6              LI,R5    TIMEMSG1

      514   01 01FA7    32000238              LW,R0    :CLOCK3           ATTEMPT TO SAVE
      515   01 01FA8    35001FAF              STW,R0   TIMEFLAG           CURRENT ELAPSED TIME

      517   01 01FA9    6AF01F7B              BAL,R15  MSGPRN            DISPLAY SNAPSHOT

      519   01 01FAA    32001FAF              LW,R0    TIMEFLAG          RESTORE CURRENT
      520   01 01FAB    35000238              STW,R0   :CLOCK3            ELAPSED TIME

      522   01 01FAC    33101FAF              MTW,1    TIMEFLAG          SET HEADING DONE

      524   01 01FAD    08F003A8     TIMEOUTS EXIT
            01 01FAE    E800000F A

      526   01 01FAF    00000000 A   TIMEFLAG DATA     0
      527   01 01FB0    00000000 A   TIMESNAP DATA     0

      529   01 01FB1    01404040 A   TIMEMSG0 TEXTC    ' '
      530   01 01FB2    0DC3E8C3 A            TEXTC    'CYCLE SECONDS'
            01 01FB3    D3C540E2 A
            01 01FB4    C5C3D6D5 A
            01 01FB5    C4E24040 A
      531   01 01FB6    0DE7E7E7 A   TIMEMSG1 TEXTC    'XXXXX  XXXX.X'
            01 01FB7    E7E74040 A
            01 01FB8    E7E7E7E7 A
            01 01FB9    4BE74040 A

      533                                     END
            01 01FBA    41100000 A
            01 01FBB    0000000A A
            01 01FBC    4BF04040 A

  CONTROL SECTION SUMMARY: 01 01FBD   PT 0
  * NO UNDEFINED SYMBOLS
  *    ERROR SEVERITY LEVEL: 0
  * NO ERROR LINES
1 C00   19:29 JUN 20,'83    AKU CPU BENCHMARK 960-0705-H02                                        PAGE   17
A  CATALOG            2-EQU        4/EQU
   CV                31-SET       33/DO        36-SET
   CX                32-DO        33/DO        36/SET       38/DO1       39/GEN       40/DO1       41/GEN
        42/DO1       43/GEN
   DIRMUX           251/BE       253/B        255-EQU
   DPM:BEG          380/LD       411-DATA
   DPM:RES          411/DATA     415-RES
   DPM:STK           69/PSW       74/PLW      381/STD      414-RES
   ENTER             67-CNAME
   EXIT              72-CNAME
   EXPAND            28-CNAME
   ITHDIS           287/BAL      293-ENTER
   ITHDLR           277-STW
   ITHM2            281/STB      283/DATA     307-TEXTC
   ITHM3            297/STH      299/DATA     308-TEXTC
   ITHRST           289/LW       305-DATA     432/STW
   ITHSUBT          285/MTW      295/LW       304-DATA     428/STW
   ITHTEST          279/LW       303-DATA     427/STW
   L                505/AW
   LI                42/DO1      401-SET      418/SET
   LIMT             261/B        338-EQU
   LMT00            360-BAL      365/B        368/B        371/B        375/B
   LMT05            351/B        353-EQU
   LMT10            340/BLEZ     343/BG       347/B        348/B        349/B        350/B        364-STW
   LMT20            367-STW
   LMT30            370-STW
   LMT40            373-LI
   LO                32/DO        39/GEN       41/GEN       43/GEN      392-SET      416/SET
   LS                38/DO1      397-SET      417/SET
   LX                40/DO1      405-SET      419/SET
   MSGPRN           328/BAL      452-ENTER    517/BAL
   MSGPRN0          454-STW      464/BLE
   MUXBEG           249-LD       252/BDR
   MUXEND           247/B        252-BDR
   S:PT               4/EQU
   TEST             178/:PROCDIC 179/:PROCDIC 180/:PROCDIC 181/:PROCDIC 182/:PROCDIC 183/:PROCDIC 242-EQU
   TIMECOND         468-EQU
   TIMEDISP         447/BAL      484-EQU
   TIMEFLAG         429/STW      509/MTW      515/STW      519/LW       522/MTW      526-DATA
   TIMEMSG0         508/LI       529-TEXTC
   TIMEMSG1         491/STH      493/STH      495/STB      502/STW      506/STW      511/LI       512/LI
       531-TEXTC
   TIMEOUTS         479/BNEZ     524-EXIT
   TIMESNAP         355/STW      469/MTW      477/DW       527-DATA
   TIMEUNCD         482/B        487-EQU
   TITLE              4-EQU       77/TITLE    231/TEXTC
   TST0             256/B        425-EQU      431/LI
   TST0A            434-EQU      449/B
   TST0B            441-EQU      444/BDR
   TST1             257/B        263-EQU
   TST2             258/B        264-EQU
   TST3             259/B        265-EQU
   TST4             260/B        266-EQU
   VERSION            3-EQU        4/EQU
   VI                43/GEN      423-DATA
   VV                35/STW       39/GEN       41/GEN      422-DATA     423/DATA
   XLI              418-SET
   XLO              416-SET
   XLS              417-SET
   XLX              419-SET
   :BCDC             92-EQU
   :BINC             94-EQU
   :CATALOG         133/DATA     227-EQU
   :CDB             200/GEN      200/GEN      212-EQU
   :CDBEND          200/GEN      225-EQU
   :CDBM            200/GEN      208-EQU
   :CDBMEND         200/GEN      210-EQU
   :CDT             138/DATA     139/DATA     199-EQU
   :CDTEND          139/DATA     201-EQU
   :CLOCK3          123-EQU      436/STW      489/LW       514/LW       520/STW
   :CURBCNT          98-EQU
   :DECC             95-EQU      296/BAL*     490/BAL*     494/BAL*     501/BAL*
   :DIC             135/DATA     136/DATA     177-EQU
   :DICEND          136/DATA     184-EQU      199/EQU
   :DICILEN         117-EQU
   :DICINDX         116-EQU
   :DTLFLAG         112-EQU
   :DUMP             90-EQU
   :ERROR            99-EQU
   :ERRORC          107-EQU
   :HEXC             96-EQU      280/BAL*
   :INITIAL         141/DATA     316-STW
   :KSRADR          108-EQU
   :LOADIN          106-EQU
   :MACHINE         109-EQU
   :MEMLAST         119-EQU
   :MEMSIZE         118-EQU
   :MLT              85-EQU       86/EQU       87/EQU       88/EQU       89/EQU       90/EQU       91/EQU
        92/EQU       93/EQU       94/EQU       95/EQU       96/EQU       97/EQU       98/EQU       99/EQU
       100/EQU      101/EQU      102/EQU      103/EQU      104/EQU      105/EQU      106/EQU      107/EQU
       108/EQU      109/EQU      110/EQU      111/EQU      112/EQU      113/EQU      114/EQU      115/EQU
       116/EQU      117/EQU      118/EQU      119/EQU      120/EQU      121/EQU      122/EQU      123/EQU
       124/EQU      387/LW
   :MLTEND          124-EQU
   :MONIOBF         120-EQU
   :MONITOR          93-EQU      267/B*       356/B*       362/B*
   :MONPBF          121-EQU
   :MONWAIT         102-EQU
   :MRECOVR         103-EQU
   :MSGBEG          232-TEXTC    326/LI
   :MSGEND          234-TEXTC    327/LI
   :MSGIN           105-EQU
   :MSGOUT          104-EQU
   :PIT0            133-DATA     151/DO
   :PIT1            134-DATA
   :PIT10           143-DATA     364/STW      367/STW      370/STW      374/STW
   :PIT11           144-DATA
   :PIT12           145-DATA     323/XW
   :PIT13           146-DATA
   :PIT14           147-DATA
   :PIT15           148-DATA
   :PIT16           149-DATA     277/STW      291/B*       316/STW      324/BNEZ*    330/B*
   :PIT2            135-DATA     249/LD*
   :PIT3            136-DATA     245/LW
   :PIT4            137-DATA
   :PIT5            138-DATA
   :PIT6            139-DATA
   :PIT7            140-DATA     250/CW       361/DATA
   :PIT8            141-DATA
   :PIT9            142-DATA
   :PREPORT         113-EQU      360/BAL*
   :PRINT           100-EQU      282/BAL*     298/BAL*     455/BAL*
   :PROCDIC          58-CNAME
   :PROGID          134/DATA     230-EQU
   :PSW              91-EQU
   :P1               86-EQU      339/LW       354/LW
   :P2               87-EQU
   :P3               88-EQU
   :P4               89-EQU
   :QSENSE          114-EQU
   :RECOVER         137/DATA     243/BAL      320/BAL      380-LD
   :RELBIAS         110-EQU
   :REMOTE          122-EQU      318/BAL
   :RLOADER         111-EQU
   :SENSE           101-EQU
   :WAIT            115-EQU
   :1BYTEIN          97-EQU
