ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov 1 19:25:09 2020
Source File: \t6siif.asm
LIBF SIIF
2 | *************************************************** T6C00020
3 | * SUBROUTINE NAME * T6C00030
4 | * FULL NAME- SINGLE DEVICE, INTEGER * T6C00040
5 | * PRECISION, 'IF' STATEMENT TRACE. * T6C00050
6 | * CODE NAME- SIIF * T6C00060
7 | * PURPOSE- TEST TRACE SWITCH AND INTERFACE * T6C00070
8 | * WITH SFIO IF TRACING IS REQUESTED. * T6C00080
9 | * METHOD- N/A * T6C00090
10 | * CAPABILITIES AND LIMITATIONS- N/A * T6C00100
11 | * SPECIAL FEATURES- N/A * T6C00110
12 | * ADDITIONAL INFORMATION- N/A * T6C00120
13 | *************************************************** T6C00130
14 | LIBR T6C00140
15 | * CALL SEQ LIBF SIIF * T6C00150
16 | * BSC STMT ADDR,COND * T6C00160
17 | * BSC STMT ADDR,COND * T6C00170
18 | * BSC STMT ADDR,COND * T6C00180
19 | ENT SIIF T6C00190
0000 690E 20 | SIIF STX 1 WORK+1 SAVE XR1 T6C00200
0001 6580 0000 21 | LDX I1 *-* LD XR1 W/ RET ADDR T6C00210
0003 D00D 22 | STO RET+1 STORE ACC IN WORK AREA T6C00220
0004 238C*58A3 23 | LIBF TTEST GO TO CHECK TRACE SWITCHES T6C00230
0005 7006 24 | MDX WORK-2 DONT TRACE, GO TO EXIT T6C00240
0006 2299*98C0 25 | LIBF SWRT PRINT OUT T6C00250
0007 0000 26 | DC 0 T6C00260
0008 0012R 27 | DC I6 T6C00270
0009 2225*6240 28 | LIBF SIOI T6C00280
000A 0011R 29 | DC RET+1 T6C00290
000B 220D*6517 30 | LIBF SCOMP T6C00300
000C C004 31 | LD RET+1 RESTORE ACC T6C00310
000D 6903 32 | STX 1 RET+1 SET UP RETURN T6C00320
000E 6500 0000 33 | WORK LDX L1 *-* RESTORE XR1 T6C00330
0010 4C00 0000 34 | RET BSC L *-* EXIT T6C00340
0012 5003 35 | I6 DC /5003 FORMAT FOR PRINT OUT T6C00350
0013 405C 5C40 36 | EBC . **. T6C00360
0015 2006 37 | DC /2006 T6C00370
0016 B004 38 | DC /B004 T6C00380
0017 39 | END T6C00390
There were no errors in this assembly
=== CROSS REFERENCES ==========================================================
Name Val Defd Referenced
I6 0012R 35 27
RET 0010R 34 22 29 31 32
SIIF 0000R 20
WORK 000ER 33 20 24