如何使用密钥向导
这个剧本以前主要是玩血的时候看小说用的。我是学博士的,所以用来解闷看小说。后来发现我也可以刷屏。
//这个脚本不用修改,设置page.txt就可以了。
//page.txt将在下面详细描述。
//在page.txt文件的第一行写一个数字,表示读取“+”的内容,* * *可以标记为9位。
//在要阅读的文章开头前一行加“+”,结尾下一行加“-”,就可以阅读+和-之间的文章。
//请按5.80以上的按钮,5.70可能会出错!
雷姆星
VBS迪姆fso,n
n=0
循环=0
文="page.txt "
VBS设置fso=CreateObject("Scripting。文件系统对象”)
VBS读数常数=1
VBS写作常数=2
VBS常数=8
//= = = = = = = = =阅读TXT文件内容= = = =大喊大叫,看小说,短篇,刷屏等。只要是文字都可以看= = = = = = = = = = = = = = =
设置myfile=fso.opentextfile(文,用于阅读)
VBS a=myfile.readline
i=mid(a,1,1)
Time1=mid(a,3,4)
if len(time 1)& lt;三
时间1=200
EndIf
循环=mid(a,8,1)
如果len(循环)=0
循环=0
EndIf
虽然是真的
VBS a=myfile.readline
If mid(a,1,1)="+"
n=n+1
如果asc(n)=asc(i)
转到主页
EndIf
EndIf
if my file . atendofstream =-1
SayString没有找到相关内容。请重置值或+-号的位置。
VBSCall MessageBox("未找到相关内容,重置值和+-号的位置")
EndScript
EndIf
结束时间
Rem main
虽然是真的
VBS a=myfile.readline
延迟时间1
If mid(a,1,1)=-"或myfile.atendofstream=-1
如果asc(循环)=48
EndScript
EndIf
转到星号
EndIf
say表达式a
按键13 1
结束时间
Page.txt文件样式
注意:
1.在密钥向导的Script子文件夹中创建一个新的page.txt文件。
2.在page.txt文件的第一行写一个数字,表示读取“+”的内容,* * *可以标9位。
3.你可以通过在第一行加上“+”和在最后一行的下一行加上“-”来阅读“+”和“-”之间的文章。
1,0500,1[读取第+个位置][间隔时间(毫秒)][循环与否,循环=1,无循环=0]
+1
桃花坞桃花庵,
桃花寺下的桃花仙子。
桃花仙子竞桃树,
摘桃花喝。
当你醒来时,你只是坐在花前。
喝醉了就来睡觉。
半醉半醒,日复一日,
鲜花年年盛开。
我希望老枯花酒房,
不想在马前低头。
这是汽车灰尘和马蹄的问题。
酒灯花枝隐士的命运。
如果你把圣人比作隐士,
一个在地上,一个在天上。
如果我们把华三比作车马,
我再忙也不能闲着。
人们嘲笑我疯了,
我嘲笑别人看不透。
我没有看到五个坟墓中的一个,
没有花,没有酒,没有锄头。
你好,朋友们
-
+2
小组QE,暴徒刷CK
-
+3
-
注意:我这里只加了三个+-s。可以自己添加。
嗯,你不用理解脚本的意思,只需要修改page.txt文件中的内容,就可以把+和-之间的文字改成你需要的。
获取一个page.txt快捷方式,放在桌面上。以后只要打开page.txt快捷方式,修改保存内容,就会有新的内容,不考虑脚本修改。全傻了。就这么简单!