DataMuseum.dk

Presents historical artifacts from the history of:

RegneCentralen RC700 "Piccolo"

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RegneCentralen RC700 "Piccolo"

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦ee35ca2bf⟧ TextFile

    Length: 14208 (0x3780)
    Types: TextFile
    Names: »TEST51.PRN«

Derivation

└─⟦b6190e06c⟧ Bits:30003304 Mix C version 2.1 til RC703
└─⟦b6190e06c⟧ Bits:30005327 Mix C version 2.1 til RC703
    └─ ⟦this⟧ »TEST51.PRN« 

TextFile



AVOCET SYSTEMS 8051 CROSS-ASSEMBLER -  VERSION 1.09

SOURCE FILE NAME: TEST51.ASM                                        PAGE  1                                             


 0100                   ORG     100H
                
 0025           DATA    EQU     25H
 0001           BIT     EQU     20H.1
 4455           BIG     EQU     4455H
 0005           SMALL   EQU     5
 0007           ZORCH   EQU     7
                
 0002           BIT2    EQU     20H.2
 0005           BIT3    EQU     20H.5
 0078           BIT4    EQU     2FH.0
 008F           BIT5    EQU     88H.7
 00F8           BIT6    EQU     0F8H.0
 00F2           BIT7    EQU     0F0H.2
B0000           BIT8    EQU     0F1H.0
                
 0100 02                DB      20H.2
 0101 02050578          DB      20H.2,20H.5,5,2FH.0
 0105 E0                DB      ACC
                
 0106 3106              ACALL   $
 0108 518E              ACALL   FWREF
                
 010A 2405              ADD     A,#SMALL
 010C 26                ADD     A,@R0
 010D 27                ADD     A,@R1
 010E 28                ADD     A,R0
 010F 29                ADD     A,R1
 0110 2A                ADD     A,R2
 0111 2B                ADD     A,R3
 0112 2C                ADD     A,R4
 0113 2D                ADD     A,R5
 0114 2E                ADD     A,R6
 0115 2F                ADD     A,R7
 0116 2525              ADD     A,DATA
                
 0118 3405              ADDC    A,#SMALL
 011A 36                ADDC    A,@R0
 011B 37                ADDC    A,@R1
 011C 38                ADDC    A,R0
 011D 39                ADDC    A,R1
 011E 3A                ADDC    A,R2
 011F 3B                ADDC    A,R3
 0120 3C                ADDC    A,R4
 0121 3D                ADDC    A,R5
 0122 3E                ADDC    A,R6
 0123 3F                ADDC    A,R7
 0124 3525              ADDC    A,DATA
                
 0126 2126              AJMP    $
 0128 418E              AJMP    FWREF
\f



AVOCET SYSTEMS 8051 CROSS-ASSEMBLER -  VERSION 1.09

SOURCE FILE NAME: TEST51.ASM                                        PAGE  2                                             


                
 012A 5405              ANL     A,#SMALL
 012C 56                ANL     A,@R0
 012D 57                ANL     A,@R1
 012E 58                ANL     A,R0
 012F 59                ANL     A,R1
 0130 5A                ANL     A,R2
 0131 5B                ANL     A,R3
 0132 5C                ANL     A,R4
 0133 5D                ANL     A,R5
 0134 5E                ANL     A,R6
 0135 5F                ANL     A,R7
 0136 5525              ANL     A,DATA
 0138 8201              ANL     C,BIT
 013A B001              ANL     C,/BIT
 013C 532505            ANL     DATA,#SMALL
 013F 5225              ANL     DATA,A
                
 0141 3141              CALL    $
 0143 31C5              CALL    $+2+128
 0145 120947            CALL    $+2+2048
 0148 12028E            CALL    FWREF
                
 014B B605FD            CJNE    @R0,#SMALL,$
 014E B705FD            CJNE    @R1,#SMALL,$
 0151 B405FD            CJNE    A,#SMALL,$
 0154 B525FD            CJNE    A,DATA,$
 0157 B805FD            CJNE    R0,#SMALL,$
 015A B905FD            CJNE    R1,#SMALL,$
 015D BA05FD            CJNE    R2,#SMALL,$
 0160 BB05FD            CJNE    R3,#SMALL,$
 0163 BC05FD            CJNE    R4,#SMALL,$
 0166 BD05FD            CJNE    R5,#SMALL,$
 0169 BE05FD            CJNE    R6,#SMALL,$
 016C BF05FD            CJNE    R7,#SMALL,$
                
 016F E4                CLR     A
 0170 C3                CLR     C
 0171 C201              CLR     BIT
                
 0173 F4                CPL     A
 0174 B3                CPL     C
 0175 B201              CPL     BIT
                
 0177 D4                DA      A
                
 0178 16                DEC     @R0
 0179 17                DEC     @R1
 017A 14                DEC     A
 017B 18                DEC     R0
 017C 19                DEC     R1
