PI	OCTA	#400921FB54442D18	\relax $\pi$
K0	OCTA	#3ff0000000000000	1.\qquad Koeffizienten
	OCTA	#3fc5555555555555	1./3!
	OCTA	#3f81111111111111	1./5!
	OCTA	#3f2a01a01a01a01a	1./7!
	OCTA	#3ec71de3a556c734	1./9!
Kn	OCTA	#3e5ae64567f544e4	1./11!
x	IS	$0
f	IS	$1	Rest $f$
N	IS	$2      Quotient $N$
f_sqr	IS	$3	\relax $f^2$
pK	IS	$4	Zeiger auf $K_0$
offset	IS	$5	Offset f"ur Koeffizienten
ko	IS	$6	aktueller Koeffizient
pi	IS	$7
temp	IS 	$8

sin	GETA	temp,PI
	LDO	pi,temp,0	\relax $\pi$ laden
	FREM	f,x,pi		Rest $f$ bestimmen
	FDIV	N,x,pi          Quotient $N$ bestimmen
	FIX	N,N		nun ist $x = N\cdot\pi + f$
	FMUL	f_sqr,f,f	\relax $f^2$ bestimmen
	GETA	pK,K0	Adresse der Koeffizienten
	SET	offset,(Kn-K0) 	Offset von $K_n$	
	LDO	x,pK,offset      Startwert $K_n$
	SUB	offset,offset,8
1H	LDO	ko,pK,offset	
	FMUL	x,x,f_sqr       Horner-Schema mit $f^2$
	FSUB	x,ko,x
	SUB	offset,offset,8
	PBNN	offset,1B
	FMUL	x,x,f
	BEV 	N,1F		\relax$\cdot(-1)^N$, falls gerade
	INCH	x,#8000		Vorzeichen invertieren
1H	POP	1,0