Como gerar a função y=a sin (kx)

k = 1 (slider from 1 to 5, step 1)
t = 59.2 (slider from 0 to 500, step 0.1)
a = 2 (slider from 1 to 5, step 1)
B = (0, 0)
f(x) = sin(x + t)
c = CurveCartesian(t, sin(t), t, 0, 50)
A: (0, a * sin(k * t))
C: (a * cos(k * t), a * sin(k * t))
g = Segment(A, C)
h = Function(a * sin(k * (x + t)), -1000, 0)
e = Segment(B, A)
d = Circle(B, a)
texto1: "Função f=" + h
i: y = a + 0.5
j: y = -1 * a - 0.5
D = Intersect(i, l)
E = Intersect(j, l)
F = Intersect(b, i)
G = Intersect(b, j)
polígono1, d_1, f_1, g_1, e_1 = Polygon(D, F, G, E)
H = Intersect(d, a_2, 2)
p = CircleArc(B, H, C)