\f



AVOCET SYSTEMS 8051 CROSS-ASSEMBLER -  VERSION 1.09

SOURCE FILE NAME: TEST51.ASM                                        PAGE  3                                             


 017D 1A                DEC     R2
 017E 1B                DEC     R3
 017F 1C                DEC     R4
 0180 1D                DEC     R5
 0181 1E                DEC     R6
 0182 1F                DEC     R7
 0183 1525              DEC     DATA
                
 0185 84                DIV     AB
                
 0186 D8FE              DJNZ    R0,$
 0188 D9FE              DJNZ    R1,$
 018A DAFE              DJNZ    R2,$
 018C DBFE              DJNZ    R3,$
 018E DCFE              DJNZ    R4,$
 0190 DDFE              DJNZ    R5,$
 0192 DEFE              DJNZ    R6,$
 0194 DFFE              DJNZ    R7,$
 0196 D525FD            DJNZ    DATA,$
                
 0199 06                INC     @R0
 019A 07                INC     @R1
 019B 04                INC     A
 019C 08                INC     R0
 019D 09                INC     R1
 019E 0A                INC     R2
 019F 0B                INC     R3
 01A0 0C                INC     R4
 01A1 0D                INC     R5
 01A2 0E                INC     R6
 01A3 0F                INC     R7
 01A4 0525              INC     DATA
 01A6 A3                INC     DPTR
                
 01A7 2001FD            JB      BIT,$
 01AA 1001FD            JBC     BIT,$
 01AD 40FE              JC      $
                
 01AF 73                JMP     @A+DPTR
 01B0 80FE              JMP     $
 01B2 4134              JMP     $+2+128
 01B4 0209B6            JMP     $+2+2048
 01B7 02028E            JMP     FWREF
                
 01BA 3001FD            JNB     BIT,$
 01BD 50FE              JNC     $
 01BF 70FE              JNZ     $
 01C1 60FE              JZ      $
                
 01C3 124455            LCALL   BIG
 01C6 024455            LJMP    BIG
\f



AVOCET SYSTEMS 8051 CROSS-ASSEMBLER -  VERSION 1.09

SOURCE FILE NAME: TEST51.ASM                                        PAGE  4                                             


                
 01C9 7605              MOV     @R0,#SMALL
 01CB 7705              MOV     @R1,#SMALL
 01CD F6                MOV     @R0,A
 01CE F7                MOV     @R1,A
 01CF A625              MOV     @R0,DATA
 01D1 A725              MOV     @R1,DATA
 01D3 7405              MOV     A,#SMALL
 01D5 E6                MOV     A,@R0
 01D6 E7                MOV     A,@R1
 01D7 E8                MOV     A,R0
 01D8 E9                MOV     A,R1
 01D9 EA                MOV     A,R2
 01DA EB                MOV     A,R3
 01DB EC                MOV     A,R4
 01DC ED                MOV     A,R5
 01DD EE                MOV     A,R6
 01DE EF                MOV     A,R7
 01DF E525              MOV     A,DATA
 01E1 A201              MOV     C,BIT
 01E3 904455            MOV     DPTR,#BIG
 01E6 7805              MOV     R0,#SMALL
 01E8 7905              MOV     R1,#SMALL
 01EA 7A05              MOV     R2,#SMALL
 01EC 7B05              MOV     R3,#SMALL
 01EE 7C05              MOV     R4,#SMALL
 01F0 7D05              MOV     R5,#SMALL
 01F2 7E05              MOV     R6,#SMALL
 01F4 7F05              MOV     R7,#SMALL
 01F6 F8                MOV     R0,A
 01F7 F9                MOV     R1,A
 01F8 FA                MOV     R2,A
 01F9 FB                MOV     R3,A
 01FA FC                MOV     R4,A
 01FB FD                MOV     R5,A
 01FC FE                MOV     R6,A
 01FD FF                MOV     R7,A
 01FE A825              MOV     R0,DATA
 0200 A925              MOV     R1,DATA
 0202 AA25              MOV     R2,DATA
 0204 AB25              MOV     R3,DATA
 0206 AC25              MOV     R4,DATA
 0208 AD25              MOV     R5,DATA
 020A AE25              MOV     R6,DATA
 020C AF25              MOV     R7,DATA
 020E 9201              MOV     BIT,C
 0210 752505            MOV     DATA,#SMALL
 0213 8625              MOV     DATA,@R0
 0215 8725              MOV     DATA,@R1
 0217 F525              MOV     DATA,A
 0219 8825              MOV     DATA,R0
\f



