Setvirtualresolution(640,480)
ResetTimer()
//Select 6 random lottery numbers (range 1 to 49)
Dim number[6]
For i=1 to 6
number[i]=Random(1,49)
Next i
//Display the results
Repeat
For i=1 to 6
Print("Number "+Str(i)+" is "+Str(number[i]))
Next i
Sync()
Until Timer()>18
End
//Q. How can the program be changed so that all the numbers are different?
Help make AGK better by submitting an example for this command! (All examples are subject to approval)