;由于是第一次编写,难免很多亢余语句,请大家多指教.
;说明：
;执行条件:1、包里有足够的铁2、包里有足够的补锅工具3、铁和工具放在随身包的第一层（就是;ALT+I打开的那个包）。4、你的补锅技能要高于30。
;执行原理:脚本会自动判断你的补锅技能高低，然后选择合适的制品进行练功。练功生成的垃圾会自动扔进垃圾袋。由于时间原因，我没有编写判断铁或补锅工具不足时自动从银行取出。
;需要说明的是因为垃圾袋和普通袋子的type相同，但ID不同，所以在脚本最后，使用者要根据自己的情况改动一个地方，改动位置脚本中我会说明。 

initevents
checktools:
gosub checktools
finditem ktl c
set #lobjectid #findid
event macro 17 0
wait 10
chooseskill tink
if #skill > 300 && #skill < 500
{
gosub hxbd
}
if #skill > 500 && #skill < 600
{
gosub jsq
}
if #skill >600 && #skill < 1000
{
gosub xwyj
{
if #skill >= 1000
{
msg skill is full$
halt
}
sub checktools
finditem enk c
if #findtype >< enk
{
msg no iron$
halt
}
finditem ktl c
if #findtype >< ktl
{
msg no tools$
halt
}
return
sub hxbd
{
click 61 148
wait 10
click 271 152
wait 10
finditem big c
gosub lj
gosub checktools
}
sub jsq
{
click 61 148
wait 10
click 427 313
wait 10
click 276 229
wait 10
finditem iwh
gosub lj
gosub checktools
}
sub xwyj
{
click 69 210
wait 10
click 273 150
wait 10
finditem zvh c
gosub lj
gosub checktools
}
sub lj
{
set %laji #findid
finditem BDSIRMD c ;这一句里你需要把BDSIRMD改成你的垃圾袋的ID，如果你的包里没有其他袋子，那么就改成CKF
set %x #findx + 17
set %y #findy - 5
event drag %laji
wait 10
click %x %y
}
return