|
DataMuseum.dkPresents historical artifacts from the history of: RegneCentralen RC850 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RegneCentralen RC850 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 896 (0x380) Types: TextFile Names: »HDWNIT.ASM«
└─⟦9f46c4107⟧ Bits:30005988 Sources for TurboDOS ver. 1.30 device drivers └─⟦this⟧ »HDWNIT.ASM«
.PAGE 132,69 .TITLE "COMAND OPERATING SYSTEM - RC 850 HARDWARE INITIALIZATION" .SBTTL "COPYRIGHT (C) 1982 BY ASE GMBH, ALTENSTADT, vers.: 7.11.83" ; .IDENT HDWNIT ;MODULE ID ; ; .INSERT RCEQUATE ;O/S SYMBOLIC EQUIVALENCES ; .LOC .INIT.# ;LOCATE IN INITIALIZATION AREA ; HDWNIT::MVI A,1 ;CLEAR STATUS LED'S OUT STAT0 ; OUT STAT1 ; OUT STAT2 ; OUT STAT3 ; OUT STAT4 ; OUT STAT5 ; OUT STAT6 ; OUT STAT7 ; CALL INTNIT# ;INITIALIZE INTERRUPT PAGE CALL CRTNIT# ;INITIALIZE CRT CALL BNKNIT# ;INITIALIZE BANK CODE CALL RTCNIT# ;initialize real time tick CALL RTCNI1# ; CALL LSTNIT# ;INITIALIZE PRINTER CALL DSKINA# ;INITIALIZE DISK DEVICE A CALL DSKINB# ;INITIALIZE HARD DISK CALL DSKINC# ;INITIALIZE HARD DISK CALL CKTINA# ;INITIALIZE RC-CIRCUIT RET ;DONE - RETURN TO CALLER ; .END «eof»