06-14-2020, 12:41 AM
I've been writing small programs trying to get a feel for different areas of Free42/DM42.
Here is my version for the Kinematic equations (three instances). On the menu, the first variable listed is the data you have -> the data you want. Time -> Distance for example.
Don't hold back and let me have it. I welcome any and all suggestions and corrections. My biggest obstacle at the moment is understanding when to use GTO vs XEQ. The difference is GTO goes and stops unless you point it somewhere else to go and XEQ executes and comes back and continues on.
In the early days experimenting with the Menu layout and just have a 1 + option XEQ seemed to fail after four pushes of the soft key. This is why I used GTO here.
Many thanks in advance!
Here is my version for the Kinematic equations (three instances). On the menu, the first variable listed is the data you have -> the data you want. Time -> Distance for example.
Don't hold back and let me have it. I welcome any and all suggestions and corrections. My biggest obstacle at the moment is understanding when to use GTO vs XEQ. The difference is GTO goes and stops unless you point it somewhere else to go and XEQ executes and comes back and continues on.
In the early days experimenting with the Menu layout and just have a 1 + option XEQ seemed to fail after four pushes of the soft key. This is why I used GTO here.
Many thanks in advance!
Code:
00 { 137-Byte Prgm }
01▸LBL "KINE"
02 CLMENU
03 "d→t"
04 KEY 1 GTO 01
05 "t→d"
06 KEY 2 GTO 02
07 "t→Vf"
08 KEY 3 GTO 03
09 KEY 9 GTO 09
10 MENU
11 STOP
12▸LBL 01
13 0.5
14 ÷
15 32.17045
16 ÷
17 SQRT
18 CLA
19 ARCL ST X
20 ├" s"
21 AVIEW
22 CLA
23 RTN
24▸LBL 02
25 X↑2
26 0.5
27 ENTER
28 32.17045
29 ×
30 ×
31 CLA
32 ARCL ST X
33 ├"feet"
34 AVIEW
35 CLA
36 RTN
37▸LBL 03
38 32.17045
39 ×
40 5280
41 ÷
42 3600
43 ×
44 CLA
45 ARCL ST X
46 ├" mph"
47 AVIEW
48 CLA
49 RTN
50▸LBL 09
51 EXITALL
52 END