So my question is, is there a way to use that HEX ID in VPX script? Like example:
If 0x00003 (=1/On/or whatever) Then pupevent 03
Also I've already looked at DOF Config Tool for this table, and no luck.
Edited by BigOnYa, 05 March 2026 - 03:26 PM.
Posted 05 March 2026 - 03:00 PM
Edited by BigOnYa, 05 March 2026 - 03:26 PM.
Posted 05 March 2026 - 07:12 PM
It's been a while now, and I don't remember exactly how I did it.
I searched for the sound IDs using PinMAME32,
then, thanks to some code written by Destruk,
I used the sounds to move the alligator's mouth from the Surf 'n Safari table.
Look for "Sound Subs from Destruk's table", which should be at the end of the scripts.
Posted 06 March 2026 - 03:34 AM
It's been a while now, and I don't remember exactly how I did it.
I searched for the sound IDs using PinMAME32,
then, thanks to some code written by Destruk,
I used the sounds to move the alligator's mouth from the Surf 'n Safari table.
Look for "Sound Subs from Destruk's table", which should be at the end of the scripts.
I tried copying that script from that table:
"Sub TrackSounds
Dim NewSounds, ii, Snd
NewSounds = Controller.NewSoundCommands
If Not IsEmpty(NewSounds) Then
For ii = 0 To UBound(NewSounds)
Snd = NewSounds(ii, 0)
If Snd = 6 Then JawAnim:AnimStep=19"......etc
using the HEX sound numbers, in to this tables script but it does not cue anything in my script from the Rom sounds played.
Oh well, not a big deal, was just curious if was possible. Thanks for responding though and trying to help.
Edited by BigOnYa, 06 March 2026 - 04:05 AM.
Posted 06 March 2026 - 04:36 AM
A Multiball insert light would be easy to tap for a trigger. Lights are the most common way to trigger extra table events linked to the ROM
You could also poll the trough - If bstrough.balls <2 then .... ( for 3 ball trough) and add a delay to the polling after drain if there's a ball-saver.
Edited by bigus1, 06 March 2026 - 04:59 AM.
Posted 06 March 2026 - 04:40 PM
It makes sense to use the altsound IDs directly in scripts, but they're in hexadecimal,
so you need to convert them to decimal to use them in scripts.
You need a timer to run the TrackSounds.
Set MotorCallback = GetRef("GameTimer")
Sub GameTimer
TrackSounds
End Sub
Sub TrackSounds
Dim NewSounds, ii, Snd
NewSounds = Controller.NewSoundCommands
If Not IsEmpty(NewSounds) Then
For ii = 0 To UBound(NewSounds)
Snd = NewSounds(ii, 0)
If Snd = 3 Then pupevent 03
Next
End If
End Sub
Posted 07 March 2026 - 07:32 AM
Thank you for trying to help, I copied that code into script, changed to "Snd = 164" (0x00A4 HEX sound trigger) but still no luck. I tried bunch of dif sounds, but none will trigger. Does it matter that I'm using alias table (che_cho,harley) or using altsounds?It makes sense to use the altsound IDs directly in scripts, but they're in hexadecimal,
so you need to convert them to decimal to use them in scripts.
You need a timer to run the TrackSounds.
Set MotorCallback = GetRef("GameTimer")Sub GameTimer TrackSoundsEnd SubSub TrackSounds Dim NewSounds, ii, Snd NewSounds = Controller.NewSoundCommands If Not IsEmpty(NewSounds) Then For ii = 0 To UBound(NewSounds) Snd = NewSounds(ii, 0) If Snd = 3 Then pupevent 03 Next End IfEnd Sub
Edited by BigOnYa, 07 March 2026 - 08:00 AM.
Posted 07 March 2026 - 07:52 AM
To see if anything happens, add a textbox to the backdrop,
and add this to the end of the script.
Textbox001.Text = Snd
It should display the sound IDs; they're fast pulses that aren't easy to see.
Set MotorCallback = GetRef("GameTimer")
Sub GameTimer
TrackSounds
End Sub
Sub TrackSounds
Dim NewSounds, ii, Snd
NewSounds = Controller.NewSoundCommands
If Not IsEmpty(NewSounds) Then
For ii = 0 To UBound(NewSounds)
Snd = NewSounds(ii, 0)
If Snd = 3 Then pupevent 03
Next
End If
Textbox001.Text = Snd
End Sub
Posted 07 March 2026 - 08:34 AM
Edited by BigOnYa, 07 March 2026 - 08:39 AM.
Posted 07 March 2026 - 08:40 AM
Edited by BigOnYa, 07 March 2026 - 09:04 AM.
Posted 07 March 2026 - 09:53 AM
It works for me, even with AltSound enabled.
The table already has its own GameTimer, maybe that's why it doesn't work.
Delete this
Set MotorCallback = GetRef("GameTimer")
Sub GameTimer
TrackSounds
End Sub
and add the TrackSounds call here.
Set MotorCallback = GetRef("RealTimeUpdates")
Sub RealTimeUpdates
RollingUpdate
ClowUpdate
TrackSounds
End Sub
Posted 07 March 2026 - 03:37 PM
That's it! You are the man! All working good now. Thank you so much.It works for me, even with AltSound enabled.
The table already has its own GameTimer, maybe that's why it doesn't work.
Delete this
Set MotorCallback = GetRef("GameTimer") Sub GameTimer TrackSounds End Sub
and add the TrackSounds call here.
Set MotorCallback = GetRef("RealTimeUpdates") Sub RealTimeUpdates RollingUpdate ClowUpdate TrackSounds End Sub
Visual Pinball →
Visual Pinball →
American Dad VPXStarted by BigOnYa , 12 Apr 2026 |
|
||
Visual Pinball →
Visual Pinball →
VPW tables have slow flipper response for me.Started by BigOnYa , 19 Mar 2026 |
|
||
Visual Pinball →
VR Discussion →
Visual Pinball VR Support →
3DOF head tracking with virtual glasses and VPXStarted by gamerplayer861 , 19 Feb 2026 |
|
||
Welcome to VPForums →
Pinball Discussion Forum →
Enabling DOF on a VPX table not in DOF databaseStarted by whynotpizza , 14 Feb 2026 |
|
||
Welcome to VPForums →
Pinball Discussion Forum →
VPinballX vs VPinballX64 -- (warning) Not all images were loadedStarted by whynotpizza , 08 Feb 2026 |
|