okay guys,
She's 暮井 慧 (くれい けい Kurei, Kei) aka "プロ生ちゃん (Pronama chan)",
mascot of プログラミング生放送(Programming Live Broadcasting) aka "プロ生",
17 years old (high school student) in Tokyo,
belongs to a Computer science club in the school,
loves sports, born on January 11th.
あまさとさんのコメントを要約しますと↓こんな感じ。
xscreen 2: display 1
var x0=-1, y0
while 1: vsync
touch out m,x,y
if m then
if x0 >= 0 then
gline x0, y0, x, y
endif
x0 = x
y0 = y
else
x0 = -1
endif
wend
var ox=200,oy=100,rs=90,rm=100,rh=70
while 1:vsync
var h=val(mid$(time$,0,2))
var m=val(mid$(time$,3,2))
var s=val(mid$(time$,6,2))
var t=h*3600*m*60+s
var th=(t/86400)*4*pi()
var tm=(t/3600)*2*pi()
var ts=s/60*2*pi()
gcls
gline ox,oy,ox+sin(th)*rh,oy-cos(th)*rh
gline ox,oy,ox+sin(tm)*rm,oy-cos(tm)*rm
gline ox,oy,ox+sin(ts)*rs,oy-cos(ts)*rs,#red
wend