folkert/simh-testsetgenerator
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

PDP7: GRAPHICS2 fix "write button lights" IOT

Browse source 
revert back to what it had been (octal/decimal confusion)
This commit is contained in:
Phil Budne 2016-03-19 15:52:24 -04:00 • committed by Mark Pizzolato
parent f9d3081cd7
commit 90730088fb
1 changed files with 2 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
PDP18B/pdp18b_g2tty.c
View file

@ -225,20 +225,18 @@ return dat;
} }
/* Button Box IOT routine */ /* Button Box IOT routine */
/* real device could have done bitwise decode? */
int32 g2bb_iot (int32 dev, int32 pulse, int32 dat) int32 g2bb_iot (int32 dev, int32 pulse, int32 dat)
{ {
if (pulse == 001) { /* "spb" -- skip on push button flag */ if (pulse == 001) { /* "spb" -- skip on push button flag */
if (g2bb_flag) if (g2bb_flag)
dat = dat | IOT_SKP; dat = dat | IOT_SKP;
} }
else if (pulse == 002) /* "lpb" -- load push buttons */ else if (pulse == 002) /* "lpb"/"opb" -- or push buttons */
dat = dat | g2bb_bbuf; /* return buttons */ dat = dat | g2bb_bbuf; /* return buttons */
else if (pulse == 004) /* "cpb" -- clear push button flag */ else if (pulse == 004) /* "cpb" -- clear push button flag */
g2bb_clr_flag (); /* clear flag */ g2bb_clr_flag (); /* clear flag */
else if (pulse == 020) { /* "wbl" -- write buttons lights */ else if (pulse == 024) /* "wbl" -- write buttons lights */
g2bb_lbuf = dat; g2bb_lbuf = dat;
}
return dat; return dat;
} }