cpu 6502
nam multiply
page 128,128
	
* = $0900  ; assemble at $900
code
	;; display random strings
	;; test of concept
	;; mkpellegrino
	;; 
.begin	nop
	ldx #$00
.frst0	lda strings, x
	jsr $FFD2
	inx
	cmp #$24
	beq .frst1
	jmp .frst0
.frst1	lda srings,x
	
.done	rts
	
strings asc "this is the first string$a"
	asc "this is the second string$b"
	asc "this is the third string$c"
	asc "this is the fourth string$d"
	db $DE, $AD
	
code