My first real QB64PE game is up.

[Eugesippe]

Hello Eugesippe!

Thank you for the tip! I will try it out soon!

I find something shorter: 1 line less ! (j'ai trouvé qqchose de plus court: 1 ligne en moins !)

Code: (Select All)

Color _RGB(255, 255, 255)

For n = 0 To 7

    Locate 32, 95

    If n < 4 Then

        Print " Votre monocoque a été frappé par la foudre" + Left$("...", n)

    Else

        Color _RGB(255 - 64 * (n - 3), 255 - 64 * (n - 3), 255 - 64 * (n - 3))

        Print " Votre monocoque a été frappé par la foudre..."

    End If

    _Delay 1

Next n