FMSLogo, 80 77 bytes

[repeat ?[arc2 360/? 99 foreach list ask 1[arc2 360/?*?2 99 pos]pos "setpos]]

Usage

This is an explicit-slot template, which can be used by typing, for example

apply [...] [54 2]

into the Logo prompt, replacing [...] with the program above.

It can be used to draw the circle anywhere on the screen, but the radius is hardcoded (99).

To clear the screen use cs.

###Images

(FMSLogo also has a convenient command bitcopy for copying to clipboard. Example run:

pu bk 100 bitcopy 200 200 home pd

)

FMSLogo, 80 77 bytes

[repeat ?[arc2 360/? 99 foreach list ask 1[arc2 360/?*?2 99 pos]pos "setpos]]

Usage

This is an explicit-slot template, which can be used by typing, for example

apply [...] [54 2]

into the Logo prompt, replacing [...] with the program above.

It can be used to draw the circle anywhere on the screen, but the radius is hardcoded (99).

To clear the screen use cs.

Images

(FMSLogo also has a convenient command bitcopy for copying to clipboard. Example run:

pu bk 100 bitcopy 200 200 home pd

)

FMSLogo, 80 bytes

[repeat ?[arc2 360/? 99 run lput pos[setpos ask 1[arc2 360/?*?2 99 pos]setpos]]]

Usage

This is an explicit-slot template, which can be used by typing, for example

apply [...] [54 2]

into the Logo prompt, replacing [...] with the program above.

It can be used to draw the circle anywhere on the screen, but the radius is hardcoded (99).

To clear the screen use cs.

###Images

(FMSLogo also has a convenient command bitcopy for copying to clipboard. Example run:

pu bk 100 bitcopy 200 200 home pd

)

FMSLogo, 80 77 bytes

[repeat ?[arc2 360/? 99 foreach list ask 1[arc2 360/?*?2 99 pos]pos "setpos]]

Usage

This is an explicit-slot template, which can be used by typing, for example

apply [...] [54 2]

into the Logo prompt, replacing [...] with the program above.

It can be used to draw the circle anywhere on the screen, but the radius is hardcoded (99).

To clear the screen use cs.

###Images

(FMSLogo also has a convenient command bitcopy for copying to clipboard. Example run:

pu bk 100 bitcopy 200 200 home pd

)