Jump to content

Recommended Posts

  • Content Provider

Ah. I've been waiting for this to arrive. Started to get that feeling that it would become a x-mas present this year or something. Ain't complaining though; now I've got several tables I can upgrade and play each day, and I'm sure I won't be finished before next year ;)

 

Thank you so much Jeff ❤️ - You are awesome !

Link to comment
Share on other sites

  • 2 weeks later...

:D Finally all copied in with frontend artwork done.

 

Now to give them all a play and tweak a few little bits to my liking such as the ballshadows, always found Ninnuzzus script a bit extreme for my cab so made up my own that is a bit more subtle and just fits in with JPs rolling code. Here it is if anyone is interested

 

'********************************************************************
'      JP's VP10 Rolling Sounds (+rothbauerw's Dropping Sounds + JamieP Shadows)
'********************************************************************

Const tnob = 4 ' total number of balls
ReDim rolling(tnob)
Dim shadowm,shadowc
shadowc=Ballsize*0.75 'distance of shadow from ball at the furthest point
shadowm= ((TableWidth/2)+shadowc)/(TableWidth/2) 'slope of the linear change around the centerpoint of the table
InitRolling

Sub InitRolling
    Dim i
    For i = 0 to tnob
        rolling(i) = False
    Next
End Sub

Sub RollingTimer_Timer()
    Dim BOT, b,speedfactorx,speedfactory
	Const maxvel = 35 'max ball velocity
   BOT = GetBalls

    ' stop the sound of deleted balls
    For b = UBound(BOT) + 1 to tnob
        rolling(b) = False
        StopSound("fx_ballrolling" & b)
		aBallShadow(b).visible = 0
    Next

    ' exit the sub if no balls on the table
    If UBound(BOT) = -1 Then Exit Sub

    For b = 0 to UBound(BOT)
        aBallShadow(b).X = shadowm*BOT(b).X - shadowc   'y=mx+c
		aBallShadow(b).Y = BOT(b).Y + 12
        If BOT(b).Z > 20 Then
            aBallShadow(b).visible = 1
        Else
            aBallShadow(b).visible = 0
        End If
		If BOT(b).VelX AND BOT(b).VelY <> 0 Then
			debug.print "X=" & BOT(b).VelX & "Y=" & BOT(b).VelY
			speedfactorx = ABS(maxvel / BOT(b).VelX)
			speedfactory = ABS(maxvel / BOT(b).VelY)
			If speedfactorx <1 Then
				BOT(b).VelX = BOT(b).VelX * speedfactorx
				BOT(b).VelY = BOT(b).VelY * speedfactorx
			End If
			If speedfactory <1 Then
				BOT(b).VelX = BOT(b).VelX * speedfactory
				BOT(b).VelY = BOT(b).VelY * speedfactory
			End If
		End If
        ' play the rolling sound for each ball
        If BallVel(BOT(b) ) > 1 AND BOT(b).z < 30 Then
            rolling(b) = True
            PlaySound("fx_ballrolling" & b), -1, Vol(BOT(b)), AudioPan(BOT(b)), 0, Pitch(BOT(b)), 1, 0, AudioFade(BOT(b))
        Else
            If rolling(b) = True Then
                StopSound("fx_ballrolling" & b)
                rolling(b) = False
            End If
        End If

        ' play ball drop sounds
        If BOT(b).VelZ < -1 and BOT(b).z < 55 and BOT(b).z > 27 Then 'height adjust for ball drop sounds
            PlaySound "fx_ball_drop" & b, 0, ABS(BOT(b).velz)/17, AudioPan(BOT(b)), 0, Pitch(BOT(b)), 1, 0, AudioFade(BOT(b))
        End If
    Next
End Sub

 

Link to comment
Share on other sites

  • Content Provider

Fuck.  I'm sorry I never got to speak with you directly; from what you've written and what I've seen, you seemed like a great guy.

 

@loserman76, you did a lot of great work over the years.  Organizing and packaging all of what you did for VP and sharing it with all of us is the most badass last act possible in this space.  You will be missed.

Link to comment
Share on other sites

Link to comment
Share on other sites

Reading the announcement over at vpf made me really sad. I know that LM hated (those ? - personally, not sure it is only one guy) VPD guys a lot and seeing him doing this "mic-drop" the day before Paul says he passed away on 16th, just makes me even more sad in a way. Was this share, intentional in a way ? Knowing what was to come ? So sad.

Link to comment
Share on other sites

just read this VPForums 😢

 

Hi Everyone,

 

It's with a heavy heart that I must announce the unexpected passing of Loserman76 (Jeff Whitehead) on November 16th.

I don't know any details. I just happened upon the email his wife sent in response to a PM notification from another member.

It's always a sad day when we lose one of our own.

I would love to hear stories of people's interaction with him. He was a good guy, and I feel I missed a great opportunity to get to know him better. So, if you have any stories, please share.

RIP, Jeff.

 

 

Link to comment
Share on other sites

  • Administrators

Sad Day Indeed....  R.I.P Jeff 😪     Wow I sent him a BG file on the 15th he said thanks and thats the last time he was on VPU...  He knew ,This was his farewell thread, all his works of art in one spot☹️   Thank You Jeff 👍

Link to comment
Share on other sites

This is very sad to hear. Hope he is at peace. 

When I got into this hobby 4 years ago I was astonished at his collection! I've learned so much from exploring his builds. 

Thanks for passing this unfortunate news on to us.

 

Link to comment
Share on other sites

Good to see his tables available.

As I'm not a content creator my interaction with Jeff was limited over the years but I'll say this - the dozen or so times I did discuss some things with him he was a consummate professional.  His devotion to this hobby left an impression on me and how I viewed this scene.  And he always stayed above the 'fray.'  Wow, this sucks.

Link to comment
Share on other sites

  • Content Provider
Link to comment
Share on other sites

  • Content Provider
Link to comment
Share on other sites

So sad, I didn't have any interaction with him personally but his ability to create great tables was amazing. If my googling is correct it appears he was only mid 50's :( Thankyou for everything you did for the scene Jeff.

Link to comment
Share on other sites

  • Dazz changed the title to Loserman76 - Memorial Thread

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

×
  • Create New...