Delay 500
				
			//点击加速
			MoveTo x5, y5
			LeftClick 1
			
			Delay 500
			
			//点击确定
			MoveTo x4, y4
			LeftClick 1
				
			Delay 800
				
			//点击携带
			MoveTo x6, y6
			LeftClick 1
				
			//输入99个
			MoveTo x3, y3
			LeftClick 1
			SayString ("99")
				
			//点击确定
			MoveTo x4, y4
			LeftClick 1
		Next
		
		//退出种植菜单
		KeyPress "H", 1
		
		Delay 700
		
		//打开包裹
		KeyPress "B", 1
		
		Delay 500
		
		//打开远程商店
		MoveTo x7, y7
		LeftClick 1
		
		MoveTo 623, 264
		LeftClick 1
	

		//手动拖动卖东西，直接双击第一次不可用
		MoveTo x8, y8
		LeftDown 1
		
		Delay 1000
		//移动到商店界面，鼠标弹起卖掉
		MoveTo 361, 348
		LeftUp 1
		
		//按回车确定卖出
		KeyPress "Enter", 1
		Delay 300
		//鼠标拖动回原来位置
		MoveTo 389, 234
		LeftDown 1
		Delay 200
		MoveTo x8, y8
		LeftUp 1
		
		For 65 - 1 + sl
		
			Delay 200
			
			LeftClick 1
			LeftClick 1
			Delay 300
			KeyPress "Enter", 1
			
			Delay 500
		Next
		
		sl = 0
		
		//单击关闭背包和商店界面
		MoveTo 395, 297
		LeftClick 1
	End If
	
	
	//多选框自动阅历·多选框自动阅历·多选框自动阅历·多选框自动阅历·多选框自动阅历·多选框自动阅历·多选框自动阅历·多选框自动阅历·多选框自动阅历
	//多选框自动阅历·多选框自动阅历·多选框自动阅历·多选框自动阅历·多选框自动阅历·多选框自动阅历·多选框自动阅历·多选框自动阅历·多选框自动阅历
	If Form1.CheckBox3.Value > 0 Then 
		
		If k = 2 Then 
			//保镖阅历
			MoveTo bbx, bby
			LeftClick 1
			
			Delay 500
			MoveTo bx, by
			LeftClick 1
			
			Delay 500