070707.s

单片机类程序

LDA _NUM2,0,0
mov al,a
RSHUMIB al,4,0
mov a,@12
and al,a
mov a,al
or cl,a
LDA _NUM1,0,0
mov al,a
RSHUMIB al,6,0
mov a,@3
and a,al
or a,cl
STA disp_seg_com_bp-8,0,0
.stabn 68,0,235,L155
L155:
mov a,@7
STA _P5CR,0,2
.stabn 68,0,236,L156
L156:
bs _P5_3,3
.stabn 68,0,237,L157
L157:
LDA disp_seg_com_bp-8,0,0
STA _P6,0,0
.stabn 68,0,238,L158
L158:
call _delay_2ms
.stabn 68,0,241,L159
L159:
mov a,@14
STA _P5CR,0,2
.stabn 68,0,242,L160
L160:
bc _P5_0,0
.stabn 68,0,243,L161
L161:
LDA disp_seg_com_bp-5,0,0
mov cl,a
coma cl
STA _P6,0,0
.stabn 68,0,244,L162
L162:
call _delay_2ms
.stabn 68,0,246,L163
L163:
mov a,@13
STA _P5CR,0,2
.stabn 68,0,247,L164
L164:
bc _P5_1,1
.stabn 68,0,248,L165
L165:
LDA disp_seg_com_bp-6,0,0
mov cl,a
coma cl
STA _P6,0,0
.stabn 68,0,249,L166
L166:
call _delay_2ms
.stabn 68,0,251,L167
L167:
mov a,@11
STA _P5CR,0,2
.stabn 68,0,252,L168
L168:
bc _P5_2,2
.stabn 68,0,253,L169
L169:
LDA disp_seg_com_bp-7,0,0
mov cl,a
coma cl
STA _P6,0,0
.stabn 68,0,254,L170
L170:
call _delay_2ms
.stabn 68,0,256,L171
L171:
mov a,@7
STA _P5CR,0,2
.stabn 68,0,257,L172
L172:
bc _P5_3,3
.stabn 68,0,258,L173
L173:
LDA disp_seg_com_bp-8,0,0
mov cl,a
coma cl
STA _P6,0,0
.stabn 68,0,259,L174
L174:
call _delay_2ms
.stabn 68,0,260,L175
L175:
.stabn 224,0,0,L176
L176:
L$134:
mov a,disp_seg_com_bp-4
mov ecx,a
mov a,disp_seg_com_bp-3
mov ecx+1,a
mov a,disp_seg_com_bp-2
mov ecx+2,a
mov a,disp_seg_com_bp-1
mov ecx+3,a
ret
.STACK disp_seg_com_bp,local,8
public _stop_time_count
public stop_time_count_bp
.stabs "stop_time_count:F15",36,0,0,_stop_time_count
.section ".S3",C_CODE
.SYMDEF ".S3" 
_stop_time_count:
.SYMDEF "_stop_time_count" 
mov a,ecx
mov stop_time_count_bp-4,a
mov a,ecx+1
mov stop_time_count_bp-3,a
mov a,ecx+2
mov stop_time_count_bp-2,a
mov a,ecx+3
mov stop_time_count_bp-1,a
.stabn 192,0,0,L182
L182:
.stabn 68,0,264,L183
L183:
.stabn 68,0,265,L184
L184:
.cfile "E:\PROJECT\OXYGEN\PROGRAM\C-PROGRAM\OXYGEN\070706\070707.c(265):"
WDTC
.stabn 68,0,265,L185
L185:
.stabn 68,0,266,L186
L186:
INCMW _stop_time,0
.stabn 68,0,267,L187
L187:
ULERIW _stop_time,11142,L$178
.stabn 192,0,1,L188
L188:
.stabn 68,0,268,L189
L189:
.stabn 68,0,269,L190
L190:
clr _stop_time+1
clr _stop_time
.stabn 68,0,270,L191
L191:
INCMB _heat_time,0
.stabn 68,0,271,L192
L192:
ULEGRIB _heat_time,3
jbc STATUS, cf
jmp L$180
.stabn 192,0,2,L193
L193:
.stabn 68,0,272,L194
L194:
.stabn 68,0,273,L195
L195:
bc _heat_begin,3
.stabn 68,0,274,L196
L196:
bc _P7_5,5
.stabn 68,0,275,L197
L197:
bc _P7_3,3
.stabn 68,0,276,L198
L198:
bc _P7_4,4
.stabn 68,0,277,L199
L199:
clr _heat_time
.stabn 68,0,278,L200
L200:
clr _actual_f+1
clr _actual_f
.stabn 68,0,279,L201
L201:
.stabn 224,0,2,L202
L202:
L$180:
.stabn 68,0,280,L203
L203:
.stabn 224,0,1,L204
L204:
L$178:
.stabn 68,0,281,L205
L205:
.stabn 224,0,0,L206
L206:
L$177:
mov a,stop_time_count_bp-4
mov ecx,a
mov a,stop_time_count_bp-3
mov ecx+1,a
mov a,stop_time_count_bp-2
mov ecx+2,a
mov a,stop_time_count_bp-1
mov ecx+3,a
ret
.STACK stop_time_count_bp,local,4
public _heat_control
public heat_control_bp
.stabs "heat_control:F15",36,0,0,_heat_control
.section ".S4",C_CODE
.SYMDEF ".S4" 
_heat_control:
.SYMDEF "_heat_control" 
mov a,ecx
mov heat_control_bp-4,a
mov a,ecx+1
mov heat_control_bp-3,a
mov a,ecx+2
mov heat_control_bp-2,a
mov a,ecx+3
mov heat_control_bp-1,a
.stabn 192,0,0,L217
L217:
.stabn 68,0,285,L218
L218:
.stabn 68,0,286,L219
L219:
.cfile "E:\PROJECT\OXYGEN\PROGRAM\C-PROGRAM\OXYGEN\070706\070707.c(286):"
WDTC
.stabn 68,0,286,L220
L220:
.stabn 68,0,287,L221
L221:
jbs _heat_begin,3
jmp @L$208
.stabn 192,0,1,L222
L222:
.stabn 68,0,288,L223
L223:
.stabn 68,0,289,L224
L224:
LDA _set_f,0,0
mov cx,a
LDA _set_f,1,0
mov cx+1,a
LDA _actual_f,0,0
sub cx,a
LDA _actual_f,1,0
jbs STATUS,cf
dec cx+1
sub cx+1,a
mov a,cx
STA _difference,0,0
mov a,cx+1
STA _difference,1,0
.stabn 68,0,290,L225
L225:
UGELRIW _difference,401
jbc STATUS,cf
jmp @L$210
.stabn 192,0,2,L226
L226:
.stabn 68,0,291,L227
L227:
.stabn 68,0,293,L228
L228:
ULERIW _difference,10,L$212
.stabn 192,0,3,L229
L229:
.stabn 68,0,294,L230
L230:
.stabn 68,0,295,L231
L231:
bs _P7_5,5
.stabn 68,0,296,L232
L232:
bc _half_heat,5
.stabn 68,0,297,L233
L233:
bs _P7_3,3
.stabn 68,0,298,L234
L234:
bc _P7_4,4
.stabn 68,0,299,L235
L235:
.stabn 224,0,3,L236
L236:
jmp @L$211
L$212:
.stabn 192,0,3,L237
L237:
.stabn 68,0,301,L238
L238:
.stabn 68,0,302,L239
L239:
jbc _P7_5,5
jmp @L$215
mov a,@1
STA heat_control_bp-5,0,0
jmp @L$216
L$215:
clr heat_control_bp-5
L$216:
LDA heat_control_bp-5,0,0
mov cl,a
bc _P7_5,5
jbc cl,0
bs _P7_5,5
.stabn 68,0,303,L240
L240:
bs _half_heat,5
.stabn 68,0,304,L241
L241:
bc _P7_3,3
.stabn 68,0,305,L242
L242:
bs _P7_4,4
.stabn 68,0,306,L243
L243:
.stabn 224,0,3,L244
L244:
.stabn 68,0,307,L245
L245:
.stabn 224,0,2,L246
L246:
jmp @L$211
L$210:
.stabn 192,0,2,L247
L247:
.stabn 68,0,309,L248
L248:
.stabn 68,0,310,L249
L249:
bc _P7_5,5
.stabn 68,0,311,L250
L250:
bc _P7_3,3
.stabn 68,0,312,L251
L251:
bs _P7_4,4
.stabn 68,0,313,L252
L252:
.stabn 224,0,2,L253
L253:
L$211:
.stabn 68,0,314,L254
L254:
.stabn 224,0,1,L255
L255:
L$208:
.stabn 68,0,315,L256
L256:
.stabn 224,0,0,L257
L257:
L$207:
mov a,heat_control_bp-4
mov ecx,a
mov a,heat_control_bp-3
mov ecx+1,a
mov a,heat_control_bp-2
mov ecx+2,a
mov a,heat_control_bp-1
mov ecx+3,a
ret
.STACK heat_control_bp,local,5
public _rc_charge
public rc_charge_bp
.stabs "rc_charge:F15",36,0,0,_rc_charge
.section ".S5",C_CODE
.SYMDEF ".S5" 
_rc_charge:
.SYMDEF "_rc_charge" 
mov a,ecx
mov rc_charge_bp-4,a
mov a,ecx+1
mov rc_charge_bp-3,a
mov a,ecx+2
mov rc_charge_bp-2,a
mov a,ecx+3
mov rc_charge_bp-1,a
.stabn 192,0,0,L275
L275:
.stabn 68,0,319,L276
L276:
.stabn 68,0,320,L277
L277:
.cfile "E:\PROJECT\OXYGEN\PROGRAM\C-PROGRAM\OXYGEN\070706\070707.c(320):"
WDTC
.stabn 68,0,320,L278
L278:
.stabn 68,0,321,L279
L279:
jbc _one_team_finish,2
jmp @L$259
.stabn 192,0,1,L280
L280:
.stabn 68,0,322,L281
L281:
.stabn 68,0,323,L282
L282:
jbs _one_time_charge,1
jmp @L$261
.stabn 192,0,2,L283
L283:
.stabn 68,0,324,L284
L284:
.stabn 68,0,326,L285
L285:
LDA _P7,0,0
STA _p7_status,0,0
.stabn 68,0,327,L286
L286:
mov a,@6
STA _P7CR,0,2
.stabn 68,0,328,L287
L287:
LDA _p7_status,0,0
STA _P7,0,0
.stabn 68,0,329,L288
L288:
bc _P7_6,6
.stabn 68,0,330,L289
L289:
bc _P7_7,7
.stabn 68,0,331,L290
L290:
bc _P7_0,0
.stabn 68,0,332,L291
L291:
mov a,@.b0.100
mov cx,a
mov a,@.b1.100
mov cx+1,a
mov a,cx
STA rc_charge_bp-6,0,0
mov a,cx+1
STA rc_charge_bp-6,1,0
LDA _tcc_time_2,0,0
mov ax,a
clr ax+1
LSHMIW ax,8,0
LDA _tcc_time_1,0,0
mov cx,a
clr cx+1
mov a,cx
add ax,a
mov a,cx+1
jbc STATUS,cf
add a,@1
add ax+1,a
LDA rc_charge_bp-6,0,0
mov cx,a
LDA rc_charge_bp-6,1,0
mov cx+1,a
mov a,@cx
mov pr0,a
mov a,@ax
mov pr1,a
call umulrrw
LDA _tcc_present_value,0,0
mov al,a
mov a,@55
sub al,a
mov a,al
mov ax,a
clr ax+1
mov a,ax
add cx,a
mov a,ax+1
jbc STATUS,cf
add a,@1
add cx+1,a
mov a,cx
STA _tcc_times,0,0
mov a,cx+1
STA _tcc_times,1,0
.stabn 68,0,333,L292
L292:
clr _tcc_time_1
.stabn 68,0,334,L293
L293:
clr _tcc_time_2
.stabn 68,0,335,L294
L294:
jbs _sensor,0
jmp @L$263
.stabn 192,0,3,L295
L295:
.stabn 68,0,336,L296
L296:
.stabn 68,0,337,L297
L297:
LDA _rc_times,0,0
mov cl,a
LSHUMIB cl,1,0
mov a,@_rc_temp
add cl,a
LDA _tcc_times,0,0
mov ax,a
LDA _tcc_times,1,0
mov ax+1,a
mov a,cl
mov RSR,a
mov a,ax
mov R0,a
inc RSR
mov a,ax+1
mov R0,a
.stabn 68,0,338,L298
L298:
clr _tcc_times+1
clr _tcc_times
.stabn 68,0,339,L299
L299:
INCMB _rc_times,0
.stabn 68,0,340,L300
L300:
ULEGRIB _rc_times,5
jbc STATUS, cf
jmp L$265
.stabn 192,0,4,L301
L301:
.stabn 68,0,341,L302
L302:
.stabn 68,0,342,L303
L303:
call _accumulate
.stabn 68,0,343,L304
L304:
clr _rc_times
.stabn 68,0,344,L305
L305:
bc _sensor,0
.stabn 68,0,345,L306
L306:
bs _one_team_finish,2
.stabn 68,0,347,L307
L307:
.stabn 224,0,4,L308
L308:
L$265:
.stabn 68,0,348,L309
L309:
bc _one_time_charge,1
.stabn 68,0,349,L310
L310:
.stabn 224,0,3,L311
L311:
jmp @L$260
L$263:
.stabn 192,0,3,L312
L312:
.stabn 68,0,351,L313
L313:
.stabn 68,0,352,L314
L314:
LDA _rc_times,0,0
mov cl,a
LSHUMIB cl,1,0
mov a,@_rc_temp
add cl,a
LDA _tcc_times,0,0
mov ax,a
LDA _tcc_times,1,0
mov ax+1,a
mov a,cl
mov RSR,a
mov a,ax
mov R0,a
inc RSR
mov a,ax+1
mov R0,a
.stabn 68,0,353,L315
L315:
clr _tcc_times+1
clr _tcc_times
.stabn 68,0,354,L316
L316:
INCMB _rc_times,0
.stabn 68,0,355,L317
L317:
ULEGRIB _rc_times,5
jbc STATUS, cf
jmp L$267
.stabn 192,0,4,L318
L318:
.stabn 68,0,356,L319
L319:
.stabn 68,0,357,L320
L320:
call _accumulate
.stabn 68,0,358,L321
L321:
clr _rc_times
.stabn 68,0,359,L322
L322:
bs _sensor,0
.stabn 68,0,360,L323
L323:
.stabn 224,0,4,L324
L324:
L$267:
.stabn 68,0,361,L325
L325:
bc _one_time_charge,1
.stabn 68,0,362,L326
L326:
.stabn 224,0,3,L327
L327:
.stabn 68,0,363,L328
L328:
.stabn 224,0,2,L329
L329:
jmp @L$260
L$261:
.stabn 192,0,2,L330
L330:
.stabn 68,0,365,L331
L331:
.stabn 68,0,366,L332
L332:
jbs _sensor,0
jmp @L$269
.stabn 192,0,3,L333
L333:
.stabn 68,0,367,L334
L334:
.stabn 68,0,368,L335
L335:
jbc _rc_charging_now,5
jmp @L$260
.stabn 192,0,4,L336
L336:
.stabn 68,0,369,L337
L337:
.stabn 68,0,370,L338
L338:
LDA _P7,0,0
STA _p7_status,0,0
.stabn 68,0,371,L339
L339:
mov a,@71
STA _P7CR,0,2
.stabn 68,0,372,L340
L340:
LDA _p7_status,0,0
STA _P7,0,0
.stabn 68,0,373,L341
L341:
bs _rc_charging_now,5
.stabn 68,0,374,L342
L342:
mov a,@55
STA _TCC,0,0
.stabn 68,0,375,L343
L343:
mov a,@9
STA _IMR,0,2
.stabn 68,0,376,L344
L344:
bs _P7_7,7
.stabn 68,0,377,L345
L345:
.cfile "E:\PROJECT\OXYGEN\PROGRAM\C-PROGRAM\OXYGEN\070706\070707.c(377):"
ENI
.stabn 68,0,377,L346
L346:
.stabn 68,0,378,L347
L347:
.stabn 224,0,4,L348
L348:
.stabn 68,0,379,L349
L349:
.stabn 224,0,3,L350
L350:
jmp @L$260
L$269:
.stabn 192,0,3,L351
L351:
.stabn 68,0,381,L352
L352:
.stabn 68,0,382,L353
L353:
jbc _rc_charging_now,5
jmp @L$260
.stabn 192,0,4,L354
L354:
.stabn 68,0,383,L355
L355:
.stabn 68,0,384,L356
L356:
LDA _P7,0,0
STA _p7_status,0,0
.stabn 68,0,385,L357
L357:
mov a,@135
STA _P7CR,0,2
.stabn 68,0,386,L358
L358:
LDA _p7_status,0,0
STA _P7,0,0
.stabn 68,0,387,L359
L359:
bs _rc_charging_now,5
.stabn 68,0,388,L360
L360:
mov a,@55
STA _TCC,0,0
.stabn 68,0,389,L361
L361:
mov a,@9
STA _IMR,0,2
.stabn 68,0,390,L362
L362:
bs _P7_6,6
.stabn 68,0,391,L363
L363:
.cfile "E:\PROJECT\OXYGEN\PROGRAM\C-PROGRAM\OXYGEN\070706\070707.c(391):"
ENI
.stabn 68,0,391,L364
L364:
.stabn 68,0,392,L365
L365:
.stabn 224,0,4,L366
L366:
.stabn 68,0,393,L367
L367:
.stabn 224,0,3,L368
L368:
.stabn 68,0,394,L369
L369:
.stabn 224,0,2,L370
L370:
.stabn 68,0,395,L371
L371:
.stabn 224,0,1,L372
L372:
jmp @L$260
L$259:
.stabn 192,0,1,L373
L373:
.stabn 68,0,397,L374
L374:
.stabn 68,0,398,L375
L375:
call _check_temp_table
.stabn 68,0,399,L376
L376:
mov a,@.b0.9
mov cx,a
mov a,@.b1.9
mov cx+1,a
LDA _check_table_value,0,0
mov ax,a
LDA _check_table_value,1,0
mov ax+1,a
mov a,@cx
mov pr0,a
mov a,@ax
mov pr1,a
call umulrrw
mov a,@cx
mov pr0,a
mov a,@.b0.5
mov pr1,a
mov a,@.b1.5
mov pr1+1,a
call udivriw
mov a,@.b0.32
add a, cx
mov cx, a
jbc STATUS,cf
inc cx+1
mov a,cx+1
add a, @.b1.32
mov cx+1,a
mov a,cx
STA _actual_f,0,0
mov a,cx+1
STA _actual_f,1,0
.stabn 68,0,401,L377
L377:
bc _one_team_finish,2
.stabn 68,0,402,L378
L378:
bs _lcd_data_ok,7
.stabn 68,0,403,L379
L379:
.stabn 224,0,1,L380
L380:
L$260:
.stabn 68,0,404,L381
L381:
.stabn 224,0,0,L382
L382:
L$258:
mov a,rc_charge_bp-4
mov ecx,a
mov a,rc_charge_bp-3
mov ecx+1,a
mov a,rc_charge_bp-2
mov ecx+2,a
mov a,rc_charge_bp-1
mov ecx+3,a
ret
.STACK rc_charge_bp,local,6
public _accumulate
public accumulate_bp
.stabs "accumulate:F15",36,0,0,_accumulate
.section ".S6",C_CODE
.SYMDEF ".S6" 
_accumulate:
.SYMDEF "_accumulate"