keydeal.lst
来自「16路巡检仪 该仪表采用c语言编写」· LST 代码 · 共 649 行 · 第 1/5 页
LST
649 行
479 4 case jianyan8: if(tq!=0)
480 4 {
481 5 VR[portt]=port[portt];
482 5 writen=1;
483 5 Hex2Bcd(VR[portt],si);
484 5 }
485 4 kt=1;
486 4 break;
487 4 default:;
488 4 }
489 3 automic=0;
490 3 }
491 2 else if(keyn==SUBdata)
492 2 {
493 3 switch(Chose)
494 3 {
495 4 case mimasetdisplay: Chose=syscsdisplay;
496 4 kr=2;
497 4 leng=16;
498 4
499 4 break;
500 4 case syscsdisplay: Chose=fundisplay;
501 4 kr=2;
502 4 leng=280;
503 4 break;
504 4 case fundisplay: Chose=teshucsdisplay;
505 4 kr=3;
506 4 leng=32;
507 4 break;
508 4 case teshucsdisplay: Chose=mimasetdisplay;
509 4 kr=2;
510 4 leng=4;
511 4 break;
512 4 case mimadisplay: if(mimat>0)
513 4 mimat--;
514 4 Hex2Bcd(mimat,si);
515 4 kt=1;
516 4 break;
517 4 case setdisplayst: if(kadat>0)
518 4 kadat--;
519 4 Hex2Bcd(kadat,si);
520 4 writen=1;
521 4 kt=1;
522 4 break;
523 4 case setdisplaysp: if(fundat>0)
524 4 fundat--;
525 4 Hex2Bcd(fundat,si);
526 4 writen=1;
527 4 kt=1;
528 4 break;
529 4 case syscs1: if(inputdat>1)
530 4 inputdat--;
531 4 Hex2Bcd(inputdat,si);
532 4 writen=1;
533 4 kt=1;
534 4 break;
C51 COMPILER V7.50 KEYDEAL 06/25/2008 14:22:37 PAGE 10
535 4 case syscs2: if(typdat[wk]>0)
536 4 typdat[wk]--;
*** ERROR C187 IN LINE 536 OF KEYDEAL.C: not an lvalue
537 4 Hex2Bcd(typdat[wk],si);
538 4 writen=1;
539 4 kt=1;
540 4 break;
541 4 case syscs3: if(dot[wk]>0)
542 4 dot[wk]--;
*** ERROR C187 IN LINE 542 OF KEYDEAL.C: not an lvalue
543 4 Hex2Bcd(dot[wk],si);
544 4 writen1=1;
545 4 kt=1;
546 4 break;
547 4 case syscs4: if(rangeL[wk]>=RdatL[dot[wk]])
548 4 rangeL[wk]-=adatt;
549 4 floatToBCD(rangeL[wk],si);
550 4 writen=1;
551 4 kt=1;
552 4 break;
553 4 case syscs5: if(rangeH[wk]>=RdatL[dot[wk]])
554 4 rangeH[wk]-=adatt;
555 4 floatToBCD(rangeH[wk],si);
556 4 writen=1;
557 4 kt=1;
558 4 break;
559 4 case fun1: if(warmd>1)
560 4 warmd--;
561 4 Hex2Bcd(warmd,si);
562 4 kt=1;
563 4 break;
564 4 case fun2: if(warmH[wt]>=RdatL[dot[wt]])
565 4 warmH[wt]-=adatt;
566 4 floatToBCD(warmH[wt],si);
567 4 writen=1;
568 4 kt=1;
569 4 break;
570 4 case fun3: if(warmL[wt]>=RdatL[dot[wt]])
571 4 warmL[wt]-=adatt;
572 4 floatToBCD(warmL[wt],si);
573 4 writen=1;
574 4 kt=1;
575 4 break;
576 4 case fun4: if(warmdown[wt]>1)
577 4 warmdown[wt]--;
*** ERROR C187 IN LINE 577 OF KEYDEAL.C: not an lvalue
578 4 Hex2Bcd(warmdown[wt],si);
579 4 writen=1;
580 4 kt=1;
581 4 break;
582 4 case fun5: if(warmscd[wt]>1)
583 4 warmscd[wt]--;
*** ERROR C187 IN LINE 583 OF KEYDEAL.C: not an lvalue
584 4 Hex2Bcd(warmscd[wt],si);
585 4 writen=1;
586 4 kt=1;
587 4 break;
588 4 case teshucs1: if(filt>0.001)
589 4 filt-=0.001;
590 4 floatToBCD(filt, si);
591 4 writen=1;
592 4 kt=1;
C51 COMPILER V7.50 KEYDEAL 06/25/2008 14:22:37 PAGE 11
593 4 break;
594 4 case teshucs2: if(drt>1)
595 4 drt--;
596 4 Hex2Bcd(drt,si);
597 4 writen=1;
598 4 kt=1;
599 4 ⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?