Code: Select all
;-- Demo
Define ret$, i, n=4
Dim a(n-1)
For i = 0 To n-1
a(i) = i
Next
;Shuffle(a())
RandomizeArray(a())
ret$ = Str(a(0))
For i = 1 To n-1
ret$ + "," + Str(a(i))
Next
Debug ret$
Code: Select all
;-- Demo
Define ret$, i, n=4
Dim a(n-1)
For i = 0 To n-1
a(i) = i
Next
;Shuffle(a())
RandomizeArray(a())
ret$ = Str(a(0))
For i = 1 To n-1
ret$ + "," + Str(a(i))
Next
Debug ret$
There is no guarantee for other files.BarryG wrote:Is this reliable? Both files below exist on my PC but look at the return values. One is all zeros, and the other is in the future (year 2022)
Excellent! It also works in Russian.Marc56us wrote:The RegEx version
1 - qwertyйцукенQWERTYЙЦУКЕН
Code: Select all
a$ = "Anfängerfragen" ; German
Debug "String "+ a$ + " returns " + IsStrAlpha(@a$)
a$="expérience " ; French
Debug "String "+ a$ + " returns " + IsStrAlpha(@a$)
The virus will not use hex editor, and will not change "=" to "<>"J. Baker wrote:As Paul pointed out in another post (different topic), a "=" or "<>" can easily be changed in a hex editor, etc.
GeForce GTX 1080CELTIC88 wrote:i have temperature 55 c ? it's normal?
The runtime version of NVML ships with the NVIDIA display driver,infratec wrote:Have you download the dll
PureBasic compiler x64?CELTIC88 wrote:interesting
i have an error
No link to the final version?Mijikai wrote:Version 1.00
Finally