Update 100 BASIC