I've been told by many people that the current owner of the Elite trademark is VERY aggresive in ensuring that the Elite name, ships etc are not used. I would be very careful with your Elite remake. Or get yourself a serious tasty lawyer.
Function Scanner(scanx,scany) ; Scanner by Timo Souranta ; ;Stations And planets are white because they are greater than 500t ;Scanner size is: Scanx X -115 to Scanx +115 (with a scale of .7) ;Scany Y -37 to Scany +37 Color 255,0,0 Oval scanx-115,scany-37 , 230,74,0 scale# = 0.7 Plot scanx, scany TFormPoint 0,0,0, Station, Cobra x# = TFormedX() * scale y# = TFormedY() * -scale z# = TFormedZ() * scale x1# = x y1# = - z/4 + y/2 y2# = - z/4 If x1 > -200 And x1 < 200 And y1 > -200 And y1 < 200 Then Color 255, 255, 255 If scanx+x1>scanx-115 And scanx+x1<scanx+115 And scany+y1>scany-37 And scany+y1<scany+37 scn=(scany+y1)-(scany+y2) If scn>-30 And scn<30 WritePixel scanx+x1+1, scany+y1, 256*256*255 + 256*255 Line scanx+x1, scany+y1, scanx+x1,scany+y2 EndIf EndIf EndIf End Function