Sub Avvia(Parola As String)
Motore("",Parola)
End Sub
Sub Motore(Fisso As String, Variabile As String)
Dim S As String
For i=0 To Variabile.Length-1
Log(Fisso & Variabile.CharAt(i))
S=Variabile.SubString2(0,i) & Variabile.SubString2(i+1,Variabile.Length)
Motore(Fisso & Variabile.CharAt(i),s)
Next
End Sub
e tira fuori parole sensate?
il mio sistema trova tutte le parole possibili con le lettere della parola iniziale, e ci mette pochi centesimi di secondo
e tira fuori parole sensate?
il mio sistema trova tutte le parole possibili con le lettere della parola iniziale, e ci mette pochi centesimi di secondo
Mica perde il focus, ho usato <uses-permission android:name="android.permission.SYSTEM_ALERT_WINDOW"/>
cosi rimane fluttuante e mantiene il controllo il gioco
Mica perde il focus, ho usato <uses-permission android:name="android.permission.SYSTEM_ALERT_WINDOW"/>
cosi rimane fluttuante e mantiene il controllo il gioco
A questo punto, vista la difficoltà di trovare un algoritmo veloce, vista l'utilità e la flessibilità (ci si possono sviluppare vari giochi in diverse lingue) la venderei.