hello.bak

PALM程序设计入门

}

//--------------------------------------------------------------
//   WREG3
//--------------------------------------------------------------
Boolean xwreg3(int para)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(XWREG3,para);
   Buf[2]=XWREG3;
   Buf[3]=(para>>8) & 0xff;
   Buf[4]=para & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}
//-----------------------------------------
Boolean ywreg3(int para)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(YWREG3,para);
   Buf[2]=YWREG3;
   Buf[3]=(para>>8) & 0xff;
   Buf[4]=para & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}
//-----------------------------------------
Boolean zwreg3(int para)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(ZWREG3,para);
   Buf[2]=ZWREG3;
   Buf[3]=(para>>8) & 0xff;
   Buf[4]=para & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}

//--------------------------------------------------------------
//   WREG4
//--------------------------------------------------------------
Boolean wr4(int para)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(WR4,para);
   Buf[2]=WR4;
   Buf[3]=(para>>8) & 0xff;
   Buf[4]=para & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;
}
//--------------------------------------------------------------
//   WREG5
//--------------------------------------------------------------
Boolean wr5(int para)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(WR5,para);
   Buf[2]=WR5;
   Buf[3]=(para>>8) & 0xff;
   Buf[4]=para & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}

//--------------------------------------------------------------
//   command
//--------------------------------------------------------------
Boolean xcommand(int cmd)
{
   char Buf[4];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(XCOMMAND,cmd);
   Buf[2]=XCOMMAND;
   Buf[3]=(cmd & 0xff);
 do{
      WriteABuffer(Buf,4);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;
}
//-----------------------------------------
Boolean ycommand(int cmd)
{
   char Buf[4];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(YCOMMAND,cmd);
   Buf[2]=YCOMMAND;
   Buf[3]=(cmd & 0xff);
 do{
      WriteABuffer(Buf,4);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;
}

//-----------------------------------------
Boolean zcommand(int cmd)
{
   char Buf[4];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(ZCOMMAND,cmd);
   Buf[2]=ZCOMMAND;
   Buf[3]=(cmd & 0xff);
 do{
      WriteABuffer(Buf,4);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}

//-----------------------------------------
Boolean command(int cmd)
{
   char Buf[4];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(CMD,cmd);
   Buf[2]=CMD;
   Buf[3]=(cmd & 0xff);
 do{
      WriteABuffer(Buf,4);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}
//----------------------------------------------------------------
// range = 1 - 500
//----------------------------------------------------------------
Boolean XRange(float r)
{
   long all;
   char Buf[7];
   char data,i=0;

   all=8000000l/r;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(XRANGE,all);
   Buf[2]=XRANGE;
   Buf[3]=0x00;
   Buf[4]=(all>>16) & 0xff;
   Buf[5]=(all>>8) & 0xff;
   Buf[6]= all & 0xff;
 do{
      WriteABuffer(Buf,7);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}
//-----------------------------------------
Boolean YRange(float r)
{
   long all;
   char Buf[7];
   char data,i=0;

   all=8000000l/r;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(YRANGE,all);
   Buf[2]=YRANGE;
   Buf[3]=0x00;
   Buf[4]=(all>>16) & 0xff;
   Buf[5]=(all>>8) & 0xff;
   Buf[6]= all & 0xff;
 do{
      WriteABuffer(Buf,7);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}
//-----------------------------------------
Boolean ZRange(float r)
{
   long all;
   char Buf[7];
   char data,i=0;

   all=8000000l/r;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(ZRANGE,all);
   Buf[2]=ZRANGE;
   Buf[3]=0x00;
   Buf[4]=(all>>16) & 0xff;
   Buf[5]=(all>>8) & 0xff;
   Buf[6]= all & 0xff;
 do{
      WriteABuffer(Buf,7);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}

//----------------------------------------------------------------
// acac  0 - 65535
//----------------------------------------------------------------
Boolean XAcac(long acac)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(XACAC,acac);
   Buf[2]=XACAC;
   Buf[3]=(acac>>8) & 0xff;
   Buf[4]= acac & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}
//-----------------------------------------
Boolean YAcac(long acac)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(YACAC,acac);
   Buf[2]=YACAC;
   Buf[3]=(acac>>8) & 0xff;
   Buf[4]= acac & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}
//-----------------------------------------
Boolean ZAcac(long acac)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(ZACAC,acac);
   Buf[2]=ZACAC;
   Buf[3]=(acac>>8) & 0xff;
   Buf[4]= acac & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}

//----------------------------------------------------------------
// acc  1 - 8000
//----------------------------------------------------------------
Boolean XAcc(long acc)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(XACC,acc);
   Buf[2]=XACC;
   Buf[3]=(acc>>8) & 0xff;
   Buf[4]= acc & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}
//-----------------------------------------
Boolean YAcc(long acc)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(YACC,acc);
   Buf[2]=YACC;
   Buf[3]=(acc>>8) & 0xff;
   Buf[4]= acc & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}
//-----------------------------------------
Boolean ZAcc(long acc)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(ZACC,acc);
   Buf[2]=ZACC;
   Buf[3]=(acc>>8) & 0xff;
   Buf[4]= acc & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}

//----------------------------------------------------------------
// dec  1 - 8000
//----------------------------------------------------------------

Boolean XDec(long dec)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(XDEC,dec);
   Buf[2]=XDEC;
   Buf[3]=(dec>>8) & 0xff;
   Buf[4]= dec & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}
//-----------------------------------------
Boolean YDec(long dec)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(YDEC,dec);
   Buf[2]=YDEC;
   Buf[3]=(dec>>8) & 0xff;
   Buf[4]= dec & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}
//-----------------------------------------
Boolean ZDec(long dec)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(ZDEC,dec);
   Buf[2]=ZDEC;
   Buf[3]=(dec>>8) & 0xff;
   Buf[4]= dec & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}
//----------------------------------------------------------------
// sv  1 - 8000
//----------------------------------------------------------------
Boolean XStartV(int sv)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(XSTARTV,sv);
   Buf[2]=XSTARTV;
   Buf[3]=(sv>>8) & 0xff;
   Buf[4]= sv & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}
//-----------------------------------------
Boolean YStartV(int sv)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(YSTARTV,sv);
   Buf[2]=YSTARTV;
   Buf[3]=(sv>>8) & 0xff;
   Buf[4]= sv & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}
//-----------------------------------------
Boolean ZStartV(int sv)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;
   Buf[1]=CountCheckSum1(ZSTARTV,sv);
   Buf[2]=ZSTARTV;
   Buf[3]=(sv>>8) & 0xff;
   Buf[4]= sv & 0xff;
 do{
      WriteABuffer(Buf,5);
      if( !ReadABuffer(&data,(DWord)1) )  return False;
      i++;
      if( i>10 && (char)data!=(char)0xf0) return False;
   } while(data!=(char)0xf0);
   return True;

}

// v  1 - 8000
Boolean XSpeed(int v)
{
   char Buf[5];
   char data,i=0;

   Buf[0]=0xff;