Help with script for dofu please

[Angelo]

hello im new and i dont speak enlglish but i can understand all... im triying so go easy please.

I used to use this script when i played dofus.

Now 2013, i downloaded scar but have this problem when run scar

 

"Unknown identifier ‘MovemouseSmoth’"

at

 

"MoveMouseSmooth(x, y);"

 

i need help, and i want to learn script too, if can tell me where...

 

AGAIN SORRY MY BAD ENGLISH i dont know nothing -.-

Of course scar divi is a niceee program :33

------------------------------------------------------------------------

var

x, y, lvlx, lvly: integer;

 

const

Resource1= Color de tu Recurso; // Pega el color del recurso Nº1

Resource2= Color de tu Recurso; // Pega el color del recurso Nº2

Resource3= Color de tu Recurso; // Pega el color del recurso Nº3

CollectTime= Tiempo en recolectar; // Tiempo de recoleccion (11000 = 11 Segundos)

 

function Targetresource1 : Boolean;

begin

if(FindColor(x, y, Resource1, 0, 0, 800, 600))then result:= true

end;

 

function Targetresource2 : Boolean;

begin

if(FindColor(x, y, Resource1, 0, 0, 800, 600))then result:= true

end;

 

function Targetresource3 : Boolean;

begin

if(FindColor(x, y, Resource3, 0, 0, 800, 600))then result:= true

end;

 

function Nextresource1 : Boolean;

begin

if(FindColor(x, y, Resource1, 0, 0, 800, 600))then result:= true

end;

 

function Nextresource2 : Boolean;

begin

if(FindColor(x, y, Resource2, 0, 0, 800, 600))then result:= true

end;

 

function Nextresource3 : Boolean;

begin

if(FindColor(x, y, Resource3, 0, 0, 800, 600))then result:= true

end;

 

Procedure Collect;

begin

if (Targetresource1)or(Targetresource2)or(Targetresource3) then

MoveMouseSmooth(x, y);

Wait(100+random(200));

HoldMouse(x, y, true);

Wait(20+random(50));

ReleaseMouse(x, y, true);

Wait(100+random(200));

MoveMouseSmooth(x+25, y+25);

 

Wait(100+random(200));

HoldMouse(x+25, y+25, true);

Wait(20+random(50));

ReleaseMouse(x+25, y+25, true);

Wait(3000+random(500));

Wait(CollectTime);

end;

 

function noresource : Boolean;

begin

if(FindColor(x, y, 1683891, 0, 0, 800, 600))then result:= false

end;

 

function FindLevel : boolean;

begin

result := false;

If(FindColor( lvlx, lvly, 25087,0,0,500,500))then result := true

end;

 

Procedure LevelUp;

begin

If(FindLevel= true)then

MoveMouseSmooth(lvlx, lvly+2);

Wait(100+random(100));

ClickMouse(lvlx, lvly+2, true);

Wait(100+random(100));

end;

 

begin

Collect;

repeat

if (noresource) then

Collect;

if(nextresource1)or(nextresource2)or(nextresource3)then

Collect;

if(FindLevel)then

LevelUp;

until(false);

end.

[Janilabo]

const
 Resource1 = 0; // Color de tu Recurso - Pega el color del recurso Nº1
 Resource2 = 0; // Color de tu Recurso - Pega el color del recurso Nº2
 Resource3 = 0; // Color de tu Recurso - Pega el color del recurso Nº3
 CollectTime = 0; // Tiempo en recolectar - Tiempo de recoleccion (11000 = 11 Segundos)

var
 x, y, lvlx, lvly: Integer;

function TargetResource1: Boolean;
begin
 Result := FindColor(x, y, Resource1, 0, 0, 800, 600);
end;

function TargetResource2: Boolean;
begin
 Result := FindColor(x, y, Resource1, 0, 0, 800, 600);
end;

function TargetResource3: Boolean;
begin
 Result := FindColor(x, y, Resource3, 0, 0, 800, 600);
end;

function NextResource1: Boolean;
begin
 Result := FindColor(x, y, Resource1, 0, 0, 800, 600);
end;

function NextResource2: Boolean;
begin
 Result := FindColor(x, y, Resource2, 0, 0, 800, 600);
end;

function NextResource3: Boolean;
begin
 Result := FindColor(x, y, Resource3, 0, 0, 800, 600);
end;

procedure Collect;
begin
 if (TargetResource1 or TargetResource2 or TargetResource3) then
 begin
   MoveMouse(x, y);
   Wait(100 + Random(200));
   MouseBtnDown(x, y, mbLeft);
   Wait(20 + Random(50));
   MouseBtnUp(x, y, mbLeft);
   Wait(100 + Random(200));
   MoveMouse((x + 25), (y + 25));
   Wait(100 + Random(200));
   MouseBtnDown((x + 25), (y + 25), mbLeft);
   Wait(20 + Random(50));
   MouseBtnUp((x + 25), (y + 25), mbLeft);
   Wait(3000 + Random(500));
   Wait(CollectTime);   
 end;
