ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov 1 19:25:07 2020
Source File: \r2sfif.asm
LIBF SFIF
2 | *************************************************** R2K00020
3 | * SUBROUTINE NAME * R2K00030
4 | * FULL NAME- SINGLE DEVICE, STANDARD * R2K00040
5 | * PRECISION, 'IF' STATEMENT TRACE. * R2K00050
6 | * CODE NAME- SFIF * R2K00060
7 | * PURPOSE- TEST TRACE SWITCH AND INTERFACE * R2K00070
8 | * WITH SFIO IF TRACING IS REQUESTED. * R2K00080
9 | * METHOD- N/A * R2K00090
10 | * CAPABILITIES AND LIMITATIONS- N/A * R2K00100
11 | * SPECIAL FEATURES- N/A * R2K00110
12 | * ADDITIONAL INFORMATION- N/A * R2K00120
13 | *************************************************** R2K00130
14 | LIBR R2K00140
15 | * CALL SEQ LIBF SFIF * R2K00150
16 | * BSC STMT ADDR,COND * R2K00160
17 | * BSC STMT ADDR,COND * R2K00170
18 | * BSC STMT ADDR,COND * R2K00180
19 | ENT SFIF R2K00190
0000 690E 20 | SFIF STX 1 WORK+1 SAVE XR1 R2K00200
0001 6580 0000 21 | LDX I1 *-* LD XR1 W/ RET ADDR R2K00210
0003 238C*58A3 22 | LIBF TTEST GO TO CHECK TRACE SWITCHES R2K00220
0004 7008 23 | MDX WORK-1 DONT TRACE, GO TO EXIT R2K00230
0005 068A*3580 24 | LIBF FSTO STORE VAR TO BE PRINTED R2K00240
0006 0018R 25 | DC VARAD R2K00250
0007 2299*98C0 26 | LIBF SWRT PRINT OUT R2K00260
0008 0000 27 | DC 0 R2K00270
0009 0013R 28 | DC E1407 R2K00280
000A 2225*6180 29 | LIBF SIOF R2K00290
000B 0018R 30 | DC VARAD R2K00300
000C 220D*6517 31 | LIBF SCOMP R2K00310
000D 6904 32 | STX 1 RET+1 SET UP RETURN R2K00320
000E 6500 0000 33 | WORK LDX L1 *-* RESTORE XR1 R2K00330
0010 C37E 34 | LD 3 +126 LOAD ACC WITH PART OF FAC R2K00340
0011 4C00 0000 35 | RET BSC L *-* EXIT R2K00350
0013 5003 36 | E1407 DC /5003 FORMAT FOR PRINT OUT R2K00360
0014 405C 5C40 37 | EBC . **. R2K00370
0016 038E 38 | DC /038E R2K00380
0017 B004 39 | DC /B004 R2K00390
0018 40 | BSS E 0 R2K00400
0018 0000 41 | VARAD DC 0 VARIABLE R2K00410
0019 0000 42 | DC 0 *STORAGE R2K00420
001A 43 | END R2K00430
There were no errors in this assembly
=== CROSS REFERENCES ==========================================================
Name Val Defd Referenced
E1407 0013R 36 28
RET 0011R 35 32
SFIF 0000R 20
VARAD 0018R 41 25 30
WORK 000ER 33 20 23