Forces
-----------------------------------------------
Version: 1.2, 971210
Creators: Daniel Bergman, Mattias Morén, Peter Widmark.
Description: The program calculates the resultant and its direction from an unlimited
number of forces with commom point of application.
Comments: "->" is the same thing as the "STO>"-button. "R>Pr(" is under
the ANGLE-menu, nr 3. "R>P0(" is under the same menu, nr 4.
Known bugs: None.
Size: 97 bytes.
For more games and programs, please visit http://ti80.burtrask.net.
PROGRAM:FORCES
0->X:0->Y
LBL 0
INPUT "FORCE?",K
IF K=0:GOTO 1
INPUT "V?",V
X+KCOS V->X
Y+KSIN V->Y
GOTO 0
LBL 1
CLRHOME
DISP "X,Y,R,V:",X,Y,R>Pr(X,Y
R>P0(X,Y
--------------------------------------------------------------------
Copyright (C) 1998 by Daniel Bergman & Mattias Morén
http://ti80.burtrask.net