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