148 replies to this topic

[gtxjoe]

Lockdown Bar Fire button

 

I installed a Fire Button on my Lockdown bar last week and discovered that most tables need to be modified to actually support the Fire button.  Here is a summary of the changes I have been making along the way

 

Goals:

Add support for the Fire button or an RGB Fire button.. Update the table script so it works if you hook up the Fire button to VPX LockDownBar button.

Add support for the Fire button as the Launch button for pinball machines that have a dedicated Launch button or trigger (For example, Medieval Madness, Attack From Mars, Terminator 2)

 [Edit 5/2/21] RGB Fire button and Fire button DOF support added to DOF Config Tool site.  Updating list to only cover table script changes

 

Aaron Spelling

Script change add (Keydown sub):

    If keycode = LockBarKey then controller.switch(9) = 1

 

Script change add (Keyup sub):

    If keycode = LockBarKey then controller.switch(9) = 0

 

AC/DC Pro

Script change:  No change needed

 

AC/DC LE and Premiums

Script change:  No change needed

 

Al's Garage Band (Launch Ball)

Script change add (Keydown sub):

                If KeyCode=LockBarKey Then Controller.Switch(37)=1

 

Script change add (Keyup sub):

                If KeyCode=LockBarKey Then Controller.Switch(37)=0

 

Apollo 13 (Launch Ball)

Script change add (Keydown sub):

                If keycode = LockBarKey Then Controller.Switch(9) = True

 

Script change add (Keyup sub):

                If keycode = LockBarKey Then Controller.Switch(9) = False

 

Note: In Apollo 13 script, make sure that

Controller.Switch(16) = 1

instead of "Controller.Switch(16) = True" for the fire light to work

 

Attack From Mars

Script change add (Keydown sub):

                If keycode = LockbarKey Then Controller.Switch(11) = 1:End If

 

Script change add (Keyup sub):

                If keycode = LockbarKey Then Controller.Switch(11) = 0

 

Austin Powers

Script change add (Keydown sub):

                If Keycode=LeftMagnaSave Or KeyCode=RightMagnaSave or KeyCode = Lockbarkey Then Controller.Switch(53)=1

 

Script change add (Keyup sub):

                If Keycode=LeftMagnaSave Or KeyCode=RightMagnaSave or KeyCode = Lockbarkey Then Controller.Switch(53)=0

 

Batman Forever

Script change add (Keydown sub):

    If keycode=LockBarKey Then Controller.Switch(49)  = 1

 

Script change add (Keyup sub):

    If keycode=LockBarKey Then Controller.Switch(49)  = 0

 

Baywatch (Launch Ball)

Script change add (Keydown sub):

                If keycode = LockBarKey Then Controller.Switch(50) = 1

 

Script change add (Keyup sub):

                If keycode = LockBarKey Then Controller.Switch(50) = 0

 

Black Rose

Script change add (Keydown sub):

                If keycode = LockBarKey Then Controller.Switch(34)=1

 

Script change add (Keyup sub):

If keycode = LockBarKey Then Controller.Switch(34)=0

 

Bram Stokers Dracula (Launch Ball)

Script change add (Keydown sub):

  If keycode = LockBarKey Then Controller.Switch(34) = 1

 

Script change add (Keyup sub):

  If keycode = LockBarKey Then Controller.Switch(34) = 0

 

Champion Pub (Launch Ball)

Script change add (Keydown sub):

    If keycode=LockBarKey Then Controller.Switch(23)=1

 

Script change add (Keyup sub):

    If keycode=LockBarKey Then Controller.Switch(23)=0

 

Champions League 17 and 18

Script change to (Keydown sub):

Change

    If keycode = PlungerKey Then

to

    If keycode = PlungerKey or keycode = LockBarKey Then

 

Script change add (Keyup sub):

    No change needed

Demolition Man (Launch Ball)

Script change add (Keydown sub):

    If keycode = LockBarKey Then Controller.Switch(11) = 1: Controller.Switch(12) = 1

 

Script change add (Keyup sub):

    If keycode = LockBarKey Then Controller.Switch(11) = 0: Controller.Switch(12) = 0

 

