A Scalar Multiplication Algorithm for Elliptic Curve Cryptosystem