If you are contemplating a MAX232, I'd recommend the MAX233. its much simpler to configure using less components. If you go to the Maxim website, you can most likely order some for free as evaluation parts.
Stuart From: nsbasic...@yahoogroups.com [mailto:nsbasic...@yahoogroups.com] On Behalf Of justinanning Sent: Wednesday, 19 August 2009 10:28 PM To: nsbasic...@yahoogroups.com Subject: [nsbasic-ce] Re: Cannot open the Comm Port see here that pins 10 and 11 on the Treo are TTL... http://en.wikipedia.org/wiki/Palm_Multi-Connector You could possibly pull 3.3V off pin13 to power the chip? You just need five 0.1uF caps. A Max232 costs about $5 or less. --- In nsbasic...@yahoogroups.com <mailto:nsbasic-ce%40yahoogroups.com> , "justinanning" <jus...@...> wrote: > > It just occured to me.... > > I know nothing about it but the Treo port may be TTL? Are you connecting directly to it with your own wired plug? You may need to wire up a Max232 IC to convert to RS232. There are plenty of resources on the web for this. > > I have seen similar response from trying to log serial data to the sparkfun Logomatic V2 before realizing I was sending Rs232 spec signal to a TTL spec device. > > Justin > > --- In nsbasic...@yahoogroups.com <mailto:nsbasic-ce%40yahoogroups.com> , "gilhyde" <gilhyde@> wrote: > > > > The square bullet is Windows way of showing a character that it cannot show. So chr$(2) - STX will show the same as chr$(3) ETX > > > > > > > > --- In nsbasic...@yahoogroups.com <mailto:nsbasic-ce%40yahoogroups.com> , "justinanning" <justin@> wrote: > > > > > > Hi Roland, > > > If you log serial data in hyperterm using the wrong baud you sometimes see the symbol you refer to...Try different baud? > > > > > > When I was recently starting with nsbasic I had trouble with figuring out the .Read, but have had no trouble with the .OnRead function. Try this.... > > > > > > objPort.BaudRate = 4800 > > > objPort.ComPort = 2 > > > objPort.Timeout = 2000 > > > objPort.Enabled = True > > > objPort.NoEvents = False > > > objPort.EndTrigger = vbCR 'Note Some equipment only has CR not CRLF > > > > > > Sub objPort_OnRead(Str) > > > On Error RESUME NEXT > > > If IsNull(str) Then > > > Print "port timeout (no end trigger)" > > > Else > > > str = Replace(str, Chr(10), "") 'clean string from the left over LF if using mixed CRLF terminators > > > str = Replace(str, Chr(13), "") 'may as well clean string of any extra CR's just in case > > > Print str > > > End If > > > If Err Then > > > MsgBox "Runtime Error: " & Err.Number & " " & Err.Description > > > Err.Clear > > > End If > > > End Sub > > > > > > If your data always ends in CRLF then use this as the endtrigger so you dont have to worry about doing a replace function on a null string and can cut the sub down to... > > > > > > Sub objPort_OnRead(Str) > > > print str > > > end sub > > > > > > If collecting loads of data fast always use 115200 baud if you can, when parsing use instr function to find the header then pass the string off to a function to perform more intensive parsing and calculations on the data while the next string comes in. (I think thats how it works, it gave me better results anyway) > > > > > > Cheers, > > > Justin > > > > > > --- In nsbasic...@yahoogroups.com <mailto:nsbasic-ce%40yahoogroups.com> , Rolando Mendoza <roland.mendoza@> wrote: > > > > > > > > Hi George, > > > > > > > > I tried a different port number, and your suggestion worked. With the sample serial port application in the samples\serialtools folder, I was able to open a port, and write a string. I know the objPort.write statement worked because it reflected the number of characters written. > > > > > > > > However, the statement: > > > > str = objPort.Read(0, 5000) kept returning a square bullet character. > > > > > > > > Any reason why the serial port is not reading the string thrown at it? > > > > > > > > > > > > Warmest Regards, > > > > > > > > Roland > > > > > > > > > > > > > > > > --- On Mon, 8/10/09, George Henne <gh@> wrote: > > > > > > > > From: George Henne <gh@> > > > > Subject: Re: [nsbasic-ce] Cannot open the Comm Port > > > > To: "nsbasic...@yahoogroups.com <mailto:nsbasic-ce%40yahoogroups.com> " <nsbasic...@yahoogroups.com <mailto:nsbasic-ce%40yahoogroups.com> > > > > > Date: Monday, 10 August, 2009, 6:31 PM > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > Could the comPort be a different number? > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > >Hi, > > > > > > > > > > > > > > > > > >I downloaded the Franson Serial Tools to add printer support to my WinCE > > > > > > > > >application, which runs on a Palm Treo 750. Using the serial number > > > > > > > > >provided by NSBasic, I proceded to code as follows: > > > > > > > > > > > > > > > > > >AddObject "serialce.port. 1","objPort" > > > > > > > > >AddObject "serialce.license" ,"objlicense" > > > > > > > > > > > > > > > > > >objLicense. LicenseKey = "licence key provided by NSBasic" > > > > > > > > > > > > > > > > > >objPort.ComPort = 8 > > > > > > > > >objPort.Enabled = True > > > > > > > > > > > > > > > > > >PrintString = "Hello World" > > > > > > > > >objPort.Write PrintString > > > > > > > > > > > > > > > > > >My problem is, whenever I execute the program on the PDA unit, the > > > > > > > > >application gives a VBScript error which says that it cannot open the > > > > > > > > >communication port despite installing the Franson runtime on the Treo. > > > > > > > > > > > > > > > > > >Please help! Any assistance provided to point me in the right direction > > > > > > > > >will be greatly appreciated. Thank you. > > > > > > > > > > > > > > > > > > > > > > > > > > >Roland > > > > > > > > > > > > > > > > > >How can I tell if my jewelry is real silver? > > > > > > > > >Find Out on Yahoo! Answers > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > New Email names for you! > > > > Get the Email name you've always wanted on the new @ymail and @rocketmail. > > > > Hurry before someone else does! > > > > http://mail.promotions.yahoo.com/newdomains/ph/ > > > > > > > > > > --~--~---------~--~----~------------~-------~--~----~ You received this message because you are subscribed to the Google Groups "nsb-ce" group. To post to this group, send email to nsb-ce@googlegroups.com To unsubscribe from this group, send email to nsb-ce+unsubscr...@googlegroups.com For more options, visit this group at http://groups.google.com/group/nsb-ce?hl=en -~----------~----~----~----~------~----~------~--~---
