编译错误信息不清楚的问题　[金字塔]

下面两段程序，基本上一样的， 第一段编译出现错误“引用的括号不完整”， 停留的地方在的函数END，  第二段编译没有问题。

我不知道第一段问题所在， 而且END 语句本来就没有括号， 所以你出现错误的注释“引用的括号不完整”让人摸不着头脑！？ 请帮忙指正第一段哪里有问题？

//第一段

IF SHDIFFDAY>-30 THEN
BEGIN
 IF SHDIFF60MIN>-30 THEN
 BEGIN
  BKSH5=IF( SHDIFF15MIN>-30 and SHPOSITIVEV5MIN,1,0);
  BKSH5=IF( SHDIFF15MIN>-70 and SHPOSITIVEV5MIN,1,0);
  BKSH15=IF(SHPOSITIVEV15MIN,1,0);
 END    
 IF SHDIFF60MIN<-30 THEN
 BEGIN
  BKSH5=IF(SHDIFF15MIN>-30 AND SHPOSITIVEV5MIN,1,0);
  BKSH15=IF(SHDIFF15MIN>-70 AND SHPOSITIVEV15MIN,1,0);
 END
END  
IF SHDIFFDAY<-30 AND SHDIFFDAY>-150 THEN
BEGIN
 IF SHDIFF60MIN>-30 THEN
 BEGIN
  BKSH5=IF(SHDIFF15MIN>-5 AND SHPOSITIVEV5MIN,1,0),1,0);
 
  BKSH15=IF(SHDIFF15MIN>-30 AND SHDIFF15MIN<-70 AND SHPOSITIVEV15MIN,1,0);
 END

    END
 END

//第二段

IF SHDIFFDAY>-30 THEN
BEGIN
 IF SHDIFF60MIN>-30 THEN
 BEGIN
  BKSH5=IF( SHDIFF15MIN>-30 and SHPOSITIVEV5MIN,1,0);
  BKSH5=IF( SHDIFF15MIN>-70 and SHPOSITIVEV5MIN,1,0);
  BKSH15=IF(SHPOSITIVEV15MIN,1,0);
 END    
 IF SHDIFF60MIN<-30 THEN
 BEGIN
  BKSH5=IF(SHDIFF15MIN>-30 AND SHPOSITIVEV5MIN,1,0);
  BKSH15=IF(SHDIFF15MIN>-70 AND SHPOSITIVEV15MIN,1,0);
 END
END  
IF SHDIFFDAY<-30 AND SHDIFFDAY>-150 THEN
BEGIN
 IF SHDIFF60MIN>-30 THEN
 BEGIN
  BKSH5=1;
 END

 END 

 来源:程序化久久网（ WWW.CXH99.COM ）

我的第一段begin 跟 end 是对的上的， 如果第一段没有对的上， 第二段肯定出错！  第二段跟第一段内容基本上一样， begin 和 end 的数量一样的。 请你指示我第一段哪里多出了一个begin?

还有， 如果我定义了下面语句， 就不需要用：=了， 对吗？

VARIABLE:BKSH5=0,BKZH5=0;
VARIABLE:BKSH15=0,BKZH15=0;
VARIABLE:BKSH60=0,BKZH60=0;
VARIABLE:BKSHDAY=0,BKZHDAY=0; 

因为第一段有错， 我拷贝出第二段来做测试的。 两段是独立的。