[unix-history] / dsksav.s

" dsksav

   iof
   hlt
   dzm track
   -640
   dac c1
1:
   lac track
   jms dskrd1

   lac track
   jms dskwr0

   lac track
   tad d10
   dac track
   isz c1
   jmp 1b

   hlt
   sys exit

track: 0
c1: 0
d10: 10
Commit	Line	Data
69f28986 KT	1	" dsksav
	2
	3	iof
	4	hlt
	5	dzm track
	6	-640
	7	dac c1
	8	1:
	9	lac track
	10	jms dskrd1
	11
	12	lac track
	13	jms dskwr0
	14
	15	lac track
	16	tad d10
	17	dac track
	18	isz c1
	19	jmp 1b
	20
	21	hlt
	22	sys exit
	23
	24	track: 0
	25	c1: 0
	26	d10: 10