incms PowerBuffer
nop
b0 MOV a,PowerBuffer
sub a,#7
b0bts1 FC
jmp Power01
MOV a,#1
b0 MOV PowerBuffer,a
Power01:
clr data2
b0bclr DisplayPower6
b0bclr DisplayPower5
MOV a,PowerBuffer
cmprs a,#1
jmp $+2
jmp Power1
cmprs a,#2
jmp $+2
jmp Power2
cmprs a,#3
jmp $+2
jmp Power3
cmprs a,#4
jmp $+2
jmp Power4
cmprs a,#5
jmp $+2
jmp Power5
Power6:
b0bset DisplayPower6
Power5:
b0bset DisplayPower5
Power4:
b0bset DisplayPower4
Power3:
b0bset DisplayPower3
Power2:
b0bset DisplayPower2
Power1:
b0bset DisplayPower1
b0 MOV a,PowerBuffer
b0 MOV Y,#PowerTable$m
b0 MOV Z,#PowerTable$l
add Z,a
MOV c
b0 MOV PowerBufferL,a
b0 MOV a,R
b0 MOV PowerBufferM,a
b0 MOV a,PowerBuffer
b0 MOV Y,#PowerTableH$m
b0 MOV Z,#PowerTableH$l
add Z,a
MOV c
b0 MOV PowerBufferH,a
b0 MOV a,R
b0 MOV PowerBufferHH,a
b0 MOV a,PowerBuffer
b0 MOV Y,#TemperatureTable$m
b0 MOV Z,#TemperatureTable$l
add Z,a
MOV c
b0 MOV TemperatureL,a
b0 MOV a,R
b0 MOV TemperatureH,a
jmp Main
;**************
Close:
b0bset FanActive
MOV a,#120
b0 MOV FanTime,a
ret
;**************
Open: b0bset FAN
b0bclr FanActive
ret
PowerTable:
; dw 0x0000,0x45d1,0x8342,0xc0b2,0xfe23,0x3b94,0x7904
dw 0x0000,0x0ed6,0x8601,0xfd2c,0x7457,0xeb85,0x62ad
PowerTableH:
; dw 0x00,0x17,0x21,0x2b,0x35,0x40,0x4a
dw 0x0000,0x4a6b,0x6b29,0x8be7,0xaca6,0xcd64,0xee23
TimeTable:
dw 0x00,10,20,30,40,50,60
TemperatureTable:
; dw 0x0000,0x013e,0x03a2,0x0674,0x0940,0x0b5c,0x0c4b
dw 0x0000,0x00e7,0x02e3,0x0578,0x085c,0x0ad0,0x0bdb
上一页 [1] [2] [3] [4] [5]
本文关键字:程序 电磁炉 松翰单片机,单片机-工控设备 - 松翰单片机