PKGrapher 1.0
David Watson, R.Ph.  2/2/97
d.watson@baylordallas.edu

Requires: integer cbasPad V 0.67

Summary: Quick & dirty experiment showing the graphing
capabilities of the Pilot. User enters dose, Volume of 
Distribution (Vd), Elimination Constant (KE), Absorption 
Constant (Ka), Number of hours to graph (x axis) and number
of tics on the y axis.

The result is a simulation of the absorption and elimination
that would be expected assuming one compartment model.

Tap the graph and you will be asked if you want another
simulation.

Changing the dose, Vd, Ke and Ka will alter the curve.
Try the following:
Drug         Dose  Vd   Kel     Ka      Max  Max
             (mg)  (L)  (hr-1)  (hr-1)  Hr   mcg
Vancomycin   1000  35   0.113   .25     24   40
Gentamicin    100  21   0.35    .5      24   15
Penicillin    500  35   0.99    1       24   10
Procainamide 1000 235   0.198   1       24   5


Note: The Ka must be greater than the Ke or else the graph looks strange.

Here's the formula:

Cp = (Dose/Vd) * (e-Ke*t - e-Ka*t)

Where Cp   = Concentration in plasma
      Dose = dose in mg
      Vd   = Volume of distribution
      t    = time following dose
      Ke   = elimination constant ( from 0.0 to 1.0 )
      Ka   = absorption constant

WARNING: This is for demonstration purposes.  If you use this
program in your practice, the secretary will disavow any knowledge of
your actions.  Good Luck!

Thanks to Neil Fred Picciotto for the inspiration
