Mercurial > public > mk2
comparison code_part1/OSTC_code_asm_part1/color_processor.asm @ 142:8b75ba28d641
Screen-flipping custom function.
- Fix bank safe addressings.
author | JeanDo |
---|---|
date | Fri, 07 Jan 2011 03:01:02 +0100 |
parents | 6a94f96e9cea |
children | 6e456a6398e0 |
comparison
equal
deleted
inserted
replaced
141:622da16b768f | 142:8b75ba28d641 |
---|---|
51 ; F1 F2 F3 04 is 0x1235 pixels of color 0. | 51 ; F1 F2 F3 04 is 0x1235 pixels of color 0. |
52 ; | 52 ; |
53 ;Temporary overlay (in bank 0), ACCESS area | 53 ;Temporary overlay (in bank 0), ACCESS area |
54 CBLOCK 0x000 | 54 CBLOCK 0x000 |
55 img_colors | 55 img_colors |
56 img_width:2 ; SHOULD be @1, because of aa_box_cmd | 56 img_width:2 ; SHOULD be @1, because of PLED_box_write |
57 img_pixelsL | 57 img_pixelsL |
58 img_pixelsH | 58 img_pixelsH |
59 img_pixelsU | 59 img_pixelsU |
60 img_countL | 60 img_countL |
61 img_countH | 61 img_countH |
62 colorTable:.30 | 62 colorTable:.30 |
63 ENDC | 63 ENDC |
64 | 64 |
65 ;----------------------------------------------------------------------------- | 65 ;----------------------------------------------------------------------------- |
66 color_image: | 66 color_image: |
67 movlb HIGH(img_width) ; Switch to bank 0. | 67 movlb HIGH(win_height) ; Switch to bank 0. |
68 | 68 |
69 ;---- Get image parameters ------------------------------------------- | 69 ;---- Get image parameters ------------------------------------------- |
70 tblrd*+ | 70 tblrd*+ |
71 movff TABLAT,img_width | 71 movff TABLAT,img_width |
72 tblrd*+ | 72 tblrd*+ |
98 | 98 |
99 ;---- Send window command -------------------------------------------- | 99 ;---- Send window command -------------------------------------------- |
100 clrf img_width+1 ; x2 on width, for the true box size. | 100 clrf img_width+1 ; x2 on width, for the true box size. |
101 rlcf img_width+0 | 101 rlcf img_width+0 |
102 rlcf img_width+1 | 102 rlcf img_width+1 |
103 call aa_box_cmd | 103 call PLED_box_write |
104 AA_CMD_WRITE 0x22 | 104 AA_CMD_WRITE 0x22 |
105 | 105 |
106 ;---- Decode pixels -------------------------------------------------- | 106 ;---- Decode pixels -------------------------------------------------- |
107 color_image_loop_xy: | 107 color_image_loop_xy: |
108 ; Get pixel count | 108 ; Get pixel count |