;find all prime numbers between 3 and 100
;main loop
MOV 3 N
LBL M
;	number to test
	MOV N A
	MOV A ANS
	SUB 3
;	test loop
	LBL L
		ADD 2
		MOV ANS D
;		remainder test
		MOV A ANS
		MOD D
		JEZ F
;		dsz d
		MOV D ANS
;		lpwhile d>2
		SUB 3
	JMZ L
;	true
	MOV A ANS
	DSP
;	false
	LBL F
	MOV N ANS
	ADD 2
	MOV ANS N
	SUB 99
JNZ M