APPENDIX B
Common PEN*KEY 6000 Series Information
PEN*KEY
R
6200/6300 Hand-Held Computer Programmer’s Reference Guide B-15
jamarray[1][jamindex] = jam2;
jamarray[2][jamindex] = jam3;
jamarray[3][j+] = jam4;
scr_printf(“head jam. Abort.\n”);
scr_printf(“page: %u\n”,page_no);
scr_printf(“line: %u\n”,line_cnt);
scr_printf( jam & 1 ? “Left ”:“Right ”);
scr_printf(“\n%s”,((jam & 2) ? “Accel”: (jam & 4) ? “Decel”:
“Print”));
scr_printf(“\n%s”, ((jam & 16) ? “Cmove”: (jam & 32) ? “Nmove”:
“Pmove”));
scr_printf(“\n%s”,((jam &128) ? “highspeed”: “lowspeed”));
scr_printf(“\ncnter0 = %d\n”,jam2);
scr_printf(“\interrupts = %d\n”,jam3);
tdelay(10000);
break;
case PAPEROUT:
scr_printf(“Printer paper out. Retry.\n”);
break;
case LOWVOLTS:
scr_printf(“Printer low voltage. Retry.\n”);
break;
case HIVOLTS:
scr_printf(“Printer over voltage. Retry.\n”);
break;
case LOWBAT:
scr_printf(“Printer low battery. Retry.\n”);
break;
case COVEROFF:
scr_printf(“Printer cover off. Retry.\n”);
default:
break;
}
if (exterr != HEADJAM) ch = (scr_getc());
while (1) {
scr_printf(“abort, retry, ignore, fail :”);
ch = (exterr != HEADJAM) ? (scr_getc()) : ‘r’;
scr_printf(“%c \n”,ch);
ch = tolower(ch);
switch (ch) {
case ‘1’:
case ‘a’: return (2);
case ‘2’:
case ‘r’: return (1);
case ‘3’:
case ‘i’: return (0);
case ‘4’:
case ‘f’: return (3);
default: break;
}
}
}
FAR (void) errproc()
{
#asm
sti
push ds
push es
;
pusha
push ax
push bx
push cx
push dx
push si
push di
B. Common PEN*KEY
6000 Series Info.
