形状を配置するための式を登録します。
//**********************************************************************************
#macro Locus_function(Mv,Mh,Sp,Func_type)
#switch (Func_type)
#case(0) #local Mv=radians(90); #local Mh=6/5*cos(Sp)+1-sin(Sp); #break
#end
#end
//**********************************************************************************
