local x1 x1 = -170 + RND 100 line red x1 (-120) (90) (100) line blue (-170) (130) (100) (-70) x=50 y = 90 point green x y colour a b c d jt a b call [wrrt "(" call[wrnum a] gomv 40 0 wrrt "," call[wrnum b] gomv 35 0 wr ")"] color colour[ mt c d] call [wrrt "(" call[wrnum c] gomv 30 0 wrrt "," call[wrnum d] gomv 30 0 wr ")"] jt 0 0 colour a b jt a b solid colour [circle 8] gomv -20 (-20) //call [wrrt "(" call[wrnum a] gomv 20 0 wrrt "," //call[wrnum b] gomv 20 0 wr ")"] jt 1000 0