hello, sorryy I dont' speak english :(
please help me :(
yakınlardaki pırıltıları topluyor ama uzaktakileri tıklamıyor. benim sorunum ne olabilir?
çok uğraştım ama olmadı. fiddler sorun yok. scar divi 3.22 yeni kurdum.
laptop win7. ekran 15.6 inç.
gemi 5 level.
içerik aşağıdaki gibidir.
{.Script Info:
# ScriptName = RShinyBot
# Author = xRiDDi
# Description = Script for the collection of Shinys.
# Version = v1.4
# Date = 22/10/2013
# Comments =
[Only registered and activated users can see links. Click Here To Register...]
/Script Info}
program RShinyBot;
var x, y, xx, yy, oldmmxx, oldmmyy, Quarter, hpx, hpy, RepPerc, ShinyX, ShinyY, OldShinyCounter, OldShinyX, OldShinyY, WindowHandle, smx, smy, smx1, smy1, smx2, smy2, smx3, smy3, sms1x, sms1y, sms2x, sms2y :integer; //Other
var wx1, wx2, wy1, wy2, wxm, wym :integer; //Window
var scx1, scx2, scy1, scy2, scxm, scym :integer; //SeaChart
var mmx1, mmx2, mmy1, mmy2, mmxx, mmyy, ShinyMMTol, PlayerMMTol, mmfc1, mmfc2 :integer; //MiniMap
var islx1, isly1, islx2, isly2, islxm, islym, IslandRange :integer; //Island
var repx, repy :integer; //RepairCoords
var HoursToRun, CollectedTime :integer; //Time
var StartWait, RandomWait, SysMsgWait, CheckMoveWait :integer; //Waits
var RepCheckCounter, oldmmcounter, CenterCounterX, CenterCounterY, CheckCounter, CrashCounter, CollectedShinyCounter, SunkCounter :integer; //Counters
var Water, Attacked, PlayerMM, ShinyMMCol, ShinyCol, IslandCol, IslandMMCol, Inventory, ActivateItem, KrakenMeat, Repped, Repping, HPBar, HPBar2, Player, GuildShinyCol, MouseMonster, ChatOnColour, ChatOffColour, CloseBoxColour, SystemMessage, SystemMessageW, SystemMessageI, SystemMessageGI, SystemMessageS, SystemMessageSI :integer; //Colours
var ShinyHunterOnBMP, ShinyHunterOffBMP, HpBMP :integer; //BMPs
var AutoDefineSeaChart, AutoDefineMiniMap, AutoDefineRepButton, AutoDefineHP, FoundShinyOnChart, RepOnCorner, IgnoreMMShiny, SaveSunkImages, AvoidIsland, Level5Rep, Sunk, SystemMessageBool, CollectNormalShiny, DEBUGMODE, CollectGuildShiny, CollectKrakenMeat, Moving, NeedRep, FoundShiny, CanClick, BeingHit, ToolbarH :boolean; //Booleans
procedure UserVariables;
begin
SetClientWindowHandle(WindowHandle);
//##################\\
//##### NEEDED #####\\
//##################\\
DEBUGMODE:=true; //set to true if you would like to active Debug Mode - alot of outputs, false if you just want normal information.
AutoDefineSeaChart:=true; //set to true for autofind seachart, false for manual
AutoDefineMiniMap:=true; //set to true for autofind minimap, false for manual
AutoDefineRepButton:=true; //set to true for autofind repbutton, false for manual
AutoDefineHP:=true; //set to true for autofind HP bar, false for manual
CollectNormalShiny:=true; //Set to true if you would like to collect Normal Shinys, false if you do not.
CollectGuildShiny:=true; //Set to true if you would like to collect Guild Shinys, false if you do not.
CollectKrakenMeat:=false; //Set to true if you would like to collect Kraken Meat, false if you do not.
AvoidIsland:=false; //Set to true if you would like to Avoid Guild Islands, false if you do not.
HoursToRun:=10; //The amount of hours for the bot to run
RepOnCorner:=true; //Set to true if you would like to rep on the corner, false if you do not.
Level5Rep:=false; //Set to true if you have the level 5 repair mate, false if you do not.
SaveSunkImages:=true; //Set to true if you would like to save images when sunk - this should show the thing which sank you (Saved into the same location as the Scar Script, false if you do not.
RepPerc:= 2; // 1 = Rep at 25%
// 2 = Rep at 35%
// 3 = Rep at 50%
// 4 = Rep at 75%
//####################\\
//##### OPTIONAL #####\\
//####################\\
//Sea Chart User Define (Not needed if you have set AutoDefineSeaChart to true)
scx1:=298;
scy1:=93;
scx2:=1097;
scy2:=679;
//MiniMap User Define (Not needed if you have set AutoDefineMiniMap to true)
mmx1:=1134;
mmy1:=99;
mmx2:=1223;
mmy2:=188;
//Rep Button User Define (Not needed if you have set AutoDefineRepButton to true)
repx:=694;
repy:=702;
//HP Bar User Define (Not needed if you have set AutoDefineHP to true)
hpx:=1169;
hpy:=347;
end;
//################################################## ######################\\
//##################### #####################\\
//##################### DO NOT CHANGE ANYTHING BELOW #####################\\
//##################### #####################\\
//################################################## ######################\\
procedure Variables;
begin
SetClientWindowHandle(WindowHandle);
DisguiseClient('SF - RShinyBot (made by xRiDDi)');
GetClientDimensions(x,y);
wx1:=8;
wy1:=59;
wx2:=1373;
wy2:=734;
wxm:=wx2/2;
wym:=wy2/2;
CollectedShinyCounter:=0;
SunkCounter:=0;
StartWait:=5000;
RandomWait:=50;
SysMsgWait:=1000;
CheckMoveWait:=1000;
IslandRange:=10;
ShinyMMTol:=30;
PlayerMMTol:=20;
HoursToRun:=HoursToRun*3600000;
ShinyCol:=0;
GuildShinyCol:=16776978;
KrakenMeat:=16776984;
IslandCol:=5592490;
IslandMMCol:=8026812;
Water:=3876096;
Attacked:=8388863;
MouseMonster:=12040119;
PlayerMM:=65280;
Player:=393390;
ShinyMMCol:=65019;
Inventory:=1605887;
ActivateItem:=229631;
Repped:=2644878;
Repping:=819455;
HPBar:=7000888;
HPBar2:=7656248;
ChatOnColour:=10454834;
ChatOffColour:=10456114;
CloseBoxColour:=16580391;
SystemMessage:=328965;
SystemMessageW:=5535596;
SystemMessageI:=5601390;
SystemMessageGI:=5535599;
SystemMessageS:=5535597;
SystemMessageSI:=5667183;
CenterCounterX:=1;
CenterCounterY:=1;
smx1:=wx2;
smy1:=wy2;
smx2:=wx2;
smy2:=wy2;
smx3:=wx2;
smy3:=wy2;
sms1x:=wx2;
sms1y:=wy2;
sms2x:=wx2;
sms2y:=wy2;
hata ayıklama sonuçları aşağıdaki gibidir.
DB (25.10.2013 03:36:55): WindowHandle: 984356
DB (25.10.2013 03:36:55): PROCEDURE: SysMessage - END
DB (25.10.2013 03:36:55): x: 927 y:558 Color: 11711154
DB (25.10.2013 03:36:55): Color Did Not Matched - Can Not Click
DB (25.10.2013 03:36:55): PROCEDURE: SysMessage - START
DB (25.10.2013 03:36:55): WindowHandle: 984356
DB (25.10.2013 03:36:55): PROCEDURE: SysMessage - END
DB (25.10.2013 03:36:55): x: 761 y:391 Color: 8944485
DB (25.10.2013 03:36:55): Color Did Not Matched - Can Not Click
DB (25.10.2013 03:36:55): PROCEDURE: SysMessage - START
DB (25.10.2013 03:36:55): WindowHandle: 984356
DB (25.10.2013 03:36:55): PROCEDURE: SysMessage - END
DB (25.10.2013 03:36:55): x: 797 y:131 Color: 8944485
DB (25.10.2013 03:36:55): Color Did Not Matched - Can Not Click
DB (25.10.2013 03:36:55): PROCEDURE: SysMessage - START
DB (25.10.2013 03:36:55): WindowHandle: 984356
DB (25.10.2013 03:36:55): PROCEDURE: SysMessage - END
DB (25.10.2013 03:36:55): x: 608 y:619 Color: 11711154
DB (25.10.2013 03:36:55): Color Did Not Matched - Can Not Click
DB (25.10.2013 03:36:55): PROCEDURE: SysMessage - START
DB (25.10.2013 03:36:55): WindowHandle: 984356
Successfully executed
lütfen bir yardımcı olunuz. help me :(
