hment ".\plugin","SRLib0.txt"
Hwnd = Plugin.Window.MousePoint()
diyige = Hwnd
jingji =Hwnd
    BeginThread 延迟
Plugin.SR.SetLib ".\plugin\SRLib0.txt"
UserVar chongwushijian = 1 "shijian"
UserVar chongwu=DropList{"选项1":0|"选项2":1}=0 "1为开始"
UserVar chongwu1=DropList{"选项1":0|"选项2":1}=0 "1为开始"
UserVar chongwu2=DropList{"选项1":0|"选项2":1}=0 "1为开始"
UserVar chongwu3=DropList{"选项1":0|"选项2":1}=0 "1为开始"
UserVar chongwu4=DropList{"选项1":0|"选项2":1}=0 "1为开始"
UserVar chongwu5=DropList{"选项1":0|"选项2":1}=0 "1为开始"
UserVar chongwu6=DropList{"选项1":0|"选项2":1}=0 "1为开始"
UserVar chongwu7=DropList{"选项1":0|"选项2":1}=0 "1为开始"
UserVar chongwushengji=DropList{"选项1":1|"选项2":2}=0 "设置内容"
UserVar gujjc=DropList{"选项1":0|"选项2":1}=0 "古堡的竞技场"
UserVar guaijjc=DropList{"选项1":0|"选项2":1}=0 "打怪的竞技场"
UserVar made=1 "次数"
UserVar shuoci = 1 "输入喊话时间"
UserVar guxiu=1 "guxiu"
UserVar fanshi=DropList{"gubao":1|"gubao":2|"gubao":3|"gubao":4}=1 "fanshi"
UserVar guai=DropList{"guai1":1|"guai2":2|"guai3":3|"guai4":4|"guai5":5}=0 "guaiwei"
UserVar moshi=DropList{"模式1":1|"模式2":2}=0 "选择模式"
UserVar yaoshi=DropList{"hong":1|"hong":2|"hong":3}=0 "选择钥匙"
UserVar chushi=DropList{"0层":1|"50层":2|"100层":3}=0 "选择层数"
UserVar xunhuan = 1 "请输入上古堡几层或者打几次怪后修理装备"
UserVar 关闭战斗显示 = 0 "关闭战斗显示"
UserVar 不关闭战斗显示 = 1 "不关闭战斗显示"
UserVar guai=DropList{"喝蓝百分之80":1|"喝蓝百分之50":2|"喝蓝百分之20":3|"不喝蓝":4|"guai5":5}=0 "选择蓝条到什么地方喝蓝药"
UserVar 吃蓝=DropList{"喝蓝百分之80":1|"喝蓝百分之50":2|"喝蓝百分之50":3|"喝蓝百分之50":4|"喝蓝百分之50":5|"喝蓝百分之50":6|"喝蓝百分之50":7|"喝蓝百分之50":8|"喝蓝百分之20":9|"不喝蓝":10}=0 "选择蓝条到什么地方喝蓝药"
UserVar 吃红=DropList{"喝蓝百分之90":1|"喝红百分之80":2|"喝红百分之80":3|"喝红百分之80":4|"喝红百分之80":5|"喝红百分之80":6|"喝红百分之80":7|"喝红百分之80":8|"喝红百分之50":9|"不喝红":10}=0 "选择血条到什么地方喝红药"
UserVar neirong = 1 "ca"
UserVar jiange = 15000 "shijian"
UserVar gubaoshijian = 1000 "1秒=1000毫秒，填写的单位为毫秒"
UserVar gude = 10 "设置打多少次竞技场"
UserVar shifouhanhua=Droplist{"shi":1|"fou":2}=0 "ga"
UserVar xinxin=Droplist{"shi":1|"fou":2}=0 "ga"
UserVar daguaijingji=1 "打怪竞技场"
UserVar xuelan=DropList{"选项1":1|"选项2":2}=0 "新血蓝"
UserVar xueliang = 1 "血的量"
UserVar lanliang = 1 "蓝的量"
If xuelan = 2 then
Dim a
a=InputBox ("请输入你搜索到的地址,记住，在你的地址前要加上&H","血的地址","&H")
C=a
ha = Plugin.Memory.Read16Bit(Hwnd, C)
dim b
b=InputBox ("请输入你搜索到的地址,记住，在你的地址前要加上&H","蓝的地址","&H")
D=b
ha2 = Plugin.Memory.Read16Bit(Hwnd, D)
End If
X1 = time
X2=DateAdd("n",daguaijingji,X1)
If xinxin = 1 then
tisi = Plugin.WindowEx3.CreateTextRgn(0,0,0,500,18)
    Call Plugin.WindowEx3.SetTextRgnStyle(tisi,"60717B","000000","Fixedsys",10,0,1)
    Call Plugin.WindowEx3.SetWindowState(tisi,8)
    BeginThread 信息
ElseIf xinxin = 2 then
End If
If shifouhanhua = 1 then

ElseIf shifouhanhua= 2 then
End if
DimEnv jingji
BeginThread 竞技场打断1
S1=time
S2 = DateAdd("n", chongwushijian, S1) 
ziti = neirong
shijian = jiange
dadeguai = 0
h=0
l=0
zhuangbie=0
DimEnv ziti
DimEnv diyige
DimEnv shijian
DimEnv dadeguaio
DimEnv ho
DimEnv lo
DimEnv zhuangbieo
DimEnv tisi
DimEnv STR
DimEnv STA
DimEnv Hwnd
Dim gubaoshijian
Dim chongwushijian
dim S1
If fanshi=1 then
 gosub 打怪模式
 ElseIf fanshi =2 then
 gosub 古堡模式
 ElseIf fanshi =3 then
 gosub 竞技场模式
 ElseIf fanshi =4 then
 gosub 副本模式
 End If
sub 打怪模式
Rem guaijixu