aboutsummaryrefslogtreecommitdiffstats
path: root/tests/t_ace/t_ace.asm
blob: cf4389be6dc558195ce561b5378a57979fa54793 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
	cpu	ace1202
	page	0

	adc	a, #055h
	adc	a, 030h
	adc	a, [x]
	adc	a, [#33h, x]

	add	a, #055h
	add	a, 030h
	add	a, [x]
	add	a, [#33h, x]

	and	a, #055h
	and	a, 030h
	and	a, [x]
	and	a, [#33h, x]

	clr	a
	clr	x
	clr	030h

	dec	a
	dec	x
	dec	030h

	ifbit	7, a
	ifbit	7, 033h
	ifbit	7, [x]

	ifc

	ifeq	a, #033h
	ifeq	a, 033h
	ifeq	a, [x]
	ifeq	a, [#044h, x]
	ifeq	x, #00344h
	ifeq	033h, #044h
	
	ifgt	a, #033h
	ifgt	a, 033h
	ifgt	a, [x]
	ifgt	a, [#044h, x]
	ifgt	x, #00344h

	iflt	x, #00344h
	
	ifnc

	ifne	a, #055h
	ifne	a, 030h
	ifne	a, [x]
	ifne	a, [#33h, x]

	inc	a
	inc	x
	inc	030h

	intr

	invc

	jmp	070eh
	jmp	[#01h, x]

	jp	$-30
	jp      $-15
	jp	$-1
	jp	$
	jp	$+1
	jp	$+15
	jp	$+31
	jp	$+32

	jsr	070eh
	jsr	[#01h, x]

	ld	a, #033h
	ld	a, 033h
	ld	a, [x]
	ld	a, [#044h, x]
	ld	x, #00344h
	ld	033h, #044h
	ld	033h, 034h

	ldc	2, 033h

	nop

        or      a, #055h
        or      a, 030h
        or      a, [x]
        or      a, [#33h, x]

	rbit	2, 033h
	rbit	2, [x]
	rbit	2, a		; Makro

	rc

	ret

	reti

	rlc	a
	rlc	030h

	rrc	a
	rrc	030h

	sbit	2, 033h
	sbit	2, [x]
	sbit	2, a		; Makro

	sc

	st	a, 033h
	st	a, [x]
	st	a, [#044h, x]

	stc	2, 033h

        subc    a, #055h
        subc    a, 030h
        subc    a, [x]
        subc    a, [#33h, x]

        xor     a, #055h
        xor     a, 030h
        xor     a, [x]
        xor     a, [#33h, x]