                                  
fcdddt tsf saver high

readin

7750/
	iot 5277		/tsf
cc1,	lat
	dip f1
	rar 6s
	dip f2
	lio f2
	dia
	lio f1
	cla
cc2,	dcc
	jmp j1
	lac in		/ddt in core?
	sas cc1
	jmp j1
	lac rd2-2
	sad cc2
	jmp in
j1,	lat+cli+hlt-opr-opr
	jmp 7750
f1,	7750
f2,	0

start 7750
                         
                                                                                                                                                                  3
