Commit | Line | Data |
---|---|---|
d52f1552 TL |
1 | # include "RP.h" |
2 | dadmes(dptr) | |
3 | register int *dptr ; | |
4 | { | |
5 | register char *mesp ; | |
6 | register int i ; | |
7 | ||
8 | mesp = " cyl trk sec " ; | |
9 | i = l2x(*(dptr+RP_cyl) & 01777,&mesp[5]) ; | |
10 | blnkit(&mesp[5+i],4-i) ; | |
11 | ||
12 | i = l2x((*(dptr+RP_stk)>>8) & 037 , &mesp[13]) ; | |
13 | blnkit(&mesp[13+i],3-i) ; | |
14 | ||
15 | i = l2x(*(dptr+RP_stk)&037,&mesp[21]) ; | |
16 | blnkit(&mesp[21+i],3-i) ; | |
17 | ||
18 | putlin(mesp) ; | |
19 | } |