您现在的位置: 范文先生网 >> 理工论文 >> 电子通信论文 >> 正文

单总线协议转换器在分布式测控系统中的应用

时间:2007-1-20栏目:电子通信论文

long
  
  State-buffer(15360)asbyte
  
  PrivatedeclarefunctionTMExtendedStartSessionlib"IBFS32.DLL"(ByvalportnumasintegerByvalportTypeasinteger,Byvalreservedasany)aslong
  
  PrivatedeclarefunctionTMsetuplib"IBFS32.DLL"(Byvalsession_handleaslong,state_bufferasbyte)asinteger
  
  PrivatedeclarefunctionTMfirstlib"IBFS32.DLL"(Byvalsession_handleaslong,state_bufferasbyte)asinteger
  
  PrivatedeclarefunctionTMromlib"IBFS32.DLL"(Byvalsession_handleaslong,state_bufferasbyte,romasinteger)asinteger
  
  PrivatedeclarefunctionTMendsessionlib"IBFS32.DLL"(Byvalsession_handleaslong)asinteger
  
  ......
  
  Myhandle=TMExtendedStartSession(1,5,vbNullstring)
  
  '检查DS2480B是否准备就绪,准备建立会话注意,针
  
  '对DS2480B,该函数第2个参数必须为5
  
  If(Myhandle>0)then'成功建立会话
  
  Dmmy=TMSetup(Myhandle)'初始化
  
  Search=TMFirst(Myhandle,state_buffer(0))'查找设备,找
  
  '到第1个设备返回"1"
  
  If(search=1)then
  
  ROM[0]=0;'表示读数据
  
  result=TMRom(session_handle,state_buffer(0),ROM(0));
  
  if(result=1)then
  
  '此时ROM中数据表示该设备的64位ROM序列号,其中
  
  'ROM[0]为器件类型代码,如ROM(0)=20H表示找到
  
  'DS2450,ROM[7]存放的是8bitCRC
  
  ......'对找到的设备进行相应操作
  
  ......
  
  endif
  
  dmmy=TMendsession(Myhandle)'结束会话,释放单总线
  
  ......
  
  结束语
  
  基于DS2480B的单总线分布式测控系统,具有节省I

上一页  [1] [2] [3] [4] 下一页

下页更精彩:1 2 3 4 下一页