===Twinkle demonstrates Maximite control of individual pixels=== //This module is part of the original MMBasic library. It is reproduced here with kind permission of Hugh Buckle and Geoff Graham. Be aware it may reference functionality which has changed or is deprecated in the latest versions of MMBasic.// **TWINKLE.BAS**: 10 ' Twinkle demonstrates the ability of 20 ' Maximite to control individual pixels 30 ' 40 OPTION base 1 50 nbr = mm.vres * 10 60 CLS 70 DIM p(nbr,2) 80 h = 1 90 DO 100 x = RND * mm.hres 110 y = RND * mm.vres 120 PSET (x,y) ' Turn on a star 130 p(h,1) = x ' And save it 140 p(h,2) = y 150 h = h + 1 ' Next new star 160 IF h > nbr THEN h = 1 170 PRESET (p(h,1), p(h,2)) ' Erase the old 180 count = count + 1 190 LOCATE mm.hres/2 - 20, mm.vres/2 - 5 200 PRINT count; 210 LOOP ' Loop forever