今天是第一次弄 想在大厅刷屏收人 但因为都能刷出来 就是中文不显示 哪位高手教一下我 下面是源代码 高手帮忙看看 我这是第一次弄 学了2个点啊
UserVar str1="这是自动喊的第1句话" 请输入自动叫喊的第1句话
UserVar str2="这是自动喊的第2句话" 请输入自动叫喊的第2句话
UserVar str3="这是自动喊的第3句话" 请输入自动叫喊的第3句话
UserVar str4="这是自动喊的第4句话" 请输入自动叫喊的第4句话
UserVar str5="这是自动喊的第5句话" 请输入自动叫喊的第5句话
UserVar Yanshi=3000 两句喊话之间的等待时间，1秒钟是1000
//****************设置结束*****************
Rem go
SayString str1
KeyPress 13,1
Delay Yanshi
Dim 变量
Dim 变量ww
Plugin ww = Window.GetKeyFocusWnd()
Plugin Bkgnd.KeyPress(ww, 13)
SayString str2
KeyPress 13,1
Delay Yanshi
SayString str3
KeyPress 13,1
Delay Yanshi
SayString str4
KeyPress 13,1
Delay Yanshi
SayString str5
KeyPress 13,1
Delay Yanshi
//等待半分钟后，进行下一轮叫卖
For 1
     Delay 1000
EndFor
Goto go
Dim 变量
Dim 变量ww
Plugin ww = Window.GetKeyFocusWnd()
Plugin Bkgnd.KeyPress(ww, 13)