西门子PLC SCL编程指令讲解

西门子PLC SCL编程指令讲解,第1张

在SCL程序编写中,在逻辑控制或者数据处理分析中,有一类指令我们用得最多,就是程序控制指令,常见的入IF ,Case ,For 和While 等。下面我仔细的讲解,有疑问可以留言提出:

图1 程序控制指令

IF .. THEN 指令

IF 指令含有含有三个分支,分别是Then ,Else 和ElsIF。

图2 IF 语句

图3 浮点数比较条件

IF语句应该是SCL里面最常用的语句了,常用于条件判断。判断类型可以是BOOL类型,可以是浮点类型等等,基本上所有类型都可以判断,只要比较的两个变量类型是一样。

在图2中,AByte 是Byte 类型,因为1在0..255之间,所以1会自动转化为Byte类型。如果比较的是Abyte类型是256,会是什么样子呢?读者可以自己写的程序,试验一下,看看结果,会加深你对数据类型的理解。

上面程序中,首先比如AByte是否和1相等,如果相等则Outvalue的值为1,然后和2比较,如果和2相等,那么OuValue值为2,如果都满足条件OuValue 的输出值则为5。

上述的IF条件语句,也可以用CASE语句来进行表示。CASE的比较类型没有IF 范围广,只有整形才能做为比较条件。

CASE指令

图4 IF语句的CASE表达方式

从CASE语句表述中,我们发现语句相对于IF表达式来说,更加清晰简单明了,所以如果需要用到整形条件作为判断,尽量用CASE来实现,会提高效率。

FOR 指令

FOR指令常用来对数组类型数据进行批量处理,在上一期讲解中已经举过一个例子,下面举个稍微复杂点的例子。

图5 FOR循环语句

在FOR程序,我们对数组的每一个索引值进行赋值,同时判断索引值的奇偶性来进行赋值 *** 作。

图6 FOR循环语句2

在上面的程序里面,我们发现有一个关键字Continue .当FOR循环执行到该语句的时候,Continue下面的程序都不会执行。所以,当iCout小于15的时候,AArray[iCount]:=iCount赋值语句不会执行。

还有一个地方有点区别,就是FOR 语句后面,多了一个关键字 BY 。BY的含义是For 执行的间隔按照BY的设定来执行。如果后面设定为1,则0..99全部执行;如果设定为2,则执行顺序为0,2,4,6,8的顺序来执行。

上述的FOR循环语句,我们同样可以采用WHILE循环来实现。

WHILE 指令

图7 WHILE指令

WHILE循环的表达方式和FOR循环基本类型,但是我们注意一点,这里面对循环变量,手动进行进行递进。如果没有这一句,iCount的值一直为0,循环条件iCount<100将一直为True,WHILE循环会一直执行。所以切记一定执行该语句。

我们还注意到一个关键字EXIT,当执行到该指令的时候,WHILE循环会停止执行,FOR指令也是一样。所以上面的程序,运行下来的情况是,数组的赋值只执行到AArray[81]结束。

GOTO指令

goto指令主要用来执行跳转过程,可以带来程序 *** 作的便利性,一般不推荐使用。若 *** 作不当,则会打乱整个程序的逻辑性。

在图7 中,如果iCount 大于90,那么,程序就会跳出WHILE 循环执行指定标签lable13地方程序#iCount=0,继续从头开始执行WHILE循环。当然这个 *** 作是毫无意义的,这里只是举个例子而已。

#include<reg51.h>

#include<intrins.h>

#define uchar unsigned char

#define uint unsigned int

sbit sda=P2^7

sbit scl=P3^6

sbit wp=P3^7

sbit lcden=P3^5

sbit lcdrs=P3^0

sbit lcdrw=P3^1

sbit modekey=P3^3

sbit setkey=P3^4

sbit DQ =P2^0 //定义通信端口

//延时函数

static unsigned char HT,LT,beng //定义用于存放温度值的高位

sbit second_ge=P2^6

sbit second_shi=P2^5

sbit min_ge=P2^4

sbit min_shi=P2^3

sbit hour_ge=P2^2

sbit hour_shi=P2^1

uchar num,num1,num2,num3,num4,num5,num6,num7,numtemp,tt,tempbuf,a,x,dis1,dis2,dis3,dat

uchar sbuf,mbuf,hbuf,wbuf,dbuf,mobuf,ybuf,keyV,key1buf,key2buf,miao,shi,fen,xin,ri,yue,nian

uchar code table[]={0x28,0x7e,0xa2,0x62,0x74,0x61,0x21,0x7a,0x20,0x60}//0123456789

uchar code table1[]="2010-01-13 WED"

uchar code table2[]="00:00:00 00.0 C"

uchar code table3[]="SUNMONTUEWEDTHUFRISAT"

uchar code month_day[]={0,32,30,32,31,32,31,32,32,31,32,31,32,30}

uchar code tempdottab[]={0,1,1,2,3,3,4,4,5,6,6,7,8,8,9,9}

void delay()

{ }

void delay1(uint x)