Dirty Harry

Script change add (Keydown sub):

    If keycode = LockBarKey Then Controller.Switch(11) = 1

 

Script change add (Keyup sub):

    If keycode = LockBarKey Then Controller.Switch(11) = 0

 

Doctor Who (Launch Ball)

Script change add (Keydown sub):

if keycode = LockBarKey then controller.switch(34)=True

 

Script change add (Keyup sub):

if keycode = LockBarKey then controller.switch(34)=False

 

Fish Tales (Launch Ball)

Script change add (Keydown sub):

If keycode = LockBarKey Then Controller.Switch(31) = 1

 

Script change add (Keyup sub):

If keycode = LockBarKey Then Controller.Switch(31) = 0

 

Flipper Football

Script change add (Keydown sub):

    If keycode = LockBarKey Then  Controller.Switch(14) = 1

 

Script change add (Keyup sub):

    If keycode = LockBarKey Then  Controller.Switch(14) = 0

 

Gemini 2000 (Taito do Brasil)

Script change add (Keydown sub):

    If KeyCode=Lockbarkey Then Controller.Switch(65)=1

 

Script change add (Keyup sub):

    If KeyCode=Lockbarkey Then Controller.Switch(65)=0

 

Godzilla (Launch Ball)

Script change add (Keydown sub):

If KeyCode=LockBarKey Then Controller.Switch(53)=1

 

Script change add (Keyup sub):

If KeyCode=LockBarKey Then Controller.Switch(53)=0

 

GoldenEye (Launch ball)

Script change add (Keydown sub):

                If KeyCode=LockBarKey Then Controller.Switch(9)=1

 

Script change add (Keyup sub):

                If KeyCode=LockBarKey Then Controller.Switch(9)=0

 

Guardians  of the Galaxy

No changes needed

 

Guns N Roses (Launch Ball)

Script change add (Keydown sub):

     If keycode = LockBarKey Then Plunger2.Pullback:vpmTimer.PulseSw 62

 

 Script change add (Keyup sub):

     If keycode = LockBarKey Then Plunger2.Fire:PlaySound SoundFX("plunger",DOFcontactors)

 

Harley-Davidson (Sega 1999) (Launch Ball)

Script change add (Keydown sub):

    If KeyCode=LockBarKey Then Controller.Switch(53)=1

 

Script change add (Keyup sub):

    If KeyCode=LockBarKey Then Controller.Switch(53)=0

 

Independence Day (Launch Ball)

Script change add (Keydown sub):

If KeyCode=LockBarKey Then Controller.Switch(53)=1

 

Script change add (Keyup sub):

If KeyCode=LockBarKey Then Controller.Switch(53)=0

 

Indiana Jones The Pinball Adventure

Script change add (Keydown sub):

                If keycode = LockbarKey Then Controller.Switch(34) = 1

 

Script change add (Keyup sub):

    If keycode = LockbarKey Then Controller.Switch(34) = 0

 

Indianapolis 500 (Launch Ball)

Script change add (Keydown sub):

     If keycode = LockBarKey Then Controller.Switch(11) = 1

     If keycode = RightMagnaSave Then Controller.Switch(11) = 1

 

Script change add (Keyup sub):

     If keycode = LockBarKey Then Controller.Switch(11) = 0

 

Johnny NMemonic (Drop Ball from Glove and Launch Ball)

Script change add (Keydown sub):

If KeyCode=LockBarKey Then Controller.Switch(11)=1

 

Script change add (Keyup sub):

If KeyCode=LockBarKey Then Controller.Switch(11)=0

 

Jolly Park (Launch Ball)

Script change add (Keydown sub):

    If KeyCode = LockBarKey Then Controller.Switch(86) = 1

 

Script change add (Keyup sub):

    If KeyCode = LockBarKey Then Controller.Switch(86) = 0

 

Judge Dredd (Fire Button and Launch Ball)

Script change add (Keydown sub):

If KeyCode=LockBarKey Then Controller.Switch(12)=1

 

Script change add (Keyup sub):

If KeyCode=LockBarKey Then Controller.Switch(12)=0

 

