⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 mnapp.lst

📁 应用松翰母体写的一款电磁炉
💻 LST
📖 第 1 页 / 共 2 页
字号:
     1  000000             ;**********************************************
     2  000000             ;Name	:mnapp
     3  000000             ;Function:
     4  000000             ;Input  :
     5  000000             ;Output	:
     6  000000             ;Register Used:
     7  000000             ;***********************************************
     8  000000             mnapp:
     9  000000             	call	checkkey
    10  000000             	call	getinitparameter  ;某些功能下,不需要
    11  000000             	call	function
    12  000000             	
    13  000000             mnapp90:
    14  000000             	ret
    15  000000             ;**********************************************
    16  000000             ;Name	:ensure which key should operate
    17  000000             ;Function:
    18  000000             ;Input  :
    19  000000             ;Output	:
    20  000000             ;Register Used:
    21  000000             ;***********************************************
    22  000000             checkkey:
    23  000000             	b0bts0	poweronflag
    24  000000             	jmp	checkkey90	;刚通电,不响应按键
    25  000000             	b0bts1	keyokflag
    26  000000             	jmp	checkkey100
    27  000000             ;----
    28  000000             	bclr	keyokflag
    29  000000             	mov	a,aplcode
    30  000000             	@jmp_a	14
    31  000000             	jmp	checkkey90	;0
    32  000000             	jmp	boilwaterkey	;1,煮水
    33  000000             	jmp	warmmilkkey	;2,热奶
    34  000000             	jmp	soupingkey	;3,煲汤
    35  000000             	jmp	cookingkey	;4,煮饭,可定时
    36  000000             	jmp	barbecuekey    	;5,烧烤,可定时
    37  000000             	jmp	chaffydishkey   ;6,火锅
    38  000000             	jmp	frieddishkey    ;7,炒菜
    39  000000             	jmp	offkey		;8
    40  000000             	jmp	inckey		;9
    41  000000             	jmp	deckey		;10
    42  000000             	jmp	oneminkey	;11,一分钟
    43  000000             	jmp	tenminkey    	;12,十分钟
    44  000000             	jmp	canceltimekey	;13,一分钟和十分钟键同时按下	
    45  000000             ;************************************************
    46  000000             frieddishkey:
    47  000000             ;----
    48  000000             	call	clearallflag
    49  000000             	bset	frieddishflag
    50  000000             	bset	operateflag	;开始工作标志
    51  000000             	bset	parameterflag
    52  000000             	bset	settimeflag
    53  000000             ;----
    54  000000             ;初始化参数
    55  000000             	call	initparameter
    56  000000             	bclr	frieddishled	;light led
    57  000000             	bclr	temp160cled	;1200w
    58  000000             	mov_	stepbuf,#4	;level_4
    59  000000             ;----
    60  000000             	bclr	t1mflag
    61  000000             	mov_	timer1m,#60	;1 minute set
    62  000000             	mov_	pwmpulsebuf,#initpwmvalue
    63  000000             
    64  000000             	jmp	checkkey90
    65  000000             ;************************************************
    66  000000             chaffydishkey:
    67  000000             ;----
    68  000000             	call	clearallflag
    69  000000             	bset	chaffydishflag
    70  000000             	bset	operateflag	;开始工作标志
    71  000000             	bset	parameterflag
    72  000000             	bset	settimeflag
    73  000000             ;----
    74  000000             ;初始化参数
    75  000000             	call	initparameter
    76  000000             	bclr	chaffydishled
    77  000000             	mov_	stepbuf,#3	;level_3
    78  000000             	mov_	pwmpulsebuf,#initpwmvalue
    79  000000             	
    80  000000             	jmp	lightled
    81  000000             ;************************************************
    82  000000             barbecuekey:
    83  000000             ;----
    84  000000             	call	clearallflag
    85  000000             	bset	barbecueflag
    86  000000             	bset	operateflag	;开始工作标志
    87  000000             	bset	parameterflag
    88  000000             	bset	settimeflag
    89  000000             ;----
    90  000000             ;初始化参数
    91  000000             	call	initparameter
    92  000000             	bclr	barbecueled
    93  000000             	bclr	temp160Cled
    94  000000             	mov_	stepbuf,#4	;level_4
    95  000000             	mov_	pwmpulsebuf,#initpwmvalue
    96  000000             ;----
    97  000000             	jmp	checkkey90	
    98  000000             ;************************************************
    99  000000             cookingkey:
   100  000000             ;----
   101  000000             	call	clearallflag
   102  000000             	bset	cookingflag
   103  000000             	bset	operateflag	;开始工作标志
   104  000000             ;----
   105  000000             ;初始化参数
   106  000000             	call	initparameter
   107  000000             	bclr	cookingled
   108  000000             	bclr	temp160cled	;1000w led
   109  000000             	bclr	t1mflag
   110  000000             	mov_	timer1m,#60	;1 minute set
   111  000000             	mov_	timerbuf1,#2	;set 2 minute
   112  000000             	mov_	pwmpulsebuf,#initpwmvalue
   113  000000             ;---------------
   114  000000             ;初始默认1000w/60℃
   115  000000             	mov_	powervaluel,#ADCvalue4L
   116  000000             	mov_	powervaluem,#ADCvalue4m
   117  000000             	mov_	powervalueh,#ADCvalue4h
   118  000000             ;-----	
   119  000000             	mov_	ADCtempbufl,#ADC60CvalueL
   120  000000             	mov_	ADCtempbufh,#ADC60CvalueH
   121  000000             	
   122  000000             	jmp	checkkey90	
   123  000000             ;************************************************
   124  000000             soupingkey:
   125  000000             ;----
   126  000000             	call	clearallflag
   127  000000             	bset	soupingflag
   128  000000             	bset	operateflag	;开始工作标志
   129  000000             ;----
   130  000000             ;初始化参数
   131  000000             	call	initparameter
   132  000000             	bclr	soupingled
   133  000000             	bclr	temp160cled	;1000w led
   134  000000             	mov_	pwmpulsebuf,#initpwmvalue
   135  000000             ;---------------
   136  000000             ;初始默认1000w/80℃
   137  000000             	mov_	powervaluel,#ADCvalue4L
   138  000000             	mov_	powervaluem,#ADCvalue4m
   139  000000             	mov_	powervalueh,#ADCvalue4h
   140  000000             ;----	
   141  000000             	mov_	ADCtempbufl,#ADC80CvalueL
   142  000000             	mov_	ADCtempbufh,#ADC80CvalueH
   143  000000             	
   144  000000             	jmp	checkkey90	
   145  000000             ;************************************************
   146  000000             warmmilkkey:
   147  000000             ;----
   148  000000             	call	clearallflag
   149  000000             	bset	warmmilkflag
   150  000000             	bset	operateflag	;开始工作标志
   151  000000             ;----
   152  000000             ;初始化参数
   153  000000             	call	initparameter
   154  000000             	bclr	warmmilkled
   155  000000             	bclr	temp120Cled
   156  000000             	bclr	keepwarmled
   157  000000             	mov_	pwmpulsebuf,#initpwmvalue
   158  000000             ;---------------
   159  000000             ;初始默认300w/70℃
   160  000000             	mov_	powervaluel,#ADCvalue2L
   161  000000             	mov_	powervaluem,#ADCvalue2m
   162  000000             	mov_	powervalueh,#ADCvalue2h
   163  000000             ;-----	
   164  000000             	mov_	ADCtempbufl,#ADC70CvalueL
   165  000000             	mov_	ADCtempbufh,#ADC70CvalueH	
   166  000000             ;-----
   167  000000             	bclr	t1sflag
   168  000000             	mov_	timer1s,#100
   169  000000             	mov_	timerbuf1,#30		;恒温30s
   170  000000             	bset	intermissionflag
   171  000000             		
   172  000000             	jmp	checkkey90	
   173  000000             ;************************************************
   174  000000             boilwaterkey:
   175  000000             ;----
   176  000000             	call	clearallflag
   177  000000             	bset	boilwaterflag
   178  000000             	bset	operateflag	;开始工作标志
   179  000000             ;----
   180  000000             ;初始化参数
   181  000000             	call	initparameter
   182  000000             	bclr	boilwaterled
   183  000000             	bclr	temp200Cled
   184  000000             	bclr	temp270Cled
   185  000000             	mov_	pwmpulsebuf,#initpwmvalue
   186  000000             ;---------------
   187  000000             ;初始默认1800w/70℃
   188  000000             	mov_	powervaluel,#ADCvalue6L
   189  000000             	mov_	powervaluem,#ADCvalue6m
   190  000000             	mov_	powervalueh,#ADCvalue6h
   191  000000             ;----	
   192  000000             	mov_	ADCtempbufl,#ADC70CvalueL	;水沸腾时锅底的温度是?
   193  000000             	mov_	ADCtempbufh,#ADC70CvalueH
   194  000000             	
   195  000000             	jmp	checkkey90	

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -