Fix 2
Lbl M
ClrHome
Menu("DXMCalc","Enter Weight",1,"Calc in mg",2,"Calc in Tsp",3,"Calc in X/100",4,"Exit",5
Lbl 1
Input ("Enter weight:",L
L*.45üK
ClrHome
Goto M
Lbl 2
ClrHome
Output(1,1,"1. 
Output(1,4,1.5K
Output(1,10,"-
Output(1,11,2.5K
Output(2,1,"2. 
Output(2,4,2.6K
Output(2,10,"-
Output(2,11,7.5K
Output(3,1,"3. 
Output(3,4,7.6K)
Output(3,10,"-
Output(3,11,15K
Output(4,1,"4. ù
Output(4,5,15K
Pause 
Goto M
Lbl 3
ClrHome
Output(1,1,"1. 
Output(1,4,1.5K/15
Output(1,10,"-
Output(1,11,2.5K/15
Output(2,1,"2. 
Output(2,4,2.6K/15
Output(2,10,"-
Output(2,11,7.5K/15
Output(3,1,"3. 
Output(3,4,7.6K/15
Output(3,10,"-
Output(3,11,15K/15
Output(4,1,"4. ù
Output(4,5,15K/15
Pause 
Goto M
Lbl 4
ClrHome
Input ("Enter dose in mg:",D
ClrHome
Output(1,1,D/708.8*100
Output(1,6,"ô/Ð Of 8oz
Output(2,1,D/354.4*100
Output(2,6,"ô/Ð Of 4oz
Pause 
Goto M
Lbl 5
DelVar D
DelVar K
DelVar L
Float
Stop