%include "I:UTIL.INC" %include "CONFIG.INC" %include "SCHEDULE.INC" %begin %integer i printstring("Packet arrived ") phex(1 << packet arrived ); spaces(2) write(packet arrived , 0); newline printstring("Ether ack wait ") phex(1 << ether ack wait ); spaces(2) write(ether ack wait , 0); newline printstring("Ether RX request ") phex(1 << ether RX request ); spaces(2) write(ether RX request , 0); newline printstring("Disc transfer ") phex(1 << disc transfer ); spaces(2) write(disc transfer , 0); newline printstring("Disc completion ") phex(1 << disc completion ); spaces(2) write(disc completion , 0); newline printstring("Disc sema wait ") phex(1 << disc sema wait ); spaces(2) write(disc sema wait , 0); newline printstring("Ether TX request ") phex(1 << ether TX request ); spaces(2) write(ether TX request , 0); newline printstring("Proc request ") phex(1 << proc request ); spaces(2) write(proc request , 0); newline printstring("Stamp flag ") phex(1 << stamp flag ); spaces(2) write(stamp flag , 0); newline %if despoolers # 0 %start %for i = 1, 1, despoolers %cycle printstring("Despooler "); write(i, 0) spaces(7) phex(1 << (despooler base + i)); spaces(2) write(despooler base + i, 0); newline %repeat %finish newline printstring("Inhibit limit ") write(inhibit limit , 0); newline printstring("Last event ") write(last event , 0); newline %end %of %program