{

uchar a,b

for(a=xa>0a--)

for(b=100b>0b--)

}

//以下为LCD显示程序

void write_com(uchar com)

{

lcdrs=0

P1=com

delay1(5)

lcden=1

delay1(5)

lcden=0

}

void write_data(uchar date)

{

lcdrs=1

P1=date

delay1(5)

lcden=1

delay1(5)

lcden=0

}

void write_sfm(uchar add,uchar date)

{

uchar shi,ge

shi=date/10

ge=date%10

write_com(0x80+0x40+add)

write_data(0x30+shi)//地址自动加1

write_data(0x30+ge)

}

void write_nyr(uchar add,uchar date)

{

uchar shi,ge

shi=date/10

ge=date%10

write_com(0x80+add)

write_data(0x30+shi)//地址自动加1

write_data(0x30+ge)

}

void write_week(uchar add,uchar date)

{ uchar bai,shi,ge

bai=table3[date*3]

shi=table3[date*3+1]

ge=table3[date*3+2]

write_com(0x80+add)

write_data(bai)//地址自动加1

write_data(shi)

write_data(ge)

}

lcd_display()

{

miao=dis1

fen=dis2

shi=dis3

//lcdrw=0

write_sfm(4,shi)

write_sfm(7,fen)

write_sfm(10,miao)

write_week(12,num4)

write_nyr(9,num5)

write_nyr(6,num6)

write_nyr(3,num7)

//lcdrw=1//必须置位,否则会与按键程序冲突

}

//DB18B20子程序

void delay2(unsigned int i) //

{

while(i--)

}

void delayms(unsigned int i) //延时 1MS

{ unsigned char j=0

for (i>0i--)

{ for (j=0j<125j++)

{}

}

}

//DB18B20初始化函数

Init_DS18B20(void)

{

unsigned char x=0

DQ = 1 //DQ复位

delay2(8) //稍做延时

DQ = 0 //单片机将DQ拉低

delay2(80)//精确延时 大于 480us

DQ = 1 //拉高总线

delay2(14)

x=DQ //稍做延时后 如果x=0则初始化成功 x=1则初始化失败

delay2(20)

}

//读一个字节

ReadOneChar(void)

{

unsigned char i=0

unsigned char dat = 0

for (i=8i>0i--)

{

DQ = 0// 给脉冲信号

dat>>=1 // 逐位右移

DQ = 1// 给脉冲信号

if(DQ) //DQ为1 时,表示收到高电平1

dat|=0x80 // 把收到的高电平置给DAT的最高位

delay2(4)

}

return(dat) //

}

//写一个字节

WriteOneChar(unsigned char dat)

{

unsigned char i=0

for (i=8i>0i--)

{

DQ = 0

DQ = dat&0x01 //把要发送的高电平或者低电平给DQ 发送出去

delay2(5)

DQ = 1

dat>>=1 //逐位右移

}

delay2(4)

}

//读取温度

void ReadTemperature()

{

unsigned char a=0

unsigned char b=0

Init_DS18B20() //调用初始化函数

WriteOneChar(0xCC)// 跳过读序号列号的 *** 作

//不需要验证序列号。

WriteOneChar(0x44)// 发送温度转换命令 启动温度转换

Init_DS18B20()

WriteOneChar(0xCC)//跳过读序号列号的 *** 作

WriteOneChar(0xBE)//

a=ReadOneChar() //读取温度值低位

b=ReadOneChar() //读取温度值高位

LT=tempdottab[a&0x0f]

//LT=(a&0xF0)?5:0 //这句话的意思如果问号前的语句为真(判断小数位的高位是否为1111),是的话,置小数位位5 则LT=5 如果假 LT=0

/*如果a是从18B20里读来的低8位值

xiaoshu1 = (a&0x0f)*10/16//小数第一位

xiaoshu2 = (a&0x0f)*100/16%10//小数第二位

xiaoshu=xiaoshu1*10+xiaoshu2//小数两位*/

HT=b<<4 //

HT+=(a&0xF0)>>4 //

}

void lcd_display_tempmain( )

{

//uchar k

if (HT>99) //

{

write_com(0x80+0x40+8)//数码管百显示"1",表示100度

write_data(1)

}

if (HT<1) // 如果温度低于1度

{

write_com(0x80+0x40+8)//数码管百显示"-",表示零下温度

write_data(0x2d)

}

write_com(0x80+0x40+12)// 显示小数位温度值

write_data(0x30+LT)

write_com(0x80+0x40+9)// 显示十位温度值

write_data(0x30+HT%100/10)

write_com(0x80+0x40+10)// 显示个位温度值

write_data(0x30+HT%10)

}

//以下为初始化程序

void init()

