   ^main(doc,op)
{
var x = curpos.x-cursor.x;
curpos+=(sin(x/(bmultiply*2))*10*bscale)*curnorm;
} 