start:
pause
put climb bir tree
put climb tree trunk
pause 
put climb pine tree
put climb tree trunk
goto fir1


stand2:
pause
put stand
goto fir2

fir1:
pause
put climb second fir tree
match trunk1 [Langenfirth, Up a Swaying Fir Tree]
match stand2 You start up the tree, but slip after a few feet and fall to the ground!
match fir2 Roundtime
matchwait
waitfor roundtime

trunk1:
pause
put climb trunk 
match fir2 [Langenfirth, Blufe Path]
match trunk1 Roundtime
matchwait

stand3:
pause
put stand
goto beg

fir2:
pause
put climb second fir tree
match trunk2 [Langenfirth, Up a Swaying Fir Tree]
match stand3 You start up the tree, but slip after a few feet and fall to the ground!
match beg Roundtime
matchwait
waitfor roundtime


trunk2:
pause
put climb trunk
match beg [Langenfirth, Blufe Path]
match trunk2 Roundtime
matchwait

beg:
pause 70
goto start