SEQ_ID_CURSOR_COLOR0
WSeq(ba, SEQ_ID_CURSOR_COLOR0, col2);
index = RSeq (ba, SEQ_ID_CURSOR_COLOR0);
WSeq(ba, SEQ_ID_CURSOR_COLOR0, 0);
index = vgar (ba, SEQ_ID_CURSOR_COLOR0);
vgaw (ba, SEQ_ID_CURSOR_COLOR0, 0);