Sorry your browser is not supported!

T = timer()
do
		
			//for abc = 1 to 45 step 1
				Elapsed = ((timer() - T)/1000)
				//if abc => 45
				///	abc = ((abc)*(-1))
				//endif
				if Elapsed > 1
					while (treeRotatePosition > -45) && (treeRotatePosition < 0)
						inc treeRotatePosition
						zrotate object mapSize*mapSize + 301, treeRotatePosition
						Elapsed = 0	
					endwhile
					while  (treeRotatePosition < 45) && (treeRotatePosition > 0)
						dec treeRotatePosition
						zrotate object mapSize*mapSize + 301, treeRotatePosition
						Elapsed = 0	
					endwhile 					
				endif

loop

make object box 1,50,10,10

do
    for a = -45 to 45
        zrotate object 1,a
        wait 10
    next a
    wait 100
    for a = 45 to -45 step -1
        zrotate object 1,a
        wait 10
    next a
    wait 100
loop

autocam off
make object box 1,1,20,1
offset limb 1,0,0,10,0
position camera 0,10,-20

nSwingTime = timer()
nSwingDirection = 1

do
    ` main loop, do other stuff here
    
    if timer() > nSwingTime + 10
        nSwingTime = timer()
        zrotate object 1,object angle z(1) + nSwingDirection
        if object angle z(1) = 45 then nSwingDirection = -1
        if object angle z(1) = -45 then nSwingDirection = 1
    endif
loop