OpenEuphoria

RE: poke4 won't accept my 32bit values

• Posted by Chris Bensler <bensler at mailops.com> Mar 21, 2001
• 506 views

Thanks Derek, but it still doesn't explain why it would work for the 
original Exotica Demos, and not for ExoticaX.. Tells me it has something 
to do with my code, but I can't find it..

I even used the original Exotica demo, and changed only the necessities 
to ExoticaX..  that would be: exotica_init(), and exotica_error(). 
That's why I looked there..

create3D_device doesn't cause the program to fail, only when I change 
the lines.. c_proc(EXOTICA_INIT,{NULL}) to exotica_init(), and 
c_func(ON_ERROR,{NULL}) to exotica_error().. the respective ExoticaX 
counterparts.. does the program give me that error..
Only when I split the WinMain function like I have in ExoticaX do I get 
that error..

Chris


Derek Parnell wrote:
> Hi Al,
> it's still early yet, but just before you posted this I'd tracked down 
> the
> location of the problem. Superficially it appears to be a bug in the 
> direct
> draw library (create3d_device) that is corrupting a part of the 
> interpreter.
> 
> I found this out but placing the offending line of code in various parts 
> of
> the program until I isolated the line of code that was causing the 
> effect.
> 
> I appears that once the call to create3d_device has been executed, 
> poke4()
> would no longer work for any values between #FFFFFF01 and #FFFFFFFF. 
> Instead
> it would also convert these to #100000000, even if the values were in
> variables or expressions (eg. #FFFFFF00 + #FF).
> 
> The workaround was to place all the code containing the poke4() 
> statements
> physically before the create3d_device function was executed.
> 
> Of course, none of this is conclusive yet. I've given this info to 
> Robert as
> well and maybe he can confirm it or find a deeper reason.
> 
> ----- Original Message -----
> From: "Al Getz" <Xaxo at aol.com>
> To: "EUforum" <EUforum at topica.com>
> Sent: Wednesday, March 21, 2001 4:39 PM
> Subject: RE: poke4 won't accept my 32bit values
> 
> 
> [big snip]
> >
> > Good luck with it.
> > --Al
> >
> 
> ------
> Derek Parnell
> Melbourne, Australia
> "To finish a job quickly, go slower."
> 
> 
> 
>