Mercurial > public > mk2
annotate code_part1/OSTC_code_asm_part1/dump_screen.asm @ 672:e2bb4f745f3a
Store Gas active" flag register in logbook
author | heinrichsweikamp |
---|---|
date | Mon, 10 Dec 2012 13:16:28 +0100 |
parents | 1b09cead63a8 |
children | 6e456a6398e0 |
rev | line source |
---|---|
330 | 1 ;============================================================================= |
2 ; | |
3 ; File dump_screen.asm | |
4 ; | |
5 ; Dump screen contains to the serial interface. | |
6 ; | |
7 ; This program is free software: you can redistribute it and/or modify | |
8 ; it under the terms of the GNU General Public License as published by | |
9 ; the Free Software Foundation, either version 3 of the License, or | |
10 ; (at your option) any later version. | |
11 ; | |
12 ; This program is distributed in the hope that it will be useful, | |
13 ; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
14 ; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
15 ; GNU General Public License for more details. | |
16 ; | |
17 ; You should have received a copy of the GNU General Public License | |
18 ; along with this program. If not, see <http://www.gnu.org/licenses/>. | |
19 ; | |
20 ; Copyright (c) 2011, JD Gascuel. | |
21 ;============================================================================= | |
22 ; HISTORY | |
23 ; 2011-05-08 : [jDG] Creation. | |
24 ; | |
25 ; BUGS : | |
26 ; * ... | |
27 ;============================================================================= | |
332
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
28 CBLOCK 0x000 |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
29 ds_line ; Current line (0..239). |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
30 ds_column ; Current columnx2 (0..159) |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
31 ds_pixel:2 ; Current pixel color. |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
32 ds_count ; Repetition count. |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
33 ENDC |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
34 ;============================================================================= |
330 | 35 |
36 ; Manage interface to the OSTC platform: | |
37 dump_screen: | |
38 bcf uart_dump_screen ; clear flag! | |
39 | |
40 movlw 'l' | |
41 movwf TXREG ; Send command echo. | |
42 bsf no_sensor_int ; No Sensor Interrupt | |
43 bcf PIE1,RCIE ; no interrupt for UART | |
44 bcf PIR1,RCIF ; clear flag | |
45 bsf LED_blue ; LEDusb ON | |
46 call rs232_wait_tx ; wait for UART | |
47 | |
48 call dump_screen_0 | |
49 | |
50 bcf no_sensor_int ; Restore Sensor Interrupt | |
51 bcf LED_blue ; Clear led | |
52 bcf LED_red ; Clear led | |
53 bsf PIE1,RCIE ; Interrupt for RS232 | |
54 return | |
55 | |
56 ;============================================================================= | |
57 ; Dump screen contains to the UART | |
58 | |
59 dump_screen_0: | |
60 | |
61 ;---- Send OLED box command for the full screen window ------------------- | |
331 | 62 mullw 0 ; PRODH:L <- 0 |
330 | 63 |
64 AA_CMD_WRITE 0x35 ; VerticalStartAddress HIGH:LOW | |
65 AA_DATA_WRITE_PROD ; 00:00 | |
66 | |
67 AA_CMD_WRITE 0x36 ; VerticalEndAddress HIGH:LOW | |
68 AA_DATA_WRITE 0x01 | |
69 AA_DATA_WRITE 0x3F | |
70 | |
71 AA_CMD_WRITE 0x37 ; HorizontalAddress START:END | |
72 AA_DATA_WRITE 0x00 | |
73 AA_DATA_WRITE 0xEF | |
74 | |
477 | 75 btfss win_flip_screen ; OSTC 2N have a flipped screen, |
76 bra dump_screen_mk2 ; So we should start 239 instead. | |
77 movlw LOW(.239) | |
78 movwf PRODL | |
79 movlw HIGH(.239) | |
80 movwf PRODH | |
81 dump_screen_mk2: | |
82 | |
330 | 83 AA_CMD_WRITE 0x20 ; Start Address Horizontal (.0 - .239) |
84 AA_DATA_WRITE_PROD ; 00:00 | |
85 | |
477 | 86 mullw 0 ; Make sure PROD is 0 again. |
330 | 87 AA_CMD_WRITE 0x21 ; Start Address Vertical (.0 - .319) |
88 AA_DATA_WRITE_PROD ; 00:00 | |
89 | |
90 AA_CMD_WRITE 0x22 ; Start reading. | |
91 rcall PLED_DataRead ; Dummy pixel to skip. | |
92 rcall PLED_DataRead ; Dummy pixel to skip. | |
93 | |
94 movlw .160 ; 160x2 columns | |
332
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
95 movwf ds_column |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
96 rcall dump_screen_pixel_reset |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
97 |
330 | 98 dump_screen_1: |
99 btg LED_red ; LEDactivity toggle | |
100 | |
331 | 101 AA_CMD_WRITE 0x22 ; Re-sync data. |
102 | |
103 setf TRISD ; PortD as input. | |
330 | 104 |
332
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
105 ; Dump even column |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
106 movlw .240 ; 240 lines, once. |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
107 movwf ds_line |
330 | 108 dump_screen_2: |
332
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
109 rcall PLED_DataRead ; read pixel-high byte |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
110 movwf PRODH |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
111 rcall PLED_DataRead ; read pixel-low byte |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
112 movwf PRODL |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
113 rcall dump_screen_pixel |
331 | 114 |
332
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
115 decfsz ds_line,F |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
116 bra dump_screen_2 |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
117 rcall dump_screen_pixel_flush |
331 | 118 |
332
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
119 ; Dump odd column |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
120 movlw .240 ; 240 lines, twice. |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
121 movwf ds_line |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
122 dump_screen_3: |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
123 rcall PLED_DataRead ; read pixel-high byte |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
124 movwf PRODH |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
125 rcall PLED_DataRead ; read pixel-low byte |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
126 movwf PRODL |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
127 rcall dump_screen_pixel |
331 | 128 |
332
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
129 decfsz ds_line,F |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
130 bra dump_screen_3 |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
131 rcall dump_screen_pixel_flush |
330 | 132 |
133 clrf TRISD ; Back to normal (PortD as output) | |
134 | |
332
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
135 decfsz ds_column,F |
331 | 136 bra dump_screen_1 |
330 | 137 |
336
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
138 AA_CMD_WRITE 0x00 ; NOP, to stop Address Update Counter |
330 | 139 return |
140 | |
332
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
141 ;============================================================================= |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
142 ; Pixel compression |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
143 ; |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
144 ; Input: PRODH:L = pixel. |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
145 ; Output: Compressed stream on output. |
336
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
146 ; Compressed format: |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
147 ; 0ccccccc : BLACK pixel, repeated ccccccc+1 times (1..128). |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
148 ; 11cccccc : WHITE pixel, repeated cccccc+1 times (1..64). |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
149 ; 10cccccc HIGH LOW : color pixel (H:L) repeated ccccc+1 times (1..64). |
332
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
150 ; |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
151 dump_screen_pixel: |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
152 movf PRODH,W ; Compare pixel-high |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
153 xorwf ds_pixel+1,W |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
154 bnz dump_screen_pixel_1 ; Different -> dump. |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
155 |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
156 movf PRODL,W ; Compare pixel-low |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
157 xorwf ds_pixel+0,W |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
158 bnz dump_screen_pixel_1 ; Different -> dump. |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
159 |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
160 incf ds_count,F ; Same color: just increment. |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
161 return |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
162 |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
163 dump_screen_pixel_1: ; Send (pixel,count) tuple |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
164 movf ds_count,W ; Is count zero ? |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
165 bz dump_screen_pixel_2 ; Yes: skip sending. |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
166 |
336
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
167 movf ds_pixel+1,W ; This is a BLACK pixel ? |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
168 iorwf ds_pixel+0,W |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
169 bz dump_screen_pix_black ; YES. |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
170 |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
171 movf ds_pixel+1,W ; This is a white pixel ? |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
172 andwf ds_pixel+0,W |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
173 incf WREG |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
174 bz dump_screen_pix_white ; YES. |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
175 |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
176 ; No: write the pixel itself... |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
177 movlw .64 ; Max color pixel on a single byte. |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
178 cpfsgt ds_count ; Skip if count > 64 |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
179 movf ds_count,W ; W <- min(64,count) |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
180 subwf ds_count,F ; ds_count <- ds_count-W |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
181 decf WREG ; Save as 0..63 |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
182 iorlw b'10000000' ; MARK as a color pixel. |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
183 |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
184 movwf TXREG |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
185 call rs232_wait_tx ; wait for UART |
332
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
186 movff ds_pixel+1,TXREG |
336
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
187 call rs232_wait_tx ; wait for UART |
332
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
188 movff ds_pixel+0,TXREG |
336
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
189 call rs232_wait_tx ; wait for UART |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
190 bra dump_screen_pixel_1 |
332
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
191 |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
192 dump_screen_pixel_2: |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
193 movff PRODH,ds_pixel+1 ; Save new pixel color |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
194 movff PRODL,ds_pixel+0 |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
195 movlw 1 |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
196 movwf ds_count ; And set count=1. |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
197 return |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
198 |
336
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
199 dump_screen_pix_black: |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
200 movlw .128 ; Max black pixel on a single byte. |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
201 cpfsgt ds_count ; Skip if count > 128 |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
202 movf ds_count,W ; W <- min(128,count) |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
203 subwf ds_count,F ; ds_count <- ds_count-W |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
204 decf WREG ; Save as 0..127 |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
205 dump_screen_pix_3: |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
206 movwf TXREG |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
207 call rs232_wait_tx |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
208 bra dump_screen_pixel_1 ; More to dump ? |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
209 |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
210 dump_screen_pix_white: |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
211 movlw .64 ; Max white pixel on a single byte. |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
212 cpfsgt ds_count ; Skip if count > 64 |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
213 movf ds_count,W ; W <- min(64,count) |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
214 subwf ds_count,F ; ds_count <- ds_count-W |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
215 decf WREG ; Save as 0..63 |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
216 iorlw b'11000000' ; MARK as a compressed white. |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
217 bra dump_screen_pix_3 |
9ee86a19f1fa
Beter compression for black/white pixels: ~1sec screen dumps.
JeanDo
parents:
332
diff
changeset
|
218 |
332
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
219 dump_screen_pixel_flush: |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
220 clrf PRODH |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
221 clrf PRODL |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
222 rcall dump_screen_pixel_1 ; Send it |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
223 dump_screen_pixel_reset: |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
224 clrf ds_count ; But clear count. |
1828234369fc
Added dump_screen compression. From ~15 to ~2/3 secondes.
JeanDo
parents:
331
diff
changeset
|
225 return |