home *** CD-ROM | disk | FTP | other *** search
/ ticalc.org / ticalc_org_rev_b.iso / archives / 80 / basic / math / coord.80 < prev    next >
Encoding:
Text File  |  2001-07-01  |  836 b   |  30 lines

  1. Coordinates
  2. ------------------------------------------------------------
  3. Version: 2.0, 980322
  4. Creator: Daniel Bergman.
  5. Description: The program calculates the distance between two points
  6.              in a coordinate system, where the midpoint between the
  7.              points are, and the K and M-value for the line that runs 
  8.              through the points.
  9. Comments: "R>Pr(" is on the ANGLE-menu.
  10. Known bugs: None.
  11. Size: 105 bytes.
  12.  
  13. For more games and programs, please visit http://ti80.burtrask.net.
  14.  
  15. PROGRAM:COORD
  16. INPUT "X?",X
  17. INPUT "Y?",Y
  18. INPUT "X?",S
  19. INPUT "Y?",T
  20. CLRHOME
  21. DISP "L,MX,MY,K,M",R>Pr(S-X,T-Y
  22. DISP .5(X+S
  23. DISP .5(Y+T
  24. (T-Y)/(S-X->S
  25. DISP S
  26. Y-XS
  27.  
  28. --------------------------------------------------------------------
  29. Copyright (C) 1998 by Daniel Bergman & Mattias MorΘn
  30. http://ti80.burtrask.net