SEQ_ID_CURSOR_COLOR1
WSeq(ba, SEQ_ID_CURSOR_COLOR1, col1);
index = RSeq (ba, SEQ_ID_CURSOR_COLOR1);
WSeq(ba, SEQ_ID_CURSOR_COLOR1, 1);
index = vgar (ba, SEQ_ID_CURSOR_COLOR1);
vgaw (ba, SEQ_ID_CURSOR_COLOR1, 1);