Round up function doesn't change anything ...

DECLARE FUNCTION ROUNDUP (X)

PI! = 3.141593

SCREEN 2 ' cause i'm used to

' Center

cx = 320
cy = 100

' R

R = 50

FOR i = 1 TO 360

' Angle :

A = i * PI! / 180

X = ROUNDUP(cx + COS(A) * R)

Y = ROUNDUP(cy + SIN(A) * R)

PSET (X, Y)

NEXT i

SLEEP

' Center

cx = 320
cy = 100


FOR i = 1 TO 360

' Angle :

A = i * PI! / 180

X = (cx + COS(A) * R)

Y = (cy + SIN(A) * R)

PSET (X, Y), 0

NEXT i

END

FUNCTION ROUNDUP (X)
IF X - INT(X) < .5 THEN
ROUNDUP = INT(X)
ELSE
ROUNDUP = INT(X) + 1
END IF

END FUNCTION