How to Serial Port access?

[RAMzor]

Hi everybody!

How can I sed "*IDN?" string to Serial Port (for TDS2000 Series Digital Ocilloscope)?

I was found Port.dll for port access, and would like to use him in my AutoIt3 script to access a Serial Port.

Can somebody give me a hint/example how to use this dll with DllCall?

Or anyone have anather dll to access a Serial Port?

thanks a lot

[MicZ]

I tried using the same DLL, but in my case I used it to read COM1...

#include <GUIConstants.au3>
$dll  = DllOpen("port.dll")
$com1 = DllCall($dll,"int","OPENCOM","str","COM1")

$Form1 = GUICreate("COM1", 120, 176, 192, 125)
GUICtrlCreateLabel("COM1 : ", 8, 32, 35, 17)
$Input1 = GUICtrlCreateInput("", 40, 32, 73, 21, -1, $WS_EX_CLIENTEDGE)
GUICtrlSetState(-1, $GUI_DISABLE)
GUISetState(@SW_SHOW)
While 1
  $msg = GuiGetMsg()
  Select
    Case $msg = $GUI_EVENT_CLOSE
      ExitLoop
    Case Else
      $com = DllCall($dll,"int","READBYTE")
      If @error Then $com[0] = "error"
      If $com[0] <> -1 Then GUICtrlSetData($Input1,$com[0])
  EndSelect
WEnd
DllClose($dll)
Exit

For some reason though, it stops receiving input after some time

I guess I messed up something... got some code on it from AutoHotKey-forums and tried to convert it, but the DllCall in AutoHotKey seems to work better for this somehow ?!

Anyway, for you the interesting part should be changing "READBYTE" into "SENDBYTE" and using a parameter after this to define what to send.

Hopefully this will work for you... and hopefully somebody will see what's wrong in my code

[martin]

There are other references to serial port communication in the forum which you might have seen. I wrote a dll to do the job which is fairly simple; you set the com port (usb to rs232 ports will work) and the baud rate etc. Then you can send a string and receive a string.

The dll is 400K which is very large for what it does, but it works.

Here is a simlified example of how to use it-

$HDll = DllOpen('commg.dll')

;set COM1, 9600 baud, 8 bit,no paraity, 1 stop bit, no flow control
$dllans = DllCall($HDll,'int','SetPort','int','1','int','9600','int','8','int','0','int','1','int','0')

;send a string
$dllans = DllCall($HDll,'int','SendString','str','Something to send' & @CRLF)

;get a string terminated by CR
$str1 = ''
while stringinstr($str1,@CR) = 0
    $ip = DllCall($HDll,'str','GetString','int','1')
    $str1 = $str1 & $ip[0]
WEnd
msgbox(0,'got this back',$str1)

DllClose($HDll)

If anyone wants a copy just ask. (Expect a bit of a delay so I can write some explanations.)

Edit 4th July 2007: Now converted to a serial port UDF which is in the 'example scripts' forum.

Edited July 4, 2007 by martin

[Locodarwin]

Here are links to a couple of topics dealing with rs232 communications that will provide a solution:

http://www.autoitscript.com/forum/index.php?showtopic=19769

http://www.autoitscript.com/forum/index.php?showtopic=13890

Also, I noticed you're sending SCPI commands to your TDS2000. Have you considered using VISA to communicate with this device? A lot of people don't know that VISA works over the serial port, too. If you decide to do that, AutoIt comes with a series of VISA UDFs that work pretty good. All you need to do is download the VISA runtimes from, say, National Instruments, and you're ready to start DAQ and monitoring with your Osci right away over rs232 with no special com port work.

Incidentally, we have a couple of these Oscis (not the same exact model, but close) and we much prefer to use GPIB (IEEE 488.x) because the acquisition rate is so much higher, and because we can daisy-chain the whole rig. The AutoIt VISA library will work with that, too.

The VISA AutoIt library isn't perfect and doesn't work for all devices, so if you end up needing a more comprehensive library (especially for IEEE 488) let me know and I'll provide you with mine.

-S

Edited December 10, 2006 by Locodarwin

[watts]

Any chance of a copy of that DLL?

Much appreaisted if you could. Other DLL;s not cutting it.

There are other references to serial port communication in the forum which you might have seen. I wrote a dll to do the job which is fairly simple; you set the com port (usb to rs232 ports will work) and the baud rate etc. Then you can send a string and receive a string.

The dll is 400K which is very large for what it does, but it works.

Here is a simlified example of how to use it-

$HDll = DllOpen('commg.dll')

;set COM1, 9600 baud, 8 bit,no paraity, 1 stop bit, no flow control
$dllans = DllCall($HDll,'int','SetPort','int','1','int','9600','int','8','int','0','int','1','int','0')

;send a string
$dllans = DllCall($HDll,'int','SendString','str','Something to send' & @CRLF)

;get a string terminated by CR
$str1 = ''
while stringinstr($str1,@CR) = 0
    $ip = DllCall($HDll,'str','GetString','int','1')
    $str1 = $str1 & $ip[0]
WEnd
msgbox(0,'got this back',$str1)

DllClose($HDll)

If anyone wants a copy just ask. (Expect a bit of a delay so I can write some explanations.)

[bhoar]

Any chance of a copy of that DLL?

Much appreaisted if you could. Other DLL;s not cutting it.

See this thread to download the DLL and UDFs:

http://www.autoitscript.com/forum/index.ph...c=45842&hl=

-brendan