DataMuseum.dk

Presents historical artifacts from the history of:

RegneCentralen RC3600/RC7000

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

See our Wiki for more about RegneCentralen RC3600/RC7000

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download

⟦5e27d3682⟧ Bits:30001087 RCSL-43-GL-5317 BIPAR.01 Source code, TextFile

    Length: 2530 (0x9e2)
    Description: Bits:30001087 RCSL-43-GL-5317 BIPAR.01 Source code
    Types: TextFile
    Notes: RCSL-43-GL-5317, RCSL-43-GL-5318

TextFile

 
 ;                                               RCSL  : 43-GL5318
 
 ;                                               AUTHER: MLM
 
 ;                                               EDITED: 77.10.20
 
 
 
 
 
 
 
 
 
 ;                       BIPAR.01
 
 
 
 
 
 
 
 
 
 ;KEYWORDS:      RC3600, INSTRUCTION SET
 
 ;ABSTRACT:      RC3600 BASIC INSTRUCTION DEFINITIONS.
 
 
 
 
 
 
 
 
 
 ;       ASCII PAPER TAPE: RCSL:43-GL5317
 

         .TITLE  BIPAR   ; BASIC INSTRUCTION DEFS.
 
         .RDX    8
 
 ;INSTRUCTION DEFINITON FILE
 
         .XPNG           ;DELETE ALL SYMBOLS
 
 
 
 
 
 ;MULTIPLY/DIVIDE
 .DUSR DIV=073101
 .DUSR MUL =073301
 
 ;DEFINE MEMORY REFERENCE INSTRUCTIONS THAT DON'T REQUIRE AC'S
 .DMR JMP = 000000
 .DMR JSR=004000
 .DMR ISZ=010000
 .DMR DSZ=014000
 
 ;DEFINE MEMORY REFERENCE INSTRUCTIONS THAT REQUIRE AC'S
 .DMRA LDA=020000
 .DMRA STA=040000
 
 ;DEFINE THE ALC INSTRUCTIONS
 .DALC COM=100000
 .DALC NEG=100400
 .DALC MOV=101000
 .DALC INC=101400
 .DALC ADC=102000
 .DALC SUB=102400
 .DALC ADD=103000
 .DALC AND=103400
 
 

 
 ;DEFINE THE ALC SKIPS
 .DUSR SKP=1
 .DUSR SZC=2
 .DUSR SNC=3
 .DUSR SZR=4
 .DUSR SNR=5
 .DUSR SEZ=6
 .DUSR SBN=7
 
 ;DEFINE THE IO INSTRUCTIONS
 .DIO  NIO=060000
 .DIOA DIA=060400
 .DIOA DOA=061000
 .DIOA DIB=061400
 .DIOA DOB=062000
 .DIOA DIC=062400
 .DIOA DOC=063000
 
 ;DEFINE THE IO SKIP INSTRUCTIONS
 .DIO SKPBN=063400
 .DIO SKPBZ=063500
 .DIO SKPDN=063600
 .DIO SKPDZ=063700
 
 
 ;DEFINE CPU DEVICE
 
 .DUSR CPU=      77
 
 ;DEFINE SPECIAL INSTRUCTIONS
 .DUSR INTEN=NIOS CPU            ;INTERRUPT ENABLE
 .DUSR INTDS=NIOC CPU            ;INTERRUPT DISABLE
 .DIAC READS=DIA 0,CPU           ;READ THE SWITCHES
 .DIAC INTA= DIB 0,CPU           ;INTERRUPT ACKNOWLEDGE
 .DIAC MSKO= DOB 0,CPU           ;MASK OUT
 .DUSR IORST=DICC 0,CPU          ;IO RESET
 .DUSR HALT= DOC 0,CPU           ;HALT
 
 
 .DALC SEQ=   SUB#   0,0 SZR       ; SKIP IF S=D
 .DALC SNE=   SUB#   0,0 SNR       ; SKIP IF S<>D
 .DALC SLS=   ADCZ#  0,0 SNC       ; SKIP IF S<D
 .DALC SNG=   SUBZ#  0,0 SNC       ; SKIP IF S<=D
 .DALC SNL=   ADCZ#  0,0 SZC       ; SKIP IF S>=D
 .DALC SGR=   SUBZ#  0,0 SZC       ; SKIP IF S>D
 .DALC INE=   SEQ    0,0           ; IF S<>D THEN EXECUTE
 .DALC IEQ=   SNE    0,0           ; IF S=D THEN EXECUTE
 .DALC INL=   SLS    0,0           ; IF S>=D THEN EXECUTE
 .DALC IGR=   SNG    0,0           ; IF S>D THEN EXECUTE
 .DALC ILS=   SNL    0,0           ; IF S<D THEN EXECUTE
 .DALC ING=   SGR    0,0           ; IF S<=D THEN EXECUTE
 
 
         .EOT