谁有无限刷生啤酒的脚本

Speed(100);
if(5,2,100000)
  MoveTo(2827,x,y);
  GetItemFrmQz(58371,200,1);
  DoEvent(2827,15);
endif
MoveTo(3301,555,313);
BuyItem(6,29003,5);
MoveTo(1515,x,y);
DoEvent(1515,16);
MoveTo(2000,x,y);
DoEvent(2000,870,490);
MoveTo(1515,x,y);
DoEvent(1515,7);
MoveTo(5304,x,y);
DoEvent(5304,11);
MoveTo(1515,x,y);
DoEvent(1515,5);
MoveTo(3302,x,y);
DoEvent(3302,301,296);
MoveTo(5304,x,y);
DoEvent(5304,8,9,10);
EatItem(63521,200,1);
MoveTo(2827,x,y);
SaveItemsBank(28060,31094);
Loop();