ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov 1 19:25:09 2020
Source File: \u1ilsx1.asm
ILSX1 - INTERRUPT LEVEL 1 SUBROUTINE
2 | *************************************************** U1G00020
3 | * * U1G00030
4 | * STATUS - VERSION 2, MODIFICATION LEVEL 9 * U1G00040
5 | * FUNCTION/OPERATION - INTERRUPT LEVEL SUBROUTINE * U1G00050
6 | * FOR LEVEL 1. * U1G00060
7 | * ENTRY POINT - ENTERED AT IX120 BY A HARDWARE * U1G00070
8 | * BSI VIA LOCATION 9. * U1G00080
9 | * INPUT - NONE * U1G00090
10 | * OUTPUT - NONE * U1G00100
11 | * EXTERNAL SUBROUTINES - NONE * U1G00110
12 | * EXITS - * U1G00120
13 | * NORMAL - BOSC INDIRECT THROUGH IX120. * U1G00130
14 | * ERROR - NONE * U1G00140
15 | * TABLES/WORK AREAS - NONE * U1G00150
16 | * ATTRIBUTES - REUSABLE * U1G00160
17 | * NOTES - INDEX REGISTERS 1, 2, AND 3, STATUS, * U1G00170
18 | * ACCUMULATOR AND EXTENSION ARE SAVED UPON * U1G00180
19 | * ENTRY AND RESTORED AFTER INTERRUPT SERVICED. * U1G00190
20 | * * U1G00200
21 | *************************************************** U1G00210
ILSX1 - INTERRUPT LEVEL 1 SUBROUTINE
23 | ILS 01 U1G00230
0000 043B 24 | IX110 DC /043B SCA +4 AND ISS NO. 8 U1G00240
0001 0439 25 | IX111 DC /0439 1132 +4 AND ISS NO. 6 U1G00250
26 | * U1G00260
0002 0000 27 | IX120 DC 0 INTERRUPT ENTRY U1G00270
0003 D816 28 | STD IX180 SAVE ACC AND EXTENSION, U1G00280
0004 280B 29 | STS IX130 *STATUS, U1G00290
0005 690C 30 | STX 1 IX141+1 *XR1, U1G00300
0006 6A0D 31 | STX 2 IX142+1 *XR2, U1G00310
0007 6B0E 32 | STX 3 IX143+1 *XR3 U1G00320
0008 6780 00E4 33 | LDX I3 $XR3X POINT TO TRANSFER VECTOR U1G00330
000A 0811 34 | XIO IX190-1 SENSE ILSW U1G00350
000B 6100 35 | LDX 1 0 2-9 U1G00360
000C 4808 36 | BSC + SKIP IF SCA INTRPT 2-9 U1G00362
000D 6101 37 | LDX 1 1 2-9 U1G00364
000E 4580 0000R 38 | BSI I1 IX110 BRANCH TO SERVICE INTR 2-9 U1G00370
39 | * U1G00380
0010 2000 40 | IX130 LDS 0 RESTORE STATUS, U1G00390
0011 6500 0000 41 | IX141 LDX L1 *-* *XR1, U1G00400
0013 6600 0000 42 | IX142 LDX L2 *-* *XR2, U1G00410
0015 6700 0000 43 | IX143 LDX L3 *-* *XR3, U1G00420
0017 C802 44 | LDD IX180 *ACC AND EXTENSION U1G00430
0018 4CC0 0002R 45 | BOSC I IX120 TURN OFF INTERRUPT, RETURN U1G00440
46 | * 2-6 U1G00442
47 | * U1G00450
001A 48 | IX180 BSS E 2 ACCUMULATOR AND EXTENSION U1G00460
001C 0000 49 | DC 0 U1G00470
001D 0300 50 | IX190 DC /0300 IOCC TO SENSE ILSW U1G00480
00E4 51 | $XR3X EQU /00E4 ADDR OF TRANSFER VECTOR U1G00490
001E 52 | END U1G00500
There were no errors in this assembly
=== CROSS REFERENCES ==========================================================
Name Val Defd Referenced
$XR3X 00E4 51 33
IX110 0000R 24 38
IX111 0001R 25
IX120 0002R 27 45
IX130 0010R 40 29
IX141 0011R 41 30
IX142 0013R 42 31
IX143 0015R 43 32
IX180 001AR 48 28 44
IX190 001DR 50 34