mirror of
https://github.com/DoctorWkt/unix-jun72.git
synced 2026-02-12 19:17:50 +00:00
58 lines
2.0 KiB
Plaintext
58 lines
2.0 KiB
Plaintext
. = orig+60
|
|
ttyi;240 / interrupt vector tty in ; processor level 5
|
|
ttyo;240 / interrupt vector tty out
|
|
ppti;240 / punch papertape in
|
|
ppto;240 / punch papertape out
|
|
clock;340 / clock interrupt vector ; processor level 7
|
|
. = orig+200
|
|
/ lpto; 240 line printer interrupt ; processor level 5 (future)
|
|
. = orig+204
|
|
drum;300 / drum interrupt ; processor level 6
|
|
. = orig+214
|
|
tape;300 / dec tape interrupt
|
|
disk;300 / rk03 interrupt
|
|
. = orig+300
|
|
0*4+trcv; 240; 0*4+txmt; 240 / dc11 input,output interrupt vectors
|
|
1*4+trcv; 240; 1*4+txmt; 240
|
|
2*4+trcv; 240; 2*4+txmt; 240
|
|
3*4+trcv; 240; 3*4+txmt; 240
|
|
4*4+trcv; 240; 4*4+txmt; 240
|
|
5*4+trcv; 240; 5*4+txmt; 240
|
|
6*4+trcv; 240; 6*4+txmt; 240
|
|
7*4+trcv; 240; 7*4+txmt; 240
|
|
|
|
. = orig+400
|
|
/ copy in transfer vectors
|
|
|
|
mov $ecore,sp / put pointer to ecore in the stack pointer
|
|
jsr r0,copyz; 0; 14 / clear locations 0 to 14 in core
|
|
mov $4,r0
|
|
clr r1
|
|
mov r0,(r1)+ / put value of 4 into location 0
|
|
mov r0,(r1)+ / put value of 4 into location 2
|
|
mov $unkni,(r1)+ / put value of unkni into location 4;
|
|
/ time out, bus error
|
|
clr (r1)+ / put value of 0 into location 6
|
|
mov $fpsym,(r1)+ / put value of fpsym into location 10
|
|
clr (r1)+ / put value of 0 into location 12
|
|
/ clear core
|
|
.if cold / ignored if cold = 0
|
|
halt / halt before initializing rf file system; user has
|
|
/ last chance to reconsider
|
|
.endif
|
|
|
|
jsr r0,copyz; systm; ecore / clear locations systm to ecore
|
|
mov $s.chrgt+2,clockp / intialize clockp
|
|
/ allocate tty buffers; see H.0 for description
|
|
mov $buffer,r0
|
|
mov $tty+6,r1
|
|
1:
|
|
mov r0,(r1)
|
|
add $140.,r0 / tty buffers are 140. bytes long
|
|
add $8,r1
|
|
cmp r1,$tty+[ntty*8] / has a buffer been assigned for each tty
|
|
blo 1b
|
|
|
|
/ allocate disk buffers; see H.0 for description
|
|
|