Angelo Posted January 19, 2013 Share Posted January 19, 2013 Hi, janilabo make this script for dofus bot to gather resources, its working but there is just a problem, the old version of dofus required 2 clicks, one to "select" the resource and one to give the order for "recollect", the new version just needs a simple click to gather the resources but i can't modify the code because i don't understand the code, someone can help? code: --------------------------------------------------------------------------------------------------------------------------------------------------- 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. Quote Link to comment Share on other sites More sharing options...
Janilabo Posted January 19, 2013 Share Posted January 19, 2013 Is it either one of these (test both): 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(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. ..or... 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 + 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. -Jani Quote Link to comment Share on other sites More sharing options...
Marcussence Posted October 6 Share Posted October 6 Sports Betting: A Comprehensive Guide Sports betting has become a global phenomenon, captivating millions of enthusiasts with its blend of excitement, strategy, and the potential for financial gain. This article aims to provide a comprehensive overview of sports betting, exploring its history, popular types, strategies, and the legal landscape. A Brief History Sports betting dates back to ancient civilizations, where wagers were placed on events such as chariot races and gladiatorial contests. Over the centuries, the practice evolved, encompassing a wide range of sports and becoming a formalized industry in the modern era. Today, sports betting is a multi-billion-dollar industry with a substantial presence both online and offline. Types of Sports Bets There are several types of bets that one can place on sports events, including: 1. Moneyline Bets: The simplest form of betting where you pick the winner of a game or match. 2. Point Spread Bets: This bet involves predicting the margin of victory. 3. Over/Under Bets: Also known as totals, these bets are placed on the total number of points scored by both teams combined. 4. Prop Bets: These are bets on specific outcomes within a game, such as the first team to score. 5. Futures Bets: Bets placed on events that will happen in the future, like who will win the championship at the end of the season. Strategies for Successful Betting Successful sports betting requires more than just luck. Here are some strategies to consider: 1. Research and Analysis: Study the teams, players, and historical performance data http://downzone.pl/profile.php?lookup=4971 2. Bankroll Management: Set a budget and stick to it, avoiding the temptation to chase losses. 3. Understanding Odds: Learn how to read and understand betting odds to make informed decisions. 4. Shop for the Best Lines: Different sportsbooks offer different odds and payouts, so shop around for the best deals. The Legal Landscape The legality of sports betting varies around the world. In some countries, it is fully legalized and regulated, while in others, it is either restricted or outright banned. The advent of online sportsbooks has also added a layer of complexity, as bettors can now place wagers from pretty much anywhere, often bypassing local regulations. Conclusion Sports betting continues to grow in popularity, attracting a diverse audience from casual fans to hardcore enthusiasts. With the right approach, including diligent research and disciplined bankroll management, it can be both an exciting and rewarding venture. However, it's essential to understand the risks involved and to always gamble responsibly. Quote Link to comment Share on other sites More sharing options...
DanielBaits Posted November 29 Share Posted November 29 Когда дело доходит до необходимости в ремонте либо исполненьи какой-никаких-либо услуг дома, многие люди предпочитают нанимать мастера на час. Это удобный метод решить проблемы без долгого поиска профессионалов и лишних затрат. В данном посте мы рассмотрим основные моменты, на которые стоит обратить внимание в момент выбора мастера на час. 1. Обусловьте свои нужды Прежде всего, вам следует четко найти, какой-никакие именно услуги для вас нужны. Это может быть мелкий ремонт, покраска стен, установка мебели, электромонтаж или что-то иное. Зная, что именно вы желаете сделать, вы сможете более точно выбрать подходящего спеца. 2. Отыскивайте советы Советы приятелей, коллег или знакомых могут существенно упростить поиск мастера. Если кто-то из вашего окружения уже воспользовался услугами мастера, он сможет поделиться своими впечатлениями и дать ценные советы. 3. Исследуйте онлайн-платформы Есть особые платформы и сервисы, в каком месте вы найдете мастеров на час. Обратите внимание на отзывы юзеров и рейтинги профессионалов. Это окажет вам помощь оценить профессионализм и качество работы мастера. 4. Инспектируйте квалификацию и опыт Прежде чем решиться, узнайте о квалификации и опыте мастера. Отлично, если у него есть сертификаты или опыт работы в нужной вам области. Также не лишним будет попросить портфолио выполненных работ. 5. Запросите цены Не смущяйтесь уточнять стоимость услуг. Разные мастера могут предлагать разные цены в большой зависимости от опыта и сложности работы. Сравните предложения нескольких специалистов, чтобы выбрать более подходящую. 6. Уточните условия работы Перед тем как подтвердить встречу, обсудите все детали: время работы, нужные материалы и инструменты. Убедитесь, что мастер разумеет ваши ожидания и требования. 7. Проверьте отзывы и репутацию Дополнительно обследуйте он-лайн-отзывы о мастере, если такая возможность есть. Это поможет составить более полное представление о его профессионализме и надежности. 8. Общайтесь вежливо и открыто Не забывайте, что не плохая коммуникация ключ к успешному сотрудничеству. Обсуждайте возникшие вопросы и комментарии с мастером, чтобы все было четко и понятно https://alliancetrade.ru/forum/index.php?PAGE_NAME=profile_view&UID=1549 9. Обеспечьте безопасность Если мастер должен работать с электроинструментами либо делать другие потенциально небезопасные задачи, постарайтесь обеспечить безопасность на рабочем месте. Это дотрагивается как вас, так и специалиста. Заключение Выбор мастера на час это ответственный шаг, требующий бдительности и кропотливого подхода. Следуя изложенным рекомендациям, вы сможете найти квалифицированного и надежного специалиста, который окажет вам помощь решить все проблемы в доме быстро и отменно. Фортуны в вашем поиске! Quote Link to comment Share on other sites More sharing options...