Jurassic Park

Script change, modify the existing code to include LockBarKey (Keydown sub):

If keycode = LockBarKey or keycode = RightMagnaSave or keycode = LeftMagnaSave or keycode = 3 Then  'Smart Bomb Button

 

Script change, modify the existing code to include LockBarKey (Keyup sub):

If keycode = LockBarKey or keycode = RightMagnaSave or keycode = LeftMagnaSave or keycode = 3 Then  'Smart Bomb Button

 

Kingpin (Capcom)

Script change add (Keydown sub):

    If keycode = PlungerKey Then vpmTimer.PulseSw 14

 

Script change add (Keyup sub):

No change needed

 

Last Action Hero (Smart Missile Button)

Script change add (Keydown sub):

    If keycode = LockBarKey then controller.switch(8)=1 :controller.switch(62)=1

 

Script change add (Keyup sub):

    If keycode = LockBarKey then controller.switch(8)=0 :controller.switch(62)=0

 

Lethal Weapon (Fire Uzi and Launch Ball)

Script change add (Keydown sub):

    If keycode = LockBarKey then controller.switch(9) = 1

 

Script change add (Keyup sub):

    If keycode = LockBarKey then controller.switch(9) = 0

 

Lost in Space (Launch Ball)

Script change add (Keydown sub):

If KeyCode=LockBarKey Then Controller.Switch(53)=1

 

Script change add (Keyup sub):

If KeyCode=LockBarKey Then Controller.Switch(53)=0

 

Mary Shelley's Frankenstein (Launch Ball)

Script change add (Keydown sub):

                If keycode = LockBarKey Then Controller.Switch(62) = True

 

Script change add (Keyup sub):

                If keycode = LockBarKey Then Controller.Switch(62) = False

 

Masters of the Universe

Script change add (Keydown sub):

Change

    If (KeyCode = PlungerKey) Then

to

    If ((KeyCode = PlungerKey) or (KeyCode = LockBarKey)) Then

 

Script change add (Keyup sub):

    No change needed

 

Medieval Madness

Script change add (Keydown sub):

                If keycode = LockbarKey Then Controller.Switch(11) = 1

 

Script change add (Keyup sub):

                If keycode = LockbarKey Then Controller.Switch(11) = 0

 

Metal Slug

Script change add (Keydown sub):

Change

    If keycode = PlungerKey Then

to

    If keycode = PlungerKey or keycode = LockBarKey Then

 

Script change add (Keyup sub): 

    No change needed

 

Michael Jordan (Shoot The Ball and Launch Ball)

Script change add (Keydown sub):

    If keycode = LockBarKey then controller.switch(9) = 1

 

Script change add (Keyup sub):

    If keycode = LockBarKey then controller.switch(9) = 0

 

Minions

Script change add (Keydown sub):

Change

    If keycode = PlungerKey Then

to

    If keycode = PlungerKey or keycode = LockBarKey Then

 

Script change add (Keyup sub): 

    No change needed

 

Monster Bash (Launch Ball)

Script change add (Keydown sub):

  If keycode = LockBarKey then controller.switch(11)=1

 

Script change add (Keyup sub):

  If keycode = LockBarKey then controller.switch(11)=0

 

Mustang LE (Action Button)

Script change add (Keydown sub):

                If Keycode = LockBarKey Then Controller.Switch(71) = 1

 

Script change add (Keyup sub):

                If Keycode = LockBarKey Then Controller.Switch(71) = 0

 

Mystery Castle (Launch Ball)

Script change add (Keydown sub):

If keycode = LockBarKey Then Controller.Switch(14) = True

 

Script change add (Keyup sub):

If keycode = LockBarKey Then

       Controller.Switch(14) = False

       PlaySound Soundfx("plunger",DOFContactors)

    End If

 

NBA Fastbreak (Launch Ball)

Script change add (Keydown sub):

If KeyCode = LockBarKey Then Controller.Switch(11) = 1

 

Script change add (Keyup sub):

If KeyCode = LockBarKey Then Controller.Switch(11) = 0

 

No Fear (Launch Ball)

Script change add (Keydown sub):

