HSPTV!掲示板

WinX = 600	
WinY = 600

R	= 200.0 ;半径
		
screen 0,WinX,WinY



repeat
	redraw 0
	color : boxf : color 255,255,255

	

	    
	角度+=1.0
	ラジアン=deg2rad(角度)

	Y	=  R*sin(ラジアン)
	X	=  R*cos(ラジアン)

	
;-----------------------------------------------Draw
color 255
	pos X+WinX/2	,Y+WinY/2				;+WinX/2、+WinY/のところが中心
	mes "●"

color 255,255,255
	pos WinX/2,WinY/2
	mes "G"

 	
;-----------------------------------------------Draw





	redraw 1
	await 16
loop