2011-05-29 131 views

回答

4

方式一:

F2:: 
Values = pick,one of,these,choices 
StringSplit, ValueArray, Values, `, 
Random, rand, 1, 4 
SendInput % ValueArray%rand% 

我还没有找到一个很好的方式来获得数组的大小。

+0

大。谢谢。快速'ñ'肮脏的工作现在就好了。 我的字符串(幸运的)都没有逗号,所以有一个函数可以计算字符串中字符的出现次数,即逗号+ 1 =数组大小? – MockWhy 2011-05-30 00:11:34

+0

制作副本和使用RegExReplace(它给出一个计数)或使用像TF这样的扩展库的缺点,我还没找到。 – TrueWill 2011-05-30 00:54:28

2

如果您需要处理每个列表项中的逗号,则可以使用单独的分隔符。

F2:: 
    list := "Hi, dork.;Hello, titmouse.;Greetings, ass.;Sup, barnacle." 
    listsize := list#items(list, ";") 
    Random, rand, 1, %listsize% 
    MsgBox, % listGet(list, rand, ";") 
return 


; return item at said position in said list 
listGet(list,pos=1,del=",") { 
    StringSplit, item, list, %del% 
    return item%pos% 
} 


; returns # of items 
list#items(list, del=",") { 
    ifEqual, list,, return 0 
    StringReplace, var, list, % del,, useErrorLevel 
    return ErrorLevel+1 
} 

多个列表操作函数在这里: http://www.autohotkey.com/forum/topic3195.html

0

试试这个

Voice := ComObjCreate("SAPI.SpVoice") 

F2::  ;Press F2 
Random, rand, 1, 4 
goto, %rand% 

1: 
Voice.Speak("number 1") 
; Or you can use send 1 
return 

2: 
Voice.Speak("number 2?") 
return 

3: 
Voice.Speak("number 3") 
return 

4: 
Voice.Speak("number 4") 
return