//初始化，自动种植的坐标
x = -1
y = -1
d1 = -1
d2 = -1
v = -1
//选中某项无需启动赋值效果
Event Form1.ComboBox1.SelectChange
    If Form1.ComboBox1.Listindex = 0 Then 
     //紫斑风铃 2小时 v = 22
        txtr = "紫斑风铃"
		x = 303
        y = 378
        v = 24
    ElseIf Form1.ComboBox1.Listindex = 1 Then
     	//百合花 45分钟 v = 7
        txtr = "百合花"
        x = 295  
        y = 450
        v = 7
    ElseIf Form1.ComboBox1.Listindex = 2 Then
     	//马蹄莲 2小时 v = 24
        txtr = "马蹄莲"
        x = 311 
        y = 516
        v = 24
    ElseIf Form1.ComboBox1.Listindex = 3 Then
    	//红掌  25分钟 v = 5
    	txtr = "红掌"
    	x = 294 
        y = 316
        d1 = 414
        d2 = 589
        v = 5
    ElseIf Form1.ComboBox1.Listindex = 4 Then
    	//菊花  15分钟 v = 3
    	txtr = "菊花"
        x = 303
        y = 378
        d1 = 414
        d2 = 589
        v = 3
    ElseIf Form1.ComboBox1.Listindex = 5 Then
    	//蔷薇 9分钟  v = 2
    	txtr = "蔷薇"
    	x = 295 
        y = 450
        d1 = 414
        d2 = 589
        v = 2
    ElseIf Form1.ComboBox1.Listindex = 6 Then
    	//君子兰 1小时10分钟 v = 14
    	txtr = "君子兰"
        x = 311 
        y = 516
        d1 = 414
        d2 = 589
        v = 14
//    ElseIf Form1.ComboBox1.Listindex = 2 Then
//    	txtr = "薰衣草"
    	
    End If                
End Event

//刷牵牛花的坐标
x1 = 294
y1 = 316

//培育
x2 = 645
y2 = 631

//输入
x3 = 486
y3 = 431

//确定
x4 = 442
y4 = 551


//加速
x5 = 580
y5 = 625

//携带
x6 = 350
y6 = 630

//打开远程商店
x7 = 638
y7 = 628

//物品栏第一格
x8 = 472
y8 = 345

//保镖坐标
bbx = 44
bby = 199