My first intro!

Applications, Games, Tools, User libs and useful stuff coded in PureBasic
User avatar
em_uk
Enthusiast
Enthusiast
Posts: 366
Joined: Sun Aug 08, 2010 3:32 pm
Location: Manchester UK

My first intro!

Post by em_uk »

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
User avatar
luis
Addict
Addict
Posts: 3895
Joined: Wed Aug 31, 2005 11:09 pm
Location: Italy

Re: My first intro!

Post by luis »

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 :wink:
"Have you tried turning it off and on again ?"
LuCiFeR[SD]
666
666
Posts: 1033
Joined: Mon Sep 01, 2003 2:33 pm

Re: My first intro!

Post by LuCiFeR[SD] »

raised a smile from me too. gotta love ye olde cracktro :) And thanks for no greets hahaha
User avatar
Zebuddi123
Enthusiast
Enthusiast
Posts: 796
Joined: Wed Feb 01, 2012 3:30 pm
Location: Nottinghamshire UK
Contact:

Re: My first intro!

Post by Zebuddi123 »

Cool! First thing i thought about was my old Amiga 500+ and Demomaker :lol:

Zebuddi. :D
malleo, caput, bang. Ego, comprehendunt in tempore
User avatar
em_uk
Enthusiast
Enthusiast
Posts: 366
Joined: Sun Aug 08, 2010 3:32 pm
Location: Manchester UK

Re: My first intro!

Post by em_uk »

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
User avatar
flaith
Enthusiast
Enthusiast
Posts: 704
Joined: Mon Apr 25, 2005 9:28 pm
Location: $300:20 58 FC 60 - Rennes
Contact:

Re: My first intro!

Post by flaith »

Nice demo, thanks :D
“Fear is a reaction. Courage is a decision.” - WC
User avatar
luis
Addict
Addict
Posts: 3895
Joined: Wed Aug 31, 2005 11:09 pm
Location: Italy

Re: My first intro!

Post by luis »

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 ?"
User avatar
em_uk
Enthusiast
Enthusiast
Posts: 366
Joined: Sun Aug 08, 2010 3:32 pm
Location: Manchester UK

Re: My first intro!

Post by em_uk »

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
User avatar
ar-s
Enthusiast
Enthusiast
Posts: 344
Joined: Sat Oct 06, 2007 11:20 pm
Location: France

Re: My first intro!

Post by ar-s »

Nice intro (don't quite with mouse move will be better)

@Zebuddi123 +1 :)
~Ar-S~
My Image Hoster for PB users
My webSite (french) with PB apps : LDVMULTIMEDIA
PB - 3.x / 5.7x / 6 - W11 x64 - Ryzen 7 3700x / #Rpi4

Code: Select all

r3p347 : 7ry : un71l d0n3 = 1
User avatar
em_uk
Enthusiast
Enthusiast
Posts: 366
Joined: Sun Aug 08, 2010 3:32 pm
Location: Manchester UK

Re: My first intro!

Post by em_uk »

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
Post Reply