If Keycode = LockBarKey Then Controller.Switch(11) = 1

 

Script change add (Keyup sub):

If Keycode = LockBarKey Then Controller.Switch(11) = 0

 

Popeye Saves The Earth (Launch Ball)

Script change add (Keydown sub):

If keyCode=LockBarKey Then

    Controller.Switch(23) = 1:Plunger.Pullback

End If

 

Script change add (Keyup sub):

If keyCode=LockBarKey Then

    Controller.Switch(23) = 0:Plunger.Fire

end if

 

Star Trek 25th Anniversary (Launch Ball)

Script change add (Keydown sub):

    If keycode = LockBarKey Then Controller.Switch(30) = 1

 

Script change add (Keyup sub):

    If keycode = LockBarKey Then Controller.Switch(30) = 0

 

Star Trek LE

In script, find PunchItKey and set it to LockBarKey or RightMagnaSave

 

If PunchItKey not found in script, add this:

    Script change add (Keydown sub):

        If Keycode = LockBarKey then Controller.Switch(71) = 1

    Script change add (Keyup sub):

        If Keycode = LockBarKey then Controller.Switch(71) = 0

 

Star Trek The Next Generation (Fire Cannons and Launch Ball)

Script change add (Keydown sub):

    If keycode = LockBarKey Then Controller.Switch(12) = 1

 

Script change add (Keyup sub):

    If keycode = LockBarKey Then Controller.Switch(12) = 0

 

Star Wars (Data East)

 

FOR VPW RELEASE, USE:

Script change add (Keydown sub):

 

   If keycode = LockBarKey Then

       Controller.Switch(50) = 1

       Controller.Switch(51) = 1

    end if

 

Script change add (Keyup sub):

 

   If keycode = LockBarKey Then

       Controller.Switch(50) = 0

       Controller.Switch(51) = 0

    end if

 

FOR OLDER TABLE RELEASE, USE:

 

Script change add (Keydown sub):

 

                If keycode = LockBarKey Then

                                Controller.Switch(50) = 1

                                if not CBool(PostIt) Then Controller.Switch(51)=1

                end if

 

Script change add (Keyup sub):

                If keycode = LockBarKey Then

                                Controller.Switch(50) = 0

                                if not CBool(PostIt) Then Controller.Switch(51)=0

                end if

 

Star Wars Trilogy

Script change add (Keydown sub):

    If keycode = LockBarKey Then Controller.Switch(53) = 1

 

Script change add (Keyup sub):

    If keycode = LockBarKey Then Controller.Switch(53) = 0

 

Super Mario Bros (Launch Ball)

Script change add (Keydown sub):

                If keycode = LockBarKey Then Controller.Switch(5)=1

 

Script change add (Keyup sub):

                If keycode = LockBarKey Then Controller.Switch(5)=0

 

Tales from the Crypt (Launch Ball)

Script change add (Keydown sub):

If keycode = PlungerKey Then Controller.Switch(62) = 1

 

Script change add (Keyup sub):

If keycode = PlungerKey Then Controller.Switch(62) = 0

 

Terminator 2

Script change add (Keydown sub):

  If keycode = LockBarKey  Then Controller.Switch(34)=1

 

Script change add (Keyup sub):

  If keycode = LockBarKey  Then Controller.Switch(34)=0

 

Terminator 3

Script change add (Keydown sub):

    If keycode = LockBarKey Then PlaySoundat "fx_solenoidOn", sw16:controller.switch(55) = True

 

Script change add (Keyup sub):

    If keycode = LockBarKey Then PlaySoundAt "fx_solenoidOff", sw16:controller.switch(55) = False

 

The Adventures of Rocky and Bullwinkle (Launch Ball)

Script change add (Keydown sub):

If keyCode=LockBarKey Then Controller.Switch(9)=true END IF

 

Script change add (Keyup sub):

If keyCode=LockBarKey Then Controller.Switch(9)=false END IF

 

The Flintstones (Launch Ball)

Script change add (Keydown sub):

    If keycode = LockBarKey Then Controller.Switch(11) = 1

 

