/[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 267 - (show annotations)
Mon Feb 8 22:50:29 2010 UTC (9 years, 7 months ago) by thrust26
File size: 3780 byte(s)
some weird idea in mainly_horizontal, 468
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|$80
34 .byt 32,16,8,4,2,1|$80
35 .byt 32,16,8,4,2,1|$80
36 .byt 32,16,8,4,2,1|$80
37 .byt 32,16,8,4,2,1|$80
38 .byt 32,16,8,4,2,1|$80
39 .byt 32,16,8,4,2,1|$80
40 .byt 32,16,8,4,2,1|$80
41 .byt 32,16,8,4,2,1|$80
42 .byt 32,16,8,4,2,1|$80
43
44 .byt 32,16,8,4,2,1|$80
45 .byt 32,16,8,4,2,1|$80
46 .byt 32,16,8,4,2,1|$80
47 .byt 32,16,8,4,2,1|$80
48 .byt 32,16,8,4,2,1|$80
49 .byt 32,16,8,4,2,1|$80
50 .byt 32,16,8,4,2,1|$80
51 .byt 32,16,8,4,2,1|$80
52 .byt 32,16,8,4,2,1|$80
53 .byt 32,16,8,4,2,1|$80
54
55 .byt 32,16,8,4,2,1|$80
56 .byt 32,16,8,4,2,1|$80
57 .byt 32,16,8,4,2,1|$80
58 .byt 32,16,8,4,2,1|$80
59 .byt 32,16,8,4,2,1|$80
60 .byt 32,16,8,4,2,1|$80
61 .byt 32,16,8,4,2,1|$80
62 .byt 32,16,8,4,2,1|$80
63 .byt 32,16,8,4,2,1|$80
64 .byt 32,16,8,4,2,1|$80
65
66 .byt 32,16,8,4,2,1|$80
67 .byt 32,16,8,4,2,1|$80
68 .byt 32,16,8,4,2,1|$80
69 .byt 32,16,8,4,2,1|$80
70 .byt 32,16,8,4,2,1|$80
71 .byt 32,16,8,4,2,1|$80
72 .byt 32,16,8,4,2,1|$80
73 .byt 32,16,8,4,2,1|$80
74 .byt 32,16,8,4,2,1|$80
75 .byt 32,16,8,4,2,1|$80
76
77 .dsb 256-(*&255)
78
79 .byt 0
80 _TableBit6
81 .byt 1,2,4,8,16,32|$80
82 .byt 1,2,4,8,16,32|$80
83 .byt 1,2,4,8,16,32|$80
84 .byt 1,2,4,8,16,32|$80
85 .byt 1,2,4,8,16,32|$80
86 .byt 1,2,4,8,16,32|$80
87 .byt 1,2,4,8,16,32|$80
88 .byt 1,2,4,8,16,32|$80
89 .byt 1,2,4,8,16,32|$80
90 .byt 1,2,4,8,16,32|$80
91
92 .byt 1,2,4,8,16,32|$80
93 .byt 1,2,4,8,16,32|$80
94 .byt 1,2,4,8,16,32|$80
95 .byt 1,2,4,8,16,32|$80
96 .byt 1,2,4,8,16,32|$80
97 .byt 1,2,4,8,16,32|$80
98 .byt 1,2,4,8,16,32|$80
99 .byt 1,2,4,8,16,32|$80
100 .byt 1,2,4,8,16,32|$80
101 .byt 1,2,4,8,16,32|$80
102
103 .byt 1,2,4,8,16,32|$80
104 .byt 1,2,4,8,16,32|$80
105 .byt 1,2,4,8,16,32|$80
106 .byt 1,2,4,8,16,32|$80
107 .byt 1,2,4,8,16,32|$80
108 .byt 1,2,4,8,16,32|$80
109 .byt 1,2,4,8,16,32|$80
110 .byt 1,2,4,8,16,32|$80
111 .byt 1,2,4,8,16,32|$80
112 .byt 1,2,4,8,16,32|$80
113
114 .byt 1,2,4,8,16,32|$80
115 .byt 1,2,4,8,16,32|$80
116 .byt 1,2,4,8,16,32|$80
117 .byt 1,2,4,8,16,32|$80
118 .byt 1,2,4,8,16,32|$80
119 .byt 1,2,4,8,16,32|$80
120 .byt 1,2,4,8,16,32|$80
121 .byt 1,2,4,8,16,32|$80
122 .byt 1,2,4,8,16,32|$80
123 .byt 1,2,4,8,16,32|$80
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