Flipper_Football_Vp91X_1.0Fs.vpt - Solution For Flipper Contactors Getting Triggered When Flippers Inactive

[SirCheddar]

Hi guys,

 

I had planned to put some work in converting EMs but it didn't work out that well last year.

Lets try again this year, shall we?

 

On Flipper Football the flipper contactors  get triggered regardless if the flippers are enabled or not, which becomes noticable at half time or after game over.

Looks like JP ran into the same issue and solved it in the script, so the solution was a no-brainer.

 

1) In LEDWiz Configtool: Set flipper left to E101 and flipper right to E102

 

2) In the script of Flipper_Football_VP91x_1.0FS.vpt:

 

Search for "sub leftflippersoff"

 

replace

Sub LeftFlippersOn
    If FlippersEnabled Then
        PlaySound "flipperup"
        LeftFlipper.RotateToEnd
        ULeftFlipper.RotateToEnd
    End If
End Sub

Sub RightFlippersOn
    If FlippersEnabled Then
        PlaySound "flipperup"
        RightFlipper.RotateToEnd
        URightFlipper.RotateToEnd
    End If
End Sub

Sub LeftFlippersOff
    PlaySound "flipperdown"
    LeftFlipper.RotateToStart
    ULeftFlipper.RotateToStart
End SUb

Sub RightFlippersOff
    PlaySound "flipperdown"
    RightFlipper.RotateToStart
    URightFlipper.RotateToStart
End Sub

with

Sub LeftFlippersOn
    If FlippersEnabled Then
        PlaySound "flipperup":Controller.B2SSetData 101,1
        LeftFlipper.RotateToEnd
        ULeftFlipper.RotateToEnd
    End If
End Sub

Sub RightFlippersOn
    If FlippersEnabled Then
        PlaySound "flipperup":Controller.B2SSetData 102,1
        RightFlipper.RotateToEnd
        URightFlipper.RotateToEnd
    End If
End Sub

Sub LeftFlippersOff
    PlaySound "flipperdown":Controller.B2SSetData 101,0
    LeftFlipper.RotateToStart
    ULeftFlipper.RotateToStart
End SUb

Sub RightFlippersOff
    PlaySound "flipperdown":Controller.B2SSetData 102,0
    RightFlipper.RotateToStart
    URightFlipper.RotateToStart
End Sub

[arngrim]

Yeah i was about to do that on airborne, which has the same problem, i guess you can do that there also

Thank you

[arngrim]

And on breakshot

[SirCheddar]

Good call. Can you take a look if that change I submitted for Flipper Football in LEDWiz Configtool is any good?

 

 

*****Airborne (Capcom)(1996)(Bodydump Jimmyfingers)(1.0)(FS).vpt

-> Search for "SolLFlipper(Enabled)"

 

Sub SolLFlipper(Enabled)    

        If Enabled and GameOnFF = 1 Then
         LFGapWallDown.IsDropped=1:LFGapWallUp.IsDropped=0
         If FlipperCatchEnabled=1 Then
             LeftFlipper.Recoil=StartLeftFlipperRecoil
         End If
         LeftFlipperTimer.Enabled=0
         PlaySound "left_flipper_up":Controller.B2SSetData 101,1
         LeftFlipper.RotateToEnd
     Else
         LFGapWallDown.IsDropped=0:LFGapWallUp.IsDropped=1
         If FlipperCatchEnabled=1 Then
             LeftFlipper.Recoil=FlipperCatchRecoilValue
         End If        

         LFTCount=1
         If GameOnFF = 1 Then PlaySound "left_flipper_down":Controller.B2SSetData 101,0
         LeftFlipper.Speed=.04        

         LeftFlipper.Return=1
         LeftFlipper.RotateToStart
         LeftFlipper.Strength = StartLeftFlipperStrength*(LFTCount/10)
         LeftFlipperTimer.Enabled=1
         LeftFlipper.Speed=StartLeftFlipperSpeed        

         LeftFlipper.Return=StartLeftFlipperReturn    

End If

End Sub

Sub SolRFlipper(Enabled)
     If Enabled and GameOnFF = 1 Then
         RFGapWallDown.IsDropped=1:RFGapWallUp.IsDropped=0
         If FlipperCatchEnabled=1 Then
             RightFlipper.Recoil=StartRightFlipperRecoil
         End If
         RightFlipperTimer.Enabled=0
         PlaySound "right_flipper_up":Controller.B2SSetData 102,1
         RightFlipper.RotateToEnd
     Else
         RFGapWallDown.IsDropped=0:RFGapWallUp.IsDropped=1
         If FlipperCatchEnabled=1 Then
             RightFlipper.Recoil=FlipperCatchRecoilValue
         End If
         RFTCount=1
         If GameOnFF = 1 Then PlaySound "right_flipper_down":Controller.B2SSetData 102,0
         RightFlipper.Speed=.04
         RightFlipper.Return=1
         RightFlipper.RotateToStart
         RightFlipper.Strength = StartRightFlipperStrength*(RFTCount/10)
         RightFlipperTimer.Enabled=1
         RightFlipper.Speed=StartRightFlipperSpeed
         RightFlipper.Return=StartRightFlipperReturn
     End If
End Sub
 

 

 

******BreakShot_VP9.2_(Mod FS)1.2.vpt

-> Search for "SolLeftFlipper(Enabled)"

 

Sub SolLeftFlipper(Enabled)
    If Enabled Then
        If IsGameRunning() Then
            If Flippers_Sound_ON = 1 Then PlaySound "FlipperUp"
            Controller.Switch(5) = 1
            LeftFlipper.RotateToEnd:Controller.B2SSetData 101,1
        End If
    Else
        If IsGameRunning() Then
            Controller.B2SSetData 101,0
            If Flippers_Sound_ON = 1 Then PlaySound "FlipperDown"
        End If
        Controller.Switch(5) = 0
        LeftFlipper.RotateToStart
    End If
    UpdateLeftFlipperLogo
End Sub
 
Sub SolRightFlipper(Enabled)
    If Enabled Then
        If IsGameRunning() Then
            If Flippers_Sound_ON = 1 Then PlaySound "FlipperUp"
            Controller.Switch(6) = 1
            RightFlipper.RotateToEnd:Controller.B2SSetData 102,1
            UpperRightFlipper.RotateToEnd
        End If
    Else
        If IsGameRunning() Then
            Controller.B2SSetData 102,0
            If Flippers_Sound_ON = 1 Then PlaySound "FlipperDown"
        End If
        Controller.Switch(6) = 0
        RightFlipper.RotateToStart    
        UpperRightFlipper.RotateToStart    
    End If
    UpdateRightFlipperLogo
End Sub

[arngrim]

I can't test before saturday, i am abroad, maybe another admin, greg? .