MMBC

Basic3DLine

Jun 23rd, 2017
156
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.28 KB | None | 0 0
  1. ClrDraw
  2.  
  3. 0->Xmin
  4. 0->Ymin
  5. 94->Xmax
  6. 62->Ymin
  7.  
  8. AxesOff
  9. FnOff
  10.  
  11. Input "X1=", X
  12. Input "Y1=", Y
  13. Input "Z1=", Z
  14. Input "X2=", A
  15. Input "Y2=", B
  16. Input "Z2=", C
  17.  
  18. Z+5->Z
  19. C+5->C
  20. 80/Z->F
  21. 80/C->G
  22. X*F->X
  23. Y*F->Y
  24. A*G->A
  25. B*G->B
  26. X+48->X
  27. A+48->A
  28. Y+32->Y
  29. B+32->B
  30.  
  31. Line(X,Y,A,B
Advertisement
Add Comment
Please, Sign In to add comment