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

📄 inductioncooker050413ver1.lst

📁 应用松翰母体写的一款电磁炉
💻 LST
📖 第 1 页 / 共 5 页
字号:
   820  00010D   8122      	jmp	barbecuekey    	;5,烧烤
   821  00010E   811F      	jmp	chaffydishkey   ;6,火锅
   822  00010F   8115      	jmp	frieddishkey    ;7,炒菜
   823  000110   8160      	jmp	offkey		;8
   824  000111   8158      	jmp	deckey		;9
   825  000112   814F      	jmp	inckey		;10
   826  000113   8141      	jmp	oneminkey	;11,一分钟
   827  000114   8131      	jmp	tenminkey    	;12,十分钟	
   828  000115             ;************************************************
   829  000115             frieddishkey:
   830  000115             ;----
   831  000115   4822      	bset	frieddishflag
   832  000116   4D21      	bset	operateflag	;开始工作标志
   833  000117   4924      	bset	parameterflag
   834  000118   4720      	bclr	stoprunflag
   835  000119             ;----
   836  000119             ;初始化参数
   837  000119   2B1D      	clr	seg3buf
   838  00011A   481D      	bset	frieddishled	;light led
   839  00011B   4A1E      	bset	temp160cled	;1200w
   840  00011C             	mov_	stepbuf,#4	;level_4
   841  00011C   2D04      	mov	a, #4
   842  00011D   1F1A      	mov	stepbuf, a
   843  00011E             
   844  00011E             
   845  00011E   8165      	jmp	checkkey90
   846  00011F             ;************************************************
   847  00011F             chaffydishkey:
   848  00011F             ;----
   849  00011F   4922      	bset	chaffydishflag
   850  000120   4720      	bclr	stoprunflag
   851  000121             
   852  000121   8165      	jmp	checkkey90
   853  000122             ;************************************************
   854  000122             barbecuekey:
   855  000122             ;----
   856  000122   4A22      	bset	barbecueflag
   857  000123   4720      	bclr	stoprunflag
   858  000124             	
   859  000124   8165      	jmp	checkkey90	
   860  000125             ;************************************************
   861  000125             cookingkey:
   862  000125             ;----
   863  000125   4B22      	bset	cookingflag
   864  000126   4720      	bclr	stoprunflag
   865  000127             	
   866  000127   8165      	jmp	checkkey90	
   867  000128             ;************************************************
   868  000128             soupingkey:
   869  000128             ;----
   870  000128   4C22      	bset	soupingflag
   871  000129   4720      	bclr	stoprunflag
   872  00012A             
   873  00012A   8165      	jmp	checkkey90	
   874  00012B             ;************************************************
   875  00012B             warmmilkkey:
   876  00012B             ;----
   877  00012B   4D22      	bset	warmmilkflag
   878  00012C   4720      	bclr	stoprunflag
   879  00012D             
   880  00012D   8165      	jmp	checkkey90	
   881  00012E             ;************************************************
   882  00012E             boilwaterkey:
   883  00012E             ;----
   884  00012E   4E22      	bset	boilwaterflag
   885  00012F   4720      	bclr	stoprunflag
   886  000130             
   887  000130   8165      	jmp	checkkey90	
   888  000131             
   889  000131             ;************************************************
   890  000131             tenminkey:
   891  000131             ;-----
   892  000131   7D23      	b0bts1	settimeflag
   893  000132   8165      	jmp	checkkey90	;在某些功能下无效
   894  000133             ;---
   895  000133   1E05      	mov	a,timerbuf
   896  000134   2AF0      	and	a,#0f0h
   897  000135   2490      	sub	a,#90h
   898  000136   7286      	b0bts0	fc
   899  000137   813C      	jmp	turnoffnum1
   900  000138             ;-----
   901  000138   2D10      	mov	a,#10h
   902  000139   1305      	add	timerbuf,a
   903  00013A   4D20      	bset	refurbishflag
   904  00013B   8165      	jmp	checkkey90
   905  00013C             ;---------------------
   906  00013C             turnoffnum1:
   907  00013C   2D0F      	mov	a,#0fh
   908  00013D   2905      	and	timerbuf,a
   909  00013E             	mov_	seg1buf,#0ffh
   910  00013E   2DFF      	mov	a, #0ffh
   911  00013F   1F1B      	mov	seg1buf, a
   912  000140   8165      	jmp	checkkey90	
   913  000141             ;************************************************
   914  000141             oneminkey:
   915  000141             ;-----
   916  000141   7D23      	b0bts1	settimeflag
   917  000142   8165      	jmp	checkkey90	;在某些功能下无效
   918  000143             ;---
   919  000143   4D20      	bset	refurbishflag	
   920  000144   1E05      	mov	a,timerbuf
   921  000145   2A0F      	and	a,#0fh
   922  000146   2409      	sub	a,#9
   923  000147   7286      	b0bts0	fc
   924  000148   814C      	jmp	backzeronum0
   925  000149             ;-----
   926  000149   2D01      	mov	a,#1
   927  00014A   1305      	add	timerbuf,a
   928  00014B   8165      	jmp	checkkey90
   929  00014C             ;-----
   930  00014C             backzeronum0:
   931  00014C   2DF0      	mov	a,#0f0h
   932  00014D   2905      	and	timerbuf,a
   933  00014E   8165      	jmp	checkkey90
   934  00014F             ;************************************************
   935  00014F             inckey:
   936  00014F             ;----
   937  00014F   7D21      	b0bts1	operateflag
   938  000150   8165      	jmp	checkkey90
   939  000151   1E1A      	mov	a,stepbuf	;0~8
   940  000152   2408      	sub	a,#8
   941  000153   7286      	b0bts0	fc
   942  000154   8165      	jmp	checkkey90
   943  000155             ;----
   944  000155   161A      	incms	stepbuf
   945  000156   0000      	nop
   946  000157   8165      	jmp	checkkey90	
   947  000158             ;************************************************
   948  000158             deckey:
   949  000158             ;----
   950  000158   7D21      	b0bts1	operateflag
   951  000159   8165      	jmp	checkkey90
   952  00015A   1E1A      	mov	a,stepbuf
   953  00015B   7086      	b0bts0	fz
   954  00015C   8165      	jmp	checkkey90
   955  00015D             ;----
   956  00015D   261A      	decms	stepbuf
   957  00015E   0000      	nop
   958  00015F   8165      	jmp	checkkey90	
   959  000160             ;************************************************
   960  000160             offkey:
   961  000160             ;----
   962  000160   4521      	bclr	operateflag
   963  000161   4F20      	bset	stoprunflag
   964  000162   4523      	bclr	settimeflag
   965  000163   45D5      	bclr	ptcout		;close IGBT
   966  000164             
   967  000164   8165      	jmp	checkkey90	
   968  000165             ;*************************************************
   969  000165             checkkey90:
   970  000165   2B0E      	clr	aplcode
   971  000166             ;-----
   972  000166             checkkey100:
   973  000166   0E00      	ret
   974  000167             	
   975  000167             ;**********************************************
   976  000167             ;Name	:getinitparameter
   977  000167             ;Function:控制参数获得
   978  000167             ;Input  :
   979  000167             ;Output	:
   980  000167             ;Register Used:
   981  000167             ;**********************************************	
   982  000167             getinitparameter:
   983  000167   7D21      	b0bts1	operateflag
   984  000168   818A      	jmp	getinitparameter90
   985  000169   7924      	b0bts1	parameterflag
   986  00016A   818A      	jmp	getinitparameter90
   987  00016B             ;-----
   988  00016B   4124      	bclr	parameterflag
   989  00016C             ;---------------------------------------------
   990  00016C   3403      	b0mov	y,#steptbl1$m
   991  00016D   3380      	b0mov	z,#steptbl1$l
   992  00016E             ;---
   993  00016E   1E1A      	mov	a,stepbuf
   994  00016F   1383      	add	z,a
   995  000170   2D00      	mov	a,#0
   996  000171   1184      	adc	y,a
   997  000172             ;---
   998  000172   0D00      	movc
   999  000173   1F0F      	mov	ADCvolbufl,a
  1000  000174             	mov_	ADCvolbufh,r		;电压参数
  1001  000174   1E82      	mov	a, r
  1002  000175   1F10      	mov	ADCvolbufh, a
  1003  000176             ;---------------------------------------------
  1004  000176   3403      	b0mov	y,#steptbl2$m
  1005  000177   3389      	b0mov	z,#steptbl2$l
  1006  000178             ;---
  1007  000178   1E1A      	mov	a,stepbuf
  1008  000179   1383      	add	z,a
  1009  00017A   2D00      	mov	a,#0
  1010  00017B   1184      	adc	y,a
  1011  00017C             ;---
  1012  00017C   0D00      	movc
  1013  00017D   1F11      	mov	ADCcurbufl,a
  1014  00017E             	mov_	ADCcurbufh,r		;电流参数
  1015  00017E   1E82      	mov	a, r
  1016  00017F   1F12      	mov	ADCcurbufh, a
  1017  000180             ;---------------------------------------------
  1018  000180   3403      	b0mov	y,#temptbl$m
  1019  000181   3392      	b0mov	z,#temptbl$l
  1020  000182             ;---
  1021  000182   1E1A      	mov	a,stepbuf
  1022  000183   1383      	add	z,a
  1023  000184   2D00      	mov	a,#0
  1024  000185   1184      	adc	y,a
  1025  000186             ;---
  1026  000186   0D00      	movc
  1027  000187   1F13      	mov	ADCtempbufl,a
  1028  000188             	mov_	ADCtempbufh,r		;温度参数
  1029  000188   1E82      	mov	a, r
  1030  000189   1F14      	mov	ADCtempbufh, a
  1031  00018A             
  1032  00018A             getinitparameter90:
  1033  00018A   0E00      	ret
  1034  00018B             
  1035  00018B             ;**********************************************
  1036  00018B             ;Name	:function
  1037  00018B             ;Function:各种功能的切换
  1038  00018B             ;Input  :
  1039  00018B             ;Output	:
  1040  00018B             ;Register Used:
  1041  00018B             ;**********************************************
  1042  00018B             function:
  1043  00018B             	jb0	operateflag,function90		;工作状态下,开启功能控制
  1044  00018B   5D21      	bts1	operateflag
  1045  00018C   819B      		jmp	function90
  1046  00018D             	jb1	frieddishflag,frieddishfun    	;炒菜功能
  1047  00018D   5022      	bts0	frieddishflag
  1048  00018E   819C      		jmp	frieddishfun
  1049  00018F             	jb1	chaffydishflag,chaffydishfun   	;火锅功能 
  1050  00018F   5122      	bts0	chaffydishflag
  1051  000190   819D      		jmp	chaffydishfun
  1052  000191             	jb1	barbecueflag,barbecuefun  	;烧烤功能 
  1053  000191   5222      	bts0	barbecueflag
  1054  000192   819E      		jmp	barbecuefun
  1055  000193             	jb1	cookingflag,cookingfun		;煮饭功能 
  1056  000193   5322      	bts0	cookingflag
  1057  000194   819F      		jmp	cookingfun
  1058  000195             	jb1	soupingflag,soupingfun		;煲汤功能
  1059  000195   5422      	bts0	soupingflag
  1060  000196   81A0      		jmp	soupingfun
  1061  000197             	jb1	warmmilkflag,warmmilkfun	;热奶功能
  1062  000197   5522      	bts0	warmmilkflag
  1063  000198   81A1      		jmp	warmmilkfun
  1064  000199             	jb1	boilwaterflag,boilwaterfun	;煮水功能
  1065  000199   5622      	bts0	boilwaterflag
  1066  00019A   81A2      		jmp	boilwaterfun
  1067  00019B             ;----
  1068  00019B             function90:
  1069  00019B   0E00      	ret
  1070  00019C             ;**********************************************
  1071  00019C             ;Name	:frieddishfun
  1072  00019C             ;Function:炒菜功能控制
  1073  00019C             ;Input  :
  1074  00019C             ;Output	:
  1075  00019C             ;Register Used:
  1076  00019C             ;**********************************************
  1077  00019C             frieddishfun:
  1078  00019C             	
  1079  00019C             
  1080  00019C             frieddishfun90:
  1081  00019C   0E00      	ret
  1082  00019D             ;**********************************************
  1083  00019D             ;Name	:chaffydishfun
  1084  00019D             ;Function:火锅功能控制
  1085  00019D             ;Input  :
  1086  00019D             ;Output	:
  1087  00019D             ;Register Used:
  1088  00019D             ;**********************************************
  1089  00019D             chaffydishfun:
  1090  00019D             
  1091  00019D             chaffydishfun90:
  1092  00019D   0E00      	ret

⌨️ 快捷键说明

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