**TI83F* Program file dated 01/05/00, 16:07ë ÚGRAPHPROÚØá?à1+1+*klklklklklklklkl*?à4+3+*GRAPH*?à5+6+*PROGRAMS*?à7+5+*BY)DAN)BEHUN*?à8+1+*klkHITklENTERlkl*?Ø?æ*RUN)PROGRAM*+*YES*+1+*NO*+99?Ö1?á?Þ*)))))VERSION)1:0*?Þ*ENTER)IN*?Þ*COORDINATES*?Þ*X1)IS*?ÜA?Þ*Y1)IS*?ÜB?Þ*X2)IS*?ÜC?Þ*Y2)IS*?ÜD?Ö5?æ*WHICH)PROGRAM¯*+*DISTANCE*+2+*MID)POINT*+3+*SLOPE*+4?Ö2?á?Þ*DISTANCE*?Þ**?¼CqA pDqB E?Þ*THE)DISTANAE)IS*?à4+1+E?Þ**?Þ**?E F?Þ*AND)¼)OF*?à8+1+F?Þ**?Ø?×6?Ö3?á?Þ*MIDPOINT*?ApCƒ2X?BpDƒ2Y?Þ**?Þ*THE)MIDPOINT)IS*?Þ*X)IS*?Þ**?à4+6+X?Þ*Y)IS*?Þ**?à6+6+Y?Ø?×6?Ö4?á?Þ*SLOPE*?ÎCqAj0?×7?DqBF?CqAG?DqBƒCqAE?Þ*THE)SLOPE)OF)THE*?Þ*LINE)IS*?à4+1+E?Þ**?Þ*N)IS*?Þ*D)IS*?à5+6+F?à6+6+G?×8?Ö7?Þ*UNDEFINED*?Ö8?Ø?Ö6?æ*RUN)AGAIN*+*COORDINATES*+1+*DIFF)PROGRAM*+5+*EXIT*+99?Ö99?áKâ