thanks jp for another great vpx conversion, i have a small update about dof for you, to split the shared switches and activate the remaining dof effects :
' Bumpers
Sub Bumper1_Hit:vpmTimer.PulseSw 24:PlaySound SoundFX("fx_bumper", DOFContactors), 0, 1, 0, 0:DOF 102, DOFPulse:End Sub
Sub Bumper2_Hit:vpmTimer.PulseSw 24:PlaySound SoundFX("fx_bumper", DOFContactors), 0, 1, 0, 0:DOF 101, DOFPulse:End Sub
Sub RightSlingShot_Slingshot
PlaySound SoundFX("fx_slingshot", DOFContactors), 0, 1, 0.05, 0.05
DOF 103, DOFPulse
RightSling4.Visible = 1
Remk.RotX = 26
RStep = 0
vpmTimer.PulseSw 34
RightSlingShot.TimerEnabled = 1
End Sub
Sub LeftSlingShot_Slingshot
PlaySound SoundFX("fx_slingshot", DOFContactors), 0, 1, -0.05, 0.05
DOF 104, DOFPulse
LeftSling4.Visible = 1
Lemk.RotX = 26
LStep = 0
vpmTimer.PulseSw 34
LeftSlingShot.TimerEnabled = 1
End Sub
Sub RightSlingShot2_Slingshot
PlaySound SoundFX("fx_slingshot", DOFContactors), 0, 1, 0.05, 0.05
DOF 105, DOFPulse
RightSling8.Visible = 1
Remk2.RotX = 26
RStep2 = 0
vpmTimer.PulseSw 34
RightSlingShot2.TimerEnabled = 1
End Sub
Sub sw15_Hit:Controller.Switch(15) = 1:PlaySound "fx_sensor", 0, 1, pan(ActiveBall):DOF 106, DOFOn:End Sub
Sub sw15_UnHit:Controller.Switch(15) = 0:DOF 106, DOFOff:End Sub
Sub sw15b_Hit:Controller.Switch(15) = 1:PlaySound "fx_sensor", 0, 1, pan(ActiveBall):DOF 107, DOFOn:End Sub
Sub sw15b_UnHit:Controller.Switch(15) = 0:DOF 107, DOFOff:End Sub
Sub sw25b_Hit:Controller.Switch(25) = 1:PlaySound "fx_sensor", 0, 1, pan(ActiveBall):DOF 106, DOFOn:End Sub
Sub sw25b_UnHit:Controller.Switch(25) = 0:DOF 106, DOFOff:End Sub
'Spinner
Sub sw25_Spin():vpmTimer.PulseSw 25:PlaySound "fx_spinner", 0, 1, -0.1:DOF 108, DOFPulse:End Sub