Hilite Key-in and VBA Stopped workiing

Micristation took a crash after which my Key-in scripts  for setting the design file color quit working, both the VBA and Key-in's  I  think it is an MDL file needs loading

but unable to figure it out.

Examples of what did work:

1:25 PM 10/7/2018 Hili Colors

Settings>Design File>Color

after Microstation crash:

CadInputQueue.SendCommand "set hilite gray;mdl keyin calculat calc tcb->selectionHiliteColor=8"

would not work nor did manual Key-in commands

mdl keyin calculat calc tcb->selectionHiliteColor=5
mdl keyin calculat calc tcb->selectionHiliteOverride=5

before the crash, I realize it is both VBA example and Key-in thought it might help someone help me. Thank You