small thing but it makes the authors and myself confuse to use wrong switch sometimes, the template table has left slingshot sound for right slingshot and vice et versa, please fix that small typo 
Sub RightSlingShot_Slingshot
PlaySound "left_slingshot", 0, 1, 0.05, 0.05
RSling.Visible = 0
RSling1.Visible = 1
sling1.TransZ = -20
RStep = 0
RightSlingShot.TimerEnabled = 1
gi1.State = 0:Gi2.State = 0
End Sub
Sub RightSlingShot_Timer
Select Case RStep
Case 3:RSLing1.Visible = 0:RSLing2.Visible = 1:sling1.TransZ = -10
Case 4:RSLing2.Visible = 0:RSLing.Visible = 1:sling1.TransZ = 0:RightSlingShot.TimerEnabled = 0:gi1.State = 1:Gi2.State = 1
End Select
RStep = RStep + 1
End Sub
Sub LeftSlingShot_Slingshot
PlaySound "right_slingshot",0,1,-0.05,0.05
LSling.Visible = 0
LSling1.Visible = 1
sling2.TransZ = -20
LStep = 0
LeftSlingShot.TimerEnabled = 1
gi3.State = 0:Gi4.State = 0
End Sub
Sub LeftSlingShot_Timer
Select Case LStep
Case 3:LSLing1.Visible = 0:LSLing2.Visible = 1:sling2.TransZ = -10
Case 4:LSLing2.Visible = 0:LSLing.Visible = 1:sling2.TransZ = 0:LeftSlingShot.TimerEnabled = 0:gi3.State = 1:Gi4.State = 1
End Select
LStep = LStep + 1
End Sub