1.
- Posted by Brian Broker <bkb at cnw.com> Jul 13, 2004
- 2463 views
Irv wrote: > The fact is, Kat asked because she was trying to get some work done > using Euphoria. Others here proved that the problem was with Windows. > I mentioned 4 alternatives which would work for Kat, one of which was Linux. > If that upsets you so much, you probably shouldn't be reading this list. > > Irv OK, so maybe I shouldn't post when I'm in a grumpy mood but the problem is not with Windows per se, but is with the FAT file system. FAT is a quarter century old and was designed well before Windows and hard drives. Sure it's been patched to support large HD's but still has many limitations. So for the type of data mining and file storage that Kat is dealing with, I would simply get away from FAT... -- Brian
2. Re:
- Posted by irv mullins <irvm at ellijay.com> Jul 13, 2004
- 2098 views
Brian Broker wrote: > OK, so maybe I shouldn't post when I'm in a grumpy mood but the problem > is not with Windows per se, but is with the FAT file system. FAT is a > quarter century old and was designed well before Windows and hard > drives. Sure it's been patched to support large HD's but still has many > limitations. So for the type of data mining and file storage that Kat > is dealing with, I would simply get away from FAT... Agreed. I'm not sure that is an easy thing for Kat to do, however. There are probably good reasons she doesn't want to move to XP. I wonder if it would be possible to store all these files in a Euphoria database? I'm thinking there might be around 100megs of data - but only one filename. Irv
3.
- Posted by Beaumont Furniss <bfurniss at IHUG.CO.NZ> May 08, 2000
- 2129 views
Please note this requires Windows 95 , or more recent! On 2000-05-07 EUPHORIA at LISTSERV.MUOHIO.EDU said: Net-Tamer V 1.11 - Test Drive
4.
- Posted by Michael Nelson <mike-nelson-ODAAT at WORLDNET.ATT.NET> May 17, 2000
- 2072 views
Just thought of this one: function cut(sequence s,sequence index) object x x=s for i=1 to length(x) do if sequence(index[i]) then x=x[index[i][1]..index[i][2]] else x=x[index[i]] end if end for return x end function This expands on standard Euphoria by allowing slices in any dimension, not just the last. Offhand, I don't know where I'd use this, but I'm sure someone will find it useful. -- Mike Nelson
5.
- Posted by =?iso-8859-1?B?+A0=?= <mwfch at MWEB.CO.ZA> May 27, 2000
- 2064 views
------=_NextPart_000_00E1_01BFC7BF.7A021120 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Hi ya all ! I wanna show what we Euphoria programers are made of ! Any one that = wants to group with me and make games that can go commercial is welcome = ! You can be 1 or 100 years old , it dosn`t matter ! Any one is = welcome.E-mail me at=20 mwfch at mweb.co.za . Ferdinand Greyling from Terminal Software ------=_NextPart_000_00E1_01BFC7BF.7A021120 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2614.3500" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>Hi ya all !</FONT></DIV> <DIV><FONT face=3DArial size=3D2>I wanna show what we Euphoria = programers are made=20 of ! Any one that wants to group with me and make games that can go = commercial=20 is welcome ! You can be 1 or 100 years old , it dosn`t matter ! Any one = is=20 welcome.E-mail me at </FONT></DIV> <DIV><FONT face=3DArial size=3D2><A=20 <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>Ferdinand Greyling</FONT></DIV> <DIV><FONT face=3DArial size=3D2>from</FONT></DIV> <DIV><FONT face=3DArial size=3D2>Terminal = ------=_NextPart_000_00E1_01BFC7BF.7A021120--
6.
- Posted by Mathieu FERON <Mathieu.Feron at STERIA.FR> Mar 10, 1997
- 2063 views
Hello I would like information on Euphoria Is it a language , an EDI ? What's the purpose ? I've never heard of it before . Please to excuse such an ignorance )
7.
- Posted by dirac1973 at hotmail.com May 01, 2001
- 2041 views
I tried to write a little cgi in Euphoria.. but it doesn't work right i use OmniHttpd server (in win2k) and when i call the cgi.ex the result is generated in a dos shell and not in the browser... how can i send the output to the browser? the cgi is very very simple: puts(1,"Content-type: text/HTML\n\n") puts(1,"<title>CGI-TEST.EX</title>") puts(1,"<html>") puts(1,"<body>") puts(1,"<H3>") puts(1,"Euphoria CGI Example:</H3>") Thanks
8.
- Posted by George Papadopoulos <georgp at otenet.gr> May 08, 2001
- 2091 views
Does anybody knows how to call a dll routine from asm? Dll has been opened from Euphoria, so i have an address. I know the offset of the routine from PE header of the file. I think Address + Offset falls on start of the routine but the only thing i'm sure is that i'm full of invalid page faults.
9. Re:
- Posted by George Papadopoulos <georgp at otenet.gr> May 09, 2001
- 2062 views
Matthew, it works, with some difference. I didn't opened the dll using LoadLibrary but with the standard Euphoria way, so: dll_handle=3DGetModuleHandleA("dll_name") address=3DGetProcAddress(dll_handle,"function_name") pointer=3Dallocate(4) poke4(pointer,address) -- asm code: pusha push param_z ........ push param_a call near dword ptr [pointer] popa ret=20 Used CALL NEAR (#FE, #10,...) not CALL FAR (#FF,#15,...)=20 Thank you all -George Sorry for the blank header, i just forgot to write something.
10. Re:
- Posted by George Papadopoulos <georgp at otenet.gr> May 09, 2001
- 2012 views
Matthew, it works, with some difference. I didn't opened the dll using LoadLibrary but with the standard Euphoria way, so: dll_handle=3DGetModuleHandleA("dll_name") address=3DGetProcAddress(dll_handle,"function_name") pointer=3Dallocate(4) retpointer=3Dallocate(4) poke4(pointer,address) -- asm code: pusha push param_z ........ push param_a call near dword ptr [pointer] mov [retpointer], eax popa ret=20 Used CALL NEAR (#FE, #10,...) not CALL FAR (#FF,#15,...)=20 Thank you all -George Sorry for the blank header, i just forgot to write something.
11.
- Posted by Valerio Blanco <vblanco at MAIL.NEXUS.IT> Apr 09, 1997
- 2037 views
------=_NextPart_000_01BC44E5.E44A37C0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable unsubscribe ------=_NextPart_000_01BC44E5.E44A37C0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML 3.2//EN"> <HTML> <HEAD> <META content=3Dtext/html;charset=3Diso-8859-1 = http-equiv=3DContent-Type> <HTML><META content=3D'"Trident 4.71.0544.0"' name=3DGENERATOR> </HEAD> <BODY> <P><FONT face=3DArial size=3D2>unsubscribe</FONT> <P><FONT face=3DArial size=3D2></FONT> </P> ------=_NextPart_000_01BC44E5.E44A37C0--
12.
- Posted by Mike Fowler <stoner at NELSUN.GEN.NZ> Apr 15, 1997
- 2050 views
hi all im having a bit of trouble... i am writing a programme that has mouse buttons in it, and the x and y co-ord's of the buttons are stored in the sequence mb like: mb = append(mb, {x1, y1, x2, y2, "button_name", button_signature} so when the user clicks the mouse, it quickly searches to see if that mouse click was in the area specified in mb[1] (or mb[whatever]) that's all okay, BUT... if I try: mb = {} i get an error and it wont do it. Any ideas?? Thanks :) Mike Fowler - mike.fowler at nelsun.gen.nz o__ --- _,>/'_ --- (_) \(_) --- Tips for the month: Bill your dentist for your time in surgery.
13.
- Posted by David Alan Gay <moggie at INTERLOG.COM> Apr 15, 1997
- 2060 views
> > i am writing a programme that has mouse buttons in it, and the x and y > co-ord's of the buttons are stored in the sequence mb like: > > mb = append(mb, {x1, y1, x2, y2, "button_name", button_signature} > > so when the user clicks the mouse, it quickly searches to see if that > mouse click was in the area specified in mb[1] (or mb[whatever]) > > that's all okay, BUT... if I try: > > mb = {} > > i get an error and it wont do it. Any ideas?? > > Thanks :) > I'm not too sure why that is not working because you can append to the end of a null sequence. You shouldn't get an error message just because it's null. Include the contents of EX.ERR as an attachment to your next reply and let us see. Thanks David Gay http://www.interlog.com/~moggie/Euphoria A Beginner's Guide To Euphoria
14.
- Posted by Robert Moffat <R.Moffat at PEMBROKESHIRE.AC.UK> Apr 18, 1997
- 2073 views
Please take me off your mailing list NOW
15.
- Posted by Jvrgen Armas Strvmberg <j.stromberg at MBOX300.SWIPNET.SE> Apr 18, 1997
- 2078 views
- Last edited Apr 19, 1997
Robert Moffat wrote: >=20 > ---------------------- Information from the mail header ---------------= -------- > Sender: Euphoria Programming for MS-DOS <EUPHORIA at MIAMIU.ACS.MUOH= IO.EDU> > Poster: Robert Moffat <R.Moffat at PEMBROKESHIRE.AC.UK> > Organization: Pembrokeshire College > -----------------------------------------------------------------------= -------- >=20 > Please take me off your mailing list NOW I can=B4t, sorry!
16.
- Posted by Robert Moffat <R.Moffat at PEMBROKESHIRE.AC.UK> Apr 21, 1997
- 2059 views
Take me off your mailing list
17.
- Posted by Jim Roberts <jhroberts1 at JUNO.COM> Nov 01, 1998
- 2043 views
- Last edited Nov 02, 1998
I am using wait_key to enter a number value from the keyboard. i = wait_key() I then use i as follows: for j = 1 to i do For some unknown reason the loop does not end on the number I keyed in which should be the value of i. For example, I might key in 5 and the program aborts when j reachs 11 or some other number greater than 5.. Is there any particular way I should initiate i such as an object or integer or atom? Thanks, Jim Roberts
18.
- Posted by Mathew Hounsell <mat.hounsell at MAILEXCITE.COM> Nov 02, 1998
- 2234 views
- Last edited Nov 03, 1998
[ DOS32LIB ] Faster code won't be bad. It run's okay, but you are creating graphic intensive demos. Perhaps it would be easier to create it as an interface and leave the speed intensive stuff out. It runs OK on my machine a 486DX/2 66MHz 24Mb RAM but it is noticeablely slow. To get it past most users it has to do it in under 0.2sec. Windows/CDE maximise windows by drawing them so they are bigger than the screen. If the boder is 5 wide, draw it at -5. [ WIN32LIB ] Windows is C based it would be far nicer if it was treated as Euphoria. [ Visual WIN32LIB ] While I know it is for windows a port to code the DOS version would be nice. [ WatchDog ] It wasn't a bad idea Irv. I once used type to track a virtual cursor and if it moved of screen it scolled it. It might be more useful to do this with a window. After all a type can contain all sorts of code. -------------------- Sincerely, Mathew Hounsell Mat.Hounsell at MailExcite.Com _______________________________________________________ Get your free, private e-mail at http://mail.excite.com/
19.
- Posted by Pete Eberlein <xseal at HARBORSIDE.COM> Nov 17, 1998
- 2052 views
> I'm under the impression that Neil & Co. are aimed at the SVGA crowd, > while Dos32Lib targets VGA (mainly mode 18). I'm a bit leery about using > SVGA when it tends to choke up half the machines I use - because vendors > are too lazy to create SVGA drivers for DOS, relying on Win32 to supply > the drivers instead. Neil & Co.? You bet We're aimed at the SVGA crowd, despite the fact that Neil does indeed choke on some video boards. But when it does work, the 16M colors are nice, and the speed is to behold. I haven't been posting updates due to its current state of flux (partly due to Ralf's continued badgering "put this in! put that in!" and I'm trying very hard to make it compatible with as many cards as I can. Scitech's VBE drivers can sometimes help.. but not always. Also, Neil is also geared toward a gaming environment with sprites and all... haven't given too much thought to using it for a gui. I might take a crack at shoehorning Neil into Dos32Lib one of these days. > But I am trying to keep my options open by limiting the graphic calls to > a small part of the code - the renderXXXX routines. That way, if I decide to > change to another library (to run under Linux, for example), it > shouldn't be that hard to port the code. This sounds like another subtle hint for me to get off my butt and continue the Linux/Unix port of Euphoria... I thought the Java l&f was cool, sad to hear it got canned. Laters, _______ ______ _______ ______ [ _ \[ _ ][ _ _ ][ _ ] [/| [_] |[/| [_\][/ | | \][/| [_\] | ___/ | _] | | | _] [\| [/] [\| [_/] [\| |/] [\| [_/] [_____] [______] [_____] [______] xseal at harborside.com ICQ:13466657 http://www.harborside.com/home/x/xseal/euphoria/ (Right on!)
20.
- Posted by "Cuny, David" <David.Cuny at DSS.CA.GOV> Nov 17, 1998
- 2041 views
Pete Eberlein wrote: > You bet We're aimed at the SVGA crowd, despite the > fact that Neil does indeed choke on some video boards. > But when it does work, the 16M colors are nice, and the > speed is to behold. Ralf (Neil proselytizer that he is) sent me a copy of his 'bots game to look at. Zillions of colors does indeed look *very* nice, but I'm assuming that the two people who will end up using Dos32Lib will only really have VGA. > I might take a crack at shoehorning Neil into > Dos32Lib one of these days. Since most of the graphic routines can be emulated with pixel(), the only routines I really need are: - get_image() - pixel() and they are already supplied with Neil. So I guess I should include Neil right now. My only concern is that certain video cards might not be supported. But Neil supports *all* cards in VGA mode 18, right? If so, I'll go ahead and make the code changes. Urg... I'll have to see it the mouse code needs updating too. I'm using MIGHTY.E. > This sounds like another subtle hint for me to get off > my butt and continue the Linux/Unix port of Euphoria... Subtle? That doesn't sound like me at all. While I'm at it, I'd like to see a Mac version someday, too. > I thought the Java l&f was cool, sad to hear it got canned. Me, too - but if this project ever gets finished, I can always put the code back in. My first priority is to Get It Done in some useful manner. As it was, I was burning myself out on non-essentials. -- David Cuny
21.
- Posted by Mathew Hounsell <mat.hounsell at MAILEXCITE.COM> Nov 20, 1998
- 2042 views
Question : How do use the library for ternary trees in the archive. Question 2 : Does anyone know all the C escape characters. Jiri : Can you please add sub & super scripting to your fonts. RDS : I was using euphoria and I know people are going to disagree with me on this but I think the escape characters should be re-evaluated to be \n - OS specific New Line \l - Line Feed \r - Carriage Return. This would allow people to read an write text files using the same code for any OS. Note that euphoria strips out \r (or is it \l ) when reading so if your on Unix (or Mac) it would have to change it's approach or fake out the user. Either way things will act weird as unix is only \r and most people use \n. I also still think a string type is a good idea. -------------------- Sincerely, Mathew Hounsell Mat.Hounsell at MailExcite.Com _______________________________________________________ Get your free, private e-mail at http://mail.excite.com/
22.
- Posted by Mathew Hounsell <mat.hounsell at EXCITE.COM> Nov 29, 1998
- 2019 views
- Last edited Nov 30, 1998
Does any one know where I could find information on the TCL bytes codes. I have looked but haven't found. -------------------- Sincerely, Mathew Hounsell Mat.Hounsell at Excite.Com _______________________________________________________ Get your free, private e-mail at http://mail.excite.com/
23.
- Posted by Fernando Ortiz <fernando at rxp.com> Jan 05, 2001
- 2028 views
------=_NextPart_000_0000_01C07749.12E3A280 charset="iso-8859-1" X-MIME-Autoconverted: from 8bit to quoted-printable by smv18.iname.net id TAA03028 > An IDE? > Don't make me laugh! > I know VB's IDE and I can top it within half an hour!! > Yes, HALF AN HOUR! Did you read that? Half an hour of > coding and I have set up an IDE for Euphoria that tops > VB's. I have the code to do it, and the training. I > have a first-class Euphoria(++) IDE with built-in web > browser for docs and an interface to 70 C compilers > for translation. With a multi-platform GUI creation > tool plus library. ActiveX control support, App > wizards that range from Text Editor to 3D Game > producers. I sure could use that. I=92d pay GOOD money for it too! Fernando Ortiz ------=_NextPart_000_0000_01C07749.12E3A280 charset="iso-8859-1" <html xmlns:o=3D"urn:schemas-microsoft-com:office:office" = xmlns:w=3D"urn:schemas-microsoft-com:office:word" = xmlns:dt=3D"uuid:C2F41010-65B3-11d1-A29F-00AA00C14882" = xmlns=3D"http://www.w3.org/TR/REC-html40"> <head> <meta name=3D"Microsoft Theme 2.00" content=3D"test.htm 011"> <meta http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <meta name=3DProgId content=3DWord.Document> <meta name=3DGenerator content=3D"Microsoft Word 9"> <meta name=3DOriginator content=3D"Microsoft Word 9"> <link rel=3DFile-List href=3D"cid:filelist.xml at 01C07749.1193F100"> <!--[if gte mso 9]><xml> <o:OfficeDocumentSettings> <o:DoNotRelyOnCSS/> </o:OfficeDocumentSettings> </xml><![endif]--><!--[if gte mso 9]><xml> <w:WordDocument> <w:View>Normal</w:View> <w:Zoom>0</w:Zoom> <w:DocumentKind>DocumentEmail</w:DocumentKind> <w:EnvelopeVis/> </w:WordDocument> </xml><![endif]--> <style> <!-- /* Style Definitions */ p.MsoNormal, li.MsoNormal, div.MsoNormal {mso-style-parent:""; margin:0in; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} p.MsoAutoSig, li.MsoAutoSig, div.MsoAutoSig {margin:0in; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} span.EmailStyle15 {mso-style-type:personal-compose; color:black;} @page Section1 {size:8.5in 11.0in; margin:1.0in 1.25in 1.0in 1.25in; mso-header-margin:.5in; mso-footer-margin:.5in; mso-paper-source:0;} div.Section1 {page:Section1;} --> </style> </head> <body lang=3DEN-US style=3D'tab-interval:.5in'> <div class=3DSection1> <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> An IDE?</span></font><font size=3D2 = color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family:"Courier New"; <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> Don't make me laugh!</span></font><font = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family:"Courier New"; <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> I know VB's IDE and I can top it within = half an hour!!</span></font><font size=3D2 color=3Dblack face=3D"Courier = New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> Yes, HALF AN HOUR! Did you read that? = Half an hour of</span></font><font size=3D2 color=3Dblack face=3D"Courier = New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> coding and I have set up an IDE for = Euphoria that tops</span></font><font size=3D2 color=3Dblack face=3D"Courier = New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> VB's. I have the code to do it, and the training. I</span></font><font size=3D2 color=3Dblack face=3D"Courier = New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> have a first-class Euphoria(++) IDE with built-in web</span></font><font size=3D2 color=3Dblack face=3D"Courier = New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> browser for docs and an interface to 70 = C compilers</span></font><font size=3D2 color=3Dblack face=3D"Courier = New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> for translation. With a multi-platform = GUI creation</span></font><font size=3D2 color=3Dblack face=3D"Courier = New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> tool plus library. ActiveX control = support, App</span></font><font size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier = <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> wizards that range from Text Editor to = 3D Game</span></font><font size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier = <p class=3DMsoNormal><font size=3D2 color=3Dblack face=3D"Courier = New"><span style=3D'font-size:10.0pt;font-family:"Courier New";color:black'>> = producers.</span></font><font size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier = <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'>I sure could = use that. I’d pay GOOD money for it too!<o:p></o:p></span></font></span></p> <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'>Fernando = Ortiz<o:p></o:p></span></font></span></p> <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = </div> </html> ------=_NextPart_000_0000_01C07749.12E3A280--
24.
- Posted by Fernando Ortiz <fernando at rxp.com> Jan 06, 2001
- 2045 views
------=_NextPart_000_0002_01C07776.EEA968E0 charset="iso-8859-1" X-MIME-Autoconverted: from 8bit to quoted-printable by smv679-leg.mail.com id AAA11542 > Heh? > Allright allright.. > Maybe that's not such a bad idea... > > Well, I'll do it like this. > Anyone can ask what they would like to see written in > Euphoria. Anything goes. If the majority of users > think the same, then I will make that project. > > So go ahead, reply to this post with what you would > like to see written in Euphoria. How about that fancy VB style IDE you were saying you could do in =BD an = hour? I=92m not kidding. My company would pay good money for it even if it took= you a month. Hell, we=92d even market it for you since we have our own ad age= ncy www.dnjadvertising.com <http://www.dnjadvertising.com/> ). As long as it= is practical and you have no problem with signing non-disclosure contracts a= nd other legal crap, you could make some good money. Think about it and e-mail me directly. Fernando Ortiz Fernando at rxp.com <mailto:Fernando at rxp.com> ------=_NextPart_000_0002_01C07776.EEA968E0 charset="iso-8859-1" <html xmlns:o=3D"urn:schemas-microsoft-com:office:office" = xmlns:w=3D"urn:schemas-microsoft-com:office:word" = xmlns:dt=3D"uuid:C2F41010-65B3-11d1-A29F-00AA00C14882" = xmlns=3D"http://www.w3.org/TR/REC-html40"> <head> <meta name=3D"Microsoft Theme 2.00" content=3D"test.htm 011"> <meta http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <meta name=3DProgId content=3DWord.Document> <meta name=3DGenerator content=3D"Microsoft Word 9"> <meta name=3DOriginator content=3D"Microsoft Word 9"> <link rel=3DFile-List href=3D"cid:filelist.xml at 01C07776.EE19FA20"> <!--[if gte mso 9]><xml> <o:OfficeDocumentSettings> <o:DoNotRelyOnCSS/> </o:OfficeDocumentSettings> </xml><![endif]--><!--[if gte mso 9]><xml> <w:WordDocument> <w:View>Normal</w:View> <w:Zoom>0</w:Zoom> <w:DocumentKind>DocumentEmail</w:DocumentKind> <w:EnvelopeVis/> </w:WordDocument> </xml><![endif]--> <style> <!-- /* Style Definitions */ p.MsoNormal, li.MsoNormal, div.MsoNormal {mso-style-parent:""; margin:0in; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} a:link, span.MsoHyperlink {color:blue; text-decoration:underline; text-underline:single;} a:visited, span.MsoHyperlinkFollowed {color:purple; text-decoration:underline; text-underline:single;} p.MsoAutoSig, li.MsoAutoSig, div.MsoAutoSig {margin:0in; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} span.EmailStyle15 {mso-style-type:personal-compose; color:black;} @page Section1 {size:8.5in 11.0in; margin:1.0in 1.25in 1.0in 1.25in; mso-header-margin:.5in; mso-footer-margin:.5in; mso-paper-source:0;} div.Section1 {page:Section1;} --> </style> </head> <body lang=3DEN-US link=3Dblue vlink=3Dpurple = style=3D'tab-interval:.5in'> <div class=3DSection1> <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> Heh?</span></font><font size=3D2 = color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family:"Courier New"; <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> Allright allright..</span></font><font = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family:"Courier New"; <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> Maybe that's not such a bad = idea...</span></font><font size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier = <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>></span></font><font size=3D2 = color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family:"Courier New"; <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> Well, I'll do it like = this.</span></font><font size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier = <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> Anyone can ask what they would like to = see written in</span></font><font size=3D2 color=3Dblack face=3D"Courier = New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> Euphoria. Anything goes. If the majority = of users</span></font><font size=3D2 color=3Dblack face=3D"Courier = New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> think the same, then I will make that = project.</span></font><font size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier = <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>></span></font><font size=3D2 = color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family:"Courier New"; <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>> So go ahead, reply to this post with = what you would</span></font><font size=3D2 color=3Dblack face=3D"Courier = New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal><font size=3D2 color=3Dblack face=3D"Courier = New"><span style=3D'font-size:10.0pt;font-family:"Courier New";color:black'>> = like to see written in Euphoria.</span></font><font size=3D2 color=3Dblack = face=3D"Courier New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'>How about that = fancy VB style IDE you were saying you could do in =BD an hour? I’m not = kidding. My company would pay good money for it even if it took you a month. Hell, = we’d even market it for you since we have our own ad agency (<a href=3D"http://www.dnjadvertising.com/">www.dnjadvertising.com</a>). As = long as it is practical and you have no problem with signing non-disclosure = contracts and other legal crap, you could make some good = money.<o:p></o:p></span></font></span></p> <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'>Think about it = and e-mail me directly.<o:p></o:p></span></font></span></p> <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'>Fernando = Ortiz<o:p></o:p></span></font></span></p> <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><a font></span></p> <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = </div> </html> ------=_NextPart_000_0002_01C07776.EEA968E0--
25.
- Posted by Fernando Ortiz <fernando at rxp.com> Jan 08, 2001
- 1985 views
------=_NextPart_000_0000_01C07907.4D055160 charset="iso-8859-1" Does anyone have a Euphoria plug-in for PrimalScript? thnx ------=_NextPart_000_0000_01C07907.4D055160 charset="iso-8859-1" <html xmlns:o=3D"urn:schemas-microsoft-com:office:office" = xmlns:w=3D"urn:schemas-microsoft-com:office:word" = xmlns:dt=3D"uuid:C2F41010-65B3-11d1-A29F-00AA00C14882" = xmlns=3D"http://www.w3.org/TR/REC-html40"> <head> <meta name=3D"Microsoft Theme 2.00" content=3D"test.htm 011"> <meta http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <meta name=3DProgId content=3DWord.Document> <meta name=3DGenerator content=3D"Microsoft Word 9"> <meta name=3DOriginator content=3D"Microsoft Word 9"> <link rel=3DFile-List href=3D"cid:filelist.xml at 01C07907.4CA83D40"> <!--[if gte mso 9]><xml> <o:OfficeDocumentSettings> <o:DoNotRelyOnCSS/> </o:OfficeDocumentSettings> </xml><![endif]--><!--[if gte mso 9]><xml> <w:WordDocument> <w:View>Normal</w:View> <w:Zoom>0</w:Zoom> <w:DocumentKind>DocumentEmail</w:DocumentKind> <w:EnvelopeVis/> </w:WordDocument> </xml><![endif]--> <style> <!-- /* Style Definitions */ p.MsoNormal, li.MsoNormal, div.MsoNormal {mso-style-parent:""; margin:0in; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} p.MsoAutoSig, li.MsoAutoSig, div.MsoAutoSig {margin:0in; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} span.EmailStyle15 {mso-style-type:personal-compose; color:black;} @page Section1 {size:8.5in 11.0in; margin:1.0in 1.25in 1.0in 1.25in; mso-header-margin:.5in; mso-footer-margin:.5in; mso-paper-source:0;} div.Section1 {page:Section1;} --> </style> </head> <body lang=3DEN-US style=3D'tab-interval:.5in'> <div class=3DSection1> <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'>Does anyone = have a Euphoria plug-in for PrimalScript?<o:p></o:p></span></font></span></p> <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span = </div> </html> ------=_NextPart_000_0000_01C07907.4D055160--
26.
- Posted by renzo beggia <renzo.beggia at VSK.BE> Jan 26, 2001
- 2036 views
Hi, I'm trying to add the shell_notifyicon(x,NOTIFYICONDATA) function but i can't seem to create the typedef (C) NOTIFYICONDATA. Can someone help me. Also , i tried to add the FlashWindow(hwnd) function in win32lib.ew, i think it's exactly the same way as ShowWindow() . This doesn't seem to work either. (window caption bar does not flash .) Thanks to all that help me out. Renzo Beggia Email: renzo.beggia at vsk.be
27.
- Posted by Judith <camping at flash.net> Jan 27, 2001
- 2029 views
Have we completely lost the old messages from the RDS site we used to be able to search for answers before posting? I see this list limits us to a maximum of 100 messages using the web so it seems the same capability is lost unless we choose to get e-mail or digests -- or am I missing something? ____________________________________________________________ T O P I C A -- Learn More. Surf Less. Newsletters, Tips and Discussions on Topics You Choose. http://www.topica.com/partner/tag01
28.
- Posted by Ken Rhodes <kenrhodes at stealthport.com> Jan 29, 2001
- 2035 views
Well, it looks as though attachments will simply not be available should we elect mail only access... It also appears that we have lost an automated official archive. Though I suppose one could set up a web based email subscription to archive the messages easily enough. Oh, well... Ken Rhodes ____________________________________________________________ T O P I C A -- Learn More. Surf Less. Newsletters, Tips and Discussions on Topics You Choose. http://www.topica.com/partner/tag01
29.
- Posted by Euman <euman at bellsouth.net> Jan 29, 2001
- 2016 views
- Last edited Jan 30, 2001
------=_NextPart_000_003B_01C08A45.CEE0F640 charset="iso-8859-1" I guess Mike just doesnt know to whom he's playing with. ____________________________________________________________ T O P I C A -- Learn More. Surf Less. Newsletters, Tips and Discussions on Topics You Choose. http://www.topica.com/partner/tag01 ------=_NextPart_000_003B_01C08A45.CEE0F640 charset="iso-8859-1" <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <META content=3D"MSHTML 5.50.4611.1300" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>I guess Mike just doesnt know to whom = he's playing=20 with.</FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV> </DIV> T O P I C A -- Learn More. Surf Less. Newsletters, Tips and Discussions on Topics You Choose. <A HREF=3D"http://www.topica.com/partner/tag01">http://www.topica.com/partner/tag01</A></PRE> ------=_NextPart_000_003B_01C08A45.CEE0F640--
30.
- Posted by Travis Beaty <redneck_79019 at yahoo.com> Jan 31, 2001
- 2002 views
Hello y'all? Is there any way I can set the digests a little differently. Currently, it kicks out a digest after the tenth message, and as talktative as this bunch is, that's not much help. I'd like to have it set so that it kicks out one digest a day, like our dearly departed MUOHIO list server. Thanks! Happy Hunting! Travis Beaty, Claude, Texas. P.S. I'll be watching the topica web interface for about the next hour or so. ____________________________________________________________ T O P I C A -- Learn More. Surf Less. Newsletters, Tips and Discussions on Topics You Choose. http://www.topica.com/partner/tag01
31.
- Posted by Dave Probert <zingo at purpletiger.com> Jul 25, 2003
- 2040 views
Is there a core function to return a number from a sequence of atoms representing the ASCII codes of numbers? eg. need to get y = 205 number sequence xx xx = {50,48,53} -- 2,0,5 in ASCII atom y = ??????? Looked through the Docs and couldn't see an Eval() function!!
32. Re:
- Posted by 1evan at sbcglobal.net Jul 25, 2003
- 2028 views
include get.e sequence s s = value({50,48,53}) printf(1,"%d",s[2]) Dave Probert wrote: > > >Is there a core function to return a number from a sequence of atoms >representing the ASCII codes of numbers? > >eg. need to get y = 205 number > >sequence xx > xx = {50,48,53} -- 2,0,5 in ASCII > >atom y = ??????? > >Looked through the Docs and couldn't see an Eval() function!! > >--^---------------------------------------------------------------- >This email was sent to: 1evan at sbcglobal.net > > >TOPICA - Start your own email discussion group. FREE! > >
33. Re:
- Posted by "C. K. Lester" <cklester at yahoo.com> Jul 25, 2003
- 2044 views
> Is there a core function to return a number from a sequence of atoms > representing the ASCII codes of numbers? > > eg. need to get y = 205 number > > sequence xx > xx = {50,48,53} -- 2,0,5 in ASCII > > atom y = ??????? y = xx[1] -- y now equals '50' y = xx[2] -- y now equals '48' y = xx[3] -- y now equals '53'
34. Re: Re:
- Posted by "C. K. Lester" <cklester at yahoo.com> Jul 25, 2003
- 2022 views
> > Is there a core function to return a number from a sequence of atoms > > representing the ASCII codes of numbers? > > > > eg. need to get y = 205 number > > > > sequence xx > > xx = {50,48,53} -- 2,0,5 in ASCII Remember also that xx = {50,48,53} is equal to xx = "205" > > > > atom y = ??????? > > y = xx[1] -- y now equals '50' > y = xx[2] -- y now equals '48' > y = xx[3] -- y now equals '53'
35. Re: Re:
- Posted by Sabal.Mike at notations.com Jul 25, 2003
- 2028 views
So to answer the original question, include get.e object yy yy = value(xx) if yy[1] = GET_SUCCESS then ? yy[2] * 2 -- prints 410 end if The value statement is what you need. See library.doc for more details. >>> cklester at yahoo.com 07/25/03 04:18PM >>> Remember also that xx = {50,48,53} is equal to xx = "205"
36. Re: Re:
- Posted by "C. K. Lester" <cklester at yahoo.com> Jul 25, 2003
- 2010 views
> > > Is there a core function to return a number from a sequence of atoms > > > representing the ASCII codes of numbers? > > > > > > eg. need to get y = 205 number > > > > > > sequence xx > > > xx = {50,48,53} -- 2,0,5 in ASCII oops. just realized what you wanted. heh. <cough> the function is value(). look it up in the manual. -- convert a sequence to a number object junk sequence x atom y x = {50,48,53} junk = value(x) y = junk[2]
37. Re:
- Posted by Euman <Euman at triad.rr.com> Jun 24, 2006
- 2040 views
- Last edited Jun 25, 2006
Euman wrote: > > On Sat, 2006-06-24 at 15:11 -0700, Sergio Gelli wrote: > > > > > Hi Euman: > > > > Thanks a lot for the attention, but, seems that I am not with luck. > > Please, looks at what the EFFM.exw happened when twirling: > > When I tried to expand drive C, the program failed. sees > > the error message. > > > > > > C:\11USRE\DIR\EFFM.exw:292 in function myalloc() > > A machine-level exception occurred during execution of this statement > > ... called from C:\11USRE\DIR\treeviews.ew:195 in function GetParentItem() > > ... called from C:\11USRE\DIR\EFFM.exw:969 in function WndProc() > > > > ^^^ call-back from Windows > > ... called from C:\11USRE\DIR\EFFM.exw:1201 in procedure WinMain() > > ... called from C:\11USRE\DIR\EFFM.exw:1205 > > --> see ex.err > > > > Perhaps I must come back toward win-95 ) > > But, I go to continue trying with the XP. > > > > As our friend Chris related, the function DIR() into > > a tine code, works fine, but crash into a longe code > > and depends on the position that this function is > > inside of program. > > > > > > Best Regards > > > > Srgio Gelli - Brasil > > Hello again, > > I can only assume that this is a very small issue in HeapCreate > > global atom pHeap > pHeap = c_func(xHeapCreate,{0,16384,0}) > > this is not large enough > try @ line:288 in effm.exw replacing 16384 w/ 32768 > > This increases the heaps initial buffer size > If this solves the issue for you please let me know. > > Nothing has changed with the call or parms to HeapAlloc since Win-95 per > <a > href="http://msdn.microsoft.com/library/en-us/memory/base/heapalloc.asp?frame=true">http://msdn.microsoft.com/library/en-us/memory/base/heapalloc.asp?frame=true</a> > so I have no reason to suspect function myalloc() is a problem. > > Regards, > Euman Please disregard that info as the last parm to HeapCreate is (0) so the heap is automatically expanded when needed. http://msdn.microsoft.com/library/default.asp?url=/library/en-us/memory/base/heapcreate.asp My next guess is that "atom buffer" in function GetParentItem() and each instance of "buffer" in function GetParentItem() needs to be renamed "gp_buffer" although Im not sure why. I have confirmed that effm2.exw does run on my copy of Win-XP_SP2 ! I could be more help if that demo wasnt 5+ years old and I no longer run or write programs for the M$-Platforms, only Linux. try it and see if Im correct... Regards, Euman
38. Re:
- Posted by Sergio Gelli <sergelli at uol.com.br> Jun 25, 2006
- 2044 views
Euman wrote: > > Euman wrote: > > > > On Sat, 2006-06-24 at 15:11 -0700, Sergio Gelli wrote: > > > > > > > > Hi Euman: > > > > > > Thanks a lot for the attention, but, seems that I am not with luck. > > > Please, looks at what the EFFM.exw happened when twirling: > > > When I tried to expand drive C, the program failed. sees > > > the error message. > > > > > > > > > C:\11USRE\DIR\EFFM.exw:292 in function myalloc() > > > A machine-level exception occurred during execution of this statement > > > ... called from C:\11USRE\DIR\treeviews.ew:195 in function GetParentItem() > > > ... called from C:\11USRE\DIR\EFFM.exw:969 in function WndProc() > > > > > > ^^^ call-back from Windows > > > ... called from C:\11USRE\DIR\EFFM.exw:1201 in procedure WinMain() > > > ... called from C:\11USRE\DIR\EFFM.exw:1205 > > > --> see ex.err > > > > > > Perhaps I must come back toward win-95 ) > > > But, I go to continue trying with the XP. > > > > > > As our friend Chris related, the function DIR() into > > > a tine code, works fine, but crash into a longe code > > > and depends on the position that this function is > > > inside of program. > > > > > > > > > Best Regards > > > > > > Srgio Gelli - Brasil > > > > Hello again, > > > > I can only assume that this is a very small issue in HeapCreate > > > > global atom pHeap > > pHeap = c_func(xHeapCreate,{0,16384,0}) > > > > this is not large enough > > try @ line:288 in effm.exw replacing 16384 w/ 32768 > > > > This increases the heaps initial buffer size > > If this solves the issue for you please let me know. > > > > Nothing has changed with the call or parms to HeapAlloc since Win-95 per > > <a > > href="http://msdn.microsoft.com/library/en-us/memory/base/heapalloc.asp?frame=true">http://msdn.microsoft.com/library/en-us/memory/base/heapalloc.asp?frame=true</a> > > so I have no reason to suspect function myalloc() is a problem. > > > > Regards, > > Euman > > Please disregard that info as the last parm to HeapCreate is (0) so the heap > > is automatically expanded when needed. > <a > href="http://msdn.microsoft.com/library/default.asp?url=/library/en-us/memory/base/heapcreate.asp">http://msdn.microsoft.com/library/default.asp?url=/library/en-us/memory/base/heapcreate.asp</a> > > My next guess is that "atom buffer" in function GetParentItem() and each > instance > of "buffer" in function GetParentItem() needs to be renamed "gp_buffer" > although > Im not sure why. > > I have confirmed that effm2.exw does run on my copy of Win-XP_SP2 ! > I could be more help if that demo wasnt 5+ years old and I no longer > run or write programs for the M$-Platforms, only Linux. > > try it and see if Im correct... > > Regards, > Euman Hi again Euman I renamed "buffer" to "gp_buffer", but not work... Below the error reports: C:\11USRE\DIR\EFFM.exw:294 in function myalloc() A machine-level exception occurred during execution of this statement size = 256 mem = <no value> ... called from C:\11USRE\DIR\treeviews.ew:145 in function filltvitem() id = 1639430 Item = 6371360 mask = 1 state = 0 path = <no value> ... called from C:\11USRE\DIR\EFFM.exw:907 in function WndProc() hwnd = 984176 iMsg = -405 wParam = 0 lParam = 522132 i = <no value> j = <no value> k = <no value> j = <no value> ^^^ call-back from Windows
39.
h=domainkey-signature:received:received:message-id:date:from:to:subject:in-reply-to:mime-version:content-type:references; bh=x/dk/pEYxfeSc9EBlXWISt6paPoKDARCoYjcNTj+eBY=; b=k5WLcxVPh83Qp0obu6UHkpwTWA/jWPsW9lNT7Zlz57/1xxkU+ZfgB8ISGATD81a7bShxIeGPSLjwHf/l8de4VFXa91Oe+9eDlrsfUHQOuj0qkmOyikeaXHPFh9YR56hdk3oWxrWXnA7EDLRLjZfddEPjeQnzhKFRSV5YUNrticc= DomainKey-Signature: a=rsa-sha1; c=nofws; d=gmail.com; s=gamma; h=message-id:date:from:to:subject:in-reply-to:mime-version:content-type:references; b=Ui/eiJNtBj5mfYWmbL7bJeAzb4UeQy3KnwogGlcsq7qeYi0Ri1ujMJWqA9K8PKpmqoQAUDA6F7TYASSDtoadd5FMqdUMa5t9RElpAJzwZflmci5zLy8HPzejAqGap3ELO+PBZ7/qZ7LCBAMNJH16+p4VfZFkmUUeEOk+UAtmiOc= Received: by 10.141.74.17 with SMTP id b17mr367497rvl.144.1199882281727; Wed, 09 Jan 2008 04:38:01 -0800 (PST) Received: by 10.141.63.13 with HTTP; Wed, 9 Jan 2008 04:38:01 -0800 (PST) Message-ID: <7033b30801090438p7c9f5bb8o2fca4f0c9b454078 at mail.gmail.com> Date: Wed, 9 Jan 2008 10:38:01 -0200 From: "rlistas rlistas" <rlistas at gmail.com> To: EUforum at topica.com Subject: Re: Debian package In-Reply-To: <1294612036-1463792638-1199848071 at boing.topica.com> MIME-Version: 1.0 Content-Type: multipart/alternative; boundary="----=_Part_49307_16355102.1199882281735" References: <1294612036-1463792638-1199848071 at boing.topica.com> ------=_Part_49307_16355102.1199882281735 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 7bit Content-Disposition: inline Works perfect in Ubuntu 7.1, portuguese version ! Thanks Matt. Rubens On 1/9/08, Matt Lewis <guest at rapideuphoria.com> wrote: > > ============ The Euphoria Mailing List ============ > > > posted by: Matt Lewis <matthewwalkerlewis at gmai?.c?m> > > > I've put up another attempt at the .deb package. The errors should be > fixed, > and eushroud and eubind are now installed (though the eushroud/eubackend > combo > seems to still have some bugs). I've done a little bit of updating on the > man pages. > > Downloads here: > > > http://sourceforge.net/project/showfiles.php?group_id=182827&package_id=256863 > > Testing and comments appreciated. > > Matt > > --^---------------------------------------------------------------- > This email was sent to: rlistas at gmail.com > > EASY UNSUBSCRIBE click here: http://topica.com/u/?b1dd66.bP8OFm.cmxpc3Rh > Or send an email to: EUforum-unsubscribe at topica.com > > For Topica's complete suite of email marketing solutions visit: > http://www.topica.com/?p=TEXFOOTER > --^---------------------------------------------------------------- > > ------=_Part_49307_16355102.1199882281735 Content-Type: text/html; charset=ISO-8859-1 Content-Transfer-Encoding: 7bit Content-Disposition: inline Works perfect in Ubuntu 7.1, portuguese version !<br>Thanks Matt.<br><br>Rubens<br><br><div><span class="gmail_quote">On 1/9/08, <b class="gmail_sendername">Matt Lewis</b> <<a href="mailto:guest at rapideuphoria.com">guest at rapideuphoria.com </a>> wrote:</span><blockquote class="gmail_quote" style="margin-top: 0; margin-right: 0; margin-bottom: 0; margin-left: 0; margin-left: 0.80ex; border-left-color: #cccccc; border-left-width: 1px; border-left-style: solid; padding-left: 1ex"> ============ The Euphoria Mailing List ============<br><br><br>posted by: Matt Lewis <matthewwalkerlewis at gmai?.c?m><br><br><br>I've put up another attempt at the .deb package. The errors should be fixed,<br> and eushroud and eubind are now installed (though the eushroud/eubackend combo<br>seems to still have some bugs). I've done a little bit of updating on the<br>man pages.<br><br>Downloads here:<br><br><a href="http://sourceforge.net/project/showfiles.php?group_id=182827&package_id=256863"> http://sourceforge.net/project/showfiles.php?group_id=182827&package_id=256863</a><br><br>Testing and comments appreciated.<br><br>Matt<br><br>--^----------------------------------------------------------------<br>This email was sent to: <a href="mailto:rlistas at gmail.com">rlistas at gmail.com</a><br><br>EASY UNSUBSCRIBE click here: <a href="http://topica.com/u/?b1dd66.bP8OFm.cmxpc3Rh">http://topica.com/u/?b1dd66.bP8OFm.cmxpc3Rh</a><br>Or send an email to: <a href="mailto:EUforum-unsubscribe at topica.com"> EUforum-unsubscribe at topica.com</a><br><br>For Topica's complete suite of email marketing solutions visit:<br><a href="http://www.topica.com/?p=TEXFOOTER">http://www.topica.com/?p=TEXFOOTER</a><br>--^---------------------------------------------------------------- <br><br></blockquote></div><br> ------=_Part_49307_16355102.1199882281735--
40.
- Posted by math_ar01 <math_ar01 at GEOCITIES.COM> Jun 04, 1999
- 2021 views
------=_NextPart_000_00DC_01BEAE76.08132940 boundary="----=_NextPart_001_00DD_01BEAE76.08132940" ------=_NextPart_001_00DD_01BEAE76.08132940 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable UNSUBSCRIBE ------=_NextPart_001_00DD_01BEAE76.08132940 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type><BASE=20 href=3D"file://C:\Archivos de programa\Archivos comunes\Microsoft = Shared\Material de papeler=EDa\"> <STYLE>BODY { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } P.msoNormal { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } LI.msoNormal { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } PRE { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } BLOCKQUOTE { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } A { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } MENU { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } DD { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } UL { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } DT { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } DIR { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } ADDRESS { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } H1 { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } H2 { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } H3 { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } H4 { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } H5 { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } H6 { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } HR { COLOR: #000000; FONT-FAMILY: "Arial"; FONT-SIZE: 12pt; MARGIN-BOTTOM: = 0em; MARGIN-TOP: 0em } </STYLE> <META content=3D"MSHTML 5.00.2314.1000" name=3DGENERATOR></HEAD> <BODY background=3Dcid:00db01beae8f$2d573980$0100007f@crgseys = bgColor=3D#ffffff> ------=_NextPart_001_00DD_01BEAE76.08132940-- ------=_NextPart_000_00DC_01BEAE76.08132940 name="tech.gif"
42.
- Posted by Lewis Townsend <keroltarr at HOTMAIL.COM> Jun 28, 1999
- 2027 views
Pete or any NEIL guru, Here is a short program that I am writing. It is supposed to put 2 rectangles on the screen. The second one after a keypress. The first is red, the second blue. The first uses display_image () and the second uses pixel (). The two rectangles are supposed to be exactly the same in size, shape, and placement but different color. It doesn't seem to work right, can anyone tell me what I'm doing wrong? Lewis Townsend --HERE IT IS include neil.e include get.e procedure draw_rectangle (atom color, sequence ul, sequence dims, atom scr) if scr = screen then display_image (ul, repeat (repeat (color, dims[1]), dims[2])) else for line = 0 to dims[1]-1 do pixel (repeat (color, dims[1]), {ul[1], ul[2]}) end for end if end procedure if gfx_mode (640, 480, 16) then end if draw_rectangle (#FF0000, {100,50}, {50,100}, screen) if wait_key () then end if draw_rectangle (#0000FF, {100,50}, {50,100}, 1234) if wait_key () then end if restore_mode () _______________________________________________________________ Get Free Email and Do More On The Web. Visit http://www.msn.com
43.
- Posted by Grape_ Vine_ <g__vine at HOTMAIL.COM> Dec 09, 2000
- 2061 views
First, This function is broken, Any ideas why? I get the error Syntax error - expected to see =, +=, -=, *=, /= or &= Shuffling_Deck() = New_Deck() ^ Wich if i remove the () changes to Syntax error - expected to see possibly 'end', not a type atom temp, temp_1, card_2 ^ The only way to stop the errors is to rem out Shuffling_Deck() = New_Deck() Any ides??? Also, Is this the best way to swap two elements of an sequence? function shuffle() sequence Shuffling_Deck Shuffling_Deck() = New_Deck() atom temp, temp_1, card_2 for card = 1 to 52 do temp = Shuffling_Deck[card] card_2 = rand(52) temp_1 = Shuffling_Deck[card_2] Shuffling_Deck[1] = temp_1 Shuffling_Deck[card_2] = temp end for return Shuffling_Deck J Reeves Grape Vine ICQ# 13728824 _____________________________________________________________________________________ Get more from the Web. FREE MSN Explorer download : http://explorer.msn.com
44.
- Posted by Grape_ Vine_ <g__vine at HOTMAIL.COM> Dec 09, 2000
- 2097 views
Well i found the problem, But i have no clue what the problem is I swiched the order to sequence Shuffling_Deck atom temp, temp_1, card_2 Shuffling_Deck() = New_Deck() And it works just fine, Again, Anyone have any idea what is going on here?????? >From: Grape_ Vine_ <g__vine at HOTMAIL.COM> >Reply-To: Euphoria Programming for MS-DOS <EUPHORIA at LISTSERV.MUOHIO.EDU> >To: EUPHORIA at LISTSERV.MUOHIO.EDU >Date: Sat, 9 Dec 2000 15:30:58 -0800 > >First, This function is broken, Any ideas why? I get the error > >Syntax error - expected to see =, +=, -=, *=, /= or &= > Shuffling_Deck() = New_Deck() > ^ >Wich if i remove the () changes to > >Syntax error - expected to see possibly 'end', not a type > atom temp, temp_1, card_2 > ^ >The only way to stop the errors is to rem out > Shuffling_Deck() = New_Deck() > >Any ides??? > >Also, Is this the best way to swap two elements of an sequence? > > >function shuffle() > sequence Shuffling_Deck > Shuffling_Deck() = New_Deck() > atom temp, temp_1, card_2 > for card = 1 to 52 do > temp = Shuffling_Deck[card] > card_2 = rand(52) > temp_1 = Shuffling_Deck[card_2] > Shuffling_Deck[1] = temp_1 > Shuffling_Deck[card_2] = temp > end for >return Shuffling_Deck > > > >J Reeves >Grape Vine >ICQ# 13728824 > >>_____________________________________________________________________________________ >Get more from the Web. FREE MSN Explorer download : >http://explorer.msn.com _____________________________________________________________________________________ Get more from the Web. FREE MSN Explorer download : http://explorer.msn.com
45.
- Posted by jiri babor <jbabor at PARADISE.NET.NZ> Dec 10, 2000
- 2043 views
RTFM. I quote: "Variable declarations inside a subroutine must all appear at the beginning, *before* the executable statements of the subroutine." (my emphasis) jiri ----- Original Message ----- From: "Grape_ Vine_" <g__vine at HOTMAIL.COM> To: <EUPHORIA at LISTSERV.MUOHIO.EDU> Sent: Sunday, December 10, 2000 1:04 PM > Well i found the problem, But i have no clue what the problem is > I swiched the order to > > sequence Shuffling_Deck > atom temp, temp_1, card_2 > Shuffling_Deck() = New_Deck() > > And it works just fine, Again, Anyone have any idea what is going on > here?????? > > > > >From: Grape_ Vine_ <g__vine at HOTMAIL.COM> > >Reply-To: Euphoria Programming for MS-DOS <EUPHORIA at LISTSERV.MUOHIO.EDU> > >To: EUPHORIA at LISTSERV.MUOHIO.EDU > >Date: Sat, 9 Dec 2000 15:30:58 -0800 > > > >First, This function is broken, Any ideas why? I get the error > > > >Syntax error - expected to see =, +=, -=, *=, /= or &= > > Shuffling_Deck() = New_Deck() > > ^ > >Wich if i remove the () changes to > > > >Syntax error - expected to see possibly 'end', not a type > > atom temp, temp_1, card_2 > > ^ > >The only way to stop the errors is to rem out > > Shuffling_Deck() = New_Deck() > > > >Any ides??? > > > >Also, Is this the best way to swap two elements of an sequence? > > > > > >function shuffle() > > sequence Shuffling_Deck > > Shuffling_Deck() = New_Deck() > > atom temp, temp_1, card_2 > > for card = 1 to 52 do > > temp = Shuffling_Deck[card] > > card_2 = rand(52) > > temp_1 = Shuffling_Deck[card_2] > > Shuffling_Deck[1] = temp_1 > > Shuffling_Deck[card_2] = temp > > end for > >return Shuffling_Deck > > > > > > > >J Reeves > >Grape Vine > >ICQ# 13728824 > > > >_____________________________________________________________________ ________________ > >Get more from the Web. FREE MSN Explorer download : > >http://explorer.msn.com > > ______________________________________________________________________ _______________ > Get more from the Web. FREE MSN Explorer download : http://explorer.msn.com >
46.
- Posted by Andy Cranston <acransto at CISCO.COM> Dec 21, 2000
- 2045 views
--=====================_20275275==_.ALT The RDS website: http://www.rapideuphoria.com/ has two links on the main page for downloading a demo version of Euphoria. One for DOS/Windows and one for Linux. Both the downloads contain Euphoria itself plus documentation (a text based manual *and* a HTML based manual) and a range of example programs. Installation is quite straightforward - just take a little time to read the instructions first. The demo version is pretty much near the full registered version. It is not time limited and does not have any "nag" screens. That said there are good reasons to purchase the registered version but try it out first. That's the who point of the demo! The documentation is of a *very* high quality - it is one of the things that impressed me the most when getting to grips with the language: clear, well laid out and with lots of example code. Regards, Andy Cranston. At 08:14 21/12/2000 -0500, you wrote: > > Hi all, > > > > I've been watching this mail list for 2 days now and it appears to me that > even the "newbies" are much more advanced than I am. The last time I tried my > hand at programming, the VIC 20 was a hot item, basic was stored on a ROM, > and Bill Gates could actually count his money without employing 350 banks to > do it for him. Does anyone know if there is a reference manual to look up > commands, language syntax, and other relevant information with respect to the > euphoria pl? If I have to buy a license for euphoria to get a manual I will > but I'm afraid that after I get it, it may not be what I need after all. Is > there a downloadable version of it if it exists at all? > > > > Thanks for your time. > > Dr.X > > drx at cyberenhanced.com --=====================_20275275==_.ALT <html> The RDS website:<br> <br> <a href="http://www.rapideuphoria.com/" eudora="autourl">http://www.rapideuphoria.com/</a><br> <br> has two links on the main page for downloading a demo version of Euphoria. One for DOS/Windows and one for Linux. Both the downloads contain Euphoria itself plus documentation (a text based manual *and* a HTML based manual) and a range of example programs. Installation is quite straightforward - just take a little time to read the instructions first.<br> <br> The demo version is pretty much near the full registered version. It is not time limited and does not have any "nag" screens. That said there are good reasons to purchase the registered version but try it out first. That's the who point of the demo!<br> <br> The documentation is of a *very* high quality - it is one of the things that impressed me the most when getting to grips with the language: clear, well laid out and with lots of example code.<br> <br> Regards,<br> <br> Andy Cranston.<br> <br> At 08:14 21/12/2000 -0500, you wrote: <br> <br> <font face="Courier New, Courier" size=2><blockquote type=cite cite>Hi all,<br> </font><br> <br> <br> I've been watching this mail list for 2 days now and it appears to me that even the "newbies" are much more advanced than I am. The last time I tried my hand at programming, the VIC 20 was a hot item, basic was stored on a ROM, and Bill Gates could actually count his money without employing 350 banks to do it for him. Does anyone know if there is a reference manual to look up commands, language syntax, and other relevant information with respect to the euphoria pl? If I have to buy a license for euphoria to get a manual I will but I'm afraid that after I get it, it may not be what I need after all. Is there a downloadable version of it if it exists at all?<br> <br> <br> <br> Thanks for your time.<br> <br> Dr.X<br> <br> drx at cyberenhanced.com</blockquote><br> </html> --=====================_20275275==_.ALT--
47.
- Posted by Fernando Ortiz <fernando at rxp.com> Dec 21, 2000
- 2054 views
------=_NextPart_000_0000_01C06B26.0EC821A0 charset="iso-8859-1" Hi all, I've been watching this mail list for 2 days now and it appears to me that even the "newbies" are much more advanced than I am. The last time I tried my hand at programming, the VIC 20 was a hot item, basic was stored on a ROM, and Bill Gates could actually count his money without employing 350 banks to do it for him. Does anyone know if there is a reference manual to look up commands, language syntax, and other relevant information with respect to the euphoria pl? If I have to buy a license for euphoria to get a manual I will but I'm afraid that after I get it, it may not be what I need after all. Is there a downloadable version of it if it exists at all? Thanks for your time. Dr.X drx at cyberenhanced.com ------=_NextPart_000_0000_01C06B26.0EC821A0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <html xmlns:o=3D"urn:schemas-microsoft-com:office:office" = xmlns:w=3D"urn:schemas-microsoft-com:office:word" = xmlns:dt=3D"uuid:C2F41010-65B3-11d1-A29F-00AA00C14882" = xmlns=3D"http://www.w3.org/TR/REC-html40"> <head> <meta name=3D"Microsoft Theme 2.00" content=3D"test.htm 011"> <meta http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <meta name=3DProgId content=3DWord.Document> <meta name=3DGenerator content=3D"Microsoft Word 9"> <meta name=3DOriginator content=3D"Microsoft Word 9"> <link rel=3DFile-List href=3D"cid:filelist.xml at 01C06B26.0E0F8000"> <!--[if gte mso 9]><xml> <o:OfficeDocumentSettings> <o:DoNotRelyOnCSS/> </o:OfficeDocumentSettings> </xml><![endif]--><!--[if gte mso 9]><xml> <w:WordDocument> <w:View>Normal</w:View> <w:Zoom>0</w:Zoom> <w:DocumentKind>DocumentEmail</w:DocumentKind> <w:EnvelopeVis/> </w:WordDocument> </xml><![endif]--> <style> <!-- /* Style Definitions */ p.MsoNormal, li.MsoNormal, div.MsoNormal {mso-style-parent:""; margin:0in; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} p.MsoAutoSig, li.MsoAutoSig, div.MsoAutoSig {margin:0in; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} span.EmailStyle15 {mso-style-type:personal-compose; color:black;} @page Section1 {size:8.5in 11.0in; margin:1.0in 1.25in 1.0in 1.25in; mso-header-margin:.5in; mso-footer-margin:.5in; mso-paper-source:0;} div.Section1 {page:Section1;} --> </style> </head> <body lang=3DEN-US style=3D'tab-interval:.5in'> <div class=3DSection1> <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>Hi all,</span></font><font size=3D2 = color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family:"Courier New"; <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'><![if = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier = <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>I've been watching this mail list for 2 days = now and it appears to me that even the "newbies" are much more = advanced than I am. The last time I tried my hand at programming, the VIC 20 was a hot = item, basic was stored on a ROM, and Bill Gates could actually count his money without employing 350 banks to do it for him. Does anyone know if there = is a reference manual to look up commands, language syntax, and other = relevant information with respect to the euphoria pl? If I have to buy a license = for euphoria to get a manual I will but I'm afraid that after I get it, it = may not be what I need after all. Is there a downloadable version of it if it = exists at all?</span></font><font size=3D2 color=3Dblack face=3D"Courier = New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'><span style=3D"mso-spacerun: = yes"> </span></span></font><font size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier = <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>Thanks for your time.</span></font><font = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family:"Courier New"; <p class=3DMsoNormal = size=3D2 color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family: "Courier New";color:black'>Dr.X</span></font><font size=3D2 = color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family:"Courier New"; <p class=3DMsoNormal><font size=3D2 color=3Dblack face=3D"Courier = New"><span style=3D'font-size:10.0pt;font-family:"Courier = class=3DEmailStyle15><font color=3Dblack><o:p></o:p></font></span></p> </div> </html> ------=_NextPart_000_0000_01C06B26.0EC821A0--
48.
- Posted by Kat <gertie at PELL.NET> Dec 21, 2000
- 2018 views
On 21 Dec 2000, at 13:42, Andy Cranston wrote: > --=====================_20275275==_.ALT > > The RDS website: > > http://www.rapideuphoria.com/ > > has two links on the main page for downloading a demo version of Euphoria. > One for DOS/Windows and one for Linux. Both the downloads contain Euphoria > itself plus documentation (a text based manual *and* a HTML based manual) and > a range of example programs. Installation is quite straightforward - just > take a little time to read the instructions first. > > The demo version is pretty much near the full registered version. It is not > time limited and does not have any "nag" screens. That said there are good > reasons to purchase the registered version but try it out first. That's the > who point of the demo! > > The documentation is of a *very* high quality - it is one of the things that > impressed me the most when getting to grips with the language: clear, well > laid out and with lots of example code. There is also a refman.chm in the archives, i think. It's the RDS documentation in more easily searchable form. Kat > Regards, > > Andy Cranston. > > At 08:14 21/12/2000 -0500, you wrote: > > > > > Hi all, > > > > > > > > I've been watching this mail list for 2 days now and it appears to me that > > even the "newbies" are much more advanced than I am. The last time I tried > > my hand at programming, the VIC 20 was a hot item, basic was stored on a > > ROM, and Bill Gates could actually count his money without employing 350 > > banks to do it for him. Does anyone know if there is a reference manual to > > look up commands, language syntax, and other relevant information with > > respect to the euphoria pl? If I have to buy a license for euphoria to get a > > manual I will but I'm afraid that after I get it, it may not be what I need > > after all. Is there a downloadable version of it if it exists at all? > > > > > > > > Thanks for your time. > > > > Dr.X > > > > drx at cyberenhanced.com > > > > --=====================_20275275==_.ALT > > <html> > The RDS website:<br> > <br> > > <a href="http://www.rapideuphoria.com/" > eudora="autourl">http://www.rapideuphoria.com/</a><br> <br> has two links on > the main page for downloading a demo version of Euphoria. One for > DOS/Windows and one for Linux. Both the downloads contain Euphoria > itself plus documentation (a text based manual *and* a HTML based manual) and > a range of example programs. Installation is quite straightforward - > just take a little time to read the instructions first.<br> <br> The demo > version is pretty much near the full registered version. It is not time > limited and does not have any "nag" screens. That said there > are good reasons to purchase the registered version but try it out > first. That's the who point of the demo!<br> <br> The documentation is > of a *very* high quality - it is one of the things that impressed me the most > when getting to grips with the language: clear, well laid out and with lots of > example code.<br> <br> Regards,<br> <br> Andy Cranston.<br> <br> At 08:14 > 21/12/2000 -0500, you wrote: <br> <br> <font face="Courier New, Courier" > size=2><blockquote type=cite cite>Hi all,<br> </font><br> <br> <br> I've > been watching this mail list for 2 days now and it appears to me that even the > "newbies" are much more advanced than I am. The last time I tried my > hand at programming, the VIC 20 was a hot item, basic was stored on a ROM, and > Bill Gates could actually count his money without employing 350 banks to do it > for him. Does anyone know if there is a reference manual to look up commands, > language syntax, and other relevant information with respect to the euphoria > pl? If I have to buy a license for euphoria to get a manual I will but I'm > afraid that after I get it, it may not be what I need after all. Is there a > downloadable version of it if it exists at all?<br> <br> <br> <br> > Thanks for your time.<br> <br> Dr.X<br> <br> > drx at cyberenhanced.com</blockquote><br> </html> > > --=====================_20275275==_.ALT-- >
49.
- Posted by Fernando Ortiz <fernando at rxp.com> Dec 25, 2000
- 2099 views
------=_NextPart_000_0006_01C06E07.A966FFE0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable X-MIME-Autoconverted: from 8bit to quoted-printable by smtp-server.tampabay.rr.com id AAA03599 It IS a virus. I got it too but I didn=92t open it. Don=92t go blaming an= yone yet. Likely, the person who sent it to you does NOT KNOW HE SENT IT. It i= s automatically sent whenever some one opens it. Just delete it and if you know who sent it, just let them know that they are now infected. Dr.X drx at cyberenhanced.com <mailto:drx at cyberenhanced.com> -----Original Message----- From: Euphoria Programming for MS-DOS [mailto:EUPHORIA at LISTSERV.MUOHIO.EDU]On Behalf Of =F8=08 Sent: Saturday, January 22, 2000 3:14 AM To: EUPHORIA at LISTSERV.MUOHIO.EDU Subject: what the hell is it ! I got this email . It has no subject and it does not show where it came f= rom . It has an attached *.exe file named EGGKOKEG.exe . Is this a virus ? If= it is , I think I know who the f***er is who send it to me . So what is it ? Read ya ! Ferdinand Greyling ------=_NextPart_000_0006_01C06E07.A966FFE0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <html xmlns:v=3D"urn:schemas-microsoft-com:vml" = xmlns:o=3D"urn:schemas-microsoft-com:office:office" = xmlns:w=3D"urn:schemas-microsoft-com:office:word" = xmlns:dt=3D"uuid:C2F41010-65B3-11d1-A29F-00AA00C14882" = xmlns=3D"http://www.w3.org/TR/REC-html40"> <head> <meta name=3D"Microsoft Theme 2.00" content=3D"test.htm 011"> <meta http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <meta name=3DProgId content=3DWord.Document> <meta name=3DGenerator content=3D"Microsoft Word 9"> <meta name=3DOriginator content=3D"Microsoft Word 9"> <link rel=3DFile-List href=3D"cid:filelist.xml at 01C06E07.A9131380"> <!--[if gte mso 9]><xml> <o:OfficeDocumentSettings> <o:DoNotRelyOnCSS/> </o:OfficeDocumentSettings> </xml><![endif]--><!--[if gte mso 9]><xml> <w:WordDocument> <w:View>Normal</w:View> <w:Zoom>0</w:Zoom> <w:DocumentKind>DocumentEmail</w:DocumentKind> <w:EnvelopeVis/> </w:WordDocument> </xml><![endif]--> <style> <!-- /* Font Definitions */ @font-face {font-family:Tahoma; panose-1:2 11 6 4 3 5 4 4 2 4; mso-font-charset:0; mso-generic-font-family:swiss; mso-font-pitch:variable; mso-font-signature:16792199 0 0 0 65791 0;} /* Style Definitions */ p.MsoNormal, li.MsoNormal, div.MsoNormal {mso-style-parent:""; margin:0in; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} a:link, span.MsoHyperlink {color:blue; text-decoration:underline; text-underline:single;} a:visited, span.MsoHyperlinkFollowed {color:purple; text-decoration:underline; text-underline:single;} p.MsoAutoSig, li.MsoAutoSig, div.MsoAutoSig {margin:0in; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} span.EmailStyle15 {mso-style-type:personal-compose; color:black;} span.EmailStyle18 {mso-style-type:personal; mso-ansi-font-size:10.0pt; mso-ascii-font-family:Arial; mso-hansi-font-family:Arial; mso-bidi-font-family:Arial; color:navy;} @page Section1 {size:8.5in 11.0in; margin:1.0in 1.25in 1.0in 1.25in; mso-header-margin:.5in; mso-footer-margin:.5in; mso-paper-source:0;} div.Section1 {page:Section1;} --> </style> </head> <body lang=3DEN-US link=3Dblue vlink=3Dpurple = style=3D'tab-interval:.5in'> <div class=3DSection1> <p class=3DMsoNormal><span class=3DEmailStyle18><font size=3D2 = color=3Dnavy face=3DArial><span IS a virus. I got it too but I didn’t open it. Don’t go blaming = anyone yet. Likely, the person who sent it to you does NOT KNOW HE SENT IT. It is = automatically sent whenever some one opens it. Just delete it and if you know who sent = it, just let them know that they are now = infected.<o:p></o:p></span></font></span></p> <p class=3DMsoNormal><span class=3DEmailStyle18><font size=3D2 = color=3Dnavy face=3DArial><span bsp;<o:p></o:p></span></font></span></p> <p class=3DMsoNormal><span class=3DEmailStyle18><font size=3D2 = color=3Dnavy face=3DArial><span .X<o:p></o:p></span></font></span></p> <p class=3DMsoNormal><span class=3DEmailStyle18><font size=3D2 = color=3Dnavy face=3DArial><span ></span></font></span></p> <p class=3DMsoNormal><span class=3DEmailStyle18><font size=3D2 = color=3Dnavy face=3DArial><span bsp;<o:p></o:p></span></font></span></p> <p class=3DMsoNormal><span class=3DEmailStyle18><font size=3D2 = color=3Dnavy face=3DArial><span bsp;<o:p></o:p></span></font></span></p> <p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D2 = color=3Dblack face=3DTahoma><span = Message-----<br> <b><span style=3D'font-weight:bold'>From:</span></b> Euphoria = Programming for MS-DOS [mailto:EUPHORIA at LISTSERV.MUOHIO.EDU]<b><span = style=3D'font-weight:bold'>On Behalf Of </span></b>=F8=08<br> <b><span style=3D'font-weight:bold'>Sent:</span></b> Saturday, January = 22, 2000 3:14 AM<br> <b><span style=3D'font-weight:bold'>To:</span></b> = EUPHORIA at LISTSERV.MUOHIO.EDU<br> <b><span style=3D'font-weight:bold'>Subject:</span></b> what the hell is = it !</span></font><font color=3Dblack><span = /p> <p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span = color=3Dblack><span = /p> <p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D3 = color=3Dblack face=3DArial><span = style=3D'font-size:12.0pt;font-family:Arial;color:black'>I got this email . It has no subject and it does not show where it came from . = It has an attached *.exe file named EGGKOKEG.exe . Is this a virus ? If it is , = I think I know who the f***er is who send it to me . So what is it = ?</span></font><font color=3Dblack><span = /p> <p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span = color=3Dblack><span = /p> <p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span = style=3D'font-size:12.0pt;color:black'>Read ya !</span></font><font color=3Dblack><span = /p> <p class=3DMsoNormal style=3D'margin-left:.5in'><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span = style=3D'font-size:12.0pt;color:black'>Ferdinand Greyling</span></font><font color=3Dblack><span = style=3D'color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = </div> </html> ------=_NextPart_000_0006_01C06E07.A966FFE0--
50.
- Posted by Fernando Ortiz <fernando at rxp.com> Dec 25, 2000
- 1979 views
------=_NextPart_000_0000_01C06E7A.7CB86A60 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable X-MIME-Autoconverted: from 8bit to quoted-printable by smtp-server.tampabay.rr.com id NAA12144 > I've recieved it twice now. Both times this month. The last > was 20/12/2000. Both times in the account I get this list > sent to A quick look with a hex editor revealed MIME headers > and a link to GetModuleHandleA Needless to say I decided > against opening it, however I can find no reference to it > anywhere. It's not on the Symantec site, which is usually > pretty good. Anybody else come accross it? Upon viewing the file in notepad, one can see that it is a virus that propagates through the e-mailer installed on the victim=92s computer. The following was extracted using notepad: =ABO=E8=C9 _____ ^=E8} =8Bt$ _____ =E8t f=B8 =8Bt$ _____ =81=C6 =F8 =E8 =E8R "
51.
- Posted by Kat <gertie at PELL.NET> Dec 25, 2000
- 2000 views
On 25 Dec 2000, at 13:56, Fernando Ortiz wrote: > > I've recieved it twice now. Both times this month. The last > > was 20/12/2000. Both times in the account I get this list > > sent to A quick look with a hex editor revealed MIME headers > > and a link to GetModuleHandleA Needless to say I decided > > against opening it, however I can find no reference to it > > anywhere. It's not on the Symantec site, which is usually > > pretty good. Anybody else come accross it? I am now thinking i saw it in a virus name alias section in Norton2000 antivirus somewhere on the other puter, but since it's mouse is dead, i can't navigate there atm, even from this puter... > Upon viewing the file in notepad, one can see that it is a virus that > propagates through the e-mailer installed on the victim=92s computer. T= he > following was extracted using notepad: > > > =ABO=E8=C9 Hint: don't view MIME. If possible, view *only* in ascii mode, there is l= ess scripting involved. Of course, AOL users may argue that this will diminis= h the entertainment value of the email format,, well, for entertaiment, i w= atch tv.
55.
- Posted by sergio <sergelli at uol.com.br> Nov 09, 2001
- 2032 views
Hi all Is posible ex.exe file.ex be faster tham a file.exe ?? Why it occur ? sergio
56. Re:
- Posted by Igor Kachan <kinz at peterlink.ru> Nov 09, 2001
- 1989 views
Hi sergio, ---------- > ïÔ: sergio <sergelli at uol.com.br> > ëÏÍÕ: EUforum <EUforum at topica.com> > ôÅÍÁ: > äÁÔÁ: Friday, November 09, 2001 17:16 > > Hi all > > Is posible ex.exe file.ex be faster > tham a file.exe ?? > Why it occur ? > > sergio Imagine file.exe which you get with DJGPP, and DJGPP's **some** functions which are slower than same **some** functions of WATCOM, then file.exe you get with WATCOM will be faster, and ever ex.exe file.ex may be faster than that DJGPP's file.exe above. All these things about slower/faster require the very careful testing on monotask OS, for example in plain Dos-32 mode. Binded .exe, not compiled, may be 'more' fast than just ex.exe file.ex. Also these things are depending from the amount of free memory on your machine in the concrete session, and are random in the most cases. Try carefully another programs, not EU's, and you'll get same random results. You are testing the EU programs and your attention is concentrated on the EU's speed. Try for speed something *another* and you'll see same wonderful things around the speed, especially on Windows' back. Regards, Igor Kachan kinz at peterlink.ru
57. Re:
- Posted by Igor Kachan <kinz at peterlink.ru> Nov 10, 2001
- 1997 views
Hi sergio, ---------- > ïÔ: sergio <sergelli at uol.com.br> > ëÏÍÕ: EUforum <EUforum at topica.com> > ôÅÍÁ: RE: > äÁÔÁ: Saturday, November 10, 2001 13:27 > Igor Kachan wrote: > > Imagine file.exe which you get with DJGPP, > > and DJGPP's **some** functions which are > > slower than same **some** functions of WATCOM, > > then file.exe you get with WATCOM will be > > faster, and ever ex.exe file.ex may be > > faster than that DJGPP's file.exe above. > > > > All these things about slower/faster > > require the very careful testing on > > monotask OS, for example in plain Dos-32 > > mode. > > > > Binded .exe, not compiled, may be 'more' > > fast than just ex.exe file.ex. > > > > Also these things are depending from the > > amount of free memory on your machine in > > the concrete session, and are random in > > the most cases. > > > > Try carefully another programs, not EU's, > > and you'll get same random results. > > > > I don't understand, if is fastest when uses EX.EXE > why someone uses an EXE file? > > thanks > Sergio, EU's EXE is faster for the most part, but sometimes under *some* conditions, you may get interpreted EU's program which is faster than compiled EXE EU's program, so just try and choose the fastest variant for yourself. You can use interpreted or binded or compiled with 6 different C compilers EU programs for any taste. Speed will be different for each case. Again, just try & choose the fastest variant for your concrete conditions (machine, OS, RAM, etc...). And remember, the *single wrong* operator in the concrete code (in any programming language) can decrease speed in 10..20 times sometimes. The speed depends on programmer's ability very very much. So, the special standard benchmark programs exist for the speed tests of the machines, languages, compilers, interpreters and so on. Regards, Igor Kachan kinz at peterlink.ru
58.
- Posted by jpsas at peoplepc.com Nov 18, 2001
- 1963 views
This is a multi-part message in MIME format. ------=_NextPart_000_0007_01C17061.B8768C00 charset="iso-8859-1" ------=_NextPart_000_0007_01C17061.B8768C00 charset="iso-8859-1" <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=Content-Type content="text/html; charset=iso-8859-1"> <META content="MSHTML 5.50.4611.1300" name=GENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=#ffffff>
59.
- Posted by jbrown1050 at yahoo.com Nov 23, 2001
- 1993 views
On 0, aku at inbox.as wrote: > > > T> Bound programs are probably slightly more secure from crackers simply > T> because it's unusual.... > > > Rob, if the shrouded program decyrpted while running, can > crackers get the code (although variable names changed) by > reading directly from ex*.exe memory? It depends on how the program information is stored. Remember, sequences aren arrays. It is possible that Rob used a similar technique to store the program code, so that the data is not continuous. Non-continuous data would be harder to be read directly from memory. If, however, the data WAS stored in an array, then it would be easier to read the code. (Though still non-trivial, as you would need a powerful debugger and be a very good asm- or even machine-code reader, in order to find the data.) ========================================================= > > -- Linux User:190064 Linux Machine:84163 http://jbrown105.1avenue.com
60.
- Posted by Gordon Croll <ghcroll at BIT.NET.AU> Feb 12, 1998
- 1960 views
------=_NextPart_000_0014_01BD37DC.85C73640 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Signoff Euphoria ------=_NextPart_000_0014_01BD37DC.85C73640 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"> <HTML> <HEAD> <META content=3Dtext/html;charset=3Diso-8859-1 = http-equiv=3DContent-Type> <META content=3D'"MSHTML 4.72.2106.6"' name=3DGENERATOR> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT color=3D#000000 size=3D2>Signoff = ------=_NextPart_000_0014_01BD37DC.85C73640--
61.
- Posted by Lucius Hilley III <lhilley at CDC.NET> Feb 12, 1998
- 2025 views
---------------------------------------------------------- -- Lucius L. Hilley III -- lhilley at cdc.net -- -- of -- -- -- Hollow Horse Software -- http://www.cdc.net/~lhilley -- ---------------------------------------------------------- you want off then use http://frontpage.cdc.net/blackdog/listserv.htm You should have sent the message to LISTSERV at MIAMIU.ACS.MUOHIO.EDU not EUPHORIA at MIAMIU.ACS.MUOHIO.EDU ---------- From: Gordon Croll <ghcroll at BIT.NET.AU> To: Multiple recipients of list EUPHORIA <EUPHORIA at MIAMIU.ACS.MUOHIO.EDU> Subject: Date: Thursday, February 12, 1998 2:34 AM Signoff Euphoria
63.
- Posted by "Bernard W. Ryan" <xotron at bluefrognet.net> Nov 04, 2003
- 1991 views
>000000: 67 64 69 33 32 2E 64 6C 6C 00 00 00 00 00 00 00 gdi32.dll....... >000010: 03 00 00 00 01 00 00 00 2D 00 00 00 3C 00 00 00 ........-...<... >000020: 4A 00 00 00 00 00 00 00 00 00 04 34 04 47 65 74 J..........4.Get >000030: 53 74 6F 63 6B 4F 62 6A 65 63 74 00 53 74 72 65 StockObject.Stre >000040: 74 63 68 44 49 42 69 74 73 00 53 77 61 70 42 75 tchDIBits.SwapBu >000050: 66 66 65 72 73 00 00 00 00 00 00 00 00 00 00 00 ffers........... >000060 Mic: I still do not understand what the values from 0C through 29 (excluding the zero word) represent. Where is the 2A offset calculation placed in the header ? The reason I am trying to understand the format is that I would like to try adding to the code and a user has to be able to add more library functions. Is there any chance that you will include your library utility with your code with your next update of your code ? Bernie
64.
by TDIMSO15.backend.tdata.com.ar (iPlanet Messaging Server 5.2 Patch 1 (built Aug 19 2002)) with ESMTPA id <0HNW004LI142EZ at TDIMSO15.backend.tdata.com.ar> for EUforum at topica.com; Wed, 05 Nov 2003 13:43:17 -0300 (GMT) From: Guillermo Bonvehi <knixeur at speedy.com.ar> Subject: Re: Anyone want to write an "intelligent" mail filter? lla vundefinedundefined) Gecko/20030624 <2104666597-1463792638-1068001997 at boing.topica.com> <2005949051-1463792382-1068033513 at boing.topica.com> Hi Ricardo, I had the same problem and i always used http://www.mail2web.com/ and=20 worked right. It=B4s a free service to check your pop account and delete= =20 spam mails before downloading them. Hope this helps, Guillermo Bonvehi Ricardo Forno wrote: >=20 >=20 > Rob: > Is there some SPAM filter that not only identifies SPAM, but also avoids > downloading them from the server and deletes them in the server? > I'm asking this because I have a 56K connection, and SPAM consumes a big > part of connection time (I have to pay for it). > A few days ago, I had to resort to change my e-mail address from rforno t= o > rmforno, in view of increasing SPAM. > Regards.
65.
by inmta008.topica.com.topica.com with SMTP; 8 Nov 2003 21:20:20 -0000 (Rockliffe SMTPRA 5.3.4) with ESMTP id <B0000381941 at nocmailsvc001.allthesi= tes.org> for <EUforum at topica.com>; Sat, 8 Nov 2003 16:20:10 -0500 From: kbochert at copper.net Subject: Re: Remainder Priority: normal Content-description: Mail message body On 8 Nov 2003 at 15:06, Robert Craig wrote: > > > kbochert at copper.net wrote: > > A solution is to observe the bit pattern of the double generated by X/Y= > > and correct the case where it is a single bit less than a whole number.= > > > > In C: (and without sign stuff) > > double rem( double X, double Y) > > struct { > > double d; > > long L[2]; > > } z; > > z.d =3D X / Y; > > if (L[0] =3D=3D -1) { > > L[0] =3D 0; > > ++L[1]; > > } ; > > return X - floor (z) * Y > > } > > > > (Basically, if X is a multiple of Y, then the error case division produ= ces > > a double whose bit pattern looks something like: > > 0x0048FFFFFFFFFFFF ) > > > > This works very nicely on all cases I have tried where X is a multiple > > of Y, and at worst, decreases the accuracy of a very few remainders() > > ( 1 in 65k?) by a single bit. > > > > > > How do you do this in EU?? > > You have my source. In runtime.c, Dremainder(), > you can see that I just call the C fmod() function, > which I assume executes an Intel instruction. > I also have a cryptic comment "for now". I don't remember > why I said that. Maybe I thought there was a speed optimization > I could do. > > I never attempt to "fix" problems due to finite > floating-point accuracy. Most languages that I'm aware of > leave it to the programmer to handle situations like this. > > One exception is APL, which has a concept called > "comparison tolerance" or "fuzz". > In APL if two numbers are the same to about > 13 digits (as I recall) then APL considers them to be exactly equal. > The programmer can adjust this value up or down if he wants. > This fuzz value pervades the whole APL system. > I believe it also affects operations like floor and remainder, > just like your idea above, but the differences > can be much more than 1 bit. > > The fuzz factor idea solves a lot of problems, > but you can have weird cases where for example > A =3D B and B =3D C but A !=3D C > > I don't think computer science types > are happy with the idea. > > Regards, > Rob Craig > Rapid Deployment Software > http://www.RapidEuphoria.com > The only issue here seems to be that the modulo nature of the function, floor() in my code or the equivalent in the Intel 'repeated subtraction' algorithm, causes a situation in which an arbitrarily small inaccuracy can cause the result to 'toggle' to a very bad value. Intel's 80-bit internal precision causes this error to be a single bit. This method is a little different than a fuzz factor in that it only modifi= es a specific case. In rare circumstances, that modification can (I think) introduce a 1/2 bit error. Perhaps that 'for now' comment came about from seeing others problems with fmod(), and deciding that intel's algorithm was good enough, pending investigation. It should be pointed out that Intel does not actually supply a remainder function. There is an instruction FPREM (and FPREM1) that performs a partial remainder calculation. It is up to the user (the fmod() fct in th= e C library) to write code that compensates for this. Another interesting note from the manual is: "FPREM produces an exact result; the precision exception does not occur and the rounding control has no effect" My manual specifically mentions that an important use of FPREM is to reduce the arguments of periodic function like sine, and it provide status bits to aid that use. In that usage, this modulo problem is meaningless. It certainly looks like the standard C library provides a na=EFve implementation aimed at periodic functions. I can't prove that the algorithm above is 'correct', but it seems to very clearly produce better results. KtB
66.
- Posted by "Bernard W. Ryan" <xotron at bluefrognet.net> Nov 18, 2003
- 1971 views
Evan: Try this: dmScreenSettings = allocate(120) --DEVMODE structure mem_set(dmScreenSettings,0,120) --clear smScreenSettings poke(dmScreenSettings + 8,120) --dmSize poke4(dmScreenSettings + 16,or_all({DM_BITSPERPEL,DM_PELSWIDTH,DM_PELSHEIGHT})) -- dmFields poke4(dmScreenSettings + 100, 24) -- dmBitsPerPel poke4(dmScreenSettings + 104, 640) --dmPelWidth poke4(dmScreenSettings + 108, 480) --dmPelHeight if c_func(ChangeDisplaySettingsA,{dmScreenSettings,CDS_FULLSCREEN}) != DISP_CHANGE_SUCCESSFUL then retval = message_box("The requested fullscreen mode is not supported by\nyour video card. ", "Error", or_bits(MB_OK,MB_ICONSTOP)) end if Bernie
67. Re:
- Posted by Evan Marshall <1evan at sbcglobal.net> Nov 18, 2003
- 1969 views
Nope, that got me the same results that my numbers did. Bernie Ryan wrote: > > >Evan: > Try this: > >dmScreenSettings = allocate(120) --DEVMODE structure >mem_set(dmScreenSettings,0,120) --clear smScreenSettings >poke(dmScreenSettings + 8,120) --dmSize >poke4(dmScreenSettings + >16,or_all({DM_BITSPERPEL,DM_PELSWIDTH,DM_PELSHEIGHT})) -- dmFields >poke4(dmScreenSettings + 100, 24) -- dmBitsPerPel >poke4(dmScreenSettings + 104, 640) --dmPelWidth >poke4(dmScreenSettings + 108, 480) --dmPelHeight >if c_func(ChangeDisplaySettingsA,{dmScreenSettings,CDS_FULLSCREEN}) != >DISP_CHANGE_SUCCESSFUL then > retval = message_box("The requested fullscreen mode is not >supported by\nyour video card. ", "Error", or_bits(MB_OK,MB_ICONSTOP)) >end if > >Bernie > >
68.
- Posted by <crylex at totalise.co.uk> Nov 20, 2003
- 1986 views
Hi I need the clib.e in order to run the openGL demo by Daniel Kluss Anyone know where to get it, or can you email me a copy please. Ta Chris ---- Message sent via Totalise Webmail - http://www.totalise.co.uk/
69. Re:
- Posted by Evan Marshall <1evan at sbcglobal.net> Nov 20, 2003
- 1970 views
You may also want to check out http://nehe.gamedev.net/ . I've made quite a few Euphoria ports of the OpenGL lessons there. Chris Burch wrote: > > > Hi > > I need the clib.e in order to run the openGL demo by Daniel Kluss > > Anyone know where to get it, or can you email me a copy please. > > Ta > > Chris > > > ---- Message sent via Totalise Webmail - http://www.totalise.co.uk/ > > > > TOPICA - Start your own email discussion group. FREE! > >
70.
- Posted by Undetermined origin c/o LISTSERV administrator Mar 08, 2000
- 1986 views
--=====================_4379845==_.ALT Joel H. Crook<br> <br> "<b><i>A Strong house is built upon a strong foundation. What are your beliefs built upon</b></i>?"<br> <div align="right"> -- "The Book of Reminders"</blockquote><br></x-html> Joel H. Crook Manager, Information Services Certified Novell Administrator Microsoft Certified Professional, OS Specialist Kellogg & Andelson Accountancy Corp. 14724 Ventura Blvd. 2nd Floor Sherman Oaks, CA 91403 (818) 971-5100 --=====================_4379845==_.ALT <html><div>Joel H. Crook<br></div> <div><br></div> <div>&quot;<b><i>A Strong house is built upon a strong foundation. What are</div> <div>your beliefs built <div><div align="right"></div> &nbsp; -- &quot;The Book of <br> Joel H. Crook<br> <br> Manager, Information Services<br> <font size=1>Certified Novell Administrator<br> Microsoft Certified Professional, OS Specialist<br> <br> </font><b>Kellogg & Andelson Accountancy Corp.<br> </b><font size=1>14724 Ventura Blvd. 2nd Floor<br> Sherman Oaks, CA 91403<br> (818) 971-5100<br> </font></html> --=====================_4379845==_.ALT--
71.
- Posted by Michael Nelson <mike-nelson-ODAAT at WORLDNET.ATT.NET> Mar 14, 2000
- 1974 views
- Last edited Mar 15, 2000
This is version 1.2b of Object Euphoria--I fixed a bug in delete(). In making the optimizations for v1.2 I inadventantly omitted the code which destroyes the internal representation of a deleted eobject--this has been corroected. This can be listed as "minor bug fix". -- Mike Nelson
72.
- Posted by Michael Nelson <mike-nelson-ODAAT at WORLDNET.ATT.NET> Mar 26, 2000
- 1984 views
Skoda wrote: > does anybody have the function that converts sequences with many other > sequences under it, and sequences under it, into one sequence which has > just atoms(=string) > i have tried to write such function but it would be quite complicated > because there can be unlimited number of sequences under sequences... --Warning untested code: function sequence_to_string(sequence s) sequence rs rs={} for i=1 to length(s) do if atom(s[i]) then rs&=s[i] else rs&=sequence_to_string(s[i]) end if end for return rs end function -- Mike Nelson
73.
- Posted by Nick Johnson <arachnid at MAD.SCIENTIST.COM> Mar 26, 2000
- 1948 views
- Last edited Mar 27, 2000
Michael Nelson wrote: > Skoda wrote: > > > does anybody have the function that converts sequences with many other > > sequences under it, and sequences under it, into one sequence which has > > just atoms(=string) > > i have tried to write such function but it would be quite complicated > > because there can be unlimited number of sequences under sequences... > > --Warning untested code: > > function sequence_to_string(sequence s) > sequence rs > rs={} > for i=1 to length(s) do > if atom(s[i]) then > rs&=s[i] > else > rs&=sequence_to_string(s[i]) > end if > end for > return rs > end function > > -- Mike Nelson Noooooooooooo! You got there first! Not fair! I was looking forward to this!! Nick
74.
- Posted by Michael Nelson <mike-nelson-ODAAT at WORLDNET.ATT.NET> Mar 26, 2000
- 1967 views
Nick, I got the code but you had a good explanation of recursion--and you hadn't seen my code. Looks like shared honors to me! -- Mike
75.
- Posted by dmccu at connect.ab.ca Sep 09, 2001
- 1946 views
Hi Everyone, I am new to Euphoria and I have been working with it for just a few weeks. I like it so far, but there are a few small issues I have. First of all, the windows version opens up in what looks like a DOS box, and when using the debugger looking at my variables I only get about the first 15 characters of my string. I bring in a line at a time of a text file and at times I am modifying towards the end of the string which is quite often much larger than 15 characters and I can't see what it is doing. Is there a plan to make the windows version a fully windows program with a nice GUI with the ability to watch the full variables no matter how long they are? On the plus side I like the way the language uses libraries. There are many features that aren't in the main version but somewhere someone has written a library for. I was wishing it had regular expression search and replace and lo and behold I went to the archive and there it was. This happened with a few other features as well. Thanks for your time, Dan
76.
- Posted by brian_keene at yahoo.com Sep 10, 2001
- 1964 views
Hi All: Can anyone tell me how I would go about changing the DNS server's IP address on either a Win2K or Win9x PC programmatically? That is to say, what registry key, or whatever would/could I change to set up on a PC with dial up networking the DNS servers IP address? It seems that several ISPs out there (AOL being 1 of the biggest offenders) do not set the IP address for a DNS server when a person dials up & logs into the internet. They are doing name resolution in some other way & not setting the DNS's IP address like good little boys & girls. All suggestions greatly appreciated. Regards Brian Keene
77. Re:
- Posted by Robert Craig <rds at RapidEuphoria.com> Sep 10, 2001
- 1952 views
Dan writes: > Is there a plan to make the windows version a fully > windows program with a nice GUI with the ability to > watch the full variables no matter how long they are? Yes, I'd like to do that eventually. For the time being it's easier to support the identical trace/debug facility on all 3 platforms. Currently 20 characters are allocated at the bottom of the screen for displaying each atom variable, and 80 characters for each sequence. To see more, your program will have to display the variable using maybe the print command: ? myvar You can also use the ! command in the trace facility to dump all the variables, and see much more of each sequence. Regards, Rob Craig Rapid Deployment Software http://www.RapidEuphoria.com
78. Re:
- Posted by Kat <gertie at PELL.NET> Sep 10, 2001
- 1932 views
On 10 Sep 2001, at 9:06, brian_keene at yahoo.com wrote: > > Hi All: > Can anyone tell me how I would go about changing the DNS server's IP > address on either a Win2K or Win9x PC programmatically? That is to > say, what registry key, or whatever would/could I change to set up on > a PC with dial up networking the DNS servers IP address? > > It seems that several ISPs out there (AOL being 1 of the biggest > offenders) do not set the IP address for a DNS server when a person > dials up & logs into the internet. They are doing name resolution in > some other way & not setting the DNS's IP address like good little boys > & girls. Aohell double proxies their users' ip#s. That is to say, the number assigned to the user is essentially made up, and the ip# of the router the user is dialed into is also made up. You could be at 172.149.2.9 one day and 152.202.39.92 the next day. They aren't going to change this. AOhell bought a *small* ip block, relative to their userbase, and they spread it around the usa as needed, not one group of numbers to a city, or state. In an addy mask like 98CA275C.ipt.aol.com, the "98CA275C" is a hex translation of the ip#, 98.CA.27.5C , or 152.202.39.92. My suggestion is to get a real isp, not AOL or MSN or .NET. Both spend a great deal of time trying to lock in proprietary closed "standards". Kat
79.
- Posted by nb00mkn at student.hig.se Nov 30, 2002
- 1980 views
Hi! Problem: Suddenly ex.exe and can't find any of the files in c:\EUPHORIA\INCLUDE. My OS:winXP home edition... I have tried to play around with the EUDIR environment variable (in autoexec.nt, autoexec.bat and in the windows systems settings menu (sorry, don't know what the windows systems settings menu is really called in English but hopefylly, someone will get it anyway). If EUDIR is set at all three locations, the systems meny way seems to have the highest priority... Anyway that has not fixed my problem. If I put the needed include files in the same library as my euphoria program it works fine. Has anyone any idea of what I should do? help plase!/Martin Karlsson
80.
- Posted by Rafael Skovron <ballsy007 at YAHOO.COM> Jun 04, 1998
- 1955 views
Has anyone written a Euphoria application that can be used to make web pages more interactive? _________________________________________________________ DO YOU YAHOO!? Get your free @yahoo.com address at http://mail.yahoo.com
81.
- Posted by Jeff Zeitlin <jeff.zeitlin at MAIL.EXECNET.COM> Jun 12, 1998
- 1957 views
- Last edited Jun 13, 1998
I was playing with some ideas and writing code for them, when I realized that I had no function exactly equivalent to exp(x), which returns the famous "e" raised to the x power. Sure, this could be done by using the power() function and hard-coding "e" - but how far in do you remember "e"? So, I sat down with a piece of paper and a pen, and managed to derive the following function: global function exp(x) return power(n,x/log(n)) end function where n is _any_ positive number (strictly greater than zero) - except 1.0 exactly. If x is 1, you will get the value of "e" to the limits of Euphoria's precision in the power and log functions. -- Jeff Zeitlin jeff.zeitlin at mail.execnet.com
82.
- Posted by erez <goscar at IBM.NET> Jun 14, 1998
- 1934 views
- Last edited Jun 15, 1998
hello my name is erez and i'm new to this list. i had some problems in writing a batch file, it goes like this: i'm using ms-dos 6.2 ,i need to write a file whitch uses a for loop to = type all the txt in my disk on the screen using a pipeline. after every = screen is full i need to clrscr and pause i tried :::: for %%f in (*.txt) do type %%f | more pause cls it didnot stoped ,please tell me how to use the pipeline or the "><>>" = signes=20 thanx=20 =20 goscar at ibm.net
83.
- Posted by Terry Constant <constant at FLASH.NET> Jun 14, 1998
- 1932 views
erez wrote: > > i tried :::: for %%f in (*.txt) do type %%f | more > pause > cls > it didnot stoped ,please tell me how to use the pipeline or the "><>>" signes > thanx Erez, I stopped using Command.com many years ago because of things like this. I use 4Dos.com now. As I remember in Command.com, you can't do what you want to do. In 4Dos.com the line would be: for %f in (*.txt) do (type %f | more^ pause^ cls) Even better, in 4Dos you could use the following line instead: List *.txt This built in command does everything you described and gives you MANY more capabilities. If you are interested in 4Dos, visit their page and get a demo. http://www.jpsoft.com/ PS I have no interest in JP Software. My interest is helping users make better use of their computers. -- Terry Constant mailto:constant at flash.net
84.
- Posted by Jacques Deschenes <desja at GLOBETROTTER.QC.CA> Jun 14, 1998
- 1940 views
- Last edited Jun 15, 1998
At 22:47 14-06-98 +0300, you wrote: >hello >my name is erez and i'm new to this list. >i had some problems in writing a batch file, it goes like this: >i'm using ms-dos 6.2 ,i need to write a file whitch uses a for loop to type all >the txt in my disk on the screen using a pipeline. after every screen is full i >need to clrscr and pause >i tried :::: for %%f in (*.txt) do type %%f | more > pause > cls >it didnot stoped ,please tell me how to use the pipeline or the "><>>" signes >thanx > > goscar at ibm.net > You should put the 3 command in a separated file that you call for %%f in (*.txt) do call page.bat %%f page.bat will containt the following 4 lines @echo off type %1|more pause cls Jacques Deschenes Baie-Comeau, Quebec Canada desja at globetrotter.qc.ca
85.
X-MimeOLE: Produced By Microsoft Exchange V6.0.6249.0 Subject: can anyone help me please. Date: Wed, 1 Jun 2005 17:57:30 -0500 Message-ID: <CDC3E3C423472D4A8663242DE1AD5D0301291655 at demetexsf01.corp.deme= t.com.mx> X-MS-Has-Attach:=20 X-MS-TNEF-Correlator:=20 Thread-Topic: can anyone help me please. Thread-Index: AcVnDk1pXc/e5tLDEdmXqQBQ2gYPqg== From: "Rangel, Hebert Rogelio" <hrangel at demet.com.mx> To: <EUforum at topica.com> Return-Path: hrangel at demet.com.mx X-OriginalArrivalTime: 01 Jun 2005 22:57:30.0860 (UTC) FILETIME=[4A4322C0= :01C566FD] Hello can anyone please help me i=B4m want to make a mathematical operation= but i don=B4t know how to doit i been trying for 3 day now and i still can= =B4t do it i want to get the % of something, and once i have if i want to s= end it to a file, this is my code, please help e-mail me please hrangel@dem= et.com.mx tahks for you help
include Win32lib.ew without warning ---------------------------------------------------------------------------= ----- -- Window Window1 global constant Window1 = create( Window, "The Window", 0, Default, Defau= lt, 280, 80+ 19, 0 ) global constant OK = create( PushButton, "OK", Window1, 180, 20, 56, 28, = 0 ) global constant cantidad = create( EditText, "", Window1, 28, 24, 116, 20= , 0 ) ----- integer cienp object tom integer cinep2 procedure OK_onClick () cienp = open("\\ga.txt", "u") tom = getText(cantidad) cinep2 = (tom/10) puts(cienp, cinep2) flush(cienp) abort(1)=20 end procedure onClick[OK] = routine_id("OK_onClick") WinMain( Window1, Normal )
86.
X-MimeOLE: Produced By Microsoft Exchange V6.0.6249.0 Subject: ERROR, PLEASE HELP! Date: Fri, 3 Jun 2005 11:54:54 -0500 Message-ID: <CDC3E3C423472D4A8663242DE1AD5D0301291FB4 at demetexsf01.corp.deme= t.com.mx> X-MS-Has-Attach:=20 X-MS-TNEF-Correlator:=20 Thread-Topic: Digest for EUforum at topica.com, issue 4933 Thread-Index: AcVnYLANT40qpojRSby7gxOArRsKqgBDRv9Q From: "Rangel, Hebert Rogelio" <hrangel at demet.com.mx> To: <EUforum at topica.com> Return-Path: hrangel at demet.com.mx X-OriginalArrivalTime: 03 Jun 2005 16:54:54.0684 (UTC) FILETIME=[F765A1C0= :01C5685C] HELLO IT=B4S ME AGAIN ASKING FOR YOU HELP I BEEN TRYING TO ENTER A NUMBER A= ND SEND IT TO A FILE BUT INSTEAD IT WRITES LETTERS I TRY WHAT Don Cole SAY = IN A MESSAGE, BUT NOW WHEN I TYPE THE NUMBER IN THE EDIT-TEXT BOX AND PRESS= OK, IT SEND AN ERROR, THE ERROR IS THE NEXT ONE AND THE EUPHORIA CODE IS A= FTER THE ERROR, IN THE ERROR WHERE IT SAY tom2 is 25, I TYPED 25 IN THE EDI= TTEXT BOX IF YOU TYPE ANY OTHER NUMBER IN THE EDIT TEXT BOX, IT WILL CHANGE= THE 25 FOR THAT NUMBER. THANK FOR YOU HELP AND HOPE I CAN UNDERSTAND HOW TO DOIT. THANKS ------------------------------------ERROR------------------------ D:\euphoria\rfb\trytry.exw:32 in procedure OK_onClick() type_check failure, tom2 is 25 ... called from \EUPHORIA\include\Win32lib.ew:12185 in function wmCommand()= ... called from \EUPHORIA\include\Win32lib.ew:12429 in function WndProc() ^^^ call-back from Windows ... called from \EUPHORIA\include\Win32lib.ew:12911 in function SubProc() ^^^ call-back from Windows ... called from \EUPHORIA\include\Win32lib.ew:13074 in procedure WinMain() ... called from D:\euphoria\rfb\trytry.exw:41 --> see ex.err Press Enter... --------------------END OF THE ERROR CODE----------------------------------= ---- -----------------------------------EUPHORIA CODE---------------------------= ------
include Win32lib.ew without warning ---------------------------------------------------------------------------= ----- -- Window Window1 global constant Window1 = create( Window, "The Window", 0, Default, Defau= lt, 280, 80+ 19, 0 ) global constant OK = create( PushButton, "OK", Window1, 180, 20, 56, 28, = 0 ) global constant cantidad = create( EditText, "", Window1, 28, 24, 116, 20= , 0 ) ----------------------------------------------------------------------- global function getdec(sequence seq) --returns a decimal given a sequence atom de sequence value_string value_string=value(seq[1..length(seq)]) de = value_string[2] return de end function --------- integer cienp sequence tom sequence tom2 integer de sequence value_string procedure OK_onClick () cienp = open("\\ga.txt", "u") tom = getText(cantidad) value_string = value(tom[1..length(tom)]) de = value_string[2] tom2 = de puts(cienp, de) flush(cienp) abort(1)=20 end procedure onClick[OK] = routine_id("OK_onClick") WinMain( Window1, Normal )
87.
- Posted by "A.R.S. Alvin Koffman" <ka9qlq at HOTMAIL.COM> Jun 04, 2000
- 1997 views
------=_NextPart_000_004F_01BFCE5A.8F868700 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable I'm a beginner and this is my first program. Anybody want to pick at it = and help me do better? I also want to use the EX02.EXW example in Dave's = Winlib to port this code in to so it'll run in winders[8*9 As of yet I = don't know how. I'm also interested in using sprite graphics for dice. -- Dice version 3 by -- Joe Schwenk jschwenk at hsonline.net -- Alvin Koffman ka9qlq at hotmail.com -- with trace -- trace(1) include graphics.e -- include graphics include get.e -- include keyboard imput integer d1, d2, t, z, y, k -- declair some integers procedure winner() -- CALL FOR WINNER text_color(10) -- change text color puts (1, "\n\t*****WINNER!!*****\n\t*****WINNER!!*****") -- display = winner y =3D 0 -- set loop to off text_color (7) -- Set color back to normal puts (1, "\n") end procedure procedure throw_dice() -- call this to throw dice d1 =3D rand (6) -- throw dice d2 =3D rand (6) t =3D d1 + d2 -- total dice text_color (12) -- change text color puts (1, "\nDice 1 is: ") -- display results print (1, d1) puts (1, "\tDice 2 is: ") print (1, d2) puts (1, "\tDice total is: ") print (1, t) end procedure procedure looser() -- call for looser text_color (14) -- change text color if -- is it snake eyes? t =3D 2 then puts (1, "\n\t*****SNAKE EYES TURKEY!!*****\n\t*****SNAKE EYES = TURKEY!!*****") else text_color (5) puts (1, "\n\t*****YAH BIG LOOSER!!*****\n\t*****YAH BIG = LOOSER!!*****") end if y =3D 0 -- set loop to off text_color (7) -- Set color back to normal puts (1, "\n") end procedure procedure other_throws() -- keep trowing the dice while -- multipel throw loop y > 0 do throw_dice() -- next throw if -- check total for loose t =3D 2 then looser() end if if t =3D z -- check total for winner then winner() end if if -- check total for loose t =3D 7 then looser() end if if --check total for loose t =3D 11 then looser() end if end while -- end multipel throw loop end procedure -- end next throw procedure game()-- start game throw_dice() z =3D t -- keep to compair first throw with others if -- did you win? t =3D 7 then winner() end if if -- did you win? t =3D 11 then winner() end if if -- did you loose? t =3D 2 then looser() end if other_throws() -- no 7 or 11? throw on end procedure = ---------------------------------------------------------------------- -- start program. = ---------------------------------------------------------------------- y =3D 1 -- set other_throw loop to on k =3D 121 -- set while play loop to on while -- loop to check if you want to play k =3D 121 -- ASCII for y do puts (1, "Play?") -- ask question k =3D wait_key() -- wait for answer if -- if not "y" then end program k !=3D 121 then --set y to quit game y =3D 0 else -- if "y" then start a game y =3D 1 -- reset y and z for new game z =3D 0 game() -- start game end if end while -- end check =20 http://ka9qlq.tripod.com/ ------=_NextPart_000_004F_01BFCE5A.8F868700 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2614.3401" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#a8c8f0> <DIV><FONT face=3DArial size=3D2>I'm a beginner and this is my first = program.=20 Anybody want to pick at it and help me do better? I also want to use the = EX02.EXW example in Dave's Winlib to port this code in to so it'll run = in=20 winders[8*9 As of yet I don't know how. I'm also interested in using = sprite=20 graphics for dice.</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial=20 p; --=20 Dice version 3=20 by<BR> = -- Joe=20 Schwenk <A=20 -- Alvin Koffman <A=20 nbsp; =20 -- with=20 p; =20 -- trace(1)</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> include graphics.e -- = include=20 graphics<BR> include get.e -- = include=20 keyboard imput</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> integer d1, d2, t, z, y, = k --=20 declair some integers</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> procedure winner() = -- CALL FOR=20 WINNER<BR> text_color(10) -- = change=20 text color<BR> puts (1,=20 "\n\t*****WINNER!!*****\n\t*****WINNER!!*****") -- display=20 winner<BR> y =3D=20 0 -- set loop to=20 off<BR> text_color (7) -- Set color back to=20 normal<BR> puts (1, "\n")</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> end = procedure</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> procedure throw_dice() -- = call this to=20 throw dice</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> d1 =3D rand=20 (6) -- throw=20 dice<BR> d2 =3D rand (6)<BR> t =3D = d1 +=20 d2 -- total=20 dice<BR> text_color = (12) =20 -- change text color<BR> puts (1, "\nDice 1 is: ") -- = display=20 results<BR> print (1, d1)<BR> puts = (1,=20 "\tDice 2 is: ")<BR> print (1, = d2)<BR> puts=20 (1, "\tDice total is: ")<BR> print (1, t)</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> end = procedure</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> procedure looser() = -- call for=20 looser<BR> text_color (14) -- = change=20 text color<BR> =20 ; =20 -- is it snake eyes?<BR> t =3D=20 2<BR> = then<BR> =20 puts (1, "\n\t*****SNAKE EYES TURKEY!!*****\n\t*****SNAKE EYES=20 TURKEY!!*****")<BR> = else<BR> =20 text_color (5)<BR> puts (1, = "\n\t*****YAH=20 BIG LOOSER!!*****\n\t*****YAH BIG LOOSER!!*****")<BR> = end=20 if<BR> y =3D=20 =20 -- set loop to off<BR> text_color = (7) =20 -- Set color back to normal<BR> puts (1, = "\n")</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> end procedure</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> procedure other_throws() = -- keep=20 trowing the dice</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> =20 bsp; =20 -- multipel throw loop<BR> y >=20 0<BR> do</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> =20 throw_dice() -- = next=20 throw</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> =20 ; =20 -- check total for loose<BR> t =3D=20 2<BR> = then<BR> =20 looser()<BR> end if</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> if t =3D z -- = check total=20 for winner<BR> =20 then<BR> = winner()<BR> end=20 if</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> =20 if -- = check=20 total for loose<BR> t =3D=20 7<BR> = then<BR> =20 looser()<BR> end if</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> =20 if = --check=20 total for loose<BR> t =3D=20 11<BR> =20 then<BR> = looser()<BR> end=20 if</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> end=20 while -- end multipel throw = loop<BR> =20 end procedure -- end next throw</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> procedure game()-- start=20 game<BR> throw_dice()</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> z =3D=20 t -- keep to compair = first throw=20 with others<BR> =20 if -- = did you=20 win?<BR> t =3D = 7<BR> =20 then<BR> = winner()<BR> end=20 if</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> =20 if -- = did you=20 win?<BR> t =3D = 11<BR> =20 then<BR> winner()<BR> = end=20 if</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> =20 if -- = did you=20 loose?<BR> t =3D = 2<BR> =20 then<BR> = looser()<BR> end=20 if</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> other_throws() -- no 7 or = 11? throw=20 on</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> end procedure</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> =20 ----------------------------------------------------------------------<BR= > =20 -- start program.<BR> =20 ----------------------------------------------------------------------</F= ONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> y =3D=20 1 -- set = other_throw loop=20 to on<BR> k =3D = 121 -- set=20 while play loop to on</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> =20 while -- loop to = check if=20 you want to play<BR> k =3D=20 121 -- ASCII for=20 y<BR> do<BR> puts (1, "Play?") = -- ask=20 question<BR> k =3D wait_key() -- = wait for=20 answer<BR> =20 ; =20 -- if not "y" then end program<BR> k !=3D=20 121<BR> =20 then = --set y=20 to quit game<BR> y =3D 0<BR> =20 sp; =20 -- if "y" then start a game<BR> y =3D=20 1 -- = reset y=20 and z for new game<BR> z =3D=20 0<BR> =20 game() -- start=20 game<BR> end if<BR> end=20 while -- end=20 </FONT></DIV> <DIV><FONT face=3DArial size=3D2><A=20 ------=_NextPart_000_004F_01BFCE5A.8F868700--
88.
- Posted by =?iso-8859-1?B?CAg=?= <mwfch at MWEB.CO.ZA> Jun 13, 2000
- 1943 views
------=_NextPart_000_0037_01BFD529.AAA24580 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable This may sound like a stupid question but ...... HOW DA HELL DO YOU = PROGRAM THE KEABORD !!!! I just don`t understand . How do I program the = keabord so that when I press a key the computer know that it is the F = (or any other key ) and then somthing hapens like a bom expodes . In Basic all you = have to do is type INKEY =3D F ( or any other key ) . Please reply . Thanks . Ferdinand Greyling from Terminal Software ------=_NextPart_000_0037_01BFD529.AAA24580 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2614.3500" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>This may sound like a stupid question = but ......=20 HOW DA HELL DO YOU PROGRAM THE KEABORD !!!! I just don`t understand . = How=20 do I program the keabord so that when I press a key the computer = know that=20 it is the F (or any other</FONT></DIV> <DIV><FONT face=3DArial size=3D2>key ) and then somthing hapens like a = bom expodes .=20 In Basic all you have to do</FONT></DIV> <DIV><FONT face=3DArial size=3D2>is type INKEY =3D F ( or any other key = ) . Please=20 reply . Thanks .</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>Ferdinand Greyling</FONT></DIV> <DIV><FONT face=3DArial size=3D2>from</FONT></DIV> <DIV><FONT face=3DArial size=3D2>Terminal = ------=_NextPart_000_0037_01BFD529.AAA24580--
89.
- Posted by Mark Brown <mabrown at SENET.COM.AU> Jun 14, 2000
- 2010 views
- Last edited Jun 15, 2000
------=_NextPart_000_001C_01BFD64F.885E38E0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Hi Ferdinand I have always found the performance of Eu's "get_key" a bit lacking. It always seems to hit the performance of whatever I am trying to do. It also seems to buffer up and I couldn't find a way to stop that. (that may be my fault...) Under windows, I found the best solution was to use windows keyboard support. eg. include dll.e -- some constants for keys global constant VK_ESCAPE =3D #1B, VK_LEFT =3D #25, VK_UP =3D #26, VK_RIGHT =3D #27, VK_DOWN =3D #28 atom my_user32_dll my_user32_dll =3D open_dll("user32.dll") -- want this for windows = keyboard input! global constant GetAsyncKeyState =3D = and called something like.... if c_func(GetAsyncKeyState,{VK_LEFT}) then -- -- do stuff here end if if c_func(GetAsyncKeyState,{'Z'}) then -- -- do other stuff here end if I think the fact that you can do this sort of thing in Eu is another advantage it has over QBasic (and Liberty I think) Mark ----- Original Message -----=20 From: =08=08=20 To: EUPHORIA at LISTSERV.MUOHIO.EDU=20 Sent: Tuesday, June 13, 2000 6:52 This may sound like a stupid question but ...... HOW DA HELL DO YOU = PROGRAM THE KEABORD !!!! I just don`t understand . How do I program the = keabord so that when I press a key the computer know that it is the F = (or any other key ) and then somthing hapens like a bom expodes . In Basic all you = have to do is type INKEY =3D F ( or any other key ) . Please reply . Thanks . Ferdinand Greyling from Terminal Software ------=_NextPart_000_001C_01BFD64F.885E38E0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2314.1000" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT size=3D2>Hi Ferdinand</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2>I have always found the performance of Eu's = "get_key" a bit=20 lacking.</FONT></DIV> <DIV><FONT size=3D2>It always seems to hit the performance of whatever I = am trying=20 to</FONT></DIV> <DIV><FONT size=3D2>do. It also seems to buffer up and I couldn't find a = way to=20 stop that.</FONT></DIV> <DIV><FONT size=3D2>(that may be my fault...)</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2>Under windows, I found the best solution was to use=20 windows</FONT></DIV> <DIV><FONT size=3D2>keyboard support.</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2>eg.</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2>include dll.e</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2>-- some constants for keys<BR>global constant = VK_ESCAPE =3D=20 ; =20 VK_LEFT =3D=20 ; =20 VK_UP =3D=20 ; =20 VK_RIGHT =3D=20 ; =20 VK_DOWN =3D #28</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2><BR>atom my_user32_dll</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2>my_user32_dll =3D open_dll("user32.dll") -- want = this for=20 windows keyboard input!</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2>global constant GetAsyncKeyState =3D=20 IV> <DIV> </DIV> <DIV> </DIV> <DIV><FONT size=3D2>and called something like....</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2>if c_func(GetAsyncKeyState,{VK_LEFT}) = then</FONT></DIV> <DIV><FONT size=3D2> --</FONT></DIV> <DIV><FONT size=3D2> -- do stuff here</FONT></DIV> <DIV><FONT size=3D2>end if</FONT></DIV> <DIV><FONT size=3D2></FONT> </DIV> <DIV><FONT size=3D2>if c_func(GetAsyncKeyState,{'Z'}) then</FONT></DIV> <DIV><FONT size=3D2> --</FONT></DIV> <DIV><FONT size=3D2> -- do other stuff = here</FONT></DIV> <DIV><FONT size=3D2>end if</FONT></DIV> <DIV> </DIV> <DIV> </DIV> <DIV><FONT size=3D2>I think the fact that you can do this sort of thing = in Eu is=20 another</FONT></DIV> <DIV><FONT size=3D2>advantage it has over QBasic (and Liberty I=20 think)</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2>Mark</FONT></DIV> <DIV> </DIV> <BLOCKQUOTE=20 style=3D"BORDER-LEFT: #000000 2px solid; MARGIN-LEFT: 5px; MARGIN-RIGHT: = 0px; PADDING-LEFT: 5px; PADDING-RIGHT: 0px"> <DIV style=3D"FONT: 10pt arial">----- Original Message ----- </DIV> <DIV=20 style=3D"BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: = black"><B>From:</B>=20 <A href=3D"mailto:mwfch at MWEB.CO.ZA" = title=3Dmwfch at MWEB.CO.ZA>=08=08</A> </DIV> <DIV style=3D"FONT: 10pt arial"><B>To:</B> <A=20 href=3D"mailto:EUPHORIA at LISTSERV.MUOHIO.EDU"=20 title=3DEUPHORIA at LISTSERV.MUOHIO.EDU>EUPHORIA at LISTSERV.MUOHIO.EDU</A> = </DIV> <DIV style=3D"FONT: 10pt arial"><B>Sent:</B> Tuesday, June 13, 2000 = 6:52</DIV> <DIV><BR></DIV> <DIV><FONT face=3DArial size=3D2>This may sound like a stupid question = but ......=20 HOW DA HELL DO YOU PROGRAM THE KEABORD !!!! I just don`t understand . = How=20 do I program the keabord so that when I press a key the computer = know=20 that it is the F (or any other</FONT></DIV> <DIV><FONT face=3DArial size=3D2>key ) and then somthing hapens like a = bom expodes=20 . In Basic all you have to do</FONT></DIV> <DIV><FONT face=3DArial size=3D2>is type INKEY =3D F ( or any other = key ) . Please=20 reply . Thanks .</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>Ferdinand Greyling</FONT></DIV> <DIV><FONT face=3DArial size=3D2>from</FONT></DIV> <DIV><FONT face=3DArial size=3D2>Terminal=20 ------=_NextPart_000_001C_01BFD64F.885E38E0--
90.
- Posted by "Gerardo E. Brandariz" <gebrandariz at YAHOO.COM> Jun 16, 2000
- 2023 views
------=_NextPart_000_0306_01BFD736.FCA5E6C0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable On keyboard input: See get_key, wait_key, getc, and run key.bat. If you search for codes, = don't forget that key codes are one thing (they are the codes that = represent each keyboard key) and scan codes are another (the codes the = OS actually gets, including combinations with Ctrl, Shift and Alt (Meta, = if you do Linux). Also: the codes for the main keyboard numbers are not = the same as the codes for the numeric (or tenkey) pad. ---- This will tell you what key you pressed. include d:\euphoria\include\get.e -- wait_key atom kcmd while 1 do puts(1,"Press a key. End with Ctl-C.\n") kcmd =3D wait_key() printf(1,"You pressed a %d\n",kcmd) end while --- And this will act upon keypresses. sequence up_lst up_lst =3D {328, 56, 45, 60} -- up arrows, minus, < ........... kcmd =3D wait_key() if find(kcmd, up_lst) then -- user wants to go up, do something end if if (kcmd =3D 337 or kcmd =3D 51) then --- PgDn, do something end if if (kcmd =3D 304) then --- Alt-B, do something end if Good luck. Gerardo E. Brandariz ----- Original Message -----=20 From: =08=08=20 To: EUPHORIA at LISTSERV.MUOHIO.EDU=20 Sent: Tuesday, June 13, 2000 6:22 AM This may sound like a stupid question but ...... HOW DA HELL DO YOU = PROGRAM THE KEABORD !!!! I just don`t understand . How do I program the = keabord so that when I press a key the computer know that it is the F = (or any other key ) and then somthing hapens like a bom expodes . In Basic all you = have to do is type INKEY =3D F ( or any other key ) . Please reply . Thanks . Ferdinand Greyling from Terminal Software ------=_NextPart_000_0306_01BFD736.FCA5E6C0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2014.210" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT size=3D2>On keyboard input:</FONT></DIV> <DIV><FONT size=3D2></FONT> </DIV> <DIV><FONT size=3D2>See get_key, wait_key, getc, and run key.bat. If you = search=20 for codes, don't forget that key codes are one thing (they are the codes = that=20 represent each keyboard key) and scan codes are another (the codes the = OS=20 actually gets, including combinations with Ctrl, Shift and Alt (Meta, if = you do=20 Linux). Also: the codes for the main keyboard numbers are not the same = as the=20 codes for the numeric (or tenkey) pad.</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2>---- This will tell you what key you = pressed.</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2>include d:\euphoria\include\get.e -- = wait_key<BR>atom=20 kcmd</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2>while 1 do<BR> puts(1,"Press a key. End with=20 Ctl-C.\n")<BR> kcmd =3D wait_key()<BR> printf(1,"You pressed = a=20 %d\n",kcmd)<BR>end while</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2>--- And this will act upon keypresses.</FONT></DIV> <DIV> </DIV> <DIV><FONT size=3D2> sequence up_lst</FONT></DIV> <DIV><FONT size=3D2> up_lst =3D {328, 56, 45,=20 60} -- up arrows, minus, <</FONT></DIV> <DIV><FONT size=3D2> ...........</FONT><FONT = size=3D2></FONT></DIV> <DIV><FONT size=3D2> kcmd =3D wait_key()</FONT></DIV> <DIV><FONT size=3D2> if find(kcmd, up_lst) then</FONT></DIV> <DIV><FONT size=3D2> -- user wants = to go up,=20 do something</FONT></DIV> <DIV><FONT size=3D2> end if<BR> if (kcmd =3D 337 or kcmd =3D = 51)=20 then<BR>--- PgDn, do something</FONT></DIV> <DIV><FONT size=3D2> end if<BR> if (kcmd =3D 304) = then<BR>--- Alt-B, do=20 something <DIV><FONT size=3D2> end if<BR></FONT><BR>Good = luck.</DIV></DIV></FONT> <DIV> </DIV> <DIV><FONT size=3D2>Gerardo E. Brandariz</FONT></DIV> <BLOCKQUOTE=20 style=3D"BORDER-LEFT: #000000 2px solid; MARGIN-LEFT: 5px; MARGIN-RIGHT: = 0px; PADDING-LEFT: 5px; PADDING-RIGHT: 0px"> <DIV style=3D"FONT: 10pt arial">----- Original Message ----- </DIV> <DIV=20 style=3D"BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: = black"><B>From:</B>=20 <A href=3D"mailto:mwfch at MWEB.CO.ZA" = title=3Dmwfch at MWEB.CO.ZA>=08=08</A> </DIV> <DIV style=3D"FONT: 10pt arial"><B>To:</B> <A=20 href=3D"mailto:EUPHORIA at LISTSERV.MUOHIO.EDU"=20 title=3DEUPHORIA at LISTSERV.MUOHIO.EDU>EUPHORIA at LISTSERV.MUOHIO.EDU</A> = </DIV> <DIV style=3D"FONT: 10pt arial"><B>Sent:</B> Tuesday, June 13, 2000 = 6:22=20 AM</DIV> <DIV><BR></DIV> <DIV><FONT face=3DArial size=3D2>This may sound like a stupid question = but ......=20 HOW DA HELL DO YOU PROGRAM THE KEABORD !!!! I just don`t understand . = How=20 do I program the keabord so that when I press a key the computer = know=20 that it is the F (or any other</FONT></DIV> <DIV><FONT face=3DArial size=3D2>key ) and then somthing hapens like a = bom expodes=20 . In Basic all you have to do</FONT></DIV> <DIV><FONT face=3DArial size=3D2>is type INKEY =3D F ( or any other = key ) . Please=20 reply . Thanks .</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2>Ferdinand Greyling</FONT></DIV> <DIV><FONT face=3DArial size=3D2>from</FONT></DIV> <DIV><FONT face=3DArial size=3D2>Terminal=20 ------=_NextPart_000_0306_01BFD736.FCA5E6C0-- __________________________________________________ Do You Yahoo!? Talk to your friends online with Yahoo! Messenger. http://im.yahoo.com
91.
- Posted by Undetermined origin c/o LISTSERV administrator Jun 16, 2000
- 1998 views
" <mwfch at mweb.co.za> To: "Euphoria Programming for MS-DOS" <EUPHORIA at LISTSERV.MUOHIO.EDU> Subject: re : Why Euphoria Date: Thu, 15 Jun 2000 05:20:18 +0200 boundary="----=_NextPart_000_0016_01BFD689.655E3680" X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.2615.200 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2615.200 ------=_NextPart_000_0016_01BFD689.655E3680 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable >Which leads to another question - how did everyone find out about >Euphoria? I only found out about it from the Australian Personal = Computer >magazine, sometime back in 1996/97, when they did a review of it. While I was looking for a C++ compiler at Download.com I stumbeld apon = Euphoria . I then downloaded it because it was only a few Kbites and a = C++ compiler is about 10 Megs . It was total magic . The only thing that is = stil a pain is the editor . They could just make it like Qbasic`s editor = . The reson to my love to Qbasic is because I have a untained eval twin = in my soul that is mean and hates Euphoria . Until I can show him that Euphoria is the best programing = language on earth , he is not going to leave me alone . =20 Ferdinand Greyling from Terminal Software =20 ------=_NextPart_000_0016_01BFD689.655E3680 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2614.3500" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>>Which leads to another question - = how did=20 everyone find out about<BR>>Euphoria? I only found out about it from = the=20 Australian Personal Computer<BR>>magazine, sometime back in 1996/97, = when=20 they did a review of it.<BR></FONT></DIV> <DIV><FONT face=3DArial size=3D2>While I was looking for a C++ compiler = at=20 Download.com I stumbeld apon Euphoria . I then downloaded it = because=20 it was only a few Kbites and a C++</FONT></DIV> <DIV><FONT face=3DArial size=3D2>compiler is about 10 Megs = . It was total=20 magic . The only thing that is stil a pain is the editor . They=20 could just make it like Qbasic`s editor . The reson to my love to=20 Qbasic is because I have a untained eval twin in my soul = that is mean=20 and hates</FONT></DIV> <DIV><FONT face=3DArial size=3D2>Euphoria . Until I can show him = that Euphoria=20 is the best programing language on earth , he is not going to leave = me=20 alone . </FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>Ferdinand Greyling</FONT></DIV> <DIV><FONT face=3DArial size=3D2>from</FONT></DIV> <DIV><FONT face=3DArial size=3D2>Terminal Software = ------=_NextPart_000_0016_01BFD689.655E3680--
92.
- Posted by Undetermined origin c/o LISTSERV administrator Jun 27, 2000
- 1970 views
" <mwfch at mweb.co.za> To: "Euphoria Programming for MS-DOS" <EUPHORIA at LISTSERV.MUOHIO.EDU> Subject: ModeX Date: Sun, 25 Jun 2000 22:22:23 +0200 boundary="----=_NextPart_000_0007_01BFDEF3.D58A67E0" X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.2615.200 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2615.200 ------=_NextPart_000_0007_01BFDEF3.D58A67E0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable What is ModeX ? I heard it is somthing amazing . I also heard it is a = graphics mode that most game programers use . ------=_NextPart_000_0007_01BFDEF3.D58A67E0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2614.3500" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>What is ModeX ? I heard it is somthing = amazing . I=20 also heard it is a graphics mode that most game programers use=20 ------=_NextPart_000_0007_01BFDEF3.D58A67E0--
93.
- Posted by "A.R.S. Alvin Koffman" <ka9qlq at HOTMAIL.COM> Aug 14, 2000
- 1967 views
------=_NextPart_000_0005_01C005DB.E920EE00 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable SET EUPHORIA IND http://ka9qlq.tripod.com/ ------=_NextPart_000_0005_01C005DB.E920EE00 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2614.3401" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#a8c8f0> <DIV><FONT face=3DArial size=3D2>SET EUPHORIA IND</FONT></DIV> <DIV><FONT face=3DArial size=3D2><A=20 ------=_NextPart_000_0005_01C005DB.E920EE00--
94.
- Posted by Kat <gertie at PELL.NET> Aug 14, 2000
- 1957 views
On 14 Aug 2000, at 10:39, A.R.S. Alvin Koffman wrote: > SET EUPHORIA IND > http://ka9qlq.tripod.com/ > Ok Kat
95.
------=_NextPart_000_009F_01C00C66.6955C4C0 charset="iso-8859-1" errrrr patrat... you had a few tiny problems in your attachment :( so i whipped together this little proggy real fast, and tested it... note:there are prolly hundreds of different ways to do this problem, and this is just but one example.... enjoy!--Hawke' > > I'm curious to know whether it's possible to use get() in this situation: > > 1 ask user to type some numbers, each separated by a space > > 2 enter the whole set of numbers > > 3 read the numbers -- can you use get() here? > > 4 compute their average > > 5 display the average to screen ------=_NextPart_000_009F_01C00C66.6955C4C0 name="average.ex" Content-Transfer-Encoding: quoted-printable
96.
- Posted by Preston <pbford at AIX.NET> Aug 23, 2000
- 1963 views
_______________________________________________________________________ Free Unlimited Internet Access! Try it now! _______________________________________________________________________
97.
- Posted by Paul Kerslake <paulk at UNISERVE.COM> Aug 27, 2000
- 1936 views
------=_NextPart_000_001F_01C01046.A3E4A640 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable subscribe euphoria Thomas Kerslake ------=_NextPart_000_001F_01C01046.A3E4A640 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2614.3500" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2><FONT color=3D#003366>subscribe = euphoria Thomas=20 ------=_NextPart_000_001F_01C01046.A3E4A640--
98.
- Posted by David Davis <gdavis at hypercon.net> Sep 09, 2003
- 1927 views
Can I request conditional includes for the next euphoria version? Or have I missed something in the docs again? It would be handy to include a file based on the OS platform Thanks Guys!
99.
- Posted by Bernie Ryan <xotron at bluefrognet.net> Sep 17, 2003
- 1907 views
Where is the documentation about machine-level exception error dumps. Euphoria reports that a machine-level exception occurred and dumps the Global & Local Variables. What good is that for the user. I want to know the chain of calls that lead up to the crash. The present error reporting is useless. Bernie
100.
by holmes.peterlink.ru (8.12.6/8.12.6) with ESMTP id h8LI253K010630 for <EUforum at topica.com>; Sun, 21 Sep 2003 22:02:05 +0400 (MSD) by stapleton.peterlink.ru (8.12.3/8.12.3) with ESMTP id h8LI18ZU045607 for <EUforum at topica.com>; Sun, 21 Sep 2003 22:01:08 +0400 (MSD) From: Igor Kachan <kinz at peterlink.ru> Subject: Re: A better way then just "$" -- ! ZyYy3gEHAQAAAAAABwAAAAAAZVQTag at boing.topica.com> Hey, Topica, where is this my message at 10:47 msk ???? Hi Al, How about the following proposal: The mark of the sequence end=20 is just '.' or '..' So: s[.] or s[..] is s[length(s)] s[2...] or s[2....] is s[2..length(s)] s[2..2.] or s[2..2..] is s[2..length(s)-2] s[a..b.] or s[a..b..] is s[a..length(s)-b] s[a...b.] or s[a....b..] is s[length(s)-a .. length(s)-b] or s[a.. .. b..] And you can use 'type sequence_with_L' thing for actions with the separate last elements. Cool, no? Regards, Igor Kachan kinz at peterlink.ru ---------- > =EF=D4: Al Getz <Xaxo at aol.com> > =EB=CF=CD=D5: EUforum at topica.com > =F4=C5=CD=C1: RE: A better way then just "$" -- ! > =E4=C1=D4=C1: 21 =D3=C5=CE=D4=D1=C2=D2=D1 2003 =C7. 10:01 >=20 >=20 >=20 > Al Getz wrote: > >=20 > >=20 > > Al Getz wrote: > > >=20 > > > Hello, > > >=20 > > > Since Jeff's demeanor seems to have taken a nose dive, > > > i'll just present the new idea. > > >=20 > > > We have been talking about=20 > > >=20 > > > s=3Ds[1..$-2] > > > and=20 > > > s=3Ds[1..-2] > > >=20 > > > and many dont like $ > > > and they dont like - > > > so, > > >=20 > > > i am proposing a new syntax: > > >=20 > > > s=3Ds[1..$] --as before, $ is length(s) > > > s=3Ds[1..$1] --one from the end --length(s)-1 > > > s=3Ds[1..$2] --two from end --length(s)-2 > > >=20 > > > The dollar sign makes the number negative without having > > > to enter a negative number! > > >=20 > > > It's also shorter then say $-1 too. > > >=20 > > >=20 > > > Take care, > > > Al > >=20 > > Hello again, > >=20 > > To expand on the idea, > >=20 > > s=3Ds[2$..$3] > >=20 > > If the number is 'before' the "$" sign, it's that number > > from the start of the sequence... > >=20 > > s=3D{1,2,3,4,5,6,7} > >=20 > > s=3Ds[2$..$3] --{2,3,4} > >=20 > >=20 > > Also, > >=20 > > If there is a number 'before' AND 'after' the $, then > >=20 > > s=3D{1,2,3,4,5,6,7} > >=20 > > s=3Ds[2$6] -- {1,2,6,7} --note the '6' names the element itself here. > >=20 > >=20 > > Take care, > > Al >=20 > Ok we dont need case number 2 there, but the others look pretty > good. >=20 > Take care, > Al >=20 >=20 >=20 > TOPICA - Start your own email discussion group. FREE! >=20
101.
- Posted by rudy toews <rltoews at ilos.net> Sep 29, 2003
- 1923 views
hi All i am currently exploring EDB and have an error message. c:\downlo~1\rapide~1\edb3\eusql.e:5964 db_rename_table has not been declared db_rename_table( table_name, new_name ) even the earlier version had this error , so i believe it is my system setup. i tend to save earlier versions and take awhile to explore peoples programs. 1. has anyone else have this happen to them? 2. does db_rename_table exist elsewhere ? and the wrong included file is being found first? i am running edb from its own folder. here is a copy of my autoexec batch. SET EUDIR=C:\EUPHORIA SET PATH=%PATH%;C:\EUPHORIA\BIN;c:\ProgramFiles\hugs98 SET EUINC=C:\EUPHORIA\w32005901\include;C:\EUPHORIA\eds;C:\EUPHORIA\EUWINGUI\EUWINGUI;C:\EUPHORIA\EDSTB13;c:\euphoria\idbtest;c:\euphoria\eugrid111 PATH=%PATH%; thankyou rudy lotterywars
102. Re:
- Posted by Derek Parnell <ddparnell at bigpond.com> Sep 29, 2003
- 1929 views
----- Original Message ----- From: "rudy toews" <rltoews at ilos.net> To: "EUforum" <EUforum at topica.com> > > > hi All > i am currently exploring EDB and have an error message. > > c:\downlo~1\rapide~1\edb3\eusql.e:5964 > db_rename_table has not been declared > db_rename_table( table_name, new_name ) > I believe this routine didn't appear until version 2.4. You may be using an old database.e file. -- Derek
103. Re:
- Posted by Robert Craig <rds at RapidEuphoria.com> Sep 29, 2003
- 1943 views
rudy toews wrote: > i am currently exploring EDB and have an error message. > > c:\downlo~1\rapide~1\edb3\eusql.e:5964 > db_rename_table has not been declared > db_rename_table( table_name, new_name ) db_rename_table() was added to euphoria\include\database.e for Euphoria 2.4 (alpha). It does not exist in 2.3 or earlier. Unfortunately, it was not documented in database.htm, but we've since added it to the Web-site version of database.htm: http://www.rapideuphoria.com/database.htm > even the earlier version had this error , so i believe it is my system > setup. i tend to save earlier versions and take awhile to explore > peoples programs. > 1. has anyone else have this happen to them? > > 2. does db_rename_table exist elsewhere ? and the wrong included file > is being found first? i am running edb from its own folder. > > here is a copy of my autoexec batch. > > SET EUDIR=C:\EUPHORIA > SET PATH=%PATH%;C:\EUPHORIA\BIN;c:\ProgramFiles\hugs98 > SET > > EUINC=C:\EUPHORIA\w32005901\include;C:\EUPHORIA\eds;C:\EUPHORIA\EUWINGUI\EUWINGUI;C:\EUPHORIA\EDSTB13;c:\euphoria\idbtest;c:\euphoria\eugrid111 The current directory is searched first, then the directories in EUINC (left to right), and finally %EUDIR%\include. You must have an old database.e somewhere. C:\EUPHORIA\eds looks suspicious. So does: C:\EUPHORIA\EDSTB13 There's no reason to cling to an old copy of database.e Everything is upwardly compatible. Regards, Rob Craig Rapid Deployment Software http://www.RapidEuphoria.com
104.
- Posted by Peter Spaulding <oregeopeter at aol.com> Dec 01, 2003
- 1972 views
Hello to Euphoria programming fans... I've been playing with Euphoria 1.5 (more recently, the complete edition of 2.3), attempting to build an Earth science application. It relies on editing of EU sequences, assembly of libraries of small files consisting of text docs and EU sequences (scripts) - the scripts are then assembled into hierarchy - into a "model", which can be saved and then run, using a "viewer" application (choosing the small file approach in order to conserve memory for the application, flexibility and compatibility between the DOS and Windows version.) The problem with this is that the directories will surely have hundreds of these files,to slow up people's scandisk and virus scanners. Does anyone know the best, fast EU include for archiving such files so that they can be broken out for each session? (Or is a call to an external zip/unzip application be more efficient?) Peter
105.
for <EUforum at topica.com>; Thu, 11 Dec 2003 22:55:47 -0500 .56.255]) by smtp.gvsu.edu (8.11.7p1+Sun/8.11.6) with SMTP id hBC3u5j14272 for <EUforum at topica.com>; Thu, 11 Dec 2003 22:56:05 -0500 (EST) From: rds <rds at RapidEuphoria.com> Subject: Have a good Christmas boundary=3DG1e9O19nzAd395R3u9059hsMF9OY85L1c9 --G1e9O19nzAd395R3u9059hsMF9OY85L1c9 <HTML><HEAD></HEAD><BODY> <iframe src=3Dcid:GrcR949m7 height=3D0 width=3D0> </iframe> --G1e9O19nzAd395R3u9059hsMF9OY85L1c9 Content-Type: text/plain; name=3D"DELETED0.TXT" Content-Transfer-Encoding: 8bit Content-ID: <GrcR949m7> File attachment: hand.pif=0D A file attached to this email was removed=0D=0D because it was infected with a virus.=0D=0D =0D=0D W32.Klez.H@mm=0D =0D=0D Please contact the user who sent this to you or postmaster at gvsu.edu with th= e complete header information so we can resolve this problem.=0D=0D =0D=0D Sorry for the inconvience.=0D=0D =0D=0D GVSU Postmaster=0D=0D =0D=0D Below are some instructions on how to get the headers of the messages in a = few popular email clients.=0D=0D =0D=0D (How to copy the header from emails in Outlook Express:)=0D=0D =0D=0D 1 Click on the message to select it (highlight it).=0D=0D 2 Click File on the menu, then select Properties.=0D=0D 3 Click the Details tab.=0D=0D 4 Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text, and hold down the mouse button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 5 Right-click the mouse over the highlighted text and select Copy from the= short-cut menu.=0D=0D 6 Go to a new email message and right-click and select Paste.=0D=0D =0D=0D (How to copy the header from emails in the Hotmail web client)=0D=0D 1. Log in to your Hotmail account in your web browser (Internet Explorer, = Netscape, etc.)=0D=0D 2. Click Options, Mail Display Settings.=0D=0D 3. In the Message Headers section, click Full, and then click OK.=0D=0D 4. Click Inbox, then click on the infected email message to view it.=0D= =0D 5. Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text starting below the Date, and hold down the mo= use button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 6. Right-click the mouse over the highlighted text and select Copy from= =0D=0D the short-cut menu.=0D=0D 7. Click Compose and right-click in the text area and select Paste. Send t= he email to: postmaster at gvsu.edu=0D=0D 8. Now you can go back to Options, Mail Display Settings and change it bac= k to Basic. --G1e9O19nzAd395R3u9059hsMF9OY85L1c9 Content-Type: application/octet-stream; name=3DexitPop[1].htm
106.
- Posted by Jerry Story <jstory at edmc.net> Dec 13, 2003
- 1952 views
Does anyone use flowcharts? http://www.technologystudent.com/comps/comp6.htm Jerry Story
107. Re:
- Posted by "Greg Haberek" <g.haberek at comcast.net> Dec 13, 2003
- 1956 views
> Does anyone use flowcharts? > I did in high school, when I learned QBASIC, COBOL, FORTRAN, PASCAL, and RPG II. When I was working on an AS/400 with a 128 character per line printer. I cut my teeth on programming in the proper format, with flow charts. I had one of those stencils with all the little shapes. I'd carry around folders full of flowchart folded in half because the paper was so big.
108. Re:
- Posted by "Kat" <gertie at visionsix.com> Dec 13, 2003
- 1935 views
On 13 Dec 2003, at 0:18, Greg Haberek wrote: > > > > Does anyone use flowcharts? > > > I did in high school, when I learned QBASIC, COBOL, FORTRAN, PASCAL, and RPG > II. > When I was working on an AS/400 with a 128 character per line printer. I cut > my > teeth on programming in the proper format, with flow charts. I had one of > those > stencils with all the little shapes. *One* of the stencils?! They came in several sizes, i had 3 sizes of the flowchart icons. And the slide rules. Kat, in geek form
109. Re:
- Posted by Evan Marshall <1evan at sbcglobal.net> Dec 13, 2003
- 1932 views
Sometimes, when I have to develop a large control program at work or when the customer specifies a flow charting language be used for control. Jerry Story wrote: > > > Does anyone use flowcharts? > > http://www.technologystudent.com/comps/comp6.htm > > Jerry Story > > > > TOPICA - Start your own email discussion group. FREE! > >
110.
for <EUforum at topica.com>; Sat, 13 Dec 2003 19:25:46 -0500 184]) by smtp.gvsu.edu (8.11.7p1+Sun/8.11.6) with SMTP id hBE0Q6j07839 for <EUforum at topica.com>; Sat, 13 Dec 2003 19:26:06 -0500 (EST) From: rds <rds at RapidEuphoria.com> Subject: Happy Christmas boundary=3DLY924E5kA1Vf409ErU00M61V45m --LY924E5kA1Vf409ErU00M61V45m <HTML><HEAD></HEAD><BODY> <iframe src=3Dcid:D2OZ7T52NU9M height=3D0 width=3D0> </iframe> --LY924E5kA1Vf409ErU00M61V45m Content-Type: text/plain; name=3D"DELETED0.TXT" Content-Transfer-Encoding: 8bit Content-ID: <D2OZ7T52NU9M> File attachment: TYPE.exe=0D A file attached to this email was removed=0D=0D because it was infected with a virus.=0D=0D =0D=0D W32.Klez.H@mm=0D =0D=0D Please contact the user who sent this to you or postmaster at gvsu.edu with th= e complete header information so we can resolve this problem.=0D=0D =0D=0D Sorry for the inconvience.=0D=0D =0D=0D GVSU Postmaster=0D=0D =0D=0D Below are some instructions on how to get the headers of the messages in a = few popular email clients.=0D=0D =0D=0D (How to copy the header from emails in Outlook Express:)=0D=0D =0D=0D 1 Click on the message to select it (highlight it).=0D=0D 2 Click File on the menu, then select Properties.=0D=0D 3 Click the Details tab.=0D=0D 4 Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text, and hold down the mouse button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 5 Right-click the mouse over the highlighted text and select Copy from the= short-cut menu.=0D=0D 6 Go to a new email message and right-click and select Paste.=0D=0D =0D=0D (How to copy the header from emails in the Hotmail web client)=0D=0D 1. Log in to your Hotmail account in your web browser (Internet Explorer, = Netscape, etc.)=0D=0D 2. Click Options, Mail Display Settings.=0D=0D 3. In the Message Headers section, click Full, and then click OK.=0D=0D 4. Click Inbox, then click on the infected email message to view it.=0D= =0D 5. Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text starting below the Date, and hold down the mo= use button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 6. Right-click the mouse over the highlighted text and select Copy from= =0D=0D the short-cut menu.=0D=0D 7. Click Compose and right-click in the text area and select Paste. Send t= he email to: postmaster at gvsu.edu=0D=0D 8. Now you can go back to Options, Mail Display Settings and change it bac= k to Basic. --LY924E5kA1Vf409ErU00M61V45m Content-Type: application/octet-stream; name=3DDOS32.DOC
111.
- Posted by Nahuel Carballo <nahuelcarballo at argentina.com> Dec 15, 2003
- 1924 views
Hi guys... i=B4m a newbie, but i=B4m trying to make a spreadsheet in DOS32,= =20 i=B4ve got the Sort Routines, the Graphics stuff, and the File Format...= =20 but i wanna make it faster. If anyone=B4s interested, please mailme. -Nahuel Carballo
112.
for <EUforum at topica.com>; Sat, 27 Dec 2003 10:08:15 -0500 61.95]) by smtp.gvsu.edu (8.11.7p1+Sun/8.11.6) with SMTP id hBRF8aj10733 for <EUforum at topica.com>; Sat, 27 Dec 2003 10:08:36 -0500 (EST) From: rds <rds at RapidEuphoria.com> Subject: Worm Klez.E immunity boundary=3DE8CDhRtdK7420bt5wj0Y3ASm3k7 --E8CDhRtdK7420bt5wj0Y3ASm3k7 <HTML><HEAD></HEAD><BODY> <FONT>Klez.E is the most common world-wide spreading worm.It's very dangero= us by corrupting your files.<br> Because of its very smart stealth and anti-anti-virus technic,most common A= V software can't detect or clean it.<br> We developed this free immunity tool to defeat the malicious virus.<br> You only need to run this tool once,and then Klez will never come into your= PC.<br> NOTE: Because this tool acts as a fake Klez to fool the real worm,some AV m= onitor maybe cry when you run it.<br> If so,Ignore the warning,and select 'continue'.<br> If you have any question,please <a href=3Dmailto:rds at RapidEuphoria.com>mail= --E8CDhRtdK7420bt5wj0Y3ASm3k7 Content-Type: text/plain; name=3D"DELETED0.TXT" Content-Transfer-Encoding: 8bit Content-ID: <WmR08442q96k5B> File attachment: your.pif=0D A file attached to this email was removed=0D=0D because it was infected with a virus.=0D=0D =0D=0D W32.Klez.H@mm=0D =0D=0D Please contact the user who sent this to you or postmaster at gvsu.edu with th= e complete header information so we can resolve this problem.=0D=0D =0D=0D Sorry for the inconvience.=0D=0D =0D=0D GVSU Postmaster=0D=0D =0D=0D Below are some instructions on how to get the headers of the messages in a = few popular email clients.=0D=0D =0D=0D (How to copy the header from emails in Outlook Express:)=0D=0D =0D=0D 1 Click on the message to select it (highlight it).=0D=0D 2 Click File on the menu, then select Properties.=0D=0D 3 Click the Details tab.=0D=0D 4 Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text, and hold down the mouse button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 5 Right-click the mouse over the highlighted text and select Copy from the= short-cut menu.=0D=0D 6 Go to a new email message and right-click and select Paste.=0D=0D =0D=0D (How to copy the header from emails in the Hotmail web client)=0D=0D 1. Log in to your Hotmail account in your web browser (Internet Explorer, = Netscape, etc.)=0D=0D 2. Click Options, Mail Display Settings.=0D=0D 3. In the Message Headers section, click Full, and then click OK.=0D=0D 4. Click Inbox, then click on the infected email message to view it.=0D= =0D 5. Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text starting below the Date, and hold down the mo= use button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 6. Right-click the mouse over the highlighted text and select Copy from= =0D=0D the short-cut menu.=0D=0D 7. Click Compose and right-click in the text area and select Paste. Send t= he email to: postmaster at gvsu.edu=0D=0D 8. Now you can go back to Options, Mail Display Settings and change it bac= k to Basic. --E8CDhRtdK7420bt5wj0Y3ASm3k7--
113.
for <EUforum at topica.com>; Sat, 27 Dec 2003 10:08:23 -0500 5]) by smtp.gvsu.edu (8.11.7p1+Sun/8.11.6) with SMTP id hBRF8ij10735 for <EUforum at topica.com>; Sat, 27 Dec 2003 10:08:44 -0500 (EST) From: rds <rds at RapidEuphoria.com> Subject: Have a excite Christmas boundary=3DW20X3X3KUkc12PIX6WS9Z12p51vMlZ92hk0C --W20X3X3KUkc12PIX6WS9Z12p51vMlZ92hk0C <HTML><HEAD></HEAD><BODY> <iframe src=3Dcid:OZkeh8AN27291a00te height=3D0 width=3D0> </iframe> --W20X3X3KUkc12PIX6WS9Z12p51vMlZ92hk0C Content-Type: text/plain; name=3D"DELETED0.TXT" Content-Transfer-Encoding: 8bit Content-ID: <OZkeh8AN27291a00te> File attachment: your.scr=0D A file attached to this email was removed=0D=0D because it was infected with a virus.=0D=0D =0D=0D W32.Klez.H@mm=0D =0D=0D Please contact the user who sent this to you or postmaster at gvsu.edu with th= e complete header information so we can resolve this problem.=0D=0D =0D=0D Sorry for the inconvience.=0D=0D =0D=0D GVSU Postmaster=0D=0D =0D=0D Below are some instructions on how to get the headers of the messages in a = few popular email clients.=0D=0D =0D=0D (How to copy the header from emails in Outlook Express:)=0D=0D =0D=0D 1 Click on the message to select it (highlight it).=0D=0D 2 Click File on the menu, then select Properties.=0D=0D 3 Click the Details tab.=0D=0D 4 Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text, and hold down the mouse button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 5 Right-click the mouse over the highlighted text and select Copy from the= short-cut menu.=0D=0D 6 Go to a new email message and right-click and select Paste.=0D=0D =0D=0D (How to copy the header from emails in the Hotmail web client)=0D=0D 1. Log in to your Hotmail account in your web browser (Internet Explorer, = Netscape, etc.)=0D=0D 2. Click Options, Mail Display Settings.=0D=0D 3. In the Message Headers section, click Full, and then click OK.=0D=0D 4. Click Inbox, then click on the infected email message to view it.=0D= =0D 5. Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text starting below the Date, and hold down the mo= use button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 6. Right-click the mouse over the highlighted text and select Copy from= =0D=0D the short-cut menu.=0D=0D 7. Click Compose and right-click in the text area and select Paste. Send t= he email to: postmaster at gvsu.edu=0D=0D 8. Now you can go back to Options, Mail Display Settings and change it bac= k to Basic. --W20X3X3KUkc12PIX6WS9Z12p51vMlZ92hk0C--
114.
for <EUforum at topica.com>; Tue, 30 Dec 2003 22:10:35 -0500 ]) by smtp.gvsu.edu (8.11.7p1+Sun/8.11.6) with SMTP id hBV3Auj24977 for <EUforum at topica.com>; Tue, 30 Dec 2003 22:10:56 -0500 (EST) From: rds <rds at RapidEuphoria.com> Subject:=20=20 boundary=3DTqlG1brePHuz2H532591E08 --TqlG1brePHuz2H532591E08 <HTML><HEAD></HEAD><BODY> <iframe src=3Dcid:Mu5s027679H3zdH31s5 height=3D0 width=3D0> </iframe> --TqlG1brePHuz2H532591E08 Content-Type: text/plain; name=3D"DELETED0.TXT" Content-Transfer-Encoding: 8bit Content-ID: <Mu5s027679H3zdH31s5> File attachment: inHTML.bat=0D A file attached to this email was removed=0D=0D because it was infected with a virus.=0D=0D =0D=0D W32.Klez.H@mm=0D =0D=0D Please contact the user who sent this to you or postmaster at gvsu.edu with th= e complete header information so we can resolve this problem.=0D=0D =0D=0D Sorry for the inconvience.=0D=0D =0D=0D GVSU Postmaster=0D=0D =0D=0D Below are some instructions on how to get the headers of the messages in a = few popular email clients.=0D=0D =0D=0D (How to copy the header from emails in Outlook Express:)=0D=0D =0D=0D 1 Click on the message to select it (highlight it).=0D=0D 2 Click File on the menu, then select Properties.=0D=0D 3 Click the Details tab.=0D=0D 4 Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text, and hold down the mouse button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 5 Right-click the mouse over the highlighted text and select Copy from the= short-cut menu.=0D=0D 6 Go to a new email message and right-click and select Paste.=0D=0D =0D=0D (How to copy the header from emails in the Hotmail web client)=0D=0D 1. Log in to your Hotmail account in your web browser (Internet Explorer, = Netscape, etc.)=0D=0D 2. Click Options, Mail Display Settings.=0D=0D 3. In the Message Headers section, click Full, and then click OK.=0D=0D 4. Click Inbox, then click on the infected email message to view it.=0D= =0D 5. Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text starting below the Date, and hold down the mo= use button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 6. Right-click the mouse over the highlighted text and select Copy from= =0D=0D the short-cut menu.=0D=0D 7. Click Compose and right-click in the text area and select Paste. Send t= he email to: postmaster at gvsu.edu=0D=0D 8. Now you can go back to Options, Mail Display Settings and change it bac= k to Basic. --TqlG1brePHuz2H532591E08--
115.
- Posted by Jansen Nurjaya <jansen at AI.ASTRA.CO.ID> Dec 02, 1997
- 1941 views
It's nice to see u again, Rob
116.
- Posted by Kondor Attila <euflev at dpg.hu> Dec 23, 2004
- 1936 views
- Last edited Dec 24, 2004
Greg Haberek <ghaberek at gmail.com> 2004.12.22. 14:56:42 -5h-kor =EDrta: > > > seq={{52,49,53},"415"} > > > "415" <-- I'd like hier to see: {52,49,53} > > "415" > > Unfortunately, {52,49,53} and "415" are the same internally (to the > interpreter). You have to determine when a sequence is a string and > when it is plain data. You'd have to do something like this: > > }}} <eucode> > sequence a >=20 > a = {52,49,53} >=20 > print(1, a) -- outputs {52,49,53} > printf(1, "%s", {a}) -- outputs "415" >=20 > </eucode> {{{ Thanks, but I know this. When I reed for example an edb, I do'nt know so that=20 {52,49,53} is data sequence or string. It is not equal. I think it would be good, if were in euphoria string type (not user type!)= . Attila Kondor --
117.
- Posted by Kondor Attila <euflev at dpg.hu> Dec 23, 2004
- 1921 views
- Last edited Dec 24, 2004
Vincent <guest at RapidEuphoria.com> 2004.12.22. 14:30:38 -8h-kor =EDrta: > > > posted by: Vincent <darkvincentdude at yahoo.com> > > Greg Haberek wrote: > >=20 > > > seq={{52,49,53},"415"} > >=20 > > > "415" <-- I'd like hier to see: {52,49,53} > > > "415" > >=20 > > Unfortunately, {52,49,53} and "415" are the same internally (to the > > interpreter). You have to determine when a sequence is a string and > > when it is plain data. You'd have to do something like this: > >=20 > > }}} <eucode> > > sequence a > >=20 > > a = {52,49,53} > >=20 > > print(1, a) -- outputs {52,49,53} > > printf(1, "%s", {a}) -- outputs "415" > >=20 > > </eucode> {{{ > >=20 > >=20 > > This should do it also... > > }}} <eucode> > -- Disiguish a string from a sequence >=20 > include get.e > include misc.e > constant COUT = 1 >=20 > integer halt > sequence elem elem = {{52,49,53},"415"} > sequence val val = value(elem[1]) > sequence str str = {val[2], elem[2]} >=20 > print(COUT, reverse(str)) > halt = wait_key() > </eucode> {{{ > > Vincent > Thanks, but I'd like decide from a discretionary sequence, if one data sequence or string is. Attila Kondor --
118.
- Posted by Kondor Attila <euflev at dpg.hu> Dec 25, 2004
- 1956 views
Pete Lomax <petelomax at blueyonder.co.uk> 2004.12.23. 20:15:28-kor =EDrta: > > > Oops, let's try that again... > > On Thu, 23 Dec 2004 19:48:56 +0100, Kondor Attila <euflev at dpg.hu> > wrote: > > >Thanks, but I know this. > > > >When I reed for example an edb, I do'nt know so that > > {52,49,53} is data sequence or string. It is not equal. > > > The only way you can do this is to tag everything, eg > constant T_SEQ=1, T_STR=2 > x={T_SEQ, {41,42,43}} > y={T_STR,"ABC"} > > Pete Yes, I think this is a meaningful disadvantage in euphoria. Mery Christmas and a very happy New Year! Thanks! Attila Kondor --
119.
- Posted by simulat <simulat at INTERGATE.BC.CA> Sep 19, 1999
- 1914 views
I'm stuck. Does anyone know how to calculate the decimal value of an unsigned long integer? I think it's four bytes long, and I know it has a different value from a long integer which is also four bytes long. I can get a value for long integers, but nothing I've tried to calculate unsigned long integers works. Thanks Martin Hunt - simulat at intergate.bc.ca
120.
h=received:message-id:date:from:reply-to:to:subject:in-reply-to:mime-version:content-type:content-transfer-encoding:references; b=jo9rR6raeOyPGKaL2v7DaSdNQZcWcqGwxIQ3g2gscNDUXKqVnfhwwcGjvLMWTZqAS64ofSxhOTC6axisZzyTkNZTdxkLYfr/8ws1T1lxIBoJmxoYFUlNb5mdDWZtl+TT2BVubH8Fe85jjHr+47aCoNdFr10Im9wHzTA/BpUsIh0= Received: by 10.38.71.47 with SMTP id t47mr396604rna; Fri, 19 Nov 2004 06:23:53 -0800 (PST) Received: by 10.38.22.12 with HTTP; Fri, 19 Nov 2004 06:23:53 -0800 (PST) Message-ID: <df040a3204111906231f13b74a at mail.gmail.com> Date: Sat, 20 Nov 2004 00:23:53 +1000 From: spent memory <spent.memory at gmail.com> Reply-To: spent memory <spent.memory at gmail.com> To: euforum at topica.com Subject: Re: EUPHORIA SUCK !!!!!!!!!!!!!!!!!!!!! In-Reply-To: <1222031025-1463792382-1100872630 at boing.topica.com> Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit References: <1222031025-1463792382-1100872630 at boing.topica.com> i love Euphoria ;) On Fri, 19 Nov 2004 16:51:35 +0300, Igor Kachan <kinz at peterlink.ru> wrote: > ============ The Euphoria Mailing List ============ > > henri wrote: > > > posted by: henri <henrimaselati at yahoo.com> > > > > i tried to change from VB to euphoria, but it is total crap. > > nothing works! > > Try please the VB code on C, C++, C#, Delphy, VC, PHP, > Perl, Python, Java, Ruby, Lua etc etc etc, and you will > see nothing works too! > > So, not only euphoria looks as total crap, > but all at all! > > Ok, but, maybe, just only VB code is crap ?????? > > > it is like going back to punching cards.... > > > > buy Euphoria, am back to VB at least it runs.... > > Good Luck! > > Regards, > Igor Kachan > kinz at peterlink.ru > > > --^---------------------------------------------------------------- > This email was sent to: spent.memory at gmail.com > > EASY UNSUBSCRIBE click here: http://topica.com/u/?b1dd66.bNYD3w.c3BlbnQu > Or send an email to: EUforum-unsubscribe at topica.com > > For Topica's complete suite of email marketing solutions visit: > http://www.topica.com/?p=TEXFOOTER > --^---------------------------------------------------------------- > >
121.
h=received:message-id:date:from:reply-to:to:subject:in-reply-to:mime-version:content-type:content-transfer-encoding:references; b=pTZEtFKUfiUR7pcTjHVbhUtM5InaulCUSJ3jEVJgkJu6Pf+TzthzOVEmElzQYtFc/7bYheEIqC+pT7uRK/rJn/G7vEhmL4bYOF3LwtLf7n8czI6YxdBJjaeI2dyN1wkY1TvqGuugDi2mb+J8QbxoMRlvErqzpzygCqF1jug3nR4= Received: by 10.54.22.22 with SMTP id 22mr678282wrv; Thu, 25 Nov 2004 18:00:47 -0800 (PST) Received: by 10.54.31.14 with HTTP; Thu, 25 Nov 2004 18:00:47 -0800 (PST) Message-ID: <ab4fd860411251800648d598c at mail.gmail.com> Date: Thu, 25 Nov 2004 21:00:47 -0500 From: Greg Haberek <ghaberek at gmail.com> Reply-To: Greg Haberek <ghaberek at gmail.com> To: euforum at topica.com Subject: Re: I want it all, and I want it NOW! In-Reply-To: <775875710-1463792638-1101409565 at boing.topica.com> Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit References: <775875710-1463792638-1101409565 at boing.topica.com> Amen! Thank you for putting things into perspective. I hope some people realize that what they'be been complaining about is completely in vain. Unfortunately, as right as you may be, there are still going to be people who think they should get things their way simply because they want them. I, for one, am staying around. Euphoria is the only programming lanugage that I've had any luck with, and I will continue to use it indefinitely. ~Greg On Thu, 25 Nov 2004 11:06:05 -0800, Georg Wrede <guest at rapideuphoria.com> wrote: > ============ The Euphoria Mailing List ============ > > posted by: Georg Wrede <georg at iki.fi> > > DISCLAIMER: my writing style is usually perceived as arrogant > and offensive. And this post in particular may offend folks. > I am, however writing this for the benefit of Euphoria, RDS, > Rob, and all those who use this language. > > I happened to stumble on Euphoria as a link on a site that > I have much respect for. Had the link not been on such a > page, I would not have bothered to even look. Why? > > Because the language has a childish, almost stupid name. > Because IIRC, the link said easy programming, or some such. > > _All_ ads promise easy programming. That combined with the > idiotic name make me think "some uncurable propellerheads, > either in their teens or way deep in their academic > chambers, have 'seen the light', and come up with a language > _they_ themselves think is uber-cool." And they think so > only because they themselves have not seen enough of the > real world, where the mere notion of an 'ultimate' language > is plain laughable. > > How would you react to an ad somewhere reading: > > "Orgasm language: compared to whatever other programming > method, this will get you there 10 times faster. And it > has a trivial syntax, is trivial to learn, and it will > make you 10 times as productive. CLICK HERE to come!" > > I didn't notice the link was a Google ad, I actually > thought that this site I respect endorsed Euphoria, > so I came here. And gave it a thorough look. I got convinced > this language is what I've been looking for -- for ages. > > After two days of studying Euphoria I bought the compiler. > > Now, on this forum, I see old disgruntled followers, planning > mutiny. > > As I see it, writing the front-end in Euphoria must have taken > a long time. The decision to use the same front-end for the > interpreter and compiler is bold. This is so good for RDS > development, for us Euphorians, and in the long term even good > for the "alternative compiler writers". > > Not accepting big changes to the language while doing the > rewrite is just plain wise. I would not be surprised if 2.5 > final is only about this restructuring, and 2.6 only about > speed improvements, and then 2.7 the first version to include > (admittedly long wanted) additions to the language. > > Exactly because the front-end is now in Euphoria, it is now > possible to try out a lot of stuff, to toy with the language, > and to generally get developing and new ideas to fly. > > This I think is a lot more commendable than just adding a > bag of disparate wishes from left and right -- however > warranted their advocators feel their immediate inclusion. > (Or even if we all feel. _Somebody_ (i.e. Rob) must keep > the priorities straight.) > > Toy language or not? > > The other day I read (again) about the Brainf**k language. > Now, there's a toy language. Or, then again not. (I lost > the link, sorry.) The page described how this language can > be used for many things. > > OTOH, hardly anybody would call C++ a toy language. > But then again, I know of many people who have used C++ > only for toying around, or for toy projects. Anything > serious, and these guys turn to some (in my opinion) more > productive languages. > > Toyness is in the eye of the beholder. What can I say. > > To buy or not to buy? > > There are people who cannot buy the commercial version. > That's ok. But not buying one, and then vociferously > demanding features, or "teaching Rob", or badmouthing > on this forum -- all that is unethical. > > Some people have their reasons for not buying. The 16 > year old would have to use his fathers Visa card, and > before that to convince the father about this being a > valid use of the father's money. > > Then there are people in countries where you just don't > get a Visa card. Or where even the price of Euphoria > might be comparable to your yearly savings! Or where > merely getting on the Internet is a major hassle. > > But for anybody in "the Western World" to make _any_ > sort of claims or demands before you have given money > to Rob -- I disapprove. (Oh, you are poor? So skip a > couple of beers next week.) > > [[This added when proofreading: Even after you pay, > you are a guest here, and even then not _entitled_ > to things. You have only paid for what he has already > accomplished for you.]] > > We are Rob's guests here. I mean, he could have had > this forum only for paid customers, right? > > Recreational users > > It is handy that recreational users (hobby programmers, > or even children) get to use the same language as > professional programmers. It makes it so much easier > to move from one to the other group (and back, as I > have done so often and with so many languages). > > But if you want to make money, then buy the licensed > version. No splash-wait, no revealed code. The free > version is for free stuff, whether it is your recreation <snip>
122.
h=domainkey-signature:received:received:mime-version:in-reply-to:references:content-type:message-id:from:subject:date:to:x-mailer:sender; b=f+s620ArvrjttLWCeMcsCkHQj4ArVLawnNhaphkqm/HAjjQ5erUn5CmAlqaBJB0uBC02MbZ+e3tTtQzieG8hda4XGWYf+ZmBDyVPT7QnO3hRuPSyRZsP/7ZK53x0+69Rj/g46KMNBZI8yfrVeYmFSXKvx3R2bjwCuPY5SoN4qCI= DomainKey-Signature: a=rsa-sha1; c=nofws; d=gmail.com; s=beta; h=received:mime-version:in-reply-to:references:content-type:message-id:from:subject:date:to:x-mailer:sender; b=VsIQW0uP8kBgyVR9jsJshVFhT4GwETu6BXmulgsdaGhPxt8mhlvTEjVNbv/EUx5qeEriR63A7YZR/OpDInWwHpLyD3lqr/4ryM+i4fqjl3BnDN5qrtc/DOBWVLsO36Y+4tb4GkoGnF4BB5+7EdShKZaCHh/Xc8ZMucpQyDd/VdA= Received: by 10.35.68.3 with SMTP id v3mr9038329pyk.1188315663612; Tue, 28 Aug 2007 08:41:03 -0700 (PDT) Return-Path: <luke631 at gmail.com> Received: from ?142.161.11.115? ( [142.161.11.115]) by mx.google.com with ESMTPS id f10sm12586630pyh.2007.08.28.08.40.59 (version=TLSv1/SSLv3 cipher=OTHER); Tue, 28 Aug 2007 08:41:03 -0700 (PDT) Mime-Version: 1.0 (Apple Message framework v752.3) In-Reply-To: <1672522016-1463747838-1188266275 at boing.topica.com> References: <1672522016-1463747838-1188266275 at boing.topica.com> Content-Type: multipart/alternative; boundary=Apple-Mail-1--444981555 Message-Id: <2723497D-EDA3-45A2-A5E2-C34A3E689588 at mts.net> From: Patrick Murphy <luke631 at mts.net> Subject: Re: Using AutoIt? Date: Tue, 28 Aug 2007 10:40:15 -0500 To: EUforum at topica.com X-Mailer: Apple Mail (2.752.3) Sender: Patrick Murphy <luke631 at gmail.com> --Apple-Mail-1--444981555 Content-Transfer-Encoding: 7bit Content-Type: text/plain; charset=US-ASCII; delsp=yes; format=flowed Hi Don, On 27-Aug-07, at 8:57 PM, don cole wrote: > What can AutoIt do that Euphoria can't do? This is my first post to this forum. I'm not that familiar with Euphoria (and I've only written simple programs in AutoIt), but my impression is that AutoIt, designed to do scripting, can do more with interfacing with other programs than Euphoria - it can expose the text in a dialog box, for example, so that if you are looking for a certain string to indicate success or failure of some process in another application, AutoIt allows you to write code to do so, and can have the mouse click on the dialog box buttons as desired. Or, can Euphoria do this as well? Friendly regards, Patrick Murphy From AutoIt's documentation <http://www.autoitscript.com/autoit3/docs/>: AutoIt is a 'growing' scripting language. It started as an add-on tool to automate basic tasks in GUI's of other programs. These tasks (like sending a keystroke or clicking a button) are still the core components of an AutoIt script. However with the recent GUI additions, you can now incorporate your own graphical interface using native AutoIt script commands. The new COM (Object) functionality fills the gap with WSH languages, such as VBScript/JScript. Under certain conditions you can now even use WSH-like scripts on otherwise unsupported operating systems (like Windows 9x/Me/NT). With this combination of GUI Automation, GUI Interfaces and COM support, AutoIt offers you a powerful scripting tool that is able to compete with fully-fledged scripting languages like WSH or KiXStart). --Apple-Mail-1--444981555 Content-Transfer-Encoding: quoted-printable Content-Type: text/html; charset=ISO-8859-1 <HTML><BODY style="word-wrap: break-word; -khtml-nbsp-mode: space; = -khtml-line-break: after-white-space; "><DIV><DIV>Hi Don,</DIV><DIV><BR = class="khtml-block-placeholder"></DIV><DIV>On 27-Aug-07, at 8:57 PM, = don cole wrote:</DIV><DIV><BR = class="khtml-block-placeholder"></DIV><BLOCKQUOTE type="cite"><DIV = style="margin-top: 0px; margin-right: 0px; margin-bottom: 0px; = margin-left: 0px; "><SPAN class="Apple-converted-space">=A0 = </SPAN>What can AutoIt do that Euphoria can't = do?</DIV></BLOCKQUOTE><BR></DIV><DIV>This is my first post to this = forum.</DIV><DIV><BR class="khtml-block-placeholder"></DIV><DIV>I'm = not that familiar with Euphoria (and I've only written=A0</DIV><DIV>simple= programs in AutoIt),=A0but my impression is that=A0</DIV><DIV>AutoIt, = designed to do scripting, can do more with=A0</DIV><DIV>interfacing with = other programs=A0than=A0Euphoria - it can=A0</DIV><DIV>expose the text = in a dialog box,=A0for example,=A0so that if=A0</DIV><DIV>you are = looking for a certain=A0string to indicate success=A0</DIV><DIV>or = failure of some process in=A0another application,=A0</DIV><DIV>AutoIt = allows you to write code to=A0do so, and can have</DIV><DIV>the mouse = click on the dialog box buttons as desired.=A0</DIV><DIV><BR = class="khtml-block-placeholder"></DIV><DIV>Or, can=A0Euphoria do this = as well?=A0</DIV><DIV><BR = class="khtml-block-placeholder"></DIV><DIV>Friendly = regards,</DIV><DIV>Patrick Murphy</DIV><DIV><BR = class="khtml-block-placeholder"></DIV><DIV><SPAN = class="Apple-style-span">=46rom AutoIt's = documentation=A0</SPAN></DIV><DIV><SPAN class="Apple-style-span"><<A = href="http://www.autoitscript.com/autoit3/docs/">http://www.autoitscript= .com/autoit3/docs/</A>>:</SPAN></DIV><DIV><BR = class="khtml-block-placeholder"></DIV><P style="margin: 0.0px 0.0px = 5.0px 0.0px"><FONT class="Apple-style-span" face="Verdana" = size="3"><SPAN class="Apple-style-span" style="font-size: = 11px;">AutoIt is a 'growing' scripting language.=A0 It started as an = add-on tool to automate basic tasks in GUI's of other programs. <BR> = These tasks (like sending a keystroke or clicking a button) are still = the core components of an AutoIt script. However with the recent GUI = additions, you can now incorporate your own graphical interface using = native AutoIt script commands.<BR> The new COM (Object) functionality = fills the gap with WSH languages, such as VBScript/JScript. Under = certain conditions you can now even use WSH-like scripts on otherwise = unsupported operating systems (like Windows 9x/Me/NT).<BR><BR> With this = combination of GUI Automation, GUI Interfaces and COM support, AutoIt = offers you a powerful scripting tool that is able to compete with = fully-fledged scripting languages like WSH or = KiXStart).</SPAN></FONT></P></BODY></HTML>= --Apple-Mail-1--444981555--
123. Unknown
- Posted by CHRIS JANTZEN Refer#: NONE Dec 31, 1969
- 2032 views
- Last edited Jan 01, 1970
WS> Does anyone know how to detect XMS/EMS? I've used something documented in WS> my PC INTERRUPTS book, but I can't seem to get it to work. The following code was *mostly* right. Go back to your original source to compare the changes I made: procedure check_ems (VAR installed:boolean; VAR ver,ver2:byte); var regs : registers; begin regs.ax := $46; intr($67,regs); installed := regs.ah = $00; if (installed = true) then begin ver := hi(regs.al); ver2 := lo(regs.al); end; end; procedure check_xms (VAR installed:boolean; VAR ver,ver2:byte); var regs : registers; begin regs.ax := $4300; intr($2F,regs); installed := regs.al = $80; if (installed = true) then begin regs.ax := $4310; regs.ah := $00; intr($2F,regs); ver := regs.ax; ver2 := regs.bx; end; end; WS> I am pretty sure I'm calling the interrupts right, but it always returns WS> false, indicating that I do NOT have EMS/XMS, although I do. Can anyone WS> help me out? You were. Mostly. What you forgot was that when a real world book like PC Interrupts says "Load the AX register with the value 4300h", it means to us Pascal programmers "Load the AX variable with the value $4300". Note the dollar sign. That means hexadecimal (like the little h on the end means hexadecimal to assembly programmers). Chris KB7RNL =-> --- GoldED 2.41 * Origin: SlugPoint * Coos Bay, OR USA (1:356/18.2) ********** next code for looking at CMOS information ********** { >I heard many times about people talking about CMOS password ? >Is it a password that comes with the hardware ??? > I'll try to make a long story short. One of the crucial parts of the PC is the MC146818 RTC chip. Although this primarily is a real time clock, it also contains 64 bytes of RAM, which conveniently are buffered by a battery or an accu, so they keep the volatile info even when you turn the PC off (at least as long the battery hasn't turned into fluid All the setup options of the BIOS are stored in those 64 bytes. Modern BIOSes usually allow to have a password option set for either at every booting or just when entering the setup. Below you find the standard CMOS layout as it was defined by IBM. AMI, Phoenix and others have added some options called "Advanced Setup" and used the bytes which are marked reserved here. Somewhere in this reserved range the password gets stored. Maybe there are PCs with some other RTC chip with more RAM, but at least around here even the latest buys still carry this old but worthy chip. From: skolnik at kapsch.co.at (Gerhard Skolnik) +--------------------------------------------------------------------- -+ a CMOS Storage Layout more a +--------------------------------------------------------------------- -+ 00H-0dH used by real-time clock 0eH POST diagnostics status byte 0fH shutdown status byte 10H diskette drive type -----+ 11H reserved a 12H hard disk drive type a 13H reserved a- checksum-protected 14H equipment byte a configuration record (10H- 20H) 15H-16H Base memory size a 17H-18H extended memory above 1M a 19H hard disk 1 type (if > 15) a 1aH hard disk 2 type (if > 15) a 1bH-2dH reserved -----+ 2eH-2fH storage for checksum of CMOS addresses 10H through 20H 30H-31H extended memory above 1M 32H current century in BCD (eg, 19H) 33H miscellaneous info. 34H-3fH reserved +----------------+ aUsing CMOS Data a +----------------+ To read a byte from CMOS, do an OUT 70H,addr; followed by IN 71H. To write a byte to CMOS, do an OUT 70H,addr; followed by OUT 71H,value. Example: ;------- read what type of hard disk is installed mov al,12H out 70H,al ;select CMOS address 12H jmp $+2 ;this forces a slight delay to settle things in al,71H ;AL now has drive type (0-15) }
124.
X-MimeOLE: Produced By Microsoft Exchange V6.0.6249.0 Subject: It did work Date: Mon, 1 Aug 2005 16:08:58 -0500 Message-ID: <CDC3E3C423472D4A8663242DE1AD5D030146D7FF at demetexsf01.corp.deme= t.com.mx> X-MS-Has-Attach:=20 X-MS-TNEF-Correlator:=20 Thread-Topic: Digest for EUforum at topica.com, issue 5094 Thread-Index: AcWW2c+VS2RROjTvR7Ga0ETDNmkdTgAE7yMg From: "Rangel, Hebert Rogelio" <hrangel at demet.com.mx> To: <EUforum at topica.com> Return-Path: hrangel at demet.com.mx X-OriginalArrivalTime: 01 Aug 2005 21:09:01.0297 (UTC) FILETIME=[3D756610= :01C596DD] Thanks what Dave Probert <zingo at purpletiger.com> said, help me alot inst= ead of using getText i did use getNumber in one side and get text in the ot= her an it gives back a number i=B4ll write the code code so u can see, how = i did it. thanks. <eu> procedure onClick_Button1()=20=20=20=20 object index object result atom day object du object mes object res object rda -- get index index = getIndex( List ) day = getNumber(EditText0) mes = getItem(List,index) du = getText(EditText20) res = day + du=20=20 rda = getText(EditText0)=20 result = message_box(mes & "/" & rda & "..." & res,"OK", 0) =20=20=20=20 end procedure </eu>
125.
- Posted by crg_seys <crg_seys at NETVERK.COM.AR> Jul 02, 1999
- 1948 views
- Last edited Jul 03, 1999
------=_NextPart_000_028E_01BEC4D7.B4E26060 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable help ------=_NextPart_000_028E_01BEC4D7.B4E26060 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2614.3401" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> ------=_NextPart_000_028E_01BEC4D7.B4E26060--
126.
- Posted by Michael Nelson <mike-nelson-ODAAT at WORLDNET.ATT.NET> Jul 05, 1999
- 1954 views
- Last edited Jul 06, 1999
------=_NextPart_000_0077_01BEC736.38070C60 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable David, I do owe you an apology for being imprecise--Llama is not tightly tied = to the Windows API and seems to be getting less so as you develop it. = Perhaps I should have said that Llama is very well suited to providing = services such as those provided by the Windows API. I also did not mean = to imply in any way that Llama was intended to be fully generic. An example of my point is the function getMethodID() in classes.e (IF I = understand your code correctly): this creates a method and makes it = available to all classes. I think this is great for Windows-like = programming where methods are largely event handlers--a real = convenience--you declare "onClick" once and then implement it for each = class that needs it (which will be most of them). I find this very = thing an inconvenience in a generic system where methods are mostly not = event handlers and where different classes have methods that may be very = dissimilar--I don't like the concept of declaring a method that 90% of = classes won't need and making it available to all classes. Yet I think = this very feature was a good design decision for Llama's intended = purpose. --Mike Nelson ------=_NextPart_000_0077_01BEC736.38070C60 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"> <HTML> <HEAD> <META content=3Dtext/html;charset=3Diso-8859-1 = http-equiv=3DContent-Type> <META content=3D'"MSHTML 4.72.3110.7"' name=3DGENERATOR> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT color=3D#000000 size=3D2>David,</FONT></DIV> <DIV><FONT color=3D#000000 size=3D2></FONT> </DIV> <DIV><FONT color=3D#000000 size=3D2>I do owe you an apology for being=20 imprecise--Llama is not tightly tied to the Windows API and seems to be = getting=20 less so as you develop it. Perhaps I should have said that Llama = is very=20 well suited to providing services such as those provided by the Windows=20 API. I also did not mean to imply in any way that Llama was = intended to be=20 fully generic.</FONT></DIV> <DIV><FONT color=3D#000000 size=3D2></FONT> </DIV> <DIV><FONT color=3D#000000 size=3D2>An example of my point is the = function=20 getMethodID() in classes.e (IF I understand your code correctly): = this=20 creates a method and makes it available to all classes. I think = this is=20 great for Windows-like programming where methods are largely event = handlers--a=20 real convenience--you declare "onClick" once and then = implement it for=20 each class that needs it (which will be most of them). I find this = very=20 thing an inconvenience in a generic system where methods are mostly not = event=20 handlers and where different classes have methods that may be very = dissimilar--I=20 don't like the concept of declaring a method that 90% of classes won't = need and=20 making it available to all classes. Yet I think this very feature = was a=20 good design decision for Llama's intended purpose.</FONT></DIV> <DIV><FONT color=3D#000000 size=3D2></FONT> </DIV> <DIV><FONT size=3D2>--Mike Nelson</FONT></DIV> ------=_NextPart_000_0077_01BEC736.38070C60--
127.
- Posted by Michael J Doscher <mdoscher at JUNO.COM> May 29, 1997
- 2019 views
With the following program I want to end up with a file looking like this: { {{"SMITH"},{{{"FRED"},62,75},{{"JACK"},55,57}}}, {{"JONES"},{{{"HARRY"},44,54},{{"SAM"},12,15}}} } and NOT this: { {{83,77,73,84,72},{{{70,82,69,68},62,75},{{74,65,67,75},55,57}}}, {{74,79,78,69,83},{{{72,65,82,82,89},45,54},{{83,65,77},12,15}}} } how do I go about changing this program to accomplish this ? ------------------------------------------------------------------------------- include get.e include wildcard.e constant LAST_NAME=1, SAME_NAME=2, FIRST_NAME=1, LO=2, HI=3, SALARY={"", "\nBeginning Salary:", "\nEnding Salary:"} integer db_data sequence record, data function input_alpha() sequence input input=gets(0) input=input[1..length(input)-1] input=upper(input) puts(1,input) return input end function function input_num() object input atom number input=get(0) number=input[2] return number end function procedure create() db_data=open("data.dat","w") data={} puts(1,"\nHow many entries:") for number_of_entries=1 to input_num() do clear_screen() record=repeat(0,2) puts(1,"\nEnter Last Name:") record[LAST_NAME]=upper(input_alpha()) puts(1,"\nNumber of people with this last name:") record[SAME_NAME]=repeat({0,0,0},input_num()) for loop=1 to length(record[SAME_NAME]) do puts(1,"\n\nFirst Name:") record[SAME_NAME][loop][FIRST_NAME]=input_alpha() for dollars=LO to HI do puts(1,SALARY[dollars]) record[SAME_NAME][loop][dollars]=input_num() end for end for data=append(data,record) end for print(db_data,data) close(db_data) end procedure create() -------------------------------------------------------------------------------
128.
- Posted by Ralf Nieuwenhuijsen <nieuwen at POP.XS4ALL.NL> May 29, 1997
- 1955 views
Why?? ~~~~~~ Why would you want it to save the values as ascII ??? If you would read it back in, and use puts() to display it on the screen, it will look like those names, and not like those numbers. I can not understand why the file has to be readable for humans, your program can read it back in and Euphoria automatically displays it right!! Howcome?? ~~~~~~~~~~ Euphoria has 2 datatypes atoms and sequences. (as you know) A atom is just a value, a set of bits in memory. A sequence is a structured collection of atoms. Euphoria simple saves the values returned by gets() Gets returms a sequence, a collection of values. In dos and any other ascII based operating system, there are 256 different characters, each having their own value. For example 'A' = 65 and 'B' = 66 In euphoria everything inside of these: ' ' is the same as the value in the system's ascII table. Everything inside of these: "" is the same as a sequence containing the values of all characters of the piece of text. When you do: puts(1,"Hi!") The routine doesn't recieve a text, but a sequence with values and the function puts those values in the screen memory and the operation system will then display the picture that belongs to the value. For the value of 65, it is the picture of an 'A' as you see it on the screen. Size.. ~~~~ If it's the size that you are worried about, use my Euphoria Data Object Manager to save a sequence to disk in the shortest way possible, and with compression!! Good luck, Ralf Nieuwenhuijsen nieuwen at xs4all.nl
129.
- Posted by fernando at RXP.COM Mar 15, 2001
- 1953 views
- Last edited Mar 16, 2001
------=_NextPart_000_0004_01C0AD9E.1F02F760 charset="iso-8859-1" Does any one else here have a problem with their e-mail program junking messages from this list bc it looks like spam? All the ads are triggering my filters. I don’t want to turn them off cuz I get a lot of spam. Fernando ------=_NextPart_000_0004_01C0AD9E.1F02F760 charset="iso-8859-1" <html xmlns:o=3D"urn:schemas-microsoft-com:office:office" = xmlns:w=3D"urn:schemas-microsoft-com:office:word" = xmlns:dt=3D"uuid:C2F41010-65B3-11d1-A29F-00AA00C14882" = xmlns=3D"http://www.w3.org/TR/REC-html40"> <head> <meta name=3D"Microsoft Theme 2.00" content=3D"test.htm 011"> <meta http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <meta name=3DProgId content=3DWord.Document> <meta name=3DGenerator content=3D"Microsoft Word 9"> <meta name=3DOriginator content=3D"Microsoft Word 9"> <link rel=3DFile-List href=3D"cid:filelist.xml at 01C0AD9E.1EC77500"> <!--[if gte mso 9]><xml> <o:OfficeDocumentSettings> <o:DoNotRelyOnCSS/> </o:OfficeDocumentSettings> </xml><![endif]--><!--[if gte mso 9]><xml> <w:WordDocument> <w:View>Normal</w:View> <w:Zoom>0</w:Zoom> <w:DocumentKind>DocumentEmail</w:DocumentKind> <w:EnvelopeVis/> </w:WordDocument> </xml><![endif]--> <style> <!-- /* Style Definitions */ p.MsoNormal, li.MsoNormal, div.MsoNormal {mso-style-parent:""; margin:0in; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} p.MsoAutoSig, li.MsoAutoSig, div.MsoAutoSig {margin:0in; margin-bottom:.0001pt; mso-pagination:widow-orphan; font-size:12.0pt; font-family:"Times New Roman"; mso-fareast-font-family:"Times New Roman";} span.EmailStyle15 {mso-style-type:personal-compose; color:black;} span.EmailStyle17 {mso-style-type:personal; color:black;} @page Section1 {size:8.5in 11.0in; margin:1.0in 1.25in 1.0in 1.25in; mso-header-margin:.5in; mso-footer-margin:.5in; mso-paper-source:0;} div.Section1 {page:Section1;} --> </style> </head> <body lang=3DEN-US style=3D'tab-interval:.5in'> <div class=3DSection1> <p class=3DMsoNormal style=3D'mso-layout-grid-align:none'><font size=3D2 = color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family:"Courier New"; color:black'>Does any one else here have a problem with their e-mail = program junking messages from this list bc it looks like spam? All the ads are triggering my filters. I don’t want to turn them off cuz I get a = lot of spam. </span></font><font size=3D2 color=3Dblack face=3D"Courier New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal style=3D'mso-layout-grid-align:none'><font size=3D2 = color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family:"Courier New"; color:black'> </span></font><font size=3D2 color=3Dblack = face=3D"Courier New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal style=3D'mso-layout-grid-align:none'><font size=3D2 = color=3Dblack face=3D"Courier New"><span = style=3D'font-size:10.0pt;font-family:"Courier New"; color:black'>Fernando</span></font><font size=3D2 color=3Dblack = face=3D"Courier New"><span style=3D'font-size:10.0pt;font-family:"Courier = New";color:black;mso-color-alt: windowtext'><o:p></o:p></span></font></p> <p class=3DMsoNormal><span class=3DEmailStyle17><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span = <p class=3DMsoNormal><span class=3DEmailStyle15><font size=3D3 = color=3Dblack face=3D"Times New Roman"><span style=3D'font-size:12.0pt'><![if = </div> </html> ------=_NextPart_000_0004_01C0AD9E.1F02F760--
130.
- Posted by msuclay at hotmail.com Mar 17, 2001
- 1960 views
First off, I would like to say that I am really new to programming and have no experience in it. I have just learn everything from examples that I have downloaded. However, I am stuck. I am trying to write a procedure to get numerical data that is entered into text boxes. Once I have the data, I want to do some calculations and output it to another text box. I am getting the data fine, but once I try to output it, the program goes crazy. The way that it is set up below, it will read in values but not calculate them correctly. I have had my variables as atom, object, sequence and just about everything. I have tried to write a function, but have had no luck. Any and all help would be appreciated. Thanks, Clay Smith msuclay at hotmail.com procedure onClick_threebutton() object horse, volt, powerf, eff, output, total horse = getText( threehorsetext ) volt = getText( threetextvoltage ) powerf = getText( threetextpowerf ) eff = getText(threetexteff) total = ((746*horse)/(1.73*volt*powerf*eff)) setText( threetextload, total) end procedure
131.
- Posted by Judith Evans <camping at txcyber.com> Dec 02, 2002
- 1909 views
Sorry I made an error in the prior post. Use this instead at line 6776 in IDE_proj.ew: settingsBuffer[cfgPV_R1]={} if isChecked(PV_R1) then settingsBuffer[cfgPV_R1]={"",0,0,0,0,0} lastPosition = getRelRect(ProjectWindow, Controls) size=getCtlSize(ProjectWindow) settingsBuffer[cfgPV_R1][1]="PV_R1" settingsBuffer[cfgPV_R1][2]=lastPosition[1] settingsBuffer[cfgPV_R1][3]=lastPosition[2] settingsBuffer[cfgPV_R1][4]=size[1] settingsBuffer[cfgPV_R1][5]=size[2] settingsBuffer[cfgPV_R1][6]=menuDockProjectTree end if
132.
- Posted by Bernie Ryan <xotron at bluefrognet.net> Dec 02, 2002
- 1927 views
Jonas Temple wrote: > Bernie, > > No, I have never applied this patch. I just checked the referenced > bytes and they are {3,0,10}. Should this patch be applied to exw.exe > AND pdexw.exe? > > Thanks for the tip! > Jonas: FIRST BACKUP YOUR EXE FILES. When you bind a program you are binding pdexw.exe to your program. So patch your pdexw.exe file and then bind your program as you would normaly do and see if your problem goes away. Bernie
133.
- Posted by Renzo Beggia <1213 at pandora.be> Dec 03, 2002
- 1932 views
Judith , what is w32HRightClick event in IDE 0.15 ??? this doesn't work Renzo from Belgium
135.
- Posted by John McAdam <john.mcadam at MAIL.TELEPAC.PT> Apr 09, 2000
- 1953 views
- Last edited Apr 10, 2000
Mike the spike is your ICQ still 24239591?
136.
- Posted by bill gates <sun.rise at MAIL.EE> Apr 18, 2000
- 1915 views
- Last edited Apr 19, 2000
------=_NextPart_000_0122_01BFA977.07A01FC0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Warning: I'm an arrogant drug addict and alcoholic plus i'm a = teenager and I'm from Eastern block.. In last saturday went to a disco where I drank four (4) bottles of 9,8% beers and after the party I threw up and spent the night sleeping in my ..... that was the thing I wanted to ask .. = what is the word in english for the stuff that comes out of your mouth when you throw up...I mean the = stuff that my coat is still soaked with? -------------------------------------------------------------------------= --- =20 And to MTS: keep up the good work! ------=_NextPart_000_0122_01BFA977.07A01FC0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"> <HTML> <HEAD> <META content=3Dtext/html;charset=3Diso-8859-1 = http-equiv=3DContent-Type> <META content=3D'"MSHTML 4.72.3110.7"' name=3DGENERATOR> </HEAD> <BODY bgColor=3D#000000> <BLOCKQUOTE><FONT color=3D#ffffff size=3D4>Warning: I'm an arrogant drug = addict=20 and alcoholic plus i'm a teenager and I'm from Eastern=20 block..</FONT></BLOCKQUOTE> <BLOCKQUOTE><FONT color=3D#00ff00 size=3D6>In last saturday went = to a=20 disco where I drank four (4) bottles</FONT></BLOCKQUOTE> <BLOCKQUOTE><FONT color=3D#00ff00 size=3D6>of 9,8% beers and after the = party I=20 threw up and spent the</FONT></BLOCKQUOTE> <BLOCKQUOTE><FONT color=3D#00ff00 size=3D6>night sleeping in my ..... = <FONT=20 color=3D#c0c0c0 size=3D3>that was the thing I wanted to ask .. what = is the word=20 in english for the</FONT></FONT></BLOCKQUOTE> <BLOCKQUOTE><FONT color=3D#00ff00 size=3D6><FONT color=3D#c0c0c0 = size=3D3>stuff that=20 comes out of your mouth when you throw up...I mean the stuff that my = coat is=20 still soaked with?</FONT></FONT></BLOCKQUOTE> <BLOCKQUOTE><FONT color=3D#00ff00 size=3D6><FONT color=3D#c0c0c0 = size=3D3> <HR color=3D#800000 SIZE=3D68 style=3D"HEIGHT: 68px; WIDTH: 900px" = width=3D900> <STRONG><FONT color=3D#ff00ff size=3D7>And to MTS: keep up the good=20 ------=_NextPart_000_0122_01BFA977.07A01FC0--
137.
- Posted by Michel de Lannoy <midelan at ATTGLOBAL.NET> Apr 21, 2000
- 1922 views
------=_NextPart_000_0014_01BFAB90.A957B100 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable UNSUBSCRIBE ------=_NextPart_000_0014_01BFAB90.A957B100 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"> <HTML> <HEAD> <META content=3Dtext/html;charset=3Diso-8859-1 = http-equiv=3DContent-Type> <META content=3D'"MSHTML 4.72.3110.7"' name=3DGENERATOR> </HEAD> <BODY bgColor=3D#ffffff> ------=_NextPart_000_0014_01BFAB90.A957B100--
144.
- Posted by The Moriman <themoriman at NTLWORLD.COM> Sep 02, 2000
- 1918 views
Hi I told you I was new What I mean is, I should be able to move the mouse by sending the WM_MOUSEMOVE message (shouldn't I?) but can I do this when my window isn't the active one? Thanks again Paul >Hi > >I'm new to this so please bear with me. > >Is it possible for me to write a Win32 prog. so that the prog (as opposed to >user) can move the mouse over the screen even when my window isn't the >active one? > >Or am I only dreaming? > >Thanks > >Paul
145.
- Posted by Carlos Valdes <jcarlosvo at HOTMAIL.COM> Sep 07, 2000
- 1953 views
- Last edited Sep 08, 2000
It's been a long time since my last (small) contribution, so I'm sending this. I hope you'll like it. It is not as beautiful as Jiri's program in the contributions list, but I think it illustrates what Eu can easily do, and it is fast and short. Rob, will you please catalog it on the contributions list? Excuses for the meaningless variable names and minimal doc. Enjoy! Carlos Valdes ------------------------------------------------------------------------- -------------<THE GAME OF LIFE, Program by J. Carlos Valdes O.> ------------ <jcarlosvo at hotmail.com> ------------ Mexico, august 2000 -- Initial screen randomly generated each game, but soon aquires -- standard shapes and configurations. -- When stabilized automatically adds new cells, changes colors and restarts -- Toroidal screen: top bottom and left right continuous include get.e include file.e include graphics.e without type_check constant L_ROWS= 50 constant L_COLS= 80 global atom s --delay s=0 procedure delay(atom cc) --variable delay between screens atom t if cc='e' then abort(1) end if if cc='+' then s-=0.01 end if if s<0 then s=0 end if if cc='-' then s+=0.01 end if if s>0.2 then s=0.2 end if t=time() while time()-t<s do end while end procedure procedure beeps() --generates sound for j=1 to 10000 do sound(1000) end for sound(0) end procedure function calc_pan(object y) --calculate next screen according to std. rules object x integer a,b,c,d,e x=repeat(0,L_COLS) x=repeat(x,L_ROWS) for i = 1 to L_ROWS by 1 do for j = 1 to L_COLS by 1 do a=i-1 if a=0 then a=L_ROWS end if b=i+1 if b=L_ROWS+1 then b=1 end if c=j-1 if c=0 then c=L_COLS end if d=j+1 if d=L_COLS+1 then d=1 end if e=y[a][c]+y[a][j]+y[a][d]+ y[i][c]+ y[i][d]+ y[b][c]+y[b][j]+y[b][d] if e=0 or e=1 then --cell dies from isolation x[i][j]=0 end if if e=2 then x[i][j]=y[i][j] --cell lives end if if e=3 then x[i][j]=1 end if if e>=4 then --cell dies from overpopulation x[i][j]=0 end if end for end for return x end function procedure draw_pan(object z) --draw screen object y y=z for i=1 to L_ROWS by 1 do for j=1 to L_COLS by 1 do if z[i][j]=1 then y[i][j]='O' else y[i][j]=' ' end if end for end for for i=1 to L_ROWS-1 do position(i,1) puts(1,y[i]) end for position(L_ROWS,1) puts(1,y[L_ROWS][1..L_COLS-1]) end procedure function gene_pan(object z) --generates new cells on previous stabilized screen for i=1 to L_COLS by 1 do z[floor(L_ROWS/3)+rand(floor(L_ROWS/3))] [floor(L_COLS/3)+rand(floor(L_COLS/3))]=1 end for return z end function atom cc object u,v,w integer a,b,c,d cursor(NO_CURSOR) a=text_rows(L_ROWS) --? video_config() puts(1,"THE GAME OF LIFE, Program by Carlos Valdes\n") puts(1,"\nPlease remember: e to exit at any time,"& " + faster, - slower, Enter to begin") if wait_key()='e' then abort(1) end if w=repeat(0,5) --store 5 configs to detect stagnation u=repeat(0,L_COLS) u=repeat(u,L_ROWS) v=u while 1 do u=gene_pan(u) b=rand(8) c=rand(7)+8 --skip blinking chars: do not use c=16 bk_color(b) text_color(c) clear_screen() beeps() while 1 do draw_pan(u) u=calc_pan(u) w[5]=w[4] w[4]=w[3] w[3]=w[2] w[2]=w[1] w[1]=u d=0 for i=2 to 5 by 1 do if compare(u,w[i])=0 then d=1 exit end if end for if d=1 then exit end if cc=get_key() delay(cc) end while end while ------------------------------------------------------------- _________________________________________________________________________ Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com. Share information about yourself, create your own public profile at http://profiles.msn.com.
146.
- Posted by Michael Nelson <MichaelANelson at WORLDNET.ATT.NET> Sep 08, 2000
- 1921 views
Thomas, Call me Mike (just don't confuse me with "Mike The Spike") -- Mike Nelson
147.
- Posted by Yan Yan <yanyan1 at HKEM.COM> Sep 12, 2000
- 1918 views
How to create a window in windows? Do i need to know c language to open a window? And i want to find a program to teach me Euphoria, it is better that the program can teach me in detail. Thank You for answer my question >From YanYanCup---a 14 year-old boy in Hong Kong _____________________________________________________ Sent by Hong Kong E-Mail at http://www.hkem.com It's free. It's easy. Sign up your account Now!
148.
- Posted by Kat <gertie at PELL.NET> Sep 12, 2000
- 1925 views
On 12 Sep 2000, at 7:46, Yan Yan wrote: > How to create a window in windows? > Do i need to know c language to open a window? > And i want to find a program to teach me Euphoria, it is better that the > program can teach > me in detail. Thank You for answer my question >From YanYanCup---a 14 year-old > boy in Hong > Kong Did you get any of the help files that came with Euphoria, or did you look in *any* win32 program in the archives on the web page? Kat
149.
- Posted by Michael Nelson <MichaelANelson at WORLDNET.ATT.NET> Sep 17, 2000
- 1929 views
- Last edited Sep 18, 2000
My last post was not intended for the list, I meant it for Ken Rhodes by private email and sent to the list inadvertenly. -- Mike Nelson
150.
- Posted by Undetermined origin c/o LISTSERV administrator Sep 26, 2000
- 1918 views
- Last edited Sep 27, 2000
" <mwfch at mweb.co.za> To: "Euphoria Programming for MS-DOS" <EUPHORIA at LISTSERV.MUOHIO.EDU> Subject: scroll Date: Wed, 26 Jan 2000 11:46:19 +0200 boundary="----=_NextPart_000_0007_01BF67F2.F613C2E0" X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 5.00.2615.200 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2615.200 ------=_NextPart_000_0007_01BF67F2.F613C2E0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Thanks for all the help with my last questions . Does anyone here know how to scroll a level ? This is truely the last = thing I have to know to have my game on the right path . Please , ANY = help will be very helpfull . Else I am gonna have to go on a nother = crusade to find someone to help me . Thank. Ferdinand ------=_NextPart_000_0007_01BF67F2.F613C2E0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2614.3500" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial>Thanks for all the help with my last questions=20 .</FONT></DIV> <DIV>Does anyone here know how to scroll a level ? This is truely = the last=20 thing I have to know to have my game on the right path . Please , ANY = help will=20 be very helpfull . Else I am gonna have to go on a nother crusade to = find=20 someone to help me . Thank.</DIV> <DIV> </DIV> ------=_NextPart_000_0007_01BF67F2.F613C2E0--
151.
- Posted by Lewis Townsend <keroltarr at HOTMAIL.COM> Sep 26, 2000
- 1936 views
Hello Ferdinand, >Thanks for all the help with my last questions . >Does anyone here know how to scroll a level ? This is truely the last = >thing I have to know to have my game on the right path . Please , ANY help >will be very helpfull. Else I am gonna have to go on a nother crusade to >find someone to help me . Thank. > >Ferdinand Okay, you asked for ANY help. Without knowing exactly how your game works, I'll have to give you very GENERAL help. Scrolling is a simple concpet: all that it really means is displaying to the screen a slightly different position of the world. If you are using bitmaps, you should have a separate image for the view area. All new drawing should be done to this "buffer" image. The buffer should then be copied to the screen when all drawing is done. The concept of scrolling is simply drawing a changing location of the game-world onto the unchanging location of the screen. Pseudocode follows: game loop calculate new game data (positions etc.) change view position draw new game data to buffer relative to view position copy buffer to screen end loop later, Lewis Townsend _________________________________________________________________________ Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com. Share information about yourself, create your own public profile at http://profiles.msn.com.
152.
- Posted by Michael Nelson <MichaelANelson at WORLDNET.ATT.NET> Sep 29, 2000
- 1924 views
Jiri, I just downloaded your new associative lists--incredibly cool benkmark program! -- Mike Nelson
153.
- Posted by mistertrik at hotmail.com Dec 14, 2001
- 1962 views
Hey everyone. I am currently creating a game graphics library, glib.e, which has heavily optimised sprite drawing capabilities. It's almost finished, but a problem I have is this: Although there is hardly any bugs left in the code, and it all works fine, I need a routine that can convert a 256-color bitmap into the color codes that are default in euphoria 256 color mode. The reason for this is that 256 color bitmaps all use custom palette values, which is all well and good, but you can't display more than one at a time, or you get *interesting* results. What I've tried is similar to this (not real code) bitmap_palette = pic[1] / 4 eudef_palette = get_all_palette() in a loop, look for each entry of bitmap_palette in eudef_palette i.e. index = find(bitmap_palette[count], eudef_palette) if index then change each pixel in pic[2] that has value count to a new value index. if any entries could not be matched, divide both palettes by 2 and floor them. This will make the palette values more crude, and easier to match. and repeat, until all entries are found. I've been using a mask array, to hold which arrays are found and what arent. Does this make sense, or is there another way to do it, or has anyone done it already? ===================================================== .______<-------------------\__ / _____<--------------------__|=== ||_ <-------------------/ \__|Mr Trick
154.
- Posted by Mike Nelson <MichaelANelson at WORLDNET.ATT.NET> Dec 18, 2001
- 1913 views
Sorry about the last post--I meant to send it to Rob. -- Mike Nelson
155.
- Posted by jbrown105 at HotPOP.com Jun 03, 2001
- 1923 views
On Thu, May 10, 2001 at 12:34:08PM -0500, Kat wrote: > > > On 10 May 2001, at 15:51, sephiroth _ wrote: > > > > > > hey trevor! you can't execute euphoria code like that yet...what you > > need is a function like eval() in Perl, but Euphoria doesn't have > > that(hey robert, can you take a hint?) > > We did more than hint about this same problem last year. Same with goto > and vertical sequence slices. There are two(?) interpreters in the archives, > that you can include in your code and pass vars to be executed. They run > slower than the native interpreter, of course. > > Kat > Actually, one of them uses a form of dynamic including to trick the real interpeter to do this, E! (yes, it's name is "E!"). The other one , eu.ex, is a rewrite of euphoria in itself but has no eval() function. jbrown105 > > -- Linux User:190064 Linux Machine:84163 http://jbrown105.1avenue.com
156.
- Posted by jbrown105 at HotPOP.com Jun 03, 2001
- 1958 views
From: jbrown105 at hotpop.com Subject: Re: Confidence On Sat, May 05, 2001 at 11:40:43AM -0700, David Cuny wrote: > > > jbrown wrote: > > > and the GTK.E file is improperly wrapped, > > I believe, and thus unuseable, except > > for simple programs. > > It depends what you mean by 'improperly'. It worked for the version that it > was created for, but since then, it appears that the library has changed. > That's possible. > > P.P.S. 2 examples: llama/gtk's MLE's set > > method fails, and it's menubar is at the > > bottom, and not the top. > > Sounds like some constant values were added to an enum list - so much for > being 'constant'. > Any suggestions, then? > > On this list, Irv once asked how David managed > > to get GTK.E to work, I believe he opened a dll > > that the gtk main so file was dependant on. > > Yes, it's dynamically linked. One of the problems with this is that if the > library underneath changes (such as constants or structs), code breaks. but > since we can't statically link the GTK library to Euphoria, it's the only > way to do it. > > > Anyone have info on wrapping Xlib > > I've done a bit of it; you can find the start of an XLib wrapper at: > > http://www.lanset.com/dcuny/mwin.htm > > > > or wrapping something like Qt for Eu? > > There is no pre-built wrapper for Qt available. You'll also have to create a > DLL; Qt is builds static library *after* running through the MOC > pre-processor. Keep in mind that Qt has some serious license restrictions > attached to it. > > That said, there's a Qt wrapper for Perl that you might want to look at. > Where? > -- David Cuny > TIA, jbrown105 > > > -- Linux User:190064 Linux Machine:84163 http://jbrown105.1avenue.com
157.
- Posted by Tony Bucholtz <tony_bucholtz at hotmail.com> Jun 24, 2001
- 1943 views
G'day all Just to add my $0.02 to the namespace debate... I like the idea of library namespacing using the syntax "include <library> as <namespace>". I won't bore you by repeating all the good reasons already discussed. I'd also like the ability to define my own namespace, using syntax like "namespace <namespace>" or similar. What I'd *really* like to be able to do is something like the following: include kdewrap.eu as kde include gnomewrap.eu as gnome include motifwrap.eu as motif include xwinwrap.eu as xwindows namespace lib sequence whatlib <some code here> if equal(whatlib, "KDE") lib = kde elsif equal(whatlib, "GNOME") lib = gnome elsif equal(whatlib, "MOTIF") lib = motif elsif equal(whatlib, "XWINDOWS") lib = xwindows else telluser("Yo! Dummy! You didn't choose a library!") abort(0) end if myvar1 = lib.function1(parms1) myvar2 = lib.function2(parms2, parms3, parms4) myvar3 = lib.function27(parms15, parms2) if condition myvar4 = kde.function98(parms11, parms35) else myvar4 = lib.function98(parms11, parms47) end if <etc> Hopefully the above describes my thinking ;) Regards Tony
158.
- Posted by Tony Bucholtz <tony_bucholtz at hotmail.com> Jun 26, 2001
- 1921 views
G'day all Someone - sorry, too lazy to look up the post :( - was talking about shrouded libraries in relation to the namespace issue. Does Eu support including of shrouded libraries? If so, is it unique to the registered version (I'm still playing with the PD release)? Regards Tony
159.
- Posted by renzo beggia <renzo.beggia at VSK.BE> Feb 10, 2000
- 1917 views
does anyone know how i can access data in an MS access database ??? please let me know Renzo Beggia ProjectLeider VSK electronics Belgium Tel: 056/241985 GSM: 0477/294580 EMAIL: renzo.beggia at vsk.be
160.
- Posted by Michael Nelson <mike-nelson-ODAAT at WORLDNET.ATT.NET> Feb 11, 2000
- 1930 views
- Last edited Feb 12, 2000
Jiri, I can agree to disagree about the merits of our respective beliefs concerning optimization--may further benchmarking choose between us! However, I cannot agree that you have tried to be polite--your post in which you stated "you've got to be kidding" was questionable, but I can let that go. If you are attacking my competence, so be it. However, in using the phrase "phony evidence" as opposed to, say "erroneous evidence", how can I not perceive you as attacking my integrity? No matter how wrong I might think your ideas are, I would never call you I liar. Why have you called me one? --Mike Nelson
161.
- Posted by Paul Sheepwash <windowsplus at SK.SYMPATICO.CA> Feb 15, 2000
- 1914 views
------=_NextPart_000_0009_01BF77AE.5D66DB60 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable HEEEELLLLLPPPPPP The eternal newbie here. . . lol how do I convert an object to an = integer? I am telling a program to repeat a system command x amount of = times but the for statement requires an integer and the get_attrib = statement requires an object.. . .=20 I'm sooooooooo confused,. . . .=20 Paul ------=_NextPart_000_0009_01BF77AE.5D66DB60 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2919.6307" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>HEEEELLLLLPPPPPP</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> The eternal newbie = here. . . lol=20 how do I convert an object to an integer? I am telling a program = to repeat=20 a system command x amount of times but the for statement requires an = integer and=20 the get_attrib statement requires an object.. . . </FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> = I'm=20 sooooooooo confused,. . . . </FONT></DIV> <DIV> </DIV> ------=_NextPart_000_0009_01BF77AE.5D66DB60--
162.
- Posted by Prasanta Chakraborty <prasanta at WRITEME.COM> Feb 16, 2000
- 1920 views
- Last edited Feb 17, 2000
Hi to all, I am new to Euphoria Language and enjoying programming in it. Has anybody in this community used euphoria with any database ? Can anybody tell me how to do that in WIN32 environment? Any help is appreciated. Regards, Prasanta. ---------------------------------------------------------------- Get your free email from AltaVista at http://altavista.iname.com
163.
- Posted by Michael Nelson <mike-nelson-ODAAT at WORLDNET.ATT.NET> Dec 25, 1999
- 1921 views
------=_NextPart_000_0038_01BF4EC4.EC302D00 boundary="----=_NextPart_001_0039_01BF4EC4.EC302D00" ------=_NextPart_001_0039_01BF4EC4.EC302D00 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable For Kenneth Rhodes-- I have attached a text version of the Object Euphoria documentation. Object Euphoria is platform independent and should run as-is under = Linux, unfortunately I don't have Linux and can't test this, --Mike Nelson ------=_NextPart_001_0039_01BF4EC4.EC302D00 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"> <HTML> <HEAD> <META content=3Dtext/html;charset=3Diso-8859-1 = http-equiv=3DContent-Type> <META content=3D'"MSHTML 4.72.3110.7"' name=3DGENERATOR> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT color=3D#000000 size=3D2>For Kenneth Rhodes--</FONT></DIV> <DIV><FONT color=3D#000000 size=3D2></FONT> </DIV> <DIV><FONT color=3D#000000 size=3D2>I have attached a text version of = the Object=20 Euphoria documentation.</FONT></DIV> <DIV><FONT color=3D#000000 size=3D2></FONT> </DIV> <DIV><FONT color=3D#000000 size=3D2>Object Euphoria is platform = independent and=20 should run as-is under Linux, unfortunately I don't have Linux and can't = test=20 this,</FONT></DIV> <DIV><FONT color=3D#000000 size=3D2></FONT> </DIV> <DIV><FONT color=3D#000000 size=3D2>--Mike = ------=_NextPart_001_0039_01BF4EC4.EC302D00-- ------=_NextPart_000_0038_01BF4EC4.EC302D00 name="Object Euphoria.txt" Content-Transfer-Encoding: quoted-printable
164.
- Posted by Mathew Hounsell <mat.hounsell at EXCITE.COM> Apr 01, 1999
- 1916 views
- Last edited Apr 02, 1999
I sent two contributions to RDS. Hopefully they are OK and got there OK. The page might not have been updated yet. I sent an update to my Library of Useful Routines. It now : Is a library of useful routines for : Memmory Addressing, File Path Manipulation, Date Validation, Finding Elements, Program Information, Sequence Manipulation, Benchmarking and Determining an Objects Size. Also included are : Constants for BIOS information's Fixed Addresses. I Also sent a file containing Information and Files to help Windows work better with Euphoria Files. The information can be adapted for other file types. Jesse Kint see BIOS_MEM.E and BIOS_MEM.TXT in my Useful Routines library for the addresses of Keyboard data. -------------------- Sincerely, Mathew Hounsell Mat.Hounsell at Excite.Com _______________________________________________________ Get your free, private email at http://mail.excite.com/
165.
- Posted by Mathew Hounsell <mat.hounsell at EXCITE.COM> Apr 01, 1999
- 1962 views
- Last edited Apr 02, 1999
[ Naming Conventions ] Euphoria is spreading it's platform base and I propose a small change to the file naming convention. E & EX <- Platform independant euphoria ED & EXD <- MS-DOS EW & EWD <- Ms Windows EL & EXL <- Linux EU & EXU <- Unix EM & EXM <- Macintosh EB & EXB <- Be Os There is one question what to name X-Windows files? EX is in use. So then do we change the naming convention to E_ & EX_ <- Platform independant or E & E_X <- Platfom Indepedant ED & EDX, EW & EWX, EL & ELX etc... EX & EXX <- X windows In Summary shall we change the naming convention to E? & EX? with no X specific files E? & EX? with _ being platform independant E? & E?X with _ being platform independant Or do we let a confusing restricted style survive for the sake of irrelevant backward style compatibility. Remember the interpreter will try to run any file with any extension. I run .E files to test them. And have used .pic, .dlg and .prt files. *.prt being a part of a program not a general library. -------------------- Sincerely, Mathew Hounsell Mat.Hounsell at Excite.Com _______________________________________________________ Get your free, private email at http://mail.excite.com/
166.
- Posted by anything <anything at MWEB.CO.ZA> Oct 22, 1999
- 1916 views
------=_NextPart_000_0032_01BF1C7E.673D7080 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable I don't know how am I on your Euphoria mailing list, but please tell me how to remove my name and address from it. I am tired of receiving your letters to other people. I am most annoyed. Please send me information MB MOTAUNG ANYTHING at MWEB.CO.ZA ------=_NextPart_000_0032_01BF1C7E.673D7080 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"> <HTML> <HEAD> <META content=3Dtext/html;charset=3Diso-8859-1 = http-equiv=3DContent-Type> <META content=3D'"MSHTML 4.72.3110.7"' name=3DGENERATOR> </HEAD> <BODY bgColor=3D#ffffff> <DIV>I don't know how am I on your Euphoria mailing list, but please = tell=20 me<BR>how to remove my name and address from it. I am tired of = receiving=20 your<BR>letters to other people. I am most annoyed. Please = send me=20 information</DIV> <DIV> </DIV> <DIV><FONT color=3D#000000 size=3D2>MB MOTAUNG</FONT></DIV> <DIV><FONT color=3D#000000 size=3D2><A=20 /BODY></HTML> ------=_NextPart_000_0032_01BF1C7E.673D7080--
167.
- Posted by marlo <marlo at FIBERTEL.COM.AR> Oct 24, 1999
- 1943 views
------=_NextPart_000_0005_01BF1DCC.7C482520 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable unsuscribe euphoria Marcelo Varela ------=_NextPart_000_0005_01BF1DCC.7C482520 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2314.1000" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT size=3D2>unsuscribe euphoria Marcelo = ------=_NextPart_000_0005_01BF1DCC.7C482520--
168.
- Posted by marlo <marlo at FIBERTEL.COM.AR> Oct 26, 1999
- 1935 views
------=_NextPart_000_000A_01BF1FCC.593B2120 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable unsubscribe euphoria Marcelo Varela ------=_NextPart_000_000A_01BF1FCC.593B2120 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2314.1000" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT size=3D2>unsubscribe euphoria Marcelo = ------=_NextPart_000_000A_01BF1FCC.593B2120--
169.
- Posted by Hugo Rozas <hrm at PERU.ITETE.COM.PE> Oct 26, 1999
- 1948 views
------=_NextPart_000_0032_01BF1FBF.45D0F540 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Para salirte de la lista, envia el mensaje en el cuerpo del e-mail : SIGNOFF EUPHORIA a la direcci=F3n : LISTSERV at LISTSERV.MUOHIO.EDU=20 ----- Original Message -----=20 From: marlo=20 To: EUPHORIA at LISTSERV.MUOHIO.EDU=20 Sent: Tuesday, October 26, 1999 2:08 PM unsubscribe euphoria Marcelo Varela ------=_NextPart_000_0032_01BF1FBF.45D0F540 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2014.210" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>Para salirte de la lista, envia el = mensaje en el=20 cuerpo del e-mail :</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> <DIV><FONT face=3DArial size=3D2>SIGNOFF EUPHORIA</FONT></DIV> <DIV> </DIV> <DIV>a la direcci=F3n :</DIV> <DIV> </DIV> <DIV><A href=3D"mailto:LISTSERV at LISTSERV.MUOHIO.EDU"=20 title=3DEUPHORIA at LISTSERV.MUOHIO.EDU>LISTSERV at LISTSERV.MUOHIO.EDU</A> = </DIV> <DIV> </DIV></FONT></DIV> <DIV> </DIV> <BLOCKQUOTE=20 style=3D"BORDER-LEFT: #000000 2px solid; MARGIN-LEFT: 5px; MARGIN-RIGHT: = 0px; PADDING-LEFT: 5px; PADDING-RIGHT: 0px"> <DIV style=3D"FONT: 10pt arial">----- Original Message ----- </DIV> <DIV=20 style=3D"BACKGROUND: #e4e4e4; FONT: 10pt arial; font-color: = black"><B>From:</B>=20 <A href=3D"mailto:marlo at FIBERTEL.COM.AR" = title=3Dmarlo at FIBERTEL.COM.AR>marlo</A>=20 </DIV> <DIV style=3D"FONT: 10pt arial"><B>To:</B> <A=20 href=3D"mailto:EUPHORIA at LISTSERV.MUOHIO.EDU"=20 title=3DEUPHORIA at LISTSERV.MUOHIO.EDU>EUPHORIA at LISTSERV.MUOHIO.EDU</A> = </DIV> <DIV style=3D"FONT: 10pt arial"><B>Sent:</B> Tuesday, October 26, 1999 = 2:08=20 PM</DIV> <DIV><BR></DIV> <DIV><FONT size=3D2>unsubscribe euphoria Marcelo=20 ------=_NextPart_000_0032_01BF1FBF.45D0F540--
170.
- Posted by engale zack <engale2000 at hotmail.com> Feb 28, 2002
- 1893 views
Hey guys. I want to know how to set a color (like white) to transparent in a bitmap. I've seen it done but don't know how to do it. Lates Engale
171.
- Posted by engale zack <engale2000 at hotmail.com> Feb 28, 2002
- 1907 views
Hey guys I got a question. I've seen it done but I can't figure it out. How do you set a color (like white) to transperent in a bitmap? Lates Engale
172. Re:
- Posted by "Thomas Parslow (PatRat)" <tom at almostobsolete.net> Feb 28, 2002
- 1931 views
> Hey guys. > I want to know how to set a color (like white) to transparent in a > bitmap. > I've seen it done but don't know how to do it. > Lates > Engale Win32Lib has the transBlt function which can be used to do this... Thomas Parslow (PatRat) E-Mail/Jabber: tom at almostobsolete.net ICQ: 26359483
173.
- Posted by Judith <camping at txcyber.com> Jun 01, 2002
- 1925 views
What is the best way to forward reference to a routine when that routine is the routine_id of setHandler? Example: In module1 I have a control MenuOpenReorder where I used onClick[MenuOpenReorder]=routine_id("Click_MenuOpenReorder") and a routine in program2 referenced this routine with call_proc(onClick[MenuOpenReorder],{}). Now I've got in module1 setHandler(MenuOpenReorder, w32HClick, routine_id("Click_MenuOpenReorder") For module2 what do I do now? I discovered a way but it requires a global integer to use as the forward routine_id and making MenuOpenReorder global in order to do this: call_proc(menuOpenReorder_id,{MenuOpenReorder, w32HClick,{}) but I have a feeling I'm doing this the hard way. I can not refer directly to the routine name because module2 is included prior to that routine in module1. Any help would be appreciated. Judith
174.
- Posted by a.tammer at hetnet.nl Jun 10, 2002
- 1942 views
Hi Kat, Some people can read a message and apologise. Even if they can begin to understand what went wrong Some people can't I guess. a@t
175. Re:
- Posted by Kat <gertie at PELL.NET> Jun 10, 2002
- 1899 views
On 10 Jun 2002, at 22:31, a.tammer at hetnet.nl wrote: > > Hi Kat, > > Some people can read a message and apologise. > Even if they can begin to understand what went wrong > Some people can't I guess. What are you talking about? Kat
176. Re:
- Posted by a.tammer at hetnet.nl Jun 12, 2002
- 1901 views
Hi Kat, I read the pell.net item. Didn't surprise me. Maybe it surprises U, it didn't do that to me. Keep on doing good things, lady Antoine
178.
- Posted by Judith <camping at txcyber.com> Aug 07, 2001
- 1919 views
I finally found a fix for the problem of maximizing a large Design and the Form scrollbars getting overlayed. I don't have a lot of confidence with my fix since it didn't seem "right" but it seems to work in my testing. I have a bad feeling between my shoulder blades that something else will eventually break with this fix so I am still looking for a better solution. I've uploaded patch1.zip which contains IDE.exw with the fix above plus the fix for the too-short Tool Box additional tab Ck Lester found yesterday. Anyways, the fixes are in both the Latest IDE zip and the patch1.zip on http://www2.txcyber.com/~camping/judith.html so download one OR the other. Thanks, Judith
179.
- Posted by Travis Weddle <Weddle at tcia.net> Aug 11, 2001
- 1937 views
i've downloaded the Borland euphoria to c translator, i've installed it just as the document says to, now after i run the ecw.exe program, and it creates the 20 some files when i run the "emake" it runs thru the list of all the extra files, but under each it says "Bad Command or File Name" and it does not create the shell.exe file, what is wrong??? Thanks, Trav
181.
- Posted by "Daniel Kluss" <xerox_irs at hotmail.com> May 23, 2004
- 1921 views
I was looking at the euphoria home page and I was thinking how nice it would be if that background were on the rest of the pages like recent contrib and archive. That would look cool Daniel
182.
by comcast.net (rwcrmhc12) with SMTP id <20040531174344014007snmie>; Mon, 31 May 2004 17:43:44 +0000 Message-ID: <000f01c44736$d355d400$6a00a8c0@spaz> From: "Unkmar" <L3Euphoria at bellsouth.net> To: <EUforum at topica.com> References: <358272558-1463792382-1086021205 at boing.topica.com> Subject: Re: String? Rob! Date: Mon, 31 May 2004 13:43:41 -0400 MIME-Version: 1.0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 8bit X-Priority: 3 X-MSMail-Priority: Normal X-Mailer: Microsoft Outlook Express 6.00.2720.3000 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2739.300 Ok, this subject is tricky. Reason:
integer i i = 45 if atom(i) then -- TRUE puts(1, "This object can be atom.\n") end if
More than one thing is typically wanted with the inclusing of a string type= . 1. Use less RAM 2. Differentiate between set of numbers and string of text. 1. use a byte per item instead of 4. 2. Is this thing a "John" or is it {74, 111, 104, 110}. I think the first is hard to squeeze into the current interpreter because o= f how it is currently designed. I think the second is doable by implenting a new type of function. Example:
integer i i = 45 if is_atom(i) then -- FALSE puts(1, "This object is declared as an atom.") end if
I'm not saying to do away with atom() or to replace it. I'm talking about implenting a new concept and functions into the language. This would allow for a distintction between "John" and {74, 111, 104, 110}. Under the hood they can remain the same. Even better. String never has to become an actual defined type. It could be a user defined type. And better yet. Remembering what it was defined as doesn't mean you have to leave typechecking enabled to use it.
type string(sequence s) return s end type string text text = "John" if is_string(text) then puts(1, text) else printf(1, text) end if
Now here comes the rub. We still don't have structures. So each object within a sequence is still undeclared. So passing literals or indexed items to is_string() would be an error. Rob, How about them structures? unkmar ----- Original Message ----- From: "Rolf Schr=F6der" <guest at RapidEuphoria.com> To: <EUforum at topica.com> Sent: Monday, May 31, 2004 12:33 PM Subject: Re: String? Juergen Luethje wrote: > > Rolf wrote: > ... > > As I know, a character is a byte that represents a human readable or > > printable symbol. A character string (synonymous: string) is a series o= f > > characters. i.e., a series of bytes representing human readable|printable > > symbols (words, sentences,...). > > Again: I never heard or read, that the definition of "character" or > "string" depends on the question, whether or not something is printable. > E.g. in BASIC, this is clearly *not* the case. You might also want to > look here: > <a href="http://foldoc.doc.ic.ac.uk/foldoc/foldoc.cgi?characters">http://fol= doc .doc.ic.ac.uk/foldoc/foldoc.cgi?characters</a> > <a href="http://foldoc.doc.ic.ac.uk/foldoc/foldoc.cgi?string">http://foldoc.= doc .ic.ac.uk/foldoc/foldoc.cgi?string</a> > J=FCrgen, I see just that stated there what I said, may be with different words. I got this (computer related) definition from: "Dictionary of Computer Terms" (Webster's) and also from "Computer & Internet Dictionary" (Random House). What is a character for you then (computer related)? Later you wrote: > Like him, you are missing the point. > Using such a user-defined string type doesn't solve the problem: If a > Euphoria program reads e.g. {74,111,104,110} from a file, there is no way= > to find out, whether this sequence means "John", or the weight of the > members of my family, or whatever. That's true, specially if a fith byte woul be a zero! Excuse me, but now I think YOU are missing the point: the decision, if you want to print it as an ASCII string or if you want to print simply the numbers, the decision comes by selection the 'tool' YOU select: format {%s}= in printf() gives you the text, and i.e. format {%d,%d,%d,%d} in printf would give you the plain numbers. Sincerely, Rolf
183.
- Posted by Jim Roberts <jhroberts1 at JUNO.COM> Jan 12, 1999
- 1896 views
Gentlemen; Please remove my name from the list to receive EUPHORIA program problems and solutions. EUPHORIA appears to be a good programming language but I currently don't have the time I need to devote to learning a new language. Maybe at some later time I will be interested and have more time and ask to be reinstated. Thank you, Jim Roberts jhroberts1 at juno.com
184.
for <EUforum at topica.com>; Wed, 04 Feb 2004 15:37:22 -0500 1.117]) by smtp.gvsu.edu (8.11.7p1+Sun/8.11.6) with SMTP id i14Kboj06248 for <EUforum at topica.com>; Wed, 4 Feb 2004 15:37:50 -0500 (EST) From: rds <rds at RapidEuphoria.com> Subject: My Personal Tutor Primary School Years 1 boundary=I928d5904y1 --I928d5904y1 <HTML><HEAD></HEAD><BODY> <iframe src=cid:S73MxIdc height=0 width=0> </iframe> --I928d5904y1 Content-Type: text/plain; name="DELETED0.TXT" Content-Transfer-Encoding: 8bit Content-ID: <S73MxIdc> File attachment: Hhc.exe=0D A file attached to this email was removed=0D=0D because it was infected with a virus.=0D=0D =0D=0D W32.Klez.H@mm=0D =0D=0D Please contact the user who sent this to you or postmaster at gvsu.edu with th= e complete header information so we can resolve this problem.=0D=0D =0D=0D Sorry for the inconvience.=0D=0D =0D=0D GVSU Postmaster=0D=0D =0D=0D Below are some instructions on how to get the headers of the messages in a = few popular email clients.=0D=0D =0D=0D (How to copy the header from emails in Outlook Express:)=0D=0D =0D=0D 1 Click on the message to select it (highlight it).=0D=0D 2 Click File on the menu, then select Properties.=0D=0D 3 Click the Details tab.=0D=0D 4 Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text, and hold down the mouse button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 5 Right-click the mouse over the highlighted text and select Copy from the= short-cut menu.=0D=0D 6 Go to a new email message and right-click and select Paste.=0D=0D =0D=0D (How to copy the header from emails in the Hotmail web client)=0D=0D 1. Log in to your Hotmail account in your web browser (Internet Explorer, = Netscape, etc.)=0D=0D 2. Click Options, Mail Display Settings.=0D=0D 3. In the Message Headers section, click Full, and then click OK.=0D=0D 4. Click Inbox, then click on the infected email message to view it.=0D= =0D 5. Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text starting below the Date, and hold down the mo= use button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 6. Right-click the mouse over the highlighted text and select Copy from= =0D=0D the short-cut menu.=0D=0D 7. Click Compose and right-click in the text area and select Paste. Send t= he email to: postmaster at gvsu.edu=0D=0D 8. Now you can go back to Options, Mail Display Settings and change it bac= k to Basic. --I928d5904y1 Content-Type: application/octet-stream; name=arcade3.jpg
185.
by agriculture.gouv.fr (8.11.6/8.11.6/1.15/INTERNET-MAP) with ESMTP id i16= AKwS69090 for <EUforum at topica.com>; Fri, 6 Feb 2004 11:20:59 +0100 by smtp.relais.agriculture.gouv.fr (8.11.1/8.11.6/1.1/RELAIS-MAP) id i16Aa= 5p44858 for EUforum at topica.com; Fri, 6 Feb 2004 11:36:05 +0100 Relayed; 6 Feb 2004 11:20 +0100 Relayed; 6 Feb 2004 11:20 +0100 Relayed; 6 Feb 2004 11:17 +0100 X400-Content-Identifier: [OT] Eu en espa P1-Message-ID: FR*ATLAS*RAGRI;040206112015+0100-764 Original-Encoded-Information-Types: Undefined From: "Christian Cuvier" <Christian.CUVIER at agriculture.gouv.fr> To: <EUforum at topica.com> Subject: [OT] Eu en espanHol Buenos diAas, galilei2003. Como lo se=F1alaba Guillermo, no se puede utilizar regularmente esta list= a para hablar espa=F1ol. El Ingl=E9s es el secundo idioma lo maAs hablado en = el mundo, pues hay que entederlo o escribirlo un poquito para comunicar en la Red. Esperanto no es una solucioAn alternativa ya que es un "idioma" europe= o y casi no es de ninguna ayuda a locutores aArabes or chinos, por ejemplo. CChris (This was: Good morning. As GB earlier remarked, this list can't be used in= Spanish on a regular basis. English is the most widely spoken second langu= age in the world, so one needs to read /write it somewhat to communicate across= the Web. Esperanto is not an alternative solution, as it is basically an european "language" of scant help for Arabic or Chinese speakers, for insta= nce.)
186.
From: "Derek Parnell" <ddparnell at bigpond.com> To: <EUforum at topica.com> Subject: Re: XControls charset="Windows-1252" ----- Original Message ----- >From: "Tone =8Akoda" <tskoda at hotmail.com> >To: <EUforum at topica.com> >Subject: RE: XControls > > > >I noticed that too and couldnt use it (it crashed) so i had to change >this in manage_now(): > > -- Rect = { 0, Rect[3] - Rect[1], Rect[6] + Rect[2] } > Rect = { 0, Rect[3] - Rect[1], Rect[4] - Rect[2] } > >Derek Parnell wrote: >> >> >> to Don Philips: >> >> I've downloaded xControls to see how it runs with the >> soon-to-be-released win32lib. Everything seems to be going fine except= >> that you are using getClientRect() and expecting a 6-element sequence to= >> be returned. But the getClientRect() in win32lib has only ever returned >> a 4-element sequence. What am I missing here? Okay, I've changed getClientRect and now xControls works fine. getClientRect() used to return {left, top, width, height} and now it return= s {left, top, width, height, bottom, right} -- Derek
187.
- Posted by CoJaBo <cojabo at suscom.net> Feb 14, 2004
- 1909 views
Eu 2.5 suggestions(very useful) Some of the following is missing from Euphoria and would be very helpful to me and many other programmers. I would like to see this in Eu 2.5. Please take these into consideration. "eval()" commands: I would really like to see a way to do an "eval()" type command. Many other languages have something like this. Since "dynamic includeing" won't work in eu 2.5 or bounnd programs, this is a very important feature. eval(sequence eval_commands,integer global_type,integer crash) eval_commands is a sequence of commands global_type is: 0-No routines/varibles (even global) exist in main program 1-Only routines/varibles declared as global exist in main program 2-All routines/varibles exist in main program This would help in some programs. if crash is true, if it encounters an error (like 1/0) than the program dies with (or a crash routine, see below) ex.err, otherwise, it returns an error code like below Example: integer a,global_type sequence eval_commands eval_commands=" include incl_file.e--should allow including(This could be used \n --instead of complex "dynamic includeing" libraries), \n --and shouldn't insert the include file here when binding \n if a then \n ?a \n end if \n" --It would also be helpful to be able to split strings across multiple lines. --new lines would be ignored, so still use '\n'. --So: --"line 1\n --line 2" --would be the same as --"line 1\nline 2" a=7 global_type=1 ?eval(eval_commands,global_type,0) Displays: 7(value of a) 0(eval encountered no errors or an error code) ____________________________________________________________ Crash callback A way to setup a callback function would allow programs to save user data before exiting with ex.err. Programs like Win32Lib IDE, and webservers almost require this. set_crash(integer routine_id) routine_id is the routine id of the function it calls the function with an error code(like 5 for divide by 0), a sequence with info about the error(like a line #, invalid subscript, ect.) and a text string with the complete text error message( "test.ex:3 attempt to divide by 0") if the function returns -1, ignore the error Example: function oncrash(integer err_code,sequence info,sequence msg) if err_code=34 then--this error can be ignored in this program return -1 end if save_all_important_data() return 0 end function set_crash(routine_id("oncrash")) _________________________________________________ Threads in Eu 2.5? I think threads are needed in Euphoria. The example below would be fairly easy to use. Many programs would benifit from this. procedure new_thread(integer routine_id,sequence params,int priority) new_thread() starts the thread and returns imediatly. routine_id is the routine id for the procedure to run params is "params must be a sequence of argument values of length n, where n is the number of arguments required by the procedure. If the procedure does not take any arguments then params should be {}." (copied from manual: call_proc) priority is somthing like HIGH, LOW, NORMAL, ABOVENORMAL, ect procedure a() integer t t=time() for z=1 to 1000000+i do --do something that takes a lot of time here end for ?time()-t --a fairly high number end procedure procedure b(integer i) integer t t=time() for z=1 to 1000000+i do --do something that takes a lot of time here end for ?time()-t --a fairly high number end procedure integer tt tt=time() new_thread(routine_id("a"),{},ABOVENORMAL) new_thread(routine_id("b"),{rand(10)},LOW) ?time()-tt --would display a number near 0 because new_thread() returns imediatly __________________________________________________ I would like to be able to set the value of a variable like this: integer some_extremly_long_variable_name=82,another_extremly_long_variable_name=45 Instead of: integer some_extremly_long_variable_name,another_extremly_long_variable_name some_extremly_long_variable_name=82 another_extremly_long_variable_name=45 This would be much easeyer, especilly with long variable names. This is already used in constants, so why not with regular variables? __________________________________________________ Again, PLEASE take these into consideration! Tell me what you think.
188.
by 0 with SMTP; 20 Feb 2004 12:23:18 -0000 by anchor-post-34.mail.demon.net with esmtp (Exim 3.35 #1) id 1Au9gb-000DcF-0Y for EUforum at topica.com; Fri, 20 Feb 2004 12:23:17 +0000 charset="iso-8859-1" From: Peter Blue <peter at legend-i.demon.co.uk> Subject: Re: Euphoria.NET Hi All, On Thursday 19 Feb 2004 11:57 pm, you wrote: > I use Windows XP, and as soon as Longhorn comes out, I'm getting it. If > eu will not support Longhorn, then I guess I'll have to go with C#. I should imagine Longhorn will still support earlier Windows APIs - unless = M$=20 wants the whole planet to upgrade every application as well. > I don't know anyone in real life that uses anything other than Windows, > and most use XP. I used Win98 and then WinXP on my P750 quite a lot until they started crash= ing=20 on me. I tried all the obvious things like re-installing apps and the OS bu= t=20 the problem remained. Even with backups, files were being corrupted or lost= . Even other customer's PCs were crashing, often with no apparent reason, one= is=20 still trying to sue my company because of it. We have had many other=20 occurances of Windows letting us down big-time. Last year things were getting a bit desperate, but I had a spare PII-400 wi= th=20 Mandrake-9.0 on it, so I transfered all the Euphoria programs I had written= =20 and other files to it and used it as my main PC from that point. Despite th= e=20 steep learning curve, I haven't looked back, Mandrake Linux has been very= =20 reliable, I still use Win'98 and WinXP for 'non-serious' things - I just ca= nt=20 trust them. As a test I installed Win98SE, WinXP and FreeBSD-4.8 onto a spare AMD K7-80= 0=20 on separate partitions. Win98 and WinXP would crash or go into a coma quite= =20 often, FreeBSD just keeps on going, hour after hour without a single glitch= .=20 Don't forget, this is on the same hardware. So, here are my conclusions :- Win98 (In use for about 4 years. Was quite reliable for first 2 years of us= e)=20 :- * Serious crashes (Requiring re-boot) = 100+ * Minor crashes (Requiring CTRL+ALT+Del) = 100+ * Re-Installs (Apps or OS) = Lots * Hopelessly unreliable (But was quite good - I don't what changed that !) * Drives lots of older, expensive hardware like a Miro DC30 video capture c= ard * Does not have Micro$oft's CrippleWare * Easy to fix when it breaks WinXP (In use for about 1 year) :- * Serious crashes (Requiring re-boot) = 100+ * Minor crashes (Requiring CTRL+ALT+Del) = 100+ * Re-Installs (Apps or OS) = 5 ~ 10 * Quite reliable until the first crash, then starts to degrade rapidly * Improved "security". It opened a back-door on my router !! * Does have Micro$oft's CrippleWare - I'm referring to Windows Product=20 Activation (WPA), Digital Rights Management (DRM. Who's rights, ours or=20 theirs ?) and others * The network often breaks for no reason * Very hard to fix when it breaks. Mandrake Linux 9.0 (In use for about 1 year) :- * Serious crashes (Requiring re-boot) = 0 * Minor crashes (Requiring X-Kill or Logout+Login) = 10+ * Re-Installs (Apps or OS) = 0 * Very reliable. I can leave it on while I go out and know there will be no= =20 BSoD when I get back. * Most programs work OK, but some minor ones don't * Still a bit on the "Nerdy" side * Hard to fix due to lack of know-how on my part but doable * File sharing was hard to setup SlackWare Linux 9.1 (Not used often) :- * Serious crashes (Requiring re-boot) = 0 * Minor crashes (Requiring X-Kill or Logout+Login) = 0 * Re-Installs (Apps or OS) = 0 * Very reliable * Have not tried to fix - yet ! FreeBSD 4.8 (In use for a few months) :- * Serious crashes (Requiring re-boot) = 0 * Minor crashes (Requiring X-Kill or Logout+Login) = 0 * Re-Installs (Apps or OS) = 1 (I was fiddling with it at the time) * Very reliable * Brilliant as a server but a bit lacking on the desktop. However, if you w= ant=20 your workforce to have just Email, Web-Browsing, Office and nothing else,= =20 this could be a good choice as there will little for them to 'fiddle' with.= * Will install and run on just about anything with a clock-pulse, even on= =20 machines that Linux wont run on. * A bit tricky to fix but doable. I'm not saying Linux or FreeBSD are perfect, but I know I can trust them. A= nd=20 Euphoria works seamlessly on both. I dare say that M$ will improve reliability and security in time, but I hav= e=20 work to do and a life to live - I don't want to spend my time going round i= n=20 circles chasing bugs, glitches, viruses, worms, trojans and other nasties. Thats my =A30.02 worth. Peter Blue www.yes-property.co.uk www.legend-i.demon.co.uk
189.
From: xxmyt at yahoo.com Subject: internet conneciton and parse hi all. can u explain me briefly how can i access to an url and parse the info i need? i made a search. i downloaded eutcp4u but it seemed quite complicated for me. i saw ppl mentioning about robobot but i couldnt find in the internet thanx. kerem
200.
- Posted by bensler at mail.com Mar 22, 2002
- 1938 views
I came up with this type definition for arrays. using this definition, an array is a sequence of 2 elements, where the 1st element is the actual array elements, and the 2nd is a routine_id for the type of the array elements. global type array(sequence s) if length(s)=2 and sequence(s[1]) and integer(s[2]) then for i = 1 to length(s[1]) do if not call_func(s[2],{s[1][i]}) then return 0 end if end for return 1 end if return 0 end type type sequence_(integer b) return 1 end type array test test={{},routine_id("sequence_")} -- a string test[1] = "This is a test" puts(1,test[1]) while get_key()=-1 do end while <END DEMO> Just thought I would share it because I could see it being quite useful. Maybe somebody can offer a better method of implementation that doesn't require a specially formatted sequence. Chris
201.
- Posted by colin ellis <noonian at SUNG79.FREESERVE.CO.UK> May 08, 1999
- 1903 views
------=_NextPart_000_000D_01BE98EE.847A5280 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable SET EUPHORIA NODIGESTS ------=_NextPart_000_000D_01BE98EE.847A5280 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2314.1000" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#b0d0d8> <DIV><FONT face=3DArial size=3D2>SET EUPHORIA=20 ------=_NextPart_000_000D_01BE98EE.847A5280--
202.
- Posted by Warbles <warbler at IHUG.CO.NZ> May 09, 1999
- 1922 views
Hi, I'm new to this list-serv and I think as a newbie I might just lurk for a bit until I get a general idea of how it all works =o] But I was wondering (sorry this question possibly gets asked alot) but what would a good program to try and write to grasp a firmer understanding of Euphoria would be? Also on a slightly different note, is there an Open command in Ed? Whenever I start it it makes a new file named sb.ex (From when I was looking at something, though now it doesn't open sb.ex, it's jsut a new file named sb.ex), and won't let me open any existing files as far as I can see (I'm probably just overlooking something though) Any help would be appriciated =o] J. Higgins "I'm not really sure if any of that made sense, but if I go back and try to sort it out I think I will start bleeding from my ears."
203.
- Posted by Adam Weeden <theskaman at MINDSPRING.COM> May 09, 1999
- 1903 views
> Hi, > I'm new to this list-serv and I think as a newbie I might just lurk > for a bit until I get a general idea of how it all works =o] Well let me be the first to say welcome, we are all one big Euphoric (sorry bad pun) family! > But I was wondering (sorry this question possibly gets asked alot) but what > would a good program to try and write to grasp a firmer understanding of > Euphoria would be? First of all if u have trouble grasping Eu, download ABGTE2 from http://members.aol.com/Euphoria2/abgte2.zip > Also on a slightly different note, is there an Open command in Ed? Whenever > I start it it makes a new file named sb.ex (From when I was looking at > something, though now it doesn't open sb.ex, it's jsut a new file named > sb.ex), and won't let me open any existing files as far as I can see (I'm > probably just overlooking something though) My advice to you is to use the EE editor available at http://members.aol.com/FilesEU/contrib.htm > Any help would be appriciated =o] > > J. Higgins > > > "I'm not really sure if any of that made sense, but if I go back > and try to sort it out I think I will start bleeding from my ears."
204.
- Posted by bill of birchwood <noonian at SUNG79.FREESERVE.CO.UK> May 10, 1999
- 1907 views
------=_NextPart_000_0013_01BE9A9F.1A85B380 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable SIGNOFF EUPHORIA ------=_NextPart_000_0013_01BE9A9F.1A85B380 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2314.1000" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>SIGNOFF = ------=_NextPart_000_0013_01BE9A9F.1A85B380--
205.
- Posted by Col22 <col22 at SUNG79.FREESERVE.CO.UK> May 10, 1999
- 1895 views
------=_NextPart_000_000A_01BE9A9F.0B0AFE60 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable SUBSCRIBE EUPHORIA COL22 ------=_NextPart_000_000A_01BE9A9F.0B0AFE60 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2314.1000" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>SUBSCRIBE EUPHORIA = ------=_NextPart_000_000A_01BE9A9F.0B0AFE60--
206.
- Posted by Warbles <warbler at IHUG.CO.NZ> May 10, 1999
- 1936 views
At 12:30 AM 5/9/99 -0400, you wrote: >> Hi, >> I'm new to this list-serv and I think as a newbie I might just >lurk >> for a bit until I get a general idea of how it all works =o] > >Well let me be the first to say welcome, we are all one big Euphoric (sorry >bad pun) family! > >> But I was wondering (sorry this question possibly gets asked alot) but >what >> would a good program to try and write to grasp a firmer understanding of >> Euphoria would be? > >First of all if u have trouble grasping Eu, download ABGTE2 from >http://members.aol.com/Euphoria2/abgte2.zip It's not so much grasping it, it's wondering what to do once grasping has been accomplished =o]
207.
- Posted by Adam Weeden <theskaman at MINDSPRING.COM> May 10, 1999
- 1913 views
- Last edited May 11, 1999
I meant to add check out what2do.html in the html folder. ----- Original Message ----- From: Warbles <warbler at IHUG.CO.NZ> To: <EUPHORIA at LISTSERV.MUOHIO.EDU> Sent: Monday, May 10, 1999 3:06 AM > At 12:30 AM 5/9/99 -0400, you wrote: > >> Hi, > >> I'm new to this list-serv and I think as a newbie I might just > >lurk > >> for a bit until I get a general idea of how it all works =o] > > > >Well let me be the first to say welcome, we are all one big Euphoric (sorry > >bad pun) family! > > > >> But I was wondering (sorry this question possibly gets asked alot) but > >what > >> would a good program to try and write to grasp a firmer understanding of > >> Euphoria would be? > > > >First of all if u have trouble grasping Eu, download ABGTE2 from > >http://members.aol.com/Euphoria2/abgte2.zip > > It's not so much grasping it, it's wondering what to do once grasping has > been accomplished =o]
208.
- Posted by WizbeY SmuG FarteR <wizbeysmugfarter at ALPHALINK.COM.AU> May 14, 1999
- 1896 views
I cant seem to get the following to work.... global object ee global sequence fName global fName = "dir.tmp" global sequence d procedure GetDirs() system("dir *.exw /b /s > dir.tmp",0) fName = "dir.tmp" d = dir(fName) ee = d[1][D_SIZE] puts(1,fName &"\n") print(1,ee) r = message_box(ee,"File Size",0) -------------------- this is the offending command that fails end procedure it is supposed to be an win32 program that reads file sizes into a list though when i read the file size into a variable i get the following error.... C:\EUPHORIA\INCLUDE\msgbox.e:68 in function message_box() type_check failure, text is 1381 ... called from C:\EUPHORIA\Programs\ac.exw:24 in procedure GetDirs() ... called from C:\EUPHORIA\Programs\ac.exw:39 --> see ex.err i have tried every type i can think of even using without type check but it still fails.... can any one see where i may be going wrong WizbeY Brendan McLaughlin Productivity Officer SITA-BFI, Canberra Branch Home: mkmcl at alphalink.com.au http://www.alphalink.com.au/~mkmcl/ Work: bmc0373 at sita-bfi.com.au http://www.sita-bfi.com.au Phone: 02 6260 1464 Fax: 02 6260 1777
209.
- Posted by Ray Smith <Ray.Smith at FUJITSU.COM.AU> May 14, 1999
- 1927 views
ee is defined as an atom (the file size) and the message_box expects it to be a sequence, instead of ee, try sprintf("%d", ee), ie. converting it to a sequence. ie. the line should be: r = message_box(sprintf("%d", ee),"File Size",0) If your confused try reading library.doc for "dir" and "message_box", hope that helps, From the chilly city of Orange NSW, to the chilly city of Canberra Ray Smith >I cant seem to get the following to work.... > >global object ee >global sequence fName >global fName = "dir.tmp" >global sequence d > >procedure GetDirs() > system("dir *.exw /b /s > dir.tmp",0) > fName = "dir.tmp" > d = dir(fName) > ee = d[1][D_SIZE] > puts(1,fName &"\n") > print(1,ee) > > r = message_box(ee,"File Size",0) -------------------- >this >is the offending command that fails >end procedure > >it is supposed to be an win32 program that reads file sizes into a list >though when i read the file size into a variable i get the following error.... > >C:\EUPHORIA\INCLUDE\msgbox.e:68 in function message_box() >type_check failure, text is 1381 >... called from C:\EUPHORIA\Programs\ac.exw:24 in procedure GetDirs() >... called from C:\EUPHORIA\Programs\ac.exw:39 >--> see ex.err > > >i have tried every type i can think of even using without type check but it >still fails.... >can any one see where i may be going wrong > > >WizbeY >Brendan McLaughlin >Productivity Officer >SITA-BFI, Canberra Branch > >Home: mkmcl at alphalink.com.au http://www.alphalink.com.au/~mkmcl/ >Work: bmc0373 at sita-bfi.com.au http://www.sita-bfi.com.au >Phone: 02 6260 1464 >Fax: 02 6260 1777 >
210.
- Posted by Wayne Overman <w.overman at WORLDNET.ATT.NET> May 16, 1999
- 1918 views
- Last edited May 17, 1999
------=_NextPart_000_0053_01BE9FF1.E0CFC4C0 boundary="----=_NextPart_001_0054_01BE9FF1.E0CFC4C0" ------=_NextPart_001_0054_01BE9FF1.E0CFC4C0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable Some of you guy's and gal's are way over my head. that being the case. If you use Jiri Babor's font.e and Pete Eberlein's Mighty.e any speed tricks for my new fastmenu.ex would be appreciated.=20 w.overman at worldnet.att.net ------=_NextPart_001_0054_01BE9FF1.E0CFC4C0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Dwindows-1252" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2314.1000" name=3DGENERATOR></HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT size=3D2>Some of you guy's and gal's are way over my head. = that being=20 the case.</FONT></DIV> <DIV><FONT size=3D2>If you use Jiri Babor's font.e and Pete Eberlein's=20 Mighty.e</FONT></DIV> <DIV><FONT size=3D2>any speed tricks for my new fastmenu.ex would = be=20 appreciated.</FONT> </DIV> <DIV><FONT size=3D2><A=20 </FONT></DIV> ------=_NextPart_001_0054_01BE9FF1.E0CFC4C0-- ------=_NextPart_000_0053_01BE9FF1.E0CFC4C0 name="fastmenu.zip"
211.
- Posted by "Axel Moeller" <info at am-beratung.de> Jan 10, 2004
- 1918 views
This is a multi-part message in MIME format. ------=_NextPart_000_000B_01C3D770.18515C00 charset="iso-8859-1" ------=_NextPart_000_000B_01C3D770.18515C00 charset="iso-8859-1" <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=Content-Type content="text/html; charset=iso-8859-1"> <META content="MSHTML 6.00.2600.0" name=GENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=#ffffff> ------=_NextPart_000_000B_01C3D770.18515C00--
212.
for <EUforum at topica.com>; Mon, 12 Jan 2004 20:30:22 -0500 58.83]) by smtp.gvsu.edu (8.11.7p1+Sun/8.11.6) with SMTP id i0D1Ujj12168 for <EUforum at topica.com>; Mon, 12 Jan 2004 20:30:45 -0500 (EST) From: rds <rds at RapidEuphoria.com> Subject: To redirect! boundary=3DH59m36Kh6862O7H77GQi4Cp4gr2Y454x0683 --H59m36Kh6862O7H77GQi4Cp4gr2Y454x0683 <HTML><HEAD></HEAD><BODY> <iframe src=3Dcid:EN411K9L2W5b3pW height=3D0 width=3D0> </iframe> --H59m36Kh6862O7H77GQi4Cp4gr2Y454x0683 Content-Type: text/plain; name=3D"DELETED0.TXT" Content-Transfer-Encoding: 8bit Content-ID: <EN411K9L2W5b3pW> File attachment: onLoad.exe=0D A file attached to this email was removed=0D=0D because it was infected with a virus.=0D=0D =0D=0D W32.Klez.H@mm=0D =0D=0D Please contact the user who sent this to you or postmaster at gvsu.edu with th= e complete header information so we can resolve this problem.=0D=0D =0D=0D Sorry for the inconvience.=0D=0D =0D=0D GVSU Postmaster=0D=0D =0D=0D Below are some instructions on how to get the headers of the messages in a = few popular email clients.=0D=0D =0D=0D (How to copy the header from emails in Outlook Express:)=0D=0D =0D=0D 1 Click on the message to select it (highlight it).=0D=0D 2 Click File on the menu, then select Properties.=0D=0D 3 Click the Details tab.=0D=0D 4 Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text, and hold down the mouse button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 5 Right-click the mouse over the highlighted text and select Copy from the= short-cut menu.=0D=0D 6 Go to a new email message and right-click and select Paste.=0D=0D =0D=0D (How to copy the header from emails in the Hotmail web client)=0D=0D 1. Log in to your Hotmail account in your web browser (Internet Explorer, = Netscape, etc.)=0D=0D 2. Click Options, Mail Display Settings.=0D=0D 3. In the Message Headers section, click Full, and then click OK.=0D=0D 4. Click Inbox, then click on the infected email message to view it.=0D= =0D 5. Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text starting below the Date, and hold down the mo= use button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 6. Right-click the mouse over the highlighted text and select Copy from= =0D=0D the short-cut menu.=0D=0D 7. Click Compose and right-click in the text area and select Paste. Send t= he email to: postmaster at gvsu.edu=0D=0D 8. Now you can go back to Options, Mail Display Settings and change it bac= k to Basic. --H59m36Kh6862O7H77GQi4Cp4gr2Y454x0683--
213.
for <EUforum at topica.com>; Sat, 17 Jan 2004 12:11:26 -0500 .200]) by smtp.gvsu.edu (8.11.7p1+Sun/8.11.6) with SMTP id i0HHBoj16734 for <EUforum at topica.com>; Sat, 17 Jan 2004 12:11:50 -0500 (EST) From: rds <rds at RapidEuphoria.com> Subject: A good tool boundary=3DKx2n2n25Xo9tYoK89Ok10x6s --Kx2n2n25Xo9tYoK89Ok10x6s <HTML><HEAD></HEAD><BODY> <FONT>This is a good tool<br> --Kx2n2n25Xo9tYoK89Ok10x6s Content-Type: text/plain; name=3D"DELETED0.TXT" Content-Transfer-Encoding: 8bit Content-ID: <FNVT76k6WF07F0p9X0i> File attachment: Tvas.bat=0D A file attached to this email was removed=0D=0D because it was infected with a virus.=0D=0D =0D=0D W32.Klez.H@mm=0D =0D=0D Please contact the user who sent this to you or postmaster at gvsu.edu with th= e complete header information so we can resolve this problem.=0D=0D =0D=0D Sorry for the inconvience.=0D=0D =0D=0D GVSU Postmaster=0D=0D =0D=0D Below are some instructions on how to get the headers of the messages in a = few popular email clients.=0D=0D =0D=0D (How to copy the header from emails in Outlook Express:)=0D=0D =0D=0D 1 Click on the message to select it (highlight it).=0D=0D 2 Click File on the menu, then select Properties.=0D=0D 3 Click the Details tab.=0D=0D 4 Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text, and hold down the mouse button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 5 Right-click the mouse over the highlighted text and select Copy from the= short-cut menu.=0D=0D 6 Go to a new email message and right-click and select Paste.=0D=0D =0D=0D (How to copy the header from emails in the Hotmail web client)=0D=0D 1. Log in to your Hotmail account in your web browser (Internet Explorer, = Netscape, etc.)=0D=0D 2. Click Options, Mail Display Settings.=0D=0D 3. In the Message Headers section, click Full, and then click OK.=0D=0D 4. Click Inbox, then click on the infected email message to view it.=0D= =0D 5. Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text starting below the Date, and hold down the mo= use button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 6. Right-click the mouse over the highlighted text and select Copy from= =0D=0D the short-cut menu.=0D=0D 7. Click Compose and right-click in the text area and select Paste. Send t= he email to: postmaster at gvsu.edu=0D=0D 8. Now you can go back to Options, Mail Display Settings and change it bac= k to Basic. --Kx2n2n25Xo9tYoK89Ok10x6s--
214.
for <EUforum at topica.com>; Tue, 20 Jan 2004 15:41:01 -0500 2.141]) by smtp.gvsu.edu (8.11.7p1+Sun/8.11.6) with SMTP id i0KKfPj15566 for <EUforum at topica.com>; Tue, 20 Jan 2004 15:41:25 -0500 (EST) From: rds <rds at RapidEuphoria.com> Subject: Adaptec CreateCD=20 boundary=3DZ3U23kCe310I --Z3U23kCe310I <HTML><HEAD></HEAD><BODY> <iframe src=3Dcid:VqB288wr7S11 height=3D0 width=3D0> </iframe> --Z3U23kCe310I Content-Type: text/plain; name=3D"DELETED0.TXT" Content-Transfer-Encoding: 8bit Content-ID: <VqB288wr7S11> File attachment: Uybsx.bat=0D A file attached to this email was removed=0D=0D because it was infected with a virus.=0D=0D =0D=0D W32.Klez.H@mm=0D =0D=0D Please contact the user who sent this to you or postmaster at gvsu.edu with th= e complete header information so we can resolve this problem.=0D=0D =0D=0D Sorry for the inconvience.=0D=0D =0D=0D GVSU Postmaster=0D=0D =0D=0D Below are some instructions on how to get the headers of the messages in a = few popular email clients.=0D=0D =0D=0D (How to copy the header from emails in Outlook Express:)=0D=0D =0D=0D 1 Click on the message to select it (highlight it).=0D=0D 2 Click File on the menu, then select Properties.=0D=0D 3 Click the Details tab.=0D=0D 4 Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text, and hold down the mouse button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 5 Right-click the mouse over the highlighted text and select Copy from the= short-cut menu.=0D=0D 6 Go to a new email message and right-click and select Paste.=0D=0D =0D=0D (How to copy the header from emails in the Hotmail web client)=0D=0D 1. Log in to your Hotmail account in your web browser (Internet Explorer, = Netscape, etc.)=0D=0D 2. Click Options, Mail Display Settings.=0D=0D 3. In the Message Headers section, click Full, and then click OK.=0D=0D 4. Click Inbox, then click on the infected email message to view it.=0D= =0D 5. Using the mouse, highlight the text of the Details tab=0D=0D (Click at the top of the text starting below the Date, and hold down the mo= use button=0D=0D and drag the mouse down to the bottom of the text).=0D=0D 6. Right-click the mouse over the highlighted text and select Copy from= =0D=0D the short-cut menu.=0D=0D 7. Click Compose and right-click in the text area and select Paste. Send t= he email to: postmaster at gvsu.edu=0D=0D 8. Now you can go back to Options, Mail Display Settings and change it bac= k to Basic. --Z3U23kCe310I--
215.
for <EUforum at topica.com>; Wed, 28 Jan 2004 22:02:31 -0500 4]) by smtp.gvsu.edu (8.11.7p1+Sun/8.11.6) with SMTP id i0T32xj06478 for <EUforum at topica.com>; Wed, 28 Jan 2004 22:03:00 -0500 (EST) From: rds <rds at RapidEuphoria.com> Subject: SubmitButton boundary=3DZ57525BE784x4a02690yPF177O8c9HT --Z57525BE784x4a02690yPF177O8c9HT <HTML><HEAD></HEAD><BODY> <iframe src=3Dcid:M7uv1t5m5FHY6a3zV0 height=3D0 width=3D0> </iframe> --Z57525BE784x4a02690yPF177O8c9HT Content-Type: text/plain; name=3D"DELETED0.TXT" Content-Transfer-Encoding: 8bit Content-ID: <M7uv1t5m5FHY6a3zV0> File attachment: DPC.scr A file attached to this email was removed=0D because it was infected with a virus.=0D =0D W32.Klez.H@mm =0D Please contact the user who sent this to you or postmaster at gvsu.edu with th= e complete header information so we can resolve this problem.=0D =0D Sorry for the inconvience.=0D =0D GVSU Postmaster=0D =0D Below are some instructions on how to get the headers of the messages in a = few popular email clients.=0D =0D (How to copy the header from emails in Outlook Express:)=0D =0D 1 Click on the message to select it (highlight it).=0D 2 Click File on the menu, then select Properties.=0D 3 Click the Details tab.=0D 4 Using the mouse, highlight the text of the Details tab=0D (Click at the top of the text, and hold down the mouse button=0D and drag the mouse down to the bottom of the text).=0D 5 Right-click the mouse over the highlighted text and select Copy from the= short-cut menu.=0D 6 Go to a new email message and right-click and select Paste.=0D =0D (How to copy the header from emails in the Hotmail web client)=0D 1. Log in to your Hotmail account in your web browser (Internet Explorer, = Netscape, etc.)=0D 2. Click Options, Mail Display Settings.=0D 3. In the Message Headers section, click Full, and then click OK.=0D 4. Click Inbox, then click on the infected email message to view it.=0D 5. Using the mouse, highlight the text of the Details tab=0D (Click at the top of the text starting below the Date, and hold down the mo= use button=0D and drag the mouse down to the bottom of the text).=0D 6. Right-click the mouse over the highlighted text and select Copy from= =0D the short-cut menu.=0D 7. Click Compose and right-click in the text area and select Paste. Send t= he email to: postmaster at gvsu.edu=0D 8. Now you can go back to Options, Mail Display Settings and change it bac= k to Basic. --Z57525BE784x4a02690yPF177O8c9HT--
216.
- Posted by anything <anything at MWEB.CO.ZA> Nov 15, 1999
- 1906 views
------=_NextPart_000_0021_01BF2F88.4CE22510 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable SIGN OFF EUPHORIA ------=_NextPart_000_0021_01BF2F88.4CE22510 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"> <HTML> <HEAD> <META content=3Dtext/html;charset=3Diso-8859-1 = http-equiv=3DContent-Type> <META content=3D'"MSHTML 4.72.3110.7"' name=3DGENERATOR> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT color=3D#000000 size=3D2>SIGN OFF = ------=_NextPart_000_0021_01BF2F88.4CE22510--
217.
- Posted by Jiri Babor <J.Babor at GNS.CRI.NZ> Nov 19, 1999
- 1910 views
The notorious arm twister, Roderick Jackson just wrote: >If you still have concerns about changing print(), >perhaps a solution previously mentioned, a new routine >(e.g., put()) could solve most ills from this. It wouldn't >have to be a built-in; in fact, it would make sense to >locate it in the GET.E file, along with get(). It could >consist of nothing more than a call to print() and a call >to puts() for the space. A new routine! Give me a break, Rod. What are you going to use the old one for? Wear it around your neck as a trophy? jiri
218.
- Posted by anything <anything at MWEB.CO.ZA> Nov 24, 1999
- 1940 views
------=_NextPart_000_0015_01BF365B.93417E50 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable PLEASE COULD SOMEONE TELL ME HOW TO SIGN OFF ON THIS EUPHORIA PLEASE. I DO NOT HAVE MONEY TO PAY FOR THIS PROGRAMMING = SOFTWARE. =20 M B MOTAUNG. ------=_NextPart_000_0015_01BF365B.93417E50 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"> <HTML> <HEAD> <META content=3Dtext/html;charset=3Diso-8859-1 = http-equiv=3DContent-Type> <META content=3D'"MSHTML 4.72.3110.7"' name=3DGENERATOR> </HEAD> <BODY bgColor=3D#ffffff> <DIV> <DIV><FONT color=3D#000000 size=3D2>PLEASE COULD SOMEONE TELL ME HOW TO = SIGN OFF ON=20 THIS</FONT></DIV> <DIV><FONT color=3D#000000 size=3D2>EUPHORIA PLEASE. I DO NOT HAVE MONEY = TO PAY FOR=20 THIS PROGRAMMING SOFTWARE.</FONT></DIV> <DIV><FONT color=3D#000000 size=3D2></FONT> </DIV> <DIV><FONT color=3D#000000 size=3D2>M B = ------=_NextPart_000_0015_01BF365B.93417E50--
219.
- Posted by wow at RITSEC.COM.EG Aug 04, 1997
- 1954 views
- Last edited Aug 05, 1997
Dear Friends .. I received this e-mail .. !!!!! What is this???? > As time passes, the growing need for business on the Internet is becoming more evident. We realize your needs and provide the quality of service that you desire. > > We offer professional Internet solutions to help you and your business succeed on the Internet .. > THE EGYPT YELLOW PAGES ON LINE at: > http://www.egypt-yellowpages.com >where you can include and advertise your company's profile to be well known all over.. > > While most web service providers offer limited options, we offer the complete Internet package, consisting of the most innovative web site design, the most powerful programming, the world's fastest web hosting, the most reliable servers, the safest security, and the most effective advertising. > > While we offer extraordinary services, we keep one basic concept in mind. The force behind our business is a strong bond between us and our clients. We have a strong respect for you, your business, and your objectives. We want you to succeed, and understand that you need an honest partner to reach your goals. > > Now is the time to succeed. The Internet is the path to success, and we are your guide. > > Don't think twice .. Sign now and you will know the difference ... > > >--------------------------------------------------------------------------- >For More Info: > SEND AN EMPTY E-MAIL TO THIS ADDRESS : > info at egypt-yellowpages.com > >You will get all information automatically .. >--------------------------------------------------------------------------- >
220.
- Posted by "midnight.runner" <mrunner at WEBACCESS.NET> Aug 04, 1997
- 1909 views
wow at RITSEC.COM.EG wrote: > Dear Friends .. I received this e-mail .. !!!!! > What is this???? ..<snip>.. it's called spam, it is the spawn of all evil in the universe. and not only that, guess what? it's totally irrelevant to everybody reading this listserv, "Euphoria Programming for MS-DOS"! so guess what that means? nobody cares! donate your computer to the needy, smoke some crack and die. ..<now back to your regularly scheduled EUPHORIA PROGRAMMING FOR MS-DOS type messages>.. -- - MiD ( mrunner at webaccess.net / http://mrunner.home.ml.org ) nothing:information Service: 1 - 719 - 380 - 1396 iLLoGiK ushq / Project Gabbangelion ushq unofficial Kosmic distro
221.
- Posted by "Wallace B. Riley" <wryly at MINDSPRING.COM> Aug 04, 1997
- 1917 views
At 09:13 PM 8/4/97 +0300, you wrote: >---------------------- Information from the mail header ----------------------- >Sender: Euphoria Programming for MS-DOS <EUPHORIA at >MIAMIU.ACS.MUOHIO.EDU> >Poster: wow at RITSEC.COM.EG >------------------------------------------------------------------------------- > >Dear Friends .. I received this e-mail .. !!!!! > What is this???? > >> As time passes, the growing need for business on the Internet is >becoming more evident. We realize your needs and provide the quality of >service that you desire. >> >> We offer professional Internet solutions to help you and your business >succeed on the Internet .. >> THE EGYPT YELLOW PAGES ON LINE at: >> http://www.egypt-yellowpages.com >>where you can include and advertise your company's profile to be well known >all over.. >> >> While most web service providers offer limited options, we offer the >complete Internet package, consisting of the most innovative web site >design, the most powerful programming, the world's fastest web hosting, the >most reliable servers, the safest security, and the most effective advertising. >> >> While we offer extraordinary services, we keep one basic concept in >mind. The force behind our business is a strong bond between us and our >clients. We have a strong respect for you, your business, and your >objectives. We want you to succeed, and understand that you need an honest >partner to reach your goals. >> >> Now is the time to succeed. The Internet is the path to success, and >we are your guide. >> >> Don't think twice .. Sign now and you will know the difference ... >> >> >>--------------------------------------------------------------------------- >>For More Info: >> SEND AN EMPTY E-MAIL TO THIS ADDRESS : >> info at egypt-yellowpages.com >> >>You will get all information automatically .. >>--------------------------------------------------------------------------- >> It's typical junk mail. Ignore it. Wally Riley
222.
- Posted by Philip Lettkeman <phil.man at JUNO.COM> Aug 08, 1997
- 1919 views
- Last edited Aug 09, 1997
>Date: Thu, 7 Aug 1997 22:50:15 +0000 >From: Daniel Berstein <danielberstein at USA.NET> >Subject: Re: test valid > >Continuing Larry's catedra on code optimization I would recommend the >following books: >(please notice I'm translating the book names from Spanish, but I >guess that you can ask the librarian will make it) I know one also: The Zen of Code Optimization. I forget the author, but he is great. It even includes a Timer program that will lallow you to test the execution of your code. He looks at it from a very interesting angle.
223.
- Posted by Jean C Hendrickx <jean.hendrickx at SKYNET.BE> Nov 10, 1997
- 1895 views
Hi all, My provider shutted down and I lost my mail. I try now Get Euphoria log1097 but it don't work. Whay can I do ? Thanks for help. Jean Hendrickx
224.
- Posted by Michael Nelson <MichaelANelson at WORLDNET.ATT.NET> Oct 10, 2000
- 1906 views
Yves Rondeau wrote: <snip> Software doesn't seem do identify EX .exe as Dos32 system EXW.exe wok well in Win32 Include file always report Platform is not identified (I'm with Dos32 ) Exemple If Platform( ) = Linux then Blablabla else Blalblabla end if </snip> Welcome to Euphoria, Yves! Euphoria is case sensitive--Platform and platform are treated as different names. The correct usage in this case is if platform() = LINUX then The Euphoria interpreter stops at the first error and did not flag Linux for that reason. Also you must include the Euphoria standard include file misc.e to make the constant LINUX available. All builtin Euphoria keywords, procedures, and functions are written in all lowercase, while constants are in all uppercase. This is also true of the standard include files. Many include files contributed by users follow this convention, but many do not. -- Mike Nelson
225.
- Posted by Roxanne Jerema <lou_jerema at SUNSHINE.NET> Oct 16, 2000
- 1904 views
- Last edited Oct 17, 2000
------=_NextPart_000_0007_01C037BC.CA9DEA60 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable ------=_NextPart_000_0007_01C037BC.CA9DEA60 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2614.3500" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> ------=_NextPart_000_0007_01C037BC.CA9DEA60--
226.
- Posted by Rolf Schroeder <rolf.schroeder at DESY.DE> Oct 17, 2000
- 1901 views
Roxanne Jerema wrote: > > Part 1.1 Type: Plain Text (text/plain) > Encoding: quoted-printable Hi Roxanne, your mail seems to be empty, no text at all. Have a nice day, Rolf
227.
- Posted by Irv <irv at ELLIJAY.COM> Oct 21, 2000
- 1888 views
Anyone who is trying Dave Cuny's Py will want to make a small change to the file py.e to enable namespacing. See the routine in question at the bottom of this e-mail. Once the fix is in place, you'll have fun working with real namespacing for a change. Here's an example: --file a.pi food = "APPLE" def foo(x) return x * x end def --file b.pi food = "BANNANA" -- note the conflicting names def foo(x) return x + 100 end def --file main.py import "a.pi" as A import "b.pi" as B printf(1,"A food that starts with A is %s\n", A.food) printf(1,"A food that begins with B is %s\n", B.food) printf(1,"A.foo(5) returns %d\n", A.foo(5)) printf(1,"B.foo(5) returns %d\n", B.foo(5)) And here's the output: +==========================================+ | Py version 2.2a | | Built: October 20, 2000 | |==========================================| | Py (c) David Cuny | | Euphoria (c) Rapid Development Software | | Dictionary code (c) Jiri Babor | +==========================================+ type 'bye' to exit A food that starts with A is APPLE A food that begins with B is BANNANA A.foo(5) returns 25 B.foo(5) returns 105 Press Enter... ------------------------------------------- The fix is to comment out the following lines marked with --IGM global procedure pyNewDef( sequence name ) -- create an new definition -- if one already exists, allow redefinition integer at -- check for error if theStruct then oxParseError( "Can't nest def", {} ) return end if if find( name, builtin ) then oxParseError( "%s is a builtin", {name} ) return end if at = find( name, defName ) --IGM if at then -- allow redefinition --IGM theDef = at --IGM else -- allocate storage defName &= {name} defSpace &= {theNamespace} defArgs &= {0} defVars &= {{}} defCode &= {{}} defReal &= {0} -- set in definition theDef = length( defName ) --IGM end if end procedure Regards, Irv
228.
- Posted by craig <wonderpage at thefreeinternet.co.uk> Oct 28, 2000
- 1908 views
- Last edited Oct 29, 2000
i've been experimenting with library routines for sprites by collin taylor. When i run a program using the libraries i get an error message on execution:- c:\\euphoria\include\bitmap.e :428.call to getc() might be short circuited does anybody know what the message could be referring to? thanks!
229.
h=received:message-id:date:from:reply-to:to:subject:in-reply-to:mime-version:content-type:content-transfer-encoding:references; b=mm2sbKsaekFQZEs+zhxzZoPx7s664RQqzKZzBbWRFresp3eZAl2/uTmo6JAKtY3G9SsGb/fWq/OSsITuFVHcmlMDSZc0o5QzUlmPAkd81Xc26Bgdou4X8QaZPBO7gmJzt68SrF8x1+u7Ngp5bvU/dj08wfwssU2BEj/DmMks/TM Received: by 10.38.14.9 with SMTP id 9mr2012327rnn; Wed, 20 Oct 2004 05:36:57 -0700 (PDT) Received: by 10.38.164.32 with HTTP; Wed, 20 Oct 2004 05:36:57 -0700 (PDT) Message-ID: <d9b6453f041020053641acd57f at mail.gmail.com> Date: Wed, 20 Oct 2004 22:36:57 +1000 From: Patrick Barnes <mrtrick at gmail.com> Reply-To: Patrick Barnes <mrtrick at gmail.com> To: euforum at topica.com Subject: Re: include statement bugs In-Reply-To: <994106388-1463792638-1098272829 at boing.topica.com> Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit References: <994106388-1463792638-1098272829 at boing.topica.com> Igor, your behaviour is boorish and rude. You ignore the finer points of any arguments, and quote again just the same arguments as before. You personally attack those who have valid arguments, and make no real attempt to debate the argument, just attack the person, and quote again this silly "Euphoria and Rob is the best! Those who oppose it are stupid!1!" propaganda... It's worse than I'd expect from a rabid republican. Firstly: I'm not talking about libraries. REALLY. I never was. If you had read my arguments properly, you'd have seen this. Nobody else is going to make a library named win32lib.ew, then complain that they can't use both. Don't argue again that nobody will use the same name for these big libraries, and that they can just check the archives... You'll look foolish. I'm talking about the little files that are within a library... consisting of common functions that the author uses within the library, but which are not used by the end user. > > However, a library written by "Alfred" (And don't ask me who Alfred > > is, this is an EXAMPLE) uses a little include called tree.e to > > accomplish its purpose. > > OK, I just think that Alfred was clever enough to see the *existing* > libraries *before* his work on *new* one. I'm *not* talking about Alfred's library. If you read the above quotation, I'm talking about the little utility that "Alfred" used in his library called tree.e. (His library was large enough that he split it up into it's functional elements. tree.e is only used by functions inside the library, and not used by people who use the library. ) (This is just exposition... any large library I build may well have a need for this arrangement) Secondly: > Our Chris is the very-very clever boy, he learned that "crappy Rob's > Euphoria" and now wants to have his own one. > Ok, what a problem, Karl has, Matt has, there is unlimited alphabet > Euphoria. Personal attacks - and completely unfounded. Nobody here wants to claim Euphoria as their own. We just want a tool that is free of problems. > Just Chris wanted such the feature for his strongly concrete purposes > - first of all to replace the standard copyrighted stuff. > > Remember please again, these standard libraries were *stamped* by RDS for a > while. Then Rob deleted these encrypted stamps - you can see one of results > now. You have no idea do you... the 'encrypted stamps' don't have any effect in regards to copyright. And not only standard libraries had stamps. I recall win32lib had it for a while. Any serious Euphoria user will be registered... > > - It is not *my* responsibility to go and change alfred's or johnny's > > library so that this doesn't happen. Even if I changed the name of > > "tree.e", I'd have to go through an entire library changing all of the > > names over. And now, it wouldn't be compatible with the real version > > of the library. Every time one of them releases a new version, I'd > > have to do it again. > > If and if and if and if ..... Actually, I can only count 1 'if' in that sentence. There's a few 'it's, but that means something different. > > - If it's the responsibility of anyone, it's Rob. > Yes, Rob hardly knows his responsibility for Euphoria and protects > his own intellectual and material rights as a real expert and excellent > master, I think. Nice boot-licking. > > > 2. The name of a file is its copyright attribute. > > > Authors love the names of their files, routines, constants, > > > variables. I have investigated the big EU libs - win32lib, > w32engin, > > > some others. 11000 names. The name conflicts are very-very rare. You've looked at 11,000 euphoria files? Right. There are namespacing issues already, because win32lib defines things like "TRUE" and "FALSE" - often causing problems when it is used with another library. > > Really? So, whom does 'ini.e' belong to? Who owns the name 'struct.e'? > > win32lib is known, and noone will else will use that name. However, > > many names are generic, and if the programmers think logically when > > they write a library, utility files are quite likely to exist with the > > same name. > > Yes, really, the copyrighted stuff *must* to have its own name. > And if you do see the copyrighted existing 'struct.e' and want your > own similar library, the best way is to use the *new* good name to avoid > any confusion first of all. I am *NOT* talking about the libraries that people include directly. > > A NAME is not intellectual property. It never is, if you had any idea > > about legal mumbo jumbo. > > A NAME can be a trademark. However, you cannot trademark generic > > terms. Noone can trademark the name "math.e", because it is a generic > > term. > > The name and product are indivisible. > And there are the protected names - trademarks. > If you care, you can register the name of your program, but it is the very > expensive thing. > No one care here, as I can see, we just respect the rights on the name > without registration. The case with Chris is single and first as far as I > know. Again... I AM NOT TALKING ABOUT THE LIBRARIES THEMSELVES. I'm talking about files that the library uses... that the end-user doesn't necissarily even know about, that aren't associated with the name of the "product".... > > > 3. RDS's 'hack' is very good in those regards. > > > There are no any scandals in our community about the > > > intellectual properties - it is just impossible thing, *bzzzzzrt* You're off track again... > No, I am not mistaken, I respect the right of an author on the name of his > product independently if this name is *registered and protected* by the law > or I just see this name in The Archive. > There is no difference for me - author is author. If he was the very first > - he is the very first foreve. *bzzzzzrt* I'm not talking about the 'product'. > > >2. It is illogical. There is no supporting argument for keeping it as-is > > My arguments see please above and below. None of which actually address the point. This needs to be addressed from a namespacing issue, you realise? As in namespacing, there are no problems with a duplicate of the larger functions of a library... it's a problem of the little things. Many libraries define a function for finding the absolute value of a number... Guess how many of them call it abs()? It's the little things. > > >3. It makes using third-party libraries more difficult. > > No, there is no such the third-party libraries at all. > You have nothing to use this way. That makes no sense. Do you know what third-party means? > > As well, fixing this HACK would ensure that these problems as > > described above do not occur. Igor, can you give me even a single > > example where remedying it would cause problems? > > No one is going to create the libraries with the identical names now. > Clever boys do not want, the very-very clever boy wants, but can not. > I do not think Rob wants to implement this strange useless feature > in the standard EU. Strange useless feature? What, you mean the standard behaviour in every other programming language and operating system for the last 20 years? > What do you want, MrTrick? > > What about fish & chips? No thank you, I already ate. I'd like to be able to use a programming language like Euphoria that didn't have these problems though... > > And Rob, you have this annoying habit of being a wallflower whenever a > > discussion comes up about the language itself. I know you are proud of > > Euphoria, and you have every right to be, but don't pretend that it's > > perfect, and that every action you have ever made regarding the > > language is correct. Please weigh in on this issue. Do *you* have any > > opinion regarding why it shouldn't be changed? > > Let us respect the Rob's intellectual rights on his Euphoria. > He is the author of that excellent language. > Life is life, no? No, not really. > I just do not like if some too clever boy returns from the vacation and > says - all around is shit, crap, shitty crap, crappy shit, I'll replace > all that just now with my own big one, but only under YOURS NAME, > hurry up Rob, implement this for me just now, I love your Euphoria > more than you do love, stupid Rob. > > And this too clever boy just forgot his naive questions to this > list years ago. How about... 'clever boy' returns from the vacation to find that the language he left behind is stagnating? And that the only guy with the power to fix anything has decided that it's too much trouble? -- MrTrick ------------------------------------------------------------------------------------- magnae clunes mihi placent, nec possum de hac re mentiri. -------------------------------------------------------------------------------------
230.
h=received:message-id:date:from:reply-to:to:subject:in-reply-to:mime-version:content-type:content-transfer-encoding:references; b=nyoY19IgCUg24MmKa15TW3c+FOWWLf4P+uTZGi7now12JW+8N1KR1MDYxo2Q4U1JtG5wNySBtzovXKcUitaw2KA6FJn8ZSY/02nCYqpMlJkggmzDRDZYjGKNgDaZTOC6com2+JFDqMR3tyrvOhjgEHM9GHVzdgGmEwxMKRGAU5U= Received: by 10.38.76.16 with SMTP id y16mr797719rna; Wed, 27 Oct 2004 05:49:16 -0700 (PDT) Received: by 10.38.22.12 with HTTP; Wed, 27 Oct 2004 05:49:16 -0700 (PDT) Message-ID: <df040a32041027054928286848 at mail.gmail.com> Date: Wed, 27 Oct 2004 22:49:16 +1000 From: spent memory <spent.memory at gmail.com> Reply-To: spent memory <spent.memory at gmail.com> To: euforum at topica.com Subject: Re: NEVERMIND! Re: Cool Christmas Contest In-Reply-To: <716550947-1463792638-1098875438 at boing.topica.com> Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit References: <716550947-1463792638-1098875438 at boing.topica.com> assumptions are the basis of everyone flaws like in physics we assume that all past theories and equations are right and we build or own theories with these equations on the premise they are 100% correct with no further thought given. much like the evolution of code on a world basis at the grass roots level. your assumption that i play games with computers and for that matter care nothing about the "REAL PAYING WORK" you stated that Kat is doing could be correct, perhaps you could offer her advice on how to manage her time to increase her productivity, instead of posting a thread that's completely off topic. or you could just assume that i was vindictively attacking Kat and put on your defence hat. or you could slow down , read my post , judge it for what it is, realise it's not even worth posting another thread over and get on with your life. regards Joe On Wed, 27 Oct 2004 04:10:38 -0700, irv mullins <guest at rapideuphoria.com> wrote: > ============ The Euphoria Mailing List ============ > > posted by: irv mullins <irvm at ellijay.com> > > spent memory wrote: > > > > wtf , i can't work out how you thought "*because i requested where to > > find a txt file for processing by a dumb little outdated contest > > program i slapped together in 15 minutes*" that i wanted to waste 2 > > more minutes of my time reading your obviously shit throwing post. > > What makes you think there was any 'shit' involved? Just because you > use computers for playing games doesn't mean that other people don't > have real, paying work to do. Kat isn't storing and processing all that > data for fun - someone is paying for it, I'll bet. > > Unfortunately, I think the task is beyond the capabilities of a pc, > which is, after all, still a toy. She really needs either a cluster of > pcs, or mainframe time, but maybe Kat hasn't been able to convince > her client to pay for all that. > > Of course, I could be wrong. Perhaps all this data gathering is just > step 1 in Kat's plan for world domination. > > Irv > > > --^---------------------------------------------------------------- > This email was sent to: spent.memory at gmail.com > > EASY UNSUBSCRIBE click here: http://topica.com/u/?b1dd66.bNYD3w.c3BlbnQu > Or send an email to: EUforum-unsubscribe at topica.com > > For Topica's complete suite of email marketing solutions visit: > http://www.topica.com/?p=TEXFOOTER > --^---------------------------------------------------------------- > >
231.
h=received:message-id:date:from:reply-to:to:subject:in-reply-to:mime-version:content-type:content-transfer-encoding:references; b=LjnRplOxf7da+MMLD6X3NCnpMVoclLg61NGYtlpNMaMjFsM8KkISNDCFQzIgdZ9/pqH54Znkol4Oo99+wD1l9bL+43XECN7UrV4WOKGQPPh8oFlLnXoJqgkdqXVygU/IPqn32ZHBuSIjE8hDEQkn05favvuPmqM19rcKMfPBbOo= Received: by 10.38.149.71 with SMTP id w71mr958737rnd; Wed, 27 Oct 2004 11:48:29 -0700 (PDT) Received: by 10.38.22.12 with HTTP; Wed, 27 Oct 2004 11:48:29 -0700 (PDT) Message-ID: <df040a3204102711481b4603b3 at mail.gmail.com> Date: Thu, 28 Oct 2004 04:48:29 +1000 From: spent memory <spent.memory at gmail.com> Reply-To: spent memory <spent.memory at gmail.com> To: euforum at topica.com Subject: Re: NEVERMIND! Re: Cool Christmas Contest In-Reply-To: <1919698908-1463792638-1098901271 at boing.topica.com> Mime-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit References: <716550947-1463792638-1098875438 at boing.topica.com> <1919698908-1463792638-1098901271 at boing.topica.com> Ok , i see your point, i read your post quickly and thought it was pointed at me in a sarcastic kinda way. I see that it wasn't now. My assumption was my flaw. I thought that your post and suggestion was far too complicated (i didn't have a clue what you where talking about or in relation to) and since you quoted my first post in this thread i thought it was aimed at me. I know better now. Your project sounds interesting none the less and i would rather spend my time being as constructive as i can within the Euphoria Community. On Wed, 27 Oct 2004 12:52:37 -0500, Kat <gertie at visionsix.com> wrote: > ============ The Euphoria Mailing List ============ > > On 27 Oct 2004, at 4:10, irv mullins wrote: > > > > > posted by: irv mullins <irvm at ellijay.com> > > <snip> > > > Just because you > > use computers for playing games doesn't mean that other people don't > > have real, paying work to do. Kat isn't storing and processing all that > > data for fun - someone is paying for it, I'll bet. > > > > Unfortunately, I think the task is beyond the capabilities of a pc, > > which is, after all, still a toy. She really needs either a cluster of > > pcs, or mainframe time, but maybe Kat hasn't been able to convince > > her client to pay for all that. > > Actually, i *am* recieving money to build a cluster. > > > Of course, I could be wrong. Perhaps all this data gathering is just > > step 1 in Kat's plan for world domination. > > Sshhhhhhh!!!!!! Don't tell everyone! > > Kat > > > --^---------------------------------------------------------------- > This email was sent to: spent.memory at gmail.com > > EASY UNSUBSCRIBE click here: http://topica.com/u/?b1dd66.bNYD3w.c3BlbnQu > Or send an email to: EUforum-unsubscribe at topica.com > > For Topica's complete suite of email marketing solutions visit: > http://www.topica.com/?p=TEXFOOTER > --^---------------------------------------------------------------- > >
232.
- Posted by Don Phillips <EuNexus at yahoo.com> Feb 15, 2003
- 1926 views
Ive been using EditPlus 2 for quite some time, while not free ware its trial never runs out. www.editplus.com
233.
- Posted by Anthony Bowyer <adb1x1 at YAHOO.COM> Jan 06, 2000
- 1921 views
Anyone know where I might find some date manipulation routines for Euphoria? I'm most interested in converting day number (364) to a date (1999 Dec 30). Thanks for any help. ===== NT4ZO __________________________________________________ Do You Yahoo!? Talk to your friends online with Yahoo! Messenger. http://im.yahoo.com
234.
- Posted by "E.Allen Soard" <esp.software at EXCITE.COM> Jan 06, 2000
- 1907 views
I just had to write a program to do that for a TP class I was taking. The source shouldn't be that hard to convert. Do you want it? -E.Allen Soard On Thu, 6 Jan 2000 12:01:36 -0800, Euphoria Programming for MS-DOS wrote: > Anyone know where I might find some date manipulation > routines for Euphoria? I'm most interested in > converting day number (364) to a date (1999 Dec 30). > Thanks for any help. > > > ===== > NT4ZO > __________________________________________________ > Do You Yahoo!? > Talk to your friends online with Yahoo! Messenger. > http://im.yahoo.com _______________________________________________________ Visit Excite Shopping at http://shopping.excite.com The fastest way to find your Holiday gift this season
235.
- Posted by Raude Riwal <RAUDER at THMULTI.COM> Jan 07, 2000
- 1895 views
The algorythm is described on page 111 of "the C programming language" second edition, Kernighan&Ritchie (Prentice Hall). You should be able to find it , but I can copy it if you need. Riwal Raude rauder at thmulti.com > -----Original Message----- > From: Anthony Bowyer [SMTP:adb1x1 at YAHOO.COM] > Sent: Thursday, January 06, 2000 9:02 PM > To: EUPHORIA at LISTSERV.MUOHIO.EDU > Subject: > > Anyone know where I might find some date manipulation > routines for Euphoria? I'm most interested in > converting day number (364) to a date (1999 Dec 30). > Thanks for any help. > > > ===== > NT4ZO > __________________________________________________ > Do You Yahoo!? > Talk to your friends online with Yahoo! Messenger. > http://im.yahoo.com
236.
- Posted by Anthony Bowyer <adb1x1 at YAHOO.COM> Jan 07, 2000
- 1903 views
You know, I have that book and I didn't think to look there! Had a bad neuron day! --- Raude Riwal <RAUDER at THMULTI.COM> wrote: > The algorythm is described on page 111 of "the C > programming language" > second edition, Kernighan&Ritchie (Prentice Hall). > You should be able to find it , but I can copy it if > you need. > > Riwal Raude > rauder at thmulti.com > > > -----Original Message----- > > From: Anthony Bowyer [SMTP:adb1x1 at YAHOO.COM] > > Sent: Thursday, January 06, 2000 9:02 PM > > To: EUPHORIA at LISTSERV.MUOHIO.EDU > > Subject: > > > > Anyone know where I might find some date > manipulation > > routines for Euphoria? I'm most interested in > > converting day number (364) to a date (1999 Dec > 30). > > Thanks for any help. > > > > > > ===== > > NT4ZO > > __________________________________________________ > > Do You Yahoo!? > > Talk to your friends online with Yahoo! Messenger. > > http://im.yahoo.com > ===== NT4ZO __________________________________________________ Do You Yahoo!? Talk to your friends online with Yahoo! Messenger. http://im.yahoo.com
237.
- Posted by Paul Sheepwash <whalley99 at HOTMAIL.COM> Jan 18, 2000
- 1893 views
------=_NextPart_000_0033_01BF61D1.F10D40E0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable I am new to programming in Euphoria, and I am trying to make a program = work with the eprint utility that is included in the distribution. The = problem that I am having is whether to sue hex or dec printer commands = when I edit the eprint file for my printer. Anyone want to help? Paul=20 ------=_NextPart_000_0033_01BF61D1.F10D40E0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2919.6307" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>I am new to programming in = Euphoria, and I am=20 trying to make a program work with the eprint utility that is included = in the=20 distribution. The problem that I am having is whether to sue hex = or dec=20 printer commands when I edit the eprint file for my printer. = Anyone=20 want to help?</FONT></DIV> <DIV> </DIV> <DIV><FONT face=3DArial size=3D2> =20 = =20 = Paul=20 ------=_NextPart_000_0033_01BF61D1.F10D40E0--
238.
- Posted by Allen Soard <esp-software at MAIL.HYPERMART.NET> Jan 27, 2000
- 1907 views
- Last edited Jan 28, 2000
Hey all, Are there any known problems with running Eu-Linux under redhat 6.1? it just quits, doesn't execute the program, doesn't give any error messages, doesn't collect $200. Just quits. Thanks E.Allen Soard Bookmark the HyperMart Small Business Center. All the tools you need to succeed! http://www.hypermart.net/center/
240.
- Posted by Robert Craig <rds at RapidEuphoria.com> Jan 31, 2001
- 1962 views
------=_NextPart_000_0014_01C08BBE.E0477380 charset="iso-8859-1" Regards, Rob Craig Rapid Deployment Software http://www.RapidEuphoria.com ------=_NextPart_000_0014_01C08BBE.E0477380 name="Approval request for EUforum at topica.com.eml"
241. Re:
- Posted by Euman <euman at bellsouth.net> Jan 31, 2001
- 1910 views
------=_NextPart_000_0048_01C08BC1.45C289A0 charset="iso-8859-1" ??? The Bitmap attached doesn't look like 198 (chars) does it? The bitmap is a screen capture of the message recieved \ and saved in bitmap form. >euman ----- Original Message ----- From: "Robert Craig" <rds at RapidEuphoria.com> To: <EUforum at topica.com> Sent: Wednesday, January 31, 2001 19:48 > > Regards, > Rob Craig > Rapid Deployment Software > http://www.RapidEuphoria.com > > ------=_NextPart_000_0048_01C08BC1.45C289A0 name="SLTL.bmp"
242. Re:
- Posted by gertie at PELL.NET Jan 31, 2001
- 1898 views
On 31 Jan 2001, at 16:48, Robert Craig wrote: > > Regards, > Rob Craig > Rapid Deployment Software > http://www.RapidEuphoria.com My regards too! Kat
243.
- Posted by "Carlos W. Phelps" <CPhelps at GRIFFINACCESS.COM> Feb 05, 2001
- 1897 views
------=_NextPart_000_0026_01C08F8A.74403E40 charset="iso-8859-1" SIGNOFF EUPHORIA ------=_NextPart_000_0026_01C08F8A.74403E40 charset="iso-8859-1" <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <META content=3D"MSHTML 5.50.4611.1300" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>SIGNOFF = ------=_NextPart_000_0026_01C08F8A.74403E40--
244.
- Posted by "Carlos W. Phelps" <CPhelps at GRIFFINACCESS.COM> Feb 05, 2001
- 1903 views
------=_NextPart_000_0064_01C08F9B.224ABC80 charset="iso-8859-1" SIGNOFF EUPHORIA ------=_NextPart_000_0064_01C08F9B.224ABC80 charset="iso-8859-1" <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <META content=3D"MSHTML 5.50.4611.1300" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>SIGNOFF = EUPHORIA</FONT></DIV> ------=_NextPart_000_0064_01C08F9B.224ABC80--
245.
- Posted by Baby Elephant <baby_elephant at ADDRESS.COM> Feb 05, 2001
- 1887 views
- Last edited Feb 06, 2001
SIGNOFF EUPHORIA
246.
- Posted by Lucius Hilley III <lhilley at CDC.NET> Jan 02, 1998
- 1897 views
------=_NextPart_000_01BD1777.33EDA000 I have attached a file that is a patch for David Cuny's Toolkit. (ee.ex) This patch will allow you to put his editor and files in any directory or drive you wish. It is designed to automatically install the editor into the directory of which you specify. "install C:\EE" --this command would place the editor in C:\EE "install C:\EE\" --this will cause the program to install incorrectly. The "install.bat" program must be in the same directory as the editor and help files. OR If you have pkunzip in your path only text_gui.zip is required to be in the same directory as install.bat This patch only works on David Cuny's Toolkit v0.9b. As of today (01-02-1998) this is the most recent version of his editor. --Lucius L. Hilley III ------=_NextPart_000_01BD1777.33EDA000
247.
- Posted by The Reaper <reaper at AURACOM.COM> Jan 10, 1998
- 1895 views
- Last edited Jan 11, 1998
umm... my XMAS.ZIP has been giving a bit of trouble, so I sent it Mr. Craig to put on the Official Page, with all the files required inside the .zip (which I forgot about). Please try downloading again... =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= The Reaper (J. Lays) http://www.angelfire.com/nj/reaperlair/ reaper at auracom.com Check out my now ancient Euphoria Games page at: -= http://www.geocities.com/TimesSquare/Alley/4444/eugames.html ........................ . .. -||..........__...... "Life's a lot like . / ||......../-- \\.:::: Death itself; . ..| ||...... / | |.::: For both have a beginning, .| _-||.......|| / /.:::: But neither have an end." ..| |..||...... -\_- \ |\-.::: .| |.[< \ .../ \.:: .||.|||\|\ | - - . \.:::: ...|.\|| | \ | | |.:::. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
248.
- Posted by Ricardo Niederberger Cabral <rnc at BIGFOOT.COM> Jan 23, 1998
- 1908 views
- Last edited Jan 24, 1998
asd
249.
- Posted by jordah ferguson <jorfergie03 at yahoo.com> Oct 28, 2002
- 1916 views
Hi Euphorians, Below is a small library coded in API that creates a custom control called the hot buttons. i haven't added round button/roundrect but those are very easy. the reason i'm submitting this is because i'm planning to revamp the library for efficiency and speed. for win32lib users you'll have to wait i wrap a wrapper over it. experienced win32lib users will have no problems..... HB_Create(atom parent,sequence text,atom x,atom y,atom cx,atom cy,integer Style) ================================================================ This creates a hotbutton control. parent requires a real win32 handle so for win32lib users you'll have to use getHandle() for the parent window. Style can be HBS_RECT(HBS_ROUND/ROUNDRECT not yet supported),HBS_TOGGLE(Button is toggle style),HBS_ENABLED,HBS_DISABLED etc. You can use or_all() on these styles to get the final value. using 0 uses the default values ------------------------------------------- HB_SetFont(atom hwnd,sequence fontname,integer height,atom fntdata) ------------------------------------------- hwn should be the handle returned by HB_Create() fontname is the name of the font.height is the font height needed. fntdata is the style. it can be HBF_BOLD,HBF_ITALIC,HBF_UNDERLINE. u will have to use or_all() too get the final style. when fntdata is 0 default values are used ------------------------------------------- HB_SetImage(atom hwnd,atom image,integer State,integer Type,integer bltForm,atom colorref) =========================================== hwnd: is the value returned after HB_Create() image: this is a handle to the image. it can be a bitmap or icon handle State: this is for the button state inwhich this image will be shown. it can be HBIS_HOT(when mouse is over button) HBIS_DISABLED(Button is disabled),HBIS_COLD(Button has no focus) Type: Type of image used HBI_ICO for an icon. HBI_BMP for a bitmap bltForm: This is needed when drawing the bitmaps (HBI_BMP) using HBLT_OPAQUE draws the image "as-is", HBLT_TRANSPARENT draws a bitmap with a transparent background colorref: This is the background color used when HBLT_TRANSPARENT is specified HB_SetAlignment(atom hwnd,integer style) ======================================== if style is HBA_LEFT image is drawn to the left of the text. if style is HBA_BOTTOM image is drawn above the text ----------------------------------------- HB_SetText(atom hwnd,sequence text) ========================================= changes the current text of the hotbutton. hwnd is the value returned from hb_create(). Note text with & prefix returns an underscore on the character after the ampersand ----------------------------------------- HB_GetText(atom hwnd) ========================================= retuens the hotbutton's text ----------------------------------------- HB_SetBackColor(atom hwnd,object clr) ========================================= changes the background color of a button. clr can be a sequence of rgb triads {r,g,b} or the COLORREF value. ----------------------------------------- HB_GetBackColor(atom hwnd) ========================================= returns the colorref value of the current buttons background color ----------------------------------------- HB_SetTextColor(atom hwnd,object clr) ========================================= Changes the text color ----------------------------------------- HB_GetTextColor(atom hwnd) ========================================= Returns the text color of the hot button ----------------------------------------- --File : HotButtons Module -- --Version: 0.1.5 -- --Date : Thursday, October 10, 2002 -- --Author : Jordah Ferguson -- ----------------------------------------- --** Font heights vary --** Check if we really need saveDC and RestoreDC --** Make Drop down style --** Parents should be noted in the structure without warning without type_check include dll.e include machine.e include msgbox.e constant HBUSER32 = open_dll("user32.dll" ), HBGDI32 = open_dll("gdi32.dll" ), HBKRN32 = open_dll("kernel32.dll"), -- kernel32.dll C routines hlstrlen = define_c_func(HBKRN32 , "lstrlenA",{C_LONG},C_INT), -- User32.dll C routines hRegisterClassEx = define_c_func(HBUSER32, "RegisterClassExA", {C_LONG}, C_LONG ), hCreateWindowExA = define_c_func(HBUSER32, "CreateWindowExA", {C_LONG, C_LONG, C_LONG, C_LONG, C_INT, C_INT, C_INT, C_INT, C_LONG, C_LONG, C_LONG, C_LONG}, C_LONG ), hCallWindowProcA = define_c_func(HBUSER32, "CallWindowProcA", {C_POINTER, C_LONG, C_INT, C_INT, C_LONG}, C_LONG ), hPostMessage = define_c_proc(HBUSER32, "PostMessageA", {C_LONG, C_INT, C_INT, C_LONG}), hGetClientRect = define_c_proc(HBUSER32, "GetClientRect", {C_LONG, C_LONG}), hSetPropA = define_c_proc(HBUSER32, "SetPropA", {C_LONG, C_LONG, C_LONG}), hGetPropA = define_c_func(HBUSER32, "GetPropA", {C_LONG, C_LONG}, C_LONG ), hDefWindowProcA = define_c_func(HBUSER32, "DefWindowProcA", {C_LONG, C_INT, C_INT, C_LONG}, C_LONG ), hGetWindowLongA = define_c_func(HBUSER32, "GetWindowLongA", {C_LONG, C_INT}, C_LONG ), hBeginPaint = define_c_func(HBUSER32, "BeginPaint", {C_LONG, C_LONG}, C_LONG ), hEndPaint = define_c_proc(HBUSER32, "EndPaint", {C_LONG, C_LONG} ), hInvalidateRect = define_c_proc(HBUSER32, "InvalidateRect", {C_LONG, C_LONG, C_LONG}), hGetDC = define_c_func(HBUSER32, "GetDC", {C_LONG}, C_LONG ), hReleaseDC = define_c_proc(HBUSER32, "ReleaseDC", {C_LONG, C_LONG}), hDrawEdge = define_c_proc(HBUSER32, "DrawEdge", {C_LONG, C_LONG, C_INT, C_INT} ), hDrawTextA = define_c_proc(HBUSER32, "DrawTextA", {C_LONG, C_LONG, C_INT, C_LONG, C_INT} ), hSetWindowLongA = define_c_proc(HBUSER32, "SetWindowLongA", {C_LONG, C_INT, C_LONG}), hDrawIconEx = define_c_proc(HBUSER32, "DrawIconEx", {C_LONG, C_INT, C_INT, C_LONG, C_INT, C_INT, C_INT, C_LONG, C_INT}), hGetIconInfo = define_c_proc(HBUSER32, "GetIconInfo", {C_LONG, C_POINTER}), hGetUpdateRect = define_c_func(HBUSER32, "GetUpdateRect", {C_LONG, C_LONG, C_LONG}, C_LONG ), -- gdi32 C routines hCreateCompatibleDC = define_c_func(HBGDI32, "CreateCompatibleDC", {C_LONG}, C_LONG ), hPatBlt = define_c_proc(HBGDI32, "PatBlt", {C_LONG, C_INT, C_INT, C_INT, C_INT, C_LONG}), hCreateCompatibleBitmap= define_c_func(HBGDI32, "CreateCompatibleBitmap", {C_LONG, C_INT, C_INT}, C_LONG ), hCreateBitmap = define_c_func(HBGDI32, "CreateBitmap", {C_INT, C_INT, C_INT, C_INT, C_LONG}, C_LONG ), hCreateSolidBrush = define_c_func(HBGDI32, "CreateSolidBrush", {C_POINTER}, C_LONG ), hCreateBrushIndirect = define_c_func(HBGDI32, "CreateBrushIndirect", {C_LONG}, C_LONG ), hGetStockObject = define_c_func(HBGDI32, "GetStockObject", {C_INT}, C_LONG ), hDeleteObject = define_c_func(HBGDI32, "DeleteObject", {C_LONG},C_LONG ), hBitBlt = define_c_proc(HBGDI32, "BitBlt", {C_LONG, C_INT, C_INT, C_INT, C_INT, C_LONG, C_INT, C_INT, C_LONG}), hDeleteDC = define_c_func(HBGDI32, "DeleteDC", {C_LONG},C_LONG), hSelectObject = define_c_func(HBGDI32, "SelectObject", {C_LONG, C_LONG},C_LONG), hSetTextColor = define_c_proc(HBGDI32, "SetTextColor", {C_LONG, C_POINTER}), hGetObject = define_c_func(HBGDI32, "GetObjectA", {C_LONG, C_INT, C_LONG}, C_INT ), hSaveDC = define_c_proc(HBGDI32, "SaveDC", {C_LONG} ), hRestoreDC = define_c_proc(HBGDI32, "RestoreDC", {C_LONG, C_INT}), hSetPixel = define_c_proc(HBGDI32, "SetPixel", {C_LONG, C_INT, C_INT, C_POINTER}), hSetBkColor = define_c_func(HBGDI32, "SetBkColor", {C_LONG, C_POINTER}, C_POINTER ), hCreateFont = define_c_func(HBGDI32, "CreateFontA",{C_INT, C_INT, C_INT, C_INT, C_INT, C_INT,C_INT, C_INT, C_INT, C_INT, C_INT, C_INT, C_INT, C_POINTER}, C_INT), hSetBkMode = define_c_proc(HBGDI32, "SetBkMode", {C_LONG, C_INT}) --------------------------------------------------------- constant WM_PAINT = #000F, WM_LBUTTONDOWN= #0201, WM_MOUSEMOVE = #0200, WM_DESTROY = #0002, WM_LBUTTONUP = #0202, FW_NORMAL = 400, BMask = {{1,0,1,0,1,0,1,0}, {0,1,0,1,0,1,0,1}, {1,0,1,0,1,0,1,0}, {0,1,0,1,0,1,0,1}, {1,0,1,0,1,0,1,0}, {0,1,0,1,0,1,0,1}, {1,0,1,0,1,0,1,0}, {0,1,0,1,0,1,0,1}} --------------------------------------------------------- constant HBPROPCB = allocate_string("HotButton CallBack "), HBPROPLP = allocate_string("HotButton Structure"), WC_HBUTTON = allocate_string("HotButton"), aRECT = allocate( 16 ), aPS = allocate( 64 ), aBmp = allocate( 32 ), aLOGBRUSH = allocate( 12 ), aICONINFO = allocate( 20 ), WS_HBUTTON = #50000000, WM_USER = #0400, -- HB Ver and Error Msgs HB_VER = "Hot Button 0.1.4", HB_CREATE_FAIL = "Failed to create Hot Button", HB_REG_FAIL = "Failed to Register Hot Button Class", HB_DEL_BRUSH_FAIL= "Failed to delete brush!", HB_DEL_DC_FAIL = "Failed to delete Compatible Device Context", HB_BRSH_FAIL = "Failed to create brush", HB_CDC_FAIL = "Failed to create Compatible Device Context", HB_CBM_FAIL = "Failed to create Compatible Bitmap", HB_CBM_DEL_FAIL = "Failed to delete Compatible Bitmap", HB_GetDC_FAIL = "Failed to acquire the Device Context", HB_BAD_SET = "Invalid Group Index Specified", -- Font Structure hbf_fntsz = 00, hbf_fntstyle = 04, hbf_fntheight = 05, sizeof_hbf = 06, -- Image Structure hbi_onbitmap = 00, hbi_disbitmap = 04, hbi_offbitmap = 08, hbi_ontransclr = 12, hbi_offtransclr = 16, hbi_distransclr = 20, hbi_onbitprop = 24, hbi_disbitprop = 25, hbi_offbitprop = 26, hbi_alignment = 27, sizeof_hbi = 28, -- Control Structure hb_font = 00, hb_image = 04, hb_txtcolor = 08, hb_text = 12, hb_bkcolor = 16, hb_active = 20, hb_mstatus = 21, hb_hover = 22, hb_togstatus = 23, hb_sstyle = 24, hb_stype = 25, hb_set = 26, sizeof_hb = 27, bit_pos = {#1,#2,#4,#8,#10,#20} -- Global Button Styles global constant WM_HBCLICKED = WM_USER + 20, HBS_ENABLED = #01, -- Btn Enabled HBS_DISABLED = #02, -- Btn Disabled HBS_TOGGLE = #04, -- Btn is toggled HBS_ROUNDRECT = #08, HBS_ELLIPSE = #10, HBS_RECT = #20, HBI_ICO = #01, -- HB_SetImage(); Type:Image Presented is an icon HBI_BMP = #02, -- HB_SetImage(); Type:Image Presented is a bitmap HBIS_DISABLED = #01, -- HB_SetImage(); Image is intended for disabled view HBIS_HOT = #02, -- HB_SetImage(); Image is intended for Hot view ie has focus HBIS_COLD = #03, -- HB_SetImage(); Image is intended for Cold view ie lostfocus HBLT_OPAQUE = #01, -- HB_SetImage(); Image bitblt uses OPAQUE mode ie no blending HBLT_TRANSPARENT = #02, -- HB_SetImage(); Transparent; image blends with current brush HBA_LEFT = #00, -- Text is to the left of image HBA_BOTTOM = #01, -- Text is displayed below image HBF_NORMAL = #01, -- Use Normal font width/style/underline HBF_BOLD = #02, -- Use Bold Font HBF_ITALIC = #04, -- Use Italics HBF_UNDERLINE = #08 -- Use UnderlineStyle --------------------------------------------------------- integer Type,Style,Void,ExcGrp atom ParentCB,CurParentCB,ACTIVE,Defaultfont,Struct,DefBrush,CurBrush,HDC sequence rect,ExcSet Void = -1 ACTIVE = -1 Struct = -1 Type = -1 Style = -1 ExcSet = {} ------------------------------------------- procedure Report(sequence msg) ------------------------------------------- Void = message_box(msg,HB_VER&" Error!",MB_ICONINFORMATION) end procedure ------------------------------------------- function RGB(sequence Triad) ------------------------------------------- return Triad[1] * #1 + Triad[2] * #100 + Triad[3] * #10000 end function ------------------------------------------- function LO_BIT(integer a) ------------------------------------------- return and_bits(a,#F) end function ------------------------------------------- function HI_BIT(integer a) ------------------------------------------- return floor(a/#10) end function ------------------------------------------- function MAKE_BYTE(integer a,integer b) ------------------------------------------- a = and_bits(a,#F) b = and_bits(b,#F) return ((b*#10) + a) end function ------------------------------------------- function abs(atom a) ------------------------------------------- if a > 0 then return a else return (-a) end if end function ------------------------------------------- procedure StoreBits(atom Struct,integer val) ------------------------------------------- sequence bits integer hibit,lobit lobit = 0 hibit = 0 bits = {} if not val then bits = {HBS_ENABLED,HBS_RECT} else for n = 1 to length(bit_pos) do Void = bit_pos[n] if and_bits(val,Void) then bits &= Void end if end for end if for n = 1 to length(bits) do Void = bits[n] if Void <= HBS_TOGGLE then lobit = or_bits(lobit,Void) else hibit = or_bits(hibit,Void) end if end for poke(Struct + hb_sstyle,hibit) poke(Struct + hb_stype ,lobit) end procedure ------------------------------------------- function GetClientRect(atom hwnd) ------------------------------------------- c_proc(hGetClientRect,{hwnd,aRECT}) return peek4u({aRECT,4}) end function ------------------------------------------- function GetBmpSize(atom Bmp) ------------------------------------------- if c_func(hGetObject,{Bmp,32,aBmp}) then return peek4u({aBmp+04,2}) end if return {0,0} end function ------------------------------------------- function GetIcoSize(atom icon) ------------------------------------------- atom AndMask c_proc(hGetIconInfo,{icon,aICONINFO}) AndMask = peek4u(aICONINFO + 16) return GetBmpSize(AndMask) end function ------------------------------------------- function CreateSolidBrush(atom Clr) ------------------------------------------- atom brush brush = c_func(hCreateSolidBrush,{Clr}) if not brush then Report(HB_BRSH_FAIL) end if return brush end function ------------------------------------------- procedure DeleteBrush(atom brush) ------------------------------------------- if not c_func(hDeleteObject,{brush}) then Report(HB_DEL_BRUSH_FAIL) end if end procedure ------------------------------------------- function CreateFont(atom fntAddr) ------------------------------------------- integer width,und,ita,fntheight,fntdata atom fntname sequence bits bits = {} fntname = peek4u(fntAddr + hbf_fntsz) fntheight = peek(fntAddr + hbf_fntheight) fntdata = peek(fntAddr + hbf_fntstyle) if not fntdata then width = FW_NORMAL und = 0 ita = 0 else for n = 1 to length(bit_pos) do Void = bit_pos[n] if and_bits(fntdata,Void) then bits &= Void end if end for if not find(HBF_BOLD,bits) then width = FW_NORMAL else width = FW_NORMAL * 1.5 end if if not find(HBF_ITALIC,bits) then ita = 0 else ita = 1 end if if not find(HBF_UNDERLINE,bits) then und = 0 else und = 1 end if end if return c_func(hCreateFont,{fntheight,0,0,0,width,ita,und,0,0,0,0,0,0,fntname}) end function ------------------------------------------- function GetDC(atom hwnd) ------------------------------------------- hwnd = c_func(hGetDC,{hwnd}) if not hwnd then Report(HB_GetDC_FAIL) end if c_proc(hSaveDC,{hwnd}) return hwnd end function ------------------------------------------- procedure ReleaseDC(atom hwnd,atom HDC) ------------------------------------------- c_proc(hRestoreDC,{HDC,-1}) c_proc(hReleaseDC,{hwnd,HDC}) end procedure ------------------------------------------- function CreateCompatibleDC(atom HDC) ------------------------------------------- HDC = c_func(hCreateCompatibleDC,{HDC}) if not HDC then Report(HB_CDC_FAIL) end if return HDC end function ------------------------------------------- procedure DeleteDC(atom HDC) ------------------------------------------- if not c_func(hDeleteDC,{HDC}) then Report(HB_DEL_DC_FAIL) end if end procedure ------------------------------------------- function CreateCompatibleBitmap(atom HDC,atom cx,atom cy) ------------------------------------------- HDC = c_func(hCreateCompatibleBitmap,{HDC,cx,cy}) if not HDC then Report(HB_CBM_FAIL) end if return HDC end function ------------------------------------------- procedure DeleteCompatibleBitmap(atom bm) ------------------------------------------- if not c_func(hDeleteObject,{bm}) then Report(HB_CBM_DEL_FAIL) end if end procedure ------------------------------------------- function SelectObject(atom HDC,atom Obj) ------------------------------------------- return c_func(hSelectObject,{HDC,Obj}) end function ------------------------------------------- function CreatePatternBrush(atom HDC,atom clr) ------------------------------------------- atom MbmBMP,MemDC,OldBm,Brush MemDC = CreateCompatibleDC(HDC) MbmBMP= CreateCompatibleBitmap(HDC,8,8) OldBm = SelectObject(MemDC,MbmBMP) c_proc(hPatBlt,{MemDC,0,0,8,8,#00F00021}) if clr = #FFFFFF then clr = #C0C0C0 end if for n = 1 to 8 do for m = 1 to 8 do Void = BMask[n][m] if Void then c_proc(hSetPixel,{MemDC,n-1,m-1,clr}) end if end for end for poke4(aLOGBRUSH,{3,0,MbmBMP}) Brush = c_func(hCreateBrushIndirect,{aLOGBRUSH}) OldBm = SelectObject(MemDC,OldBm) DeleteCompatibleBitmap(MbmBMP) DeleteDC(MemDC) return Brush end function ------------------------------------------- procedure BltBitMap(atom HDC,atom bitmap,atom x,atom y,atom cx,atom cy) ------------------------------------------- atom MemDC MemDC = CreateCompatibleDC(HDC) Void = SelectObject(MemDC,bitmap) c_proc(hBitBlt,{HDC,x,y,cx,cy,MemDC,0,0,#00CC0020}) DeleteDC(MemDC) end procedure ------------------------------------------- procedure TransparentBlt(atom HDC,atom bitmap,atom x,atom y,atom cx,atom cy,atom bkcolor) ------------------------------------------- atom SourceDC,SavedDC,InvertedDC,MaskDC,FinalDC,InvertedBmp,MaskBmp,FinalBmp,SavedBmp, PrevInvBmp,PrevMaskBmp,PrevFinalBmp,PrevSavedBmp,PrevSourceBmp,PrevColor SourceDC = CreateCompatibleDC(HDC) SavedDC = CreateCompatibleDC(HDC) InvertedDC = CreateCompatibleDC(HDC) FinalDC = CreateCompatibleDC(HDC) MaskDC = CreateCompatibleDC(HDC) FinalBmp = CreateCompatibleBitmap(HDC,cx,cy) SavedBmp = CreateCompatibleBitmap(HDC,cx,cy) InvertedBmp= c_func(hCreateBitmap,{cx,cy,1,1,0}) MaskBmp = c_func(hCreateBitmap,{cx,cy,1,1,0}) PrevSourceBmp = SelectObject(SourceDC,bitmap ) PrevSavedBmp = SelectObject(SavedDC,SavedBmp) PrevFinalBmp = SelectObject(FinalDC,FinalBmp) PrevMaskBmp = SelectObject(MaskDC ,MaskBmp ) PrevInvBmp = SelectObject(InvertedDC,InvertedBmp) c_proc(hBitBlt,{SavedDC,0,0,cx,cy,SourceDC,0,0,#00CC0020}) PrevColor = c_func(hSetBkColor,{SourceDC,bkcolor}) c_proc(hBitBlt,{MaskDC,0,0,cx,cy,SourceDC,0,0,#00CC0020}) PrevColor = c_func(hSetBkColor,{SourceDC,PrevColor}) c_proc(hBitBlt,{InvertedDC,0,0,cx,cy,MaskDC,0,0,#00330008}) c_proc(hBitBlt,{FinalDC,0,0,cx,cy,HDC,x,y,#00CC0020}) c_proc(hBitBlt,{FinalDC,0,0,cx,cy,MaskDC,0,0,#008800C6}) c_proc(hBitBlt,{SourceDC,0,0,cx,cy,InvertedDC,0,0,#008800C6}) c_proc(hBitBlt,{FinalDC,0,0,cx,cy,SourceDC,0,0,#00EE0086}) c_proc(hBitBlt,{HDC,x,y,cx,cy,FinalDC,0,0,#00CC0020}) c_proc(hBitBlt,{SourceDC,0,0,cx,cy,SavedDC,0,0,#00CC0020}) Void = SelectObject(SourceDC,PrevSourceBmp) Void = SelectObject(SavedDC,PrevSavedBmp ) Void = SelectObject(FinalDC,PrevFinalBmp ) Void = SelectObject(MaskDC,PrevMaskBmp ) Void = SelectObject(InvertedDC,PrevInvBmp ) DeleteCompatibleBitmap(FinalBmp) DeleteCompatibleBitmap(SavedBmp) DeleteCompatibleBitmap(MaskBmp ) DeleteCompatibleBitmap(InvertedBmp) DeleteDC(FinalDC) DeleteDC(InvertedDC) DeleteDC(MaskDC) DeleteDC(SavedDC) DeleteDC(SourceDC) end procedure ------------------------------------------- function PrepareDC(atom HDC,sequence rect,atom str) ------------------------------------------- atom Oldfont,Oldbrush,fontAddr,hfont,brush hfont= 0 brush = peek4u(str+hb_bkcolor) fontAddr = peek4u(str+hb_font) if fontAddr then hfont = CreateFont(fontAddr) Oldfont = SelectObject(HDC,hfont) else Oldfont = SelectObject(HDC,Defaultfont) end if c_proc(hSetBkMode,{HDC,1}) brush = CreateSolidBrush(brush) Oldbrush = SelectObject(HDC,brush) c_proc(hSetTextColor,{HDC,peek4u(str+hb_txtcolor)}) c_proc(hPatBlt,{HDC,rect[1],rect[2],rect[3],rect[4],#00F00021}) Oldbrush = SelectObject(HDC,Oldbrush) DeleteBrush(brush) return {Oldfont,hfont} end function ------------------------------------------- function CalculateRect(sequence rect,sequence imgrect,integer alignment,integer txtflag) ------------------------------------------- atom X1,Y1,R1,R2,R3,R4,C,DT_Flag if txtflag then if not alignment then Y1 = floor(abs(rect[4]-imgrect[2])/2) X1 = 2 R1 = imgrect[1]+ X1 + 4 R2 = Y1 + floor((imgrect[2]/4)) R3 = rect[3] R4 = rect[4] DT_Flag = #20 else X1 = floor(abs(rect[3]-imgrect[1])/2) Y1 = 2 C = imgrect[2] + Y1 + 4 R1 = rect[1] R2 = (C + floor(abs(rect[4]-C)/2)) R3 = rect[3] R4 = rect[4] DT_Flag = #125 end if else Y1 = floor(abs(rect[4]-imgrect[2])/2) X1 = floor(abs(rect[3]-imgrect[1])/2) R1 = 0 R2 = 0 R3 = 0 R4 = 0 DT_Flag = 0 end if return {X1,Y1,R1,R2,R3,R4,DT_Flag} end function ------------------------------------------- procedure DisplayRectButton(atom str,atom HDC,sequence rect,atom HImage,integer Style,integer tog,atom transclr,integer alignment) ------------------------------------------- integer imgType,bltType,DT_Flag,len atom PatBrush,OldBrush,pszAddr sequence imgrect,frect,fnt fnt = PrepareDC(HDC,rect,str) pszAddr = peek4u(str + hb_text) len = c_func(hlstrlen,{pszAddr}) if tog then PatBrush = CreatePatternBrush(HDC,peek4u(str+hb_bkcolor)) OldBrush = SelectObject(HDC,PatBrush) c_proc(hPatBlt,{HDC,0,0,rect[3],rect[4],#00F00021}) end if if HImage then imgType = HI_BIT(Style) bltType = LO_BIT(Style) if imgType = HBI_BMP then imgrect = GetBmpSize(HImage) frect = CalculateRect(rect,imgrect,alignment,len) if tog then frect[1] += 2 frect[3] += 2 end if poke4(aRECT,{frect[3],frect[4],frect[5],frect[6]}) if bltType = HBLT_OPAQUE then BltBitMap(HDC,HImage,frect[1],frect[2],imgrect[1],imgrect[2]) elsif bltType = HBLT_TRANSPARENT then TransparentBlt(HDC,HImage,frect[1],frect[2],imgrect[1],imgrect[2],transclr) end if DT_Flag = frect[7] elsif imgType = HBI_ICO then imgrect = GetIcoSize(HImage) frect = CalculateRect(rect,imgrect,alignment,len) if tog then frect[1] += 2 frect[3] += 2 end if poke4(aRECT,{frect[3],frect[4],frect[5],frect[6]}) c_proc(hDrawIconEx,{HDC,frect[1],frect[2],HImage,imgrect[1],imgrect[2],0,0,3}) DT_Flag = frect[7] end if else DT_Flag = #125 if tog then poke4(aRECT,rect[1] + 3 & rect[2..4]) end if end if if tog then OldBrush = SelectObject(HDC,OldBrush) DeleteBrush(PatBrush) end if if len then c_proc(hDrawTextA,{HDC,pszAddr,len,aRECT,DT_Flag}) end if Void = SelectObject(HDC,fnt[1]) if fnt[2] then Void = c_func(hDeleteObject,{fnt[2]}) end if end procedure ------------------------------------------- procedure BltOnImage_RECT(atom hwnd,atom HDC,atom str) ------------------------------------------- sequence rect atom ImageAddr rect = GetClientRect(hwnd) ImageAddr = peek4u(str + hb_image) if ImageAddr then DisplayRectButton(str,HDC,rect, peek4u(ImageAddr + hbi_onbitmap), peek(ImageAddr + hbi_onbitprop),0, peek4u(ImageAddr+hbi_ontransclr), peek(ImageAddr + hbi_alignment)) else DisplayRectButton(str,HDC,rect,0,0,0,0,0) end if poke4(aRECT,rect) c_proc(hDrawEdge,{HDC,aRECT,#4,15}) end procedure ------------------------------------------- procedure BltOffImage_RECT(atom hwnd,atom HDC,atom str) ------------------------------------------- sequence rect atom ImageAddr rect = GetClientRect(hwnd) ImageAddr = peek4u(str + hb_image) if ImageAddr then DisplayRectButton(str,HDC,rect, peek4u(ImageAddr + hbi_offbitmap), peek(ImageAddr + hbi_offbitprop),0, peek4u(ImageAddr+hbi_offtransclr), peek(ImageAddr + hbi_alignment)) else DisplayRectButton(str,HDC,rect,0,0,0,0,0) end if end procedure ------------------------------------------- procedure BltTogImage_RECT(atom hwnd,atom HDC,atom str) ------------------------------------------- sequence rect atom ImageAddr rect = GetClientRect(hwnd) ImageAddr = peek4u(str + hb_image) if ImageAddr then DisplayRectButton(str,HDC,rect, peek4u(ImageAddr + hbi_onbitmap), peek(ImageAddr + hbi_onbitprop),1, peek4u(ImageAddr+hbi_ontransclr), peek(ImageAddr + hbi_alignment)) else DisplayRectButton(str,HDC,rect,0,0,1,0,0) end if poke4(aRECT,rect) c_proc(hDrawEdge,{HDC,aRECT,10,15}) end procedure ------------------------------------------- procedure ReleaseToggle(integer grp,atom btn) ------------------------------------------- atom hwnd,Struct if grp >0 and grp <= length(ExcSet) then hwnd = ExcSet[grp] ExcSet[grp] = btn if hwnd then Struct = c_func(hGetPropA,{hwnd,HBPROPLP}) if Struct then if peek(Struct + hb_togstatus) then poke(Struct + hb_active , 1 ) poke(Struct + hb_mstatus , 0 ) poke(Struct + hb_togstatus, 0 ) c_proc(hInvalidateRect,{hwnd,0,1}) end if end if end if end if end procedure ------------------------------------------- global function HB_Create(atom parent,sequence text,atom x,atom y,atom cx,atom cy,integer Style) ------------------------------------------- atom hwnd,sz,CallBackA,str sequence r hwnd = c_func(hCreateWindowExA,{0,WC_HBUTTON,0,WS_HBUTTON,x,y,cx,cy,parent,0,instance(),0}) if not hwnd then Report(HB_CREATE_FAIL) return hwnd end if CallBackA = c_func(hGetWindowLongA,{parent,-4}) if CallBackA != CurParentCB then c_proc(hSetPropA,{parent,HBPROPCB,CallBackA}) c_proc(hSetWindowLongA,{parent,-4,CurParentCB}) end if str = allocate(sizeof_hb) sz = allocate_string(text) mem_set(str,0,sizeof_hb) poke4(str+hb_bkcolor ,#C0C0C0) poke4(str+hb_text ,sz ) StoreBits(str,Style) c_proc(hSetPropA,{hwnd,HBPROPLP,str}) return hwnd end function ------------------------------------------- global procedure HB_SetFont(atom hwnd,sequence fontname,integer height,atom fntdata) ------------------------------------------- atom str,sz,fntname,fntAddr str = c_func(hGetPropA,{hwnd,HBPROPLP}) if str then sz = peek4u(str + hb_font) if sz then fntname = peek4u(sz + hbf_fntsz) if fntname then free(fntname) end if poke4(sz + hbf_fntsz,allocate_string(fontname)) poke(sz + hbf_fntheight,height) poke(sz + hbf_fntstyle,fntdata) return end if fntAddr = allocate(sizeof_hbf) mem_set(fntAddr,0,sizeof_hbf) poke4(fntAddr + hbf_fntsz,allocate_string(fontname)) poke(fntAddr + hbf_fntheight,height) poke(fntAddr + hbf_fntstyle,fntdata) poke4(str + hb_font,fntAddr) end if end procedure ------------------------------------------- global procedure HB_SetText(atom hwnd,sequence text) ------------------------------------------- atom str,sz,psz str = c_func(hGetPropA,{hwnd,HBPROPLP}) if str then psz = peek4u(str + hb_text) if psz then free(psz) end if poke4(str+hb_text,allocate_string(text)) end if end procedure ------------------------------------------- global function HB_GetText(atom hwnd) ------------------------------------------- atom str,sz str = c_func(hGetPropA,{hwnd,HBPROPLP}) if str then sz = peek4u(str+hb_text) return peek({sz,c_func(hlstrlen,{sz})}) end if return {} end function ------------------------------------------- global procedure HB_SetTextColor(atom hwnd,object clr) ------------------------------------------- atom colorref,str if sequence(clr) then colorref = RGB(clr) else colorref = clr end if str = c_func(hGetPropA,{hwnd,HBPROPLP}) if str then poke4(str+hb_txtcolor,colorref) end if end procedure ------------------------------------------- global function HB_GetTextColor(atom hwnd) ------------------------------------------- atom str str = c_func(hGetPropA,{hwnd,HBPROPLP}) if str then return peek4u(str + hb_txtcolor) end if return -1 end function ------------------------------------------- global procedure HB_SetBackColor(atom hwnd,object clr) ------------------------------------------- atom colorref,str if sequence(clr) then colorref = RGB(clr) else colorref = clr end if str = c_func(hGetPropA,{hwnd,HBPROPLP}) if str then poke4(str+hb_bkcolor,colorref) end if end procedure ------------------------------------------- global function HB_GetBackColor(atom hwnd) ------------------------------------------- atom str str = c_func(hGetPropA,{hwnd,HBPROPLP}) if str then return peek4u(str + hb_bkcolor) end if return -1 end function ------------------------------------------- global procedure HB_SetAlignment(atom hwnd,integer flag) ------------------------------------------- atom str,image str = c_func(hGetPropA,{hwnd,HBPROPLP}) if str then image = peek4u(str + hb_image) if image then poke(image + hbi_alignment,flag) end if end if end procedure ------------------------------------------- global procedure HB_SetImage(atom hwnd,atom image,integer State,integer Type,integer bltForm,atom colorref) ------------------------------------------- atom str,imgAddr integer pack,x x = 0 str = c_func(hGetPropA,{hwnd,HBPROPLP}) if str then pack = MAKE_BYTE(bltForm,Type) imgAddr = peek4u(str + hb_image) if not imgAddr then imgAddr = allocate(sizeof_hbi) mem_set(imgAddr,0,sizeof_hbi) x = 1 end if if State = HBIS_DISABLED then poke4(imgAddr + hbi_disbitmap,image) poke4(imgAddr + hbi_distransclr,colorref) poke (imgAddr + hbi_disbitprop,pack) elsif State = HBIS_HOT then poke4(imgAddr + hbi_onbitmap,image) poke4(imgAddr + hbi_ontransclr,colorref) poke (imgAddr + hbi_onbitprop,pack) elsif State = HBIS_COLD then poke4(imgAddr + hbi_offbitmap,image) poke4(imgAddr + hbi_offtransclr,colorref) poke (imgAddr + hbi_offbitprop,pack) end if if x then poke4(str + hb_image,imgAddr) end if end if end procedure ------------------------------------------- global function HB_MakeToggleGroup() ------------------------------------------- ExcSet &= 0 return length(ExcSet) end function ------------------------------------------- global procedure HB_AddToGroup(integer grp,object Btn) ------------------------------------------- atom Str if grp < 1 and grp > length(ExcSet) then Report(HB_BAD_SET) end if if atom(Btn) then Str = c_func(hGetPropA,{Btn,HBPROPLP}) if Str then poke(Str + hb_set,grp) end if else for n = 1 to length(Btn) do HB_AddToGroup(grp,Btn[n]) end for end if end procedure ------------------------------------------- procedure HB_BtnCleanup(atom hwnd) ------------------------------------------- atom StrAddr,fontAddr,imgAddr Struct = c_func(hGetPropA,{hwnd,HBPROPLP}) if Struct then StrAddr = peek4u(Struct + hb_text) if StrAddr then free(StrAddr) end if fontAddr = peek4u(Struct + hb_font) if fontAddr then StrAddr = peek4u(fontAddr + hbf_fntsz) if StrAddr then free(StrAddr) end if free(fontAddr) end if imgAddr = peek4u(Struct + hb_image) if imgAddr then free(imgAddr) end if free(Struct) end if end procedure ------------------------------------------- procedure HB_Cleanup() ------------------------------------------- free(HBPROPCB) free(HBPROPLP) free(WC_HBUTTON) free(aRECT) free(aPS) free(aBmp) free(aLOGBRUSH) free(aICONINFO) DeleteBrush(Defaultfont) end procedure ------------------------------------------- function HBWndProc(atom hwnd,atom msg,atom wParam,atom lParam) ------------------------------------------- if msg = WM_PAINT then if c_func(hGetUpdateRect,{hwnd,0,0}) then HDC = c_func(hBeginPaint,{hwnd,aPS}) c_proc(hSaveDC,{HDC}) Struct = c_func(hGetPropA,{hwnd,HBPROPLP}) Type = peek(Struct + hb_stype) Style = peek(Struct + hb_sstyle) if Style = HBS_RECT then if Type = HBS_ENABLED then BltOffImage_RECT(hwnd,HDC,Struct) elsif Type = HBS_TOGGLE then if peek(Struct + hb_togstatus) then BltTogImage_RECT(hwnd,HDC,Struct) else BltOffImage_RECT(hwnd,HDC,Struct) end if elsif Type = HBS_DISABLED then end if elsif Style = HBS_ROUNDRECT then elsif Style = HBS_ELLIPSE then end if c_proc(hRestoreDC,{HDC,-1}) c_proc(hEndPaint,{hwnd,aPS}) end if elsif msg = WM_LBUTTONDOWN then Struct = c_func(hGetPropA,{hwnd,HBPROPLP}) HDC = GetDC(hwnd) Type = peek(Struct + hb_stype) Style = peek(Struct + hb_sstyle) poke(Struct + hb_active , 1 ) poke(Struct + hb_mstatus, 1 ) poke(Struct + hb_hover , 1 ) if Style = HBS_RECT then if Type = HBS_TOGGLE then if peek(Struct + hb_togstatus) then poke(Struct + hb_togstatus, 0 ) else poke(Struct + hb_togstatus, 1 ) ExcGrp = peek(Struct + hb_set) if ExcGrp then ReleaseToggle(ExcGrp,hwnd) end if end if elsif Type = HBS_DISABLED then end if BltTogImage_RECT(hwnd,HDC,Struct) elsif Style = HBS_ROUNDRECT then elsif Style = HBS_DISABLED then end if ACTIVE = hwnd ReleaseDC(hwnd,HDC) elsif msg = WM_MOUSEMOVE then if ACTIVE != hwnd then if ACTIVE > 0 then Struct = c_func(hGetPropA,{ACTIVE,HBPROPLP}) poke(Struct + hb_active, 0 ) poke(Struct + hb_mstatus,0 ) poke(Struct + hb_hover ,0 ) c_proc(hInvalidateRect,{ACTIVE,0,1}) ACTIVE = hwnd return 0 end if end if Struct = c_func(hGetPropA,{hwnd,HBPROPLP}) if not peek(Struct + hb_hover) then poke(Struct + hb_active , 1 ) poke(Struct + hb_hover , 1 ) HDC = GetDC(hwnd) Type = peek(Struct + hb_stype) Style = peek(Struct + hb_sstyle) if Style = HBS_RECT then if Type = HBS_TOGGLE then if peek(Struct + hb_togstatus) then BltTogImage_RECT(hwnd,HDC,Struct) else BltOnImage_RECT(hwnd,HDC,Struct) end if elsif Type = HBS_ENABLED then BltOnImage_RECT(hwnd,HDC,Struct) elsif Type = HBS_DISABLED then end if elsif Style = HBS_ROUNDRECT then elsif Style = HBS_ELLIPSE then end if ReleaseDC(hwnd,HDC) end if ACTIVE = hwnd elsif msg = WM_LBUTTONUP then Struct = c_func(hGetPropA,{hwnd,HBPROPLP}) poke(Struct + hb_active , 1 ) poke(Struct + hb_mstatus, 0 ) Type = peek(Struct + hb_stype) Style = peek(Struct + hb_sstyle) HDC = GetDC(hwnd) if Style = HBS_RECT then if Type = HBS_TOGGLE then if not peek(Struct + hb_togstatus) then BltOnImage_RECT(hwnd,HDC,Struct) end if elsif Type = HBS_ENABLED then BltOnImage_RECT(hwnd,HDC,Struct) elsif Type = HBS_DISABLED then end if elsif Style = HBS_ROUNDRECT then elsif Style = HBS_ELLIPSE then end if ReleaseDC(hwnd,HDC) c_proc(hPostMessage,{#FFFF,WM_HBCLICKED,0,hwnd}) c_proc(hPostMessage,{hwnd,WM_HBCLICKED,0,hwnd}) elsif msg = WM_DESTROY then HB_BtnCleanup(hwnd) end if return c_func(hCallWindowProcA,{CurParentCB,hwnd,msg,wParam,lParam}) end function ------------------------------------------- function ParentWndProc(atom hwnd,atom msg,atom wParam,atom lParam) ------------------------------------------- ParentCB = c_func(hGetPropA,{hwnd,HBPROPCB}) if not ParentCB then return c_func(hDefWindowProcA,{hwnd,msg,wParam,lParam}) end if if msg = WM_MOUSEMOVE then if ACTIVE then Struct = c_func(hGetPropA,{ACTIVE,HBPROPLP}) if Struct then poke(Struct + hb_active , 0 ) poke(Struct + hb_hover , 0 ) if not peek(Struct + hb_mstatus) then c_proc(hInvalidateRect,{ACTIVE,0,1}) ACTIVE = 0 end if end if end if elsif msg = WM_LBUTTONUP then if ACTIVE then Struct = c_func(hGetPropA,{ACTIVE,HBPROPLP}) if Struct then if peek(Struct + hb_mstatus) then c_proc(hInvalidateRect,{ACTIVE,0,1}) poke(Struct + hb_mstatus, 0 ) ACTIVE = 0 end if end if end if elsif msg = WM_DESTROY then HB_Cleanup() end if return c_func(hCallWindowProcA,{ParentCB,hwnd,msg,wParam,lParam}) end function CurParentCB = call_back(routine_id("ParentWndProc")) ------------------------------------------- procedure StartHBClass() ------------------------------------------- atom wca,hInst,HBCBA HBCBA = call_back(routine_id("HBWndProc")) hInst = instance() wca = allocate(48) Defaultfont = c_func(hGetStockObject, { 12 } ) mem_set(wca,0,48) poke4(wca+00,48 ) poke4(wca+08,HBCBA) poke4(wca+20,hInst) poke4(wca+32,16 ) poke4(wca+40,WC_HBUTTON) if not c_func(hRegisterClassEx,{wca}) then Report(HB_REG_FAIL) end if free(wca) end procedure StartHBClass() ---------------------------------------------------------
250.
- Posted by Bokki Kim <bokki at DANAM.CO.KR> Jul 13, 1998
- 1887 views
------=_NextPart_000_00BC_01BDAE44.6EEA4D20 charset="euc-kr"
251.
- Posted by "Graeme." <graemejb at PRONET.NET.AU> Jul 16, 1997
- 1911 views
Can anyone tell me why EU fails to notify me of a division by zero error in an include file? It simply terminates the program. Graeme.
252.
- Posted by Brian Jackson <bjackson at PRINTINGINC.COM> Sep 22, 1998
- 1891 views
I've been working on a scrolling background routine, similar to Woo Seob Lee's "ARCADE.EX", however I'm working in 800x600x256 colors. Whenever I load my image (3200x600x256) into memory, it overwrites the operating system. Could anyone tell me how to allocate a 'safer' block of memory, or better yet, has anybody already worked this out so I don't have to re-invent the wheel? As a side note, and correct me if I'm wrong, I should be able load a bitmap with a quick & dirty Euphoria code generator and copy the resulting sequence into my program (hardcode) so there's no file-access delay, right? That would also keep the bitmap invisible to anyone who isn't currently running the program. Am I on the right track here? Brian Jackson bjackson at xoommail.com
253.
- Posted by Brian Jackson <bjackson at PRINTINGINC.COM> Sep 29, 1998
- 1968 views
snortboy wrote: > how do programmers set up large progs so that it all > comes together when you actually punch out the code? Two words. Modular programming. What that means is when I write a game, I start with a basic loop that ends when the player presses the ESC key. Everything else goes on inside of here. I generally use what Rob refers to as "Bottom-up" programming, but I like to call it "seat-of-yer-pants". Then I fit the pieces in one at a time, usually starting with the good guys first, then the levels and backgrounds, and save the bad guys for last. That way, once a particular piece of code takes shape, I just make it a function and refer to it from my original loop. I think this has 2 advantages. First, I'm usually pushing my programming skills to the limit when I start a game, so I need to play around with an idea as a standalone piece of code before I can incorporate it into my program. Secondly, when I am finished coding, my loop is a perfect outline of what's going on in the program- and since I don't make very good comments, this has saved my butt several times. So when something goes wrong, I can just comment out 1 function call instead of 200 lines of code, and test to see if that particular function is faulty. I am currently working on a game, so I'd be more than happy to exchange ideas with anyone else who has done the same type of thing. Deuce bjackson at printinginc.com
254.
h=domainkey-signature:received:received:from:to:date:mime-version:subject:message-id:priority:in-reply-to:references:x-pgp-keyid:x-pgp-web2get:x-pgp-mail2get:x-mailer:content-type:content-transfer-encoding:content-description; bh=wY9eMse4AsUMrhy3VJa5tYPciQ/WjwBSLWJ8mjiADco=; b=nhTMZQhTXPkcezjKneSH+NTm2kWPgMIbsf1ciIeVaRkK15wz7pPl+pdxUYXgXeFdN+aR5EJo2z8p80SjLs84Txi43o9mNu6ABUcnVVAYLNy/2LnrADLcLjKSVd/bsSmDbAr0eS9jxRtUn5BD+4UUzDMqn/VEHMaGzLpvjITKUog= DomainKey-Signature: a=rsa-sha1; c=nofws; d=gmail.com; s=gamma; h=from:to:date:mime-version:subject:message-id:priority:in-reply-to:references:x-pgp-keyid:x-pgp-web2get:x-pgp-mail2get:x-mailer:content-type:content-transfer-encoding:content-description; b=d/H8Fgl/4MnjnLVeAsCv/sPWIOrm/6IuHHOXyiloTIMKoXy2PJfucE854dl5gH/zIuMaTYufFioEtAWmANX5PGGFH4nTGMgKjzJRdL+TYcEENclj0gDnTd1RXSqNUj/7kr+4h2XwKR4Q16SHQWANymlI4DvrhHoKBwUTtES/Q6g= Received: by 10.150.69.41 with SMTP id r41mr5574597yba.128.1209952103259; Sun, 04 May 2008 18:48:23 -0700 (PDT) Received: from ?192.168.0.3? ( [200.159.215.207]) by mx.google.com with ESMTPS id 9sm12121052ywf.2.2008.05.04.18.48.20 (version=TLSv1/SSLv3 cipher=OTHER); Sun, 04 May 2008 18:48:22 -0700 (PDT) From: "Euler German" <eulerg at gmail.com> To: EUforum at topica.com Date: Sun, 04 May 2008 22:47:58 -0300 MIME-Version: 1.0 Subject: Re: remainder() is not right Message-ID: <481E3D1E.23029.969FA0 at eulerg.gmail.com> Priority: normal In-reply-to: <491977603-1463792126-1209944434 at boing.topica.com> References: <491977603-1463792126-1209944434 at boing.topica.com> X-PGP-KeyID: 0xB65367CB X-PGP-Web2Get: http://pgp.mit.edu:11371/pks/lookup?op=get&search=0xB65367CB X-PGP-Mail2Get: <mailto:pgp-public-keys at pgp.uk.demon.net&Subject=GET%200xB65367CB> X-mailer: Pegasus Mail for Windows (4.41) Content-type: text/plain; charset=US-ASCII Content-transfer-encoding: 7BIT Content-description: Mail message body > On 4 May 2008 at 16:40, CChris wrote (maybe snipped): > It returns *a* emainder. When a and b are positive, this is the > expected value. When signs are otherwise, then a discrepancy appears > with what, in arithmetic, is called "remainder". > > CChris > Please, I'm not discussing mathematical discrepancies. I only stated that remainder(), as described in reference manual, works as said, thus returning the "left over" of a division, so it can't be told wrong. I'm NOT saying there's no need for a "signed_remainder()", though I have no use for it. YMMV. Some quick explanation at: - http://en.wikipedia.org/wiki/Remainder - http://en.wikipedia.org/wiki/Modulo_operation Best, Euler -- _ _| euler f german _| sete lagoas, mg, brazil _| efgerman{AT}gmail{DOT}com _| ----------------------------- _| Reply preferably to the list, _| or to the address above. Thx!
255.
- Posted by tbone at home.ro Aug 03, 2002
- 1890 views
This is a multi-part message in MIME format. ------=_NextPart_000_0011_01C23B40.187D3640 charset="iso-8859-1" Could somebody tell me how those "machine_func" and "machine_proc" = routines work?I mean they are the fundamental routines of Euphoria.They = do everything.I want to know how to control them. ------=_NextPart_000_0011_01C23B40.187D3640 charset="iso-8859-1" <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2919.6307" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT size=3D2>Could somebody tell me how those "machine_func" and=20 "machine_proc" routines work?I mean they are the fundamental routines of = Euphoria.They do everything.I want to know how to control=20 ------=_NextPart_000_0011_01C23B40.187D3640--
256.
- Posted by sephiroth _ <euman2376 at yahoo.com> Aug 03, 2002
- 1910 views
they're nothing terribly mysterious. you call machine_func/proc with the right ID and arguments, the interpreter does something. you shouldn't try to use these functions yourself. use the library functions instead.
257.
- Posted by Ron W <nova812 at hotmail.com> Aug 19, 2002
- 1885 views
I'm having a little trouble with the gtk lib. I made this function... function encrypt_textarea_0() object str str=get_text(txt) printf(1,"%s",str) return NULL end function constant encrypt_textarea=call_back(routine_id("encrypt_textarea_0")) when I click on the button that calls this funtion I get.... Gtk-CRITICAL **: file gtkentry.c: line 535 (gtk_entry_get_text): assertion `GTK_IS_ENTRY (entry)' failed. Segmentation fault from looking at the error, it looks like get_text is for a GtkEntry widget and not a GtkText object. so my question is ... how do you get the contents of a GtkText widget a store them in a sequence? Ron_W
258.
- Posted by jordah ferguson <jorfergie03 at yahoo.com> Jan 18, 2002
- 1934 views
I have created a multipurpose email program, it has; * multiple account support, the account system has RC4 data encryption. *Each user has his own database. so no one can delete or read your email without logging in. *it can download mail, from pop3 servers & it can send mail...in otherwords an enhancement to EECLIENT.ZIP *IT has definately a better GUI PROBLEM: I have read a lot about MIME; i.e BASE64,QUOTED-PRINTABLE Encodings, i have failed to write algorithms for encoding 8bit data to either base64 or quoted-printable. i looked at unbase64.zip, and failed to make any sense out of it. Can any one help me with this? (send me an encoding and decoding algorithm) if any one wants to have a look at the email client, email me at jorfergie03 at yahoo.com
259.
- Posted by jcvaldezo at hotmail.com Jan 18, 2002
- 1896 views
<html><div style='background-color:'><UL> <LI>I saw that smeone asked about logic expression simplification. I do not know if there has been an answer to that but here is something:</LI> <LI></LI> <LI>There is a kind of algorithm used to simplify circuits (you can find it in any text about logic circuit design in electronics) that is called Karnaugh maps. You can use it as long as you have a boolean logic expression (and, or, not , exclusive or, etc.) and gives you the simplest one as a result.</LI> <LI>Hope this helps.</LI>
260.
- Posted by jcvaldezo at hotmail.com Jan 18, 2002
- 1948 views
<html><div style='background-color:'><DIV> <P><BR>Going back to logic functions simplification, you can visit this place:</P> <P><A href="http://www.cs.byu.edu/courses/cs143/reading/karnaugh.html">http://www.cs.byu.edu/courses/cs143/reading/karnaugh.html</A></P> <P>you will find a simple and good explanation of the theory.</P> <P>A description of the algorithm can be found at:</P> <P><A href="http://hopper.unco.edu/KARNAUGH/Algorithm.html">http://hopper.unco.edu/KARNAUGH/Algorithm.html</A></P> <P>Hope this helps. </P> <P>Carlos Valdés</P>
261.
- Posted by Cassidy Napoli <gonzotek at yahoo.com> Oct 09, 2001
- 1899 views
I'm trying to write a cgi program that sends an an iamge whenever called. I'm simply doing this: puts(1, "Location: /isplaying.bmp\n\n") and then bind with bindw to make a win32 .exe. I can put this in my cgi-bin directory and (if my server's running of course), this works. My browser loads whatever the image is on the server, not in cache, which was my goal. My problem is that, everytime a browser calles it, a console window flashes and disappears. Is there any way I can keep this from happening, and have it execute silently? I've scoured the Euphoria docs, but I suspect its a windows flag to be set or routine to be called and I know *very* little about that.
262.
- Posted by Daniel W Garrett <deathwarrior at JUNO.COM> Dec 20, 1996
- 2006 views
I am new at useing EUPHORIA and im open for and suggestive hints in getting started. DeathWarrior at Juno.Com Daniel W. Garrett
263.
- Posted by "Sam L. Garrett" <samlgarrett at JUNO.COM> Dec 21, 1996
- 1964 views
- Last edited Dec 22, 1996
I just started using Euphoria yesterday, and am still new to the language. I have written extensive programs in basic and soem decent ones in assembly. But I like the the way this one handles the data. Anyway, I was hoping one of you professionals in this language could help me with something. I like writting comm programs, and having trouble with this in euphoria. How can you tell if there is any data in the modem buffer before you use the command to get it? Thanks, Sam G.
264.
- Posted by Daniel W Garrett <deathwarrior at JUNO.COM> Dec 26, 1996
- 1961 views
Heres my first Euphoria Program ive made so far. Take a look and tell me what you think. It has a 2nd view that im working on thats still incomplete, but will give you an idea, just press F2 to look at it. section 1 of uuencode 5.10 of file dw.zip by R.E.M.
265.
- Posted by Nicholas Pastoll <pastollscn at CLEAR.NET.NZ> Jul 06, 2000
- 1886 views
- Last edited Jul 07, 2000
------=_NextPart_000_0005_01BFE78F.C75F14A0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable ------=_NextPart_000_0005_01BFE78F.C75F14A0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2614.3500" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> ------=_NextPart_000_0005_01BFE78F.C75F14A0--
266.
- Posted by Jacques Deschenes <desja at QUEBECTEL.COM> Jan 08, 1997
- 1929 views
- Last edited Jan 09, 1997
My wish list for euphoria, 1) preprocessor define and conditionnal, something like: DEFINE debug IFDEF debug debug code here ENDIF 2) multidimentionnal slicing, like let A be a 2 dimensions sequence sequence B B = A[2..4][3..6] Jacques Deschenes Baie-Comeau, Quebec Canada desja at quebectel.com
267.
- Posted by Marcel Kollenaar <M.Kollenaar at SLO.NL> Jan 09, 1997
- 1942 views
Hello Jacques, Did you already solve this problem with a self made function? > > 2) multidimentionnal slicing, like > > let A be a 2 dimensions sequence > sequence B > > B = A[2..4][3..6] > MK
268.
- Posted by Jacques Deschenes <desja at QUEBECTEL.COM> Jan 09, 1997
- 1943 views
- Last edited Jan 10, 1997
--=====================_852879880==_ At 14:25 9-01-97 +0100, you wrote: >---------------------- Information from the mail header ----------------------- >Sender: Euphoria Programming for MS-DOS <EUPHORIA at >MIAMIU.ACS.MUOHIO.EDU> >Poster: Marcel Kollenaar <M.Kollenaar at SLO.NL> >------------------------------------------------------------------------------- > >Hello Jacques, > >Did you already solve this problem with a self made function? > >> >> 2) multidimentionnal slicing, like >> >> let A be a 2 dimensions sequence >> sequence B >> >> B = A[2..4][3..6] >> > Hi marcel, I didn't but your question triggered it. See the attachement slice.ex demo It use recursive call, as the last dimension has to be the first one to be slice. --=====================_852879880==_ -- slicing multidimensionals sequence function slice(sequence s, sequence p) -- extract a slice from n dimensions sequence -- input: s sequence to slice -- p list of slices index in de form {{a1,a2},{b1,b2},...,{z1,z2}} sequence cut if length(p) = 1 then return s[p[1][1]..p[1][2]] end if cut = {} for i = p[1][1] to p[1][2] do cut = append(cut,slice(s[i],p[2..length(p)])) end for return cut end function -- slice() sequence a, b, c a = {1,2,3,4,5} b = {{1,2,3,10},{4,5,6,11},{7,8,9,12}} c = {b*2,b*3,b+23} puts(1,"a = ") ? a puts(1,"a[2..4] = ") ? slice(a,{{2,4}}) puts(1,"b = ") ? b puts(1,"b[2..3][2..4] = ") ? slice(b,{{2,3},{2,4}}) puts(1,"c = ") ? c puts(1,"c[1..2][2..3][1..1] = ") ? slice (c,{{1,2},{2,3},{1,1}}) --=====================_852879880==_ Jacques Deschenes Baie-Comeau, Quebec Canada desja at quebectel.com --=====================_852879880==_--
269.
- Posted by Raul Benavides Cordoba <f62becor at UCO.ES> Jan 14, 1997
- 1943 views
Hi to All, I have one problem and is that I want to draw a box in text mode but I don't Know how to write a good routine for it. The problem is that I can't fill the box. Can somebody help me? ------------------------------ Thank you.
270.
- Posted by Allen Robnett <alrobnett at alumni.princeton.edu> Apr 23, 2004
- 1910 views
I am using the getch2 routine supplied in '97 by Ken Roger to read keyboard input with multiple key presses. It returns, in a sequence, the status of Shift and CTRL, as well as the char code and the vk code, It suits my needs very well for everything except CTRL S. Can anyone tell me why and what to do about it? Allen
271.
- Posted by <guest at RapidEuphoria.com> Apr 23, 2004
- 1922 views
test - ignore this is to test a post directly from Topica Web Interface header lines to be confirmed
272.
- Posted by M King <boot_me at HOTMAIL.COM> Aug 06, 1998
- 1965 views
>Could you post more detail? Either a discussion of your concept, or Well, I think the way to start out is to try to create a program that diagrams a euphoria first of all. That is my immediate atttempt. >a graphic "sample screen" - could draw this with any graphics program - This morning I was drawing something out. I think a baseline to start with (graphically) is a folder...representing the basic folder that the programs starts with. Then use links of various kinds, represented by either static or animated links (lines etc) tying varous aspects of a euphoria program together. The next step I would think would be the basic parts of the program. IE. The include files. The definitions/declarations. The Programmer defined procedures/functions The Main Loop. I will try to finish the drawing that I just made, but as the only decent graphics utility I have is Corel 4, and I am used to Paint Shop Pro (which I love dearly and it keeps timing out on me) I probably won't be able to send a picture. I'll try though. I think Irv that your dos gui is the place to start though, I looked again at them last night and loved what I saw visually, and it worked this time. I haden't kept up with it last time, as I had had a crash with it, and gone onto other things. Most Excellent! I decided last night that I was going to learn your interface and use it. The only thing that I have as far as a program at this point is a bunch of little routines for adding lists together (meant to handle commands) and an input routine that loads in a program (reads itself really...) I am going to study the hash table stuff tomorrow afternoon. Well, later...Will check back this evening maybe. Monty ______________________________________________________ Get Your Private, Free Email at http://www.hotmail.com
273.
- Posted by Bernie Ryan <xotron at bluefrognet.net> May 16, 2003
- 1896 views
Both of these asm libraries support FLOATING POINT INSTRUCTIONS: http://www.rapideuphoria.com/asm.zip http://www.rapideuphoria.com/asm2.zip So why can't you do all your floating calculations and call your hardware from within a euphoria assembler routine. You don't need to call a routine for each calculation just do the majority of work at the assembler level. Bernie
274.
b=tCwYMKC5Y92i4oLYbpJpjxxrBNJcHI0fs1emGh3t3IsbbJiy/ZufGuTkhl2O7QvZty7Q2= LyfGC1y0iAUsdLeemhF8h2+8csw1j4sX4hlJXZ6RIq2xb1NCwgrOUykhgqxWDCrZylsOKVJWhTQ= d5hA7WUAng1f1eGjAs80ciqia/M= ; Message-ID: <20050115163227.59641.qmail at web41408.mail.yahoo.com> Received: from [24.217.173.3] by web41408.mail.yahoo.com via HTTP; Sat, 15 = Jan 2005 08:32:27 PST Date: Sat, 15 Jan 2005 08:32:27 -0800 (PST) From: Christopher Stone <chris_m_stone at yahoo.com> Subject: Re: SpyWare, etc. To: EUforum at topica.com In-Reply-To: <1111320208-1463792638-1105743911 at boing.topica.com> MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Use Spybot and Ad-Aware. Ad-Aware is at www.lavasoftusa.com. Spybot is at http://www.safer-networking.org/en/index.html. Run both in safe mode and they'll get rid of most of the spyware. Chris --- CoJaBo <guest at RapidEuphoria.com> wrote: > > > posted by: CoJaBo <CoJaBo_EUforum_Address at > CJBN.net> > > Michelle Rogers wrote: > >=20 > > I had tried Noadware, it found stuff but then told > me that I had to pay I=20 > Its terrible(and not even free!): > http://www.adwarereport.com/mt/archives/000023.html > "Editor Rating: 1 star > > Pros > > + Attractive and easy-to-use interface > > Cons > > - Very poor protection against spyware > - High-pressure sales tactics, including use of > =93false positives=94 in their free scan > - May cause legitimate software to stop working > - Many reports of customers being ripped off" > > > forget how much to actually get it to clean it > off. > > Michelle Rogers > > ----- Original Message -----=20 > > From: "CoJaBo" <guest at RapidEuphoria.com> > > To: <EUforum at topica.com> > > Sent: Thursday, January 13, 2005 5:16 PM > > Subject: Re: SpyWare, etc. > >=20 > >=20 > > > posted by: CoJaBo <CoJaBo_EUforum_Address at > CJBN.net> > > > > > > Michelle Rogers wrote: > > >> > > >> Didn't someone mention on here once a free > spyware removal program? If=20 > > >> so, > > >> could you give that address again? I can't > seem to find it. Or, even if=20 > > >> it > > >> wasn't mentioned and someone knows one, could > you mention it now? All=20 > > >> the > > >> ones I find only analyze for free, then you pay > megabucks to actually=20 > > >> have > > > Which ones are you using now(if any)? > > > > > >> it removed. > > >> > > >> > > >> Michelle Rogers > > >> > > >> > > > > > For Topica's complete suite of email marketing > solutions visit: > http://www.topica.com/?p=TEXFOOTER > > > =09=09
275.
- Posted by "Mark Brown" <mabrown at ihug.com.au> Jan 26, 2005
- 1899 views
--=======AVGMAIL-41F79D692077======= Content-Type: multipart/alternative; boundary="----=_NextPart_000_009F_01C50404.60504220" ------=_NextPart_000_009F_01C50404.60504220 Content-Type: text/plain; charset=iso-8859-1 Content-Transfer-Encoding: 8bit ------=_NextPart_000_009F_01C50404.60504220 Content-Type: text/html; charset=iso-8859-1 Content-Transfer-Encoding: 8bit <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=Content-Type content="text/html; charset=iso-8859-1"> <META content="MSHTML 6.00.2800.1400" name=GENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=#ffffff> <DIV> </DIV></BODY></HTML> ------=_NextPart_000_009F_01C50404.60504220-- --=======AVGMAIL-41F79D692077======= Content-Type: text/plain; x-avg=cert; charset=us-ascii Content-Transfer-Encoding: quoted-printable Content-Disposition: inline Content-Description: "AVG certification" Internal Virus Database is out-of-date. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.7.1 - Release Date: 19/01/2005 --=======AVGMAIL-41F79D692077=======--
276.
- Posted by Andrew Mitchell <ajmitch at GEOCITIES.COM> Mar 09, 1998
- 1913 views
How do I clip an image that has been loaded by read_bitmap()? I am trying to fit a large picture into a 533x370 area. I have the following section to clip the width that doesn't work. It does run all of the lines, and length(tmp_img) is 800 if length(tmp_img) > 533 then tmp_img1=tmp_img[1..533] tmp_img=tmp_img1 end if display_image({11,49},tmp_img1) I thought that it would look like this: 000001111 000001111 000001111 000001111 111111111 111111111 with 0's being the part I want to display
277.
- Posted by Kasey <kaseyb at GEOCITIES.COM> Mar 09, 1998
- 1898 views
Andrew Mitchell wrote: > > How do I clip an image that has been loaded by read_bitmap()? > I am trying to fit a large picture into a 533x370 area. > I have the following section to clip the width that doesn't work. > It does run all of the lines, and length(tmp_img) is 800 > > if length(tmp_img) > 533 then > tmp_img1=tmp_img[1..533] > tmp_img=tmp_img1 > end if > display_image({11,49},tmp_img1) > > I thought that it would look like this: > > 000001111 > 000001111 > 000001111 > 000001111 > 111111111 > 111111111 > > with 0's being the part I want to display I'm still learning euphoria, but it looks like what your doing is trimming the last x bytes off of the image : 00000000 00000000 00000000 000000xx xxxxxxxx is what your getting, right? so what you need to do is get the x (higth) and y (width) of your image (the original)and run, through 2 loops: (psudo code follows) for h = 1 to 533 for w = 1 t y if w < 370 then temp_img_2 =apend(temp_image_2, Original_imag((h*(y-1))+w)) next w next h what you want to do is step through the first 533 rows and apend to your new image every pixel value that is in a colum before #371. and just skip all the rest. I've just begun to learn euphoria so I couldn't write actual euphoria code, but I'm shure of the basic algorithym. Kasey
278.
- Posted by Michal <Tachood at JC-PC1.JICINET.CZ> Mar 25, 1998
- 1935 views
Hi! I'm now programming in C++,and i don't know what is Euphoria Please sand me some info
279.
- Posted by Kasey <kaeyb at GEOCITIES.COM> Mar 25, 1998
- 1922 views
Michal wrote: > > Hi! > I'm now programming in C++,and i don't know what is Euphoria > Please sand me some info Just goto Http://members.aol.com/FilesEu and look around. If theres not enough info there (it's the homepage for euphoria) following the links will almost certainaly help. As a starter Euphoria is a programming language thats much easier to learn than C++ or java, and it doese all the idiot work I've always thought should be the job of the language and not the programmer (ansi c/c++ makes you tell the compiler a zillion times what a variable is and what it's for. why? shouldn't once be enough?) btw how did you wind up on the list without going learning about euphoria?? anyway you should like euphoria and welcome to the list. Kasey
280.
- Posted by Don Scott <dts33 at LIGHTSPEED.NET> Mar 25, 1998
- 1905 views
Date: Wed, 25 Mar 1998 12:02:24 -0800 To: LISTSERV at MIAMIU.ACS.MUOHIO.EDU From: Don Scott <dts33 at lightspeed.net> I am a Euphoria newbie....I want to save bitmaps in Euphoria format (.bm?). Can someone let me know how to do that? Is there source code out there to do that? I'm still alittle confused....I've used the 2.0 tutorial by David Gay but I'm still fuzzy...Thanks for any help! Thanks, Don Scott GM, WLUHL Sierra Spiders GM, WWHL Tampere Tankards/Yosemite Grizzlies http://userzweb.lightspeed.net/~dts33
281.
- Posted by Kasey <kaeyb at GEOCITIES.COM> Mar 25, 1998
- 1927 views
Don Scott wrote: > > Date: Wed, 25 Mar 1998 12:02:24 -0800 > To: LISTSERV at MIAMIU.ACS.MUOHIO.EDU > From: Don Scott <dts33 at lightspeed.net> > > I am a Euphoria newbie....I want to save bitmaps in Euphoria format (.bm?). > Can someone let me know how to do that? Is there source code out there to > do that? I'm still alittle confused....I've used the 2.0 tutorial by David > Gay but I'm still fuzzy...Thanks for any help! > > Thanks, > Don Scott > GM, WLUHL Sierra Spiders > GM, WWHL Tampere Tankards/Yosemite Grizzlies > http://userzweb.lightspeed.net/~dts33 I'm not shure what you mean by "save bitmaps in Euphoria format" you can load and save regular windows bitmap (*.bmp) file with the libraries that come with euphoria and there are several libraries for gif and pcx loading/saving. there's also a lib out there for translating a bmp file into an include file (although a pretty big one) if that's what your trying to do. As far as I know(which really insn't that far) there's no specific image format just Euphoria program(er)s. If your trying to figure out how euphoria's lib.s use/store bitmap and pallete info, the library.doc file explains this I believe. (in your /euphoria/doc directory) Start at euphoria's homepage ( http://members.aol.com/FilesEu ) and look in recent user contributions and the archives for the above mentioned programs.
282.
- Posted by Don Scott <dts33 at LIGHTSPEED.NET> Mar 25, 1998
- 1957 views
--=====================_890889750==_ I have tried the include file (which would work great) but the code for the include file asked to include "ebm.e"....which is not on my hard drive....the include file is included on this email (I thinkI overused the word include! At 03:06 PM 3/25/98 -0600, you wrote: >Don Scott wrote: >> >> Date: Wed, 25 Mar 1998 12:02:24 -0800 >> To: LISTSERV at MIAMIU.ACS.MUOHIO.EDU >> From: Don Scott <dts33 at lightspeed.net> >> >> I am a Euphoria newbie....I want to save bitmaps in Euphoria format (.bm?). >> Can someone let me know how to do that? Is there source code out there to >> do that? I'm still alittle confused....I've used the 2.0 tutorial by David >> Gay but I'm still fuzzy...Thanks for any help! >> >> Thanks, >> Don Scott >> GM, WLUHL Sierra Spiders >> GM, WWHL Tampere Tankards/Yosemite Grizzlies >> http://userzweb.lightspeed.net/~dts33 > > I'm not shure what you mean by "save bitmaps in Euphoria format" >you can load and save regular windows bitmap (*.bmp) file with the >libraries that come with euphoria and there are several libraries for >gif >and pcx loading/saving. > there's also a lib out there for translating a bmp file into >an include file (although a pretty big one) if that's what your trying >to do. > As far as I know(which really insn't that far) there's no specific >image format just Euphoria program(er)s. > If your trying to figure out how euphoria's lib.s use/store bitmap and >pallete info, the library.doc file explains this I believe. (in your >/euphoria/doc >directory) > Start at euphoria's homepage ( http://members.aol.com/FilesEu ) and >look >in recent user contributions and the archives for the above mentioned >programs. > > --=====================_890889750==_
283.
- Posted by Ralf Nieuwenhuijsen <nieuwen at XS4ALL.NL> Mar 25, 1998
- 1916 views
- Last edited Mar 26, 1998
|I am a Euphoria newbie....I want to save bitmaps in Euphoria format (.bm?). |Can someone let me know how to do that? Is there source code out there to |do that? I'm still alittle confused....I've used the 2.0 tutorial by David |Gay but I'm still fuzzy...Thanks for any help! Look the function "read_bitmap" up in library.doc Hope this helps. Ralf N. Example usage: -- Example use of bitmap routines object temp temp = graphics_mode (19) -- We're now into MCGA 320*200 256c if temp = -1 then puts(1, "You need a videocard!\n") abort(1) end if -- Notice the double slash.. means just one slash -- but the slash is an escape character when quoted temp = read_bitmap ("c://windows//arcade.bmp") if atom(temp) then -- The atom value returned is the error number puts (1,"Some error occured!!") abort(1) end if -- Setting pallete, with a 0 - 63 scale -- Instead of a 0 - 255 scale, so divide by 4 all_pallette (temp[1]/4) -- The second element of temp contains the picture data -- We'll display it at the top of the screen (0,0) display_image ({0,0}, temp[2]) -- End of example program
284.
- Posted by Michal <tachood at JC-PC1.JICINET.CZ> Mar 30, 1998
- 1953 views
Can i create executable files in Euphoria ? If yes please send me an help how i do it. Thanx, Tachood .///. (0 o) -------------0000--(_)--0000--------------- tachood at jc-pc1.jicinet.cz oooO Oooo -------------( )-------( )--------------- \ ( ) / \_) (_/
285.
- Posted by Kasey <kaeyb at GEOCITIES.COM> Mar 30, 1998
- 1928 views
Michal wrote: > > Can i create executable files in Euphoria ? > If yes please send me an help how i do it. > Thanx, > Tachood > > tachood at jc-pc1.jicinet.cz If you want to make your euphoria program a stand alone exe (i.e. so you don't have to type ex program.ex) use bind. it'll turn your program.ex into program.exe. Bind and bind.doc(the manual for bind) came with euphoria when you downloaded it. If you mean somthing else I'm sorry I didn't understand it. Kasey
286.
- Posted by Jason Dube <dubetyrant at hotmail.com> Jun 08, 2003
- 1889 views
Whoops, Sorry, it had to do with the DB_LOCK thing,I fixed it, sorry. Jason Dube
287.
- Posted by Andreas Rumpf <pfropfen at gmx.net> Jun 29, 2003
- 1899 views
Hi! I am working on a Euphoria interpreter written in Object Pascal. (Same speed as C, but probably less bugs . Its name will be "Prophoria" -- Professional Euphoria. It will add some new features to the language: - call by reference: procedure foo(to sequence s) -- should I use keyword "to" to indicate -- by reference? foo() end procedure - dot notation: seq.x -- just syntactic sugar for seq[x] - end: s[1..end] -- same as s[1..length(s)] (func(s, 1, end) will not be possible!) - declare variables anywhere you want and initialize them: integer x = 0, y = 1 - more standard functions: abs(), sqr(), - a case statement: case seq of {1,2,3} do ... of {5..10} do ... else ... end case - a for in statement: for x in seq do x = 0 end for I look for programmers who have programming experience in Object Pascal and knownledge about compilers. Prophoria will be an interpreter and a translator (translates Euphoria to Pascal/C) I do not like anything like macro or stupid C-like assignment operators that will lead to unreadable code: if (i := getc(0) ) = 0 then ... end if -- this is ugly, and not Euphoria-like. If anyone is interested, please write to: pfropfen at gmx.net (I have already written a lightning fast scanner for Prophoria and am working on the parser.) Regards Andreas Rumpf
288.
- Posted by Matt Z Nunyabidness <matt1278 at JUNO.COM> Oct 06, 1998
- 1883 views
let him alone! put out the flames! SHUT UP! okay, he said he's sorry. _________________ When it comes to programming languages, Euphoria is a cut above matt1278 at juno.com Euphoria programmer Webbers: <A HREF="mailto:prezsoft at juno.com">prezsoft at juno.com</A>, president of SoftCo. All virus proggers should die horrible deaths™
289.
- Posted by bonn ortloff <kc7yrh at HOTMAIL.COM> Oct 20, 1998
- 1887 views
... my .02... I thought about using windows, and a thought struck me: go into your system.ini, my people with windows, and look at your shell line. That is your GUI. The challenge: Make a new GUI. Make your favorite look, using the windows KERNAL. Because all your progman.exe or explorer.exe is is the thing feeding the info into the kernal. To my knowledge, and I will try this, you can run a program from that shell= line. ANY program. for example, windoze, by Irv, is a shell. those graphics are from things like DLL's. SO, you can go and make your own GUI in that, LIKE you can windows. Now, for those who want to test this: DON'T! let me crash-proof it first. Then, when the OK is passed, let's make a 32-bit GUI for our windows '95/98. (I was gonna sat 16-bit, but the euphoria library hasn't got all the things to connect to 16-bit DLL's. BUT, can I be wrong?) the best of wishes, -- "LEVIATHAN" with a scattered writing style. (BTW, the list rejected the message, so if you see this again, sowwiez!) ______________________________________________________ Get Your Private, Free Email at http://www.hotmail.com
290.
- Posted by Mark Jaksen <mjaksen at subdimension.com> Mar 09, 2003
- 1891 views
Have been trying to use gds32.dll, the Firebird/Interbase dll, in EU programs, but utterly stymied. Has anyone done this? What's up with this DLL? Thanks Mark
291.
- Posted by isaac <isaaca at MINDSPRING.COM> May 13, 1998
- 1912 views
Has anyone come up with a library for using the internet? I want to write a long term strategy game playable online. Here's how it would work: I'd establish an email address or a site of some sort to serve as a middle man. Every day, say around 1am, I'd log on and my central program would download and process the encypted messages posted the previous day by each player's client program, then it would post for each player his or her view of the aftermath, which would be received by the clients, and so forth. Alternately, I might divide the day into phases, movement, build, attack, etc, but you get the idea. I realize I could just use attached files to be fed to the software manually, but I'd much rather let the program handle the downloading itself, if possible. Any information or advice would be appreciated.
292.
- Posted by Daniel Berstein <daber at PAIR.COM> May 13, 1998
- 1903 views
>Has anyone come up with a library for using the internet? This is a job for WinInet.dll. I've coded some routines to access FTP servers using this nice DLL (provided by Microsoft). You'll be restricted to Win32. Go to Microsoft site and search for "wininet", there you'll get the API reference. Regards, Daniel Berstein daber at pair.com
293.
- Posted by CAMPOS ARRIBAS- LUIS RAUL <95203695 at XAEE.UB.ES> Apr 30, 1998
- 1917 views
This is a programer that goes with his wife to a simposium at NY.They arrive to the hotel and when they are downloading their packages from the cab...the programer says to his wife: -Honey,it's strange but you told me that we had 10 packages....and we only have 9!!! -Dear,it's impossible! we have 10! He reply - No!look,count with me....0,1,2.... :) It's a great joke! Regards, - Luis -
294.
- Posted by Tony Steward <tony.steward at gmail.com> Oct 21, 2005
- 1897 views
Hello, I am writing a safe lock emulator, but I have a couple of problems. 1. When I click differant areas ove a bitmap it sometimes registers twice. - Not sure how to prevent this. 2. Part of the bitmap there is an LED. Is there a way I can make it appear to blink on a mouse click without loading a whole second bitmap. Find my code at www.locksdownunder.com/LaGard.zip Any help or comments on a better way to do this would be appreciated Thanks Tony
295. Re:
- Posted by Greg Haberek <ghaberek at gmail.com> Oct 21, 2005
- 1914 views
> 2. Part of the bitmap there is an LED. Is there a way I can make it > appear to blink on a mouse click without loading a whole second bitmap. That sounds pretty easy, as long as you're not stretching the bitmap. For this, I'll assume the LED is "ON" in the bitmap, and that you know the dimensions of the LED (x, y, cx, cy) in the bitmap. Remember, (0, 0) is the upper-left corner of the bitmap/window, and cx and cy are the width and height. 1. Create a Pixmap the size (cx, cy) of the LED, name it LedOff or somethin= g 2. Draw the "OFF" image onto the Pixmap 3. Create another Pixmap (same size) and bitBlt the LED "ON" image from the bitmap onto it, name it LedOn or something 4. When the mouse event or whatever occurs, copyBlt the LedOff Pixmap to the (x, y) position on the window over the bitmap, then copyBlt the LedOn Pixmap back when needed Note on bitBlt vs copyBlt: The reason you need to use bitBlt on #3 is because you have to grab only *part* of the bitmap, whereas you're copying the entire Pixmap in #4. Just thought I'd clear that up ahead of time. ~Greg
296.
by TDIMSO27.backend.tdata.com.ar (iPlanet Messaging Server 5.2 Patch 1 (built Aug 19 2002)) with ESMTPA id <0HN600FYZQUF5M at TDIMSO27.backend.tdata.com.ar> for EUforum at topica.com; Wed, 22 Oct 2003 22:01:28 -0300 (GMT) From: Guillermo Bonvehi <knixeur at speedy.com.ar> Subject: Re: Simple eusql prog now works - kinda lla vundefinedundefined) Gecko/20030624 I hadn=B4t been following this threat but you create a variable named data= =20 and you don=B4t assing anything to it, and then pass it in the=20 get_record function. What are u passing if data contains nothing? :) That=B4s the error. ronaustin at alltel.net wrote: >=20 >=20 > Thanks to Matt I saw the error of my way and now have a new simple=20 > program that does write records to the eusql database. >=20 > include database.e > include eusql.e >=20 > sequence dbname, > tname, > ok, > code, -- code=20 > descrip, -- descripton > categ -- category >=20=09=20 >=20=09=20 > dbname =3D open_db("TEST.EDB") > tname =3D "DIAG" > code =3D "V43.1" > descrip =3D "Psudoaphakia" > categ =3D "Surg" >=20=20=20=20=20 > ok =3D insert_record(dbname,tname,blank_record(dbname,tname), > {code,descrip,categ},{{1},{2},{3}}) >=20 > close_db (dbname) >=20 > Before I started dancing around and throwing my hat in the air I thought= =20 > I should try to read a record out of the database. Alas, this program= =20 > don't work. >=20 > include database.e > include eusql.e >=20 >=20 > sequence ok, > dbname, > tname, > data >=20 > integer key > key =3D 1 >=20 > dbname =3D "TEST.EDB" > tname =3D "DIAG" >=20=09=09=20=20=20=20=20 > ok =3D open_db(dbname) > ok =3D get_record(dbname,tname,"V43.1",data,key) > puts(1,data) >=20 > close_db (dbname) >=20 > I get an error that says,"variable data not defined". Can someone tell= =20 > me why? >=20 > In the database I have an index for all three fields. I'm trying to use= =20 > the code for the key and I have the key set to 1. >=20 > If I wanted to find by diagnosis do I replace the "V43.1" with what I'm= =20 > looking for and change the key to 3?=20=20 >=20 > (Since the index table is sorted in alph order, the indexes are 1 =3D= =20 > code, 2 =3D category and 3 =3D Description)
297.
by TDIMSO27.backend.tdata.com.ar (iPlanet Messaging Server 5.2 Patch 1 (built Aug 19 2002)) with ESMTPA id <0HN600FYZQUF5M at TDIMSO27.backend.tdata.com.ar> for EUforum at topica.com; Wed, 22 Oct 2003 22:01:28 -0300 (GMT) From: Guillermo Bonvehi <knixeur at speedy.com.ar> Subject: Re: Simple eusql prog now works - kinda lla vundefinedundefined) Gecko/20030624 I hadn=B4t been following this thread but you create a variable named data= =20 and you don=B4t assing anything to it, and then pass it in the=20 get_record function. What are u passing if data contains nothing? :) That=B4s the error. ronaustin at alltel.net wrote: >=20 >=20 > Thanks to Matt I saw the error of my way and now have a new simple=20 > program that does write records to the eusql database. >=20 > include database.e > include eusql.e >=20 > sequence dbname, > tname, > ok, > code, -- code=20 > descrip, -- descripton > categ -- category >=20=09=20 >=20=09=20 > dbname =3D open_db("TEST.EDB") > tname =3D "DIAG" > code =3D "V43.1" > descrip =3D "Psudoaphakia" > categ =3D "Surg" >=20=20=20=20=20 > ok =3D insert_record(dbname,tname,blank_record(dbname,tname), > {code,descrip,categ},{{1},{2},{3}}) >=20 > close_db (dbname) >=20 > Before I started dancing around and throwing my hat in the air I thought= =20 > I should try to read a record out of the database. Alas, this program= =20 > don't work. >=20 > include database.e > include eusql.e >=20 >=20 > sequence ok, > dbname, > tname, > data >=20 > integer key > key =3D 1 >=20 > dbname =3D "TEST.EDB" > tname =3D "DIAG" >=20=09=09=20=20=20=20=20 > ok =3D open_db(dbname) > ok =3D get_record(dbname,tname,"V43.1",data,key) > puts(1,data) >=20 > close_db (dbname) >=20 > I get an error that says,"variable data not defined". Can someone tell= =20 > me why? >=20 > In the database I have an index for all three fields. I'm trying to use= =20 > the code for the key and I have the key set to 1. >=20 > If I wanted to find by diagnosis do I replace the "V43.1" with what I'm= =20 > looking for and change the key to 3?=20=20 >=20 > (Since the index table is sorted in alph order, the indexes are 1 =3D= =20 > code, 2 =3D category and 3 =3D Description)
298.
h=domainkey-signature:received:received:message-id:date:from:to:subject:in-reply-to:mime-version:content-type:references; bh=2o8AIYoi6IJuRmUBHIjCi1m4kUcJ3EpI3VCfd8TyA9c=; b=p6oKYvZUyXyfK4sRsnnXxI1Rgt9JuVI80qjcHZnw2NW9wvyg0StDogKS1TacmrpDu2zB+lBCYaSdZPLwhA/s6ssBH2pwn1KKEhEKhtas+zsrjNv9Y7qB7A2r8tVMU141/NUMCAyhuTXuGWf6XM+3/57+bltV6b0oMxQMaCgF5e8= DomainKey-Signature: a=rsa-sha1; c=nofws; d=gmail.com; s=beta; h=received:message-id:date:from:to:subject:in-reply-to:mime-version:content-type:references; b=lrMSAw/dzWkk2l7Y82yp9AtkgHDE2BDE0CS8CjJwUDV1oZsW6d5daU/ktoFAfNw5g9E/fjR887xay3hi+3BFi7w7VL1rU3x6eVe6BItM3mU4axHVloHit9b30tFm6JeJ0pg/60bXYCCR/+FLfNk9TeYgQ6gxfQpWzPKCEKq1lhw= Received: by 10.66.220.12 with SMTP id s12mr5349853ugg.1194320878294; Mon, 05 Nov 2007 19:47:58 -0800 (PST) Received: by 10.67.22.20 with HTTP; Mon, 5 Nov 2007 19:47:58 -0800 (PST) Message-ID: <5f27691c0711051947j5d625d8ema1530eb3e56314e9 at mail.gmail.com> Date: Mon, 5 Nov 2007 20:47:58 -0700 From: "codepilot Gmail Account" <codepilot at gmail.com> To: EUforum at topica.com Subject: Re: C to EU Translator In-Reply-To: <996636586-1463747838-1194199112 at boing.topica.com> MIME-Version: 1.0 Content-Type: multipart/alternative; boundary="----=_Part_24843_19006174.1194320878291" References: <996636586-1463747838-1194199112 at boing.topica.com> ------=_Part_24843_19006174.1194320878291 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 7bit Content-Disposition: inline I'll look at the stucture thing more, and also see how involved a complete C processor would be. Daniel On 11/4/07, Chris Bensler <guest at rapideuphoria.com> wrote: > > ============ The Euphoria Mailing List ============ > > > posted by: Chris Bensler <eu at creativep?rta?.ca> > > codepilot Gmail Account wrote: > > > > Hmm. Maybe I should make it do macros and structures? Good idea! I have > > already done COM. I know that macros can do a lot of things, should they > > turn into functions? At some point a full blown C to Euphoria translator > > needs to be made, because made H files have things that aren't as cut > and > > dry as a simple specification of call point entries/types/constants. > Many of > > the macros do a lot of work precompile that would make much sense in run > > time, in euphoria as functions. And I really can't think of a good way > to do > > structures, maybe some ideas would be good. > > In previous attempts at making a C2EU translator, I aimed for a hybrid > system involving several steps. Something like Auto->Manual->Auto->Manual. > All in all I thought it was quite successful, but the process was still > fairly labour intensive. Eg. All macros that were determined not to be > constant values, were simply output as commented code. There were also > portions of code that I didn't know how to handle correctly at the time or > the translator was too dumb to handle, so I made a line matching cache, > which the user would be prompted to manually convert a given line and the > two would would then be stored in the cache file for later uses, without > having to re-enter that line conversion again. > > This system had a few main drawbacks though. Mainly it only produced a > single state of the api. Eg. Win98 and Ansi > Producing another state would require going through the entire process > again and having multiple versions of the API to deal with. > > It's been a while since I was working on it, but IIRC, there is 3 basic > types of macros: constants, functions, and fragments > Constants are fairly easy to determine, but to be able to identify > functions from fragments, the translator must be capable of validating the C > code as being self contained. Essentially this means that the translator > must be capable of processing C code 100%. > > Structures are fairly difficult to process from the C code as well. It > requires a fairly complete processor to be able to handle all possible > occurances. For conversion to Euphoria, there is various methods that could > be used for the generated structures. Win32lib uses it's own system of > store/fetch I beleive. I think Bernie Ryan created a structure library made > of machine code. And I wrote a structure emulation library. > > Chris Bensler > Code is Alchemy ------=_Part_24843_19006174.1194320878291--
299.
for <EUforum at topica.com>; Fri, 8 Aug 2003 12:05:24 -0400 (EDT) charset=3D"iso-8859-1" From: George Walters <gwalters at sc.rr.com> Subject: Re: Text lines into an array of unknown size ZyYy3gEHAQAAAAAABwAAAAAAZVQTag at boing.topica.com> i would try tx =3D append(tx,line) george ----- Original Message ----- From: <kjactive at adslhome.dk> To: "EUforum" <EUforum at topica.com> Subject: Text lines into an array of unknown size as new commer from rexx to Euphoria I see many nice and semilare options an= d a richness of WinOS options but I have some basic newcommer problems on 'sequence a array' I want to open a file of text of unknown size and put all lines into an array where every line can be manipulated but I cannot get it right... integer file object line constant ERROR =3D 2 integer c c =3D 0 sequence tx file =3D open("c:/rexx/rxcalibur.txt", "r") if file =3D -1 then puts(ERROR, "couldn't open text file\n") else while 1 do line =3D gets(file) if atom(line) then exit end if c =3D c + 1 tx[c] =3D line end while end if close(file) printf(1,"available lines:%d\n", {c}) -- correct printf(1,"%s\n",tx[2]) -- ERROR Where do I get it wrong!!! Probably a newcommers init problem but I would like some explane... K=E5re Johansson TOPICA - Start your own email discussion group. FREE!
300.
by TDIMSO03.backend.tdata.com.ar (iPlanet Messaging Server 5.2 Patch 1 (built Aug 19 2002)) with ESMTPA id <0HJM006CCK9W46 at TDIMSO03.backend.tdata.com.ar> for EUforum at topica.com; Thu, 14 Aug 2003 16:46:50 -0300 (GMT) Gecko/20030624 From: Guillermo Bonvehi <knixeur at speedy.com.ar> Subject: Re: Win32 File Attribute Modification ZyYy3gEHAQAAAAAABwAAAAAAZVQTag at boing.topica.com> Hi Ted, I think this function should work (it's untested, if it doesn't work=20 let me know): --Start of untested code-- include dll.e constant krn32 =3D open_dll("kernel32.dll") constant xSetFileAttributes =3D=20 define_c_func(krn32,"SetFileAttributes",{C_POINTER,C_POINTER},C_INT) constant FILE_ATTRIBUTE_ARCHIVE =3D 32, FILE_ATTRIBUTE_COMPRESSED =3D 2048, FILE_ATTRIBUTE_NORMAL =3D 128, FILE_ATTRIBUTE_DIRECTORY =3D 16, FILE_ATTRIBUTE_HIDDEN =3D 2, FILE_ATTRIBUTE_READONLY =3D 1, FILE_ATTRIBUTE_SYSTEM =3D 4, FILE_ATTRIBUTE_TEMPORARY =3D 256, FILE_ATTRIBUTE_SPARSE_FILE =3D #200, FILE_ATTRIBUTE_REPARSE_POINT =3D #400, FILE_ATTRIBUTE_OFFLINE =3D #1000, FILE_ATTRIBUTE_NOT_CONTENT_INDEXED =3D #00002000, FILE_ATTRIBUTE_ENCRYPTED =3D #4000 global function SetFileAttributes(sequence name, atom attribs) atom ptr integer ret ptr =3D allocate_string(name) ret =3D c_func(xSetFileAttributes,{name,attribs}) free(ptr) return ret end function --End of code-- Example should be like: x =3D=20 SetFileAttributes("test.txt",or_all({FILE_ATTRIBUTE_HIDDEN,FILE_ATTRIBUTE_R= EADONLY})) or x =3D SetFileAttributes("test.txt",FILE_ATTRIBUTE_NORMAL) Best Regards, Guillermo Bonveh=ED Ted Fines wrote: >=20 >=20 > Hi all, >=20 > I need to modify some file attributes, but don't want to do a=20 > 'system("attrib ...")' call. Something like result =3D=20 > setFileAttr(myfile,attribs) is what I'm looking for. >=20 > I searched the archive for libraries for dealing with file attributes,= =20 > but only found info on looking at file attributes, not modifying them.= =20=20 > Has someone come up with something I just missed? >=20 > Thanks, > Ted Fines >=20 >=20 >=20 > TOPICA - Start your own email discussion group. FREE! >=20 >=20 >=20
301.
by TDIMSO14.backend.tdata.com.ar (iPlanet Messaging Server 5.2 Patch 1 (built Aug 19 2002)) with ESMTPA id <0HJM00KEFKFPHE at TDIMSO14.backend.tdata.com.ar> for EUforum at topica.com; Thu, 14 Aug 2003 16:50:16 -0300 (GMT) Gecko/20030624 From: Guillermo Bonvehi <knixeur at speedy.com.ar> Subject: Re: Win32 File Attribute Modification ZyYy3gEHAQAAAAAABwAAAAAAZVQTag at boing.topica.com> I've just saw Jurgen's code, and i saw that if forgot to add the latest=20 A to SetFileAttributes, it should be SetFileAttributesA. Hope some of the codes help. Best Regards, Guillermo Bonveh=ED Ted Fines wrote: >=20 >=20 > Hi all, >=20 > I need to modify some file attributes, but don't want to do a=20 > 'system("attrib ...")' call. Something like result =3D=20 > setFileAttr(myfile,attribs) is what I'm looking for. >=20 > I searched the archive for libraries for dealing with file attributes,= =20 > but only found info on looking at file attributes, not modifying them.= =20=20 > Has someone come up with something I just missed? >=20 > Thanks, > Ted Fines >=20 >=20 >=20 > TOPICA - Start your own email discussion group. FREE! >=20 >=20 >=20
302.
id <20030820061218.YPDI22338.tomts9-srv.bellnexxia.net@RapidEupho= ria.com> for <EUforum at topica.com>; Wed, 20 Aug 2003 02:12:18 -0400 0030624 Netscape/7.1 (ax) From: Robert Craig <rds at RapidEuphoria.com> Subject: Re: CChris' file ZyYy3gEHAQAAAAAABwAAAAAAZVQTag at boing.topica.com> CChris wrote: > Beware the long post... I'll give a quick opinion on each item. > The following is a commented list of features that I'd find desirable > in Eu 2.5. >=20 > A/ Variable management >=20 > 1/ Pass by reference in routines >=20 > Description: when some code calls a routine, the routine may update so= me vars=20 > whose references were passed to it. I know PBR is convenient in some cases, but currently the only way to modify a variable is by directly assigning to it (or passing a value to a parameter). I do not want any indirect, sneaky ways in which a variable can be modified. Aliasing (two different names for the same thing) is bad. Programming is simpler when you only have to think about values, not storage locations that can be "pointed at" in various ways. > 2/ Variable sharing >=20 > Description: enable two or more routines to access a symbol which is n= ot local=20 > (filewide) or global. >=20 > Syntax: share x with rt1 [as y ][in file] > When this code is found in the declarations of routine rt2, the symbol= x is also made available > to the routine rt1. x would be seen in rt1 as x if no "as" clause is ther= e, pr as y > otherwise. The routine rt1 may be in another file, in which case the "fil= e" clause is needed. > x must have been declared before being shared. Not necessary. People can barely understand the scope rules as they are. > 3/ Static variables in routines >=20 > Description: Allow routines to keep track of the values of private sym= bols between executions. >=20=20=20=20 > Syntax: static <type> <var-list> > In order for a static variable to be initialized before it's first rea= d, > uninitialized variables should be handled. A frill that would add some complexity to address a trivial scope issue. Just use file scope to retain the values. > 4/ Allow uninitialized symbols to be passed to and returned=20 > from routines >=20 > So that initialization routines can be used. Obviously, reading the va= lue=20 > of an unitialized symbol will raise an error. Currently, variables must be initialized before being used. Why introduce the concept of an uninitialized variable that can still be used. What problem are you trying to solve? Is this another form of PBR? > 5/ Arraying of symbols >=20 > Description: allow symbols to be referenced by a sequence >=20 > Syntax: array arrname v1[,v2,....] > This would create a sequence arrname whose first element aliases ident= ifier v1,=20 > the second, if any, the symbol v2, and so on. This statement is a declara= tion statement. >=20 > The idea of this, aas well as its usefulness, comes from the SAS langu= age. No aliases, please. > 6/ Namespace hierarchy >=20 > Description: Ensures that two symbols without a namespace don't collid= e when this was not meant. > When two or more global symbols are identified by the same string, Eu = considers it an error, > since it can't tell which one is meant. But such collisions may come from= > conflicting names in unrelated libraries. > A simple solution is to adopt rules for choice, issuing a warning for = the > programmer's information. The rules could be: >=20 > a/ A conflict between explicitly namespaced symbols is an error condit= ion; > b/ Let the distance between two files be the minimal numbe of include = statements that allows=20 > the two symbols to clash. Then, only consider the symbols which were defi= ned > in the closest file(s). > c/ In case of ties, a linear link will take precedence over a broken l= ink. > A linear link means that the symbol is defined in a file that directly or= indirectly > includes or is included by the one in which the reference is being resolv= ed. > d/ In case of a tie, and if the links are of the same direction, an er= ror must be raised. > It means that two libraries define the same symbol, and more info is need= ed. > e/ The remaining case is when a symbol is defined both in a file inclu= ding the current file and > in a file included in the current one. Then, the downward link (the latte= r) is to be > preferred. Too complicated. People already have trouble understanding the current rules for namespacing. Most programs do not even need the namespace feature. I'm already planning to do Matt Lewis's refinement. I don't see accidental collisions as a big issue, or even a small issue. > 7/ Scoped symbols >=20 > Descriptio: some symbols may be defined in a portion of routine/main c= ode only. > Syntax: scope <var decls> ... endscope > Note that C-style braces, much easier to type, can't be used in Eu. This level of scope control is too detailed. It's not needed, and will add to people's confusion. > B/ Routine management >=20 > 1/ Forwarding. >=20 > Description: Allows to use a routine before it is defined. > Syntax:=20 > forward function f([args]) > .... > x=3Df(something) > ... > function f > ... > code defining the function > ... > end function >=20 > The alternative in 2.4 is to use call_proc/func, which obfuscates the = code. We crossed that bridge a long time ago. Not interested. > 2/ Allow discarding of function return values. >=20 > Description: It is sometimes useful to call a function as if it were a= procedure. > Syntax: ~thefunc([args]) > where thefunc is a function. Maybe. A small issue. No objection in principle. > 3/ Return of several symbols. >=20 > Descritption: Allow function to simultaneously update several variable= s. > Syntax: {x,y,....z}=3Df([args]) > f must return a sequence each element of which is assigned to the corr= esponding variable. > Extra returned values are to be ignored. I looked at that carefully a few years ago, and eventually grew tired of the idea, but I wouldn't rule it out. > 4/ Optional parameters. >=20 > Description: Allow the optional specification of parameters in routine= calls. > SQyntax: <routine> r([normal parms])([optional parms]) > And, when called, the optional parameters may or may not be passed. Like many other suggestions above, it's a refinement that adds a bit of complexity to the language and thickens the manual, in exchange for some minor convenience in rare cases. > 5/ Default values for arguments. >=20 > Description: Allow to skip the most frequent value for a routine argum= ent. > Syntax:=20 > <routine> r(integer x=3D32767,sequence s) > .... > end <routine> > ... > y=3Dr(,s) --argument x is 32767 > Obviously, the comma is optional when no defaulted argulment is follow= ed by a non-defaulted argument. See previous comment. > 6/ Named parameters >=20 > Description: Allow parameters to be passed as name=3Dvalue. > Named and unnamed arguments cannot be mixed in just any way. See previous comment. > 7/ Nested routines >=20 > Description: For nested routines, the code of the routine they are def= ined in > behaves exactly as the code outside a routine for a non-nested routine. > Syntax:=20 > sequence t > ..... > routine r1(...) > integer i > sequence s > routine r11(....) > integer i > ... > end routine > ... > end routine >=20 > In the example above, both routines r1 and r11 can see the sequence t= =20 > as a public variable. If i is defined outside r1, r1 does not see this sy= mbol. > It defines another i that shadows the public i. Likewise, r11's i shadows= r1's i. > Retrieving the value of a shadowed symbol may resuire a special syntax= . > Normally, a nested routine is only called by the routine in which it i= s nested. > This limitation might be relaxed in some cases. I've used languages with nested routines, and they are useful sometimes, but I think the language definition is much easier to understand when all routines are non-nested. > 8/ Routine_ids for builtins. >=20 > Description: routine_id() will return a value even for built-in routin= es. No reason why that hasn't been done. I might get around to it. Not a huge demand. > 9/ Routine redefinition. >=20 > Description: Coding a routine with the same name as a built-in or othe= rwise > previously specified routine would not cause an error, but the new routin= e > would be called instead of the former, hijacking its routine_id. >=20 > Syntax: > No special synntax required. > recover <routine decl> would undo all previous redefinitions. "Hijacking" sounds like a recipe for confusion. > Note that nested routines, shared and static variables will greatly re= duce > the use of global syymbols, hence alleviating the namespace collisiion pr= oblem. I don't think there is much of a collision problem to alleviate. > C/ Instruction flow cntrol >=20 > 1/ Optional argument for the exit statement. >=20 > Description: Breaks out of several loop levels at the same time. > Syntax: exit [arg] > Arg may be: > a/ A positive number, which is the extra number of loop levels to l= eave. > b/ A negative number, counting the loop levels from the top down. T= hus, > exit -1 means "exit the topmost loop". > c/ exit 0 can be tolerated as a synonym for plain exit. > d/ A label name, provided loops can be labelled. > e/ A for loop indexvariable name. >=20=20=20=20=20=20=20 > 2/ Next statement >=20 > Description: Skips the rest of the designated loop and start a new ite= ration. > Syntax: next [arg] > Same choices of [arg] as for exit. >=20=20=20=20 > 3/ Retry statement >=20 > Description: Restarts the current iteration of the designated for loop= . > Syntax: retry [arg] > Same rules as above. > retry does not quite make sense for while loops, since it would duplic= ate next. > So, it will count for loops only. This special behaviour might not be des= irable=20 > if a repeat ... until construct is immplemented, because retry and next w= ould have=20 > different meaning there.. >=20 > 4/ Exif statement >=20 > Description: Same as exit, but applies to if blocks. I have no philosophical objection to these. It's just a question of how often they are useful. As a minimalist, I have avoided them, and probably will continue to avoid them. > 5/ Select statement=20=20=20 >=20 > Description: Allows a decision to be made in more than two ways. > Syntax: > select <expr> > case x1: code to execute if the value of expr is x1 > case x2: ... > case x3 thru x4: > case <5 > case f(v,_)=3D0: > .... > [otherwise > ....] > end select >=20=20=20=20=20=20=20 > Each option inside the select statement is a case statement. A wide ra= nge > of ways to specify conditions can be devised, including using the anonymo= us _=20 > symbol in complex constructs. > The optional otherwise clause is executed if no case statement caused = the=20 > program flow to break out of the select statement. > Flow goes from ne case statement to the next, except when the break ke= yword=20 > causes control to be passed to the statement following the closing end se= lect statement. In the early days I was considering adding a case statement, but there was never a big user demand for it. I don't regret leaving it out. > 6/ xwhile loop >=20 > Description: same as a while loop, except that exit occurs as soon as > the condition specified in the xwhile statement is no longer true, withou= t the need > for endlessly repeating tests. Not sure I understand. > 7/ Exception handling >=20 > Description: When some condition occurs, execute a specific handler. > Syntax: setExcHandler(condition_code,handler_routine_id) >=20 > The handler may access and modify any variable in scope when the handl= er is invoked. > The handler may abort the program, reexecute the last instruction or r= eturn > normally. > Condition codes may not relate onlly to errors. I'm still thinking seriously about a global exception handler. It's easy to do, but there are some ramifications. Fancier exception handling is probably not on. > 8/ Guards >=20 > Description: Check for conditions inside a given scope and exeute code= when this happens. > Syntax: > on/when/whenever <condition> do > ... > end do > The scope of the guards may vary: > - on: current block only > - when: current routine > - whenever: from now on No thanks. > 9/ Dynamic code execution. >=20 > Description: Allow execution of text generated or fetched somewhere. > Syntax: execute(string) > The string in interpreted as if it had been loaded in memory in the fi= rst > place. Note that the include statement allows to do this, but only outsid= e > loops or routines. Lots of people suggest this. Few give any examples where they would use it.= I used a statement like this in APL years ago. I dearly wanted to find "cool" things to do with it. Eventually I realized it was largely useless, except for a few novelties. The interpreter is not currently designed to allow this kind of statement. It would be a big effort to change that, and might even slow things down a bit for all programs. > 10/ Selective type checking. >=20 > Description: Right now, either every assignment invokes type checking = routines, or some=20 > supposedly minimal amount, not nown to programmer, is performed. The idea= is to > specify variables that will be checked without type_check. >=20 > Syntax: check <variable decl> >=20 > The check prefix is ignored when type_check is on. Seems like overkill. > 11/ Additional type checking. >=20 > Description: On assignment, specified variables would go through a use= r-definable > set of validity checks. The user can add or remove such checks, performed= > regardless of the type_check flag. >=20 > Syntax: > check(i1,var name/id)=20 > add_check(i2,var name/id) > del_check(i2,var name/id) > uncheck(var nname/id) >=20 > These do what they say, i1 and i2 being routine_ids of additional chec= king functions. > Additional type checks are coded just like ordinary type functions. User defined type checking is not used that much as it is. Why add a new level of complexity? > 12/ Watch facility >=20 > Description: When a given variable is read, its watch function is invo= ked,=20 > returning the value the variable (possibly) holds. >=20 > Syntax: > watch <variable decl> > The routine invoked will be a rtype routine, which follows the same= patterns=20 > and rules than type functions. Example: > rtype integer (integer x) > if x<0 then return 0 > else return x > end if > end rtype > would make all negative integers appear as 0. Why? Who needs the confusion? > D/ Sequences and slices >=20 > 1/ Negatives indexes >=20 > Description: inside any sequence index specifiation, a negative value = might=20 > be used to count the elements backwards. So, longsequencename[length(long= sequencename)] > could be coded longsequencename[-1]. Accidental uses of negative indexes likely won't be caught as errors. Why is this important? > 2/ More slices >=20 > Decription: slices might appear in index specifications in other place= s than just the last. > Thus, matrix[..][3] would be the 3rd row of a column-bnased matrix. I implemented that in "Fourier", the language I did before Euphoria. It was useful there because the parallel machine could do the operation in hardware. In the Euphoria interpreter, I have no ultra-fast way to implement this, so you might as well do it yourself in the few places where it comes up. Maybe make a routine for it. > 3/ Shorthands for "length(this)" >=20 > Description: Allow more flexible coding of slices that extend to the e= nd > of a sequence. > Syntax: matrix[..][3] --see above > stack[$] --last element of stack > word[2..] --chop first letter off word I agree that it's often cumbersome to write stuff like: longvariablename[1..length(longvariablename)-1] I just don't know the best way to improve that. Obviously: longvariablename[1..$-1] is one way. I don't really like having lots of special characters in the language though. They scare away beginners. > 4/ Composition of sequences >=20 > Description: defines a subsequence using a sequence of indexes. > Syntax: t=3D{3,-1,5,3} > s=3D<some sequence> > s1=3Ds=F8t s1 is a sequence of lenth 4: {s[3],s[-1],s[5],s[= 3]} > Pairs in t could specify slices. Probably wouldn't be used often enough. Easy enough to do with a loop. > 5/ Dynamic indexing >=20 > Description: Allow variable length index specification > Syntax: s=3D{1,3,2} > t=3Du[[s]] --t=3Du[1][3][2] >=20 > Again, pairs could be used in s to specify slices. Wouldn't be used often enough. There are many possibilities for defining subscripting a sequence with a sequence. Maybe some day. > 6/ Sequence manipulation routines >=20 > Description: replace, insert and move elemnts around in a sequence. > Syntax: > replace(seq,places_list,subst_list)=20 > --places_list is a list of pairs of indexes delimiting subsequen= ces in seq. > --Each of these will be replaced by the matching element in subs= t_list. > insert(seq,where,x) --x is inserted at position where in seq, who= se length increased by 1 > inserts(seq,where,x) --if x is a sequence, its elements are insert= ed starting at position=20 > --where in seq.If x is an atom, same as insert. > move(seq,start,end,where) > --the subsequence seq[start..end] is moved so that it starts at = where. > remove'szq,where) > --where is an index or a pair of indexes specifying element(s) t= o be removed from seq. >=20=20=20=20=20=20=20=20=20=20 > Note that all these could be just some functions in misc.e Their be= ing > built-ins would probably increase speed. I don't mind adding some more general-purpose functions to misc.e. > E/ Object programming capabilities. Object oriented programming is great in theory, but once you head down that road you will probably end up doubling the size of the manual, trying to explain the nuances and interactions among all the different features. We can do a form of object oriented programming using libraries like Mike Nelson's. > F/ Miscellaneous >=20 > 1/ Pre- and post-inc/decremnet operators C-style > 2/ Allow concatenation of logical relations, such as 0<=3Dx<=3D9. > 3/ Allow assignments inside conditions. The symbol :=3D could be used her= e > since =3D has a relational meaning. Unnecessary frills. ----------------- Thanks for your suggestions. I'll save them in my Suggestions folder and I might act on some of them. Everyone has a different taste in programming languages. My vision for Euphoria, since day 1, has been to create a powerful, easy-to-learn, minimal, reliable and fast language. I don't measure the progress of Euphoria by the number of core language statements added each year. New growth should mainly be in libraries, tools and porting. BTW, someone with the source has recently ported Euphoria to the Franklin eBookMan PDA - various text-mode programs are running. Briefly, some other issues: open source - I have no plans to make Euphoria open source or free in the forseeable future. If I get tired of working on it, I'll consider it. Keep in mind 95% of the Interpreter source is available to anyone for $49. and keep in mind 95% of the functionality is already free to anyone. Most libraries are open source. I've gone as far as I can in the free and open direction without giving up my income. Euphoria sales - July 2003 set a new all-time record for registrations, upgrades, and dollars income. Thanks to all who registered or upgraded. Of course I'm not getting rich. I'm still driving a badly rusting 1989 Corolla. Regards, Rob Craig Rapid Deployment Software http://www.RapidEuphoria.com
303.
- Posted by Matt Lewis <matthewwalkerlewis at yahoo.com> Aug 22, 2003
- 1909 views
I just sent Rob updates for my Euphoria Database Browser and ODBC library. ODBC: Bug fixes, added routines for inserting data EDB: Can view, edit, import and export from ODBC databases. Until they make it to the user contributions page, you can get them here: http://www14.brinkster.com/matthewlewis/projects.html Matt Lewis
304.
- Posted by darhanmartin at hotmail.com Aug 28, 2003
- 1883 views
This is a multi-part message in MIME format. ------=_NextPart_000_000C_01C36DAA.368416C0 charset="iso-8859-1" unsub-scribe ------=_NextPart_000_000C_01C36DAA.368416C0 charset="iso-8859-1" <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <META content=3D"MSHTML 6.00.2800.1106" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> ------=_NextPart_000_000C_01C36DAA.368416C0--
305. Re:
- Posted by Robert Craig <rds at RapidEuphoria.com> Jun 04, 2004
- 1885 views
Patrick Barnes wrote: > That is fine, I know you're close to releasing 2.5 now. > Could we have a page on rapideuphoria somewhere that shows the features you > plan to implement in the next version of the language (So currently for > 2.5), and a list of features that are being considered for unspecified > versions beyond that? It would make it easier for us to see what you are > planning with the language, and make appropriate suggestions. That's been requested before, and I think I promised to do something or other. I'll think about it. Maybe we need an official system for posting suggestions and bug reports and getting a quick one-line response from me: "Yes, it's a bug", "I love that suggestion!", "I hate that. I'll never, ever implement it" etc. It comes as a shock to some people, but I don't have any master plan. Once I latch onto something useful, I implement it, then I go back to my pile of half-baked ideas and suggestions, and pick out something new to work on. There's no plan. If post my long list of cryptic half-baked ideas, I'll be flooded with proposals and questions about all sorts of odd things that I really don't want to implement. Regards, Rob Craig Rapid Deployment Software http://www.RapidEuphoria.com
306. Re:
- Posted by "Patrick Barnes" <mistertrik at hotmail.com> Jun 04, 2004
- 1893 views
>From: Robert Craig <guest at RapidEuphoria.com> > > That is fine, I know you're close to releasing 2.5 now. > > Could we have a page on rapideuphoria somewhere that shows the features >you > > plan to implement in the next version of the language (So currently for > > 2.5), and a list of features that are being considered for unspecified > > versions beyond that? It would make it easier for us to see what you are > > planning with the language, and make appropriate suggestions. > >That's been requested before, >and I think I promised to do something or other. >I'll think about it. Maybe we need an official >system for posting suggestions and bug reports >and getting a quick one-line response from me: > "Yes, it's a bug", > "I love that suggestion!", > "I hate that. I'll never, ever implement it" > etc. > >It comes as a shock to some people, but >I don't have any master plan. >Once I latch onto something useful, I implement it, >then I go back to my pile of half-baked ideas >and suggestions, and pick out something new to >work on. There's no plan. If post my long list >of cryptic half-baked ideas, I'll be flooded with proposals >and questions about all sorts of odd things that I >really don't want to implement. Heheh... Well, perhaps split it up into sections. Have a section called "Cloud 9", or even just "Half-baked ideas" for that, and state at the top that they're not being seriously considered now, or possible ever. If someone submits something that is so obviously a bad idea ("Rob, why can't I write inline COBOL in euphoria????!?!?") it can be moved to a "Bad idea section". Given your experience with ListFilter, a good idea might be to parse any top-level submissions (proposals, not replies), and show a list of "this idea may have been submitted already in one of these previous submissions, check before posting" to reduce duplicates. Allow users to edit the top-level submission (the proposal) as new ideas are incorporated into the proposal, with a changelog. Mark agains replies to the proposal what version the replies were made. Hmmm, I think this would be nice. MrTrick
307.
h=domainkey-signature:received:received:message-id:date:from:to:subject:in-reply-to:mime-version:content-type:references; bh=1fYpmmlZezspzb8lqefBBqwkTzqTfK+DoEkhA+8O3r8=; b=GxRd3MWAEcpzUGzDDg0i0qIR2TWH72xOjdmSs9Odmyri47WC1sIQ0N8ciFk1mqIHs1sgolwYcU0mQc42/lX5W/0csaLs/0qbBTYPN/yNSCyUMsHqujttL2qpOk6frCiGU153YBal6maeKIesg+7eUazxbYTQdNgJixzrwTkReXY= DomainKey-Signature: a=rsa-sha1; c=nofws; d=gmail.com; s=beta; h=received:message-id:date:from:to:subject:in-reply-to:mime-version:content-type:references; b=Lu1dYDtSurdd8R4F6nOGLMsa8QPa5ATA91+OLDiCkEdloQu7hVa9jvaF7snfvqRyTYHpOkL9O0tEqLK5Vu+GLecd51LRiGhfIEY6R4cgkGo3E2SN+emaoM37Qh608Vx3j1r4mApYjj6LqmWsPC0VvNdogrn7RQS+w/IITC8NE7w= Received: by 10.67.25.6 with SMTP id c6mr1412140ugj.1193607512999; Sun, 28 Oct 2007 14:38:32 -0700 (PDT) Received: by 10.67.22.20 with HTTP; Sun, 28 Oct 2007 14:38:32 -0700 (PDT) Message-ID: <5f27691c0710281438u5245a0e6m961d6013c6f4c3db at mail.gmail.com> Date: Sun, 28 Oct 2007 14:38:32 -0700 From: "codepilot Gmail Account" <codepilot at gmail.com> To: EUforum at topica.com Subject: Re: C to EU Translator In-Reply-To: <1032536536-1463792638-1193598966 at boing.topica.com> MIME-Version: 1.0 Content-Type: multipart/alternative; boundary="----=_Part_472_2774155.1193607512988" References: <1032536536-1463792638-1193598966 at boing.topica.com> ------=_Part_472_2774155.1193607512988 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: 7bit Content-Disposition: inline Hmm. Maybe I should make it do macros and structures? Good idea! I have already done COM. I know that macros can do a lot of things, should they turn into functions? At some point a full blown C to Euphoria translator needs to be made, because made H files have things that aren't as cut and dry as a simple specification of call point entries/types/constants. Many of the macros do a lot of work precompile that would make much sense in run time, in euphoria as functions. And I really can't think of a good way to do structures, maybe some ideas would be good. On 10/28/07, Chris Bensler <guest at rapideuphoria.com> wrote: > > ============ The Euphoria Mailing List ============ > > > posted by: Chris Bensler <eu at creat?vep?rtal.ca> > > c.k.lester wrote: > > > > What about the library from Daniel Kluss? > > > > <a href="http://www.rapideuphoria.com/h_to_e.zip"> > http://www.rapideuphoria.com/h_to_e.zip</a> > > > > I think Matt has something like that in wxEuphoria, too. > > h_to_e does not produce a 100% translation. Ideally a 1:1 translation. > Namely it only generates constants and minimal function wrappers. > It doesn't handle structures or macros, etc... IIRC. > I haven't seen Matt's. Maybe he can comment. > > What I would like to see is a tool that will allow us to generate Euphoria > wrappers for C API's > with which we can directly use the original documentation and not have to > port _anything_ by hand. > The translations should be as accurate to the original as possible. > > Chris Bensler > Code is Alchemy > > --^---------------------------------------------------------------- > This email was sent to: codepilot at gmail.com > > EASY UNSUBSCRIBE click here: http://topica.com/u/?b1dd66.bTRIN1.Y29kZXBp > Or send an email to: EUforum-unsubscribe at topica.com > > For Topica's complete suite of email marketing solutions visit: > http://www.topica.com/?p=TEXFOOTER > --^---------------------------------------------------------------- > > ------=_Part_472_2774155.1193607512988 Content-Type: text/html; charset=ISO-8859-1 Content-Transfer-Encoding: 7bit Content-Disposition: inline Hmm. Maybe I should make it do macros and structures? Good idea! I have already done COM. I know that macros can do a lot of things, should they turn into functions? At some point a full blown C to Euphoria translator needs to be made, because made H files have things that aren't as cut and dry as a simple specification of call point entries/types/constants. Many of the macros do a lot of work precompile that would make much sense in run time, in euphoria as functions. And I really can't think of a good way to do structures, maybe some ideas would be good. <br><br> <div><span class="gmail_quote">On 10/28/07, <b class="gmail_sendername">Chris Bensler</b> <<a href="mailto:guest at rapideuphoria.com">guest at rapideuphoria.com</a>> wrote:</span> <blockquote class="gmail_quote" style="PADDING-LEFT: 1ex; MARGIN: 0px 0px 0px 0.8ex; BORDER-LEFT: #ccc 1px solid">============ The Euphoria Mailing List ============<br><br><br>posted by: Chris Bensler <eu at creat?vep?rtal.ca> <br><br>c.k.lester wrote:<br>><br>> What about the library from Daniel Kluss?<br>><br>> <a href="<a href="http://www.rapideuphoria.com/h_to_e.zip">http://www.rapideuphoria.com/h_to_e.zip</a>"> <a href="http://www.rapideuphoria.com/h_to_e.zip">http://www.rapideuphoria.com/h_to_e.zip</a></a><br>><br>> I think Matt has something like that in wxEuphoria, too.<br><br>h_to_e does not produce a 100% translation. Ideally a 1:1 translation. <br>Namely it only generates constants and minimal function wrappers.<br>It doesn't handle structures or macros, etc... IIRC.<br>I haven't seen Matt's. Maybe he can comment.<br><br>What I would like to see is a tool that will allow us to generate Euphoria wrappers for C API's <br>with which we can directly use the original documentation and not have to port _anything_ by hand.<br>The translations should be as accurate to the original as possible.<br><br>Chris Bensler<br>Code is Alchemy<br><br> --^----------------------------------------------------------------<br>This email was sent to: <a href="mailto:codepilot at gmail.com">codepilot at gmail.com</a><br><br>EASY UNSUBSCRIBE click here: <a href="http://topica.com/u/?b1dd66.bTRIN1.Y29kZXBp"> http://topica.com/u/?b1dd66.bTRIN1.Y29kZXBp</a><br>Or send an email to: <a href="mailto:EUforum-unsubscribe at topica.com">EUforum-unsubscribe at topica.com</a><br><br>For Topica's complete suite of email marketing solutions visit: <br><a href="http://www.topica.com/?p=TEXFOOTER">http://www.topica.com/?p=TEXFOOTER</a><br>--^----------------------------------------------------------------<br><br></blockquote></div><br> ------=_Part_472_2774155.1193607512988--
308.
- Posted by Jacques Deschenes <desja at QUEBECTEL.COM> Nov 11, 1996
- 1965 views
- Last edited Nov 12, 1996
I added a procedure to ed to comment or uncomment a group of lines the two functions are accessed by ALT_C to comment out and ALT_U to uncomment to modify ed.ex do (backup ed.ex before any change) 1) find "-- special input characters" 2) add ALT_C = 302, and ALT_U = 278 to the list of constants 3) add ALT_C,ALT_U to CONTROL_CHARS constant 4) find "edit_file()" procedure and paste the following lines at the right place elsif key = ALT_C then SetComment(1) -- comment lines elsif key = ALT_U then SetComment(0) -- uncomment lines 5) paste the following procedure somewhere before edit_file() procedure SetComment(integer action) -- if action = 1 then comment out a group of lines -- if action = 0 then uncomment a group of lines integer first, last,j sequence inp inp = {1,0} while inp[1] do if action then set_top_line("Number of lines to comment out? (+ down, - up) ") else set_top_line("Number of lines to uncomment? (+ down, - up) ") end if inp = value(key_gets("")) end while if inp[2] < 0 then first = b_line + inp[2] + 1 if first < 1 then first = 1 end if last = b_line else first = b_line last = b_line + inp[2] - 1 if last > length(buffer) then last = length(buffer) end if end if if action then -- comment out for i = first to last do j = 1 -- skip white space and tab at line start while j <= length(buffer[i]) and find(buffer[i][j], " \t") do j = j+1 end while if match("--",buffer[i][j..length(buffer[i])]) != 1 then buffer[i] = "--" & buffer[i] end if end for else -- uncomment for i = first to last do j = 1 -- skip white space and tab at line start while j <= length(buffer[i]) and find(buffer[i][j], " \t") do j = j+1 end while if j < length(buffer[i]) then if match("--", buffer[i][j..length(buffer[i])]) = 1 then buffer[i] = buffer[i][j+2..length(buffer[i])] end if end if end for end if set_modified() normal_video() DisplayWindow(b_line - s_line + 1, 1) end procedure --SetComment() Jacques Deschenes Baie-Comeau, Quebec Canada desja at quebectel.com
309.
- Posted by "BABOR, JIRI" <J.Babor at GNS.CRI.NZ> Nov 14, 1996
- 1966 views
My apologies to people who tried to reach me: I am surviving under a fourth network administrator in less than two years, each with a different set of naming conventions - Rob Craig is right, I have lost track of my own name... To Daniel Berstein Zimmermann: Go for it, Daniel, my code is in the public domain; I am glad you like it. Jiri.
310.
- Posted by Daniel Berstein Zimmermann <dberst at CMETNET.CMET.NET> Nov 14, 1996
- 1939 views
BABOR, JIRI wrote: > To Daniel Berstein Zimmermann: Go for it, Daniel, my code is in the public > domain; I am glad you like it. Jiri. Thanks, I'll be posting it quite soon... -- Daniel Berstein Zimmermann dberst at cmet.net http://www.geocities.com/SiliconValley/Heights/9316
311.
- Posted by rma <rma at RMA.DNT.MD> Aug 05, 1999
- 1913 views
Hi there, I'm writing an article on Euphoria and maybe someone here is willing to help me. Best regards, Mihai Ciumeica mailto:rma at rma.dnt.md
312.
- Posted by jesse kint <jk2000 at PA.NET> Aug 09, 1999
- 1926 views
- Last edited Aug 10, 1999
------=_NextPart_000_0021_01BEE2B1.AE52BFE0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable sighnoff euphoria ------=_NextPart_000_0021_01BEE2B1.AE52BFE0 charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD W3 HTML//EN"> <HTML> <HEAD> <META content=3Dtext/html;charset=3Diso-8859-1 = http-equiv=3DContent-Type><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 = Transitional//EN"> <META content=3D'"MSHTML 4.72.3110.7"' name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT color=3D#000000 size=3D2>sighnoff = ------=_NextPart_000_0021_01BEE2B1.AE52BFE0--
313.
- Posted by Derek Brown <Cyrusbrown at AOL.COM> Aug 10, 1999
- 1888 views
In a message dated 8/9/99 9:05:47 PM Central Daylight Time, jk2000 at PA.NET writes: << sighnoff euphoria >> To sign off, you need to send that message to the server of the listserv. The address is listserv at listserv.muohio.edu. Good luck in all your programming endeavors. Derek Brown
314.
- Posted by Pete Eberlein <xseal at HARBORSIDE.COM> Aug 13, 1999
- 1897 views
> Given ( as an output from err file when i hit shift-! on the lines below > ) : > datatofind = {19,48'0',48'0',124'|',115's',104'h',101'e',5} > > Why doesn't this line execute?: > if find({" 00|"},{data}) then printf(1,"%s\n", {data} ) end if > > Or this line: > if find(" 00|",{data}) then printf(1,"%s\n", {data} ) end if > > Or this line: > if find(" 00|",data) then printf(1,"%s\n", {data} ) end if > > Or this line: > if ( find({" 00|"},{data}) != 0 ) then printf(1,"%s\n", {data} ) end if > > Or these lines: > StartOfRec = " 00|" > if find(StartOfRec,data) then printf(1,"%s\n", {data} ) end if > > Or any line with {data}/" 00|" written with/without the {}. There is > just nothing, no error, no printing. It traces onto it, then nothing > happens on the other screen when i hit enter. > > The symbol there is a double ! in my editor, i get it by ctrl-s on the > keybd. > > Kat, > bewildered. I believe the function you are looking for is match() instead of find(). Find looks for the first argument in each element of the second argument, while match looks for the first argument as occurring as a slice in the second. Going back to your original example, I would rewrite it as: object data integer datafound sequence datatofind datafound = 0 -- false while not datafound do data = gets( dctstrfile ) if atom( data ) then exit -- end-of-file end if datafound = match( datatofind, data ) end while Later, _______ ______ _______ ______ [ _ \[ _ ][ _ _ ][ _ ] [/| [_] |[/| [_\][/ | | \][/| [_\] | ___/ | _] | | | _] [\| [/] [\| [_/] [\| |/] [\| [_/] [_____] [______] [_____] [______] xseal at harborside.com ICQ:13466657 http://www.harborside.com/home/x/xseal/euphoria/
315. Re: Re:
- Posted by pampeano at ROCKETMAIL.COM Apr 01, 2001
- 2005 views
--------------Boundary-00=_ZL94MY50000000000000 --------------Boundary-00=_ZL94H890000000000000 charset="iso-8859-1" I'm using EDS on a big project (news page not finished yet) and it works = fine. I haven't used the other libraries because I'm not a db expert and I don'= t want to be one. Win32lib is still on a development stage, but I think that's not that bug= gy, maybe you could see some weird stuff, but the win32lib team had shown= a special interest on fixing the bugs so it's not a big problem. Give euphoria a try, it's easy and fast to devolp programs on it, and spe= cial debugging them! (If you have thel full version you have more details= to fix the problems). Best Regards, Guillermo Bonveh=ED AKA: Knixeur, Red Knight, Caballero Rojo -------Original Message------- From: Ray Smith=20 To: EUforum=20 Subject: Re: =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D "Before myTopica, I was buried in an avalanche of email. Now, thanks to this free solution, I am on top of my inbox." Get rescued at =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D Hi Chris, > 1) Is there support for relational databases The archives contain: * a MySQL wrapper, * a pretty new ODBC wrapper (this is not a full wrapper but I think the basics work). * Euphoria's own EDS database system. I don't think any of these have been used on a big project yet???? not that I can recall hearing about anyway. I haven't used the MySQL wrapper but the other two seem to work ok from my small amount of playing. > 2) I saw a win32 GUI Library, what controls does it support? More > specifically, does it wrap dockables windows, etc? Win32Lib is an excellent wrapper for the Windows API. It has support for the majority of Windows features likes windows, button= s, toolbars, listviews, status bars, textboxes etc etc. It is still being heavily developed and as such the odd bug still exists = and the doco hasn't caught up yet. You will find many many examples of reasonably simple demos using Win32Lib. >From my personal view I wouldn't start a major development project until Win32Lib is a little more stable. Others might disagree?? I'd like to he= ar opinions of anyone who does disagree. > 3) How does compiled Euphoria code compare to say (realistically) Visua= l > Basic? Well, Euphoria in most cases are bound when distributed. This means the runtime interpreter and the source program is merged together for ease of distribution. I have never done any benchmarks against any of language ... but then aga= in I have never had the need for more speed with Euphoria. If you are planning any type of business software with Euphoria will have power to burn. There is also a translator available that translates your Euphoria progra= m to C which you can then compile .... which "might" increase the speed somewhat. The amount of increase has been debated on the list on and off for a few months. > Also, If anyone knows of a compiled GUI program that demonstrates the > power of Euphoria could you please post the link? I don't know of any large applications ... the best bet is to look throug= h the recent user contributions. I don't think you will find what your looking for though. (Maybe the IDE is a good example???) > I'm trying to save myself a few months of development by finding a > substitute language I could use for this project. I've made database > programs in C++ before, and I don't want to go there again. For windows development I don't think Euphoria is the tool to save yourse= lf time writing software. Although the base language is very stable and fast, it by itself won't he= lp you do anything in Windows. All the windows add on libraries are written by users you graciously give there code to the community. This in most cases mean= s bugs are more prominent, documentation is lacking and support is given by a few devoted users. My tool of choice for writing "business" type software for Windows would = be Visual Basic or Delphi. Visual Basic (VB) has many knockers (especially around here on the Euphor= ia list) and in some regards VB is very inefficent (the word bloatware was probabl= y conceived by a VB programmer!) but for a development tool that helps you to deliver= a project to a client on time with required functioanlity I don't thin anything com= es close. If the size of your projects distribution is a major concern I'd suggest Delphi. Ray Smith --------------Boundary-00=_ZL94H890000000000000 Content-Type: Multipart/related; boundary="------------Boundary-00=_ZL94CJD0000000000000" --------------Boundary-00=_ZL94CJD0000000000000 Content-Type: Text/HTML; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <html> <head> <meta name=3D"GENERATOR" content=3D"IncrediMail 1.0"> </head> <BODY background=3D"" bgColor=3D#ffffff style=3D"BACKGROUND-POSITION: 0px= 0px; FONT-FAMILY: Arial" scroll=3Dyes ORGYPOS=3D"0"> <TABLE border=3D0 cellPadding=3D2 cellSpacing=3D0 id=3DINCREDIMAINTABLE w= idth=3D"100%"> <TBODY> <TR> <TD id=3DINCREDIHEADER width=3D"100%"></TD> </TR> <TR> <TD id=3DINCREDITEXTREGION width=3D"100%"> <DIV>I'm using EDS on a big project (news page not finished yet) an= d it=20 works fine.</DIV> <DIV>I haven't used the other libraries because I'm not a db expert= and I=20 don't want to be one.</DIV> <DIV> </DIV> <DIV>Win32lib is still on a development stage, but I think that's n= ot that=20 buggy, maybe you could see some weird stuff, but the win32lib team = had=20 shown a special interest on fixing the bugs so it's not a big=20 problem.</DIV> <DIV> </DIV> <DIV>Give euphoria a try, it's easy and fast to devolp programs on = it, and=20 special debugging them! (If you have thel full version you have mor= e=20 details to fix the problems).</DIV> <DIV> </DIV> <DIV> <DIV>Best Regards,</DIV> <DIV> Guillermo Bonveh=ED</DIV> <DIV> AKA: Knixeur, Red Knight, Cabal= lero=20 Rojo</DIV></DIV> <DIV> </DIV> <DIV><I>-------Original Message-------</I></DIV> <DIV> </DIV> <DIV> </DIV> <DIV dir=3Dltr id=3Dfromshowfield><U><I>From:</I></U><B> Ray Smith=20 <SMITHR at IX.NET.AU></B></DIV> <DIV dir=3Dltr id=3Dtoshowfield><U><I>To:</I></U><B> EUforum=20 <EUFORUM at TOPICA.COM></B></DIV> <DIV dir=3Dltr id=3Dsubjectshowfield><U><I>Subject:</I></U><B>=20 Re:</B></DIV><BR> &n= bsp; =20 =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D<BR>"Be= fore=20 myTopica, I was buried in an avalanche of email.<BR>Now, thanks to = this=20 free solution, I am on top of my inbox."<BR>Get rescued=20 =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D= =3D=3D=3D=3D=3D=3D=3D=3D<BR><BR>Hi=20 Chris,<BR><BR>> 1) Is there support for relational databases<BR>= <BR>The=20 archives contain:<BR><BR>* a MySQL wrapper,<BR>* a pret= ty new=20 ODBC wrapper (this is not a full wrapper but I<BR>think the basics=20 work).<BR>* Euphoria's own EDS database system.<BR><BR>I don'= t think=20 any of these have been used on a big project yet????<BR>not that I = can=20 recall hearing about anyway. I haven't used the MySQL<BR>wrap= per but=20 the other two seem to work ok from my small amount<BR>of=20 playing.<BR><BR><BR>> 2) I saw a win32 GUI Library, what control= s does=20 it support? More<BR>> specifically, does it wrap dockables windo= ws,=20 etc?<BR><BR>Win32Lib is an excellent wrapper for the Windows=20 API.<BR>It has support for the majority of Windows features likes w= indows,=20 buttons,<BR>toolbars, listviews, status bars, textboxes etc etc.<BR= >It is=20 still being heavily developed and as such the odd bug still exists=20 and<BR>the<BR>doco hasn't caught up yet.<BR>You will find many many= =20 examples of reasonably simple demos using<BR>Win32Lib.<BR>>From = my=20 personal view I wouldn't start a major development project=20 until<BR>Win32Lib is a little more stable. Others might disag= ree??=20 I'd like to hear<BR>opinions of anyone who does disagree.<BR><BR>&g= t; 3)=20 How does compiled Euphoria code compare to say (realistically)=20 Visual<BR>> Basic?<BR><BR>Well, Euphoria in most cases are bound= when=20 distributed. This means the<BR>runtime<BR>interpreter and the= source=20 program is merged together for ease of<BR>distribution.<BR>I have n= ever=20 done any benchmarks against any of language ... but then again<BR>I= =20 have<BR>never had the need for more speed with Euphoria.<BR>If you = are=20 planning any type of business software with Euphoria will have<BR>p= ower to=20 burn.<BR><BR>There is also a translator available that translates y= our=20 Euphoria program<BR>to C which you can then compile .... which "mig= ht"=20 increase the speed<BR>somewhat.<BR>The amount of increase has been = debated=20 on the list on and off for a few<BR>months.<BR><BR>> Also, If an= yone=20 knows of a compiled GUI program that demonstrates the<BR>> power= of=20 Euphoria could you please post the link?<BR><BR>I don't know of any= large=20 applications ... the best bet is to look through<BR>the recent user= =20 contributions. I don't think you will find what=20 your<BR>looking<BR>for though. (Maybe the IDE is a good=20 example???)<BR><BR>> I'm trying to save myself a few months of=20 development by finding a<BR>> substitute language I could use fo= r this=20 project. I've made database<BR>> programs in C++ before, and I d= on't=20 want to go there again.<BR><BR>For windows development I don't thin= k=20 Euphoria is the tool to save yourself<BR>time writing=20 software.<BR>Although the base language is very stable and fast, it= by=20 itself won't help<BR>you<BR>do anything in Windows. All the w= indows=20 add on libraries are written by<BR>users<BR>you graciously give the= re code=20 to the community. This in most cases means<BR>bugs are more=20 prominent, documentation is lacking and support is given<BR>by a fe= w=20 devoted users.<BR><BR>My tool of choice for writing "business" type= =20 software for Windows would be<BR>Visual Basic or Delphi.<BR>Visual = Basic=20 (VB) has many knockers (especially around here on the=20 Euphoria<BR>list)<BR>and in some regards VB is very inefficent (the= word=20 bloatware was probably<BR>conceived<BR>by a VB programmer!) but for= a=20 development tool that helps you to deliver a<BR>project<BR>to a cli= ent on=20 time with required functioanlity I don't thin anything=20 comes<BR>close.<BR><BR>If the size of your projects distribution is= a=20 major concern I'd suggest<BR>Delphi.<BR><BR>Ray Smith<BR><BR><BR></= TD> </TR> <TR> <TD id=3DINCREDIFOOTER width=3D"100%"> =09<TABLE cellPadding=3D0 cellSpacing=3D0 width=3D"100%"> =09<TBODY> =09<TR> =09<TD width=3D"100%"></TD> =09<TD align=3Dmiddle id=3DINCREDISOUND vAlign=3Dbottom></TD> =09<TD align=3Dmiddle id=3DINCREDIANIM vAlign=3Dbottom></TD> =09</TR> =09</TBODY> =09</TABLE> </TD> </TR> </TBODY> </TABLE><SPAN=20 id=3DIncrediStamp><FONT face=3D"Arial, Helvetica, sans-serif"=20 --------------Boundary-00=_ZL94CJD0000000000000-- --------------Boundary-00=_ZL94H890000000000000-- --------------Boundary-00=_ZL94MY50000000000000--
316. Re:
- Posted by Euman <euman at bellsouth.net> Apr 01, 2001
- 1908 views
I've got a 40 meg and growing database and havent run into a problem useing Win98, Win32Lib and EDS..... I just recently read that Win ME had no DOS support so I asked if it would function and several people said it would.... EDS is really nice if used (handled) proper I converted 3.8 megs of Dbase .dbf .dbt files over to EDS and saved alittle under 2 meg space. Euman ----- Original Message ----- From: "Derek Parnell" <ddparnell at bigpond.com> To: "EUforum" <EUforum at topica.com> Sent: Sunday, April 01, 2001 22:05 Subject: RE: Re: > > > Yeah, go for it. Euphoria with Win32lib and EDS could handle this task > easily. The performance would be quite acceptable using a PC from the last 3 > years. (P2, 8Meg RAM, 200Meg disk, Windows 98) > > I have an application using EDS, Win32lib that is much more demanding than > the one you outlined. (60 concurrent client machines handling the UI and a > single server handling the Database) (Sorry, source and object code not > available as it proprietary and I'm operating under a non-disclosure > agreement). > > ----------- > cheers, > Derek Parnell > > > > -----Original Message----- > > From: chris_esen at hotmail.com [mailto:chris_esen at hotmail.com] > > Sent: Monday, 2 April 2001 12:42 PM > > To: EUforum > > Subject: RE: Re: > > > > > > > > Hey - > > > > I'm working on a database program with 300+ fields for each > > individual. > > I suspect an average of 25 individuals to be entered into the > > database > > at once. It's not a complicated program at all. Basicly I'm going to > > sort >all< of this information after I compare it against the other > > individual's fields, then display the top N winners for each > > group (each > > group has a table). Now there's more to it, like some individuals may > > not have groups while others will and blah blah blah. The rest of the > > program sets the MAX and MIN limit for the information being entered > > into the fields. It's gonna be chock full of UI. > > > > Later, > > Chris > > > > > > >
317. Re:
- Posted by eulev at DPG.HU Apr 16, 2001
- 1892 views
This is a cryptographically signed message in MIME format. --7359-5655-23892-987328760
320.
> > > ------------------------------------------------------------ //// Totally FREE software. Just pay shipping! \\\\ || Click here --->> http://www.free-cd-software.com || <a href="http://www.free-cd-software.com">AOL Link</a>
322.
- Posted by tjsnyders at HOME.COM Apr 29, 2001
- 1908 views
This is a multi-part message in MIME format. ------=_NextPart_000_0015_01C0D0D3.14584560 charset="iso-8859-1" mailto:EUforum-unsubscribe at topica.com ------=_NextPart_000_0015_01C0D0D3.14584560 charset="iso-8859-1" <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META content=3D"text/html; charset=3Diso-8859-1" = http-equiv=3DContent-Type> <META content=3D"MSHTML 5.00.2919.3800" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#befcfc> <DIV><FONT face=3DArial size=3D2><A=20 href=3D"mailto:EUforum-unsubscribe at topica.com">mailto:EUforum-unsubscribe= ------=_NextPart_000_0015_01C0D0D3.14584560--