Applications, Games, Tools, User libs and useful stuff coded in PureBasic
em_uk
Enthusiast
Posts: 366 Joined: Sun Aug 08, 2010 3:32 pm
Location: Manchester UK
Post
by em_uk » Mon Jun 17, 2013 9:13 pm
It's not much, but finally after 15 years I finally code an intro. The whole reason behind me wanting to learn to code!
Thanks to Va!n for his tunnel tutorial. Also whoever made the mini futurecompose lib
https://www.dropbox.com/s/l03nybeaihj53 ... _final.rar
Press space for full screeniness.
----
R Tape loading error, 0:1
luis
Addict
Posts: 3895 Joined: Wed Aug 31, 2005 11:09 pm
Location: Italy
Post
by luis » Mon Jun 17, 2013 9:41 pm
Nice
Even if you must admit most of the appeal is due to the music, but a nice start !
Did you capture the mouse ? Because the pointer vanishes here and if I just move the mouse the program quits.
Oh, thanks for the greetings
"Have you tried turning it off and on again ?"
LuCiFeR[SD]
666
Posts: 1033 Joined: Mon Sep 01, 2003 2:33 pm
Post
by LuCiFeR[SD] » Mon Jun 17, 2013 9:44 pm
raised a smile from me too. gotta love ye olde cracktro
And thanks for no greets hahaha
Zebuddi123
Enthusiast
Posts: 796 Joined: Wed Feb 01, 2012 3:30 pm
Location: Nottinghamshire UK
Contact:
Post
by Zebuddi123 » Mon Jun 17, 2013 10:45 pm
Cool! First thing i thought about was my old Amiga 500+ and Demomaker
Zebuddi.
malleo, caput, bang. Ego, comprehendunt in tempore
em_uk
Enthusiast
Posts: 366 Joined: Sun Aug 08, 2010 3:32 pm
Location: Manchester UK
Post
by em_uk » Tue Jun 18, 2013 2:41 am
Thanks
Yep - captured the mouse so you can click and exit easily.
I had fun getting my head around the code. Now for my next project!
----
R Tape loading error, 0:1
flaith
Enthusiast
Posts: 704 Joined: Mon Apr 25, 2005 9:28 pm
Location: $300:20 58 FC 60 - Rennes
Contact:
Post
by flaith » Tue Jun 18, 2013 4:28 am
Nice demo, thanks
“Fear is a reaction. Courage is a decision.” - WC
luis
Addict
Posts: 3895 Joined: Wed Aug 31, 2005 11:09 pm
Location: Italy
Post
by luis » Tue Jun 18, 2013 11:39 am
em_uk wrote:
Yep - captured the mouse so you can click and exit easily.
What I meant is on my system if I just move the mouse, the program quits, without clicking any button.
Doesn't quit as soon as I move it. Seems to quit when the (invisible) pointer hover inside or outside the window, I'm not sure (being it captured).
"Have you tried turning it off and on again ?"
em_uk
Enthusiast
Posts: 366 Joined: Sun Aug 08, 2010 3:32 pm
Location: Manchester UK
Post
by em_uk » Tue Jun 18, 2013 12:02 pm
I see, it's meant to quit when you click the mouse, not move it. If i didn't handle the mouse when a user clicked off the window it could cause it to hang.
I will look at sorting that out in the next one.
----
R Tape loading error, 0:1
ar-s
Enthusiast
Posts: 344 Joined: Sat Oct 06, 2007 11:20 pm
Location: France
Post
by ar-s » Tue Jun 18, 2013 5:07 pm
Nice intro (don't quite with mouse move will be better)
@Zebuddi123 +1
em_uk
Enthusiast
Posts: 366 Joined: Sun Aug 08, 2010 3:32 pm
Location: Manchester UK
Post
by em_uk » Tue Jun 18, 2013 8:44 pm
Not sure why it's exiting when moving the mouse.
It should exit when mosuebutton(1) is clicked.
Code: Select all
.
Result = ExamineMouse() : ExamineKeyboard()
.
.
Until GetAsyncKeyState_(#VK_ESCAPE) Or result=MouseButton(1)
.
Ahh, I think there is my problem. Removed the 'result='
----
R Tape loading error, 0:1