screen 0,800,600
    title "ひまわりの観察"
    gradf 0,0,800,600,1,$0066ff,$22aaff

    color 100,200,50
    boxf 190,150,210,600
    boxf 540,200,560,600

buffer 1,200,200
    color
    boxf
    color 255,255,255
    circle 20,20,180,180

buffer 2,200,200
    color 200,100,50
    boxf
    color 100,50,0
    
        repeat 40
        line 10*cnt,0,10*cnt-200,200
        line 10*cnt-200,0,10*cnt,200
        loop

    gmode 4,200,200,255
    color 255,255,255
    pos 0,0
    gcopy 1,0,0,200,200
    

buffer 3,300,300
    color
    boxf
    color 255,255,100
    circle 130,10,170,290,1

gsel 0
    gmode 2,300,300

    repeat 19
    pos 200,150
    grotate 3,0,0,double(cnt)*0.174
    loop


    repeat 19
    pos 550,200
    grotate 3,0,0,double(cnt)*0.174
    loop
    
    gmode 2,200,200
    pos 100,50
    gcopy 2,0,0,200,200

    pos 450,100
    gcopy 2,0,0,200,200

    stop