1) Создайте макрос: /
Code
script local function buy (n,q) for i=1,100 do if
n==GetMerchantItemInfo(i) then BuyMerchantItem(i,q) end end end buy ("Восхитительный
безумный камень Бессмертия",249);

2) Идите вШатратт в Нижний город к продавцу амулетов (корды 65,69)
3) Откройте окно покупки и нижмайте на макрос пока не кончатся деньги
4) Продайте все что вы купили.