Script change add (Keyup sub):

    If keycode = LockBarKey Then Controller.Switch(11) = 0

 

The Getaway High Speed II (Shift Up)

Script change add (Keydown sub):

                If keycode = LockBarKey Then Controller.Switch(34) = True

 

Script change add (Keyup sub):

                If keycode = LockBarKey Then Controller.Switch(34) = False

 

The Lost World Jurassic Park (Launch Ball)

Script change add (Keydown sub):

    If keycode = LockBarKey Then Controller.Switch(53) = 1

 

Script change add (Keyup sub):

    If keycode = LockBarKey Then Controller.Switch(53) = 0

 

The Shadow (Launch Ball)

Script change add (Keydown sub):

 If keycode = LockBarKey  Then Controller.Switch(11) = True

 

Script change add (Keyup sub):

 If keycode = LockBarKey  Then Controller.Switch(11) = False

 

The Walking Dead LE

Script change add (Keydown sub):

    If keycode = LockBarKey Then Controller.Switch(71) = 1

 

Script change add (Keyup sub):

    If keycode = LockBarKey Then Controller.Switch(71) = 0

 

The Web

Script change to (Keydown sub):

Change

    If keycode = PlungerKey Then 

to

    If keycode = PlungerKey or keycode = LockBarKey Then 

 

Script change add (Keyup sub):

    No change needed

 

Unreal Tournament

Script change add (Keydown sub):

    Change:

        If keycode = PlungerKey Then

    To:

        If keycode = PlungerKey or keycode = LockBarKey Then

 

Verne's World (Launch Ball)

Script change add (Keydown sub):

    If keycode = LockBarKey Then  Controller.Switch(86) = 1

 

Script change add (Keyup sub):

    If keycode = LockBarKey Then  Controller.Switch(86) = 0

 

Viper Night Driving (Launch Ball)

Script change add (Keydown sub):

                If KeyCode=LockBarKey Then Controller.Switch(53)=1

 

Script change add (Keyup sub):

                If KeyCode=LockBarKey Then Controller.Switch(53)=0

 

WWF Royal Rumble (Launch Ball)

Script change add (Keydown sub):

    If keycode = LockBarKey Then  Controller.Switch(62) = 1

 

Script change add (Keyup sub):

    If keycode = LockBarKey Then  Controller.Switch(62) = 0

 

X-Files (Launch Ball)

Script change add (Keydown sub):

    If keycode = LockBarKey Then controller.switch(53) = true

 

Script change add (Keyup sub):

    If keycode = LockBarKey Then controller.switch(53) = false

 

 

Edited by gtxjoe, 24 November 2021 - 07:25 PM.

[BoltBait]

Thanks for this information!

 

Since I don't have a lockdown fire button, it inspired me to modify the script for Star Wars (Data East) to change the fire button from the keyboard enter key to the MagnaSave buttons.

 

Now, I can play that table on my B2S cabinet without digging out my keyboard.

Edited by BoltBait, 27 October 2020 - 09:06 AM.

[gtxjoe]

Original set

AC/DC (Fire Button)  

AC/DC LE and Premiums

Austin Powers

Batman Forever

Black Rose

Dirty Harry

Medieval Madness 

Attack From Mars

Terminator 2

Indiana Jones The Pinball Adventure

Galaxy of the Guardians

Jurassic Park

Star Trek LE

Star Wars Trilogy

The Walking Dead LE (Crossbow)

 

Added

Mustang LE (Action button)

Apollo 13 (Launch Ball)

Demolition Man (Launch Ball)

The Getaway High Speed II (Shift Up)

Last Action Hero (Smart Missile Button)

Edited by gtxjoe, 07 November 2020 - 12:57 AM.

[gtxjoe]

Add 17 more tables to the first post

