Euler's Method (c) Hidetake Jo <hjo@umich.edu>
--------------------------------------------------------------------------
compatability: 9850 and 9950
note: This again can be modified to be used on other models
         e-mail me if you need it on a specific calc.
--------------------------------------------------------------------------
Directions:(1) Enter the equation in Y1: slot under the graph menu
                 (2) Execute Program
                 (3) Enter X,Y,Delta X.
                 (4) For GD enter 0 or 1. 0 plots the graph, 1 shows consecutive x,y sets

Note: to see the next sequence of data sets push [EXE].
--------------------------------------------------------------------------
Improvement Plans 
(1)Underestimate, overestimate detector
(2)Crash prevention from 0 division during calculation
(3)Syncronous Display for Plot and Data display
--------------------------------------------------------------------------

Cls
"INITIAL X"?->A
"INITIAL Y"?->B
"DX"?->E
"G D"?->U
0->C
ClrText
Locate 1,2,"X:"
Locate 1,3,"Y:"
Lbl 1
A->X
B->Y
If U=0
Then Locate 3,2,X
Locate 3,3,Y_
Else If U=1
Plot X,Y
Line
IfEnd
(Y1*E)+B->B
A+E->A
Goto 1