9 fprintf(stdout, "#%04X: adr :", PR);
10 for(i = 0; i < col; i++) {
11 fprintf(stdout, " %04X", i);
13 fprintf(stdout, "\n");
15 for(i = 0; i < memsize; i++) {
17 fprintf(stdout, "#%04X: %04X: ", PR, i);
19 fprintf(stdout, "%04X", memory[i]);
20 if(i > 0 && (i + 1) % col == 0) {
21 fprintf(stdout, "\n");
28 /* COMET IIのレジスタを表示 */
32 for(i = 0; i < REGSIZE; i++ ) {
33 if(logicalmode == true) {
34 fprintf(stdout, "#%04X: GR%d: %6d = #%04X = %s\n",
35 PR, i, GR[i], GR[i], word2bit(GR[i]));
37 fprintf(stdout, "#%04X: GR%d: %6d = #%04X = %s\n",
38 PR, i, (short)GR[i], GR[i], word2bit(GR[i]));
41 fprintf(stdout, "#%04X: SP: %6d = #%04X = %s\n", PR, SP, SP, word2bit(SP));
42 fprintf(stdout, "#%04X: PR: %6d = #%04X = %s\n", PR, PR, PR, word2bit(PR));
43 fprintf(stdout, "#%04X: FR (OF SF ZF): %s\n", PR, (word2bit(FR)+13));