Poly
·
Table of Contents
Calculates polynoms.
Input data #
Parameter | Description |
---|---|
Xo | start value |
Dx | step size |
Grag | the grad of the polygon |
a | polynom coefficients |
Sample Data #
Xo = -4
Dx = 1
Grad= 5
a(5)=1
a(4)=4
a(3)=-4
a(2)=-34
a(1)=-45
a(0)=18
Poly.af #
PROGRAM LIST
File : Poly
*** P0
MAC AC “Xo?” HLT “Xo
= #”
GSBP2
X↔M18 “Dx?” HLT “Dx
= #”
GSBP2
X↔M19 “Grad?” HLT “G
rad= #”
GSBP2
Min0F 16 Min00
LBL1
15 - MR00 =
x=F GOTO2
- MR0F X↔Y - 1 =
Min2F “a( AR2F )
?” HLT “a( AR2F
)=#”
GSBP2
IND Min00
DSZ GOTO1
LBL2
16 Min00 AC Min17
MR18 × IND MR00 =
Min1F
LBL3
DSZ IND
MR00 + MR1F = × MR18
= Min1F 1 M+17 MR17
+ 1 =
x=F GOTO4
GOTO3
LBL4
DSZ IND
MR00 + MR1F = FIX2 “
f( AR18 )= #”
GSBP2
PAUSE MR19 M+18
GOTO2
···155 steps
*** P2
SAVE invEXE
···3 steps
Download Poly.af
Author #
Michael Malien, Facebook