<!DOCTYPE html PUBLIC '-//W3C//DTD XHTML 1.0 Transitional//EN' 'http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd'>
<html xmlns='http://www.w3.org/1999/xhtml'>
<head>
<title>cpu</title>
<meta name='robots' content='noindex,nofollow' />
<meta name='generator' content='GLOBAL-6.6.14' />
<meta http-equiv='Content-Style-Type' content='text/css' />
<link rel='stylesheet' type='text/css' href='../style.css' />
</head>
<body>
<pre>
<span class='curline'><a href='../S/20637.html#L49'>cpu</a> 49 include/struct.h CPU *cpu; /**<CPU */</span>
<span class='curline'><a href='../S/21079.html#L9'>cpu</a> 9 src/dump.c fprintf(stdout, "#%04X: adr :", sys->cpu->pr);</span>
<span class='curline'><a href='../S/21079.html#L22'>cpu</a> 22 src/dump.c fprintf(stdout, "#%04X: %04X: ", sys->cpu->pr, i);</span>
<span class='curline'><a href='../S/21079.html#L40'>cpu</a> 40 src/dump.c char *sp = word2bit(sys->cpu->sp);</span>
<span class='curline'><a href='../S/21079.html#L41'>cpu</a> 41 src/dump.c char *pr = word2bit(sys->cpu->pr);</span>
<span class='curline'><a href='../S/21079.html#L42'>cpu</a> 42 src/dump.c char *fr = word2bit(sys->cpu->fr);</span>
<span class='curline'><a href='../S/21079.html#L47'>cpu</a> 47 src/dump.c fprintf(stdout, "#%04X: GR%d: ", sys->cpu->pr, i);</span>
<span class='curline'><a href='../S/21079.html#L48'>cpu</a> 48 src/dump.c print_dumpword(sys->cpu->gr[i], execmode.logical);</span>
<span class='curline'><a href='../S/21079.html#L51'>cpu</a> 51 src/dump.c fprintf(stdout, "#%04X: SP: %6d = #%04X = %s\n", sys->cpu->pr, sys->cpu->sp, sys->cpu->sp, sp);</span>
<span class='curline'><a href='../S/21079.html#L52'>cpu</a> 52 src/dump.c fprintf(stdout, "#%04X: PR: %6d = #%04X = %s\n", sys->cpu->pr, sys->cpu->pr, sys->cpu->pr, pr);</span>
<span class='curline'><a href='../S/21079.html#L53'>cpu</a> 53 src/dump.c fprintf(stdout, "#%04X: FR (OF SF ZF): %s\n", sys->cpu->pr, fr + L3BIT); /* FRは下位3けたを表示 */</span>
<span class='curline'><a href='../S/21058.html#L115'>cpu</a> 115 src/exec.c sys->memory[sys->cpu->gr[1]] = sys->memory[sys->cpu->gr[2]] = 0x0;</span>
<span class='curline'><a href='../S/21058.html#L123'>cpu</a> 123 src/exec.c if(sys->cpu->gr[1] + i > execptr->end) {</span>
<span class='curline'><a href='../S/21058.html#L128'>cpu</a> 128 src/exec.c sys->memory[sys->cpu->gr[1] + i] = buf[i];</span>
<span class='curline'><a href='../S/21058.html#L130'>cpu</a> 130 src/exec.c sys->memory[sys->cpu->gr[2]] = i + 1;</span>
<span class='curline'><a href='../S/21058.html#L139'>cpu</a> 139 src/exec.c for(i = 0; i < sys->memory[sys->cpu->gr[2]]; i++) {</span>
<span class='curline'><a href='../S/21058.html#L140'>cpu</a> 140 src/exec.c if(sys->cpu->gr[1] + i > execptr->end) {</span>
<span class='curline'><a href='../S/21058.html#L147'>cpu</a> 147 src/exec.c if(((w = sys->memory[sys->cpu->gr[1]+i]) >= 0x20 && w <= 0x7E) || /* JIS X 0201ラテン文字 */</span>
<span class='curline'><a href='../S/21058.html#L160'>cpu</a> 160 src/exec.c sys->cpu->fr = 0x0;</span>
<span class='curline'><a href='../S/21058.html#L163'>cpu</a> 163 src/exec.c sys->cpu->fr += SF;</span>
<span class='curline'><a href='../S/21058.html#L167'>cpu</a> 167 src/exec.c sys->cpu->fr += ZF;</span>
<span class='curline'><a href='../S/21058.html#L177'>cpu</a> 177 src/exec.c setcerr(205, s = pr2str(sys->cpu->pr)); /* r/r1 in word #1 - not GR */</span>
<span class='curline'><a href='../S/21058.html#L190'>cpu</a> 190 src/exec.c setcerr(206, s = pr2str(sys->cpu->pr)); /* r/r1 in word #1 - not GR */</span>
<span class='curline'><a href='../S/21058.html#L203'>cpu</a> 203 src/exec.c a += sys->cpu->gr[x];</span>
<span class='curline'><a href='../S/21058.html#L214'>cpu</a> 214 src/exec.c setcerr(207, s = pr2str(sys->cpu->pr + 1)); /* address in word #2 - out of memory */</span>
<span class='curline'><a href='../S/21058.html#L229'>cpu</a> 229 src/exec.c sys->cpu->pr += 1;</span>
<span class='curline'><a href='../S/21058.html#L234'>cpu</a> 234 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L235'>cpu</a> 235 src/exec.c setfr(sys->cpu->gr[get_r_r1(w[0])] = get_val_adr_x(w[1], w[0]));</span>
<span class='curline'><a href='../S/21058.html#L236'>cpu</a> 236 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L241'>cpu</a> 241 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr]};</span>
<span class='curline'><a href='../S/21058.html#L242'>cpu</a> 242 src/exec.c setfr(sys->cpu->gr[get_r_r1(w[0])] = sys->cpu->gr[get_x_r2(w[0])]);</span>
<span class='curline'><a href='../S/21058.html#L243'>cpu</a> 243 src/exec.c sys->cpu->pr += 1;</span>
<span class='curline'><a href='../S/21058.html#L248'>cpu</a> 248 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L249'>cpu</a> 249 src/exec.c sys->memory[get_adr_x(w[1], w[0])] = sys->cpu->gr[get_r_r1(w[0])];</span>
<span class='curline'><a href='../S/21058.html#L250'>cpu</a> 250 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L255'>cpu</a> 255 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L256'>cpu</a> 256 src/exec.c sys->cpu->gr[get_r_r1(w[0])] = get_adr_x(w[1], w[0]);</span>
<span class='curline'><a href='../S/21058.html#L257'>cpu</a> 257 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L264'>cpu</a> 264 src/exec.c sys->cpu->fr = 0x0;</span>
<span class='curline'><a href='../S/21058.html#L267'>cpu</a> 267 src/exec.c if((tmp = (short)(sys->cpu->gr[r]) + (short)val) > 32767 || tmp < -32768) {</span>
<span class='curline'><a href='../S/21058.html#L268'>cpu</a> 268 src/exec.c sys->cpu->fr += OF;</span>
<span class='curline'><a href='../S/21058.html#L271'>cpu</a> 271 src/exec.c sys->cpu->gr[r] = (WORD)(tmp & 0xFFFF);</span>
<span class='curline'><a href='../S/21058.html#L272'>cpu</a> 272 src/exec.c if((sys->cpu->gr[r] & 0x8000) == 0x8000) {</span>
<span class='curline'><a href='../S/21058.html#L273'>cpu</a> 273 src/exec.c sys->cpu->fr += SF;</span>
<span class='curline'><a href='../S/21058.html#L274'>cpu</a> 274 src/exec.c } else if(sys->cpu->gr[r] == 0x0) {</span>
<span class='curline'><a href='../S/21058.html#L275'>cpu</a> 275 src/exec.c sys->cpu->fr += ZF;</span>
<span class='curline'><a href='../S/21058.html#L281'>cpu</a> 281 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L283'>cpu</a> 283 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L288'>cpu</a> 288 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr]};</span>
<span class='curline'><a href='../S/21058.html#L289'>cpu</a> 289 src/exec.c adda(get_r_r1(w[0]), sys->cpu->gr[get_x_r2(w[0])]);</span>
<span class='curline'><a href='../S/21058.html#L290'>cpu</a> 290 src/exec.c sys->cpu->pr += 1;</span>
<span class='curline'><a href='../S/21058.html#L295'>cpu</a> 295 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L297'>cpu</a> 297 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L302'>cpu</a> 302 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr]};</span>
<span class='curline'><a href='../S/21058.html#L303'>cpu</a> 303 src/exec.c adda(get_r_r1(w[0]), ~(sys->cpu->gr[get_x_r2(w[0])]) + 1);</span>
<span class='curline'><a href='../S/21058.html#L304'>cpu</a> 304 src/exec.c sys->cpu->pr += 1;</span>
<span class='curline'><a href='../S/21058.html#L312'>cpu</a> 312 src/exec.c o = sys->cpu->gr[r];</span>
<span class='curline'><a href='../S/21058.html#L313'>cpu</a> 313 src/exec.c sys->cpu->fr = 0; /* flag initialize */</span>
<span class='curline'><a href='../S/21058.html#L318'>cpu</a> 318 src/exec.c sys->cpu->fr += OF;</span>
<span class='curline'><a href='../S/21058.html#L322'>cpu</a> 322 src/exec.c sys->cpu->fr += OF;</span>
<span class='curline'><a href='../S/21058.html#L329'>cpu</a> 329 src/exec.c sys->cpu->gr[r] = (WORD)s;</span>
<span class='curline'><a href='../S/21058.html#L332'>cpu</a> 332 src/exec.c sys->cpu->fr += SF;</span>
<span class='curline'><a href='../S/21058.html#L335'>cpu</a> 335 src/exec.c sys->cpu->fr += ZF;</span>
<span class='curline'><a href='../S/21058.html#L341'>cpu</a> 341 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L343'>cpu</a> 343 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L348'>cpu</a> 348 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr]};</span>
<span class='curline'><a href='../S/21058.html#L349'>cpu</a> 349 src/exec.c addl_gr(get_r_r1(w[0]), sys->cpu->gr[get_x_r2(w[0])], true);</span>
<span class='curline'><a href='../S/21058.html#L350'>cpu</a> 350 src/exec.c sys->cpu->pr += 1;</span>
<span class='curline'><a href='../S/21058.html#L355'>cpu</a> 355 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L357'>cpu</a> 357 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L362'>cpu</a> 362 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr]};</span>
<span class='curline'><a href='../S/21058.html#L363'>cpu</a> 363 src/exec.c addl_gr(get_r_r1(w[0]), sys->cpu->gr[get_x_r2(w[0])], false);</span>
<span class='curline'><a href='../S/21058.html#L364'>cpu</a> 364 src/exec.c sys->cpu->pr += 1;</span>
<span class='curline'><a href='../S/21058.html#L369'>cpu</a> 369 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L370'>cpu</a> 370 src/exec.c setfr(sys->cpu->gr[get_r_r1(w[0])] &= get_val_adr_x(w[1], w[0]));</span>
<span class='curline'><a href='../S/21058.html#L371'>cpu</a> 371 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L376'>cpu</a> 376 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr]};</span>
<span class='curline'><a href='../S/21058.html#L377'>cpu</a> 377 src/exec.c setfr(sys->cpu->gr[get_r_r1(w[0])] &= sys->cpu->gr[get_x_r2(w[0])]);</span>
<span class='curline'><a href='../S/21058.html#L378'>cpu</a> 378 src/exec.c sys->cpu->pr += 1;</span>
<span class='curline'><a href='../S/21058.html#L383'>cpu</a> 383 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L384'>cpu</a> 384 src/exec.c setfr(sys->cpu->gr[get_r_r1(w[0])] |= get_val_adr_x(w[1], w[0]));</span>
<span class='curline'><a href='../S/21058.html#L385'>cpu</a> 385 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L390'>cpu</a> 390 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr]};</span>
<span class='curline'><a href='../S/21058.html#L391'>cpu</a> 391 src/exec.c setfr(sys->cpu->gr[get_r_r1(w[0])] |= sys->cpu->gr[get_x_r2(w[0])]);</span>
<span class='curline'><a href='../S/21058.html#L392'>cpu</a> 392 src/exec.c sys->cpu->pr += 1;</span>
<span class='curline'><a href='../S/21058.html#L397'>cpu</a> 397 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L398'>cpu</a> 398 src/exec.c setfr(sys->cpu->gr[get_r_r1(w[0])] ^= get_val_adr_x(w[1], w[0]));</span>
<span class='curline'><a href='../S/21058.html#L399'>cpu</a> 399 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L404'>cpu</a> 404 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr]};</span>
<span class='curline'><a href='../S/21058.html#L405'>cpu</a> 405 src/exec.c setfr(sys->cpu->gr[get_r_r1(w[0])] ^= sys->cpu->gr[get_x_r2(w[0])]);</span>
<span class='curline'><a href='../S/21058.html#L406'>cpu</a> 406 src/exec.c sys->cpu->pr += 1;</span>
<span class='curline'><a href='../S/21058.html#L411'>cpu</a> 411 src/exec.c sys->cpu->fr = 0;</span>
<span class='curline'><a href='../S/21058.html#L412'>cpu</a> 412 src/exec.c if((short)sys->cpu->gr[r] < (short)val) {</span>
<span class='curline'><a href='../S/21058.html#L413'>cpu</a> 413 src/exec.c sys->cpu->fr = SF;</span>
<span class='curline'><a href='../S/21058.html#L414'>cpu</a> 414 src/exec.c } else if(sys->cpu->gr[r] == val) {</span>
<span class='curline'><a href='../S/21058.html#L415'>cpu</a> 415 src/exec.c sys->cpu->fr = ZF;</span>
<span class='curline'><a href='../S/21058.html#L421'>cpu</a> 421 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L423'>cpu</a> 423 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L428'>cpu</a> 428 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr]};</span>
<span class='curline'><a href='../S/21058.html#L429'>cpu</a> 429 src/exec.c cpa(get_r_r1(w[0]), sys->cpu->gr[get_x_r2(w[0])]);</span>
<span class='curline'><a href='../S/21058.html#L430'>cpu</a> 430 src/exec.c sys->cpu->pr += 1;</span>
<span class='curline'><a href='../S/21058.html#L435'>cpu</a> 435 src/exec.c sys->cpu->fr = 0x0;</span>
<span class='curline'><a href='../S/21058.html#L436'>cpu</a> 436 src/exec.c if(sys->cpu->gr[r] < val) {</span>
<span class='curline'><a href='../S/21058.html#L437'>cpu</a> 437 src/exec.c sys->cpu->fr = SF;</span>
<span class='curline'><a href='../S/21058.html#L438'>cpu</a> 438 src/exec.c } else if(sys->cpu->gr[r] == val) {</span>
<span class='curline'><a href='../S/21058.html#L439'>cpu</a> 439 src/exec.c sys->cpu->fr = ZF;</span>
<span class='curline'><a href='../S/21058.html#L445'>cpu</a> 445 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L447'>cpu</a> 447 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L452'>cpu</a> 452 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr]};</span>
<span class='curline'><a href='../S/21058.html#L453'>cpu</a> 453 src/exec.c cpl(get_r_r1(w[0]), sys->cpu->gr[get_x_r2(w[0])]);</span>
<span class='curline'><a href='../S/21058.html#L454'>cpu</a> 454 src/exec.c sys->cpu->pr += 1;</span>
<span class='curline'><a href='../S/21058.html#L459'>cpu</a> 459 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L461'>cpu</a> 461 src/exec.c WORD sign = sys->cpu->gr[r] & 0x8000;</span>
<span class='curline'><a href='../S/21058.html#L464'>cpu</a> 464 src/exec.c sys->cpu->fr = 0;</span>
<span class='curline'><a href='../S/21058.html#L465'>cpu</a> 465 src/exec.c sys->cpu->gr[r] &= 0x7FFF;</span>
<span class='curline'><a href='../S/21058.html#L467'>cpu</a> 467 src/exec.c last = sys->cpu->gr[r] & 0x4000;</span>
<span class='curline'><a href='../S/21058.html#L468'>cpu</a> 468 src/exec.c sys->cpu->gr[r] <<= 1;</span>
<span class='curline'><a href='../S/21058.html#L470'>cpu</a> 470 src/exec.c sys->cpu->gr[r] = sign | (sys->cpu->gr[r] & 0x7FFF);</span>
<span class='curline'><a href='../S/21058.html#L473'>cpu</a> 473 src/exec.c sys->cpu->fr += OF;</span>
<span class='curline'><a href='../S/21058.html#L477'>cpu</a> 477 src/exec.c sys->cpu->fr += SF;</span>
<span class='curline'><a href='../S/21058.html#L480'>cpu</a> 480 src/exec.c if(sys->cpu->gr[r] == 0x0) {</span>
<span class='curline'><a href='../S/21058.html#L481'>cpu</a> 481 src/exec.c sys->cpu->fr += ZF;</span>
<span class='curline'><a href='../S/21058.html#L483'>cpu</a> 483 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L488'>cpu</a> 488 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L490'>cpu</a> 490 src/exec.c WORD sign = sys->cpu->gr[r] & 0x8000;</span>
<span class='curline'><a href='../S/21058.html#L493'>cpu</a> 493 src/exec.c sys->cpu->fr = 0;</span>
<span class='curline'><a href='../S/21058.html#L494'>cpu</a> 494 src/exec.c sys->cpu->gr[r] &= 0x7FFF;</span>
<span class='curline'><a href='../S/21058.html#L496'>cpu</a> 496 src/exec.c last = sys->cpu->gr[r] & 0x1;</span>
<span class='curline'><a href='../S/21058.html#L497'>cpu</a> 497 src/exec.c sys->cpu->gr[r] >>= 1;</span>
<span class='curline'><a href='../S/21058.html#L499'>cpu</a> 499 src/exec.c sys->cpu->gr[r] |= 0x4000;</span>
<span class='curline'><a href='../S/21058.html#L502'>cpu</a> 502 src/exec.c sys->cpu->gr[r] = sign | sys->cpu->gr[r];</span>
<span class='curline'><a href='../S/21058.html#L505'>cpu</a> 505 src/exec.c sys->cpu->fr += OF;</span>
<span class='curline'><a href='../S/21058.html#L509'>cpu</a> 509 src/exec.c sys->cpu->fr += SF;</span>
<span class='curline'><a href='../S/21058.html#L512'>cpu</a> 512 src/exec.c if(sys->cpu->gr[r] == 0x0) {</span>
<span class='curline'><a href='../S/21058.html#L513'>cpu</a> 513 src/exec.c sys->cpu->fr += ZF;</span>
<span class='curline'><a href='../S/21058.html#L515'>cpu</a> 515 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L520'>cpu</a> 520 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L524'>cpu</a> 524 src/exec.c sys->cpu->fr = 0x0;</span>
<span class='curline'><a href='../S/21058.html#L526'>cpu</a> 526 src/exec.c last = sys->cpu->gr[r] & 0x8000;</span>
<span class='curline'><a href='../S/21058.html#L527'>cpu</a> 527 src/exec.c sys->cpu->gr[r] <<= 1;</span>
<span class='curline'><a href='../S/21058.html#L531'>cpu</a> 531 src/exec.c sys->cpu->fr += OF;</span>
<span class='curline'><a href='../S/21058.html#L534'>cpu</a> 534 src/exec.c if((sys->cpu->gr[r] & 0x8000) > 0x0) {</span>
<span class='curline'><a href='../S/21058.html#L535'>cpu</a> 535 src/exec.c sys->cpu->fr += SF;</span>
<span class='curline'><a href='../S/21058.html#L538'>cpu</a> 538 src/exec.c if(sys->cpu->gr[r] == 0x0) {</span>
<span class='curline'><a href='../S/21058.html#L539'>cpu</a> 539 src/exec.c sys->cpu->fr += ZF;</span>
<span class='curline'><a href='../S/21058.html#L541'>cpu</a> 541 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L546'>cpu</a> 546 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L550'>cpu</a> 550 src/exec.c sys->cpu->fr = 0x0;</span>
<span class='curline'><a href='../S/21058.html#L552'>cpu</a> 552 src/exec.c last = sys->cpu->gr[r] & 0x0001;</span>
<span class='curline'><a href='../S/21058.html#L553'>cpu</a> 553 src/exec.c sys->cpu->gr[r] >>= 1;</span>
<span class='curline'><a href='../S/21058.html#L557'>cpu</a> 557 src/exec.c sys->cpu->fr += OF;</span>
<span class='curline'><a href='../S/21058.html#L560'>cpu</a> 560 src/exec.c if((sys->cpu->gr[r] & 0x8000) > 0x0) {</span>
<span class='curline'><a href='../S/21058.html#L561'>cpu</a> 561 src/exec.c sys->cpu->fr += SF;</span>
<span class='curline'><a href='../S/21058.html#L564'>cpu</a> 564 src/exec.c if(sys->cpu->gr[r] == 0x0) {</span>
<span class='curline'><a href='../S/21058.html#L565'>cpu</a> 565 src/exec.c sys->cpu->fr += ZF;</span>
<span class='curline'><a href='../S/21058.html#L567'>cpu</a> 567 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L572'>cpu</a> 572 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L573'>cpu</a> 573 src/exec.c if((sys->cpu->fr & (SF | ZF)) == 0) {</span>
<span class='curline'><a href='../S/21058.html#L574'>cpu</a> 574 src/exec.c sys->cpu->pr = get_adr_x(w[1], w[0]);</span>
<span class='curline'><a href='../S/21058.html#L576'>cpu</a> 576 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L582'>cpu</a> 582 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L583'>cpu</a> 583 src/exec.c if((sys->cpu->fr & SF) > 0) {</span>
<span class='curline'><a href='../S/21058.html#L584'>cpu</a> 584 src/exec.c sys->cpu->pr = get_adr_x(w[1], w[0]);</span>
<span class='curline'><a href='../S/21058.html#L586'>cpu</a> 586 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L592'>cpu</a> 592 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L593'>cpu</a> 593 src/exec.c if((sys->cpu->fr & ZF) == 0) {</span>
<span class='curline'><a href='../S/21058.html#L594'>cpu</a> 594 src/exec.c sys->cpu->pr = get_adr_x(w[1], w[0]);</span>
<span class='curline'><a href='../S/21058.html#L596'>cpu</a> 596 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L602'>cpu</a> 602 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L603'>cpu</a> 603 src/exec.c if((sys->cpu->fr & ZF) > 0) {</span>
<span class='curline'><a href='../S/21058.html#L604'>cpu</a> 604 src/exec.c sys->cpu->pr = get_adr_x(w[1], w[0]);</span>
<span class='curline'><a href='../S/21058.html#L606'>cpu</a> 606 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L612'>cpu</a> 612 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L613'>cpu</a> 613 src/exec.c if((sys->cpu->fr & OF) > 0) {</span>
<span class='curline'><a href='../S/21058.html#L614'>cpu</a> 614 src/exec.c sys->cpu->pr = get_adr_x(w[1], w[0]);</span>
<span class='curline'><a href='../S/21058.html#L616'>cpu</a> 616 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L622'>cpu</a> 622 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L623'>cpu</a> 623 src/exec.c sys->cpu->pr = get_adr_x(w[1], w[0]);</span>
<span class='curline'><a href='../S/21058.html#L628'>cpu</a> 628 src/exec.c assert(sys->cpu->sp > execptr->end && sys->cpu->sp <= sys->memsize);</span>
<span class='curline'><a href='../S/21058.html#L629'>cpu</a> 629 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L630'>cpu</a> 630 src/exec.c sys->memory[--(sys->cpu->sp)] = get_adr_x(w[1], w[0]);</span>
<span class='curline'><a href='../S/21058.html#L631'>cpu</a> 631 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L636'>cpu</a> 636 src/exec.c assert(sys->cpu->sp > execptr->end);</span>
<span class='curline'><a href='../S/21058.html#L637'>cpu</a> 637 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr]};</span>
<span class='curline'><a href='../S/21058.html#L640'>cpu</a> 640 src/exec.c if(sys->cpu->sp >= sys->memsize) {</span>
<span class='curline'><a href='../S/21058.html#L641'>cpu</a> 641 src/exec.c setcerr(203, s = pr2str(sys->cpu->pr)); /* Stack Pointer (SP) - stack underflow */</span>
<span class='curline'><a href='../S/21058.html#L644'>cpu</a> 644 src/exec.c sys->cpu->gr[get_r_r1(w[0])] = sys->memory[(sys->cpu->sp)++];</span>
<span class='curline'><a href='../S/21058.html#L645'>cpu</a> 645 src/exec.c sys->cpu->pr += 1;</span>
<span class='curline'><a href='../S/21058.html#L651'>cpu</a> 651 src/exec.c assert(sys->cpu->sp > execptr->end && sys->cpu->sp <= sys->memsize);</span>
<span class='curline'><a href='../S/21058.html#L652'>cpu</a> 652 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L653'>cpu</a> 653 src/exec.c sys->memory[--(sys->cpu->sp)] = sys->cpu->pr + 1;</span>
<span class='curline'><a href='../S/21058.html#L654'>cpu</a> 654 src/exec.c sys->cpu->pr = get_adr_x(w[1], w[0]);</span>
<span class='curline'><a href='../S/21058.html#L659'>cpu</a> 659 src/exec.c assert(sys->cpu->sp <= sys->memsize);</span>
<span class='curline'><a href='../S/21058.html#L660'>cpu</a> 660 src/exec.c if(sys->cpu->sp == sys->memsize) {</span>
<span class='curline'><a href='../S/21058.html#L662'>cpu</a> 662 src/exec.c } else if(sys->cpu->sp < sys->memsize) {</span>
<span class='curline'><a href='../S/21058.html#L663'>cpu</a> 663 src/exec.c sys->cpu->pr = sys->memory[(sys->cpu->sp)++] + 1;</span>
<span class='curline'><a href='../S/21058.html#L669'>cpu</a> 669 src/exec.c WORD w[] = {sys->memory[sys->cpu->pr], sys->memory[sys->cpu->pr + 1]};</span>
<span class='curline'><a href='../S/21058.html#L682'>cpu</a> 682 src/exec.c sys->cpu->pr += 2;</span>
<span class='curline'><a href='../S/21058.html#L699'>cpu</a> 699 src/exec.c for (sys->cpu->pr = execptr->start; ; ) {</span>
<span class='curline'><a href='../S/21058.html#L703'>cpu</a> 703 src/exec.c fprintf(stdout, "#%04X: Register::::\n", sys->cpu->pr);</span>
<span class='curline'><a href='../S/21058.html#L707'>cpu</a> 707 src/exec.c fprintf(stdout, "#%04X: Memory::::\n", sys->cpu->pr);</span>
<span class='curline'><a href='../S/21058.html#L714'>cpu</a> 714 src/exec.c (execmode.monitor == true && sys->cpu->pr == execptr->start) ||</span>
<span class='curline'><a href='../S/21058.html#L715'>cpu</a> 715 src/exec.c execmode.step == true || getbps(sys->cpu->pr) == true)</span>
<span class='curline'><a href='../S/21058.html#L717'>cpu</a> 717 src/exec.c if(sys->cpu->pr == execptr->start) {</span>
<span class='curline'><a href='../S/21058.html#L723'>cpu</a> 723 src/exec.c if(sys->cpu->pr >= sys->memsize) {</span>
<span class='curline'><a href='../S/21058.html#L724'>cpu</a> 724 src/exec.c setcerr(201, s = pr2str(sys->cpu->pr)); /* Program Register (PR) - memory overflow */</span>
<span class='curline'><a href='../S/21058.html#L728'>cpu</a> 728 src/exec.c if(sys->cpu->sp <= execptr->end) {</span>
<span class='curline'><a href='../S/21058.html#L729'>cpu</a> 729 src/exec.c setcerr(202, s = pr2str(sys->cpu->pr)); /* Stack Pointer (SP) - stack overflow */</span>
<span class='curline'><a href='../S/21058.html#L734'>cpu</a> 734 src/exec.c if((cmdptr = getcmdptr(sys->memory[sys->cpu->pr] & 0xFF00)) == NULL) {</span>
<span class='curline'><a href='../S/21058.html#L735'>cpu</a> 735 src/exec.c setcerr(204, s = pr2str(sys->cpu->pr)); /* OP in word #1 - not command code */</span>
<span class='curline'><a href='../S/21053.html#L333'>cpu</a> 333 src/monitor.c fprintf(stdout, "#%04X: Register::::\n", sys->cpu->pr);</span>
<span class='curline'><a href='../S/21053.html#L343'>cpu</a> 343 src/monitor.c fprintf(stdout, "#%04X: Register::::\n", sys->cpu->pr);</span>
<span class='curline'><a href='../S/21089.html#L278'>cpu</a> 278 src/struct.c sys->cpu = malloc_chk(sizeof(CPU), "comet2_init.cpu");</span>
<span class='curline'><a href='../S/21089.html#L294'>cpu</a> 294 src/struct.c sys->cpu->gr[i] = 0x0;</span>
<span class='curline'><a href='../S/21089.html#L296'>cpu</a> 296 src/struct.c sys->cpu->sp = sys->memsize; /* スタックポインタ */</span>
<span class='curline'><a href='../S/21089.html#L297'>cpu</a> 297 src/struct.c sys->cpu->pr = 0x0; /* プログラムレジスタ */</span>
<span class='curline'><a href='../S/21089.html#L298'>cpu</a> 298 src/struct.c sys->cpu->fr = 0x0; /* フラグレジスタ */</span>
<span class='curline'><a href='../S/21089.html#L335'>cpu</a> 335 src/struct.c FREE(sys->cpu);</span>
</pre>
</body>
</html>