ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov 1 19:25:09 2020
Source File: \u1ils03.asm
ILS03 - INTERRUPT LEVEL 3 SUBROUTINE
2 | *************************************************** U1D00020
3 | * * U1D00030
4 | * TITLE - ILS03 * U1D00040
5 | * STATUS - VERSION 2. MODIFICATION LEVEL 9 * U1D00050
6 | * FUNCTION/OPERATION - .ILS03. IS THE INTERRUPT * U1D00060
7 | * LEVEL SUBROUTINE FOR LEVEL 3. * U1D00070
8 | * ENTRY POINTS - ILS03 IS ENTERED BY A HARDWARE * U1D00080
9 | * BSI VIA LOCATION 11. * U1D00090
10 | * INPUT - NONE * U1D00100
11 | * OUTPUT - NONE * U1D00110
12 | * EXTERNAL SUBROUTINES - NONE * U1D00120
13 | * EXITS - * U1D00130
14 | * NORMAL - BOSC INDIRECT THROUGH .ILS03. * U1D00140
15 | * ERROR - NONE * U1D00150
16 | * TABLES/WORK AREAS - NONE * U1D00160
17 | * ATTRIBUTES - REUSABLE * U1D00170
18 | * NOTES - THE 1627 PLOTTER INTERRUPT IS ON LEVEL 3* U1D00180
19 | * THE 2250 DISPLAY UNIT INTERRUPT ALSO 2-6 U1D00190
20 | * * U1D00200
21 | *************************************************** U1D00210
ILS03 - INTERRUPT LEVEL 3 SUBROUTINE
23 | ILS 03 U1D00230
0000 0741 24 | I0310 DC /0741 MTCA INTERVAL TIMER 2-9 U1D00235
0001 0441 25 | DC /0441 MTCA END OF OPERATION 2-9 U1D00236
0002 0033 26 | DC /0033 2-9 U1D00237
0003 0033 27 | DC /0033 2-9 U1D00238
0004 0033 28 | DC /0033 2-9 U1D00239
0005 043E 29 | DC /043E 2250 2-9 U1D00240
0006 0033 30 | DC /0033 2-6 U1D00250
0007 0033 31 | DC /0033 2-6 U1D00260
0008 0033 32 | DC /0033 2-6 U1D00270
0009 043A 33 | DC /043A 1627 2-6 U1D00280
34 | * 2-6 U1D00290
000A 0000 35 | I0320 DC 0 INTRPT ENTRY 2-6 U1D00300
000B D812 36 | STD I0380 SAVE ACC AND EXT, 2-6 U1D00310
000C 2808 37 | STS I0330 *STATUS, 2-6 U1D00320
000D 6909 38 | STX 1 I0341+1 *XR1, 2-6 U1D00330
000E 6A0A 39 | STX 2 I0342+1 *XR2 2-6 U1D00340
000F 610A 40 | LDX 1 10 NO. OF DEVICES ON LEVEL 2-9 U1D00350
0010 080F 41 | XIO I0390-1 GET ILSW 2-6 U1D00355
0011 4820 42 | BSC Z SKIP IF 1627 INTRPT 2-9 U1D00360
0012 1140 43 | SLCA 1 0 SHIFT AND DECR XR1 2-6 U1D00370
0013 4580 FFFFR 44 | BSI I1 I0310-1 BR TO DEVICE ISS 2-6 U1D00380
45 | * 2-6 U1D00390
0015 2000 46 | I0330 LDS 0 RESTORE STATUS, 2-6 U1D00400
0016 6500 0000 47 | I0341 LDX L1 *-* *XR1, 2-6 U1D00410
0018 6600 0000 48 | I0342 LDX L2 *-* *XR2, 2-6 U1D00420
001A C803 49 | LDD I0380 *ACC AND EXT 2-6 U1D00430
001B 4CC0 000AR 50 | BOSC I I0320 TURN OFF INTRPT, RETURN 2-6 U1D00440
51 | * 2-6 U1D00450
52 | * 2-7 U1D00480
001E 53 | I0380 BSS E 2 ACC AND EXT 2-6 U1D00490
0020 0000 54 | DC 0 2-6 U1D00500
0021 0300 55 | I0390 DC /0300 IOCC TO SENSE ILSW 2-6 U1D00510
0022 56 | END 2-6 U1D00520
There were no errors in this assembly
=== CROSS REFERENCES ==========================================================
Name Val Defd Referenced
I0310 0000R 24 44
I0320 000AR 35 50
I0330 0015R 46 37
I0341 0016R 47 38
I0342 0018R 48 39
I0380 001ER 53 36 49
I0390 0021R 55 41