great table, i'm not a special fan of old tables but i love the physics on this one 
here is the 1.1 with controller.vbs, and soundfx for mute sounds for DOF users
gorgar vpx.txt 16.25KB
7 downloads
i adjusted the way the flipper are handled, no need to use that
Sub Gorgar_KeyDown(ByVal KeyCode)
'If keycode = LeftFlipperKey Then
' PlaySound "fx_flipperup", 0, .67, -0.05, 0.05
'End If
'If keycode = RightFlipperKey Then
' PlaySound "fx_flipperup", 0, .67, 0.05, 0.05
'End If
If keycode = PlungerKey Then
Plunger.PullBack
PlaySound "plungerpull",0,1,0.25,0.25
End If
If vpmKeyDown(KeyCode) Then Exit Sub
End Sub
Sub Gorgar_KeyUp(ByVal KeyCode)
'If keycode = LeftFlipperKey Then
' PlaySound "fx_flipperdown", 0, 1, -0.05, 0.05
'End If
'If keycode = RightFlipperKey Then
' PlaySound "fx_flipperdown", 0, 1, 0.05, 0.05
'End If
If keycode = PlungerKey Then
Plunger.Fire
PlaySound "plunger",0,1,0.25,0.25
End If
If vpmKeyUp(KeyCode) Then Exit Sub
End Sub
if that is in place, which trigger the flipper and sounds only when the sol are active 
SolCallback(sLRFlipper) = "SolRFlipper"
SolCallback(sLLFlipper) = "SolLFlipper"
Sub SolLFlipper(Enabled)
If Enabled Then
PlaySound SoundFX("fx_flipperup",DOFContactors):LeftFlipper.RotateToEnd
Else
PlaySound SoundFX("fx_flipperdown",DOFContactors):LeftFlipper.RotateToStart
End If
End Sub
Sub SolRFlipper(Enabled)
If Enabled Then
PlaySound SoundFX("fx_flipperup",DOFContactors):RightFlipper.RotateToEnd
Else
PlaySound SoundFX("fx_flipperdown",DOFContactors):RightFlipper.RotateToStart
End If
End Sub