/[projet1]/public/oric/routines/rasterization/linebench/display.s
Defence Force logotype

Contents of /public/oric/routines/rasterization/linebench/display.s

Parent Directory Parent Directory | Revision Log Revision Log


Revision 260 - (show annotations)
Mon Feb 8 09:27:15 2010 UTC (9 years, 9 months ago) by thrust26
File size: 3460 byte(s)
forchunking, initial version, 501

1
2 #define X_SIZE 240
3 #define Y_SIZE 200
4 #define ROW_SIZE X_SIZE/6
5
6 .dsb 256-(*&255)
7
8 _HiresAddrLow .dsb Y_SIZE
9
10 .dsb 256-(*&255)
11
12 _HiresAddrHigh .dsb Y_SIZE
13
14 .dsb 256-(*&255)
15
16 .byt 0
17 _TableDiv6 .dsb X_SIZE
18
19 .dsb 256-(*&255)
20
21 .byt 0
22 _TableMod6 .dsb X_SIZE
23
24 .dsb 256-(*&255)
25
26 .byt 0
27 _TableDiv6Rev .dsb X_SIZE
28
29 .dsb 256-(*&255)
30
31 .byt 0
32 _TableBit6Reverse
33 .byt 32,16,8,4,2,1
34 .byt 32,16,8,4,2,1
35 .byt 32,16,8,4,2,1
36 .byt 32,16,8,4,2,1
37 .byt 32,16,8,4,2,1
38 .byt 32,16,8,4,2,1
39 .byt 32,16,8,4,2,1
40 .byt 32,16,8,4,2,1
41 .byt 32,16,8,4,2,1
42 .byt 32,16,8,4,2,1
43
44 .byt 32,16,8,4,2,1
45 .byt 32,16,8,4,2,1
46 .byt 32,16,8,4,2,1
47 .byt 32,16,8,4,2,1
48 .byt 32,16,8,4,2,1
49 .byt 32,16,8,4,2,1
50 .byt 32,16,8,4,2,1
51 .byt 32,16,8,4,2,1
52 .byt 32,16,8,4,2,1
53 .byt 32,16,8,4,2,1
54
55 .byt 32,16,8,4,2,1
56 .byt 32,16,8,4,2,1
57 .byt 32,16,8,4,2,1
58 .byt 32,16,8,4,2,1
59 .byt 32,16,8,4,2,1
60 .byt 32,16,8,4,2,1
61 .byt 32,16,8,4,2,1
62 .byt 32,16,8,4,2,1
63 .byt 32,16,8,4,2,1
64 .byt 32,16,8,4,2,1
65
66 .byt 32,16,8,4,2,1
67 .byt 32,16,8,4,2,1
68 .byt 32,16,8,4,2,1
69 .byt 32,16,8,4,2,1
70 .byt 32,16,8,4,2,1
71 .byt 32,16,8,4,2,1
72 .byt 32,16,8,4,2,1
73 .byt 32,16,8,4,2,1
74 .byt 32,16,8,4,2,1
75 .byt 32,16,8,4,2,1
76
77 .dsb 256-(*&255)
78
79 .byt 0
80 _TableBit6
81 .byt 1,2,4,8,16,32
82 .byt 1,2,4,8,16,32
83 .byt 1,2,4,8,16,32
84 .byt 1,2,4,8,16,32
85 .byt 1,2,4,8,16,32
86 .byt 1,2,4,8,16,32
87 .byt 1,2,4,8,16,32
88 .byt 1,2,4,8,16,32
89 .byt 1,2,4,8,16,32
90 .byt 1,2,4,8,16,32
91
92 .byt 1,2,4,8,16,32
93 .byt 1,2,4,8,16,32
94 .byt 1,2,4,8,16,32
95 .byt 1,2,4,8,16,32
96 .byt 1,2,4,8,16,32
97 .byt 1,2,4,8,16,32
98 .byt 1,2,4,8,16,32
99 .byt 1,2,4,8,16,32
100 .byt 1,2,4,8,16,32
101 .byt 1,2,4,8,16,32
102
103 .byt 1,2,4,8,16,32
104 .byt 1,2,4,8,16,32
105 .byt 1,2,4,8,16,32
106 .byt 1,2,4,8,16,32
107 .byt 1,2,4,8,16,32
108 .byt 1,2,4,8,16,32
109 .byt 1,2,4,8,16,32
110 .byt 1,2,4,8,16,32
111 .byt 1,2,4,8,16,32
112 .byt 1,2,4,8,16,32
113
114 .byt 1,2,4,8,16,32
115 .byt 1,2,4,8,16,32
116 .byt 1,2,4,8,16,32
117 .byt 1,2,4,8,16,32
118 .byt 1,2,4,8,16,32
119 .byt 1,2,4,8,16,32
120 .byt 1,2,4,8,16,32
121 .byt 1,2,4,8,16,32
122 .byt 1,2,4,8,16,32
123 .byt 1,2,4,8,16,32
124
125
126 _GenerateTables
127 .(
128
129 ; Generate screen offset data
130 .(
131 lda #<$a000
132 sta tmp0+0
133 lda #>$a000
134 sta tmp0+1
135
136 ldx #0
137 loop
138 ; generate two bytes screen adress
139 clc
140 lda tmp0+0
141 sta _HiresAddrLow,x
142 adc #ROW_SIZE
143 sta tmp0+0
144 lda tmp0+1
145 sta _HiresAddrHigh,x
146 adc #0
147 sta tmp0+1
148
149 inx
150 cpx #Y_SIZE
151 bne loop
152 .)
153
154
155 ; Generate multiple of 6 data table
156 .(
157 lda #0 ; cur div
158 tay ; cur mod
159 tax
160 loop
161 sta _TableDiv6,x
162 pha
163 tya
164 sta _TableMod6,x
165 pla
166
167 iny
168 cpy #6
169 bne skip_mod
170 ldy #0
171 adc #0 ; carry = 1!
172 skip_mod
173
174 inx
175 cpx #X_SIZE
176 bne loop
177 .)
178 .(
179 lda #0 ; cur div
180 tay ; cur mod
181 ldx #X_SIZE
182 loop
183 dex
184 sta _TableDiv6Rev,x
185
186 iny
187 cpy #6
188 bne skip_mod
189 ldy #0
190 adc #0 ; carry = 1!
191 skip_mod
192
193 cpx #0
194 bne loop
195 .)
196 .)
197 rts
198
199
200
201
202
203
204

  ViewVC Help
Powered by ViewVC 1.1.26