{

P2=0xff

delay()

scl=1

delay()

num=0

num4=xin=3

num5=ri=13

num6=mobuf=yue=1

num7=nian=10

tt=0

wp=0

modekey=1

setkey=1

TMOD=0x01//设置定时器0为工作方式1

TH0=(65536-10000)/256

TL0=(65536-10000)%256

//TH1=(65536-20000)/256

//TL1=(65536-20000)%256

EA=1//开总中断

ET0=1//开定时器0中断

//ET1=1

lcdrw=0

lcden=0

write_com(0x38)//显示模式设置

write_com(0x0c)//显示开关及光标设置

write_com(0x06)//光标书写设置

write_com(0x01)//清屏

write_com(0x80+0x00)//首行显示地址设置

for(num=0num<15num++)

{

write_data(table1[num])

delay1(5)

}

write_com(0x80+0x40)

for(num=0num<15num++)

{

write_data(table2[num])

delay1(5)

}

write_com(0x80+0x40+13)

write_data(0xdf)

ReadTemperature() //读取温度值

lcd_display_tempmain( ) //对读到的温度值进行处理

TR0=1//启动定时器0

//TR1=1

}

//以下为按键管理程序

uchar key()

{

if(modekey==1)

return(0)

delay1(10)

if(modekey==1)

return(0)

while(!modekey)

keyV++

if(keyV==9)

keyV=0

return(keyV)

}

void key1()

{

key1buf=key()

switch(key1buf)

{

case 1:

{

TR0=0

key2buf=1

write_com(0x80+0x40+6)

write_com(0x0f)

break

}

case 2:

{

TR0=0

key2buf=2

write_com(0x80+0x40+3)

write_com(0x0f)

break

}

case 3:

{

TR0=0

key2buf=3

write_com(0x80+0x40+0)

write_com(0x0f)

break

}

case 4:

{

TR0=0

key2buf=4

write_com(0x80+12)

write_com(0x0f)

break

}

case 5:

{

TR0=0

key2buf=5

write_com(0x80+8)

write_com(0x0f)

break

}

case 6:

{

TR0=0

key2buf=6

write_com(0x80+5)

write_com(0x0f)

break

}

case 7:

{

TR0=0

key2buf=7

write_com(0x80+0)

write_com(0x0f)

break

}

case 8:

{

key2buf=0

keyV=0

write_com(0x0c)

TR0=1

}

}

if(key2buf!=0)

{

if(setkey==0)

{

delay1(5)

if(setkey==0)

{

while(!setkey)

switch(key2buf)

{

case 1:

{

sbuf=miao

sbuf++

if(sbuf>=60)

sbuf=0

num1=miao=sbuf

write_sfm(6,miao)

write_com(0x80+0x40+6)

break

}

case 2:

{

mbuf=fen

mbuf++

if(mbuf>=60)

mbuf=0

num2=fen=mbuf

write_sfm(3,fen)

write_com(0x80+0x40+3)

break

}

case 3:

{

hbuf=shi

hbuf++

if(hbuf>=24)

hbuf=0

num3=shi=hbuf

write_sfm(0,shi)

write_com(0x80+0x40+0)

break

}

case 4:

{

wbuf=xin

wbuf++

if(wbuf>=7)

wbuf=0

num4=xin=wbuf

write_week(12,xin)

write_com(0x80+12)

break

}

case 5:

{

dbuf=ri

dbuf++

if(dbuf>=month_day[mobuf])

dbuf=1

num5=ri=dbuf

write_nyr(8,ri)

write_com(0x80+8)

break

}

case 6:

{

mobuf=yue

mobuf++

if(mobuf>=13)

mobuf=1

num6=yue=mobuf

write_nyr(5,yue)

write_com(0x80+5)

break

}

case 7:

{

ybuf=nian

ybuf++

if(ybuf>=100)

ybuf=0

num7=nian=ybuf

write_nyr(2,nian)

write_com(0x80+0)

break

}

}

}

}

}

}

void main()

{

init()

while(1)

{

key1()

}

}

void time0() interrupt 1

{

TH0=(65536-10000)/256

TL0=(65536-10000)%256

tt++

if(tt==100)

{

tt=0

ReadTemperature() //读取温度值

lcd_display_tempmain( ) //对读到的温度值进行处理

num1++

if(num1>=60)

{

num1=0

num2++

if(num2>=60)

{

num2=0

num3++

if(num3>=24)

{

num3=0

num4++

num5++

if(num4>=7)

num4=0

xin=num4

write_week(12,xin)

if(num5>=month_day[num6])

{

num5=1

num6++

if(num6>=13)

{

num6=1

num7++

if(num7>=100)

num7=0

nian=num7

write_nyr(2,nian)

}

yue=num6

write_nyr(5,yue)

}

ri=num5

write_nyr(8,ri)

}

shi=num3

write_sfm(0,shi)

}

fen=num2

write_sfm(3,fen)

}

miao=num1

write_sfm(6,miao)

/*if(HT>37|HT<20) // 判断温度范围

{beng=0} // 如果温度高于37度或者低于20度,则报警告示

else

beng=1*/

}

}

/* if( *year%400 == 0 || *year%100 != 0 &&*year%4 == 0 )

dayOfMonth[1] = 29*/


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/yw/7877891.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-04-10
下一篇 2023-04-10

发表评论

登录后才能评论

评论列表(0条)

保存