Re: Need translation from QBasic to EUPHRIA... Please.
- Posted by "David Jarvis" <davidj at ultrasmart.org> Apr 17, 2005
- 452 views
Hi Dr Science Jacques Deschenes' ports.e (in the Eu archive) forms the basis of talking with ports (like the para port) in Eu. It provides similar funtionality to INP and OUT of Qbasic. Feel free to look at my code for controling the par port pins on the Eu Archive: lptpins.zip and mia_eu.zip. These use ports.e You may also be interestested in my DOS based soft PLC written in Eu (v2.4). It is written for 2 different I/O cards that connect to the para port and for I/Os on an embedded PC by ICOP. The site is: http://www.ultrasmart.org The code is shrouded, and the free public versions of the soft PLC do not have the full functionality of the private version. (One needs to make a living.) -- David Jarvis On 16 Apr 2005 at 19:30, Dr. Science wrote: > > > posted by: Dr. Science <kmlmanu at yahoo.es> > > Hi friends I'm a newby, in the past I was able to code a litle with > QBasic. > > I have bought a relay board that can be programed with any language > that can send bits to the parallel port. This is quite simple in > QBasic: > > DO > CLS > LOCATE 22,20:PRINT "CTRL+PAUSE TO EXIT" > LOCATE 10,20 > INPUT "OUTS BINRY:",X > LPRINT CHR$(X); > LOOP > END > > This piece of code should ask for bits to send then to the parallel > port. > > Answering... > > 0 : disconnects all relays > 1 : connects relay 1 > 2 : connects relay 2 > 11: connects relay 1 and 2 and so on... > > Is it posible to translate this to Euphoria? > > I'm quite new to programming and I would like to begin whith this > language. I've read all documentation and have Googled for a long time > but no luck! > > Anybody helps? > > > PS: First time I had news from Euphoria was 10 years ago, I'm very > impressed to see that it is still in development, mantained, and all > contributions it has... almost all "hi level" or "Basic" languages > I've been interested in had been abandoned... that's the reason I want > to learn Euphoria. > > Thank you. > > > >