mirror of
https://github.com/DoctorWkt/unix-jun72.git
synced 2026-02-26 17:04:03 +00:00
- worked on the inter-page flow for sections e00, e05, e06 and e09
This commit is contained in:
44
pages/e00-02
44
pages/e00-02
@@ -1,27 +1,27 @@
|
||||
. = 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
|
||||
. = 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+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
|
||||
. = orig+400
|
||||
/ copy in transfer vectors
|
||||
|
||||
mov $ecore,sp / put pointer to score in the stack pointer
|
||||
|
||||
@@ -51,4 +51,3 @@ panic:
|
||||
dec $5
|
||||
bne 1b
|
||||
jmp *$173700 / rom loader address
|
||||
|
||||
|
||||
@@ -53,4 +53,3 @@ badrts:
|
||||
mov (sp)+,r1
|
||||
mov (sp)+,r0
|
||||
rpsym:
|
||||
|
||||
|
||||
@@ -54,4 +54,3 @@ idata:
|
||||
<tap2\0\0\0\0>
|
||||
09.
|
||||
<tap3\0\0\0\0>
|
||||
|
||||
|
||||
@@ -54,4 +54,3 @@
|
||||
bhi. 3f
|
||||
mov r5,0f
|
||||
3:
|
||||
|
||||
|
||||
@@ -53,5 +53,3 @@ alloc:
|
||||
inc r1 / increment bit count in bit k (mod8)
|
||||
br 1b
|
||||
1:
|
||||
|
||||
|
||||
|
||||
@@ -51,4 +51,3 @@ access:
|
||||
jsr r0,iget / read in i-node for current directory (i-number
|
||||
/ passed in r1)
|
||||
mov i.flgs,r2
|
||||
|
||||
|
||||
@@ -53,5 +53,3 @@ icalc: / i-node i is located in block (i+31.)/16. and begins 32.*
|
||||
dec r3
|
||||
bgt 1b
|
||||
jsr r0,dskwr / write inode out on device
|
||||
|
||||
|
||||
|
||||
@@ -52,4 +52,3 @@ rtty: / read from console tty
|
||||
movb *4(rS),r1 / no, put character in r1
|
||||
inc 4(r5) / 3rd word of console tty buffer points to byte which
|
||||
/ contains the next char.
|
||||
|
||||
|
||||
@@ -51,4 +51,3 @@ passc:
|
||||
movb r1,*u.base / move a character to the next byte of the
|
||||
/ users buffer
|
||||
inc u.base / increment the pointer to point to the next byte
|
||||
|
||||
|
||||
@@ -1,4 +1,4 @@
|
||||
/ in users buffer
|
||||
/ in users buffer
|
||||
inc u.nread / increment the number of bytes read
|
||||
dec u.count / decrement the number of bytes to be read
|
||||
bne 1f / any more bytes to read?; yes, branch
|
||||
@@ -52,4 +52,3 @@ wtty:
|
||||
beq wtty / yes, get next character
|
||||
1 :
|
||||
mov $240,*$ps / no, set processor priority to five
|
||||
|
||||
|
||||
@@ -52,4 +52,3 @@ dskw: / write routine for non-special files
|
||||
cmp r2,i.size / is this greater than the present size of
|
||||
/ the file?
|
||||
blos if / no, branch
|
||||
|
||||
|
||||
@@ -53,4 +53,3 @@ sioreg:
|
||||
blc $l777,r2 / calculate file offset mod 512.
|
||||
add r5,r2 / r2 now points to 1st byte in system buffer where
|
||||
/ data is to be placed
|
||||
|
||||
|
||||
@@ -53,4 +53,3 @@ trcv:
|
||||
mov $12,r1
|
||||
3:
|
||||
bitb $4,tty+4(r0)
|
||||
|
||||
|
||||
@@ -53,4 +53,3 @@ txmt:
|
||||
mov clockp,-(sp)
|
||||
mov $s.syst+2,clockp
|
||||
sub $txmt+4,r0 / 0%4 / offset in cc
|
||||
|
||||
|
||||
@@ -54,4 +54,3 @@ starxmt:
|
||||
/ 2, far left digit = 0) branch
|
||||
bisb 200,r1 / if entry is less than 0 add 128 to ASC11
|
||||
/ code for char to be output
|
||||
|
||||
|
||||
@@ -55,4 +55,3 @@
|
||||
3:
|
||||
bitb $2,3(r2) / is bit 1 of 5th byte of "tty" area = 1
|
||||
/ (tab to space bit set)
|
||||
|
||||
|
||||
@@ -54,4 +54,3 @@ partab: / contains 3 digits for each character; digit 2 is used
|
||||
|
||||
xmtt:
|
||||
jsr r0,cpass / get next character from user buffer area
|
||||
|
||||
|
||||
@@ -54,4 +54,3 @@ rcvt: / read tty
|
||||
2:
|
||||
jsr r0,canon; rcvch / process a line of characters in
|
||||
/ clist and place results in tty buffer
|
||||
|
||||
|
||||
@@ -54,4 +54,3 @@ ocvt:
|
||||
1:
|
||||
mov tty+6(r1),r5 / put tty buffer address in r5
|
||||
tstb (r5) / first byte of tty buffer = 0
|
||||
|
||||
|
||||
@@ -9,8 +9,8 @@ m u0 e00-*
|
||||
#m u2 e02-*
|
||||
#m u3 e03-*
|
||||
#m u4 e04-*
|
||||
#m u5 e05-*
|
||||
#m u6 e06-*
|
||||
m u5 e05-*
|
||||
m u6 e06-*
|
||||
#m u7 e07-*
|
||||
#m u8 e08-*
|
||||
m u9 e09-*
|
||||
|
||||
Reference in New Issue
Block a user