|
DataMuseum.dkPresents historical artifacts from the history of: Bogika Butler |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Bogika Butler Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1664 (0x680)
Types: TextFile
Names: »CLOCKEXT.SA«
└─⟦909f4eb2b⟧ Bits:30009789/_.ft.Ibm2.50006622.imd Mogens Pelles Zilog 80,000 / EOS projekt
└─⟦this⟧ »CLOCKEXT.SA«
└─⟦ddcd65152⟧ Bits:30009789/_.ft.Ibm2.50006617.imd Mogens Pelles Zilog 80,000 / EOS projekt
└─⟦this⟧ »CLOCKEXT.SA«
***********************************************************************
* Copyright 1984 by *
* NCR Corporation *
* Dayton, Ohio U.S.A. *
* All Rights Reserved *
***********************************************************************
* EOS Software produced by: *
* NCR Systems Engineering - Copenhagen *
* Copenhagen *
* DENMARK *
***********************************************************************
CLOCKEXT IDNT 1,0 EXTERNAL ROUTINE WHICH STARTS THE TIMER
NOFORMAT CALLED BY THE CLOCK MODULE
SECTION 9
XDEF STARTPTM
SUPVMODE EQU 8 TRAP # FOR KERNEL'S SUPVBEGIN
PTMCHIP EQU $00FEE040
CONTRL13 EQU $1
* A3, A5, A6 RESERVED BY PASCAL'S RUN TIME SYSTEM
*
STARTPTM MOVE.L (SP)+,A4 A4:=RETURN ADDR (A4 SURVIVES KERNEL)
LEA DO_START,A0
TRAP #SUPVMODE
JMP (A4) RETURN TO PASCAL ROUTINE
DO_START MOVE.L #PTMCHIP,A0
MOVE.B #00,CONTRL13(A0) BIT 0 :=0; ==> TIMERS OPERATE
RTE BIT1-7:=0; ==> NO TIMER 1 INTERUPTS
END !
«eof»