Causes Divide by Zero Error

[nonkit]

With Small Basic v1.2, Shapes causes divide by zero error (as follows) when to draw rectangle.

Attempted to divide by zero. 

at System.Decimal.FCallDivide(Decimal& d1, Decimal& d2) 
at Microsoft.SmallBasic.Library.Primitive.Divide(Primitive divisor) 
at Microsoft.SmallBasic.Library.Primitive.op_Division(Primitive primitive1, Primitive primitive2) 
at _SmallBasicProgram.math_cartesiantopolar() 
at _SmallBasicProgram.shapes_calcrotatepos() 
at _SmallBasicProgram.normalizepos() 
at _SmallBasicProgram.waittoreleases() 
at _SmallBasicProgram.domenu() 
at _SmallBasicProgram.doobject() 
at _SmallBasicProgram._Main()

[nonkit]

Fixed.