Own IWBasic 2.x ? -----> Get your free upgrade to 3.x now.........
Started by whitenite1, April 25, 2011, 10:29:47 am
0 Members and 1 Guest are viewing this topic.
SUB InPerimeter(int X1, int Y1, int X2, int Y2, OPT int iRange = 1), int If (Abs(X2 - X1) <= iRange) And (Abs(Y2 - Y1) <= iRange) Then Return 1 Else Return 0ENDSUB