/[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 277 - (show annotations)
Sat Feb 13 11:34:41 2010 UTC (10 years ago) by thrust26
File size: 3179 byte(s)
refactored for positive x-direction, 451
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 _TableBit6Reverse
23 .byt 32,16,8,4,2,1
24 .byt 32,16,8,4,2,1
25 .byt 32,16,8,4,2,1
26 .byt 32,16,8,4,2,1
27 .byt 32,16,8,4,2,1
28 .byt 32,16,8,4,2,1
29 .byt 32,16,8,4,2,1
30 .byt 32,16,8,4,2,1
31 .byt 32,16,8,4,2,1
32 .byt 32,16,8,4,2,1
33
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 .byt 32,16,8,4,2,1
44
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 .byt 32,16,8,4,2,1
55
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 .byt 32,16,8,4,2,1
66
67 .dsb 256-(*&255)
68
69 .byt 0
70 _TableBit6
71 .byt 1,2,4,8,16,32|$80
72 .byt 1,2,4,8,16,32|$80
73 .byt 1,2,4,8,16,32|$80
74 .byt 1,2,4,8,16,32|$80
75 .byt 1,2,4,8,16,32|$80
76 .byt 1,2,4,8,16,32|$80
77 .byt 1,2,4,8,16,32|$80
78 .byt 1,2,4,8,16,32|$80
79 .byt 1,2,4,8,16,32|$80
80 .byt 1,2,4,8,16,32|$80
81
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 .byt 1,2,4,8,16,32|$80
92
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 .byt 1,2,4,8,16,32|$80
103
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 .byt 1,2,4,8,16,32|$80
114
115
116 _GenerateTables
117 .(
118
119 ; Generate screen offset data
120 .(
121 lda #<$a000
122 sta tmp0+0
123 lda #>$a000
124 sta tmp0+1
125
126 ldx #0
127 loop
128 ; generate two bytes screen adress
129 clc
130 lda tmp0+0
131 sta _HiresAddrLow,x
132 adc #ROW_SIZE
133 sta tmp0+0
134 lda tmp0+1
135 sta _HiresAddrHigh,x
136 adc #0
137 sta tmp0+1
138
139 inx
140 cpx #Y_SIZE
141 bne loop
142 .)
143
144
145 ; Generate multiple of 6 data table
146 .(
147 lda #0 ; cur div
148 tay ; cur mod
149 tax
150 loop
151 sta _TableDiv6,x
152 iny
153 cpy #6
154 bne skip_mod
155 ldy #0
156 adc #0 ; carry = 1!
157 skip_mod
158
159 inx
160 cpx #X_SIZE
161 bne loop
162 .)
163 .)
164 rts
165
166
167
168
169
170
171

  ViewVC Help
Powered by ViewVC 1.1.26