• Don't forget to rate 1-5 stars! Check the support tab for any help or comments.

  • (2)
    « »

    VPX conversion of 2001

    thanks to GNance, Arngrim others to thank: JPSalas, Pinuck, hauntfreaks, Borgdog

    in addition to the "standard" keys (typically "1" to start game and "5" for coin), I've added "3" as another coin input and "4" for coin and auto-start game (like I recall the dime slots generally were) to simulate 3 coin slots

    when game is not in progress, holding down left flipper for about 3-5 seconds will bring up the options menu. left flipper selects item, right flipper changes option.

    I've also included shadows for the ball and flippers. If you want to turn them off look for these lines at the beginning of the script:

    Const ShadowFlippersOn = true Const ShadowBallOn = true

    change to false if you want either of the shadows not showing on your tables

    requires VPX 10.4

    includes B2S

    initial release

    1.0a - objects' material changes based on Borgdog's observations

    This topic contains 3 replies, has 3 voices, and was last updated by  Loserman76 6 months, 3 weeks ago.

    Viewing 4 posts - 1 through 4 (of 4 total)
    • Author
      Posts
    • #71973
       Loserman76 
      Participant

      VPX conversion of 2001

      thanks to GNance, Arngrim others to thank: JPSalas, Pinuck, hauntfreaks, Borgdog

      in addition to the "standard" keys (typically "1" to start game and "5" for coin), I've added "3" as another coin input and "4" for coin and auto-start game (like I recall the dime slots generally were) to simulate 3 coin slots

      when game is not in progress, holding down left flipper for about 3-5 seconds will bring up the options menu. left flipper selects item, right flipper changes option.

      I've also included shadows for the ball and flippers. If you want to turn them off look for these lines at the beginning of the script:

      Const ShadowFlippersOn = true Const ShadowBallOn = true

      change to false if you want either of the shadows not showing on your tables


      Some users who have liked this topic:

      • avatar
      • avatar
      • avatar
      • avatar
      4 users thanked author for this post.
      #72240
       rothbauerw 
      Participant
      ContributorMembervip

      Chimes sub on this table is missing the DOF calls.  Easy cut and paste from another table for those with Chimes unit in their cab.

      Current Project: Perpetual updates of Pinball Magic


      Some users who have liked this topic:

      • avatar
      #72246
       Scottacus 
      Participant
      Member

      I’m getting a topvisible error for LSling2 (line 646),  obj.IsVisible=0 (line 2073) and Type Mismatch for HSScore (line 1921)

      Problem fixed, these lines are from the VP9 script.  Somehow that got opened when PBXRecorder was trying to record the table.

      #72259
       Loserman76 
      Participant

      Ok, I will have the chimes code fixed in the next update. In the mean time if you want to make the change yourself, look for Sub PlayChime(x) and replace that section with this:

      Sub PlayChime(x)
      if ChimesOn=0 then
      Select Case x
      Case 10
      If LastChime10=1 Then
      PlaySound SoundFXDOF(“SpinACard_1_10_Point_Bell”,140,DOFPulse,DOFChimes)
      LastChime10=0
      Else
      PlaySound SoundFXDOF(“SpinACard_1_10_Point_Bell”,140,DOFPulse,DOFChimes)
      LastChime10=1
      End If
      Case 100
      If LastChime100=1 Then
      PlaySound SoundFXDOF(“SpinACard_100_Point_Bell”,141,DOFPulse,DOFChimes)
      LastChime100=0
      Else
      PlaySound SoundFXDOF(“SpinACard_100_Point_Bell”,141,DOFPulse,DOFChimes)
      LastChime100=1
      End If

      End Select
      else
      Select Case x
      Case 10
      If LastChime10=1 Then
      PlaySound SoundFXDOF(“SJ_Chime_10a”,140,DOFPulse,DOFChimes)
      LastChime10=0
      Else
      PlaySound SoundFXDOF(“SJ_Chime_10b”,140,DOFPulse,DOFChimes)
      LastChime10=1
      End If
      Case 100
      If LastChime100=1 Then
      PlaySound SoundFXDOF(“SJ_Chime_100a”,141,DOFPulse,DOFChimes)
      LastChime100=0
      Else
      PlaySound SoundFXDOF(“SJ_Chime_100b”,141,DOFPulse,DOFChimes)
      LastChime100=1
      End If
      Case 1000
      If LastChime1000=1 Then
      PlaySound SoundFXDOF(“SJ_Chime_1000a”,142,DOFPulse,DOFChimes)
      LastChime1000=0
      Else
      PlaySound SoundFXDOF(“SJ_Chime_1000b”,142,DOFPulse,DOFChimes)
      LastChime1000=1
      End If
      End Select
      end if
      End Sub


      Some users who have liked this topic:

      • avatar
      • avatar
      • avatar
      2 users thanked author for this post.
    Viewing 4 posts - 1 through 4 (of 4 total)

    You must be logged in to reply to this topic.

  • Please login to download.

  • ©2018 VPinBall.com

    WP Facebook Auto Publish Powered By : XYZScripts.com

    Log in with your credentials

    or    

    Forgot your details?

    Create Account