ASM1130 CROSS ASSEMBLER V1.22 -- V2M12 -- Sun Nov 1 19:25:11 2020 Source File: \v1ploti.asm LIBF PLOTI 2 | LIBR V1K00020 3 | ENT PLOTI V1K00030 4 | ENT PLOTS V1K00040 5 | *************************************************** V1K00050 6 | * SUBROUTINE NAME- * V1K00060 7 | * FULL NAME-N/A * V1K00070 8 | * CODE NAME- PLOTI * V1K00080 9 | * PURPOSE- THIS SUBROUTINE IS AN INTERFACE FOR * V1K00090 10 | * CALLING PLOTX. THIS SUBROUTINE MAY BE * V1K00100 11 | * REPLACED WITH LINKAGE TO OTHER PLOT * V1K00110 12 | * FUNCTIONS IF DESIRED. * V1K00120 13 | * METHOD- N/A * V1K00130 14 | * CAPABILITIES AND LIMITATIONS- N/A * V1K00140 15 | * SPECIAL FEATURES- N/A * V1K00150 16 | * ADDITIONAL INFORMATION- * V1K00160 17 | * CALLING SEQUENCES- * V1K00170 18 | * LIBF PLOTI * V1K00180 19 | * DC X * V1K00190 20 | * * V1K00200 21 | * LIBF PLOTS * V1K00210 22 | * PARAMETER IS IN ACCUMULATOR * V1K00220 23 | *************************************************** V1K00230 0000 690A 24 | PLOTI STX 1 SXR1+1 SAVE XR1 V1K00240 0001 6580 0000 25 | LDX I1 *-* V1K00250 0003 C100 26 | LD 1 0 GET PARAMETER V1K00260 0004 E809 27 | OR PLOTR V1K00270 0005 D003 28 | STO MOVE SET PLOTX PARAMETER V1K00280 0006 7101 29 | MDX 1 1 V1K00290 0007 6905 30 | STX 1 RETN+1 SET RETURN ADDRESS V1K00300 0008 174D*68E7 31 | LIBF PLOTX V1K00310 0009 0000 32 | MOVE DC *-* PLOTX PARAMETER V1K00320 000A 6500 0000 33 | SXR1 LDX L1 *-* RESTORE XR1 V1K00330 000C 4C00 0000 34 | RETN BSC L *-* RETURN V1K00340 000E 0000 35 | PLOTR DC *-* V1K00350 000F D0FE 36 | PLOTS STO PLOTR SAVE PARAMETER FOR OR V1K00360 0010 4C80 0000 37 | BSC I *-* V1K00370 0012 38 | END V1K00380 There were no errors in this assembly === CROSS REFERENCES ========================================================== Name Val Defd Referenced MOVE 0009R 32 28 PLOTI 0000R 24 PLOTR 000ER 35 27 36 PLOTS 000FR 36 RETN 000CR 34 30 SXR1 000AR 33 24