📄 wks.asm
字号:
Set_F: ;连续有大约14*4=64us高电平出错
set Flag_0
inc Num_H
snz Num_H.4
jmp DDM
jmp Ext_RR ;出错
;〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓
;前两个时钟结束 ,预先送数备第三个时钟采数
;送数
Send_Data:
clr c
rlc Send_L
rlc Send_H
snz c
jmp Clr_Data
set Data_P
jmp Star_Send
Clr_Data:
clr Data_P
;〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓
Star_Send:
snz Clk_p
jmp Clr_D
sz Flag_0
jmp Set_D
set Flag_0
jmp Send_Data ;一次送数结束
Clr_D:
clr Num_H
clr Flag_0
jmp Star_Send
Set_D: ;连续有大约14*4=64us高电平出错
set Flag_0
inc Num_H
snz Num_H.4
jmp Star_Send
;出错 或 结束
Ext_rr:
mov a,Send_Save_L
mov Send_L,a
mov a,Send_Save_H
mov Send_H,a
Ext_Over:
clr Data_p
mov a,Copy_S
mov Status,a
mov a,Copy_a
RETI
;〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓
Count_Sub:
;oooooooooooooooooooooooo
;mov a,25
;mov Room_Temp,a
;mov a,10h;JK_Value_L
;mov Send_Save_L,a
;mov a,11h;JK_Value_H
;mov Send_Save_H,a
;ret
;ooooooooooooooooooooooo
mov a,Room_Temp
sub a,98
snz c
jmp FF0
mov a,98
mov Room_Temp,a
FF0:
mov a,Room_Temp
sub a,Temp_Min
sz c
jmp FFp
mov a,Temp_Min
mov Room_Temp,a
FFp:
clr Betw_Count_L
clr Betw_Count_H
clr Betw_L
clr Betw_H
clr Sign_Flag
sz Temp_Sign
jmp Negative_Temp
mov a,Room_Temp
sub a,Temp_Const;25
snz c
jmp Litt_p
;++++++++++++++++++++++
mov All_Temp_L,a
sz All_Temp_L
jmp PPCF
jmp Next_PPC
Negative_Temp:
set Sign_Flag
mov a,Room_Temp
add a,Temp_Const;25
mov All_Temp_L,a
jmp PPCF
Litt_P:
mov a,Temp_Const;25
sub a,Room_Temp
mov All_Temp_L,a
set Sign_Flag
PPCF:
;X*88
mov a,58h;Betw_L
addm a,Betw_L
mov a,0
adcm a,Betw_H
sdz All_Temp_L
jmp PPCF
clr Betw_Count_L
clr Betw_Count_H
Loop_Bew:
mov a,Betw_L
sub a,10;10h
mov All_Temp_H,a
clr Temp_CC
mov a,Betw_H
sbc a,Temp_Cc
snz c
jmp Next_PPC
mov Betw_H,a
mov a,All_Temp_H
mov Betw_L,a
mov a,1
addm a,Betw_Count_L
clr acc
adcm a,Betw_Count_H
jmp Loop_Bew
Next_PPC:
clr c
Rlc Betw_Count_L
Rlc Betw_Count_H
clr c
Rlc Betw_Count_L
Rlc Betw_Count_H
clr c
Rlc Betw_Count_L
Rlc Betw_Count_H
clr c
Rlc Betw_Count_L
Rlc Betw_Count_H
sz Sign_Flag
jmp Dec_RR
mov a,JK_Value_L
add a,Betw_Count_L
mov Send_Save_L,a
mov a,JK_Value_H
adc a,Betw_Count_H
mov Send_Save_H,a
snz c
JMP Count_Over
mov a,0ffh
mov Send_Save_L,a
mov Send_Save_H,a
jmp Count_Over
Dec_RR:
mov a,JK_Value_L
sub a,Betw_Count_L
mov All_Temp_L,a
mov a,JK_Value_H
sbc a,Betw_Count_H
snz c
jmp Count_Dec
mov Send_Save_H,a
mov a,All_Temp_L
mov Send_Save_L,a
jmp Count_Over
Count_Dec:
clr Send_Save_H
clr Send_Save_L
Count_Over:
ret
;〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓
ORG 320H
Table_Temp:
mov a,Room_H
add a,30H
mov tblp,a
tabrdc Room_Temp
clr Room_H
clr Room_L
ret
ORG 330H
dc 36 ;0
dc 35 ;1
dc 30 ;2
dc 25 ;3
dc 22 ;4
dc 18 ;5
dc 14 ;6
dc 11 ;7
dc 9 ;8
dc 7 ;9
dc 6 ;10
dc 4 ;11
dc 3 ;12
dc 2 ;13
dc 1 ;14
dc 0 ;15
dc 2 ;16
dc 4 ;17
dc 5 ;18
dc 6 ;19
dc 7 ;20
dc 8 ;21
dc 9 ;22
dc 10 ;23
dc 11 ;24
dc 12 ;25
dc 13 ;26
dc 14 ;27
dc 15 ;28
dc 15 ;29
dc 16 ;30
dc 17 ;31
dc 18 ;32
dc 19 ;33
dc 19 ;34
dc 20 ;35
dc 21 ;36
dc 21 ;37
dc 22 ;38
dc 23 ;39
dc 24 ;40
dc 24 ;41
dc 25 ;42
dc 25 ;43
dc 26 ;44
dc 27 ;45
dc 28 ;46
dc 28 ;47
dc 29 ;48
dc 30 ;49
dc 30 ;50
dc 31 ;51
dc 31 ;52
dc 32 ;53
dc 32 ;54
dc 33 ;55
dc 33 ;56
dc 34 ;57
dc 34 ;58
dc 35 ;59
dc 36 ;60
dc 36 ;61
dc 37 ;62
dc 37 ;63
dc 38 ;64
dc 38 ;65
dc 39 ;66
dc 39 ;67
dc 40 ;68
dc 40 ;69
dc 41 ;70
dc 41 ;71
dc 42 ;72
dc 42 ;73
dc 43 ;74
dc 43 ;75
dc 44 ;76
dc 44 ;77
dc 45 ;78
dc 45 ;79
dc 46 ;80
dc 46 ;81
dc 46 ;82
dc 47 ;83
dc 47 ;84
dc 48 ;85
dc 48 ;86
dc 49 ;87
dc 49 ;88
dc 50 ;89
dc 50 ;90
dc 51 ;91
dc 51 ;92
dc 51 ;93
dc 52 ;94
dc 52 ;95
dc 53 ;96
dc 53 ;97
dc 54 ;98
dc 54 ;99
dc 55 ;100
dc 55 ;101
dc 55 ;102
dc 56 ;103
dc 56 ;104
dc 57 ;105
dc 57 ;106
dc 58 ;107
dc 58 ;108
dc 59 ;109
dc 59 ;110
dc 60 ;111
dc 60 ;112
dc 60 ;113
dc 61 ;114
dc 61 ;115
dc 62 ;116
dc 62 ;117
dc 63 ;118
dc 63 ;119
dc 64 ;120
dc 64 ;121
dc 64 ;122
dc 65 ;123
dc 65 ;124
dc 66 ;125
dc 66 ;126
dc 67 ;127
dc 67 ;128
dc 68 ;129
dc 68 ;130
dc 69 ;131
dc 69 ;132
dc 70 ;133
dc 70 ;134
dc 70 ;135
dc 71 ;136
dc 71 ;137
dc 72 ;138
dc 72 ;139
dc 73 ;140
dc 73 ;141
dc 74 ;142
dc 74 ;143
dc 75 ;144
dc 75 ;145
dc 76 ;146
dc 76 ;147
dc 77 ;148
dc 77 ;149
dc 78 ;150
dc 78 ;151
dc 79 ;152
dc 79 ;153
dc 80 ;154
dc 80 ;155
dc 81 ;156
dc 81 ;157
dc 82 ;158
dc 82 ;159
dc 83 ;160
dc 83 ;161
dc 84 ;162
dc 84 ;163
dc 85 ;164
dc 86 ;165
dc 86 ;166
dc 87 ;167
dc 87 ;168
dc 87 ;169
dc 88 ;170
dc 88 ;171
dc 89 ;172
dc 89 ;173
dc 90 ;174
dc 91 ;175
dc 91 ;176
dc 92 ;177
dc 92 ;178
dc 93 ;179
dc 94 ;180
dc 95 ;181
dc 95 ;182
dc 96 ;183
dc 97 ;184
dc 97 ;185
dc 98 ;186
dc 98 ;187
dc 99 ;188
dc 100 ;189
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -