GG BASIC - wait and random functions

[MatBasic]

:cheer: thanks for the new version!

here is some feedbacks (tested on iPhone 6 and iOS 9.3.5) :

- "Paste" works only in one case: if I do "select all" before
- and "Select All" doesn't work
- I cannot save any program on the server. I got error "File name already exist or general error". But the file doesn't exist yet and name is a new one.

+ new feature: maybe a "compile" button? to check the syntax

my code is running without any visible error
and it stops after 20 seconds but nothing has been displayed nor spoken

May have I some help, please ?

Code:

'initialisation Cls $old_draw=0 'chords $chords[0]="A" $chords[1]="B" $chords[2]="C" $chords[3]="D" $chords[4]="E" $chords[5]="F" $chords[6]="G" $chords[7]="Am" $chords[8]="Bm" $chords[9]="Cm" $chords[10]="Dm" $chords[11]="Em" $chords[12]="Fm" $chords[13]="Gm" $chords[14]="A#" $chords[15]="C#" $chords[16]="D#" $chords[17]="F#" $chords[18]="G#" 'name of chord for speech $chords_name[0]="A" $chords_name[1]="B" $chords_name[2]="C" $chords_name[3]="D" $chords_name[4]="E" $chords_name[5]="F" $chords_name[6]="G" $chords_name[7]="A minor" $chords_name[8]="B minor" $chords_name[9]="C minor" $chords_name[10]="D minor" $chords_name[11]="E minor" $chords_name[12]="F minor" $chords_name[13]="G minor" $chords_name[14]="A sharp" $chords_name[15]="C sharp" $chords_name[16]="D sharp" $chords_name[17]="F sharp" $chords_name[18]="G sharp" 'loop start Cls 'make a draw $draw=Rnd(0,18) 'if same draw as before return to "make a draw" If($draw=$old_draw) Then Goto(49) $old_draw=$draw Print(50, 50, $chords[$draw], 20, 1) Render Speech($chords_name[$draw]) Wait(2) 'go to "loop start" Goto(47) End