SetFont = VioSetPresParam ?(Frame).Grid.HVio ?(Font) SPP_FONT
ClearScreen = VioScrollUp ?(Frame).Grid.HVio 0 0 (-1) (-1) (-1)
