MA 3-5-8 kesişiminden al sat formülünü çalıştırmak istiyorum (kod hazır)

Merhaba, Kıvanç hocanın twitterda paylaştığı kodlardan birtanesini çalıştırmak istiyorum fakat başaramadım. Yardımcı olur musunuz?
Kodlar:

AL
h1:=mov(c,5,s);
h2:=mov(c,8,s);
h3:=mov(c,13,s);
k1:=cross(h1,h3);
k3:=barssince(cross(h1,h2));
k1 and 0<k3 and h1>h2

SAT
h1:=mov(c,5,s);
h2:=mov(c,8,s);
h3:=mov(c,13,s);
k1:=cross(h3,h1);
k3:=barssince(cross(h2,h1));
k1 and 0<k3 and h1<h2