; nvp test. this will do a loop of *many* vector instructions to allow testing of speed	jmp *start ; some vectors to munch on.label vect1.vdata ffff 5f5f 4567 234 8098 2356a a4b5c6 aaaa.label vect2.vdata aaaa bbbb cccc dddd eeee ffff 1111 2222.label minvect.vdata abab 0 0 3333 0 0 0 0.label vstore1.vdata 0 0 0 0 0 0 0 0.label vstore2.vdata 0 0 0 0 0 0 0 0 .label numloops; do 50000 of these operations;.data c350; do 100 of these operations.data 64 .label fillvect	clrs s0	loadc s1 1	loadc s2 8.label fillvect_loop	rstoresv v0 r1 s0	adds s0 s0 s1	lts s0 s2	cjmp *fillvect_loop	return .label start	loadv v0 *vect1	loadv v1 *vect2	loads s0 *numloops.label loop	clrf	loadc r0 0	eqs s0 r0	cjmp *done	addv v2 v0 v1	subv v3 v0 v1	mulv v4 v0 v1	divv v5 v0 v1	loadc r0 1	subs s0 s0 r0	jmp *loop.label doscatter	clrs r0	clrv v0	clrv v1	clrv v2	loadv v0 *minvect	idxcomp v1 v0 r0	scatter v2 v0 v1	storev v2 *vstore1	bp	clrv v0	clrv v1	clrv v2	loadc r1 10	call *fillvect	bp	loadv v1 *vstore1	addv v3 v1 v0	bp.label done	bp	halt.eof