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

📄 inductioncooker050706ver2.lst

📁 应用松翰母体写的一款电磁炉
💻 LST
📖 第 1 页 / 共 5 页
字号:
  1065  00016A   0E00      	ret
  1066  00016B                 
  1067  00016B                 
  1068  00016B             	include mnapp.asm
  1069  00016B             ;**********************************************
  1070  00016B             ;Name	:mnapp
  1071  00016B             ;Function:
  1072  00016B             ;Input  :
  1073  00016B             ;Output	:
  1074  00016B             ;Register Used:
  1075  00016B             ;***********************************************
  1076  00016B             mnapp:
  1077  00016B   C16F      	call	checkkey
  1078  00016C   C266      	call	getinitparameter  ;某些功能下,不需要
  1079  00016D   C296      	call	function
  1080  00016E             	
  1081  00016E             mnapp90:
  1082  00016E   0E00      	ret
  1083  00016F             ;**********************************************
  1084  00016F             ;Name	:ensure which key should operate
  1085  00016F             ;Function:
  1086  00016F             ;Input  :
  1087  00016F             ;Output	:
  1088  00016F             ;Register Used:
  1089  00016F             ;***********************************************
  1090  00016F             checkkey:
  1091  00016F   7139      	b0bts0	poweronflag
  1092  000170   8261      	jmp	checkkey90	;刚通电,不响应按键
  1093  000171   793B      	b0bts1	keyokflag
  1094  000172   8265      	jmp	checkkey100
  1095  000173             ;----
  1096  000173   413B      	bclr	keyokflag
  1097  000174   1E19      	mov	a,aplcode
  1098  000175             	@jmp_a	14
  1099  000175   13CE      	add	pcl, a
  1100  000176   8261      	jmp	checkkey90	;0
  1101  000177   81F2      	jmp	boilwaterkey	;1,煮水
  1102  000178   81D8      	jmp	warmmilkkey	;2,热奶
  1103  000179   81C5      	jmp	soupingkey	;3,煲汤
  1104  00017A   81AD      	jmp	cookingkey	;4,煮饭,可定时
  1105  00017B   81A0      	jmp	barbecuekey    	;5,烧烤,可定时
  1106  00017C   8194      	jmp	chaffydishkey   ;6,火锅
  1107  00017D   8184      	jmp	frieddishkey    ;7,炒菜
  1108  00017E   824F      	jmp	offkey		;8
  1109  00017F   8224      	jmp	inckey		;9
  1110  000180   823B      	jmp	deckey		;10
  1111  000181   8215      	jmp	oneminkey	;11,一分钟
  1112  000182   8206      	jmp	tenminkey    	;12,十分钟
  1113  000183   8259      	jmp	canceltimekey	;13,一分钟和十分钟键同时按下	
  1114  000184             ;************************************************
  1115  000184             frieddishkey:
  1116  000184             ;----
  1117  000184   C3B0      	call	clearallflag
  1118  000185   4838      	bset	frieddishflag
  1119  000186   4D37      	bset	operateflag	;开始工作标志
  1120  000187   493A      	bset	parameterflag
  1121  000188   4D39      	bset	settimeflag
  1122  000189             ;----
  1123  000189             ;初始化参数
  1124  000189   C3BA      	call	initparameter
  1125  00018A   4030      	bclr	frieddishled	;light led
  1126  00018B   4231      	bclr	temp160cled	;1200w
  1127  00018C             	mov_	stepbuf,#4	;level_4
  1128  00018C   2D04      	mov	a, #4
  1129  00018D   1F2D      	mov	stepbuf, a
  1130  00018E             ;----
  1131  00018E   4236      	bclr	t1mflag
  1132  00018F             	mov_	timer1m,#60	;1 minute set
  1133  00018F   2D3C      	mov	a, #60
  1134  000190   1F06      	mov	timer1m, a
  1135  000191             	mov_	pwmpulsebuf,#initpwmvalue
  1136  000191   2D0F      	mov	a, #initpwmvalue
  1137  000192   1F2C      	mov	pwmpulsebuf, a
  1138  000193             
  1139  000193   8261      	jmp	checkkey90
  1140  000194             ;************************************************
  1141  000194             chaffydishkey:
  1142  000194             ;----
  1143  000194   C3B0      	call	clearallflag
  1144  000195   4938      	bset	chaffydishflag
  1145  000196   4D37      	bset	operateflag	;开始工作标志
  1146  000197   493A      	bset	parameterflag
  1147  000198   4D39      	bset	settimeflag
  1148  000199             ;----
  1149  000199             ;初始化参数
  1150  000199   C3BA      	call	initparameter
  1151  00019A   4130      	bclr	chaffydishled
  1152  00019B             	mov_	stepbuf,#3	;level_3
  1153  00019B   2D03      	mov	a, #3
  1154  00019C   1F2D      	mov	stepbuf, a
  1155  00019D             	mov_	pwmpulsebuf,#initpwmvalue
  1156  00019D   2D0F      	mov	a, #initpwmvalue
  1157  00019E   1F2C      	mov	pwmpulsebuf, a
  1158  00019F             	
  1159  00019F   8232      	jmp	lightled
  1160  0001A0             ;************************************************
  1161  0001A0             barbecuekey:
  1162  0001A0             ;----
  1163  0001A0   C3B0      	call	clearallflag
  1164  0001A1   4A38      	bset	barbecueflag
  1165  0001A2   4D37      	bset	operateflag	;开始工作标志
  1166  0001A3   493A      	bset	parameterflag
  1167  0001A4   4D39      	bset	settimeflag
  1168  0001A5             ;----
  1169  0001A5             ;初始化参数
  1170  0001A5   C3BA      	call	initparameter
  1171  0001A6   4230      	bclr	barbecueled
  1172  0001A7   4231      	bclr	temp160Cled
  1173  0001A8             	mov_	stepbuf,#4	;level_4
  1174  0001A8   2D04      	mov	a, #4
  1175  0001A9   1F2D      	mov	stepbuf, a
  1176  0001AA             	mov_	pwmpulsebuf,#initpwmvalue
  1177  0001AA   2D0F      	mov	a, #initpwmvalue
  1178  0001AB   1F2C      	mov	pwmpulsebuf, a
  1179  0001AC             ;----
  1180  0001AC   8261      	jmp	checkkey90	
  1181  0001AD             ;************************************************
  1182  0001AD             cookingkey:
  1183  0001AD             ;----
  1184  0001AD   C3B0      	call	clearallflag
  1185  0001AE   4B38      	bset	cookingflag
  1186  0001AF   4D37      	bset	operateflag	;开始工作标志
  1187  0001B0             ;----
  1188  0001B0             ;初始化参数
  1189  0001B0   C3BA      	call	initparameter
  1190  0001B1   4330      	bclr	cookingled
  1191  0001B2   4231      	bclr	temp160cled	;1000w led
  1192  0001B3   4236      	bclr	t1mflag
  1193  0001B4             	mov_	timer1m,#60	;1 minute set
  1194  0001B4   2D3C      	mov	a, #60
  1195  0001B5   1F06      	mov	timer1m, a
  1196  0001B6             	mov_	timerbuf1,#2	;set 2 minute
  1197  0001B6   2D02      	mov	a, #2
  1198  0001B7   1F0A      	mov	timerbuf1, a
  1199  0001B8             	mov_	pwmpulsebuf,#initpwmvalue
  1200  0001B8   2D0F      	mov	a, #initpwmvalue
  1201  0001B9   1F2C      	mov	pwmpulsebuf, a
  1202  0001BA             ;---------------
  1203  0001BA             ;初始默认1000w/60℃
  1204  0001BA             	mov_	powervaluel,#ADCvalue4L
  1205  0001BA   2DA0      	mov	a, #ADCvalue4L
  1206  0001BB   1F29      	mov	powervaluel, a
  1207  0001BC             	mov_	powervaluem,#ADCvalue4m
  1208  0001BC   2DBA      	mov	a, #ADCvalue4m
  1209  0001BD   1F2A      	mov	powervaluem, a
  1210  0001BE             	mov_	powervalueh,#ADCvalue4h
  1211  0001BE   2D3B      	mov	a, #ADCvalue4h
  1212  0001BF   1F2B      	mov	powervalueh, a
  1213  0001C0             ;-----	
  1214  0001C0             	mov_	ADCtempbufl,#ADC60CvalueL
  1215  0001C0   2D87      	mov	a, #ADC60CvalueL
  1216  0001C1   1F1E      	mov	ADCtempbufl, a
  1217  0001C2             	mov_	ADCtempbufh,#ADC60CvalueH
  1218  0001C2   2D02      	mov	a, #ADC60CvalueH
  1219  0001C3   1F1F      	mov	ADCtempbufh, a
  1220  0001C4             	
  1221  0001C4   8261      	jmp	checkkey90	
  1222  0001C5             ;************************************************
  1223  0001C5             soupingkey:
  1224  0001C5             ;----
  1225  0001C5   C3B0      	call	clearallflag
  1226  0001C6   4C38      	bset	soupingflag
  1227  0001C7   4D37      	bset	operateflag	;开始工作标志
  1228  0001C8             ;----
  1229  0001C8             ;初始化参数
  1230  0001C8   C3BA      	call	initparameter
  1231  0001C9   4430      	bclr	soupingled
  1232  0001CA   4231      	bclr	temp160cled	;1000w led
  1233  0001CB             	mov_	pwmpulsebuf,#initpwmvalue
  1234  0001CB   2D0F      	mov	a, #initpwmvalue
  1235  0001CC   1F2C      	mov	pwmpulsebuf, a
  1236  0001CD             ;---------------
  1237  0001CD             ;初始默认1000w/80℃
  1238  0001CD             	mov_	powervaluel,#ADCvalue4L
  1239  0001CD   2DA0      	mov	a, #ADCvalue4L
  1240  0001CE   1F29      	mov	powervaluel, a
  1241  0001CF             	mov_	powervaluem,#ADCvalue4m
  1242  0001CF   2DBA      	mov	a, #ADCvalue4m
  1243  0001D0   1F2A      	mov	powervaluem, a
  1244  0001D1             	mov_	powervalueh,#ADCvalue4h
  1245  0001D1   2D3B      	mov	a, #ADCvalue4h
  1246  0001D2   1F2B      	mov	powervalueh, a
  1247  0001D3             ;----	
  1248  0001D3             	mov_	ADCtempbufl,#ADC80CvalueL
  1249  0001D3   2D49      	mov	a, #ADC80CvalueL
  1250  0001D4   1F1E      	mov	ADCtempbufl, a
  1251  0001D5             	mov_	ADCtempbufh,#ADC80CvalueH
  1252  0001D5   2D04      	mov	a, #ADC80CvalueH
  1253  0001D6   1F1F      	mov	ADCtempbufh, a
  1254  0001D7             	
  1255  0001D7   8261      	jmp	checkkey90	
  1256  0001D8             ;************************************************
  1257  0001D8             warmmilkkey:
  1258  0001D8             ;----
  1259  0001D8   C3B0      	call	clearallflag
  1260  0001D9   4D38      	bset	warmmilkflag
  1261  0001DA   4D37      	bset	operateflag	;开始工作标志
  1262  0001DB             ;----
  1263  0001DB             ;初始化参数
  1264  0001DB   C3BA      	call	initparameter
  1265  0001DC   4530      	bclr	warmmilkled
  1266  0001DD   4131      	bclr	temp120Cled
  1267  0001DE   4031      	bclr	keepwarmled
  1268  0001DF             	mov_	pwmpulsebuf,#initpwmvalue
  1269  0001DF   2D0F      	mov	a, #initpwmvalue
  1270  0001E0   1F2C      	mov	pwmpulsebuf, a
  1271  0001E1             ;---------------
  1272  0001E1             ;初始默认300w/70℃
  1273  0001E1             	mov_	powervaluel,#ADCvalue2L
  1274  0001E1   2DE0      	mov	a, #ADCvalue2L
  1275  0001E2   1F29      	mov	powervaluel, a
  1276  0001E3             	mov_	powervaluem,#ADCvalue2m
  1277  0001E3   2DE8      	mov	a, #ADCvalue2m
  1278  0001E4   1F2A      	mov	powervaluem, a
  1279  0001E5             	mov_	powervalueh,#ADCvalue2h
  1280  0001E5   2D13      	mov	a, #ADCvalue2h
  1281  0001E6   1F2B      	mov	powervalueh, a
  1282  0001E7             ;-----	
  1283  0001E7             	mov_	ADCtempbufl,#ADC70CvalueL
  1284  0001E7   2D53      	mov	a, #ADC70CvalueL
  1285  0001E8   1F1E      	mov	ADCtempbufl, a
  1286  0001E9             	mov_	ADCtempbufh,#ADC70CvalueH	
  1287  0001E9   2D03      	mov	a, #ADC70CvalueH
  1288  0001EA   1F1F      	mov	ADCtempbufh, a
  1289  0001EB             ;-----
  1290  0001EB   4136      	bclr	t1sflag
  1291  0001EC             	mov_	timer1s,#100
  1292  0001EC   2D64      	mov	a, #100
  1293  0001ED   1F05      	mov	timer1s, a
  1294  0001EE             	mov_	timerbuf1,#30		;恒温30s
  1295  0001EE   2D1E      	mov	a, #30
  1296  0001EF   1F0A      	mov	timerbuf1, a
  1297  0001F0   493C      	bset	intermissionflag
  1298  0001F1             		
  1299  0001F1   8261      	jmp	checkkey90	
  1300  0001F2             ;************************************************
  1301  0001F2             boilwaterkey:
  1302  0001F2             ;----
  1303  0001F2   C3B0      	call	clearallflag
  1304  0001F3   4E38      	bset	boilwaterflag
  1305  0001F4   4D37      	bset	operateflag	;开始工作标志
  1306  0001F5             ;----
  1307  0001F5             ;初始化参数
  1308  0001F5   C3BA      	call	initparameter
  1309  0001F6   4630      	bclr	boilwaterled
  1310  0001F7   4331      	bclr	temp200Cled
  1311  0001F8   4431      	bclr	temp270Cled
  1312  0001F9             	mov_	pwmpulsebuf,#initpwmvalue
  1313  0001F9   2D0F      	mov	a, #initpwmvalue
  1314  0001FA   1F2C      	mov	pwmpulsebuf, a
  1315  0001FB             ;---------------
  1316  0001FB             ;初始默认1800w/70℃
  1317  0001FB             	mov_	powervaluel,#ADCvalue6L
  1318  0001FB   2DC0      	mov	a, #ADCvalue6L
  1319  0001FC   1F29      	mov	powervaluel, a
  1320  0001FD             	mov_	powervaluem,#ADCvalue6m
  1321  0001FD   2D14      	mov	a, #ADCvalue6m
  1322  0001FE   1F2A      	mov	powervaluem, a
  1323  0001FF             	mov_	powervalueh,#ADCvalue6h
  1324  0001FF   2D6C      	mov	a, #ADCvalue6h
  1325  000200   1F2B      	mov	powervalueh, a
  1326  000201             ;----	
  1327  000201             	mov_	ADCtempbufl,#ADC70CvalueL	;水沸腾时锅底的温度是?
 

⌨️ 快捷键说明

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