📄 ui_slider.lst
字号:
##############################################################################
# #
# IAR Z80/64180 C-Compiler V4.04B/WIN #
# Front End V4.20N 18/Nov/107 22:56:43 #
# Global Optimizer V1.05D #
# #
# Target option = Z80 #
# Memory model = banked #
# Source file = d:\case_i_d913f\ap\common\ui_slider.c #
# List file = d:\case_i_d913f\ap\ap_music\list\ui_slider.lst #
# Object file = d:\case_i_d913f\ap\ap_music\obj\ui_slider.r01 #
# ASM file = d:\case_i_d913f\ap\ap_music\list\ui_slider.s01 #
# Command line = -v0 -mb -OD:\case_i_d913f\ap\ap_music\Obj\ -e -K #
# -w -gA -z9 -RCODE -r0 -DNAPDEBUG #
# -LD:\case_i_d913f\ap\ap_music\List\ -q -t8 #
# -AD:\case_i_d913f\ap\ap_music\List\ #
# -ND:\case_i_d913f\ap\ap_music\List\ -X #
# -Id:\sdk_i_913f\inc\ -Id:\case_i_d913f\inc\ #
# d:\case_i_d913f\AP\COMMON\ui_slider.c #
# #
# (c) Copyright IAR Systems 1996 #
##############################################################################
\ 0000 NAME ui_slider(17)
\ 0000 RSEG COM_CTRL(0)
\ 0000 EXTERN EarProtectThreshold
\ 0000 EXTERN ResShowMultiString
\ 0000 EXTERN ResShowPic
\ 0000 EXTERN SetBackgdColor
\ 0000 EXTERN SetPenColor
\ 0000 EXTERN ap_get_message
\ 0000 EXTERN ap_handle_hotkey
\ 0000 EXTERN file_name
\ 0000 EXTERN g_EarProtect_flag
\ 0000 EXTERN main_ResShowPic
\ 0000 PUBLIC slider_atoi4
\ 0000 EXTERN ui_auto_select
\ 0000 PUBLIC ui_slider
\ 0000 EXTERN ?CLZ80B_4_04_L00
\ 0000 EXTERN ?SS_DIV_L02
\ 0000 EXTERN ?SS_MOD_L02
\ 0000 EXTERN ?S_MUL_L02
\ 0000 EXTERN ?SS_CMP_L02
\ 0000 EXTERN ?C_V_SWITCH_L06
\ 0000 EXTERN ?BANK_CALL_DIRECT_L08
\ 0000 EXTERN ?BANK_LEAVE_DIRECT_L08
\ 0000 EXTERN ?ENT_AUTO_DIRECT_L09
\ 0000 EXTERN ?STRLEN_L11
\ 0000 RSEG COM_CTRL
\ 0000 slider_atoi4:
1 /*
2 *******************************************************************************
3 * ACTOS AP
4 * ap common lib, slider control file
5 *
6 * (c) Copyright, Actions Co,Ld.
7 * All Right Reserved
8 *
9 * $Id: ui_slider.c,v 1.1.1.1 2006/05/22 03:23:59 selina Exp $
10 *******************************************************************************
11 */
12 #pragma codeseg(COM_CTRL)
13
14 #include "ap_common.h"
15
16 //为了不用bank切换而使用 ResShowPic()
17 extern res_entry_t res_entry;
18 extern region_t res_region;
19 #ifdef EAR_PROTECT
20 extern byte g_EarProtect_flag;
21 extern byte EarProtectThreshold;
22 #endif
23
24 void slider_atoi4(char *str, int count)
25 {
\ 0000 CD0000 CALL LWRD ?ENT_AUTO_DIRECT_L09
\ 0003 FCFF DEFW 65532
\ 0005 FDE5 PUSH IY
\ 0007 DD6E02 LD L,(IX+2)
\ 000A DD6603 LD H,(IX+3)
\ 000D E5 PUSH HL
\ 000E FDE1 POP IY
26 int tmp, level;
27 if(count < 0)
\ 0010 CB78 BIT 7,B
\ 0012 2812 JR Z,?0003
\ 0014 ?0002:
28 {
29 *str = '-';
\ 0014 FD36002D LD (IY+0),45
30 count = 0 - count;
\ 0018 A7 AND A
\ 0019 210000 LD HL,0
\ 001C ED42 SBC HL,BC
\ 001E DD7504 LD (IX+4),L
\ 0021 DD7405 LD (IX+5),H
31 str++;
\ 0024 FD23 INC IY
\ 0026 ?0003:
32 }
33 if(count >= 1000)level = 4;
\ 0026 01E883 LD BC,33768
\ 0029 DD6E04 LD L,(IX+4)
\ 002C DD6605 LD H,(IX+5)
\ 002F 3E80 LD A,128
\ 0031 AC XOR H
\ 0032 67 LD H,A
\ 0033 ED42 SBC HL,BC
\ 0035 3806 JR C,?0005
\ 0037 ?0004:
\ 0037 DD36FE04 LD (IX-2),4
\ 003B 1830 JR ?0091
\ 003D ?0005:
34 else if(count >= 100) level = 3;
\ 003D 016480 LD BC,32868
\ 0040 DD6E04 LD L,(IX+4)
\ 0043 DD6605 LD H,(IX+5)
\ 0046 78 LD A,B
\ 0047 AC XOR H
\ 0048 67 LD H,A
\ 0049 ED42 SBC HL,BC
\ 004B 3806 JR C,?0008
\ 004D ?0007:
\ 004D DD36FE03 LD (IX-2),3
\ 0051 181A JR ?0091
\ 0053 ?0008:
35 else if(count >= 10) level = 2;
\ 0053 010A80 LD BC,32778
\ 0056 DD6E04 LD L,(IX+4)
\ 0059 DD6605 LD H,(IX+5)
\ 005C 78 LD A,B
\ 005D AC XOR H
\ 005E 67 LD H,A
\ 005F ED42 SBC HL,BC
\ 0061 3806 JR C,?0011
\ 0063 ?0010:
\ 0063 DD36FE02 LD (IX-2),2
\ 0067 1804 JR ?0091
\ 0069 ?0011:
36 else level = 1;
\ 0069 DD36FE01 LD (IX-2),1
\ 006D ?0091:
\ 006D DD36FF00 LD (IX-1),0
\ 0071 ?0012:
\ 0071 ?0009:
\ 0071 ?0006:
37 if(level >= 4)
\ 0071 010480 LD BC,32772
\ 0074 DD6EFE LD L,(IX-2)
\ 0077 DD66FF LD H,(IX-1)
\ 007A 78 LD A,B
\ 007B AC XOR H
\ 007C 67 LD H,A
\ 007D ED42 SBC HL,BC
\ 007F 380C JR C,?0014
\ 0081 ?0013:
38 {
39 tmp = (count / 1000) % 10;
\ 0081 01E803 LD BC,1000
\ 0084 CDDB00 CALL LWRD ?0103
\ 0087 010A00 LD BC,10
\ 008A CDE400 CALL LWRD ?0104
40 *str = tmp + '0';
41 str++;
\ 008D ?0014:
42 }
43 if(level >= 3)
\ 008D 010380 LD BC,32771
\ 0090 DD6EFE LD L,(IX-2)
\ 0093 DD66FF LD H,(IX-1)
\ 0096 78 LD A,B
\ 0097 AC XOR H
\ 0098 67 LD H,A
\ 0099 ED42 SBC HL,BC
\ 009B 380B JR C,?0016
\ 009D ?0015:
44 {
45 tmp = (count / 100) % 10;
\ 009D 016400 LD BC,100
\ 00A0 CDDB00 CALL LWRD ?0103
\ 00A3 0E0A LD C,10
\ 00A5 CDE400 CALL LWRD ?0104
46 *str = tmp + '0';
47 str++;
\ 00A8 ?0016:
48 }
49 if(level >= 2)
\ 00A8 010280 LD BC,32770
\ 00AB DD6EFE LD L,(IX-2)
\ 00AE DD66FF LD H,(IX-1)
\ 00B1 78 LD A,B
\ 00B2 AC XOR H
\ 00B3 67 LD H,A
\ 00B4 ED42 SBC HL,BC
\ 00B6 3809 JR C,?0018
\ 00B8 ?0017:
50 {
51 tmp = (count / 10) % 10;
\ 00B8 010A00 LD BC,10
\ 00BB CDDB00 CALL LWRD ?0103
\ 00BE CDE400 CALL LWRD ?0104
52 *str = tmp + '0';
53 str++;
\ 00C1 ?0018:
54 }
55 tmp = count % 10;
\ 00C1 010A00 LD BC,10
\ 00C4 DD5E04 LD E,(IX+4)
\ 00C7 DD5605 LD D,(IX+5)
\ 00CA CD0000 CALL LWRD ?SS_MOD_L02
56 *str = tmp + '0';
\ 00CD 7B LD A,E
\ 00CE C630 ADD A,48
\ 00D0 FD7700 LD (IY+0),A
57 *(str + 1) = '\0';
\ 00D3 FD7001 LD (IY+1),B
58 }
\ 00D6 FDE1 POP IY
\ 00D8 C30000 JP LWRD ?BANK_LEAVE_DIRECT_L08
\ 00DB ?0103:
\ 00DB DD5E04 LD E,(IX+4)
\ 00DE DD5605 LD D,(IX+5)
\ 00E1 C30000 JP LWRD ?SS_DIV_L02
\ 00E4 ?0104:
\ 00E4 CD0000 CALL LWRD ?SS_MOD_L02
\ 00E7 7B LD A,E
\ 00E8 C630 ADD A,48
\ 00EA FD7700 LD (IY+0),A
\ 00ED FD23 INC IY
\ 00EF C9 RET
\ 00F0 ui_slider:
59
60
61 /*
62 ********************************************************************************
63 * Description : 滑动杆控件
64 *
65 * Arguments : slider, 滑动杆结构
66 callback, 滑动杆的回调函数,=NULL 表示没有回调函数
67 *
68 * Returns : 结果消息, 或者0
69 *
70 * Notes : 控件本身没有重画功能, 因为控件不能重画背景
71 *
72 ********************************************************************************
73 */
74 int ui_slider(slider_t *slider, const void (*callback)(int res_id))
75 {
\ 00F0 CD0000 CALL LWRD ?ENT_AUTO_DIRECT_L09
\ 00F3 F8FF DEFW -8
\ 00F5 FDE5 PUSH IY
\ 00F7 DD6E02 LD L,(IX+2)
\ 00FA DD6603 LD H,(IX+3)
\ 00FD E5 PUSH HL
\ 00FE FDE1 POP IY
76 int start, end; //x坐标
77 char buf[10]; //注意可能含符号 <<-0000>>
78 BYTE StrLength;
79 char key;
80 BOOL need_draw=TRUE;
81 BOOL value_changed=TRUE; //值是否改变, 需要callback
82
83 ///const region_t num_region={44, 16, 40, 16}; //数字区域
84 WORD value; //to keep slider->value
85 BYTE hold_state=0; //按住状态,为了加快控件改变的速度
86 //0:normal; 1:holding up, 2:holding down
87
88 ASSERT(slider->value <= slider->max);
89 ASSERT(slider->value >= slider->min);
90 ASSERT(slider->step > 0);
91 ///-SetTextOutMode(1);
92 SetPenColor(Color_BLACK_def);
\ 0100 010000 LD BC,0
\ 0103 59 LD E,C
\ 0104 50 LD D,B
\ 0105 CD0000 CALL LWRD SetPenColor
\ 0108 DD36FB01 LD (IX-5),1
\ 010C DD36FA01 LD (IX-6),1
\ 0110 DD36F900 LD (IX-7),0
\ 0114 ?0020:
93 while(1)
94 {
95 if(need_draw)
\ 0114 AF XOR A
\ 0115 DDB6FB OR (IX-5)
\ 0118 CA5902 JP Z,?0023
\ 011B ?0022:
96 {
97 value = slider_pox_x_def +
98 (slider_width_def-8) * (slider->value - slider->min) / (slider->max - slider->min);
\ 011B FD4E02 LD C,(IY+2)
\ 011E FD4603 LD B,(IY+3)
\ 0121 FD6E06 LD L,(IY+6)
\ 0124 FD6607 LD H,(IY+7)
\ 0127 ED42 SBC HL,BC
\ 0129 4D LD C,L
\ 012A 44 LD B,H
\ 012B 117800 LD DE,120
\ 012E CD0000 CALL LWRD ?S_MUL_L02
\ 0131 FD4E02 LD C,(IY+2)
\ 0134 FD4603 LD B,(IY+3)
\ 0137 FD6E04 LD L,(IY+4)
\ 013A FD6605 LD H,(IY+5)
\ 013D A7 AND A
\ 013E ED42 SBC HL,BC
\ 0140 4D LD C,L
\ 0141 44 LD B,H
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -