s = 16108088
k = s Mod 10000
Ttt = s Mod 100
m = s Mod 35
L = s Mod 10

X1 = Ttt
Y1 = k
X2 = L
Y2 = s

xd = X1 - X2
yd = Y1 - Y2

MsgBox xd
MsgBox yd

xs = X1 + X2
ys = Y1 + Y2

MsgBox xs
MsgBox ys

dot_product = X1 * X2 + Y1 * Y2
MsgBox dot_product


z_of_cross_product = X1 * Y2 - Y1 * X2
MsgBox z_of_cross_product