You can add this to AFM table script to add DMD colors called from script..
Controller.Games("afm_113b").Settings.Value("dmd_red") = 253
Controller.Games("afm_113b").Settings.Value("dmd_green") = 52
Controller.Games("afm_113b").Settings.Value("dmd_blue") = 75
Controller.Games("afm_113b").Settings.Value("dmd_red66") = 255
Controller.Games("afm_113b").Settings.Value("dmd_green66") = 181
Controller.Games("afm_113b").Settings.Value("dmd_blue66") = 83
Controller.Games("afm_113b").Settings.Value("dmd_red33") = 55
Controller.Games("afm_113b").Settings.Value("dmd_green33") = 120
Controller.Games("afm_113b").Settings.Value("dmd_blue33") = 7
Controller.Games("afm_113b").Settings.Value("dmd_red0") = 0
Controller.Games("afm_113b").Settings.Value("dmd_green0") = 0
Controller.Games("afm_113b").Settings.Value("dmd_blue0") = 0
So starting on Line 49 this is what it would look like...
Sub Table1_Init
vpmInit Me
With Controller
.GameName = cGameName
Controller.Games("afm_113b").Settings.Value("dmd_red") = 253
Controller.Games("afm_113b").Settings.Value("dmd_green") = 52
Controller.Games("afm_113b").Settings.Value("dmd_blue") = 75
Controller.Games("afm_113b").Settings.Value("dmd_red66") = 255
Controller.Games("afm_113b").Settings.Value("dmd_green66") = 181
Controller.Games("afm_113b").Settings.Value("dmd_blue66") = 83
Controller.Games("afm_113b").Settings.Value("dmd_red33") = 55
Controller.Games("afm_113b").Settings.Value("dmd_green33") = 120
Controller.Games("afm_113b").Settings.Value("dmd_blue33") = 7
Controller.Games("afm_113b").Settings.Value("dmd_red0") = 0
Controller.Games("afm_113b").Settings.Value("dmd_green0") = 0
Controller.Games("afm_113b").Settings.Value("dmd_blue0") = 0
If Err Then MsgBox "Can't start Game " & cGameName & vbNewLine & Err.Description:Exit Sub
.SplashInfoLine = "Attack from Mars" & vbNewLine & "VPX table by JPSalas v1.2.0"
.Games(cGameName).Settings.Value("rol") = 0
.HandleKeyboard = 0
.ShowTitle = 0
.ShowDMDOnly = 1
.ShowFrame = 0
.HandleMechanics = 0
.Hidden = DesktopMode
On Error Resume Next
.Run GetPlayerHWnd
If Err Then MsgBox Err.Description
On Error Goto 0
.Switch(22) = 1 'close coin door
.Switch(24) = 1 'and keep it close
End With
You can check out this page to find other color schemes. https://docs.google....6kOA/edit#gid=0
You can use these script commands on any table that uses a DMD. Just substitute rom name for rom name of other table you are wanting to add color DMD too.
You can find more color DMD schemes in this topic...
http://www.vpforums....showtopic=33398
This is how I am adding NFL Team colors to DMD on each teams table. (I use color picker in paint program and write down the RGB numbers.)
Or you can hit F-1 while table is running and bring up ROM menu, then you can click on each color and add the RGB numbers as seen in pic below.
You can experiment with your own color schemes on any DMD table with this info.
Have fun.
Edited by xenonph, 02 May 2017 - 10:41 AM.



Contributor
Top
























are all trademarks of VPFORUMS.