📄 display.plm
字号:
display1:procedure;
DECLARE WW word;
IF hum_z=0ffh
THEN DO;
dis_led2(3),dis_led2(4)=40h;
dis_led1(3),dis_led1(4)=0;
END;
ELSE DO;
dis_led1(3),dis_led2(3)=ROM1(hum_z/10);
dis_led1(4),dis_led2(4)=ROM1(hum_z MOD 10);
END;
IF tem_z=8000h
THEN DO;
dis_led1(0),dis_led1(1),dis_led1(2)=0;
dis_led2(0),dis_led2(1),dis_led2(2)=40h;
END;
ELSE DO;
IF tem_z>8000h
THEN DO;
dis_led1(0),dis_led2(0)=40h;
ww=-tem_z ;
IF ww>=100
THEN DO;
ww=ww/10;
dis_led1(1),dis_led2(1)=ROM1(ww/10);
dis_led1(2),dis_led2(2)=ROM1(ww MOD 10);
END;
ELSE DO;
dis_led1(1),dis_led2(1)=rom1(ww/10) or 80h;
dis_led1(2),dis_led2(2)=rom1(ww mod 10);
END;
END;
ELSE DO;
ww=tem_z;
IF ww>=100
THEN dis_led1(0),dis_led2(0)=ROM1(ww/100);
ELSE dis_led1(0),dis_led2(0)=0;
ww=ww mod 100;
dis_led1(1),dis_led2(1)=ROM1(ww/10) OR 80h;
dis_led1(2),dis_led2(2)=ROM1(ww MOD 10);
END;
END;
CS=0;CS=1; /* 看门狗复位 */
END display1;
display:procedure;/*显示处理*/
DECLARE (led16,led26,ii) byte;
declare ii1 bit;
led16,led26,dis_led1(7)=0;
IF key_zz=84
THEN DO;
IF y1_run_dt<>0 and y1_b and p22 and auto_hand_b=0
THEN DO;
dis_led1(0),dis_led2(0)=0;
dis_led1(1),dis_led2(1)=0;
ii=y1_run_dt;
dis_led1(2),dis_led2(2)=ROM1(ii/60);
ii=ii MOD 60;
dis_led1(3),dis_led2(3)=ROM1(ii/10);
dis_led1(4),dis_led2(4)=ROM1(ii MOD 10);
led16,led26=41h;/*D3,d12分点*/
END; /*压机1显示延时*/
ELSE CALL display1;
END;
ELSE DO;
IF key_zz=1 THEN led26=led26 OR 4h;/*D14*/
IF key_zz=2 THEN led26=led26 OR 8h;/*D15*/
IF key_zz>=3 and key_zz<9
THEN DO;
led16=led16 or 41h;/*D3,d12*/
led26=led26 or 51h;/*D3,d12,d16*/
END;
END;
IF system_run_f=0
THEN DO;led16=led16 OR 80h;/*d2 stop*/
led26=led26 or 80h;
END;
IF auto_hand_b THEN DO;led16=led16 or 2; led26=led26 or 2;END;
ELSE DO;led16=led16 or 20h;led26=led26 or 20h;END;
dis_led1(5),dis_led2(5)=out*2;
IF open_hr<>24h and auto_hand_b THEN dis_led2(5)=dis_led2(5) or 1;
IF y1_b THEN dis_led2(5)=dis_led2(5) or 4;
IF y2_b THEN dis_led2(5)=dis_led2(5) or 8;
dis_led2(7)=in_err;
dis_led1(6)=led16;dis_led2(6)=led26;
CS=0;CS=1; /* 看门狗复位 */
END display;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -