Private Sub tmrEnemyLeft_Timer() If blnShit = True Then picEnemy.Left = picEnemy.Left - 2 ' Move 2px Left til End End If If picEnemy.Left = 0 Then tmrEnemyLeft.Enabled = False tmrEnemyLeft.Interval = 0 blnShit = False tmrEnemyRight.Enabled = True End If txtDebug.Text = txtDebug.Text & "Enemy Position = " & picEnemy.Left & vbCrLf End Sub Private Sub tmrEnemyRight_Timer() If blnShit = False Then picEnemy.Left = picEnemy.Enabled + 2 ' Move 2px Right til End End If If picEnemy.Left = 264 Then tmrEnemyLeft.Enabled = True blnShit = True tmrEnemyRight.Enabled = False End If txtDebug.Text = txtDebug.Text & "Enemy Position = " & picEnemy.Left & vbCrLf End Sub