Retro1.org codex

ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov  1 19:25:08 2020
 
Source File: \t3tstrt.asm 
CALL TSTRT
 
                             2 | *************************************************** T3I00020
                             3 | *                                                 * T3I00030
                             4 | *   SUBROUTINE NAME-                              * T3I00040
                             5 | *      FULL NAME-FORTRAN TRACE START              * T3I00050
                             6 | *      CODE NAME-TSTRT                            * T3I00060
                             7 | *   PURPOSE-START TRACE BY SETTING TRACE INDICATOR* T3I00070
                             8 | *      IN TTEST TO A ONE.                         * T3I00080
                             9 | *   METHOD-N/A                                    * T3I00090
                            10 | *   CAPABILITIES AND LIMITATIONS-N/A              * T3I00100
                            11 | *   SPECIAL FEATURES-N/A                          * T3I00110
                            12 | *   ADDITIONAL INFORMATION-                       * T3I00120
                            13 | *      ESTIMATED EXECUTION TIME-N/A               * T3I00130
                            14 | *                                                 * T3I00140
                            15 | *************************************************** T3I00150
                            16 | *                                                 * T3I00160
                            17 | *   ENTER HERE TO TURN ON THE TRACE INDICATOR     * T3I00170
                            18 | *                                                   T3I00180
                            19 |       ENT     TSTRT                                 T3I00190
0000 0000                   20 | TSTRT DC      *-*        REC RETURN ADDR            T3I00200
0001 C003                   21 |       LD      ONE        LOAD ONE TO  THE ACC       T3I00210
0002 2388*58C0              22 |       LIBF    TSET       GO TO SET ROUTINE          T3I00220
0003 4C80 0000R             23 |       BSC  I  TSTRT      EXIT                       T3I00230
0005 0001                   24 | ONE   DC      1          CONSTANT                   T3I00240
0006                        25 |       END                                           T3I00250
 
There were no errors in this assembly
 
=== CROSS REFERENCES ==========================================================
Name  Val   Defd  Referenced
ONE   0005R   24   21
TSTRT 0000R   20   23