heheheh^^ vergebliche mühe ^^
if (FindBitmapTolerance(gl1,xx,yy,79)=true) Then begin MoveMouse(xx,yy) writeln('Glitzi erkannt auf : '+inttostr(xx)+' '+','+inttostr(yy)); end;
anhand deines beispiels:Quote:
repeat
// code nach bedarf
if ...
...
..
until ......... (bedingung die erfüllt sein muss um schleife zu verlassen)
kleiner nachtrag : je nachdem wie gross und welchen vergleichswert dein bitmap mit der position auf der karte hat, kann es sein, dass du die xx,yy koordinaten verändern musst, da er sonst um ein feld daneben klickt. das würde dann beispielsweise so aussehen:Quote:
repeat
if (FindBitmapTolerance(gl1,xx,yy,79)=true) Then begin
clickmouse(xx,yy,true);
writeln('Glitzi erkannt auf : '+inttostr(xx)+' '+','+inttostr(yy));
end;
until (FindBitmapTolerance(gl1,xx,yy,79)=false)
Quote:
repeat
if (FindBitmapTolerance(gl1,xx,yy,79)=true) Then begin
clickmouse(xx+2,yy+3,true)
writeln('Glitzi erkannt auf : '+inttostr(xx)+' '+','+inttostr(yy));
end;
until (FindBitmapTolerance(gl1,xx,yy,79)=false)
Danke dir ! :) , ja habe nachträglich Maus klick hinzugefügt :D , hatte eine denk fehler ^^ , werds gleich mal testen :))Quote:
ähm... wenn du nur diesen teil in einer schleife wiederholst, dann passiert folgendes:
er bewegt deine maus auf das gefundene glitzi solange es vorhanden und sollte es wer anderes einsammeln, dann macht er gar nichts mehr da kein entsprechendes glitzi (bitmap) in sichtweite gefunden wurde. mit "movemouse" bewegst ja nur zur koordi hin, aber es erfolgt kein klick. wenn kein glitzi in sichtweite und er in dieser schleife hängt, dann wechselt er ja auch keine position ;)
du hast ja bereits funktionierende scripts von anderen und da kann man sich bei solchen problemen durchaus ne logische ableitung und erläuterung her holen *grins*
anhand deines beispiels:
kleiner nachtrag : je nachdem wie gross und welchen vergleichswert dein bitmap mit der position auf der karte hat, kann es sein, dass du die xx,yy koordinaten verändern musst, da er sonst um ein feld daneben klickt. das würde dann beispielsweise so aussehen:
beim kurz drüber schauen ist mir folgendes aufgefallen ... du verwendest für gl1 eine schleife, aber für gl2 keine. theoretisch brauchst entweder beide in einer schleife oder für jedes ne eigene schleife.Quote:
begin
procedure variablen;
...
end;
procedure versioncheck;
...
end;
procedure glitzisuche
...
end;
begin
repeat
variablen;
versioncheck;
glitzisuche;
until (bedingung)
end;
end.
bzw. umgedreht vielleicht sinnvoller ... alsoQuote:
repeat
if (FindBitmapTolerance(gl1,xx,yy,79)=true) Then begin
result:=true;
if (result=true) then begin
clickmouse(xx,yy,true);
writeln('Glitzi erkannt auf : '+inttostr(xx)+' '+','+inttostr(yy));
end;
if (FindBitmapTolerance(gl2,xx,yy,79)=true) Then begin
result:=true;
if (result=true) then begin
MoveMouse(xx,yy)
ClickMouse(xx,yy,true)
end;
end;
end;
until (result=false)
ist aber nun schon spät ... also dieser gedankengang unter vorbehalt der eigenen prüfung *grins*Quote:
if (FindBitmapTolerance(gl1,xx,yy,79)=false) Then begin
if (FindBitmapTolerance(gl2,xx,yy,79)=false) Then begin
if (FindBitmapTolerance(gl3,xx,yy,79)=false) Then begin
letztes glitzi mit true-bedingung und dann von unten nach oben die entsprechenden kommandos
Jetzt steht bei mir nur noch käse misst :D , ich glaube ich Schreibe das nochmal alles neu :) und nimm dann deine hilfe ^^Quote:
also normal gehst her und teilst die sachen auf in prozeduren und schliesst jede prozedur mit end ab. am schluss vor dem "end." gehst dann her und baust eine schleife ein in der du die funktionen aufrufst.
verkürztes bespiel :
beim kurz drüber schauen ist mir folgendes aufgefallen ... du verwendest für gl1 eine schleife, aber für gl2 keine. theoretisch brauchst entweder beide in einer schleife oder für jedes ne eigene schleife.
gedankenanregung wäre : ... baue eine schleife und löse es über result = true / false
bzw. umgedreht vielleicht sinnvoller ... also
ist aber nun schon spät ... also dieser gedankengang unter vorbehalt der eigenen prüfung *grins*
Okai gut .. :) danke ich dir natürlich auch ! :)Quote:
uff... ich glaube das wird dann sicher nichts.. bin selbst auch noch dabei mich rein zu arbeiten und stückchenweise durch zu sehen. hab zwar auch schon paar scripts leicht abgewandelt oder wieder zum laufen gebracht, aber wirklich viel wissen hab ich nicht !
schaue mir halt alte scripts punkt für punkt durch um zu verstehen was passiert und was wie was bedeutet. ausserdem hab ich momentan relativ wenig zeit, sonst hätte ich schon längst auch schon 1-2 scripts erweitert *grins*
aber wenn ne frage hast und ich sie beantworten kann, dann helf ich dir natürlich gerne ;)
Quote:
Okai gut .. :) danke ich dir natürlich auch ! :)
1.Frage wie halte ich das Script die ganze zeit am laufen , so das es durch läuft , denn so wie ich das oben gemacht habe gings net :(
lg Doc
while (condition) do
while 1 do
immer wenn ich da bin bist du nicht da * lachQuote:
Ohje seadoc ^^ meld dich mal du weist wie und wo^^
(und für alle die jetzt wieder was sagen wollen einafch mal f...se halten )
Daran habe ich schon auch alles gedacht , aber das script soll ja für den alten god of war sein , hihi ^^ .. habe da so was 'cooles' vor ^^Quote:
@seadoc
durch ne schleife die er im endeffekt niemals verlassen wird. du kannst ja auch mehrere schleifen in einem script einbauen. wichtig ist eher, was dir dein script unterbrechen kann, wie zb. server-neustart, browsercrash etc.
@schecke
du hast eh mehr erfahrung und tust dich leichter die dinge zu erklären ... hoffe aber mal deine klammer war nicht auf mich bezogen ?! ;)
nein nein^^ geht um die die immer heulen weil sie denken ich würde freebots niedermachen^^ und meinen ich würde es den schreibern nicht gönnen was zu kreieren^^ aber seadoc weis es ja nun besser^^:mofo:Quote:
@seadoc
durch ne schleife die er im endeffekt niemals verlassen wird. du kannst ja auch mehrere schleifen in einem script einbauen. wichtig ist eher, was dir dein script unterbrechen kann, wie zb. server-neustart, browsercrash etc.
@schecke
du hast eh mehr erfahrung und tust dich leichter die dinge zu erklären ... hoffe aber mal deine klammer war nicht auf mich bezogen ?! ;)
Genau so ist es richtig ! , und ich bin auf dafür das man deine art von bot nur verkaufen darf ! also bei dir kaufen muss ^^ .. und ich finde das du die free bots nicht nieder machst , denn deine laufen um einiges perfekt + Support = 1a .. ich habe übrigens den weg gefunden beim God of war :) klappt jetzt alles wie ich es will , danke allen die mir geholfen haben .. :)Quote:
nein nein^^ geht um die die immer heulen weil sie denken ich würde freebots niedermachen^^ und meinen ich würde es den schreibern nicht gönnen was zu kreieren^^ aber seadoc weis es ja nun besser^^:mofo:
Allerdings erkläre ich nichts ^^ ich gebe nur hinweise sonst wäre es nicht seine arbeit und beim nächsten problem würde es wieder klopf klopf ich brauch dich mal gehen
er soll seine arbeit alleine fertig bekommen mit eigenen gedanken gängen , und falls mal ein irrweg besteht helfe ich gerne die richtige richtung einzuschlagen^^