я уже стоко перечитал и уже незнаю как почать сканить
я так понел нада
if FromServer and (pck[1]=#$27) then
if (ReadD(12)<>57) then exit;
if (ReadD(16)<100000000) then buyAdena;
както так вроде нада и написать процедуры
За это сообщение goodvin1709 нажился спасибкой от: