Desktop FX

Clutch · Post by **Clutch** » Sat Mar 17, 2007 7:51 pm

Very nice!

benny · Post by **benny** » Sun Mar 18, 2007 5:59 pm

Cool idea and very well done

GeoTrail · Post by **GeoTrail** » Sun Mar 18, 2007 7:33 pm

Wow, that is really impressive.
I looked at the code and must admit I get lost there hehehe
Great coding

GeoTrail · Post by **GeoTrail** » Sun Mar 18, 2007 7:37 pm

Psychophanta, do you think you could comment the code a bit so us n00bs can understand and learn from your code?

Psychophanta · Post by **Psychophanta** » Sun Mar 18, 2007 7:41 pm

GeoTrail wrote:Psychophanta, do you think you could comment the code a bit so us n00bs can understand and learn from your code?

As is commented in the code, it uses the SuperSprite3D lib by CPL.Bator, but i have modified the functions a little bit.
I will now post the code (in the first post) a bit more cutted down.

Anyway there is something wrong in my code, because the plane doesn't seem to have a real perspective, and the problem is in the camera, well i will correct if i have a time.

techjunkie · Post by **techjunkie** » Mon Mar 19, 2007 10:42 am

Wow! Can't you do a "Beryl" clone for Windows?

http://wiki.beryl-project.org/wiki/Main_Page
http://www.youtube.com/watch?v=QNb7gPA1JFk

Derek · Post by **Derek** » Mon Mar 19, 2007 11:11 am

techjunkie wrote:Wow! Can't you do a "Beryl" clone for Windows?
http://wiki.beryl-project.org/wiki/Main_Page
http://www.youtube.com/watch?v=QNb7gPA1JFk

That's pretty cool.

techjunkie · Post by **techjunkie** » Mon Mar 19, 2007 11:49 am

Derek wrote:
techjunkie wrote:Wow! Can't you do a "Beryl" clone for Windows?
http://wiki.beryl-project.org/wiki/Main_Page
http://www.youtube.com/watch?v=QNb7gPA1JFk
That's pretty cool.

Yeah!

I'm installing Beryl and Ubuntu (Yes! Ubuntu!

) at home right now - just to impress my friends...

Psychophanta · Post by **Psychophanta** » Mon Mar 19, 2007 4:42 pm

I did it more simple, without the functions of SuperSprite3D from Cpl.Bator.
Now it is all pure native.
Anyway it could be improved still more coz of the z axis of Sprite3D is wierd for me.

Dare · Post by **Dare** » Sun Apr 08, 2007 9:27 am

lol.

Just spotted this. Thought I lost control of my screen for a moment.

Cool stuff, Psycho!

PB · Post by PB » Sun Apr 08, 2007 11:03 am

I liked the original code better, because once the screen tilted back to the
bottom, it didn't "disappear" for half a second like it does now.

Also, you've got some incorrect error-checking in your new code:

Code: Select all

If ExamineDesktops():Global SCREENWIDTH=DesktopWidth(0),SCREENHEIGHT=DesktopHeight(0)
Else:Global SCREENWIDTH=GetSystemMetrics_(#SM_CXSCREEN),SCREENHEIGHT=GetSystemMetrics_(#SM_CYSCREEN)
EndIf
If InitSprite()=0 Or InitSprite3D()=0 Or InitKeyboard()=0
  MessageRequester("Error","Can't access DirectX",0):End
EndIf
;SnapShot:
desktop.l = CreateImage(0,DesktopWidth(0),DesktopHeight(0))

The last line will cause an error if ExamineDesktops() fails at the top,
since you can't use DesktopWidth() and DesktopHeight() if it fails.

SFSxOI · Post by **SFSxOI** » Sun Apr 08, 2007 3:38 pm

PB wrote:I liked the original code better, because once the screen tilted back to the
bottom, it didn't "disappear" for half a second like it does now.

Also, you've got some incorrect error-checking in your new code:
Code: Select all
If ExamineDesktops():Global SCREENWIDTH=DesktopWidth(0),SCREENHEIGHT=DesktopHeight(0)
Else:Global SCREENWIDTH=GetSystemMetrics_(#SM_CXSCREEN),SCREENHEIGHT=GetSystemMetrics_(#SM_CYSCREEN)
EndIf
If InitSprite()=0 Or InitSprite3D()=0 Or InitKeyboard()=0
  MessageRequester("Error","Can't access DirectX",0):End
EndIf
;SnapShot:
desktop.l = CreateImage(0,DesktopWidth(0),DesktopHeight(0))
The last line will cause an error if ExamineDesktops() fails at the top,
since you can't use DesktopWidth() and DesktopHeight() if it fails.

Thats odd, just the opposite for me because on the orginal version for me when the screen tilted back it did "disappear" for a second, where the latest version doesn't do that to me.

Psychophanta · Post by **Psychophanta** » Sun Apr 08, 2007 10:36 pm

Aaargh! you are right PB,
now is corrected.

About the screen dissappear, etc, you can play with the values in the line:

Code: Select all

Data.f 0.005,0.005,0.0045

PB · Post by PB » Mon Apr 09, 2007 12:45 am

> About the screen dissappear, etc, you can play with the values in the line

I tried that but can't see how to fix it... the screen still lays too flat and is gone
for about half a second before rising up again. Any better tip to fix this?