Register    Login    Forum    FAQ    PinSimDB.org

Board index » Future Pinball » FAQ & Help




Post new topic Reply to topic  [ 4 posts ] 
Author Message
 Post subject: Script help needed (Aloha Table)
 Post Posted: Sat Feb 17, 2018 2:38 pm 
Offline
User avatar

Joined: Thu Jun 16, 2016 2:20 pm
Posts: 132
Location: a cave
I want to change the script of this table (http://www.pinsimdb.org/pinball/table-391-aloha) so you don't have to press L key to lift the ball, I want it to behave like every other table and make the ball eject automatically. Any help with this would be appreciated.

_________________
life takes a lot of balls


Top 
 Profile  
 
 Post subject: Re: Script help needed (Aloha Table)
 Post Posted: Sat Feb 17, 2018 4:57 pm 
Offline
User avatar

Joined: Fri Jul 02, 2010 4:50 am
Posts: 1114
Location: Paris - France
As I created Aloha, I can add in the menu an option for automatic lift.
And an other for more shakes (tilt option).
In an other hand, manual lift is in my old man memories... The first pinball I played with automatic ball lift was Dancing Lady (Gottlieb - 1966).

_________________
Les cons ça ose tout. C'est même à  ça qu'on les reconnaît.
My tables avalaible at http://www.pinsimdb.org/fpreleases/ and http://www.irpinball.org/
Image
Image
Le prix s'oublie, la qualité reste


Top 
 Profile  
 
 Post subject: Re: Script help needed (Aloha Table)
 Post Posted: Sun Feb 18, 2018 4:13 pm 
Offline
User avatar

Joined: Fri Jul 02, 2010 4:50 am
Posts: 1114
Location: Paris - France
I begin to update but as it's an old (2009) table, I have to make a lot of enhancements...
But if you want a quick solution, just insert at the end of Sub FirstBallDelayTimer_Expired()
CreateNewBall (but just don't press the lift key!).

Code:
Sub FirstBallDelayTimer_Expired()
   FirstBallDelayTimer.Enabled = False
   If BallsRemaining(CurrentPlayer) <> nvBallsPerGame Then BallNum(nvBallsPerGame -BallsRemaining(CurrentPlayer)).State = BulbOff
   BallNum(nvBallsPerGame +1 -BallsRemaining(CurrentPlayer)).State = BulbOn
   For x = 1 To 2: For y = 1 To 4: PPlayer(x, y).State = BulbOff: Next: Next: P1_1000.State = BulbOff: P2_1000.State = BulbOff: L_1000.Frame 1
   For x = 1 To 4: PPlayer(CurrentPlayer, x).State = BulbOn: Next
   HUDReel.SetValue (nvScore(CurrentPlayer)): AddScore(0): BallToLift = 1: HUD_O.Frame CurrentPlayer
   If nvScore(CurrentPlayer) > 999 Then L_1000.frame 2: Eval("P" &CStr(CurrentPlayer) &"_1000").State = BulbOn
   CreateNewBall
End Sub

_________________
Les cons ça ose tout. C'est même à  ça qu'on les reconnaît.
My tables avalaible at http://www.pinsimdb.org/fpreleases/ and http://www.irpinball.org/
Image
Image
Le prix s'oublie, la qualité reste


Top 
 Profile  
 
 Post subject: Re: Script help needed (Aloha Table)
 Post Posted: Sun Mar 04, 2018 5:13 pm 
Offline
User avatar

Joined: Thu Jun 16, 2016 2:20 pm
Posts: 132
Location: a cave
Sorry for the late reply, I was out cold with the flu.

Yes, a quick solution is most welcome! Trying it now - I changed the menu system of that table already, the manual ball mover was the only thing I didn't figure out.

Update:Works good, thanks!

I also switched table from 'NO SCROLLING' to 'SCROLLING' & '5 BALLS' instead of '3 BALLS' as the default option; http://www36.zippyshare.com/v/BY6rVpwh/file.html

_________________
life takes a lot of balls


Top 
 Profile  
 
Display posts from previous:  Sort by  
 
Post new topic Reply to topic  [ 4 posts ] 

Board index » Future Pinball » FAQ & Help


Who is online

Users browsing this forum: No registered users and 3 guests

 
 

 
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Jump to:  
cron