DCSD-Advance.pal Last modified April 18, 1983 6:22 PM by Boggs PALType 16L8 PinDefs DoIt Run CntEq0 /Triggered HBMode0 HBMode1 HBMode2 dGoodIBDisp /ExtAdvance GND Low /Advance IORef MapRef pMem Cycle3 Cycle2 Cycle1 HBDone VCC BEGIN IF /Low THEN Advance ← /HBMode0 /HBMode1 Run /CntEq0 + /HBMode0 HBMode1 Run /CntEq0 DoIt + HBMode0 /HBMode1 Run /CntEq0 DoIt dGoodIBDisp + HBMode0 HBMode1 Run /CntEq0 DoIt Cycle3; IF /Low THEN /HBDone ← /Triggered + /CntEq0; END