[h316.git] / programs / libtest / src / stacktest.asm

* STACK TEST PROGRAM
* 
* 
* 
* USAGE:
* 
* VERY SPECIAL
* 
* 
********************************************************************************
* 
	ABS		ASOLUTE MODE FOR EASIER DEBUGGING
	ORG	'1000
*
	SUBR	DAT1
	SUBR	DAT2
	SUBR	DAT3
	SUBR	DAT4
* 
****************************************
* 
* 
MAIN	NOP		HERE WE GO
*
	LDA	=2
	STA	DAT1
	LDA	=3
	STA	DAT2
	LDA	=4
	STA	DAT3
	LDA	=5
	STA	DAT4
* 
	LDA	=7
	CALL	S$PUSM
	DAC	DAT1
	DEC	4
	HLT		TEMPORARY HALT	
* 
	LDA	=6
	STA	DAT1
	LDA	=7
	STA	DAT2
	LDA	=8
	STA	DAT3
	LDA	=9
	STA	DAT4
* 
	HLT
	LDA	=6
REC	CALL	S$POPM
	DAC	DAT1
	DEC	4
	HLT		TEMPORARY HALT	
* 
	JMP	REC	
* 
********************************************************************************
* 
	ORG	'2000
**** VARIABLES
* 
DAT1	DEC	0
DAT2	DEC	0
DAT3	DEC	0
DAT4	DEC	0
* 
********************************************************************************
* 
	END		THAT'S IT.
Commit	Line	Data
8fac3a64	1	* STACK TEST PROGRAM
	2	*
	3	*
	4	*
	5	* USAGE:
	6	*
	7	* VERY SPECIAL
	8	*
	9	*
	10	********************************************************************************
	11	*
	12	ABS ASOLUTE MODE FOR EASIER DEBUGGING
	13	ORG '1000
	14	*
	15	SUBR DAT1
	16	SUBR DAT2
	17	SUBR DAT3
	18	SUBR DAT4
	19	*
	20	****************************************
	21	*
	22	*
	23	MAIN NOP HERE WE GO
	24	*
	25	LDA =2
	26	STA DAT1
	27	LDA =3
	28	STA DAT2
	29	LDA =4
	30	STA DAT3
	31	LDA =5
	32	STA DAT4
	33	*
	34	LDA =7
	35	CALL S$PUSM
	36	DAC DAT1
	37	DEC 4
	38	HLT TEMPORARY HALT
	39	*
	40	LDA =6
	41	STA DAT1
	42	LDA =7
	43	STA DAT2
	44	LDA =8
	45	STA DAT3
	46	LDA =9
	47	STA DAT4
	48	*
	49	HLT
	50	LDA =6
	51	REC CALL S$POPM
	52	DAC DAT1
	53	DEC 4
	54	HLT TEMPORARY HALT
	55	*
	56	JMP REC
	57	*
	58	********************************************************************************
	59	*
	60	ORG '2000
	61	**** VARIABLES
	62	*
	63	DAT1 DEC 0
	64	DAT2 DEC 0
65	DAT3 DEC 0
66	DAT4 DEC 0
67	*
68	********************************************************************************
69	*
70	END THAT'S IT.
71
72