Mercurial > public > mk2

comparison code_part1/OSTC_code_asm_part1/color_processor.asm @ 142:8b75ba28d641

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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