QuickBasic graphics demo