Stars (This is another screen saver): :ClrDraw :All-Off :2->Xmin :97->Xmax :2->Ymin :65->Ymax :0->Xscl :0->Yscl :Line(2,7,97,7 :Line(2,6,97,6 :Line(2,5,97,5 :Line(2,4,97,4 :Line(2,3,97,3 :Line(2,2,97,2 :Line(77,2,77,12 :Line(76,11,78,11 :Line(75,10,79,10 ;Line(74,9,80,9 :Lbl 1 :Int(rand*95)+3->X :Int(rand*63)+8->Y :Pt-On(X,Y :Goto 1