The Leper Messiah
2009-01-13, 04:25
Where the chant is death,
death until the sun cries mourning.
Down to the park with friends of mine.
For those who remember my post about making a ballistics calculator for under $200.00 sale price per unit, I suceeded. Beta tests went great and the next prject objective is to toughen up the base hardware. My unit essentially a heavily modified ti-83.
Anyways you won't get the full version that tells you what a projectile will do, but I did make a TI-BASIC version of the Click Calculator. I haven't fully tested it, so Consider it an alpha release. Those with ti-83, 84, 83SE and 84SE can compile this program and use it. I only ask that you report any bug errors as I was pretty tired when I cranked the alpha out because spring semester starts soon. Anyways here is the code:
ClrHome
:Output (3,1, Click Calculator)
:Output (4,1, Burn Ballistics)
:Output (5,1, Alpha Release)
:Pause
:ClrHome
:Lbl M
:Menu( Click Calculator,Click Calculator, A1,Conversions, A2 , About , A3, Exit, EX)
:ClrHome
:Lbl A1
:Menu( Adjustments,1/4 MOA, B1,1/8 MOA, B2 , Custom , B3, Back, M)
:Lbl B1
:Disp Range in yards
:Prompt R
:(((((R*36)*2)*π)/360)/60)→M
:(1/4)→C
:Disp Drop (Inches)
:Prompt D
:((M/(C))→V
:(D/V)→A
:Disp A
:Clicks
:Pause
:ClrHome
:Goto A1
:Lbl B2
:Disp Range in yards
:Prompt R
:(((((R*36)*2)*π)/360)/60)→M
:(1/8)→C
:Disp Drop (Inches)
:Prompt D
:((M/(C))→V
:(D/V)→A
:Disp A
:Clicks
:Pause
:ClrHome
:Goto A1
:Lbl B3
:Disp Range in yards
:Prompt R
:(((((R*36)*2)*π)/360)/60)→M
:Disp 1 click and 100 yd
:Prompt C
:Disp Drop (Inches)
:Prompt D
:((M/(C))→V
:(D/V)→A
:Disp A
:Clicks
:Pause
:ClrHome
:Goto A1
:Lbl A2
:Menu( Conversions,Yds. to M., C1,In. to Cm., C2 , M. to Yds. , C3, Cm to In.,C4, Back, M)
:Lbl C1
:ClrHome
:Disp How many yards
:Prompt Y
:(Y*0.9144)→M
:Output(4,2, M)
:Output(5,2, Meters)
:Pause
:
:ClrHome
:Goto A2
:Lbl C2
:ClrHome
:Disp How many inches
:Prompt I
:(I*2.54)→C
:Output(4,2, C)
:Output(5,2, CenWebOffters)
:Pause
:ClrHome
:Goto A2
:Lbl C3
:ClrHome
:Disp How many meters
:Prompt M
:(M*1.0936133)→Y
:Output(4,2, Y)
:Output(5,2, Meters)
:Pause
:
:ClrHome
:Goto A2
:Lbl C4
:ClrHome
:Goto M
:Lbl A3
:Output (3,1, Click Calculator)
:Output (4,1, Version 1.0)
:Output (5,1, Burn Ballistics)
:Disp A different face
:Disp but the words
:Disp never change....
:Pause
:ClrHome
:Goto M
:
Here are directions on how to compile the program:
Go to this site: http://ti.zewaren.net/en/83p-creator.php
Paste the above code into the text box.
Name the program ClickCal
Write Bodegas Consummations in the comments box
Click Update
Click Save as 83P/8XP
Load program onto Calculator
Use Program
Report errors to me and request Improvements for the free Click Calculator
Refrain from asking me for the assembly version that calculates wind drift and bullet drop
.
death until the sun cries mourning.
Down to the park with friends of mine.
For those who remember my post about making a ballistics calculator for under $200.00 sale price per unit, I suceeded. Beta tests went great and the next prject objective is to toughen up the base hardware. My unit essentially a heavily modified ti-83.
Anyways you won't get the full version that tells you what a projectile will do, but I did make a TI-BASIC version of the Click Calculator. I haven't fully tested it, so Consider it an alpha release. Those with ti-83, 84, 83SE and 84SE can compile this program and use it. I only ask that you report any bug errors as I was pretty tired when I cranked the alpha out because spring semester starts soon. Anyways here is the code:
ClrHome
:Output (3,1, Click Calculator)
:Output (4,1, Burn Ballistics)
:Output (5,1, Alpha Release)
:Pause
:ClrHome
:Lbl M
:Menu( Click Calculator,Click Calculator, A1,Conversions, A2 , About , A3, Exit, EX)
:ClrHome
:Lbl A1
:Menu( Adjustments,1/4 MOA, B1,1/8 MOA, B2 , Custom , B3, Back, M)
:Lbl B1
:Disp Range in yards
:Prompt R
:(((((R*36)*2)*π)/360)/60)→M
:(1/4)→C
:Disp Drop (Inches)
:Prompt D
:((M/(C))→V
:(D/V)→A
:Disp A
:Clicks
:Pause
:ClrHome
:Goto A1
:Lbl B2
:Disp Range in yards
:Prompt R
:(((((R*36)*2)*π)/360)/60)→M
:(1/8)→C
:Disp Drop (Inches)
:Prompt D
:((M/(C))→V
:(D/V)→A
:Disp A
:Clicks
:Pause
:ClrHome
:Goto A1
:Lbl B3
:Disp Range in yards
:Prompt R
:(((((R*36)*2)*π)/360)/60)→M
:Disp 1 click and 100 yd
:Prompt C
:Disp Drop (Inches)
:Prompt D
:((M/(C))→V
:(D/V)→A
:Disp A
:Clicks
:Pause
:ClrHome
:Goto A1
:Lbl A2
:Menu( Conversions,Yds. to M., C1,In. to Cm., C2 , M. to Yds. , C3, Cm to In.,C4, Back, M)
:Lbl C1
:ClrHome
:Disp How many yards
:Prompt Y
:(Y*0.9144)→M
:Output(4,2, M)
:Output(5,2, Meters)
:Pause
:
:ClrHome
:Goto A2
:Lbl C2
:ClrHome
:Disp How many inches
:Prompt I
:(I*2.54)→C
:Output(4,2, C)
:Output(5,2, CenWebOffters)
:Pause
:ClrHome
:Goto A2
:Lbl C3
:ClrHome
:Disp How many meters
:Prompt M
:(M*1.0936133)→Y
:Output(4,2, Y)
:Output(5,2, Meters)
:Pause
:
:ClrHome
:Goto A2
:Lbl C4
:ClrHome
:Goto M
:Lbl A3
:Output (3,1, Click Calculator)
:Output (4,1, Version 1.0)
:Output (5,1, Burn Ballistics)
:Disp A different face
:Disp but the words
:Disp never change....
:Pause
:ClrHome
:Goto M
:
Here are directions on how to compile the program:
Go to this site: http://ti.zewaren.net/en/83p-creator.php
Paste the above code into the text box.
Name the program ClickCal
Write Bodegas Consummations in the comments box
Click Update
Click Save as 83P/8XP
Load program onto Calculator
Use Program
Report errors to me and request Improvements for the free Click Calculator
Refrain from asking me for the assembly version that calculates wind drift and bullet drop
.