Alright, I made a few weeks ago a Guitar Hero, also I find it's working really smoothly and the way I want it to work, I have had friends telling me that it was not fast enough. So I am calling for your help on making the program run even faster ! :D

Feel free to copy the program of course.

```
:3→θ
:Output(2,1,"---------------
:Output(8,2,"-- -- -- -- --
:For(I,3,8
:For(J,1,16,3
:Output(I,J,"!
:End:End
:DelVar XDelVar ∟GDelVar S
:Output(1,5,"SCORE :
:Lbl 2
:Output(1,12,S
:Output(1,1,θ
:If no(θ:Goto G // Lbl G being the game over
:X+1→X
:Ans→dim(∟G
:randInt(1,5→∟G(X
:For(I,3,7
:If X+2>I
:Output(I,3∟G(X+2-I)-1," // 2 spaces
:If X+3>I
:Output(I,3∟G(X+3-I)-1,"**
:End
:getKey→K
:If X>6:Then
:If K=10+∟G(X-5
:Then:S+1→S
:Else:θ-1→θ
:End:End
:Goto 2
```