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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 277 - (hide 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 dbug 46
2 thrust26 258 #define X_SIZE 240
3     #define Y_SIZE 200
4     #define ROW_SIZE X_SIZE/6
5 dbug 46
6 thrust26 258 .dsb 256-(*&255)
7 dbug 46
8 thrust26 258 _HiresAddrLow .dsb Y_SIZE
9 dbug 46
10 thrust26 258 .dsb 256-(*&255)
11 dbug 46
12 thrust26 258 _HiresAddrHigh .dsb Y_SIZE
13 dbug 46
14 thrust26 258 .dsb 256-(*&255)
15 dbug 46
16 thrust26 258 .byt 0
17     _TableDiv6 .dsb X_SIZE
18 dbug 46
19 thrust26 258 .dsb 256-(*&255)
20 dbug 46
21 thrust26 258 .byt 0
22     _TableBit6Reverse
23 thrust26 277 .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 dbug 46
34 thrust26 277 .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 thrust26 258
45 thrust26 277 .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 thrust26 258
56 thrust26 277 .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 thrust26 258
67     .dsb 256-(*&255)
68    
69     .byt 0
70     _TableBit6
71 thrust26 267 .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 thrust26 258
82 thrust26 267 .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 thrust26 258
93 thrust26 267 .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 thrust26 258
104 thrust26 267 .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 thrust26 258
115    
116 dbug 46 _GenerateTables
117     .(
118    
119 thrust26 258 ; Generate screen offset data
120 dbug 46 .(
121 thrust26 258 lda #<$a000
122     sta tmp0+0
123     lda #>$a000
124     sta tmp0+1
125 dbug 46
126 thrust26 258 ldx #0
127 dbug 46 loop
128 thrust26 258 ; 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 dbug 46
139 thrust26 258 inx
140     cpx #Y_SIZE
141     bne loop
142 dbug 46 .)
143    
144    
145 thrust26 258 ; Generate multiple of 6 data table
146 dbug 46 .(
147 thrust26 258 lda #0 ; cur div
148     tay ; cur mod
149     tax
150 dbug 46 loop
151 thrust26 258 sta _TableDiv6,x
152     iny
153     cpy #6
154     bne skip_mod
155     ldy #0
156     adc #0 ; carry = 1!
157 dbug 46 skip_mod
158    
159 thrust26 258 inx
160     cpx #X_SIZE
161     bne loop
162 dbug 46 .)
163     .)
164 thrust26 258 rts
165 dbug 46
166    
167    
168    
169    
170    
171    

  ViewVC Help
Powered by ViewVC 1.1.26