AutoIT Trudny jezyk ?

[Senterse`]

Obojetnie, ktory latwiej, gdzie tutek do tego

[jackraymund]

ostatnio ktoś o to pytał, poszukaj w dziale

[RobeM]

jak ty liczysz na to że do każdego programu co chcesz zrobić ktoś ci napisze tutoriale czy dokładne instrukcje jak zrobić to się grubo mylisz , w ten sposób nie można się nauczyć niczego

[Senterse`]

OMG, ucze się dopiero i na poczatek chce miec

[Protecto]

Moja sugestia: Czytaj TEN tutek, aż zrozumiesz. A jak nie zrozumiesz to Googluj.

[Senterse`]

Gosciu pisal że mam zaczać od pomysłu na program..

[Protecto]

Znajdź w Google kurs AutoIT z ćwiczeniami jak chcesz się go dobrze nauczyć. I pamiętaj, TY jesteś swoim najlepszym nauczycielem.

[Sopelek997]

Pisałem nie dawno, bo ktoś potrzebował. Wystarczy poszukać.

 

Dim $spolgloska_char[17] = ['b', 'c', 'd', 'f', 'g', 'h', 'j', 'k', 'l', 'm', 'n', 'p', 'r', 's', 't', 'w', 'z']
Dim $samogloska_char[6] = ['a', 'e', 'i', 'o', 'u', 'y']
$spolgloska = Random(0, 1, 1)
$nick = ''
While 1
$nick = ''
For $a = 1 To 2
 For $i = 1 To Random(4, 8, 1)
  If $spolgloska = True Then
   $nick &= $spolgloska_char[Random(0, 16, 1)]
;~    If Random(1, 3, 1) = 1 Then $nick &= $spolgloska_char[Random(0, 16, 1)]
  Else
   $nick &= $samogloska_char[Random(0, 5, 1)]
  EndIf
  $spolgloska = Not $spolgloska
  If $i = 1 Then
   $duza_litera = StringRight($nick, 1)
   $nick = StringTrimRight($nick, 1)
   $nick &= StringUpper($duza_litera)
  EndIf
  If $spolgloska = True Then
   If Random(1, 3, 1) = 1 Then $nick &= $spolgloska_char[Random(0, 16, 1)]
   $i += 1
  EndIf
 Next
 $nick &= ' '
Next
MsgBox(64, '', $nick)
WEnd

generuje w miare dobre nicki. Możesz sobie go przeanalizować i dostosowywać do własnych potrzeb.