Apple II User Manual

Page of 257
+------------------------------------------------------------------------
|  TOPIC -- AIM Computer -- AIM Monitor listing
+------------------------------------------------------------------------
0001   0000             ;TELEMARK CROSS ASSEMBLER (TASM) http://www.halcyon.com/squakvly/
0002   0000
0003   0000             ;***************************************************
0004   0000             ;***************************************************
0005   0000             ;**                                               **
0006   0000             ;**                               PL-PA00-JOO1A   **
0007   0000             ;**                                               **
0008   0000             ;**     ROCKWELL R6500 MICROCOMPUTER SYSTEM       **
0009   0000             ;**                                               **
0010   0000             ;**               AIM 65 MONITOR                  **
0011   0000             ;**                                               **
0012   0000             ;**              PROGRAM LISTING                  **
0013   0000             ;**                                               **
0014   0000             ;**   REVISION A                   AUG 22, 1978   **
0015   0000             ;**                                               **
0016   0000             ;***************************************************
0017   0000             ;***************************************************
0018   0000
0019   0000             ;ROCKWELL INTERNATIONAL
0020   0000             ;MICROELECTRONIC DEVICES
0021   0000             ;3310 MIRALOMA AVENUE
0022   0000             ;P. O. BOX 3669
0023   0000             ;ANAHEIM CA U.S.A. 92803
0024   0000
0025   0000             ;     **************************************
0026   0000             ;     *  USER 6522 ADDRESSES (A000-A00F)   *
0027   0000             ;     **************************************
0028   A000                    *=$A000
0029   A000             UDRB   .BLOCK 1        ;DATA REG B
0030   A001             UDRAH  .BLOCK 1        ;DATA REG A
0031   A002             UDDRB  .BLOCK 1        ;DATA DIR REG B
0032   A003             UDDRA  .BLOCK 1        ;DATA DIR REG A
0033   A004             UT1L   .BLOCK 1        ;TIMER 1 COUNTER LOW
0034   A005             UT1CH  .BLOCK 1        ;TIMER 1 COUNTER HIGH
0035   A006             UT1LL  .BLOCK 1        ;TIMER 1 LATCH LOW
0036   A007             UT1LH  .BLOCK 1        ;TIMER 1 LATCH HIGH
0037   A008             UT2L   .BLOCK 1        ;TIMER 2 LATCH & COUNTER LOW
0038   A009             UT2H   .BLOCK 1        ;TIMER 2 COUNTER HIGH
0039   A00A             USR    .BLOCK 1        ;SHIFT REGISTER
0040   A00B             UACR   .BLOCK 1        ;AUX CONTROL REGISTER
0041   A00C             UPCR   .BLOCK 1        ;PERIPHERAL CONTROL REGISTER
0042   A00D             UIFR   .BLOCK 1        ;INTERRUPT FLAG REGISTER
0043   A00E             UIER   .BLOCK 1        ;INTERRUPT ENABLE REGISTER
0044   A00F             UDRA   .BLOCK 1        ;DATA REGISTER A
0045   A010
0046   A010             ASSEM  =$D000          ;ASSEMBLER ENTRY
0047   A010             BASIEN =$B000          ;BASIC ENTRY (COLD)
0048   A010             BASIRE =$B003          ;BASIC ENTRY (WARM)
0049   A010
0050   A010             ;      MONITOR RAM
0051   A010             ;TEXT EDITOR EQUATES (PAG 0)
0052   A010             ;OVERLAPS TABUF2+50 (TAPE OUTPUT BUFFER $AD-$FF)
0053   00DF                    *=$00DF
0054   00DF             NOWLN  .BLOCK 2        ;CURRENT LINE
0055   00E1             BOTLN  .BLOCK 2        ;LAST ACTIVE , SO FAR
0056   00E3             TEXT   .BLOCK 2        ;LIMITS OF BUFFER (START)