AVOCET SYSTEMS 8051 CROSS-ASSEMBLER -  VERSION 1.09

SOURCE FILE NAME: TEST51.ASM                                        PAGE  5                                             


 021B 8925              MOV     DATA,R1
 021D 8A25              MOV     DATA,R2
 021F 8B25              MOV     DATA,R3
 0221 8C25              MOV     DATA,R4
 0223 8D25              MOV     DATA,R5
 0225 8E25              MOV     DATA,R6
 0227 8F25              MOV     DATA,R7
 0229 85252A            MOV     DATA+5,DATA
                
 022C 93                MOVC    A,@A+DPTR
 022D 83                MOVC    A,@A+PC
                
 022E F0                MOVX    @DPTR,A
 022F F2                MOVX    @R0,A
 0230 F3                MOVX    @R1,A
 0231 E0                MOVX    A,@DPTR
 0232 E2                MOVX    A,@R0
 0233 E3                MOVX    A,@R1
                
 0234 A4                MUL     AB
 0235 00                NOP
                
 0236 4405              ORL     A,#SMALL
 0238 46                ORL     A,@R0
 0239 47                ORL     A,@R1
 023A 48                ORL     A,R0
 023B 49                ORL     A,R1
 023C 4A                ORL     A,R2
 023D 4B                ORL     A,R3
 023E 4C                ORL     A,R4
 023F 4D                ORL     A,R5
 0240 4E                ORL     A,R6
 0241 4F                ORL     A,R7
 0242 4525              ORL     A,DATA
 0244 7201              ORL     C,BIT
 0246 A001              ORL     C,/BIT
 0248 432505            ORL     DATA,#SMALL
 024B 4225              ORL     DATA,A
                
 024D D025              POP     DATA
 024F C025              PUSH    DATA
                
 0251 22                RET
 0252 32                RETI
 0253 23                RL      A
 0254 33                RLC     A
 0255 03                RR      A
 0256 13                RRC     A
                
 0257 D3                SETB    C
 0258 D201              SETB    BIT
\f



AVOCET SYSTEMS 8051 CROSS-ASSEMBLER -  VERSION 1.09

SOURCE FILE NAME: TEST51.ASM                                        PAGE  6                                             


                
 025A 80FE              SJMP    $
 025C 8030              SJMP    FWREF
                
 025E 9405              SUBB    A,#SMALL
 0260 96                SUBB    A,@R0
 0261 97                SUBB    A,@R1
 0262 98                SUBB    A,R0
 0263 99                SUBB    A,R1
 0264 9A                SUBB    A,R2
 0265 9B                SUBB    A,R3
 0266 9C                SUBB    A,R4
 0267 9D                SUBB    A,R5
 0268 9E                SUBB    A,R6
 0269 9F                SUBB    A,R7
 026A 9525              SUBB    A,DATA
                
 026C C4                SWAP    A
                
 026D C6                XCH     A,@R0
 026E C7                XCH     A,@R1
 026F C8                XCH     A,R0
 0270 C9                XCH     A,R1
 0271 CA                XCH     A,R2
 0272 CB                XCH     A,R3
 0273 CC                XCH     A,R4
 0274 CD                XCH     A,R5
 0275 CE                XCH     A,R6
 0276 CF                XCH     A,R7
 0277 C525              XCH     A,DATA
                
 0279 D6                XCHD    A,@R0
 027A D7                XCHD    A,@R1
                
 027B 6405              XRL     A,#SMALL
 027D 66                XRL     A,@R0
 027E 67                XRL     A,@R1
 027F 68                XRL     A,R0
 0280 69                XRL     A,R1
 0281 6A                XRL     A,R2
 0282 6B                XRL     A,R3
 0283 6C                XRL     A,R4
 0284 6D                XRL     A,R5
 0285 6E                XRL     A,R6
 0286 6F                XRL     A,R7
 0287 6525              XRL     A,DATA
 0289 632505            XRL     DATA,#SMALL
 028C 6225              XRL     DATA,A
                
 028E           FWREF   EQU     $
                
\f



AVOCET SYSTEMS 8051 CROSS-ASSEMBLER -  VERSION 1.09

SOURCE FILE NAME: TEST51.ASM                                        PAGE  7                                             


 0000                   END
\f



AVOCET SYSTEMS 8051 CROSS-ASSEMBLER -  VERSION 1.09

SOURCE FILE NAME: TEST51.ASM                                        PAGE  8                                             
---- SYMBOL TABLE ----

ACC      00E0          BIT4     0078          DATA     0025
BIG      4455          BIT5     008F          FWREF    028E
BIT      0001          BIT6     00F8          SMALL    0005
BIT2     0002          BIT7     00F2          ZORCH    0007
BIT3     0005          BIT8     0000          
«eof»