end;

function NoResource: Boolean;
begin 
 Result := not FindColor(x, y, 1683891, 0, 0, 800, 600);
end;

function FindLevel: Boolean;
begin
 Result := FindColor(lvlx, lvly, 25087, 0, 0, 500, 500);
end;

procedure LevelUp;
begin
 if FindLevel then
 begin
   MoveMouse(lvlx, (lvly + 2));
   Wait(100 + Random(100));
   ClickMouse(lvlx, (lvly + 2), mbLeft);
   Wait(100 + Random(100)); 
 end;
end;

begin
 Collect;
 repeat
   if NoResource then
     Collect;
   if (NextResource1 or NextResource2 or NextResource3) then
     Collect;
   if FindLevel then
     LevelUp;  
 until False;
end.

 

Does that work for you?`(Edited it a bit)

 

-Jani

[Angelo]

T-T i can't find the words, you are AWESOME its working T-T

thank you X 1 000 000 000

[MatthewHom]

Выбор трактора Шифенг: на что обратить внимание

Тракторы марки Шифенг захватили популярность на аграрном базаре из-за своей надежности, многофункциональности и доступной стоимости. Однако, чтоб выбрать подходящую модель, нужно учесть несколько ключевых факторов. В этой статье будут рассмотрены, на что обратить внимание при выборе трактора Шифенг в зависимости от ваших потребностей и условий эксплуатации.

1. Определите цели использования

До этого всего, необходимо определить, для какой-никаких задач вы планируете использовать трактор. Основные направления применения тракторов Шифенг включают:

- Сельскохозяйственное производс: обработка почвы, посадка, сбор урожая, перевозка.
- Строительство:, подъем и транспортировка строительных материалов.
- Лесозаготовка: вывоз древесной породы, уборка на делянках.

Каждое направление может требовать различной мощности, производительности и дополнительных функций, потому принципиально чётко понять свои цели.

2. Выбор мощности и типа двигателя

Тракторы Шифенг представлены в спектре мощностей, начиная от легких моделей для маленьких хозяйств и заканчивая мощными машинами для больших агроформирований. Главно учесть следующие моменты:

- Мощность двигателя: от этого параметра зависит способность трактора исполнять разные виды работ. Более массивные машины то что надо для тяжелых условий эксплуатации.
- Тип двигателя: дизеля почаще используются в тракторов весьза их экономичности и долговечности, но и бензиновые модели имеют свои преимущества.

3. Конструкция и качество

В момент выбора трактора главно направить внимание на его конструкцию и качество материалов. Тракторы Шифенг часто делают из прочных сплавов, что наращивает их долговечность. Также проверьте:

- Тип трансмиссии: механическая либо гидростатическая, каждая из которых имеет свои плюсы и минусы.
- Подвеска: наличие передней и задней подвески помогает сделать лучше устойчивость и маневренность.

4. Комплектация и дополнительные опции

Дополнительные функции могут существенно воздействовать на комфорт и функциональность работы с трактором. При рассмотрении модели направьте внимание на:

- Наличие фар и освещения для работы в черное время суток.
- Кабина: отлично утепленная и оснащенная системами вентиляции и кондиционирования очень сильно повысит комфорт оператора.
- Дополнительное оборудование: возможность установки разной подвесного или прицепного оборудования (плуг, культиватор, фреза и т.д.).

5. Сервис и гарантия

Важно учитывать доступность сервисного обслуживания и наличие запчастей. Изучите:

- Гарантийные условия: они могут варьироваться в зависимости от производителя.
- Квалификация сервисного центра: его возможности по ремонту и обслуживанию тракторов.

6. Бюджет

Помните о http://ms06.jp/?page_id=2&unapproved=200410&moderation-hash=d62bf549eb393b51255062535d2e8315#comment-200410 вашем бюджете. Тракторы Шифенг предлагают широкий ценовой спектр, но также важно учесть расходы на эксплуатацию, обслуживание и возможные ремонты в будущем. Сравните различные модели и выберите ту вот, которая превосходнейшим образом подходит вашим финансовым возможностям.

Заключение

Выбор трактора Шифенг это ответственный процесс, который зависит от большого колличества причин. Определите цели его использования, учитывайте мощность и тип двигателя, качество конструкции, дополнительные функции, доступность сервиса и свой бюджет. Правильно подобранный трактор станет надёжным ассистентом в вашем хозяйстве, обеспечивая эффективность и продуктивность работы на долгие годы. Не торопитесь с покупкой, превосходнее заблаговременно соберите всю необходимую информацию и проконсультируйтесь с профессионалами, чтоб сделать обоснованный выбор.