Random between designated letters.

[IHI.II.IIVII.]

I want to random between a set of letters I want to send.

"Y", "O", and "U" are the letters.

If you don't understand what I am asking, please tell me.

[mr.underperson]

So create an array, each element being one letter.

Then create a $random_number.

Then simply spit out $array[$random_number].

-mu

[IHI.II.IIVII.]

Could you write out the actually script for me, array junk is new to me.

[mr.underperson]

Could you write out the actually script for me

Sure, simply deposit $100 in my PayPal account and I'll get right to it, sir.

array junk is new to me.

At one time, it was new to me, too.

Try searching the manual for "junk", or whatever, it's filled with useful examples.

This forum also has a search facility.

-mu

[4gotn1]

Sure, simply deposit $100 in my PayPal account and I'll get right to it, sir.

At one time, it was new to me, too.

Try searching the manual for "junk", or whatever, it's filled with useful examples.

This forum also has a search facility.

-mu

i'll do it for $95.99 ^.^ lol

[Lakes]

i'll do it for $95.99 ^.^ lol

You need to look at using StringSplit (with no delimiter) with all the letters of the alphabet in the string.

So if your String is "ABCDEF" then StringSplit wil return an array with each element being a letter.

So the element in $Array[1] would be A, in $Array[2] would be B etc

Then you need to use the Random function to generate a number between 1 and 26 and make this a variable to pick a letter from the array, like this $Letter = $Array($Random)

Use _StringInsert to put this letter back into your original string.

Read the Helpfile, look at the examples, post some code here.

[Xenobiologist]

Hi,

maybe this helps a bit :

Dim $letter_A[3] = ['Y','O','U']

For $i=0 To 5
    MsgBox(0,$i, $letter_A[Random(0,UBound($letter_A)-1, 1)])
Next

So long,

Mega

[herewasplato]

I want to [add/insert] random [letters/numbers/both?] between a set of letters I want to send.

"Y", "O", and "U" are the letters.

If you don't understand what I am asking, please tell me.

I'm not sure that I understand what you want - hence my edit of your quoted post.

Try this:

MsgBox(0, "", _SendRandomStuff("CAN YOU CODE", 3, 11))

;Send(_SendRandomStuff("CAN YOU CODE", 3, 11))

Func _SendRandomStuff($var, $min, $max)
    Local $varARRAY = StringSplit($var, "")
    Local $SRS = ""
    For $i = 1 To $varARRAY[0]
        Local $stuff = ""
        For $ii = 1 to (Random($min, $max, 1))
            $stuff = $stuff & Chr(Random(Asc("a"), Asc("z"), 1))
        Next
        $SRS = $SRS & $varARRAY[$i] & $stuff
    Next
    Return $SRS
EndFunc   ;==>_SendRandomStuff

The MsgBox is just for ease of testing.

Comment it out and uncomment the "Send" line.

You can change the "3" and the "11" when you call the UDF.

For the example above, 3 is the minimum number of lower cased letters that the UDF will insert between your letters... 11 is the maximum number inserted.

[SmOke_N]

@plato - You're a better man than I if that is what he actually wants. I have read that thing 10 x's and still don't get it, and example on his part would have been great, I was assuming he only wanted to shuffle Y/O/U ... but that makes no sense either .

[Simucal]

Seriously. The trend lately seems to be: "How can I ask a question in the most cryptic way possible and provide the least amount of relevant examples/information at the same time?"

[herewasplato]

...I was assuming he only wanted to shuffle Y/O/U ... but that makes no sense either .

Thanks...

In case the OP only wants to scramble:

http://www.autoitscript.com/forum/index.ph...indpost&p=53837

[You might have to "Tidy" the Or_ to Or _]

:-)

[mr.underperson]

Seriously. The trend lately seems to be: "How can I ask a question in the most cryptic way possible and provide the least amount of relevant examples/information at the same time?"

Very observant, and also very true. I read (another) post on this forum over ten times earlier today, trying to figure out what the poster wanted (which *looked* like it would have been easy) before just giving up.

To my mind, it's the one asking the question that should be doing the leg-work, examples, sample code, clearly defining the task and goal, etc. But usually it takes umpteen posts from other members to even establish these basics.

crazy.

-mu

[JoshDB]

I want to random between a set of letters I want to send.

"Y", "O", and "U" are the letters.

If you don't understand what I am asking, please tell me.

I think he means that he wants to send three sets of random letters between Y, O, and U.

$Letters = 5 ; Number of letters between Y, O, and U.

Global $Result

For $i = 1 To $Letters*2
     $Result = $Result & Chr(Random(65,90,1))
Next

$Result = "Y" & StringLeft($Result,$Letters) & "O" & StringRight($Result,$Letters) & "U"

MsgBox(0,"Result",$Result)

Edited May 29, 2006 by JoshDB

[herewasplato]

...between Y, O, and U...

I like your use of

Chr(Random(65,90,1))

and I thought of using it, but was too lazy to look up the numbers...

I did not pay much attention to the word "between".

While 1
    MsgBox(0, "", _SendRandomStuff("YOU", 4, 22))
WEnd

Func _SendRandomStuff($var, $min, $max)
    Local $varARRAY = StringSplit($var, "")
    Local $SRS = ""
    For $i = 1 To ($varARRAY[0] - 1)
        Local $stuff = ""
        For $ii = 1 to (Random($min, $max, 1))
            $stuff = $stuff & Chr(Random(Asc("!"), Asc("~"), 1))
        Next
        $SRS = $SRS & $varARRAY[$i] & $stuff
    Next
    Return $SRS & StringRight($var, 1)
EndFunc   ;==>_SendRandomStuff

[JoshDB]

Well I'm glad that was cleared up... Since you did it yourself...

[IHI.II.IIVII.]

To everyone who doesn't understand, I'm sorry.

Example of what I want.

Send($var)

$var = Y, O, U (one of the three letters)

I would like the letter it sends to be random between the three.

[slightly_abnormal]

Maybe..

DIm $Y[4]
$Y[1]=Send('Y')
$Y[2]=Send('O')
$Y[3]=Send('U')

For $i= 1 to 3
Send(Random($Y[1],$Y[$i]))
Next

"YOU000"... very random haha

well.. i thought it would work. :/

Edited May 29, 2006 by slightly_abnormal

[The Kandie Man]

Maybe..

Dim $Y[4]
$Y[1]=Send('Y')
$Y[2]=Send('O')
$Y[3]=Send('U')

For $i= 1 to 3
Send(Random($Y[1],$Y[$i]))
Next

"YOU000"... very random haha

well.. i thought it would work. :/

You had the right idea, i just edited your code a bit:

hotkeyset("{end}","terminate")

sleep(2000)

DIm $Y[4]
$Y[1]='Y'
$Y[2]='O'
$Y[3]='U'

While 1
    
Send($Y[Random(1,3,1)])

sleep(30)

Wend

Func terminate()
    Exit    
Endfunc

Press the End key to make it stop.

[herewasplato]

...I would like the letter it sends to be random between the three.

Stealing code from those above, try just these two lines:

$Y = StringSplit("YOU", "")
Send($Y[Random(1, 3, 1)])

[IHI.II.IIVII.]

Stealing code from those above, try just these two lines:

$Y = StringSplit("YOU", "")
Send($Y[Random(1, 3, 1)])

Perfect! Thanks to everyone that helped