• Star Wars (Data East) 
• GoldenEye (Launch ball)
• Baywatch (Launch Ball)
• Bram Stokers Dracula (Launch Ball)
• Champion Pub (Launch Ball)
• Doctor Who (Launch Ball)
• Fish Tales (Launch Ball)
• Godzilla (Launch Ball)
• Guns N Roses (Launch Ball)
• Independence Day (Launch Ball)
• Indianapolis 500 (Launch Ball)
• Johnny NMemonic (Drop Ball from Glove and Launch Ball)
• Judge Dredd (Fire Button and Launch Ball)
• Lethal Weapon (Fire Uzi and Launch Ball)
• Lost in Space (Launch Ball)
• Mary Shelley's Frankenstein (Launch Ball)
• Michael Jordan (Shoot The Ball and Launch Ball)

[gtxjoe]

Added

 

• Monster Bash (Launch Ball)
• Adventures of Rocky and Bullwinkle (Launch Ball)
• Star Trek The Next Generation (Fire Cannons and Launch Ball)
• Tales from the Crypt (Launch Ball)
• The Flintstones (Launch Ball)
• X-Files (Launch Ball)

[llamastick]

Thanks so much for this gtxjoe - just what I was after

Just on the Austin Powers one - that's the only one you have where the value is '0' for KeyDown, then '1' for KeyUp. All the others are the other way?

 

This is bookmarked!

[nestorgian]

thanks just that I am updating the cabinet and I have that button abandoned due to little use

excellent job !!!!

[Armyaviation]

We now have RGB fire button capabilities in dof config tool. I tested it out tonight. Very cool. Thanks arngrim

[karlson18]

hi there,

 

if there is a way to get the fire button working when we enter hi score initials?

 

greetings

karlson

[gtxjoe]

Added the following tables today:

• Harley-Davidson (Sega 1999) (Launch Ball)
• The Lost World Jurassic Park (Launch Ball)
• Mystery Castle (Launch Ball)
• NBA Fastbreak (Launch Ball)
• No Fear (Launch Ball)
• WWF Royal Rumble (Launch Ball)
   

Edited by gtxjoe, 22 February 2021 - 02:44 AM.

[wiesshund]

hi there,

 

if there is a way to get the fire button working when we enter hi score initials?

 

greetings

karlson

Since it is the ROM that decides what the score input is, i think that would be a bit hard

On a ROMLESS table, yea, easy, but you can't just arbitrarily tell the ROM hey i am going to use this fire button you know nothing about, to enter my high score, and your gonna like it.

 

The ROM is gonna say Yea? Come at me Brah, let's see how that works out for you.

[ktranth]

This may sound like a dumb question, but where does this get added? In this case for Terminator 2:

 

DOF change OPTIONAL (Fire Button):    W31 fu500 fd550/W78 Blink fu500 fd550

[Armyaviation]

thats the Dof command for the lighting of the fire button.  If you have dof setup go to dof config tool and add it to that specific table.

[ktranth]

thats the Dof command for the lighting of the fire button.  If you have dof setup go to dof config tool and add it to that specific table.

 

Oh, ok, I haven't done that part before. Thx!

[gtxjoe]

Added 

Jolly Park (Launch Ball)

Popeye Saves The Earth (Launch Ball)

[allknowing2012]

Is there a keyboard equivalent to the lockbarkey? As I code a custom table I would like to ensure that it is indeed firing the lockbarkey script. (ignoring the use of a magnasave button).

Looking in vp setup - it doesnt appear to be, that there is one.

[gtxjoe]

LockBarKey is the visual pinball name for it. You can use that in the VP table.script

Edited by gtxjoe, 27 February 2021 - 06:22 PM.

[allknowing2012]

LockBarKey is the visual pinball name for it. You can use that in the VP table.script

yes but is there a key (or can one be assigned) on the keyboard that will fire off this piece of code..

 

if keycode=LockBarKey then

  msgbox "You pressed the lock bar key"

end if

[wiesshund]

 

LockBarKey is the visual pinball name for it. You can use that in the VP table.script

yes but is there a key (or can one be assigned) on the keyboard that will fire off this piece of code..

 

if keycode=LockBarKey then

  msgbox "You pressed the lock bar key"

end if

 

What ever key you map to it in keys nudge dof prefs

lower right of left half of screen

labeled lockbar/fire

[allknowing2012]

Oh dang super stupid user error .. I just hit the drop down and forgot to press a dang button to define one ... oops - I should know better. Sorry.. continue on!